                                         ------ SCANNED 10/8/06 304349-VOLUME_I.PDF PAGE 123/123 ------           
       04404 -0 53400 4 04416 PL1220 LXD PL1330,C          LKXC WITH -6                               4F14691     
       04405 -0 63400 4 04406 PL1230 SXD PL1240,C                                                     4F14692     
       04406  1 00000 2 04407 PL1240 TXI PL1250,B,0                                                   4F14693     
       04407 -0 50000 2 06650 PL1250 CAL SCRIPL,B                                                     4F14694     
       04410  0 73400 4 00000        PAX 0,C                                                          4F14695     
       04411 -0 32000 0 01452        ANA MASK2                                                        4F14696     
       04412  0 40200 1 06655        SUB SCRIPL+5,A                                                   4F14697     
       04413  0 10000 0 04417        TZE PL1340            SYM2(S(I)) = S(K)                          4F14698     
       04414  0 50000 4 05044        CLA BETA,C                                                       4F14699     
       04415  0 73400 4 00000        PAX 0,C                                                          4F14700     
       04416  1 77772 0 04405 PL1330 TXI PL1230,0,-6                                                  4F14701     
       04417 -0 50000 2 06651 PL1340 CAL SCRIPL+1,B        SET OP2(S(I)) 32 = 0P1 (S(K)) 32           4F14702     
       04420 -0 32000 0 01416        ANA L(8)                                                         4F14703     
       04421 -0 60200 1 06654        ORS SCRIPL+4,A                                                   4F14704     
       04422  0 02000 0 04170        TRA PL0000            RESUME SCAN                                4F14705     
       04423 -0 53400 1 04136 LK0000 LXD AS3600,A          -3Q TO XA                                  4F14706     
       04424 -0 50000 1 06645 LK0030 CAL SCRIPL-3,A                                                   4F14707     
       04425  0 73400 2 00000        PAX 0,B               S(I) TO XB                                 4F14708     
       04426 -3 00000 0 04633        TXL LK1610,8,0        EXIT UPON ENCOUNTERING S(0)                4F14709     
       04427  0 56000 1 06646        LDQ SCRIPL-2,A        PLACE LAST OP OP S(I) IN MQ                4F14710     
       04430  0 50000 2 05044        CLA BETA,B                                                       4F14711     
       04431  0 62200 0 04432        STD LK0110                                                       4F14712     
       04432  1 00000 1 04433 LK0110 TXI LK0120,A,0        MOVE XA TO BEGINNING OF S(I)               4F14713     
       04433 -0 53400 4 04434 LK0120 LXD LK0130,C                                                     4F14714     
       04434  1 00000 5 04435 LK0130 TXI LK0140,5,0        XA TO XA,XC                                4F14715     
       04435 -0 63400 1 04136 LK0140 SXD AS3600,A                                                     4F14716     
       04436  0 50000 2 05043        CLA BETA-1,B                                                     4F14717     
       04437 -0 73400 2 00000        PDX 0,B               LENGTH  OF S(I-1) TO XB                    4F14718     
       04440 -0 63400 2 04441        SXD LK0180,B                                                     4F14719     
       04441  1 00000 4 04442 LK0180 TXI LK0190,C,0        MOVE XC TO BEGINNING OF S(I-1)             4F14720     
       04442  0 16200 0 04566 LK0190 TQP LK1200            S(I) TYPE AC                               4F14721     
       04443 -0 77300 0 00001        RQL 1                                                            4F14722     
       04444  0 16200 0 04566        TQP LK1200            S(I) TYPE AC                               4F14723     
       04445 -0 50000 0 01404        CAL 12Z               S(I) RESULTS IN MQ (TYPE MQ)               4F14724     
       04446 -0 60200 1 06651        ORS SCRIPL+1,A        SET OP1 (S(I)) 31 = 1                      4F14725     
       04447 -0 75400 0 00000        PXD 0,0                                                          4F14726     
       04450  0 56000 4 06651        LDQ SCRIPL+1,C        PLACE OP1  (S(I-1)) IN MQ                  4F14727     
       04451 -0 76300 0 00006        LGL 6                                                            4F14728     
       04452  0 34000 0 01427        CAS SPECOP                                                       4F14729     
       04453  0 02000 0 04456        TRA LK0320                                                       4F14730     
       04454  0 02000 0 04543        TRA LK0950                                                       4F14731     
       04455  0 02000 0 04424        TRA LK0030            S(I)TYPTMQ, S(I-1)TYPEAC . OP1(S(I))29=0   4F14732     
       04456  0 16200 0 04477 LK0320 TQP LK0570                                                       4F14733     
       04457 -0 76300 0 00033        LGL 27                S(I)TYPE MQ, OP1(S(I-1) = **               4F14734     
       04460 -0 50000 1 06650        CAL SCRIPL,A                                                     4F14735     
       04461 -0 32000 0 01452        ANA MASK2             EXTRACT S(I) IN ACC                        4F14736     
       04462  0 16200 0 04472        TQP LK0480            OP1 (S(I-1)) 33 = 0                        4F14737     
       04463  0 40200 4 06652        SUB SCRIPL+2,C        OP1 (S(I-1)) 33 = 1, OPEN ** SUBROUTINE.   4F14738     
       04464 -0 10000 0 04424        TNZ LK0030            SET OP1 (S(I)) 29 = OP1 (S(I-1)) 35 = 0    4F14739     
       04465 -0 50000 0 01411        CAL L(3)              S(I) = SYM1 (S(I-1)), SO                   4F14740     
       04466 -0 60200 4 06651 LK0430 ORS SCRIPL+1,C                                                   4F14741     
       04467 -0 50000 0 01436 LK0440 CAL BIT29                                                        4F14742     
       04470 -0 60200 1 06651        ORS SCRIPL+1,A                                                   4F14743     
       04471  0 02000 0 04424        TRA LK0030            OP1 (S(I-1)) = 0, CLOSED ** SUBROUTINES    4F14744     
