.ENABLE SUBSTITUTION
;
;	RCA 1802 COMPILE AND BUILD INDIRECT COMMAND FILE
;
	.SETF MP
	.IF <SYSTEM> = 6 .SETT MP
	.ASK COM Compile the routines
	.IFF COM .GOTO 100
	.ASKS SWTCH F77 switches
	.ASK LST Listing
	.SETS LIST ""
	.IFT LST .SETS LIST "/LIST"
	FORTRAN/F77 BINHEX'LIST'
	FORTRAN/F77 BINOUT'LIST'
	FORTRAN/F77 BLDINS'LIST'
	FORTRAN/F77 BSERCH'LIST'
	FORTRAN/F77 DECODE'LIST'
	FORTRAN/F77 ERRPRT'LIST'
	FORTRAN/F77 FLGERR'LIST'
	FORTRAN/F77 FNDSYM'LIST'
	FORTRAN/F77 GETBSU'LIST'
	FORTRAN/F77 GETFIL'LIST'
	MACRO GETFNB'LIST'
	FORTRAN/F77 GETLIN'LIST'
	FORTRAN/F77 GETOPC'LIST'
	FORTRAN/F77 GETSYM'LIST'
	FORTRAN/F77 HEADNG'LIST'
	FORTRAN/F77 INITP1'LIST'
	FORTRAN/F77 INITP2'LIST'
	FORTRAN/F77 IPOP'LIST'
	FORTRAN/F77 IPUSH'LIST'
	FORTRAN/F77 LSERCH'LIST'
	FORTRAN/F77 PACK'LIST'
	FORTRAN/F77 PASS1'LIST'
	FORTRAN/F77 PASS2'LIST'
	FORTRAN/F77 PRTLIN'LIST'
	FORTRAN/F77 PS2XTD'LIST'
	FORTRAN/F77 PUTSYM'LIST'
	FORTRAN/F77 P1SUDO'LIST'
	FORTRAN/F77 P2SUDO'LIST'
	FORTRAN/F77 RCA'LIST'/CONTINUATION:60
	FORTRAN/F77 SYMPRT'LIST'
	FORTRAN/F77 SYMSRT'LIST'
	FORTRAN/F77 TIMER'LIST'
	FORTRAN/F77 TRIVIA'LIST'
	FORTRAN/F77 XPRSIN'LIST'
	FORTRAN/F77 XREF'LIST'
	FORTRAN/F77 XRFPRT'LIST'
	.IFT LST PRINT/NOFLAG_PAGE *.LST/DELETE
	COPY *.OBJ RCA.OBS
	LIBRARY/CREATE/OBJECT RCA RCA.OBS
	DELETE *.OBJ;*,*.OBS;*	
.100:	.OPEN RCA.BLD
	.DATA RCA,RCA/-SP=RCA/MP
	.DATA UNITS=5
	.DATA TASK=...RCA
	.DATA ACTFIL=5
.IFF MP	.DATA LIBR=FCSRES:RO
.IFT MP	.DATA SUPLIB=FCSFSL:SV
	.DATA //
	.CLOSE
	.OPEN RCA.ODL
	.DATA		.ROOT	MAIN-*(A,B,C,D,E,F,G,I,J)
	.DATA	MAIN:	.FCTR	RCA/LB:RCA:TIMER-L
	.DATA	A:	.FCTR	RCA/LB:INITP1-RCA/LB
	.DATA	B:	.FCTR	RCA/LB:GETFIL-RCA/LB
	.DATA	C:	.FCTR	RCA/LB:PASS1-RCA/LB
	.DATA	D:	.FCTR	RCA/LB:INITP2-RCA/LB
	.DATA	E:	.FCTR	RCA/LB:PASS2-RCA/LB
	.DATA	F:	.FCTR	RCA/LB:SYMPRT-RCA/LB-H
	.DATA	G:	.FCTR	LB:[1,24]CHSLIB/LB:SPOOL:GETFNB
	.DATA	H:	.FCTR	LB:[1,24]CHSLIB/LB:TSKLOG
	.DATA	I:	.FCTR	RCA/LB:ERRPRT-RCA/LB
	.DATA	J:	.FCTR	RCA/LB:XRFPRT-RCA/LB
.IFF MP	.DATA	L:	.FCTR	LB:[1,1]ANSLIB/DL
.IFT MP	.DATA	L:	.FCTR	LB:[1,1]SYSLIB/DL
	.DATA		.END
	.CLOSE
	LINK @RCA.BLD
	DELETE RCA.BLD;*,RCA.ODL;*
	PURGE *.*
	SRD /WB/ST/-BR
	PIP *.*;*/TR