DataMuseum.dk

Presents historical artifacts from the history of:

RegneCentralen GIER Computer

This is an automatic "excavation" of a thematic subset of
artifacts from Datamuseum.dk's BitArchive.

See our Wiki for more about RegneCentralen GIER Computer

Excavated with: AutoArchaeologist - Free & Open Source Software.


top - download

⟦8ab9ab125⟧ Bits:30000592 22.11.67 T2 GIER ALGOL 4 9 GSL ORDER NO: 472.11 udgår, 8-hole paper tape

    Length: 19681 (0x4ce1)
    Description: Bits:30000592 22.11.67 T2 GIER ALGOL 4  9 GSL ORDER NO: 472.11  udgår
    Types: 8-hole paper tape
    Notes: Gier Text

GIER Text (HTML)

[22.11.1967                                                 T2    Gier algol 4
                                                           9]
[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=9 ; version number _
<e52-e50, ; if version number T2 gr max version number __ __
; then the following definitions are loaded; ____ ___
d e61=1 ; define version number T1 and L1 _
d e62=e52 ; define version number T2 _
d e63=3 ; define version number T3 _
d e64=4 ; define version number T4 _
d e65=5 ; define version number T5 _
d e66=6 ; define version number T6 and L2 _
d e67=7 ; define version number T7 and L3 _
d e68=8 ; 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 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] [056] T2 _
s _
[stop]