Google
 

Trailing-Edge - PDP-10 Archives - bb-4157j-bm_fortran20_v11_16mt9 - fortran-compiler/act0.rel
There are 12 other files named act0.rel in the archive. Click here to see a list.
0y(0 @	
y(S4xk!4y
A4y&Bbvd$	,
"e;l$\TB$	+_0<$$	1	 @-0 *0J+,>,/68+ +: X@@+-0(@ Z
c1J+ Z< ` P*	
DE($&upby(Uup
[~by(@by(@
	*Q*E,/ Z5: +>
@+-0(S
,(L .
.(N.
0.
.
 :,>,/,>,/	D"by(@U{ by(
@by(
@by(
@by(
@by(@by(@by(@	(
+-0,>,/: Z Z$[
51J+)0J+&,> ,>h,>	(%+',>,>(,>,/+Z!Z`S. N,XZ` XVP ` PP(., Z`S(GHP(h	D"
@#by(
@%d"e;g@&by(
@'by(@(by(@0by(@0	 @"1 *j,l ` NP 0p@+( ( H,>,/4Z;O@" @"9S, L)O,~@,~Z
 
 2J+A 	D"by(@1by(@2by(@2by(@4
]wM6by(@8u6<by(@=by(
@>	(D ? N6,>,7/5ZBO,~@,~ ( H@,~@@D@,~-0 T G.@@p@ < Hp2vp+P 
X J?,>?,@/4ZOO@p6X	D"by(@@
 I&C
YDRWEby(@Gby(@Iby(@Kby(@Mby(@O	(QO9J p`N+S,>,'/+q2X+c: 
 J$  
aL+Z,>"X,>,R/+ZO@V an +^,>,>,>	D"by(
@Qby(@Rby(@Sby(@Uby(
@Wby(
@Xby(@Yby(
@\by(
@]	  ],/ aP+b,>,>,X/@+q ZaH+f,>,>,a	"A
f/O@^0X+i , LO@ X,>,/ Z 
k0L+o T o	D"by(@^by(
@`by(
@`by(@aby(
@dby(
@eby(@fby(@k`:@n	"EEn P+p@@n"0.pm l/+ p 
$U2J+v>rO,~@,~	 (w-0. ( HL,>7,M/ Zp4Z", .lp . Nx,>y,y/5Z	 ( p([
 0J+,>,/	D"by(@q^'(rby(@s^'`Bwby(@wby(@zby(@~by(
@by(@	*
(+\`$ p( qXP<0P+ 
o J8+ ( H},>},~/ Zp	(D(
4Z", .lp3,p+ p([D0H+,>,/+\`D 
p(
	*D  XN40N+  H0:p3hp++,>,e/+@/+	D"erQ"@by(@by(
@by(@erQ"@by(
@by(@by(@ H	,>L,
/5Z",>,/,~@,~ 	 H,>,/	*T*(%4Z':
t@@4s+7,C, Z:,E[
(0L+-:& ) Pl&+0,>,>4&"T*(.,>	D"by(
@by(@by(
@ by(@!
 I#by(
@#by(@%d"e;g@-by(
@.	( T"., /,~ 0 P#,>
,$/ 	 H0,>$,1/5Z7,>,./  T"7,~@,~,>,>	D"by(@/by(@2by(
@2by(@4by(
@5by(@6
1/8by(@8by(@9 "9,/,~,>,>,9/,~,>,>,/	D"by(@:
1Aq;by(@;by(@;by(@<
}r=by(@=by(@>by(@?"?,~,>,>,/,~,>,>,>/,~	D"
[FJrE@`@DE	(
E-0G. ( H3,>1,4/4ZTO@,>w~,>w,C/ Zp7L9+N@@L	*Q
M+O,( Z+[N1P+R,>,>D-+^6*p+h +h@@,>,/"*D V68+X +h6NM+Z,N ZOO@X[Y1H+`1H+`,>	D"by(@Eby(@Hby(
@Iby(@Kd"e;g@Pby(
@Tby(@Tby(@Ud"e;g@](E],>$Q,>,6/+h + ,.l`@@X XX@@X@@X@@X@@X@@X	D"by(
@^by(@_`:@a`:@b`:@b`:@c`:@c`:@d`:@d e@@X@@X@@X,>,/@/+rD"`:@e`:@e`:@fby(@gby(@hfri@`@i	(*i-0E. ( HF,>G,G/4Zx,>w~,>w,J/ Zp7LZ+r@@p+s	*D(Dr,Y ZZ[r1P+v,>,>D]+6*p+	 +
,68+z +
	*UD(z6Nq+},r ZsO@z[|1H+,>,>$u,>,^/+
 a ,.l UD( XX@@X	D"by(@jby(@lby(@od"e;g@td"e;g@~by(
@by(@`:@`:@ D(@@X@@X@@X@@X@@X@@X@@X@@X,>,g/	D"`:@`:@`:@`:@`:@`:@`:@`:@by(@	 @D(	@/+i"by(@
KQby(UKQ
2U)@`@l	(-0i.	@@p@@p@@p@@p@@p@@p@@p@@p@@p@@p@@p w~,>,l/	 T*D Zp6Hp+?+@d+X,++'+,+; 8,x Zp6,p+ +y	*E
6P|+O@, Z}[
0J
+X Zan +#,>	,/@@d ,	*E
$4:y  
$, Jp>
%+X 82xw 8,>	,U/ Zp6.p+X+N 8(
- 
& Lp,>,/4:y,>p,/	D"by(@by(@by(
@!by(@"by(@)by(@*by(@.by(@/by(@1	*1 - D% Hp 
p J1 
 0`n+6g : Z p,>h,/ Zp	"U(@":60p+X+W6L#+>,{ ZO@;,>
+e 8 
2L
+G7Pp+D,>
""B,>,/, Zp6*p+X +y2L
+Q7Hp+K,>
,>	D"by(@9by(
@>by(@@by(
@Bby(
@Bby(@Cby(@Gby(
@Iby(
@I	(A"J,C/,>,)/ Zp6.p+O +y w0P+X+Y2L+[7Jp	("R+U,>
,>,J/, Zp60p+X +y w0H+X,>,T/	D"by(@Jby(@Kby(@Lby(@Qby(
@Sby(
@Sby(@Tby(
@Yby(@Z	(D"[+y2L+c7Np+_,>
,>,Z/d ,$4:y 
3 
42 Jp>a+X	""
c2L
+p7Pp+g,>
,>,^/,C * J,< Z= Zp,E@@h[
p""
l1L+X,>	D"by(@[by(
@]by(
@^by(@_by(@cby(
@eby(
@fby(@gd"e;g@m	*Am[i,>l,>,f/+X2L
+~7Hp+t,>
,>,o/ w0N+x	"
Ev6Pp+x,>,>
+f,C 0 Pk,i Zm Zp,E@@y[p1H+X+m 
E~"(2L
@nby(@oby(@pby(
@rby(
@sby(@td"e;g@wby(
@wby(@	 A@ 
.2J+7Pp+,>
,>,s/ 
w0J+
"6Hp+
,>,>
+f b Hp,>,./	D"d
1mt@by(@by(
@by(
@by(@d"e;g@	by(
@	by(@by(@
	(ED
y,>p,0/ 

 
4a Jp p N@@7,>(,8/ Zp5:X+y2L	((@+"6JpO@p@@p,`4:y 
 4 Pp>
. (1N@, *1L @@
AaH+X,>"by(@by(@by(@by(@by(@by(
@ by(
@ by(
@!by(@"	(*"+/6NpO@p 0 Pp,4:y 
 , Np>&0 ,1P@
* (	 @
+1J@A
aL+X,><6HpO@p * Jp,%4:y '(@ 3 <& Hp>3* ,1J@
. 01N@A
aL+X,>y(@(by(@*by(
@-by(
@.by(@/by(@5by(@7by(
@:by(
@;	(@
Q;+!2L+I6PpO@p . Np,24:y 4 $3 Pp>
@. ,1N@
	  D D( *1H@
A
aL+X,>S7Jp+M,>
,>,  D L/	D"by(@<by(@Bby(@Dby(
@Gby(
@Hby(@Iby(
@Kby(
@Kby(@L	*Q
M,?4:y 
A 4@ Pp>
N.1N+X,>,>+!@0v+V 
\? JX	(*T(U9S,>,>,L/+y6L=+[,z ZzO@X[Z1P@@Z[
[1J+(T(^[\0N+`O@\+b,>,><n+f w0H+h6Lp+h,>	D"by(@Pby(
@Qby(
@Rby(@Uby(
@Vby(
@Vby(@Wby(
@`by(
@d	*e[^,>la,>,W/+y 
p2L+k,>,"/ O Pp (.hk 
p m J@ 
p L@ p N@ p H@	D"by(
@fby(@gby(@hby(
@iby(@j`:@m`:@n`:@o`:@p	  q 
p J@ 
p L@ p N@ p H@ 
p J@ 
p L@,>,/@/	( y+
	D"`:@q`:@r`:@s`:@t`:@u`:@vby(@xby(@ydN
z@`@(Dz	(T"(z-0 ( Hk,>k,/4Z~S8
+l ,M4: l <N>7@(T"(+D"by(@|s)@`@)<	(T"U"-0z ( H{,>{,|/4ZS8
+(,C,Y Ze,E[
0L+
 		( +( 00L@ *AaP+ ,>,/4:) 
w2L+(	(E
U  ap+(,>+'O@_l ,4:) 
 4> 
aj +(0 . 0P@, (1L@AaN+(* 00J@,	D"by(@by(@by(@by(@by(
@by(@by(@by(@!by(@# # (0L@GaP+(,>,j/7@+D"by(
@&by(@'X)#))@`@*T)	*@ 
),0Z@
 
*.A
aJ+2,>,/4:3 ,,~" 
2,>,f/,~D"by(@-by(@0by(
@2by(@3X(fb4@`@E|4	( 4-0.,>,>w,/4:J* JpS,BL 
wZ0ZXZX[X.	 << Np2tp+F P 0H+C,,>,>,+E,,>,>,6" E/9= 
pl 9ap +J,>	D"by(@4by(@5by(@6by(
@7by(@@by(@Cby(@Eby(
@Fby(
@H	( I,'/@/+5-0.  'S*GJ`,>,>,D/76+e	 DU
Q 
`al+T :+T :z L NpO@,) Z1[W0P+Z:U@@l	(@Z+l [
W ,1J@
 .1J@A
 01J
@A
aL+f:Y"D b . N$Y,66+} +(	D"by(@Iby(@J/6AKby(@L`:@Mby(@Nby(@Pby(@Tby(
@f	 D
f .1H@  01X
@AaN+q0X+n,>,+p Gah 	(D"U"o+q,>,I/:
b ( H4c * JE,V:q Z[ ZDr[t1N+z,>	" T*w[,>le,>,2/+ZuS(GH`,s Zz[|0H+,| Z} 
t"

1j{+Z,>p,w/ 
 Lp+ZO@V,>p,/@/	D"by(
@lby(
@oby(@pd"e;g@wby(
@xby(@yby(@by(@by(@	*Q
D"+y7H+[
0L+  P,>3,/4Z *+ 
 J
,>	(E
E
,/4Z .	QN+ 
 L,>,/4ZO@ 0QP+ *E
E
 P,>,/	D"
Ke5by(
@
by(@
by(
@by(@by(
@by(@by(
@by(@	*"4ZO@ *	QJ@,~-046Hw+ 6+!Z
 8
  
.,QL*	 ", 7Nw+1 4 . 
.
w 
( L =4% <4t- .	 
+ w. 
@ J8=t* wZh.(,>,>,/XV` +K-0.	*U""37H+5@@3+6,~ Z[
61L+9,>,>4x+= 6,53Z+?,>"""<[,>l8,>,y/	D"
HFJby(@0d"e;g@8by(@:d"e;g@;by(
@=by(@>	(U>+v,4:v 
 ,u>
@,>,>,/4:vS0@GP`00P+e*	"G0J+e `..&. Np X.(&( Hp3n+e  Pp,>`,/	 O Zp 4 
p Jp2tp+V p. . 
  L89Q p8  
p	 @ X Jp2tp+\ p.  N 9X p.:,>Z
,>,0/[Z
" `2P+c pQZ_+d p 
pXL8 pX V`*,	D"by(@Aby(@Cby(@Eby(@Fby(@Oby(@Zby(@_by(@fby(@f	 Dg .3J@0 (0P@GaN+u7J+r,>,>0,>( o,>,/ Z`+u nap+u,>`,>,p/@/+2	D"by(@hby(@lby(@nby(@oby(@pby(
@tby(@uby(@v: Z9[w0H+zO@+~ 
ral +},>,t/@@O@4@,~	(U*-0w.7H~+@@+,w Zx[
0L+O@p+@@pO@ 3Pp(E*+
,>,=/	D"by(@yby(
@|by(@}by(@}by(
@by(@	(*
+@/+D"by(@
M9
@`@Wt
	(UQ(
-0.,c4: A,>l@,/68+>
 + 
 X4. Lp" Q(0N+ :+ : pQZ$@/+)D"by(@
by(@by(@by(@og@`@at	 *U*-0. w*+@,+{+&+:+<+X+s++]+\+&+\+\	*U( "+\+\+\+\+\+\+]+_[
 ,>,/78+{ wZh,>	(@*,/76+{ w,.
 L.5N07` ` Z*5J27X X @3 Z,,>	D"by(@by(@by(@'by(@+by(@-by(
@-by(@.by(@1by(@4	" "4,>w,^/ 
 L@@ 3 N 0 P,+{,5L] +{@	 AA=[
 ,>,/78+{ wZh,>,/76+{ X2h`G4 X	"E2N`+K 
X2j`G4 
X3L`G4 X30`G4 
X3*`G4 
w.A8)"N,>	D"by(@5by(@6`	D @8by(@:by(@>by(@Bby(@Mby(@Mby(@N	"N,>,5/4TT 
 J@@O@ ( H,+{ 
 J@@@@ ( @ W H,+{[  
` 02N+f,>,>,/,>,/	D"by(@Oby(@P`	D @Rby(@T`	D @Vby(@Zby(@[by(@\by(@^	"^76+{,>,N/  
X(L.
 L`,>,>w,O/ +{ 
` Ag (2H+],>,>w,\/,>,/	D"by(@_by(@`by(@bby(@cby(@eby(@gby(@hby(@jby(@k	"l76+{,>,>w,d/  P@@* J ( H,+{[
 ,>(t,/78+{ wZh,>,/76+{ w,0L+0	D"by(@mby(@nby(@oby(@p`	D @qby(@uby(@xby(@zby(@|	" |1P+,>,	/7(z7 ,..:
+ Hp707  
p  ,(L.	D"by(
@}by(@~by(
@by(
@by(@by(
@by(
@by(@by(@	 @ .
. Z. ` P 
` J0 X H 
X L7,3,>,>w,n/ 	"A N 
 P 
 J w, L,+{Z
 ,>,/76+{ X(PA P 
X J	7(7  
w.	D"by(@
by(@by(@`	D @by(@by(@by(
@by(
@by(@	 (N0.. Z,
,>,>w,
 J  H 
 L w  A$. N,+{Z
 ,>,/76+{ w*5JB.	D"by(@by(@by(@ by(@ `	D @#by(@$by(@'by(@)by(@*	 +, 00L
@(* .0J
@G(, *0L@
GaP	(3+=.X N(X H 
 L, 
 J  P  N,( H"<,+{  N(X"H,X"L0	D"by(@-by(@0by(
@6by(@7`	D @:by(@:by(@=`	D @?by(@@	 @* J,+{., 00L
@(* .0J
@G(,	 I *0L@
GaP+V.X N(X H6,+P  Z+Q 
  JO @Q, 
 J@@ Jp . N,+{  N(XJh,XJl	D"by(@Bby(@Eby(@Hby(
@Oby(
@Pby(@R`	D @Tby(@V`	D @Y	 "Y0* J,+{,+{,> ,~/+{Z
  Lp@@p 4Z0 Np	"b2tp+j p.Zh,> Zp,/ Zp 
pXZ(4:{ 
p 0.np9b	" j,>p,`/ Zp pZ*@Q*A` Jp 4 pZ
  Lp2tp+x p.Z8	 Ds PpZ*@Q*A` Jp7r@9ppHp=rv9p,4Lz *Jp+x7p@ D{/+D"by(@Yby(
@]by(@^by(@fby(@kby(@xby(@{\C=|@`@m|("D|-0
 wZ  w~.Zh+D"
LC @`@^	(D-0 w2Hw~+0H+ w~ 82P+ w}+| w} 
w~ 02N +		" + w~,>h,k/  
w}Z8(Q8A`Z6PQ6A` 
w~7r0+N	(A"=r(4H *J+ . +	 
w0L+,>!,]/+ w}	"
 @ H 
@ J7,N7  w~(N(N w(H.. Z, 	D"by(@by(@by(@by(@by(
@by(@by(
@by(
@by(@!	"Q*" P 
! J 
" L w H,. +-0.7H+*@@(++,	**U* Z[
*0L
+.:,+,Pl+=O@),=	* D3 0,>l0 Zp,/ p Z$3 Zp6*p+9 +> p00P+< :(P D;+< : 
3QZ,6@/+	D"`	D @$by(@&
[~'by(@'by(@1by(@5by(@9by(@>M:?@`A?	((?-0'. w* JpO@p ,2Lp+F:p w.! :5N]+] 03Pp	( DG+L (3Hp+L *3Jp+L ,	2Lp+M:p+] .2Np+Q:p w	 APZh,>+[ (2Hp+U:p wZ
h,>+[:@p+] w[
h,>,? @"X/aZ+] wZh,>,?/+]@/+>-02. !	D"by(@?by(@@by(@Dby(@Xby(@\by(@]
j`}^by(@_by(
@_	*D"Q` H,>,/4ZcO@p+g 
" L`,>`,a/4Zt@@p , Ld,>	(D
@h,e/4ZkO@p+n@@p 0 Pg,>h,h/@ Xp  3X+		 
q,>p,/ 2X!+uO+	548p:
p paN+}1l+{ (H 
y*"	D"by(@aby(
@cby(@eby(@iby(@mby(@pby(@rby(@sby(@y	 "z.  (H. +p1l+	 (H*".  (H+|	 	 
p .1l@Dp 01l@GaN+		O@p+		@@p p *1h
	 E*	@
 ,1h	@
D
pG
aJ+	,>",/6P.+	, Z-[	1H
	((D 	+	 
p`J7# #,>[	,>l<,>,	/+	56Jp+	 p`N7$ (D 	 $	D"by(@by(
@	by(@	by(
@	by(
@	by(
@	by(@	by(
@	by(
@		 
E(	,>,>
,>,	/ paN+	* T V % H ,! " # ,04	  "	%@
 *1V@
A
aL+	* G#6(4H	,,>%,m/:
< 0( "	-QP,= 	D"d"e;g@	by(
@	by(@	by(
@	!by(@	)by(
@	*by(
@	+by(@	,by(@	. 	. N T V paH+	2 :+	3@ Z, 
	,XZ4	-@/+vD"`	D @	/by(@	5(TD	6@`A	6	(T(	6-0| ( Hl,>l,m/6X+	@ 
w`L+	? . N	7,>	8,	8/6X	(AD	?+	@O+ 
waL+	D1x+	J,>&+	E1x#+	H,>&,>,>,	/	"A*	G":+	@1x+	J/8+	K/87@+	H@	`

	M
	N
	N	D"by(@	9by(@	>by(
@	Cby(
@	Eby(
@	Fby(@	GJy(	M
y(
	Mby(@	O	 	P:
HHT 	X 	D"by(@	Rby(@	Sby(@	Tby(@	Uby(@	Vby(@	Wby(@	Yby(@	Zby(@	Z 	[!!"#$%'	D"by(@	[by(@	\by(@	\by(@	]by(@	]by(@	^by(@	^by(@	_by(@	`	  	`<<	bH'H(H(H)	 	iH-H..0 	q3	D"by(@	eby(@	eby(@	fby(@	fby(@	oby(@	oby(@	pby(@	qby(@	q	 	r468$ &`&PP`PDP[Mc@	 	zNONEhUNITFMTNMLRECENDERRIOSTATKEY	 
@KEYEQ8KEYGE KEYGTKEYIDF ``F0`00X     	 
 P  `X00G"#@    SDG:X((
0@>p	 
>hB
@@dimensionedNONE:::	 
:::H

MulipleOther IMPLICIT 	 
%specifications are illegal withOther IMPLICIT specifications are illegal with	 
-TOWHILEa character or integer expressionan integer expressionkeyword	 
6keywordkeywordKEY=KEYEQ=KEYGE=KEYGT=KEYID="," or ")"	 
>","///,//,/O'Z'"'" o	 
Gr octal digit"'" or hexidecimal digitoctal digithexidecimal digitoctal digi 
Othexadecimal digit	D"by(@	rby(@	sby(@	t
y(	t
y(
by(@
Jy(

y(bHF
	D"d(Q$s
bM,
beD%
e4v;S
c^}:3
`?	sd	N0:	r`^n	p`3N	n	D"`4	n`
R;	md	N0:	ldF2J	ldF2L	kdlb	kdl:	jdfj	j	D"dfl	i`4
	g`:	d`:	d`9m	c	D"`:,	b`94	a`9D	a`?	``3v	_`?)	[`9		Y`3u	X`9
	W	D"`^	V`^
	U`_	TbSLs	S`?	R`^
	QcVpK	Q`,	P`^	P	D"edsQ	3eY]g		3`	Ds	/`/83	.edsQ%eY]g	%`	D8#`/83"ge&&	D"edsQ[eY]g	Z`	D X`/83WedsQUeY]g	U`QeS`	D8S`/83R	D"bL>OQbM&Q`/83QedsQ9eY]g	9`	D 7`/836bL>O	"	D"`Qg	#`QS	!bM&
e
-
KMdQtBeK)-	D"bM	yH"bG>_	+dQ][BdQW4OdYHz]|d
1mt	Xb2OUjeMQ+eY_]-
	D"c/5:/d"eD0	`L\c1#jbMR!d"e3*ge$^f,h!?|erQ"	D"gm!$?ge%`ox`<*o?bz']ibHK+oibHKWxher9fc
	<	D"dSMO+`/83"ge&	6c	=c1'}	D"gm!&^bMfgdqx7`
/	Oe
<b})S	`:	4`Q	4ge%	LD"`?zjcXq
oc1r2P	6((
R