;** TO MAKE MANTIS.DOC, MANTS5.HLP, MANOTS.SHR, MANLOW.REL, LOADER.SHR, COMPIL.SHR, F40.SHR, .MAPS, .CRFS ; ;** USE .SUBMIT MANTIS/RESTART:1/TIME:30:00 ; ;** REQUIRED FILES: ; ;SYS: FORLIB.REL ; FORPRM.UNV ; LINK SHRS ; ;DSK: MANTS5.RNT ;FROM DTA ; MANTS5.RNH ;FROM DTA ; MANTS5.RND ;FROM DTA ; MANTS.MAC ;FROM DTA ;VERSION 5 (FOROTS) ; LOADER.MAC ;FROM DTA ;VERSION 57(151)-4 ; COMPIL.MAC ;FROM DTA ;VERSION 22B(240)-4 ; FX2.MAC ;FROM DTA ;VERSION 27C(360)-5 ; FX1.MAC ; FX3.MAC ; FX4.MAC ; EXEC.MAC ; ;*********************************************************************** ; ; FEATURES OF VERSION 5 OF MANTIS FOR FOROTS ; ; 1) LOADER USED FOR NOW FOR F40 DEBUG ELSE LINK SELECTED BY COMPIL ; 2) .LOAD IN ORDER TO .SAVE BEFORE OTS CALL ; 3) *RETRY COMMAND NOT IMPLEMENTED ; 4) OUTPUT AND TYPE CMDS MAY BE ABBREVIATED TO *OU AND *TY ; 5) INTEGER ERRMX. ACCESSIBLE TO CONTROL REPORTING OF OTS ERRORS ; ;*********************************************************************** .R RUNOFF ;CREATE MANTIS.DOC *MANTS5.RNT,MANTS5.RNH,MANTS5.RND .COPY MANTIS.DOC=MANTS5.MEM,MANTS5.HLP,MANTS5.DOC .DELETE MANTS5.MEM,MANTS5.DOC ; .MAKE FT.MAC ;CREATE LOADER.SHR *IMANTIS==1 EX .LOAD/CREF/LOAD FT+LOADER .VERSION .SSAVE D:LOADER .TECO ;CREATE COMPIL.SHR *IDFORTRAN==0 ;DEFAULT FORTRAN IS F40 AND DEFAULT LOADER IS LINK-10 EX .LOAD/CREF FT+COMPIL .VERSION .SSAVE D:COMPIL .TECO ;CREATE F40.SHR *9KIREENTR==1 *FTMANTIS==1 EX .LOAD/CREF FT+ .VERSION .SSAVE D:F40 .TECO ;COMPILE MANTS.MAC TWICE *9KIREENT==1 EX .COMPILE/CREF FT+MANTS .COMPILE MANLOW=MANTS .R FUDGE2 ;EXTRACT FOROTS.REL AND FORINI.REL FROM SYS:FORLIB.REL *FOROTS.REL_SYS:FORLIB/E *FORINI.REL_SYS:FORLIB/E .R LINK ;LINK MANOTS.SHR */MAP *FOROTS,SYS:FORLIB/S *MANTS,FORINI */E/GO .VERSION .SSAVE D:MANOTS .DELETE FT.MAC,MANTS.REL,COMPIL.REL,LOADER.REL,FX?.REL,EXEC.REL,FOROTS.REL,FORINI.REL,*.TMP