Trailing-Edge
-
PDP-10 Archives
-
BB-4157F-BM_1983
-
fortran/compiler/sta2.rel
There are 24 other files named sta2.rel in the archive. Click here to see a list.
0 V>6V 0 @
A4y&Bb a, b 3
"e;l TB = -0 @ + 0<$ ?
DE( &-We, eV>6L]We, ? eV>6PP ?
&T L @ ,~ -0 @ + -0 @ + @ ,~ -0 . D # w + [
Jp ,> , / Zp [
p 1L + ,> E ,>0 ,> , / ,>
,
/ 3Z + ,> D"eV>6J@ eV>6O@
eV>6O@ eV>6J@ eV>6O@ eV>6O@ eV>6O@ d"e;g@ " [ ,>l ,> , + p Z* Q*A` J , Zp 7Lp + ,> ,> ,> , " / + [ 0 BP 0 0P + >@@p
Jp
Lp p 7X + , D"eV>6J@ eV>6L@ eV>6J@ eV>6O@ eV>6P@ eV>6L@ eV>6J@ !eV>6L@ "eV>6L@ % % * 1: 0@
, 0z =@
A
`J /: 3X + #+ . 0 GP 0 Pp @ @ . 6Lp + p N Pp p 7X + <
. 1: 0@ 0 0z = 6@ A `N /: 3X + 1,> , / , + Z , GL
D"eV>6P@ ,eV>6L@ .eV>6L@ 0eV>6J@ 0eV>6L@ 3eV>6J@ 9eV>6O@ :eV>6P@ <eV>6L@ = ( @ =+ p [h .. ,> ,> , / p P `PR`@ ,> , / ,
F L
J N P H
L 7J + N Z D"eV>6O@ AeV>6O@ DeV>6L@ FeV>6L@ GeV>6L@ HeV>6L@ IeV>6L@ JeV>6L@ KeV>6L@ M ( M+ N@@ P 0P $:
L
L l @
`J d `N d P " VS( BH US(PH H , L F, 1Z @, @ / + ,> , / D"eV>6L@ NeV>6L@ OeV>6P@ ReV>6P@ SeV>6L@ Ud%
L@ WeV>6O@ [
= H \eV>6O@ ] ], H
J
L N P H 6J J N f 0 P S( H H * D"eWk&@ _eWk&@ `eWk&@ aeWk&@ beWk&@ ceWk&@ deWk&@ ed%
L@ geV>6O@ h @ hj , l . n 0 p H V, @ ,~ -0 . D"eV>6J@ heV>6O@ ieV>6J@ ieV>6O@ jeV>6J@ jeV>6O@ keV>6J@ k?z oeV>6O@ o ( p:
J J :
p@@4 q6N + w ( H ,> , / 5Z z+ y[ 1H
(T" x+ z w+ T@@ s r * J$ r
L t,> , u/ 4Z w1P + ,> "Q(* ,> + O@ q+ " 0 P |,> u, }/ 7V +
/* J,>, / "@(T" 7V + $. . /. N
+ * J,>, / 4Z, 4:T7P z *ET" + @@+ , Z w[
1J + ,> D"eV>6O@ veV>6J@ |eV>6O@ ~eV>6J@ eV>6J@ eV>6O@ eV>6O@ eV>6O@ d"e;g@ *T*U
,>, + z < {> ` H
+ 6N+ , ZO@,> [ ,>l,> *A( + N6j+ ",> ,> + N HG
Jp O@p , 2Lp + .: p " "
'0N + +,> ,> ,> , / + R '1H + R,>+,> + N ,
2Lp + 8 ""D 0: p -1N + R 00H + 4 :
+ T
20L + 7,> D"eV>6J@ eV>6J@ eV>6J@ !` :@ #eV>6J@ (eV>6J@ )eV>6O@ *eV>6J@ -eV>6J@ 6 *" 6+ >,>4,> + N 0 2Pp + C: p 71H + R
:0L + ?,> ,> + ) (A"" ? <0P + B,> ,> + ),>?,> + N * 2Jp + K: p
B1L + R E " D G0P + I,> + A,>G,> + N *
2Jp + P: p ,>I,>
,>
, :/ D"eV>6J@ 7eV>6J@ =eV>6J@ @eV>6J@ BeV>6J@ HeV>6J@ JeV>6J@ MeV>6J@ NeV>6O@ O ( O+ T , 2Lp + S: p #+ T7 p O / + -0 w H * J @@ "(
X,> , o/ Z 5:[ Y+ [ " 8 0P + c6HW+ a . N,>, "E
`/ + c[ 1N @@]:Z0H + f[6oNW+ g@@e". .nd,> , " i/ 4:{* J \` 0H + t 0N + s* Jmd lt ` ,>h q,> , / D"eV>6O@ TeV>6O@ xeV>6O@ z ^}.3 {eV>6O@ {eV>6O@ |
(Q%3 " @ ,> , U/ ,~ ,> , U/ ,~ ,> , U/ ,~ D"eV>6O@ eV>6O@
eD%S eV>6O@ eV>6O@
M - eV>6O@ eV>6O@
HFS A O@ ,> , U/ ,~ -0U O@c ( H d l ,>` ,> , / ,> ( ,>, / + {-0 O@ @@ d l ,>` ,> D"eV>6O@ eV>6O@ u5s eV>6O@
eV>6O@ V>6O@ , / ,> ,>, / + -0 . 7H + ,> , N/ , 5L ,> D"eV>6O@ eV>6O@ eV>6O@
})S eV>6O@ eV>6J@ eV>6O@ eV>6O@ eV>6J@ * + ?O@l P @ X ah + $,>X ,>
,> ,>
, / * 0J ( A %+ B N S0 P , ( 1H + ;, 1L + < 0 QP', ( - R 8 HH
.
JH
.
+LH ( .. +NH ,XH +0 QPH @@H 6, . D"eV>6J@ !eV>6J@ "eV>6O@ #eV>6O@ $eV>6O@ (eV>6O@ *eV>6O@ 0eV>6O@ 1eV>6O@ 6 @ 7@HH eVH @@H , Zp 5:B p + G, 1L + =,>
G+ -0 . , Za[I0H + RZ
J Lp 0 N ,> ,> , / p T"( PS( GH@ , I ZK+ U,> ,>$ ,> , ?/ + Z[
Q1L + Z, Q[ 0P ("( X+ W,> , / D"
s HeV>6O@ HeV>6O@ MeV>6O@ OeV>6J@ ReV>6J@ SeV>6O@ TeV>6J@ YeV>6O@ Z * Z/ + @ ,~ -0H. , W ZU[^0H + gZ
^ Lp 0 N ,> ,> (D" c, / p S( GH@ , ] Z`+ h
Lal
[
f1L + l,> ,>4S,> D"eV>6O@ Z
2d s \eV>6O@ ]eV>6O@ beV>6O@ ceV>6O@ gd"e;g@ jeV>6J@ k ( k, T/ / + [-0O@A@@ ,>` , / ,> ,>o, / + -0 t. X H D"eV>6O@ leV>6O@ l
a`3 meV>6O@ peV>6O@ qeV>6O@ r
M 3 seV>6O@ t` :@ u A v,> ,> , / [
.
Jp 2rp + H 6LX + 2R + ,>
, A ~/ O@ O@ + ,> D"eV>6O@ veV>6O@ w` :@ x` :@ x` :@ y` :@ |eV>6O@ }eV>6O@ ~eV>6J@ ,> ,> , / + X 1P + } X
` Jp [
,> ,> , w/ ,>
,>p , / 4: p S( GH@ ,>@ , ~/ 8 O@ 0 P [P QH Z
P XJ D"eV>6J@ eV>6J@ eV>6O@ eV>6O@ eV>6O@ eV>6O@ eV>6O@ ` :@ ` :@ ,>X , / 4:[ QNP Z XPP [P QTX ZX 5V9z [ ,> ,> ((A , / / + G-0s. O@ Z-6H` + "O@ O@ + > ` Z Z
[ $.
Lp 2rp + > H 0P + 9 H S* GJP O@!
P aj + .,>P ,> D"eV>6O@ ` :@ ` :@ ` :@ eV>6O@ eV>6O@
, #/ P an + 3,>P ,> ,>,,>
, -/ ,
aL ( D 5+ =,>P ,> ,>1,>
D"eV>6J@ -eV>6O@ .eV>6J@ 0eV>6J@ 1eV>6O@ 2eV>6O@ 3eV>6O@ 3eV>6J@ 6eV>6J@ 7 (@ 7, 2/ + = H X
P `j + =,> , / .2 + %@ / + D"eV>6O@ 8eV>6O@ <eV>6O@ >
&0l ? @ ` @7D? (P @ ?-0m ( QH,, ,
wQJ`
XL` XC: S0 GP( @ + s@ ` *@ H H H 0 l"K4K6LH
@ P
D"MV>6E HV>6Q@ JeV>6Q@ MeV>6Q@ MeV>6Q@ NeV>6Q@ NeV>6Q@ T T ( ( 0 ]" 4 6
8 ` X e
exu }[' .P $P NOLIST NOCREF X nNOLIST NOCREF (*) constant (*) integer constant or"(" ENTRYOname v PROGRAM name ,dOR / IDENTIFIERCOMMON variable Dummy argument External name D"eV>6Q@ VeV>6Q@ WeV>6Q@ WeV>6Q@ XeV>6Q@ YeV>6Q@ Y
De
DeK}: )eK8# !b2NU ` <*o cXq
o D"dQ t
c} eK 3 eK>> b2]V eK )- ` : teK )- rb2NU p D"` : q` <*o ndQ t ce
gg e$ mc
Mgm!$ \ D"g e& ?cu3{ D` <*o Bbq3 8bM yH Aed sQ '` /83 @` D &e
% D"be-S gm!& eK )- cu3{ ` <*o ` : eK )- cu3{
` <*o
D"` : bHK+o eK )- zert; we
wU0 vb}
e} scu3{ re
w9 ne
v- u D"e
ve? v` <*o jeY_]- h` : ycXq
o n`bbHKWx fbz'] Vf,h!? * D"bz'] Rd"e3 ebM9 c1Uj }` + hd"e i `c1qj d(`~
` D"` : `ox MbHKWx p` Q gb}p%: meWe, leKW@ LeMJY* fbHF e D"d%
! dd%
w c`C& beVU& abP^o& `bP^n@ _b}p+
^eWk& ^bKBo ] D"d"e i \c1}a \e
= H Zb}p%: Y` 4 Xc
e meKW@ QbHF Nd%
! P D"eMJY* Kd%
w J`C& IeVU& HbP^o& GbP^n@ Xb}p+
Eb}p.- Ec1}a C D"eK )- FbKBo ;c d%"= B D"c