*         CTEXT CTC$DFT GLOBAL DATA NON S0.
 TOUB     CON    TOBP        *2AP* OUTPUT BUFFER ADJUSTED FOR LINKAGE BYTES
 TINB     CON    TOIP        *2AP* INPUT BUFFER
 MPSR     CON    PMPS        *MPS* REGISTER NUMBER
 JPSR     CON    PJPS        *JPS* REGISTER NUMBER
 CSAR     CON    PCSA        *CSA* REGISTER NUMBER

*         END DECK CTC$DFT_GLOBAL_DATA_NON_S0
