|
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: 10093 (0x276d)
Description: Bits:30000555 GSL 474.28 Main help (5) 8.08.68
Types: 8-hole paper tape
Notes: Gier Text
;slip< [8.8.68 (5) mainhelp ][ s t o p ] [ c l e a r ] bi=0,d55 _d55=5 d1=100 d3=0 d4=0 d5=39 d9=0 d11=38 d16=294 d17=3 d18=512 d19=960 d21=34 d22=1 d23=4 d32=1 d33=0 d34=0 d35=0 d36=0 d41=1 d43=17 d44=17 d46=0 d50=960 d52=0 d53=400 d54=1 d=0[ s u m ] [ 0 5 5 ] iredefine _s _[ c l e a r ] <d d5=40d1,d9=d1,d11=38d1,d16=268,d21=36d1> d8=d1 d13=80 d14=40 d42=k d37=10,<d41,d37=12> d12=d37+d37+d37+d37+d37 d12=d12+d12+d12+d12 d12=-d12-d12+34 d10=d16-294,d20=1 d2=10 d39=1 d45=4,<d32,d45=0> d51=6,<d32,d51=5>[ s t o p ] bk=2d8,i=d12,c85,e20 _bk=d8,i=0,a20,b10 _i=1 it960,pt1 <d22-3 gg1,gk2 ⨯qq,gk2 >vyd18+d43,hva b:qq64.9+29.15+60.21+18.27+20.33+36.39 qq64.9+57.15+36.21+49.27+55.33+53.39 a:gi3IPC gm6MPC gs7IOB gr8MOB ga9,tl-39 pmsIRB gr11,hrr1 gp12,arnb sr-1,tk21 hva1NZ hva2NAa3:arn_b,pm-1 1_a5:gaa4,tk10a4:sy__,ck-4 -1nc0,hva5 lyn-1,gm-1b1:bs_,hva6 1c25h:gs10,vyn16d18 tl-6,ca0 lyr4,hsr-1 gms3t-1M a6:ca0,hva2 nc17,hva3 a1:vkd19,it1vkd__,it40 _16sk_,it-1 0c54:ncn__,hha1 24a2:vkf960,vk1d9 lk40,vkn38 a8:ar37,pab1 ar2DLA hv(a8)Dt1NB hv(a3)Dt-1NZ arn1IQC d=40,d: i=0 qq,hhc25[ s t o p ] i=40 lk40d13,ck10 ca0,pi12 vkd19,nc1 ps(0),hvna9 arn41d13,ga1 ck10,pm42d13 gm2,pma10 ca1,cln20 ca0,hha11 ca-1,pi12 ps(9),arna12 a11h:hva9,pp(7) bsp512Xt551 d7:qq,hva13 pmp40d13IRB psp40d13,hrr1 a13:gs7,psp1 ck-10NRB a9:bss506t515 gs49d13MQC a12: c55: i=i+1 ncn(c54),hva16 vkd16,sk40d13 vk25d16,sk1000 a16:vk960,pmb gm-1M c53:vyd43,pp1 a14:ppp1,vkpd9 lkd12-40t40 bsp-512d37,hva14 a15:vknd21,arpd12-d37 ar1DLB ar2DLA bsp519d12-d37 ppp1,hha15 ck0,lkd13 hv(a3)Dt-1NZ a10=i+1 c56: i=i+2 qqf d=80,d:e _[ s t o p ] bi=d12,a50,b10 _c=-86 it-1,it-1 it0,pt1 <d22-3 gg1,gk2 vyd18+d43,vk960 ⨯pa1t960 gk2,vyd18+d43 >vk38,sk0 vkd9,lk0 vk,vk qqN vyt-1d18 qq10,hv(r) c59:pi2t-3NO ac512DV512LRC ac512Dt512NRC pi(3),lk0 vkd19,it(86d13) pa6,hh0ba8 _d40:para1t511 d24:tk20 d25:tk10 d26:bt(ra1)t1 sy,hvr-1 d27:para1t506 d28:hsra1 srn(ra4)Dt-16 hvra a1: d29:qq,ck d30:bs570,it510 sy(r-1),tl-30 para7 dkra2XV a6:sy,it16 a3:para4,it-128 a7: d31:bt1,hrns1 mlnra5,tk30a4:ar_DLZ 0a:hhra3LZ qq(rd29)t1 gara6,hvra6b:a5:m10 _a2:9999e _d=40d12,d:[ s t o p ] ba10,b21 _c28:c63=k-d8+d9 b20:vk960,vk1c63 lk(s-1),vk960 gpra,ppc-1bs_,pp-4 1grrb3,tl-7 hvra1NT nc-1,ppc22 tk17,garb10 gtrb10,pmrb10 b10:vy gmp2Ma:pp__,hrns1 -1a1:garb1,tl-25 tln16,grrb20 arnrb4,grp1 b1:<d41,ncn__,hvra2 -1⨯ncn__,hvc57 -1>tl-23,udra8 pmd14-1D a8:gmp5t-3MA b4:qq1,hvra b3:c82:qq <d41,qq1.21 qqd53.9+7.39 qqd53.39qq__,il__ 16 -1qq1.39 b2:qq1.19+7.39 c29: b21:qq6.19+1.39 b13:qq1.19 b19:qq1543.39b15:c80:tcattap; _qq6.19+1544.39 a2:tln4,ck-10 garb5,acr4b3 arnc64D gsra3,ck10 a4:grp5t-3MB b5:it,ptr4b3 b6:hs(s-1),udnra4a3:ps__,hvra -1d=40b20,d:[ s t o p ] b1=b1-b6,b2=b2-b6,b3=b3-b6,b5=b5-b6,b10=b10-b6 b13=b13-b6,b15=b15-b6,b19=b19-b6,b21=b21-b6,b20=b20-b6 gpra9,pp(sb1) canp-2,hhra5 cap-3,hvra6 tln12,tk18 a5h:hvra7,tln2 grs5b3,tk9 grs3b3,tk11 gts2b3,tk10 grs1b3,tl40 gas2b3,hvnra7 b7:qq400.19+7.39 a6:arnrb7,grs2b3 tk-20,grs3b3 qq(s4b3)t144 pp(sb5),usnp64 arnsb13,ilp arsb10D ilp64,il0 arnsb15,srsb10 c81: hh(s1)t1NZ tln5,ck-10 garb17,tln37 garb18,grns1b3b17:bt__t-1 -1ilp64,hvr-1b18:bt__t-1 -1ilnp,hvr-1 a7:srs1b3,acs2b3 arns5b3,scsb3 can(s3b20),arnsb19 acs2b3,acsb21a9:pp__,gpsb2 -1arsb2,ars3b3 grp-2,itsb3 pasb21,arnsb21 us0,hhs ⨯c29=i,c80=i,c81=i>e _[ s t o p ] c51:lkd13,ppd13 vkd11,arnd13 ca0,hvc46 ca1,ppe12 a41:vyd44,hvc47 c49:ppe11,hva41 c50:pad13t1 arn49d13,gar1pp__,vkd19 -1psd16,ppp-40 bsp552t551 pss1,hhr-2 ppp80d13,vks lk40d13,ncns-25d16 vks1,lk80d13 vk960,hva41 c40:it39,pab3 c41:sy64,sy29 sy58,arnd13+1d51b3:sy_,hsd27 0vyd44,arnd13+d51 ck10,hsd26 arnd13+d51,ck20 sy59,hsd27 arnd13+d51,ck-10 sy59,hsd28 arn1D acd13+1d51,sc39d13 vkd21,skd13 vkd21V c42:qqe1,hsc23 sy0,sy0 can(c54),sy53 sy56LQB arn49d13,hsd28 c62=i-1 c45:pme10,vyd43 gm-2M c46:grnd13,arn-2 nc1,hha23 sy62,sy58 a23h:sy64,vyd44 hva40NC pmn-2,hsc3 lkd14,vk960 pab1Vtc44M a40:ud-2 pab1tc43NC[ s t o p ] bk=d8,i=0 _c40=c40-c41,c42=c42-c41,c46=c46-c41 c49=c49-c41,c50=c50-c41,c51=c51-c41 c45=c45-c41 i=c56 vkd11,hvsc41 qqc50.9+c49.19+c46.29+c40.39 i=c55 gtr,psc42 c40=c40+c41,c42=c42+c41,c46=c46+c41 c49=c49+c41,c50=c50+c41,c51=c51+c41 c45=c45+c41e _b6: a13:ppd13,pi512 a15:bsp-38d13,hva16 a:hva10LTA b1:hspmn__Xtb4 -1tl20LOA tl10LOB gar1,mba11 pi-1,gar1hvn__ta -1a1:ppp1,grn2c grpMB a2:arnc43,pm2c ca16,hhnr1 tk-30,mlb hva16NZ gm2c,hva a3:arnp,nc0 c61: a16:qqe2,hsc24 ar2c,ck10 grpV a5:arn2c,acp grn2c,hva15 a4:arn(c43)D grp1MA ppp1,hva15 a12:qqe4,hsc26 a14:arn15.3D a6:acp,ppp1 grnpVM a7:arnp,ck-6 ar(c43)D nc(c43),hva14 a17:grp,hva15 a8:arnp,ck-6 ar10D ca10,hha8 ck6,hva17 a9:qqe3,hsc24[ s t o p ] a10:grnp1MC hva18NTB a11:qq63,vk960 vkd9,lk0 vk960,hhc25 a18:ppd13,gpa13 c47: c47h:ppp-1,hsc52 c58:qqe5,hsc24 hvc46,gar1 pi,vkc63 lkc28,vk960 pa3c28LPA tl-7,ca-4 c57:qqe8,hsc24 ca-3,hvc57 qq40c28,tl7 hs2c28,qqd13 hsc24NZ qqe9,pm1c80 hhc47NPA <d41,pac66tc-2 pac67tc-3 pac68tc-1 pac73tc-1 a24h:gmc65,pss1 ⨯ a24h:pss1 >pmp2IRC gmsMRC bss-39d13,hva16 vkd11VLRC ppp1,hha24 skd13,pm2c arn1cIRC srn(c15),hvc48 c52:ppp1,arnp1 hvs2LC hvs1LB hhs1LA paa19te6 pmnc69DXIZA hsc2 c60:paa19te7NT hsc24NZa19:qq__,arnp1 -1tl-6,ca-1 ppp1,hhr-2 arn2c,hhs2[ s t o p ] c44:hsc27 c43:lynD ca63,hvc43 gaa36,mba37 a37:scr3,gar1pm__Xtb5 -1pm(r-1)t4a36:tl__,cl-6 -1ca1,hva12 ca10,hva9 ca4,gpb6 ca11,panr1 bs,hv(s) ca12,gpnr-1 ca0,hv(s) gas1,hvs1 b5: qq2.3+3.7+3.11+0.15+3.19+6.23+6.27+0.31+6.35+6.39 qq3.3+3.7+3.11+1.15+9.19+6.23+6.27+0.31+6.35+6.39 qq3.3+3.7+10.11+8.15+6.19+6.23+0.27+0.31+6.35+6.39 qq3.3+3.7+0.11+0.11+6.19+6.23+5.27+0.31+6.35+6.39 qq6.4+0.8+6.12+6.16+6.20+12.24+4.28 qq6.4+0.8+6.12+6.16+6.20+0.24 qq0.4+0.8+6.12+6.16+011.20+0.24 qq6.4+0.8+6.12+6.16+7.20+4.24 b4=i-2,a1=a1-a,a2=a2-a,a3=a3-a,a4=a4-a,a5=a5-a a6=a6-a,a7=a7-a,a8=a8-a,a9=a9-a qq0.1+0.9+1.11+0.19+2.21+0.29+2.31+a9.39 qq0.1+a7.9+1.11+a2.19+1.21+a1.29+2.31+a4.39 qq2.1+a8.9+2.11+a5.19+2.21+0.29+2.31+a9.39 qq2.1+a8.9+2.11+a5.19+2.21+0.29+2.31+a4.39 qq0.1+a7.9+2.11+a9.19+0.21+a6.29+2.31+a4.39 qq0.1+a7.9+1.11+a3.19+2.21+a9.29+2.31+a4.39 qq2.1+a9.9+2.11+a9.19+3.21+0.29+3.31+0.39 qq2.3+a8.9+2.13+a5.19+2.23+0.29+3.33+0.39 a1=a1+a,a2=a2+a,a3=a3+a,a4=a4+a,a5=a5+a a6=a6+a,a7=a7+a,a8=a8+a,a9=a9+a[ s t o p ] <-d41+1,d=i,i=-26>ba4 _e:m-1 _a:pa-3t-4 c75: nc39d14,hvra1 srnre,ac-2 hsc16M is(c75),lks-39 vk960,it-39 a1:pm(-5)Vt1LA c76: hs20d14 hhra2,hvc70 c27:bt(-3)t1 arn-5,hvra a2h:pm-4,cln-6 ck-4,gm-4 gas1,hrs3 <-d41+1,i=d>e5:tparam; _e6:tundef; _e7:tcatalog; _e8:tkind; _e9:tlabel; _e2:tfull; _c22=i-2 qq c74:hv-9NTB hha4LQA gm3d14,sr3d14 pa3d14t1.3+d32.5 tk16,ac3d14 a4h:hva3,srd14 tld3.7-16,arn1d14 ckd3.7+8,tl-d3.7+16 ck16,gr1d14 a3:pi0,hsc8 skd14,hv-9e _[ s t o p ] c48:qqVNT hva25NC a26:cln-26 gae15NRB cl26,srne15 a25:mta26,gaa30 gta35,ck20 gaa31,ck10 gaa29,vk960 vk2d9,lk0 d38:pmn1c,hsc3a29:ncn__,hsa32 -1a30:ncn__,hsa31 -1grn-1NQA arn3cLQB c77: hsc24NZ a35h:qqe16,hv a31:ppVt40 a32:is(a31),pps40 <d41,hva33NRB gpa34,pp-40 a27:hsc71 c70:hsc24NZ qqe13IPC gm(a34)MPC canp1,hva34 ppp1,hva27 ⨯c70:> a33:hsc16LC lkp-40,vk960 gpna34,pp-1a34:arp_,ppp-1 0ar1DLB ar2DLA bsp41,hva34 ac3c hv(s)Dt-1M c24:pa-9tc45-c41 it-10 c26:pac72tc62 vyd43,sy64 sy29,hhc23e16:tsum; _e3:tsyntax; _e4:tannul; _e10:vyn1t1016<i+86,itotallength _>[ s t o p ] i=-86 c:qqd18.9+d17.9+c53.19+c45.29-c41.29+d53.39 qqd37.9 d6: qq qq c1:pmnc18DXIZA c2:pmrc12,garc17 c3:garc6,parc8 dlnrc11,arrc11 ck-10,garc5 cln-10,garc4 c4:is,cans-960 parc4,it1 c5:vk,vk(rc4) c6:can,hrs1 c7=10c1 c7:lkd14,it1 c8:qq,arnrc7 garc9,garc15 vk(rc5),vkn(rc4) c9:arIPC ar2DLA c10:sr-1DLB ar(rc8)DVXLC hv(rc9)Dt1 c11:qqXVDN c12:qqd21.39 hv(rc15)Dt-1LZ sc(rc9),pmrc13 c13:hrs1XLPB c14:gprc19,parc20 c15:pmnXt1IPC c16:hv(rc4)Dt1LC hrs1XNZA c17:grrVt1LA c18=c-1c17,c69=2c18 parc17V2c18LT pmrc10,hvrc13 c19:srt1 parc20t512NZ hvrc15NPB c20:pit511 c21:qqd3.2+1.5,hvrc14e _[ s t o p ] bi=-46,a10,b5 _c64=d9+d37 c23:gsra,ans iss-1LA a1:ps(s1),arnrc23 pms,pss1 a3:cl-6,ca10.5 c72:a:ps__,hrs1 -1ca15.5,hhra1 tk-4,gara2 ca63,it1 a2:sy-1,hvnra3 d15=i-c23e13:tfault; _e1:b:k29,63 _toverflow; _. e14:vy1t-1d18 e11=i-1,e12=ithsf1; _texit; _e15:qqf10.9+40d13.19+40d13.29, <d41 qq1.39 c65:qq6.19+1.39 c73:qq-4.9+1.19 c71=-26 c71:arnr6b,ar(rc66)c66:gr__VLT -5parb1,hvra4c67:ar__,il0 -6c68:pm__,hrns1 -4a4:itrb,par7b arnr7b,il0 arnr5b,acrb arnr1b,acr2b a5:arnr2b,udr4b arnr7b,us0 arnr8b,il(r4b) il0,arn(rc68)b1:bt_Vt-100LT 0srnr3b,hvrc66 hhs1 hvra5 ⨯c65=i,c66=i,c67=i,c68=i,c71=i,c73=i><i+9,igetwordlength _> i=-9psc___c__,vk960 _51-_41vk1d9,lk40 vk960,hvc53e _[ s u m ] [ 0 3 1 ] imainhelp _s _[ s t o p ]