C ELM13C              LOGICAL VARIABLES RELATED TO PRINTING
C
C LCPR     TRUE IF ACCUMULATED LENGTH HAS BEEN PRINTED LENGTH AND ANGLE
C NBE      TRUE IF ELEMENT CHANGES BEAM SO AS TO WARRANT PRINTING OF MATRICES
C NRT      TRUE IF ELEMENT CHANGES TRANSFER MATRIX SO AS TO WARRANT PRINTING.
C BDUN     TRUE IF BEAM MATRIX HAS BEEN PRINTED SINCE LAST ELEMENT BY WHICH 
C                 IT WOULD BE AFFECTED
C TDUN     TRUE IF ACCELERATOR PARAMETERS HAVE BEEN PRINTED SINCE LAST ELEMENT 
C                 BY WHICH THEY WOULD BE AFFECTED
C RDUN     TRUE IF TRANSFER MATRIX HAS BEEN PRINTED SINCE LAST ELEMENT BY 
C                 WHICH IT WOULD BE AFFECTED
C SONLY    TRUE IF ONLY FLOOR COORDINATES ARE AUTOMATICALLY PRINTED A GIVEN
C                 POINT (NOT UNDER USER'S CONTROL, BUT RESERVED FOR THE
C                 ROTATED COORDINATE SYSTEM OF A TILTED ELEMENT -- SONLY
C                 = SURVEY ONLY)
C
      LOGICAL         LCPR, NBE, NRT, BDUN, TDUN, RDUN, SONLY
C
      COMMON /ELM13C/ LCPR, NBE, NRT, BDUN, TDUN, RDUN, SONLY