source: PSPA/transportPSPA/trunk/include/ELM0D.CIN @ 463

C ELM0D               CHARACTERISTICS OF GIVEN TYPE CODES
C
C RMTX         TRUE IF ELEMENT HAS TRANSFER MATRIX
C OMTX         TRUE IF ELEMENT HAS FLOOR COORDINATE MATRIX
C CFIT         TRUE IF ELEMENT AFFECTS FLOOR COORDINATES
C RSYM         TRUE IF ELEMENT HAS ROTATIONAL SYMMETRY
C ATWE         TRUE IF ELEMENT IS IMPLEMENTED BEFORE ENTERING 
C                       MAD DEFINED BEAM LINE
C OPER         TRUE IF ELEMENT IS AN OPERATION SUCH AS PRINT,
C                       FIT, UPDATE, OR STORE
C RABL         TRUE IF ELEMENT HAS ROLL OPTION
C WFRN         TRUE IF ELEMENT IS MAGNET WITH FRINGE FIELD
C MPRN         TRUE IF ANY PRINTING IS ASSOCIATED WITH ELEMENT
C
      LOGICAL         RMTX, OMTX, CFIT, RSYM, ATWE, OPER, RABL, WFRN,
     1                MPRN
C
      COMMON /ELM0D/  RMTX, OMTX, CFIT, RSYM, ATWE, OPER, RABL, WFRN,
     1                MPRN