|
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: 3668 (0xe54) Description: Bits:30000571 GSL 474.06 binout, ... (2) 9.08.67 Types: 8-hole paper tape Notes: Gier Text
[20.7.1967 (2) binout, outparam]<-d55+1, i version _s _>[ s t o p ] [ c l e a r ] bk=d1,i=40d13,a25,b15 _ba10 _can(2c22),vy32 <d35-2,us(-31)t-96> sy58,sy64a:pmnd__t1 _13hva8LC hva4XLA hha6XLB a1h:arna2,cl-6 tk-4,gaa3 ca15,hva a2:ca10IB sy27,hva ca63,it1a3:sy_,hhna1 0a4:sy14,gar1sy_,hva 0a5:ck10,gr(a) a6h:sy59,hsd28a7:bt_t-1 3arn(a),hva5 paa7t3 sy27,hva a8:sy17,hv-9e _d=d19-960 b:qqd.29-d.33+d16.39 qq1023.9+1023.29 qq1023.19+1023.39 qq26.39 qq510.39-1c54.39 qq1.39 b12:qq40.39 qqd53.39 qq512.39 qq400.39 a=240d13,b8=6a[ s t o p ] a18:pm3b,gm4a <d35-2,us(-31)t-96> can(2c22),vy32b1:ppd____,hsc52 _13-1hvc58,hva1 a21h:hva2,grb hvc57LT tl-7,gab11 tl-25,tln16 gr4a,hhb1 a2:ncn(b6),hv-9 sy66,it(b7) pa-1,arn-1 ck10,hsa5 hv-9 a1: b11:ps,pmp2 ca16,pin16 ca37,pin0 qqVLC hva19LB hvc58NZ pmn4a,mlnsb12 hhna20X a19:ppp1,ca50 hha21X hvc58NZ xr,mb1b cl30,arnp1 mb2b,mlsb12 cln-20,ck-20 gm5a,sr5a a20h:ar5b,gra grnc81,gm1a dlnsb12,gm5a vk960,vkc63 lkc28,arb qq40c28,vk960 pa3c28,hs2c28 pmn1cIPA gpb1,hsc3 lkd14,vkn960 hvc70NZ psr-2,arn5a sr5b,gr5a hva7NT pab3t-1 pp0,grn3a[ s t o p ] b5:hva__LPB _17pab5tc58b6:can_,hva4 1bt___t-1 100sy0,hvr-1 sy13,pt-1 pab7t1 a4:sy65,pmn1a dlb12,gr1a cln-10,ar1a pab6,hsa5 a12:hsa7 hvc70NZ qqXIRC hva6XLPB sr2a,gi1a hha8NZ arn1a,psa9b3:nc__,hha8 -1arn5b,ac3a a8h:hva10,hsa11 bsp-62,hsa10 pmc-1,ppp1 gmpb8MRC gm2a,gib3 a9=i-1 arna,sr5b gra,psb1-1 hva12NZ hva22NPB sy64,it(b7) pa-1,arn-1 ck10,hva5 a22:hsa10 a11:arn3a,sc3a hrs1LZ sy64,ck-10 a5:gar1,ck-7sy__,gar1 -1sy__,ck-7 -1gar2 qq(b7)t4sy__,hrs1 -1[ s t o p ] a10:canp,hrs1 qq(b7)t1 syp,gpb9 a14h:pp1,pmnpb8 ar1.1DLA ar1.2DLBb7:qq_Xt6 1a13h:cl32,gar1sy__,it-100 -1bt_,hvr2 0cl-7,hha13 par-2,ppp1b9:can__t-1 -1pp0,hrs1 a15:hha14 a7:hvc71NPA arn(c-2)Dt1 nc40d14,hha23 hsc16M lk(c-2)t-40 a23h:vk960,pmn(c-2) gmc-1,hrs1 b10:qq2.6+0.13+0.20+0.27+0.34+0.39 qq2.6+4.13+0.20+0.27+0.34+7.39 qqf28.6+2.13+0.20+127.27+63.34+11.39 qq32.6+6.13+56.20+64.27+0.34+0.39 qq0.6+0.13+0.20+0.27+64.34+10.39, qq28.6+0.13+7.20+103.27+49.34+8.39 qq0.6+32.13+96.20+0.27+0.34+0.39 qqf24.6+44.13+1.20+32.27+64.34+2.39 qq0.6+0.13+32.20+64.27+0.34+0.39 qq64.20+0.27+0.34+0.39[ s t o p ] a17:arna,sr4b hvc58NT sy14,sy17 pmna,tl36 tk5,acb10 tln4,acb10a3:arn___Dt3 507tk-30,sra tl-3,tk19 ac4b10,tln18 ac4b10,uda3 tk-30,sra tl-3,tk12 ac6b10,tln11 ac6b10,ppb10-b8 pab9t10 pab7t1 pt-1 pab5tc58 psa12-1,hva15 a6:ar1.1DLRA ar1.2DLRB qq(b7)t7 ck3X cl34,ps-6 a16:ck-4,gar2 bss1,it64sy__,pss1 -1bss,hv1a9 cln-6,hva16[ s t o p ] i=39i, d=k-d1b k=d42, i=0, a10 _a1=d19-960 a2=40d13 a3=a18 a=d <d35, a=1> <d39, i=d2 hs 1 hv a4 <d36,tres; _qqf a.39 ⨯ <d39,tset; _qqf d35.39 qqf a.39[STOP, SUM][ s t o p ] [ s u m ] [ 0 5 6 ] i base binout, outparam _s _[STOP, CLEAR][ s t o p ] [ c l e a r ] > <d39, qq 39, qq 57, qq 52, qqftbinout; _qqf d.9+a3.19+a2.29toutparam; _qqf, a4: hs 1 hv a5tmove; _qq 50, qqf d.23+d1.39+a1.29-a1.33tbinout; _qqf, a5: hs 1 hv a6tsetsum; _tbinout; _qqf, d2=i a6: hsf 2 ⨯ i=d48 qq d35.2+11.7+d36.5+d.23+d1.39, qq,tbinout; _qq d.9+a3.19+a2.29toutparam; _d48=i qqf > d1=d+d1e _e _[STOP, SUM][ s t o p ] [ s u m ] [ 0 5 7 ] i binout, outparam _s _[ s t o p ]