Google
 

Trailing-Edge - PDP-10 Archives - BB-D480C-SB_1981 - forlib.rel
There are 34 other files named forlib.rel in the archive. Click here to see a list.
`? 22bK^^,6v_2_Bb>	WJ R
&*(J"):u6
zR|J&(._<F
@\:/|N/}FTUR20J5KN5$J8BmWQ^AwB )	h 2c_BcB2^  3K__3&(/TUS5KOD|
 w> S
&+zS<F@\;/|O/}G20K8CAwC% B'[5 (J#mWQAUA^A^{>A^{SA0B'2B':Jq~kx< ?Q1?Q4ID;ID;pJ P3P3NHB w	<xK A
g
gS B1ZJC^ H)XTxUxU 22bK^^,6v_2_Bb>	WJ R
&*(J"):u6
zR|J&(._<F
@\:/|N/}FTUR20J5KN5$J8BmWQ^AwB0(bIH @l	*UQ*+ ^ >*> , 07B "Z1D+Q"X B(C" B7B7"0	( +1\"	b@aBg $ "2	b+ O 0 5	b!"[	 TU(dl B+ 
&
(
20B,1B<++ ^ >*> 0  ,-	(P
!>*> +@(	`Do you want to close all files? (Y or N):,.,.,.	*U*U*",.,.,.,.,.,.,.,.,.,.,.,.,.,.,.,.,.	*U"(*,.,.,.,.,.,.,.*x.d"+|ZB+ ggM?} 3p 	D
2*
2b)
K^"KI
2K!K!F,^,6,v%
_2+	D 
_Bb*wf>%!}K	`	WJ)	z+ R'
&*(	D"S<f(J"!
~):-c)	P [hP [|u6
,(TsT	`	(Ty"	`#\'+zR#^\'_
(^gTr^h2c|J &(.-_<F
'	"S_zZ P
T~T@\:(Rof/|N&/}F&Y7PhTUR!20J#	u^v
&	
;%'+'g1.8B$	8"2XYYHY2?~@((5)`)	0)	H@d	(+++++++++++++++++++++++++
+  BD!"~ B 	b@0b	"(/l8C"0`bO@C,@@K *"@,!"M	b+@ B\"	b@ab@	 U8gO BB X@+N LB*
x,L>>+J LB*
x,>,L>>	*@@+J LB*
x,>,>,L>~>~+I LB*
x,>,>,>,L>~>~	 @I,^,^,^,^:x:x,~Q,*
B+B:x:x,~,>,>,>,>	 Q,>*},> },~,^,^,^,^,^,^*x,~,^,^,^,^	 *E*Z,^,^,~,^N,^ \M <F*<L M@@C_wS@B5 m @E3 +wC C	*Ub @DC  @D BCC"F*C p ADd ~e`p+a`+C!1`.C AD	*U 
k: E+m:D:D9e7\C <CPw_#1`@  @Q l  @E @ ^M	*Ts@@A,N6BC,!<F*<,~"(B.",>,,^S@C Z@C @D	*T*D
|/E @D F+d,^N,^ \M <F*<L M_w4 _O7Bp+3B+	"U
U/ 9 M F+_,^N,^ \M <F*<L M <C@@C! +r
	b	(@"
,~xgR~ p `H	0K@C!+j`@x+iA +j= 	D"D{BC#gD?L%Db3
b2c	Rtb;`ththCRu		D"u1iu1ju1ju1eR.2m:KbKMeBC	B)`^,7	D"]=q?
b@Bc	`>R}:@}K	``	WK	D Syx
&+&fP 4Dc(J#c);
+)	H@P28	P [hP [|S}YP
ku6cu6
[u6cu6

y.A5oR*	@
yXTD
yX{A(TbT	`
(Ty"	`
kBfUF+A
+|D
5CfYjE	D"fY{$@
f,Bfh:Jfl}AF
wC)
xTEfqmO@&yiAf}<*C	D"P%u
@`zS^hEa)^hEg&|K`&(/
c<F8?\z	`+abX3	a@X7Spm?S}0S}kS}zS}6P,0c@3E

$c
;%'+e5KO	D"*[	`7:9J7:9J7::I7::I5N`8C>rG	`pX=	D pX=dKpYLWt9E2wBXYYZZ	D"[l	
V*79	PbKLA$5Cg??"E?"FC	D?"GJ
:`T@
@t[]N	D"o^gB,7[B.ggB2^gB~*By
L'
DKg~DaD7XEhR]*	D"F
oEgF6(h1M:E>M:E?M:F@t2OH4/QNH4/QNt7T	D"H@O g[JX-:JX-=JX.AJX.EgJr]H3WxVwWhGW
	*"@",,xQD,~O@7(+4HZ[1&+1f+h*$'	 U  C"+Z H;`+.5> B "(B{ Bx,9+ x)B.$	(@ Z0D+ (6` Z + (\F XH\B BZHZB  &ZF & 	  "/& $ /+4BZZZ0H,Z0H,7 Z6`	  *ZZFXD3$3f+. D/&QF5f,.5>* B,	 3 SxX&.$*&*x D,$,^,^,^,~, ,?/, . "	*P*;,ycB+C=,; ,@/,? "0."?0b,~ ",ycB+C9
>,K,~	"A
 D "0G+,
/
 ",yBB,~ ",ycB+K,~, 00	(T
*L  ",y,S+O,~`R,V+Q,~ ",yGB+EbB9/P	(E
"U PH.0*rT/2ZR 	r2+[ ,~ , 1R+S0R+Z6@	(U
@]+[!  @ P@H*r_6@+W.5>0
O@x .`N~+l!,X,8	"
f	l2,`l9d ! ,l.	r2+l;`x9d(N68
/+W.	(D(T(n5>b
 Q, L.,<ns*bp/"ZB  	b2,!5no
/	"E"w ",yBB,~.5>n
 Bx&,	(N(B8 $0 +(B5B x	"*A
.$<.+A~+~:~
/+],KC$[(DD"" BC"A B	*U*P @@ " B\B@@@@ " B #*" 
 $[/"4",!9
Z $_/<$,!9
Z4B[,!	*(*9
Z` $_/<$,!9
 "0 .,$,n ",yBB9
(B{	 *!(D{3l3,+,~Q"	b2,`b:x,~,7P,H =243%	*Q (*+# B D,,~   ..dZ
G2-=2XN@	(A2 O..(N{ N[
@Z@1.9)0l+* &8/& F0L+=0N+<	(
 ;,v+QD@+;0N+?XB@+<,{XB@QD@+>  
 .(N{/.0	*D
P"C4N74.F,I,~+C.
#,n+E.5>y ", 0 P@@	 D(DL@@G " B/,~,'7P,~7.0<2]Z
G[@1.+Q0l	 D" T,~0L+Y0N+XZ@,vXDG+G0N+[QB@+X,{QB@XD@+Z	(P*]2e,~/0Z
@0l,~0L+bXD@+\,{SB@XD@+a,O 7P	"@
e,~ <2j[
@Z@/.01.9f "0,~Z
G3M[G,~,E+q.Z1$0+q[
> L,+  
 M.,(L{ L,~.	(TT*v5>H?b+.!$@X$@0b*$+.5>v:2b,.	 Q
 $/$@Q"X",B4"/,~.5>|  & F .&	 (@.$/"/0,0.0." B /,~C2|G, p,O B	(
U*4"VQD,~I|G,;=BD	*U(@ FIJJKQVcMVt=,6cp0b@+
OAp,~ p	"*Q*!7ep+&.ab`d+n,'+m+n+m9Dn $,'+m+n	*P*A"),O,   Ep.$,',,+m6ep`d+n,d.,'+m	(AU2, Cp+m p7ep+n.ab`d+n,O+m+m@,+m Cp	(EP:+m pcB#,+m+m6cp`b+n,+m Cp QD+m6cp`b	*A(C+n,$+m  Cp+m  Cp  Cp  Cp+m,l+m@Ap+m	"( K7cp+n."(B{bB$+n,9+m(B Cp+m p7ep+n.$(B{(D{	*T*TcB$bD$+n,E+m6#p+X,g+n0"+n6@+m6ep0d+n p	 AU \7@ (6@\ (p`f +n7!p Cp F
Y7@]QD
`6@ad$+m6#p0"+n	*Q*E e7@
a+m@@
e+m!"},j+c %,j+h,~6@
f*bj5"i ",~-"o*Pm-"o-"o-"o/"mZCp,~	"P
x,>+/,~x,>+,,>+x,>+"
!,>+*U*U*0x~<
j	
2cPoUPoV.21&2].2n`v2n2n];	D"U|9{D8qHX{+HX{gHY:=$HYG	HY\g/	pSN["I	D"N[%KcNF
9Bc135E3ODwo"ywp~e;Ie;%;	D"	m	@"Y1nY2nR^=YAo.KA/2/5;4
*uI
*w".	D"
+ 
+-8
+#=
+0K=
+.F
+#
+Rc3
+S;	D"
+ToD
+UB
+UQRO
+U>J
+t^JoZ	~'1	zY	D K{f
I4
x
S@.7zWc[PL 8<byF(]	@yG%Qz
!a	&!b#;&I	D"
H)_
H/!i>&hC
N
=
Nu)(Tb;	D"(Tc
d,X
d,-j1E$u"YA<Pe*PM*	"P$xP7n7`
+|FcfYjG`
xTHcfqmODcf}<*b^}.!
Q9Ip
QQ"nP+!3O=?%KC;m

	U>@U>+ U>1U@@U@4J^	`2U_UU_e;L	D `R32BXVPUW[S5P3ox4!"UV?Qe?UV?^:	XYYZZl
I"jmg`(snbw=n{I>	"n;C`>XrPbKlP@AjiLA$5C g?g?9g@.~]$g@vZ<@w>	D"AjJ/B,7[$B,9pEB2^B~*BB"9`
L'DE`gEhR]	D"E};F6(hFV~B0`t2gH4/QkgH4/Q@"` ggJX-	D"gJX-lgJX.9gJX.dgJ(#$g[Qg`r%Hg[l{g\	g\2gPoW.J)W.J+W.K(H@>Xr|((p% 3K__3&(/TUS5KOD|0)4H Aq	 U(_B-c@,C"
u BP,,4,B6B@@6Z,D ",  QDh "%	(D
E*,   Bh  Bhl8,p,,:ax+,tf
v,,:,0	**E",,!"GBP
5,:,0,G++,,
+,P
`b@+0"
v0",71B+(1B+#1B+%	"U*U
"1B+&,
w,C++0,O++0,P++0"
x1B7
y"
y,
+	*U*(*++0,
w+C+O+/+C+B+C`x+O+_h Z
"
z5B$
x	( D"3 P 0D3B
u7
z "b
z,~/"$
{7@b
{ "b
v,~"
v0B	((;5*dd8@@PQ"PX"P*"P@@PQ"PX"P*"P"@@P,~ 2$
{0d1,
|	 D*D(D,~ h  Bh  Bh5
, BR$
{1B+M/"4bQ4DQ1B+Q	(Q
UL+N0D+QDS "
}4BZ$
~4DZ0$+Y1B+Z	(E(UU BS " BQ " BR DR,+Z0B+U"
~4Ba$
y0D1D+]+a	**A*] DRO@S " BQ " BR,"
~4Bh$
v0D1D+d+h"DRO@S""
y4Bt$
v4Dt0d+t0D1D+t0B1B+p0D	(Un+t0B1B+t BR DS " BQ "
y$
~0B1B+w+{	"Q
A"w0D+{ BR DS " BQ " BR,"
y0B1B+~+ P
	 U*ax:x,~"
v0B,~aX,~,
` R,p BR	*U*Q  R $,,p*RZ
`7"S7S,
y0B1B+	 U(P"0B1B++ $7,p,
y0B1B+1B++	(E"
y0B1B++$4B""
x1B+"@QBP	"QA!,"
x$
~4D/1D+/0B1B+/"	(D"T"*+/1B+-1B+-1D+/!$P,p,
y0D1D!&@`f+K   G@P
!"@,,~!"@GBP
+/   B@P
	"*@L!",,~!"GBP
+J5G5G5K5G P
`b,~ab@+Xd  BP
	*DT"
y 
t, P
d"@l" BP
,~"
y 
{,+\!"GBP
,~,+Q	(@T]"
~1B,
l GBP
`b@,~ab+f"
y 
q, P
d"l"@ BP
	"DUe,~"
y 
,+i!"@GBP
,~,+]nkk	 D vkk	*Q ,+Nkk!",,~+!"@,,~+	(DD""
x1B+
1B+
,~5"
x1B+1B+,~"
,3!" BBP
@@,8,>5V,ZP B6@+6@P	?`P	,3,8,>	*,V 5@@"
x P
ed +! DP
1B+@@P	."BP,~,>P	  !7@P	,~ P# B$
~0D++ P#@ad`	(@P)++F+) DP#ZP#ZP"/& F.$ D"
x0B,~,,> ,	(2=r1,^,~"
x0B,~X"XBP,"PQ"	b6,
x0B7BP	,~RBP	((C@@P@@P "PQ"	b6,
d"l  BP
!"@,<,X+\,~"
x0B+b7@.&RPX$ PBP$ .BP$".BP%,~"
x0B,~	,@*"m,PX$*
v,*|w,~*$,,p,`\$@,J++Z+,X,f+GZ4	\$@,J++Z+	***,
z$	,~	(E ,1B+,~<2:,~@,~,X,+Gl @ BPl	"T
*,~B0B1B+,m,~`fpB+,X, +G,~	(@D" ,(,~ @ DPl0B1B+0B,
wl8,.,~R@RDP+$01B+*,m,~`fpB+),"
p`b+:S:pXp	(*:4B2 BP . 0;p.Lp7Ap,~C"P."8,W<p:9<,X,4+G,~	"*Bld
	K!0X0"A(dM&&(D'}"[@O[3F=VA3F9T	"DA(S2f=bP4(?2L5h1."@+@,X5^C!pQA`@@@@B,~&"	(@@"m4Bo,>,l,^.$D,~ 
	#!"LuBP,~P	b+O3Bl8`P	"D	b5B,
wA"b $1B $1B $d
x P	b,
w	 
(`x!"M BP+6@P+2_h4"0,p`b+/(B}l"X"ky!BP+2[
	#	 E 1Q"ky BPax6@P,~!"H: BP,~"
y5B7 "b
y$
~4D0B1B1	 D
D"9,~1B7
z "b
y,~,~"
{5B7$
v1D7
{,~"
}5BC	"EB "b
} P
1Be$l$ DP
,~"
~5BJ "b
}1B7
y "b
~	"DJ0B+L$d
},~7
y " $d
},~"
v	(E S5BT "b
v/"4b=b
{,~ P
 P	b@`bl$"
}1Bl$"
~	  @[1Bl$ DP
"a"
~""&$&$d P
~1D."0D."&"XBP7BP
l,~"
z,"bQ$Z	0H=fq[5fU,
w7	"ulC",O@y
"
(0B	"U"}1B+|1B+|1B
1B+|,A4B0B+	1F++B=r,
&"0B+	(P*(.D@ DP6D@	"Ul4Bs1B+!1B-+.1B+'1B+t,
0B+,-+.1B+'1B+t,+,,4B,1B+'1B+t,
9Z5QDx,^!DPl@.P@@84B*0B.1B+<0B,( J,~`fpB+D 
R+MP0B.1B+T1B+V,m,~`fpB+T`pB+[ 
c+b,m,~`fpB+bi,m,~	 @D
l`fpB+i0"00b=1/"0" 0b-+r/"+j0"0b,
t4B10B,@ 
@,J,
Z4``xZ4	5D},
w	 *"}+af+@@@,>"4B,a+t,	+@4	+t,	+@4	+t7
 *@:0"0"(,~$$(.$h	**E
+
,0B,4B+@4	,0B,,Z+{0B1B++t,a+{+t7@,~,>@@,,^,^x,~	(U*(,V 
"
~$&+G,M$
y0D1D+
x,,<	"*A
' 
,U,~ $"
x1Bd
y,V,j,	G`x T+qZP4B0,@	 *0XBP "P@@@@"
x0B+:"
y 
af+:ZP[(B_P"(D	 DD
8,ZP,/@@P,Q@@P,~,>"
y 
`f+E$P	d[+E4DE"
x1D(B,XBP "P $P D $ DP $PQ$ D	(AI,b,^5K "P@&
x1Hl*@`jX$P"`j@Q$P$XD&,~$
x1D7
y"
y$
v0d,
w b4$ 
e4BY	"U"(Z.+^ "\+^,X+h+-,+bGJP
"
~$"d	 *U*chjlnpr+t,
w+t,
w+w+~	*U*U*k+,
w+t+~++*+t,
w+t,
w++++1++!+#	(Qt,
w "XBP,X+h+a "XBP,X+z,d "+h0B+h "XBP	*A(|,X+h+v "XBP,X+h+} "XBP,X+h+ P
`B +`j	(T
+t`j@+"
l*+0B+h "XBP,X+h	"@*
,H,~	"XBP,X+h+"XBP,X+h$PP 
AE"XBP,X+h+B"XBP,X+h+ ""XBP,X+($PPB+h0f	*P
(/+h,:++,:@U"XBP,X+7$PP2,= BP!"K8 BP,~6@	+?	b	XB	QB	@	" @ (,D(B."=hA,~ 	A& $ 	(&. F	,~ "XBP	*D(TI,X+K,d "5h0B5h5-`x+O,
<,+"QBP,~[P	5QdB,~,> $	PP 
F,>ZPZBX "P	 P*ZQ"	b6+^,^Y $P@@,b+L,^[0B5b,
<,QBP+X	$P	,Ab7@P@ZDP,~ 
	"@"
kP	f++p	b'+p1B""$b,^	  P(|(DU$ D.
~$"+"&"1+",^.&'&&	"ED.&,<
#II@Ip	(*RU&"
~$P,p,
AY(AY8AYP	5*U*/AYh
AYxAZAZAZ AZ(
AZ8	AZHAZXAZhAZpA[A[@A[PA[`A[hA[xA\A\A\ A\(A\8A\H0	5**Q@A\PA\`A\hA\pA\xA]@A]A]A](A\HA]0A]8A]@A]HHA]	5*Q"QHA]A](A\HA]0A]8A]XA]@A]HA]hA]xA^A^A^(A^ 	5"E"UQA^(A^8A^@A^HA^PA^XA^`A^hA^x@A]A]A](AA5
Q*YA]@AA(JA]A]A](A]@<A8AHAXA\P`t2``	7>wu`@8@@/T7@2H@1<

*U*Tz`t2`		7>wu	@8@@/,@2H@/,@/,@3h@1<
w,
wd
y	* 	,
wd,
w,B,
wQDPd
~dDP DP
{ DP,
w,
wDh*Dhd	d
zd
}ddd d
vd
~QDh Dha3 eX2GiSHYC 	 	"aSiSHINXINXGYC GSHiSHaSaSI'IR
IR
 IR
0IR
@IR
PIR
`	 	+IR
p[R
[R
[R
M?L@INXINXINXINXINXI2I2I20I2@I2PZ"BP	( P*	3"
,	R 
	 	<  
`b@+	D[4B	AQZXFhQBhXZ,~QFhXFhQZXZ,~ "P	* 	D,9 
 :P5j[h4Bt,@ 
 0,	D T0:P,> ,j	 
	M,^[03B+	QQN0XN0 
+	IQNhXNh,~ 
[ &!(
~2F	(	U,!,~[h4B	GZh@3B+	[QBXD+	\QFXFQFhXFh,~edX'	*T*U
	^,C"" BP,+	cG2~9',	^C"# BP,,4,B6B@@,	|  
	6	(D(	f4L	r 0  B0  B0 ",x  "%,	j ,
H T Zl8,>	"Q	o,>,v`x,tf
v+	taX,~ ,$,0
,
Q`x+	t`X+	z	" 	w "P,	J "h,	x@@@@,^,^5
_."6@."6@."7 l	 (*
,~ P
lB,~ BP
"
{ B
,	H P
`b@+
`b+
,
.+	r"
x1B	* P 
+
"+
+
,
F+
 P
ab@+	r+
,>d8,l8,^d	 
A
`Bl`Bl+
"
x0B+
,,+
 P
`b@,l[h^3B@@
	"P(*
aX+
,+
#d!"BB
Z
0" ",
 +
#5
.@Z@@@	*T"
"@
 @>,
>,0,
Q`x+
#`X+
+ "P,	y "h,
'  @@@@	*@
Q*
*+
- T Z   "GBP
+
3Z@@
.,	V?"P,
w5B
;3T-@@
1ZP	*(A

3<"
4,
(ZP<"
5,
3ZP4B
8"%1b,
FZP0B,
5 "P,
9+
< "	 DD
;BBP
_h@@	f "h,
:,~ 
 `X+
D ",	k  "%,
A 5
H	*P"P(
D  @@@@,~@,,~+)"&b
x[0QBh"&b


L,8,BPR8PBPQ"8X"P*"P""'b
T,~,
z5
a"
v	*AU
U4B
`$
{4D
`/"7`,
w2B+
Y,>C&' FQC&( FR &Z	,>,p	(*U
]+BR,^,^,p BS,
H") B
"
{5B
d"
v4B
d/"$*0D+
m	"Q*U(
f1B+
gC"($
{7@C"'4BQC"* BRC"' BRC"+ BS,
q	*

n,
u B
1FGH
,~0F,~ , 
0D1D B
,~1B,~$
x1D	"@
w,~$ ",,~`X+
"
{0B,~,@b
{,~ T	*
U
 Z"
{@1Bd
{,~d ,
= ,@@@@:x,~ZP4B
`	 TA
 P0B+7 
+6$PP	P	X",,~ZP4BX$PP@	PP  ! "PQ"	b6+( Q$X$P*$PQ$X$P*$P",bZ`P5 $BDP
,	(PA**,*+G P
ab,~,ZP4B	W[`B,
wd$	(A(A
2,8ZP,@@P,~";,*,**	(**;+G0F1F+=,.+7,JZ
,,~ /	b+T4BT .,.D
!"	"P*CGB8,.,"P,$P7@+J,"9H/",.
z/. "
Q"8	b@+S`bx,+=ab,2 "	( T,v,~ ,(L@@0SX"0*"0C.7!" B0 "b3 3 B0 "
&B06P.B0&"b5\"	b@b5 "b6 "b6 "	(Deb71P+k P"
	b@\$n@0b8 "b9 "b9 "b: "6 
	 v1PGB  " B  &    P B P BRPRB P B $P &7B	(T+
.  B.&9~`:. . `;,
+R,
 "0(B{ $,2+
	 Q*
YC aSYC S;6B+
 ;	b,
w B B@@ "0	 E


(B{Q" B " B <	b1+
+
0"0b,
w "	b
+
 <	b2	*U T*
+
 7@+
  3B+
" A"l"  B@@ <	b1,
w+
 <	b	"((
!+ +
 "Ab &0(F{5B
' 	b2+  &0Q& F <	b1,
w	*AA"
) 2B+
" 0`n +
0an
"=`n
"=
&0an
">
&
`n+
,~	*U"A

2,	aC"# BP, 
  4
<4Z
6 h,
*l
4,~C2G,
2 pbB>+
:,
<	 "
:O B,~5B
> (`
>,~"&!$(DcD,~BD+
IG,
8 p	*P
"
CbB>+
D,
H7?@ B,~,
H,
w,~""!$(DbD,~GD+
A	("
K,?, 0`B+
Q h B h B h B"@$A1DOQ$ DQ	 
TZ1DO6B D"A0B+
j@@7 7B 4B
^  Bx.B5>	"U*P
\,,
g5
b7@+
j,
\,
g,
b 
Z.B5>
\,~ 0`B,~`x,
e	(E
@

e5 "h,3 "P5
f7B,~,
g 5
h 0`B5`X@5
k A @ 	"@@
m,  Z
` /& P
`@,C_h  ,dX ,l@,5
lOPEN	  
v  &Px,>
w+
""
P"PDhP||H,>
|+P:P	"D

~2P|G,>
+,>
+
+P,>
+
$P,>
+6	(P@

|+.
|+readoutput
writeinput

|	U,>
|+`,h+
||.,>	,
+:pH@6$PHo,>
|+,>
+(@PP	GTLOGH |{,>
U*{,>
#l,$dq@@
K@
x,Q5GP	,"
|+,>
+,>
|+
Pdensity4Pparit	"T&d\tuPM?V@[>$V@a$:dh	 
KwYdeF@e|Rg'TV@gRM94m:7\hCC[RI'Xz	Jg4PgVZ:	 
yRY&tYKZ-`	]gPk:]k{\C;0gMG?Y[@S:&\z	"TN	 AME=PROTECTION=DIRECTORY=LIMIT=MODE=FILE SIZE=RECORD SIZE=	 DISPOSE=VERSION=REELS=MOUNT=PARITYDENSITY=BLANK=CARRIAGE CONTRO	 L=FORM=LABELS=PADCHAR=RECTYPE=STATUS=TAPE MODE=B
P.$h	 @ .Py/|:,>
|+RELEASECLOSE,>
8
$86$8STATUS:	 (DISPOSE:8&8SAVESCRATCH@,>
+
$|9,>.+@+	"@1@|H0$H < 0 	 9$ $ H $D0+ \-.x,>
|+&(0(0:0"@B|
t,>B+	R:uR$R$R*(R*(R+#PFjY?"*ZY{	D"*ZY~*Zez
<
3
8!
>1
:)+t<Rtb;`Ru		@:[rw%t@PjR2|wR2|e:PDp	PUCv PE*PO	 Pfkc@Pfl<UD8Ja^P
REqK|REqZREq~JSGl	D"P$(HX|y1HX|y3HX}0HY	KHYHHYUV{J3HotJ3K
Q	D"J3W
`J3W
YJ3W
TJ4bZJ4KQJ4EMJ4ENJ4SHJ47	D"J4"GJ49hJ49%pJ4;\aJ6#
J6#
z!9TY!9[TJ:SU	"JRw_RK15SJ~O_w#%wK*d#/K	Ty
+K	Ty
-K	T}
#	D"K	U
##E@zKp*
FK	tK	z
K_	aKM
K

K	[	D"KH(K {vK {gK!Y
;K!Y
<K!d
.	D"K!K!
J
 K!
y
DK!
>K!	K!K!-=
K!-D
K!-I
	"K!:;RK!CMK!L	r@>K!lC5K/MODL#x5-L#y"L#y|
	D MP
qMP
mMZ
HOFy
PlCP	>uP	D@P	WF	P	WGP"hP	pOP"h Rm|4fRm~~xP	P	&hRn:r	Rn<  P	;H`	B)
2PaXc_9J
g_k%l_k%o_k*jcZ
F	D"
_3
B_1
DdZ-pd\Ise\IuPYxd*=+PY|d9	`	9Gg	`9h.	`9m"	#9q		`eFj5^%8^57`r:eOt<	DeY|
aH<9aH<9		D"aH<:aH<GaHBaHG|aHQ!aHg5aHg@aHhM|aHhO	D"aHv;~aHvDk6 
3aI|'aI!.aI%aI%	D"aI%%aI%%aI%0aI%[aI%g<aI'aI(5taI(Ct&O		@ lY
afF~,P'1al&N
uP7x%c?4ts8*P?[Pst?	P@.@Re/LRe4tReH;ReNReZ4Re\je!\E	Ie!\E	Q	D"e!b	GJ3	w1EXe'=I^e9xf
Lf
Lf
Merf
Meq	D"f
Mumf
^=.f
_a)f
_k(f
a)/fywECf	D"f	RhKwRhURh~JRh	&Rh	|Rh	SRh	#8Rh	)
Rh	,	D"C}gi&f,giM4
gimVtgirtgj	[qe8
gxw
go=		wRir|J P	
(Ris2Ris2
Ris2
Ris6=RisCRisb)@	"P	kP	a	c.;4
yc.N
sc.N#Cc.R.zc.T4c.jB
}c//c/	g
rc/

!
F
*
K
M4c/SRc/#L:c/$g
}c/$k)c/%>PDlR!.p	R!=R!i{xR!lwR!xyR!x|xR"I0R"LR">xR~||.	R<^3RB4RFxSRVP	KxcPb3zs
4zt
6!i{
2	PcP
.j]P
.jfSQb)P
.oSSSG@P
.qwP
.r	SSV P
.yP
.~RS]&SfZ`@SyxHL:	`6Hi"=tV	  jP
CB
P +x
!hSzSWH>s?4?9?fCp	S9{* S:xS:Y@P @[SwS(S(H~S(NS(ox	"S*|S*QxSmN.eH\
#eqP [hP [|P
(P
	D"Aeil;
blY
el_
e`
y.zc5oR#*Q`
yXTo(Ty"	`	D".a+a.b	2
1Z*D1["1[(Q?1[(QA1[(W=1ohOS?,\n	#{:	`P
I`
kGcfY{$cfh:`
wCP%[
"Pe .#P%c#	DP%u
@x8Hj]Q}k^\'_
(P&&)&(/
KPS_Y@_*b
t	_.i0
Q_?\z	`+P~QS`'oS`'p_x BS_x+k_x:.	`2_x:B	`1	_x:V	`1S_yOP&5&#P
Wtb
GEb
GM2J	P+BjPP
Gm%
AqP,.P,;	P,xP	T:QPT:Q]T:QaVT:Q|4T=?eI|A
K"P.?Ay"#A#^	D Bx	DBxy%	6Bxy%	8Bxy2	9TCe8n@TCeG?xTCf3	CX3	`	D4
	D"D>tDU[DWyCx%`EY7hCyWEoeWR[Z
8oq9P	D"/R
^qY1
jy-({Uv4Uv;Y/tEY1n!YE-kYG$?	D"~,
0*	+.YR^7gYT2k	A(HDP0!2i?ueqP17
$	"P:.$P1?%@wgbl)?!0l)?!:l)?/.To^8jTo^?FTo^@B	To^@D
PK{*To^Kx
To^LJTo^TTo^YFTo^ZTo^lbTo_[	To_#
To*	To|To#2PK}\To1+}r23~eT;@2(!2(r3`p2+#r3!l(THuK	D"THxGr6rr83G	TUSr:]\r:]]r:]]r:]^TUQ	Dr:a)T`f\2HXTrJN}rKW
rKXuCrKYprKdrKe	D"rKi|rKjADrKjJ4rKkNrKl`rKrrKwU
O	"rL;}TrL!MrL(<OrL/CrL1OrL6I:rLBBrLG2PrLG[D"2|2~1U'E2U'E72rT;lrUje
rUlb*rUlc	D"rUm%+rUm%-2wrV1B	2U.@~P2&$r_l<%r_s_#	D"r`;0r`2&r`B+r`J(r`0/PX7tt6tGX/1tGcw3	D"tHabtH"#tH*4VtH.+tH;78tHGMtHOo>tl`urtmJn	D tmJptmP(htmP(ltmQ#ju^
"u^v
&			

P7MJ^	`2P$*xBxKtxQyw	@y"/ [S5P&TU
6DgU
7?P4
&k|
&nA	D"
&y 
'L!g
'L!i
'L"k
'LDfP4".MOScNB[gH	"lXJU;L7@5$n
5,B
57|
UBUQ@5Ef
6g~vh
	D"6e
 6
w 
%(MC6
&+Z	`@U3?	`&	c1
"	"7.1
'P)9k(35(;5(AG*0{5Z-Q9<	DM:>t	;:>t	=:>t5;B
dMPF
a	D"MP"	|MP$PMPZ-MMPbNbMPb|BMPs0:MQHPP8.,	`
	{UVq\JUVr<UVr!_UVr92UVrGJP:+V?[f7VA%*1	D"	bPj7X+U*<:"*=cx?X/7*GX/u4CX3P[L:#(T	D";NXA$?P.*SXJGsTXM+VXM"[XN$s]XY	YZZ[c)IGT=lBJ=lEPc*9(VP;s	cE4:	`6UfzUfsUkZNUkmUk
GUkLjl
Vl
V	Ulr9UlrVUlrBKUlY8moV:	`'eo&[zdpo#E[jP<
	e?Uq_'k@Uq_UbUq_[ZUq`\ qQ;t Ur-+|Ur-LO@	D `>Xr`>t
/`?6c
nfm

P=Qxup[BP=`wP/PbKD+&+PAa&PAw"F.D
F.F
	P4?LA$5C S-(f
VS.[gH4/QVS.[`
fvc-)W)|PNy	PNzWPC?2
<?%v	@g?RRJ1g?ST P5*PLe
W?yl

@!<[Puj@.k&@.x.	D"@6lk
g@6|v0@7Z`T@
0g@t[]
4@vZ
HPLoxWAt?	"WAH
WAa	gAU
_gA^{>
tgA^{S
LgA_0
mAj9
2gB'2
uP0[	D"WB(o*gB,7[
igB,9p
gB~*B
BgB"T`
L'
wWCx .
P	Pvh
	@ D|
LD1gP`
PM!;PYc Fo8lgF
o?	"G&~WGM.
gGNt@GgUQGh2	"WH7MPM:*`t2*1Px` g
BgJX-
3gJX-
gJX.>gJX.xgJ3,
e` $?	@J4HQJ5C]WJ~6@+WJ2+gJC^6J#{J'(ZKP +gJ(#$
a	D P"s	"G""6bP"}
gK$hc
XWM!4?WDo"WEb	WrIDWrNzWrYxWr[	W<?WW<EW<dbW<urW=xW=W=+W=3W=7		W=kW=!W=00W=<W>IjW>LSW>^HW?.Wi:	WuM
WuMW(gkW(gmW(gnW(gn`r%H^Wh		W.J+WTTW~OWEWoWW#BkW$W$%WL@	WLMWpOVWpWTWpYxWqWqWqWq[Wq$*	Wq7[W#WjWjWWW"=W4W5)WN)H@>Xr|
EH@>Xr|
;H|CEz~@ 0H|CEz~@ (H|CEz~@ H|CEz~@`H|CEz~@XH|CEz~@@HAA.F'~@0HAA.F'~@(HAA.F'~@HAA.F'~@HAA.F'~@HAA.F'~@pHAA.F'~@hHAA.F'~@8HAA.F'~@HAA.F'~@HAA.F'~@xHAA.F'~@pHAA.F'~@hHAA.F'~@`HAA.F'~@X((DS w> S
&+zS_<F@\;/|O/}G20K8CAwC0
H Ad	 D(ES8p,,t ,+/_W!`,,t , +,eR`,,!,+/oR`,	*EQ
, 
V+,]2I`,,	 ,+/]2y`,
,	C,0+,I`, B, ,l " BP
 ZW,A,a X+LK:`,,C"X B, ,l	 U
U* "$ BP
 ZW,? X+L[R~@,,C"Y B, ,W5_@@ Z*"	*@
""Z4B*C%p0B1B+'0B1B+'+)Zp `fp p D$[ D	*(U(**|"6B@@,~C"[ B,8, ,+;C"\ B-,82B]+37B+5	"""3l8@, ,+;,6,^  B  B,~, ,W6@l,^,~	(DQ*;F
al+Z`l,Fal+"_7@P	5BA+C`l+>,I+Zb P
	 U@(Dab*,F5A,cg P
`b*5F!"
GBP
 $dhdh P3"i	 D
L."&" BP "bi P
`b+U "bj,+ERPX$&j j	b6	(ET U,k "bl,~^2$m0d1+Y,~,6,m ZW P
"iad0B+^	*"U*] n+L`d, P
`d+oaD ,a X6D3Dp q6@ q+L@@W	 f P
`B `b+h,K h6Dh B@@h@@h@@h,~@
6Z+, ",	"T(n  Zl "%,n 4 Th "br "br+,"Z5B2|s+|,>.s	"""w "bZ,^2|t+|,>.t "bZ,^2|u+,>.u "bZ,^	"@@ "bZ2|v,~ ",>.<bZ,^2|v,~,>.< "bZ,^,~	*U ("Z5Bt+|"Z5B2|s+,> ".<bZ,^+"Z5B
 "bZ	*

2|s+,>.< "bZ,^2|t+,>.< "bZ,^2|u+,>	 E*.< "bZ,^+"Z5B2|s+,>.< "bZ,^+ 5Z,	"!`l+0,> "%,p  ",# ZLP
 xQBh6B Bh6B Bh "	"**`lbw,,^ Z
 ,1 h P
 Bd~n BP
,~,6,w  Bh	(@ 2  Bh  Bh,~? P+7P,~ "GBP
 ",~ P
`B7x"P	"D";,~,O=V6@P
`@+C,,K,+=l`	 @C,~G@P
;@P,>P,~/PZP@,P BP(BP.P&FP/& ,~.P	 @@LZP/P,."/&$&Q"A`Q$A`,~.& .&&& "$&.",>,%	  "],^."Q"A` ,~@,<:P,~dx@+oO@P
7@P,F:h"r,
s	 e[h P
aD^B2 P BP P/P BP BP P
dl  @P
5Ba` ,~	"(n@@P,y,~ P BP P BP "BBP
,~@u@x@x@x@E P
d  	 @"v @P
a`, P BP P
`b ,~,
P#PP"i0B+=.	*D
,,+~+4R~ "0 a@+	 @P
.,/.20R+	=.,,	*(U++12+
R<05p+4R
1R+1r12	*(U+=0R
"r0B+
+

P#=.,,++4R1R+	 U 1r12+==p40+
P#FP6@P
P# P
``2DP,~+?	&*!,P P
`` ,~=.+	*),,+',~,~ P
``+
P#,>,>:P	$"@ BPRPX$ z	"A 2	b6,6,^,^
P# P
`` :x,~$r1DaB +; z &PP	d6	( A :,{!  `B G@P
`B `BD,{,~ P,| h/",| Q"A` BP7"	 C@ BP BP,~ P6`P/P."&".BP$" P/$ DP@@P,~ P
	"P*Ka@,n"r,
Q:hPBPPBP@@P@@PT,>,>7Z+e,>U@@V h.}5>Q"A` Bx,.,Q0B, "$}	" P\1D,<x4B,<+],K!"GBP
/},^V,^,^,~ ",< "	(AAe5<7T+l P
a`@+l,>,Q0B,K P
a`,,^,^,^
&	  @"m
&,~ P
a@@+q6@P/P2"P+v P,s+v	 
QvBP6DPdz1P+	 P
d  @P
d@@	(D*~+ ",< ",<!"GBP
+l  @P
7@P ",<,<,! P	 /bP P BP,~, P/dP P4D~Q"Q` BP  @"1BG@P
0"0b	"AP  "[
Z
 P
eh+1B/$4d,=d "eh,>PdH@l(	  HP
,~! G@P
," BP/P"BP&m4D5L:PbP!&p.Pif/			 FP,~7@P	
,
P$P4F1<.7B=f/	 1
P$ P
``,9 P/"8 P
``2bP BP,~,8+/ P
``+,A	 ":
P$:P	$"@ BPRPX$ z	b6,{
P$5Q"A`BPBP7d@d	(B4DD&F=dC  BP BP
`@+Q P/P.",~ P/P."6@P
S,~5bU " P
`@ +b/" P/$ DP4$`&"&	0f+] |XP	 \.$ DP,~ Pd&pn.& FP,~  G@P
,~,BP9>P(d,K P/P3"P+jBP3BP0f+y |XP.$ DP,~ Pd&pn.& FP,~H:,	 
~bdfhj:h
P#7RP!,y@5f,J4F	*U 4r5n,+5p
,'4p $0d8 $80d@ $@0dH $H4D!(0X(	 ."*(.,/./0/2/&+@@1f+!(X(."*(,J5F	((,0
P# P
a` ,~``,	,y P
`` +, P
`` ++!  	 
 G@P
,~ P
a`+&,<,~4B?$	0D,	 0= 0+& P
a`	*QA(+/,c,<,	O$	1D+.0D,	 0/05? 0,~ P
a`	*U@(1+640$,<,	=02$	1D+	0D,	,~7@P
a` ,,~<.:., 05':h
P#P@+! 	 (BG@P
 P
``,:h
P$ P
``,J7PPW5nM,) P
``	* J,g, P
``,b,r4pV=$0d8 $82d 4DS!(X(0.,*(0	 (Q S/0/./&4fG."+H,J5FV7@P
``,l	 Q[
P$ P/"8 P
``2bP BP,~6@P
!"+c6@Ps	(@(d.L,~ P
@@,~6@Pl+r7D,k "0/"XB.
."Q"@@5s,P	*A" u,+s, $PP &
`b,y,~,	$PP,&,-C,	9
@@0	",~,I P&"0D,k P
``,! P
a`,R$..NPQ,`5.,	 "T P P
``,! P
a`,R.NP5 P
``+	  @."&"$" $$ DP,!Q,`$.+ P
``."$" BP,!.NP	 
P#
P$,~ 
)L|2lP LP PZ0D0*b#4"&,1[
)L,. P	"(0D+,/$ P0$+,_/ DPLA.?..=
7!$ P
`@ GD	" 0,~,> P."?(B|1"0+KRPX$ &0 j	b6,{RPX$ & P	 9[(H/(Q(@@
 j	b6,{ PXL,~ P6&,~RPX$ &	(@A j	b6,{$&@2fP FPRPX$ & P[(H/(Q(@@
 j	b6	(
J,{,~ P[(D@@!&X&*&?XL,~, 
P LP,>*lP,~	 @DR P
a@ +Y:P	$"@ BP
P$ PX$ z	b6,;
P$,~:P	$"@ BP	 ([
P# PX$ z	b6,;
P#,~6"0b,~C$`X
g D0 @
, 	(*U*cg P
`b, ,
k5h						
	Y	
@o@	*U"l@@'@2@8@.@B " Bh@@P	!  B@P
"	+u1B+{1B	(Qt+},~ P
ab@+,4@@P	 PX$
 	 j	b6,{,~ P
`b@,a	 *},~ P
ab@+,a $5O, 
(BG	+@5
	" 
(BG	 $@ P+@+	,~ P	b+
4B
7	 ",	 
(B	(D(G	+@ 
,,k,~,w"r0B1B+,~7`P	,~ h<bn Bh	(DQ"i1B+@1B+C0B1B+6@P
a` +#,.	  7@P	,~ P" $.Z
P# P# $+* 
P"Z0$.Z
P#$	&$/$#	"(
' P#,i.&=$* $/,,i nd$X$0 DP# FP#,~>P	,a"r1B	(0+60B,~ $,O"i0B7`P	,~ $,O+; PX$7fP	,~ j	"@@8	b6,{"i1B,~ PX$ z	b6,{ P"Z.BP#@@P#,~7BP	,~	"A>P	$r0D+M5 P
`` 5. 
P"Z0 083NP#+J 
P#P#B
0I+M,s+K,~ F
``5.P#&",B P
``5. P# B
P"	ZZ008ZP/
P"0N @
cXBP#,~#1b8+f.+`.
XLP#B0&8+q"n1b	"k1"+m,~.&=$i=
i:0,0000,s+h $,~ P	<b=	""@(t BP	,w .Z
P# P#,~$r0D+|,,> 2 $,O=rz,^+}	*@|,,!"GBP" PX$ZP" j	b6,{ P"Z.BP#@@P#,~ PX$	" & j	b6,{,~@@P#U"`ABP# PX$
`z	b6,{@ZP"@$Z	"@B@P
"	+1B+1B+,~7@P,~5a7@P+$,a $+O	 P(E P
ab@+$, PX$
 	 j	b6,{,~, 
(BG	+@5r0B,~ " Bh@@P	 P
`` @,W P
``@5.,,.5
 / $,O`B,~ $5O:P,Y"r0B1B+6,~,a!  G@P
:P		"D
 8,~, "i1B+< P
``+>+a:P	.&"r0B+L PX$ j	  @	b6,,~"r0B,~ " Bh@@P	 P
a`@+G,8+K P
`b+K	(T""I,5$,O5 j	b6,	 $	(A"@Q j	h6,	,~ P BN 		b%,	6@P:x,~ PX$	 z	b6,A	 Z!"PBP!* P
``@!*@d !@ @P
,>,,^,+R,~ P
`b@,	 DP b PX$ z	b6,Y PX$	 z	b6,d 	 BP@@P 	B@P
!*,^	"A* k!*,_+`,~M&tC@,,tC"	 Ba@
,8, ,F  Bh P
	"(s``+v.&&&+w``.&(F|.&RPX$
 j	b6,{5hS>f=7@W	(A*|+	, W h p7E',~$	0d@,	+~.<cB	+*X,		(@Q
/},~$[ & P
`` @9K7@W+	, W h+
/}@b	"U(D(X.t5>X ~`fp+Z"+^5b7@X " B~	 @.< p `fp ^B^/< P
a`+`B+&,>.< ,^	 @" paf~5B& p,>.<$[,^ 
 ~ P
``(/(//t.<5K	 
D&@@C<p \x x p `f~+04B0$[ $"." & P
`` ,	*"U"/,K9( .B>`~+(/t,~O@X+4@@X.t5> )`fp+8Z"	(P
7+8^5b:7@X " B~@@@C<p \x x p 5`f~+G4BG`fp	  @ $,>.<$[,^$..p & P
`` C,K.<+=:>`~	*"@H+</t,~,z*X,~*X,~ ^X 	@@ P
d @a@ [ @P
d""@Q,*X5e7D,~Q0D0$,~Z+S DECODEgB'[`X	 5XENCODE6=.ZWRITEREAD}|l,>]+8Pformattedunfor	 U  amatted_`|,>c+edirectsequentialde0P#0P$?~ = i:PPx,>k+<P|,>]+@Nd{@@A o+L@`M!a`q q`M/A`q	 r"
P.$hg_ W(woP,>]+,>]+	"z,>]+,>]+@h:P!$ D+F<P<P,>]+6$	"	 0=0 `,>]+REWINDUNLOADBACKSPACEBACK FILEENDFILESKIP 	  	RECORDSKIP FILE
$P@,>]+
,>]+ <P#@,>]+	*U*	N,>]+` FIND,^,~6@@@@4@
@@3?(@	,>]+|X	D"$3G$4$9Z$9[$G	$G$Lb
#@A$kW	D%2
#O/dshRtb;`ue"o`*ob)Ru	od'	D:i
;4#Pj?RLN+qji,\.A>nJ~K	@"	D"PO7
q*7
vC7
}@7~PDP
	DREqZ?"(SAFP$(iTSHY
K\WK\$KK 
oK!R4aLg\;dENnCIf)	"f*ROSZROT
wPVHTA8QP	D@P	Jf~P	WF	P	WGP	W]P	WbP"hP	pOP"h P		[ P	WP		P	&hRn:rRn<  RnR@RnnfP	;H`	B)eu=PaXc	D"N
b01b02
wdIA@?EPY|9q		`Ra{.	"Ra{LORa{f=Ra|)kObl2xP7x%[riPst?	D"d/@s{Hvs|dbc.EAdc.S\yc.TCEc.l[{	D"c.l	c.m	c.mXnc/
F	c/4	c/"~^c/$n|c/%1xc/+	l	D"c/73	c/8?	x#*N;	?A4{l1m8	?g34	@832:a%=	D"3I<3OG|nd3>}},I?	C4eC}P?GP	C9#	D }
Fw_}Vt@c	E;G_}\;PDlEe]ab7~DlRB4	"RVgKP	Kxcf)e.F/$VK	WJvPSfZMPnB	D"HL:	`6g
 S	 A

&+m
&w
&(#
dJ	`2n	"P
CB
SWHt?qHv?r+
I(S9{* S:Y@P @[	"
iIP [hP [|(TV(T
K'
NuvY.]GC}.a,K+
b7R	D"":,.bBv1E?&MVve$Vv%@!P%[
"Pe .#P%c#%js	P%u
@S]SGS]TS]&YZS]&Y[S]|g	S]|gS]!DS]!W	"S]!#2S]!7Iz#x9>xEE~xE~] 5!]60]E'	D"&i)]huG.&I,&5&&5/&66&69^qL:v	P&5&#P
VDP
WtP
]
i\nP
x
Ia*Pn%P
/&	@ 
cb`

W<"QNjT%
>cP,.(H'?=T*79P
DPE;,->x!T8a-@T8al;H XP#FG0	T8b)I1T:QK*T:QK/T:QPT:Q]=HjtCP.?ACL'ACR	@"APkAUG2TAMAggA%<oA,LBA,R8A9KDlEz	DDO<}DcKD`BND	`%TDx@.5A@\;D"@	D"D(?J@md@S;3kD/Qm@/|O
/}GX(A		D"9R-0CUE?qYT)4dYT7^YT=YU
h9YU!H0#{	D"P0!2
xBv0*\W}Fz]#!%k?os@p5p5bp6lpEg1{I82#l	D r29nr8.lr9K	r9n
2x
P2&$PX6DPX7tPX=	@XGuLXbINPXsxPYB
&	D25ESvu#ubjWs

P7M	 _.[S5	p[n
,OtsP4.@%Ii	@"1(14{jBw5KJ 5'Co7I|01tBO8~x8~y:V:>	D:V:?:XdjF=PBQPE7
	D"x3lMP6MPbBcBVP4e]Q	EK9GQ	jLKQ!<	D"!QR1mG3e928e(9H&9I(9O0	D"QqndxR(Y`Bb
XpcGpdpiZpi[pw	
pw
p|b	DqW	q32ZZ[	@"cE4:	`6e{@
gLG
OvOvG\=@%gy(/;	D"5TpbE	O(~:=nl$P=Qx]u=^I=^LA	@"^XQ>%HTIP=`w&9('(GH$VQ';GW=eeG(QS	D"HfV(4Z-YIbQ@=}[!)!)PbK
g@!<kPujg@.kQ@6|vg@7Zg`T@	@ g@t[],g@vZWAt?;(KWAa	`o^oAY2TL}eP0[	"gB'[XgB,7[gB.g
BatHJgB~*B\B~VeJ`
L'kCw.n;WCx .
	@CxG>9CxG?5P`M!dqgFo8bgF
o[.x!P?gFV~BU`M/A`M/Dq	D"WGM.
GM'?<GNt@gGgUQ+2KGkGrKGsjwRWH7M`t2c	D"gH4/Qs`t7MgH@I5"OnBM` gmgJX-OgJX-gJX.	D"gJX.JJ3,h $? gJ4HqgJ5C3MN(LgJC^EJLnL hBT	D"gJ'(ZjgJ(#$5`"6`"6b7K$hcWWM!4?W<>fW<dMW<~E
	W=W=3W=7	W=!V
W=![W=0-W=00W=:
W&h	@W&ug\+RPoWim2WL@WM0.WpOJWpOLWphJWphLWq1<Wq:WqEKWqPWjWjW"=H x`@((	y B'[0(O[H @*L	  	*TA(6 0
@4&4)'(@	"U*U(&(4%''''''''''4%	 
U,*4*,+,+,,,,$-,-,.	"U ,.$/4/,04041$1,2	 
U
" , B  D  B,d B5B,,8 1B++,F 	"Q(**5  C5F #p,# B"I p$ D,d4B2,6,f5B>,8	*T 3  C,~ #p B,d4B  E5*@@ $" B	.""2S2H	 U"E*;,X2 B,2J,2,2J R "H B Q"A` B B,H   D	"Q(U"D,~@@	 J*"
 " B	C"
 B,~,D7`	+X,8,u , L7@4	*D*U*L+=,Z 4`p,lap+T6@
,K6@,lC"
 B 	$B
 LZ4	(D(U4PIZ@4BI,+I,~,l,x+ ,~0L,~ 0D1D+^0D	"E((],~C" B@
7@	5l,8,u ,1l
1,5l,}+_ &"C"	*@(U*f B  6B3D,~ B+g "7@
 B
7`
,L6B+o6@
,L	"U*U n,~@@7"
,Mb 
dbd b,25D0b0/"1"	 "Qw "/",~,2J5 " B
,~@@
C"
 B,~ $"."7x C,~	*6B,l,>7B
 """S",2,H,^3D+y "H.$XBZD,~	((A",80B'1B-+
+= B
5l"`	,~,80B)1B(+ B ") B
5l	*U
*7b
,N,>`> 	=b"".B
,l,^,2,~@@
,>? 	+	"T*T0B+? 	+0B+:
:
+ B,l,^,2,~,80B&	"EU/!1B)+# B,~,u B
,~@,l@4l@<l}x{@D@H	7*}>*@P@\@`@h@p@x@@
y@@@$l@,l@0@<
@D@Lj@P82@\`g?Q1`585@"T``66`H`6@7gBw`7>7@ t@&L`
g`= =gBi8a`= >gBoO`>(>=gBi8a`>8?@\E`	<`?8@@\EgBtP`@:A@\E?`	<`A(B>gBi8a`B(B9`0`B(CA`	<`C(CC`	<`C	?E*D@\E@\E@\E,~@@@@@@@@@@ P
d"O1Bl DP
+."	*E(U"L B,[7@,~6@	*U*Q
U@@@@@@,[+N,P@@	**Q
],>_" B  B:,[7@+e Z4DeC$ D,^,^	*U
U*f+[7C+~ B" 
ab+B6`+l"PBO@7@
a@+uZ,+x,~,>6@	(U*U*w `b,
7B+}.B+[^
!`
+y6B?`	 P*,~." B+[Z[,:+[  P
a@ [Z5 
=	"A5 
=5,+, P
`@,~0B1B+0B+,~  @	 T @G@P
,~7@:x,~"  B@P
1B-G@P
,~:$	(A,=d,~7"P@ C
	 !1B(G@P
,~05P&"5b "5$,$1P"$.5b% "5(	**A"*,&$.5b) "5+:$4D2 0B+1<d2`,=d/	"U(E"2,~:$+5:$ ,B=d6,~6B+<? 	,~4B9	  
;0b0/",~@@,~,Q,R P
``@,~,5BB! @G@P
@@
 B
 @PCa@0D+H $(/(Q(!H
@,D 	!D""I.p
x,>K+,>K+,>K+,>K+Dh,>K+,>K+"Rx,>R+	D `$9Z$`$9["z,r5%[*Ru	N)^FH<r5[*	"R2|e:PE*NrHX{+Lnb/L}o2L}s[%Mi<F
McNF}	P!bP	W]P	WbP"h P	P$1RnR@
ldNf	D"R\|c@\\Hu\|vAy\|vFx\]mH/%Z#d\r6[+	D"aT+F}aT1['w-wU}3e2s[&P}@0Rg5@0Rh3U@(Rh4%k(	D"c.;Lc.MPc.k0Nc.kNOc.l Qc.mMc/+	S	2lr6
}	;}
e	O3Z	UP/	W%N	D"_E~`;f	W^Qlv[	WJ_P	~@
|r7 [,P
CB
	D"%%%*%-%3%>	%H
S%X
%\	D"&+&bc&fe'.']
'l	'v	(;
yl	D"w6F8W>=F6OD
5IP 4D	D"
5>obvHuQfuYd
_IgP [hP [|(Tr(T6UB	D"(UjE
O
r7"[,m(
a[F2.a#n
b9#
b92
";	D""W"=1LT8#uF@}4er8#{[-sH4$@5$GE6	@"$5G`
5k,r8%u[-SZNg@@]Q<FXy
]	D")4YF)4[',.~l	D"02Y5=KF,Y8
rEYM%<94TYT19H*]O	@@
r91Q[.

-)F{-/[(r:	@"s3K[/[S5
=2*
0<VQ1\,r:5E[/+h	"5U5q@ )T]X*<r;7?[0;rYFx;r[(;wW7;w/	D"KYTKQF+
xLr;yIw
M9I99[0P0?u	D"UQ@Q[W3Q[[[%T\1@FT],r4[)9}h3;I	D"Tou@2Me/O-9q>`pi[%XYYZ	D"Zc*2#;-FF\r<;3[1Ulr9UlrA;Ulro6	D"/"hX}}v}	2k42o[)PbK
L'R`
g`
g=gCw.ngCxG>
gCxG?6`D`fO`BgGkGr3gGsjw-`t26gH4/QDgID;gID;;`nB*gJX.PMN.gJC^/` hB,((S (J#mWQAUA^A^{>A^{SA0B'2B':Jq~k0(JH A	*U*U*,a,f,k,o,u,x,|,,,
,,,,$,+,2,6	*U*U*,9,?,D,L,O,S,Y,^,b,g,l,r,x,~,,	,	*U*U*,,,,$,),1,7,>,F,L,Q,V,\,`,e,i,o	*U*U*,v,|,,,,	,,,,!,',,,1,5,9,=,A	*U*U*",F,K,O,T,W,[,_,b,h,m,q,w,{,,,,
	((*,M?\G,^,P,^,^4B0 $$,^/$=b.,SO@# :2b+A	 Q*U(3 C,x,6 B 
+6,M,f7@#+8,3,e !,R ", 0	"
U;`B+@`B@+A`B+`B,	*

D.5>*$x,> $ ",,^/!"xX"(*"/ C" B!<(*<	*E*U(L+,^,P,^,S@@#+,^ ^0 >(*>/ 0+,^@@ xh"	"*Uib,^,^7@ B< B"+,^ "xQ"(.5>*"x,> $,>$	*E(U(]=$]+,^!$|,^$*d_,^/!"xX"(*"/fGX.+,f@B	 *E"f,~ .0Q.A`  B "; B "$ B$"1B,` B!,L4Bx0B	(D*n+w@0"0b+s$$.$h+o D"!$w[{0B*dt5$mZ{,	*P
U*w+m,^+m !0B-,~ ".5^$\|$
I	D,T	*U*d5$BL#",Lv41TE7 "5^,`5",> ",^,^	 Q# &+,`0"5^,> "/,^,^." 5^,` 4D@)B	"P" .",^+,`,>[, ",^,^ "5,`4B,>1"7	"( ",^,^#+6@"+,` &)Bn(D'"4B!,>,,^ "	*P!5^Z"5,`."&"&"2,>,* ",^,^&".",^ "5^	"D*&"4B0,>,* ",^,^&$ ",^ "5^&$ "0B,^ "	*U25^ ",I O@"56,,`C",>Z,[5F,>,W,^,	*U( ;7@"+ ",I 0,W ",I,^`b+B, "5^,>[,	"A Q C ",^,^,^Z+@
 x 
.5>@@x,64LM2$x2d+I	"((L Dx+I7Lx7
77 /, /,
6@"5>/,~,`	("T4B,> ",^,^&"4BY,>,W,^4DT "0b."0b-/"1B	"T @] "+^:#> B,~:$ ,~,6?g:@Internal FOROTS error at 	"e$P  $, , , ,6$K($A error at $1L,6?S:HINQUIRE no	 nt implemented,6?ShFOROTS internal error in memory management,6?	 v[(Memory full  $, , ,6%CC$A at $1L,6?M@FOROP func	 tion code exceeds range  $, , ,6i&hCPU time $Y   Elapsed time $Y	(D  $, , , ,6g5$D$3T$A$A  $, ,6%G2CLOSE unit $D: 	 @arguments ignored because unit is not open,6[epAttempted RENAME to $F	(A"  $, , g, , ,6$]h$A unit $D	$F at $1L  $, ,6$	  @!IO Error in dialog string  $, , ,6?GCan't create page $O (PAG	  )E. error $O)  $, , ,6?GCan't destroy page $O (PAGE. error $O)	 T2,[KEnter correct file specs  $, 6,2[cV($A  $, 	(D:,7?x$kR(Unexpected TAPOP error $O  $, ,:?x&k6(Unexpected MTCH	  CR error $O  $, , ,@?x2kRxUnexpected TAPOP. error $O trying to set	"K $A,F?~K>0End of file,L?\E
0Bad format binary file  $, 	(T,O?|e;Record $D has not been written  $, ,T?SJpIllegal re	  \cord number $D  $, v,Z?CtG3CLOSE failed  $, ,_?CtI`Can't	  e delete file: $E  $, ,c?Cte:hCan't rename file: $E,h?HM	 @mFile to RENAME is not on DISK or DECTAPE,l?H MFile to RENAME to is not 	 von DISK or DECTAPE,r%HJIODISPOSE='SAVE' assumed - device is not disk  $	"~, ,x%HLGF0Can't queue file, QUEUE. error $O,?c`eKRandom IO requi	 res /RECORDSIZE,?c`eIRandom IO requires RECORDSIZE specifier in OPEN st	 @Datement,	?cd]Too many open units  $, P,?cj]N No such device 	""$S  $, ,?cpS/ACCESS:$Z illegal for this device  $, ,?cr	  Sh/MODE:$Z illegal for this device  $, ,?ct_BpCan't OPEN file: $E	()  $, , , , ,%?gtSO8Incompatible attributes /$Z$Z /$Z$Z,+	 1?hg:hNo filespec information allowed for SCRATCH files,1%h.ENHBLOCKSIZE 	 :ignored: device is not a magnetic tape  $, ,7?h8gxSame device open on 	 Bunit $D with conflicting specifiers  $, , ,??tvGHCan't do $A I/O	  K to $A file  $, ,H?^SVpIllegal unit number $D,M?tleREREA	 @SD not proceeded by READ  $, , , ,Q?SbKO0$A keyword value /$Z$Z	(@D\  $, ,X?SbkO8Unknown switch /$S  $, ,]?SbCO8Ambiguous switc	 @dh /$S,a?X*IR`Dialog string too long  $, ,e%X:k>Unknown OP	 mEN keyword $D, ignored  $, ,j%X<]X$Z in CLOSE is meaningless - ignore	"ud,p%X>e: No filename specified-- DISPOSE='RENAME' ignored,v?X@]H	  ~No device specified with ":",|?XBSCIllegal PPN,?XDi60Too many S	" @FDs,?XF]NHNull SFD  $, , ,?XHS Illegal character $C in $	 A argument,?XN]GPADCHAR must be single char in double quotes  $, 	"@, ,?tG Can't $A an $A-only file,?xTG^`Can't write a file with M	  ODE='LINED',?4sS`Illegal delimiter in list-directed input,!?dZ 	 (S20Illegal character in format,'?dd I20Data in IO list but not in format	(1,,?h( CJAmbiguous repeat count,1?h4 SJIllegal repeat count,5	 9?hP S"Illegal Hollerith constant,9?hR S8Illegal field width,=%wz	 @BKR`Record length exceeds string length,A%x,MSOutput field width too sm	"Jall,F?gS2Illegal character in data,K?f@S1Illegal character in	 @@S data,O%wS?0Integer overflow,T?
jk;Unit not specified,W	 [?
po:Wrong number of arguments,[?
xS>`BadIIOlistA$,,	d?ctkm:pVariablea$Snotinnamelist $, ,c?cx]Found"$C"whenexpe	U@@lcting"=",i?cx]KMissing right paren,m?cxS2pVariable or namelist does	 u not start with letter,q?cx	S3Illegal Subscript,w?cxGCan't conv	  }ert constant to correct type,{?cxgR`Alpha string too long,?cxeB(	 "Illegal repeat count,?cxg;0Sign with null value  $, ,?p3t	 @(O8Can't switch to output: $E  $, ,
.5I ".,I $56$
'$$
'$
'$
'@H	(x5a`C	"@[crD~)~+%i@1w~:gbabF~Unknown FILOP error, code	 0 No such fileNo such directoryProtection failureFile is being modified	 9File already existsRIB errorDevice is not availableCan't OPEN deviceDevice ful	 AlDevice is write lockedInsufficient monitor table spaceCan't write a direct	 JoryDirectory is not emptySearch list emptySFDs nested too deepAll struct	 Rures have NOCREATE setCan't update fileLocks still setNetwork fullTask 	 [not availableNo such nodeSFD in useFile has an NDR lockMonitor use cou	 cnt overflowCan't rename SFD downwardDevice is downDevice is restricted	 lDevice must be mountedDevice is assigned to another jobFunny space fullToo m	 *Dtany open units, ",I,`, -S
<n	 &  	"
0B*d4$G&+ `d@+
,0(l~	*Q (,0
7,7,I0.,86B,I9
 "6@,^RPX$	(@*U* $A&? 	b6+ ,~YAQ@(P X x(@@P@Y @8	*U*U(H8P0X0$P@PX Gx!p+Wp%_p&gp(p7BP+#	**" B *	b+# -7` /7` 1,~7BP+* B 2	b+*`b@	(D T'+* P 2aB 4,~ 4,~@ "5,I"6	b,~,> "7,I	"A"0,^5 -7BP,~, ",^7BP,~, "6@P,^RP,7@P	 D8,~ "-,^ P,C"P,>7Ax+@ ",^ x,:x+<,^x ".	(Q"
A,^,~ "/# ",^=dC,~,`Q"A@ 4BY.",^+F,`	 ("IQ"A` 4BG,^+J4BQ,^ ab +Q[0Q"lY, ",^@@#	"(R,~4BK6@,~,c6@,~,>""	b&+` B " B 8	b'+`	((PZ4B] "}	b,9+Y " B 8	b'+`4B`
&,^0B,~
2,~	  c
8+ ,~g ".5> B,/".B ",@@x : "BBP
	 "k, P
`@+u0"0"?+pB+k1B?O &/F." B,g/"	 T(t3":x+k,| : .x "<fyB=fx "/B,|/,~ "	"T|B "5:.5>@@  : O@x2B+   @+7@:x	"

/4&@+,| x :4b &F=b
 &/F,|/,~	 
A*"=/&Z"/`=b(:Z<h@+  /@,|,~iJ
9',,Z
,64L4,:,<ZB3ZD3	"
P F5  F4,6,>,>,> 3/( H51L7D  H4@@1 E	*Q(E('*"2 E B6 5_"H57H5+11h+-Q&x F H2 E"F&" 
4	 /$$( @*f.,G,^,^,^5L,~OLIUFUOSDIOGCXUK 03BQ+S	 E8h"`b3O=
6 ",U=
6 "[0Dap1Dax+>=
6[0D`1D`a=
6	 (@ %[0Fj+EZ 2HR+EZ[0Fap+NZ!0HP+N[	"I0Hp+N 2HR+N[0HX+N^.	.$ [1FX %Z!0(	"A Q0h5H9=
R@
@ M &
,~1"0,~3b+6D0b+[[/$	""U"Z0"+W,~ B7@@9@@9@@: 4D`,d+`9 F:6B9:x 7/9	*
Eb : F0,~ZD8_/8#@h8@@7@@6 3b8+q_5${`D+{	 *U(kZ `h@+{.3f73&7+g B8 F7 H6 H0+g7B8+{_.	"U
"s 3d73$7+x,|+x D6 F7."3"8+s:x6d"@ 0,~	"  | 4$Rd$@&$4DZ0F+~&$0&0f+5D,~,SIO error 
$P	 ("
P@ @
~44$C" B+ (	(
, card too largenonbinary cardchecksum errorwrite lockedparity err	 orrecord exceeds BLOCKSIZEEOTblock incompletechar lostnot assigned^C ty	 pedecho checktape fullimproper mode (whatever that means)data error	 &block too largeend of filequota or storage exceededX*quota exce	"(/ededX.structure fullX0@RIB error@3@device error$$P, CON	" 7I x,>8+aH,6,6iJName   (Loc)    $[$[	 4
@---  Caller     (Loc)        Args  Types[Mc@1H1....  $, 4, 3	*UH, 4, 5, 3, 5, 6,6iI$S$7T($O)$16T$[$[---$23T$S$1O$34T($L)$48T$O$5 Q4T$AgR~ ?6+d",6?a?0PDL overflow	D")0O3G7D
UD
E[u&$u1.;yVeJ;C	I	@"PY`8Q	|P$(Hi1IHi1IHi3	
2Kc'34	D LC@`L}a#RU.3P	Wb`	B)TR^&gaR^',A	_`BPY|_9j	`Ra{.uqRBgi 3gi&	`gi:w#	@"giL9$:?*P	a	cV:.:vx.;1.;4`.>xO.AM7	D".E*{.E1$.EAF.EE+.EG.F]
.Ff^.GD~.H?	D".Kwb.M,.Nx.N.N#e.Qf.R.2.S\L.T4V	D".TCA.Xl.Xr.XQ|.ZfF.jB.j	.k!.k	D".ko.k0=.kN9.lO.lK.l '.l$q.l&w.lIk	D".l[.l__.ldT.lu.m5.mY.m4).mXL//u	D"/	g/
o/
!|/
9h/
F/
*/
=m/
K/
M	D"/4$/t
/DS/S6/"~Q/#L/$gv/$kg/$nS	D"/%/%1	/%>/)D>/*m/+	a/+1/+/,	D"/0G/1/1qG/1v</73?/7NW/7Yi/84\/8?9	D"/8DD/=lb/D[zw|Y0xf|Y0ye}1qMm~H#M^+t	D"=/_oW;A	K*9J]^r(]a"]gt]lss]m	K{"	D"^?&^QU^U"{aZEt3KxPcSfZ`@P 	"HL:	`6P
CB
c%c%c'v
3
6
6
6	@"{}	~S:x(Ge8(J#+P [hP [|P ^oP
	"5n&xc5oR`#*(T`
NuN6(T`EE(T`EN(T`KS(T`P9	@1G2S1QB]#{:	`P
-[ P
w2Sh
MP
IcfY{$1	D"`
f,McfqmO`&yiT%]t]?hp]?sGuxekP&&)^gb!	S_Y3@S_YzS_YS_Y\ S_YcS_Y@S_Y,9_.G}{%~	D _.CI_.CI_.Q7&K"S}6T"YYM"Y\,."Yo&'	"Y}6T"Yxx
"Y{T"Y{^"Z;%"Z5gAIOqASg0C>KG>/eLa57LaD,H	LaE{LaEiQLaGlrLaH1LaILaX|{Lan9LaLa(S	LaKLaLakWLa((YLa*La+9La4rLaU[YLaV{P	LaW{LaXvLaY]Lah+YLaiWLaji8LajlXLakLak	Lam8qLa|=La},La};[La~;VLaiLai	La]La[2	LaQLaMLamLa,tLa]LaQLa$9La%[pLa%hu	La&+RLa&iLa'La'K3La(ltLa(La)LyLa8<3La9l9	La9La:[La:=vLaa{$gFQ
&		

	D
	>zh@ziB[S5
;%'+
<B+RP4".%eW/$	W	D"P71|);x@);yA);yA4zb}e4zc	d.&6:x34U<(	D"33>	ywELjeM
8	@"UV`CxNh1UVaFW*(|WblrP2i:g6Y\s48Y\{[	D%sY]3TxY]W;{Y]YdXYYZZ	D"[N0;[:
V;/VKP@,V}CY	 LA$5C PpNFf3*R8}	P$*SS--z+P$-[~{T	D"}I~	1v5K'"	D"J0N"B		#
EPNy	PNz	 P3UfP3	P4g?_
g?"Eg?"FCg?"GJg?%v
`j'G	"`T@`WAa	AUdgAY2}A^$A^{>^A^{SMA_0YB'26	DB':6`
L'8gCxG?kP1ggG&~gGM'?gGh1`nBs`QggJX-	D"gJX-5gJX.v`hBigJ#{J(#$`"6bJq~kWxW	V/	"WxIwW=![g[l{Wg\)7Vg\2g]PoWTTWM2W>V	Wi)WaEWaFWjWjW"=W5&W5)WN)WgyH@?"GJ|BH@?"FC|2H@?"E|1HAAe&~@&`((V: 0(=HP [hP [|PbK
,8(,B=j,~	*Q",(5j
.* /((5(
 ",8(
5B ",
=j,( 	( D5j * /((5(.
,8(@f)F,G=j)F(H H`X	"A,~,(@ `X(F`X)D5j * /((5(".
 ",8(!	(@
"4h#)D=h"aX)$ "A"?5B' ",!=j$,~!&Aa F  ( *  (1Bmd*,~      	D"H17<17=17=185

	"Py+@{u7"cXy)cYs	*&d="2u=7I#=7I$7x
'X	YYZZ[f<SNf-?Q1?Q4gCxG?DgGM'?'ID;ID;gJX-gJC^+((. P3P3NHB w	<0
wH @
 	"P,@@@@@@d 1Bl 1Bl@@6@d@l@5v	 T@
O,+>+
4V>(Lq,0"0b+/"G,)L`n7
41[
41an	 (T
(L{A,(,~0t+@D=
+6+9G8+&+9=
G8G8=%+/+6	  1BG,1BG,0B1BG,0B+G,\`0B"1B"+"0B21B2+"	(@*P*"+#G,\` P
`Ph
+:#5D)2f.+)$&.=
2d.9.$$	 @ *%&. l&.ef.$=
3Le\`%G8$*.
=
@$
RH$
	 
3"XXQ !BXXY &`Xa &	 (2Vt46>6@+=,u,~@46> P
aP	(U;=
(Lq+<vk,+=`X+A&/^aX/`X"`.	"( D ,#5@F*/,4@k (fH+k)'/,'4RX#0f+l#0f &K	 L7 "`/%   .$%l(.%Nmh. .eb9U	"*U``+W)/, .
5RI Ll `X+p. @d "d`+_	 (]).,l `X+f1,@3,v+j.,@)|lw`X   @`X B	 P("f,~1,3,w+j.,)zlx+cU U"5lc@`+c42k   @U 	"@PnU"+cl"`X."aX."@eb9\+\x,>u+@ w6$|00	"P+s?j+t4Il2bV(9P5Hg9	P/i		 P!bP	WbbldNf@dN6ZD&aT/%aT-/	aT{;.RaU	PxReC	yD)Py+@yXWNyvgp	"c.lvP	1}@	2G;f> >	C:>	C:A	C:I	C:U}
}W	D 	C:X	C:\}
%_^8Q=P	WIS/E	P3P3N	"P
CB
yEBP ^o(T	(T	
(T
(TW7
":y.a?"	D"
b:x7M6c]Q<F7cXydcY,H/cYs	T(I)@".T=?	"P+NT=?a	0[DMFMHYT7CYT?#%}1

URs	5ceL%7tAUT	Z[UlrYPf<SNfPF=Y"	D"5G
kg?uHgAjFhWB w	<gC7?MJD"gC7kxRgCxG?=gE|xOgH=wxLgJX.gJC^` H)	((x A
H @
	 Ad8(l8+d80l8+d8l8 +d88, P
d?  1Dl	 (1Bl  @`X d"d@
5  l5@4B9[
(L{	 @^,7@d ~., (f*/, (f+9)'/,' $.M..({#	"(10+16 7N".,+4N0.
" 8.
  8.(%%8	" "  < .2%l0.%<!mp. .mb. @l&.mf.(	 "*.af.(`f.(." eb. ``,~)/,,~ <2p+62P	*T 3963 <%+63@<32"<"..,)0l"."eb. (&^5@<l	 A"A;d@
5H?`X.(Z$K[$Kax+C2*N2jm8 +C`V/& ax0	*D+G4rH0r .O..+I`x+I..5@J@0n
 .
`X+M0n
	 AL .
 
,>O@@ 4nV*%",>% l .e`:x x1D;N	**UU@@T=pO`x`x0+g``+Y4*\+k3NU+[4*\+h3*+hl8 4Rg	(*D]5rb#2d+k...RY7 `+k+h`V+f 0H/081r 0..@	( @ f+O/&a`+k $x a4bk@@/$=bi: 007@0+n/0.*..	((n5nod`x`x0+q@/(`x0+w`X@.`x+O4r/(H+	("w4ry/(/&O5&y.$5D{ $ Dh`x00$+ /#2"Ll 	*E(U(2"L+
/{/(5h4(5r5f`X+5f5r4(2(N9ax0ex	(UE
+
.(.+$94D
54h5r1h+,8=
5n@
4r,<,A=r,74f!,A=f+!,<4h	*P *,:,74f!4R#12+0R 2/2/&H,:=r4f!,A=f  ""	 (*!`x ""aX ,
5*$l,; 	`X .( #+D4r1,<,A=r)	*P(**,74F,,A=f* ax+J(y1H (.(,8=h/+J,<4h2,:	(@*2,7.5&5/"@52*,:95 "5#`V,~ "57 "+9	" ; "+>dX,~ "`V "dX "1BaV5:,~4n:/. @."	(
A C9@ *& ,>4@F9
D2*+H,:=F,^.",C=JH,~xH L2t/&(+y	PFdPFePFePFfPFfPFgPHMK?yHYTag	@HYTgV+T20P	P	WP$1bldNf9P RaT-	Dk[+Ak\Mw|ghPy+@PyUM
yXWP	1}@	40[x/M	D"x/Mx/Nx/N!x/O$x/Qx/Rx/Rx4h!x4h"	 x4h5 P	J1:	WJ>/A"LP
.r%P
.xEP
/
@[(	D"dM*dM,dN1dQ)ih!/ih65
\
@Bbg 9P
CB
7VYJ7Wk7W)o
9)69
I	D"9
	O9
k9
n9
q9
w9
9
!9
"9
q<	D"999:19;99<?9<C9=HyEB	"	s"KP
3P ^o.,`.a?{c_Xy	c_Y,H%c_Ys	T(I)@?	"T/!
YT/D1sTY7@ Y8
`fQ
0j2TYR[@T]ID	DIDJFJH

-B[7	D"[S53r:;
<[@).$5nlJeL%7t:PL9K@<L>	
zk8P
XYYZZ[F?}Y	"fu[UlrY` `!`!nUf<SNf
fUNf-P5	@EiG
:``AgB1ZIgH=wxgJX.gJC^H|C^~@`((P%Bi8aBi8d.
dj4H
l$.(=1B "0B+4& P
a@=+5$4$	  @1Bm$1B=2F84&,9,~ad+U$,`d"
 J0,~ "	"A  b,,67@ &"5B P
`@ "0b " 04H$&(#
G*	 AP",>6@9 .$1$+  (/(6 05(*5h*Q/ ",=f)5	""*1h+. " P
a@,)=* P
4h3 "4d2`@ "7 0 "1Ba@* 3,-4d5,^,3=d3,~ 
&@j@,~x,>9+	P!bP	P	WP$1bldNfR`OB@c.l:c.ld	"P
CB
P
3.anh^}47|^=^}C
|^>	D"^}C5|^>|^?^}Cq|5Y|5*|73|75^~[6	D^~/:$cXy6YM:2Tv(?@Bi8dgCxG?O@0<H,	5h0B1B,~	 @1B,~ P
a@+1B,~ P
a@+0B1B,~0B1B,~,"	*P +,),~,,& P
`@+ 7`7*<H  ",=h "#7 0 "*	*"5<&% *0*0/*/*J,~@@ 
(,~H&x,>(+	"P	P	W_-NH"c.l)P
CB
^a{@%caXy&cjY,H(	D"+vOZZ	D"[f<SNf'g?(BoOBo-gCxG?fO5fO,++4F,1b1"+	l$A")Hl
	(T=1B "0B+4&
a@=+5$4$1Bm$1B=2F-	*A"4&,.5H*ad+(l* H01N J0,~,,)!*@c5F &	  P(1N &
(5H (/&4f ",=f4F!.5B'8&5B%	 A " "0d  ",=d!,~.",#=d%,~ ",&=d(5 
 $ *  8$$8&,~x,>-+	P!bbldNfR`OB@c.l.P
CB
P
3.anhc=Xy)	D"c>Ys	*j`7	D"j`]<?<5<5j`8aj`8b!<6%j`8u%j`=.'	j`S[)D"gGM'?(00gJX-gJC^+` H)((/ 
g
g0HH @D	"*,,.@h5fO,++4F,0b0/"0"0b#+
0b0" 	"m$+
/"0"/")Hl
=1B "0B+4& P
a@=@	*@*P +5$4$1Bm$1B=2F24&,35H*ad+(l* H0	  1N J0,~,,.!*A5F &1N &
(5H  (/&4f" ",	*"=f!4F%.5B,8&#5B) "0d  ",!=d%,~."0b	"A *.",'=d),~ ",+=d-5 
 $  8$$8&,~x(3,>2+	P!bbldNfR`OB@c.l3P
CB
P
3.anh A
7	D"=A
A!>?A]?	D"55"A@a#A@b%6)A@u)AE.,A[[.cXy.	cYs	/
g
ggCxG?D gGM'?-gJX-gJC^0` H)((4 B1ZJC^ H)0dGH @L	 @ ,0B1B+0B:x,~ P
a@+,~:2d+	  /"	 ,7B,~  C& $5 	@%s	l
P	Wbc.ZfP
CB
[S5Lh	XYYZ`?6c
LA$5C g?"Eg?"FCg?"GJD"`j'
B1ZgCxG?JC^
 H)gJq~kWxZpH@?"GJ|	H@?"FC|H@?"E|((`? AjFhC7?MC7kxE|xH=wxV M!aM!dM/AM/D`W ?"GiJr]H0_ 	WK?_xb );0b ^,7(d wY:Pd w[fd bxe 
s"xe q9
9Pfz#0hK[8hv+,[@h	u?i{h/;@xi	;F3Pi:G?Q^+{HjVGM@j^^O[(j^QxjHX|LKLaqR8kvWKk^~kl^h/+8lR(T]+l;5+hl">r+@l(QK+l|jnu+plfK+Hl\KY+ l 	~*xm 5KJ(m }K@mxmxm AjFhC7?MC7kxE|xH=wx0!\~H @d	 ;n=Z%5X.b'bN::q["$Dg	-Vk&9A#WSj,L~he7`B~"l	n+Gl*68}g5"NPQ*DB$e5Rm!Cd	 )Dt]w3vu5 9k1(H%]2Z/?T?0{/J'NM
#lv+eh6^?"1/*ai[	 3@{_M+;"~`V*;^8ku+C96Ud4'+A14[8nqc
".hm5<q1DlsI4[P;ar4b%-	 ;!znX=
9J.LC~=<~
4+OAe1#`?,XNvR'nbT'uTX+E	n5w,*)Z={Z$4ePD2$U?^;mjoV-4Refag?
z!/l4m46GBa2JzOoNl!#kBGLf3	 L
	U,@hb.z@,HWZmP@B( Rr( N@1a-9y*g'7T%IpZg>,LqA-`
li6HmH*5e+!OoK
k>
CcF-7j.|5dyb{Z
o(CJuR#T=S&$fCtnq	 f-/024579:<>?ACDFH	 nIKMNPQSUVXZ[]_`bd	 wegijlnoqstvxy{}~	 

	  !#%&(*+-/023578	 :<=?ABDFGIKLNPQSU	 0
6r5\.z@8?1
k>
h5:#Ei@
B]l$-#Q:	 !	$D7-@* xpD85+2voH/&-{*7h/Hh47gUtov)x%x9 >}8+
/[I?/"v1
}vhD	*7\:B2.HI(*K,
uEo"xT!u)W}2!R%Y1-:v8z
EA' ^9:>y $ 1	 2)Hd)g
5z6h[+Pi0U?L&&]mM-xn#4Gs?
J#[40~"u8w>	 ;,@NC6P2gr{Yq;Dd8X;D,u#h[;+e;z
*= >PVR`T?0$:([P-MiIAP C51<v9
\+CX#=a8T5"mN	"ez"P3iHAjFhOC7?M#C7kxE|xLOH=wx((F M!aM!dM/AM/D0H @@|    	  [	 U ", " B[ p B\@@],/  G@P
@@,>,,^7@,~,,h	*U"*7@cL[+@@,6@
+
,~,/  G@P
 " B,T@@,
7@	"UD",~,,3+  B	Z B  B
  B	  B\,~,,/	 (Q* P
d l @P
 "@ B[ q B\ "  B]   B,K,_,T 	*U*T*"2D+ @@,SbL[+.7@+-bL[+.,` aL ,r,4@@@@	*U*(*@@],hcL[+#+.,_cL[+-5:  B@@@
@@@@@@@@]	(U Q"3@@,~,8,*6@,AbL[,~0B,s5_ " B\   BC#	*U*
; B	&t F  B
 B	"t B4BA[ B\,~ 0B+R C28	**Q(DC" B, $H$
.D	,?<pI9E,P0B,u,_,*Z8"$	(L.d	C'8/4fO,v&
[8. D\5d,v[8 D\,~6@,~@@	*Q(PU6@,?,*bL[,~6@cL],w .7x,_aL$,~0"0/"/"B	* E"]=nZ,_`L$+^,~d
  .&6B3B3,~3B+f$x.&4Da.&	(E"U*f+al
  F,~7@,r7",~4Bm 2B
, 
+@qO@],g	*P*(n 	.B	>`\+h,~+  C		@@ " B
 " B,7`,~,E	 A
T*w0B,~ 1B6@+ " B
, 4"#B " B
,_@@]5	*U
D
,y6@,?,*O@
7`,~, $v,aL + .,@@@@O@	*U"E*C" BD 
 <z B B <},,PbL\,~,zbL]7@],z@@ \	(
T* B,~ $ DaL+1B"`,Q,07`,{`L+ $v,aL 	( (,{,~ &7@+cL9l
 /$,~7B " B
 
3D
,~@@	*
P"!@@ 0F D
 5"U_4$'2D
*b$5"UZ,6 ,~"	"A*Q**,~,P6@]aL`L,_@@O@+/,_,4,~+.@@O@,P+3	*
"2,Q,4,~+2bL[,~aL	+7@@,~`L+ $ D,~,QaL	(QE*;+:,~O@bL[,~@@aL:,~,P`L,_@@+B,_cL[`L	 EE(C,~`L+B,~,PcL[`L,~`L	+JaL+J,Q+F@@,~,	"L0b+O ",,Q`L@,~,+K,+R,@
 P
`@l
4B^	 T1Bl
1",~1b +^1b=1"01b-1" ,~l
 0B*1B:l
0B#1B3	 @
P(]l
,~o
xl
,~ P
a@+a,O,QbL[,~`L+e4B_,~@
	 **el
@,~7@+m,o 
.b3",~@@@@  B  B?`	(U(U"n@@,~ 
3b+t/:7D,~ D  D+o.B"".B,~	 
v@_	*{|T"TT"T	(T@@@	 	*U*U*|%
6+$'D%\?d'
&)$'D%\=d7
;;$;DM	*U*E*!\MdM
%%$'D%\%d%,~7@+),V B,~	*A) +, 4h3@0h+4af+12D|91!$91)B 4"3	(AU*27 " B,~U" B,,~7@y+++',V B,V B	"T*T:,~ T6@  B,~ +@+4BJ +l"l$.$ed."	"( Cdb+E).&l"1&3f|+J)z.&f}7 ",~U"U$	(E**K5fL@b,~T6@ 0b,~ .$ T6@  B	  D T,~          ,}3B|+_4"[`dmB+_ A~+_"`dmB	(@
P"\+^8A~",~@@@,6@8`+g"8(v&" B  B  B@@8@@@@,~,,`L+~,,+	*U
T*~,	? B @ B,?0B,zO@]C" B,*`L+,},}+	*",	,?0B,z5_, 5"
"& Fd"~),~,	 "Q* P
`@,~,?0B1B+,~, 6 B,~,_5	,Z5bQ	*E @@@@, " B5,/  0G@P
 " B3,T,S ",  B	"A*E"   B,E, ".B6C3B3+-,8 " B
,P,E ",@@	*
Q),3O@ ".B 4B#.".B+#,T,S ",( "",/ "',0	"D*T*1 "",15"7@\,~  
_ B
,P,= 0b,KC" B
 	*TU(: B
,
VO@6@\+4,~ " B@ 
+@^ 	.B	?`\,~@	*E(T*B+@^3B2D,~:+@ x B " B4BJ.",2>`+G,~	*(*KC" B9, "5I,K.
$1b:x,~ "6@,M,M,2 "	*
*S5Q,M1B,~5R@L@@V@p@@p@@p@X@p@Y@Z	*Q \@g@p@p@p+  			 Q"d " B: ",S,[ " 
_ B
 ",i,M	*Q m,RC" BK,i "5l,	@8x,>q+,>q+.6,>q	"Du+,>q+,>q+H6,>q+,>q+,>q+?|00,>q @~+`,>q+6$*$Px,>+	D`$kW/)IE)OIR$ 119MPfMR1%G"1+o	D"Q1_17<a17=d1>O;1Q<;1QIgS;KYKR;@@	"R\@R$+s1U+s5yL+s?J.G04D7rAD7u4HX}<	D HYGT(E$LCNLD	
RL}s@RLm@V_@Mc)Mc)97	D"Mc/Y=,
f%RMc5GYq{,=,=McNO)Mca<&,
,
	@Ytg,P"h P	P	Wc[]m&
hJ	@"RaT1@c=
&Re2s@@e2sg-fnEf7:JRfC[$}E<6R',HVJ4[goq;^	D"hZc.E*~c.lzc.l$wc.l&vc.ld5c/
9sc/
=uc/%y	D"c/+	c/+{c/,c/=lrb}	;2	C;t}
YXoR}gs@R]@	D Ku3L@[cP3
cP3NP
CB
S'[E(TQ(TwP.a1'	D 1Gqa1G{_1G Q1]2OP%u
@^}m+4c_Xync_Y,Fc_Y,H	@"c_YLwc_Ys	hT O@!yU
!yUE
%!C@\(PT(QGT(Q@,}T)4@@T*o@T=?@WDsWDwj		D"WEOf~KtWHy@~Pe@~Q~Q]=WI]JWK>TWLm@@	D"~]G.~]:WO
&~cEWOvWO9Y~e]~h[^WP\>K	D"WT{IWT{I#WUcoWUgTWU	WULWU/WU9ZWUEo	D"WU~tWZ1WZ1"#W`agEJW`cEG]KEh	D"--N//gWhAWhWh
34rWhw?	D WhzEWh
xBWh
yBWh@ Wh Wh.B
WhqBq6}	D"WjWj%	WjR/<RWjkCWk
ozWmh*Wmi"Wn]	D"WngfWn*Wn-IaWnYY`dO30
pg1YT$%^YT/W7	@ YTi<YU	XkT[q{$]@eT]S@]TS^]5gm;iq	j_q"	D"Tj_}G%1@j`<~j`\`A~OZ^7
t-C^	u^vV	

[S5UR@U	p3@MU	@ gGM'?UPU2?O@?U;r_@U==o@eL%7tUMBM@MPR	DMPU9MPVwN`aGUN`g@|ENa@Q_UQ[[@T1ZT	T
3_RUT
9@T
sSUT^[$VZDO3XYYZ	D Z;%;F@bl:o
Ulr9UlrTUlrVUlrYUlr0O	UlrBKUlrC<Ulro6P<
'm	3gS3?[83I	C.O,	LA$5C PNyPNzP3UfgPlAP3	P4g?_qW?u6	D"W?'6 `	<gB{	ngB~*Bc`
L'gCw.ngCxG>PgCxG?Q`
`fO`M/D	D"gGM'?o`0`0[gGkGrU`t2gH4/Q8`t7gH@`nBTDgJX.gJC^=` hBMP"}
HA@A~@P((^ ?"GiJr]H0)'}H @l	((D+!"{ $ D*b  B 	b>+,~ "ZB "$	b,~+	(U 
  @+
+ /  C# Bd [@Z[1a1#	*PQ(++9"0" 0b " &""w4B9$1dC$ D 1dC$	(Q E D1B+<Ra` +* h$Zad~+@d+5+@
z,>_({jb	 @ @"m$~d$~2B)
,^`B+'.$(+5l&.&ef.$)+5``	(UA(*+,a`@+6+-7A+6aB``7 dBh$4$2+5a`@+5	(U E
3"`B$+5+@
} h"Z`b+O`BXB!"@0BbPB	*(U;+"1B)+@1BW+J  C "+*  C#1bC" B	((U*D"0"0b
 "."x&""w4B9eB+  A+  C#	"UL1dC$Y@ B+,>ab~aBaXBx"d~dBl>:2f
	**U+X 
f,> ,,^  ,^7B+9,[+9 D F,>,>	*@*],>,>! X x.	5>* x <
,/	!xX*,^,^,^,^	"U*Pf,~
`Nw3C" #D1@F	 n#b0P3
afW#Hb@UNUgUU*U.UU*U*UU*]*UU(UP`	*U*U*w
g@
h8
h0
h(
h 
h
h
h
h    E	*UT E,,+
-
$
x??@	"6$.(Xp@@Integer overflowInteger divide checkFloating u	 nderflowFloating divide checkFloating overflowLibrary routine errorOutpu "@t field width overflow E E,~,~	bPu0FrR
dR* Rs8mYF	`n7}3Fk	]a"wPPY,P^g];9^g_X:aqD,P#P[	D"Pyg#oG'c.:vWY<^>/OP ,"P [h	@P [|cfY{$Vcf}<*P%u
@&(S|_D5
RR+P;4R|t-q$2}*`JO
v(Y
a;6v,|i	@U#
(U#(@
;%'+PIP7
	PJP7 POP8|PQT
rHS<
SJ	M;5XYYZZUlr0On[En	=w;X1o	`>PbK
:z	D"LA$5C Ce;9P<W}g?"ETg?"FCTg?"GJY?"Gifj'[g@.~]	gEhR]`M:E`M:E`M:FgJ(#$`gJq~kJr]HWxVwg[@v@g[Qgg\7N	WZ\(( 	WK?_0)?KH @	(@ C< ,+KbNC@,,
&6@+
@	b/B 	b@%"t	(Q 	f &."'"/,!"{7D+ &0D & ,*b
	` p s	@"c/*mc/0G}K	`	WK	W9P [hP [|(Ty"	`	DcfUF+cfY{$cfqmOu^v
&UK
>rG	`)%
	W%7YYZZPbK
V;/VKP@	D LA$5C ?_g?"E
g?"GiW@:zpW@:~B`T@gAj9gB.g@I
H @$	"T
U*,^. 1`	+,7l +@
@@@1@$@$@%@)@.	*@@/@"@0C  @C  @C  @,~C  @,~  @C  @	"E,~4"0b1+,>,> 4B &80F+&90F1F+ B	*@+ 9B@@@,~ ",~ "+  "+  "+ @,^,^,~	*(@"7B=#[,~55 
4B( 4B( 
,~"",~C  @C 	 * @C  @C  @C  @,~C ,~O@,~ 5,> 9	d"@3@4D5[d  D,^,~x,>7+"p 	R$R*(PFjPaXcal)aqFCaqkXar	|l9~ 	ar5LgsEMc.XQ8Sz
2v

>.
>f0
DL	D"
L
P$
RT$
VH"A#
Wd%
_1	D
d#
|)
k/P @[)I);P [hP [|c5n&x	`#*(Ty"	`cfY{$0P%u
@c]Q<F
T8b)I15*%YZ`>t"P=`wPPbKf P3	P4	D"PL\j	g?"E
g?"FCg?"GJ
g@.x..g@t[]%g@w>,gAj91gAjJ/)	@"gB#3O$gB#6$P0[gDE`*gE};+`t27`"-gI^,7P [hP [|
V;/VKP@(( 0(DHP [hP [|PbKMV;/VKP@(  0(|*HP [hP [|PbK
V;/VKP@(wY:0wY:H @D	 CR@,>,> p  p  Ep<b $Ep$ E. .&+" .!p Ap $Ep,^,^,~	"wY:PI
w[f0w[fH@l	CTs@,>,>p@pEp$.<b	/.$$Ep$"E".&+".!p Ap /.$$Ep,^,^,~	"w[fPI
p	DuI?bw^e@l/W[
s"0
s"H @\	 aJ|G,>,>,>,> pX8p""Q"+@
:h`27h2wh,:*x ,^,^,^,^,~,>,>,> &g/ p p	"  ,,^,^,^,~,%+6$hDh 4 5h, h,>,>{	 ,>,>,>,>,%gJ(Subscript range error on line $D at $1L
	Subscrip	 ("t $D of array $S = $D,>$,?mhVariably dimensioned array not form *al - internal bug - abort	x9=[]&8;^$q^BB^T.`R[_^;_sk;	_t"B_t4.q,dOR{e'%gX@.	vY1	@`	WJc(J"%
E
s"P'

	R3[9q:YYZZ?q4((- q9
90(CH @
	"E IVnO@+a-\@@,^,>,>,>Z:x.*:x,>,>C<,,^	(
  , 
~,>C<,,^=l	,>C<,,^,>C<,,^	"D"Q"@jC<,1*9
C,{C<
 *,<j9
 *C<,1*9
C*z	 P P(C,xC(zC<
,,^_w4TJ@,>C<,,^,>C<,,^9tL	" "C+p9tJC-p9tK 	p80(+K2**
  $ff,>  	 D* 	3I3,+/C#."20.*3j9+3F+7,> /(,>C<	(Q*E"3,,^C<,,^C<A,3C<D,4 l{2j+SC<F,6 &C<,7	*P;C<I,;2*+S0Z9
?.*<=f;, +)X~Bly	 Dp$X~Bl{p%Z*Z
/,@+&	 ("L \xS:{*:/,^,^x6@+Q,~,>C<,,^,@,^4NL.<	(U+(1H148X9HCORE DUMP/1H 7HOv flag17X9HCry0 flag15X9HCry1 flag15x12HFlt ov flag 13X	 ]8HFPD flag/1H 5(A9,15X))(2(1H-8(9X3HAC O2)/7X8O14/))(1H-)(11H+Locations O10,9H thr	 fough O10,9H contain /1H )(1H0,O10,8O14)(1H0,O10,8G14.5)(1H0,O10,8I14)(1H0,O10,8	 nA14)(1H0,O10,4G25.16)(1H0,40X,O14)(1H0,40X,G14.5)(1H0,40X,I14)(1H0,40X,A14)	 *U w(1H0,40X,G25.16)@q@r@t@u@w@h@j@l@m@oOFF  ON   	 HPX~@U
p$X~	B@@`p$0H@$($0$ X~ E@c.D.IX~@ch$$	@"|[m`l9uIoUAoUFo+y	DXR9(k~PfKf2[ol9w%(/yvz)	D"f
J}
EJ}
FK})3@	"`	WJR` RS
CB	): R[P [hP [|		D"P%u
@m[lZl9tc_<F
<<E~D<FI+#OeU#Oe`#Ofc#OfcP
/SSqS	D"~w3]3:A~Ab[hlFl9qpj(7pj)8pj);pj*?	`20J9
9stv&vLLy9Q9>[	@Y=l?UlrVUlr0OUlrBKUlro4Ulro6LA$5C`r%HJ(( z#
K[S<c): +,[0+,[H @D	  YNty:   p, &@b) 4B1B "1b1"+
$$.$h@(A=f ,~" ,~	@"S<dc):+!K
+,[+:#
KEXYYZ((
 u?0u?H @d	 I$P #p D F	b&".$&$7@"$  (@. &"* 
)@
	(@$&$.$.&(D(F...&(#p**,~-Jan--Feb--Mar--Apr--May--Jun--Jul--Aug--Sep--Oct--Nov--Dec-	u?u?	`P[hP[|+Dx	LP[hP[|(Ty"	`qp:$D+	P [hP [|)u=CX3	`	209
VGM0VGMH@TgO>Ht"p!(^"Cp	b">p,~P[hP[|PwO@ p*\ p*\ 'p0d (O1$!${ .	 I G*d
,~	D"EFCGJ
^O[_t9_tC
S;tvc):P%u
@	YZZLA$5C@WxJWxVw(([Ep0"+
,~Z1DO Ep+	D"]yG	KzE	^,)^2w^I;
^QS<c):LA$5C (( HX|LKLaqR0aqRH @	 @
U*G3J;O+I'4\Z p  ,5
@@@@@,
,,,!	 ",~G"\J;  , Cp,~|,>,?p,>
,?Y&DIVERT: illegal	 
 to divert to unit $D,>,?p,>
,?Y&DIVERT: unit $D is not open	(P,>,?p,>
,?Y&DIVERT: unit $D is not open for FORMATTED I/O,>"@",?p,>
,?Y&DIVERT: Can't write to unit $D	D"
HX|L	
KLVCl6
aqRar!;l:?S<LS<H	@ c(J"#c):
P%u
@x7h|YEL((( vWK0vWKH @D	 "Z.)V,>,>  C",!"PB!"| $ 2f $*b EpSX"(*"@@1DO@,^,^,~	DEFCGJS;tvc):P%u
@LeS
vWK25EZLA$5C ((
^~k0^~kH(^~kemWQ^X^~kemWQ^((^h/+0^h/+Hc^h/2+^h/+c^h/2[^h/+Vk(Vl
&,>,^,~%FORDDT not loaded
0	~*P [hP [|u^v
&5KJ05KJHe5KNm5KJe5KN]5KJ(}K0}KH+@}K`	WJ(]`? $6<:n J`o +vG@q sJ`q = s <~u //;]3:3qC=MP[Y\t6x K)@{ <~`} =X} x^} 
 77G
 ).*(
xOD6<:0)H @d	"D"a.3@O@+gR~@@@,>,>,>
8+ @6 w+ "0B+!"A`	 @QX#p5@	/#p!"X#p_"`Q@7@+,>C<,,^+,>	*AC<,,^,>C<,,^*b,>C<,,^+%\pZ7@+	"D(*,>C<	,,^+,>C<
,,^,>C<,,^+%7@+0,>	*

"C<,,^,>C<,,^7@+0,>C<,",^,>C<,$,^	"  *,>C<,,^,>C<,,^(@qd0@,+2,>C<,,^1@#	(D3+70@*+%,>C<,,^+%,^,^,^,~(' Type G to Continue, X 	 ;to Exit, T To Trace.'/2H *,$)(A1)(' PAUSE',/(1X,14A5))(1X,14A5)(' PAUSE ',O6) D(1X,O6)(' PAUSE')	 .pX?XAp$X	 @	BXDp$X	" EX9X~>x	@`	WJ1` R)P [hP [|`zR+c_<F
-#Oe9#Oe>	D"#Of?;w~A#OfB;xD#OgE`20J'^ 
\!	@ 
Y?
Y]@Q.K
8<:XYUlrBKemWQ^5PbK
V;/VKP@LA$5C ((F J0J@	 p1:`a#kB`&3M>\=YLf3`Jdw.~\=Lf3`N
\`F3M! 1ua$9Lf3`f3M(*10  )    @P	"D"CbN0 \ p @
 p B %p D p D p F
 	p H 	p H 	p	(D
U HF F!& F5$!&} F# F  F
&F F	 A
U* <, @ <, @f F 
 F	  F 
F	*TP*  F <," $ F D
 <, 	 D 	*(*" D <, D
;+	((*@d*<,@ @"1d0`++d D" D <,*U3 @ " D <,	D"J`)qJ`v*`3qC`3qC`3qC#`3qC&bf+`	WG"2	(U*E*7 @  	 D
*? D:" $ F D
"<,"D"D
; +D $.d D	 D 	&x@ F
	**D
P
D D <, 
D
Q*Y 
D7D+<,DAp,~Pcb9K@MG		D"
KV=BB:).A	D"0K

	D"VE@hL7
	
L6L4o	D"df	qG
s|
_S?~+	D"
!Ho	[cG3c)%acOf	D";i'mpDC
@t0@|1@4c@
,f@<i@
lm@Dp@dt@$u@4w@dx@4z@t|@D~@,@(( +vG0+vG@ @X	"E"Y&tP \ !p @ !p @ p @ p B $ D"$.&&/&	"Q(@* $ F D. $ D . $ D <, $ D .d; * +
 ,~h			D"+vG`3qC

~0KP4	D"		qG+
	o[G3D
ah04h05@`@\(( sJ0sJ@  0 P p t! @`	"Dg
 !p @ p @ p @ p @ p @ <,  
  J	(D J */
 $ . 2(+  H 3h+  H.$	*D*Q
8*
+2D+@fD D5d D F5D!&} F!$ D 	"UT$	  D D <, @F F6&+ <,3@+	"U""&.F <, D!$	3$+2$ D 2d
	 P(*+!& F2d
+!& F2d+!& F+:!$ D"$.	((3 D
 <, @  D5$ <,3@+7!$}d <,	(U*";  D	 	 F3d3&++ H H!(2H+	"U
D!(  H+% 	 H" $ . 


 J.$8(G 
"Q"L Ap  Ap,~xxp
p@	@L@t@d@#@
*@,,@L.@d0@2@l2@:@A@<E@
E@,O@|P@<Q@4R"*TxP		D"sJ`wY:bf`Xj `	WG#`	WG4`Xj8`Xj;	D"
CFhCEM0K
	D"P5P4)w05	w04L5L4		D"A		qG

s"
_#SU?+
V	D"!2o[KG3Ke0)%wG	D"cE%aJOA;O'P
a9:Q	D"
@~@T@LU@dV((Y 0)
V;/VKP@(  =0=H @$	 	 
9,	*PU*<
d?|	L:L*L(|TULlL@	*U*D
TB|E|L|O|3|6LS,t\p,u<tbL[	*U*U*"t_Tnti4!|eL]D$|/|,TLYd<d\sDW	*U*T~|HTL&<",z	 3	 ;'B!D0$UcY@B`H0& 	M	 DjB1@,`
B@0Dh$4	FB2a!PTh,,
D
B@0Dh$4	FeBC!)PXX,
&'B!	 LD0$	M@2 `T0, *B`H0& HQA1h,4*B@0Dh$4	FBY@	 UB@0Dh$4	F9@,`a	PHh&,
	3a	PHh&,
sY@'B!D0$O`Y@	 ]B`H0& 	M`Y@a	PHh&,
	eBC!)PXX,&a	PHh&,
KBS!10X0L&'B!	 fD0$	M@2 `T0, B`H0& HQA1h,4&
B@0Dh$4	FBY@
B@	 n0Dh$4	F9@,`GBaD0$	JF	00CBA`@@ (	
e1a00HD8$	K	 wFB!	@8 @@0A@H0#
f 1pHH"$!Ba@H&,	(A@DP#(fa0K%	 D p(B@`9!
C D$3)B,`8@`(,``
@ G @d(@I	 ,`
B0Dh$4	FeBC!)PXX,
&
B0Dh$4	FeBC!)PXX,
&B0`	 D`
B0Dh$4	FB2a!PTh,,
Dv @0"HQ(`V)@A	 `L@&(L,`B)@PLx(<
K!B!
JB)@PLx(<
K!B!
J JfBIA	 !,`
P!L$`V0(L&Bb`0F@#
!BJ`0FH#J	#0@q@'B!D0$OcY@	 *B`H0& 	McY@B@0Dh$4	FB2a!PTh,,
DB@0Dh$4	FeBC!)PXX,
&	 2'B!D0$	M@2 `T0, B`H0& HQA1h,4
&i1@@D`  ;(Fq@@
E #T*	4YB$A E@G "Tj	B
A
G	D"L&pL*u@Ud)(d)*D3D6ESE	D"FbF[Gf!EGHnHif]OI!	D"fx:IJeJ]g-BK$K/L,L	D" ?iMYM<h!?NNshM@OWhal	D"O~PHPQ&Q"RziYLR.FD"|	An/
$^<_L`,b4dde$h<i<kDlTn\qlsTv	 	 
tyl|T	*U*U*"$D\|T
dD,4,4T$TL,!	*U*U *4#d$$'<(<*D+T-T0T2D5\7\9L<
>	 3	 ;A`L`&	#@ FP$$f	 DA@+APLX%(*dB1a`@0+A@0B!	`Lp&3@ @P
3@	 L @P
O($p0E@ NP+8\	&3:@4`B	A
`H8$$TJ5"aPFp!8ApLh&	 U8
@ Jp(La	`Lp&
a`L0A 
p&
	`Hp&0	#	 ] `3A`0+APLX%(fB+A	`@`  
	&c@A@3@`Lpa`X#
Ba	f	PHh&,	#B 
`Fp
0HX8
A
`Fp
	N	 nA
`Fp
	Nc9 $`BA`L`& 
&@2AA	 Dh#8\	McB)A
`D8"(
c3A	 w`@h ,T	JE@ `B
AHH$iBpB0#
!H@$L&BA	@F`$,
A	 F@  P	3@ `A
0HP$"FP!(Ap0"FP!	 (ApX!0Xk$@
AHH# hCBA`@8A	  H0A H00lAD0a	 HP$
 H0"A`@ 	  
B! FP$$f` `"A`0B
AHH$L&B `DBA @H LfC@A@	 !"@	 D0B@B  
B! FP$$f`	0D(EA`0A`DPJ	 *!F@(LA`DP
	
A`DP
	
C)  `a	0D0#	4B  `	 2BA`D8" R	3` `BA`D8" R	B	A
`H8$$T*@"	0	DH#(	 ;3a	0C"A @H! HA@	D"<~;}@:_N-ZUy-ZU|-ZV-ZV-ZW-ZW	D"-ZX:_	Q-Zh
-Zi-Zj-Zj-Zk-Zk	D"-Zl:	T-Z|-Z}-Z}-Z~-Z~!-Z#-Z$	D"-['-[(-[*-[+-[--[0-[2-[5-[7	D":
U-[$9-[%<-[%>:_W:_X:_
Z;}B:[	D":^:P:`:b:d:e:h;~D:0i	D":1k:1l:2n:4q;~G:Ds:Ev;H;J<L((> //;]3:3qC=MP[Y\t603qCH @,	 (U(a2~L`@Apw3b
P <,+,>  B " B@@ *"A,^,~x |`D	"
*#B1d+"/$3DI+:7  :, DI AO$	(" "7 A$@ @M  BO&7 B&@ @N /N 66  6	(*/O 86  8#`#`3f+/**4D>4F5 "`f+3(Fl	(*391/"&"`(F FI &G.I df ,=d7 M FN A	*U*U; FH N FO B FH6 B+A,
D,#p "B,#pC!p,",#p,#p <, @L <, @M $ DB,7`C	*
TL+` CQ4A`? D+`
!,APXNN H H"`.$ DB	 AU/&DLFLCC L"M @A L M	 U*] @B,=nR+N,~g$V p@Ap4bf0b+f P4BfXBP7	 (TfOAp,~[/$+ p1b7`+l BL !p*L @P7L@Ap,~o".)  H Cp	(
n H Cp,~]Vl)9 "D,#p,#p,#p,#p,#p,#p <,!"h7 F,#`F	(Q
(w7"G ""BK <, @K@`FK@ @J,!"p7@G,,~#J	(*
@@J&"QDx:J6@,PJ2`G+	!"p,2 G+!",:J3"G*@*+O@G>J[xl("| BK <,C,~	 A	 J R	  
H@(xDhEE!pK"U PHHFKG	"obA$*`)qJH)s"Lo;PY+c[)c[*c[*		D_E)c[+_HR`y!yaTEFJ}
Fw~}
M>}
MA}
lw`	@`	WGy @#lP [hP [|S]!7I^n!7_;Uc_<F
{5M	D{5N
`D<	".B?.ByiobE0f0[5YS2	/
]3:pq3q1	To^8jTo^K|To^YTo[To7I`TUR209R
eK)`<~`=	D|=3rS{tT&IP3r#@P3r$TMG4xB:VCJ|F:^L	D"PwC:1A:4E:1B:HEHHHA7P~
HA7Oo~
HhD15~
((!U K)0K)H @4	 	 
@T@	*U*U*lCLF|HdKlNQ<R<TLU,W<YZ4[]\]4`\a	*U*U*td,g\htkn
ots\vdx${,|$~t,dL	*U*U*"L,*	*U*U**<,$-4.$041<2,45,6$89:\;T=L@\B\D	*U*U*3DGtI<L\MdP<S4TdV<YTZ\]\Db\dDfDh$j	*U*;4k,m4n,pDqsDt,vtx3a
VB+A`Hh%4
#B PH8$e@A@apJ@%$JB	PHh%0\fgA`@`"	 L0D2`H0cPBp"8Zla`F0&$
&#@`Ca	DX#4#aHX#	 U42@@B@Z,TA@2@
pD8"L2@ `3ApF8#
gA@	 ]g3`Dp 0FC2@0A
`0%
BA`Lh&,T(BA`0BA`Lh&,TjU2!	 fpJ0!S+ALHB	A`L8&(V+A`0B
A LH&L&BA@Dh$8\g@	 n `aPBp%8	KU
A@8!L	GdB*@ `ApJ@&(	.!0BP%(3apD0#	 wRj%!
pD8"Li5A	FHcBAP0B2)0@XB2AP03a	 
A`J871@JH	 +APLX%(*dB1a`@0fB+A`@h L	&c@A@APLX&$NfA@3@ @P
	3@ @P52ApJ0!
p&
+@a`F0$N	 gA@A`P&
A`0A`L01A`0B!`Jp&4	&``+A	 !PLX%(aPBp%8	GS	@
3@`Lpa`J0&A`0A
gA`03A`
p#(
	 2g@	 HP
WA
`J01@ `A
`B0A@01 `'# `	 ;SB!A`@8 (V	U*a`0A0HX%(N	` `U"a0@P L	S@A@W)@pH0!
	 CB"a 0*! HX!,!Ap0@`Bh"8	-BA J%,T	BApB0$N	 LA0HX%(L#!@
`FX",Xm&B,
FB+!@H`!0JX(L	 T#!@
`Fp"8
@A0DX#(LjEB*a L0@A0HX%(La BX$,T	'C	@ `	 ]B	A`J8%(+a 0SB!A`@8 (V	U*a 0
A0P",	*B	A`J8$ R
	 eB"a 0B"`	PD8#
	'Ba`H0%V	&BA00B	A
B)@`JX	 nA00&,
B*a`J0G!'!BA@Lh
!p@0(F3(({ <~0KKHH<~(  =0KHH=(  0(=9HP [hP [|PbK
V;/VKP@(#x^0x^H(x^`
+ @,>C< 
,,^+ ,^,~1@+
, ,^,~p "x@,>
,>,%Y&CABS: result overflow	DHN
@24K
`aj XY;-9pz

LA$5C (( 0H(`NZX`NZ(  NZ0NZH @
<	 T
GF@,>,>,>C#p   B#3b1+,3@@+/ @2 2	(*+
@@+,,>C<<,,^ @,>C<<,,^ @  3d2	(E"+&1B+"D2d2+ D,>C<=,,^ #U(1b	(QD+U",=+ 1("2d2+" #U&1`+#	"D
*"U ,B+$ 1$"+/ D,>C<=,,^ @ + 	((@*+ 0B+. 1D+.,G1@,L,^,^,^,~$bS7!vyO^	RX 	"3,>3,%Y&CEXP: AIMAG(arg) too large in absolute value; result=(0,0)	"
;x@x,>3,4%Y&CEXP: imaginary part overflow,>3,>%	 (DY&CEXP: real part overflow,>3,C%Y&CEXP: imaginary part underflow*L,>3,G%Y&CEXP: real part underflow	D"H &NZ`RvRuYY$Y0"`~Z'~Y	@c(J"M!|AP%u
@"#S-	2R9LQ:GXYYZZ;2D"LA$5C X>
;gE,E?M1^^gKg((Q NI0NIH(NIbGGXNIbGG(  NJ0NJH(NJbGG"XNJbGG"(  GGGG"0GG"H @7	"PT
GFG D F Hp p,+GFg D F Hpp5B
	 Q(U
U U"4F,B@`+,J+@+5F5H =@   	""",~ J@
 J J J@ @ + #2 >+'	*QT 3`?++,>C<T,,^+A5@'4($	,>C<V,,^	  E("D4HLd+q:5$7 "+7#2B=+2;5$*  	* "*+;5(.":5$/ +/`#3H=+1	+7 +;;	*UE
3 F H@@@@@@5$7 "	,>C<V, ,^+A	"U*;H+ >H+ >+AD4DD+l@+ WD+ R	 D*T D+ O5(G(3(=+I3h=2*>+j
,>C<W,,^	" (L,>C<W,,^+5@j@`D`+a5Dj#2(?+D@`	(**UD4H4D+a5@jD+ \#2(?+DD`+_5Dj	 ]D4H4D@4H4@S* J5 d J 	,>C<V	(P**f,9,^<@@+,WU  +7S  	*U*P n   @ D@+ D+ D +$+ 	"*"w5(x(3(=+{3h=2*>+j
,>C<W,K,^,>C<W,M	"@Q*,^+7@`D`+#2$?+w+
5@j	*UD+	+H4H4@	"E

S( H5   H	,>C<V,f,^<@@+7	*T*U*@+  D+ 1 + +Y5@+Y4$M+f5@#D	(U*P
!+ 1$+YD+ %+,4D,@LDL@DL	 *U**HLD 4 f+M6 +/6 +0+06 +0+f+M5D2+Y	*U*U*26 +56 +6+66 +6+M+f6 +:" @" @@	*P"U*;+ BD+ GD + ? + @+Y4@E4$M+f5@,D	(*UC+ FD + +Y5DI+Y5DI+YDLHLD 	*(EL+YU 7@+U5DR5FR@7 ",]+7 7 "7 	"
U*T"+X 7 "7 ",b+72`A+\2 A2bA+f7 +s	*
U*]2@+h,>C<g,,^@+ d
+,h+a,m	*""e+c,r@@+76$+j[* @$	,>C<V,,^6$	(T(U*n+p[* @ 	,>C<V,l,^+ ~3 @+w3`@	*U(Q
v2"@+2`A+z2$A3bA+,>C<y,,^7 
3`@2"@+2`A+
2 A3bA+,>C<y,{,^7  	*T
"
+4@4$,] @+,m@@
+ =@+
	(
4`bm@+(A+"+(`bm@+!A+$	"Q(*!"+(4@&,U+(4@&,Ul+(@,m+(   
,~ Y~j	 :!40F 9~j!40F"Q,G3]-fh 0(9~j0Pp!vyObvW^	RX0>F9l,>B	 
C,%Y&CEXP3: (0,0)**(0,0) is indeterminate, result = (0,0),>B,C%	 KY&CEXP3: (0,0)**(negative,any) is indeterminate, result = (infinity,infinity)	"D*Tpx	x
,>B,J%Y&CEXP3: Both parts indeterminat	"@\e,>B,X%Y&CEXP3: Real part overflow,>B,]%Y&CEXP3: Bot	 (eh parts overflowx,>B,b%Y&CEXP3: imaginary part underflow	*m,>B,h%Y&CEXP3: real part underflow,>B,n%Y&CEXP3:  real an	 
@vd imaginary parts underflowx,>B,s%Y&CEXP3: imaginary part ove P~rflow,>B,z%Y&CEXP3: real part overflow`	D"/Ux)[GJ 1J7J:AB	D"BGB@CF-h40F#-q!,-vB0Q-c1@	D"c@rqArDAXDYXEhXEsXFoUu=	D"ud>vItyE{4XN}%7GnG7H
46eD27HB6`	<	D"
GG
GG"w(W1``2v`d^Z`f&aR8`q{q	D"f
q`,R|^,,X	VwY.M	WJ>\	WJDM/%!U/%!R	D"/IGfc(J"
Nu7(TI<;X&P86X&Pi2X&Pi4%q&Dd^1N&&4-
{@	"&HI/5w6;
t<A*yW*zR*zO*{\	D"3W=q+	D"MEwSxdSyhD:O!;b-jb2p!*	D"4P8&4Pi"4Pi$77G
).5!
5!I5B77;	D"7c}7e>
7eD8Ge9@>7p4E@=`/2pZY	D"pZZpZZpZ[L!YZZ[KV=gSQ$LB*gh$e5h2A.	D"mc#
i7.>pz
n?pz
o?F%K@C/$2C/%1	+LA$5C @\	'G

(( ?<0?<H(?<`#kX?<`#k(  #k0#kH @T	 PE(G2|s@p4BH4@N,>,>##AVAV/2&V+13&W+:,>,>	 Q##
 @ B,>C<],,^ 2(+* (Dr/$@4d/$	 ("HJ(D+  B2bZ+3"Y+5D! W	(E W X+# (Hr/(@"B .2"Y+!B.$"	"@
" WW 
 Z[[J5D*+.	 * @bhH\,@ ,^,^,^,^,~#F,>	(3C<_,,^ Y5&6"+ E+ ED+ E+F#D	"A(";,>C<_,3,^@5$@ X5&@"+ D+ EF+E	*TE"D+F5BF,`5@F,e,^,^,~4@T5 J" X B @,>C<_,<	"EL,^ ,~  Y5 P"" @ B,>C<_,L,^ ,~,j	 UU ,~?`@|@ 0 P Y~j 9~j P'M 6P'Ms!hhyI^ *Vh _/Qg^5p	*]x,>_,%Y&CLOG: Imaginary part underflow,>_	(Pf,`%Y&CLOG: Real part underflow,>_,f%Y&entry CLOG; arg is ( n0.0,0.0); result=(+infinity,0.0)	D"`KRb4NN1#kU1XL-.c(J"k^
@('(!	D":Z:[;[?
W-?.V#G[#	D.W@M W

$B67:3*5}~F	D"7~BJ3YZF"UY#:R<`	0-XYY	"ZZ[@@@`X=^E=^DLA$5C*DB&3<TD<Nb":PF<H((r j(0j(H(j(`1RXj(`1R(  "0"H("`"vX"`"v(  "v1R01RH @
I	"@(D
2dI+!  IHHG+#"	 
U*"B  1&"+ )+C + )+C,T#	"DT(*1@+5 @,>C<S,,^F3`G+1,[U +4 @,>C<S	(E(P
3,,^7 "7B+C @#B,>C<S,-,^ F3bG+=	(Q U
;,`U"+@ B,>C<S,3,^   F5$C"+C ,^ D,^,^,^,~p_iho !vyOU*U*QDurjWR.} 0'~j 	"J,>J,%Y&CSIN or CCOS: ABS(REAL(arg)) too large; result = (0.0,0.0)	"Sx,>C,>T,K%Y&CSIN or CCOS: imaginary part overflow,>J	([,U%Y&CSIN or CCOS: real part overflow,>J,[%Y&CSIN or CCOS: i dmaginary part overflow	D"`K8u
*#"vM>H1M?!=`Rv1R1A	D"1ACVJo5'`~Z>c(J"a";5"W{!zkG)	D"
9Y)49Y*@UXYY"ZZ[pz

FCEMGLA$5C X>	gKg((f 1O01OH(1ObO@ajX1ObO@aj(  O@aj0O@ajH @	\	  GO-C#p  ,>4B,4@2#,>,>,>,>  
#@
2d	(A9
	*++:&F,>C<:,,^4L@#@,>	*(C<:,C<:,,^@#+ 8B+ 8+'#	""F F,>C<:,,^ @ 1(*1*",^,^,^	 
*,^,^,~4@7 #D,>C<:,$,^@5d7*,^,~ B(P 3#B,>C<:,.,^ 5d7",^,~1(,<,A 6P'M 	":x@ 0,>',>;,%Y&CEXP: real part underflow,>',>;(B,=%Y&CEXP: imaginary part underflow	D 
O@ajL7~	c(J"BPUP%u
@209=9`aj4XYYZZ[D;-9%:8C#	LA$5C E	kYG "D23wG,((G DGA]HGA]IGA]JEFG%[DKdMHKdMIKdMJ%[E%[F%[G0SkH @D	"D QGid*p,6,~G6id*p,6p,~Gid)	*D p,6,~G6id)p,6p,~Gid(	(D
p,6,~G6id(p,6p,~Gie@
	"(D
p,6
,~G6ie@
p,6p,~Giep	(A"(",6,~G6iep,6p,~Gid@p,6	"A*,~G6id@p,6p,~Gidp,6,~G6id	*
U(3p,6p,~,< @ *"@,<  	(U(";,~  + @+ e,~ 4@Ud+ FF5&H @	 Q
Q D /",q ,~4DCF5&M+C4DC @+ L@,~	*U
"L@+D+PR+,~,~	"U+\#3&v+X",~D at $1L"@w,>,>q,r%CCComplex underflow at $1L	D"TrIrIr]r]z<Sk6D0
GA]H	D"
GA]I
GA]JE(F G%[D3
KdMH
KdMI
KdMJ	D"%[E,%[F$%[G
g9R`)ipc(J"x|C^bAD	D l:
CFuC5@uC5euC6j>	DI!LI,lU>ukHU>vMXYYZ<VC\D"{&M'0(H @	"D QG!d*p,6,~Gid*p,6p,~G!d)	*D p,6,~Gid)p,6p,~G!d(	(D
p,6,~Gid(p,6p,~G!e@
	"(D
p,6
,~Gie@
p,6p,~G!ep	(A"(",6,~Giep,6p,~G!d@p,6	"A*,~Gid@p,6p,~G!dp,6,~Gid	*
U*3p,6p,~4@>4B;6@+A6@+A@`+o 	*U*U(; @ +o  @"+o+ O+ O+ O	*U"U*D @ + O + O+ O+ O @ + O 	(U*A(L+ OB+ O+o H ## (3`+T* D" 	**U##3`+X* D$( d+ + $ D + 	 *]@+ 1H"(.(6 "&7@",p @ @  3H)"	((U*f3H)"  + + + ,p5(m @+m @ 	(E
Un7  ,~###3$(+x3"(+w3 (+w+	"U**w+u2b(+}2`(+{3d(+B+ +3`(+{3d(+{	 Q
D(B+ B+ B+  @+ B+ B	*(( FF7`",~+ "   +  D4F"#2"*	(

+kF@@+ fFd+ +k FD J  	"A A#
3*(+#
2*(+@B+!B@d+!D@d 
	*T*A !+k @ B+ &+k /",++k 0 *,>,>*,%CCComplex underflow at $1L	D">:YjD7}rpD8*kEQxERwD3
F%=H
F%=I
	D"
F%=JE,F$GSg6M$0
G0H
G0I
G0J	D"M%(M& M'HXi@}>Z>d	
j;c(J",&D	D""KYPyGAYU{\YEiT\YEiX\YEsO(	D"!n209o!!!!`2`2vU=`2YYZZ[;-9EG&{"Pk((0 77G077GH(77G`).*X77G`).*(  ).*0).*H @ e
@mFLA$5C ((`? )S Mf %l	  Kibz8 Kic*@ Kic+P Kic-X B^8 F
mVP _X F^Zp 	<0 4(p Q" F2vF0,R  F0_H F0_J` /4H` K<x fK Q[` 	DJx "( v(@ vv|RX DAh {( DR4N Rm )r  c  ~Z8 	WFz@ 	WGH 	WG" 0hK hMPlhh 7 NX U"P 8(h Rk x  )S0)SH()SbMfX)SbMf(  Mf0MfH @$ G>u)gp",~
Mf(( %l	0%l	H(%l	bKibzX%l	bKibz(  Kibz0KibzH @$ G7N p p,~
Kibz(( Kic*0Kic*H @, G7CQ p p,~
Kic*(( Kic+0Kic+H @d G7CR,>,>p,p, ,^,^,~	"
Kic+XYYZ(( Kic-0Kic-H @< G7CT p p`b,~
Kic-(( 0(;IHP [hP [|PbK
V;/VKP@(  B^0B^H(B^bF
mVXB^bF
mV(  F
mV0F
mVH @4	 G
,g,>,>C%p5  5$$3`+**4D`+ 	* 3`+@,>C<,,^@+ ,^,^,~1@+, ,^,^,~ 00 "x,>,>,%Y&CDABS: result overflow	D HN
F
mVbguaj
c(J"G24KZ;-9pz
1LA$5C CZBETB(( _0_H(_bF^ZX_bF^Z(  F^Z0F^ZH @	 
*G/
,>,>,>C%p5$$3$H+2DH+3fH+,L	 *@@@@C)p  ,^,^,^,~,>2`J+2@J+	*" 2"J+@@@@+A,>C<U,,^,>C<U,,^	*U*Q3hK+<7@+53(I+2HI+)2jI+)H,>C<V,,^	"@U "D5$$$U(O
h2d+)2D++3f++U$O,W	(E*Q"*++D7 $ 3(I+02HI+52jI+5@5 2 2`+5	*P(@32@+73b+7U O,_+7@7  C)p  ,^,^,^	 E*;,^,~,>C<g,!,^D+ @+ 5DC7@+C,h5@D,o DC)p  ,^,^,^,^,~(9~j6t^"yObvW^	RX0>F9l!vyO 	"K,>K,%Y&entry CDEXP; DIMAG(arg) too large in absolute value; result=	 (T(0.0,0.0)xx,>K,L%Y&entry CDEXP; DREAL(arg) too large; 	  \DIMAG(result)=+infinity,>K,W%Y&entry CDEXP; DREAL(arg) too large; DREAL	 (e(result)=+infinityx,>K,_%Y&entry CDEXP; underflow has occurred	 m; DIMAG(result)=0.0,>K,h%Y&entry CDEXP; underflow has occurred; DREAL(re vsult)=0.0	D"H <
F^Z+``2v`2uYY7`d^Z=d^Y`,R	D ,QY05Y1c(J"pP [hP [|P
8k!|A+	D"7/P=J/P?JR0YYZZ[@=I	D@?IK~2?fB$	 
Gey`,>,>,>C%p4DP4@U,>5  5$$	*E(@
AdAd/2$e+:3$e+@,>C<r,,^C)p 2(	( +**
 (Br/"@4b/""HD(BHD2hh	*U
+!3(h+!5B& B bbHcH+( (Dr	 "/$@"H.2(h+&H.""BH(cbhH	(D(D
*nHmHl@kj@i`@@+ d5D3	( 3+7@HqDp@p,^,^,^,^,~,>C<t	 Q*;,,^g7 $h+ K+F,>C<u,;,^@@7 f	(TE*D7 $h+ JH+ KH+ K+L5DK,v5@L,{C)p	 
(L  ,^,^,^,^,^4@]5 R f,>C<,A,^+Z	"A
Ug5 W $,>C<,S,^C)p  ,^,^,^,~	(],U OC)p  ,^,^,^,~ 0 P?`x	 f Y~j!40F 9~j!40F P'M 6P'M^|b)K<!01D5?Y_f]zI
J."]'z,?>v	 D"n	AGb'P bd{t9wM/pxx,>u,	 Pw%Y&CDLOG: Imaginary part underflow,>u,v%Y&CDLOG: Real part und	 erflowx,>u,|%Y&CDLOG: arg is (0.0,0.0); result=(+infinity,0. 0)
	D"\i]j]kplqmqnroN:0j6Z	D"pq	<U1fb\}N
8k('(&?1e-?.d#G[(.W!	Dl@MbYZZ	D"[@@@@@`c=^K=^JLA$5C D":&3<]D<Ub":ETBWF<P(( 4(04(H(4(bF0,RX4(bF0,R(  Q"0Q"H(Q"bF2vXQ"bF2v(  F2vF0,R0F0,RH @|	 "G|`,> *+G@,>@*,>,>,>C%p5&&2fd+
	*T2Fd+3hd+,m@ @@$@C)p  ,^,^,^,^,~	"DA*,>C<v,,^,>C<v,,^4J$**	*E*U(5d$3$c+2Dc+:2fc+:3da+[3$e+%,>C<v	 @(P
",,^eh @+2$,>C<v,",^DlD	*U*E *kDj@ih@g@f`$@@	*
35(4$@D+ aC)p  ,^,^,^,^,~4@H5`<	"
U(; ,>C<v,,^b3 c+D2@c+B3bc+D,wU O	*"UD+G,>C<v,',^7  7H+Y 
5(K(,>C<v	(*P(L,=,^b3$c+S2Dc+Q3fc+S,U$O+V,>C<v	("*U,F,^ F5(]$+]@@+]D+ aC)p	 ]  ,^,^,^,^,~,	P_iho .!J!vyObvW(9~jX,9r 0 f$u<Dj%P1U#VJpV) R:"<,8-yh "9w~ 5QZ/rL/4
cZD$Td;2{ 	"m,>m,%Y&CDSIN or CDCOS; DABS(DREAL(arg)) too large; result = (0.0,0.	 Tu0)x,>m,n%Y&CDSIN or CDCOS; DABS(DIMAG(arg)) too large; DREAL(	 ~result) = infinity,>m,w%Y&CDSIN or CDCOS; DABS(DIMAG(arg)) too large; D	 *IMAG(result) = infinity,>],>	,%Y&CDSIN or CDCOS: imaginary part  underflow	D"u
M4*2
F2v
F0,RM>HDM?!SVS	D"``2v`d^ZU`q{L`,Ro5[Y1
Y1BY2Qc(J"
	"P [hP [|P
8k";Hym4YzkGa4K:f3	g3	h3
i9Y)G9Y*V:U*B<	XYYZZ[;-9;rBKpz
1a	D W1cXc^^4ETB@gKghF#(( F00F0H*F0bF0JZF0bF0J(  F0J0F0JH @d	 DGZ,>,>C%p,>,>4D64@<5 (,>,>,>	(@ 
5$
0Z,2(+
@
p+ P+ I,>	("A
C<K,,^4LI@,>C<K,,^,>C<K,,^	"(
@+"1(+&@~H5  @~+ ,>C<K,,^	"(P"@5$#$d+ FD+ F+-@50(0P,>C<K	((*,!,^@h6 +/**7 $C)p  ,^,^	 ""3,^,^,^,^,^,~4@B 5 8 ,>C<K,*,^5hB*	""A;*+B 5$>$D,>C<K,9,^5hB$C)p   (@D,^,^,^,^,~7 ,L,R@d+- 0 6P'L'yo 	"Kx,>H,>L,%Y&CDSQRT: real part underflow,>R,M S%Y&CDSQRT: imaginary part underflow	D"
F0(JLBbguaj@\`
8kPU	"PVPV7~/I209"Z	D"[;-9~gRH%:FzF(
C#	LA$5C X>(CZBD";gE	ETB
gKgkYG&"_D<3wG6((X 0)!HP [hP [|PbK
V;/VKP@(  /4H0/4HHbf*/4HbfZ/4H(  K<0K<H(K<`KXK<`K(  fK0KH @$	 Q"(C2|t( p4@ @,>C<#,,^,~C2|s@ p5`4@,$"3@	*U
@*+2!+)r. !"  @(|	 QD h"  B  B	(P,~,+  ,~  ,~{e^b 0i/X3s!hhyI^ *Vh `@ 6P'M P'M "]ox 	""x,>#,%Y&ALOG or ALOG10: negative arg; result=log(ABS(arg))"@+,>#,$%Y&ALOG or ALOG10: zero arg; result overflow	D"
fK/80J"c(J",lX;Q[0Q[H(Q[`	DJXQ[`	DJ(  	DJ0	DJH @,	"U(C6|C@#p#p3`+@b D@+ 
7D+
@@@D @?+ "@&p+	D 	DJNi3.';	<*9
vR24Kj
pX-XYYZ(("0"H("`vvX"`vv(;v(0v(H(v(`|RXv(`|R(vv|R0|RH@,	UC~3@,>*+CNMc@,>X*`p#3`%+2`%+#,>"@	D,> @,>C<*,,^,^"@+,>3 &+ ,>	  ,>  ''& )),^,^	"T(U #5j2d%(5"!"+!4""3d%(+! (2d%B,^ @",^,~,+U ,^,~ 0 U<c\ 	rE`e:8shQ Y~j 9~j [kc } 	"*x,>+,%Y&ASIN or ACOS: ABS(arg) > 1.0; result = +infinity	D"vvH |RDTv&, %R%U"U1(	DW=(Y0#c(J",+\P>;@
 )D)Z N	(DN"#3bw+ vvueU	(
7`",^,^,~!"}B $+
CR,>,> pp+ * @#	*"2&x+'@3fw+x)D)Z,>#p#p  AyNN	 A"#pN,^7!p.$+
"pp#@ $7!p $+
	"E"E*7Ap+.5@06!p,{"]+16Ap+0,@+]7!p"+	L3	 ;	 D	 L:@P?@S@X~@|s}@xzs o@ `@ 2\@ :) TH@	 U u8:rc(P3v6Sj} XVbc){Js.z we=J}Ke[ ?O n5N QA
{Mq<dWu->Ztv]Y*y1!ourDtygz.>`
U*XYLK3`-~->	 "@w}	;!9.q!' +%`|,>z,>z,%Y&ATAN2: result underf"@low,>z,|%Y&ATAN2: both arguments are zero, result=0.0	D"DR
4N6qU7Dez
aqD.avw	VwY*c(J"	D"tM't]-@x-pQwq]AWD\AXLhl/W[2	"24:0Ng{@1H @(@ @PH @(@ @p(( Rm0RmH(Rm`)rXRm`)r(  )r0)rH @4	 (A G?@ p#3b+2b+	 B,>C<,,^2"+!"	 T
@,~3"+
,U ,~ B,>C<,,^ ,~ ! ,~ !vyH!v`A9 #pp"x,>,%Y&COSH: result overflow	D"R)rav`~Z~U
c(J"lG;-9i6JCEMLA$5C #eM((c0cH(c`~ZXc`~Z(  ~Z0~ZH @|	 U @Kc` p3 +3`+,U ,~,#  ,~,>,>@ @	(A DD Dd@D  5$
Ql\{s/Qg^X1Kzl	",>,%Y&EXP:resultXoverflow,>,%Y&EXP:	resultundW&erflow	D"0 ~Z~Ic(J"#";"@B
5b`B 2D1D+@+$+ 
	 D
`B$+ 
(B5B,^,~5",U 6!p+ p`B! +",>,%Y&EXP1: result overflow	D"6oiTK
	
B	;	jo~*
	WFzc(J" 	WG0	WGH @\	 (AKc#@! #p4B
,>6Ep++
+ 
`B+ 
(B5B6!p+		  E!"B,^,~6#p++#p p3$"4",U 6!p+	`B	"D"+	,@+	 0,>,%Y&EXP2: result overflow,>(,%Y&EXP2: result underflow	D"<%p7dKp7fx
p942
	B	;		jpCKpL:
@	WGc(J" 	WG"0	WG"H @
	 Kc3@ p p@@5`4@
,>,>,># @)F/&<(D`dO@	 U*P (D#5D2@U++M,i+5bP4B,rU ,~,x@,~3@U	(*"+P,>,>,>3BU+M5B U+M,> (r/$@ D AbGb	"E
 *2dY+.*2d,W+.*2d,V+.* .&( ,U ,U	(("]H  RR Q (/	 *E**dD~@f@H+ 03(P+3,U +M5H2 U+N4(4+/	*D"*32(Q+5,@+M5(7 "/">5":@b,+FA
c5h?(	 @;@(,9"@F"+B@(,<@F 
5&C.&(~	 (D"D0*.& (/ UTTSSUU	 @L@,^6@",^,^,^,~!`]op|*G25*U(YN@ `^_o@5A[SXj-	 Uu1(b 0 R+t , 
f{t'sb$0V9(PE$P'M*UA{ vZo)IB?AN+9.ZV px|~@ f`px|~ 	"i,>i,%Y&EXP3: negative ** non-integer; ABS(base) used instead of bas	"@
qe,>i,j%Y&EXP3: 0.0 ** negative; result = infinity,>i,r%	 zY&EXP3: 0.0 ** 0.0 is undefined; result = 0.0,>i,y%Y&EXP3: result ov Perflow,>i,%Y&EXP3: result underflow6 	D"]UJhZJiZJi[Jj[Jj\Jk\Jk]Jl]	D"E	VE
VE
WEWEXE
XE
YE]^	D"E^EEE`E`E aE a1DPR	D"Y0	VwY0	WG"c(J"(Ts/B
NvU:
NvU?l[$	D"-?.cfEbfEb..Ec>EHh>EIh..Ed..Fd	D"..Fe..Ge..Gf..Hf..Hg..Ig0BC0I0I	D0I24:224K/5A`B7(
2QX>E(Ox@+:(( 0hK hMPlh00hH @<	 ET g&(7#pA1@  @,~ep %
' B! >	,~g6(7   Ap,~%h 	D"R
R	
j	
b
SrY((7N07 NH @T	 U ev0,>7B+@@ ,>C<,,^ @*d,>C<,,^%	* ' B,>C<,,^A"?." `@p   D,^,~x AS "xx	D"RR"	"	fB&.7
XYYLA$5C((A U"0U"H(U"`RvXU"`Rv(  8(08(H(8(`9LRX8(`9LR(  Rk0RkH(Rk`)qJXRk`)qJ( `? 9LG! Rv)qJ9LRv*! 9LI" vz" 9H" aj`" )w(0# =(H# M
P$8Jh$%u&(j% m*$P% m*%% m*%@% m*&x% m*&0% m*'h% m*' % m*(X% ZH& ZIH& ZI& ZJ8& ZJp& ZK(& 
=$`& 
=%& 
=%P& 
=&& 
=&@& 
='x' 
='0' 
=(h' CH ' CIX'x(x( 9LG09LGH(9LG`v*X9LG`v*(  Rv)qJ9LRv*09LRH @	,	 (G?C@,>,>,>#p@3 =+	$42$A+8Hd$=	*@<9) 4 (+g&tC@,>,>,>#p@b3 B+$42$A+8	 @(
Hd=7!ph@<+)G?`,>,>,>#p@3`9+	*@QD;2$B+8Hd$@D9l9):(+)g&q`,>,>,>	Q("#p@b3`:+(D;2$B+8Hd@D9D7!ph51+	A"*hab+-.l3A+5@@??	(3>`H",^,^,^,~  ,C+6 Y~j!40F 9~j!40F	 ;t/L
 @,>C< ,,^2 +	S"}	 @
@+,>  ,^	*Q(P +3 +,!U + @,>C< ,,^ 7!p" ,~ !vyH!v`U*U*QDurjWR.}A9 0#p "x,> ,%Y&SINH: result overflow	D"J
JRz	?av	D"`~Z~U	WJIc(J"!lG	(9`ajX9`aj(  aj0ajH @L	 @(PgGC@7cp+
(Bdb+.	  @,~4B
,#+SQ,~>,>tive arg; result = SQRT(ABS(arg))	"c(J"
aeX@YG

(()w(0)w(H()w(bM`;RX=(`;R(,M3d+	*T+,6@,^,~,>,>,>@3d,+D-H `H+h	 @ @
$D,`f.$l$+.(h@
(H,`j.(l(  	* A3$.+! 

 0/ 0

/?	B@"A&1&+%"".&3F+'S&f7%p",^,^,^,^	 *,~P&y~j~j~j!40Gl4/L zero	D"H JQy)Mi
MRav.M+(CQ-c(J"6	DG!/{m%?
'XYYZZ[@;RCEM+((= ;I0;IH(;I`>6zX;I`>6z(  >6z0>6zH @t	 UP(iu@#p2`+3 +,>  2d+
 	 +B B,>C<,,^ !"{" ,^7!p ",~! +!YP IzO_eQifa`Nr9 SbPg "x	D"QK"OM?1)Mi)Ms	 `~Z

XYY>6z;-9LA$5C (( 
0
H(
c8JX
c8J(  8J08JH @ M2| p5@8J`
=$[S5X((%u(zO`&(jXzO`&(j(  lL&(j0lLH @,"S;!`+SO@ p5D lLlL	`m*$&(j[S5X(( m*$0m*$H @ @,~m*$(( m*%0m*%H @ B,~m*%(( m*%0m*%H @ D,~m*%(( m*&0m*&H @ F,~m*&(( m*&0m*&H @ H,~m*&(( m*'0m*'H @ J,~m*'(( m*'0m*'H @ L,~m*'(( m*(0m*(H @ N,~m*((( ZH0ZHH @ P,~ZH(( ZI0ZIH @ R,~ZI(( ZI0ZIH @ T,~ZI(( ZJ0ZJH @ V,~ZJ(( ZJ0ZJH @ X,~ZJ(( ZK0ZKH @ Z,~ZK(( 
=$0
=$H @ `,~
=$(( 
=%0
=%H @ b,~
=%(( 
=%0
=%H @ d,~
=%(( 
=&0
=&H @ f,~
=&(( 
=&0
=&H @ h,~
=&(( 
='0
='H @ j,~
='(( 
='0
='H @ l,~
='(( 
=(0
=(H @ n,~
=(((CH0CHH@ p,~CH(( CI0CIH @ r,~CI((`? CI( CJ8( CJp( CK(( F^`( %T^x( 
{@8)anLLP)8O)Xj()[p*^.J*^p	*-@	0*pH*-@`*cfczfzx*	A8*I-pAP*g	@h+-p@+r&r:+&+:+OX+ @(j+ /jO`+ y(j+ [s"h, \V(, \\v\z|R, \|DAh- \[(- \|DR\}N-x0x0 CI0CIH @ t,~CI(( CJ0CJH @ v,~CJ(( CJ0CJH @ x,~CJ(( CK0CKH @ z,~CK(( F^0F^H(F^`
{@0
{@H(
{@canLX
{@canL(anLL0LH@T8g&=c@#p7!p",~SNL{G#p7!p",~anLT[UC&vC@#p2~+7!p",~&p@XjXY.9(  -@0-@H(-@`fX-@`f(  cfczfz0-@H @<	"C6',,~[B@,,~[B@,@,~C6,`,~,>Rw+	 3!p p.<*f,^,~	@"
cf
cz-@%%	fz	 AH(	 Abr:X	 Abr:(  -pA0-pAH(-pA`+:X-pA`+:(  	 @0	 @H(	 @br&X	 @br&(  -p@0-p@H(-p@`+&X-p@`+&(  r&r:+&+:0-pRH @<	"C6Md',,~[&r@,,~[&r@,@,~C6Md,`,~,>Rw+	 2ap p.<*f,^,~	@"
r&
r:-pR+e+e	+&+:OH @(Ob@(jXOb@(j(( @(j0@(jH @,	 A C:Mm#p5@,~a`+
[(B{0bM+	(@2"(@M7!p",~ g p,~ @ 
@(jL	
YG
((
 /jO0/jOH @(/jO`y(jX/jO`y(j(( y(j0y(jH @l	 D ]&vC@#p5@,~	[(B{0bQ+@7!p",~,
U 7!pS  ,~ ,>	,%Y&NINT: result overflow@"Lc(J"
y(j
Y(( 0(A;HP [hP [|PbK
V;/VKP@(  [s"0[s"H([s"b\\vX[s"b\\v(  \V(0\V(H(\V(b\z|RX\V(b\z|R(  \\v\z|R0\z|RH @	4	 QU*I|gZ  @+IG@@p5  3 A+2@A+4B3 A+3@A	*@4B,BU O,~,>,>,>,>"
Z(.
S$@$D	"(*,>C<J,,^@  J+,>,>,>,> 
 J3 <+%	 D"*D;H:H9H8H7D65D4D	*P
P"3D2DdD 
6@++,=7!p ,^,^,^,^	 D*,~7!p+/ ,=,^,^,^,^,~,?,^,^,^,^,~^DPjJ	 3</V;G!\M)f VR5^,tj%IA{!'ladN+_iZI!O6z]k<Ox#`gM":	buaa]H
 :J^pa"o%Hq_ ;^HEr3gAC~_| 9~j!40F Y~j!40F 9~j!40F 0  	"B,>B,%Y&DASIN or DACOS; ABS(arg) > one; result = +infinityx(J	D"=]>H ?q@
\\v
\z|RbguajY0		D"+$c(J"C!|I.bg+/PE/ A
43
536XYY"ZZ[;-9k6q<LA$5C CZB((K \|DA0\|DAH*\|DAb\}NZ\|DAb\}N(  \[(0\[(H(\[(b\|DRX\[(b\|DR(  \|DR\}N0\|DRH @	 (I$G,>,>,>,>,>p @1  2 3+@3`2+
 )D	 ")[ \F\1`1&&3f2+F
+J
,J	(D 
-J
.J
/J
0FFk7` ,^,^,^	 ,^,^,~ 1` $+
I$I,>,>,>,>,>pap+ 8	(
"1&&2&3+5@3f2+3)D)[,>,>p1  	(A *p1&& 
@
.J\N\  
J\`,^	  "3,^7!p.$+
!pap#@ $7!p $+
7Ap+<5@>6!p,5 {	(Q @;+?6Ap+>,:@`+z7!p +  00	 D@@@PPP``ppp	 L    000@@@@@PPPPP	 UP`````````````:@	 ]P?@S@X~@_|s}@xzs o@	 f `@ 2\@ :) TH@ u8:rc(*<&P3v61$O
Sj})	n%Cj00XVbb:n}KeZ7c)<?O8;;#)n5NOoQA^KO9'ZL"?L2'r H.hm<2(
j"<_(47+	 5<7j_(iPrX0]_)$p97~9(_)kXn"yI-V_*H=p*Z}4Q_+>h))m:8#_,JNH?20T:_-c1828 az_/6?SU	 _@w O

A_Cu	ee_Fo;^KO9p%rk57Bos9UgmrGZgx_)-sb)}G"H?Jp"p	 JdKG9aLe(P-v)Ie(*u,]5|oJm|-3]xoMDq ?_QKp[Wh
Q''FD=j
+N1
TTYy]	 X|i2J]8L3
no'3Lu(xfYbcQ"Nex
.hoDoU=%Fjo#.%(ro#WmS,4y<q?O	j!o	yWof;E.OpYLf3H]`
U*U*U*lC 0W	]	 (29.q!'+3|,>4,>5,%Y&DATAN2: result underflow,>5(;,6%Y&DATAN2: both arguments are zero, result=0.0	D"6qk7Dz
\|DR
\}NaqD<av2	VwY8c(J";	D"tM5t]-@3-pQ2q{AWD\AXLhl/W[@	@"124:>Z[[\\/gW1\g{@?H @@ @xH @@ @((A`? `2m0 ^r0 81 d^ZP1 =G2 =G"x2 cN4H5 9<(6 c>fq{@6 ?[7 stJ7 " 7 d(87 `2v,RP7 ,I9 gevz09 : guaj: ^w(: i((: ^y2	tR@; 	tI`< h$6zx< r^8= [mVP= s 	`= dzx= sPAx= d:= +@> geL(> tP> t
h> hVOh> X[j> z?> ^#~(> 9j_0> 	-jH? f$? f%?x? `2m0`2mH(`2mb^rX`2mb^r(  ^r0^rH @<	 E*U I~:p5  3 "+3`+3  +	2@ +3" +	U O,$	"D
",~!,>C<),,^"@+ ,~,>C<),	 E,^@,~3`#+,>,>,>,>,>C<),,^S(@
	 h@,^,^,^,^,~S @,~ 0!vyN!v_/Qg^5_iho . "e !60 "#,>#,%Y&DCOSH: result overflowx	D"J1ER"
^rm`d^Zo5Y7c(J"$	!|H	;\1#pfPY"LA$5C d[1 d[ (() 0H(`d^ZX`d^Z(  d^Z0d^ZH @4	 U*U(IF@p2`*+2@*+	3"*+	3 ++2@++3b++,9U U"	",~,=   ",~4@B,>,>,>,>#2$,+@ H+	"P"D,Dd &Hh *  DD/  &D0	 T Q#2$.+-@+%HH32H1@H76	"("H5H4(`4 H.(@ ,^,^,^,^,~^	RX	 *0>F9l!vyObvWv` 7
Ql\| 00_ihh2Plp?R~ 3"PJKPEQ.4H<  J
~g}2TWCFS>gXa(*'	"8,>8,%Y&DEXP:result#overflow,>8,9%Y&DEXP:resultun Aderflow! ,~	D";0k!1+0k"+a0
1.XH1XI2XI3X\4X]5X]6X^7((C=G0=GH@t	H"DIFG,>,>,>#	p4Hp5D+DEXP2: result o Pverflow,>,%Y&DEXP2: result underflow	D"B%XdKXfxLtBL;MjXKX:
=Gc(J"Z(( =G"0=G"H @T	 ( IFg,>,>pp@@5`4@,>,>,>,>5(( @
	 
U)L/,<)H0`hO@)H5J	 *P,~,>,>,>,>5F5D+u3D+u,>,> (r/(@A 	(U(U(G! *2`+2@+2b+.*2`,
+!2@,
+!2b,+!.*2`,	*T"A"+%2@,+$2b,	+%.* J

, ,/*(
 ,`@
L	"D *P~}P|P{PP
P( 
(
/	 D 3h@
H~5$6  
(
r1,K+:0LK+=@+?/,>@5,<	"Q
;@+@A4%+?0,]+?/,LA4!5$@ 
$D+ L+ 	 ( DH+ + 3`z+I,DU U"+t2 {+P,H@@,^	 "L,^,^,^,^,^,^,^,~@#
 (r/0>50T@
+VA
D%	(E U5dV,$# 
@(
r/,>5,[@+\A4%5(\ (	 
@]# 
@
(
r/,>5,a@+cA4%5$c(@@$4df$y	 A"f.  
5*h.*(
~4 i.* (/(DDD	(D"@ nDDD@@$$@(,^,^6@ ,^,^	 w,^,^,^,^,~0!`]oq5*U**U
YLf3p6	<<?;4WpPb	 |*G2
p/p^'7<91%^\B1grulC83 /Qg^ 0	  R+t*$C3 ,]& 
f{*J8"yt'sVNZ^b$0*BV9("U6[PE>XFo)IPD5/?A#
oJD?66Ct>oDLQzf@!:D>	unBgo@~[1 WY\Jn!*<_ 	 !`px|~@`px|~@`px	 *|~@`px|~@`px|~ 2 	"3,>3,%Y&DEXP3: negative ** non-integer;  ABS(base) used instead of b	"@;ase,>3,4%Y&DEXP3: base is 0 and exponent is le 0; result = infinity	*PD,>3,<%Y&DEXP3: result overflow,>3,D%Y&DEXP3: result underf Llow	D"]JhJiJiJjJjJkJkJl	D"E	E
	E

EE
E

E]	D"EEEEEE E 1Dz	D R
c=G"Y0PUPVPV
NvUT	D"
NvUV
Nv}<
Nv}@"ZU["ZU\dao5cl[$&&4i	D" t]=-?.%fE@fE!..E&>EH*>EI+>EI+	D">EJ,>EJ,>EK->EK->EL.>EL.>EM/..E&>E\/	D">E]0>E]0>E^1>E^1>E2>E2..F'..F'..G(	D"..G(..H)..H)..I*0Bh0I0I%0I!E	@"E!F$
}3
~N`T?	DR;{R;	:YayXYYZZ[	D"$BfRIAYEP(X>E(OENIETB6((M cN4H0cN4HHbc>f*cN4Hbc>fZcN4H(  9<09<H(9<`q{X9<`q{(  c>fq{0q{H @<	"D*I2|t(@@+I2|s@O@p5`5@,5S Z",~,< ,>,>,>	 *U,> (r/$@A4G42h3+2H3+2j3+/$d D2	 Q@H1+d D0H1dH/H.	"U"
H-@,+@*`@@+   &D'  *	("H(7@@),^,^,^,^,~ bd{t9wM/{e^b72^|	 *b)K<!01D5?Y_f]zI
J."]'z,?>v	AGb'P p 3 P'L'yo  	"
5,>5,%Y&DLOG or DLOG10: zero arg; result = -infinity,>5,6% =Y&DLOG or DLOG10: negative arg; result = LOG(ABS(arg))	D"\*]+],H o`p-q.q/r0	D"'()
c>fq{uLfc +$gG	Dc(J"<#\ 1q3
	DXYYZZ[((C ?[0?[H(?[`stJX?[`stJ(  stJ0stJH @T	"T I6|C@
p1  p1$$3`+ 
@	 ($ @
$p+ 20"+#R!0|$L H D 	"U U1 3 +3`2"+7!p 
,~3@3"+	"A/+4L!@@pA"LHYDZ@?+@`+P")`A"+	DNstJi3.';<*9vR24K	D" d(0d(H(d(`,RXd(`,R(  `2v,R0,RH @
$	 *@
I~3@p,>S$5  O@8+	INMc@p,>S$@@5 	 	"U*S$} D3 I+2@I+
3"J+,K   ",^,~,>,>,>	*A 6@@9+ 3`F+(r/(^(  
(".(( aJ+	("G(
.*+(
+@ 
`"`J"`6@H@;$	"@"P"H<@=$$5$&$2$:+*7,^,^,^,^,~	D(Q*D>D?D@DABDCDDDd	(3EDD7a,^,^,^,^,~ 9~j!40Ft/L
 +$	D c(J"K FB&
Nv*";+^2g1EQ9G	D"D	D 3
C3
B3A8XYYZZD"[i6FC(,IbgevzX,Ibgevz(  gevz0gevzH @l	 
TINMjp,>S*5 "
 2`:+3`<+"5* ,>,>,>	(
U( D9H8H7D65D4D3dD	(
U*D,^,^,^,^,~3 >+(3`:+$3 ;+2@;+3";+	 D
(U O5j ,?,^,~<,>C<D,,^=@	*
"+ 5*# ,^,~,>C<D,,^@+",>,>,>,>	* *C<D,&,^$ JS(@
h@,^,^,^7  ,^,~	 3$u<Dj%P1U#VJpV) R:"<,8-yh "9w~ 5QZ/rL/t
cZD$Td;2{ 0!vyN!v ;/Qg^5Piho .e !6 ">,>>,%Y&DSINH: result overflowx	D"J(1E:R=m`d^Z+
gevze	o5$Y7	@"c(J"?!|H?33	43	5	@3
6N`g@XYYZZ[;-9@"pfPY>pz
1<LA$5C CZBd[1;d[;((D _0_H(_bguajX_bguaj(  guaj0guajH @<	 TIO-p5`4@, ,>,>,>,>   (Fdf+	.	"@&+
.&THD &hD`	 @,^,^,^,^,~,>,%Y&DSQRT: negative arg; result =  SQRT(ABS(arg))>	D"
guajguaY	guaZ
guaZguaec(J"Z[(( ^w(0^w(H*^w(b^y2Z^w(b^y2(+i(0i(H(i(`	tRXi(`	tR( ^y2	tR0	tRH@d	"UI~H7,>,>@@p5*+3L+2@L+5B,RUU"5(?	*,^,^,~IR QU3HHGHFHEHP 6@+;aD+= +>	";aD+> h+?`,^,^,^,^,~`.6T1RKI0
)FU1cAc	DNp\'7!B<d`pTb4.{|U%L3hxbEK+b&z56Gd	9~H 9~jpZ#$f.\4 LP(~j!40FP ~j /L
Q,>Q,%Y&DCOTAN: ABS(arg) too large; result = zero,>Q,R% ZY&DTAN or DCOTAN: result underflow	D"H IJK;
^y2M,=	tRML	D"Y1Y1 +$(N8c(J"Y FB+
b8K%$vN	D"z#
/S&l.g!0'>PH4|k1;?2g"XY	YZZ[i6QpyUQOXIAXIBXJCD"XJDCZB[p	M[p	M^^((^ 	tI0	tIH(	tIbh$6zX	tIbh$6z(  h$6z0h$6zH @d	 (IR
5  3`)+S @5* ,^,~,>,>,>	*(3`*+@,>C<-,,^,S${@d,5*! ,^	  ",^,^,^,~2 *+5*! ,^,^,^,^,~5* @	"
((D'D&H%$H#@`@,^,^	 ",^,^,~]eF$O^bK$-
g_auf"b#2t
4tZ%U#9biCe>!|j<__t~!6`;[] * IzO  0 "-x	D"JJLR*`d^Z
h$6z#\+'h*)	@"
<+&'(1;!7:9	D3#3	$3	%XYYZZ[;-9LA$5C	CZB((.+r^0r^H(r^`[mVXr^`[mV([mV0[mVH @, @I3@p5  ,~@[mV[mU
dzYZLA$5C ((	 sPA0sPAH(sPAbd:XsPAbd:(  d:0d:H @	 I6Md',>,>Rwp+C%p3 +2@+2b.<*f,^,^ ,~	D dededf
d:YZLA$5C ((	 +@0+@H(+@bgeLX+@bgeL(  geL0geLH @D INL{Gp7!p4 6!p5  ,~
geL! t0tH*tbt
Z_tb_t
(  _t
0_t
H @ Iex: p5@`f$
_t
[S5X(( hVO0hVOH(hVOcX[jXhVOcX[j(  X[j0X[jH @ SMmp5De|	`hEdX[j[S5X(( z?0z?H(z?`^#~Xz?`^#~(  ^#~0^#~H @$ I
dS@p@,~^#~9j09jH(9j@`	-jX9j`	-j(f	-j0	-jH@g:=C@p5 [S5`	0	-jX(( 0(A*H(	f$0f$H@DIad")|hF,~f$C d(jC yv{PD f
Up&MV
akWal6(T"1G2b,.
GDe>-?Z>-r>4b>5^>5MjcndfiPVj.DH(J"hHD9r`If&0f&H @D Iad` ()|h&F,~f&
|h,F
,~f'0tcHH @D Iad( 2)|h0F,~
tcH tcI0tcIH @D Iad) 6)|h4F,~
tcI tcJ0tcJH @D Iad* :)|h8F,~
tcJ hEd0hEdH @l S1d,>({5$$hd$~)w2`|",^,~@hEdXUlW
w2`|"
,^,~@hEgXUlWH @l"S1d(,>`({500hd0~)w2`|",^,~@XUgHXUlW
,~",~`D 
 	00	0H @,	" g:9d@4$`fmD,~ A	,~$`fmD+"K
,~",~`D 
 	00	0H @,	" g:9e4(`jmH,~ 
A	,~(`jmH+"
K
,~",~`D 
 	00	0H @,	" g:9e@4,`nmL,~ A
	
,~,`nmL+"K


,~ "
,~`D((
 RwH0RwHH @,	" g:9d(40`rmP,~ A	,~0`rmP+"K
,~",~`D 
 RwI0RwIH @,	" g:9d)44`vmT,~ A	,~4`vmT+"K
,~",~`D 
 RwJ0RwJH @,	" g:9d*48`zmX,~ A	,~8`zmX+"K
,~",~`D 
G0GH@(G`b>XG`b>((Hb>0b>H`@|IMS@,>,>pp3@2"3+,^,^,~@`+	"b> [(D{1d@+0$+
)!")_7!p   ,^,~p+	@`+		DPC	ljL

YYG
((
 uJO0uJOH @(uJObd_(jXuJObd_(j(( d_(j0d_(jH @l	 @ I:Mmp5@,~,>1  a`+
[(D{0$!+")7!p ,^,~p+
@`+
 	DPC

d_(jL
YYG

((yv{0yv{H@(yv{bf
fJ.;' XdJO0XdJOH @cXdJR+XdJOcXdJR[XdJO(( XdJR0XdJRH @4	 @@ SuZp5@,~1  a`+
,>{0dQ+d ~)27!p	 A",^,~@,~,U 7!pS +	 ,>,%Y&IDNIN T: result overflow	D PC	Lc(J"XdJR
YG

(( 
Up&MV
akWal6(T"1G2b,.
GDe>-?Z>-r>4b>5^>5MjcndfiPVj.0)`H	" U eRu I6cp0b+ BD,+ p(@`I`J`J`K`KQpP@Xp	 
7  $XDX!pX@!  @  X@,~G>t= L6cp0b+ 7 	"P a`+7Ep+!$7apl$ X$&IfL M F#p<F D@ D	*D*@ ZG \H ^H O@0	`+
 H H G! G@,~eSLG M6cp0b	*"+ 7 a`+ p[1&@4D*Zp p6  @+@p@,~	""*I';G N6cp0b+ 7 e`,~! @@ ZG \H ^H @@0B@	"T3	d+
sHHG,~eSYN6cp0b+7+@,~eS>-O6cp	"@	P;0b+ 7+@,~gR
+G@@77D6,~+	"T
ALeS=9' ZG \H ^HO`7	`+  H H G,~E3s@ P6cp0b+ 7	 @"@ U a`+ !p0`02`+.p2`W+"p!` 'p.6X @,~	 T*D"]Y>3@ $@@@@@@ <9,6@@+- @ @7 @ 3 @ 1 @ 2 @	(Df 2 @ 3 @R4X  @R4 @!  @  Q w @  X@   	 QAn @@@=D^ Q	`+Z`(@/ Z@6,~k:d:g Q	`(+  Q 7	*UwZB@@@@ <<,`@@7*dv,~I'\gOR|G %p DD <DO,4`-Z@B	""(@ <C,,~ $ D6
&R  5.$D5=@
&[
&0@@6	` $	*E*U" D6
&_@@6	` H $
 D6Q@6[6
&c7@0
&d6@0
&h`D
&k`D	(D(U

&n`D 
&q`D@
&v`D
&z@@6	` $ D6
&~@@6	` $ @6
&	*T"2`Y
&3`
&	@@6	`
&
1@
&0@1@
&@@6	` $) D6	(A*T"! Q,> 7 a`+' D4F' FF <F, ,+,^*d"
& 	""*`D
&`D0
&@@6	`
&6`
&"7`
&%@@6	`
ppp 2ppppp ,H0H	"U
T9X?'@@AX?(@@A	"Ax(xBxeRMj:4	  J4444G>tXz4x6eSLZI';weSX2eS>*:gRK`gRJ E2^-`p?ILLE	 RGAL UNIT NUMBER.
TO HANDLE MORE DEVICES, REASSEMBLE FORRTF WITH A LARGER "RTDEVN".
	 [?ERROR COMES FROM THE SUBROUTINE ?RTINIT MUST BE CALLED BEFORE CONECT
?RTTR	 cP ERROR
?OCCURRED IN THE DISCON ROUTINE
?OCCURRED IN THE CONECT ROUTINE
?ILLE	 lGAL PI NUMBER
?TRAP ADDRESS OUT OF BOUNDS
?SYSTEM LIMIT FOR REAL TIME DEVICES	 t EXCEEDED
?JOB NOT LOCKED IN CORE OR NOT PRIVILEGED
?DEVICE ALREADY IN USE BY	 } ANOTHER JOB
?CONECT MUST BE CALLED BEFORE RTSTRT OR BLKRW
?REAL TIME BLOCK OUT	  OF BOUNDS
?END OF BLOCK TOO HIGH
?BEGINNING OF BLOCK TOO LOW
?JOB CANNOT BE 	 LOCKED IN CORE
?JOB NOT PRIVILEGED.
?NOTENOUGHCORE AVAILABLE FOR LOCKING.
?APR ERROR AT INTERRUPT LEVEL
?PDL OVERFLOW
?ILLEGAL MEMORY REFERENCE	 
?NOT ENOUGH CORE AVAILABLE FOR THE CONTROL BLOCKS
FOR THE GETCOR ROUTINE
 'CORRAD	D"Fdb2b~)1"DmZ)n7I"n7I'n7} ]"BnA"C	@t(BF"B2Y;2\)UC`RUp&R3kT(2U 2	D R
MV

M_sMb)S)TR3M9#\|Ck	D"\|DcuA1uD3b_Bb
akW+
akW +alh
alj{
al6{	De6g@7	9=7]@6P}K
*w"?
+Rc?
CC9@9;A	@9"9Z-"<P [hP [|cu6
x(T"|1G2b|#{:	`^hKz	@"w]n0,.^,.	`
	DY3bW-YH{9YVo
)6FZB7U>>U@
6GDeGGGEy*GF
>/
GK}KNG	@KNHKN
HP~_,
cnCdf>eACeD>V?^:@	=";eUlr0OUlrBK=E8dNDiPVtiPEv	j.tjV	`(|g}PbK
V;/VKP@A	`(SMJDAZW0g[M	)g\)7( ) (J"0(D7H @,	"D(AM?\G L,^,^4l,^x=l 
,>"	
"
&0
&
Z00B B 
 ,^,~:0
	Dt(B}	u(J"P [hP [|u^
"u^v
&	pX-Y; 
";`,
&PbK
V;/VKP@((
 9r_09r_H ggMN~-_	"Ag?@ "	b=+@Z.6C"C(
+X+ "  $  	 D
	h2+ .&=b
 <+	b+ <,+
@@SRTh*	ZC}K	``	WJP
*uP [hP [|cu6
#\'+	;4^	`=

U>@J^	`2P#)R	D"pX7pX99r_mY
mY
UGoYYZ	ZUlr0OUlrBKPbK
V;/VKP@CGAP J\R+
LA$5C g[m	W.J+H@`[m	x(