DataMuseum.dk

Presents historical artifacts from the history of:

RegneCentralen GIER Computer

This is an automatic "excavation" of a thematic subset of
artifacts from Datamuseum.dk's BitArchive.

See our Wiki for more about RegneCentralen GIER Computer

Excavated with: AutoArchaeologist - Free & Open Source Software.


top - download

⟦16e291c62⟧ Bits:30000565 GSL 474.08 clear, ... (10) 8.08.67, 8-hole paper tape

    Length: 3751 (0xea7)
    Description: Bits:30000565 GSL 474.08 clear, ... (10) 8.08.67
    Types: 8-hole paper tape
    Notes: Gier Text

GIER Text (HTML)

[22.7.1967                    (10)                set, res, clear]
<-d55+1, i version _
s _
> [stop] [clear]
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 [stop] 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; _
[stop] 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,gpb15
b10:ns_.4,iss-_.6 1 1
b11:arns_.4+_.6+_.7Dt-_.7 1 1 1 1
ac1b,nc0 hva6LQB a17:hsc1 hva36NT a18:arnp1,tl-6 ca-1VNC hva6 ppp1,hva18 nc-6,hva5 acnp1MB ppp1,pmnp1 hha22XNC hha22XLC hva6XLA [stop] 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 1
arnbVt1IRC _
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 hva26
a30: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 [stop] <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 > [stop] 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 [stop] 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 _ 4
hv-9 [stop] i=39i, d=k-d1
b 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 a5
tmove; _
qq 50, qqf d.23+d1.39+a1.29-a1.33
tset; _
qqf, a5: hs 1 hv a6
tsetsum; _
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.29
tres; _
qq d.9+a7.19+a2.29
tclear; _
qq d.9+a8.19+a2.29 d48=i qqf > d1=d+d1
e _
e _
[STOP, SUM][stop] [sum] [059] i set, res clear _
s _
[stop]