Google
 

Trailing-Edge - PDP-10 Archives - AP-D480B-SB_1978 - fortb.shr
There are no other files named fortb.shr in the archive.
eQh+Q`
"xHM?H@,>Z+@,>Z,>+@,>Z,>,>+@,>Z,>,>,>+@,>Z,>,>,>,>+@,^,^,^,^,^,~Z< \
	Q>~
Z<pX@	`CC~0C&l`C&v@C2|pC2|t(C6C6$C6MdC6Md C6|@CNM`CR
dPI~0IFIex:I&hI2|pI2|t(I6I6MdI6|@INL{@INM`IO-KcM2|S0SMPSMmSOS;SNL{@[B[B[&r[&r[>e))$%!&,&/.2*/3*3+#5+#>z(:(Lh(
( l 
`j 
Pz 
PNh(h!|P*!xh!|`*!xx@Qn(?`ow{}~?ow{}~?ow{}~?ow{}~-0.U (QHr, Z
QL`  wXN`1N Xq bS(@GHhR``+[
`4LU[`+SZ`5P\Z
` JpS,@BL( 
XL`  bS.@GNh wXN`+Z`Z
`3*w+S+IZbXN` /U+-0.UZrZ
$] Jp0h+yZr1n+g,+x,{ Zp 
p.
p ( H`5Ho, p.p ` P8R`@d  +z,{aZ+rl +y `Zh4NuZ
h J`+o, ` 
p.
pZ(XHhXZ(d 7`@/U+ r+@$|+++@+@ 
t&*'+ tFu 
&* + 
t1*+&*7 #
,~-0 w h ( H
2l& 2XX+ w han+Z/0 
(
(V,T3H+O+Z+3xX+8Z@+]+a+c+i+j@+q+v@ ` 
rjV 
t Lh .nV 0pW 0H+z *jW+z ` 
t Jh 
u Lh .nV rpV@hW+z ` 
tXJh ,lV . Nh+zZ
`5J= `QZ`XZ`+? ` `XNhXN` ` t Nh+z7Jb+C `XZ(+J `XNbQNb 0pXZ`8 (hX, Z` b 
`XJh `XNb mQP8 nhX *jXA( ,1(@
 00h@A
 .1H@A
aL+Z[
?5JX `XZ?QZ?+Z ? `XHhXH? ` 
nQJh4JzQZ(+z ` 
tQJh 
uXLh@@h rnV+z ` 
njY+z[
a5Jf `XZaQZa+z a `XNhXNa+z,<R+z6Je+m `XZeQZe+n `XN(XNe ` tXNhQNh+z6J?+t `XZ?QZ?+z `XN(XN?+z6Jf+y `XZfQZf+z `XN(XNf `,~ r+@$}+++@+@ ` 
t2Jh+O,~ `*V2Jr+.Y4N	 t2Hh+ 
u2Lh++ u2Hh++ `Z
h2Jt+:h+@,~-0:w~1(+ 
w lXN0 Ll+ 
wZ gXN0XL g+-0,>[r0h+Z g4Z hXN g+$ ([
r.l(/
"Ll3lZ+$ /l0z,
\	z,
\ /( Hl[
r/
("@@h[r1P+)Z*hQZ,hX.*8G,^+ 	 Ht 
Z Jr:
	,a,~-0 (QHr, @@`Z`` 
w}j[ 
w}l[ w~n\@@` w~QP` wXH` +-0 (QHr, @@`Z`` 
w}j[ 
w}l[ w~n\@@` w~QP` wXH` 
w|XJ`4PJ.\ (0N@*\ ,0J@
GaH+IS:GZ`+JXX@7Nw+R*X 00J@,X (0L@GaP+RS:GZ`+RXX8 +@	`.,[hh
h(h88hh0`
``@a	C^__VU,>. 4c 
 (lg*
 4Q(lg+*)
G/4G#t0b2+4Bz@@x1b+m/" Bx "(B7 t"`%
/  %
0.%
/dr.,.dn.,`l+v)
/4 (&00LX./4@6Bx+ja@..@dn.,5,~)
.4d,`T+)
|t L N/,^,~ t7 g
U, L L,>	,6C/+6$ 68}g5'G2"NPQ(\:]/*DB$esI4[5RmP;ar!Cd_4b%-)Dt]w!znX=3vu5
9J.L 9k1C~=(H%]<~
42Z/?T+OA?0{/Je1'NMT'&Wa&5uTX0-YP+E	n<95w,*%cZA)Z={Z/PC$L`%PD2+}?x/$U?^6|ov:;mjoV".z-4Ref*yG8Fag?5Wy&W
z!/!F{hl4m4)xZb6GBa46q:c2Jz b&t^OoNl(zpQu!#kBG3Lf3Lf3 (2>@'0j=@&h/WB;M2@% /H.H;::J(@$0N9(-<bR8kzIF#C<M|,4+a;
7A6Yi,@"Xrh+/^b6r5\.z@!pgAI,H*-1|WZ4x!^;mP@!B()-z-f Rr3Y8y( N@ 'sKc1a(1p>\-9y*2>,N4g'7T?
lh<\j6HmH%NiJB*6$D$$D$D$D ` 	AP:b8T
# nD	
$dy$*%a>1FIZ8g9t> ("E#I
(L&irDR*
b^Y-KJx`0l3f4[~-0.- w[h H
hJ0L+0. P
m Jt,>+( w 
(Jj0 
3Lw,>0Zp,r/0 pQZ8@w 
A`Z+F,>*w,> Zp,r/0 
pXZ0+F0.5P*24J	.n0+ 
AaH+ww0+w0p0
mLt,>,>*+D w,4 01L@.4 :1N@A 
AaZ+3,>m,>+,6;/3 w,l0 
p+ m Nt + Pu,>,>,,6/3+F@/-+-0 w(45HLZ
hhLN40L+P[h,P,>,,6/3+ 
G,5D`H+q,>
XJh+f 
QJh1+q6Hq 
 ,0H
@
A
aJ+q 0GPh@+-0 w~(00H+z 
w~ .0L
@ 00L@GaN+z ( Hw~ w~ 
w~ .0L
@00 (0P@AaN+ w~+ w~ 
w~ ,0J
@
00 (0P@A
aL+ . Nw~ w~.10N+ h P	c h H	c,3(L w~(N.
.
- L	e,
u 
5 Jr 	d Pt 	d Hu w~ Nr,a+,>w,>603,>,>w~,>6,>,8/-+-0 w(10H+! 
50Lr@@t h Nu 0 Pr,a+,>w~,>6 w,3,>,>7,>6,>,8/- Zw .GNh7w@+@	`#<X'Z
 
(h
 h8
h8
h
hh h( Kc-aCN=ma-0
 w~[
U J
w.F8
3N+cZ* Q*	,>,>m,>E,6/F+ ah+g,>w~,>w,V/G+@@
Z6(Q6	Zw[w44( ` N
XL4Pq,>,>H,>H,r/F Z
aL+},>H,>I,>H,>J,>
h$
@.j
haL+,>H,>L,>H,>J,>H,>
 
($
h.l 
h1J+$,>H,>I,>I,>J,>
6.0+3,H,>I,>H,>J,>
aJ+A,>I,>H,>J,>
w,>,>w,/G 
hJ+00N@H(0J@GaP+TS,GLh+TXZ(7
QLt,aZpQ,>R,>R,>,>,>,./O  (hS[
w.*XJP 
S Lr@@t m Pu Hr,aXZPS.GNP w~[h N
8XJPS,GLP@[
w Lp2rp+{ .w @(T4Hv,>,>H,>H,r/F  
.
XX(,T0L+zS:GZ(9oXV`9o[w,>,>w,/G,>N,>H w~.O,>,>,>,./O Z
hLA0 Ph 
XLX /P+-0 w~1H+! 
wwLNU0L+0U0P+Z
^0LZN0P+[
^L0N+Z
0,>,"/P`Z+,>m,>E,6/G+! 
]0L+&O+0K0P++,>,>1P@
AaN+5[
 ,>,"/PaZ+9 wZh,>+8,K0L +9Z
 ,>,"/P+@+-0.P@ w~< Hp2xp+B 
.
wZ
(2Lw~9=O+C9=@/P+@	`OJ$@(8	0
h
  
 @
 h
@F h((aJ|G
hX(``  0
 -0.
YSwZh[H
h J
hhLN
Y,
Z0L +wZ( N
Z0P+w(
[ *0H
@
0
[ ,0P
@
G
aJ+r 8 H	c 8 P	c,
[.

R L	e,
u 

\Jr 	d Ht 	d Nu 
\ Pr,a+w 
\ Hr 8"Pt 
8"Lu*
[Jr,a Z
]0N +	Z
hJ
Z0L+	.
] 00N
@,
] (0L
@GaP+	 ( N	c 
( L	c(
[.
R H	e,
u 
\ Pr 	d Nt 
	dJu 
\ Lr,a+	 
\ Nr 
("Lt ("Hu0
]Pr,a Z
]0J +	(Zh H
^0N+	(*
^ ,0J
@
.
^ 00N
@G
aL+	# 
  J	c   N	c0
[.
S P	e,
u 

\ Lr 
	dJt 	d Hu 
\ Nr,a+	( 

\ Jr  "Nt  "Pu,
^Lr,a Z
_0
_3N+	/,>,
^,>,>
`,r/
` Z
(
_.
a3H+	5,>*
a,>,>
`,r/
` Z
,
_(
b3L+	<,>0
],>,>
`,r/
`Z
b4P	? w ,@GLh@@
]0L+	Y.
\0N
+	K 
h J	c 
h L	c 
S H	e,
u 	d2N
c+	J wS*GJh+	Y2N
c+	Y+	Q*
b5J	R h0H+	P wS0GPh+	Y h2P
d+	YO@2N
c@ ,6J @
AaP+	Y wS.GNh 
d1N+	p *QJr, Z
XLh wXH0S.GN0 .n
e0BP0 
\,> Lp,$/
e 
pXZ(([wQJh[J
hQL(Z`h[( HpQJ  w 
XJh,>
f Zp,$/
e 
pQZ0@@
] 00N@*
^ ,0J@
AaP+
 Hp `n7
T 
T 
p,
f..: Z	e 	c ( H	d 
( L	d,
u 
\Pr 	d Nt 	d Hu 
\+Jr,a Z
,.
g1N+
" w ,l
gX0QPr,SZGJ  *j
g,BL  
\,> Hp,3/
eXpXZ@ QPhZ
@J
h4L
"[hQN@Z`h[
@ JpQP(,>w,>
h,>
h
\,>,>,>
iSZGPh[h P
i .0H@n
j w h`n+
c
] ,0J@
0
^ .0P@A
*
^ 01J@A
aL+
G Hp `n7
T 
T 
p0
f..: Z	e 
(hL	c(hN	c,
u 

\ Lr 
	dJt 	d Nu 
\+Hr,a Z
ca+
S,>w,>
j,>
`*
^,>,>
`,>,8/
iZ
]0P+
RSGNh+
cX+
c,>w,>
h,>
k*
^,>,>,>,8/
iZ
d1P+
[X 
k (0J@h
jZh P
i .0L@n
l
\1H+
h,>,>
f,>
`,r/
`Z
]0L+
p7.h@@h 

\ Jr@@t 
h8
 Lu 0 Pr,a+
y 
\,Nr@@t ( Hu * Jr,a Z
h,>
`,>
f,>8/
i Z w 
 
0
] 80P@0
lD.
mA ( (0p@A 07.(@A 0 .0h@A 07*0@AaX+ 
\SHr@@t 
h/
8"Ju,hLr,ahZ+ (
]0H+ 
h0j+ w 0p
m wS0GPh+ *
d0J+ w 0p
n+ ,>w,>
j,>
`,>
f,>
`,>,8/
iXZ@/
Y+-0.
eS( Hr*
U.*S
.
U..(N.
0
V.0(P.
(
V..
n Ht:
	H,a Zp wn
\S0BPh p/
e+-0.
eS( Hr*
W.*S
.
W..(N.
0
X.0(P.
(
X..
o Ht:
	I,a Zp wn
\S0BPh p/
e+-0 wZh H
 8
XL  w[
hLZ08XP0 w[h P
h0J+R 
oXNr, Z
QJh7N0H+X 
QL8,>,W/
e+\Z
80L+\[8 H
g0LXN  
ZL@P+-0.
pd   (QHr, Z
8Z
(XLhXZ( 
d 0p
p,>w~,
0/
e Z~(
q1h+oZ*hQ*	.* J
aJ+r 
q Zt+s 
rXNtS.+Nr,a+Zz ,l
r :z
s w~,
q"L
.*$
.,QLrpXZ8 Z
 
\+Pr@@t ( Hu * Jr,a Z
 "2P+
h 
.
 
Z0XN(S0GP( 
:
.
 
8XJ0 0p
s3X
g:..n
.Z8XP S,GL :
9
 
\XNr@@tGr,aZ
hXL S.GN  wXN S0GP [hXP S*GJ  
XJ  ,l
t@/
p+-0.
e w(
qZHQ*	2J+
; 
[03N"+
9@+
;9*.j
5 :/
e+-0.
e@@G[b H87J8+
O.
t0N+
NZ(4H
NZ(ZN Pp2xp+
N.Z
lL
u0J9
E[09P
E,>,>,`/
p9
E 8Zh+
>@/
e+@	`
{
	H
	H
	H
	H
	I
	I
	I
	I(h
 (
 88.(h
 h(
   
h
 
00
(h 0_Ph0( h0@8h8.h8B &h(hL$ h$@hCR@CTs@
@D@F0F (
 0+| 	c 
	cZ
	e+@0-.
x`n@0,c H	d J	d,~.
	d,
	d,
	d,
	d,
	d,
	d,
	d,
	d,,<P,9,9+ ,9,9,9+ + ,9,9+ ,9,9,9,;,;+ + ,;+ + + ,;,;,<+ ,;@
+ + + + ,<P,<P+ ,C,C,?,>,>,<P,<P,N+ + ,U,>,>,<P,<P,N+ + ,U,>,>,<P,<P,K * *+ ,U,`A
	dG
	dI
	dF
	d(,`@,	h`@,|*.	h`@,	d 
	d7,,	c 
	c,~	d
	d,~	d
	d,~,<P,<PL"`d*7@:,~,,<P,<P,
8,~	dH8,~ 	dH8J8,~5*
"	d(
8,~"	dH8,~"	dH8J8,~ 	d(
8.
	c,~ 	dH8	c,~ 	dH8 |*.	h <	c, }*.,~ 	dH8	cJ8
	c,~7N	d+ N	d@aN+(.+
`N$
	c+ *,~7N	d+,>	c,>	c,>aN+
(.+0H	dJ	d3Nx+(.,> H	c J	c,
,>~0N	dN	d H	c J	c,
,^,^x,^x,^x,~!( *,~#
,<P,7,.,0,1,3#,',,,.,<P,4,6,$ |*.	h7 ,
	d J	c,U 
 	d,~#7 	d"h,~3h	dg	d,~ &	d,~3*	d 
	d,~2j	d 
	d,~3(	d 	d,~2h	d 	d,~#
7 	d"j,~  *,~ 
 (,~5Jt 
},~ 
 (,~ &(6@h(Fh*6 *,~ a`+H&(6@h(Fh*6((J,~@
)|h(F~,~#%((
'.7	c"j(,~7~,7 	c"` 
(,~4Ht7,U(+7 	c"` *,~4Htl*.*@d
ej.(l(,~7,,6;,^x,^x,^,^,^Z
	e0,/,
{A,+r0,r0,+p/,r ,4Ltan +u@h,~4(wU(0LU*,~1L+z 1L 
,~S( *,~
v@	eX     HZ @7 6Q<+7 6Q<+	7 6,>"pLpcX=9+7 6,> p p!`7Pp+35V  p+3:<2<7`B:7`B2 /6`: pd<56l<L"`cX=:50l<L"`cR=:d6~d0~4t>"`)Pa|+!`|+CL"`cX=:a|+$L"`cR=:d6~d0~+$%.+$x.`vh6ev+*dv`v,@lav?)ld6~5V0cX=+y7)av=/`Z+ydZ,?z<+{ddZ,?z<+{@v,^ Vpd8 Xp,~ddZ,?z<+|6$6$?,>+,)P9B:l"`L@cX=:,~l+$7 67 6Q<+G,>7Tp+y44Z  p!`7Vp+yFP46\ p:<4<.:W@A:`|lQd6~d0~))%% %+$U.+$|.+$}`X.8)[+,L"pcR=9J+JL"pcX=9M+M7 67 6Q<+b,> p44s  p!` pF46v pPbV}+i+ycP}+~:<4</:W?A:`|lQd6~)'%JcT=:.'[58*=*L"pcR=9d+dL"pcX=9g+g9&6aZ@+4+97H7H
79V9WH
6,>In,Ak/a,~-06H#+O@# 
w 4( (nO/0"1v+/6 
\d,(5:S.(NXF5X+ ..S P# :[#(Z +,>In,Ak/a Z# :[
#(Z0+-0(w~/"<"QHr, [
r<
QJ`,w~5L@pwxw~ w~QX R``+  w~[@XX R``QX@0w[r.<pw*w~Z,(CQ,	Q8Z. *8o J" +-0.a "/w~  
w.
QJr,XZr 
r.
a LpZw~4N:8Q rX 
w~[
(.
 *:g [(.pr ( Nw~[`,>,>,/b+/4V? rX 
w~Z.(CQ . *:g w~8 P" 
p J@B@/a+-0 "/w QVr4VM,XZr 
wZ.0CQ .< *:`8
 L" r.a H0B@+-0.b "1(}+R,>[,6?+t 
w.\ Np0\+@DU+B+Y+l+m+u+++)+;7H#+[@@#+],>In,Ak/a Z#[#3Np+g1n+b,>],>],6?/b p,>l@T[#,>l@T,>^,6?/c (QH#+ 0[#(P Ac7Z+B:" 
# L8B+B,>+ " Hp *^. Np2xp+s,>,N/a4:B9p,>p,C/a+B,>,/a p w*_.
p Jp2xp+} Ad(4N} +9y,>w,C+t@@	r:
" /p8 H0B,>,N/a5:B+B,>,/a p w*_.
p Jp2xp+
 Ad(4N
 +9:
"@@0B+B:" 
/
p8
 J B,>,N/a5:BO+B@@p " Hp,>p,N/a4:B7N#+[#0P+%@@#+ 0 P	t,>Io,Ak/a4Z% "10s+Z*pQ*	,>Z.pQ.	,>Z,pQ,	,>,/c+7Jp+s,>p,>,>p,(/c+B@@p " Hp 
"1*s+1Z,pQ,	,>Z0pQ0	,>Z(pQ(	,>,/c,>p,N/a4:B,>w,/a w D(A5H*7Np+s,>p,>Z0pQ0	,>+'6H#+= 
<d,0+B[# 
p/.3L+A 4d, +B@@#@/b+-0.b@@p w 
$( Jp 
p`L+J(L Lp:p+F p,>l@T[#,>l@T,>_,6?/c:p p(Z Zp4ZY p`H+S(H Hp:p+P 
p0J
+V,>`+V,>,@T,>`,6?/b>	p+MO/b+@	`U04j004jf'04j0$jgx yX+*{++"*R*L++A+k+G*d=P0`@ p
`@PPpPPpp
0P00 	P0	`
p@PP
P@
pP@P PPpP	0P@PP``	 P
@00	`	p
0P
P
`pP
p` 
0
`
  P@
P`@@  	0p@  	
 @
``
0@Pp`p0@P
P @@ @  	p
 @0	P
` 	 0p`
Pp0	
000@@@P 	
P@ PP@! 
0PPP `@P`%`
`0@P
pP
``%`P 	P
`0`P ``  	p @0P
PP&  P`
#p@!@!0P!``!p "0@"`
`$P
%p@P' 	0&P 
&0&p(P 	 
'P`'@'p(P(p@P(```P)pP)```P*`P`+` (((  @  @@@@@   @    @ @D D@ @   ((( (@     ( ( @( @@ ( ( ( (     ((@  	 @   @	   @ 	   @	  @ @@	 @  @   @     @	@ @	@  @ @    @  @  @  @8SYNTAXACT"FUNCTION"-0.2 w~/( H
h J
h0L0N@ *0P@
GaH+u@+ 
..03DaN+ 
(
Z,[,4.mP+Z*@/*SJ Lr 
pQZ([(H.6n6 l[ P  ,l7*1 .1J@ 
A(1 ,0H@
Z
@ (0*@A
GaN+!,>w~,>m,>1,6;/5+* 8Z
@Jp2xp+* 
pL3N~,>m,>2,6;/59# w 0p8@/2+@	`Bl[J8l[J.l[$l[PJ8&0hh (
 0
hC`C~3@C&lgC&vC@C2|s@C2:C6C6'C6MdC6Md'C6|C@CNMc@CRdGI
dS@I~3@IF@Ie}I&i`I2|s@I2:I6'I6Md'I6|C@INL{GINMc@IO-Kc`M2|S3@SMS@SMmSO@S;!`SNL{G[B@[B@[&r@[&r@[>!`e
2j+i,>,6?+O@p	[#1P+C,K:
p	.
 Z(5:oO+F[#70<!+s6jp	+w.
 (+F7jp	+C[# p	.[8 
$!3*D!+C 
p	.
 
( Lp
  Pr,  p	 . XXVP>p	[
p
 Np
0J+4H.[
+0j+p	.[87(D!+,>	,6?/
S:GZP+XTX Xah+S0GPP (hZ`P+@>p	. @QHP[
p
/*+@,+1+++ +"+#+'@@@@@@+)+++,+/ ,lZp
+0 ,+) ,BLP+- ,BLP+* ,BLPZ
p
1L+0[:+00,ll+1+,l :+0+,l+&,l+:pBZP+1+,l :z ,>,d/
Haj+@S,GLP  
p	.
 Z(+o:
p	.
 
#L(,~Z#+j/+-0
# Lp,~ Z#[#0N+1 " Hp,~ Z# p*0Jl [# 01N@ (1N@AaP+[,d:
"Z(B5:]O+J,>	,6?/
#1J+P[#1N+c,>@[,><@T,>,6?/+Jd ,>p,C/
@B.
@B Jp2tp+n 
P Lp.0N+lS:GZP9gS0BPP9g,~ Z# p01P++d  2Z&+uZ.hQ.	,>,>
,6?+; "[8B.(QHr,   Pr 
p Jt Tu, Zp 
p.n (h "[
@B8
XJP @B .6[@B42	 
.
.8HpH0`h+pXP =2p0.HaP+,>,/
"[0B42# . 
  Jp.0N+, (0L@. 00N@GaH+#,>,>+",0L+#,>[(,>,,k/=2,> p[
h,>,,y/ "[hB,>,>hB,/ 
p Jp+0,>,>,,y/,>p ",>hB,[/ Zp 
p L"+J p haH@+H* ,0J@
.0GD
(M
aL+<,>,>,,y/+J*0J+F h`n+E,>,/
/* ,9 Pt,a Zp,>+H,>,>+I,>,>p,,y/ p/+-0.@@p[#0H	+V6Lp+U  Pr, Zp (h *pBJh p Zp+W@@p+W0H
+X,~ Z#+M[
#0L+:,~ Z#,d Zp4:K[#0H+3@@p p,1L+cZh Pp(5HdO@p+f04Pf,>@[[#,>l@T+ p00P+j,>
,6?/*0J+t@@	c h N	c  P	e,
u  Hr 
	d Jt 
	d Lu .
 Nr,a Zp7Np+ p h H	c 
h J	c,.
 L	e,
u  Nr 	d Pt 	d Hu *
 Jr,a Zp p(4H 
h L	c h N	c 
 P	e,
u 	d Hp+ 
h Lp@@p,~ Z#[
#1L
+0L	+
O@p,~ Z#[#1P+,>@U,>D@T,>,6?+9Z
# Jp,0L+@@	c ( P	c 
 H	e,
u 
 Lr 	d Nt 
	d Ju 0
 Pr,a Zp7Pp+% p 
h J	c 
h L	c.. N	e,
u  Pr 	d Ht 
	d Ju ,
 Lr,a Zp p*4J+ h N	c h P	c 
 H	e,
u 
	d Jp+, h Np  Nr p Pt p Hu * Jr,a Zp,~ Z#+6 p,1L+6S0GPh[
#1L+@,>@[,>4@T,>,6?/+ 00L@ (0L@GaP+AZ
# Jp,~ Z#+C,G Zp4:[#0P+` 
Jr, Zp ,ll pQNh,~ Z#,K Zp5:LO+ p pXHh,>,d/
h Jp,0L+TS0GPh+WXZ( (ap+W pS(GHh pZh Pp(0H+\S,GLh+_XZ@ 
@al+_ pS.GNh 
p Lp7Jp+ pXN(Z`(00P+{,5Ly0 (0P
@, *0L
@
GaH+t 8 P	c 
8 L	c*.
	e,
u  Hr 	d Pt 	d Nu p, Lr,a+  Pr 
8"Lt 
8"Ju( Hr,a+ pS0GPh+~XJ8 
8al+~S0GP( p 
p*Zp0J+P:+: pz  +7p@/+@	`j|[zc
PXPH0
h00hh$h,h(
(.h$ 
@
h(.(@8
88@
~}}||~~-0S( Hn Hr 
sXJr,  B 
XXL` wXV`,>,G/tZ`.t0N+8S:GZ`+9XXXZ`(t0H+<S:+>XXX 
Xal+?S:GZ`[
B,>,>B,/u+-0 B `,>u,>,,k/u4:G,>,-/t+-0 B@@
0J+S.v0N+SZ(XQ(	,>,>m,>n,6?/v+S.GNX w Nn Nr sXPr,  `XHX 
CQJX[
,>,>,/u[f5NXVfQVf+ fXVhXVf+-0
w Ln Lr sXNr, Zp `XPhR`hZ`h@+ ` 
`0L+@@ Zp ZC4:[p0H+x pZ,hQ,`@0L+xZ0hQ0	,>,>n,>n,6?/v+7LP+ P Pp @ HC [
C. Hp2rp+ HZ
hLH9}[P,>,>P,/u[C8QPC+@@C x Pn Pr+ P PC [C. Pp2rp+
h JH9
 
P LC [C8QNC(x1H+,>,>y,>y,r/v ZC 
z Jn Jr[,>,>,/u sXHr, Zp 
CXJh[
CQLhZCXNhZh0t0PXZX/v+-0
Paj+(,>m,>o,6+[ TC 
{ Ln Lr sXNr, Zp7PX+V 4D 
X ( [
.
 Lp2rp+F HZ`PXDP H0N+D({0H+?S,GLP,| .0L@0| (0P@GaN+E,>y,>,,k/u+E 
pXL.{0N+E,>|[,>+>S(GHP8.2+1 X  [
,>,>,/u,>y,>X,/u 
/
o LDZ`D D..QNr,  pQ 8X 
D.
8
 *8+V@ p 
CXJhXThd  [
,>,>,/u/u+-0,~ Z#O@#[#1H+f,X ZB4:q[#1N+f,>@V,><@T,>p,6?/v+@@B 
} Ln Lr sXNr,  BXXX4Xq(}0HXV`,~1L+,>,>y,>y,r/vXZX+,~3Z~+w,>@V[,>l@T,>p,6?/v,~ 
 Jn Jr 
sXLr,,~-0,>Ip,Ak/t6X+,>In,Ak/t3Z~+	,>q+2X~+O+,>In,Ak/t3Z~+	,>@V[,>l@T,>p,6?/v+ +-0,z66+
 Jn Jr 
sXLr, XV`+-0,z66+O+ 
 Jn Jr 
sXLr,XV`+-04"/t5:.+V@@D@@E@@E8l ,>,3e/t4:V w2N+) w Hr@@t"* Ju , Lr,a+- w Hr@@t"* Ju , Lr,a ZC@@D7LD+4 0 Pp D2H+4,>q,>r,6?/u+4@@p C Pp D Hp 
E Jp 
E Lp7NX+D 3R+>,0L+>,>r,6?/t X[
X,>,>X,/u,>P,2/t64+G+V2H+G,>s,6?/t+V@ w Hn Hr 
sXJr,  
pQL` pXN` pXP`[QH` 
pQJ` 
pXL`,>,A/t p7.h<[,>,>,/u/+ ( Hs,>,/t,~-0,>, /t  w Hr@@t"* Ju , Lr,aQZ`+-0,>, /t  w Hr@@t"* Ju , Lr,aQZ`+ ( Hs,>,/t,~@	`>>@DD X
X(((X((
(``( 00(@FH@OCTAL DIGIT STRING OR 'TEXT'RANDOM ACCESS-0 B   * J
`1L+,>`,1`/  [0N+( 0H+Z*XQ*	,>,>|,>},6?/ + `. 1N+,>},6?/  w Hn Hr 
 XLr, QV`[
B,>,>B,/ @+-0
.  B w2H +$ :+% : Zsl @@D,>,3e/ 4:< D Np7PX+. X,>P,2/ 64+1+<2N +1,>~,6?/ +<@[
,>,>,/  
w Ln Lr  XNr,  pXP`R``[QH`,>,A/  / +-0,> , /     Hr@@t"* Ju , Lr,aQZ`+-0,> , /     Hr@@tO@u * Jr,aQZ`+-0
.  B X( 1H+R,>~,>,>,6?/ +p Tp@@Dl Z,XQ,	,>,3e/ 4:p D Pp2P +[ 	q8,>,> ,6?+p 
s1Jg:pZ4:p7PX+d,>X,2/ 64+e+p@ 
w Jn Jr 
 XLr,  pQN` pXP` pXH`[
QJ`,>,A/ [
,>,>,/ / + ( Hs,> ,K/ ,~ ( Hs,> ,K/ ,~-0,> , /  Z`0H+~ 	q8,>,> ,6?/  
  Lr@@t". Nu 0 Pr,aQZ`+-0     H	t 6,>Ip,Ak/ 4Z,> ,N/ 4:,>,+     Z	t=6,> ,6?/ +,> ,/ ,~,> ,/ ,~-0
xBX`X0H+, 1L+#,>~,> + P, 1L+,>~Z0`Q0	,>,>,6?/ + 0 P
  Ln Lr  XNr, QT`R`` XXP`Z``R``Z``[,>,>,/ +-0 w h H	c 
h J	c, 1L
+60 (P.  P	e,
u 	d H	c 	d Z	c w0 1P+: 
  J	e,
u 	d Z	caX+<"	c+ 	c+-0
.  w~ w7HX+D 
X0L+C"w< 8,>X,-/  Zp w.67LX+K X0P+K"
w<
 8,>X,-/  Zp   Pr p Ht 
p Ju , Lr,a/ +-0
. @@p@@p w[w.w Hp2tp+% * Jp@@p 
P0L+ P7N`+` `0H+_O@p9`@@p9`@@p `0H+f,>`,>p,=/   *.jp@@p+ ` `7J`+0 0P+p7Lp+o   Nr@@t X"Pu ( Hr,a 6.X+s,> ,6?/ @@p+ X Hp ` ` 
`0L+7NX+{ X0H+zO@p9{@@p9{@@p X0H+,>X,>p,=/   *.jp@@p+ X 
XaJ++[X+ XaP+ :+ : Zp p$p.pp7Hp+* 5J   Pr@@t X"Hu , Lr,a + X P	c X H	c, .
  L	e,
u 
  Jr 	d Nt 	d Pu(  Hr,a+ P[X.np .QNr, Zp6Pp+  pXZpQZp+" 
pXL@XLp p 
pQLhXVh.4+WSp[
p./+-0
.
 Jp2rp+D H X `[
,>,>,/ ,>,S/  Zp[,>,>,/ @@s@@",>X,2/  Zp[p,>,> ,> ,
/ [,>,>,/  
  Jr, [
pQLP pXNP[p PP mQHP9+ 
B ([
,>,>,/ ,> ,>B,/ +-0
 ( H	t 444R(X,>Io,Ak/ 6V+P(XP+T.8_p/4+L,>Io,Ak/ 5ZR7@+-0. ,> ,N/ 4:e 
" (B,> Jp,1`/  
ppZ0B78+e[0P+d* 0J+dZ.`Q.	,>,>|,>},6?/ +e@/ +-0
#3J +o,>@Z[#,>l@T,> ,6?/ ,J Z#6N#+s,~ Z#+Y #@0r+z2XL &+yZ*L &Q*	Z
( Lp[(+|.2+t 
#J,> +d 
p1L
O@p,~ Z# #3P + 
p0J+:"S0 P8BO@#+U,> [#,>l@T,> ,6?/  
p0J+7Np+
,>,>,>+e,+ ( H,~ Zp@@#+U,~ Z#O@#+@d+S++++4+D[#0N+Z# H
.  01N@A
aL+,> +I:
"Z# H(B@@#+'0N+$Z
#J0L+2,U5:'+v,> 	,><@T,> ,6?/  p2H +S 
"Z0B Np>"+U[#0N+/:"Z
# J B@@#+S0N+3Z
#J0L+OZ.(+H,> 	+Q[#0N+8:"Z# HhB+.0N+A #* 1J+=,> 
Z0`Q0	,>+d:" X@B,> ,>,,y/ +.,> 
,><@T,>,6?/ +.[#0N+QZ#Hv #. 0N+O,>m,> ,6;/ ,U5:S+v,> 
,><@T,> ,6?/  " pQP8B7H#+W@@#+X,~ Z#[
#1L+o #3P  +^,>@[[#,>l@T,> ,6?/ ,~3Z  +b,> 
[#,>l@T,> ,6?/6Lp+f,>r,  
 Q 
X ". *6P+n@ 
w Jn Jr 
XLr,"8XNXQXXpQPXZpQHXO@"/ +,> !,f/ ,~,> !,f/ ,~@	`>>' ".H #H $* %
 J K M NB
XX @(P@@@	@@
@
@`@	h
h8X.(
`h0 (
 Xp(@@
G?-mSPACEFILEk:N@k:N@
M&dPe|RCOxt	I&aJ~I1I'XzI'yM&d\tE2|:yEV4i9m:7a	Iv::
KK(OPENOPEN/CLOSE,PARAMETER"="PARAMETERKKmfYCONSTANTOR4VARIABLEVARIABLEOR LITERALARRAYLITERAL~ORARRAY,NAMEVARIABLELINENDDEFINEDk:N@-0, |6X+ R@+ * J	t,>Io,Ak/$4Z X7NO+ W,>$,>$
(
.
/, + v +-0
 444!(X ( H	t,>Io,Ak/$6V+! , L	t,>Io,Ak/$6V+!(XP+!.8_p/4+ } , L	t,>Io,Ak/$5Z! 0 P	t,>Io,Ak/$5Z!7+!+ ( H	t,>Io,Ak/$5Z!@,~ 
$L	t,>Ip,Ak/$5Z!O,~0XP@@Q@@,>l@T+!: 06NQ@ *6HO@
GaP+!+, O1Z+!$4:!d6LS+!/, d1Z+!$5:!/,>$+!L,!5:!1,>$+!L1Z+!$ * J	t,>Io,Ak/$5Z!7,~,>$[,>l@T+!:,~3Z$+!<,>@V[,>l@T,>$,6?/$+!d6NO+!>S*Lu JO O	z`z+!C,>m,>$,6/$+!d6JQ+!E,>$+!L@@N ,P LO
N+ OHQ@5Z!N[
4J!LZ`RZ`6?/$+!d,>Io,Ak/$,Kj 
	iL H
	kJ P
	{L+!X 	} Z
	zJ:
	} 
L	wl@ N	| 0 P	y,L"1Z@,!e@/$+,>Io,Ak/$ 
 J	i 
 L	y 
 J	{6L H	{S*H J	|,$ l$.$ n$0$!p$($!h$ 	w 
 J	y,L"@,~-0.$6H#+!} , L	t,>Io,Ak/$5Z"+![
#1L
+"w+"8@@#,L	t,>Io,Ak/$7V6@C(Z./: ,>Io,Ak/$6V+" 
+",>,>$,>$,6?/$ .
2Np+":p0X
+"
+" :
+",>,>$,>$,6?/$ (2Hp+"(:p0X
+"!(++"%,>$,>,>$,6C/$+" ,>,>$,>$,6?/$ ,2Lp+"2:p0X
+",2+"0,>$,>,>$,6C/$+"+,>,>$,>$,6?/$ 0
2Pp+"7:p,>,>$,>$,6?/$7/pO/$+-0BwH+"I 
	q0J+"H . N	qd l  `,>h,-6+"L,Oe+ 
	q0J+"K . N	q,>`,./$[
B,>,>B,/$+,>$","9/$,~,>$#,"9/$,~,>$#,"9/$,~,>$$,"9/$,~,>$$,"9/$,~-0 BO@& ( Hsd l ,>`,-6/$,>$%,>B,/$+-0 BO@&@@sd l ,>`,-6/$,>$%,>B,/$+-07Hp+"k,>$,6?/$,$%5L"n,>$,6?/$+l  B0$%0P+# *QJr,  VB 
8
 LX .$& NX .$& PX .( HX 
% JtS, Lr,a ZX .QNX@@X .$' PX ` 
  JX@@X,$4:#O@& * Js,>`,-6/$,>$%,>,/$+-0.$,~ Z#[#0H+#Z
# Lp 0 N%,>$',>,,'/$ pS0GPh,~ Z#[
#1L+#,~[0P+#,>$,6?/$/$+-0
  Jp,>$%,>,/$ p[
p.
p Lp2rp+#H H `,>$(,>,,'/$4:#JS0@GPX `0P+#D ` P+@$#'+#A+#)+#*+#+ P+#@ P+#@ 
P Lp.$( 00N
@*$( (0J
@GaP+#; 0 N	c 
0 J	c($).$ H	e,
u $) Pr 	d Nt 
	d Lu p*$* Jr,a+#? $) Nr 
0"Jt 0"Hu0$( Pr,aA:.$* ZX[
,>,>,/$+#E ` HX[,>,>,/$9#[
p,>,>p,/$/$+-0.$,~ Z#[#0H+#VZ
# Lp 0 N%,>$',>,,'/$ pS0GPh,~ Z#+#W 
$+ L%l 
[
#1L+#[,>@V,>4@T,>$,6?/$/$+-0O@&@@s B,>`,0O/$,>$%,>B,/$+-0
C.
C Jp2rp+$ H6LX+#r2RC+#o,>$+,1W/$ +#~,>$,>$,>$,6?/$+#~ X6P`+#t,>$++#| 
` Jp[
,>,>,/$,>$,,>p,,'/$4:$ pS0GPh,>h,1W/$ 8O@& 0 Ps[PQHCZ
PXJC,>X,0O/$4:$[CQNPZCXPP[PQTXZX5V$9#iC[,>,>,/$/$+@	`FFH$-;$.40$/P690	w"	w4	w6	w>'>S>\>)>:E&r

80.(h
exu}['NOLIST''NOLIST, OR /IDENTIFIER-0
w (XVhS,GLX 
Xal+$=,>(,6?/( w7Nh+$z[X *1H@
,( .1L@A
aJ+$r h[`5P$d,>(,>,,k/( 
` 0 Np,>(,>,/([
w,>,>w,/( p0( (1P@,( .1L@GaH+$T,>(+$^ p 
p[X[` `/( Ph 
h .2l(@ h *3((@
GaN+$Z,>(,6?/(+$~XaP+$bp,$lhp@@h+$~,(hLpd@@ p"Z8@@8+$~ h P Pp,>(,>,/(,>(,>,,k/( pS(GHh p Hh+$~,>(,>,,k/(4:$~ p@@h p/(+-0
  Jp [
p.
 Jp2tp+%& P Np,>8,$4/( Zp4:% ( Hr p Xt,  pZh 
`al+%S*GJXQZX 
m JX Vp p h [. Np2rp9% pZh Pp,>H,$4/(66+%O+%,ZX 
`al+%# p6*h+%,>(,6?/(9%S.GNh[hXNX pQV@QVh9% p 
pXV(XVh9%9% 
B ( Np[p,>,>,/(,>(,>B,/(/(+-0
.( BZ Z
 [
 .
 Jp2tp+%D P6N`+%8 `,>(,>,,'/(4:%JS,GLX+%> `1H7` `,>(,>,,'/(4:%JS.GNX Xah+%@ :+%A :z([
,>,>,/(9%1 B[
h,>Zh,>,/(,>(ZB,>,/(/(+-0
` Jp4J%XZ(<72+%W p.Z@4(ZPh(=2%TO+%Y@/(+-0Zb4X%^*( 0J+,%K+ 
% ,3J( @
 .3J(!@A
aL+ JtS0 Pr,a 6(!ZXz("+-0
  Jp [
p.
 Jp2tp+& P Np 8,>(",>,,'/(4:&	S(GH` p h[p,>,>,/( [
.
 Lp2rp+%} 
H Jp,>(#,>,,'/(4z%|Z`H9%w (# Pr, ZpZXHh[
8
QLhQXhXZ`9%l 
B ( Np[p,>,>,/(,>(,>B,/(/(+-0 ($ ( H	t 6,>Ip,Ak/(4Z&,>($,N/(4:&,>,+& (% ( Z	t=6&
,>(,6?/(+,>(%,/(,~-0
X,>Z
P,>,>(,6?/(&Z
P2J%+&#,>mZP,>,>(,6?/(&Z,>,PT/(aZ+&*Z0HQ0	,>,>(,6?/(+&N,>(&,>,,k/(4:&N (QHr,  
p JX 
p LXQVpXTp RpZb Np (' Pn Pr ('XHr, 6Jp+&8[b+&9 QZX:oXRXXTX[PZP8XPP (QHr,QZPQVhXRh ` `QTXQRX7J`+&G ` PXNX[,>,>,/(+&H "XNX[,>,>,/(,>o,?/(Z,>,W/(/(+-0.( B Hp 
	q Jp,>Iq,Ak/(0Z+&V p N	q+&n 	q 8ap+&[ p H	q,>(,6?/(+& p HB  
X Jp[
,>,>,/(Zb Np@@	rO@" n Pp@@%@@n 	q8((4X&j,>,N/(5:&j p N	q p Pn+&n 	qZ
h,05:&o p Pn p H	qO+& p P	qZb6Hp+&s[bXZb+&tXHb,( 0L+&w,>(,6?/( p Pn (( Hn Hr 
('XJr,  
pXLXXXX.()0NXV0Z``@/(+-0
,>,>,/(+'  
() Ln Lr ('XNr, ZXPXZQHXZ
XJX B 
`XLX .(*0NXVP((*0H+',>(,6C/([
,>,>,/(@+-0
('XJr,  
B Lp &XN` 0QV`,>,G/([` 0QPr,  (h(* *pBJP 
&XJPS.GNPXVPQT`.(+0NXXX p[h.0QPr,  p h[h8 HP.4[h42'B 
.
 ( Np 
8 LpZ8 Pp @ H8 L@ 
.
 P( < Np7(p+'B. 
  ( Pp p @2Nh+'A,>h,>(,6?/(>p+':=2'1/4XT`[,>,>,/([
B,>,>B,/(/(+-06?/(+(,>(,6C/(7L%+'[ 	qZ0h,>,>(,6?/(,>(,>,,'/(4:(
 J&,>(-,N/(5:'s@@& p .n(-S0BPXZB4P(
 B ZP4H(
,(.1LS+(
@[B Np2rp+(
 .  *(,4J(
 P PpZP4T'r6X,HP,PX9'k,'@@&@+(N/(4:(
,B,X/[.@Pp2rp+(HZ`HXXH((/0H+(S:GZH9',(/0L9'S0GPH9',>p,>,[/(64+(O+(
 hhp<0(
X<XX`[Mc@
exu<``@000PP0X
P
P"
X00P&`RECORDFILE-0(B+(D+(J+(X+(g+(t+(v7J#+(;@@#+(=,>Iq,Ak/)D Z#3V#+(~,>\)d #,>l)d,>)@,6?/)D+(~,>,(1/)D5:(~+(v *)A.
 Jp2rp+(~,>,(1/)D4:(v9(F6J#+(MO@#,>Iq,Ak/)D Z# . #(N@  ()A. Hp2rp+(U 
A
L*4J(U +(V9(QO5:(f,>,(/)D+(~6J#+(\O@#,>Iq,Ak/)D Z# . #(N@  ()A. Hp2rp+(d 
A
L*4J(c +(d9(`O5:(f@+(~,>+(B,>,(1/)D4:(v6L#+(lO@#,>Iq,Ak/)D Z# #0P+(o@@#+(g *0P@
 ,0P@
G
aJ+(g+(~,>,(1/)D5:(wO+(~6L#+(zO@#,>Iq,Ak/)D Z# 0 #(P   d*A5Z(t/)D+-0.)E@@p w 
$* Jp 
p`L+)(L Lp:p+) p,>l)d #,>l)d,>)A,6?/)D:p p(Z Zp4Z) p`H+)(H Hp:p+) p,>l)d,>)B,6?/)E>	p+)	O/)E+-0.)D (QHr, Zp 
pQ*A` J
p.,L/)D5:)@+)5Z 
)F Jn Jr 
)FXLr, 6Np+)'[bXZb+)'XNb[`5H)*,>)B,6?/)D 
pQL` pXN`6Pe+).XXeQXe+)/QX@XXe 
p&*/,"Lp3l)G+)5,>pZ(QHr,3Z4*K'0 {ILLEGAL CHARACTER"$"LITSTRING"("")"END OF STATEMENT"+"",""-"".""/"CONSTANT"A""D""E""F""G""I""L""O""P""R""T""X"
)H)J)K)M)N)O)Q)R)S)T)U)V)X)Y)Z)[)\)])^)_)`)a)b)c$
0p0 @P@ P
 `0`0@00@`00p@
p0p
 0P`00p@

 0
@  p
`
`p	`	P

0
0 
0@P
p 
0
@`$}'}'}'}'}'}'   ` `}' `\p}' `\`@ `\@\`hpx (08FORMSTA 	q*,0J+*Q,>&,!x/,4:*R:" Z@B@,~-0 	qZ
 1J"h+*[ "Z8B ` P%*,0J+*[,>&,!x/, Z&4:*[@+(,.(S
,,.,(L.
.,..(N.
0,.., :	>,~-0
,>In,Ak/,:" Z# Z B[
#1J+*q0J+*n,>, &Z0hQ0	,>,>,+*o,>@T,>,@T,>,,6?/,+Z#Z`S. Nr,XZ` XVP ` PP,*\ Z`S(GHP (h,*, j, @+ , H	t,>Ip,Ak/,5Z*O,~@,~ ( H	r@,~@@	r@,~-0.,! ( H	t,>Io,Ak/, ZpO@p *$2Jp++:p 8 ,++ ,)2Lp++:p 8
 ,++ ."2Np++:p 8
q,++x0!2Pp++:p8,++(&2Hp++:p8,++;@p++V	t,>Ip,Ak/,5Z+,>,,6?/,++! X
 +0J++/,>,,6C/,++/\` + p sXP8+++> ( H	t,>Io,Ak/, Zp4Z+?", .lp3,p++? p sXH@+[
@+0J++<,>,,6C/,++<\`@+:p3np++7@++@,>,,6?/,/,!+ , H	t,>Ip,Ak/,5Z+F,>,,6?/,,~@,~-0.,![#0H++] 
"<
 Lp . N	t,>Io,Ak/,4Z+[:" * J B Hp@@#,X4:+i[#1N++P[
#1J++W,>@[,>,@T,>,,6?/,,>p,C/,,>p,C/,++\:"@@ B,>p,C/, , L	t,>Io,Ak/,5Z+j 0 P	t,>Io,Ak/,5Z+j 
	qZ
(0L++i,~,>,[,>l@T,>,,6?/,++jO/,!+-0., "  B,>,!,>,,y/,!4:, 
`al++r :++r :z," " NpO@#,~ Z#l [# (1P@ *1P@
A ,1P
@
AaH+,:" * J8B,X5:,	+,:" * J8B 0 P	r,~:
" Z0B[1H+,,>@V,>$@T,>,,6?/,+,,~ Z#[#0N+, "1p{++t,>p,C/, " Zp++tO@#,>p,C/,@/,+@	`
	>
	>
	>
	>,#.:>N,>',>S,>:,>\,>)084H,%',&$ 
P`P
`DIMENSIONEDTO" OR #-0,> aH +,+,>w,>4v,O/4v w 
w~[
,52[hA
7X+,F ((H(A(O .0H@,4w 00L@G *1X@
GaN+,F w~ ,1H@
G
 *1X@
 .1X@A
 (1X@A
G
aL+,F (p,BO/2",>L59Z.hQ.	,>+,h@ w~+@$,H+,e+,O+,O+,O+,R+,O+,b@+,U+,Z+,R+,Z+,_+,b+,O 
w.4w1N+,d 4\+,e 
w.4w0N+,d 4\+,e 
w.4x,4xHaN+,d,>(,>4],6?/4v+,j 
w.4w ,0N@
04xD
aL+,d+,d 
w (`n+,d @T+,e 
w.4w1N74]@4Z,j,> wZ,8Q,	,>,>4^,6?/4y+,j@,^+-0,>w,PT/4yaZ+,q 	q*4z5J,q,>4^,6?/4y wS( GHh aH +,v,>,>4v,O/4v,>w~,>w,,/4v+-0 aH +,},>w,>4z,O/4v,>w~,>w,,/4v+-0.4y@ w~+@$-+-.+-+-+-+-@+-, 
w,4w .0L@04{GaN+- 4_+-. 
w,4w .1L@04{GaN+- 4_+-. 
w,4w1L+- 4`+-. 
w,4w0L+-[(A07Z+- 
(al+-,>4`+-,>4aZ.(Q.	,>,>4a,6?/4y@+-.04w (0P@,4xM[(A.} 01N@G,4{GaH+-' 4b+-. Jp (an+-* :+-+ : pz4|+- 
w (+-54Z-3,> 
wZ.0Q.	,>,>4b,6?/4y+-54wS,BLh@/4y+-0-?,>4c,6C/4y@+. h `,>4v,>,/4v 8D [. Pp2rp+-q8 H0H+-k 
HX L`,>4},>,,'/4v4:.04~0P+-OS*GJ`[
P5J-W.4~ 01N@(4~ *1H@
AaP+-c :z4~+-c .n4~[P PpZ@5H-c7,@+-c P NtS( Hr, Zp *j4 0p4S,BLh p 
pXLhS.GNP.4w0N+-oZZ
p2H+-oZ.PQ.	,>,>4c,6?/4v+-ol ,4w0L+-n,>4d,6C/4y@@` 
H1l89-F[,>,>,/4v@@C/4d 2D .(D/( Hp2rp+. 
H Jp4J. 8 Np p @ Hp4H. p 
 2Lh+.,>h,>4e,6?/4v+.:
p4..D82L+-{9-w.XD.8QXr,4.X.<6Q6C*6`5PnPr5XHr,.7*&+.pS.GNhj4 s0N+.\`X p  QHh Z  pS(GHhXZXXTX[w,>,>w,/4v@/4|+-0
 '8
j '  2&4)V}=2.. 
w[.45JNtS0 Pr,a 6Hw+.5 ,l5 + $Z(hQ(	,>,>4f,6?/4v,~-0 w,>h,>4f,6?/4v+-0,> (QHr, 7J	sQR	sZ	sXNHXR	s wXPH 	oQZH,^+-0
+.K :XZD+.L ,XLDZ`D@@D@@C w[
w.
w Lp2rp+/b@@p@@pZ` H7NP+.V P1HO@p.4+.V8 P(50H+/+ 
P+@4.Z+/]+.[+/ "QN P0P+.l7Jp+.c 5 Nr@@t `"Pu ( Hr,a 6.`+.f $,>h,>4g,6?/4v6H`+.k $Z,hQ,	,>,>4g,6?/4vXX+.{7Jp+.o $,>h,>4g,6?/4v.5 Np,>4z,>,,y/4v4:0;(5 *1H@
,5D
aJ+.y,>,.>/4y pn5S.GNXXO@C6JC+/	 5 Nr@@tZD Pu ( Hr,aXZZ
D"
.jDZ
D$
` Lp3,5+/ $,>h,>4h,6?/4v pXPD+/]S.GNR`+/] P0N+/7Hp+/ $,>h,>4g,6?/4v,5 Lp,>4z,>,,y/4v4:0;05 (1P@*5DaH+/,>,.>/4y 
pl5S,GLO@C P Tp(55H/#7Lp+/# 5 Pr@@t `"Hu * Jr,a6QX7LP+/( P0P+/'O@p+/'@@p.4+/)@@p.4 P051P+/,,.6+0; 
P0J+/=7Np+/1 $,>h,>4g,6?/4v(5 Hp,>4z,>,,y/4v`Z+0;*5 ,1J@
.5D
aL+/<,>,.>/4y pp5S0GPO@C.55N/D7Hp+/D 
5 Lr@@t X"Nu 0 Pr,a6XV6HC+/Y 
X2,`+/J $Z0hQ0	,>,>4g,6?/4v 5 Pr@@tZD Hu * Jr,aXZZ
D$
`"
.lD X/`ZD8$ Pp305+/W $,>h,>4h,6?/4v 
pXJD+/ZS,GLR`[
p,>,>p,/4v H[,>,>,/4v[D8QPD.$9.O7HC+0 ,4w .1L@ 01L@AaN+/j,>4i,6?/4y+0; $ h`h+/n,>,.>/4y,>5,3/4yXZD,>5,3/4yQZD $ 
haJ+/x 
5 Lr@@t 0 Pu . Nr,a+/y "XZF[
D<
7r+0/$Z5P0[ *3H"@
,5M
 01R@G
aJ+0,>5,3/4yXZ+0Zc Np7Hp+0 Hp0510+0 p6,8+0 pZ Z
F2P+0 
pZ0Z *2H@
[0 (2N"@A
aJ+0Z0 PpXP:@+0 pZ
@ Lp+0,>5,3/4y Zp pXN ( H8=r/{/$S*BJS*GJ+0$ 
5 Lr@@t D Nu 0 Pr,aQZD[
w,>,>w,/4v[D(.. QDr< 5XPr, .Z`EZcXHEXTcQ4D Tp*4 p $*40J+0:6NC+0; h HtS* Jr, ZpS,BLh ,l4 .n4XZP+0;R`P /5+-0 w hah+0BZ*hQ*	,>,>4i,6?/4v+ 
haj+0H,>4jZ,hQ,	,>,>4a,6?/4y+ wS*GJh[
C5J0LXZCQZC+0NCwXNhXNC@+-0
P Jp ( X$ 
s0L+0X ( P&:p+0Y05 P& p6Ph+11 
s+@,0\+1P+0_@@@+0c+1-Z,`Q,	,>,>4j,>4k,6?/4y+1V[
`4L1' &10
+0i*50*
+1' : Zp+0k*51*
+1' :+0h[`7*X+1Z
X$
p&,XLX[X 5 Pr@@t p$&( Hu . Nr,aQZX,5	<
72+1' ( .Z@ Pp 
5 Jr@@t p$&( Hu . Nr,a 
pXZ0=20w+1'ZX 
5 Lr@@t p$&. Nu ( Hr,aXZX*5	1*+1' Xap+1'[X2N"+1'ZX>
6L+1S.GNZc Np7Hp+1! Hp3H+1 p.5
1.+1 p6, +1 pZ@Z
X2N+1 
pZ0ZX2P+1 p[
 2L"+1 pZ
8 JpXJX:(+1' 
pZ0 Pp+16N+1$S:BZ+1&,>5,3/4y XDX ( H,>5
,>,,'/4v4:1VS(GH` &h5>p+1P,>5,>,,'/4v4:1V,>,0</4y+1P h 
s+@,13+1C+16@@@+19+1>,>4v,>,,'/4v+1B,>4z,>,,'/4v4:1VS.GN` &n5>p+1C,>4v,>,,'/4v4:1V,>,0</4y4:1V,50L+1F :z5+1G 0p5 C Pp,>X,.F/4y7$+1V $QDh*5,5
G
aJ+1O,*QZ 
p JC[
p,>,>p,/4v90R[
w,>,>w,/4v@/5	+-0[`4X1\ 
w2J`+1[ +Z`+1X w Nt 5
.Pr,v+-0k6N,,y/4v5:1jO@p+1} *QJp+1}6N
.
5Jp2rp+1yHXVHZ`H91v,>p,>,[/4vZp4z1}2.QNp[w,>,>w,/4v p/4v+-0
5 Jr H 
XLps0N+2@@ (0N@AaP+2Z*0Q*	,>,>4k,6?/4v pS* GJh 
haj+2Z,hQ,	,>,>4l,6?/4v+3E * J
X4L2# 0QPr :+2$@ Zn,  
nl56Np+2)XVpQVp+2*XV8XVp (h5,>H,1`/4yQZX5:2/Z`XO+3G,50L+3E 0BPX 0p5[X Hp[
  Jp 
 `L+2<7.(+2; 5 Pr@@tZ( Hu , Lr,a+2MZ(+2M7.(+2B 5 Pr@@tZ
(&, Lu ( Hr,a+2M 5 Pr,  pZhQH` 
5 Lr@@t * Ju . Nr,aXZ`S0GP` 00XP`XV` XZX+3E@@p H X7JX+2}[0N+2S,>4l+2h[.  
` Jp 
5 Lr Ln 5XNr,  0p5,*QZ` Zp (XHhQXh p7Jh+2`,>4m+2h p h Np Np050P+2e*51J+2f,>4m+2h p*41J+2j,>4n,6?/4y+3G6Ns+2m:" 
p J B+2o,>4z,>p,,k/4v4:3G,>p,PT/4yaZ+2u pZ(hQ(	,>,>4n+35 (QHr, Zp 
p Jh 
p LhQZp pXNp p Pp[/(Q,>,2/4y Zp5:3 Zp7PX+3,>p,PD/4y p+3G7PX+3@,>p,PD/4y p[h pXXhXXp 
5 Jr Jn 
5XLr, [pXN`QXp 0p5 pXH`[
  JpZ
 8
XL  .QNr Hp, pQZ@QXh 
pXJh[
p Lp pXN0 X[,>,>,/4v P6Ps+3,50L+32,50L+32 pQVh P6Hs+3$*50J+3%*51J+3( pZ.hQ.	,>+34 pQVh6NP+3+ "XPh+38 P `,>4v,>,/4v6Ps+31,50L+32,51L+36 pZ(hQ(	,>,>4o,6?/4v+3G pZXHh6Ps+3>7l"+3> pZh,>,>,>4o,
/4y>"[
,>,>,/4v6Jp+3C p Zp+3E[pXN(ZpXZp.2+2 
pj55p/53M,>@V,>@U,>m,>4p,6/5
,~ , L X Nu,@
 >X[,>,>,/4v 
H2J5+3Z6NE+3W4VE+3d,>4pZ(HQ(	,>,>4a+3bH2N5+3`6HE+3]3VE+3d,>4qZ,HQ,	,>+3Y,>4qZ(HQ(	,>,>4b,6?/4y,~@,~-0
GaP+46LD+4(50H+3~RD s0P+3{,>5
s1J74r 4r ZpZ
H LpZ0 Np pZh[
h.3hp+4 p h,5,>,> p,8/4v:
p+4wh+4,>4sZ(HQ(	,>,>4b,6?/4y+4!,>4sZ.HQ.	,>+4 P `,3H4:4!,55L4![,>,>,/4v+4!7JD+4 ,>4t,6?/4y+4!O@D@/4y+-0
PLp.51N+40,>4tZ(0Q(	,>,>4b+49 ( H
0L+4:050P+4:Z*hQ*	,>,>4u,>4k,6?/4y+4Z7L`+4B ` PD @(54H4C,>,>5,>4v,r/4y 
DZ0+4C0P,/4v@@E@@E@@D w7Hh+4V h P [
.
Lp2rp+4Sd,>H,3e/4y5:4P@@,>,>,/4v@@
w,>,>w,/4v@/4v+@	`5,5.50d5B5D5F5(5#d5G.8cDfaY\T@p5L5N|*m+gAtC5O5Q5R,k,y5T5Wl>'5Y>8
(((,(0 F(D(
@0P
Ph
h0 
 `(`((`
`4`X(X
X4XB$@ 8$@X$@@< H00X  `8
8@
 XK: KKF
H
PP0
hXIN EXTERNAL  STATEMENTAS DUMMY PARAMETERIN TYPE STATEMENTIN DATA STATEMENTIN COMMONIN EQUIVALENCEAS AN ENTRY POINT NAMEAS STATEMENT FUNCTIONAS COMMON BLOCKAS NAMELIST AS AN ARRAY OR FUNCTIONAS AN ARRAYAS A FUNCTIONPBPBPwPvPwP@PtpCpv@pwP	555555!5"5#5&5(5*A VARIABLE OR ARRAYA SCALAR VARIABLEAN ARRAYA SUBPROGRAM NAMEi4r[r_rghrDUMMYVARIABLEPARAMETERPARAMETEREND OR ERR ARRAY OR NAMELIST NAMEARRAY NAMEk:N@-0.8 w&
 Jp.Hw4H5^,>,5Y/8:
/8+-0 w@ 8)6 8`X
85V5c+-0 w 8)6X
5V5g+ aH+5m7j	},5n>	}@,~ 8 H	~ *j8 
8 L
,>%,5a/8 
	 N
6P	s+5v,>8
,7g/8+5y@@	s[
`8
QJ`R`` * J
[
`,>,5Y/8Z`4N6 (H
Z
`,>,5Y/8@H
:
` , L	},>8,7l/8,>8,7l/8@,~-0.8Zw0(+6
:
	o0(O@	p ap+6
	pl  
	} .2Lw~@  (0P@AaN+6 
r Jp , L	m 0QPr,  p HrZ'5N6QV'XV'+6[
'XV0QV'+6 8	 
wj8
S,BLX 
w~ LX w~ PX w} HX .3L	}@ 
 01J@GaN+69,>8	,6G/8  aH+61 
1L+6.,>8	,7l/8>	}7p	},5n>	},>,7l/8,8
aL+69  .0P@D	laN+68,>8,MW/8
&XO@	lO/8+-0,>w},>w~,>w~,>w,6/8+-0,>w~,>w~,>	o,>w,6/8+-0,>w~,>w~,>	o,>w,6/8+-0
8
{Lp08+6N+8+Z6R+6O+6y+6V+6^+6h+6o+6u+6y:
pZ
w.
(@  2&4.6)V|=26Y 8 2N
pZ
w.
(D.6V+6e04@+6dT
pZ
w.
(Z48Q4A@ 2.0 X
pZ
w.
Z4(Q4A@2.. X

7X+6OX.8 w~ 
$8;Z,/Q,` LpZ.pQ.A` Np 8$, Lp
2xp
+7Dp  Fp
O@p2Hp
+7	:p2Jp
+7:p 0F+7 0Pp (2Hp
+7:p
w ,8%Z"8Q"A`
 4F7Fp+7 (2Hp
+7$:p
w<
$*Z"(BQ"A@ $<$7
 4F7 .(Hp+7 (Hp $<$7$ 4F7  .0Pp+7  02Pp
+71:p$(Z" DQ"@` *-Jp $<$7,
.,Lp+7* 0Pp $<$70
.*Jp+7. ..Np ,2Lp
+7<:p$0Z"@@Q"A@ $<$7;
 5F79+7; 
.,Lp+76 ,Lp 02Pp
+7B:p
$8Z"(Q"A`4F7BFp+7@;@p
&Z
(+(/8+-0 :d@aZ+7P
D,>8,>,7Q/8+@+-0 waH@+7T,>8+7YaH+7V,>8+7YaH+7X,>8+7YaH+7[,>8,>w~,6}/8@+-0ZwZ
w~/$(,8.8/
&,.<78+7f G< PG5p7e,7Jw~NF=87b@+-0 G< HG5h7j,7J 
wLF@+-0(81H+7o ,A`QLw
w7X+7t G< PG5p7s,7JXF+7o@+,>,7g/8,~-0 :b@aZ+7}
B,>8,>,7Q/8+@+B<HB5h8,7wFA,~-0@+-0.8@/8+@	`:	~H	~	~8
<w~<w0w



 LINE:BINARY OUTPUTASCII OUTPUTASCII INPUT888OBJECTLISTINGSOURCE8!8#8$TNDWL 1 DEVICE 4 WRITE LOCKEDTNHDE HARDWARE DEVICE ERROR ON 1 DEVICE 4TNCPE CHECKSUM OR PARITY ERROR IN 1 FILE 2TNQEX BLOCK TOO LARGE OR QUOTA EXCEEDED FOR 1 FILE 28(8+8085@	`ZMT SIZE MODIFIER  TREATED AS FNA A FUNCTION WITHOUT AN ARGUMENT LISTDIS OPT - PROGRAM IS DISCONNECTED - OPTIMIZATION DISCONTINUEDMVC NUMBER OF VARIABLES DOES NOT EQUAL THE NUMBER OF CONSTANTS IN DATA STATEMENTAGA OPT - OBJECT VARIABLE, OF ASSIGNED GOTO WITHOUT OPTIONAL LIST, WAS NEVER ASSIGNEDCUO CONSTANT UNDERFLOW OR OVERFLOWNED NO END STATEMENT IN PROGRAMLID IDENTIFIER   MORE THAN 6 CHARACTERSWOP OPT - WARNINGS GIVEN IN PHASE 1.  OPTIMIZED CODE MAY NOT BE CORRECTVNI OPT - VARIABLE  IS NOT INITIALIZEDRDI ATTEMPT TO REDECLARE IMPLICIT TYPECTR COMPLEX TERMS USED IN A RELATIONAL OTHER THAN EQ OR NECAI COMPLEX EXPRESSION USED IN ARITHMETIC IFIFL  OPT - INFINITE LOOP. OPTIMIZATION DISCONTINUEDICD INACCESSIBLE CODE. STATEMENT DELETEDSOD  STATEMENT OUT OF ORDERICC ILLEGAL CHARACTER, CONTINUATION FIELD OF INITIAL LINEXCR EXTRANEOUS CARRIAGE RETURNICS ILLEGAL CHARACTER IN LINE SEQ#FMR MULTIPLE RETURNS DEFINED IN A FUNCTIONVND FUNCTION RETURN VALUE IS NEVER DEFINEDNOD GLOBAL OPTIMIZATION NOT SUPPORTED WITH /DEBUG - /OPT IGNOREDPPS PROGRAM STATEMENT PARAMETERS IGNOREDDXB DATA STATEMENT EXCEEDS BOUNDS OF ARRAY VAI  ALREADY INITIALIZEDIDN OPT - ILLEGAL DO NESTING - OPTIMIZATION DISCONTINUEDDIM POSSIBLE DO INDEX MODIFICATION INSIDE LOOPPAV PARAMETER USED AS ASSOCIATE VARIABLEFWE FOUND  WHEN EXPECTING A FEE FOUND  WHEN EXPECTING EITHER A FEE	   OR A USI   USED INCORRECTLYICL ILLEGAL CHARACTER  IN LABEL FIELDIAC ILLEGAL ASCII CHARACTER  IN SOURCEUMP UNMATCHED PARENTHESESNRC STATEMENT NOT RECOGNIZEDMSP STATEMENT NAME MISSPELLEDISN  IS NOT IDT ILLEGAL OR MISSPELLED DATA TYPEIIP ILLEGAL IMPLICIT SPECIFICATION PARAMETERLLS LABEL TOO LARGE OR TOO SMALLLAD LABEL  ALREADY DEFINED AT LINE: DIA DO INDEX VARIABLE  IS ALREADY ACTIVEILF ILLEGAL STATEMENT AFTER LOGICAL IFISD ILLEGAL SUBSCRIPT EXPRESSION IN DATA STATEMENTAWN ARRAY REFERENCE  HAS WRONG NUMBER OF SUBSCRIPTSIDN DO LOOP AT LINE:  IS ILLEGALLY NESTEDDTI THE DIMENSIONS OF  MUST BE OF THE TYPE INTEGEREXB EQUIVALENCE EXTENDS COMMON BLOCK  BACKWARDABD  HAS ALREADY BEEN DEFINED IDV IMPLIED DO INDEX IS NOT A VARIABLETFL TOO MANY FORMAT LABELS SPECIFIEDECT ATTEMPT TO ENTER  INTO COMMON TWICEPIC THE DO PARAMETERS OF  MUST BE INTEGER CONSTANTSRFC  IS A RECURSIVE FUNCTION CALLMCE MORE THAN 1 COMMON VARIABLE IN EQUIVALENCE GROUPIED INCONSISTENT EQUIVALENCE DECLARATIONIZM ILLEGAL  SIZE MODIFIER BOV STATEMENT TOO LARGE TO CLASSIFYDVE CANNOT USE DUMMY VARIABLE IN EQUIVALENCEVSE EQUIVALENCE SUBSCRIPTS MUST BE INTEGER CONSTANTSNIR REPEAT COUNT MUST BE AN UNSIGNED INTEGERNIU NON-INTEGER UNIT IN I/O STATEMENTIXM ILLEGAL MIXED MODE ARITHMETICCER COMPILER ERROR IN ROUTINE DID CANNOT INITIALIZE A DUMMY PARAMETER IN DATAIOD ILLEGAL STATEMENT USED AS OBJECT OF DONNF NO STATEMENT NUMBER ON FORMATDSF ARGUMENT  IS SAME AS FUNCTION NAMECQL NO CLOSING QUOTE IN LITERALLGB LOWER BOUND GREATER THAN UPPER BOUND FOR ARRAY EID ENTRY STATEMENT ILLEGAL INSIDE A DO LOOPIAL INCORRECT ARGUMENT TYPE FOR LIBRARY FUNCTION NLF WRONG NUMBER OF ARGUMENTS FOR LIBRARY FUNCTION LTL TOO MANY ITEMS IN LIST - REDUCE NUMBER OF ITEMSLFA LABEL ARGUMENTS ILLEGAL IN FUNCTION OR ARRAY REFERENCEDLN OPTIONAL DATA VALUE LIST NOT SUPPORTEDDDA  IS DUPLICATE DUMMY ARGUMENTEDN EXPRESSION TOO DEEPLY NESTED TO COMPILEENF LABEL  MUST REFER TO AN EXECUTABLE STATEMENT, NOT A FORMATVNA SUBSCRIPTED VARIABLE IN EQUIVALENCE BUT NOT AN ARRAYOPW OPEN PARAMETER  IS OF WRONG TYPENEX NO EXPONENT AFTER D OR E IN CONSTANTLNI LIST DIRECTED IO WITH NO IOLISTLED ILLEGAL LIST DIRECTED NIO NAMELIST DIRECTED I/O WITH I/O LISTSOR SUBSCRIPT OUT OF RANGEIID NON-INTEGER IMPLIED DO INDEXIBK ILLEGAL STATEMENT IN BLOCKDATA SUBPROGRAMSNL  STATEMENTS MAY NOT BE LABELEDFNE LABEL  MUST REFER TO A FORMAT, NOT AN EXECUTABLE STATEMENTEIM ENTRY STATEMENT ILLEGAL IN MAIN PROGRAMIDS IMPLICIT DO INDICES MAY NOT BE SUBSCRIPTEDIIS INCORRECT INCLUDE SWITCHIVP INVALID PPNNFS NO FILE NAME SPECIFIEDCFF CANNOT FIND FILEINN INCLUDE STATEMENTS MAY NOT BE NESTEDCSF ILLEGAL STATEMENT FUNCTION REFERENCE IN CALL STATEMENTDFD DOUBLE  NAME ILLEGALIUT PROGRAM UNITS MAY NOT BE TERMINATED WITHIN INCLUDED FILESIFD INCLUDED FILES MUST RESIDE ON DISKSAD ARRAY  - SIGNED DIMENSIONS MAY APPEAR ONLY AS CONSTANT RANGE LIMITSDFC VARIABLE DIMENSION  MUST BE SCALAR, DEFINED AS FORMAL OR IN COMMONRIC COMPLEX CONSTANT CANNOT BE USED TO REPRESENT THE REAL OR IMAGINARY PART OF A COMPLEX CONSTANTDNL IMPLIED DO SPECIFICATION WITHOUT ASSOCIATED LIST OF VARIABLESMWL ATTEMPT TO DEFINE MULTIPLE RETURN WITHOUT FORMAL LABEL ARGUMENTSNUO .NOT. IS A UNARY OPERATORDPR DUMMY PARAMETER  REFERENCED BEFORE DEFINITIONVSO VARIABLE DIMENSION ALLOWED IN SUBPROGRAMS ONLYIFE ATL ARRAY  TOO LARGEPTL PROGRAM TOO LARGE,> &<d+<S,> &<e+<S
&<f,>,>,<_
&<l
&
&<m "S~@)Dl
"=b<X
&<nZ Fx,^,^,^7@x	`
&<o+x m&"QDx6@,<`_x#`."
",~SKERRCGERR?
? Internal compiler error processing statement 
? Call to  FROM 

DDT EXECUTION:
@	`-0 w&(A 7Vd>e+< w(N.= Nw 8(2N+<zZd>e+7Vd>d+< 8.2Nw+<Zd>d+@+@	` APPP X((
((((((
(
((	(00000000((
88888888888888888888888888(@@@@@@@@@@@@@@@@@@@@@@@@@@PHHHMS-TB ASSIGNMENT+T' IFD'JSTFN OR ARRAY ASSIGNMENT-ST& DOdOe END STATEMENT FUNCTION*QT&O IFARGUMENTAN ARRAY@\b PUNCH5L' DATA@\= PRINT5"a SUBROUTINE\w OPEN4"P INTEGER4"T LOGICALE%Z IMPLICITP\ FINDT  CALL'0\ REWIND%$# PARAMETER@\w REREAD"Ta GOTOu,#\ DIMENSIONT PAUSET\ RETURN4"V DOUBLEPRECISION) FORMATl! INCLUDE\ BACK3T"h ENTRY%,$ EQUIVALENCE$\t DECODE	U<%g NAMELIST@\Z ACCEPT
#K BLOCKDATA\W READ'0\& UNLOAD5"Z FUNCTION\y CLOSE'0\ ENDFILE4"R REAL\&
 SKIP\i WRITEE<%- EXTERNALe,#b COMMON$\q ENCODE4"X COMPLEXTr CONTINUE@TH ASSIGN@\D TYPET
 STOP# PROGRAMA>> >">#>%>'>(>*>+>->.>0>2>3>5>7>8>:><>>>?>A>B>D>F>G>I>K>L>N>O>Q>R>T>U>W>X>Z>[>]>^>`>a>c-0.@. 	} Hp 
	z Jp 
	{ Lp 	r 8/	n Pp 	r 
 /
p J	} 
 /
p L	z  /p N	{ 0 P	j,M' 
	r 
(XL	r5L?,@@	r p N	} p P	z 
p J	{@/@.+-0.@/ r Hp *QJr, Zp 
p Lr p@@8 	} P8 	z H8 
	{ J86L	r+?FQN	rXN	r@+?Gn	rQN	r /@/+ 	z H	m 
	} J 
	z L 	{ N	n@,~ 	m H	z,>@+,I|/@/ 
 J	} 
8
 L	z 	n N	{@@	r@,~-0.@/ w<&(.( Hp0h+?Z :+?[.( QZr .XNr, Zp pQPh *XJhS(GHh p/@/+-0.@/Zw~@@  w~ 
w~/
<
QJh w/w~<,> w~.:,>,/@/@/@/+-0 aH +?q,>%,>@0,O/@/ 
@0 Jr 
% Lt,a [`4V?y[X,>Z`,>,>m,>@,,6/@.+@ 	q(@10H+@ 
`al+@,>%,>m,>@,,6/@1+@S.GN` Xn+@ 
`al+@,>%,>m,>@-+?~S.GN` XnZ`4N@ 	q 
 aj+@,>@-,6?/@/@+-0@@	r *6hu@
 ,1hO@
G
aJ+@,>@.,6?/@/@@u aN +@,>u,>@2,O/@/ u Pt @0 Hr,a  
	q6@2 *0V@
D
aJ+@$ `an+@",>t,>@-,6?/@/+@)S0GP`+@) `an+@(,>t,>@,,6?/@/+@)S0GP`@@ +@	`	z<o/9 0$@$00(UNKNOWNIDENTIFIERCONSTANTLIT STRINGLABELSTATEMENT ENDRELATIONAL OP.NOT..AND..OR..EQV. OR .XOR."**" OR "^""&""("")"":" ",""$""-""/""+""*""="
@5@6@8@:@<@=@?@A@B@D@E@G@I@J@K@L@M@N@O@P@Q@R@SE0OT8.NE.EORO.NOT.ND@.AND.RH.OR.ORP.XOR.QVPQ0.EQ. OR .EQV.T0E0.GT. OR .GE.T0E0.LT. OR .LE.RUE.TRUE.ALSE.FALSE.
ACTION	STATE	-0.HL 	z *1H$@
,HMD
 	mG	lA
aJ+A+,>HM,MW/HL@@	mZ' PpZp4HA+ p 
8`j+A*:HN,>l8?,>,6G/HN 
&` pS0GPh p h+A! 	} P	o@@	l 	z H	k Pm 
	z L	j 	{ N	k@@%@@
@/HL+-0.HN 	z HpZ*pQ*	,>,I|/HL ,0F@
 .0F@G
aL+A=	z+A7[=1B+AF@hp`p 
	z2Jp+A>1B+AF r Pp,>	},>H#,6;/HN p Zr /HN+0F+AP 
	z J	n J	{	z , L	s aN+AO,>HO,7g/HL,5n :,~@,~0F+AX	z[=1B+AW,A31Z+AW :,~ : Z
@,~@@$ L	z H$ N	z0	z P	,>H$,Ak/HL,~ 
	{`L+Ab . N	} .A N	 	{ P	 	z3H	+Ag ,L	+Ad	0	0P+Aj
	{
	z :,~-0
.HL@@ 	 w6H`+Ao[=+ApZ= 
	} L	o$+@Ar+Aq+B6+BN+C+B]+B_+Bc+Bl+By+C+C+C+C+C+C+C!+C$+C++C,+C/+C;+C@+CB+CL+CS+Ci+CU+Ch+Cm+Cr+Cu+C|+C}+D+D+D+D+D+D+D+D+D+D+D+D%+D4+D(+D++D,+D2+D7+D8+D9+D;+D<+D@+DC+DE+DG+DH+DK+DR+DT+DV+DY+Da+Dj+Dt+D{+D~+E+E
+E+E+E+E"+E-+E/+E0+E1+E3+E6+E9+E:+E>+EA+EH+EL+ES+EV+E^+Ec+Ee+Ek+E{+F+F
+H@5FB9	z7F+B66J`+E,+D?0F
j	z 
	yQ,A` L	z	z 6P`+BA[=+AqZ=+AqZ	z3H	y+BD "+Aq,K] 1F@+BH6N`+E,+D?,Lr,Ki 0F@+BM,>,>H%,L`/HN 6P`+E,+D?1B+E0F+BQ>	z+H 	z 
 aJ+BV,>H%,J/HL Z	}+BZ 
`L+BX.N	},>H%,I|/HL,AL	.$N	z	zP	{+E".An	z+C 1F$+Ba F	Z*=+H! H& $+Aq0B+Be F	Z*H+H!F
@GaN+BwaH+Bt,>m,>H&,6/HN@@
+Bw,>H',>m,>H',6/HO 
 
H(L(:+E$../.NF1B+C,A30Z+C
> @+Aq> 8+BM0F+C	z[=1B+C,A31Z+C 
`0J+AqZ= 02NHP@+Aq 
aP+C@@
+C ( H	j,M' 0$ P	z 	z H	{ 
 X(:
+Dz1F@+E,A 	z0P$+D) H(+H H)@@ $+Aq> 86P`+H+H7N+C# $!+Aq $+Aq.	z 01N@ (0FA@AaP+Gf 
	l J	o+Gf F	 +H!0F+C.>	z+H $	+Aq 	} N	l 	z @aH+C6,>H%,J/HL Z	} 
	z J	{	z+C7:
	}7J+C9Z= 	{ N	n H)+Aq1F+D 0! P	z>  6J`+H+H 	z0N!+H H*+H0F@+CD $+Aq 	j P	z 	k H	z 
m J	}1H$+CJ 	k3N	{,M'@@	l 	k N	{+CR0F@+CQ 	z00#+E,>H%,I|/HL,M'+E 	z0P$,M',A+E  X8:+Cz2XH*+CX : Z+CX@@ (6P%@ ,7J
@
AaH+C_,>m,>H+,6/HN@@	q . N@@
 Fr 	z P	m,>H+,I|/HL 
	} J 
	z8
 L 	{ H	n H,+H0F+Ck &A "+Aq 0 P
 $+Aq,>,>	},>H,,6/HO .n	z  H(+F% . N
+Cz `N+C{ 0 P
H- J :
DH-+HHH.+H@@`+H+H .$ N	z 	n P	z0F@ &A ">
 (+Aq 07N%@ *7H
@
GaP+D6/HO $+Aq H0+H,AQ Zp,AHGp`Z+D5+D aN+D H1+H $+Aq H.+Aq@@%@@
,>,>	},>H1,6/HO .n	z H2+D? 	z1N!+D$+H H2+H . N
+%$0./0 P% 	z0H!+H H3+H,>	},>H3,6;/HN+D)0F+D* H4+H $+Aq .  N	z+D4 H41F+D1,>	},>H3,6;/HN 0!+D1 0  P	z+H,AQ`Z+D5 H4+Aq `0N+Aq+E,/&+BF H4 +DJ[= H5+Aq:
6L`+Aq[=+Aq6N N H5+H0F+H@@+EKZ= H6+Aq $../. N+H H61F,+H 00F$@ *7h@
AaP+Aq H6+H?N+EK+H".An	z "+Aq  X8: H6@@
@ *7H
AaP+D_,>m,>H7,6/HN@@
>
0+Aq0B+Dd,>H7,6?/HL+HF
*H L+H 
aN+H0B+Do,>m,>H7,6/HN+Ds,>,>	},>H,,6/HO (h	z@@
+H0F+Dv	z+Aq7P,?: *$ J	z 
	z L	{  X8: H8+H . N
6P+E H(+EU . N
7P+E H8 : Z+EU  
H( J :
 H9+EU 	m N	z  P	}  H	z 
	nJ	{@@H+H3V+H5VE F	 :J+H! 	q0H>0+E@@	q+EQ,>m,>H9,6/HN7L+E F	 :+H!  H( H@:
 H9+Aq H:+Aq 	q1N>0+ER (> H	q H8 *Jj+EU r(N. Nr H:+H r 00N$c@ (0F@AaP+E+ 
 
H;HL(:=H6A(H"'+EG+H;+H2.>+E9 .>+E97NR $!+Aq r(N. Nr H<+H r(N. Nr,>,<r/HL Z	q4ZEG H=+H H:+H . N
H6+H07N"+Aq2XH<+ER $$+Aq $++Aq 	qZ08Q0Q` P H> $"+Aq6N	r,?&,>,>	},>H,,6/HO (h	zS* J 
 H8 N0:+F& 0z+EaS +F61Z
7HQ+Eq+F6 B H>+H F	 0z+EhS +H!0Z+Ej HQ+H! HR+H! $- /.
+@<En+F6+Ep+Er+Ew+Ey@0F+AqS:+F6 /0
+@DEt+F6+Aq HR HS HS@+Aq0F+Aq HS+F60F+Aq HS+F6Z
 Nr 0 P /( H H?+H?.+F (V.6p V+H 2HHT+H 
	qZ0 00N @  *2HHT@
A`P+H,>,>H?,6C/HN+H7n+F$. (Z8 Zt+F  Ht @3 Hr,a 
haj@+F,>HUZ
,>,,y/HN+F[Q:+F[ H@+H@@tO@s@@@@ @4 Nr 0
 Pr  
H@ J :
+G,>HA,>,>HA,6?/HOS. N  H8 H@:
 H9+H HB @\ N5NH $1+Aq3V+H 00V@ (0F@AaP+F7 
6:(+F6 @4 Nr ( Hr@@t 8 Pu,aQ: Z+H *.j .6L(@ (0V@GaN+F> $2+Aq0 +F* 7P8+FB:
+F?Z8,>,>,>HA,6?/HO 
 H8 P0: H9S( H+H@@t@@s@@@@ @4 Nr  HB H@:
+G 07N@(HCGaP+FU,>HC,6?/HL @4 Zr 
 Ju@@t7L	r+FY,@
Q:+F[ ( Hr,aQ: F	+H!3XH@+Fh6P	r+G0F$+Fh,>,?U/HLXZ ,QLZZ08Q0A` P &(/*"J3JHU@@ HD+H@@0F"+Fk (
 Hr+G0F"+Fm *
 Jr+G2XH@+G+G"  AHV5NFz s.ht ) T V).t.dv: V /6.dv: V+H6Hs+H:t+H .
 Nr HD+HO@s  H@ P8: HE+Aq,b  Nt  Pu+Gc@@0F"+G 0
wPr+HE+H0F"+G,?H+HF+H,>H%,I|/HL;	z,?M,&,"?/HLq@4Hr+G"6N	r,?&/(HHG+HF
@@0+GC,>HV,?U/HLXZ .QN Z(@Q(A` HA0.0 P+G;ZZ2N+G7 *QJr, ,.l0F+G9 HH+HF+H0F+G<F HI+H0HI1P+G? *J+G<Z
,>Z,>Z,>,?b/HO H8+Aq@@@@@@ HJ+H,>HJ,>,>HA,6?/HO  H8 P8: H9S* J+Aq HK0F+GPO@+H1F+H $=+Aq HK  1&+GW,>HL,>,>HA,6?/HO &)T ./0  T+Fy7N+G]"h"z7H+G_ :+G_ : Zr 
 Lt  Nu @4 Pr F	,a.HW+H!,>H7,6?/HL F	S:+H! 	t0N+Gk0B+Gp+Gm0N+Gn0B+Gp F+H2N+Gp ,+Di0FA+H*	z1J+H 	l N	o+H7N	t+G{ N@@	t3F+Gz0FA+H,	z1L+H+Gr,?H+H3F+H5VH6L	r,?& F	 :+H!,?M	z>
	z+H@@@@@@ $>+Aq0F+H $;+Aq F	@+H!F
*:+H.	z 01N@ (0FA@AaP+H 
	lJ	oF	Z*?+H!F H H8+H7N	z+H>	z	z+E,6J	z+H 3XH-+H   X@:6H->	z	z+D?/HL+@	`[:$$
HX
	z$$
I'Ir'6$
I$$
I6$
I6$
I+$
H^$
I9	m6$
I;6$
H^6$
HX$$
HdIt'Iu6$
Hd$
H^$
Hd6$
Hj$
HdU$
HX$
Hj$
Hj$$
Hj$
I+6$
Hp$<$$
H^$
HX$
I*$$
I;$$
Hp$
I;$
I;6$
IL$
IL$$
IL$
IL$
Hp6$
I\$
Hp'6$
Hv6$
H|Iv$$
Hv$$
I\F $$
I$
Hv$
Hv$
H|$$
H|$
H|6$
I$
I$
I$
I<6$
IIy$$
I$
II{D$@8"g"000000I5R}|2B@ 
@  @.a(aDAFa(a(a(	a(a(A@`a(8PHRc`@P8PbPP8P8P`8P@@
p@C@r`@@@H@.!
, DQ
/Y
/
/b$
/8.@,`@P@F 6&)R5f 6
#F(6a8.A0,`D@y^8g	b8q`8
&q`8`8a8.!n<chz<@PG!n<g!n<G!n<g!n<g!n<g)|<g!n<A0`@P@gQzaxGQz
GQzGQza8.h `>d>`> h h h 
#
 h `>a8> (ch@P@((`((
 ((`(RB90 BH>C>B0>B8>B1LB9:Cb`X>A`>B92B92B92 B92B92Aa2B92Aa2B92Aa4B94B94B94B92B9@B80
B9lB9rAa:Ai:B92	(>A(>a(>	(>	(>	(>	(>
!(>(,((>	(>	(>	(>	(>	(>(>	(>(>	(>(>	(>	(>	(>	(>	(>	(>
	(>	(>(>	!(>	(>!"`D!@d!` 
 d!a8.d!dy'd!d!d!d!d!d!d!d!A(d!d!d!d!d!d!d!  d!!"`D!@E9.!@.#@.*@.E9,)a8.E9.!E).'!!E9.!%9.!E9.!E9.!E9.!E9.!E9.!DA$E9.!E9.!E9.!E9.!9.
E9.!E9.!@.*@.*E9.!B`>@P>@>f:axfB
cbf:a8>f:f:f:f:f:f:f:f:f:::::f:fRa@0f9df:fB
fB
f:6$
I$
I$$
I+$
I+6$
I$$
I$
I$
I\$
ISTSKIPLEXICALNULLDOTTED OPERATOROCTAL DIGITOCTAL DIGIT-0 w*N3,N4.
 0Z+J 0pN3Z
 <
XL +JzN3@+-0.N4@ w *A`QJ  6 
w0/.  008@ (1x@GaP+J3XN5+J,>	},>N),6;/N5@ 
$*.
 =6J Zp 
w0 0X?+J Z	z2P	y+J ,K] 0X@+J ,Lr,Ki 0X@+J ,>N6,>N6,L`/N5 1X+J5 
w 
( 0 (2NN6@ *6Pp@
AaH+J3 
w 08XN0 0A`QP0 * J	s aH+J/,>N7,7g/N4,5n w 
8 0aP+J5,>,J/N4+J6,>w,I|/N47p@/N4+-0,> N* H
 *J
7XL+J@,>,5a/N4RM4XJ@ 0P
,>,5a/N4 .N
,>N7,5f/N4,>N8,5f/N4 /@ 0 P
(6)6,>,5Y/N4@)64XJK 
.* J
[4XJP .N
,>,5Y/N4 0P
@S)64XJT 0P
,>,5Y/N4 aP+JW,>N8+JW,>N9,5f/N4 
aL+J[,>N9,5f/N4 ah+J^,>N:,5f/N4 
aJ +Ja,>N:,5f/N4 an+Jd,>N;,5f/N4 aP+Jg,>N;,5f/N4 
aL+Jj,>N<,5f/N4 aH+Jm,>N<,5f/N4 
aJ+Jp,>N=,5f/N4 an+Js,>N=,5f/N4 AN>4PK,>N>,5f/N4 ah+Jy *!J
 
aJ+J{ .*N
 aN+J~ 0&P
 aP+K ,"L
 
aL+K ($H
 (H
 (H
 * J
	v &.8 ,>,5Y/N4 
&,  &( ,NI,>,5f/N4 &0.0  ,>,5Y/N4 .N
	v	 
&
N? ,>,5Y/N4 (H
 
&
N?  &0j0 08+K (H
,>,5Y/N4,>N?,5f/N4 (H
 

 J
	,^+-0 aH+K%
H+K&
FaX +K8 
`J@+K7,w 
`L+K7 (  N(OF@4ZK1,K"0Z@+K1l V(+K7 	v.2((+K5,>	l,>N*,>N+,6/N@ V(,J7+KAl :@+aX+K:,>N6+K@aX+K<,>N@+K@aX+K>,>NA+K@aX@+KA,>NA,>NA,6}/N5 :+-0Z	zZ
	y3H+KG,>N+,>m,>N,,6/N@:NB.:$:ZhAZ8Z	y.  (B<3v+KO , L	x :@+:NB.:$:Z
hA8
 SZ	y. *8_"( HX V	y@@	x*	z7@+@,~-0.N4@/N4+@,~ aH+K` :@,~6J	x+Kh aN+KeOH@4ZKh@+KgOF@4ZKh,K"0Z@,KB,~,KB,~-0Z	k H@@	{ *N,"
Z, .N,nNB.*jNC05PKr=K *0n@
Z
	k0NC (0P@A
.N,"Z00(N,hND..nND, (0L@A
`J=K.N,0N+L18+L7J`=K0NE0P+L X . N	{+L@@	{:NB.:$:ZhAZ@Z	y/ 2x+L@@	i+L 
/
QJ	iQJr,XZ	iX	i 
QZ	i[	i. *6g *"
.jZ
	y/
"J	y".p	z".h	k".n	j".z	{+-0,> 2h(+L8 0z,
\	z,
\+LO,^+@,~-0.N4Z	y0H+L@ 
aL+L/ ( Np6P P(OH@4ZL+,K"1Z@+L_6L+L. p Z+L; p P(+L; ( NOF@4ZL4,K"1Z@+L_ 	v.2((+L8,>	l,>N-,>N-,6/N@ 
	v.
 L(,L@@@@	z 6:NB.:$:ZhAZ8 .0 P	y+LO@@7L	i+LIA,S.0 [	i.( *8_[	i<,>,>,/N5+LO 6:NB.:$:ZhAZ@/".( H5(LO@@ :NB.:$:Z
hA8
  .Q0NB.0$0Z@AZ Z
.
Z
/
 *8_". NXZ	y3V+L_,>N.,>m,>N.,6/N@,AY/N4+-07Hw~+Le6L+Ld :/+@@ :A+ 
w7N0+Li,>	l,>N/,6/N5 w@@  *$ J	k 	{ N	j N	k,Lr 
	{ L,Ki0Z@+,>N/,>N0,6?/N5@@	x+-0Z	k(N,0H< .6L`@ 01x@A`N+Lt0x+L{ :@+ 
/* J 
	y/
., S.0 *8_".n	k".h	z"
.j	{"
.l	j".p	m".n	n".h	n"
.j"
.l	y"0 P0@+-0,>.N@ Bp Dp Fp w 8&" $)$|=8M F	| p p p@/N@,^+-0Z'4HM& ',NE,>48?,>,6G/N5  aN+M7p	},5n>
	},>,7l/N4 '*NFB
w`J
&`Z' 
' 0 H',>NA,>,/N5+MO+-0.N4 	lG	m*NFD,NGDaH+M/,>N6,MW/N4 : Zp+M0@@p aN+MQ7p	},5n,>	},M
/N4,>N0,7l/N4,	z0L+M8>	}+MD0L+M;O@	} : Z	s+MD0L+M? 	}&6
 
	}/
<
 J	}+MD>
	},>	{,>	z,7\/N5,>NG,7g/N4,>NH+MN 	jaN+MO,>N1,I|/N4 	z3P	{+MK,>	{,>,7\/N5`	z,>NG,7g/N4:	z,>,7g/N4+MQ,>	{,>	z,7\/N5@@	mZ'4PMU,>p,M/N4O@	l@@	j@/N4+-0.N4 	l`H+M] 
m J 
	j L 	k N : Z	l 
	z3J+N' N1 N& 1P$+Mf"
.*#76+Me ,L&=6Mc :$ Z 61
  ,18@
 .0x@A
aL+N	0&1P+Mn *J& *J&@N& 
'`L+Mt,>,M
/N4
&	|@@'
& N1 P&  H
  .1X@ ,1X@
AaN+Mw  @aH+N,>N2,J/N4 Z+N:
,>N2,I|/N4 
 Jp 
	z .2L@ 02J@GaN+Mf+N4XN
X& 2H	z+N7Nw+N p P+N=6Mf '`P+N,>,M
/N4
&	| : Z'@H&
& N1 Z&+Mf .6Jw@ 
N1 03L&@AaN+N# '`H+N,>,M
/N4
&	| *J& ,L&@P&
&+N' 'aH+N',>N2,>m,>N3,6/N@@/N4+@	`_:	~NO'NQ'<	kNU'NV'NX'	|	zHN['< 0 x
FORTRAN V. /KA /KI/OPT/NOWA/C/S/I/M/E/NOER/L/D:(mn@	PAGE<0:0<0`$@hD@D-JAN--FEB--MAR--APR--MAY--JUN--JUL--AUG--SEP--OCT--NOV--DEC-INSTATTRANSFRINGSINPUTEOPRESEOPRESTOREOVERFLOW, LINE TOO LONGBACKTYPE-0
.OS aH +N`,>OT,O/OT ,6J_@
 07N	p@G
 OM *1H@
G
aL+O . N
Z8pQ8A`S0H Pp ON 4.(H=4Nk ,7J	p@
 07N	o@G
aL+OOT6H	p+Nx OU Np OU Pp p.OV Zp+O OV Np OW PpZ
.XHl Z*pQ*a` J
,>	p,5Y/OT@N
Z.p,>,OA/OT,>OO,OA/OT6P	o+OS:tx Zp+O
lZ(pQ(A` H
,>,5Y/OT@
J
Z(p,>,OA/OT,>OO+O aH+O,>OP,7l/OTZ*p,>,OA/OT aN+O,>OP,7l/OT,>OQ,OA/OT@/OS+-0 `H+O*OW,OQN
aJ+O@+ 
w0J+O ,>OR+O? OR N
 0 P
@@OX H'+@,O%+O<+O'+O++O.+O2+O8 w~,>h,5a/OTzOR ,L
+O< w~,>h,5a/OTzOR+O< 
OXL',>w~,5Y/OT 
8
lOR .(N
 0P
+O<,>w~,5Y/OT 
8
lOR .(N
 ,?L
 ."N
@P
,>OS,7l/OT+-0 wZ8 Q8A` 6
0J+OF .n=6OC.OY0OYH`N
'w aH+,>w,7l/OT+@	`	oH%OZO[O^O`OaOd	wOe''0%FTNWRN   NO?FTNFTL   BBD
 FATAL ERRORS AND  WARNINGS

[ NO ERRORS DETECTED ]
E aH+Om*Qv0J+Oi :+Oj : Z	q,>m,>Qj,6/Qv,~ 
	q1J+Ou,>m,>Qj,6;/Qv . N	q Qw Pn Pr QwXHr,,>In+O}7Nn+Ox,r@@n+Oy,>In,Ak/Qx Qw Hn Hr 
QwXJr,,>Io,Ak/Qx:Qx.QyH,>,M/Qx@,~-0Z	s4XPZ`*Qy0J+P
 X`n+P,>QkZ0XQ0	,>[`,>,>Qk,6/Qz+P.Qz 01N@(Q{DaP+P,>X[
`,>,>Ql,6/Q{S*BJX  h,>Q|,>,/Qv+PO+-0.Q{@@p@@p 8 `C Hp4HP- p[
h5LP+Zh0pO+P+6Jp+P",5j,>Ql,OA/Qx pZh Np,>,M
/Qx,>Qm,OA/Qx:p1p+P+@@p,>Qm,OA/Qx,5j:
	p pZh Pp5PP=8P7Lp+P1,>Qn,OA/Qxl @/Q{+-0.Qxl ,5j,>Qn,OA/Qx,5jZp Hp[
  Jp,>Qo,OA/Qx 
p[0 Np[8,>,M
/Qx,>Qo,OA/Qx,>Qp,OA/Qx:	p[
p 
( Lp5LP6@/Qx+-0.Qx wZh".hoZ
p3Z+PO p[h Np[8 Pp[@,>,>m,>Qp,6/Q{+PS[p 8 Pp 8 HpA(3Hw+PO@/Qx+-07Hp+P[[pZpZ
w2V+PYO+Z`[`5XPW@+-0R`aQ:aX:b*:	v (2h+Pd@@ 2(+PdQ8X *:8 ,P L	 .
 N+ QqQ[8X*87 
QqQ[
8
X . N/*81 Q| P%S( H`O@	}@@d  
/
( Jl , Ld Ndl   L@+-0.Q{Zc Hp7Jp+Q Jp.Q}1.+P~ p6, +P~ 
pZ(Np@@8HpZ@+Pw@/Q{+-0
	w .0,@ 01L@AZ	w *0H@
AaN+Q 
A
Q~ 4TQ`Tl`Tl`TlaT+Ql`Tl  aH+QO@	}d,>Q~,>Qr,6/Qv,J7dd ,L"1Z@+Qf,P\ 
( Ja Q Nr , Lr 0 Pu,a Z"@@nd ,>Im,Ak/Qx0Z+Q+ 
aJ+Q(,!e+Q#6N	q+Q<,>Io,Ak/Qx+Qf 
aJ +Q/,>m,>Q,O/Qv 	q ,0R8
$.	q.Qr40t+Q5 T	q+QB 
/*<
+@,Q7+QB+Q9+Q<+Q=+Q@Z:8,>,>m,>Qs,6;+QB,Oe+QT,>m,>Qs,6/Qv+QT,>Qt,>m,>Qt,6/Q{7J%+QJ 
	q8R0X+QF,?m+QJ0X+QJ,>Qu,>m,>Qu,6/Q{O@"@@#@@	r 
	q8R4XQO,>,N/Qx4:QT 	qZh, 7Jn+QTZ
(4LQT,>,PD/Qx 
	q0L+Q",P,P,Pv,Kj6Hp,P26N	p+Qa `p+Qa  Hp*Q~ Jp,
<.R,0 pnQ~ 
p L.R,N\ `P+Qf,L"Za Z(	z+ +Q.R@/Qv+,Q,~ 	`I$R.\R	|RR	R
R|RU+/l=DRR'R8  D
X 
X4X[Mc@$@(%P}~|o($8004$0Z@%@A DUMMY ARRAY

UNDEFINED LABELS





UNTERMINATED DO LOOPS

LINE: 
 CLASSIFICATION - STATEMENT STORDERNON-EXECUTABLE