                                         ------ SCANNED 10/8/06 304349-VOLUME_I.PDF PAGE 319/323 ------           
       04145  0 53400 2 05233        LXA SWICH1,2                       --                            F2503720    
       04146  0 50000 0 05136        CLA BIT1              ORDER T0 PLACE BIT IN                      F2503730    
       04147 -3 00000 2 04151        TXL DOGS70,2,0        A 0R B USED                                F2503740    
       04150  0 77100 0 00001        ARS 1                 INDICAT0R POSITION                         F2503750    
       04151 -0 60200 1 01076 DOGS70 ORS DOTAGZ,1                                                     F2503760    
       04152  0 02000 4 00002        TRA 2,4               EXIT AFTER FINDING DO                      F2503770    
                                         *************************************************************F2503780    
                                         SCAN SCANS TAGTAG FOR THE FIRST ENTRY THAT IS M0DIFIED BY A DF2503790    
                                         DO WH0SE ALLPHA IS LESS THAT THE CURRENT DOTAG BETA.         F2503800    
                                         THIS TAG IS CALLED RTXTGX.                                   F2503810    
       04153  0 53400 1 05121 SCAN   LXA LMXTG,1           COMPARE 8 WITH DOFOR                       F2503820    
       04154  0 50000 0 05225 SCAN05 CLA B                 DOTAG A OF EACH TAGTAG                     F2503830    
       04155  0 34000 1 02336        CAS MXTGTG,1          ENTRY IN NEST                              F2503840    
       04156  1 00004 1 04161        TXI SCAN10,1,4        SEARCH COMPLETED.                          F2503850    
       04157  0 07400 4 00004        TSX DIAG,4            EQUALITY IMPOSSIBLE.                       F2503860    
       04160  1 77774 1 04154        TXI SCAN05,1,-4       G LESS THAN A.                             F2503870    
       04161  0 02000 4 00001 SCAN10 TRA 1,4                                                          F2503880    
                                         *************************************************************F2503890    
                                         FIND, BEGINNING WITH RTXTGX, SEARCHES FOR A TAGTAG ENTRY M0DIF2503900    
                                         F1ED BY THE CURRENT DO.                                      F2503910    
       04162 -0 63400 4 04176 FIND   SXD FIND22,4                                                     F2503920    
       04163 -0 53400 1 05237        LXD XTG,1                                                        F2503930    
       04164  1 77774 1 04165 FINDO4 TXI FIND10,1,-4       BUMP T0 NEXT TGTG ENTRY.                   F2503940    
 D     04165  3 00000 1 04170 FIND10 TXH FIND20,1          DECREMENT C0NTAINS TGTG COUNT.             F2503950    
       04166 -0 53400 4 04176        LXD FIND22,4                                                     F2503960    
       04167  0 02000 4 00001        TRA 1,4               END OF TGTG TABLE AND DO.                  F2503970    
       04170  0 50000 0 05224 FIND20 CLA A                 COMPARE DOTAGA WITH                        F2503980    
       04171  0 34000 1 02336        CAS MXTGTG,1          TGTG DOFOR DQTAG A.                        F2503990    
       04172  0 02000 0 04166        TRA FIND10+1          END OF DO.                                 F2504000    
       04173  0 76100 0 00000        NOP                                                              F2504010    
       04174  0 07400 4 04213        TSX TGFM,4                                                       F2504020    
       04175  0 07400 4 04204        TSX ISC,4                                                        F2504030    
 D     04176 -3 00000 0 04164 FIND22 TXL FINDO4,0          POSIND=3 IF LEFTM0ST SYMB0L.               F2504040    
       04177 -0 75400 2 00000        PXD 0,2               2IF CEN7ER.                                F2504050    
       04200  0 77100 0 00022        ARS 18                1 IF RIGHTM0ST.                            F2504060    
       04201  0 60100 0 05240        STO POSIND                                                       F2504070    
       04202 -0 53400 4 04176        LXD FIND22,4                                                     F3504080    
       04203  0 02000 4 00002        TRA 2,4               SUCCESSFUL SEARCH.                         F2504090    
                                         *************************************************************F2504100    
                                         ISC IS CALLED BY FIND T0 TEST FOR M0DIFICATION.              F2504110    
       04204  0 53400 2 05126 ISC    LXA L(1),2            COMPARE SUBSCRIPT                          F2504120    
       04205  0 50000 0 05230        CLA DOIND             WITH THE INDEX                             F2504130    
       04206  0 40200 2 03652        SUB TAG2+3,2          OF THE CURRENT DO.                         F2504140    
       04207  0 10000 4 00002        TZE 2,4               CURRENT DO M0D1FIES THIS TAG.              F2504150    
       04210  1 00001 2 04211        TXI ISC+5,2,1         TRY NEXT LEFT                              F2504160    
       04211 -3 00003 2 04205        TXL ISC+1,2,3         SUBSCRIPT.                                 F2504170    
       04212  0 02000 4 00001        TRA 1,4               N0 M0DIFICATION, ERROR RETURN.             F2504180    
                                         *******************************,*****************************F2504190    
                                         TGFM TAKES A TAG ENTRY AND STORES ITS INFORHATION INTO       F2504200    
                                         W0RKING TGTG.                                                F2504210    
       04213  0 50000 1 02336  TGFM  CLA MXTGTG,1                                                     F2504220    
       04214  0 62200 0 03646        STD TAG1              IN W0RKING TGTG.                           F2504230    
       04215  0 73400 2 00000        PAX 0,2               A, X1, X2, X3, TG, TG1.                    F2504240    
       04216 -0 63400 2 03647        SXD TAG2,2                                                       F2504250    
