                                         ------ SCANNED 10/8/06 304349-VOLUME_I.PDF PAGE 315/319 ------           
                        00030 CIB    BSS 100                                                          F2501550    
                        00174 DOTAG  BSS 450                                                          F2501560    
                        01076 TGTG   BSS 672                                                          F2501570    
 M                      02336 0MXTGA BSS 200                                                          F2501580    
                        02646 ADTG   BSS 404                                                          F2501590    
 M                      03472 0ADTGA BSS 100                                                          F2501600    
                        03636 WRKSC  BSS 8                                                            F2501610    
       03646  0 00000 0 00000 TAG1                                                                    F2501620    
       03647  0 00000 0 00000 TAG2                                                                    F2501630    
 M     03650  0 00000 0 00000 TAG21                                                                   F2501640    
 M     03651  0 00000 0 00000 TAG22                                                                   F2501650    
                        03652 TAG3   BSS 1                                                            F2501660    
                        03653 TAG4   BSS 1                                                            F2501670    
                                         MAN C0NSTITUTES THE HAIN LINEAR FLOW THR0UGH BLOCK 5.  A     F2501680    
                                         SUBROUTINE PICKS A DO BETA 0R ALPHA, AND THEN C0NTR0L IS PASSF2501690    
                                         ED T0 THE PROPER STATE, (BETA 0R ALPHA), T0 COMPILE ALL THE  F2501700    
                                         INDEXING INSTRUCTIONS FOR THAT PART OF THAT DO.  C0NTR0L IS  F2501710    
                                         RETURNED T0 MAN.  THIS PROCESS IS REPEAT,D UNTIL ALL ALPHAS  F2501720    
                                         AND BETAS IN A NEST HAVE BEEN TREATED.  THE WH0LE PROCEDURE IF2501730    
                                         IS REPEATED FOR EACH NEST AND THEN C0NTR0L IS PASSED T0 BLOCKF2501740    
                                         SIX.                                                         F2501750    
                                         ************************************************************ F2501760    
       03654  0 07400 4 04012  MAN   TSX TDOTG,4           READ ONE NEST OF DOTAG                     F2501770    
       03655  0 02000 0 03740        TRA MAN70             END OF PROBLEM                             F2501780    
       03656 -0 63400 2 04142        SXD DOGS60,2          INIT. DECREHENT OF TEST.                   F2501790    
       03657 -0 63400 2 03664        SXD MAN05,2                                                      F2501800    
       03660  0 53400 2 05057        LXA LMXDTG,2                                                     F2501810    
       03661 -0 50000 0 05103        CAL T1MSK             MASK FOR T1 WORD OF DOTAG                  F2501820    
       03662  0 32000 2 01104  MAN03 ANS DOTAGZ+6,2        T1 WORD HUST HAVE                          F2501830    
       03663  1 77767 2 03664        TXI MAN05,2,-9        S0HE BITS REM0VED FOR                      F2501840    
 D     03664  3 00000 2 03662  MAN05 TXH MAN03,2           SXD L0CATION                               F2501830    
       03665  0 07400 4 04027        TSX TTG,4             READ NEST OF TAGTAGS                       F2501860    
       03666 -0 63400 2 04165        SXD FIND10,2          SAVE COUNT OF TAGTAGS IN NEST              F2501870    
       03667  0 50000 0 05133        CLA L(0)              ZER0.                                      F2501880    
       03670  0 53400 2 05122        LXA LHXTGA,2          INITIALIZE APPENDED TGTG                   F2501890    
 M     03671  0 60100 2 02646  MAN06 STO MXTGA,2           T0.                                        F2501900    
       03672  2 00001 2 03671        TIX MAN06,2,1         ZER0.                                      F2501910    
       03673  0 53400 2 05124        LXA LZEKMX,2          INITIALIZE APPENDED ADTAG                  F2501920    
 M     03674  0 60100 2 03472  ST0   STO ADTGA,2           T0                                         F2501930    
       03675  2 00001 2 03674        TIX ST0,2,1           ZER0                                       F2501940    
       03676  0 50000 0 05133  MAN10 CLA L(0)              INITIALIZE                                 F2501950    
       03677  0 60100 0 05173        STO BB0X              INDICAT0RS                                 F2501960    
       03700  0 60100 0 05230        STO DOIND                                                        F2501970    
       03701  0 60100 0 05231        STO DOIND1                                                       F2501980    
       03702  0 60100 0 05233        STO SWICH1                                                       F2501990    
       03703  0 50000 0 05123        CLA ALLONE            INITIALIZE                                 F2502000    
       03704  0 60100 0 05244        STO VCTR              INSTRUCTION COUNTER                        F2502010    
       03705  0 50000 0 05126  MAN20 CLA L(1)                                                         F2502020    
       03706  0 60100 0 05222        STO L0CIND                                                       F2502030    
       03707  0 07400 4 04055        TSX DOGS,4            SELECT B0R A                               F2502040    
       03710  0 02000 0 03731        TRA MAN50             NEST COMPLETELY ANALYZE0                   F2502050    
       03711  0 50000 0 05233        CLA SWICH1            IS APPROPR1ATE                             F2502060    
       03712  0 34000 0 05205        CAS SWICH2            C0DING IN CORES                            F2502070    
       03713  0 02000 0 03715        TRA MAN35             N0                                         F2502080    
