1PAGE 1    PROGRAM TO TEST TABLES                            (C) 1978 UND
 
     * * * * *    S O U R C E    L I S T I N G    * * * * *

     0001  TITLE PROGRAM TO TEST TABLES                                            
     0002  * EULER                                                                 
     0003  * NARROW                                                                
     0004  * NOSTATS                                                               
     0005  L LEVEL.K=INTGRL(RATE.JK)                                               
     0006  R RATE.KL=LEVEL.K                                                       
     0007  N LEVEL=0                                                               
     0008  S HL.K=TABHL(TAB1,TIME.K,1,10,1)                                        
     0009  S LE.K=TABLE(TAB1,TIME.K,1,10)                                          
     0010  T TAB1=1,2,1,2                                                          
     0011  PARM DT=.2                                                              
     0012  PARM STOP=10                                                            
     0013  PARM PLTPER=.2                                                          
     0014  PLOT HL=+(0,3),LE=*                                                     
1PAGE 2    PROGRAM TO TEST TABLES                            (C) 1978 UND
 
      +=HL        *=LE        
 
    *+  0             .75           1.5           2.25          3             
     0  . . . . . . . . . .+. . . . . . . . . . . . . . . . . . .        
        .             .    +        .             .             .        
        .   *         .    +        .             .             .        
 T      .        *    .    +        .             .             .        
 I      .             *    +        .             .             .        
 M      .             .    +        .             .             .  +*    
 E      .             .     +  *    .             .             .        
        .             .      +    * .             .             .        
        .             .       +     .*            .             .        
        .             .         +   .   *         .             .        
     2  . . . . . . . . . . . . .+. . . . * . . . . . . . . . . .        
        .             .           + .      *      .             .        
        .             .            +.        *    .             .        
        .             .             .+        *   .             .        
        .             .             . +        *  .             .        
        .             .             .  +       *  .             .        
        .             .             .   +      *  .             .        
        .             .             .     +    *  .             .        
        .             .             .      +   *  .             .        
        .             .             .       + *   .             .        
     4  . . . . . . . . . . . . . . . . . . .+. . . . . . . . . .  +*    
        .             .             .       +     .             .  +*    
        .             .             .      +      .             .  +*    
        .             .             .     +       .             .  +*    
        .             .             .   +*        .             .        
        .             .             .  +*         .             .        
        .             .             . +           .             .  +*    
        .             .             .+            .             .  +*    
        .             .            +.             .             .  +*    
        .             .           + .             .             .  +*    
     6  . . . . . . . . . . . . *+. . . . . . . . . . . . . . . .        
        .             .        *+   .             .             .        
        .             .       +     .             .             .  +*    
        .             .      +      .             .             .  +*    
        .             .     +       .             .             .  +*    
        .             .    +        .             .             .  +*    
        .             .   * +       .             .             .        
        .             .  *   +      .             .             .        
        .             .  *    +     .             .             .        
        .             .  *      +   .             .             .        
     8  . . . . . . . . .*. . . .+. . . . . . . . . . . . . . . .        
        .             .  *        + .             .             .        
        .             .   *        +.             .             .        
        .             .    *        .+            .             .        
        .             .      *      . +           .             .        
        .             .       *     .  +          .             .        
        .             .         *   .   +         .             .        
        .             .            *.     +       .             .        
        .             .             . *    +      .             .        
        .             .             .    *  +     .             .        
    10  . . . . . . . . . . . . . . . . . . .+. . . . . . . . . .  +*