                                         ------ SCANNED 10/8/06 304349-VOLUME_I.PDF PAGE 388/392 ------           
       01176  0 02000 0 01276        TRA M13330          FL0ATING ARGUMENT                            F3B06470    
       01177  0 07400 4 00707        TSX CIT00,4         COMPILE LAST 2 INST FOR                      F3B06480    
       01200  0 00000 0 02173        HTR M1CON           EXP GREATER 0R EQUAL 2, IN WHICH             F3B06490    
       01201  0 00000 0 02222        HTR M1ABC+2         CASE WE MUST COMPILE 0NLY ONE                F3B06500    
       01202  0 00000 0 02327        HTR M1CW+2          PAIR OF INSTRUCTIONS                         F3B06510    
       01203  0 00000 0 02330        HTR M1CW+3                                                       F3B06520    
       01204  0 07400 4 00707        TSX CIT00,4                                                      F3B06530    
       01205  0 00000 0 02173        HTR M1CON                                                        F3B06540    
       01206  0 00000 0 02224        HTR M1ABC+4                                                      F3B06550    
       01207  0 00000 0 02173        HTR M1CON                                                        F3B06560    
       01210  0 00000 0 02205        HTR M1CON+10                                                     F3B06570    
       01211  1 77776 1 00774        TXI M12035,1,-2     BACK T0 C0NTINUE AIL ROUTINES                F3B06580    
                                         ARG IN AC, FIXED 0R FL0ATING                                 F3B06590    
       01212  0 50000 1 02332 M13200 CLA AIL,1           TEST T0 SEE IF EXPONENT                      F3B06600    
       01213  0 40200 0 02201        SUB M1CON+6         EQUALS 1, IF YES, TRANSFER                   F3B06610    
       01214 -0 10000 0 01220        TNZ M13210          BACK T0 PICK UP NEXT RECORD                  F3B06620    
       01215 -0 76000 0 00144        MSE 100             IF N0, C0NTINUE T0                           F3B06630    
       01216  0 76100 0 00000        NOP                 COMPILE PROPER INSTRUCTIONS                  F3B06640    
       01217  1 77776 1 00774        TXI M12035,1,-2                                                  F3B06650    
       01220  0 50000 0 02245 M13210 CLA M1ABC+21        EXP GREATER THAN 1,0                         F3B06660    
       01221  0 60100 0 02327        STO M1CW+2          STORE VALUE OF EXPONENT IN INSTR. AREA       F3B06670    
       01222  0 07400 4 00707        TSX CIT00,4         COMPILE FIRST INST                           F3B06680    
       01223  0 00000 0 02325        HTR M1CW            CALLING SEQUENCE FOR ARG-                    F3B06690    
       01224  0 00000 0 02225        HTR M1ABC+5         UMENT IN ACC, COMPILE                        F3B06700    
       01225  0 00000 0 02327        HTR M1CW+2          A ST0 INSTRUCTION, AND C0NTINUE              F3B06710    
       01226  0 00000 0 02330        HTR M1CW+3          AS IF IT WERE STORED INITIALLY               F3B06720    
       01227  0 02000 0 01143        TRA M13070                                                       F3B06730    
                                         ARG IN MQ, FIXED 0R FL0ATING                                 F3B06740    
       01230  0 50000 1 02332 M13250 CLA AIL,1           VALUE OF EXPONENT AND TEST T0                F3806750    
       01231  0 40200 0 02201        SUB M1CON+6         SEE IF EXPONENT = 1, IF IT IS                F3B06760    
       01232 -0 10000 0 01250        TNZ M13265          EQUAL T0 ONE, WE KN0W THAT                   F3B06770    
       01233  0 07400 4 00707        TSX CIT00,4         THE VALUE OF THE                             F3B06780    
       01234  0 00000 0 02325        HTR M1CW            ARGUMENT IS RETAINED AS THE                  F3B06790    
       01235  0 00000 0 02235        HTR M1ABC+13        ANSWER.                                      F3B06800    
       01236  0 00000 0 02173        HTR M1CON                                                        F3B06810    
       01237  0 00000 0 02173        HTR M1CON                                                        F3B06820    
       01240  0 07400 4 00707        TSX CIT00,4                                                      F3B06830    
       01241  0 00000 0 02173        HTR M1CON                                                        F3B06840    
       01242  0 00000 0 02226        HTR M1ABC+6                                                      F3B06850    
       01243  0 00000 0 02173        HTR M1CON                                                        F3B06860    
       01244  0 00000 0 02207        HTR M1CON+12                                                     F3B06870    
       01245 -0 76000 0 00144        MSE 100             TURN OF SENSE LIGHT                          F3B06880    
       01246  0 76100 0 00000        NOP                                                              F3B06890    
       01247  1 77776 1 00774        TXI M12035,1,-2     BACK T0 AIL ROUTINE                          F3B06900    
       01250  0 50000 0 02245 M13265 CLA M1ABC+21        EXP GREATER 1,                               F3B06910    
       01251  0 60100 0 02327        STO M1CW+2          PLACE 010000000000IN L0CATION P0S.           F3B06920    
       01252  0 07400 4 00707        TSX CIT00,4         COMPILE FIRST INST                           F3B06930    
       01253  0 00000 0 02325        HTR M1CW            ZER0                                         F3B06940    
       01254  0 00000 0 02227        HTR M1ABC+7         COMPILE A STQ INSTRUCTION                    F3B06950    
       01255  0 00000 0 02327        HTR M1CW+2          AND THEN TRANSFER T0 DETER-                  F3B06960    
       01256  0 00000 0 02330        HTR M1CW+3          MINE THE VALUE OF THE                        F3B06970    
       01257  0 02000 0 01150        TRA M13080          EXPONENT,                                    F3B06980    
                                         FL0ATING ARG, STORE0, IN AC, IN MQ, EXP GREATER 2            F3B06990    
       01260  0 07400 4 00707 M13300 TSX CIT00,4                                                      F3B07000    
