1 $JOB FORTRAN IV BUILD - MAIN PART
2 / *******************************************************************
3 / *******************************************************************
4 / *******************************************************************
8 / *******************************************************************
9 / *******************************************************************
10 / *******************************************************************
12 / *******************************************************************
13 / FORTRAN IV COMPILER, PASS 1
14 / *******************************************************************
21 / *******************************************************************
22 / FORTRAN IV COMPILER, PASS 2
23 / *******************************************************************
27 .SAVE SYS PASS2=0;5000
30 / *******************************************************************
31 / FORTRAN IV COMPILER, PASS 2 OVERLAY
32 / *******************************************************************
34 .PAL PASS2O<P2OCFG,PASS2
36 .SAVE SYS PASS2O=0;7605
39 / *******************************************************************
40 / FORTRAN IV COMPILER, PASS 3
41 / *******************************************************************
48 / *******************************************************************
50 / *******************************************************************
55 .SAVE SYS RALF.SV=0;200
58 / *******************************************************************
59 / FORTRAN IV LIBRARIAN
60 / *******************************************************************
67 / *******************************************************************
69 / *******************************************************************
76 / *******************************************************************
77 / FORTRAN IV RUNTIME SYSTEM
78 / *******************************************************************
89 / *******************************************************************
90 / *******************************************************************
91 / *******************************************************************
93 / STUPID ASSEMBLER PROCEDURES
95 / *******************************************************************
96 / *******************************************************************
97 / *******************************************************************
98 / THE RALF ASSEMBLER REFUSES TO ACCEPPT THE .RA FILES AS THEY
99 / COME FROM KERMIT. I CANNOT INVESTIGATE WHICH PARITY IS GENERATED
100 / BY KERMIT-12. BUT I KNOW THAT PIP MAKES EVERYTHING RIGHT AGAIN.
101 / SO ALL .RA FILES ARE MOVED TROUGH PIP ONCE.
107 *ALOG10.RA<ALOG10.RA/A
116 *CARITH.RA<CARITH.RA/A
119 *CHKEOF.RA<CHKEOF.RA/A
130 *DATAN2.RA<DATAN2.RA/A
138 *DLOG10.RA<DLOG10.RA/A
153 *EXPID2.RA<EXPID2.RA/A
166 *REALTM.RA<REALTM.RA/A
184 / *******************************************************************
185 / *******************************************************************
186 / *******************************************************************
188 / RALF LIBRARY ASSEMBLY
190 / *******************************************************************
191 / *******************************************************************
192 / *******************************************************************
273 / *******************************************************************
274 / *******************************************************************
275 / *******************************************************************
279 / *******************************************************************
280 / *******************************************************************
281 / *******************************************************************
285 *SYS:FORLIB.RL[20]/Z<ABS,ACOS,ADC,ALOG10/C
286 *<ALOG,AMAX,AMIN,AMOD/C
287 *<ASIN,ATAN2,ATAN,CABS/C
288 *<CARITH,CEXP,CHARS,CHKEOF/C
290 *<COSD,COSH,COS,CSIN,CSQRT/C
291 *<DABS,DATAN2,DATAN,DATE/C
292 *<DBLE,DCOS,DEXP3,DEXP/C
293 *<DIM,DLOG10,DLOG,DMAX1/C
294 *<DMIN1,DMOD,DSIGN,DSIN/C
295 *<DSQRT,EXP3,EXPCC,EXPCI/C
296 *<EXPDD,EXPDI,EXPDR,EXPIC,EXPID2/C
297 *<EXPID,EXPII,EXPIR,EXP/C
298 *<FLOAT,IDINT,IFIX,LTR,ONQIB/C
299 *<PAUSE,PLOT,REAL,REALTM/C
300 *<RFCV,RFDV,RSW,SIGN/C
301 *<SIND,SINH,SNGL,SQRT/C
302 *<TAND,TANH,TAN,XFIX=200$
305 / *******************************************************************
306 / *******************************************************************
307 / *******************************************************************
311 / *******************************************************************
312 / *******************************************************************
313 / *******************************************************************