                                         ------ SCANNED 10/8/06 304349-VOLUME_I.PDF PAGE 058/058 ------           
       03117  0 10000 0 03216 3D0350 TZE NOTAG                     --DON,T ENTER FORTAG.              4F11234     
       03120  0 50000 0 00030 FTG000 CLA EIFNO                     ENTER FORTAG=                      4F11235     
       03121 -0 32000 0 01527        ANA MASK1                     BRING UP ALPHA (INTFORMNO)         4F11236     
       03122  0 60200 0 01347        SLW G                         AND STORE IN G.                    4F11237     
       03123 -0 50000 0 01126        CAL E                         BRING UP TAUTAG FOR I,             4F11238     
       03124  0 77100 0 00030        ARS 24                        ADJUST, AND                        4F11239     
       03125 -0 60200 0 01347        ORS G                         PLACE IN G WITH ALPHA.  THEN       4F11230     
       03126  0 07400 1 03321        TSX TET00,1                 * ENTER INTO FORTAG TABLE            4F11240     
       03127  0 00000 0 00004        PZE 4                         (TET TABLE 4).                     4F11241     
 D     03130  1 00000 0 03220        TXI SAEXIT,0                  GO TO EXIT.                        4F11242     
       03131  0 53400 4 01412 2D0000 LXA L(4),4                    THEN PICKUP AND                    4F11243     
       03132  0 56000 4 01135 2D0001 LDQ E+7,4                     CONVERT COEFFICIENTS               4F11244     
       03133  0 07400 1 02566        TSX SR6DC1,1                * (BCD TO BINARY),                   4F11245     
       03134  0 60100 4 01135        STO E+7,4                     AND STORE BACK IN E+3 AND E+5,     4F11246     
       03135  2 00002 4 03132        TIX 2D0001,4,2                WHEN DONE,                         4F11247     
       03136  0 53400 4 01410        LXA L(2),4                    PREPARE TO                         4F11248     
       03137  0 50000 4 01143 2D0002 CLA E+13,4                    PICKUP THE TWO ADDENDS.            4F11249     
       03140  0 60200 0 01347        SLW G                         STRIP OFF                          4F11250     
       03141  0 56000 0 01347        LDQ G                         THEIR SIGNS,                       4F11251     
       03142  0 07400 1 02566        TSX SR6DC1,1                * CONVERT THEM FROM BCD TO BINARY,   4F11252     
       03143  0 56000 4 01143        LDQ E+13,4                    PUT SIGN IN S-BIT OF MQ, AND       4F11253     
       03144  0 16200 0 03146        TQP 2D0040                    IF PLUS--SKIP NEXT,                4F11254     
       03145 -0 50100 0 01453        ORA 2E17                      IF MINUS--OR SIGN INTO BIT 18,     4F11255     
       03146  0 60100 4 01141 2D0040 STO E+11,4                    AND STORE BACK IN E+11 AND E+12.   4F11256     
       03147  2 00001 4 03137        TIX 2D0002,4,1                WHEN DONE,                         4F11257     
       03150  0 07400 4 01775        TSX DIM2SR,4                * GO SEARCH DIM2 TABLE.              4F11258     
       03151  0 07400 4 03400        TSX DIAG,4                  * --ERROR...NOT ON DRUM.             4F11259     
       03152  0 50000 0 01131 2D0060 CLA E+3                       REFORMATIZE E-STRING =             4F11260     
       03153  0 76700 0 00022        ALS 18                        PACK TOGETHER                      4F11261     
       03154  0 40000 0 01133        ADD E+5                       COEFFICENTS 1 AND 2,               4F11262     
       03155  0 60100 0 01131        STO E+3                       AND STORE THEM IN E+3,             4F11263     
       03156  0 50000 0 01134        CLA E+6                       MOVE SUBSCRIPT 2 INTO E+5          4F11264     
       03157  0 60100 0 01133        STO E+5                       (NEXT TO SUBSCRIPT 1 IN E+4),      4F11265     
       03160  0 50000 0 01101        CLA D12                       OBTAIN                             4F11266     
       03161 -0 32000 0 01527        ANA MASK1                     DIMENSION 1, AND MOVE IT           4F11267     
       03162  0 60100 0 01134        STO E+6                       INTO E+6.                          4F11268     
       03163 -0 50000 0 01141        CAL E+11                      PACK TOGETHER                      4F11269     
       03164  0 76700 0 00022        ALS 18                        ADDENDS 1 AND 2,                   4F11270     
       03165 -0 50100 0 01142        ORA E+12                      AND STORE THEM                     4F11271     
       03166  0 60200 0 01141        SLW E+11                      IN E+11.                           4F11272     
       03167  0 07400 4 00436        TSX TAU2IX,4                * GO SEATCH TAU2 TABLE.              4F11273     
       03170  0 76700 0 00030        ALS 24                        POSITION TAU2 TAG, AND             4F11274     
       03171 -0 60200 0 01126        ORS E                         PLACE TAU2 TAG IN TAG WORD.        4F11275     
       03172 -0 50000 0 01132        CAL E+4                       COMBINE SUBSCRIPTS 1 AND 2, AND    4F11276     
 D     03173  1 00000 0 03116        TXI 3D0340,0                  GO TO FORTAG SECTION.              4F11277     
       03174  0 56000 0 01131 1D0000 LDQ E+3                       PICKUP AND CONVERT COEFFICIENTS    4F11278     
       03175  0 07400 1 02566        TSX SR6DC1,1                * (BCD TO BINARY), AND               4F11279     
       03176  0 76700 0 00022        ALS 18                        THEN ADJUST THEM,                  4F11280     
       03177  0 60100 0 01131        STO E+3                       AND STORE THEM BACK IN E+3.        4F11281     
       03200  0 50000 0 01141        CLA E+11                      PICKUP ADDEND,                     4F11282     
       03201  0 60200 0 01347        SLW G                         STRIP OFF SIGN,                    4F11283     
       03202  0 56000 0 01347        LDQ G                         CONVERT ADDEND                     4F11284     
       03203  0 07400 1 02566        TSX SR6DC1,1                * (BCD TO BINARY), AND THEN          4F11285     
       03204  0 56000 0 01141        LDQ E+11                      PUT SIGN IN S-BIT OF MQ,           4F11286     
