Add README.md
[pdp8.git] / sw / f4 / FRTSRC / FMAIN.BI
1 $JOB FORTRAN IV BUILD - MAIN PART
2 / *******************************************************************
3 / *******************************************************************
4 / *******************************************************************
5 /
6 / PAL-8 ASSEMBLY
7 /
8 / *******************************************************************
9 / *******************************************************************
10 / *******************************************************************
11 /
12 / *******************************************************************
13 / FORTRAN IV COMPILER, PASS 1
14 / *******************************************************************
15 /
16 .PAL F4
17 .LOAD F4
18 .SAVE SYS F4=0;12200
19 .DELETE F4.BN
20 /
21 / *******************************************************************
22 / FORTRAN IV COMPILER, PASS 2
23 / *******************************************************************
24 /
25 .PAL PASS2
26 .LOAD PASS2
27 .SAVE SYS PASS2=0;5000
28 .DELETE PASS2.BN
29 /
30 / *******************************************************************
31 / FORTRAN IV COMPILER, PASS 2 OVERLAY
32 / *******************************************************************
33 /
34 .PAL PASS2O<P2OCFG,PASS2
35 .LOAD PASS2O
36 .SAVE SYS PASS2O=0;7605
37 .DELETE PASS2O.BN
38 /
39 / *******************************************************************
40 / FORTRAN IV COMPILER, PASS 3
41 / *******************************************************************
42 /
43 .PAL PASS3
44 .LOAD PASS3
45 .SAVE SYS PASS3=0;400
46 .DELETE PASS3.BN
47 /
48 / *******************************************************************
49 / RALF ASSEMBLER
50 / *******************************************************************
51 /
52 .PAL RALF/W
53 .LOAD RALF
54 .SAVE SYS RALF.SV=0;200
55 .DELETE RALF.BN
56 /
57 / *******************************************************************
58 / FORTRAN IV LIBRARIAN
59 / *******************************************************************
60 /
61 .PAL LIBRA
62 .LOAD LIBRA
63 .SAVE SYS LIBRA=0;200
64 .DELETE LIBRA.BN
65 /
66 / *******************************************************************
67 / LINKING LOADER
68 / *******************************************************************
69 /
70 .PAL LOAD
71 .LOAD LOAD
72 .SAVE SYS LOAD=0;200
73 .DELETE LOAD.BN
74 /
75 / *******************************************************************
76 / FORTRAN IV RUNTIME SYSTEM
77 / *******************************************************************
78 /
79 .PAL FRTS<RTS,RTL
80 .LOAD FRTS
81 .SAVE SYS FRTS=0;200
82 .DELETE FRTS.BN
83 /
84 / SQUISHING.
85 .SQUISH DSK:/O
86 /
87 /
88 / *******************************************************************
89 / *******************************************************************
90 / *******************************************************************
91 /
92 / RALF LIBRARY ASSEMBLY
93 /
94 / *******************************************************************
95 / *******************************************************************
96 / *******************************************************************
97 /
98 /
99 .COMPILE ABS.RA
100 .COMPILE ACOS.RA
101 .COMPILE ADC.RA
102 .COMPILE ALOG10.RA
103 .COMPILE ALOG.RA
104 .COMPILE AMAX.RA
105 .COMPILE AMIN.RA
106 .COMPILE AMOD.RA
107 .COMPILE ASIN.RA
108 .COMPILE ATAN2.RA
109 .COMPILE ATAN.RA
110 .COMPILE CABS.RA
111 .COMPILE CARITH.RA
112 .COMPILE CEXP.RA
113 .COMPILE CHARS.RA
114 .COMPILE CHKEOF.RA
115 /.COMPILE CLK8A.RA
116 .COMPILE CLOCK.RA/8
117 .COMPILE CLOG.RA
118 .COMPILE CMPLX.RA
119 .COMPILE COSD.RA
120 .COMPILE COSH.RA
121 .COMPILE COS.RA
122 .COMPILE CSIN.RA
123 .COMPILE CSQRT.RA
124 .COMPILE DABS.RA
125 .COMPILE DATAN2.RA
126 .COMPILE DATAN.RA
127 .COMPILE DATE.RA
128 .COMPILE DBLE.RA
129 .COMPILE DCOS.RA
130 .COMPILE DEXP3.RA
131 .COMPILE DEXP.RA
132 .COMPILE DIM.RA
133 .COMPILE DLOG10.RA
134 .COMPILE DLOG.RA
135 .COMPILE DMAX1.RA
136 .COMPILE DMIN1.RA
137 .COMPILE DMOD.RA
138 .COMPILE DSIGN.RA
139 .COMPILE DSIN.RA
140 .COMPILE DSQRT.RA
141 .COMPILE EXP3.RA
142 .COMPILE EXPCC.RA
143 .COMPILE EXPCI.RA
144 .COMPILE EXPDD.RA
145 .COMPILE EXPDI.RA
146 .COMPILE EXPDR.RA
147 .COMPILE EXPIC.RA
148 .COMPILE EXPID2.RA
149 .COMPILE EXPID.RA
150 .COMPILE EXPII.RA
151 .COMPILE EXPIR.RA
152 .COMPILE EXP.RA
153 .COMPILE FLOAT.RA
154 .COMPILE IDINT.RA
155 .COMPILE IFIX.RA
156 .COMPILE LTR.RA
157 .COMPILE ONQIB.RA
158 .COMPILE PAUSE.RA
159 .COMPILE PLOT.RA/8
160 .COMPILE REAL.RA
161 .COMPILE REALTM.RA/8
162 .COMPILE RFCV.RA
163 .COMPILE RFDV.RA
164 .COMPILE RSW.RA
165 .COMPILE SIGN.RA
166 .COMPILE SIND.RA
167 .COMPILE SINH.RA
168 .COMPILE SIN.RA
169 .COMPILE SNGL.RA
170 .COMPILE SQRT.RA
171 .COMPILE TAND.RA
172 .COMPILE TANH.RA
173 .COMPILE TAN.RA
174 .COMPILE XFIX.RA
175 /
176 /
177 / *******************************************************************
178 / *******************************************************************
179 / *******************************************************************
180 /
181 / LIBRARY BUILD
182 /
183 / *******************************************************************
184 / *******************************************************************
185 / *******************************************************************
186 /
187 /
188 .R LIBRA
189 *SYS:FORLIB.RL[20]/Z<ABS,ACOS,ADC,ALOG10/C
190 *<ALOG,AMAX,AMIN,AMOD/C
191 *<ASIN,ATAN2,ATAN,CABS/C
192 *<CARITH,CEXP,CHARS,CHKEOF/C
193 *<CLOCK,CLOG,CMPLX/C
194 *<COSD,COSH,COS,CSIN,CSQRT/C
195 *<DABS,DATAN2,DATAN,DATE/C
196 *<DBLE,DCOS,DEXP3,DEXP/C
197 *<DIM,DLOG10,DLOG,DMAX1/C
198 *<DMIN1,DMOD,DSIGN,DSIN/C
199 *<DSQRT,EXP3,EXPCC,EXPCI/C
200 *<EXPDD,EXPDI,EXPDR,EXPIC,EXPID2/C
201 *<EXPID,EXPII,EXPIR,EXP/C
202 *<FLOAT,IDINT,IFIX,LTR,ONQIB/C
203 *<PAUSE,PLOT,REAL,REALTM/C
204 *<RFCV,RFDV,RSW,SIGN/C
205 *<SIND,SINH,SNGL,SIN,SQRT/C
206 *<TAND,TANH,TAN,XFIX=200$
207 /
208 /
209 / *******************************************************************
210 / *******************************************************************
211 / *******************************************************************
212 /
213 / END OF JOB!
214 /
215 / *******************************************************************
216 / *******************************************************************
217 / *******************************************************************
218 /
219 / CHAIN BACK TO DSK:
220 .SUBMIT DSK:EXIT.BI
221
222
223
224
225
226
227
228
229
230