|
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: 10702 (0x29ce)
Description: Bits:30000562 GSL 474.42 edit (9) 8.07.70
Types: 8-hole paper tape
Notes: Gier Text
[8.7.70 (9) edit]<-d55+1, i version _s _>[ s t o p ] [ c l e a r ] bk=d1,i=90,b60,e60 _<d41,e1=-166,⨯e1=10 > <d41,e2=-86,⨯e2=-86 > <d41,e3=10,⨯e3=-166 > e4:ba5 _a3:pmf_,zqn(r+i+1) 0[ s t o p ] e5: hvfs1, qqf qqf qqf qqf qqf qqf qqf qqf qqf qq832 qq770 hvfs1, qq11 qqf qq-2, qqf qqf qqf qqf qqf qqf qqf qqf qqf qqf qq-2, qqf pafb48,hhfa1 hvfs1, hvfs1, hvfs1, qqf qqf qqf qqf qqf qqf qqf qqf qqf qqf qq-2, qqf hvfs1, qq-2, qq-2, qq-2, qqf qqf qqf qqf qqf qqf qqf qqf[ s t o p ] qqf qqf pafb,hvfs1 qqf hvfa, pmfs3,hvfa2 hvfs1, qq512 hvfs1, b:qq a2:grns3MRA gmb26,hvs1 a:pabt128 a1:hvs1,pab1 hva4LPC pma3,gmb2 e45:hva4NQA pae8Vte25NRBe47:pae8te_____ _26IPAa4:hve35Me _ba30 _e6:a:qq,pp0 a1:pm(b15)Xt1 hse33NA grpe10M pi(pe10)Vt-130LT ppp1,hva1 pmrLPB bspIPB acnpe9VMA hvna11NRB[ s t o p ] a2:pp1V a3:hs(a4)LRAe7:pme__Xt1 _18hve__LA _22gaa4VNT hse36a4:b2:pm__te5IRA 0Vb1:acDt1 a5:hha13XNBe8:hse__LPB _26pm(a4)XVDNRC hva3 arbNTA gaa8ITA srpe9,ppp1 hva10LZ pmpDX a9:ps1,pss1 cas,hva2 paa7te9 a6:pps-1,ppp1a7:pme_t1 _9cap1X a8:srDV srpe9V pp(a7)Vte11LZ hha6XLZ hha9XNZ a10:hve7NA[ s t o p ] a11:can(b)NPB e12:arn58DVLZ pm60DX a12:hs(e8) pm(b15)XVt1LPB hh(a)Dt1 hse33NA hva12NT nc-28,hha psa12-1,mtb11 a13:hve45,gaa14 bs(a4)t64e5NRA ps3e7,hve43 sc(b1)DVt-1NTa14:pi_Vt573IZA 0gab2,hva4 pm(e7)XNZB b48:acDVt1NT hve8XLTA hve7NT hve13LTB hve8XNRB a15:pab38Xt10.3 psr1,hv(e8) e13:paa16,uda15 hva18NQAa16:it__,qq(a17) -1pm10DXa17:bt___t-1IZA 240psr-3,hve26 <d41,e15:pp___,psr -39ncnp ppp-1,hve28 >a18:vyd43,paa20 e16: b10:vk960,it-1vk_d___d_,it-40 1_37+_9lk__,it-1 -6bt_,hhe16 4a20:bs_,hvc24 1<d41,ncn(e15),hsa23e44:can_,hva22> 1a24:arnc1,hsc2 b5:pi,arna nc0,hse39 <d41,arnb51,ck10 tk-28,udc24 ca(e15),arnb23 ⨯arnb23,udc24 >pmb25,hvc74[ s t o p ] <d41, b6:griV qqb6.9+1.19+2574.39 qqb6.9+1.19+2574.39 qq-d53.9-1.21-2574.39+d53.39 qq1024.39 b7:qqf15.5+15.11+15.17+15.23+15.29+15.35+3.39, qqb7.9+1.19 qq1.19 qqb19t1 a22:vkd11,lkc vk960 vk(c5),vk(c4) lkd14,vk(c4) pmb23,tl23 arn(c15),ck8 tl16,ck16 gr(c15),hsc8 skd14,arn1b7 us,arn2b7 grb52,us(b35) psa24-1 a23:pab55,hve46 >e _ba10 _e17:nc58,ca60 gaa,hvs1 gaa3,nc64a:pm__DXVNZ 58arna3,hva3 ca(a1),hvr-1 bs(a1)t60 sc(a1)Da1:nt___,sy118 118arna1,uda4 a3:sy,ca61 b3:hse14 ca28,ntn(b14) a4:ac(b14)DXt1 b39:qq,hvs1e _<d41,b40:tfault; _>b41:toverlap; _[ s t o p ] ba10 _a:qq qq qq qq qq512 e18:qqqqr__, -1b9:qqIB pa1e7te13 e19:hv4i b11:qq-1 b12:qqIZA b13:qqDXVN hv(e7)Dt-7e20:arn__,srb_ __-2 ___9srb22NZ hve29LZa4:hse__,qqe1-1 _24ac-2,pmb10 scb24XITB bs(a2)t39e1 gsa2,ps39e1 a1:lks1VNTB grn-2,grne20 mbb11,is(a2)e21:acs40,hv(e__) _50e22:a2:pmn__e_t1 39_1<d41,paa3Vta-1 e23:psr-2,hv20e1 pa6aVti-6a+2LZ e32:qqb40,hse16 ⨯paa3ta-1 pa6ati-6a+1 > cln-6,ck-4 ca63,srb11a3:gaa__t1 _-1hv(6a)e _e24:pm(s1),dlnb13 arb13,ck20 gtr1,cln-10 gar2,vk pmb9X vk,hrs1[ s t o p ] ba20 _e25:ca61,hva8 b14:acDt1 ca28,pab14 e26:ca64,arb11a:hvr_t2 0b17:0.001 ck10e27:a1:gre___Vt1 _3-1ck16,ac(a1) a2:hvs1 ck-18,ac(a1) e35:hvs1IQB ck-12,ac(a1) hvs1 ck-6,ac(a1) hvs1b38:ar__.3D 15ac(a1),paae28:hvs___ _1NAhse24IQB pmb23,arnb23 sr-2XIZA srb20IZB arnb9,acb23 a3:scb21XITB hve29LTB is(a1),sks-39 qq(a1)t-80LQB hvs1NZC e29:qqb41,hse16 e30: <d41,arnb50,arb9 a4:grb50VLT e46:paa7,hha5 ar2b6,us a5:hvs1,pmb51[ s t o p ] a11:b55:can__,hva6 -1arnb51,ar3b6 e31:bs,sr13e1 hve29LZ arnb9,uda3b54:hve29___ _ LTBb35:usX a6:arn3b7,il(b39) il,arnb19 a7:btXVt-150LT hvr3 qqb40,hse16 b34:us,hva6 can(b55),hvs1 arnb9,acb23 arnb52,acb51 srnb53,hva4 > a8:hsa e14:arnb14,tk-5 arb14,ude37 ar31D pab14,gaa9 hr(a)t2LQA a9:sy,hra2e _ba10 _a:qqf, qq, qq, qq,e33:a1:pm__e_Xt1 39_2gaa,ck10 ga1a,ck10 ga2a,ck10 ga3ab15:pa_aDta 3_hva2NA e34:vk960IQB b18:btnt-1 hse24 acb20,is(a1) lks-39NZ qq(a1)t-80LQB a2:arna,hvs1e _[ s t o p ] ba20 _e43:xr,mbr1 ca63,hrs-3 xr,ita9 e36:paata10 ca639,hrs-3 gaa4,gsa1 vyd43 pms-1X hva2XLZ gra3,grns-1 a:qq,hse38 bs(b),sy60 paa5t-511 b16:a8:vy,qqa1:ps__,hrs-3 -1a2:hva7LA a3:zq hva a4:sy,vy(b16) ca64,it-1 a5:bt,pma3 a6:gms-1M pmb9,hrs1 a7:pmb26,uda6 pm(b1)DXt-62 hva13NPA gab14,nt(b48) qq(b14),pab48 a13:tk-5,arb1 e37:mb31D are37,nc(a4) qqa11,hse38 hsb3LPA hse45M pab1,hva8a9:k63,58,29 _tchar; _63,62.a10:k63,58,29 _tparity; _63,62.a11:k58,29 _t tapesum ; _62.e _[ s t o p ] ba10 _e38:paa,it(s) a:pmt1 a1:arna2,cl-6 tk-4,gaa3 ca15,hva a2:ca10,hvs1 ca63,it1 a3:sy,hha1 e39:sy58,sy29 sy64,tl-30 paa7Xt3 pta5,mlnb17 a4:ck-10,gaa6 a5:paa6VtLZ pta5t16a6:sy_ 0a7:btt-1 mlnb12,hva4 sy62,hrs1e _ba0 _da0=i _<d41, b50:qq b51:qq b52:qq b53:qq b19:qq> b20:qq b21:qq b22:qq b23:qq b24:qq b25:qq b26:qqde9=i-1,e10=1e9,e11=-e9+1 _qq qqdi=a0 _e _[ s t o p ] ba30 _a:hsfa3 gia2,hsa3 a1:ps-1,pss1 arnsa7,nc(a4) bsnsa8,hha1 hva5LZ tk10IRC a2:grte5MRC arna4,ca41 psr1,hva3 a16:ppp1,hha9 pma17,gme47 gi(a2),hva16 a17:pae8te25 a3:pmp1,ppp1 hva5LC cln-30LA cln-7,ck-3 gaa4,pi(a4)a4:bs_t64 0a5:qqb42,hse16 hrs1 a7:qqf37 qq49,qq-2 qq41 qqf50,hvfs1 qq18t512 qq53t770 qq51t896da8=-i+a7+512 _<d41, a14:arn(c15)Dt-1IZA ncd14-1,hva15 pm(c4)DXt-1M ca-1,acc5 pac4t959NB qq(c8)t-2 hsc5 pac15t38d14 a15:pm(c15),hrs1 >da12=-126 _e40:qq(c1)t2 <d35-2,us(-31)t-96 >vk960,vkd11 lka12,vk960 <d41,pac75t39a12 pac76t20a12 arna12-d14D ac-5 >[ s t o p ] a9:pp1a12,arnp hva10LC hva5NA ca35,hva pmp1,nc57 nc38,hva5 hsc1XNC hva5NZ arn2c,ps(p) bss473,is58 grsb29,tl-7 <d41,ppp1 ncs-35,hva13 hsa14 hsa14 hvr-1NA hsa14 hsc15NA vk960,vkd11 skc,vkd11 arn2c,tl-7 a13:⨯ppp1,nc0 hva5NT >a6:ppp1,nc-4 ncs-59,cas-39 hva5LT tk12,udr-1 arnp-1,tl-6 ca-1,hvna6 bss473,pmp hha9NB ppp1,cln-10 a10:vkd21VLC gab36,hha9 lkd14,vk960 arnd14+d45,gr1b26 tl-32 tln36,gtb33 tl1,nc0 ptb33t511 tl-21,grb24 tln16,arb24 grb24,grb23 pi2,arn-2 hha11NC pm-2,hsnc3 <d41,grnb37,lka12 ⨯grnb37,lkd14 >pae42te41 a11:vk3,mba11 ca1,pi3 vyd43-1t-d43 b31:sy64LRB gkb16,udb31grne___t1M _3-1it(r-1),bs78e3 hvr-2 gr39e3VMAe _[ s t o p ] ba40 _e41:hsc27gr__e_MC 79_3hva2 ca63,srb11 hrs1 e48: b32:lyne18V arn10e5,hva28 mbr1,pme18 ca63,hve48 hrs1Xa:gre___,gsa2 _1-1bs(a)t78e1 sy64,hvr3 nc64 bsp1,hvs1 it(a7),pta3 it(a23),pta4 ppe1-1,psr ppp1,arnp itp-1,bs(a) hv(a17)t2 gia5V a1:qqb44,hse38a2:psa__,pp0 _11paate1-1a3:paa7t_ 0a4:paa23ta5:pi___t255 256a6:hvs1,hs(e42) psa11,gae18-2 pm14DM ca59,bs(b) hva13XIQA[ s t o p ] pma34,arne18-1 qq(b1)Xt75IZA sy59LZ a7:btt-1 arn(a7)DXVIZB pana7Vt2IZA a8:qqVt1LZB paa23XLZA paa15t-e10+1018 hva17NZB hva17NRB pma8X pp-1,hse39 sy64,sy64 pme18-1,hva16 a9:pi0Xt-9LQA a10:btXt-150LRB hvna24XLRBda11=i-1 _hs(a13)LPCe42:hse__NQA _48pme18-2,uda9 a34:gafa13VNTa12:hse36ta__IPA _11nc64LRB ca14VIPC ppa-1a11,hva13 hha6IZB ac(b1)Dt1LQB nc13LRB a13:pmVte5IPC sy64,hva27 nc58,ca60 hva10 paa10,ca28 mt-1DLZA hva22XNPB a14:hva29LZA hhp1a11LPC pi0Xt-257 a15:ncnXVt-1 a16:psa11XV arb,uda19 hva20NZC[ s t o p ] a17:hvr_t2NRB 0hv(a)Dt1a18:gre___t1 _3-1hvs1 ck-10,hhr2 a19:are5DV ck-20,ac(a18) hvs1 ck10,ac(a18)b30:arn__DVt1LA -1a33:paa17,hvs1 b33:gm2b26,ca a20:qqb43,hse16 arnb9,scb23 hse24 qqb23,pm(a18) is(a18),sks-39 qq(a18)t-80LB pm2b26,hva33 a22:bs(a13)t64e5NPA psa12,hve43 ca512,hhp1a11 nc896XVLT gaa13,hva13 hva28X srbXVNZA a29:pmbXV hva15IZB a23:ca,hva16 gaa23,ude12 arn60D psa16-1,hva17 a32:qqb47,hse16 a24:ca60,hv1a11 syn29,sy17 a25:pab,mlb12 lyna26,ca60 panbt128 ca58,panb hv1a25LZ[ s t o p ] ca16,pana26 is(b),bss511 a26:bst9 cln-10V ck10,hha25 gaa13,paa10 sy62,hva13 a27:hva1NZB a28:pm513DXVLZB ca832,hva32 hva14XNZB pp-1,hsa17bt___t-1 159hvn(a17)t2 arnb23,grb20 grb22 pp(b30),ppp1 a30:gpb18,bsp510 vk960,hha31 ppp-2,hse24 qqb23,lke1 scb24,hse24 qqb24,lk40e1 ske1,hse24 acb23,sk40e1 a31:hha30,vkc63 lke1,lk40e1 arna8,nc0 hse39NRBe _ba30 _da=e1+c82-c28 _arnb28,gab5 tl-2,pab16 ca1.5+d32.7,itb46 arnb28,tl-7 hva1NT tk17,gab16 pae8te17 paa5,hvna12 a1:<-d41+1, tl-25,tln16 grb21,tln16 grb25,grb23 a12:qqe2,vk960 ⨯qqe2,gaa2 tl7,hse1 pme1,gmb21 a2:hhr,arn-2 hha4,pta11 hva3,pm4b6 hva9,pma13[ s t o p ] hva14NZ arnb28,cmb27 pab34Vt32 qqb41,hse16 pae44,grnb23 grnb54,hva10 a3:arnb28,srb27 pae31t1LZ a4:hva10,grb25 grb23,pae15 hvna12 a9:pt2at2 arn2DV a10:pm3a,arn1a grb52,gmb53 srnb53,srb9 grb50,ar2a ar1a,ara16 grb51,arnb6 gre27,arna15 gre28,arn4a gab39,tk10a11:ar__Dt___ 16 -16gab35,it(b35) qq(b34),cln-10 a12:vke2,ace15 >arnb27,hs40e1 <d41,hva14NZ >pm-2IQC hha8XNC pm40e1,gmb24 pp40e1,hve20e50:hvr_Vte49NQB 0<d41,vk960 pa18e1t11e1 arn18e1,il pa1e7te23 >pte21Vte19de49=i-e50-1 _gpe22,hve20 a17:vy(b16),pmr pp79e2,hse34 gpe33,hse34 b36:a7:btt-1 paa6Vt240a5:pi_,hve6 8a6:bt___t-1 240psr-2,hvn(e8) a8:hva7,vy1 ac(b16)D ppe13,cad17b37:lyn____ __DNRBgp1e7MA pmb32,gme7 hva17[ s t o p ] <d41, a13:qq-1.2+1.23-1.27 a14:qqb45,hse16 a15:hve30 a16:qq2568.39 > b27:qq-1.2+d17.19 b28:qq-2.2+32.19db29=b27-57,b46=1b26-b28 _b42:tparam; _b43:tfull; _b47:ttermination; _b44:k29 _tannul; _63,62. <d41,b45:tlabel; _>e _<i-c27+10,ilength _><i-c48,ilength1 _>[ s t o p ] di=i+39,d=k-d1 _bk=d42,i=0,a10 _da1=d19-960 _da=d,<d35,a=2> _<d39,di=d2 _hs1 hva5 <d36,tres; _qqfa.39 ⨯<d39,tset; _qqfd35.39 qqfa.39[ s t o p ] [ s u m ] [ 0 5 4 ] ibase,edit _s _[ s t o p ] [ c l e a r ] ><d39, qq39, qq57, qq52, qqftedit; _qqfd.9+e40.19+e4.29 qqf, a5:hs1 hva6tmove; _qq50, qqfd.23+d1.39+a1.29-a1.33tedit; _qqf, a6:hs1 hva7tsetsum; _tedit; _qqf,dd2=i _a7:hsf2 ⨯di=d48 _qqd35.2+11.7+d36.5+d.23+d1.39, qq,tedit; _qqd.9+e40.19+e4.29dd48=i _qqf >dd1=d+d1 _e _e _[ s t o p ] [ s u m ] [ 0 4 2 ] iedit _s _[ s t o p ]