01 LBL 06
 02 RCL 03
 03 0
 04 CLS
 05 2
 06 LBL 07
 07 DEG
 08 ASHF
 09 LBL 02
 10 ASHF
 11 STO 08
 12 LBL 07
 13 CLS
 14 2
 15 RCL 03
 16 0
 17 LBL 06
 18 GRAD
 19 9
 20 1/X
 21 X#Y?
 22 LBL 07
 23 RCL 41
 24 LBL 02
 25 SREG 50
 26 LBL 07
 27 LN
 28 LBL 08
 29 LBL 03
 30 ST/ 64
 31 LBL 07
 32 LN
 33 LBL 06
 34 LBL 02
 35 R^
 36 STO 00
 37 LBL 07
 38 LN
 39 LBL 06
 40 LBL 02
 41 RDN
 42 STO 00
 43 LBL 07
 44 LBL 01
 45 LBL 00
 46 X<=Y?
 47 RCL 00
 48 LBL 07
 49 1/X
 50 LBL 03
 51 LBL 01
 52 RCL 00
 53 0
 54 LBL 07
 55 LN
 56 LBL 06
 57 LBL 02
 58 RDN
 59 STO 00
 60 LBL 07
 61 LN
 62 LBL 08
 63 LBL 03
 64 ST/ 64
 65 LBL 07
 66 LN
 67 LBL 06
 68 LBL 02
 69 RDN
 70 STO 00
 71 LBL 07
 72 07
 73 LBL 02
 74 X<>Y
 75 STO 01
 76 LBL 07
 77 LN
 78 LBL 08
 79 LBL 03
 80 ST/ 64
 81 LBL 07
 82 RCL 00
 83 LBL 06
 84 LBL 02
 85 PI
 86 STO 00
 87 LBL 07
 88 DEG
 89 6
 90 LBL 02
 91 INT
 92 STO 01
 93 LBL 07
 94 LN
 95 LBL 08
 96 LBL 03
 97 ST/ 64
 98 LBL 07
 99 1/X
100 X>0?
101 LBL 02
102 ISG 21
103 LBL 07
104 LN
105 LBL 06
106 LBL 02
107 LBL 06
108 STO 01
109 LBL 07
110 LBL 01
111 LBL 00
112 X<=Y?
113 RCL 00
114 LBL 07
115 LN
116 LBL 08
117 LBL 03
118 ST/ 64
119 LBL 05
120 1/X
121 LBL 08
122 ISG 08
123 LN
124 LBL 08
125 LBL 03
126 ST/ 64
127 LBL 07
128 LN
129 LBL 06
130 LBL 02
131 RDN
132 STO 00
133 LBL 07
134 LN
135 LBL 08
136 LBL 03
137 ST/ 64
138 LBL 07
139 LN
140 LBL 06
141 LBL 02
142 RDN
143 STO 00
144 LBL 07
145 +
146 LBL 08
147 LBL 03
148 PI
149 STO 00
150 LBL 07
151 LN
152 LBL 06
153 LBL 02
154 ST/ 64
155 LBL 07
156 1/X
157 X#Y?
158 STO 00
159 LBL 07
160 +
161 DEG
162 LBL 00
163 SREG 23
164 LBL 06
165 2
166 LBL 00
167 1/X
168 RCL 01
169 LBL 07
170 LN
171 LBL 08
172 LBL 03
173 ST/ 64
174 LBL 04
175 LBL 02
176 STO 00
177 LBL 04
178 LBL 02
179 STO 00
180 LBL 07
181 LN
182 LBL 08
183 LBL 03
184 ST/ 64
185 LBL 07
186 CLS
187 LBL 03
188 LBL 01
189 ST/ 64
190 LBL 06
191 STOP
192 LBL 02
193 +
194 STO 08
195 LBL 07
196 LN
197 LBL 08
198 LBL 03
199 S+
200 RCL 00
201 LBL 07
202 +
203 LBL 08
204 LBL 03
205 ST/ 64
206 LBL 06
207 S-
208 LBL 03
209 2
210 LBL 07
211 LN
212 LBL 08
213 LBL 03
214 S+
215 RCL 00
216 LBL 07
217 1/X
218 LBL 03
219 LBL 01
220 RCL 00
221 0
222 LBL 07
223 LN
224 LBL 06
225 LBL 02
226 RDN
227 STO 00
228 LBL 07
229 LBL 01
230 LBL 00
231 X<=Y?
232 RCL 00
233 LBL 06
234 STOP
235 9
236 1/X
237 PSE
238 LBL 07
239 DEG
240 6
241 LBL 02
242 INT
243 STO 01
244 LBL 07
245 LN
246 LBL 08
247 LBL 03
248 ST/ 64
249 LBL 07
250 1/X
251 LBL 03
252 LBL 01
253 RCL 01
254 0
255 LBL 07
256 LN
257 LBL 06
258 LBL 02
259 CLA
260 STO 00
261 LBL 07
262 LBL 01
263 LBL 00
264 X<=Y?
265 RCL 00
266 LBL 06
267 VIEW 25
268 STO 00
269 RCL 08
270 +
271 8
272 LBL 02
273 LASTX
274 STO 01
275 LBL 07
276 LN
277 LBL 08
278 LBL 03
279 ST/ 64
280 LBL 07
281 1/X
282 2
283 LBL 02
284 STO 01
285 LBL 07
286 07
287 LBL 02
288 X<>Y
289 STO 01
290 LBL 07
291 RCL IND 09
292 STO 01
293 7
294 LBL 07
295 RCL 00
296 LBL 06
297 LBL 02
298 PI
299 STO 00
300 LBL 07
301 LN
302 LBL 08
303 LBL 03
304 ST/ 64
305 LBL 07
306 RCL 00
307 LBL 06
308 LBL 02
309 PI
310 STO 00
311 LBL 07
312 +
313 LBL 08
314 LBL 03
315 ST+ 64
316 LBL 04
317 LBL 02
318 STO 00
319 LBL 07
320 RCL 00
321 LBL 08
322 LBL 03
323 ST* 64
324 LBL 07
325 DEG
326 LBL 07
327 LBL 03
328 STO 02
329 +
330 LBL 05
331 LN
332 LBL 00
333 5
334 LBL 07
335 RCL 00
336 LBL 02
337 LBL 03
338 ASHF
339 +
340 LBL 07
341 RCL 00
342 LBL 08
343 LBL 03
344 ST/ 64
345 LBL 06
346 2
347 LBL 00
348 RCL 00
349 1
350 LBL 07
351 LN
352 LBL 08
353 LBL 03
354 ST+ 64
355 LBL 07
356 LN
357 RTN
358 LBL 02
359 RDN
360 STO 00
361 LBL 06
362 LBL 03
363 LBL 04
364 +
365 LN
366 LBL 07
367 LN
368 LBL 06
369 LBL 02
370 E^X
371 STO 08
372 LBL 07
373 +
374 VIEW 01
375 STOP
376 STO 05
377 LBL 06
378 E^X
379 LBL 01
380 LN
381 RCL 05
382 LBL 07
383 +
384 E^X-1
385 LBL 02
386 STOP
387 9
388 LBL 07
389 0
390 DSE 03
391 CLA
392 STO 05
393 LBL 07
394 CLS
395 8
396 LBL 02
397 SREG 50
398 LBL 07
399 RCL 07
400 LBL 02
401 LBL 02
402 STO 01
403 LBL 02
404 ST/ 64
405 LBL 07
406 1/X
407 Y^X
408 LBL 00
409 ST/ 64
410 LBL 06
411 STO 24
412 STO 00
413 ISG 08
414 RCL 09
415 LBL 02
416 RCL 03
417 STO 01
418 LBL 07
419 0
420 CLX
421 X^2
422 5
423 LBL 06
424 X<=Y?
425 RCL 00
426 +
427 ST+ 08
428 07
429 LBL 02
430 X<>Y
431 STO 01
432 LBL 07
433 RCL 00
434 CHS
435 LBL 00
436 STO 53
437 LBL 05
438 LN
439 LBL 08
440 LBL 03
441 ISG 08
442 DEG
443 SREG 21
444 LBL 06
445 RCL 04
446 LBL 01
447 1/X
448 -
449 LBL 07
450 DEG
451 9
452 LBL 02
453 STO 02
454 STO 01
455 LBL 07
456 07
457 LBL 02
458 X<>Y
459 STO 01
460 LBL 07
461 LBL 06
462 LBL 03
463 CLS
464 +
465 LBL 05
466 LBL 02
467 2
468 LBL 05
469 LN
470 LBL 02
471 X^2
472 LBL 07
473 RCL 00
474 LBL 08
475 LBL 03
476 ST* 64
477 LBL 07
478 DEG
479 ISG 03
480 PI
481 STO 00
482 LBL 07
483 RCL 00
484 3
485 LBL 02
486 INT
487 STO 05
488 LBL 07
489 RCL 00
490 LBL 06
491 LBL 02
492 X#Y?
493 STO 00
494 LBL 06
495 X<=Y?
496 RCL 00
497 +
498 ST+ 08
499 07
500 LBL 02
501 X<>Y
502 STO 01
503 LBL 07
504 +
505 ST+ 00
506 X<=Y?
507 RCL 00
508 LBL 07
509 CLS
510 LBL 03
511 LBL 01
512 RCL 03
513 0
514 LBL 07
515 +
516 RCL 06
517 LBL 02
518 X>0?
519 STO 02
520 LBL 07
521 1/X
522 PSE
523 STOP
524 9
525 LBL 07
526 RCL 00
527 CHS
528 LBL 00
529 RCL 00
530 0
531 LBL 07
532 LN
533 LBL 06
534 LBL 02
535 RDN
536 STO 00
537 LBL 07
538 LBL 01
539 LBL 00
540 *
541 5
542 LBL 00
543 ISG 06
544 1/X
545 LBL 08
546 ISG 06
547 ISG 07
548 6
549 RCL 00
550 1/X
551 PSE
552 LBL 07
553 00
554 LBL 02
555 STO 03
556 STO 01
557 LBL 07
558 DEG
559 LASTX
560 STO 06
561 5
562 LBL 07
563 0
564 LBL 08
565 LBL 03
566 STO 64