                                         ------ SCANNED 10/8/06 304349-VOLUME_I.PDF PAGE 276/280 ------           
       06334  0 60100 2 03721        STO X1+5,2                    SET PROPER X AND L T0 ZER0,        F2219460    
       06335  0 60100 2 03722        STO X1+6,2                                                       F2219470    
       06336  2 00001 2 06337        TIX BS91,2,1                  ADJUST 1,3,5 T0 1,2,4,             F2219480    
       06337 -0 75400 2 00000 BS91   PXD 0,2                       PUT IN ACC                         F2219490    
       06340 -0 60200 0 03727 BS92   ORS DORC                      AND PUT BIT IN DORC                F2219500    
       06341  0 76000 0 00006        COM                           REM0VE 8IT                         F2219510    
       06342  0 32000 0 03731        ANS DOSUBS                    FR0M DOSUBS                        F2219520    
       06343  0 50000 0 03674        CLA XC                                                           F2219530    
       06344  0 60100 0 03722        STO XL                                                           F2219540    
       06345  0 50000 0 03675        CLA LC                                                           F2219550    
       06346  0 60100 0 03723        STO LL                                                           F2219560    
       06347  0 50000 0 03752        CLA L(1)                                                         F2219570    
       06350  0 60100 0 03726        STO NRDS                                                         F2219580    
       06351  0 60100 0 03732        STO DELTA                                                        F2219590    
       06352  0 02000 0 06207        TRA DS4V20                    EXIT                               F2219600    
       06353 -0 53400 4 06231 BS99   LXD FS28,4                    EXIT FR0M FSXX ENTRY               F2219610    
       06354  0 02000 4 00001        TRA 1,4                                                          F2219620    
       06355 -0 53400 2 06361 4VLHLT LXD 4VLHL8,2                  IF THERE IS AN ERROR IN THE        F2219630    
       06356  2 00001 2 06360        TIX 4VLHL4,2,1                CHECK SUM ROUTINE,THE BLOCK        F2219640    
       06357  0 07400 4 00004 4VLHL2 TSX DIAG,4  WILL BE REREAD 5 TIMES.    (ERROR. GO TO DIAGN0STIC.)F2219655    
       06360 -0 63400 2 06361 4VLHL4 SXD 4VLHL8,2                  BEFORE THE MACHINE ST0PS.          F2219660    
 D     06361 -3 00000 0 06213 4VLHL8 TXL FS05,0                                                       F2219670    
 A     06362  0 00000 0 00000 FORAD  HTR                           DRUM ADDRESS FOR LDA INSTR.        F2219680    
       06363  0 00000 0 00312 4VALAD HTR 202                                                          F2219690    
 A     06364  0 00000 0 00000 4VALES HTR                           E.S.                               F2219700    
       06365  0 00000 0 00000 XR1                                                                     F2219710    
       06366  0 00000 0 00000 LR1                                                                     F2219720    
       06367  0 00000 0 00000 XR2                                                                     F2219730    
       06370  0 00000 0 00000 LR2                                                                     F2219740    
       06371  0 00000 0 00000 D2D1                                                                    F2219750    
       06372  0 00000 0 00000 D3D1                                                                    F2219760    
       06373  0 00000 0 00000 D3D2                                                                    F2219770    
       06374  0 00000 0 00000 TR1                                                                     F2219780    
       06375  0 00000 0 00000 TR2                                                                     F2219790    
                                         SUBROUTINE GETNAM                                            F2219800    
       06376 -0 53400 1 04011 GETNAM LXD NAMXX,1                   THIS ROUTINE SEARCHES              F2219810    
       06377 -0 63400 1 06406        SXD GETN20,1                  TABLE NAMZ FOR THE NAME            F2219820    
       06400  0 53400 1 04011        LXA NAMXX,1                   OF TAU TAG IN A PARTICULAR         F2219830    
       06401  0 02000 0 06406        TRA GETN20                                                      F2219840     
       06402  0 34000 1 07301 GETN05 CAS NAMZ,1                    DO FORMULA.                        F2219850    
       06403  0 02000 0 06405        TRA GETN10                                                      F2219860     
       06404  0 02000 0 06411        TRA GETN30                                                      F2219870     
       06405  1 77776 1 06406 GETN10 TXI GETN20,1,-2                                                 F2219880     
 D     06406  3 00000 1 06402 GETN20 TXH GETN05,1                                                    F2219890     
       06407 -0 32000 0 03773        ANA ADDMSK                                                      F2219900     
       06410  0 02000 4 00001        TRA 1,4                                                         F2219910     
       06411  0 50000 1 07302 GETN30 CLA NAMZ+1,1                                                    F2219920     
       06412  0 02000 4 00001        TRA 1,4                                                         F2219930     
                                         SUBROUTINE ADDSER                                           F2219940     
       06413 -0 75400 1 00000 ADDSER PXD 0,1                                                         F2219950     
       06414  0 40000 0 03700        ADD TAG                                                         F2219960     
       06415 -0 53400 1 04006        LXD ADTXX,1                   PREPARE XRA AND DEC 0              F2219970    
       06416 -0 63400 1 06425        SXD ADS030,1                  ADS030 FOR TABLE SEARCH.           F2219980    
       06417  0 53400 1 04006        LXA ADTXX,1                                                     F2219990     
