Trailing-Edge
-
PDP-10 Archives
-
bb-4157j-bm_fortran20_v11_16mt9
-
fortran-compiler/srca.rel
There are 12 other files named srca.rel in the archive. Click here to see a list.
0 U&<V 0 @
A4y&Bb {
$ - 3TB $ + 0<$ $ 1 @ -0 . ( QH , Z 6J + X X . XN` S( @ GH@ A0 "D @ XP` + Z [` 4N
[` +
Z` 2Hw+
QL` wXN` 1N X ( " S* @ GJ R`` A(XH` + [
` 4L [` + Z` 5P Z
` Jp S, @ BL( "
"- eU&<PP ;--
)@ eU&<O@ eU&<P@ eU&<P@ eU&<P@
XL` S0 @ GP8 wXP` A.XN` + "Z` Z
` 3*w+ +
/ (* "+ -0 . Z h Hp +@l &+ 2@ @ @ @ + 0+ 0+ 0+ 0+ 0 *U A ++ 0+ 0+ 0+ 0+ 1+ 1@ @ @ + 0, d + <@ + E, Zp 3
p .
p
( L 5L :, 0 p .p 5 H@ R` d + E, aZ + = "Q
P <l 7+ E <Z@ 4H @Z@ Z =+ :, 6
? p .p Z8 XP0 XL8 d "
P D7 + :/ + D"eU&<O@ " F @ ` @, F "U
U* F-0 $+@$ H+ e+ Q+ V, + W, I, J, K, K, L, L, M, M, N *P(( O, N, O+ Y+ bZ @ [ Q4t TFX 8 =t S
&* '+ X RF 7
( A" W
V&* + e[
4j ^Z @ 7t + _FX 8 =t \+ _ WF ` &. + e F _S
F
&, #
+ D" ` D @ V` D @ Y` D @ Z` D @ ^` D @ b` D @ c ?A eU&<PP ?A4Y? g-0 w[
0J + n w 8 @ ( H * J
3l + oO + l ol . D"eU&<PR4Y?oeU&<P@ p " p &( 2XX + tZ + o3xX + w 8 Z + m < P + m * @ y+ s-0 F. @ @ [w~< Hp 2tp + Zw~. #
h F 9 }
&, @ ` 4V,>X ,>w~, / `Z + ZX + waH +
$* Z,( "
e :0n + ,>w~, / ZX dXHX eVd7 @ / + f D" eU&<P@ veU&<P@ x ? yeU&<O@ zeU&<O@ eU&<O@
SM O @ ` @
*U*E" -0 [ G4h, Z A
+@4+ + + '@ + -+ 1+ G@ + e+ j *E(A" + l+ r+ s@ + z+ + +
@ p ,> b,
/ Z T " * j , l 0N + S0 GP + ! P8 H8 * j ( +
l @ p + ' (XP8 ( h D"eU&<O@ eU&<O@ !eU&<O@ #eU&<O@ $` D @ )eU&<O@ *eU&<O@ +eU&<O@ ,eU&<O@ / E*Q( 0 * J8 + Z 5N4 -QZ1XZ3+ 6 3
2XJ XJ4,>., / 5 P( 8 Z
aj @ + A,>6,> , y/ 7X + ? 8. n + B = p ( A* A+ B , l
?. 0N + F : Z + ( H + 7N + J BXZ8 *P A* I+ P HXHGQHJ * j D"eU&<O@ 7eU&<O@ ;eU&<O@ <eU&<O@ >eU&<O@ >eU&<O@ @eU&<O@ BeU&<O@ CeU&<O@ L "@ LZ` , l , ZJ K NXP8 OXHO
QJ
l . n A, U 0 1, @ * 0l @
A ( 1L @ A . 0L @ G aP + b "U(P" ][
5J` PXZ]QZ_+ b
_ ^XN0 XN`
a QH( 4HQJ + b (
D* f :QP8 XH8 @@8
+j + e Rp + [ 5No jXZlQZm **E* n+ Zn H
o
mXL( XLp+ , O+ 6N + v pXZsQZu+ x t "P"U" wXH8 XHu v
fXJ QJ + 6N + } xXZzQZ|+ {XH8 XH|+ "U"P 6N + }XZQZ+ XH8 XH+ QX8 [` QP8 ( h D"eU&<O@ MeU&<O@ SeU&<O@ T` D @ geU&<O@ ieU&<O@ k` D @ eU&<O@ eU&<O@ @( * j
x L8 P8 QN8 + L ,> , / Z H@
(( J@
L@ n + " D"eU&<O@ ` D @
` D @
eU&<O@ ` D @ ` D@ eU&<O@
U* -0 +@$+ N+ + #@ + ++ 1+ 1+ 1+ 1+ 1+ 1+ 1+ 1+ 1 *Q"" + 1+ 1+ 2+ G@ ,> ,>h , / aZ + N+ 0
, 2Lh+ N "D
" %0 4P)
2L( + N 2P( + N+ 0
2L( + N+ 0
#Z
( 2L&+ N @
T - ( `p + 0 ( 8 H( O + , r+ 1
+
,2L( + N[ ( 1p 6@ [
( . 1l @ A aH + <,>( ,> , / + > D"eU&<O@ !eU&<O@ #eU&<O@ %` D @ '` D @ )` D @ 4` D @ :eU&<O@ ;` D @ < Q
= : 2P( @ aZ + N 2[` 2P + B X?+ 0Z
` 4LDZ` + @, A EXH` [` QP + 0
E
32L( + N 2P( + N
2L( + N0 3P + 0 "A(( N@ + 2-0 # 2( + R
P LO:
w~.
w2LQ+ U"w~.zS+ F w~10 (T( V+ Y
wZ
XL( XJW+ U
wZ
DXXL( XJDZ+ Y D"` D @ @` D @ I` D @ KeU&<O@ L` D @ M
M yH \ @ ` @d\ *U \-0 y[08 + _Zd[+ _@ 4Va
X XLd^+ k T.Xa
/
b L 5,k ( U d,>c, / b/d Pc f/
Q2*g+ k i Ni@@X 1X + p D* mZ.X Q Z0X X . *4o + -0 HH
J\:
r, # ( u . n
+ N-0q ( QHs, \ @@` Z``
w}j
w}l w~n ( ~@@` w~QP` wXH` + w D"eU&<O@ e (Hk" qeU&<O@ seU&<O@ v
8Hv weU&<O@ {eU&<O@ |eU&<O@ }
8HXq (P -0w ( QHx, \ @@` Z``
w}j
w}l w~n @@` w~QP` w
XH`
w|XJ` 4P.
( 0N @ *
, 0J @
G aH + S: GZ` ( + XX@ 7Nw+ * 0 0J @ , ( 0L @ G aP + S: GZ` ( + XX8 + D"eU&<O@ eU&<O@ eU&<O@ eU&<O@
eU&<O@ eU&<O@ eU&<O@
SME @ ` @!T (P* -0 g ( QH, \ 6J + ! X + " XX8 X! . n 0 p ( %h
wj
, S 0 (P . ( (H . * . . J@ 'eU&<J@ (eU&<J@ )eU&<J@ +eU&<O@ , , ,> , / ,> , 7/ Z` :
+ y-0 w.( &( 8 E 5
., QL . XN6, w PX QXX *! XJX S( GHX + 1-02 = w* 0J + V. 5NA + <
w, D ( + A w0 0P (A F+ G 8 + D
w( D"eU&<O@ .eU&<O@ /
8H>K 2
HN =eU&<O@ >eU&<O@ ?eU&<O@ BeU&<O@ EeU&<O@ H "@ H0H + J 0 + G w* 0J + M @ + J w. 0 0N @ * , @ Q0J @
G aP + V[ 7.X + \ X + M w0 0P + Y[8 ` + U
Y
w, 0L + \[( 7` O + Y-0 w* 0J , 1 w}A. (N w~ bA0 (P . w~A . Nr
w J D"eU&<O@ KeU&<O@ NeU&<O@ PeU&<O@ VeU&<O@ Z
8H) ]eU&<O@ ^eU&<O@ d` D @ f A f
( al + i[( ` + o0 0P + l : Z + p. 0N + o ( + k o0 P P7, #+ -0O@@ @@ w~ H
w J 7,97 D"eU&<O@ i` D @ keU&<O@ leU&<O@ o` D @ oeU&<O@ p
)O reU&<J@ veU&<J@ v E
w Z , 7u@ + [-0r. @@r@@s w~ Ht
w Jx7,u7 .: (P(Q
Zw Zp , w7}@ / + y-0y. @@z@@{ w~ H|
w J7,}7 P(Q
D"
DdfO yeU&<O@ zeU&<J@ ~eU&<J@ ~eU&<O@
.: Z Zp , 7@ / + -0. w6J + 6N + @@ + % @ " w608 + 8 "H8 : Zp + @@p w, /, @ Lp 4l 1l + "., l 8 Z + "6.p + ( .hp w
h <
Lh + w p .0 @ @
"p 7Np + % w
"L / +
-0= w~
wV(
w~0 w~ w~
* w
.
@ J8 ,> ,
/ D"eU&<O@
5.3
eU&<O@ eU&<O@ eU&<O@ "eU&<O@ %
De*I &eU&<O@ - * .+ ]-0& w~
wv(
w~0 w~ w~ w
@ /
J8 ,> ,
/ (@ 6+ .-0 . w~6J + @6N + @6J + @ w~ w
@ J8 @ H8
@ "" ? L8 + ] w6P8 + G6H8 + G6P8 + G w~
w~ 0 P 0 N
0 + R G w~
w 0 20 + K + L
` /
X Jp 5JS` X w~ P@ w~ w~
8 J + ] p 0P + YS2 @ RX ` w~8 w~
` " X Jh + ] w~
` J8
` L8 ` Z8 / + -0.. w6 p
w " a
( Lp ,>w~,>w~Z.p ,> , 7/ + 6 D"
aqh .eU&<O@ 6sH 7eU&<O@ 7eU&<O@ ]
M , e ( e-0
. Z(p ,> ,>w},>w~, &/ Z*p ,> ,>w~,>w, &/ Z,p ,> Z.p @ n,> Z0p ,> , ^/ Z(p ,> ,>w~,>w~, &/ Z*p ,> ,>w},>w, &/ v,>w~Z,p ,> Z.p ,> , 7/ w} p H@
p J@ p Z@ / + % D"eU&<O@ feU&<O@ ieU&<O@ leU&<O@ peU&<O@ seU&<O@ veU&<O@ yeU&<O@ }
M *a ~ ( ~-0e. Z(p ,> ,>w~,>w~, &/ Z*p ,> ,>w,>w, &/ Z,p ,> Z.p @ ,> Z0p ,> , 7/ Z(p ,> ,>w},>w~, &/ Z*p ,> ,>w~,>w, &/ Z,p ,> Z.p ,> Z0p ,> , 7/ Z(p ,> Z*p ,> Z,p ,> , ./ Z.p ,> ,>w~,>w~, &/ D"eU&<O@ eU&<O@ eU&<O@ eU&<O@ eU&<O@
eU&<O@ eU&<O@ eU&<O@ eU&<O@ @ ,>w,>w},>w, &/ ,>wZ0p ,> ,>w, ^/ ,>w,>wZ(p ,> , ./ @ #
w~
p L( p N( p Z( / + ~-0~. Z(p ,> ,>w~,>w, 7/ +Z*p ,> ,>w~,>w, ^/ Z,p ,> Z.p ,> Z0p ,> , &/ D"eU&<O@ eU&<O@ eU&<O@ "eU&<O@ &
M - 'eU&<O@ (eU&<O@ +eU&<O@ .eU&<O@ 2 2Z(p ,> ,>w~,>w, &/ ,>wZ*p ,> Z,p ,> , 7/ w~ p P8 p ; H8 p Z8 / + ' D eU&<O@ 5eU&<O@ 8eU&<O@ <Y\z
G eU&<PR
G
q x7 = @ ` @5\= ( =-0] 1h + @@@ + A:
w N0 Q8 Z00 X + q D"eU&<P@ >eU&<P@ ?eU&<P@ @eU&<P@ AeU&<P@ BeU&<P@ C
Mfg E @ ` @5tE (A E-07. p Hp [
wQJFQ , \
X p NGZw[w4rO ` ( M PP 8 8 =rM / + ] D"eU&<O@ EeU&<O@ P
Kjg Q @ ` @'4Q ( Q-0\[w~[
w2H + YZw~Zw[w~4tX X 2N` + Y8 8 =tUO + q "( Y@ + Y@ `
0
[
\
\ 8 bu b 8 8 D` Dh D8 D^ D0 ^ 8 ` >@ ( ( >( j 0 0` ` ` @ >` ( 0 @ ( (( D( 0 6 s6 h 0 H { D"MU&<E [
bM& ` Qg
` QS ` Qe ` QQ ` ]`
.X eeT1T gcw]y7 fcyG! ``
KwH j` kdQ3W D"b\|E1 ~b& we
-
K od%"= qdu< ccE<E7 bcXf2S j` {0 Q`6eM7F $eY]g $bvMb[ ` ." bvJo D"bvPMS
bv6-- bv7 g e% ed$rPx kgm!% ^g e& Z` D e`L _ D"gm!& Qg e$ =b,cw Ggm!$ 'g e% DeSY=7 Qd #K bcNj7 ` /83 K D"gm!% = ( ( }