C ELM14A              ARBITRARY R MATRIX
C
C J1      WHICH ROW OF ARBITRARY R MATRIX IS BEING CONSIDERED.
C TYP1    TYPE CODE ON LAST CARD.
C I14S    INDICATOR FOR SECOND-ORDER TERMS
C I14T    INDICATOR FOR THIRD-ORDER TERMS
C
      INTEGER         J1, TYP1, I14S, I14T
C
      COMMON /ELM14A/ J1, TYP1, I14S, I14T