DataMuseum.dk

Presents historical artifacts from the history of:

MIKADOS

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

See our Wiki for more about MIKADOS

Excavated with: AutoArchaeologist - Free & Open Source Software.


top - download

⟦9177b4e91⟧

    Length: 7648 (0x1de0)
    Notes: Mikados TextFile, Mikados_K
    Names: »FINTHER«

Derivation

└─⟦d110b5765⟧ Bits:30005308 Eksamensopgave i dynamiske systemer med FFT
    └─ ⟦this⟧ »FINTHER« 

Text

 17 FEB 81 JOB EXECUTION DATE                                                                                                       
                                                                                                                                    
        13 CARDS READ                                                                                                               
                                                                                                                                    
        45 SYSOUT PRINT RECORDS                                                                                                     
                                                                                                                                    
         0 SYSOUT PUNCH RECORDS                                                                                                     
                                                                                                                                    
      0.06 MINUTES EXECUTION TIME                                                                                                   
NEUCC  ALGOL W  (06FEB80)                                                        17 FEBRUARY 1981  Ø  11:54      PAGE   1           
0000 1-      BEGIN                                                                                                                  
0001 --      WRITE("DETTE ER EN TESTUDSKRIFT");                                                                                     
0002 --      WRITE("OG DET SKULLE GERNE VISE SIG,");                                                                                
0003 --      WRITE("AT ALGOLW-SYSTEMET OM LIDT");                                                                                   
0004 --      WRITE("STOPPER DETTE PRO-");                                                                                           
0005 --      IOCONTROL(1,2,3,4,5,6);                                                                                                
0006 --      WRITE("GRAMMMM....");                                                                                                  
0007 --      WRITE(" ");                                                                                                            
0008 --      IOCONTROL(1,2,3,4,5);                                                                                                  
0009 --      WRITE("ER DET SKET MED MIG $ $ $ ")                                                                                    
0009 -1      END.                                                                                                                   
EXECUTION OPTIONS: DEBUG,1 TIME=5 PAGES=2                                                                                           
000.01 SECONDS IN COMPILATION, (00668, 00000) BYTES OF CODE GENERATED                                                               
                                                                                                                                    
DETTE ER EN TESTUDSKRIFT                                                                                                            
OG DET SKULLE GERNE VISE SIG,                                                                                                       
AT ALGOLW-SYSTEMET OM LIDT                                                                                                          
STOPPER DETTE PRO-                                                                                                                  
GRAMMMM....                                                                                                                         
                                                                                                                                    
ER DET SKET MED MIG $ $ $                                                                                                           
------------------------------------------------------------------------------------------------------------------------------------
RUN ERROR       AT UNKNOWN LOCATION               - PAGE ESTIMATE EXCEEDED                                                          
000.00 SECONDS IN EXECUTION                                                                                                         
                                                                                                                                    
=> TRACE OF ACTIVE SEGMENTS                                                                                                         
=> SEGMENT NAME:  <BLOCK>                                                                                                           
                                                                                                                                    
                                                                                                                                    
                                                                                                                                    
NEUCC EXPRESS SYSTEM, MVS VERSION 1.1   1981-02-17      11.54.49     IDRIFTSAT 1979-07-13.                                          
EXPR000I $JOB ALGOLW,P=2                                                                                                            
                                                                                                                                    
 QQQQQ  17 FEB 81   12.04.13   SLUT J7316  NEU   A128004N  Q-NI P G THOMSEN         SIDER:                            NEU    QQQQQ  
 QQQQQ  17 FEB 81   12.04.13   SLUT J7316  NEU   A128004N  Q-NI P G THOMSEN         SIDER:                            NEU    QQQQQ  
 QQQQQ  17 FEB 81   12.04.13   SLUT J7316  NEU   A128004N  Q-NI P G THOMSEN         SIDER:                            NEU    QQQQQ  
 QQQQQ  17 FEB 81   12.04.13   SLUT J7316  NEU   A128004N  Q-NI P G THOMSEN         SIDER:                            NEU    QQQQQ  
 QQQQQ  17 FEB 81   12.04.13   SLUT J7316  NEU   A128004N  Q-NI P G THOMSEN         SIDER:                            NEU    QQQQQ  
 QQQQQ  17 FEB 81   12.04.13   SLUT J7316  NEU   A128004N  Q-NI P G THOMSEN         SIDER:                            NEU    QQQQQ