                                         ------ SCANNED 10/8/06 304349-VOLUME_I.PDF PAGE 327/331 ------           
       04736  0 60100 0 05200        STO CIL02                                                        F2508110    
       04737  0 07400 4 04345        TSX CIT,4                                                        F2508120    
       04740  0 02000 0 00000 RETURN TRA 0                 ADDRESS M0DIFIED,                          F2508130    
                                         *************************************************************F2508140    
                                         OP3 TESTS  FOR VARIABLE NS AND IF C0NSTANT COMPILES A        F2508150    
                                         CLA L(N2-N1), 0R IF VARIABLE CLA L(N2)....SUBL(N1),          F2508160    
       04741 -0 63400 4 05040 OP3    SXD EROP3,4                                                      F2508170    
       04742  0 50000 2 01076        CLA DOTAGZ,2          ARE ALL                                    F2508180    
       04743  0 77100 0 00017        ARS 15                N PARAMETERS                               F2508190    
       04744 -0 32000 0 05076        ANA L(7)              C0NSTANT.                                  F2508200    
       04745 -0 10000 0 04766        TNZ OP31              N0, OP31.                                  F2508210    
       04746  0 50000 2 01101        CLA DOTAGZ+3,2        YES,                                       F2508220    
       04747  0 40200 2 01100        SUB DOTAGZ+2,2        FORM            .                          F2508230    
       04750  0 76700 0 00022        ALS 18                N2-N1,                                     F2508240    
       04751  0 07400 4 04601        TSX FIXC0N,4          0BTAIN FIXC0N SYMB0L                       F2508250    
       04752  0 73400 4 00000        PAX 0,4               COMPILE                                    F2508260    
       04753 -0 32000 0 05104        ANA 6ONES             CLA                                        F2508270    
       04754  0 60100 0 05200        STO CIL02             L(N2-N1)                                   F2508280    
       04755 -0 75400 4 00000        PXD 0,4               AND                                        F2508290    
       04756  0 60100 0 05201        STO CIL03             RETURN                                     F2508300    
       04757  0 50000 0 05053        CLA L(CLA)            T0                                         F2508310    
       04760  0 60100 0 05177        STO CIL01             THE                                        F2508320    
       04761  0 50000 0 05133        CLA L(0)              CALLER.                                    F2508330    
       04762  0 60100 0 05176        STO CIL00             ZER0 L0CATION.                             F2508340    
       04763  0 07400 4 04345        TSX CIT,4                                                        F2508350    
       04764 -0 53400 4 05040        LXD EROP3,4                                                      F2508360    
       04765  0 02000 4 00001        TRA 1,4                                                          F2508370    
       04766  0 77100 0 00001 OP31   ARS 1                                                            F2508380    
       04767  0 76000 0 00001        LBT                                                              F2508390    
       04770  0 02000 0 04776        TRA OP32                                                         F2508400    
       04771  0 50000 2 01101        CLA DOTAGZ+3,2        N2 VARIABLE,                               F2508410    
       04772  0 60100 0 05200        STO CIL02             COMPILE                                    F2506420    
       04773  0 50000 0 05133        CLA L(0)              CLA L(N2).                                 F2508430    
       04774  0 60100 0 05201        STO CIL03                                                        F2508440    
       04775  0 02000 0 05006        TRA OP33                                                         F250645A)   
       04776  0 50000 2 01101 OP32   CLA DOTAGZ+3,2                                                   F2508460    
       04777  0 76700 0 00022        ALS 18                                                           F2508470    
       05000  0 07400 4 04601        TSX FIXC0N,4                                                     F2508480    
       05001  0 73400 4 00000        PAX 0,4                                                          F2508490    
       05002 -0 32000 0 05104        ANA 6ONES                                                        F2508500    
       05003  0 60100 0 05200        STO CIL02                                                        F2508510    
       05004 -0 75400 4 00000        PXD 0,4                                                          F2508520    
       05005  0 60100 0 05201        STO CIL03                                                        F2508530    
       05006  0 50000 0 05133 OP33   CLA L(0)                                                         F2508540    
       05007  0 60100 0 05176        STO CIL00                                                        F2508550    
       05010  0 50000 0 05053        CLA L(CLA)                                                       F2508560    
       05011  0 60100 0 05177        STO CIL01                                                        F2508570    
       05012  0 07400 4 04345        TSX CIT,4                                                        F2508580    
       05013  0 50000 2 01076        CLA DOTAGZ,2                                                     F2508590    
       05014  0 77100 0 00021        ARS 17                                                           F2508600    
       05015  0 76000 0 00001        LBT                                                              F2508610    
       05016  0 02000 0 05024        TRA OP34                                                         F2508620    
       05017  0 50000 2 01100        CLA DOTAGZ+2,2        N1IS VARIABLE,                             F2508630    
       05020  0 60100 0 05200        STO CIL02             PREPARE T0   .                             F2508640    
