PARM FREE,NOCHECK,NOLIST,STACK
IMP80 CTOPT+SUP27BSRCE_SUP27BS,SUPZZ,,.OUT
IMP80 CTOPT+SUP27BSRCE_COM33S,COMZZ,,.OUT
IMP80 CTOPT+SUP27BSRCE_PRINT06S,PRINTZZ,,.OUT
IMP80 CTOPT+SUP27BSRCE_OPER34S,OPERZZ,,.OUT
IMP80 CTOPT+SUP27BSRCE_ENTER10S,ENTERZZ,,.OUT
PARM FREE,OPT,STACK,NOLIST
IMP80 CTOPT+SUP27BSRCE_GPC37S,GPCZZ,,.OUT
IMP80 SUP27BSRCE_NDIAG07S,NDIAGZZ,,.OUT
IMP80 CTOPT+SUP27BSRCE_COMMS49S,COMMSZZ,,.OUT
IMP80 CTOPT+SUP27BSRCE_FAST35S,FASTZZ,,.OUT
IMP80 CTOPT+SUP27BSRCE_TAPE72S,TAPEZZ,,.OUT
PARM MAP
LINK
SUPZZ
COMZZ
PRINTZZ
OPERZZ
ENTERZZ
GPCZZ
NDIAGZZ
COMMSZZ
FASTZZ
TAPEZZ
.END
SUP27Z
DESTROY SUPZZ,COMZZ,COMMSZZ,FASTZZ,TAPEZZ
SUPFIX SUP27Z,SUP27CT
PERMIT SUP27CT
DESTROY NDIAGZZ,SUP27Z,OPERZZ,ENTERZZ,GPCZZ,PRINTZZ