The text read off it
[90.05 sample-program listing, PDF p.213]
Compiler listing page, Appendix 90.05 (PDF p.213).
DATE 10/18/61 TIME 2.45 ACCOUNT ID. CT PUBLICATIONS PAGE 22
01413 0020 00 0 01416 10001 +7 TRA *+3
01414 0020 00 0 01417 10001 +8 TRA GN)081
01415 0020 00 0 01417 10001 +9 TRA GN)081
01416 0020 00 0 01472 10001 +10 TRA SEARCH.END
01417 0500 00 0 00111 10001 GN)081 CLA INDEX
01420 0601 00 0 00112 10001 +1 STO POS
01742 GN)091 EQU CP)+38
01743 GN)093 EQU CP)+39
01421 0560 00 0 00112 10001 +1 LDQ POS
01422 0200 00 0 01711 10001 +2 MPY CP)+13
01423 0131 00 0 00000 10000 +3 XCA
01424 0400 00 0 01742 10001 +4 ADD GN)091
01425 0601 00 0 01673 10001 +5 STO PI)3
01426 0560 00 0 00112 10001 +6 LDQ POS
01427 0200 00 0 01711 10001 +7 MPY CP)+13
01430 0131 00 0 00000 10000 +8 XCA
01431 0400 00 0 01743 10001 +9 ADD GN)093
01432 0601 00 0 01672 10001 +10 STO PI)2
01433 0441 00 0 01770 10001 +11 LDI CP)+60
01434 0604 00 0 00205 10010 +12 STI SYS)133
01435 0441 00 0 01672 10001 +13 LDI PI)2
01436 0604 00 0 00204 10010 +14 STI SYS)132
01437 0074 00 4 00266 10010 +15 TSX SYS)182,4
01440 1 00004 1 00271 10010 +16 TXI SYS)185,1,4
01441 000004000003 10000 +17 OCT 000004000003
01442 1 00003 1 00324 10010 +18 TXI SYS)212,1,3
01443 1 00003 1 00301 10010 +19 TXI SYS)193,1,3
01444 1 00006 1 00341 10010 +20 TXI SYS)225,1,6
01445 0441 00 0 01672 10001 +21 LDI PI)2
01446 0604 00 0 00204 10010 +22 STI SYS)132
01447 0074 00 4 00266 10010 +23 TSX SYS)182,4
01450 1 00003 1 00270 10010 +24 TXI SYS)184,1,3
01451 0601 00 0 00104 10001 +25 STO 3)INSURANCE
01452 0441 00 0 01771 10001 +26 LDI CP)+61
01453 0604 00 0 00205 10010 +27 STI SYS)133
01454 0441 00 0 01673 10001 +28 LDI PI)3
01455 0604 00 0 00204 10010 +29 STI SYS)132
01456 0074 00 4 00266 10010 +30 TSX SYS)182,4
01457 1 00004 1 00271 10010 +31 TXI SYS)185,1,4
01460 000004000003 10000 +32 OCT 000004000003
01461 1 00003 1 00324 10010 +33 TXI SYS)212,1,3
01462 1 00003 1 00301 10010 +34 TXI SYS)193,1,3
01463 1 00006 1 00341 10010 +35 TXI SYS)225,1,6
01464 0441 00 0 01673 10001 +36 LDI PI)3
01465 0604 00 0 00204 10010 +37 STI SYS)132
01466 0074 00 4 00266 10010 +38 TSX SYS)182,4
01467 1 00003 1 00270 10010 +39 TXI SYS)184,1,3
01470 0601 00 0 00103 10001 +40 STO 3)RETIREMENT
01471 0020 00 0 00722 10001 +41 TRA NET
01472 GN)082
01472 0020 60 0 01404 10001 SEARCH.END TRA* SEARCH
01473 0774 00 0 00000 10000 DEPARTMENT.END AXT 0
01474 0500 00 0 00113 10001 +1 CLA 4)HOURS
01475 0074 00 4 00264 10010 +2 TSX SYS)180,4
01476 0 00005 0 00051 10001 +3 PZE 2)HOURS,,5