.IF ($A="NOCOMP") .GOTO FUDGE
.IF ($A="NOIMP") .GOTO MACRO
.IF ($A="COMP") .LET X="/COMP"
.COMP'X SETIO.IMP,CUSPFS.IMP,INIT.IMP,RENAME.IMP,ISFILE.IMP,DDT.IMP,GETSEG.IMP,RUN.IMP,READFS.IMP,READ.IMP,WRITE.IMP,PRINT.IMP,RAD50.IMP,READLI.IMP,READTE.IMP,READST.IMP,DA.IMP,SQ.IMP,DASQ.IMP,DEFINE.IMP,DEFAUL.IMP,CHECKP.IMP,CLOSE.IMP,REWIND.IMP,RESETI.IMP,RESETO.IMP,USET.IMP,PROMPT.IMP,IOLIB.IMP,VECLIB.IMP,HEX.IMP,PPN.IMP,OCTAL.IMP,SWARG.IMP,SWITCH.IMP,TIME.IMP,DECODE.IMP,SIGNAL.IMP,COPY.IMP,SDEF.IMP,STRTON.IMP
MACRO::
.IF ($A#"NOMACRO") .COMP'X/MACRO INOUT,IMPRUN,PRMLIB,MACLIB,IMPFOR,JSYS
FUDGE::
.R PIP
*IMPLIB.REL=IMPRUN.REL,SETIO.REL,CUSPFS.REL,INIT.REL,DDT.REL,GETSEG.REL,RUN.REL,RAD50.REL,READFS.REL,USET.REL,PROMPT.REL,COPY.REL,DA.REL,SQ.REL,DASQ.REL,DEFINE.REL,DEFAUL.REL,CHECKP.REL,RENAME.REL,ISFILE.REL,CLOSE.REL,REWIND.IMP,RESETI.REL,RESETO.REL,SWARG.REL,SWITCH.REL,HEX.REL,PPN.REL,OCTAL.REL,SIGNAL.REL,STRTON.REL,READ.REL,SDEF.REL,WRITE.REL,PRINT.REL,IOLIB.REL,READLI.REL,READTE.REL,READST.REL,TIME.REL,DECODE.REL,VECLIB.REL,INOUT.REL,PRMLIB.REL,MACLIB.REL,IMPFOR.REL,JSYS.REL
.R MAKLIB
*IMPLIB.REL=IMPLIB.REL/INDEX
.