                                         ------ SCANNED 10/8/06 304349-VOLUME_I.PDF PAGE 303/307 ------           
       00615  0 50000 0 00175        CLA WRKSC+1           TEST 1ST SUBSCRIPT SYMB0L                  F24010.     
       00616  0 10000 0 00630        TZE S2                N0 SYMB0L PRESENT                          F2401040    
       00617  0 60100 0 00435        STO OR000+1           SAVE S1 FOR LXC ROUTINE                    F24010A0    
       00620  0 53400 1 01433        LXA L(4),1            INDEX FOR N0. OF COMPILED INSTR.           F2401050    
       00621 -0 76000 0 00141        MSE 97                DOES 1ST C0EFF EXCEE0 1                    F2401080    
       00622  0 02000 0 00624        TRA COMP20            N0                                         F2401090    
       00623  1 00002 1 00626        TXI COMP30,1,2        YES. 6 INSTR. T0 BE COMPILED               F2401100    
       00624  0 50000 0 01436 COMP20 CLA KLX02             N0. COMPILE INSTR T0 COMPUTE               F24011T0    
       00625  0 02000 0 00627        TRA COMP30+1          S1-1+(1 ALREADY IN ERASABLE)               F2401120    
       00626  0 50000 0 01437 COMP30 CLA KLX021            YES. COMPILE C1A1-1                        F2401130    
       00627  0 07400 4 01257        TSX LXC,4             +(1 AREADY IN ERASABLE)                    F2401140    
       00630  0 50000 0 00177  S2    CLA WRKSC+3                                                      F2401150    
       00631  0 10000 0 00645        TZE S3                TRA IF N0 2ND SUBSC, SYMB0L                F2401160    
       00632  0 60100 0 00440        STO OR000+4           SAVE S2 FOR LXC ROUTINE.                   F2401170    
       00633  0 50000 0 00202        CLA WRKSC+6           0BTAIN SYMB0LIC ADDRESS                    F2401180    
       00634  0 07400 4 01054        TSX FIXC0N,4          OF D1 IN FIXC0N TABLE                      F2401190    
       00635  0 60100 0 00443        STO OR000+7           AND STORE FOR LXC ROUTINE.                 F2401200    
       00636  0 53400 1 01435        LXA L(6),1            6 INSTR. T0 BE COMPILED                    F2401210    
       00637 -0 76000 0 00142        MSE 98                IS C0EFF. C2 GREATER THAN 1,               F2401220    
       00640  0 02000 0 00643        TRA COMP40            N0. COMPILE D1*S2-D1+                      F2401230    
       00641  0 50000 0 01440        CLA KLX03             YES. 8 INSTR. COMPILED T0                  F2401240    
       00642  1 00002 1 00644        TXI COMP40+1,1,2      COMPUTE D1*S2*C3-D1+                       F2401250    
       00643  0 50000 0 01441 COMP40 CLA KLX031                                                       F2401260    
       00644  0 07400 4 01257        TSX LXC,4             + THAT ALREADY COMPUTED.                   F2401270    
       00645  0 50000 0 00201  S3    CLA WRKSC+5           TEST FOR 3RD SUBSCRIPT                     F2401280    
       00646  0 10000 0 00664        TZE COMP55            SYMB0L.                                    F2401290    
       00647  0 60100 0 00461        STO OR000+21          STORE FOR LXC ROUTINE.                     F2401300    
       00650  0 56000 0 00202        LDQ WRKSC+6           COMPUTE D1*D2,                             F2401310    
       00651  0 20000 0 00203        MPY WRKSC+7           AND 0BTAIN                                 F2401320    
       00652  0 76700 0 00021        ALS 17                NAME FOR THIS C0NSTANT FR0M                F2401330    
       00653  0 07400 4 01054        TSX FIXC0N,4          FIXC0N, AND STORE FOR                      F2401340    
       00654  0 60100 0 00464        STO OR000+24          LXC ROUTINE.                               F2401350    
       00655  0 53400 1 01435        LXA L(6),1            6 INSTR. T0 BE COMPILED                    F2401360    
       00656 -0 76000 0 00143        MSE 99                IS 3RD C0EFF GREATER THAN 1.               F2401370    
       00657  0 02000 0 00662        TRA COMP50            N0. COMPILE D1D2*S3-D1D2+                  F2401380    
       00660  0 50000 0 01442        CLA KLX05              YES, COMPILE D1D2*C3S3-D1D2+              F2401390    
       00661  1 00002 1 00663        TXI COMP50+1,1,2                                                 F2401400    
       00662  0 50000 0 01443 COMP50 CLA KLX051                                                       F2401410    
       00663  0 07400 4 01257        TSX LXC,4             + THAT ALREADY COMPUTED.                   F2401420    
       00664 -0 53400 4 01045 COMP55 LXD BBOX,4                                                       F2401430    
       00665  1 00004 4 00666        TXI COMP55+2,4,4      STEP UP CIT BUFFER COUNT                   F2401440    
       00666 -0 63400 4 01045        SXD BBOX,4                                                       F2401450    
       00667  0 07400 4 00674        TSX ST0TP,4           COMPILE INSTRUCTION T0 STORE               F2401460    
       00670 -0 53400 1 01402        LXD 1XB0X,1           LOADING VALUE FOR SUBSCRIPT C0MB.          F2401470    
       00671 -0 53400 2 01402        LXD 1XB0X,2                                                      F2401480    
       00672 -0 53400 4 01012        LXD LINK1,4                                                      F240149P    
       00673  0 02000 4 00001        TRA 1,4               RETURN                                     F2401500    
       00674 -0 63400 4 01404  ST0TP SXD LINK2,4           ROUTINE COMPILES THE INSTR.                F2401510    
       00675  0 50000 0 01427        CLA L(0)              T0 STORE THE RESULTS OF                    F2401520    
       00676  0 60100 0 01050        STO CIL00             THE SUBROUTINE COMPILATION IN              F2401530    
       00677  0 60100 0 01053        STO CIL03             THE TAG NAME.                              F2401540    
       00700  0 50000 0 01425        CLA L(STO)            THIS INSTRUCTION IS                        F2401550    
       00701  0 60100 0 01051        STO CIL01                                                        F2401560    
       00702  0 50000 0 01375        CLA NAME1             ST0 12)+ NAHE1                             F2401570    
