                                         ------ SCANNED 10/8/06 304349-VOLUME_I.PDF PAGE 190/190 ------           
       01541  0 00000 0 04551            OTA                                                          F1P02700    
       01542  0 07400 1 07505        TSX TAP00,1           ASSEMBLE TEIFNO FROM TAPE 4                F1P02710    
       01543  0 00000 0 00000        HTR 0                                                            F1P02720    
       01544  0 00000 0 04551        HTR OTA                                                          F1P02730    
       01545  0 60000 0 02105        STZ PAT15             INSURE DECREMENT IS CLEAR                  F1P02740    
       01546 -0 53400 4 04550        LXD OTA-1,4           LENGTH OF TEIFNO INTO I.R.4                F1P02750    
       01547 -3 00001 4 01606        TXL WRITE,4,1         IS TEIFNO EMPTY OR IS THERE A SINGLE ENTRY F1P02760    
       01550 -0 53400 1 02103        LXD PAT13,1           INITIALIZE I.R. TO STEP THROUGH TABLE      F1P02770    
       01551 -0 63400 4 02104        SXD PAT14,4           SAVE WORD COUNT                            F1P02780    
       01552 -0 53400 4 02104 ISPLUS LXD PAT14,4           REINTIALIZE FOR FURTHER SEARCHING          F1P02790    
       01553  0 50000 1 04551 NEXT   CLA OTA,1             PICK UP NEXT ENTRY IN TEIFNO               F1P02800    
       01554  0 12000 0 01561        TPL MASK              HAS THIS BEEN PROCESSED                    F1P02810    
       01555  0 60200 1 04551        SLW OTA,1                                                        F1P02820    
       01556  1 77777 1 01557        TXI ISTHRU,1,-1       NO, SET I.R. TO LOOK AT NEXT ENTRY         F1P02830    
       01557  2 00001 4 01553 ISTHRU TIX NEXT,4,1          HAVE ALL ENTRIES BEEN EXAMINED             F1P02840    
       01560  0 02000 0 01606        TRA WRITE             YES, FINISHED                              F1P02850    
       01561  0 62100 0 02105 MASK   STA PAT15             STORE COMPERAND                            F1P02860    
       01562  1 77777 1 01563        TXI RECOMP,1,-1       SET I.R.S TO START COMPARISON              F1P02870    
       01563 -0 75400 1 00000 RECOMP PXD 0,1                                                          F1P02880    
       01564 -0 73400 2 00000        PDX 0,2                                                          F1P02890    
       01565 -2 00001 4 01606        TNX WRITE,4,1         HAVE ALL ENTRIES BEEN EXAMINED             F1P02900    
       01566 -0 63400 4 02104        SXD PAT14,4           SAVE NUMBER OF ENTRIES YET TO BE TREATED   F1P02910    
       01567  0 50000 2 04551 PAT16  CLA OTA,2             PICK UP ENTRY TO BE COMPARED               F1P02920    
       01570 -0 12000 0 01575        TMI NODUP             NO SEARCH NECESSARY IF NEGATIVE            F1P02930    
       01571 -0 32000 0 02102        ANA PAT11             ISOLATE EXTERNAL FORMULA NUMBER            F1P02940    
       01572  0 34000 0 02105        CAS PAT15             COMPARE TO REMAINING ENTRIES               F1P02950    
       01573  0 02000 0 01575        TRA NODUP             NO DUPLICATE                               F1P02960    
       01574  0 02000 0 01600        TRA PAT9              DUPLICATE                                  F1P02970    
       01575  1 77777 2 01576 NODUP  TXI PAT8,2,-1         NO DUPLICATE, SET I.R. TO OBTAIN NEXT ENTRYF1P02980    
                                         FOR COMPARISON                                               F1P02990    
       01576  2 00001 4 01567 PAT8   TIX PAT16,4,1         HAVE ALL ENTRIES BEEN COMPARED             F1P03000    
       01577  0 02000 0 01552        TRA ISPLUS            YES                                        F1P03010    
       01600  0 50000 2 04551 PAT9   CLA OTA,2             FLAG DUPLICATE ENTRY NEGATIVE              F1P03020    
       01601 -0 76000 0 00003        SSM                                                              F1P03030    
       01602  0 60100 2 04551        STO OTA,2                                                        F1P03040    
       01603  0 50200 1 04550        CLS OTA-1,1                                                      F1P03050    
       01604  0 60100 1 04550        STO OTA-1,1                                                      F1P03060    
       01605  0 02000 0 01552        TRA ISPLUS                                                       F1P03070    
       01606  0 07400 1 07656 WRITE  TSX WAT00,1           WRITE TEIFNO ON TAPE                       F1P03080    
       01607  0 00000 0 00000        HTR 0                                                            F1P03090    
       01610  0 00000 0 04551            OTA                                                          F1P03100    
       01611  0 07400 1 07505        TSX TAP00,1                   ASSEMBLE TIFGO                     F1P03110    
       01612  0 00000 0 00002        HTR 2                                                            F1P03120    
       01613  0 00000 0 03163 L(2TA) HTR 2TA                                                          F1P03130    
                                         START  PROGRAM FOR MODIFICATION OF TIFGO WITH TEIFNO         F1P03140    
       01614  0 50000 0 03162 MFGTP  CLA 2TA-1                    GET NUMBER OF WORDS IN 2TA.         F1P03150    
       01615  0 10000 0 01751        TZE WFG00                    EXIT FOR NO ENTRIES IN TABLE,       F1P03160    
       01616 -0 73400 2 00000        PDX 0,2                      SET INDEX B TO NUMBER OF WORDS,     F1P03170    
       01617  0 77100 0 00022        ARS 18                       COMPUTE                             F1P03180    
       01620  0 40000 0 01613        ADD L(2TA)                   2TA                                 F1P03190    
       01621  0 62100 0 01646        STA MFG00                    PLUS                                F1P03200    
       01622  0 62100 0 01663        STA MFG03                    NUMBER                              F1P03210    
       01623  0 62100 0 01665        STA MFG05                    OF                                  F1P03220    
       01624  0 62100 0 01701        STA MFG08                    WORDS                               F1P03230    
