Trailing-Edge
-
PDP-10 Archives
-
FORTRAN-10_V7wLink_Feb83
-
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 , 6X + @ + * J ,> , / 0<$ ?
DE( &-We, eV>6L]We, ? eV>6PP ?
eV>6O@ (A@ 4Z 7N + ,> ,> + 6X + 7N + @ eV>6O@
eV>6J@ eV>6O@
bH @ , / 5Z , QL S.ky N + Z` , Z : +
( - *D H ,> , / 5Z @@ @ ,~ , QZ D"eV>6O@ eV>6P@ bH_ @ eV>6P@ bH_ @ &T eV>6O@ bH_ @ bH_ @ (T(E" 4Z # . N ,> , / 4Z #, XZ 4Z # * . J ,> , / 5Z $O (E" #,~ : ,~ D"eV>6O@ bH_ @ eV>6O@ "# w % @ ` @l % %-0 @ ( H ,> !, !/ 7V + ,
(
.
/, - + ' + D"eV>6O@ (44 9(X ( H &,> ', '/ 6V + 7 , L 0,> 0, 1/ 6V (A
D* 6+ 7(XP + ?.8_p/4 + . , L 3,> 4, 4/ 5Z 9 0 P 9,> :, :/ (A(D" >5Z 97 + 9+ ( H <,> =, =/ 4Z Q
ML A,> , B/ 4Z GC: (A(D" G+ K D"eV>6O@ 1eV>6O@ 5eV>6O@ ;eV>6O@ > ,~ : Z H,> A, I/ 5Z C : " P,~ @ ,~ -0 . D eV>6O@ IeV>6P@ KeV>6O@ O+Xs& eV>6L[Xs&-Wk& eV>6L]Wk& ^\@ ReV>6O@ R D S aH + U,> + @@ @@ @@ @@ * J M,> N, N/ 5Z ], ,> @ [[ ,>h + s 0 6N @ * 6H D"eV>6J@ TbH @ UeV>6P@ VbH @ VbH @ WeV>6O@ YeV>6J@ [bH @ ]bH @ (Q" @
G aP + c, 1Z + ]4: 6L + g, 1Z + ]5: g,> + , @ (D* h5: i,> + 1Z + ] * J X,> X, Y/ 5Z p, Z,> [ ,>h + s, m " " p3Z + u,> [ ,>h ,> , / D"bH_ @ ceV>6J@ feV>6J@ heV>6O@ leV>6J@ neV>6O@ pd"e;g@ qeV>6J@ seV>6O@ t (@ " t+ 6N + wS*Lu J z `z + {,> ,> , / + 6J + },> ( " }+ @@ , D"bH_ @ ubH_ @ vbH_ @ weV>6J@ yeV>6O@ zbH_ @ {eV>6J@ |bH_ @ }bH_ @ ~ "" ~ L
+ O H @ 5Z[
4JZ` Z` + ,> , s/ + ,> ( "" , l/ D"bH_ @ ~bH_ @ bH_ @ eV>6P@ bH_ @ eV>6P@ eV>6J@ eV>6O@ eV>6O@ ,
L H N
J P
L 7H + Z ( + @@
J D"eV>6L@ eV>6L@
eV>6L@ eV>6L@
eV>6L@ eV>6L@ eV>6L@ eV>6L@ " 0J $:
L l @ `H d `N d
J S0 BPS0PH P " , L , 1Z @, @ / + ,> , /
J
L D"eV>6P@ eV>6P@ eV>6L@ d%
L@ eV>6O@
= H eV>6O@ eWk&@ "eWk&@ # # N P H
J 6L L P ( H S* H J , l ,. D"eWk&@ $eWk&@ %eWk&@ &eWk&@ 'eWk&@ (d%
L@ *eV>6O@ +eV>6J@ +eV>6O@ , ,n 0 p ( h
J, @ ,~ -0 %. :
J J * P" 5:
3@@446N + : ( H ,> , / 5Z=+ <[ 1H
+ = w+ @@6 (@ P" = 5 * J$5
D"eV>6J@ ,eV>6O@ -eV>6J@ -eV>6O@ .eV>6J@ .?z 2eV>6O@ 2eV>6O@ 9eV>6J@ ? (D
? L7,> , 8/ 4ZF w1P + E,> ,> + aO@4+ e 0 P?,>8, @ A( H/ 7V + P
/* JE,>G, G/ 7V + b J$. . /. NM+ K "Q
T( P * JF,>K, K/ 4Z], 4:7P=+ V@@T+ W, Z:[
W1J + Z "U
U" Y,> ,>, r+ a = <>>Z ` HO+ b6NU+ `, V ZWO@],>
[_,>lY "U
U" a,> D"eV>6O@ AeV>6J@ CeV>6J@ DeV>6O@ HeV>6O@ LeV>6O@ Rd"e;g@ YeV>6J@ `eV>6J@ a *A( b+ 6j\+ e,> ,>
+ [ b HG
Jp O@p , 2Lp + q: p e "
j0N + n,> ,> ,> , / + j1H + ,>n,> + ,
2Lp + { ""D( s: p p1N + s0H + w :
+
u0L + z,>
+ ,>w,>
+ D(D( { 0 2Pp + : p z1H +
}0L + ,>
D"eV>6J@ d` :@ feV>6J@ keV>6J@ leV>6O@ meV>6J@ peV>6J@ yeV>6J@ zeV>6J@ "D
" ,> + l 0P + ,>
,> + l,>,>
+ * 2Jp + : p
1L *" + 0P +
,> ,>
,> *
2Jp + : p ,>
,> , "( / + @, 2Lp + : p >f+ 7 p O / + - D"eV>6J@ eV>6J@ eV>6J@ eV>6J@
( 6H+ $. 6NQ,>Q, R/ + &[`1N @@ 0H + ) o N * )+ *@@(". .n',> , / 4:> * J ` 0H + 7 0N + 6 " E( 1 * J0d l ` ,>h ,> , / + ;, + 20N0+ : * J7 E( :,>` , / [.,> ,>;, / D"eV>6O@ eV>6O@ #` :@ (eV>6O@ +eV>6O@ ,eV>6O@ 4eV>6O@ 5eV>6O@ ;eV>6O@ = (@ ( >+ 7,> , / ,~ ,> , / ,~ ,> , / D" ^}.3 >eV>6O@ >eV>6O@ ?
(Q%3 BeV>6O@ BeV>6O@ C @ ( D,~ ,> , / ,~ ,> , / ,~ O@ ,> , / D"
eD%S DeV>6O@ DeV>6O@ E
M - FeV>6O@ FeV>6O@ G
HFS HeV>6O@ IeV>6O@ J " X J,~ -0 O@& ( H d l ,>` ,> , / ,> ,>K, / + > (@ S-0K O@L@@ d l ,>` ,> , / ,> D" u5s KeV>6O@ OeV>6O@ PeV>6O@ PeV>6O@ R
X,>S, / + R-0 . 7H + ^,> , / , 5L`,> + O@Tl (
a [ P @ X ah + g,>X ,> ,> y,> D"eV>6O@ Y
})S ZeV>6O@ [eV>6J@ \eV>6O@ ]eV>6O@ ^eV>6J@ _eV>6J@ deV>6J@ e ( f, z/ * 0J + N S0 P , (
1H + ~,
1L + " n 0 QPj, Ra 8 HH
.
JH
.
LH .. NH w XH 0 QPH @@H .
HH VH @@H , Zp 5: p +
,
1L + ,> D"eV>6O@ feV>6O@ geV>6O@ keV>6O@ meV>6O@ seV>6O@ teV>6O@ yeV>6O@ ~eV>6J@ (@ + ` 3PX + ,> , ]/ +
* J` . N ,>P ,> , / ,> @ ,> , / / + -0 . D"eV>6J@ eV>6O@ eV>6O@ eV>6O@ eV>6O@ eV>6O@ eV>6O@
s eV>6O@ *E
, ^ Z$[
0H + Z
p 0 N ,>
,> , / p S( GH@ ,
*
Z+ ,> ,>$a,> , / + [
1L + , [ 0P + ,> ,
/ / + D"eV>6O@ eV>6O@ eV>6J@ eV>6J@ eV>6O@ eV>6J@ eV>6O@ eV>6O@
! Lp 0 N ,>
,> , / D" ' p S( GH@ , Z#+ +
$l
[
)1L + /,> ,>4,> , / D" // D"
2d s eV>6O@ eV>6O@ %eV>6O@ &eV>6O@ *d"e;g@ -eV>6J@ .eV>6O@ /eV>6O@ / *@ A 0+ -0SO@@@ ,>` , / ,> ,>2, / + Z-0Z. X A 8 H ,> ,> , / D"
a`3 0eV>6O@ 3eV>6O@ 4eV>6O@ 5
M 3 6eV>6O@ 7` :@ 8eV>6O@ 9eV>6O@ : ; [
.
Jp 2rp + ] H 6LX + G2R + D,> ,> ,> D"` :@ ;` :@ ;` :@ <` :@ ?eV>6O@ @eV>6O@ AeV>6J@ DeV>6J@ DeV>6J@ E A E, / + S X 1P + @ X
` Jp [
,> ,> , :/ ,> ,>p , " N/ 4:` p S( GH@ ,>@ , A/ 8 O@ 0 P [P QH Z
P XJ V,>X , / 4:\[ D"eV>6O@ FeV>6O@ LeV>6O@ LeV>6O@ NeV>6O@ Q` :@ U` :@ VeV>6O@ W` :@ X ( YQNP Z XPP [P QTX ZX 5V[9= [ ,> ,> , K/ / +
-06 "D a. O@CZp6H` + eO@ O@ + ` Z Z
[ .
Lp 2rp + H "" j0P + | H S* GJP O@d
P aj + q,>P ,> ,>e,> , f/ D"` :@ Y` :@ ]eV>6O@ eV>6O@ `o,> , p/ , 0 G
aL + ,>P ,> ,>t " z,> , u/ + H X
P `j + ,> , / D"eV>6J@ seV>6J@ teV>6O@ ueV>6O@ veV>6O@ veV>6J@ yeV>6J@ zeV>6O@ {eV>6O@ " .2 + h@ / + ` D"eV>6O@
&0l @ ` @?t (P @ -00 ( QHo, o
wQJ`
XL` X: S0 GP( @ + 6@ ` * H H 0/"46 * H D"MV>6E
eV>6Q@
eV>6Q@ eV>6Q@ eV>6Q@ eV>6Q@
D"eV>6Q@ eV>6Q@ eV>6Q@ eV>6Q@ eV>6Q@ eV>6Q@ eV>6Q@ eV>6Q@
) 8 ` X
exu }[' .P $P NOLIST d 1 NOCREF ' ' NOLIST NOCREF (*) constant (*) :integerHconstant or "(" ENTRYmname PROGRAM name ,`OR2/ IDENT | BIFIERCOMMON variable Dummy argument External name D"
e
eK}: leK8# db2NU W` <*o TcXq
o SdQ t MceK 3 beK>> Bb2]V QeK )- ` : 7eK )- 5b2NU 3` : 4` <*o 1 D"dQ t &e
*g e$ 0c
gm!$ g e& eK )- D"cu3{ ` <*o bq3 {bM yH ed sQ j` /83 ` D ie
hbe-S [ D"gm!& aeK )- Ycu3{ W` <*o T` : XeK )- Qcu3{ O` <*o M` : Q D"bHK+o HeK )- =ert; :e
wU0 9b}
e} 6cu3{ 5e
w9 1e
v- 8e
ve? 9 D"` <*o -eY_]- +` : <cXq
o 1`%bHKWx )bz'] f,h!? mbz'] D"d"e3 (bM9 Sc1Uj @` + +d"e i #c1qj "d(`~
"`` : b D"`ox bHKWx 3` Q *b}p%: 0eWe, /eKW@ eMJY* )bHF (d%
! ' D"d%
w &`C& %eVU& $bP^o& #bP^n@ "b}p+
!eWk& !d"e i c1}a D"e
= H b}p%: ` 4 c
e 0eKW@ bHF d%
! eMJY* d%
w D"`C&
eVU& bP^o&
bP^n@ b}p+
b}p.- c1}a cd"e;g -d"e;g od"e;g \d"e3 pc1Uj Hg e& @gm!& -g e% gm!% 2 D"c
kg e% gm!% ( ( H