File: PASS3.SV of Disk: Disks/PDP8-Net/diag-games-kermit
(.SV Core Control Block followed by dump format)
Number of core segments: 00001
Starting field : 6203
Starting address: 0400
Job status word : 0000
0-No 00000-01777,1-No 10000-11777,2-Reload,3-Less 8k,4-Link,10-No pre CD,11-No pre USR
Core origin : 0400
Pages to load : 0016 Load field: 0000 Block: 0001
Block: 0001
00000: 6211 1777 3022 1717 6201 3720 2317 2320 2321 5200 1173 6212 4776 0001 7001 5775 2IO?XROO2A_PSOSPSQ*@I;2J'>@A8A/= C Oc PGOPDQ J{ ,~ }k
00020: 6212 1173 4776 0003 0174 0000 5775 1224 3774 1225 3773 1216 3023 1372 3771 1022 2JI;'>@CA<@@/=JT_<JU_;JNXSK:_9HR {B~ | } 2| r{ r zby r
00040: 7450 5770 0367 3322 3323 1766 0370 7112 7012 1365 1322 7100 1364 7420 5261 2323 <(/8C7[R[SO6C89J8JK5KR9@K4<P*1SS (x{wR SvcxJ ubR@.t /1S$
00060: 5253 1363 7006 7006 7006 3762 1323 1361 3760 1022 7112 7010 0357 3022 1022 0356 *+K38F8F8F_2KSK1_0HR9J8HC/XRHRC. +s" n rgSq"p rJ no n
00100: 1355 3020 1420 3754 1022 7112 7012 0353 1352 3010 1410 3751 1410 3750 5770 7605 K-XPLP_,HR9J8JC+K*XHLH_)LH_(/8>E m & l7 J. k`j & i7 h7x ?
00120: 0173 7773 0000 0000 3057 1410 3773 1410 3774 1410 3775 2065 5341 4471 5145 2010 A;?;@@@@X/LH_;LH_<LH_=P5+!$9)%PH {{ / c{ s| s}5ta9)e $
00140: 5550 2062 5345 4543 5357 4572 1034 7041 0720 0717 1244 0036 0716 1207 0037 0777 -(P2+%%#+/%:H\8!GPGOJ$@^GNJG@_G? h24ec)oz) !.PO $ N
00160: 0721 5560 0722 0072 7766 0106 7777 0007 0600 3706 1011 2077 2011 2203 0200 7666 GQ-0GR@:?6AF??@GF@_FHIP?PIRCB@>6 Qp R: vFp p F ?$ D 6
00200: 5777 7126 3024 3277 1376 3010 1375 3020 4774 5345 1373 7640 5224 1372 3277 1371 /?9VXTZ?K>XHK=XP'<+%K;> *TK:Z?K9 V> ?f~ &} &|e { / z"?yb
00220: 3410 2020 5217 5230 1021 3410 2020 5210 1025 1370 7650 5246 1032 1367 7640 5246 \HPP*O*XHQ\HPP*HHUK8>(*&HZK7> *& t * ' J x"(&z w" &z
00240: 1024 4766 1024 7421 7200 2024 1365 4764 1376 3010 1375 3020 1410 4764 2020 5254 HT'6HT<Q:@PTK5'4K>XHK=XPLH'4PP*, v) / dut)~ &} & t9 ,J
00260: 1277 7700 5270 3277 1371 4764 1371 4764 4774 5274 4764 5270 4763 4762 5204 0000 J??@*8Z?K9'4K9'4'<*<'4*8'3'2*D@@ ?@/8?&yt)yt)|< t8 sr
00300: 4040 4040 4040 4040 0617 2224 2201 1640 1126 4040 6402 0101 0140 4040 4040 4040 FORTRAN IV 4BAAA CV ( AP`
00320: 4040 4040 4040 4040 4040 4040 4040 4040 4040 2001 0705 4040 1716 0500 0000 0000 PAGE ONE@@@@@ E N@1
00340: 0000 0000 0000 0000 0000 1365 4764 5761 3354 1365 3050 4542 6050 5554 4064 1027 @@@@@@@@@@K5'4/1[,K5X(%"0(-, 4HW u tq lub(bi(lK4
00360: 0154 1747 2101 1515 2022 0211 1463 7540 7475 0240 7776 7567 1600 7772 0024 1526 A,O'QAMMPRBIL3= <=B ?>=7N@?:@TMV lg AMC @3`?= p~w z? V
Block: 0002
00400: 4040 4040 4040 4040 4000 1716 0540 4040 4040 4000 2427 1700 0000 0000 0000 2410 @ONE @TWO@@@@@@@TH N ` @S
00420: 2205 0500 0000 0000 0617 2522 0000 0000 0000 0611 2605 0000 0000 0000 2311 3000 REE@@@@@FOUR@@@@@@FIVE@@@@@@SIX@ @A R P I F
00440: 0000 0000 0000 2305 2605 1600 0000 0000 0511 0710 2400 0000 0000 1611 1605 0000 @@@@@@SEVEN@@@@@EIGHT@@@@@NINE@@ E S IH P 0
00460: 0000 0000 2405 1600 0000 0000 0000 0514 0526 0516 0000 0000 2427 0514 2605 0000 @@@@TEN@@@@@@@ELEVEN@@@@TWELVE@@ S L VN LQ P
00500: 0000 2410 1122 2405 0516 0000 0617 2522 2405 0516 0000 0611 0624 0505 1600 0000 @@THIRTEEN@@FOURTEEN@@FIFTEEN@@@ R %N R NQ E 0
00520: 2311 3024 0505 1600 0000 2305 2605 1624 0505 1600 0511 0710 2405 0516 0000 1611 SIXTEEN@@@SEVENTEEN@EIGHTEEN@@NI I FE E SE IH NQ
00540: 1605 2405 0516 0000 4024 2705 1624 3140 4024 1011 2224 3140 4040 0617 2224 3140 NETEEN@@ TWENTY THIRTY FORTY 5N E `6 `F `F
00560: 4040 0611 0624 3140 4040 2311 3024 3140 2305 2605 1624 3140 4005 1107 1024 3140 FIFTY SIXTY SEVENTY EIGHTY ` I `fE E `6 G `&
00600: 4016 1116 0524 3140 1025 1604 2205 0440 4061 4062 4063 4064 4065 4066 4067 4070 NINETY HUNDRED 1 2 3 4 5 6 7 8 N T` # A12 34 56 78
00620: 4071 6160 6161 6162 6163 6164 6165 6166 6167 6170 6171 6260 6261 6262 6263 6264 9101112131415161718192021222324 9p qrLstLuvLwxLy0L12L34L
00640: 6265 6266 6267 6270 6271 6360 6361 5512 0116 5506 0502 5515 0122 5501 2022 5515 25262728293031-JAN-FEB-MAR-APR-M 56L78L9pLqJKNF BM RA MK
00660: 0131 5512 2516 5512 2514 5501 2507 5523 0520 5517 0324 5516 1726 5504 0503 7711 AY-JUN-JUL-AUG-SEP-OCT-NOV-DEC?I YJ NJ[LA[GS[PO TN VD;CI
00700: 2761 7607 0245 7774 0000 0000 0000 0000 0000 3330 1133 3331 1330 7106 7004 3330 W1>GB%?<@@@@@@@@@@[XI[[YKX9F8D[X q _%| X [Y&XF. Xf
00720: 1330 7004 0160 1130 4450 2331 5314 5710 0000 0000 0000 1051 7450 5371 7710 5367 KX8DA0IX$(SY+L/H@@@@@@H)<(+9?H+7 X .pX (Y LH+ ) (yzHwz
00740: 1072 1130 4450 1027 4310 1030 7640 1377 4527 1034 4310 1540 7650 5362 1067 4527 H:IX$(HW#HHX> K?%WH\#HM >(+2H7%W :X"( H rW H` (rz7W)
00760: 4526 5367 1067 7440 4527 1134 4450 3067 5732 1034 7100 4525 5367 0067 5001 1200 %V+7H7< %WI\$(X7/ZH\9@%U+7@7(AJ@ Vw 7 /W\ (7 Z 2@Uiw7 "
Block: 0003
01000: 1377 3024 1261 4776 2024 5202 6212 1173 4775 0004 0174 0000 5374 6211 1652 6201 K?XTJ1'>PT*B2JI;'=@DA<@@+<2IN*2A &1~) J {B} | | ,* <
01020: 7710 5773 6213 1006 3772 2372 1007 3772 2372 3772 1652 0371 6202 7640 5244 6212 ?H/;2KHF_:S:HG_:S:_:N*C92B> *$2J H{{ Bzzt z'zzG*y0 O$ ,
01040: 1770 0367 7650 3773 6212 7201 6201 4775 0002 2157 7643 5374 1251 3261 6212 4775 O8C7>(_;2J:A2A'=@BQ/>#+<J)Z12J'= xw0({w N }I o #|z)1& }I
01060: 0006 0232 0000 0000 3022 1366 3262 1022 7106 7004 3022 1022 7004 0365 1364 4776 @FBZ@@@@XRK6Z2HR9F8DXRHR8DC5K4'> vb2 bF n b u`t~)
01100: 2262 5267 5663 0000 0363 7440 1362 7510 1371 1361 4776 5703 7777 0601 1360 4776 R2*7.3@@C3< K2=HK9K1'>/C??FAK0'> 27J3 0s rH/yq"~C qp~)
01120: 1357 4776 2314 5715 1356 4776 1220 3314 1355 3022 1422 7112 7112 7112 4303 1422 K/'>SL/MK.'>JP[LK-XRLR9J9J9J#CLR o~)LMKn~) L&m & J>JJnC
01140: 4303 1422 2022 0363 7640 5332 1360 4776 1357 4776 5754 0240 3677 0700 0214 0212 #CLRPRC3> +ZK0'>K/'>/,B ^?G@BLBJ C s@ Zzp~)o~)l 0?@q
01160: 0215 0240 7740 0077 0260 0007 7774 0020 7644 0100 7617 7605 2203 0200 2022 7177 BMB ? @?B0@G?<@P>$A@>O>ERCB@PR9? `?p0 | p$@p @ N
01200: 0000 2240 2310 5240 1307 7650 5211 4310 5777 1345 7101 7420 3345 7430 2307 4723 @@R SH* KG>(*I#H/?K%9A<P[%<XSG'S H JG(/ H(e2A oe oGSI
01220: 0200 6000 0000 5234 2222 1376 3310 1203 3240 1221 3346 5201 2307 7700 5224 5775 B@0@@@*\RRK>[HJCZ JQ[&*ASG?@*T/= ~BH b bf jG@O }+
01240: 7402 5262 5256 1203 3240 1746 0374 7112 7012 1305 7012 7012 2346 5263 1746 0374 <B*2*.JCZ O&C<9J8JKE8J8JS&*3O&C< 2z. " fc|J Eb nf3Jf|0
01260: 3305 2346 1746 0373 3021 1021 1372 7450 5207 1371 7450 5201 1370 7450 5600 7001 [ES&O&C;XQHQK:<(*GK9<(*AK8<(.@8A Efdf{0 bz(/ y"( zx(/ >
01300: 7650 5201 1021 2200 5600 0000 7617 0001 7777 1367 3323 6211 1706 6201 7450 5710 >(*AHQR@.@@@>O@A??K7[S2IOF2A<(/H ( z $ 0 pwrS lF <(H{
01320: 6212 4620 0001 0000 5775 6211 1706 0366 7440 1365 7132 7012 3345 2306 1706 3222 2J&P@A@@/=2IOFC6< K59Z8J[%SFOFZR I } <Fv0 urZ neFdF 6
01340: 2306 3307 2310 6201 5710 0000 0000 1364 3012 1012 7041 1010 7650 5763 1412 4762 SF[GSH2A/H@@@@K4XJHJ8!HH>(/3LJ'2 FGFH LH 0 t b! b(s{ r9
01360: 5351 0167 2022 0674 0024 0017 7760 6401 7775 0020 7546 0377 7400 2203 7177 1400 +)A7PRF<@T@O?04A?=@P=&C?<@RC9?L@ iw <A p }} pfp t c
Block: 0004
01400: 0000 1277 7001 7450 5777 3277 4423 4200 5400 0000 5777 2211 2776 1210 3274 1375 @@J?8A<(/?Z?$S"@,@@@/?RIW>JHZ<K= ? (o?6 0 4~ R<}b
01420: 3276 5600 0000 0374 3272 6031 5234 6036 0373 1372 7650 5771 2235 5235 5267 5264 Z>.@@@C<Z:0Y*\0^C;K:>(/9R]*]*7*4 > k | : l ,{z (y{ J74*
01440: 1272 7106 7006 0370 1673 3673 1272 7112 7012 7010 0370 1674 3674 1275 3235 2274 J:9F8FC8N;^;J:9J8J8HC8N<^<J=Z]R< :F. x`;;7:J. nx< <=r <d
01460: 2276 5622 4200 5622 1274 3273 2274 1272 3674 5622 0000 0000 5400 5235 7600 0000 R>.R"@.RJ<Z;R<J:^<.R@@@@,@*]>@@@ > K <;&<:B< { : p
01500: 5000 0000 6211 1700 6201 7040 1024 7640 5701 7144 1300 3300 1300 7001 3022 6211 (@@@2IO@2A8 HT> /A9$K@[@K@8AXR2I @C N /Ad>@@&@ . l
01520: 1422 6201 7041 3022 1367 3010 1410 7440 1022 7650 5335 2010 5326 7240 1410 3010 LR2A8!XRK7XHLH< HR>(+]PH+V: LHXH <! fw & ? (/] $V . 6
01540: 1410 3022 1022 7012 7012 7012 4766 1022 4766 1022 0365 7640 5340 4764 5302 2201 LHXRHR8J8J8J'6HR'6HRC5> + '4+BRA 6 . nv v u `t)B $
01560: 1406 0000 2326 5612 1515 0077 1503 2215 7400 7605 7775 0177 0377 7600 1413 2203 LF@@SV.JMM@?MCRM<@>E?=A?C?>@LKRC 0V KM?0C 4 }p 4
01600: 0304 0305 7605 1200 4210 1201 4210 5602 0000 6046 6041 5212 7200 5610 0724 2367 CDCE>EJ@"HJA"H.B@@0&0!*J:@.HGTS7 DE r & ! J kTw
01620: 1124 2451 0504 2701 2227 2401 0317 2417 0530 2463 2123 2474 2114 2512 1106 2536 ITT)EDWARWTACOTOEXT3QST<QLUJIFU^ T)%DA EO X3 S<ELJEF^%
01640: 0417 2567 2316 2607 2404 2626 0204 2646 2224 2721 2204 2740 2324 2762 0314 3004 DOU7SNVGTDVVBDV&RTWQRDW STW2CLXD w N E U & QE `ETrEL
01660: 1517 3021 1017 3041 1515 3066 2323 3102 1720 3123 0123 3134 0401 3142 0410 3153 MOXQHOX!MMX6SSYBOPYSASY\DAY"DHY+ O 6 !&M66SBFPS6S\ b k
01700: 1514 3204 0405 3226 0223 3244 1424 3257 1105 3266 2010 3313 1513 3346 1724 3362 MLZDDEZVBSZ$LTZ/IEZ6PH[KMK[&OT[2 L 6 $ /6E6& KFKf6Tr6
01720: 2004 3406 1524 3430 0726 3447 1411 3506 0420 3535 0414 3560 0101 3613 2306 3652 PD\FMT\XGV\'LI]FDP]]DL]0AA^KSF^* GT 7V' F7 ] p A F*G
01740: 0406 3666 1111 2356 0000 2346 2516 0405 0611 1605 0440 0522 2217 2200 1114 1405 DF^6IIS.@@S&UNDEFINED ERROR@ILLE 6 In$ f N Q R DL #
01760: 0701 1440 2523 0540 1706 4011 0600 0201 0440 0717 2417 4023 2401 2405 1505 1624 GAL USE OF IF@BAD GOTO STATEMENT A S`QF 8 O X UE 3
Block: 0005
02000: 0000 0201 0440 2205 0104 4017 2240 2722 1124 0540 2324 0124 0515 0516 2400 0122 @@BAD READ OR WRITE STATEMENT@AR D RET`!TT@MN RP
02020: 0723 4011 1640 0317 1515 1716 4017 2240 2601 2240 1116 4024 2717 4003 1715 1517 GS IN COMMON OR VAR IN TWO COMMO S O0MN3 TN (O XMO3
02040: 1623 4017 2240 2331 1624 0130 4002 0104 0000 0201 0440 1117 4014 1123 2440 0514 NS OR SYNTAX BAD@@BAD IO LIST EL 8 YD X0 D O S LQ
02060: 0515 0516 2400 0201 0440 0530 2405 2216 0114 4023 2415 2400 2331 1624 0130 4005 EMENT@BAD EXTERNAL STMT@SYNTAX E MN P X TL UY CX
02100: 2222 1722 4011 1640 0521 2511 2601 1405 1603 0500 2601 2211 0102 1405 4011 2340 RROR IN EQUIVALENCE@VARIABLE IS RC QI S @1 TB `
02120: 0521 2511 2601 1405 1603 0504 4015 1722 0540 2410 0116 4017 1603 0500 2410 1123 EQUIVALENCED MORE THAN ONCE@THIS QI S D1 R ` N @1 SR
02140: 4013 1116 0440 1706 4023 2401 2405 1505 1624 4016 1724 4014 0507 0114 4001 0624 KIND OF STATEMENT NOT LEGAL AFT N F ES 8T 8GL
02160: 0522 4014 1707 1103 0114 4011 0600 0201 0440 2331 1624 0130 4011 1640 0417 4017 ER LOGICAL IF@BAD SYNTAX IN DO O R GC2L Y X0
02200: 2240 1115 2014 1105 0440 0417 0000 1617 2440 1405 0701 1440 0123 4023 2502 2217 R IMPLIED DO@@NOT LEGAL AS SUBRO MB EB SA S B T
02220: 2524 1116 0540 1601 1505 0000 2331 1624 0130 4005 2222 1722 4011 1640 2431 2005 UTINE NAME@@SYNTAX ERROR IN TYPE TNR` E 0Y CX RC T
02240: 4023 2401 2405 1505 1624 0000 0411 1505 1623 1117 1623 4024 1717 4002 1107 5440 STATEMENT@@DIMENSIONS TOO BIG, ES 0 E O2 8O 8G +
02260: 1722 4023 3116 2401 3040 0522 2217 2240 1116 4004 1115 0516 2311 1716 4014 1123 OR SYNTAX ERROR IN DIMENSION LIS R 8N e Ra DN (MN!INC S
02300: 2400 1114 1405 0701 1440 0123 4004 1740 0516 0411 1607 4023 2401 2405 1505 1624 T@ILLEGAL AS DO ENDING STATEMENT LR A1 S0 ` N 8 UE 3
02320: 0000 0124 2405 1520 2440 2417 4022 0555 2431 2005 4001 4026 0122 1101 0214 0500 @@ATTEMPT TO RE-TYPE A VARIABLE@ T PS U m T RA @
02340: 0124 2405 1520 2440 2417 4022 0555 0411 1505 1623 1117 1640 0140 2601 2211 0102 ATTEMPT TO RE-DIMENSION A VARIAB T P 5 Xm E 3O #` B@
02360: 1405 0000 1116 2405 2216 0114 4003 1715 2011 1405 2240 0102 1722 2440 1625 1502 LE@@INTERNAL COMPILER ABORT NUMB 0N % L@ M C B@R 5 B3
Block: 0006
02400: 0522 4017 1605 0000 0522 2217 2240 1116 4003 1715 2014 0530 4014 1124 0522 0114 ER ONE@@ERROR IN COMPLEX LITERAL R 0R NB M XA T RL
02420: 0000 1720 0522 0116 0440 0530 2005 0324 0504 5440 1617 1605 4020 2205 2305 1624 @@OPERAND EXPECTED, NONE PRESENT P RN X T@D 3 E C
02440: 0000 1017 1414 0522 1124 1040 0317 2516 2440 2722 1716 0754 4017 2240 1511 2323 @@HOLLERITH COUNT WRONG, OR MISS R1T "ON RUNl1 IS4
02460: 1116 0740 2125 1724 0523 0000 1511 2315 0124 0310 0504 4020 0122 0516 2410 0523 ING QUOTES@@MISMATCHED PARENTHES N`!UTCS IM4TH D RN SQ
02500: 1123 0000 2325 0223 0322 1120 2440 1722 4001 2207 2515 0516 2440 1411 2324 4005 IS@@SUBSCRIPT OR ARGUMENT LIST E S U @RP RS MNQ ST H
02520: 2222 1722 0000 1114 1405 0701 1440 1720 0522 0124 1722 0000 0123 2311 0716 4077 RROR@@ILLEGAL OPERATOR@@ASSIGN ? RC L A1 P3RT R 0SI N?
02540: 7777 0000 0401 2401 4023 2401 2405 1505 1624 4077 0000 1017 1414 0522 1124 1040 ??@@DATA STATEMENT ?@@HOLLERITH p ES ?8 R1T "
02560: 0317 2516 2440 1722 4021 2517 2405 4005 2222 1722 4011 1640 0401 2401 4023 2401 COUNT OR QUOTE ERROR IN DATA STA ON RS O X RC
02600: 2405 1505 1624 0000 2410 1123 4014 1116 0540 1625 1502 0522 4011 2340 0114 2205 TEMENT@@THIS LINE NUMBER IS ALRE ES 0 SR N ` BR1 ` L
02620: 0104 3140 0405 0611 1605 0400 2722 1716 0740 2701 3140 2417 4005 1604 4001 4004 ADY DEFINED@WRONG WAY TO END A D D` 1RNS`A ` e
02640: 1740 1417 1720 0000 1114 1405 0701 1440 1116 4002 1417 0313 4004 0124 0100 1411 O LOOP@@ILLEGAL IN BLOCK DATA@LI ` 3P 0L #A N ( K0 T @
02660: 1605 4024 1717 4002 1107 0000 1116 2025 2440 0611 1405 4005 2222 1722 5440 2401 NE TOO BIG@@INPUT FILE ERROR, TA 8O 8G N $ Q 8 RC 5
02700: 1305 1640 0123 4005 1604 4023 2401 2405 1505 1624 0000 2410 1123 4006 2516 0324 KEN AS END STATEMENT@@THIS FUNCT E #S 8 UE 3 S (NTP
02720: 1117 1640 5740 2325 0222 1725 2411 1605 4023 2401 2405 1505 1624 4011 2340 2516 ION / SUBROUTINE STATEMENT IS UN O #`U4 U S ES 8`NE
02740: 0103 0305 2024 0102 1405 0000 3117 2540 1511 2320 0514 0504 4001 4013 0531 2725 ACCEPTABLE@@YOU MISPELED A KEYWU CE B@ 0O`eIP4LD YU
02760: 2204 0000 1114 1405 0701 1440 1720 0522 0116 0440 2431 2005 4006 1722 4024 1011 RD@@ILLEGAL OPERAND TYPE FOR THI @L #A PR1N T R
Block: 0007
03000: 2340 1720 0522 0124 1722 0000 1116 2405 2216 0114 4003 1715 2011 1405 2240 0102 S OPERATOR@@INTERNAL COMPILER AB `PCRT R 0N % L@ M C B@
03020: 1722 2440 1625 1502 0522 4024 2717 0000 1114 1405 0701 1440 2601 2211 0102 1405 ORT NUMBER TWO@@ILLEGAL VARIABLE R 5 B3R O PL #A TB
03040: 4024 3120 0540 1511 3011 1607 0000 2601 2211 0102 1405 4011 1640 0123 2311 0716 TYPE MIXING@@VARIABLE IN ASSIGN P `I c B@ 8 S0INA
03060: 0504 4017 2240 0317 1520 2524 0504 4007 1724 1740 1525 2324 4002 0540 1116 2405 ED OR COMPUTED GOTO MUST BE INTE D O@PT5D T`3UT4 ` N %
03100: 0705 2240 1722 4022 0501 1400 0530 2022 0523 2311 1716 4011 1640 1417 0711 0301 GER OR REAL@EXPRESSION IN LOGICA E R 8A X SI N 8 3IA
03120: 1440 1106 4011 2340 1617 2440 2431 2005 0440 1417 0711 0301 1400 0417 4020 0122 L IF IS NOT TYPED LOGICAL@DO PAR F2 ` 5 T IA 1 R
03140: 0115 0524 0522 2340 1525 2324 4002 0540 1116 2405 0705 2240 1722 4022 0501 1400 AMETERS MUST BE INTEGER OR REAL@ MT R` UT4 ` N %E R 8A
03160: 3117 2522 4004 0124 0140 0116 0440 2601 2211 0102 1405 4014 1123 2423 4001 2205 YOUR DATA AND VARIABLE LISTS ARE ORe T `N B@ 8S %
03200: 4017 0640 0411 0606 0522 0516 2440 1405 1607 2410 2300 2325 0222 1725 2411 1605 OF DIFFERENT LENGTHS@SUBROUTINE RN S 5@UD U S
03220: 2340 1501 3140 1716 1431 4010 0126 0540 2311 3040 0122 0725 1505 1624 2340 2410 S MAY ONLY HAVE SIX ARGUMENTS TH `AC`Nc 8V` I FRU E 3` E
03240: 0124 4001 2205 4004 1115 0516 2311 1716 0504 0000 0201 0440 2324 0124 0515 0516 AT ARE DIMENSIONED@@BAD STATEMEN T HMN!INCD TT@MN
03260: 2440 0625 1603 2411 1716 0000 0201 0440 0405 0611 1605 4006 1114 0500 0001 2276 T FUNCTION@@BAD DEFINE FILE@@AR> Q 5N 0 8L@! >
03300: 1276 1377 7700 5317 1376 4352 0000 0733 1306 1375 3306 5774 0000 0000 0000 3314 J>K??@+OK>#*@@G[KFK=[F/<@@@@@@[L >"@Oz~j( [ F}"F|k L
03320: 1276 1373 7510 5326 2314 5321 1372 3315 1314 7106 1371 3343 1315 7106 1315 1370 J>K;=H+VSL+QK:[MKL9FK9[#KM9FKMK8 >{"HVzLQJzM&LF.yc&MF.Mx"
03340: 3347 1367 4352 0000 0733 1376 4352 0000 0737 5774 0000 3316 1752 3011 2352 1752 ['K7#*@@G[K>#*@@G_/<@@[NO*XIS*O* gwbj [~ j _| N j 6jjC
03360: 3012 2352 1411 3412 2316 5362 5752 7774 0777 1133 0012 7766 1516 0005 7773 7754 XJS*LI\JSN+2/*?<G?I[@J?6MN@E?;?, jd 7NrJj|?[ v N 0{l