C     EDIT DATE   03DEC78  12:13
C     SOURCE FILE STKDEFF.IN
C     AUTHOR      A. J. HOWARD
      INTEGER     SUBXB (20),  WFOP (20),   WFOPND (20)
      INTEGER     SUBOP (20),  WFSOP (20)
      EQUIVALENCE (STK (1,  6), SUBXB  (1))
      EQUIVALENCE (STK (1, 10), WFOP   (1))
      EQUIVALENCE (STK (1, 11), WFOPND (1))
      EQUIVALENCE (STK (1, 12), SUBOP  (1))
      EQUIVALENCE (STK (1, 13), WFSOP  (1))