File: STARCH.RL of Tape: V50/Source/Source-Listing-FORTRAN-1
(Binary file converted to dump format)
Block: 0000 00000: 0003 0050 0000 0000 4300 0000 0000 0003 0040 1122 0310 0503 1300 0004 0060 0203 @C@(@@@@#@@@@@@C@ IRCHECK@@D@0BC ( @ R HC @ 0 00020: 4316 0500 0000 0002 0100 0000 0000 0000 0000 0000 0000 0000 0001 0001 0001 0001 #NE@@@@BA@@@@@@@@@@@@@@@@A@A@A@A N@ @ 00040: 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 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: 1003 0000 0000 1403 1030 0121 1003 0000 0012 0403 0310 0503 1300 1403 1100 0002 HC@@@@LCHXAQHC@@@JDCCHECK@LCI@@B Q HC @ #@ 00420: 1403 1110 0023 1403 1030 0024 1003 0000 0031 1003 0000 0053 0401 0040 1403 1030 LCIH@SLCHX@THC@@@YHC@@@+DA@ LCHX H2 + 2 00440: 0015 0403 0040 0000 0000 1003 0000 0064 1003 0000 0075 0420 0000 0000 0000 0001 @MDC@ @@@@HC@@@4HC@@@=DP@@@@@@@A 4 = 00460: 2000 0000 0002 3000 0000 0003 3000 0000 0004 2000 0000 0000 1402 1037 7445 1002 P@@@@BX@@@@CX@@@@DP@@@@@LBH_<%HB @ ` 2% r 00500: 0000 0000 1002 0000 1100 1002 0000 1103 1002 0000 1106 1002 0000 1111 1002 0000 @@@@HB@@I@HB@@ICHB@@IFHB@@IIHB@@ @ " C F " I 00520: 1114 1002 0000 1117 1002 0000 1122 1003 0000 0117 1403 1030 0057 0402 0006 0210 ILHB@@IOHB@@IRHC@@AOLCHX@/DB@FBH L " O R " O 2/ 00540: 1403 6400 0057 0401 0200 1403 1100 0002 1403 1110 0023 0412 0005 0100 0002 0100 LC4@@/DAB@LCI@@BLCIH@SDJ@EA@@BA@ =/ @ H2 @ @ 00560: 0003 0100 0004 0100 0005 0216 1402 6400 1117 0404 0100 0006 0220 4222 1402 1400 @CA@@DA@@EBNLB4@IODDA@@FBP"RLBL@ @ @ =O !@ 3 00600: 1103 0401 4222 1402 1400 1100 0401 0027 1402 0477 7445 1402 2400 1106 1403 1040 ICDA"RLBL@I@DA@WLBD?<%LBT@IFLCH C ! @2 ?1% s FR 2 00620: 0175 0403 0100 0007 0217 1402 6400 1117 0402 0100 0010 1403 1030 0117 0402 0100 A=DCA@@GBOLB4@IODBA@@HLCHXAODBA@ } @ OR @ O @ 00640: 0011 1403 1030 0117 0000 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 0001 @ILCHXAO@@@A@A@A@A@A@A@A@A@A@A@A O 00660: 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 00700: 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 00720: 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 00740: 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 00760: 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