C ELM2D               TYPE 2  CALCULATED QUANTITIES -- SEE PAGE 2-3 OF
C
C NUM2                   INDEX OF FRINGING FIELD OF MAGNET
C IBVARY                 ADDRESS OF ASSOCIATED MAGNETIC FIELD
C FFIN         LOGICAL   TELLS IF ENTRANCE POLE FACE ROTATION IS PRESENT
C FFOUT        LOGICAL   TELLS IF EXIT POLE FACE ROTATION IS PRESENT
C
      LOGICAL         FFIN, FFOUT
C
      COMMON /ELM2D/  NUM2, IBVARY, FFIN, FFOUT