EDIT BSCMAST20_BSCBASE20,OPTBASE
(M/!?/D1)1000
E
EDIT BSCMAST20_BASICFILES,OPTFILES
(M/!?/D1)1000
E
PARM OPT
IMP OPTBASE,OPTOBJ,.LP
IMP OPTFILES,OPTFILEY,.LP
IMP BSCMAST20_FCONVS,FCOBJ,.LP
PARM
LINK
BSCMAST20_BASIC5AC
BSCMAST20_COLLFNSC
BSCMAST20_FPIOC
BSCMAST20_MATPACKC
BSCMAST20_USINGC
OPTFILEY
OPTOBJ
FCOBJ
.END
BASIC20
PERMIT BASIC20
CHERISH BASIC20
DESTROY OPTOBJ,FCOBJ,OPTBASE,OPTFILES,OPTFILEY