$ ! [XXX,YYY]FLECRE.COM		MAO	30-APR-80
$ SAVE_VER = 'F$VERIFY()'		!ORIGINAL VERIFY STATUS
$ SET VERIFY
$ !
$ ! INDIRECT FILE TO COMPILE, ASSEMBLE AND TASK BUILD FLECS FROM
$ !	THE DISTRIBUTION FORTRAN AND MACRO SOURCES.
$ !
$ ! REVISIONS
$ !
$ !
$ SHOW TIME
$ !
$ MCR MAC FLERSX,FLERSX/-SP=FLERSX
$ !
$ MCR F4P FSUB,FSUB/-SP=FSUB.FTN
$ !
$ MCR F4P A,A/-SP=A.FTN
$ !
$ MCR F4P L,L/-SP=L.FTN
$ !
$ MCR F4P M,M/-SP=M.FTN
$ !
$ SHOW TIME
$ !
$ ! CREATE FLE.BLD
$ OPEN/WRITE FILE FLE.BLD
$ WRITE FILE "FLE/FP,FLE/-SP=M,A,L,FSUB"
$ WRITE FILE "FLERSX"
$ WRITE FILE "DB:[SYSLIB]F4POTS/LB"
$ WRITE FILE "/"
$ WRITE FILE "ACTFIL=4"
$ WRITE FILE "UNITS=5"
$ WRITE FILE "ASG=TI:1		;FOR COMMAND LINE INPUT (.GCML)"
$ WRITE FILE "ASG=TI:2		;FOR ERROR MESSAGES"
$ WRITE FILE "ASG=SY:3		;FOR FTN FILE"
$ WRITE FILE "ASG=SY:4		;FOR FLL FILE"
$ WRITE FILE "ASG=SY:5		;FOR FLX FILE"
$ WRITE FILE "TASK=...FLE"
$ WRITE FILE "//"
$ CLOSE FILE
$ !
$ ! BUILD FLE.TSK
$ SHOW TIME
$ MCR TKB @FLE.BLD
$ SHOW TIME
$ IF .NOT. SAVE_VER THEN SET NOVERIFY  !RESET ORIGINAL VERIFY STATUS
$ !
$ ! END OF FILE FLECRE.COM