1       LOGICAL       PSTWOB, PSORTB, PSDIPB, PSONEB, PSRESB, PSRELB,
2      &              PSDPRB, PSCRSB, PSCZRB, PSCTRB, PSCRLB, PSMAGB,
3      &              PSAATB, PSRTRB, PSLRSB, PSTRPB, PSLNRB, PSEXCB
4       COMMON /PASTBK/ PSTWOB, PSORTB, PSDIPB, PSONEB, PSRESB, PSRELB,
5      &              PSDPRB, PSCRSB, PSCZRB, PSCTRB, PSCRLB, PSMAGB,
6      &              PSAATB, PSRTRB, PSLRSB, PSTRPB, PSLNRB, PSEXCB
7