PDP-10 Archive: fortran-compiler/util.rel from bb-4157h-bm_fortran20_v10

Trailing-Edge - PDP-10 Archives - bb-4157h-bm_fortran20_v10_16mt9 - fortran-compiler/util.rel

There are 13 other files named util.rel in the archive. Click here to see a list.

08}60 @	8}$S4xk!4y
A4y&Bb16( 
TB#0<$-0.S( H 
w~

( L, Zp w N, Zp pZ(@ Hp 
p	(Z,, Lp pZ83Pw~+Z
8 Jp5J	,+	 p w~Z XN@ 
w J

pZ0XP XH0 /+-0 w*,G
`J+U w00P( +<8

8al+L`	D"

P'f8}/@f8}/@f8}/@f8}/@f8}1@	"z+/ 
8aj+) 8ap@+" 8ah +U w

`l 
w.0	  %A,AaN+/S0@BP +/ `aP+/[8,>,/`Z+/   -

wS*GJ0 
w (ap+2L`	D"f8}/@f8}1@"f8}/@#f8}/@$f8}/@$f8}/@%f8}1@)f8}/@,f8}1@1	( A1+4 (ah+5 `z+; `aN+;Z

(,>,/`Z+; w :S(GH@ `+, *0L@
 w w,0 (2L@,	D"f8}1@3f8}/@4f8}1@5f8}/@8f8}1@;f8}/@<f8}/@?f8}/@?f8}/@A	 BG0 ,00@

 w6.KA

G.DD
aJ+U

@	" Jal+MS:BZ@+T @an+PS:GZ@+TZ@,>,/`Z+T ( S 
wS,GL(O+;@+U,Ef8}/@Ef8}/@Gf8}/@Q

Y5Vthf8}0Rth. wZ
  Jp4Jv p00P+f*5JaZ82Pw+`S:+r	" `S*+u01P+r*0J+vS0GP8+v*0J+oZ8 P 8  iZ@ Hp2xp+v 
.
Z

(2Lw9jS:GZ(9j0	D"f8}/@Xf8}/@[f8}/@]f8}/@af8}/@cf8}/@ff8}0@hf8}0@kf8}/@o	"o1P+v[
82Jw+sS:GZ8+vZ82Pw+vS*GJ8@/+-0	 "x. wZ
  Jp4J p00P+*5JZ82Pw+S:+
S*(A+
*0J+S0fGP8+*1J+0	D"f8}/@v8}/@	"1P+[
82Jw+S: GZ8+Z82Pw+S*GJ8@/+-0X	 .   Hp38p+Z
`2Jw=,>Zd,>,>`,/	=@	"@
A/+w-0. w 
 aj+0

 Lp38p+2 w[8Zd2P	*!=

dQL8 0P+%S: GZ8=0P= Z

d Z8 02L@	 E )*	AaP+-

wS( GH0

d'`l+2S(GHd-+2=[

 ,>, E 2/	D"f8}/@

(`f8}/@f8}/@f8}/@	 PP 2@/+-0. w 
 aj+K

 Lp38p+M wZ8Zd/	"D E;2P=8

d!XL8 "0P+@S:GZ8=80P=8 &Z

8Zd: 02L	 (C@*	AaP+G

wS(GH0

dB`l+MS(GHdG+M=8Z

h,>((L,1/@/+3D"f8}/@3

"8SN@`@DN	(E"*N-04. =0H+R@@7+S , LQ

w.
+@<U++i+_+i+`	*U*W+i+m+l+m+m+n@@@@@@+o+s+|+i,>	*"_,+{Z0 Pp R 7 Hp2xp+,>p pZ
h,>ZdI,>,>d<,>
	 DD(h,/9c,>,/,>w+zZ04P,>+z,>,+{,>, p/ wZ@4H,>+z,>,/,>w,4/ wZ@(	D"f8}/@Of8}/@Sf8}/@gf8}/@hf8}/@jf8}/@pf8}/@tf8}/@vf8}/@w	"x0H+Z`4N,>,4/+Z0 Pp a b Hp2xp+,>p p	 D"
Z
h,>Zdf,>,>dg,>

,h/9~@/+N-0N. } } Hp	"E
*	2xp+Z
d2Jw9	 O0N+ d
`h+S*GJd"E
*/+-0.

	D"f8}/@{f8}/@f8}/@f8}/@

=HV(f8}/@	(  1Hg : Z

w[04X00P+,> Lp,/ 
pQZ(	(@"+,>,N/ wZ@4X'1X+',0L+%,> Pp,/ p	" $XZ +',>,N/ 
wZ(4X/.0N+-,> Jp,/ pXZ (@ -+/,>,N/	D"f8}/@f8}/@f8}/@f8}/@ f8}/@#f8}/@&f8}/@(f8}/@+f8}/@.	 A/ w[84X7(0H+5,> Np,/

pQZ0+7,>,N/ w	" A7[ 4X;,>,/Z`+8@/

+-0.

 1Hg : Z A@

w[04XH00P+F,> Lp,/	D"f8}/@0f8}/@3f8}/@6f8}/@9f8}/@;

=HW<f8}/@=f8}/@Af8}/@D	 DE 
pQZ(+H,>,N/ wZ@4XP*0J+N,> Pp,/ p	" MXZ8+P,>,N/ 
w[(4XX.0N+V,> Jp,/ pQZ 	(@@ V+X,>,N/ w[8Z8<74+d .Z 4Xc,0L+b @@ ^,> Hp,/	D"f8}/@Gf8}/@If8}/@Lf8}/@Of8}/@Qf8}/@Tf8}/@Wf8}/@]f8}/@`	 D ` pXZ@+c,>,N/=4[@/

+-0. =1Hg : Z?	 Ai

wZ0 Np01P+n,>,N/+q,> Lp,/ 
pXZ( 
	 Dq

(aL+tZ(+t@ Zp w[h,>,/ Zp w[@3Hp+~ @z[

@2Lp+|S(GH@ w 
pQJ  wZ

h,>,/	D"f8}/@cf8}/@d
eFef8}/@ff8}/@jf8}/@mf8}/@of8}/@wf8}/@	  Zp wZ83Pp+Z
82Jp+S0GP8 w pXH@ w[
h,> Zp	(*	,/

pQZ0 f0N+ h  Hp2xp+ 
wZ

(Zd2L9	(dHp,GH@ d`p	(P( 9S(GHd9@/+<-0w.7Hw+)

 al+%Z ,> Hp( ",/ pXZ@+'Z ,>,N/	D"f8}/@	f8}/@f8}/@f8}/@f8}/@&,2f8}/@f8}/@#f8}/@&	 ( ' wZ8 Pw+@/+-0. w[
  Jp7Lp+?[0 Pp(	"/0H+4,> Lp,/ pQZ8+5,>,N/ p[

8 Lp4L>(
"80H+<,> Np,/ pQZ@+>,>,N/	D"f8}/@)
oi;-*f8}/@+f8}/@/f8}/@2f8}/@5f8}/@7f8}/@:f8}/@=	 @> pZ
 +, wZ

8 Lp0
0P+F,> Np,/ 
pXZ(+G,>	(F,N/ 
w[( Np4NP00P+N,> Jp,/

pQZ0+P,>	(@* O,N/  Pp wZ
  JP7NR+YZ8,>,N/ RZh,>,N" W/ UZ
h+R

p LX@/	D"f8}/@Af8}/@Df8}/@Gf8}/@If8}/@Lf8}/@Of8}/@Uf8}/@Wf8}/@[* [+*D"_J%^\@`@'\	(@ "\-0*.	 1Hg : Z

w.
0N+m(0H+d,>,e+	"DAd.5N Z Hp LeZ
0,>,N/ fZh,>,N/ p Pi+	"Q("m(+@$n++q@+y++@[
0 Jp.1N+u,>,N+ A("u,> Lp,/	D"f8}/@\f8}/@`f8}/@af8}/@df8}/@hf8}/@kf8}/@mf8}/@rf8}/@w	 A w pQZ +Z
0,>,/ w[8 Pp7Hp+,>,\/ 
pZ(	" Np+|Z
0,>,/,>w,*/@/	+[-0\ w~*0J+".4N 
w,	D"f8}/@zf8}/@~f8}/@f8}/@f8}/@w'f8}/@f8}/@f8}/@
	"
0L+.4N3Jw~+ w~ w~0*GaP+

w w.* @ GaN+ w~,*G

aL+O+@+-0e.	D"f8}/@f8}/@f8}/@f8}/@f8}/@f8}/@f8}/@
M@Ef8}/@	 7Hw~,

w.
0N+Z0 Hw w*0J+![  Nw w01P	(*#+%*0J+# 
w,1L+# w~(+@$)+#+3+7+9+=+9	*T*U ++H+I+H+H+M,+H+N+#,.+P+++@[
@,>	"@ 4,>w,/`Z+
+F,>,>w,+[
@,>,>w,/aZ+F(<+
Z
@ Jp4J# 8Z( Np2xp+# p.Zh,>,>w,/	D"f8}/@f8}/@f8}/@"f8}/@#f8}/@%f8}/@'f8}/@5f8}/@;f8}/@D	"@ DD`Z+
9@ w~Z

h,>+
@,>+
@5J[@ :2Nw+#+$	"
U M[
@+H :2Pw+#+$*+@,Q+#+T+U+\+d+t@[

@+G	  U[

@,>,>w,/ w~Z8,>,>w Zp,/Gp+$@@[

@ Lp	" ^7Np+c[
8,>,>w,/Gz\ pZ

@+] a+$@@c[

@ Lp7Np	( @f+k[
8,>,>w,/Gzd pZ

@+e w~Zh,>,>w,/ w~	 Po[
8,>,>w Zp,/ pGiG+$@@r[

@ Lp7Np+[
8,>"w,>w,/ p[

@,>,>w Zp,/	D"f8}/@Pf8}/@Wf8}/@[f8}/@af8}/@if8}/@nf8}/@qf8}/@xf8}/@|	"
| pGtG Z} pZ
8 Jp+u w~Zh,>,>w,/G~+$Z
@	(5J[@,>++$ w~Zh,>,>w	(@ @
@,>,>w,/`Z+
 w~Z

h,>,>w,/`Z	(@+
 w~Zh,>,>w,/aZ+#+
Z
@ Jp 8Z

( Lp2xp+# A p.Zh,>,>w,/`Z+
9@/+	D"f8}/@f8}/@	f8}/@f8}/@f8}/@f8}/@f8}/@!f8}/@$I'A%(@@"%-07Hw+,,>,/aZ+*O+

wZ0 Nw+%@+)D"f8}/@'
M>

-@`@Tt-	(*U*--0.	 w*+@,0+|+D+|+D+:+D+N+J+|+N+M,0	*U(A5+N+|+|,5+P+d+j+t@+D,0L+GZ  Pp4P| 8	 >Z

@ Lp2xp+| p.Zh,>,-/`Z+G9?[

 ,>,-/	"""FaZ+HO+} wZh+UZ

 4L|Z ,>,-/+}[

+OZ

 	"*@ O,>+L,+@4Q+|+T+V+\+\+^@[ ,>+L[ ,>,- 
@ W/ wZ
@,> Zp,-/	D"f8}/@-f8}/@.f8}/@:f8}/@Bf8}/@Ff8}/@Lf8}/@Pf8}/@Wf8}/@Z	"[Gp+}[ ,>,%+L@[ 4Vc[X,>,-/GZX+_ 	( Ac+}[

 ,>,-/`Z+G wZ84P|Z8,>+L[

 ,>,-/	"l`Z+G wZh,>,-/`Z+G wZh,>,-/aZ+|+G	  
tZ

  Lp 8Z0 Np2xp+| p.Zh,>,-/`Z+G9w@" 
}/	+V	D"f8}/@af8}/@ef8}/@kf8}/@of8}/@rf8}/@zf8}/@}P1 f8}0RP1 D"^+d~@`@2l~	(~-0. w 
 aJ+

wZ0 N Lp  P@@ 8(w "Z	  ( H, 
pXZ(S,GL( ,BL(@/+$-0~ w*0J+ Z Z`0N+:+

@+	D"f8}/@~f8}0@f8}/@`	D @f8}/@
t/

f8}/@Y	("-0%,> w2H

+ :+#6Lw+O+#Lw(pO R w 
	f8}0PYPSf8}0PPS18f8}0P18

 #A@f8}/@f8}0@f8}0@	 A(H( H4H" JL(nO. P2J+:

+ <,^+,( A$-0 w~ H 
w J6,+)  Z+* 	D"f8}0@f8}0@f8}0@f8}0@f8}0@!f8}0@"

__$f8}*@'f8}*@)	() N(, +#@	`6 , 88484 0(2(	 2*(

@8 8@&@880(` 	 :. (0@00( (68406@8((@0F`	 C K	D"N8}%,8}*,8}/-8}1C8}0`
R;,`Qe*bL>O*	D"bM&eY]g	`	D `/83`)	D"`L7dY5bF(c{qge&egm!&<d(Xe`?AAeT)]e5"	D"bHaAXbOF/Olc,m7d(pVG`

gm!%

ge%}gm!%-D"ge$+`4VeY]c;`K=-`	D `/83gm!$$((L