!	[11,40]F4PRES.CMD
!
!	BUILD A 4K VERSION OF FORTRAN IV-PLUS RESIDENT LIBRARY.
!	INSTALLED MARCH 1, 1979. J. LEONARD.
!
!	F4PRES CONTAINS ABOUT 1.2K OF FCS STUFF WHICH IS REDUNDANT FROM
!	THE FCS CONTAINED IN SYSRES.  IN ADDITION FORTRAN SPECIFICS
!	INCLUDE THE NECESSARY ROUTINES FOR FORMATTED SEQENTIAL OUTPUT,
!	ERROR REPORTING, AND MISCELLANEOUS INITIALIZATION ROUTINES WHICH
!	ALL FORTRAN TASKS USE.
!
!	*NOTE* UNFORMATTED LIST I/O CANNOT BE USED WITH THIS VERSION OF F4PRES.
!		A 'MISSING FORMAT CONVERSION ROUTINE' ERROR MESSAGE WILL TYPE
!		IF AN UNFORMATTED LIST I/O STATEMENT IS EXECUTED.
!		THIS INCLUDES READ(LUN,*),WRITE(LUN,*) TYPE *, ACCEPT *, PRINT *
!		I/O STATEMENTS.
!
!	EVERY F4P TASK SHOULD LINK TO F4PRES AS ALL 4K OF LIBRARY IS
!	USED BY EVERY ARAP FORTRAN TASK, THUS THERE IS NO SACRIFICE IN
!	THE USERS ADDRESS SPACE, AS CAN BE THE CASE WITH SYSRES.
!
!	IF POSSIBLE A TASK SHOULD LINK TO BOTH SYSRES AND F4PRES, WHICH
!	COMBINED ARE ABOUT 6-7K OF FORTRAN NECESSARY ROUTINES.
!
!	NOTE THAT IF BOTH SYSRES AND F4PRES ARE USED, ABOUT 40 MULTIPLY
!	DEFINED SYMBOLS WILL BE REPORTED AT TASK BUILD TIME.
!
!	ALL MODULES IN F4PRES.MAC ARE COMMENTED OUT AND IS THERE FOR IDENT
!	PURPOSES ONLY.  SELECTED MODULES HAD TO BE EXTRACTED IN ORDER TO
!	AVOID DRAGGING IN ALL 3K OF FCS. ATTEMPTS WERE MADE TO HAVE AS
!	LITTLE OVERLAP WITH SYSRES AS POSSIBLE.
!
!
!-	MODIFIED MARCH 22 FOR VERSION 3.0 OF IAS
!-	CHANGED REFERENCES FROM F4POTS TO SYSLIB. MUST MAKE SURE PROPER
!-	CONVERSION (F4PCVF) ROUTINE IS REPLACED IN F4POTS.OLB IF USED. 
!-	F4PCVF IS SMALLER THAN THE ALTERNATE FLOATING POINT CONVERSION ROUTINE
!-	WHICH IS THE DEFAULT. REFER TO F4P INSTALLATION MANUAL FOR LIST
!-	OF OTHER COMPILER OPTIONS.
!
!	ALSO REFER TO MEMO2.RNO ON DB2:[350,0] FOR DISCUSSION OR RESIDENT
!	LIBRARIES IN LIGHT OF THIS VERSION OF F4PRES.
!
LINK/OP/NOHEA/NOFLO/TA:[1,1]F4PRES.TSK/SYM:[1,1]F4PRES.STB/MAP:(F4PRES/FU) -
/NOPOS/NOCHECK
F4PRES -
[1,1]SYSLIB/LIB:($CONVI,$CONVL,$CONVR,$FIO) -
[1,1]SYSLIB/LIB:($OTI,$ERRPT,$ERRLO,$R50,$NAM,$FPPUT,$FCHNL) -
[1,1]SYSLIB/LIB:($FPERR,$ERRMO,$SAVRG,$IOARY,$IOELE) -
[1,1]SYSLIB/LIB:(PARSFN,RDWAIT)
STACK=0
UNITS=0
UIC=[1,1]
ACTFIL=0
BASE=28
TASK=F4PRES
/
!
!	TO INSTALL F4PRES -
!
!	BUILD F4PFIX  THEN
!	MCR> INS [1,1]F4PRES/LI/ACC=RO/TASK=F4PRES/UIC=[1,1]
!	MCR> INS [1,1]F4PFIX
!	MCR> FIX F4PFIX
!
