                                         ------ SCANNED 10/8/06 304349-VOLUME_I.PDF PAGE 349/353 ------           
       05522  0 07400 4 07271        TSX LXC,4             COMPILER.                                  F2519970    
       05523  0 50000 0 05252 AC064  CLA 0REDO                     ..                                 F2519980    
       05524  0 77100 0 00001        ARS 1                 S2                                         F2519990    
       05525  0 76000 0 00001        LBT                   DEFINED.                                   F2520000    
       05526  0 02000 0 05540        TRA AC080             S2 N0T DEFINED  S3.                        F2520010    
       05527  0 53400 1 05127        LXA L(2),1            CALL 0P2 ROUTINE--.                        F2520020    
       05530  0 07400 4 04670        TSX 0P2,4             T0 0PTIMIZE-).=-                           F2520030    
       05531  0 53400 1 05106        LXA L(6),1            COUNTER FOR.COMPILING                      F2520040    
       05532 -0 76000 0 00142        MSE 98                IS C0EF GREATER.THAN-1,                    F2520050    
       05533  0 02000 0 05536        TRA AC068             N0  --  -----.= )=-=).,                    F2520060    
       05534  0 50000 0 07354        CLA KLX03             YES.                                       F2520070    
       05535  1 00002 1 05537        TXI AC068+1,1,2       INCREMENT COMPILING COUNTER.               F2520080    
       05536  0 50000 0 07356 AC068  CLA KLX03I                          )----..---.H-.,              F2520090    
       05537  0 07400 4 07271        TSX LXC,4             COMPILE S2 LOAD VALUE.                     F2520100    
       05540  0 50000 0 05252 AC080  CLA 0REDO                     .--   - .-=-4-)                    F2520110    
       05541  0 76000 0 00001        LBT                                                              F2520120    
       05542  0 02000 0 05554        TRA AC096             S3 N0T DEFINED, EXIT.                      F2520130    
       05543  0 53400 1 05126        LXA L(1),1            CALL 0P2 ROUTINE-..).                      F2520140    
       05544  0 07400 4 04670        TSX 0P2,4             FOR 0PTIMIZATION                           F2520150    
       05545  0 53400 1 05106        LXA L(6),1            COMPILING.COUNTER.                         F2520160    
       05546 -0 76000 0 00143        MSE 99                TEST.FOR-C0EF-GREATER THAN 1.              F2520170    
       05547  0 02000 0 05552        TRA AC084             NONE.  - ---. -4--.-= )=+=),*              F2520180    
       05550  0 50000 0 07355        CLA KLX05             C3 GREATER THAN 1, COMPILE                 F2520190    
       05551  1 00002 1 05553        TXI AC084+1,1,2       KLX05 BLOCK.--- ., -=U..44                 F2520200    
       05552  0 50000 0 07357 AC084  CLA KLX05I            C3=1, COMPILE KLX05I                       F2520210    
       05553  0 07400 4 07271        TSX LXC,4             BLOCK.        ---.-.                       F2520220    
       05554  0 07400 4 07131 AC096  TSX CIL03I,4          COMPILE                                    F2520230    
       05555  0 50000 0 05051        CLA L(LXD)            LXD.                                       F2520240    
       05556  0 60100 0 05177        STO CIL01                                                        F2520250    
       05557  0 50000 0 07620        CLA OR000+26          ERASABLE 0BJECT TIME SYMB0L.               F2520260    
       05560  0 73400 1 00000        PAX 0,1                        ....-- )..- -U)==4-)              F2520270    
       05561 -0 32000 0 05104        ANA 6ONES                                                        F2520280    
       05562 -0 63400 1 05201        SXD CIL03,1                                                      F2520290    
       05563  0 60100 0 05200        STO CIL02                                                        F2520300    
       05564  0 07400 4 04345        TSX CIT,4             PUT IN BUFFER.                             F2520310    
       05565  0 50000 0 07620 AC100  CLA OR000+26                  .  .--)                            F2520320    
       05566  0 60100 0 07621        STO OR000+27                                                     F2520330    
       05567  0 53400 1 05131        LXA L(3),1            PREPARE T0                                 F2520340    
       05570 -0 63400 1 05207 AC109  SXD AX,1              CHECK FOR                                  F2520350    
       05571  0 50000 1 03652        CLA TAG2+3,1          DUPES.                                     F2520360    
       05572 -0 73400 2 00000        PDX 0,2               SAVE INDEX OF S.                           F2520370    
       05573 -3 00000 2 05743        TXL AC160,2,0         POS. N0T M0D. 8Y DO.                       F2520380    
       05574 -2 00001 1 05601 AC110  TNX AC116,1,1                     / .- ..-                       F2520390    
       05575  0 34000 1 03652        CAS TAG2+3,1          SKIP DUPES                                 F2520400    
       05576  0 02000 0 05574        TRA AC110             EXCEPT                                     F2520410    
       05577  0 02000 0 05743        TRA AC160             RIGHTM0ST.                                 F2520420    
       05600  0 02000 0 05574        TRA AC110                      -                                 F2520430    
       05601  0 50000 2 01106 AC116  CLA DOTAGZ+8,2        IS0LATE                                    F2520440    
       05602 -0 32000 0 05171        ANA 6T017             NAHE OF TEST                              F2520450     
       05603  0 60100 0 05204        STO TETTG             FOR THIS DO                                F2520460    
       05604  0 50000 0 03652        CLA TAG3              AND )  - -                                 F2520470    
       05605 -0 32000 0 05172        ANA 24T035            COMPARE            1                       F2520480    
       05606  0 76700 0 00022        ALS 18                WITH                                       F2520490    
       05607  0 34000 0 05204        CAS TETTG             CURRENT TAG.                               F2520500    
