                                         ------ SCANNED 10/8/06 304349-VOLUME_I.PDF PAGE 401/405 ------           
       00101  2 00004 1 00100        TIX RDRB5,1,4                                                    F3B00520    
       00102  0 60200 0 02350        SLW CHS2                                                         F3B00530    
       00103  0 50000 0 02347        CLA CHS1            COMPUTED CHECK SUM.                          F3B00540    
       00104  0 40200 0 02350        SUB CHS2            D0 CHECK SUMS HATCH                          F3B00550    
       00105  0 10000 0 00110        TZE STRS            YES                                          F3B00560    
       00106  2 00001 4 00057        TIX RDRA3,4,1       IF THE SUMS D0NT AGREE, TRY  4 M0RE TIMES    F3B00570    
       00107  0 07400 4 00004 C0R3   TSX 4,4             CHECK SUMS INC0RRECT AFTER 5 TRIES           F3B00580    
                                         PROGRAM T0 S0RT TRAST0 ENTRIES BY TYPE                       F3B00590    
       00110  0 50000 0 02345 STRS   CLA TRSWC           INITIALIZATION OF ALL M0DIFIED ADDRESSES     F3B00600    
       00111  0 40000 0 02333        ADD TRS0RG                                                       F3B00610    
       00112  0 62100 0 00135        STA A4                                                           F3B00620    
       00113  0 62100 0 00140        STA A1                                                           F3B00630    
       00114  0 62100 0 00144        STA A3                                                           F3B00640    
       00115  0 62100 0 00154        STA B1                                                           F3B00650    
       00116  0 62100 0 00162        STA B5                                                           F3B00660    
       00117  0 62100 0 00174        STA C3                                                           F3B00670    
       00120  0 62100 0 00204        STA D2                                                           F3B00680    
       00121  0 62100 0 00210        STA D3                                                           F3B00690    
       00122  0 62100 0 00220        STA E2                                                           F3B00700    
       00123  0 62100 0 00226        STA E4                                                           F3B00710    
       00124  0 62100 0 00240        STA F3                                                           F3B00720    
       00125 -0 63400 0 02337        SXD 1BOX,0          CLEAR DECREMENT OF W0RK AREA                 F3B00730    
       00126 -0 63400 0 02340        SXD 2BOX,0                                                       F3B00740    
       00127 -0 63400 0 02341        SXD 3BOX,0                                                       F3B00750    
       00130 -0 63400 0 02342        SXD 4BOX,0                                                       F3B00760    
       00131 -0 63400 0 02343        SXD 5BOX,0                                                       F3B00770    
       00132 -0 63400 0 02344        SXD 6BOX,0                                                       F3B00780    
       00133  0 53400 1 02345        LXA TRSWC,1         WORD COUNT IN IR 1                           F3B00790    
       00134  1 77776 1 00135        TXI A4,1,-2                                                      F3B00800    
       00135  0 50000 1 00000  A4    CLA 0,1             0BTAIN WORD 3, AND SEPARATE TYPES            F3B00810    
       00136 -0 12000 0 00203        TMI D1              ENTRY IS TYPE 4,5 0R 6, 3RD WD, MINUS        F3B00820    
                                         ENTRY IS TYPE 1, 2, 0R 3                                     F3B00830    
       00137  1 00002 1 00140        TXI A1,1,2          RESTORE LOOP COUNT                           F3B00840    
       00140  0 50000 1 00000  A1    CLA 0,1             0BTAIN WORD 1                                F3B00850    
       00141  0 12000 0 00153        TPL B2              E+H+H,)N,IMHH(1 0R 2                         P3B0D89D    
                                         ENTRY IS TYPE 3                                              F3B00870    
       00142  0 53400 4 02277        LXA L(4),4          MINUS IN FIRST AND TH1RD WDS.                F3B00880    
       00143 -0 53400 2 02341        LXD 3BOX,2          PLACE A COUNT OF 4 IN IR 4,                  F3B00890    
       00144 -0 50000 1 00000  A3    CAL 0,1             CLEAR IR 2, AND GET 1ST WD. IN ACC           F3B00900    
       00145  0 60200 2 04030        SLW TYPE3,2         PLACE IN PROPER MEMORY L0C.                  F3B00910    
       00146  1 77777 2 00147        TXI A2,2,-1         SUB. 1 FR0H IR 2, LOOP BACK                  F3B00920    
       00147 -0 63400 2 02341  A2    SXD 3BOX,2          T0 GET 4 WORDS IN PROPER L0C.                F3B00930    
       00150 -2 00001 1 00247        TNX PACK,1,1        EXIT FOR END OF TRAST0                       F3B00940    
       00151  2 00001 4 00144        TIX A3,4,1                                                       F3B00950    
       00152  1 77776 1 00135        TXI A4,1,-2         PICK UP NEXT TRAST0 ENTRY                    F3B00960    
                                         ENTRY IS TYPE 1 0R 2                                         F3B00970    
       00153  1 77777 1 00154  B2    TXI B1,1,-1                                                      F3B00980    
       00154 -0 50000 1 00000  B1    CAL 0,1             0BTAIN WORD 2                                F3B00990    
       00155 -0 32000 0 02335        ANA MASK            EXAMINE PREFIX, IF TYPE 2 HAS MINUS SIGN     F3B01000    
       00156  0 10000 0 00171        TZE C1              ENTRY IS TYPE 1                              F3B01010    
                                         ENTRY IS TYPE 2                                              F3B01020    
       00157  1 00001 1 00160        TXI B3,1,1          RESTORE COUNT T0 GET WORD 1                  F3B01030    
       00160  0 53400 4 02277  B3    LXA L(4),4          COUNT 4 IN IR 4                              F3B01040    
       00161 -0 53400 2 02340        LXD 2BOX,2          CLEAR IR 2                                   F3B01050    
