|
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 - download
Length: 27849 (0x6cc9)
Description: Bits:30000553 GSL 472.29 T5(25) 14.04.70
Types: 8-hole paper tape
Notes: Gier Text
[14.4.70 T5 Gier algol 4
25]
[Here follows STOPCODE and CLEARCODE][ s t o p ] [ c l e a r ]
<e49-4, <-e49+6, ⨯ ; test tape number
i wrong tape
_
s
_
;
> ;
d e55=25 ; version number
_
<e55-e50, ; if version number T5 gr max version number
__ __
; then the following definitions are loaded;
____
d e61=21 ; define version number T1 and L1
_
d e62=22 ; define version number T2
_
d e63=18 ; define version number T3
_
d e64=24 ; define version number T4
_
d e65=e55 ; define version number T5
_
d e66=20 ; define version number T6 and L2
_
d e67=23 ; define version number T7 and L3
_
d e68=19 ; define version number T8 and L4
_
d e50=e55
_
> ;
[ s t o p ]
bk=e22+e14,i=e16-e47,a32,b20,c120,d50
_
di=e16
_
dd37=-e20
_
d10=124,d11=70,d12=71
d13=123,d14=121,d15=97
d16=67,d17=102,d18=104
d19=103,d21=45,d22=36
d32=56
d45=86,d46=112,d47=101
d48=116
a:qq
qq
qq
qq15.9+1023.25
qq97.9+1.23
qq1.9
qq4.9+4.23+4.39
qq37.9+5.23+2.39
qq1.39
qq1.19
qq2.39
qq57.9+3.23
qq-3.9+6.23
qq33.9+1.23
qq
qq-3.3-1.9-2.19-59.29+1.39+58.9
qqf1.23,qq
qq40.29
qq_.39
0
qq21.12
qq320.39
qq-1.39-1.3
[ s t o p ]
[ s t o p ]
ppd6,psi
c:
b1:pmnd_VXITA
_7
pmd6V
hvc5LA
hv(c)Dt-1LZ
a7:gab2,cl10
gr(c)VNZ
a8:qq(c)t-1
b2:pmn_DVXt200LTA
0
hva1IPC
pm(b2)DVXt200LT
c1:hve3
hva2LT
c2:
b3:bs_
0
qq(b2)t512
c3:hsc9
pm(b2)DX
c54:hse3
c4:pmpVXNZB
arn16aVIOB
ppp-1
hrs1LC
pi(p1)t-65
pab5td7NC
hrs1NTB
gta4,udna5
b4:
a4h:ns_,cks_
0 0
sca,hrs1
c5:pmn(e1)Xt1
hse2LA
sr512DVLT
pab3Vt0
pab3t1
gaa6
a6:pmn_Xtd1ITA
0
hv(c)DVt1IRA
a1:pmpXIQC
pmp-1
pi16t-17LC
pi32t-33LQC
hv(b2)tc
[ s t o p ]
a2:pm(b2)td3
c6:xrn(b1)t1ITA
hva7
c7:pmn(b1)XITA
gab2,hvna8
c8:pmpVX
c9:arnp,tk14
hva9LC
pi(p)t-49
mb3a,ga14a
nc3,hva10
tk16,nc(b9)
hva10LO
pa14at2IPB
pa14at1LO
a10:pmp,tl-20
cln-10,pmp
a11:hse3LPA
cln-10
hse3LPB
arn14a,ca11
ppp-1,hvc8
hve3
a9:pan14aXt8
arnp,cl30
hse3
cln-10M
hse3IPC
cln-10,hva11
c10:
b5:pmd_XITA
_7
hrs1LA
ca1,it512d10
pab2td10
gpa12,pp(b5)
hsc11
a30:gmpMB
hsnc3IZB
qqVNTA
<e27
papt609
⨯
scpMA
>pab5td7M
a12:pp_,hrs1
0
[ s t o p ]
c11:arna,nka13
a5:ar256D
a13:tk_,gra
0
b6h:it(a13)t_
0
pt4a,pm4a
it(a13),bs(b7)
b7:qq_t-1
0
hrs1
c12:pa2a,hvc15
c13:pa2aVt1
c14:pa2at-512
c15:hsc10
gpa14,gpb8
b8:pmn_X
0
hv(b8)Dt-1LB
ck20VLA
a14:pp_,hrs1
0
gtr1,pp(b8)
it(2a),bs_
0
pab2Vtd11
hv(b8)Dt-1
hsc3
hsc11
ppp1,uda30
pab2td12
hsnc3IZB
hv(b8)Dt-1
c16:qqIPC
gmpMPC
grp-1MQC
qq(b5)Vt1NPC
qq(b5)t-1NQC
hrs1
c17:hvc4LZ
pab2td13
hvc2
[ s t o p ]
c18:arn5a,hva15
c19:hvna15
c20:pm514DVX
c21:pmn(b3)DX
a15:grp1M
ppp1,gpb5
hrs1
c22:pm6aV
c23:pm7a
gmp1MA
ppp1,hrs1
c24:pmp,gia28
hvc4NC
hsc10
pab2td14
a28:pi_,hvc2
0
c25:hvc4NQC
pab2td14
hvc3
c26:ca4,hvc37
pab2td15
hvc3
c27:pmd16DXNQC
hvc54NQC
hsc10
pab2td11
hvc3
c28:hsnc24IZB
hrs1LQC
can(b3),hvc10
hsc4
hsc19
hvc10
c29:ptnb10Vtd17
c30:ptb10Vtd18
c31:ptb10td19NZ
c104:arnp,ck-10
b9:ca_,hva16
1
pab2td15
hsc3
hsc22
a16:
b10h:pab2t_
0
hvc3
[ s t o p ]
c32:qqnIZB
c33:pmnd8VX
c34:pmnd9XIZB
b11:ck_,gab2
0
hvc2
c56:nc37NPA
c35:pab19Vt12
pab19,hvc4
pab11t20IZA
hvc4NQC
arn(b5),ca1
hsc10
pab11Vt10LZA
qqV
hvc4LA
pab2Vtd11NRA
pab2td45
pab11,hvc3
a17:arn8a,ace4
pmd46DX
hse3
c36:pmn(e1)Xt1
hse2LA
cad20,hva17
qq(e1)t-1
sr512DLT
gar1,itd1
pm_,hrs1
0
c37:ppp-1,hrs1
c38:pmn(e1)Xt1
hse2LA
hve3
c39:pmn(e1)Xt1
hse2LA
ga1a
c40:pmn(e1)Xt1
hse2LA
ga2a,hrs1
c41:hrns1IZB
c42:pab16Vt-5
c43:pmd21DVXNQC
c44h:hrs1,hse5
hve3,qqne34
c109:pab3Vt1
c46:hvc16NC
hvc
[ s t o p ]
c47:pma,gmp1
pm(b7)D
gmp2M
arnb6,gtp2
it(2a),pab7
it(2a)t-1
pab4,it(2a)
ptb6,ppp2
qq(b9)t-1
pm512D
gma,hrs1
c48:gma,gtb6
pm(b7)Dt-2
gab7,ck10
gab4,ppp-2
hse3X
pm(b9)DX
qq(b9)t1
hve3
c49:panb2td22IZB
ppp-1,hsc3
pm9e4,gm18a
it(e12),pab17
ppp1,hhc-1
c50:hsc11
gmp1MB
ppp1,hvc
c51:ca55,hvc
c52:ca55
hvnc29IZB
acnpMB
c45:grn(b1),hvc
c53:ppp1,hsc11
tl-20,tl20
gmpMB
hsc8,qqc-1
pmd12DX
hve3
c55:arn8a,ace4
hrs1
[ s t o p ]
c57:pmd25VLQC
pmnd26
gmd27,bs(b3)
arnfpLQC
pad27tc16-cLT
hsc28
pmnp-1XIZB
mb21a
grp1MB
grp2MB
grp3MB
c58:ppp3,hvc
c59:arnp-2,grp-1
grp1MB
cln-20,gtp-1
ar9a,gtp1
ppp1,hvc
c60:grnp1VM
c61:arn9a,acp1
ppp1,hvc
c62:arnp-2,sr9a
grp-1
hsc36
hvcNB
cad28,pmnd29
pmd30NZ
gm(b1),hvc
c63:hvcNPA
arnfp,tkf-29
a18:grp,hvc45
c64:hvcNPA
nkf39,grfp
grn(b1),hvc
c65:hvcNPA
srnfp,bs(b3)
grfp,hvc45
srnp,hva18
c66:
b19:pi__t-13
-1
hva32LT
pmd32DXNQB
hse3NQB
qq(b19)Xt4NQB
pab11NQB
ca55,hvc30
grn(b1),hvc33
a32:pmd31,gm(b1)
qq(b19)Vt-8LQA
pa(b1),hvc
hvc23
c67:bs(b11)t10
pab19
hvc
[ s t o p ]
c68:ck-10,ca(b9)
hvc7
c69:pa(b1),hvc
c70:can(b3)LPC
hvc24
arnfp-1VNRA
srnfp-1
arfp,grfp-1
a19:ppp-1,hvc45
c71:arnfpVLPC
hvc24
mkfp-1VNRA
dkfp-1
grfp-1,hva19
c72:sr10aVLQC
hvc111
pmd33IZA
sr8aNZ
hvc111NZ
tl59XLZA
gm(b1),ppp-1
pab3t1
pmd34,hvc6
c73:pab12Vt2
c74:pab12t4
c75:
b12:pmn_Vtd35NC
0
pm(b12)Vtd36LZ
pmd2VNZ
pmd2NQC
pab12,hvc6
c76:ca0V
c77:ca1
hsc10NQC
hsc36
hvc45NB
hvc
c78:hvc7LQC
pa(b1),hvc24
c79:bspd37,hhc44
ppp1,arn2a
ck10,ar11a
qqVNRA
grpVMA
grpMB
it(1a),ptp
hrs1
c80:hsc36
papVt55
c81:arn12a,acp
hvcLB
pmd38,it1
gm(b1),hvc8
c82:pm1a,nt(2a)
pa1a,gm2a
hsc79
papt59
pap-1t58
hvc13
c83:papt55
hsc36
hvcLB
hsc29
hvc22
c84:bspd37,hhc44
ppp1,grnp
c85:arn2a,ck-10
ar1a
nt__,ck60
20
acpMC
c87h:hvc,hse5
qq,qqna21
c86:qqn(p-1)Vt1LQC
pmd41VNQC
nc59,hva31
hvcLT
nc59,hvc6
arn9a,scp-1
tl9,tln10
sr9a,ar10a
scp,hvc
a31:ck-10,ca1
arn8a,scp
hvc
[ s t o p ]
bk=e31,i=0
_
i=e32
a21:tspill;
_
e32=i
e
_
c88:itp6,pab13
ppp10
bspd37,hhc44
grnpM
arn13a,pm8a
grp-9MB
grp-8MB
grp-4MB
grp-1MB
gmp-3MC
grnp-6MC
arn1a,ck-10
gtp-4,sr9a
gtp-1,gtp-9
gtp-8,it(2a)
pab14,hvc
c89:it(2a)td4
pab15,hvc
c90:gmp-9MC
srp-1,ar8a
grp-2MC
grp-4MC
grp-7MC
arn9a,acp-3
hvc93LPC
pmp-3
gmp-7MB
grnp-4M
grnp-2,srn8a
acp-1VLPB
grp-2
pmd39,hvc6
c91:arn21a,mbp2
hvc21LC
grp-6MA
hvc21
c92:pmp-7IQC
gmp-5MQC
c93:ppp-2,hrs1
[ s t o p ]
c94:mlnpVLPC
hvc
tl39,grp-1
ppp-3,hvc45
c95:mlnpVLPC
hvc
tl39,arp-2
grp-1,ppp5
grn(b1),hvc
c96:grp1MB
pab2td10
hvc3
c97:grp2MB
pab2td10
hsc3
ppp9,hvc
c98:arnd40,pmp-3
tk10NA
ppp-3NA
ppp-3,pmp
hvc6XLC
c99:arn9a
b13:pp_,scp-5
0
b14:bt_t-1
0
b15:pm_,hvc6
0
ppp-6,hvc
c100:srn2a,mtb18
b18:qq__,hse3
-1
a22:pm1e20Xt-1
hva22LZ
ntd6,it(a22)
pa2e4,hhne29
c101:bt_t-100
0
par-1,hve3
hsc102
arn2a,hvc101
c102:it(2a),paa23
a23:can_,hrs1
0
pm(e1)Xt1
hse2LA
hse3
hv(a23)Dt-1
[ s t o p ]
c103:hrs1LQC
ca57,hrs1
pmd42,hvc6
c105:hsc23
b16:it__t1
-5
ptp,hvc
c106:hvc7NQC
pa(b1),hvc
c107:nc55,hvc
ptb10td47
hsc104
pmd44,hvc6
c108:nc59,hvc45
ck20,ar15a
grpMC
tln19,tk20
scp,hvc
c110:arn9e4,sr18a
pi(16e4)t-17
tl-1LPB
ar4e4LT
pm(e12)DX
bs(e12)t123e13
sr41D
b17:srD
bs(b17)t123e13
ar41D
tk-20,ml17a
mkn19a,sr20a
hvne3NT
ar20a,ck-10
hve3
c111:pab18,hrs1
[ s t o p ]
<c111-c-511
iactionstoobig
_
>
d7:qq,qq
qq
qq
qq
qq
c1=c1-c
c2=c2-c,c3=c3-c,c4=c4-c,c5=c5-c,c6=c6-c,c7=c7-c
c8=c8-c,c9=c9-c,c10=c10-c,c11=c11-c,c12=c12-c,c13=c13-c
c14=c14-c,c15=c15-c,c16=c16-c,c17=c17-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,c31=c31-c
c32=c32-c,c33=c33-c,c34=c34-c,c35=c35-c,c36=c36-c,c37=c37-c
c38=c38-c,c39=c39-c,c40=c40-c,c41=c41-c,c42=c42-c,c43=c43-c
c44=c44-c,c45=c45-c,c46=c46-c,c47=c47-c,c48=c48-c,c49=c49-c
c50=c50-c,c51=c51-c,c52=c52-c,c53=c53-c,c54=c54-c,c55=c55-c
c56=c56-c,c57=c57-c,c58=c58-c,c59=c59-c,c60=c60-c,c61=c61-c
c62=c62-c,c63=c63-c,c64=c64-c,c65=c65-c,c66=c66-c,c67=c67-c
c68=c68-c,c69=c69-c,c70=c70-c,c71=c71-c,c72=c72-c,c73=c73-c
c74=c74-c,c75=c75-c,c76=c76-c,c77=c77-c,c78=c78-c,c79=c79-c
c80=c80-c,c81=c81-c,c82=c82-c,c83=c83-c,c84=c84-c,c85=c85-c
c86=c86-c,c87=c87-c,c88=c88-c,c89=c89-c,c90=c90-c,c91=c91-c
c92=c92-c,c93=c93-c,c94=c94-c,c95=c95-c,c96=c96-c,c97=c97-c
c98=c98-c,c99=c99-c,c100=c100-c,c101=c101-c,c102=c102-c,c103=c103-c
c104=c104-c,c105=c105-c,c106=c106-c,c107=c107-c,c108=c108-c,c109=c109-c
c110=c110-c,c111=c111-c
[ s t o p ]
a=-512,b=-200,d=-400
d2:qqc24tc17
d35:qqc17tc4.9+53b.19
d36:qqc4tc10.9+125d.19
qqc17tc4
qqc4tc10.9+77d.19+c69.29
qqc17tc4
qqc4tc10.9+76d.19+c69.29
d3=i+112
d27:qq_
0
qqc32tc49.9+29b.19+31b.29
d25:qq0tc24.9+c17.19+c4.29
d26:qq0tc24.9+c17.19+75d.29
<e27
d29:qq_atc20.9+c40.19
6_
d30:qq_atc20.9+50b.19
6_
⨯
d29:qq_atc20.9+c10.19
6_
d30:qq_atc20.9+59b.19
6_
>
qqc28tc37.9+c17.19+7a.29
qq100dtc58.9+99d.19+8a.29
<e27
qqc93t122d.9
qqc24tc93.9+122d.19
⨯
qqc93t122d.9+63b.19
qqc24tc93.9+122d.19+62b.29
>
qqc64tc24.9+69b.19+c18.29
qq74dtc22.9+c33.19+37b.29
d31:qqc33tc25.9+52b.19+c67.29
qqc10tc16.9+c41.19+82d.29
qqc16t81d.9+66b.19
qqc16tc41.9+83d.19+84d.29
d33:qqc41t72d.9+72d.19+c21.29
d34:qqc41tc24.9+c10.19
[ s t o p ]
d4=i-1
qq30at127d.9+c99.19
qq30at90d.9+c99.19
qq30at89d.9+c99.19
d38:qqc37tc23.9+0b.19+14b.29
d39:qqc24tc17.9+c17.19+c91.29
d40:qq24at70d.9+c37.19+71d.29
qq70dt71d.9+c37.19
qqc94tc24.9+c37.19+c96.29
qqc95tc93.9+c24.19+c97.29
qq28atc95.9+c27.19+29a.29
qqc94tc27.9+44a.19+c96.29
qq44at122d.9+c97.19
qq96dtc93.9+c37.19+123d.29
qqc16tc24.9+106d.19+c19.29
qqc24t61b.9+c19.19
qqc8tc38.9
qqc41t102d.9+c41.19+70d.29
d8:qq71t80.9+124.19
d9:qq91t92.9+127.19
d41:qqc4tc23.9+c41.19+124d.29
d42:qqc24tc23.9
qqc51tc31.9+c22.19+c52.29
d44:qq74dt58b.9+37b.19+c19.29
qq43at42a.9
qqc109t43a.9+c42.19+c13.29
qqc35tc105.9+c33.19
qq93dt48b.9
qq44btc21.9
qqc78t108d.9+64b.19+60b.29
qq65bt95d.9
[ s t o p ]
d1:qqfc8tc37.9+c23.19+c60.29
qqc1tc37.9+14b.19
qqc38tc40.9+11b.19+c47.29
qqc38t109b.9+c48.19+16b.29
qqc38t109b.9+c48.19+17b.29
qqc40t10b.9+c47.19
qqc48t18b.9
qq30bt
qq110bt
qqc49t31b.9
qqc14t21b.9
qq0bt32b.9
qq0bt33b.9
qqc50t21b.9
qqfc51tc31.9+57b.19+c53.29
qqc35t1a.9
qqc35t1a.9+26b.19+31b.29
qqc35tc32.9
qqc43tc24.9+23b.19
qqc43tc24.9+27b.19+31b.29
qqc35tc34.9+c49.19+31b.29
qqc57t122d.9+128d.19+94d.29
qq0at22b.9
qq0at28b.9+31b.19
qqc4tc9.9+c4.19+34b.29
qqc59tc16.9
qqc46tc24.9+122d.19+c21.29
qqc27t44a.9+c61.19+c21.29
<e27
d49:qqc62t_a.9+50b.19+c23.29
6_
⨯
d49:qqc62t_a.9+c20.19+c10.29
6_
>
[ s t o p ]
qqc63tc24.9+68b.19+c19.29
qqc64tc24.9+69b.19+c18.29
qqc16t10a.9+c16.19
qqc10t126d.9+c21.19
qqc24t55b.9+68b.19+c19.29
qqc24t65b.9+c21.19
qqc65tc10.9+125d.19+c21.29
qqc4t
qqc24tc38.9+32b.19
qqc26tc38.9+32b.19
qqc24tc38.9+33b.19+c21.29
qqc26tc38.9+33b.19+c22.29
qqc43tc24.9+22b.19
qqc56
qqc66t11a.9
qqc68t98d.9+c26.19+42b.29
qqc46tc70.9+122d.19+c21.29
qqc16,qqc70.9+123d.19+c21.29
qqc46tc27.9+44a.19+c21.29
qqc46tc71.9+72d.19+c21.29
qqc16,qqc71.9+73d.19+c21.29
qq13at14a.9+75d.19+c21.29
qq13at15a.9+75d.19+c21.29
qqc72t41a.9+c23.19+113b.29
qq41atc23.9+111b.19+c111.29
qqc16tc75.9+22b.19
qqc75t23b.9
qqc73t0.9+24b.19
qqc16tc75.9+23b.19
qqc75t22b.9
qqc73t0.9+25b.19
qqc16tc75.9+c19.19
qqc16tc75.9+54b.19+c19.29
qqc73t51b.9+54b.19+c19.29
qqc75t54b.9+c19.19
qqc75tc19.9
qqc74t49b.9+c19.19
[ s t o p ]
qqc46tc24.9+78d.19+c21.29
qqc46tc24.9+79d.19+c21.29
qqc46tc24.9+47a.19+c21.29
qqc39tc79.9
qqc39tc79.9+c39.19+c82.29
qqc39,qqc79.9
qqc39tc15.9+c79.19+c83.29
qqc14tc39.9+c79.19+c80.29
qqc12tc39.9+c79.19+c81.29
qqc39tc84.9+c39.19+c85.29
qqc1tc93.9+14b.19+c22.29
qqc4tc9.9+c4.19+35b.29
qqfc86t33a.9+c4.19+19b.29
qqc39tc88.9+c40.19+c89.29
qqc90tc92.9+25a.19+26a.29
qqc90tc24.9+124d.19+27a.29
qqc98tc99.9
qq34at38b.9+124d.19
qq34at39b.9+124d.19
qq121dtc38.9+c38.19+40b.29
qq31bt
qqc40tc102.9+c100.19
qq46atc21.9
qqc10t46b.9+c21.19
qqc10t47b.9+c21.19
qqc78t31a.9+64b.19+32a.29
qqc24t63b.9+43b.19+45a.29
qqc76tc109.9+c24.19+c18.29
qqc77tc25.9+c19.19
qqf39atc14.9+85d.19+c21.29
d20=i-d1
qqc55t112b.9
qqc14t
qqc10t125d.9+63b.19+12b.29
qqc103t33a.9+c4.19+20b.29
[ s t o p ]
qq3bt0b.9+20b.19
qqc38t15b.9+c21.19
qqc38t15b.9+c22.19
qq0bt15b.9
qqc40tc101.9+114b.19
qqc10t125d.9+63b.19+13b.29
qq41btc21.9
qqc9tc37.9+c23.19+c42.29
qqfc108tc24.9+88d.19+c21.29
qqc35tc105.9+c33.19
qqc107,qqc35.9+c105.19+c33.29
qqc24t62b.9+c105.19+124d.29
qqc24t
qqc107tc106.9+c4.19+87d.29
qqc24t62b.9
qqc110t115b.9
d28=i-d1
qqfc52tc19.9+c10.19+c16.29
d6:qq
a25:grn1e20t-1M
bs(a26),hva25
pi0,hvc-1
a26:pmd48DX
hse3
pma29,pi(16e4)
gm0MA
ptd49t9aNQB
pad29t9aNQB
pad30t9aNQB
psa25-1,hvc40+c
a29:hhc87+c,hhc87+c
a24:qq
e22=k-e14,e47=j
bk=e23,i=0
_
i=12e21
qqe16.9+1a24.19-e16.19+7.24+a26.39
e
_
e
_
[ s t o p ]
bk=e22+e14,i=e16-e47
_
di=e16
_
ba9,b4
_
arnfc17-3X
gara5,tl48
hvra4LZ
hhc64LT
grc50,grc51
arnra6,acc50
src51,dkc50
grc50X
mknc50,grc51
itra6,panr1
arXt1
grnc17VLA
mknc51,hvr-2
mknc50,arra5
nkf11,mkfc17-4
gmc17-1,pmc17
bs(c17-1)t9NZ
hhc64NZ
tl(c17-1),gara3
tl10,cl-2
sr128DX
gmc17,mknc17
pm384DX
mkra8,grc51
grc52,arnra7
mkra9X
mknc17,scc52
arc51X
mlnra6,dlc52
a3:nkft2
a4:grfc17,hhc5
a5:qqt512
a6:181/19/819/254
1023/579/325/663
1023/433/591/509
1023/39/118/823
1021/117/369/224a
a7:266/172/574/725
a8:73/797/660/37
a9:8/524/902/710
[ s t o p ]
pmc53,gmc50
arnc17-4ITA
annc17-4
b1:hvrb2XNZ
arnfc50VNTA
arnfc53,dkfc50
grfc17,hhc5
b2:cln-1,gmc52
hhrb3LZ
arnfc17-3,mkfc50
b3:grfc50,arnfc17-3
mkfc17-3,grfc17-3
arnc52,hvrb1
e[ s t o p ]
_
ba12,b10,c11,d5
_
a:qq
qq_
2
qq
c2:gr2a,sr5e4
ck-15,gaa3
tk10,ck-5
gaa4,itd3
a3:arn_,ck(a4)
0
hrs1NO
qq(b1)t-1
ar512D
a4:ns_,cks
0
gr(a3),arn2a
sr9e4VNQA
sr5e4,tl-1
ar4e4LT
ar5e4
b2:grp_Xt41MA
0
pm2a,gma
hsc11X
is(b2),lks1
hrs1
c1:ppd,gpb4
b:can_,hvc3
0
gpb3,nsp
ppsd1,pab2
b4:arn_t41IPA
0
hsc2LPA
hvr-2LPA
b1:can_,hva2
0
arna,sr6e4
arn5e4VNT
arna,ar10e4
psb1-1,is(b2)
its512,bspd2
gra,hvc2
a2:grn(b2)Vt41M
a1:is(b3),sks1
b3:arn_t41
0
hhc1NA
qq(b)t-1
psa1-1,hvc11
[ s t o p ]
c3:arn10e4,ac4e4
ar6e4,gra
ar10e4,gr9e4
arn(e1)t1
hse2LA
pa1aVNT
mt-1D
gab5,ar1a
ck10,sca
sc4e4,sc9e4
nt(1a),qq(13e4)
arn4e4,sr1e4
hse5LT
hvr1,qqne33
c4:btn(1a)t-1
arna,ar10e4
hha12LZ
gra,hsc11
ske_____t40
_16-40
a12h:hvc4,grn2a
qqr2,arna8
psr,hhe29
gm1aV
a6:qq(e1)t-1
a7:arn1a,sra11
a8:qqne16NT
ara11,sc1a
hva10LZ
ard4DX
vk0,hse16
ac2a,pp-40
hse5NZA
hvr1,qqne46
b5:can0,hva7
pmn(e1)Xt1
hse2LA
a9:bsp-439,hva6
ppp40,it1
nc0,hva9
arna,ar10e4
gra,hsc11
skpd4
hv(b5)Dt-1
a10:arn2a,
hse5NZ
hhne29,qqne45
a11:qq480.19
c11:hve11NKB
gre13,gm41e13
bt___t-55
474
hse9
bs(r-2),par-2
hse8X
hve11
[ s t o p ]
d=i-40,d1=d+d+247,d4=i
d2=758,d3=e20-29
c5:grnd3t-1M
bs(r2)t-1
hvc1
a5:qq-1,hvc5
qq1.39
c6:pi(16e4),ps30
pss-1,grnsd3
bss,hvr-1
arn9e4,sr1a5
hvr4NQA
sr5e4,tl-1
gr1e4,tk1
sr8e4,mta5
gra,gr2a
arn1e4,ck-10
gab,gab1
gac7
c7:can_,hvc8
0
arn6e4,sr2a
sr10e4
arn5e4VLT
arn2a,ar10e4
gr2a,sr5e4
ck-15,gab6
tk10,ck-5
gab7
arn512D
b7:ns_,cks
0
b6:ac_td3
0
hv(c7)Dt-1
c8:arn10e4,tl-1
gr10e4LQA
arn5e4,ar1e4
sr10e4,gr8e4
pmb9,gme35
hvc5
b9:srn10e4,ac1e4
d5:qq
de22=k-e14,e47=j
_
bk=e23,i=0
_
i=13e21
qqe16.9+1d5.19-e16.19+8.24+3.29+c6.39
e
_
e
_
e
_
bk=e22+e14,i=e16-e47,a131,b50,d70
_
i=e16
d27=40
d0=-d27-d27-d27-d27+3
d31=c4-c26
d54=163e13
d55=d54-d27
d56=-d55-1
b1:qq
b3:ps(),
b8:qq-1.9+d56.19+_________,
1.29-1.39
b12:qq
b13:qq,hsc15
b26:qq,
b43:qq
[ s t o p ]
[ s t o p ]
a:hsa14,psa21
a1:hsa20
a2:acb1,hva3
a127:bsp5
hsa11
a3:arnb1IPC
hva4NTB
hva87NRA
gib26,arnb26
mb60DIPA
ca16,hva86
ca4,hva86
pi16t-17LQB
arn(b2),ck-10
pi40t-43
arb1,hva109
a86:hsa48LRA
arnb1
a87:pi2t-35IQC
it-1
a109:
b2:grd__MPC
_54
ppp2,hrs1
a4:hsa48LRA
gr(b2)t-1MPC
arn(b2)IQC
ppp4,hrs1
[ s t o p ]
a5:hsa16
gab4,ck10
gab1,arnb3
nc(b4)
hsa6
qq(b5)V3NTB
qq(b5)t1
hsa10
b4:it,pab3
ppp1NRB
pmr
hsa3IRB
pmfrIRB
hrs1
a6:hrs1XNRB
pi8V-12LRA
pin2V-16
arn(b2),ck-10
arb3,ppp1
it-1LRA
gr(b2)XMQC
hrs1IQA
a7:arnd11,hsa34
ps(b7),uda112
arns-1,srs1
ck-10,nc0
arnd47,hva115
tk20,uda85
ard34,grb12
can(s1),hha116
arn(s1),srd35
tk10,ck-10
arb12,gr(s1)
psa21,hva18
a115:ard10LPB
a116h:hvr1,arnd36
hsa23,qqa21
arnd37,hva23
[ s t o p ]
a8:hsa30
b42:bsp_,hsa11
5
pab42t5
hsa15
hsa30
it(b2)LOA
pa(b7),hva22
a9:hsa120,acb42
a105:hva22
a10:b5:itp,bs1
hrs1
a11:hsa6LRB
hsa26
tl-10,arb37
mbd14,ck10
ard12VXLOB
ard29X
sy23LKB
hse25
b18:srn__D
41
gab18,tk-10
acb32,acb33
acb19,ard10
b33:pab10td__
_55
scb8
b32:pab2td__
_54
gm(b2)MPC
pi8t-16
ppd0,hrs1
[ s t o p ]
a12:its,ptr1
hsa14,ps
srd10,pmd19
hva2XLZ
a13:arnb12IPC
b19:pab11td__
_55
a89h:gib15,arnb12
b11:srt1IPC
it(b10),bs(b11)
b15:qq,hha92
hha89NZ
gir1,arnb15
nc,hha89
a91:hsa3
arnb11,srb2
ga(b2),hrs1
a14:hsna17X
cl-30XIPC
gmb12XMPC
a92h:hhs,it(b5)
bs-4,hha129
hsa11
a129:hva13,uda13
b10:grd55t1MPC
ppp4,hva91
[ s t o p ]
a15:hsa20
pm(b)Xd3
gtr1,mbd14
acb1,hv
a16:hsa18
cl-10,ard20
hrs1
a17:hsa20
hsa19
a18:hsa19
a19:cl10
a20:arn(e1)t1
hse2LA
hse7LKB
arn(e1)LKB
gab,hrs1
a120:hsa20
hhs
[ s t o p ]
a110:arnd10,sce4
b37:qq0V-1
a21:qq(b7)t3
a22:hse9LKB
hsa20,psa21
hva98NT
srd40DITA
pm(b)XVd41
b:a98:pm0XVd3
ar16DVNTA
a23:hva24LC
gar2IPC
grb43MPC
pit15
grb1MPC
mbd69,gab5
hsa6LTA
hsa10
pmb43XIPC
ck10,gab14
pab1,ptb1
hha104NPC
arnb1,ck-10
gab26
pmn(b26)XVNPA
tk10,arb26
a104h:grb1,arnb14
b14:is,bss+d4
pm(b),hv(b14)
gab,hsa3
d69:qq15,arn(b)
a103:psa21,hva23
a24:pm(b)t1
pi0t63IPC
a100:grb1MPC
hva127
[ s t o p ]
a25:hsa39,qqa21
a101:pm(b)Xd33
hva2,hra2
a26:arn(b2)D
ck-10,arb8
ard16LRA
hrs1IPC
a27:srb8,ck-10
ca0,hva88
ck10,arb8
ard11,hrs-1
a88:tk20,ard17
a85:ard18LPB
sr(b2)D
hrs1
a28:hsa26
b6:a29:grd_t1MPC
_1
hva32
a30:hsa26
b7:a31:grd_t-1MPC
_2
a32:it(b6),bs(b7)
hrs1,qqe34
psr-2,hve5
a33:arn(b6)VIPC
a34:ar(b7)VIPC
qq(b6)V-1
qq(b7)t1
hrs1
a35:hsa27IPC
ar1DNRA
hrs1
[ s t o p ] [ s t o p ]
a36:is(b7),arns1
hva38
a37:hsna34,psa21
a38:hsa35
pi64V911NA
a90:hva4
grb1,hva3
a39:hsna18
ck-10,cl-20
ard28,hhs2
a40:arn(b7),psa21
hsa48LRA
hsa35
a112:grb12MPC
arnd17VLA
acb1,hva3
acb1,hva13
a41:psa40,hha42
a42:psa37,is(b7)
arns2,hhs
a43:hsa120,gab17
hsa39,qq0
srd28,hha107
a44:hsa30,hrr-1
hsa120,hsa31
psa21,hva30
[ s t o p ]
a45:hsa120,hsa26
gr(b7)MPC
ps(b7),arns2
hsa38
a113:arns1,nc(b)
arnd13,hsa23
hva22
a46:bsp22,hsa11
par2td5
hsa3,qqi
arnt2
it(r-1),pab
hva23LT
arnd21,hva103
a47:hsa49,hsa16
pab24,ck10
gab21,tk20
ard45IPC
hsa29,qqa21
arnb1
cac9,hva86
cac21,hsna99
psa21,hva3
a131:hrs1NRA
a48:hva6XLRB
a130:pi0t-3
ppp2,hrs1
a49:arnb21,cl10
arnb22,cl10
arnb23,cl10
arnb24,cl-30
bs(b25),pmr1
hsa31IPA
pab22,hhs
[ s t o p ]
a50:b25:can,hhs
pab25,arn(b7)
hva83NA
hha82LB
hsa48LRA
a82h:hva83,pmr
hva83LRA
hsna106LQA
hsa26
ac(b7),hhs
a83:hsa26
ac(b7)MPC
hhs
a106:bsp5
hsa11
arnr,hvna87
a51:cl-10,gab35
hsa120,gab17
hsa50,hsa20
arnb17,ps6
b21:nc,ps8
ca5,ps7
pm(b)Xd6
b35:bs
ck-10,gsb17
gtb29,gab31
b29:tk20,hv
a52:hsa49,hsa20
ck-10,gtb1
hsa3NZ
pab23,hsa26
pab25,ard51
a124:psa21,hva31
a53:hsa49,hsa30
it(b7),pab23
pab25,hsa20
gab21,ca2
hsa3
psa21,hva30
[ s t o p ]
a54:hsa120,gab38
ck2,gar1
a108:bsp,hsa11
b38:btt-1
psr1,hva120
hva22,gar2
hsa14,psa108
pit-49
hva4
a55:arnb1
ck-10,ard23
grb1,hva15
a56:hsa15
arn(b2),grb1
tk28,ck-8
pmd24,ca2
qq(b1)t1
gm(b2)MA
hva3
a57:bsp5,hsa11
is(b23),arns-1
psa111,hva38
[ s t o p ]
a58:hsa14,ard20
gad49,cl30
tk-10,cl-20
hsa31,qqa21
arnd49,hva65
a59:acb1,hsa20
a60:srd15LA
a61:acb1,hsa127
b31:can,srd15
a107:ps1,itd8
ar(b17),hha102
a62:bsp5,hsa11
arn(b23),hsa38
bs(b17)t7
arnd13,hsa23
a111:hsa20,qq1
a102h:pmnr-3,gsb25
a117:psa21,hva65
a63:hsa14,psa21
bs(b17)t7IPC
nkf39,grfb12
arnb12,hva68
a64:hsa14,psa65
a65:hva68IPC
qq(b23)D1
arnb22,ck-10
ard50,hha67
a66:pab17t9
a67:hsa16,psa21
b17:abtd7IPC
a68:b22:qqt1
hva31
[ s t o p ]
a69:bsp516,hva3
pp1,hva22
a70:bsp5
hsa11
hsa33
a71:hsa4IPC
hhs
a128:arc26-c2D
hva4
a72:it1
a73:pab27,nt(b21)
pab1,hhr1
hva128,hsna34
hsa27,qqa94
pm(b2),ca0
hha93XLRA
ck-10,ard43
a93h:hva4,ck-10
pi0t-3IPB
ard44IPA
a94:hsb2
hsa70,it-1
b24:bt,hvr-1
bsp5,hsa11
hsa3,qqa75
[ s t o p ]
a74:hsna34
pab25t1NA
gab21,tk10
gab22,tk10
gab23,tk10
a75:hhs,gab24
b27:bs,hva22
hsa120,hsa26
ar(b)Vd8IPC
a76:hsa26
psa21
a99:qq(b24)t1
hva29
a77:hsa50,hsa39
a78:hsa50,hsa16
ard9,hsa65
it(b22),pab1
pi2.2t767
a95:bsp516,hva125
gir1,hsa11
pi_t-13
0
a125:hsna34,qqa96
qqVLQC
hva29NC
qq(b22)t1NC
a96:hva71,psa97
bt(b22)t-1
a97:hva95,it-1
b23:ncn,hva70
psa114,hva127
[ s t o p ]
a79:hsa50,arnb22
gab13,tk-8
gtr,nt
bsp17,hsa11
bs(b13)t34
psa84,hve5
a80:hsna34,ard46
nc0LA
psa81,hva4
hva128LT
hsa27,qqa81
ck-10,hha80
a81=i-1
ncn(b22)t-1
hva80,qqnd68
a84=i-2
arn(b7),hsa35
hsa4
hsa3
qq(b7)t2
arnb13,psa114
a114:hva4IPC
hsa74,hva22
a119:hsa11
arn(b2),gt3e4
hhne29
bk=e31,i=0
_
i=e32
d68:tcase too big;
_
e32=i
e
_
[ s t o p ]
d5=i-1
d4=-d5+512
d67:pac30,tk10
bt(c33)f,qq-1
d32:qq1.29
udnc17f,qq18.27
qq1.29+1.39
gm(c30)f,qq63.29+1
d34:hvs
pm(c17)f,qq31.29+1
d35:hsr
grc17f,qq1.24
d43:qqc38+1.19+36.25+1.27-1.39
qq1.0+2.5+7fta3+d67.29
qq,hsc7
itp1.0+6.5+3,qqa1+1021.29
d11:hsc2,
ga1.0+6.5+3,qqa3+c33.29
d24:ptc49-5,hsc27
qq1.0+2.5+7fta3+d24.29
qq(c33),hsc39
nc1.0+6.5+3,qqa1+1.29
d44:hh(c38),
qq0,hsc39
d45:hvc11-1,hh-1
ncn(c30),hsc13
d23:ud
d46:qq37.25+1.27-1.38+c16,qq1
abn(c30),nkf39
arnf(c30),tkf-29
d58:ptc49-4,hsc27
d30:qq512,hs1c15
d52:ps6.5ta15
d53:it6.5ta15
d38:qq64,hsc39
d9:is()f,pss
d10:qq1.39
d14:qq-1.9+1.19-1.29
d17:hvr
d18:qq4.25
d19:qq-1.28
d20:qqc0
d28:hsc26,
d49:ps()f,hvc12
d50:qqc10+1.26-1.29
d42:udc37f,hsc37
d63:srn4.5+4,qqa3+c41.29
d65:hsc14XNZA
<e27
d25:arn,hsc20
⨯
d25:arnc35,hvs2
d26:srn,hsc20
d48:qq2.5+5fta15+d26.29
d22:qq2.5+5ftd48+d25.29
>
[ s t o p ]
d6=i-2
<e27
qq,qqa60+c18.19
⨯
qq,qqa60+c19.19
>zqa57ti
qqita61+c19.19
qqa62ta59+c18.19
zqita43
zqita66
qqa63ta64
qqa67ta67
zqita58
d7=i-1
ps(),its
ps()ft37.25+1.29
ps(),itns
psn()ft37.25+1.26+1.29
ps()ft37.25+1.26+1.29
is()f,arns
is()ft37.25+1.29
is(),arns
is()f,pmns
d51:arn,
zqnf,
zq,
zqf,
zqn,
d8:zqnf,
psn,
psnf,
d15:qqn,
qqnf,
d16:qqf,
[ s t o p ]
d41=i-512
d3:qq(p),qqa1
qqp,qqa1
d60:qqc,qqa1
_
qqs,qqa5
qq(c30),qqa3
qqc17,qqa1
qq1.2+2.5fta77+13d5.29
qq1.2+2.5fta78+13d5.29
qqrc42+i,qqa12
qq1.2+2.5+5,qqa25+d31.29
qq2.2+2.5+5fta72+13d5.29
qq2.2+2.5+5fta73+13d5.29
qq3.2+2.5fta79+d58.29
pa3.2,qqa79+c30.29
qq(1.2+5),qqa52+c35.29
arn1.2+5.5+4,qqa53+c17.29
hh1.2+6.5+5,qqa47+c22.29
hv1.2+6.5+5,qqa47+c21.29
hs1.2+6.5+5,qqa47+c9.29
hvn1.2+6.5,qqa51
qq1.2+6.5+3ta51+1.29
qqta21
qq1.2+5ta40NT
qq1.2+5ta40LT
qq1.2+5ta40NZ
qq1.2+5ta40LZ
qq1.2+6.5+5ta42
qq1.2+5ta41NT
qq1.2+5ta41LT
qq1.2+6.5+5ta36
qq1.2+6.5+5ta37
qq1.2ta30
qq1.2+6.5+5ta45
qq1.2ta44
hs1.2ta8
hs5.2ta8
qqta7
qq1.2+9ta131
qq3.5+27d5.39+13ftd61
qq3.5+28d5.39+13ftd62
hvr0,qqa46+1020.29
qq1.2+2.5+5fta3+d38.29
qq1.2+2.5+5fta3+24d5.29
pmc55f,gac55
tln9f,udc55
tk4.5,qqa69+1.29
[ s t o p ]
ck1.2+6.5+3,qqd42+10.29
qqn5td63NKB
qq5fta3+d65.29
mt-1f,qq1.22+20.27
il6.5+3ta3
mt-1f,qq1.22+28.27
us6.5+3ta3
mt6.5+3,qqa3+c44.29
sr4.5+4,qqa3+c41.29
sr5.5+4,qqa3+c43.29
pm6.5+3,qqa3+c17.29
pm6.5+3,qqa3+c30.29
arn4.5+4,qqa3+c30.29
ga6.5+3,qqa3+c30.29
qq1.2+2.5+5fta3+19d5.29
ck(6.5+3),qqa3+c33.29
tk4.5+4,qqa3+30.29
d21:ck6.5+3,qqa3+1014.29
ga6.5+3,qqd21+c33.29
ab5DXa3
arc41f,qq28.27
xr6.5+3ta3
tk5.5+4,qqa3+995.29
d13:nk5.5+4,qqa3+39.29
pm6.5+3ta15
d36:gm6.5+3ta15
mk5.5+4ta15
dk5.5+4ta15
qq6.5+3ta15
mt6.5+3ta15
snn4.5+4ta15
ann4.5+4ta15
mb6.5+3ta15
ab6.5+3ta15
grn4.5+4ta15
dln6.5+3ta15
ann5Xa15
dln5Xa15
sr5ta15LT
hs1.2+5ta15
pm5Da15
arn5Da15
ar5Da15
gr5ta15MA
[ s t o p ]
gr5ta15MB
gm5ta15M
grn5ta15M
mln5Xa15IZA
acn13ta15MA
mb5Xa15
<e27
qq1.2+2.5+5fta15+d25.29
⨯
ck1.2+6.5+3,qqd22+10.29
>pa6.5+7,qqd53+c30.29
hv1.2+6.5+4,qqd52+c2.29
arn9Va56LT
sr9Va56NT
hs1.2+2.5+5,qqa55+c28.29
hs1.2+2.5+5,qqa55+c8.29
hs1.2+2.5+5,qqa55+c25.29
hs1.2+2.5+5,qqa55+c24.29
d12:hsc3
ck+6.5+3,qqa
d61:arn(c30)f,qq1.21+3.24+1.29
qq1.2+2.5+5fta+22d5.29
psp6.5+3,qqa1+2.29
qq1.2ta76
d33=d32-i
hs1.2+2.5+5,qqa101+c4.29
qqta110
hs1.2+2.5+5,qqa101+c4.29
qq1.2ta54
qqta9
qqta119
d62:arn(c30)f,qq1.21+2.24+1.29
d47:gm5ta15MA
d37:pmr6.5+3ta13
d29:hsc1
d40=i-d3+512
arn4.5+4ta15
ar4.5+4ta15
sr4.5+4ta15
gr4.5+4ta15
srn4.5+4ta15
ann4.5+4ta15
gr6ta15M
gr6Va15LA
[ s t o p ]
d1=i-1
a121:grd2t-1M
ca(r1),hva22
hva121
a122:srn(13e4)D
ck10,scb8
scd32,sc2d32
hsa120,acd60
ga2e4,arne4
tk30,gab37
ck10,ard57
grd54MA
pte12t-41
ppd0,pi8
hvna121
d57:hhnc29,
d2=e20
[ p u n c h _ o f f ] d66:qq
di=i-1,e22=k-e14+1,e47=0
_
bk=e23,i=0
_
i=15e21
qqe16.9+1d66.19-e16.19+1.20+a122.39f
e
_
e
_
d e49=6 ; tape number := 6;
_
d i=e4 ;
_
qq e14.39 ; first track of system (for merger)
[After i follows STOPCODE, SUMCODE and a sum character]
_
i[ s t o p ] [ s u m ] [ 0 3 7 ] T5
_
s
_
[ s t o p ]