                                         ------ SCANNED 10/8/06 304349-VOLUME_I.PDF PAGE 292/296 ------           
       07253 -0 53400 1 06711 GETNAM LXD NAMAX,1       LOAD MAX N0 NAME TABLE WORDS                   F2306910    
       07254  0 02000 0 07261        TRA GETN20                                                       F2306920    
       07255  0 34000 1 00733 GETN05 CAS NAMZ,1        DOES THE DOTAG ALPHA AND FORTAG INDEX OF THE   F2306930    
       07256  0 02000 0 07260        TRA GETN10        FIRST WORD OF NAHE TABLE MATCH TH0SE AB0VE.    F2306940    
       07257  0 02000 0 07263        TRA GETN30        YES.                                           F2306950    
       07260  1 77775 1 07261 GETN10 TXI GETN20,1,-3   N0, GET NEXT NAME TABLE.                       F2306960    
 D     07261  3 00000 1 07255 GETN20 TXH GETN05,1      IS NAME TABLE EXHAUSTED  (DEC HAS NAME IX)     F2306970    
 D     07262 -3 00000 0 07266 DOX    TXL PR25,0        YES, N0T N0T FQUND. ( DEC HAS IX MATCHING DOTAGF2306980    
       07263  0 50000 1 00734 GETN30 CLA NAMZ+1,1      F0UND. 0BTAIN NEW TAG NAME                     F2306990    
       07264  0 60100 0 06627        STO TS            AND SAVE IT.                                   F2307000    
 D     07265 -3 00000 0 07313 SYMLNK TXL PR80,0                                                       F2307010    
       07266 -0 53400 4 06656 PR25   LXD SKIP,4        N0T F0UND IN NAHE TABLE,                       F2307020    
       07267 -0 53400 1 07262        LXD DOX,1         SEARCH FORTAG                                  F2307030    
       07270  3 00000 4 07275        TXH PR30,4,0      IN PROPER RANGE.                               F2307040    
       07271 -0 53400 2 06666        LXD L(1),2        INDICATE TINFOR SEARCH REQUIRED                F2307050    
       07272  0 07400 4 07401        TSX SPC000,4                                                     F2307060    
       07273  0 02000 0 07277        TRA PR40          N0T F0UND                                      F2307070    
       07274  0 02000 0 07315        TRA PR90          T F0UND                                        F2307080    
       07275  0 07400 4 07564 PR30   TSX TINFOR,4                                                     F2307090    
       07276  0 02000 0 07315        TRA PR90          F0UND, GO TO EXIT.                             F2307100    
       07277 -0 53400 2 06665 PR40   LXD L(0),2        T N0T F0UND, HAKE TYPE 6                       F2307110    
       07300  0 07400 4 07336        TSX TRAENT,4      TRAST0 ENTRY                                   F2307120    
                                         MAKE ENTRY IN TABLE IRV                                      F2307130    
       07301 -0 53400 1 06664 PR60   LXD IRVXX,1       GET IX FOR ENTRY IN TABLE IRV.                 F2307140    
       07302  3 00000 1 07304        TXH PR70,1,0                                                     F2307150    
       07303  0 07400 4 00004        TSX DIAG,4  TABLE IRV FULL.             ERROR. GO TO DIAGN0STIC. F2307165    
       07304  0 50000 0 06626 PR70   CLA TAG           PLACE TAG IN                                   F2307170    
       07305  0 76700 0 00022        ALS 18            DECREMENT AND                                  F2307180    
       07306  0 40000 0 06626        ADD TAG           ADDRESS AND                                    F2307190    
       07307  0 60100 1 06625        STO IRVZ,1        STORE ENTRY IN TABLE IRV                       F2307200    
       07310  1 77777 1 07311        TXI PR75,1,-1     BUMP IRV TABLE INDEX AND                       F2307210    
       07311 -0 63400 1 06664 PR75   SXD IRVXX,1       SAVE IT FOR NEXT ENTRY.                        F2307220    
       07312  0 02000 0 07315        TRA PR90                                                         F2307230    
       07313 -0 53400 2 06666 PR80   LXD L(1),2        MAKE TYPE ONE TRAST0 ENTRY                     F2307240    
       07314  0 07400 4 07336        TSX TRAENT,4                                                     F2307250    
       07315 -0 53400 4 07265 PR90   LXD SYMLNK,4      RESTORE INDEX REG                              F2307260    
       07316  0 02000 4 00001        TRA 1,4           AND RETURN T0 CALLER                           F2307270    
                                         ROUTINE PERSPEC IS FOR THE SPECIAL CASE OF A SINGLE SUBSCRIPTF2307280    
                                         RELC0N WITH N0 C0EFFICIENT (TAGIND EQUALS ONE)               F2307290    
       07317  0 50000 1 06407 PRSPEC CLA DOTAGZ+8,1    IF  DOTAGS                                     F2307300    
       07320  0 77100 0 00022        ARS 18            TEST NAME                                      F2307310    
       07321  0 40200 0 06626        SUB TAG           IS SAME AS                                     F2307320    
       07322 -0 10000 0 07331        TNZ PR100         CURRENT FORTAG                                 F2307330    
       07323  0 50000 0 06700        CLA BIT18         AND IF                                         F2307340    
       07324 -0 32000 1 06405        ANA DOTAGZ+6,1    THERE IS A                                     F2307350    
       07325  0 10000 0 07315        TZE PR90                                                         F2307360    
       07326 -0 53400 2 06670        LXD L(3),2        MAKE A TYPE 5 TRAST0 ENTRY                     F2307370    
       07327  0 07400 4 07336        TSX TRAENT,4                                                     F2307380    
       07330  0 02000 0 07315        TRA PR90                                                         F2307390    
       07331  0 07400 4 07564 PR100  TSX TINFOR,4      L00K FOR ALREADY PROCESSED 1DENT FORTAG.       F2307400    
       07332  0 02000 0 07315        TRA PR90          F0UND.                                         F2307410    
       07333 -0 53400 2 06667        LXD L(2),2        N0T F0UND, HAKE A TYPE 1 TRAST0                F2307420    
       07334  0 07400 4 07336        TSX TRAENT,4      ENTRY                                          F2307430    
       07335  0 02000 0 07315        TRA PR90                                                         F2307440    
