DIR1.CMD
,DIR2.CMD
,FFM.OPR
,EXMPLE.FFM
,ADDR.F4
		;CALL ADDR(IR,R,N,LIST)
,ANSWER.F4
		;FILE=ANSWER('FILE NAME?')
,APPNDF.F4
		;CALL APPNDF(MASTER,TEMP,IR)
,CLEAR.F4
		;CALL CLEAR(IR)
,CLEARF.F4
		;CALL CLEARF(FILE)
,COPYFL.F4
,COPYFR.F4
,COPYR.F4
		;CALL COPYR(IR,IB,10*NSPR)
,CPYPAK
,CREATF
,DELETF.F4
		;CALL DELETF
,DELETR.F4
		;CALL DELETR(IDR)
,DFINEF.F4
		;CALL DFINEF(FILE,NSPR1,MAXR1,NCPR1)
,DFINER.F4
		;CALL DFINER
,DFNF.F4
		;CALL DFNF(FILE,NSPR1,MAXR1,NCPR1,NPACK)
,DIO.MAC
		;CALL DIO(1,1,IPAR,1)
,DLT2ND
,DMPFMT
,DMPLIN
,DMPPAR.F4
		;CALL DMPPAR
,DMPPTF
,DPACK.MAC
,DUMP.F4
		;CALL DUMP(IR)
,DUMPF
,DUMPR.F4
		;CALL DUMPR(IR,R)
,DUMPT.F4
		;CALL DUMPT(IR)
,EDITF
,EXCHGF.F4
		;CALL EXCHGF(1,2,ISAVE)
,EXPNDF.F4
		;CALL EXPNDF(FILE,NREC)
,FIXFL
,GTF.F4
		;CALL GTF(2,ISAVE)
,IDELET.MAC
		;IF(IDELET('FILE.','EXT').EQ.2)DELET='YES'
,IFIND.F4
		;IF(IFIND(IDR,1,0).EQ.1)FOUND='YES'
,IFIND2.F4
,IGETR.F4
		;IF(IGETR(IR,N,INDEX,IVALUE,IF,LOGIC).EQ.1)CALL DUMP(IR)
,INCODE.F4
		;ALPHA=INCODE(INTEGR)
,INLRGE
,INSRTR.F4
		;CALL INSRTR(IR,1)
,INTRUP.MAC
		;IF(INTRUP)PAUSE
,ISHIFT.MAC
		;ILE=ISHIFT('FILE',7)
,ISUB.F4
		;K=ISUB(I,J)
,IUNPAK.F4
		;MILLON=IUNPAK(3,6,123456789)
,JUNPAK.MAC
		;NOCTAL=JUNPAK(0,0,ASCII)
,LEFT.F4
		;CALL LEFT(10)
,LFTZRO.F4
		;ICENTS=LFTZRO(3,IUNPAK(8,2,MONEY))
,LISTF
,LOADF.F4
		;CALL LOADF(IR,R,N,LIST)
,LODFMT
,LODPTF
,LOOKUP.MAC
		;IF(LOOKUP('FILE.','EXT'))FOUND='YES'
,LUNPAK.MAC
		;IL=LUNPAK(1,2,'FILE')
,@DIR2.CMD