DataMuseum.dk

top - metrics - download

    Length: 3840 (0xf00)
    Types: TextFile
    Names: »allist«

└─⟦667bb35d6⟧ Bits:30007480 RC8000 Dump tape fra HCØ.
    └─⟦4334b4c0b⟧ 
        └─⟦this⟧ »allist« 

TextFile

*lookup rydgen1txt
rydgen1txt =set 27 disc3 d.810107.1654 0 0 0 0  ; day
           ;  193 157 2 120 129
*rydgen1=set 200 disc3
*scope day rydgen1
*kjh=lookup alutproc ryproc rydseg rydstruct ryglobal statevar stateloop ionloop,
   coreproc
***lookup alutproc unknown
***lookup ryproc unknown
***lookup rydseg unknown
***lookup rydstruct unknown
***lookup ryglobal unknown
***lookup statevar unknown
***lookup stateloop unknown
***lookup ionloop unknown
***lookup coreproc unknown
*if ok.no
*extract from.crypr alutproc ryproc rydseg rydstruct ryglobal statevar stateloop,
   ionloop coreproc

alutproc        8  d.810110.0832  on  crypr       
ryproc         12  d.801125.1644  on  crypr       
rydseg          9  d.810216.1431  on  crypr       
rydstruct      19  d.810204.1157  on  crypr       
ryglobal        2  d.800731.1451  on  crypr       
statevar        1  d.800507.1437  on  crypr       
stateloop       2  d.800909.1740  on  crypr       
ionloop         2  d.800909.1738  on  crypr       
coreproc        7  d.801009.1459  on  crypr       
end        648  
*lkj=lookup allstatel
***lookup allstatel unknown
*if ok.no
*extract from.crypr allstatel

allstatel       2  d.810203.1339  on  crypr       
end         96  
*lkj=lookup rydritz
***lookup rydritz unknown
*if ok.no
*extract from.cryprog rydritz

rydritz         4  d.801121.1629  on  cryprog     
end        105  
*clear temp lkj
*lookup rydterm
***lookup rydterm unknown
*if ok.yes
*lookup rydlist
***lookup rydlist unknown
*if ok.yes
*if 11.yes 15.no
*rydgen1=algol blocks.yes

c
  0     1 rydgen1
  0     1 1980-11-10
  0     1 begin

 1. line  2    24  algol list.off copy.statevar;
statevar d.800507.1437
    line  2    29  end medium
c
    line  2    33  algol list.off copy.stateloop;
stateloop d.800909.1740
    line  6    74  end medium
c
    line  2   650  algol list.off copy.statevar;
statevar d.800507.1437
    line  2   655  end medium
c
    line  2   655  algol list.off copy.ionloop;
ionloop d.800909.1738
    line  5   692  end medium
c
    line  2   709  algol list.off copy.statevar;
statevar d.800507.1437
    line  2   714  end medium
c
    line  2   714  algol list.off copy.ionloop;
ionloop d.800909.1738
    line  5   751  end medium
c
    line  5   751  algol list.off copy.stateloop;
stateloop d.800909.1740
    line  9   792  end medium
c
    line  1   800  algol copy.rydritz;
rydritz d.801121.1629
    line  1   899  end medium
c
    line  1   899  algol list.off copy.alutproc;
alutproc d.810110.0833
    line  1  1145  end medium
c
    line  1  1145  algol list.off copy.rydstruct;
rydstruct d.810204.1157
    line  2  1552  algol copy.statevar;
statevar d.800507.1437
    line  2  1557  end medium
rydstruct
    line  2  1611  algol copy.statevar;
statevar d.800507.1437
    line  2  1616  end medium
rydstruct
    line  1  1680  end medium
c
    line  1  1680  algol list.off copy.rydseg;
rydseg d.810216.1432
    line  1  1918  end medium
c
    line  1  1918  algol list.off copy.coreproc;
coreproc d.801009.1459
    line  1  2103  end medium
c
    line  1  2103  algol list.off copy.ryproc <*lsproc*>;
ryproc d.801125.1644
    line  1  2429  end medium
c
    line  1  2429  algol list.off copy.ryglobal;
ryglobal d.800731.1451
    line  1  2456  end medium
c
  0  2488 end

algol end 200
*o c
▶EOF◀