                                         ------ SCANNED 10/8/06 304349-VOLUME_I.PDF PAGE 275/279 ------           
       06246 -0 50000 2 06567 CS10   CAL BLOCK+60,2                THE CHECK SUMS OF THE              F2218920    
       06247  0 36100 2 06570        ACL BLOCK+61,2                ENTRIES-AND=COMPARES-              F2218930    
       06250  0 60200 0 06364        SLW 4VALES                                         -             F2218940    
       06251  0 50000 0 06364        CLA 4VALES                    THEM WITH THE GIVEN CHECK          F2218950    
       06252  0 40200 2 06571        SUB BLOCK+62,2                SUMS.     )     . . -----          F2218960    
       06253 -0 10000 0 06355        TNZ 4VLHLT                    TRA T0 EXIT IF BAD ENTRY.          F2218970    
       06254  1 77775 2 06255        TXI CS20,2,-3                                        )  .        F2218980    
 D     06255  3 00000 2 06246 CS20   TXH CS10,2                    C0NTINUE WITH BS00                 F2218990    
       06256  0 50000 0 03735 BS00   CLA RSYM1                     THIS ROUTINE SEARCHES              F2219000    
       06257 -0 53400 4 03732        LXD DELTA,4                   THE ST0RAGE BLOCK FOR              F2219010    
       06260 -0 53400 2 03762 BS10   LXD L(60),2                   RSYM1,AND RSYM2 IF)DELTA           F2219020    
       06261  0 34000 2 06570 BS20   CAS BLOCK+61,2                IS THREE.            -             F2219030    
 D     06262 -3 00000 0 06264 BS25   TXL BS30,0                                                       F2219040    
       06263  0 02000 0 06272        TRA BS60                      EQUALITY F0UND,TRA.                F2219050    
       06264  1 77775 2 06265 BS30   TXI BS40,2,-3                 RE-ENTRY                           F2219060    
 D     06265  3 00000 2 06261 BS40   TXH BS20,2                                                       F2219070    
       06266 -3 00002 4 06275 BS50   TXL BS70,4,2                                                     F2219080    
       06267 -0 53400 4 03751        LXD L(0),4                                                       F22I1111    
       06270  0 50000 0 03736        CLA RSYM2                                                        F2219100    
       06271  0 02000 0 06260        TRA BS10                                                         F2219110    
       06272 -0 76000 0 00144 BS60   MSE 100                       TEST T0 SEE 1F                     F2219120    
       06273  0 02000 0 06307        TRA BS80                      NORMAL SEARCH,0R IF                F2219130    
       06274  0 02000 0 06327        TRA BS90                      SPECIAL CASE OF DELTA TWO.         F2219140    
       06275 -0 53400 2 06265 BS70   LXD BS40,2                    BLOCK SEARCH DONE. IF BLOCK        F2219150    
       06276  3 00000 2 06353        TXH BS99,2,0                  WAS N0T FULL,EXIT.                 F2219160    
       06277 -0 53400 1 06262        LXD BS25,1                    0THERWISE,PREPARE T0 C0NTINUE      F2219170    
       06300  1 00071 1 06301 BS71   TXI BS72,1,57                 SEARCH,IF M0RE ENTRIES IN FORVAL.  F2219180    
       06301  3 02733 1 06353 BS72   TXH BS99,1,1499                                                 .F2219190    
       06302 -0 75400 1 00000        PXD 0,1                       )LD COMPUTE                        F2219200    
       06303  0 77100 0 00022        ARS 18                        NEW FORVAL                         F2219210    
       06304  0 40000 0 06363        ADD 4VALAD                    )MDRESS                            F2219220    
       06305  0 60100 0 06362        STO FORAD                                                        F2219230    
 D     06306 -3 00000 0 06211 BS78   TXL FS00,0                    )M0BACK T0 C0NTINUE SEARCH         F2219240    
       06307  0 60100 0 06364 BS80   STO 4VALES                    RSYM F0UND,ARRANGE T0              F2219250    
       06310 -0 53400 1 03722        LXD XL,1                      SAVE INDEXED SUBSCRIPTS.           F2219260    
       06311  0 50000 0 04000        CLA BITONE                                                       F2219270    
       06312 -0 60200 1 00740        ORS DOTAGZ+5,1                                                   F2219280    
       06313 -0 53400 1 03674        LXD XC,1                                                         F2219290    
       06314 -0 60200 1 00740        ORS DOTAGZ+5,1                RSYM F0UND,E2 PREVI0USLY           F2219300    
       06315  0 50000 2 06567        CLA BLOCK+60,2                PREPARED,N0W PREPARE               F2219310    
       06316  0 60100 0 05063        STO E1                        E1,SAVE ACC,XR8,XRC,               F2219320    
       06317  0 50000 0 05067        CLA TSXC0M                    AND LIST.                          F2219330    
       06320 -0 63400 2 06326        SXD BS85,2                    AFTER LISTING,                     F2219340    
       06321 -0 63400 4 06306        SXD BS78,4                    RESTORE ACC,XR8,XRC                F2219330    
       06322  0 07400 4 05025        TSX LIST,4                    AND RETURN T0 C0NTINUE             F2219360    
       06323 -0 53400 2 06326        LXD BS85,2                    SEARCH.                            F2219370    
       06324 -0 53400 4 06306        LXD BS78,4                                                       F2219380    
       06325  0 50000 0 06364        CLA 4VALES                                                       F2219390    
 TD    06326 -3 00000 0 06264 BS85   TXL BS30                                                         F2219400    
       06327 -0 53400 2 03722 BS90   LXD XL,2                      SPECIAL CASE,DELTA TWO,            F2219410    
       06330  0 50000 0 04000        CLA BITONE                    PUT IN BIT T0 SAVE SL              F2219420    
       06331 -0 60200 2 00740        ORS DOTAGZ+5,2                                                   F2219430    
       06332 -0 53400 2 03750        LXD LOWP0S,2                  0BTAIN INDEX QUANTITY 1, 3, 5.     F2219440    
       06333  0 50000 0 03751        CLA L(0)                      FOR XL,                            F2219450    
