|
|
DataMuseum.dkPresents historical artifacts from the history of: RegneCentralen GIER Computer |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about RegneCentralen GIER Computer Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - metrics - download
Length: 26148 (0x6624)
Description: Bits:30000556 GSL 472.23 T3 (18) 3.10.68
Types: 8-hole paper tape
Notes: Gier Text
[3.10.68 T3 Gier algol 4
18]
[Here follows STOPCODE and CLEARCODE][ s t o p ] [ c l e a r ]
<e49-2, <-e49+4, ⨯ ; test tape number
i wrong tape
_
s
_
;
> ;
d e53=18 ; version number
_
<e53-e50, ; if version number T3 gr max version number
__ __
; then the following definitions are loaded;
____
d e61=16 ; define version number T1 and L1
_
d e62=9 ; define version number T2
_
d e63=e53 ; define version number T3
_
d e64=17 ; define version number T4
_
d e65=15 ; define version number T5
_
d e66=12 ; define version number T6 and L2
_
d e67=14 ; define version number T7 and L3
_
d e68=8 ; define version number T8 and L4
_
d e50=e53
_
> ;
[ s t o p ]
bk=e22+e14,i=e16-e47,a30,b26,c87,d60
_
i=e16
dd4=e20
_
dd17=167,d18=184
_
dd7=241
_
dd5=39
_
dd9=134,d10=128,d11=2
_
dd12=1,d15=22
_
dd16=e20
_
d=5,d13=51
d33=68,d35=18
d36=46,d43=e20
d44=69,d45=30
d46=19,d47=52
d48=166,d49=133
d37=57
dd3=12,d6=32,d8=1
_
dd19=15,d34=1
_
b:qq1.3-1.39
qqt256
qq3t320
m
_
qq10.39
qq57
qq1.39
hsc7
qq1020.9+409.19+614.29+410.39
qq1023.39
b1:qq
qq
qq
qq
dd40=1
_
bk=e31,i=0
_
di=e32
_
d51:t-delimiter;
_
d42:toperand;
_
de32=i
_
e
_
c2:pi0V-5LQB
pi0t-9
hvc3
c66:hse3,psi
c1:paDVNQA
pac1,hvc2
c3:pmn(e1)X1
hse2LA
hvc5NT
a6:hse3NQA
pac1t1NQA
c6:pmn(e1)X1
hse2LA
c5:gaa1VNT
hsc7,qqs+d51
hvi+5LKB
hse7LKA
sy27LKA
sy(c1)LKA
sy(i+3)LKA
di=i-d40-d40-d40-d40-d40
_
a1:pmnXtd2
hvc9LA
a2:ck27IOA
hva3LB
pmn(a1)X-1
ck(a2)IOB
hva4LB
pmn(a1)X-1
ck(a2)
qq(a1)t-4LOB
a4:qq(a1)t-2LOA
a3:pmn(a1)XV-1LO
a22:pmn(a1)X
ck(c1)VNC
hvc8
hvc10LQA
pmn(a1)XVLO
hsc7,qqs+d42
c10:mbb,gaa2
c9:hvc35LC
gta,cl-9
a:ck-11,hv
a5:gab6,hrs1
b6:ca__,hss1
-1
[ s t o p ]
bk=e31,i=0
_
di=e32
_
d53:tdelimiter;
_
d54:t-operand;
_
d55:ttermination;
_
d52:thead;
_
de32=i
_
e
_
c63:pi0t-13
pma20V
a20:hvc51,hvc51
gm0MA
a21:grnd4t-1M
bs(a21)td1
hva21
ppd1,hhc66
c62:hhne29
c7:arns,psc66
hvc6LQA
sr6b,aca10
hse5
a10:qqd7,qq
pac1,grna10
paa10td7
qq(e1)t-1
pi12t-13
arna10,hvc5
c8:sy64NKC
arn(a1)DNKC
hse7NKC
sy27NKC
sy(c1)NKC
pmn(a1)X
di=i-d40-d40-d40-d40-d40-d40
_
gr(a30)DVLA
hsc7,qqs+d53
ck10,gta11
pm(c1)DX
hva12LC
pmd8DVXNZ
a14:hsc7,qqs+d54
nc(p),hva13
sy(p)NKC
di=i-d40
_
pmd9DV
[ s t o p ]
c55:cl-9
hse3X
c54:ppp-1
a13:sy(p)NKC
di=i-d40
_
is(p)
a30:bss_t_
0 0
hsc7,qqs+d55
a11:is(p),pmns
hvc10XNC
hvc55XLA
hvc54X
a12:hva13LZ
nc1
hsc7,qqs+d42
pmd10DX
hse3
hva13
c11:ptb26td35
b2:paa6ta5
pab4,udb5
c12:ca(p)
paptd3
c13:gmb1,hvc1
c14:ptb26td46
b5:pab6td16
pab4,udb2
c15:xr,acb1
hvc1
c17:pmb1,hvc18
c50:it(p),bsd3
paptd3
c18:ppp1,bsp-d4
hsc7,qqe34
c19:gapVX
c20:pmb1X
hve3
c21:ppp1,bsp-d4
hsc7,qqe34
c70:gap,hvc1
c28:hsne3X
c22:arnp,cl-9
tk19
hse3
c61:qq(2e4)t1
c23:ppp-1
c4:hve3X
c24:ppp-1,hvc1
c64:hse3X
arnd15DX
bs(c34),arr1
qqd34,hvc19
c26:bs(c1)
pmnd5D
arnd6DLZ
hvc18
[ s t o p ]
c68:hse3X
arnd49DX
c25:ppp-1,gac1
hsne3X
hvc6
c69:
mb1023D
hse3X
hvnc25
c27:gab22,can(c1)
b22:pm__D
-1
hve3X
c29:bs(c1)
bs(a2)t7NQA
hsc7,qqs+d53
gaa2X
hve3
c30:pi8t-9
ppp-1,hvc6
c32:arn5b,ace4
hse3X
bs(c1)NQA
hvc6
hvc1
b8:qq1.19+50.35+1.39-1.36
c16:ppp+1,gpb7
arnb1,ck-10
arb6,srb8
b7:gr__MA
-1
gpb17,hhc71
c72:arnb6,hs(b7)
c47:
gpb4,hhc66
b9:qq,hss3
hvc47LZ
c71:grp,ppp1
pmb9,bsp-d4
hsc7,qqe34
gmpMA
hhc66
[ s t o p ]
c46:ptb10Vb11
c74:ptb10tb13
ptb13
c75:gab12X
ck-10,acb13
hvc1
c76:arnb6,hs(b7)
b10:
qqn,ar
acs,hhc66
hvc47LZ
gpb4,arb13
hvc71
c73:grs,arnb14
b12:nc_,gpnb4
0
tk-10,hhb10
b14:qqd
b26:qqd45.29+d19.39
gr0t5MA
c77:gab16,srnb7
arp-1DIQA
ar1b26,gab26
ca0,ac(b7)
ncn(b4)
pt(b7)td13
b17:arn,gab18
ck-10IOA
ck20
b16:arnDLOA
gab19,cad33
gpb4
b18:pmn__DX
-2
hse3
b19:pmn__DX
-4
hse3
arn(b17)Dt1
[ s t o p ]
ncp,hvb17
pana6Xe3
arnb26,ck-10
cl-20,ck10
cl-29,pp(b7)
gmp,hse3
qq(e1)t-1
b4:ncn,hse5
psc66,qqs+d52
pm(b6)D
arnc1,ca1
hse3X
hvc6
c78:gab16,nsn(a6)
casa5,hhc77
paa1tb25
hva22
c31:pac34,hvc4
c36:it-1
c34:qqt1
hvc19
c82:ck10,tk30
hse3,psi
arn(e1)t1
hse2LA
hve3NT
tk-30,sce4
tk30,hse3
psc66,hvc4
b23:qq1.19+d35.39
c83:ca(p)
paptd3
arnb23,grp1
hvc21X
c84:
qqd36,hsa29
qqd43,hsa29
qqd37,hsa29
qqd45,hsa29
qqd48,hsa29
qqd43,hsa29
arn17D
psc66,hvc18
a29:arn(s)D
hve3
[ s t o p ]
c37:pmn(e1)X1
hse2LA
gar1
ps
bss445t501
ps57,hhr3
bss435t501
pss-9,hhr1
ps56,arnsd2
a15:ck,tk-5
gar1
hvtc38
c58:srn57D
ar(e1),ck10
ml3b,hvs1
c60:gm(a17)D
cl9,gm2b1
tk1,tk-40
hha8
c33:gm(a17)D
paa7t3
arn(e1)t1
hse2LA
a7:bt_t-1
0
cl10,hvr-3
a8:cl-30,gr1b1
hvc67
a26:gaa23,arn1b1
nkf39,dkf3b1
a23:btt-1
a27:mkf,hva23
grf1b1
c49:qq(e1)t-1
c67:hva28LQA
bsn(a2)Xt7
hva25
arn1b1,paa18
a19:cl10X
ck-10,hse3
a18:btnt-150
a17:pmnDXV
hva19X
hse3
a25:pm(c1)DXt3
ca3
a28:psc66,hvc6
qq(e1)t1
hsc7,qqs+d56
[ s t o p ]
c35:qq(e1)t-1
grn1b1,paa15
pm1b,gm3b1
hvc37
c38:arnf3b1,mkf2b
grf3b1,it15
c39:paa15t5
pm1b1,hsc58
gm1b1
paa15t35NZ
c81:hvc37
c52:paa15t30
pm2b1,hsc58
c53:paa15t35NZ
gm2b1,hvc37
bk=e31,i=0
_
di=e32
_
d56:tconst.;
_
de32=i
_
e
_
c40:pm5b,gm1b1
c41:paa27t2b
grn2b1,it20
c42:pana15Vt10
c43:paa27t7b
c44:paa15t25NZ
hvc37
c51:grn1b1,hse5
c48:grn2b1,qqs+d56
c79:pmn2b1,cl30
hvc51NZ
paa17Xtd11
hva26
c80:paa17td12
hvc49
[ s t o p ]
dd20=i-3
_
qqf
qq136.39,
qq137.39,
qq75.39,
qq171.39,
qq142.39,
qq141.39,
qq135.39,
qq27.9+c4.19+21.39
qq27.9+c4.19+21.39
qq27.9+c4.19+21.39
qq27.9+c4.19+170.39
qq28.9+c22.19+0.39
qq28.9+c23.19+29.39
qq+155.39,
dd21=i-3
_
qqf
qq136.39,
qq137.39,
qq75.39,
qq171.39,
qq142.39,
qq141.39,
qq135.39,
qq20.9+c23.19+15.39
qq20.9+c61.19+16.39
qq10.9+c24.19
qq20.9+c23.19+26.39
dd22=i-2
_
qq3.9+c19.19+1.29+132.39
qq34.9+c30.19
qq9.9+c19.19+10.29+24.39
qq137.39,
qq75.39,
[ s t o p ]
dd23=i-17
_
qq2.9+c4.19+169.39
qq2.9+c19.19+38.29+152.39
qq2.9+c19.19+38.29+151.39
qq2.9+c19.19+23.29+35.39
qq2.9+c19.19+24.29+35.39
qq2.9+c19.19+25.29+35.39
qq2.9+c4.19+36.39
qq2.9+c4.19+36.39
qq2.9+c4.19+36.39
qq2.9+c34.19+27.29+70.39
qq2.9+c34.19+26.29+70.39
qq2.9+c34.19+27.29+72.39
qq2.9+c34.19+27.29+73.39
qq2.9+c4.19+169.39
dd41=i-31
_
qq2.9+c4.19+34.39
qq2.9+c4.19+34.39
dd24=i-18
_
qq13.9+c69.19+17.29+152.39
qq13.9+c69.19+17.29+151.39
qq27.9+c25.19+2.29+32.39
qq1.9+c25.19+2.29+32.39
qq4.9+c25.19+2.29+32.39
qq27.9+c25.19+2.29+33.39
qq1.9+c25.19+2.29+33.39
qq4.9+c25.19+2.29+33.39
dd25=i-26
_
qq27.9+c64.19+8.29+162.39
qq27.9+c64.19+8.29+162.39
qq27.9+c64.19+8.29+163.39
qq27.9+c64.19+8.29+164.39
dd26=i-30
_
qq1.9+c25.19+3.29+168.39
qq38.9+c68.19+31.39
qq1.9+c25.19+3.29+31.39
qq1.9+c25.19+3.29+161.39
[ s t o p ]
dd27=i-34
_
qq5.9+c19.19+2.29+131.39
qq8.9+c19.19+4.29+23.39
dd28=i-26
_
qq2.9+c19.19+36.29+139.39
qq2.9+c19.19+36.29+139.39
dd29=i-36
_
qq2.9+c19.19+28.29+140.39
dd30=i-26
_
qq2.9+c36.19+29.29+74.39
qq2.9+c19.19+29.29+74.39
dd31=i-37
_
qq2.9+c19.19+19.29+37.39
qq2.9+c19.19+18.29+37.39
dd38=i-39
_
qq11.9+c23.19+167.39
qq26.9+c23.19+25.39
dd39=i-8
_
qq20.9+c19.19+7.29+142.39
[ s t o p ]
dd32=i-1
_
qqf
qqf
qqf
qq34.9+c18.19+3.29+41.39
qq34.9+c19.19+3.29+41.39
qq34.9+c19.19+3.29+41.39
qqf
qq34.9+c18.19+3.29+41.39
qq34.9+c18.19+3.29+41.39
qq34.9+c18.19+3.29+41.39
qq34.9+c18.19+3.29+41.39
qq34.9+c18.19+3.29+41.39
qq34.9+c18.19+3.29+41.39
qq34.9+c18.19+3.29+41.39
qq32.9+c28.19+41.39
qq32.9+c23.19+41.39
qqf
qq32.9+c23.19+41.39
qq32.9+c23.19+41.39
qqf
qqf
qqf
qqf
qqf
qqf
qqf
qqf
qqf
qqf
qqf
qqf
qqf
qqf
qqf
qqf
qqf
qq32.9+c23.19+41.39
qq32.9+c23.19+41.39
qqf
qqf
[ s t o p ]
dd2=i-56
_
dc39=c39-c38,c81=c81-c38,c52=c52-c38
_
dc53=c53-c38,c40=c40-c38,c41=c41-c38
_
dc42=c42-c38,c43=c43-c38,c44=c44-c38
_
dc51=c51-c38,c48=c48-c38
_
dc79=c79-c38,c80=c80-c38
_
qqfc51.4+c80.9+c51.14+c48.19+c51.24+c51.29+c79.34+c51.39,
qqfc39.4+c39.9+0.14+0.19+c52.24+c52.29+c52.34+c81.39,
qqfc42.4+c42.9+c53.14+c53.19+c53.24+c53.29+c53.34+c81.39,
qqfc40.4+c41.9+c53.14+c41.19+c53.24+c53.29+c53.34+c81.39,
qqf,
qqf,
qqf,
qqfc51.4+c80.9+c51.14+c48.19+c44.24+c51.29+c79.34+c51.39,
qqf,
qqf,
qqf,
qqfc51.4+c80.9+c51.14+c48.19+c43.24+c51.29+c79.34+c51.39,
qqf,
[ s t o p ]
[ s t o p ]
qq7.3+6.9+c4.19+144.39
qq15.3+6.9+c27.19+504.29+144.39
qqf31.5+1.7
qq1.6
qq7.3+6.9+c4.19+145.39
qq15.3+6.9+c27.19+505.29+145.39
qqf31.5+1.7
qq1.6
qqc32.19+0.39,
qqc33.19+4.39,
qqc33.19+512.29+4.39,
qqc33.19+3.39,
qq8.3+7.9+c4.19+500.39
qqf31.5+
qq8.3+27.9+c77.19+d33.29
qq8.3+2.9+c21.19+5.29
qqf12.11+3.28
qq13.33
qq8.3+27.9+c21.19+14.29
qq8.3+29.9+c77.19+d33.29
qq8.3+28.9+c21.19+13.29
qq8.3+28.9+c18.19+11.29+20.39
qqf12.11+3.28+31.34
qq1.26
qq7.31+1.33
qqf-520,qqd39.19-512
qq8.3+27.9+c77.19+d33.29
qq8.3+22.9+c31.19+138.39
qqf12.11+3.28+1.20
qq13.33+1.20
qq8.3+27.9+c77.19+d33.29
qq8.3+2.9+c70.19+34.29
qq8.3+2.9+c18.19+34.29+129.39
qq8.3+2.9+c70.19+35.29
qq8.3+2.9+c18.19+35.29+130.39
qqf5.4+27.31+1.33
qq1.3+13.33
qq5.4+1.9
[ s t o p ]
b11:qqc73.19-1.19-c76.19
qq8.3+25.9+c12.19+11.29
qqf17.32
qq8.3+6.9+c4.19+508.39
qq8.3+15.9+c74.19+d.29+d47.39-2.39
qq8.3+17.9+c13.19+9.39
qq8.3+19.9+c12.19+11.29+5.39
qqf1.28+15.33
qq1.0-1.7
qq1.25+13.33
qq8.3+6.9+c4.19+509.39
qq8.3+15.9+c74.19+d.29+51.39
qq8.3+17.9+c13.19+10.39
qq8.3+19.9+c12.19+11.29+6.39
qqf1.28+15.33
qq1.0-1.7
qq1.25+13.33
qq8.3+6.9+c4.19+510.39
qq8.3+15.9+c74.19+d.29+52.39
qq8.3+17.9+c13.19+11.39
qq8.3+19.9+c12.19+11.29+7.39
qqf1.28+15.33
qq1.0-1.7
qq1.25+13.33
qq8.3+14.9+c75.19+0.29+12.39
qq8.3+14.9+c74.19+0.29+61.39
qq8.3+16.9+c14.19+38.39
qq8.3+16.9+c11.19+11.29+42.39
qqf1.28+15.33
qq1.15
qq1.19+13.33
qq8.3+14.9+c75.19+0.29+8.39
qq8.3+14.9+c74.19+0.29+59.39
qq8.3+24.9+c15.19+7.39
qq8.3+24.9+c12.19+11.29+13.39
qqf1.28+15.33
qq1.15
qq1.19+13.33
b13:qq1.19-50.35+7.39
[ s t o p ]
qq8.3+14.9+c74.19+0.29+65.39
qq8.3+23.9+c83.19+11.29+d19.39
qqf1.28+1.32
qq13.33
qq8.3+6.9+c4.19+511.39
qq8.3+14.9+c74.19+0.29+53.39
qqf13.33
qq1.1-1.7
qq8.3+14.9+c74.19+0.29+54.39
qqf13.33
qq8.3+12.9+c46.19+0.29+66.39
qqf9.33
qq12.3+27.9+c78.19+d33.29
qq4.3+31.9+c76.19
qq8.3+28.9+c1.19
qq-515,qqd20.19-498
qq8.3+30.9+c1.19
qq4.3+31.9+c16.19
qq4.3+28.9+c20.19
qqf3.9+9.13+15.20+7.29-1.35+1.38
qq15.4+31.10+15.15+1.20+3.28+7.32+1.34+1.38
qq7.10+5.14+13.18+1.20+3.28+3.31+7.35+1.38
qq8.3+28.9+c77.19+d44.29
qq-515,qqd21.19-501
qqf-515,qqd21.19-501
qqf3.9+1.20+3.28+7.34+1.38
qq15.4+3.7+1.33
qq-514,qqd22.19-508
qqf-514,qqd22.19-508
qqf1.8+1.20+1.38
qq15.4+7.7
[ s t o p ]
qq4.3+27.9+c77.19+d33.29
qq8.3+2.9+c21.19+30.29
qq12.3+2.9+c26.19+33.29+160.39
qq4.3+2.9+c18.19+31.29+38.39
qq4.3+21.9+c16.19
qqf31.5+3.7+1.16+3.31
qq1.11+3.31
qq1.0-1.9+3.28
b25:qqf-515,qqd20.19-498
qq4.3+27.9+c77.19+d33.29
qq4.3+36.9+c1.19
qq4.3+9.9+c4.19+8.39
qq-549,qqd31.19-511
qq4.3+8.9+c4.19+8.39
qq4.3+27.9+c4.19+8.39
qqf7.3+1.6+3.28+1.36
qq+1.9+3.31+1.36
qq7.3+5.8+3.31
qq-538,qqd28.19-511
qqf7.3+1.6
qq-548,qqd29.19-512
qqf7.3+1.6
qq-538,qqd30.19-511
qqf7.3+1.6
qq-530,qqd24.19-505
qqf7.3+1.6
qq4.3+27.9+c77.19+d33.29
qq4.3+2.9+c18.19+21.29+40.39
qq4.3+2.9+c18.19+22.29+40.39
qq4.3+2.9+c18.19+20.29+40.39
qq4.3+2.9+c17.19+37.29
qqf1.4+1.24+3.31
qq7.3+7.7+3.31
qq1.4+3.9+3.28
[ s t o p ]
qq-529,qqd23.19-497
qq8.3+24.9+c1.19
qq4.3+14.9+c76.19
qq4.3+24.9+c1.19
qq4.3+21.9+c72.19
qq4.3+12.9+c76.19
qq4.3+17.9+c1.19
qqf7.3+3.7+3.15+21.21
qq7.3+3.7+7.15+1.24
qq7.3+3.7+3.13+1.21
qq4.3+27.9+c77.19+d33.29
qq4.3+2.9+c18.19+27.29+71.39
qq6.3+4.9+c4.19+76.39
qq6.3+4.9+c18.19+6.29+77.39
qq4.3+2.9+c84.19+153.39
qqf1.4+1.23+3.31
qq1.22+3.31
qq1.4+3.9+3.28
qq
qq-546,qqd27.19-511
qqf7.3+3.7
qq8.3+32.9+c22.19+0.39
qq8.3+33.9+c16.19
qq8.3+32.9+c23.19+41.39
qq8.3+32.9+c20.19
qq8.3+33.9+c1.19
qq8.3+32.9+c4.19+41.39
qqf-513,qqd32.19-473
qqf31.5+31.10+27.15+1.18+15.23+59.31+7.38
qq1.10+3.17+1.19+3.24
qq1.10+31.16+9.21+1.25+3.31
qq-538,qqd25.19-509
qqf7.3+3.7
[ s t o p ]
qq8.3+6.9+c4.19+506.39
qqf1.0-1.7
qq8.3+27.9+c77.19+d44.29
qq8.3+36.9+c4.19+154.39
qqf3.9+3.28+1.37
qq13.33
qq8.3+37.9+c50.19+16.29+28.39
qqf1.28
qq8.3+27.9+c77.19+d33.29
qq8.3+2.9+c18.19+40.29+165.39
qq8.3+2.9+c18.19+39.29+d48.39
qqf14.5+13.33
qq1.9+3.28+13.33
qq-551,qqd38.19-511
qqf7.3+3.7
qq8.3+6.9+c4.19+507.39
qqf1.0-1.7
qq8.3+6.9+c4.19+501.39
qqf1.0-1.7
qq4.3+38.9+c82.19+999.29+27.39
qqf7.34+1.36
[ s t o p ]
qqc60.19+3.29+3.39,
qqc60.19+0.29+3.39,
qqc29.19+6.29+146.39,
qqc29.19+6.29+147.39,
qqc29.19+6.29+149.39,
qqc29.19+6.29+148.39,
qqc29.19+1.29+492.39,
qqc29.19+1.29+493.39,
qqc29.19+1.29+494.39,
qqc29.19+1.29+495.39,
qqc29.19+1.29+496.39,
qqc29.19+1.29+497.39,
qqc29.19+1.29+156.39,
qqc29.19+1.29+157.39,
qqc29.19+1.29+159.39,
qqc29.19+1.29+158.39,
qqc29.19+6.29+143.39,
qqc29.19+1.29+150.39,
qqc62.19,
qq4.3+21.9+c72.19
qq-543,qqd41.19-511
qqf7.3+3.7
qq1.21
qq-542,qqd26.19-509
qq1.1+18.9+c72.19
qqf1.21
qq7.3+3.7
d1:qq
de22=k-e14,e47=j
_
bk=e23,i=0
_
i=5e21
qqe16.9+1d1.19-e16.19+1.20+c63.39f
e
_
e
_
bk=e22+e14,i=e16-e47,a22,b15,c48,d20
_
i=e16
d3=194
d4=195
d5=e20
d8=16
d9=511
d11=64
d12=80
d13=15
d14=16
d19=2
d20=24
[ s t o p ]
b:qq
qq
qq
qq
qq
c1:
b1:pmnDX
hsc7
c2:
b2:pmnDX
hse3NZ
c3:pmn(e1)X1
hse2LA
a:gab3VNT
psc3-1,hve3
b3:bsd__Vd1NZ
_14
psa-1,hva19
psc3-1,hve3
a21:pmn(b3)Xd2IRC
a22:gab2
gtb4VLA
gtr,hvn__
-1
ck20,gab1
b4:gtb13,hvn__
-1
c4:pmnd3DXVIZA
c5:arnd4DIZA
hve3
c6:arn(b1)D
hve3
c7:grp1M
ppp1,it(b5)
c8h:bsp2,hse5
hrs1,qqne34
c9:arnp,ppp-1
hrs1
c43:arn-d13DITB
mtc43,hve3
[ s t o p ]
c10:gsb6,psa1
b5:hvd_
_5
b6:hv__t1
-1
a1:gsb7,hrb6
gsb7,hrb6
gsb7,hrb6
gsb7,hrb6
gsb7,hrb6
gsb7,hrb6
gsb7,hrb6
gsb7,hrb6
gsb7,hrb6
a2:ca,hsns__
-1
a3:qq,hss
c11:psc2-1
c12:hsc13
hsc13
hsc13
c13:arn(e1)t1
hse2LA
hve3NQB
hrs1
[ s t o p ]
ba5
_
c47:grne20MC
a1:pmd__t1
_15
psn(a1)VXd18LC
hva1
gs2e4,hsc16
a2:gm1e__t-1MB
_20
nc(a2),hva2
hse3IQB
a3:hsc13
hva5XNT
gaa4,ck10
a4:gmXMC
is(a4),its512
pa(a4),hsc13
ck20,ac(a4)
hva3
a5:ck-10,hse3
srn(1b)D2
sr3e4,hse3
arn1b,hse3
hhne29
e
_
[ s t o p ]
c14:pa4bIQB
a4:hsc16
hva4LT
gab15,itd6
b15:bs__,hva4
-1
it(b15),bsd7
psa4-1,hvc12
qq(e1)t-1IQB
hvc3
c16:arn(e1)t1
hse2LA
hrs1NZ
a19:arna5,sce4
hsne3
hvc16
a5:m1
_
c17:pmd8DVLOB
pab2,hvc21
hsc43NTB
hse3X
a6:arnp,ppp-1
a7:hha10LZ
ncd9NT
psa6-1,hve3
a8:arnp,ppp-1
hva7NT
hsc10
hha9NZ
b7:grM
a9h:arnp1,psa8-1
a10h:hve3,hsc9
gab14,hsc9
gab10,hsc9
pi0.3V959NRB
gab11,hvc1
gab11,hvc20
[ s t o p ]
c44:ppp-1
c18:hsc13
qq(e1)t-1
qq(3b)V1
c19:ppp-1
c48:arn(b12)D-1ITA
c20:hsc5LZA
srn3b,sr2b
hse3
srn3b,hse3
b8:can_t-1
0
hvc47
hva12LTA
hsnc10
grn(b5)t-1MB
ps(b7),gsb9
pss1,gsb5
a11:hsc10NZ
uda14NZ
b9:arn__t-1
-1
hva11NB
a12:
b10:it,pa3b
b11:it,pa2b
c21:arnb,cl1
grbIOB
hvc32LRA
hvnc2IZA
c22:hsc16
a17:qq(e1)t-1
hvc23LTA
hsc10
hvc23LZ
is(4b),its1
pta2,ara2
a14:gr(b5)t-1MA
it(b5),bsp2
hhc8
c23:hsc9,qqc2-1
pm(4b)DX1
gm4b,hve3
[ s t o p ]
c24:hsc43NTB
hsc5LZA
hsc13
b12:arn__D1ITC
-1
c25:arn2b,hsc7
arn3b,hsc7
arn(b14)D
pa2b,hsc7
psn(b8)t1IZA
arna3,it(3e4)
bs(b8),gs3e4
uda14NTA
pa3b,hsnc7
pab14,arna5
c26:arb,ck-1
grbIOB
ck-1
bs(b8)t32NO
hse5
hvc2,qqnd10
c27:arn4b,pa4b
psc2-1,hvc7
c28:hsc43NTB
hsc4NZA
pa4b,hvc2
c29:bs(4b)t7
pa4b,hse5
hvc30,qqsd16
c30:qq(4b)t1
hvc2
[ s t o p ]
c31:pab14,can(4b)
arna15,hva22
hsc35,qqd20
gsb1,hsc6
arn4b,hsc7
ac(2b)D1
psc2-1,hvc34
c45:hsc35,qqi+2
gsa16,hvc34
paa16tc34
hvc2
c32:pab5td5LTA
arn(b2)D
pab14,hse3
c33:hsc35,qqc3-1
hsc43NTB
c34:hsc16
hha16NT
hsc7
hse3
b13h:it1,qq()
a16:hvc34,uda17
hrs1NRB
arnd9DNTA
hvc7NTA
hrs1
c35:arn(b1)D
b14:ca,hrs1
gab14,hvc7
a15:qqc33.19+8.29+2b.39,
[ s t o p ]
c36:hsc13
arn(e1),hsc10
grn(b7)LZ
bss511LRB
hvc1
hsc4NZA
arnsD
ac(2b)D2
qq(b2)td11-d12
psc1-1,hve3
c37:hsc4NZA
c38:psc1-1,hvc13
c39:hsc13
arn(e1),tk-30
ace4
a18:arn(e1)t1
hse2LA
hvc2LT
psa18-1,hve3
c40:hsc6LPB
c41:pmr
c42:hvc2IPB
dd2=i-1
_
qq84.9+c11.19
qq85.9+c11.19
qq86.9+c11.19
qq87.9+c11.19
dd7=i-d2
_
qqc33.19+52.29+2b.39,
qqc33.19+53.29+2b.39,
qqc33.19+54.29+2b.39,
qq21.9+c45.19+7.29+3b.39,
qqc33.19+56.29+1b.39,
qqc33.19+57.29+1b.39,
qqc33.19+58.29+1b.39,
qq28.9+c31.19+60.29+2b.39f,
qq29.9+c31.19+61.29+2b.39f,
qq30.9+c31.19+62.29+2b.39f,
qqc26.19
qq17.9+c25.19
qq14.9+c28.19
qq18.9+c24.19
qq19.9+c24.19
qq1.9+c17.19
qqc3.19
qq172.9+c2.19
qq173.9+c2.19
qq174.9+c2.19
qq175.9+c2.19
qq176.9+c2.19
qq4.9+c39.19
qq12.9+c2.19
qq5.9+c28.19
qqc17.19+20.29f,
dd6=i-d2-1
_
qq177.9+c27.19
qq178.9+c27.19
qq179.9+c27.19
[ s t o p ]
qq180.9+c30.19
qq181.9+c29.19
qq182.9+c29.19
qq183.9+c29.19
qq22.9+c23.19
qq3.9+c23.19
qq23.9+c22.19
qqc14.19f
qq36.9+c48.19+51.29+3b.39,
qq37.9+c18.19+48.29+3b.39,
qq38.9+c18.19+49.29+3b.39,
qq39.9+c18.19+50.29+3b.39,
qq35.9+c48.19+6.29+3b.39f,
qq40.9+c19.19+47.29+3b.39,
qq41.9+c44.19+44.29+3b.39,
qq42.9+c44.19+45.29+3b.39,
qq43.9+c44.19+46.29+3b.39,
qq40.9+c19.19+8.29+3b.39,
qq76.9+c38.19+1023.29,
qq77.9+c38.19+1022.29,
qq78.9+c38.19+1021.29,
qq79.9+c38.19+1020.29,
qq9.9+c38.19+1019.29,
qq68.9+c37.19+1018.29,
qq69.9+c37.19+1017.29,
qq70.9+c37.19+1016.29,
qq80.9+c36.19+1015.29f,
qq81.9+c36.19+1014.29f,
qq82.9+c36.19+1013.29f,
qq75.9+c38.19+1012.29,
qq72.9+c38.19+1011.29,
qq73.9+c38.19+1010.29,
qq74.9+c38.19+1009.29,
qq13.9+c36.19+1008.29,
qq11.9+c36.19+1007.29,
qq10.9+c36.19+1006.29,
qq184.9+c41.19
qq185.9+c40.19+192.29,
qq186.9+c40.19+192.29,
qq187.9+c40.19+192.29,
qq188.9+c42.19f
qq189.9+c42.19f
qq190.9+c40.19+193.29,
qq191.9+c40.19+193.29,
dd1=i-d2-1
_
[ s t o p ]
d15=i-1,d18=-d15
a20:grnsc46MC
bss511,hva21
pss-1,hva20
c46:pa3e4t2
qq(e1)t1
pi128,ppd15
arnd19D
hse3
pse20-c46,hvna20
bk=e31,i=0
_
i=e32
d10:tbegin ends;
_
d16:tindices;
_
e32=i
e
_
d17:qq
de22=k-e14,e47=j
_
bk=e23,i=0
_
i=6e21
qqe16.9+1d17.19-e16.19+4.24+3.29+c46.39
e
_
e
_
bk=e22+e14,i=e16-e47,a27,b27,c34,d28
_
di=e16
_
d1=196
d2=404
d3=87
d6=190
d7=191
d9=471
d11=12
d15=445
d18=199
d19=48
d20=27
d21=198
d22=132
d25=40
d27=197
d28=96
[ s t o p ]
[ s t o p ]
[ s t o p ]
e16:qq
qq
c1:hsc2
hsc2
hsc2
c2:hsc3
hve3
c3:arn(e1)t1
hrs1NA
a1h:hve2,ace4
arnd1DV
c5:arn(s)D
hve3
c4:
bh:pmb6,is
arns2D
hse3
qq(b16),hsc5
cln-6,udc9
ck-4,hse3
c6:pab16,hhc11
c7:hsc3,qqi-1
hve3NT
tk-30,sce4
tk30,hse3
hhc11
c8:pab10Vc21
c9:pab10tc10
a19:qqd23,hrs1
b1:pst-1
b2:pst-1
b3:pst-1
b4:pst1
b5:qq-1.33
b6:qq
b7:qqd19.39
[ s t o p ]
c10:arn(b11)ITA
a2:gtb8XIRC
hva9LRC
a3:cln-6,ck-4
ard2DVLTA
arn(e1),hva8
a4:
b8:hse3,nc
arnsD
hse3
cln-5VNRA
qqnV
ck-5,mtr
hse3LTA
hha10NRC
a5:
b9:btt-55
pab9,uda7
c11h:qq,psi
c12:pmn(e1)X1
hse2LA
gab11VNZ
arna17,hha1
b10:hvLT
b11:bstd3
hve3
bs(b11)td20
ck-2,ara19
gab12,arn(e1)
b12:artd4IQC
hva6LT
cl10,gtb20
gab13XIPC
arb5,grb6
b13:hvnX
a6:mb511D
hse3NZ
hh(b12)
a7:qq(2e4)t1
[ s t o p ]
a8:ara18,arb5
gr(b11),hse5
hvc10,qqsd5
a9:hha14NTA
hsc3,qqi-1
qq(e1)V-1NZ
arna17,hha1
ncd6,cad7
hva3IRA
a10h:cln-11,cln-9
ck-1,gab14
a11:
b14:pmntd8IRC
hva2XNRA
a12:cln-5,ck-5
hva13LZ
ard9D
psa12-1,hve3
a13:hv(b14)Dd17NRB
a14h:hva5,udna4
psa4,hrs1
b15:ite20t-2
pt(b11),hvc10
a15:qq1.0+31.33
a16:qq1.33
a17:qq1.39
a18:qqd11.39
[ s t o p ]
c20:hsc3
gab11
c21:arn(b11),gtb
b16:qqVt1NC
cl-6XNB
cad28,hse5
hhc11,qqsd12
c22:
b20h:gab6,ud
its,ptb6
arn(b11)VIRC
a20:qq(3e4)t1
pmb6VLZ
pma15,hha21
gm(b11)MPC
a21:hhc11,cmb6
gr(b23)V1MRC
arna18V
psa20-1,hvnc30
arb5,ar(e1)
gr(b11)MA
psc12-1,hvc12
[ s t o p ]
c23:pab10tc21
hsc2
c24:pab22Ve20+1
a22:grn(b22)MB
b21:arn,pma15
b22:cmt-1
hvr-1
nc(b22),hva22
b23:arnd_IRC
_8
gab24VLT
gab24,hva23
b24:grMRC
hv(b23)D-1
a23:hv(b24)D512LRC
gtr,pp__
-1
qq(b23)t-1
a24h:srna16,acb5
ac(b21),hvc12
c25:qqd21,hsc5
srnd25D
ar(e1),hse3
is(b23)
arnsd14D
ck-19,acb6
c26:panb10Xc22
gm(b23)t1MA
itp,pt(b23)
hsc30,qq1
gsb4,hsc3
gab2,pab1
hsc2,qqc12-1
arna16,hha24
c27:qqd15,hsc5
arn(b4)D1
hse3
srnb5,tk24
hse3,qqc12-1
qq(b4)V-1LPB
psd16,hvc28
arnd22D
ar(e1),hve3
[ s t o p ]
c28:hsc3
gab27,scb2
it(b2),ptb7
it(b2),pab26
ck16,arb7
grp-1MB
gpb25,ppp-1
qq(b2)t-1
c29:
b25:arnDtd17
ck-19,acb6
c30:is(b23),its-512
bsp-512,hrs1
psa25,hve5
c31:qqd18,hsc5
b27:qq,hsc5
b26:qq,hsc5
a25=i-1
hhc11,qqne34
d16=c31-1
a26:bss511,hva27
ppp-1,gmp
hsc30,qq-30
a27:tks,pss5
scpVMA
c32:gpb25,ps5
hsnc3X
hva26LT
acnpMC
qq(e1)t-1
psc11-1,hvc11
c33:it(b15),pte16
arn1e16,hhe29
[ s t o p ]
d4=i-1
qq511.9+197.9,hvc26
qq510.9+213.9,hvc33
qq509.9+214.9,hvc2
qq508.9+210.9,hvc7
qq507.9+211.9,hvc8
qq-6.9+20.9+c12.19+b1.29f
qq-7.9+16.9+c12.19+b1.29f
qq-8.9+d11.9+c12.19+b1.29f
qq-9.9+24.9+c12.19+b4.29f
qq-10.9+8.9+c12.19+b4.29f
qq-11.9+d11.9+c12.19+b4.29f
qq500.9+212.9,hvc9
qq-13.9+28.9+c12.19+b4.29f
qq498.9+203.9,hvc8
qq-15.9+0.9+c9.19
qq-16.9+0.9+c8.19
qq495.9+204.9,hvc24
qq494.9+205.9,hvc23
qq493.9+206.9,hvc23
qq-20.9+0.9+c32.19
qq491.9+207.9,hvc20
qq490.9+208.9,hvc2
qq489.9+209.9,hvc2
qq488.9+215.9,hvc4
d23=i-d4-7
qq-28.9+1.9+c6.19
qq-32.9+103.9+c25.19
qq-36.9+103.9+c25.19+b1.29f,
qq-40.9+103.9+c25.19+b1.29f,
qq-44.9+32.9+c12.19+b1.29f
qq-48.9+36.9+c29.19+b1.29
qq-52.9+40.9+c12.19+b2.29f
qq-56.9+40.9+c12.19+b3.29,
qq-60.9+44.9+c28.19+b2.29
qq-64.9+44.9+c27.19+b2.29
qq-68.9+40.9+c27.19+b4.29f
qq-72.9+52.9+c12.19+b4.29f
qq-76.9+56.9+c12.19+b4.29f
qq-80.9+60.9+c12.19+b4.29f
qq428.9+468.9,hvc1
[ s t o p ]
d8=i-1
d10=-d8+1,d14=-d8+2,d17=-d8-1
c34:hsc3
gab3,hsc3
gre16,hse3
hsc3
ck10,ace16
hsc3
gab21,pp(b21)
bsp-d8-510,pp510d8
itp,bsd24
psa25,hve5
arb5,gr(b21)
qqd27,hsc5
hvc26
bk=e31,i=0
_
i=e32
d5:tundeclared;
_
d12:t+ decl.;
_
e32=i
e
_
d24:qq
de22=k-e14,e47=j
_
bk=e23,i=0
_
i=7e21
qqe16.9+1d24.19-e16.19+5.24+1.28+c34.39
e
_
e
_
[ s t o p ]
bk=e22+e14,i=1e16-e47,a12,b10,d9
_
i=1e16
d4=200
d5=50
a:grne20,arne16
ck10,gae20
tk20,gab2
ite20-d5-d5
bs(e20),hva3
a1:psd7,hve5
a2:arn(b2),ck-10
gab2,tk20
nc0
b1:grd_t1
_1
a3:
b2:ncn,hva2
grnd2,hhne29
d3:ppn0,udb1
a4:pmnd_X1
_1
hha8LZ
gab5,ck10
gab4
a5:b10:qqd_t2
_8
b3:itt1
b4:bs,hva5
is(b10),arns1
b5:is,grs1
arn(b10),gab6
gab8,cl34
ck16,cl-4
ck-18,cl-6
ck12,cl-4
ck10
gr(b5)M
cln-5,ck-5
acb8,cln-5
hva6NZ
ac(b5)MA
nt(e16),it(b8)
pt(b5),hva4
a6:gab7
a7:
b6:arnDt1
it(pd2),bs(b6)
ppp1,grpd2
b7:ncnt-32
hva7,qqnd6
d7=i-2
[ s t o p ]
itp,qq(b8)
nt(pd2),it(b8)
pt(b5),hva4
a8h:
b8:qq,is(e20)
grns-2MB
arnp1D
sc13e4,hse3
arn(e16)D
hse3
arn(13e4)D2
ck-10
a9:
b9:pme__t-2
_20
ac(b9)NC
hva9NB
a10:bsp511,hhne29
arnpd2,hse3
ppp-1,hva10
d1:qq
d2=d1+d5
d8=d2+d4
bk=e31,i=0
_
i=e32
d6:tstd.procs.;
_
e32=i
e
_
d:qq
de22=k-e14,e47=j
_
bk=e23,i=0
_
i=8e21
qq1e16.9+1d.19-1e16.19+1.20+a.39f
qq2d8.9+63.19+1.20+d3.39f,
e
_
e
_
d e49=4 ; tape number := 4;
_
[After i follows STOPCODE, SUMCODE and a sum character]
_
i[ s t o p ] [ s u m ] [ 0 5 4 ] T3
_
s
_
[ s t o p ]