                                         ------ SCANNED 10/8/06 304349-VOLUME_I.PDF PAGE 385/389 ------           
       00741 -0 53400 1 02320        LXD E2C,1           IRA GIVES AIL REC P0SITION.                  F3804850    
       00742 -0 53400 2 02321        LXD E3C,2           IRB GIVES D0 REC PQSITION.                   F3B04860    
       00743  0 02000 4 00005        TRA 5,4             RETURN T0 TSX ADDR PLUS 5.                   F3B04870    
       00744  0 50000 1 02332 ERR2   CLA AIL,1           TEST IF FORTRAN FCN DEFINED IN MIDDLE OF     F3B04880    
       00745  0 34000 0 02214        CAS M1CON+17        PROGRAH, BY FIRST INSTR WORD ALL QNES.       F3B04890    
       00746  0 02000 4 00001        TRA 1,4             RETURN T0 NEXT INSTR. OF MAIN PROGRAH.       F3804900    
       00747  0 07400 4 00004        TSX 4,4             FORTRAN FUNCTION IN HIDDLE OF PROGRAH        F3804910    
       00750  0 07400 4 00004 ERROR3 TSX 4,4             WORD ALL 1S COMPARED HIGH T0 AC WITH ALL 1S  F3804920    
                                         COMPILATION OF AIL INSTRUCTIONS                              F3804930    
       00751  0 07400 4 00744 M12000 TSX ERR2,4          TEST 1ST AIL WORD ALL ONES.                  F3B04940    
       00752  0 62200 0 02313        STD M1ALFN          SAVE FMLA N0. 1ST INSTR ARITH BLOCK,         F3B04950    
       00753 -0 12000 0 01070 M12005 TMI M13000          MINUS HEANS 0PEN SU8ROUTINE.                 F3804960    
       00754  0 53400 4 02177        LXA M1CON+4,4       COMPILE AIL INST BY                          F3B04970    
       00755  0 50000 1 02332 M12010 CLA AIL,1           M0VING 4 WORDS OF INSTR                      F3B04980    
       00756  0 60100 4 02331        STO M1CW+4,4        INTO COMPILED WORD 8UFFER.                   F3804990    
       00757  1 77777 1 00760        TXI M12020,1,-1                                                  F3B05000    
       00760  2 00001 4 00755 M12020 TIX M12010,4,1                                                   F3805010    
       00761  0 50000 0 02330 M12021 CLA M1CW+3          TEST IF TAGGED INSTR, BITS 24-26.            F3B05020    
       00762 -0 32000 0 02212 M12022 ANA M1CON+15        1,2 0R 3 GIVEN IN TAG. ONE                   F3B05030    
       00763  0 10000 0 00767        TZE M12030          DIH TAGS N0T CHANGE0.                        F3805040    
       00764 -0 76000 0 00143        MSE 99              SENSE LIGHT 3 0N IF N0                       F3805050    
       00765  0 07400 4 01016        TSX M12500,4        ENTRIES IN EDITED CHANGE                     F3805060    
       00766  0 76000 0 00143        PSE 99              TAG TABLE.                                   F3B05070    
       00767  0 07400 4 00707 M12030 TSX CIT00,4         T0 CIT COMPILING IF TAG UNCHANGED.           F3805080    
       00770  0 00000 0 02325        HTR M1CW            CALLING SEQ FOR L0CATIONS                    F3B05090    
       00771  0 00000 0 02326        HTR M1CW+1          OF 4 COMPILED WORDS.                         F3B05100    
       00772  0 00000 0 02327        HTR M1CW+2                                                       F3B05110    
       00773  0 00000 0 02330        HTR M1CW+3                                                       F3B05120    
       00774 -0 75400 1 00000 M12035 PXD 0,1             TEST IF END OF CUR AIL REC                   F3B05130    
       00775  0 34000 0 02310        CAS M1ALWN          BY COMPAR1NG CURRENT AIL WD                  F3B05140    
       00776  0 02000 0 01001        TRA M12040          P0SITION WITH TDTAL AIL                      F3805150    
       00777  0 07400 4 00341        TSX M10210,4        REC WORD COUNT.                              F3B05160    
       01000  0 07400 4 00004        TSX 4,4             N0 OF WORDS OF AIL REC N0T A HULTIPLE OF 4   F380S170    
       01001  0 50000 1 02332 M12040 CLA AIL,1           NEXT AIL INST SAHE BLOCK AS                  F3B05180    
       01002 -0 32000 0 02210        ANA M1CON+13        PREVI0US ONE. +077777000000.                 F3B05190    
       01003  0 34000 0 02313        CAS M1ALFN                                                       F3B05200    
       01004  0 02000 0 01010        TRA M12050          NEXT AIL FMLA N0* (W)THAN PREV.              F3B09210    
       01005  0 76100 0 00000        NOP                                                              F3B03220    
       01006  0 50000 1 02332        CLA AIL,1           TEST IF QPEN SRTN. IF N0T,                   F3805230    
       01007  0 02000 0 00753        TRA M12005          COMPILE AIL INSTR                            F3B05240    
       01010 -0 76000 0 00142 M12050 MSE 98              END OF D0 FILE IF LIGHT 2 0N,                F3B03250    
       01011  0 02000 0 00630        TRA M11015          T0 CHP AIL AND D0 FHLA N0S.                  F3B05260    
       01012  0 76000 0 00142        PSE 98                                                           F3B05270    
       01013  3 00001 2 00751        TXH M12000,2,1      IN THE MAIN MERGE IF IRB                     F3B03280    
       01014 -3 00000 2 00751        TXL M12000,2,0      ANY VALUE EXCEPT 1.                          F3805290    
       01015  0 02000 0 00576        TRA PAT14           T0 TEST FOR FORTRAN FCN.                     F3B05300    
                                          CHANGE TAG TABLE SEARCH                                     F3805310    
       01016  0 50000 0 02330 M12500 CLA M1CW+3          SYM80LIC TAG IN BINARY 8ITS                  F3805320    
       01017  0 62100 0 02306        STA TAGB0X          24-35 4TH WD COMPILE0 INSTR.                 F3805330    
       01020 -0 63400 4 02305        SXD CBOX,4          IRC HAS TSX RTN ADDR T0 H12030.              F3B05340    
       01021 -0 53400 4 02300 M12503 LXD CHTGE1,4                                                     F3B05350    
       01022  0 50000 4 05744        CLA CHTG,4          CMP INT FMLA NQ CUR AIL INSTR                F3B05360    
       01023  0 34000 0 02313        CAS M1ALFN          WITH CUR CHTG TABLE BL0CK.                   F3805370    
       01024  0 02000 0 01027        TRA M12510          CHTG FMLA N0 GREATER AIL N0.                 F3805380    
