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                                            00000010
     0002  * EULER                                                                 00000020
     0003  * NOSTATS                                                               00000040
     0004  L LEVEL.K=INTGRL(RATE.JK)                                               00000050
     0005  R RATE.KL=LEVEL.K                                                       00000060
     0006  N LEVEL=0                                                               00000070
     0007  S HL.K=TABHL(TAB1,TIME.K,2,8,2)                                         00000080
     0008  S LE.K=TABLE(TAB1,TIME.K,2,8)                                           00000090
     0009  S FL.K=TABFL(TAB1,TIME.K,2,8)                                           00000100
     0010  S ND.K=TABND(TAB1,TIME.K,2,8)                                           00000110
     0011  T TAB1=1,2,1,2                                                          00000120
     0012  PARM DT=.2                                                              00000130
     0013  PARM STOP=10                                                            00000140
     0014  PARM PLTPER=.2                                                          00000150
     0015  PLOT HL(.5,2.5),LE,FL,ND                                                00000160
1PAGE 2    PROGRAM TO TEST TABLES                                                                            (C) 1978 UND
 
      H=HL        L=LE        F=FL        N=ND        
 
        NFLH  .5                    1                     1.5                   2                     2.5        
           0  . . . .F. . . . . . . H . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .                  
              .        F            H                     .                     .                     .                  
              .         F           H                     .                     .                     .                  
       T      .           F         H                     .                     .                     .                  
       I      .            F        H                     .                     .                     .                  
       M      N              F      H                     .                     .                     .                  
       E      .   N           F     H                     .                     .                     .                  
              .        N        F   H                     .                     .                     .                  
              .            N     F  H                     .                     .                     .                  
              .     L           N  FH                     .                     .                     .                  
           2  . . . . . . . . . . . H . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .  HLFN            
              .                     .   H        L        .                     .                     .  LFN             
              .                     .        H            . L                   .                     .  LFN             
              .                     .            H        .          L          .                     .  LFN             
              .                     .                 H   .                L    .                     .  LFN             
              .                     .                     H                     L                     .  LFN             
              .                     .                     .   H                 .  L                  .  LFN             
              .                     .                     .        H            .   L                 .  LFN             
              .                     .                     .            H        .   L                 .  LFN             
              .                     .                     .                 H   . L                   .  LFN             
           4  . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . H . . . . . . . . . . .  HLFN            
              .                     .                     .                 HL  .                     .  LFN             
              .                     .                     .            H L      .                     .  LFN             
              .                     .                     .        HL           .                     .  LFN             
              .                     .                     .   HL                .                     .  LFN             
              .                     .                     H                     .                     .  HLFN            
              .                     .                LH   .                     .                     .  LFN             
              .                     .           LH        .                     .                     .  LFN             
              .                     .      L H            .                     .                     .  LFN             
              .                     .  LH                 .                     .                     .  LFN             
           6  . . . . . . . . . . . H . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .  HLFN            
              .                   L .   H                 .                     .                     .  LFN             
              .                 L   .        H            .                     .                     .  LFN             
              .                 L   .            H        .                     .                     .  LFN             
              .                  L  .                 H   .                     .                     .  LFN             
              .                     L                     H                     .                     .  LFN             
              .                     .    L                .   H                 .                     .  LFN             
              .                     .          L          .        H            .                     .  LFN             
              .                     .                   L .            H        .                     .  LFN             
              .                     .                     .        L        H   .                     .  LFN             
           8  . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . H . . . . . . . . . . .  HLFN            
              .                     .                     .                     HF  N           L     .                  
              .                     .                     .                     H  F     N            .                  
              .                     .                     .                     H   F        N        .                  
              .                     .                     .                     H     F           N   .                  
              .                     .                     .                     H      F              N                  
              .                     .                     .                     H        F            .                  
              .                     .                     .                     H         F           .                  
              .                     .                     .                     H           F         .                  
              .                     .                     .                     H            F        .                  
          10  . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . H . . . . . . .F. . . .