EDIT BSCMAST30_BSCBASE30,OPTBASE
(M/!?/D1)1000
E
EDIT BSCMAST30_BASICFILES,OPTFILES
(M/!?/D1)1000
E
PARM OPT
IMP OPTBASE,OPTOBJ,.LP
IMP OPTFILES,OPTFILEY,.LP
IMP BSCMAST30_FCONVS,FCOBJ,.LP
PARM
LINK
BSCMAST30_BASIC5AC
BSCMAST30_COLLFNSC
BSCMAST30_FPIOC
BSCMAST30_MATPACKC
BSCMAST30_USINGC
OPTFILEY
OPTOBJ
FCOBJ
.END
BASIC30
PERMIT BASIC30
CHERISH BASIC30
DESTROY OPTOBJ,FCOBJ,OPTBASE,OPTFILES,OPTFILEY