Google
 

Trailing-Edge - PDP-10 Archives - BB-4157E-BM - fortran-compiler/act1.rel
There are 26 other files named act1.rel in the archive. Click here to see a list.
0y.60 @	
y.$S4xk!4y
A4y&Bb
"e;lTBD0<$ aH +,>w,>,/ 
w~ 
w[([0A7X+! * 
w~	 (J0A*O 00J@. (0N@G ,1X@
GaP+! 
w~	  .1J@( ,0H@
G 01X@ *1X@
A (1X  @AGaN+! 
(lO/.",>8!	"
DE(vx@
Qtby./@by./@by.1@by./@by./@by.1@	 
U( wZ*hQ*	,>+F@ 
w~+@,#+C+*+*+*+-+*+@@+0	*UD'+6+-+6+;+@+* 
w01P+B +C 
w00P+B ( 0+C 
w0.HaP+B,>0,>,/+ 
w0	D"by./@+by.*@,by./@.by.*@/by./@1by./@1by.*@4by./@5by./@6	 ( 7 .0P@(DaN+B+B 
w 0`p+> +C 0an@+B	"? +C 
w01P7@4ZH,> wZ.@Q.	,>,>,4/+5"H@+G-0,>w,/	D"by./@8d"e;g@=d"e;g@?by./@Aby.*@Bby.*@Fby./@G
Q][Iby./@J	"  KaZ+O *5JO,>,F/ wS* GJ  
aJ +T,>,>,  @S/,>w~,>w,/+-0I aH +Z,>w,>,/	D"by./@Lby.*@Mby./@Nby./@Rby./@Sby./@U
QW4Vby./@Yby./@Z D @Z,>w~,>w,U/+VD"by./@\
Qz]@`@<]	(*D]-0V.@ w~+@$`+
+c+h+n+q@+
 
w, .0L@	 e0GaN+{ +
 
w, .1L@0GaN+{ +
 n 
w,1L+{ 	D"by./@]by./@cby./@eby.*@gby./@iby./@kby.*@mby./@nby.*@p	( p+
 
w,0L+|[(A07Z+{ 
(al+w,>+x,>Z.(Q.		 Ay,>,>,N/@+
0 (0P@,M[(A.} 01N@ G,GaH+ 	D"by./@qby.*@vby.*@wby.*@yby./@zby./@|by./@~by./@by.*@	(
+
 w Jp 8ap+ :+	 : 
pz+{ 
w (+4Z,>	  
wZ.0Q.	,>,>,z/+ 
wS.BN0@/+\-0. w  @  
  Jp,>,>,/4:x w6P8+*	D"by./@	by.*@by./@by./@u3{by./@by./@by./@by./@	" 0J+,>,/@+h 8 `,>,>,/ 8 [
.
	 @ # Jp2rp+N8 
H0L+H HX H`,>,>,/4:x*	0J( ,+-S0GP`[P5P4.		D"by.*@by./@by./@by./@!`:@!by./@(by./@*by./@+by./@.	"/1N+@,	0L+3 :pGZP+@ :z	+@ .n	[
P JpZ
(5L@	"77((+@ P NS, L, Zp p *j
 (h
S.BN@ pXP8	 "@S.GNP.0N+LZ
Zp2L+LZ.PQ.	,>,>,/+Ll  "H(	D"by./@0by./@3by./@5by./@<by./@=by./@Aby.*@Fby./@Gby./@H	"@ I0H+K,>,/@@` H1h89$[
,>,>, /@@/	  @Q 2 
.,/, Lp2rp+b H Pp4Pa 8 Np 
p 
( Lp4L^  @Z p 02N +^,> ,>	,F/	D"by.*@Jby./@Kby./@P`:@Pby.*@Q`:@Q`:@Rby.*@\by./@]	((^+x:p ..82H+X9T X.8QX:,  X.<	 
f Q6*6` 
 J Jc 
XLi,: 70+n pS*GJ p
 	" o0H+r\`X 
p QP0 Lq 
pS0GP0XLXXTX[w,>,>w,O/rw@/+	D"`:@`:@b`:@gby./@hby./@iby./@nby./@wby./@x|@/+x-0y w 
 8
j$	 
  2&4)V}=2 
w[.02 N9S0 P, 6Hw+ ,l
	D"by./@yby./@~by.*@by./@by./@by./@
,/,~-0] w,>h,>
,/+,>,>,/	D"Y5by.*@by./@Y6by.*@by./@QZH"@%,^+-0.
++ :XZ+, ,XLZ`@@@@	D"}f:
2NfG&by./@'`:@'`:@*`:@+`:@,`:@,`:@-	 - w[
w.
wLp2rp+B@@p@@pZ` H7NP+6 P1HO@p.4+6	 *@68 P(
P+@4:+=+;+k QN P0P+L7Jp+C	"@>  N@@ `"P ( H, 6.`+F ,>h,>,/6H`	* EG+K DZ,hQ,	,>,>
,E/XX+[7Jp+O G,>h,>,J/	D"by./@7by./@>`	D @@by.*@Eby./@Fby.*@Iby./@Jby.*@Nby./@O	  O. Np,>,>,V/4:( *1H@
,D
aJ+Y,>, X/ pnS.GNXXO@6J	D"by./@Oby./@Pby./@Rby./@Sby./@Uby./@Xby./@Y`:@[`:@[	(P\+i  N?@@?Z P ( HA,XZZ
"
.jZ
$
` Lp3,*d+g M,>h,>
,N/	D"by./@\`:@^`	D @^`:@a`:@b`:@bby./@dby.*@fby./@g	 @ Eg pXP+=S.GNR`+= P0N+{7Hp+p e,>h,>,f/	  p, Lp,>,>,V/4:0 (1P@*DaH+z,>,  x/	D"`:@hby.*@nby./@oby./@pby./@qby./@rby./@sby./@uby./@x	  y 
plS,GLO@ P Tp(5H7Lp+  P]@@] `"H *	(  J_,6QX7LP+ P0P+O@p+@@p.4+	@@p.4 P TP 
01P+
,+ 
P0J+7Np+ m,>h,>,o/(	D"by./@y`:@{by./@|by./@~`	D @by./@
by.*@by./@by./@	   Hp,>,>,V/`Z+* ,1J@
.D
aL+,>, @/ ppS0GPO@.5N$7Hp+$ 
	D"by./@by./@by./@by./@by./@by./@`:@by./@by./@	*(  L@@ X"N 0 P,6XV6H+9 
X2,`+* Z0hQ0		 A (,>,>
,/  P @@ Z H * J",`XZZ
$
`"
.l	D"`	D @!`:@$by.*@)by./@*by./@*`:@,`	D @,`:@/`:@0	 
1X/`Z8$ Pp30+7 ',>h,>
pXJ+:S, 9GLR`[
p,>,>p,/H[,>,>,</[8QP	D"`:@2by./@4by.*@6by./@7`:@8by./@<by./@?`:@@`:@A	" A.$9/7H+, .1L@ 01L@AaN+J,>
 `j+N,>,/,>,/XZ,>	D"`:@Bby./@Cby.*@Hby./@Iby./@Mby./@Nby./@O`:@Oby./@P	("@"P,N/QZ 
J 0aP+X  N+@@+ ( H * J-,+Y ;	 YXZ[<7r+~/$Z5H}[
 03LX@.M (1R@ DaGaP+e,>,P/	D"by./@Q`:@Qby./@T`	D @V`:@Y`:@Yby./@_by./@cby./@d	"AdXZ+}Z
 Jp7Lp+y Lp(1(+w 
p6.(+w 
pZ0Z2H	(@ m+w pZ
8Z 02L@[
8 ,2J^@
AaP+wZ8 HpXH	 @u 
 8
 J +} pZ  Np+f,>,c/ Zp 
pXJ , L(=r[	 
~/$S0BPS0GP+ 
 LT@@U  N 0 PW,QZ[
w,>"
,>w,?/	D"by./@h`:@lby./@yby./@zby./@`:@`	D @`:@by./@	 [(.. QD< XP
, .Z`ZeXHXTQ4 Tp	 AE*4 p 
R,0L+6P+ 
( LS. N,
 Zp pS(BH@ E (h
 *j
	D"`:@by./@`:@by./@by./@	" XPP+R`P /
 aj+$Z, Q,	,>,>,6/	(D#+& 
 al+),>Z. Q.	,>,>,"/+# 
wS.GN0[5N- D,XL	D"by./@HXwby.*@"by./@#by.*@%by.*@'by./@(`:@+`:@,	"(,QL+/ XL XL@+)-0&. w[w.w Hp2tp+; 
P Jp	 *5 ( X 
0L+9(P:p+:0
6+@4=+8(*=+@@@@+D+Z.`Q.	,>,>,>,(/	D"`:@,`:@-`:@.
2NU0by./@0by./@9by.*@Bby.*@Bby./@C	(QD+>[`4N :10
+J,
+ : Zp+L,
+ :+I	 @PL[`7,X+aZX$p&.XNX[X  H@@ 
p$
&* J 0 P	  U,QZX.<72+ (.Z  Hp 
 LQ@@Q 
p$
&*	 @(] J 0 PT, pXZ8=2X+.<72+m (.70 +m (fZ  Hp 
	D"by./@Gby./@Jby./@P`	D @Sby./@Vby./@Z`	D @]by./@aby./@g	*g J[@@[ 
p$
&, L 0 P^, pXZ =2c*1*+ Xan	(@p+[X2H+ZX 
<
 J6L+vS(GHZ Hp7Pp+
 Pp	" x3P+ p(1(+ p6,@+ pZ8Z
X2H+ 
pZ0ZX	" 2N+ p[
@2Lq+ pZ
  JpXJX (8 P(+ 
pZ0 Np	(A	+w6H+
S:BZ+,>,/ XDX 0 P,>,>,/( 4:>S*GJ` 
Ej8,>	D"`	D @jby./@mby./@zby./@
by./@by./@by./@by./@	"U,>,/4:>,>,/+8 @ 
<+@4+++@@@+!	(+',>,>,/++,>,>,y/4:>S(GH`.hy./@'by./@(	(D)4:>,>,/4:>.0N+. :z+/ *j 
 Jp,>X,& P@1/7$+> 
5QD0.(GaN+7,QZ 
p L	D"by./@*by./@+by./@-by./@/`:@/by./@1by./@4by./@4`:@8	 @ 8[
p,>,>p,/93[w,>,>w,:/@/+-0[4XD	 @"
A 
w2J`+C +Z`+@ w Nh  Pg,  +C-00.	D"by./@:by./@=by./@>
2]V?by./@E-MQ+by.,]MQ+
2OUjHby./@I	  P"I w ` Hp6J`+T6N+O,>,>,I+P,>,>,V/5:RO@p	(AR+e *QJp+e6N+W,>,>,I+X,>,>,V/4:h ` X AZ,>	D"by.,@Lby./@Mby./@Oby./@Pby.,@Tby./@Uby./@Wby./@Xby./@Z	 [,>,/ [
.
 Jp2rp+a HXVHZ`H9^,>p,>,/	"c Zp4ze .QNp[w,>,>w,[/ p/+?-0H.( Hp7J	 ld @@p w[w.w Np2rp+. H0P+6 
 JF H 
X Lp k"t0N+v@@+5N@@u*	D"by./@\by./@cby./@gby./@h
\|D!iby./@jby./@jby./@qby./@w	 @x 00J@[0 (0N@AaP+Z*0Q*	,>,>,C/ 
p	 D S, GL( 
(al+Z.(Q.	,>,>+ * Jw6HX+ X[
X4L	"	 0QPr :+@ Zh,  
l6Np+XVpQVp+XV8XVp	  A (h,>H,/QZX5:Z`XO+0,0L+- 0BPX 0p "[X Hp[
  Jp 
b`L+$7.(+#.	D"by.*@~by./@by.*@by./@( H , Lk,+5Z(+57.(+*  P@@Z
(&,	 D((' L ( H!,+5  P%,
  pZ
 QL` 
 J*@@& . N	"0 0 P(,XZ`S(GH` (0XH`XV` XZX+-@@p H X7JX+e D8[0N+;,>+P[.  
` Jp 
L.L"`	D @ by./@%`	D @'by./@*by./@-`	D @/by.*@:by./@=by./@?	*?XN>,+  0p,QZ` Zp p *XJ QX  
p7N0+H,>+P	  DH 
p ( Hp Hp.0N+M01P+N,>+P p*
1J+R,>(TP,/+06Nt+U: 
p J@+W,>	D"by./@Aby.*@Gby./@Jby./@Kby.*@Mby./@Nby.*@Pby./@Qby./@U	"U,>p,I/4:0,>p,/aZ+] pZ0hQ0	,>,>+ 0QP?	 D^, Zp 
p  H(  N(QJ_ 
pXLa p P`[/(Q,>,i	 Af/ Zp5:l Zp7PX+k,>p,/ p+07PX+),>p,j/ 
p "@o[( 
pXX0XXp  N] N> XPq,@ [pXH`QXp *j	D"by./@Vby./@Xby.*@\by./@fby./@jby./@nby./@qby./@rby./@v	 w 
pXL`[0 NpZ08XP0 (QHs Lp,^ 
pQZ(QXh pXNh[p	  Pp pXH@ X[
,>,>,/ P6JR+00P+00P	(+ 
pQV0 P6J+
00P+01P+ pZ,hQ,	,>+	  ( 
pQV06JP+ XP0+  P `,>,>,/6P
+,0L( (+,	D"by./@by./@by./@by./@by./@
by./@by./@by./@by./@	"@*1L+ pZ.hQ.	,>,>,P/+0 pZXP86P+&7lS+&	 " pZh,>,>,>,/>![
,>,>,/6Jp++ p Zp( ++-[pXN(ZpXZp.2+o 
pj p/+i	D"by.*@by./@by.*@$by./@%by./@(by./@/by./@0,Q4by.,\Q4	 A1(1H+6,>,>,>,>,/,~ , L X N,  X 9< PX[,>,>,/ 
H2J	D"a[1by./@1d"e;g@2d"e;g@3by.*@4by./@5`	D @7by./@<by./@=	(D">+C6N+@ V+M,>Z(HQ(	,>,>+L H2N+I6H+G V("F+M,>Z,HQ,	,>+B,>	D"`:@>`:@?by.*@@by.*@Bby./@D`:@E`:@Fby.*@Gby.*@I	 @(JZ(HQ(	,>,>,/,~@,~-0i. w 
 +@,Q+
@+S	*R+V+6L+ w @ H+
  , 5LX7P   *6PP@
  [(  ,1H@
G
aJ+6N	D"by.*@Kby./@L
2NtNby./@O`:@S`:@Uby./@Wby./@[`:@^	(_+( 0H+g R 
0J+e,>,>,I+f,>,>,V/+"g7J+~60H+z R,>!,>,V/	D"by./@_`:@aby./@cby./@eby./@fby.,@g`:@iby./@jby./@k	*l4: 
a1L7  ZpZH NpZ8 Pp pZ
 [
 .
3lp+y p	 t @(!,>,> 
p,(/:
p+q w 8+,>Z(HQ(	,>,>(@},L/+,>Z0HQ0	,>+| P `,14:. 	D"by.*@mby.*@nby./@uby./@wby.*@zby.*@|by./@}by.*@~by./@	("5N
[,>,>,</+
7L+
,>,}/+O@@/+0(
-0N. w   ` 
`0J+."	D"by./@`:@by.*@by./@	`:@
by./@
2OQI
by./@
by./@	" 1N+,>,>+ T+$ P Np0"1P+,>Z*8Q*	,>,>(+" * J,>,/ Z4:C[0N+$(#	D"by.*@by.*@`:@by./@by.*@by.*@by./@`:@by./@	"D0H+$Z,hQ,	,>,>,>,/+C7N`++ ` H  *#4J- D',>,>,>,/ 	D"by.*@!by.*@"by./@#`:@%by./@&by./@(by./@(by./@)`:@*	"* Z8+- ( H@@[,>,>,/@@@@@@ 
w7L(+@ (	   3 P [. Pp2rp+=d ,>H,/5::@@,+C[
H,>,>H(@@ ;,./95 P[,>,>,;/@@9[w,>,>w,?/	D"`:@,by./@/`:@/`:@0`:@0by./@8by./@<by./@?by./@B	 PC@/+-0
. w  [
w,>,>,/ `[
,>,>,H	  K/ [. Np2rp+V H,>PZ0PQ0	,>,/4:X[,>"T,>,K/9N[
,>,>,T//	D"by./@C
2OaDby./@Eby./@Hby./@Kby./@Rby./@Uby./@Xby./@X	*@Y+D-0D.$@0r+b w~ 
HB2J +aZ.HBQ.	[8 PpZ
8 Jp+c	"  a.2+[,>+	 p7J@+h,> w~Z,hQ,	,>,>+	= 
w 0 Np"E  j 0+@<k+	>,+n+	+	7@ 
pA*4Jt(	D"
2O]Yby./@Zby.1@\by.1@^by.*@bby.*@eby.*@gby./@oby.*@q	"qZ.`+	 p X<d+	> pA(4H	.
` L,  p V<s+	>,> w~Z.hQ.		"D	,>+	= 
pA*4J	 p0H+	@@+	 . N	 `.1N+	
,>" A	Z0X+x,>,/ Zp4:	>[0H+	.#0N+	,>	D"by./@uby.*@w`	D @}by.*@	by./@		by.*@	
by./@	by.*@		 A @"	 w~Z(@+	< p 
p J<+	> pA(4H	6 `.$0N+	  p VD	 p	""	0H+	,>,>,I+	,>,>,V/5:	>+	>7P+	36,X+	2 p	(	# V<	,>!,>,V/4:	> p1P7  ZpZ
X LpZ0 Np 
pZ( 	+[(.3pp+	> p 8*!	D"by./@	by./@	by./@	by./@	by./@	#by./@	%by.*@	'by.*@	'by./@	.	 "	/,>,> p, /:p+	*,>+	,> w~Z,hQ,	,>+	=,>+	 E	7 
pA*4J	: pO@l	#+	>,> w~Z(hQ(	,>,>,"//$+Y	D"by./@	1by.*@	2by.*@	3by.*@	6by.*@	:by.*@	=by./@	>by./@	>
1M{	?	((T	?-0Y. ( H 
w 
(+@4	C+	q,+	F+	G+	q@ ( N+	q (	" (	H6NX+	j X H0!0P+	R T 
0J+	O,>,>,I+	Q,>,>(Q(	P,V/5:	q+	q7J+	f6(P+	d T,>!	D"by./@	@`:@	Fby./@	J`:@	Kby./@	Mby./@	Oby./@	Q`:@	Tby./@	U	"	U,>,V/4:	q 
	L1L7  ZpZP NpZ8 Hp pZ
@[
@.
	"	^3lp+	q p  0 ,>,> 
p,(/:
p+	\,>Z0PQ0	,>+	h 	f,>Z(PQ(	,>,>,	=/	D"by./@	Vby.*@	Xby.*@	Yby./@	`by./@	bby.*@	dby.*@	fby.*@	hby./@	i	(  	j+	q X,>P,>X,/4:	q X[
,>,>,/+	qO@/+	?   	r@	`	D"by./@	lby./@	p`:@	qby./@	qJy.%	s
y.*	sby.1@	sby.1@	tby.1@	u	 	u*,.	u/ 	~46	D"by.1@	vby.1@	wby.1@	wby.1@	xby.1@	xby.1@	y`:@	|by.1@
by.1@
	 

79:IV< 

?AHJ	D"`:@
by.1@
by.1@
	by.1@
	by.1@
by.1@
by.1@
by.1@
by.1@
 

KMORSUVY	D"by.1@
by.1@
by.1@
by.1@
by.1@
by.1@
by.1@
by.1@

y./
	 
8
0(0,00 
(F(((D(
00	 
P
P@
@0  
 `(`((`
`4`X	 
$(X
X4XB$@0
(@$@X$@8< 	 
,H00X  ` 
 H
 XK: KKF
H
P	 
5P8
hX8
Xin EXTERNAL statementas dummy parameterin ty	 
=pe statementin DATA statementin COMMONin EQUIVALENCEas an entry point name	 
Fas statement functionas COMMON blockas NAMELIST as an array or FUNCTION	 
Nas an arrayas a FUNCTIONPBPBPwPvPwP@PtpCpv 
W@pwP		
	D"
y.1
8by.1@
Yby.1@
Yby.1@
[by.1@
[by.1@
\by.1@
]by.1@
]by.1@
^	 
^A VARIABLE OR ARRAYA SCALAR VARIABLEAN AR	 
gRAYA SUBPROGRAM NAMEi4r[r_rghrDUMMYVARIABLE	 
oPARAMETERPARAMETEREND OR ERR ARRAY OR NAMELIST NAMEARRAY	 
x NAMEk:N@K: 0KK(M7  S?H:8ek:N@		 A KEYWORD INTEGER OR LABELA SCALARARRAY OR NAMELIST NA	 	MEARRAY NAMEALLOWEDALLOWEDARRAY OR NAMELIST NAME ARRAY NAME	D"by.1@
`by.1@
aby.1@
aJy.,b0K
c^}:3
`^5
`,
`^F
	D"`^
`2V
`^4
`2k
`3
`^o
`3
`.
`^E
	D"`3
`3%
`3%
`_	`2	`3'	~`2	~`^1	}`_	}	D"`_	|`3	{`_	{`^ 	z`^	z`_	v`^2	y`3	teK)-	o	D"b2O]	ldQ4	R`<*o	W`L	CeMQ+	AdQ4	 b2OUj	
eMQ+	dE4~	D"dYHz]|`Lk`:	9b2O]QeK)-Wb2Nt7eK)-BdQ4@bLCY{)	D"b2OUjeMQ+`<*oleK)-dU48dYHz]6c+`<*o b
pTbeK)-g	D"dSMOFge%HbLTB@gm!%?eK)-=c(Hk"6dQt(c^hM
o%`<*o`	xqA3dSMOedsQ	D"bh#medsQWc^hMzcqcXq
o(d"e0H$ba``#bM	yH `/83f,h :`{03	D"`	xqAedsQ`/83{ejn)	eK)-b2NU~ge&	rdDdMOr`<*on	D"cXq
okcXf2SrbM	yHcdSMOj`/83j`	D.eK)-vf,h!?Jgm!&	?	D"bNZMYge$/bNZMSeVVnLbJ6(Jgm!$ge%Hc