|
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: 3751 (0xea7) Description: Bits:30000565 GSL 474.08 clear, ... (10) 8.08.67 Types: 8-hole paper tape Notes: Gier Text
[22.7.1967 (10) set, res, clear]<-d55+1, i version _s _>[ s t o p ] [ c l e a r ] bk=d1,i=40d13,a67,b17 _b:qq qqd3.2+1.5, qq, qq pi4,hva4 a:pi2,hva12 pi0,hva40 pi0,hva41 pi0,hva42 qq2d38.39 qq40.39 qq-1.7+1.23-1.39 qq7.27[ s t o p ] a10:ppd13,arnp1 ck-10,gab4 ck7,gr1b pab4t-1LO hsna2 qqf7.39 grb,hsna2 b4:hvta a2:hva6LA hva6NB ac1b,ppp1 arns1,tl-20 arpVLB arnp1,hvs1 hva5LT tln20,srp hva5LT arnp1,hvs2 a11:arnr1,hsc2 pm1d14,tln7 tln16,ppd13 pmp1 grbVNB gmb,hsna2 pi1.3+1.8-d3.8,srnb hva7NT pmd14,tln7 tln16,srb hva7LT arnb,tl16 ac1b,hva14 a4:arnb ac1b,tl-2 ca0,hva14 a5:hsa65,qqsa8 a6:qqe5,hsc24 a7:hsa65,qq(a9)a8:tvalue; _a9:tlength; _[ s t o p ] a12:gr3b,hsa2 qqfd22.31+d22.33 a13:arnb,ck16 ac1b,srnb hva7NT sr3b,ars1 hva7LT a14:arnp1,ps2 hva6LC hha16NA ppp1,ca18 ptb11,hva15 ca39,panb10 ca57,ptnb10 hva14LZ nc52,hva6 a15:pmp1,gm2b gsb14,hsna2 a16h:hva14,gpb15b10:ns_.4,iss-_.6 1 1b11:arns_.4+_.6+_.7Dt-_.7 1 1 1 1ac1b,nc0 hva6LQB a17:hsc1 hva36NT a18:arnp1,tl-6 ca-1VNC hva6 ppp1,hva18 nc-6,hva5 acnp1MB ppp1,pmnp1 hha22XNC hha22XLC hva6XLA[ s t o p ] gmp1XM hva5LZ hva5LT cl10,ck20 tk30,ppp1 a22h:hva23,pmb arn40d13D hha24NRA a23:ck10,sr4a a24:ml5a,pmp1 ca(b10),hva5 hva17NA hva6NB bsp-36d13,hva6 a25:b14:bt_t-1 1arnbVt1IRC _b15:arnt1IRC qq(b15)Vt-1LRC gr(c15)VMRC grn(c15)MB arn(c15)Dt1IZA nc(c9),hva25 a26:pac6,hsc8 hva27LRC arn1c,tl-2 ca(c8),hva34 sk(c7),psa25-1 qq(c8)t1 hv(c4)Dt1 a27:sk(c7),vk(c4) a28:hhna66NTB arnr1,hsc2 arnb,ac(c7) tk16,sc(c7) arn1d14ITB mb6a,gr1d14 hva26a30:tname; _a31:tno clear; _a32:ca-1 hsa65,qqsa30 a33:qqe7,hsc24 a34:hsa65,qqpe2 a35:hsa65,qqa31+2.29 a36:nc0,hva33 hsa65,qqa30+2.29[ s t o p ] <d41 a40:ck12,hsa2 qqf-8.19+15.39 gr3b,hsa2 qqfd52.29+d4.39 hva13 a41:ck10,hsa2 qqf-1.19+3.39 ck4,gr3b hsa2 qqf63.39 ac3b,arn7a arp1,hsa2 qqf15.39 hsa13 qq1024.39 a42:ck12,hsa2 qqf-1.19+6.39 ck7,hsa2 qqf31.39 gr3b,hsa2 qqf127.39 hsa13 qq8000.39 ⨯ a40=c57,a41=c57,a42=c57 >[ s t o p ] a50:arn6a,gr2c ppd13,hsc1 hva32NZ arn2c,ck3 hva35LO pi327t48 tk3ITB hvna51LTB tk35 hvna51NZ arn2c,udc19 hvr-1NC hva35NZ a51:pm(c15),psa51-1 hva32NZ qqXNA hvc15NZ qqIQB psr1,hva57 hsa56NPA hsa56LPA hsa56LZ arn2c,psa28-1 hva52NTB ck-16,ar2c src,cl24 hva52NZ a60:hsa57NPA hsa55LPA arn2c,tk4 tk2VNT arn1c,hva61 hva60NT ck-22,ar2c a61:scc,arnc tld3.7-16,tln-d3.7+16 scb,psa28-1 a52:hrs1LZB a53:hsnc8IZB sk(c7),hrs1[ s t o p ] a54:hsa53NZB arn(c4)D-1M ca-1,acc5 pac4t959NB qq(c8)t-2 hsc4 arnc9,hha58 a55:gr2c,hva57 a56:grn(c15)MQB pi0.1t767 a57:arnc15,ca(c7) a58h:hva54,gac15 pmn(c15)X-1IPC hrs a65:arns,tk10 gab17,tk20 a66:pm2c22X ck10,vkd19 nc-1,hva67 vk25d16,lkd14 vk25d16,gm32d14 grn35d14,arnd13 nc0,skd14 ptb17t1c24 b17:b17h:a67:ncn_,hsc2_ 0 _ 4hv-9[ s t o p ] i=39i, d=k-d1b k=d42, i=0, a9 _a1=d19-960 a2=40d13 a3=a10, a7=a11, a8=a50 a=d <d35, a=1> <d39, i=d2 a4: hs 1 hv a5tmove; _qq 50, qqf d.23+d1.39+a1.29-a1.33tset; _qqf, a5: hs 1 hv a6tsetsum; _tset; _qqf, d2=i a6: hsf 2 ⨯ i=d48 qq d35.2+11.7+d36.5+d.23+d1.39, qq,tset; _qq d.9+a3.19+a2.29tres; _qq d.9+a7.19+a2.29tclear; _qq d.9+a8.19+a2.29 d48=i qqf > d1=d+d1e _e _[STOP, SUM][ s t o p ] [ s u m ] [ 0 5 9 ] i set, res clear _s _[ s t o p ]