                                         ------ SCANNED 10/8/06 304349-VOLUME_I.PDF PAGE 194/194 ------           
       02065  0 10000 0 02070        TZE MDO041                    THERE ARE 2 ENTRIES                F1P04860    
       02066  0 50000 0 07746 MDO08  CLA E2                        THERE IS ONLY ONE ENTRY            F1P04870    
       02067  0 02000 0 02071        TRA MDO05                     FOR THIS ARGUMENT                  F1P04860    
       02070  0 50000 4 00000 MDO041 CLA 0,4                                                          F1P04890    
       02071  0 77100 0 00022 MDO05  ARS 18                                                           F1P04900    
       02072  0 62100 2 00000 MDO06  STA 0,2                       (I)* BETA PRIME REPLACES BETA      F1P04910    
       02073  2 00005 2 02036 MDO07  TIX MDO00,2,5                 TAKE NEXT ENTRY IN ITA             F1P04920    
       02074  0 07400 1 07656 WDO00  TSX WAT00,1                   WRITE  TDO ON TAPE                 F1P04930    
       02075  0 00000 0 00001        HTR 1                                                            F1P04940    
       02076  0 00000 0 03163 T0T1   HTR 1TA                                                          F1P04950    
       02077  0 76200 0 00221        RTB 1                                                            F1P04960    
       02100  0 02000 0 00004        TRA 4                         GO TO 1-CS FOR PART B OF ONE PRIME F1P04970    
       02101  0 77777 0 00000 DMASK      0,0,32767                                                    F1P04980    
       02102 +000000077777    PAT11  OCT 77777                                                        F1P04990    
       02103  0 00000 0 00000 PAT13  HTR 0                                                            F1P05000    
       02104  0 00000 0 00000 PAT14  HTR 0                                                            F1P05010    
       02105  0 00000 0 00000 PAT15  HTR 0                                                            F1P05020    
                        02106 GARBGE BSS 1                                                            F1P05030    
                        02107 WORKCL BSS 1                                                            F1P05040    
                        02110 NEWBAS BSS 1                                                            F1P05050    
                        02243 BUFFER BES 90                                                           F1P05060    
                        02243 E1PTS  BSS 1                                                            F1P05070    
                        02244 FLSIZE BSS 1                                                            F1P05080    
                        02245 CMPREC BSS 1                                                            F1P05090    
                        03162 END1PA ORG 1650                                                         F1P05100    
                        03162 1TAM1  BSS 1                         NO OF WORDS IN BLOCK               F1P05110    
                        03163 1TA    BSS 750                       BLOCK FOR TABLE ASSEMBLING         F1P05120    
                                                                                                      F1P05130    
                                                                                                      F1P05140    
                                         704 FORTRAN MASTER RECORD CARD / 1 PRIME PART B =  F0240000. F1P05150    
                        00000        ORG 0                                                            F1P05160    
       00000  0 00507 0 00507        PZE ORG1PB,,ORG1PB                                               F1P05170    
       00001  0 00000 0 01613        PZE END1PB                                                       F1P05180    
                                                                                                      F1P05190    
                                         THIS  IS PART B OF 2 PARTS OF SECTION ONE PRIME              F1P05200    
                                                                                                      F1P05210    
                        00507 ORG1PB ORG 327                                                          F1P05220    
       00507  0 76100 0 00000        NOP                            TO PERMIT A STOP FOR TESTING USE. F1P05230    
       00510  0 07400 1 07505        TSX TAP00,1                    ASSEMBLE FORVAL                   F1P05240    
       00511  0 00000 0 00006 TNT6   HTR 6                                                            F1P05250    
       00512  0 00000 0 01614 TOT6   HTR 6TA                                                          F1P05260    
       00513 -0 53400 4 01613        LXD 6TA-1,4           TEST FOR ENTRIES IN FORVAL, IF NONE WRITE  F1P05270    
       00514 -3 00000 4 00546        TXL CLMD09,4,0        IDENTIFICATION WORD AND ZERO WORD.         F1P05280    
                                                                                                      F1P05290    
       00515  0 07400 1 07505        TSX TAP00,1           ASSEMBLE TABLE OF FIRST, LAST FORMULA      F1P05300    
       00516  0 00000 0 00020            16                NUMBERS OF CALL STATEMENTS.                F1P05310    
       00517  0 00000 0 03564 L16TA      16TA                                                         F1P05320    
                                                                                                      F1P05330    
       00520 -0 53400 2 03563        LXD 16TA-1,2          TEST FOR ANY ENTRIES IN CALL NUMBER TABLE, F1P05340    
       00521 -3 00000 2 00546        TXL CLMD09,2,0        IF NONE WRITE OUT FORVAL TABLE.            F1P05350    
                                                                                                      F1P05360    
                                         THERE ARE ENTRIES IN BOTH FORVAL AND CALL NUMBER  TABLES.    F1P05370    
                                         THEREFORE THERE MAY BE SOME NUMBER IN FORVAL WHICH MUST BE   F1P05380    
                                         REPLACED WITH THE LAST NUMBER RELATED TO A CALL STATEMENT.   F1P05390    
