DataMuseum.dk

[13.1.69                                                 T2    Gier algol 4
                                                       22]
[Here follows STOPCODE and CLEARCODE][stop] [clear]
<e49-1, <-e49+3, ⨯  ;   test tape number
i wrong tape
_
s
_
                   ;
>                   ;
d e48=1             ;   translator is in:=true
_                                         ____
d e52=22             ;   version number
_
<e52-e50,           ;   if version number T2 gr max version number
                        __                   __
                    ;   then the following definitions are loaded;
                        ____ ___
d e61=21             ;   define version number T1 and L1
_
d e62=e52           ;   define version number T2
_
d e63=18             ;   define version number T3
_
d e64=17             ;   define version number T4
_
d e65=15             ;   define version number T5
_
d e66=20             ;   define version number T6 and L2
_
d e67=14             ;   define version number T7 and L3
_
d e68=19             ;   define version number T8 and L4
_
d e50=e52
_
>                   ;
[stop]
bk=e22+e14,i=e2-e47,a33,b29,c57,d97
_
i=e2
e2:arn__e__t1
      81_13
gae13-4V
qq
tk10,gae13-3
tk10,gae13-2
tk10,gae13-1
e1:arne__-1t-4
      _13
hrs1
arn10e4,ac(s1)
arn(s1),hve11
[stop]
[stop]
d1=1008
d2=76
d3=249
d4=74
d5=61
d12=167
d13=172
d14=1009
d15=957
d16=220
d17=14
d18=63
d19=10
d20=1011
d21=1012
d22=1010
d23=291
d24=93
d25=287
d26=1013
d27=194
d28=273
d29=76
d30=228
d31=280
d32=82
d33=98
d34=176
d35=184
d36=32
d37=59
d38=60
d39=63
d40=15
d41=271
d42=72
d43=275
d44=86
d47=62
d48=77
d53=128
[stop]
a30:qq1.4+1.23+1.27
qq1.23
qq1.34
qq1.29
qq-1.7+1.23-1.39
qq1e13t1.29+4
qq1.4+1.23+1.33
qq1.39
pmn(e1)X1
gab10
lynb10V
hva3LT
qq1.3+1.37
qq6.23
a31:
b20:pi544t144
arn-2,gab27
tk10,gab28
arn7e4,hsc52
a32:
d49:nc2,hsc1
qq5,hsna33
qq7,hsna33
qq9,hsna33
qq14,hsna33
pab13td22IQC
pif0t991NPB
pa14e4,hvc28
a33:hsc1LQA
hha32NQA
nc(s),hva32
arna33,hrs1
qq
d50:
i=65i
d52:
i=3i
[stop]
c1:pmrVIQC
,psi
c2:zq
hsLA
zq
b2:acDt1LTB
b10:pm__Xd__
      -1 _50
hva3XNB
hva6XLPA
a2:hv(b10)LA
c3:hrs____
    __1LZA
c4:hsc50LQB
c5:gab1VLT
c6:mb1023DV
b1:hv__tcIZA
     -1
hve3IZC
c7:hsnc1IZA
hvc50LQB
hrs1
[stop]
a3:ck4,nc63.5
c9:hsc49
c19:hvc2,qqsd54
a6:gab4X
b12:ck-5,ud__e4
           16
b4:sy__NO
     -1
arn(b10),ud16e4
b11:hva2,hv
c10:
b13:pmnDX
hvc2LZ
hse3
arn7a30,ace4
pme4IPA
dln3e4XLPB
hva7NZ
sy58,pmne4
hse9
hse8
b14:bs_,sy60
      0
sy0IPA
a7:pmd18DVLZA
hvc2NQB
arn2d52,hvc3
[stop]
c11:itd53,pab14
gtb10,hvc2
c12:arnd52VLQB
hvc2IQC
hvc3NQA
a8:hvc2
hrs1LZA
c13:arn1d52VLQA
hvc2IQB
hvc3
c14:hvc2NTA
pma8,gmc3
hsc49
hvc2,qqpd55
c15:hvc2NTA
pm1a8,gmc3
hsc49IQC
hvc2,qqpd56
c16:arn(b2)Dt-62
ck-5,arb2
mb31D
gab6,pm1c2
gmr1,udc2
qq
b6:nc__t31
     -1
hsc49
c17:pab2,qqpd68
pi1.3t959
hvc2
[stop]
c18:arnr,ud15e4
gtb12,sy64
hsa9IPA
arnr2,ud15e4
sy58,ud16e4
ptb12Vt16e4IPA
c20:hsa9
hrc1IZA
a9:hsc49NZB
hvr1,qqsd57
hsnc1IZC
ncd8NQB
pmnr,hrs
hrs1
c21:
b16:pmnd__DXIZB
       _12
cad1,hvc31
hve3IZA
a10:hsnc1IZA
a11:hsc50LQB
cad8,hvc21
ncd34,cad33
hvc5
ncd7,hva10
c22:pmnd13DX
hse3IZB
b17:bt__t-1
      -1
hva10
pmn(14e4)DIZA
ptb22ti
pp0,sy58
bs(14e4),hvc51
arn(13e4)D
ga2e4,gm3e4
pm8e4,gm6e4
pmd14DX
pm5e4,hse3
gm8e4,hsc53
gr7e4,hhne29
[stop]
c23:hsc7
cad9,hvna15
b18:pmd__DXV
      _27
a12:pmd28DX
a13:hse3IZC
hvc4X
c24:hsc7
ncd43,hva12
pmd31DXV
c25:
b19:pmd__DVX
      _16
a14:pmd25DXVLZ
a15:pmd30DXVLZ
a16:pmd32DXLZ
hve3IZC
c26:hsc7
cad10,hvna16
pmd29DXV
a17:pmd23DX
hva13
c27:hsnc2IZA
a18:ck-2NQB
hha19LO
ck2NQB
a19:hva17,ck-2
hvc27LO
a21:hsc2
ncd6,uda18
hva21LO
ncd6,hva23
a22:hsc2
cad35
hvna14NQB
ck-4NQB
hva22LO
a23:hsc49
pm(b10),qqsd58
hva11X
[stop]
c28:qqn(b17)t1IZB
arnd24DIZA
psc2-1,hve3
c29:arnd15D
ar(b10),hvc6
[stop]
ba10,b2
_
c30:pmd3DX
pab16td1
ppd27,itd16
a1:pab18td27IQC
gpb19,hvc6
c31:pme4,gmb2
a2:pi1.1+1.8+0.9V764
c36:pi1.1+0.8t765NRB
pab13Vd2
c37:pi1.8t1021
c32:hse3NZ
c33:hsnc1IZA
hva5LQB
a3:ck20,gab1
b1:hvn__tcLO
      -1
hvc33LRA
arn(b1)DVIZB
c34:pi0t1020LRB
a10:pab13td39NZB
hvc32
c38:arnd4D
c35:hvc33LRA
pi1.8+1.9t1020LZ
hvc36
[stop]
a5:hva3LRA
hva6NQA
hva3NZB
ca4,hvc33
ca5,hva7
ca20,hva8
ca6,psnd47
ca13,psnd5
pmsDXVLZ
a6:pmd36DX
hha3
a7:pmd48DX
hse3
panb16Xd12
arne4,srb2
tl-9,ppd16
hse5NZ
psc2-1,qqnd59
pab13Xd22
mt4a30,hva1
b2:qq
a8:qqc55,hsc54
bsp-41,itd38
pab24td37
tl-6,hsc56
bsp-41,hvna2
psa8,hvc48
e
_
[stop]
ba27,b9,d1
_
c40:arn8e4,hse11
sk42e13,vk960
b27:can,hha2
vk(b27),lk42e13
pab1td49
gib2,vk960
qqc57,hsc54
b1:gr,arnb1
bsp-41,hva1
ca6d49,hva3
qqc57,hsnc48
hv(b1)D1
a1:paa10,hsc53
pa56e13t1e13
qq(46e13)t2
ppd49-1,hs46e13
a2h:nc0,hse5
b2:pi,qqnd66
arn8e4,hse11
arn44e13,lk42e13
vk(e17),psc2-1
mb4a30NT
c52:
b26:grd__t-1
      _50
gsb7,it0
c41:pmn(b26)Xt1
tl-7,gab3
tl-25,it(b3)
bs-1,hha2
tln16,tk16
grb20,tln16
b3:pmXVta25NB
a3:psa4,hve5
ga1c2,gtb11
gm-2,ck20
gab4,gtb5
a4=i-1
b4:pm__,qqne34
     -1
gmc2,it1
pm(b4),gm2c2
b5h:pm(b26),hvn
[stop]
c53:arn(b26),tl-37
hhna8LT
arn(e2)DVt-1e13LZ
arn5a30,hva6
pm-2,gm(b26)
ck10,hva7
a6:il0,arn1e13
mb4a30,gr(b26)
arn4e13,ar-5
a7:pm(e1)DXtd1
ck-14,ml13a30
a8h:xr,ar(b26)
gr(b26),hrs1
a10:hhr_,vk960
       8
b28:can,hha2
vk(b28),lk1e13
arn8e4,hse11
sk42e13,arn(b26)
hs1e13
hha2NZ
arn8e4,hse11
lk42e13,pmnr
a11:ar-2,gr-2
hse11
pae2Xte13
lk1e13,vk(e17)
hha13NZ
arn-2,sr5e4
hva15LT
arn9e4,sr-2
hvr4NT
arn-2,sr8e4
hva15LT
arn6e4,sr-2
hse5NT
hva15,qqnd62
a12:
a13h:grb20,hs(1c2)
arnb20,sr13a30
hva12NT
arnb20,ck14
ace1,arn(e1)
b7:ps,hv1c2
[stop]
a14:bsn(e2)Xt39e13
arn7a30,hva11
a15:pmn(e2)Vt1
a16:hs21e13
pae1Vtb8LZ
psr1,hve5
arna19,gra17
hvna18,qqnd67
b8:qq
qq
qq
qq
qq
a17:zq
arn(e1),hrs1
a18:cln-6
ca63.5,arn7a30
ck-4,hva17
a19:grb___Vt1
      _8-1
d1=-b8+1
[stop]
ba8,b3
_
a20:hsc49
hvnr1,qq(pd63)
bs(b14),it60
pab3t58
a21:gpb1,ud14e4
a1:ppe13,gpe1
gpe2,pp-119
ppn-159VNZ
arna7,sy64
a2:ca64,hha6
ck10,bsp
grpe13,ppp-159
lyb2,pma8
ppp40,bsp474
cma7,hva2
sy29,sy17
a3:lynb2,bsp474
ca54,hha4
nc37,hva3
sy38,sy62
a4:hvna1,sy57
sy37,sy57
sy18,sy62
ptb11tc41
arnb3,hha6
a5:ppp40,tk10
a6:cl-10,ck10
bsp512,hva5
grpe13,gmp1e13
b1:pp__,ud16e4
     -1
b2:qq,hv1c2
b3:qq+127.19+127.29+127.39,
a7:qq58.9+60.19+58.29+60.39,
a8:qq63.9+63.19+63.29+63.39,
e
_
[stop]
a23:tl49,ca1
hv(b3)Dta26
arn16e4,ck-23
tk23,ar(b26)
gt16e4,ud16e4
a24h:hvc2,ud14e4
lynb10,hhr-2
c42:hsc49
hha24,qqnpd65
qqe2.9+a21.19+8a30.29+a20.39
qqc2.19+10a30.29+a23.39
a25:qqa14.9+c2.19+8a30.29+a11.39
qqa16.9+c2.19+8a30.29+a10.39
qqa16.9+c2.19+8a30.29+a10.39
qqa16.9+c2.19+8a30.29+a10.39
da26=-1a25
_
e
_
[stop]
ba19,b9
_
c44:qqi+1,hsc54
ps0,cad41
hvc45NQB
pab24Xd26
panb1X-19
gmb20,hva13
a1:ar3a30
a2:ar3a30
a3:ar3a30,ppp1
bss-6,ck-10
ac1b20,hva12
a4:ppp7,ps6
qq(b1)V1
a5:pp13,ps12
pa1b20,hva12
a6:bs(b1),hva11
arn7a30,ns(b1)
cks-20,acb20
canp,hva10
ppp+1,hva12
a7:arn2a30V
a8:srn1a30,iss2
a9:pps3,arsa30
a10:ac1b20IOA
b1:qq__V1NOA
     -1
a11:pp16
a12:hsnc1IZA
a13:hha14NQB
pab2t10NQA
ncd43VNQA
cad42,it9
pab2,cad10
pab2t5LQA
a14:hva15,ck-10
tk-6,gab2
a15:
b2:arn__ta17IZA
      -1
gab3,ckp10
b3:hvnLO
hva11NA
pp16,hva16
[stop]
a16:pa1b20,arn1b20
acb20,tk19
pp16LO
bsp-15,hsc49
hvc46,qqsd69
a17:qq
qqa2t1.0+1.13
qqa3t1.0+1.13
qqa4t53.5
qqa5t5.5+5.11
qqa6t37.5+5.11
qqa7t3.1
qqa8t15.6+15.12
qqa9t217.7+231.15
qqa1t1.0+1.13
qqa16,qq5.5+163.16
e
_
[stop]
ba10,b1
_
c45:pab24td20
b21:paDt1
qqa5,hsc48
bsp-41,hhc46
pm(13e4)DX
ck10,grb20
it(14e4),ptb20
pab24XVd21
a1:qqa5,hsc48
is(14e4),grs42e13
arn(14e4)D1
nc40,hva2
c51:arn8e4,hse11
sk42e13,pa14e4
srn7a30,ac8e4
arn4e4,sr7a30
gr4e4,sr1e4
qq(13e4)t-1
hse5LT
vk(e17),qqne33
a2:
b22:bsp470,hva_
             _1
c46:arnb20,hsa10
psc2-1,hvc1
c56:ptb1t-1
a9:
b1:tl10,ck_
          0
a10:
b24:pmDX
hse3
ncn_X256
   0
gab24,hva9
ptb1,hve3
[stop]
c54:grn1b20,pp0
pab25t-1IZA
c48:grn2b20
a3:hsc1LZA
hv(s)LZA
a4:arnd19DXIZA
arn12a30,hva7
a5:hva7NQB
ncd43,hha6
bt(b21)t1NQA
hva4NQA
c57:hha6LQB
cad11,hva3
cad41,hva4
hva7
c55:hha6LQB
cad8,hva4
a6:hva7,cad10
hvna7XLQA
gm3b20,cad41
hsc43NQA
pm12a30,qqpd60
arnd17DX
arn7a30NQA
hsc47
arn(b10),pm3b20
a7:hsc47
bsp475,hva3
pm2b20,arn1b20
gm1b20,bsp469
ard19.3DVNZA
ard40.3DV
hrs1
ppp-36,hrs1
c47:
b25:ck-1XIOB
pm(b25)DX61LOB
a8:ckp-30,bsp481
ac1b20V
ck4,ac2b20
srn(b25)DV-57LOB
ppp6,hrs1
gab25XIZB
ppp6,hva8
e
_
[stop]
c43:qq(b21)t-1
c49:arn8e4IPA
hse11
sk42e13,hve5
bk=e31,i=0
_
i=e32
d54:tcharacter;
    _
d55:toff;
    _
d56:ton;
    _
d57:tcomment;
    _
d58:t)<improper>.;
    _
d59:tcode;
    _
d60:t| in string;
    _<
d61:tcompound;
    _
d62:tcopy overlap;
    _
d63:ttype in;
    _
d65:tpause;
    _
d66:tcopy;
    _
d67:tcopy medium;
    _
d68:tsum;
    _
d69:tstring;
    _
e32=i
e
_
[stop]
[stop]
d51=i
c50=65i
i=d50
ba15,b5
_
i=c50
c50:ck10,gab2
hva1LQA
arn(b2)t1IQB
pab2td96NA
a1:arn(b2),hva6
a2:hva9NQA
a3:hsnc1IZA
gab3,arn(b2)
a4:ck20,nc(b3)
a5:
b2:arn__t1
      -1
a6:gtr,hv__
         -1
a7:hsnc1IZA
gab3,arn(b2)
a8:ck20
b3:ca__,hva6
     -1
a9:hsnc1IZA
hva9LQB
a10:pab2tb20
grb20,hva14
[stop]
a11:hsna15IZA
hsna15IZA
hsna15IZA
hsna15IZA
hsna15IZA
hsna15IZA
hsna15IZA
hva14NQA
a12:arn(b2)IQC
a13:
b4:bs_,hrs1
     1
a14:pab4t1
hsc49
hva12,qqsd61
a15:hvc1LQA
arn(b10),ck-6
hra14NO
pab4,hvc1
c=c44+1,c9=c9-c,c18=c18-c,c19=c19-c,c20=c20-c,c21=c21-c
c22=c22-c,c23=c23-c,c24=c24-c,c25=c25-c,c26=c26-c,c27=c27-c
c28=c28-c,c29=c29-c,c30=c30-c,c32=c32-c,c33=c33-c,c34=c34-c
c35=c35-c,c36=c36-c,c37=c37-c,c38=c38-c,c40=c40-c
c41=c41-c,c44=c44-c
d6=c23,d7=c22,d8=c21,d9=c24
d10=c25,d11=c19,d45=c18,d46=c2-c
[stop]
d:qqd46.9+a9.19
qqd46.9+a10.19
d75:qq279.9+a12.19
qq276.9+a13.19,
qq272.9+a12.19
qqc44.9+a13.19,
qq277.9+a14.19
qq269.9+a13.19,
qq274.9+a12.19
qq270.9+a12.19
d76:qqc29.9+a12.19
d77:qq245.9+a3.19+2.29+6a11.39
qq144.9+a8.19+18.29+4a11.39
d78:qqc28.9+a3.19+5.29+4a11.39
qq130.9+a8.19+15.29+2a11.39
d79:qq130.9+a7.19+15.29+2a11.39
d80:qq256.9+a3.19+1.29+5a11.39
qqa8.19+15.29+a5.39
qqc30.9+a2.19+4.29+6a11.39
qqc20.9+a4.19+13.29+3a11.39
qqc40.9+a4.19+16.29+6a11.39
qq251.9+a8.19+18.29+6a11.39
d81:qq243.9+a3.19+15.29+7a11.39
d82:qqd34.9+a3.19+12.29+5a11.39
qqa8.19+14.29+a5.39
qqc22.9+a2.19+4.29+7a11.39
qq262.9+a8.19+20.29+4a11.39
d83:qq266.9+a3.19+1.29+4a11.39
qqd33.9+a4.19+15.29+6a11.39
qqc41.9+a8.19+9.29+4a11.39
d84:qqa7.19+15.29+a5.39
qqd44.9+a2.19+20.29+6a11.39
qqa8.19+c19.29+a5.39
qqd44.9+a7.19+20.29+6a11.39
[stop]
d85:qq106.9+a3.19+6.29+7a11.39
qq116.9+a8.19+14.29+2a11.39
d86:qq155.9+a7.19+1.29+4a11.39
d87:qqc18.9+a3.19+5.29+2a11.39
qq281.9+a8.19+15.29+6a11.39
d88:qq258.9+a3.19+6.29+7a11.39
qq109.9+a8.19+23.29+6a11.39
d89:qq137.9+a7.19+18.29+a11.39
d90:qq123.9+a3.19+5.29+5a11.39
qq260.9+a8.19+15.29+4a11.39
d91:qq282.9+a3.19+8.29+4a11.39
qq149.9+a4.19+23.29+3a11.39
qqa8.19+20.29+a5.39
qq196.9+a2.19+5.29+6a11.39
qq153.9+a8.19+18.29+4a11.39
d92:qq231.9+a3.19+8.29+5a11.39
qq265.9+a8.19+18.29+5a11.39
d93:qq198.9+a7.19+14.29+4a11.39
d94:qq157.9+a7.19+1.29+4a11.39
d95:qq200.9+a7.19+8.29+4a11.39
d96:qqd46.9+a14.19
d74:
[stop]
i=d50
qqc19.9+1d.19+c33.29+5.33+10.39f
qq58.9+d76.19+65.29+4.39f
qq59.9+d76.19+66.29+4.39f
qq60.9+d76.19+67.29+4.39f
qq61.9+d76.19+68.29+4.39f
qq62.9+d76.19+69.29+4.39f
qq63.9+d76.19+70.29+4.39f
qq64.9+d76.19+71.29+4.39f
qq65.9+d76.19+72.29+4.39f
qq66.9+d76.19+73.29+4.39f
qqt
hvc2,qqf
hvc42,qqf
qqc9.9+d.19+32.29+6.39f
hvc12,qq4.29f
qqt
qq57.9+d76.19+64.29+7.33+4.39f
qqd41.9+2d75.19+32.29+4.39f
qq19.9+d91.19+41.29+38.39f
qq20.9+d92.19+42.29+38.39f
qq21.9+d93.19+43.29+38.39f
qq22.9+d94.19+44.29+38.39f
qq23.9+d95.19+45.29+38.39f
qq24.9+d.19+46.29+38.39f
qq25.9+d.19+47.29+38.39f
qq26.9+d.19+48.29+38.39f
qqt
qqc25.9+d.19+30.29+4.39f
hvc17,qq16.29f
qqt
hvc2,qq16.29f
hvc14,qq16.29f
qqc26.9+d.19+28.29+2.33+4.39f
[stop]
qq10.9+d.19+58.29+38.39f
qq11.9+d.19+33.29+38.39f
qq12.9+d86.19+34.29+38.39f
qq13.9+d87.19+35.29+38.39f
qq14.9+d.19+36.29+38.39f
qq15.9+d88.19+37.29+38.39f
qq16.9+d89.19+38.29+6.33+38.39f
qq17.9+d.19+39.29+38.39f
qq18.9+d90.19+40.29+38.39f
qqt
qq28.9+d.19+32.29+38.39f
hvc15,qq16.29f
qqt
qqt
qqt
qq27.9+d.19+32.29+38.39f
qq1.9+d77.19+49.29+38.39f
qq2.9+d78.19+50.29+38.39f
qq3.9+d80.19+51.29+38.39f
qq4.9+d81.19+52.29+8.33+38.39f
qq5.9+d82.19+53.29+38.39f
qq6.9+d83.19+54.29+38.39f
qq7.9+d84.19+55.29+38.39f
qq8.9+d.19+56.29+38.39f
qq9.9+d85.19+57.29+38.39f
hvc2,qqf
qq67.9+d.19+27.29+3.33+4.39f
hvc11,qqd51f
hvc16,qq16.29f
qqt
hhb11,qq16.29f
hvc10,qqf
d52:
qqd46.9+d.19+32.29+4.39
qqd46.9+d.19+32.29+1.39
qqd46.9+1d.19+c36.29+10.39
[stop]
i=d51
qqc19.9+1d.19+c33.29+5.33+10.39f
qq278.9+d.19+32.29+1.39f
qq267.9+d.19+32.29+1.39f
qq268.9+d.19+32.29+1.39f
qqc24.9+d75.19+75.29+1.39f
qqc21.9+d.19+c37.29+1.39f
qq210.9+d.19+c35.29+1.39f
qq202.9+d.19+c34.29+1.39f
qqd35.9+d.19+31.29+1.39f
qqc27.9+d.19+78.29+1.39f
qqt
hvc2,qqf
hvc42,qqf
qqc9.9+d.19+32.29+3.39f
hvc13,qq1.29f
qqt
qq277.9+4d75.19+32.29+1.39f
qqd43.9+6d75.19+32.29+1.39f
qq47.9+d.19+9.29+3.39f
qq48.9+d.19+10.29+3.39f
qq49.9+d.19+11.29+3.39f
qq50.9+d.19+12.29+3.39f
qq51.9+d.19+13.29+3.39f
qq52.9+d.19+14.29+3.39f
qq53.9+d.19+15.29+3.39f
qq54.9+d.19+16.29+3.39f
qqt
qq68.9+d.19+32.29+4.33+1.39f
hvc17,qq16.29f
qqt
hvc2,qq16.29f
hvc14,qq16.29f
qqd42.9+d.19+29.29+1.33+1.39f
[stop]
qq38.9+d.19+26.29+3.39f
qq39.9+d.19+1.29+3.39f
qq40.9+d.19+2.29+3.39f
qq41.9+d.19+3.29+3.39f
qq42.9+d.19+4.29+3.39f
qq43.9+d.19+5.29+3.39f
qq44.9+d.19+6.29+3.39f
qq45.9+d.19+7.29+3.39f
qq46.9+d.19+8.29+3.39f
qqt
qq56.9+d.19+32.29+3.39f
hvc15,qq16.29f
qqt
qqt
qqt
qq55.9+d.19+32.29+3.39f
qq29.9+d.19+17.29+3.39f
qq30.9+d79.19+18.29+3.39f
qq31.9+d.19+19.29+3.39f
qq32.9+d.19+20.29+3.39f
qq33.9+d.19+21.29+3.39f
qq34.9+d.19+22.29+3.39f
qq35.9+d.19+23.29+3.39f
qq36.9+d.19+24.29+3.39f
qq37.9+d.19+25.29+3.39f
hhc11,qqd50f
qqc23.9+7d75.19+c38.29+1.39f
hvc2,qqf
hvc16,qq16.29f
qqt
hhb11,qq16.29f
hvc10,qqf
e
_
[stop]
di=d74
_
qq
de22=k-e14,e47=j
_
bk=e23,i=0
_
di=1e21
_
qqe2.9+1d74.19-e2.19+1.20+1.24+a31.39f
e
_
e
_
[stop]
bk=e22+e14,i=e16-e47,a34,b14,c5,d6
_
i=e16
dd2=e20-1
_
bk=e31,i=0
_
i=e32
d3:tidentifier overflow;
   _
d4:tpattern;
   _
e32=i
e
_
e16:
qq
qqi,psni
qqi,psni
qqi,psni
qqi,psni
qqi,psni
qqi,psni
qqi,psni
qqi,psni
qqi,psni
qqi,psni
qqi,psni
qqi,psni
qqi,psni
qqi,psni
qqi,psni
qqi,psni
qqi,psni
qqi,psni
qqi,psni
qqi,psni
qqi,psni
qqi,psni
qqi,psni
qqi,psni
qqi,psni
qqi,psni
qqi,psni
qqi,psni
[stop]
c1:qq1.19-1.39
c2:qq1.9-1.39f
c3:m1
   _
c4:m67a
   _
c5:m10
   _
a1:pmn(e1)X1IZC
hse2LA
gab1
b1:bsVt56NT
ps(b1),hva34
psa1-1,hve3
b2:ppnd1,ps(b1)
a2:pm(e1)X1
hse2LA
gab3
b3:bst66NT
hvna4X
ck10,mlc4
hva2XLZ
b4:bsp-510td_____
           _2-512
psa12,hve5
gmpVNZA
a3:cl19XVIZA
ppp1,hva2
ck-19,uda6
hva2LA
a4:pm512DXVNZA
ca0,hha5
hva3XLZA
gmp,ac(b2)
ppp1,itp
pt(b6),arnc1
a5:hva7,pmc2
a6:gr(b6)XMZA
a7:pm(e1)XD-1IPB
[stop]
bss-28,udse16-28
ps(se16)NZ
bss-511,hha11
gsb5,it(b6)
pt(b5)VLZ
a8:it(b6),pa(b5)
pm(b6)DX
ps(b6)V-1LT
psa12,hve5
its-512,ptb4
gpb2,psa1-1
a9:hve3,arn(b5)
a10:gab5VLT
a11:hva8,gsb5
b5:arn-1IPA
b6:cmd_,hva10
     _2
hva14LPC
gpb7VNPC
da12=i-1
_
hva10,qqnd3
ck10,gab8
a13:
b7:arnt-1ITA
b8:srt-1
hha9NZ
hva13NTA
a14:pm(b5)DX
psa1-1,hve3
[stop]
a15:panb12,uda21
grn(b6),hva24
a16:arn(e1)t1IOA
hse2LA
gab13,ca13
srnc3,hvs1
pp(b13),it501
bsp445,hvs
bsp512t501
arnb11,hhs
a17h:hhs1,ns(b11)
tks40,hva23
a18:tk2,arb11
tk1,gab11
itp10,pp(b11)
it(b12),bsp-40
a19:hsa16NZ
hva16,hse5
a20:pm(b6),qqsd4
a21:qqn(e1)Xt-1
a22h:hva31,uda21
b11:ns,cls40
a23:
b12:ck,ac(b6)
nt(b11),qq(b12)
a24:panb11X
a25:hsa19,hha26
hva19,hva20
a26:hva27,hsa18
hha17,hh1a19
a27:hsa28,hha22
hva19,hha22
a28:
b13:arnDt-57
ck10,mlc5
a29h:hva19,ns(b6)
itsd2,pa2e4
it(b6),pae16
ntd1,it(b2)
pa3e4,hhne29
[stop]
a30:arn(e1)t1LZA
hse2LA
gab14,ck10
b14:pm__DX
      -1
hse3
ncn_X-256
   0
a31:pmr-1,hva30
a32:hva1,psi
arn(e1)t1
hse2LA
hve3NT
tk-30,sce4
tk30,psa1-1
a33:hve3,arnc3
ace4,hva1
a34:bss-1014,ps1014
arn(sd5)D
pssd6,hve3
qq264,hha32
qq283,hha29
qq77,hha33
qq78,hva30
qq79,hva30
qq80,hva30
qq80,hva15
dd5=i+9,d6=d5-1
_
d1:qq
de22=k-e14,e47=j
_
bk=e23,i=0
_
i=2e21
qqe16.9+1d1.19-e16.19+2.24+a1.39
e
_
e
_
bk=e22+e14,i=29e16-e47,a16,b8,c3,d7
_
i=29e16
bk=e31,i=0
_
i=e32
d1:tstd proc format;
   _
d2:tzero;
   _
d7:tdouble std proc;
   _
e32=i
e
_
[stop]
a:hse5
hhr1,qqnpd2
qq,ud14e4
lynr-1,ud16e4
a1:arnfb7,srfb7
grfb8
ncn(b8),hva
hsne3
qqr2,arnb1
psr,hhe29
cln-30,acb6
a2:pp0,hsa15
grb7,gab1
b1:psd4
bss-513t-457
hva6
hva4LA
pp1
a3:hsa15
bsp-5,hva6
grpb7,ppp1
hva3NT
pmc1VIPB
a4:pmc2IPB
bss-28,udse16-28
ps(se16)NZ
bss-511,hha9
a5:arn(b5)D1
hva2NT
a6:hse5
hva13,qqsd1
a7:arn(b2)
a8:gab2VLT
a9:hva5,gsb2
b2:arnIPA
cmb7,hva8
hva11LPC
pab3Vb7NPC
hva8
ck10,gab4
a10:
b3:arnt+1ITA
b4:srt-1
hva7NZ
hva10NTA
a11:pm(b2)IPA
b5:arn0DVt1NB
psa12,hve5
pm(b2)DM
hse3IPB
acn(b2)XMPC
psa2-1,hve3
a12=i-1
hva5,qqsd7
[stop]
a13:pp0,psi
a15:hsnd5IZC
ar2DLA
ar1DLB
acb8,arne16-1
b6:bt-1Vt-1LZA
hse5
hrs1,qqne46
bsp,hva6
arne16,hse3
arn8e4,hse11
lk42e13,arnb8
hse5NZ
hhne29,qqne45
b7:qq1t256
qq
qq
qq
qq
qq
b8:qq
c1:qq1.19-1.39
c2:qq1.9-1.39f
c3:m1
   _
d4:qq
d5:
de22=k-e14,e47=j
_
bk=e23,i=0
_
i=3e21
qqa.9+d5.19-a.19+3.24+a1.39
e
_
e
_
d e49=3      ; tape number := 3;
_
[After i follows STOPCODE, SUMCODE and a sum character]
       _
i[stop] [sum] [047]  T2
_
s
_
[stop]