File: A5TOA1.RL of Disk: V50/Source/Source-Listing-FORTRAN-2
(Binary file converted to dump format) 



Block: 0000 

00000: 0003 0050 0000 0000 2311 3017 2524 0002  0060 0000 0307 0524 0000 0002 0100 0000 @C@(@@@@SIXOUT@B@0@@CGET@@@BA@@@  (    I FT P0  GT    @  
00020: 0320 2524 0000 0002 0120 0000 0165 2417  0161 0004 0140 0204 2422 1115 0000 0004 CPUT@@@BAP@@A5TOA1@DA BDTRIM@@@D PT    P  u  q  `   MR   
00040: 0160 0152 0000 0000 0000 0000 0000 0000  0001 0001 0001 0001 0001 0001 0001 0001 A0A*@@@@@@@@@@@@@A@A@A@A@A@A@A@A pj                      
00060: 0001 0001 0001 0001 0001 0001 0001 0001  0001 0001 0001 0001 0001 0001 0001 0001 @A@A@A@A@A@A@A@A@A@A@A@A@A@A@A@A                         
00100: 0001 0001 0001 0001 0001 0001 0001 0001  0001 0001 0001 0001 0001 0001 0001 0001 @A@A@A@A@A@A@A@A@A@A@A@A@A@A@A@A                         
00120: 0001 0001 0001 0001 0001 0001 0001 0001  0001 0001 0001 0001 0001 0001 0001 0001 @A@A@A@A@A@A@A@A@A@A@A@A@A@A@A@A                         
00140: 0001 0001 0001 0001 0001 0001 0001 0001  0001 0001 0001 0001 0001 0001 0001 0001 @A@A@A@A@A@A@A@A@A@A@A@A@A@A@A@A                         
00160: 0001 0001 0001 0001 0001 0001 0001 0001  0001 0001 0001 0001 0001 0001 0001 0001 @A@A@A@A@A@A@A@A@A@A@A@A@A@A@A@A                         
00200: 0001 0001 0001 0001 0001 0001 0001 0001  0001 0001 0001 0001 0001 0001 0001 0001 @A@A@A@A@A@A@A@A@A@A@A@A@A@A@A@A                         
00220: 0001 0001 0001 0001 0001 0001 0001 0001  0001 0001 0001 0001 0001 0001 0001 0001 @A@A@A@A@A@A@A@A@A@A@A@A@A@A@A@A                         
00240: 0001 0001 0001 0001 0001 0001 0001 0001  0001 0001 0001 0001 0001 0001 0001 0001 @A@A@A@A@A@A@A@A@A@A@A@A@A@A@A@A                         
00260: 0001 0001 0001 0001 0001 0001 0001 0001  0001 0001 0001 0001 0001 0001 0001 0001 @A@A@A@A@A@A@A@A@A@A@A@A@A@A@A@A                         
00300: 0001 0001 0001 0001 0001 0001 0001 0001  0001 0001 0001 0001 0001 0001 0001 0001 @A@A@A@A@A@A@A@A@A@A@A@A@A@A@A@A                         
00320: 0001 0001 0001 0001 0001 0001 0001 0001  0001 0001 0001 0001 0001 0001 0001 0001 @A@A@A@A@A@A@A@A@A@A@A@A@A@A@A@A                         
00340: 0001 0001 0001 0001 0001 0001 0001 0001  0001 0001 0001 0001 0001 0001 0001 0001 @A@A@A@A@A@A@A@A@A@A@A@A@A@A@A@A                         
00360: 0001 0001 0001 0001 0001 0001 0001 0001  0001 0001 0001 0001 0001 0001 0001 0001 @A@A@A@A@A@A@A@A@A@A@A@A@A@A@A@A                         

Block: 0001 

00400: 1006 0000 0000 1406 1030 0063 1006 0000  0012 0403 0165 2417 0161 1406 1100 0002 HF@@@@LFHX@3HF@@@JDCA5TOA1LFI@@B        3       u  q  @  
00420: 1406 1110 0023 1406 1030 0024 1006 0000  0031 0403 0000 0000 0000 1006 0000 0037 LFIH@SLFHX@THF@@@YDC@@@@@@HF@@@_  H2                     
00440: 1006 0000 0042 1006 0000 0045 0411 0001  2000 0000 0002 3000 0000 4040 4040 4040 HF@@@"HF@@@%DI@AP@@@@BX@@@          "   %      @         
00460: 1006 0000 0053 0401 0040 1406 1030 0015  0403 0040 0000 0000 1406 1030 0057 0402 HF@@@+DA@ LFHX@MDC@ @@@@LFHX@/DB    +                2/  
00500: 0006 0210 1406 6400 0057 0401 0200 1406  1100 0002 1406 1110 0023 0422 0101 0000 @FBHLF4@@/DAB@LFI@@BLFIH@SDRAA@@      =/     @   H2   A  
00520: 6200 0710 6203 0710 6204 0710 6205 0005  0603 6203 0604 6204 0605 6205 0203 2210 2@GH2CGH2DGH2E@EFC2CFD2DFE2EBCRH  HA HA HA  @            
00540: 1406 1000 0140 1407 1130 0000 1406 1030  0126 1406 1030 0034 1403 1130 0000 1406 LFH@A LGIX@@LFHXAVLFHX@\LCIX@@LF   2`  X    2V      X2   
00560: 1030 0140 1406 1030 0034 1406 1030 0031  1406 1030 0050 0402 0204 2210 1406 1000 HXA LFHX@\LFHX@YLFHX@(DBBDRHLFH@  `   2        2(       2
00600: 0164 1407 1130 0000 1406 1030 0152 1406  1030 0037 1403 1130 0000 1406 1030 0164 A4LGIX@@LFHXA*LFHX@_LCIX@@LFHXA4 t  X    2j      X2    t 
00620: 1406 1030 0037 1406 1030 0031 1406 1030  0050 1407 1130 0000 1406 1030 0172 1406 LFHX@_LFHX@YLFHX@(LGIX@@LFHXA:LF   2        2(  X    2z  
00640: 1030 0042 1403 1130 0000 1406 1030 0061  1406 1030 0042 1406 1030 0031 1406 1030 HX@"LCIX@@LFHX@1LFHX@"LFHX@YLFHX  "  X2    1   2"       2
00660: 0045 1007 0000 0000 1407 1030 0063 1007  0000 0012 0403 2422 1115 4040 1407 1100 @%HG@@@@LGHX@3HG@@@JDCTRIM  LGI@ %       23        M ( @2
00700: 0002 1407 1110 0023 1407 1030 0024 1007  0000 0031 1007 0000 0034 1007 0000 0037 @BLGIH@SLGHX@THG@@@YHG@@@\HG@@@_    H    2               
00720: 1007 0000 0042 0411 0001 2000 0000 0003  3000 0000 0006 2000 0000 1007 0000 0053 HG@@@"DI@AP@@@@CX@@@@FP@@@HG@@@+    "          `       + 
00740: 0401 0040 1407 1030 0015 0403 0040 0000  0000 1407 1030 0057 0402 0006 0210 1407 DA@ LGHX@MDC@ @@@@LGHX@/DB@FBHLG      2          /       
00760: 6400 0057 0401 0200 1407 1100 0002 1407  1110 0023 0405 0101 0000 6200 0710 6202 4@@/DAB@LGI@@BLGIH@SDEAA@@2@GH2B  /P    @2   H   A    H  

Block: 0002 

01000: 0405 0005 0206 6203 0202 0006 1407 6400  0117 1407 6400 0135 0401 0005 1404 1130 DE@EBF2CBB@FLG4@AOLG4@A]DA@ELDIX            =O   ]P    X2
01020: 0000 1407 1030 0125 1407 1030 0117 1407  1030 0034 1407 1030 0037 0402 0204 2207 @@LGHXAULGHXAOLGHX@\LGHX@_DBBDRG     U   2O       2      
01040: 1407 1040 0061 1405 1130 0000 1407 1030  0143 1407 1030 0135 1407 1030 0034 1406 LGH @1LEIX@@LGHXA#LGHXA]LGHX@\LF   21  X    2c   ]   2   
01060: 1030 0031 0403 0203 2205 6203 1407 1060  0104 1407 1030 0061 0000 0001 0001 0001 HX@YDCBCRE2CLGH0ADLGHX@1@@@A@A@A         L 02D   1       
01100: 0001 0001 0001 0001 0001 0001 0001 0001  0001 0001 0001 0001 0001 0001 0001 0001 @A@A@A@A@A@A@A@A@A@A@A@A@A@A@A@A                         
01120: 0001 0001 0001 0001 0001 0001 0001 0001  0001 0001 0001 0001 0001 0001 0001 0001 @A@A@A@A@A@A@A@A@A@A@A@A@A@A@A@A                         
01140: 0001 0001 0001 0001 0001 0001 0001 0001  0001 0001 0001 0001 0001 0001 0001 0001 @A@A@A@A@A@A@A@A@A@A@A@A@A@A@A@A                         
01160: 0001 0001 0001 0001 0001 0001 0001 0001  0001 0001 0001 0001 0001 0001 0001 0001 @A@A@A@A@A@A@A@A@A@A@A@A@A@A@A@A                         
01200: 0001 0001 0001 0001 0001 0001 0001 0001  0001 0001 0001 0001 0001 0001 0001 0001 @A@A@A@A@A@A@A@A@A@A@A@A@A@A@A@A                         
01220: 0001 0001 0001 0001 0001 0001 0001 0001  0001 0001 0001 0001 0001 0001 0001 0001 @A@A@A@A@A@A@A@A@A@A@A@A@A@A@A@A                         
01240: 0001 0001 0001 0001 0001 0001 0001 0001  0001 0001 0001 0001 0001 0001 0001 0001 @A@A@A@A@A@A@A@A@A@A@A@A@A@A@A@A                         
01260: 0001 0001 0001 0001 0001 0001 0001 0001  0001 0001 0001 0001 0001 0001 0001 0001 @A@A@A@A@A@A@A@A@A@A@A@A@A@A@A@A                         
01300: 0001 0001 0001 0001 0001 0001 0001 0001  0001 0001 0001 0001 0001 0001 0001 0001 @A@A@A@A@A@A@A@A@A@A@A@A@A@A@A@A                         
01320: 0001 0001 0001 0001 0001 0001 0001 0001  0001 0001 0001 0001 0001 0001 0001 0001 @A@A@A@A@A@A@A@A@A@A@A@A@A@A@A@A                         
01340: 0001 0001 0001 0001 0001 0001 0001 0001  0001 0001 0001 0001 0001 0001 0001 0001 @A@A@A@A@A@A@A@A@A@A@A@A@A@A@A@A                         
01360: 0001 0001 0001 0001 0001 0001 0001 0001  0001 0001 0001 0001 0001 0001 0001 0001 @A@A@A@A@A@A@A@A@A@A@A@A@A@A@A@A