 01 LBL "OILMBE"
 02 "OIL MATL BAL"
 03 44
 04 XROM 16,11
 05 FC?C 25
 06 PROMPT
 07 SF 00
 08 SF 04
 09 SF 06
 10 SF 27
 11 "M3"
 12 ASTO 03
 13 "SCM"
 14 ASTO 06
 15 "KPA"
 16 ASTO 08
 17 CLA
 18 ASTO 04
 19 ASTO 07
 20 ASTO 09
 21 "CORR"
 22 1
 23 XROM 16,13
 24 FC? 01
 25 GTO 00
 26 "SKIP"
 27 2
 28 XROM 16,13
 29 FS? 02
 30 GTO 01
 31 XROM 16,25
 32 XROM 16,23
 33 XROM 16,24
 34 GTO 01
 35 LBL 00
 36 25
 37 STO 00
 38 "BOI"
 39 XROM 15,15
 40 27
 41 STO 00
 42 "FT3/SCF"
 43 ASTO 01
 44 ASHF
 45 ASTO 02
 46 "M3/SCM"
 47 ASTO Y
 48 CLA
 49 ASTO Z
 50 "BGI"
 51 XROM 16,41
 52 XROM 16,22
 53 "PSI"
 54 ASTO 01
 55 CLA
 56 ASTO 02
 57 ASTO Z
 58 "KPA"
 59 ASTO Y
 60 "PBP"
 61 XROM 16,41
 62 31
 63 STO 00
 64 "1/PSI"
 65 ASTO 01
 66 CLA
 67 ASTO 02
 68 ASTO Z
 69 "1/KPA"
 70 ASTO Y
 71 "CWI"
 72 XROM 16,41
 73 "1/KPA"
 74 ASTO Y
 75 CLA
 76 ASTO Z
 77 "CFR"
 78 XROM 16,41
 79 LBL 01
 80 20
 81 STO 00
 82 "%SWC"
 83 XROM 15,15
 84 34
 85 "PI"
 86 XEQ 06
 87 RND
 88 RCL 14
 89 RND
 90 CF 03
 91 X<=Y?
 92 SF 03
 93 0
 94 FS? 03
 95 GTO 02
 96 38
 97 "G"
 98 XEQ 07
 99 19
100 STO 00
101 "%SGI"
102 XROM 15,15
103 CF 04
104 LBL 02
105 STO 20
106 ADV
107 FC? 01
108 GTO 15
109 RCL 35
110 X<> 17
111 STO 35
112 RCL 14
113 XROM 15,30
114 STO 42
115 FS? 03
116 XROM 15,31
117 FC? 03
118 RCL 17
119 FC? 03
120 XROM 15,30
121 STO 26
122 XEQ 00
123 XROM 15,05
124 STO 28
125 XROM 15,38
126 STO 32
127 RCL 35
128 X<> 17
129 STO 35
130 XROM 15,45
131 STO 33
132 LBL 15
133 CF 08
134 16
135 "P"
136 XEQ 06
137 RCL 35
138 X<>Y
139 X<=Y?
140 GTO 02
141 TONE 03
142 "P > PI"
143 PROMPT
144 GTO 15
145 LBL 02
146 RND
147 RCL 14
148 RND
149 CF 03
150 X<=Y?
151 SF 03
152 FS?C 00
153 SF 08
154 36
155 "NP"
156 XEQ 08
157 XEQ 09
158 FC?C 04
159 CF 08
160 35
161 "GP"
162 XEQ 07
163 CF 08
164 37
165 "WP"
166 XEQ 08
167 XEQ 09
168 FS? 01
169 GTO 04
170 26
171 STO 00
172 "BO"
173 FC? 03
174 "b"
175 XROM 15,15
176 FS? 03
177 GTO 03
178 28
179 STO 00
180 "FT3/SCF"
181 ASTO 01
182 ASHF
183 ASTO 02
184 "M3/SCM"
185 ASTO Y
186 CLA
187 ASTO Z
188 "BG"
189 XROM 16,41
190 "SCF/BBL"
191 ASTO 01
192 ASHF
193 ASTO 02
194 "SCM/M3"
195 ASTO Y
196 CLA
197 ASTO Z
198 "RSb"
199 XROM 16,41
200 LBL 03
201 30
202 STO 00
203 "BW"
204 XROM 15,15
205 LBL 04
206 " N        We"
207 PROMPT
208 GTO 15
209 LBL A
210 39
211 "N"
212 XEQ 08
213 XEQ 09
214 XEQ 11
215 X<>Y
216 RCL 40
217 *
218 -
219 STO 41
220 XEQ 01
221 "We"
222 GTO 05
223 LBL E
224 40
225 "We"
226 XEQ 08
227 XEQ 09
228 XEQ 11
229 RCL 41
230 -
231 X<>Y
232 /
233 STO 40
234 XEQ 01
235 "N"
236 LBL 05
237 XEQ 08
238 XROM 16,37
239 XEQ 10
240 ADV
241 GTO 04
242 LBL 01
243 FS? 03
244 RTN
245 STO 34
246 100
247 RCL 20
248 -
249 RCL 21
250 -
251 RCL 26
252 /
253 RCL 27
254 *
255 1
256 RCL 37
257 RCL 40
258 /
259 -
260 *
261 "%SO"
262 XROM 16,39
263 RCL 34
264 RTN
265 LBL 06
266 STO 00
267 ASTO T
268 "PSI"
269 ASTO 01
270 CLA
271 ASTO 02
272 ARCL T
273 RCL 09
274 RCL 08
275 RCL Z
276 XROM 16,40
277 RDN
278 STO 08
279 X<>Y
280 STO 09
281 R^
282 RTN
283 LBL 07
284 STO 00
285 ASTO T
286 "MCF"
287 ASTO 01
288 CLA
289 ASTO 02
290 ARCL T
291 RCL 07
292 RCL 06
293 RCL Z
294 XROM 16,40
295 RDN
296 STO 06
297 X<>Y
298 STO 07
299 R^
300 RTN
301 LBL 08
302 STO 00
303 ASTO T
304 "BBL"
305 ASTO 01
306 CLA
307 ASTO 02
308 ARCL T
309 RCL 04
310 RCL 03
311 RCL Z
312 RTN
313 LBL 09
314 XROM 16,40
315 LBL 10
316 RDN
317 STO 03
318 X<>Y
319 STO 04
320 R^
321 RTN
322 LBL 11
323 0
324 STO 34
325 STO 43
326 FS? 03
327 GTO 13
328 RCL 29
329 FC? 01
330 GTO 12
331 XEQ 00
332 XROM 15,05
333 STO 29
334 LBL 12
335 RCL 28
336 X<>Y
337 -
338 "FT3-BBL"
339 XROM 16,44
340 RCL 39
341 *
342 1 E3
343 *
344 STO 34
345 RCL 17
346 FS? 01
347 XROM 16,01
348 FC? 01
349 RCL 30
350 STO 30
351 RCL 13
352 X<>Y
353 -
354 RCL 29
355 "FT3-BBL"
356 XROM 16,44
357 *
358 STO 43
359 RCL 36
360 1 E3
361 *
362 RCL 37
363 RCL 30
364 *
365 -
366 RCL 29
367 XROM 16,44
368 *
369 ST+ 34
370 RCL 27
371 FC? 01
372 GTO 14
373 RCL 17
374 XROM 15,30
375 GTO 14
376 LBL 13
377 RCL 27
378 FC? 01
379 GTO 14
380 RCL 42
381 XROM 15,31
382 LBL 14
383 STO 27
384 ST+ 43
385 RCL 37
386 *
387 ST+ 34
388 FS? 01
389 XROM 15,40
390 FC? 01
391 RCL 31
392 STO 31
393 RCL 38
394 *
395 ST+ 34
396 RCL 32
397 RCL 21
398 100
399 /
400 STO Z
401 *
402 RCL 33
403 +
404 RCL 35
405 RCL 17
406 -
407 *
408 1
409 R^
410 -
411 /
412 1
413 -
414 RCL 26
415 *
416 RCL 43
417 +
418 RCL 34
419 RTN
420 LBL 00
421 RCL 16
422 "F-R"
423 XROM 16,44
424 RCL 10
425 /
426 RCL 17
427 RCL 11
428 /
429 END
