PREQ
$(2)  .
MEMX    EQU     4
LEXD*     EQU   1400
        +LEXD                     . LENGTH FOR FORTRAN ELEMENTS.         SUBXD
SUBEXD* RES     LEXD
SUBXDZ  INFO    2 2                                                      SUBXD
BUFN      EQU      21*28-2            . SAME AS IN APT
LNBUF     EQU      21*28
NMLF3*    EQU    2
POOL3*   RES   NMLF3*LNBUF+5
        END