Trailing-Edge
-
PDP-10 Archives
-
BB-4157E-BM
-
fortran-compiler/listng.20
There is 1 other file named listng.20 in the archive. Click here to see a list.
0 %C6 0 @
%C$ S4xk!4y
A4y&Bb
%A0
"dkl _0<$ -0 w* , .
0Z + 0 p Z
<
XL + z @ + -0 . "e3& d%C0Pe3&
_S7 d%C/@ d%C/@ d%C/@ d%C/@
%
+ d%C/@ @ w *A`QJ 6
w0 /. 0 08 @ ( 1x @ G aP (@ + 3X + ,> ,> , / @
$* .
=6
Zp
w0 " 0X ?+ $Z 2P + $, 0X @+ $, , 0X @+ $,> ,> , #/ 1X + H
w
( 0 ( 2N @ * 6Pp @
A aH + G
w + 0 8 XN0 0A`QP0 * J ( D aH + 3,> D"d%C/@ d%C*@ d%C/@ d%C/@ !d%C/@ "d%C/@ #d%C/@ 'd%C/@ /d%C/@ 1
1, / , w
8 6P0 + 7 8 8 XH8 + 3 w
@ 0L ?+ AZ 2N * A :+ A, 0X @+ A, , 0X @+ A,> ,> , "/ w (A` " BQH8 8
@ aL + H,> , / + I,>w, / 7p @ / + -0 " K,> D"d%C/@ 2d%C/@ ?d%C/@ ?d%C/@ @d%C/@ Fd%C/@ Hd%C/@ I Sd%C/@ Td%C/@ Ud%C/@ Vd%C/@ Wd%C/@ [ AD \@ )6 4X
.* J T[ 4X d . N ^,> , [/ 0 P `@ S " d)6 4X h 0 P c,> , a/ 60 + j,> , V/
hal + m,> , i " A m/ jah + p,> , l/
aJ + s,> D"d%C/@ bd%C/@ gd%C/@ id%C/@ jd%C/@ ld%C/@ md%C/@ od%C/@ pd%C/@ r ( r, o/ an + v,> , r/ aP + y,> , u/
al + | " {,> , x/ aH + ,> , {/ D"d%C/@ sd%C/@ ud%C/@ vd%C/@ xd%C/@ yd%C/@ {d%C/@ |d%C/@ ~d%C/@ D
aJ + ,> , ~/ aN + ,>
, / aP + ,>
, /
al + ,> , / A D"d%C/@ d%C/@ d%C/@ d%C/@ d%C/@ d%C/@ d%C/@
d%C/@ d%C/@
(@"
4H ,>
,
/ an + 0 !P f aP + , *L
aL + " D" ( &H aH + * "J
aJ + . $N . N . N 0 ( P Y v
&, 8 ,> , g/ &( &0 H ,> ,
&, ., ,> , !/ * J v &
,> , )/ " @ . 0 P* &
D"d%C/@ !d%C1@ $d%C/@ &d%C/@ )d%C/@ ,d%C/@ .d%C/@ 0 A 0
&,j0 08 + 4( H/,> , -/ ,> J-0 J@ + :-0:Z 9Z
93H + A,> ,> ,> D d%C/@ 5d%C/@ 6d%C/@ 7 #?M d%C0T*#?M ^|+ :mXL <d%C*@ >d%C*@ ? @, /
: S ZC. *8_"( HX VL@@G*<7 " * Q@ + H `H @+ Y,
`J + Z,> , / D"d%C/@ @d%C/@ Ad%C*@ B` 4 @ Ed%C/@ Id%C*@ J
HXDx Rd%C/@ Ud%C/@ V @ * W1Z @,~ , J : ,~ l ,: @,~ D"
w<
$* Z( .
, Z$0 Q$I @ c"& @ w< $. .0 @. p 5Pr
w<
$* Z,a
ad + m (D l, R Zp + s,> ,>?,> , /
+ 0 + s * Jp p p p D t p / + D"d%C/@ [d%C*@ ad%C*@ gd%C*@ md%C*@ nd%C/@ od%C/@ u
) v @ ` @lv D v 0H
Q
Z
Z$0 Q$A`S& X& @O "@ 5Z,> ( ~ < ,> ,> , / ~d%C*@ d%C/@ d%C0@ Z Z* , l @ n Z / 8 P
: ,~ D"d%C/@ d%C/@ bH_ @ bH_ @ (T t
@ ` @,
A D
aH +
: @,~ 6JO+ aN + : + : ,> , [/ 0Z @ (A D , <,~ D"d%C/@
v(:3 @ ` @T (@ , <,~ -0<Z H @@ * "
Z, . n .* j 0 5P =) * 0n @
Z
0 "WeR d%C0UWeR
}p.- d%C0@ d%C*@ d%C*@ d%C/@ d%C/@ d%C/@ ( 0P @ A
. " Z00 ( h .. n , ( 0L @ A
`J (* '=). 0N + /18 + /7J` =)0 0P + . X . N+ /@@-0 * /.0 $0 . D"d%C*@ d%C*@ "d%C/@ "d%C/@ #d%C*@ 'd%C/@ +d%C0@ ,d%C/@ /d%C*@ 0 "( 1: ZO/ 2x + 5@@ + <
/
QJ4QJ , XZ6X7
Q * 9Z8[9. *6g *)"
.j Z
1/
"J=" .pP" .h " .n A B" .z + Q D"d%C0@ 3d%C0@ 5d%C0@ 8d%C0@ =d%C0@ ?d%C0@ @d%C0@ Ad%C0@ B5.3 ( C-0[,> 2h + I8 0z , z , G+ DO ,^ + u aH ( A L+ QZ
J Q*A` J ,
L . .nL, C
aJ + VZ
P L "d%C0R5.3Wbf d%C0SWbf(T" Cfny KbH_ @ MbH_ @ NbH_ @ ObH_ @ S SQ,I L . N .nR, C@ ,~ -0. Z>0H<+ l
aL + b6N ( \+ _Z H * @.j\, C,> @bH_ @ TbH_ @ U+J|. d%C,[J|.
}p%: Wd%C/@ XbH_ @ [bH_ @ ]d%C/@ _ ( * _, [/ 0Z @+ f+
, KZ^ N @@ 0 @.pb, C,> + _@@? 6Y. (P" h.. $. . : .0g PX+ z@@ 7L:+ uA,S .0j [l.(n @@" p *8_[o< ,> ,> , / + z 6p0 D"d%C/@ `bH_ @ cbH_ @ cd%C/@ ed%C/@ gd%C*@ ibH_ @ ld%C/@ td%C/@ u " v.0 $0 . : / " .(u H 5({@@ , ., $, .
: ~. Q 0 .0 $0 . : Z . Z
D"d%C*@ wd%C0@ yd%C0@ zd%C/@ {d%C*@ }d%C0@ ~d%C/@ d%C*@ d%C0@ @ / *8_", LX Zk3V +
,> ,>n,> , / d%C*@ d%C*@ d%C/@ d%C/@
vWK @ ` @ (D(A -0C7Hw~+ 6L + : /+ J@@
w7N0 + ,> ,> , / " w@@ * $ J B NA N@,
L , 0Z @+ ,> ,> , / *" @@
+ D" d%C*@ d%C/@ d%C0@ d%C*@ d%C*@ d%C/@ 5.3 d%C0R5.3 `N + 0x"+ & : @ (D @" &+
/*$ J
/
.,' S .0) *8_" .n " .hf"
(@ @" ..j"
.l" .p " .n " D"d%C*@ d%C0@ 'd%C0@ ,d%C0@ -d%C0@ .d%C0@ /d%C0@ 0d%C0@ 1d%C0@ 2 2.h "
.j "
.l("0 P0 @ + &-0 ,> .
;&" -$ )$|=8; F p p p @ /
C,>0 ,> , / D"d%C0@ 3d%C0@ 3d%C0@ 4
_@? 7d%C/@ 8d%C/@ ?
Rv Ad%C/@ Cd%C/@ E E aN + J7p , 2>
G,> , / B* B
w`J
&` ZJ
M " "@ N 0 HM,> ,> , / + AO + @-0 . G * D , D " "@ VaH + Z,> D"d%C/@ Jd%C/@ Kd%C/@ Od%C/@ P&rO Rd%C/@ Sd%C/@ Td%C/@ Ud%C/@ W U X, / : Zp + [@@p aN + }7pH, H,>~, 7/ ,> , I/ (U
`,-0L + c>\+ p.`0N + fO@b : Z .+ p*c0J + k d&6
(( i h/ < Hi+ p>j,>.,>f, / ,> , 1/ ,> + z aN (( q+ {,> D"d%C/@ Xd%C/@ ^d%C*@ _d%C/@ `d%C/@ md%C/@ nd%C/@ od%C/@ od%C*@ r (UD" r, / l3Pl+ w,>t,> , m/ `s,> , n/ :w,> , x/ *Q(E {+ },>u,>y, v/ @@TZN4P,>p , A/ O@S@@p@ / + 6 D"d%C/@ sd%C/@ vd%C/@ wd%C/@ xd%C/@ zd%C/@ }d%C/@ d%C/@ +vG d%C0P +vG%
G d%C0T%
G &B d%C0P &Bo"]t d%C0Uo"]to#5& d%C0Uo#5& %
y d%C0T%
y
+qj @ ` @; (EA" -0R. `H +
J
/ L N : Z
|3J + S A" N 1P $+ "
D"d%C/@ d%C0@ d%C0@ d%C0@ d%C0@
d%C*@ d%C0@ d%C0@
d%C0@ .* #76 + , L =6 : $ Z 6 1
, 18 @
. 0x @ A A
aL + 50 1P + * J * J @ N
`L + ,> D"d%C0@ d%C0@ d%C0@ d%C0@ d%C0@ d%C0@ d%C0@ d%C0@ d%C0@ (@ , 7/
&=@@
& P H
. 1X @ , 1X @
@ 'A aN + # D"d%C/@ d%C0@ d%C0@ d%C*@ !d%C0@ !d%C0@ "d%C0@ "d%C0@ #d%C0@ ( D ) @ aH + -,> , / Z + /:
,> , /
Jp
. 2L * 1@ 0 2J @ G aN + + B4X6X D"d%C*@ *d%C/@ +d%C0@ ,d%C0@ -d%C*@ -d%C/@ .d%C0@ /d%C0@ 1d%C0@ 6 "D
" 6 2H0+ :7Nw+ B p P + B=6 `P + ?,> , 7/
& :
" ? Z @ H
& D"d%C0@ 6d%C0@ 9d%C0@ ;d%C0@ <d%C/@ =d%C0@ ?d%C0@ @d%C0@ @d%C*@ A " A Z + . 6Jw@
0 3L @ A aN + O `H + K,> , 7 " J/
&> * J , L @ P D"d%C0@ Ad%C*@ Dd%C0@ Ed%C0@ Gd%C0@ Id%C/@ Jd%C0@ Kd%C0@ Ld%C0@ M " N
& + S aH + S,>
,>,>
, / + @ ` : D"d%C0@ Nd%C0@ Od%C*@ Pd%C*@ Qd%C/@ Rd%C/@ SL%C% U
%C* Uc@d
@ V
V
<, J7H
_ D"d%C1@ VbH_ @ WbH_ @ Xd%C1@ Xd%C1@ Yd%C1@ [d%C1@ \d%C0@ ^d%C0@ _ _ < 0 x
FORTRAN V./G /ST /F77 /OPT h/NOWA/C /SY /I /M /E /NOER/L /D:( mn@ PAGE < p0 < 0 : 0 < 0 ` $@h D@ D -JAN--FEB- y-MAR--APR--MAY--JUN--JUL--AUG--SEP--OCT--NOV--DEC- INSTAT TRANSFRING SINPUT RDTXT EOPRES EOPRESTORE OVERFLOW, LINE TOO LONG
BACKTYPE D"d%C1@ _
%C/ `
%C1 wL%C,
%C0 ` ^m `` ^m ]` ^Y \` ^m [ D"` ^m Z` ^m Y` ^m W` 2i Uc
c |dC? }b]= D"eK )- PeV`P` _e_+! kb2O , Db^,, Cb^$H ~g e% Rd%
L ]gm!% A D"bM?W 2bJ~Ve 1bJ~W7 0c
cz eK )- s`
KwH d`
KwH UbM J H`
KwH Ecw]y7 Dd%
w { D"`C& bM yH 7` /83 6b}p+
q` 4 *eMJY* .eVU& Z`
KyI bK D"c
KyI pbK pc
e ]fM Sb xf cQe+w 9` A mbaTEF 5b,cL eV`PX 6eV`PW Rc@d W 8g e% T D"c@dH ]bHF zc^\=* /`
J ebP^n@ 4bP^o& ^f,h : d%
! ]gm!% D"g e$ gm!$ ( (