PDP-10 Archive: cgdo.rel from FORTRAN-10_Alpha

Trailing-Edge - PDP-10 Archives - FORTRAN-10_Alpha_31-jul-86 - cgdo.rel

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

0G}^0 @	
G}^S4xk!4y
A4y&BbED$	-TB$	+0<$$	1
"bG}^S{H
"v]2bG}^Sv]2 1bG}^T 1v]lbG}^Sv]l  -0. Z
 4J, 0(P Pp((H HpZ
8 J	~09"bG}^R~09"e!%bG}^Re!%
G}[dbG}^@bG}^@bG}^@bG}^@	  @  J,1L+
 J,   `n@+ 
p J

 L  aP+	 @   Z+.(N*(J.0.. N,

(`L++" p P

0	D"bG}^@bG}^@
@bG}^@bG}^@bG}^@bG}^
@bG}^@bG}^@	 ". (2P@A

aL+!@++ (ap+':(Z (."AU%. Z+*.(N $,.. N&,  +.*	D"bG}^@bG}^@#bG}^@$bG}^
@%bG}^@'bG}^@(bG}^
@)bG}^@,bG}^@,	 D P(-GaN+2[

@ L( p H*.
 J*,*

al+C +(4HC	" 5, 4 ZXZ8

p L0 6(*D

[0 00N@AaH*"P>+A 
6G
	 J@@,+C 
 J1,2 8(	D"bG}^@0bG}^
@1bG}^@4bG}^@9bG}^@9bG}^@:bG}^@?bG}^
@AbG}^@C	 D*	GaH+R,5 QZ8[

8,>,/
 C 
@aJ+NZ@ H/	" L p N8

+Q p HMZ@ N	,
.

 LB,B,F FXZ8Z

8,>(A U,H/
:S/1p'+Z,>,>,/	D"bG}^@DbG}^@IbG}^
@MbG}^@PbG}^
@QbG}^@UbG}^
@VbG}^
@XbG}^@Y	 Z@/+-0. wZ
 4JH w[8 Pp7Hp+H[

  Lp4LE 0	"(b`P+E>
 p.0

GaN+h[( Z+iZ

( Lg7Ji, p (k p.

*DaN+r[

(L*	D"bG}^@Z
G}ZX[bG}^@\bG}^@dbG}^@ebG}^@kbG}^@lbG}^@obG}^
@p	*qNQ+2,
aJ+
Z

  L p.*G "y( 01H

@AaN+ Lp7*27  p0	D"bG}^@rbG}^@tbG}^@tbG}^@xbG}^@xbG}^@ybG}^
@~bG}^
@~bG}^@	 "(P p*...:+	 Lp7*}7  p0(P p*."@ . Zq++

p0.D*

GaP+

cZ0 Ni 	D"bG}^@bG}^
@bG}^
@bG}^@bG}^@bG}^@
bG}^@bG}^@

bG}^
@	(  H	 
pZ( Pn++Z

  L p*0G
( .1H

@A
aJ(
+ p0(P:.. P+  p((H...	D"bG}^@bG}^@bG}^@bG}^@bG}^@bG}^
@bG}^@bG}^@bG}^
@	*@  H,R pZ

@ Lw 0aH+( Lp7.7  
p0..:+	(A ( Z
8 J0. P ,

p((H Hs p.*G.	D"bG}^
@%bG}^
@%bG}^@&bG}^@*bG}^
@*bG}^@,bG}^@.bG}^@/bG}^
@0	(P D 0 N+[@ H,+

pZ04H6Z
0,>,U/
 
$aj+E p

p(	 "90BaH+<@+E 
0aJ+AZ0 N10(P P- +D."(A(N N?Z0 P(. H0,2 pZ
@ Jp Jp+_@/	D"bG}^@5bG}^@8bG}^@9bG}^@>bG}^
@@bG}^@AbG}^@CbG}^
@DbG}^@H(PI+[-0. O@ @@ 
,0L+T,R Z G		"})cgbG}^R})cg
H&{IbG}^@JbG}^@KbG}^@LbG}^@NbG}^@ObG}^@O	 (@P P@@, LZ
  J,N

RQZ0 Q[@ *1H@
, .1L	 Q"X@A
aJ+^,S Z G	 HP@@P,Q 	3HJ+d,>/^" (A"a&(,>,/Z`

L`

dO@0 TZ
8 J	D"bG}^@WbG}^@[bG}^@[bG}^@\bG}^
@^bG}^@b`(@cbG}^
@cbG}^@f	(  g,Z Zp,>,5/
 ( H]@ [

@<

 Lp2xp+q Z
8.
	"
(o ( H\,9m@@p,p p Pq

6al@+vS.Gns@@j,r 	3Nd	(@Dx+},>/w"&.,>,/ 	 HyZ` e01P+Z  Nu"Q * Jv,]+Z  NS[
8,>,h/
	D"bG}^@ibG}^@kbG}^@nbG}^
@wbG}^@{bG}^
@|`(@}bG}^@~bG}^@	* | 
}[( H8 `P,,g Z

al+S* J  N) 		(A  HDS0 P,>,/
 Z, Z

 *j,E 
.0N+"@A  
 Z+&[ ,0P@

*	D"bG}^@	bG}^@

bG}^
@@bG}^@bG}^@bG}^@bG}^
@bG}^@	 ""A

.D

`L+% 
 HS0 P,>,/
 Z, Z 
! .	 T @#nS,` L

,+& 
 H00P+8,>,/
 18+8 
 T @+.	D"bG}^@bG}^
@bG}^@bG}^@ bG}^@#bG}^
@%bG}^@&bG}^@)bG}^@+	"
,0N+6S0 P A:(Z

A,..,>,/
 Z ,! Z"	(*D4 
4 .n (P P$,$=*@@7 
+Z(4NeZ( Pp 8Z

@ Lp	"(=2xp+e p.Z8 H H44He p.

@`l9=.0N+K  " E2P+H  Z&+I  NG <G N+Q0	D"bG}^@1bG}^@2bG}^@5bG}^@CbG}^@EbG}^
@FbG}^
@HbG}^@JbG}^@K	" L0P+N..+O

 NH 
<
G
 JJ p.,(L L8,7("@T ?.0N+Z  2P+Y

 ZO+^ 
	D"bG}^@MbG}^
@MbG}^
@NbG}^@PbG}^@RbG}^@UbG}^@WbG}^
@XbG}^
@Y	(" Z+X00P+]:.
+X 
 NX p.7,@9= T. NpS*"A
bBJ ,T 
` pp9=6P+g,	 Z 
aj+q,>		D"bG}^@ZbG}^@\bG}^
@\bG}^
@]bG}^@abG}^@dbG}^@ebG}^@gbG}^
@i	( i /	 &.,>,b/ 	 HiZ`,f Z,>,/
.( 	D"bG}^
@jbG}^@lbG}^
@m`(@nbG}^@obG}^@obG}^@pbG}^@qbG}^@q	 A*rGaN+v G	 P@@, 9,1L+

@@ ah+

,>	"*z,> ,l/ 	 NmZ`	D"bG}^@sbG}^@tbG}^@vbG}^@xbG}^
@zbG}^@zbG}^@{bG}^
@|`(@}	(@@ } vZ

@4L	Z@ Hp 8Z  Np2xp+

p.

Z
05J: . Nu

! Lt,9,>	,>,{/ 	 H| ah+,>}, A
/
,>,p/
	D"bG}^@bG}^@bG}^
@	bG}^@	bG}^@
bG}^
@bG}^@bG}^@bG}^@ D"@
 an+S0 P-,>,2/
 Z3,3 Z@/+D"bG}^@bG}^@bG}^@bG}^@
G[G@`@1d	 -0.,>,/
 w* ,1J@

[ 01N@(M*  GA

aL+(S. N,>,/
Z,bZ@bG}^@bG}^@bG}^@bG}^@bG}^@bG}^@#bG}^@$bG}^
@&	( P
& H^S*` J,c an+0  H,n Z
J+	((/,/
 wZ
  01J@, .1L@AaP+W@@'Z  6	 
 7Z
` Jp2vp+W

Z0 N%4NW . 
 `j98

8al 98	 A@"@0!1P98*"0J98 .7(@+P w 
8aj+HS:+H@(@"H Z6

 L, ;("	D"bG}^@*bG}^@,bG}^
@-bG}^@/bG}^@2bG}^@@bG}^@AbG}^@JbG}^@K	"P(L.
.
 JL+V .*#(J JH

 LJ(AT M(. HO,M98 
w(0H+[ 	D"bG}^
@LbG}^@NbG}^
@NbG}^@QbG}^@SbG}^@UbG}^
@UbG}^@XbG}^
@Y	*Z0ZV+\ ,>,(/
 Zp2vp+m w	 @*b,0L+j A:(Z A0..,>,#/
 Z$,% ZT 	"P 
k(P PR,V9a 
wZ( Hj, .0L@0#HaN+t,>X,>	D"bG}^
@[bG}^@]bG}^@`bG}^@bbG}^@gbG}^@hbG}^@nbG}^@pbG}^
@s	( P(s,Y/ 
w

(`l+{ n01P+{@@k*.
[,l  Hz(Q|,z@/+-0I `h+7Jw+,>r,>,s/	D"bG}^@tbG}^@wbG}^@ybG}^
@ybG}^
@{bG}^@}
HJG~bG}^
@bG}^@	"@"6Jw+
 Z84X
($0H+[

`5LZ`,$1L+.5N

,	(
+ ah+6Jw+  Z{+.1N+ J, w H

(  LS. N,| 
aj+

 0G$ N L+

	D"bG}^@bG}^@bG}^@
bG}^
@bG}^@bG}^
@bG}^@bG}^@bG}^@"A G

	 L@@,@+	bG}^@j^abG}^Tj^ajPjbG}^TjPjU%_bG}^PU%_ /bG}^P /    H 
 J

 L  N	N*gbG}^UN*gktNbG}^TktN!lbG}^@bG}^@bG}^@ bG}^@!	 ""  Pd l d d Z8QHZ
8 J

( L,I ![@ H( 	 E  **!0J+1Z 4P-, )Z
h,>Z

h,>,/+2,,>, E  3/
 	D"bG}^@"bG}^@"bG}^@&bG}^@*bG}^@*bG}^@0bG}^@2bG}^@3bG}^@3(A@ 4 P%  H'   N- 
 J,>,//
@,~D"bG}^@4bG}^@5bG}^@6bG}^@7bG}^@7bG}^@8bG}^@9
H1:@`@F:	   :-0.@@p7Hw~+Z[ 4V?,>,/
 w~ XP8 N@ 2Z
8 Jp	"(C2rp+S w~.Z ,%1LO@p w~.7*8+J X,9C(%0H	(A@K9CZ` PI.%(N N*.
 J, w~.Z

`XL 9C w~Z

 	(A T4LW Hp,+ pQZ8 Z.+] . N 
QJ  JV+]@ , LX X( \ NY

w.&0&	D"bG}^@;bG}^@?bG}^@EbG}^@JbG}^@MbG}^@NbG}^
@ObG}^@]bG}^@^	 @D*^DaN+a 0G H0 w 
 aj+f[

  L*  PO+g H

	*@P
g Le,P4Vj,>,/
 paP+4V,U Zp pG	 H@@,	 o 2 
w~Z

( Lp2rp+~ w~.Z@.%0N9q,l ,>,8/
 x 
w~.
XT(,>,i/

		D"bG}^@`bG}^
@dbG}^
@fbG}^@ibG}^@mbG}^@tbG}^@wbG}^@zbG}^@{	*Q| Ln@@n,o9q,>p,w/
@/+-0[.
@@| w*0J+
 @.1N+
 
w,'.'A

aL+
S0GP w0(	D"bG}^@bG}^@
tFXbG}^@bG}^@bG}^@bG}^@bG}^@bG}^@
	"(0P+s+

p:Z:h+

p:Z:hQ:	, @DlS*GJ	,>w,>,/@/
+I	D"bG}^
@

bG}^@`	Rx'@bG}^@bG}^
@bG}^@bG}^@bG}^@
Gwb	(P-0:.
 A4T6[
P ,1J@

ZP 01N@A

aL+5ZP"	"!S
 J . N|, aP ++[P[

X (0L@*(AaH++	 P )ZXXZP++,j[

P,>,~/
,>,/
`Z+5 2 Xp2rp+5 "2 .Zh,>,/
91ZP+O/
+D"bG}^@bG}^@'bG}^@-bG}^@.bG}^@4bG}^@7

a8@`@Ud8	(8-0~. w[
  Jp, .1L@0) (1P@G`N+[

p	 "@[
0 Jp ( @2H)+[ 80x+H w.Z

h,>,/
9D,u" AI Zp Z! *jS0GPI@@",>p,>,/,>p,,/
	D"bG}^@8bG}^@:bG}^@<bG}^@BbG}^@GbG}^
@JbG}^@MbG}^@NbG}^@O	  P wZ@ Hp   Np , LL@[
p<
 Jp2xp+YZp. @ HK	*QX,#9U@@X,X :+\@/+@	`	 a	 i.Y	 r88(( & 0 . ($(8 @0 @<@8	 z+ @ 880   @  B *@0, 0*8	 ,h,@(00@<80 @((@ +D00>+	 D(8 ( $@  , ,(6(p8(8 @$8> `+`.`,0B0 .(8(X(aJ~8G	D"bG}^@\JG}^^
G}^
^dr>A@^dr>A@ddr>@edr>;@e
G}^q
G}^	D"bD87zpdr>qlpdr>todr>Aodr?:n`3ne
7%;m`3mdr>`Vl	D"drBHMl`/
Dkdr>Akdr>syjdr>3hjdrBF!idrBFidr>thdr>_6h	D"dr>Nkg`(gdr>tf`xfdr>Addr>Bcdr>cdr>bdr>;b	D"`3&abeA&adr>t``x`beN8Y_`x~_dr>A^djlEZc(I4M	D"`	Rx'ge&7bG{78zfx?B\dS(:[btfHbG{6>gm!&bGxx1	D"e

5bK~4`:

(}eSe=Q[qe5rNb.?fbGvEIemGwL	D"`KGbOF/O6ge%}bK~`QQTb\rWde5rxb.?vedsQi	D"`	D i`/83\gm!%ge%\`G

`QQQd #A@_bK~(em_Gw@	D"c_<E7edsQ`	D dqx7h`/83e5rSfF=du^M}
djlEv	D"du^O[{b.?c`:

(uee=Q[bOF/OC	D"ba>?"e5rBb.?>`L+bbW\`Lq(ge$c

(@e@e=Q[?bbW>c(Hk"H`AbHgD"dr91ge5rObGvE
em_GwPb.?LbG{UN-bOF/OIgm!$((