PDP-10 Archive: dortb.exe from FORTRAN-10_V7wLink

Trailing-Edge - PDP-10 Archives - FORTRAN-10_V7wLink_Feb83 - dortb.exe

There are 11 other files named dortb.exe in the archive. Click here to see a list.

?p@

@`?x++z`0~Dq+%

pa*(+g@@?-,
K

x,

6J Jr@@,Ad  
y** 
y**b7,> 
z**@@i z@@.C*7 J$ u Jsf{f{@@g@@i * Jkd @@f|@@j@@k * J 
| Je@@l@@h@@h,

0*00j=+Gh
``+J1j-1* +J+! 0j/+&$(}1(+ 0 
ja`+8l1H(6@gd,

(+}`@`j~+W J|,
|+We@+m1H+d`"
a`0H+[+G*
ka`@$jkd`@&jk1(+ 0.ji1((+ 0

g4,ch*.
gi*.
g``P
g Jga` 
j@@

s3Mu+i0hA+1h*+ 07@i+ 0+ (~/(0+N7@s+,

'+r``0hA+0H6@i++u1Ha`+6@i+ *0H,I"~.Ds 
kl*@!$,[Z
s``l* l*.$,[ *+X0000

0a0a

24<MPa

P a

0a

0a

0a

2
0a

2(x? a$Er* ER0$2OTPjTPjTPjT1#f#S
,Fc4%Hl1@>0kX,l'`a484><o$
lc/]gQ!E#CxRbEhM

+ z+ *+7
 ** z6@?7@K+,",*,Bd ,I,<,6a`+4+7A*`` +0 j(H. Hj l$(. Hl9
'7
 *.h  e` 
0J"m m +'e`7

j"

j Ls@@l/*l ? +E ($Hk.Jk *(Je+E h(H. Hh*
h$*.Jhl+E``+, ,:)+@)!$dN0u4N6(N=l3!,*dt Dj9
'a`+X0HF1HFl@e+  l@@i ,ud` ,x7
s(NdN
04NX=

?a`+E7@_+a`7
 
e  
r`` 
l Jj`` l m`  *&*6@h*Fh,6


 JtR`) *+( *+Qa`7
j!
j+Jjlld+El`lLO@.+E,A``+``+\,.? ,37n+4d.@,O,A=X,%? ,37

p,

(+l  
l*``!*?5[7@s+,

',b,++m q4D,F+ ,

pl*,[ 
j+
W``+%a`+``+y s Hq q,

k,

(+} k,

p +d6%t+/~ Et7`m+:m:m::,

j>s>s6 s+_s"l$,F+

!$,[:,F+ 	,[ 
s Ku,"k 	 Dk,+,F+5*/

,_+ ,Bka@g!$!*@G
k,[ 
q.$,[,

',b6$+,N+ad 7q"q`d+
.X
,g++#4D#,N+ZX
q,g+Z+,++``+'@@m@@m5

j,+,

j Dm5$

d $,D * Jm,bd@+

l 
s J,< Jj,

1JR,=

``Q,A@ (3Jj+al`+7J,<+4!,@a`+4," 
 ,W:,B+2,

a`,b0*00j=7h
0*0j/+A*h
,b 
+?m `l @ +@+>l l  +>,","g,"i,"k:i@@.+<S(Ghgl +> s2Eu+ +@)l`+WXD)R
,0L+T!,bLgg

 ,(D0.
.jg+Y.
gSJg+Yl l d !+>a` *!
? i+,Bk,Bi,Bg,B`` ``+b Jjl +A.jgl +@,A+g,(,A>
r+h,(,C:
r Jr Js, *2P+`` *,I,>l ``,b s ,,H+

5
W,(,

@@1@@.d  
r``+h+4,),++,),+/*,A Jr+c`` 0?l+`` 0
`dmm d ,+a`+,A Jr Js+la` 
j``+ ``+
````e*+

d0jP
s+

dRs (  H," J}Z$P
4D 
 J} 4F4$ade*^.
4F4$`dmP
d*pPdFcJ`Jx1A*,Bad+

d ,H,b?`,b4F

5j"aj+

,bRs (  H+,"($d*p4D& 
.
d*p,Bad+

dR+``,D``a`+T u Mu Ds Jj,..$? ,37	n+55h6Z
6@3Js7

o=..

/,,+5+- 
j+T,"OZ4D@,N+@*
*

2Ls97X
4&=,W+@,BaJ+2,[+@,B=.:s06@vs,"r,BXt,b s Xt Vr>s56G 6 Vs,b Jj+@mdl,
W+7a@ $

7Jh+S1J ${1J $1J $

1J $

1J $

4D+b5Db *,I g`` Ds s,$7+7 .,H+


4J,I=nZ:s+W $+b $W+b $
`6@h $
Z+b $?ZD+hd@+f $V.$?ZD+i 
h1*+ZJ6Fb @@b!ya`+>*& *&c+7e@+q@nb ,"
h)L(GNb5No7@b Rb 2? 0s5i,"j7Jb 
dG*,","j+x *,I,B,B(lz,Bj,b(L8,")J?n Jj,"1R?,D1R,
`6@+w+x``+ Jql +``+%l  Jra`++=7@a`+`@+@@``!+````1+``+!( 
 $ Jk,

(*h4( $(,H+:+O@ k D:1*0+aj+F
s`j+F
s J D s D,H+ J,a+@@``O@,A 
,h6 ,b s 
,W,l5c6Md`+7@+d e`6@j+*``a`>r,(7 +.,c s 
,W,l`@7
h *4J9,"," ,c s 
 .
ajpQ*)p JZ
.
,W,l>`+1,B,B7@+C:
r7`+@ $(,",W $(,H+Q
,W,B+C ,[ ,

p ,

k,A 
,h s!*(X
,W,l@@,b``+``g
O
`@7h@4$0$+J+7``+T`@+[``+``+n@@O@,ba@g h4(0(+TA b7@
 h!
 haJ+,"( ,!,9,B,
W5A@p`t`s`x``z``````qpqpqp

O+w7@

+t``7qOQ
+u7@``l(O@ H J,b0JO
 J,b  D!&x@@,H+ J.$*f|O@,b J,b J,b J~,b J~,b6LO

@+6NO@

,N6@+``+``+`@+ 
!@@&**[,b7D+,H@
,W,"X$0,H+2J0+,Ba@+ h0&0f+$&a`+"4D# 
 $3J!@@!.$1$:++%7J+ &3J!+%.&1&:+ &7@!+%.&1&:+"+ J!!*Z J" * J"d`7
qO
 J#d`7
r@
 J#@@$!*``GJ$ 
$ J%,b7@_+,|6F_a` *a`7@" J"!*BJ$``GJ$,A6@@@_7@_+9,Y+,
C@@_@@ 
+
6@+a`g
aj~+M J,A,
C@@}-*
+@:}:}:}-,
K 6/}@@} *,I4VK ,$,91v+K,D *X,I *,I,A+47@_+ J5jW 
 JX*(``7
q Jq4*X*(a` Jr6*r3*q+O@a`"`,A@@,^+,b @l "* JO@,^> +

d,|?@d d  @Z* ZJ 6  D DaDxA$,H,b JR*,,b* J 
%j%@@a@+m

h1L+s+,&0, 0l_+r/, &,!6"(V8bV0xO@,& LO@!*~A
[@2jX}9vZX}+X@Lf3Lf0fx|f0Lf3Lf3Lf@` C%C N`%O` _`o``

d`*&  	`&
 &`

@ ` &`~' &`~`} ~`} ~@3`& ~@3`42 2@1` @``5#`$`%'`#(@&(`)@)`&*&* &*`+8+ +@Y+`&,,@&,`c-p- v-@m-`/`%1`&3`&?` 
d*X
 J X$,H,b JX$,H,b J 
' JX*( J 
' J+' `f+& $* 
d*X
,a,b* 
(+el "+'m l +&m l +&A 1@m 0@
m l #+'+09@A@A@C@A@A@F@F@N@A@A@C@A@@A@A@Al    */+Xl `R
}X*/ J 
( +Xl X -,JC*/ J *+X,H,b JX$,H,b +0l \ X$-,JC*R J *+X-a7 ,g  
,a,b 
X*(,a,b+2 Dj%+'5L ?`,b``+^ 
,y,A +c,z J!* BJ 
 JS*j)+j* 0 6 afP,H,b*afe*d*p JS*~.JZ*j%l +' 
X*( JQ
*
0+r,zl !, BLl * ,a,b* 
X*(+y,z J0!* BJ 
 Jh +1 
X*(ajP
,bm l l +&!*GJ 
dj +)-aa-a* ,H,bR4Faj+ X$,H,bR, ,b+

,,b J*l P+'l 4L'l  +'l `@+m  l @ *j%+'*
 J*
+/5L&m l  +'a@m  l +'l  +';@+l`L1Lm l  +'hh@+%+A 0@l `@l +'A 0@l `@`@m l  *7 ,t@@}-a+@:}:}:}-a */
}@@}.
XJ7-aO@7 ,g+2*6* J``+H*,"`` 0W``  *~``,k``,j``,i``@,l `` 0W`` 0~`` ,o``,u``,t``,s,Ba`@+G 
*
 J``,oa`,u 
*
*,A:;@+

d 
C,BC.C2*2*+N@@_+(6 +Q2*q2jr1+U,!+V+U ,*,9 
,h,A+V@@d ``+g

X,03J+e ..2*2j+c/
," ,,,9?`+a,D 
.*,I,B *,I+d ,-,9,A,6 
,y6@,A6@5^:,b,j:
e
x 
+v,> 
`j 
[
5?,> 
a`d*``S
*,
W+x,t 
X*( J 
*,",>,B,h*,b," 0
` Jr JsaJxA*,i,B,b*.,?,D*.,?,D+f@/+a` 
s J+,A +,H++
 *	j

 +,H+3J,+ J, 
, ,!,9 
,,
W,AO@,> ,+ ( H,,!++4 ,/,9 
+,h,A 
j J,+!$Pl +71!$Pd  D*c@1e`+JJg!*}L@(i*jd  
r``l ,,A,A2dr+1,H+2a`+%Rq,++I
ga`A
+@*++ 
q,h,A,AL@jL@:q+,:qaD,!+ +1 ,3,9 
,h,A q+,L@j/$ Dr+4@@?@@@a`+9@@ 5*$# J ,A!6@ V+=
&5 &O@@K,	567V,b!*Luav J!*I``!*>6av  J  *6,	]+ 
8 JA *`` * JA *L JB * JC $M*( 
6	j6+8*(``+N0d+@@1@@.O@?+4+O@K+	S+	S+	S+	S+	S+	S+	S+	S+	S+	S+	S+	S+	S+	S+	S+	S+	S+	S+	S+	S+	S+	S+	S+	S+	S,|``+` $(,H+d*4J,",A,
C,B7@aj+
+
``+ie@g68h08+ +`m ( Hk+Oe@g68h08+ K`m+7@@-@@d``+``a`+a`@@g6$q2dr+,A,A 
g,a+:q2dr+}aD,!+u+} ,9,9 
,h,A q+x Dr,A+4``7qRr Dq 
r``+	T
r Jr2d+,b@@ 
5**#	j
+  J,	31J+	4V

6@ +	O V !6@GV1J+	1J-+	1J+	,0J1J+	[ 0XYR+

d ! X  ; X!@@!!8@GX+

d4V	W6@+	M V!6GV+	6@ +	N,	3TV !6 GV@+	6@!+	P,	:+	V1VYQV!0J+	V,	<+	V1VXXV! ;0J+	)*Z	[,	34V	Y Vo+	%!6GV4J

d0J.+	V+	,	34V	Z(Vq4F	S060v+	S 8_o.8+@`!6GV@+	 <@,	C,b0*0j-,b0j0* 1,b/*`xpJ+	4,	>bV<,b+

d,	>`v,b+

d@,	C,b0*0j,bav(VG6/h+	?
(0J?1J+	C1J *0J1J
4J

d0*00j=1/*0J1J

d	b,b
&=+	\
&@+	\
&C+	\
&F+	\
&H,?
&J+	\
&L.6
"
&N+	\
&P+	\
&S+	\
&U+	\
&X+	\
&Z+	\
&\+	\
&^,b (,	l18,b  XX (XXX (,	l<18,b XX   XXR  XX ax+

d (ZXX (,	l18,b!8!X8X*8X+

dX@@`.8Q[.:X*8h[A6,b J`C*	rRJ	6@`j+	xR
 J  *	xP
PJ J!+
 C*RJR
6@+ J(* J	 
F
`j@@ 
`:6@+
> ^Z>*>O@ 
 J z@ 
y**@@,gO@+gO V J,t 
d* J7@6@1PJS>*>@@7@6@+
+ J`6@+
R
a6@+ J 
 J`7@PJa 
`* @ _+@. ``p+
 L@7@+a+
`6@+
l:+h+l8+
@@-,
KZ\/&& F_ 
%7@	A*0FX*/ JO@_4F
. 
"3J_+` J] 
" J]-a+@]?`]+a-a 
] J"+7,6@@ _ *,I &$,n!,p,

 * _7`",I 
,A!:cZ-+c Jj Jr, _7 #+
=,> 
#,A,h _ $ad+
@,$+67J#+7 J? J@Q*A` JL+7, & !4D
I,H+d J$!*hX*%,a,
Q.&1&:+
D,b, & 
$7d!+
N,a,
P.&1&:+
L,b7

e ,g,",9 &$,n ,i,97L+ ,k,9,B5A Jja@+@`@+?j
<kJ<+(R
jd*4J`j3Jl+
c,+
{+
cj
<kJ<+(aj~+ 
jl,

C+
f+
f,bh*ij+- 
jd*p2Jm,

C+
m+
m,D*m4J

d, *5IR
jd*2Jn3Jn+
s,

C+
s+
sl@,D+R
jd*2Jn3Jm+
x3Jn+
x,

C+
x+
x+
{dR
jd*,l@,D*m4J[j0(X0h]+o,? ,,

j`l+
j(p

@aLd+p0(P0hS+1HQ+,&d@$q4D

d *,I 
, *+I * ,IZ
j,+[
j4Jl@,!,b`,

Z
j,d@,bA*+H4Jq,

C+%1,b  h8h:38cHr+%ahaj1+%a@@+ 0*`0j+ +% F,N *`@ ,I *,I 
+D`j+*a@@+?1*|+?"
ZJ *+#,"[
,?!,b`,

,B5A
rl,

C+1+1d,D+!*~A
jaj~+6,

C+6+6d+
{d 
j$s0$8+$sdt,
j,

C+=+=+(Jt,?+Z

1Laj+DXJ*[`,E!,b`,

+@*Z

1L+K)Jn(L'*P,"6@,E,B.*0j.*+I 5*M *,I,n *+I Lq 
d*@&*,"4JR,P,B4Jt.*W0j\.*0jm/*1JQ *W+I 5$Z"` *,Idd+^ad+M &3$x+f2$s9f (%$).@@6D,n,M"$.

 
%*,q6@8$c,b"( .(+@y+j,ul,G.9Hg,","z,^,B,

,B&$#`:,"4Dq,n,B.*X+I:s\-6-Qa^'&wka#SD!y! 0Y{z|i,SU<c\z8]T=8)9Lf32d y3$ u yE-E+

al~(L
)J,I5L},b

al|(L@
)J,I5L

,b

bLv7(L *)J,I5L

,b(Jqd
,?,D*v+P".

j *)*.*,I8.

,b6@,b7+t,K@At $,Dg
,K@
 Jl7!t6 l+

Ut/tUl/lFaf@@l6%t l7+u,K+

Z Eu Ds7Fm+

%5&

" $,D+

%2Jm+

%7
l t5*

%d&_"2&@@mO@,b,.9

/ k@,

e+

. 
X?`J+

) 
X[h*

X) Xw+

d,%/$d  ? ,37n+

>? ,37n+en@+w2Nk+

/ n`n+

/an@a@+

Bl@ 3Jp+

;l +

/ No Jp.o Dp/o+

/a@ ,b`@ +

p o 
p+

o.

dh*d U,Su4V

K"3lX?+

X?Z2*X[2jX

F46x062  Vv,

x @,

e+

Q2HX[+

M2dX

Ud.@XvNXwLX)XHX[@DXG8 XX? Xw

X) X[h(h* F
5*

]h&/i&/F
4N

d5F

d,N`@ `@+

c," *,I,B::,b46

hd&@Su4V

d"2FXw*v

g46

d,b+ @@u@@v,bSu4V

d"h&2&X[2fX

m46

r,b@,

e,b,

r+

p>uZ`wbZXw"`)*ZX)J`[ZX[B`/$d ? ,37	n+

|2h=|an@a@+

|l++

o.

d+,bm@ +

|`@2Hq+

|a@e l  Hq Nq.o Dr/o+

| ra@ +~ F
q5*/qi&/qF
q q

rq,bDZ>lX{HQF
d(H$@$v5datf(1`^
c+CjKH\E@FcZ"`R bxjjk
	0f# P@

iPNPL""\JpZ+B l,CV`@@jv={ jPB MD	CBC@4`H\
-(H.s4c3bATtH:cj"R-K@>#r>"h;+0fL
0HH. A"xDJBPdEPL-@G
"3H

(fQs(`

XT

BT3PfPe!P@50d
x	B2$F"C8]B

wx_bm~
C([?

bXRBhf!	x\	b)J&

YPf#X>#Sr>/T&XkeV]Z[ GZ`(AAPXHi"pIjn}wixej
<&v

0%bt\'	#:nXGo.XGm.[VunSWlv=o;qnXLXz	#@hB @ Nb Z

B(X/hZ#	b(hC L b vG"H

b@3 l"Hjhj R@	b0B8LBT#@	Pf8L

N	0@H$Bgel(Jr Je 
| Jed@d 
0j0*=$
~:ja@+$d+
 *(D ,(
&,8

e0L(-++

e4L,Bd,Be:dd$d5D2Bg+,b $dd3Bg+
*2J+,"e,"d,","+
e(Jijd+

dl/*(-,I@@q+n,b
? ,37n+`n@+3Nk+4J.+.o.$+

d!$,F,b ,_,b 	,F,b:,[ 
~.ku Js+

d,

_t_l."Dn7@n=

dld@7Dm+5ded7t7lel+:,

 s_Jdn;`n,bl@d+:9d.Dn7`n+

da@6 l6't7lel_/4d5=:ZP7@m8l8  Xn".Xn>na@g!:`@@!: Zo58

d.".Xn.Xo,b,m4J

d.5H,,F+P@@+0$2d~+~,.~-8z,,b6@+P+P,P+P,-8z,Vav+~av+~-:
 +

d Jj sd`a`,b,a7,b *,I6L+,9+,_7,b ,,97L+ ,,9+,,F+j@@+0$2d~+~,.~-8},,b6@+i+i,P+i,-8}@@,Vav+t`v+x7@+~av,b@	x,b,"-:
 K,B`X	x+

d+

d7@,b 	 8 (Z{O@	v2+~-:
 K+

dcD7@+`A$ 
+

dcD7@+`A$ J+

d7`+

d, 
 8/`j7@

08++`@@@7@

+ `d,b*	1*p+

d0*+,"(J_4$0A$(D.$(H+7@

+ *
,"(J(D{A$.,O *,BaD[
eJ,bA*(JA$G+

d`d+~7@
ad+l*,1+0++(J++7@
0j,b," 
 ad+'l*,1+07(J [
.$(0,O+0,1+0$
.,O+0,1+0,BA$G+

d,B,b$+B`j+~A*(J+

dZ,z,b.,O,b+B$d*,",z,b .,O *,B4J

d`j,bA*(J.,O,b+1@F@2@5@8@F@F@F@F,b,ed7t 
ldd 
s.P,b5*

d,Z_"PC*O5Qh6av:,b.d/&d,V,(,b.$3d+S+

d D6F4VkFv7@ad`dp+j G63v+j(V{`v+jQ6	v21+k`v7@&+j,",m /,B46jZ&06+j!6\8	x@`xl6+k7

!6i67 V,b@
, $&,H@
aJ+

 
+s[
A*~,b *3j 
.*,b66:,b66:,b66:,b66:,b@@O@@@~*
~U**
~,b,",>,B,B:,b,",>,B,B:,b,",",",~>~,B,B,B,B:,b? .+
1,b6D1+ $2 D2 3 D1 D27`2+ $6@. $ D1,"2,"1 $1,+,B1,B;@@+7@+/25d,Y@@ 3+,",",",",","

27N2 1 1,Q D17D3+%,Q D3 ,Q 4l1 L2,F &&& 7&&4HZ
; +(6@.+0F1=l'+12N1+'+1F1/,4l3@ 1F L2,B,B,B,B,B,B+

d@>8>0>(> >>>>>0

@k,

XlD!PD": 
D""D""*U**U(D""*U**U*U**U*U**D**U*U**U*U**U*T"#7F4+H@@4,b,"6@?,&1+L *6 @
 ,[ ,B F5,b ,Q4F

d,E+O[1FQ$A`&1&+T`+3N1,b 1, D19

d 5 D4,b3N1,b,"1," 1, D1.,3N1+a&11F+a+\ 1 ,B,B1+

d6@.+,+11,+,F1F+i,Y &+0 &F1> &+01,+F1>,F+0,+14&+',U+11F+| *cJ-+w,+ ,+  1`&,+ 4&,U+}&&& 71F+w`1/,+',Z+.(1 D1 F+.,U,b1F+

 
-`J+,E &.,E 11FO+

d &,E &,E &,E+3N1+&10F+,U,b &,E &,E+

d,+',+ ,Z  
2J+6J33J+5F 
3J1,b,E+&(.1&+ X$ && & f,b,$,b:1J:,b
$,b+

d,.+*0J?7Z+),J+

d+&,5@@?@@@O@@,+ ,+ ,b6@@+>`M+4^+4

^`J +5
&+5
L+

d>,b
8+ 
2,$+ ,bQ,A`1,I
5J:,b *5I *5I *!:bZ-5I,D,D5D,C *5I *5I *5I*,J*
,b*,I*
,b@@1@@.0J1J+Y0J1J+Y0J+S, $bD-+Y $ *,YbD+Q *,b1J
.* ,Y,B,b -6@?az
"1J+c1J+f0J1J,b0J
1J?,b:1JO@1*:,b *.
D* J *,b>,b,

iO@@@ 
!!,M !	j-+ 7@\F 
!!,M@	j.+  ,7N-O 
!	j'@
j" *j",b 
!!,MZ`N	j.+ +w@@,bDDTsL0b@y`$~8~8@!Hfd+T,bXXX&.

+,9+4,m4J $.6*l+/
~,W l6 m++ 6S`.
+ 
h0J+ 
kd  +QH  Dr Ds 
+Q	bB

g1P? *-1P
` *.+k$wxx<H:s+7L c,

(++@@+X`@6@h+ 
 Jr Js@@+75/	D`&C*!+h@@!,b-\SKIP\6$.++++@$ J+Executing: <SKIP<JUMP><j0j`Watching: 1J $Gdq++Searching: sp
File: 0A0DHG@x*(+	QDepositing: P!H|? Duplicate device illegal? Duplicate extension illegal? Duplicate filename illegal? Duplicate path illegal? FILOP. failure () for input file? Illegal switch "" specified? Illegal path specification? Null device illegal? Null filename illegal? Null SFD illegal? Null switch illegal? Too many SFD's
*+ ?`"+
.+7-a 
] J"+
.,y+
9,
Q+
I% CAN'T REMOVE $% CAN'T INSERT $B BECAUSE MEM REF FAILED
 .j	`@,+6$j,?+$jx~4.

6 *+I\y@j4N

/l+

/ X?`Xl +

U4N

|l+

|3(r Hr+

|@@!(,b8d0d6

.(O=?CAN'T DEPOSIT INTO SYMBOL TABLE BECAUSE DEPOSIT FAILED$4$B

$$@@
,bp @@.@@1+8s0 $2/24D D. 3 D1 *$+8 D.+

[
;++0,Y+1,E+<
L0J

d,b
? I/O error reading command file
," *+X-- . * *H5H5j+	q-\+
 +
e@'@'??
`,>Z+@,>Z,>+@,>Z,>,>+@,>Z,>,>,>+@,>Z,>,>,>,>+@,^,^,^,^,^,~-0V,7 %{+@ i+}+n+o+v+w+x+x+y+}+}@@'@@'+|@@'@@' 
aJ+t

'waL+uO@'xd "+} "+} "+} "+} "+} 
'xaJ+|@@'xl "+}@ 
%{0J+ aN+ d d,>B,/B@@%{,kY+

,>C,/B 0 P%{+

,>,/B+.3XN(0%{0P+d \d,5,,7

%{0L+ : Z%{+h7P'o+h * J%{+h+d-0V,>,> w 
 K J$vS:	z+  ^%z >%s*>%z :$u	zg $aD+"S,%s *>++@@$x,C.,lA.D..nAS0%s *>
&^ w 
 Z
&(
&a
&$x
&c	b@,^,^+d-0V,>B,/B,l,>C,/B@+d-0V ( H%{,g+d,< Z(@,~-0

,<  %{ 
.
 (/
( J (@+-0

.D@	x /D+@	`:$x,$x



COPYRIGHT (C) DIGITAL EQUIPMENT CORPORATION 1983

M?LPM?H@M?H`M?IM?I M?I@M?I`FORTRAFORTBFORTCFORTDFORTEFORTFFORTGOQRTUWX?FTNNGS - CANNOT GET SEGMENT  - ERROR CODE:
C2`]>tPu7 M:I'[ZCGVx] Y& I&ho?m:HeHGSGHS`S g> SqSM7m: ]> aCIbmHSpa0g& SVGxG:hIHgG"xo:S g:xiNHCC&`e&h${@ (y>xZB+ $(M+(g?FTNUCE User Core ExceededIllegal Memory ReferenceStack exhaustedMemory Protection Violation
?Internal Compiler Error
? at location  in Phase 
?while processing statement $

+H$v00000+(c(c
&(W(y $(P +`B $(R`B  $(T
&
&(Z (a "
"`dp+(i7@&+(p
&(\ (a "
"`dp+(m
&(] %i F(z&")D|&")D|&")D|&")D)BG(b!$hP
& (y (z (z	`%

pa++gM?H@~Dq++ eZ+,^f,g+,>f,~,^f,-+
,>f,~,>Z+@,>Z,>+@,>Z,>,>+@,>Z,>,>,>+@,>Z,>,>,>,>+@,^,^,^,^,^,~Z<e \(2Q>w8Z<pX@	` 4CC~0C&l`C&v@C2|pC2|t(C6C6 C6MdC6Md C6|@C:MmCNM`CR

,`GFG" G2|pG7RG7TG7YG7CQG7CRG7CTG7NG>u)`G?G?@G?G?$@GNM`GO-I0I|`I@I$@I$II
dPI
dSQI
dSTI~0I~:I~H7IMPIFIex:I&hI&v@I2|pI2|t(I6SI6MdYI6|@I:MmICyINL{@INM`INMjIO-IR[B[B[&p[&r[&r[>]&v@]?h`]?i]?jM]?l@eF]G^H^IIVJVJWNONqPQPORYKSYXWqXe\Zc[LrhfhE]MF]mG^oH^pHpfsrvsit`taTuavbTwbwciz(

!,0,0,0,1x,1x,0,0*0,0,0,0,0,0,0:($h(

f`

$ ( l

, j

&`z

&n

h f`

  &@&@&@&@:(@):(@+:)x@.h!|*!x:)x@0h!|*!xx 3: 5n8l0h

j(::(=*(:(?l(ow{}~?ow{}~?ow{}~?ow{}~?ow{}~-0

. (QH%n, Z)96J%k+O )9 X%k X%m .XN` %ZS(@GH@A0XP`+dZ%m[`4NQ[`+OZ`2Hw+Z

)9QL`  wXN`1N X%m %ZS*@GJ R``A(XH`+d[

`4L\[`+ZZ`5PeZ
` JpS,@BL(

)9XL`  %ZS0@GP8 wXP`A.XN` +gZ`Z
`3*w+Z+O/+-0. Z%nZl+ Hp0z+Z

%n1l+o,d +y, Zp p.p @ H%X5Hw,

p.

p %X N0R`8d  +,}aZ+zl  %X+

%XZ04N}Z0 Z%X+w, %X 
p.
pZ

(XL XH(d 7@/ + %n+@$+++@+@ 
%p&*'+
 %pF%q 
&* + 
%p1*+&*7 #
 ,~-0 w   *C J): ,w L): ):3n):+O+ ):.):&( 2XX+Z+3xX+ 8 Z):+ < P):++, Z%X %n+@$"+|+*+1@+7+;+B@+^+c+e+j+k@+r+w@ 
%X

%nl  %p N( 0p! (h!

%{0L+| .n"+| 
%X

%p L( %q N( 0p! %nh @

l!+| 
%X

%pXL( .n! 0 P(+|Z
%X5J> %XQZ%XXZ%X+@ %X %XXP8XP%X %X %p P8+|7J%Z+E %XXZ(+K %XXN%ZQN%Z 0p"Z`8 (h#, Z%X 
%Z

%XXL( %XXN%Z %iQP8 %jh" *j#A( ,1(@

 00h@A

 .1H@A

aL+[[
&15JY %XXZ&1QZ&1+[ &1 %XXN XN&1 
%X %jQP(4P|QJ@+| 
%X

%pQL( %qXN(@@( %np +| 
%X

%jl#+|[
%Y5Jh %XXZ%YQZ%Y+| %Y %XXP8XP%Y+|,Wu+|6J%]+n %XXZ%]QZ%]+p %XXN(XN%] %X %pXP8QP8+|6J&2+u %XXZ&2QZ&2+| %XXN(XN&2+|6J%_+z %XXZ%_QZ%_+| %XXN(XN%_ %X,~ %n+@$~+++@+

@ 
%X

%p2L(+O,~ 
%X, 2L%n+0$4P

%p2L(+ %q2P(++

%q2L(++ 
%XZ

(2L%p+ (8 P(+@,~-0 'u2((+

( L'u:

w~.

w2L(+"w~.z(+ w~10+ 
wZ

%`XL(XJ%`+ 
wZ

@%`XL(XJ@%`+-0[%n08+!Z`%`+"@4V$

XXL`%`+. (.X(

( L%h5,. (	v,(J /( P%h (/  
'u2*(+. ( N'u@@X1X+3Z.XQZ0XX .*4o +-0

 ' H%p 
$ J%n:

',h  .n% +-0

 (QH%n, @@`Z`` 
w}j%

w}l& w~n&@@` w~QP` wXH` +-0

 (QH%n, @@`Z`` 
w}j%

w}l& w~n&@@` w~QP` wXH` 
w|XJ`4PV.' (0N@*' ,0J@

GaH+US:GZ`+VXX@7Nw+^*# 00J@,# (0L@GaP+^S:GZ`+^XX8 +-0

 (QH%n, 6J&<+d X&<+e &<XX8 X&< .n% 0p& (h& 
wj',S0(P.((H.*..( N`:

&= +-0 w.(&(8

.,QL%n .XN%n,  w PXQXX *!XJXS(GHX +-0 w*(0J+.)5N  + 
w,!0L+ (+ w0)0P+ 8+

w(*0H+	 0+ w**0J+

 @+ w.+ 00N@*) ,0J@

GaP+[ 7.X+ X+ w0#0P+[8 `+ 
w,!0L+[(7`O+@	`

&=

&=

&=

&=(((((88((00````@>`  80@ %%(%:%;%V%W%W%N%M,>,> (! %p@@)<@@)<@@)= * 
* 4#5H6*/44HR (n8+Y)G/4G4BI#0n#+^,`#0n .7 "`/%
<

<M.,%
l0.%<mp.(.
ej9F`h+H)/4 <.5B:)< T)<l(+idh+N).4l(`d+T14@34G+X.4@)|tH H* J*,^,^,~1434H+X.4)ztI+RU(U*5tZ@h+Z H* J*,^,^,>I,O!/J,~4"YU(U*+Z#1v,~).4(&6
/6$64"g,p/"H.4`,~,m."H/4`,~l*`d.*ad.*@ej9K+K@l@ph\l\+q

\..H,wl(`lJd*dh+vl(.4[\Z\,~ (p{/4 (p{+/24R/"42)H(
@)
H,~)
H(
@)H,~;n=Z%5X.b'bN::q["$Dg	-Vk&9A#WSj,L~he7`B~"l	n+Gl*68}g5"NPQ*DB$e5Rm!CdW)Dt]w3vu5Z9k1(H%]2Z/?T?0{/J'NM (2>@'0j=@&h/WB;M2@% /H.H;::J(@$0N9(-<bR8kzIF#C<M|,4+a;7A6Yi"Xr+/^6r5\!pgAI*-1|4x!^;!)-z-f3Y8y 'sKc(1p>\2>,N4?
#lv+eh6^?"1/*ai[@{_M+;"~`V*;^8ku+C96Ud4'+A14[8nqc
".hm5<q1DlsI4[P;ar4b%-!znX=
9J.LC~=<~

4+OAe1#`?,XNvR'nbT'uTX+E	n5w,*)Z={Z$mjoV-4Refag?
z!/l4m46GBa2JzOoNl!#kBGLf3
,@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-/024579:<>?ACDFHIKMNPQSUVXZ[]_`bdegijlnoqstvxy{}~

 !#%&(*+-/023578:<=?ABDFGIKLNPQSU0
6r5\.z@8?1
k>
h5:#Ei@

B]l$-#Q:	$D7-@* xpD85+2voH/&-{*7h/Hh47gUtov)x%x9 >}8+

/[I?/"v1
}vhD7\:B2.HI(*K,

uEo"xT!u)W}2!R%Y1-:v8z

EA' ^9:>y $ 1)Hd)g

5z6h[+Pi0U?L&&]mM-xn#4Gs?
J#[40~"u8w>,@NC6P2gr{Yq;Dd8X;D,u#h[;+e;z
*= >PVR`T?0$:([P-MiIAP51<v9

\+CX#=a8T5"mN@6$|00-0 w[
  J)=Z

  L)>.	M0N+Y(	N0H+Y )=0	N ,1P@

 )>*	O .1J@G

aL+Y,>	H+c )=,	O0L+].	O0N+b :z	O )>0	P0P+d,	N0L+b :z	P+d,>	I,O/	P+

w*	Q0J+ )=(	Q H)>

)>*	R J)?(H. $	` N)?3N	R+6

w 
)?(Jj	N )?3H)>+s,>)=,>,>,

/	S wQZ@ w,	S *0LB@
 )>.	T 00N@A
`J+U

)?3L)?+U,>)>(L,>:w,>,

/	S wXZ8+U0	Q5P/*	T4J :z	N+ )=(	U ,0H@

 
)>.	M 00N@A

aL+

 w (h	U+ w *j	O w P)? )=,	V0L+  aN+ 0p	O )= PwZ@ Z)=+

)= 
0aJ+  w.	V0N+,>,>,	8/	V 
wXZ(+ ,>,>,	8/	V 
wQZ( )? Hw )>0	W0P+( 
8aJ+& (h	P )> HwZ  Z)>+! )>

@aL+-,>w,>,	8/	V wXZ8 )? Nw+U*	Q0J+P )=(	Q H)>

)>*	R J)?(H. $	` N)?2N	R+9

%i L%p,>,>	I+S

)? *0L@
 w.	W 01N@,	W .1L@AA
aJ+C,>%i,>	J,O/	V w ,l	O )?3N)>+J,>)=(N,>,>,

/	S 
wQZ( 
)?3J)?+U,>)>(J,>,>w,

/	S

wXZ0+U %i P%p 	J H%q,>,>	K,NL/	V+@+-0 w*	X5JZZ  N)@Z  P)@+c.	X0N+^[
  J)@Z

  L)@+c 
%i J%p

	K L%q,>,>	K,NL/	V+ )@0	P0P+j*	N0J+h :z	P+j,>%i,>	L,NL/	V 
)@,	X L)A )@0	Y P)A(	Y H)B3L+	 .0P@ (0P@G

)@*	ZD`N+	,>)@ )A(Z,>,>w,

/	S Z)@ w(	Z5H| )@XZ@+} 
)@QJ@ 
)@.	[1N+	 ,6H)A@

)BaL+	 :GZ(+	 
)A .0J@ 00H@A

)@*	[AaN+	 (h	\@+-0.	P w~*	O0J+	 w~ 00N

@ (0N@GaP+	 * Jw~ w~ 00N

@ w~*	O ,0J@

AaP+	 +	7 w~ (0N

@ 
w~,	M 00L@AaH+	# . Nw~ w~*	N0J+	2 8 P'b 8 H'b Np7*(!7	L 	M

p0	R(P w~(H.. Z'd,q 
	\ J%n 'c N%p

'c L%q w~ H%n,h+	7,>w,>	]0	Y,>,>w~,>	],>,D/	^/	P+-0 w*	O0J+	? 	\ N%n@@%p   P%q * J%n,h+,>w~,>	] w.	^,>,>	_,>	],>,D/	^ Zw w (GH@7@+@	`$e:
h
-%(0(8(  80

0(@ 0@h 8

8 8 0@((.0000

h Kc-aCN=ma-0 w~[
  J)C[

w.

p8

3N+
Z* Q*	,>,>%i,>

o,NL/

q+ ah+
,>w~,>w,/

q+@@)D@@)D 
)CZ6(Q6	Zw[w44
P ` N)BZ

X L)C0

r4P
,>,>

r,>

s,

q Z)B6*X+
',>

s,>

s,>

t,>

t,>)B,>)C,D/

u Z)B

)DaL+
%,>

s,>

s,>

s,>

t,>)F,>)B,D/

u+
NO@)D )B N)F+
N

)B.

u0N +
@[0 H)GZ
0 J)G.

v0N+
5 0aH+
1 )C h$(/)D"+
3 )C h$(.)D  Z)D 
)G J)B+
@,

v0L+
@ )C 8$ .p)D

)B 
0aJ+
?,>

s,>

w,>

s,>

t,>

s,>)G,D/

u+
@ )G Z)B )B*

v0J+
E )C  $h.n)D+
N )C 81P+
K,>

s,>

s,>

t,>

t,>)B,>,D/

u Z)B 
)D`J+
 O@)D )B Z)F8.6=4

)C6.0+
Z )DaP+
X,>

s,>

s,>

s,>

t,>)F[0,>,D/

u Z)F+
\[0 H)FO@)D+
\[0 P)H @.h)D w~ )C*

w,

xD
aJ+
k.

x1N+
k

)DaL+
i,>

s,>

s,>

s,>

t,>)F )CZ
h,>,D/

u Z)F+
k 
)CZ( P)FO@)D w~0

y0P+
zO@'w

y L%n@@%p 
)D J%q . N%n,h Z)E )DaP+
x,>

s,>

s,>

s,>

r,>)F,>)E,D/

u Z)F+
z )E H)FO@)D@@)D,>

z,>

s w~,

z,>,> 
)D`J7)F@,>,:/

{ Z)F )F )DA0 P8[w,>,>w,/

)FZ
0 J)B.

{ 00N@ (0J@GaP+S:GZ0+XL(7)F@+-0.

|d  [w.(QH%n, S* J%n

| L%p,h Z)I )I 0p

y (h

},>

},>

~,>,>,>,:/

{  *j

~[

w.,XLP

y H%n@@%p %i P%q J%n,hXZPS.GNP w~[

8 L)H[0XHPS0GPP@[w Pp2rp+6 
.
w (.

4N0,>,>

r,>

s,

q  .XX 0

0P+5S:GZ 9*XV`9*[w,>,>w,/

q,>

z,>

s w~,

z,>,>,>,:/

{1Z)I+w~0)H7,8+D[8 H)J )I  A0 Ph )IXNX /

|+-0 w~1H+j

wL)Jw~N)K w~ P)K7H)K+i,

  L)L[0 N)K+gZ 0P+g[

L)L.[
0,>,k/

|aZ+\ )LZh,>,k/

|`Z+_,>%i,>

o,NL/

q+j )LZ8 P)L 
)L(

{0H+gZ(,>,k/

|`Z+g,>%i,>

p+] )KZ
@ J)K+KO+@+-07Hw+nZ

 0L+oO+0

v0P+s,>,>)K,>)J,/

q+,z[ ,>,k/

|aZ+~ wZ
h,>+|0

v0P+~Z

 ,>,k/

|+@+-0

|@ w~< Hp2xp+

 
.
wZ

(2Lw~9

O+

@/

|+-0.

| `h+

w+

; *QJ%n,7S, L%n

,p*j

},>

~,>

r,>p,>,:/

{  (XHP wZ
h,>,>,

</

q XXP,

 .0L@n,

</

qXZP w*

 ,>,>,

</

qXZP w0

y J%n@@%p %i H%q , L%n,hXZPS.GNP.

1N[`

y J%n@@%p ` H%q , L%n,hXZPS.GNP wQV8S0BP8XNXd  7@/

|+-0.

|0w~*

@ +

m0w~0

C +

m 
w~,

{0L+

F :+

F :QZ%n,  wXP` w~ 
  J`

  L`[ 4N

O[
 ,>,>,

</

qQZ` 
w~,

{0L+

cZ(ZX..QN%n, XT`"2 .

 0 H@8r

U 2Z
X Jp2rp+

g .Zh,>,>,

</

XZ0 .(

ZZ(4N

gZ

(,>,>,

</

qXZ`+w~0

lZ

8,>,>,

</

qXZ`7@/

|+@	`>$@(8	0$0((( @F @80h((aJ|G8X``   0aJ~8G D FP. FP88FP8F@F0-0.S wZ
  J)NS, GL([

  L)M[  N)MZ  P)N[
( J)O ,lT )M0T0P+
8J)Q(U0H+

@(U 00H
@GaN+

( L'b ( H'b K P'd,q V N%n

'c L%p 
'c J%q )Q0V P%n,h+

V L%n ("H%p ("P%q.U N%n,h Z)M 
)M(U0H+0L+

@
,W (0L
@G
aJ+

@ L'b L H'd,q 
V J%n 'c N%p 'c P%q

)Q(XH%n,h+

@"L%p@"H%q*WJ%n,h Z)M )N,W0L+

@.V ,0N
@

GaP+
  J'b   N'b

L L'd,q V P%n 
'c J%p 'c H%q )Q,Y L%n,h+
V J%n  "N%p

^"L%q0VP%n,hZ)N )M )N0Y,Z3P+

/[Z)MY)M)N0Y,Z3P+

/[Z)MY)N)N0Y,Z3P+

/[ Z)N )N.[4N

w *@GJ0@@)P

)N*\0J+.X0N
+
0J'b0H'b6.(!+++*]5J 00N+ wS*GJh+ 
02J^+O@)P+ 0 02N\@ (6J0@AaP+ wS.GNh )N0^1P+! *QJ%n, Z)O )O )OXN  wXP8S,GL8 ,l^ *BJ8 )N*_,>,/_ )OXZ  )NXH@XP

wQH0 H)OZ  N)N *GJ0[
04J![0QN Z`0[
  JpQH( 
w )NXH(,>`,/_ wQZ8@@)P )M,W *0L@
 )M.X 00N@A
aJ+; Hp7,(!7N N p0`..: Z'd 
)M

( L'b ( H'b 8 P'c

8 L'c,q 
V J%n 'c H%p 'c P%q )M,Y L%n,h Z)P+\,a1L+Q w *ja (QH%n, Z)O

)O )OXN0 wXP8S*GJ8 *j^ (BH8 )M(_,>,/_

)OXZ0 )MXP0XL@ 
wQL(Z0 N)M L)O[(4HQ[(QN0Z`([0 HpQL ,>w,>b,>b )M0_,>,>,>)M,D/c Z)P 
)PS(GH([( H)O,a .0L@nc

)P(\ .0H@ )N*W ,0J@

AaN+* w  ap+o 
)P,U1L+i,>,>`,>Z,

/[ Z)P V H%n@@%p )P 
@8
 J%q , L%n,h+ 
)PaJ+{

)P.X1N+u,>,>`,>Z,

/[ Z)P V P%n@@%p 
)P"

(8

 L%q . N%n,h+7,(!7N N )P(`. Z'd 8 P'b 
8 J'b

)N 0 H'c 0 P'c,q V N%n 
'c J%p 'c H%q

)P0X P%n,h Z)P7.(!7N N 
)P(d..: Z'd

( L'b ( P'b )N 8 H'c

8 L'c,q 
V J%n 'c P%p 'c H%q )P,Y L%n,h Z)P 
)P,U1L+,>,>`,>Z,

/[ Z)P )P6p +W

(!al+% V N%n@@%p@@%q 0 P%n,h Z)P wS(GHh+W V N%n@@%p 0 P%q ( H%n,h+W w 0pd 
 aj+9

)P.X1N+2,>,>`,>Z,

/[ Z)P,>w,>b,>Z,>`,>)P V H%n@@%p * J%q , L%n,h,>+Q

)PaL+G )P0Y1P+@,>,>`,>Z,

/[ Z)P,>w,>b,>b,>` 
V J%n@@%p , L%q . N%n,h,>,>)P+Q,>,>b,>Z )P._,>,>,>)N,D/c Z)P,>w,>b,>e )P0_,>,>,>)N,D/c Z)P

)P.X1N+W,>,>`,>Z,

/[ Z)P )P0X *0P@

w.eD
(fA
 )M @ ,0n@

A
 .7(@@A

)M 0 00h@A
 (7.0@A
aJ+p V P%n@@%p )PS

8 )M/

 "L%q * J%n,h Z)P wS.BN@ .GN@+ )P.W0N+w @0h+u wS,GL8 wS,GL8+(f0H+{ wS.GNh+,>w,>g,>Z,>`,>Z,>,D/c Z)P w )PXN@

)MQL@@/S+-0

S( H%n*O.*S

.O..(N.

0P.0(P.

(P..g H%p:
'G,h  wnhS0BP` 0ph +-0

S( H%n*Q.*S

.Q..(N.

0R.0(P.

(R..i H%p:
'H,h  wnhS0BP` 0ph +-0 w[
  J)Q4J7 )QZ80P+* 
i J%n, Z)R

)R.XN0()QXP0wQL7J)Q+7Z(0N+0)RQH(,>,

  L)Q+*@+-0

.[d   (QH%n, Z)S 
)S

&+Z0XN(XJ0 0pj (hj,>w~,/_ Z)S w,Y1L+H 
)SaJ+G k Z%p+K k+F 
)SaJ+J l+F l H%pS* J%n,h Z)T )S )TXN 7,+R 0pmS:GZ8 w~*m J)T")S.($
.* Jp.*QJ%n, )SXZ8 Z)V

)V pXP0 ( H)U 
w~Z.(Q.	 N)U

w0X0P+`Z8+f 
0aJ+g V N%n@@%p 0 P%q ( H%n,h Z)T+h &! N)T 8 
)T Jp2xp+ )V

)U.

 )UZ@ HpXH0*a0J+r )V )U. ,ln+s )SXP  )S`P+~:

)U )V.

 
)U[( NpXN00^0P+} )V 
)U. ,ln+~ 
)SXJ83X)T+ (.h)U:
)U )V.
Z XP(S,GL(:

)U9i V H%n@@%p )T P%q . N%n,h 
)VXZ(S,GL(

w~ 0XH(S0GP( wXP(S.GN([0XN( (hn )TXP(ho@/[+-0

._ w*o J)VZ, Q,	 L)W 8 Jp2xp+ )W[83P&!+@+ ,.l)W9 :/_+-0.S@@&=[%Z H&+7J&++I.j0N+GZ(4HGZ( N)X 8Z8 Pp2xp+G )X.Z

  L)Z*\0J9([0 P)W6(@9(,>,>,8/S 
)WZ.( N)Z 6(p Hp2vp9( )Z[

@ L)Y[0 *1N@
(pA
aJ+=,>0,>Z,>S,NL/[

)ZZ0 N)Y[8 (1P@*fAaH+E,>8,>Z,>S,NL/[ ..n)Z949( &+Z

  L&++"@/S+@	`LLLFE}u

'G

'G

'G

'G

'H

'H

'H

'H (8(((0 (@@0( 8

8 (0 0_P08h8 @08((< 0B0@L`D`$ ((CR@CTs@CT4'CT9g8$@@FhF(F($@ $@(D@+^'bZ

'd+@0-.s`n@0,E'c,~.
'c'c'c,L/
'c('c('c,N$
'cH'cH'c,O&
'ch'ch'c,P.
'cH'cH'c,L/
'ch'ch'c,N$
'cH'cH'c,O&
'ch'ch'c,P+ ,Ws,,+ ,,,+ + ,,+ ,,,,

+ + ,

+ + + ,

,+ ,

,,,+ + ,Ws,Ws+ ,$,$, ,,,Ws,Ws,,+ + ,3,,,Ws,Ws,,+ + ,3,,,Ws,Ws,( * *+ + ,Ws,,+ ,,,+ + ,,+ ,,,,

+ + ,

+ + + ,

,+ ,

,	,,+ + ,Ws,Ws+ ,',', ,,,Ws,Ws,1+ + ,<,,,Ws,Ws,1+ + ,<,,,Ws,Ws,(h_h_+ ,3,B,GcJ_,~h` *h_,~A
'cG
'cI
'cF
'c('c
'c,~'c
'c,~,Ws,Ws,l,n,n,s,u,n,n,z,|,~,~,,Ws,Ws,Ws,Ws,Ws,Ws,Ws,Ws,Ws,Ws,Ws,Ws,,,,Ws,l,q,q,s,u,y,y,z,|,,,,Ws,Ws,Ws,Ws,Ws,Ws,Ws,Ws,Ws,Ws,Ws,Ws,,=,=,Ws 'c(
8,~7'c"'c(
H'b,~ 'cha,~ 'cH8J8,~5*w .('c/..
"'c(
8,~"'cha,~"'cH8J8,~ 'c(
8.
'b,~ 'c(
H'b'b,~ 'chaH'b,~ 'cH8'bJ8
'b,~7N'c+4. N'c@aN+(.+	3N'c,~(.$
`N$
'b+6@'b+ *@,E,~ *,~U*7H'b+ *`N 
2Ha1H+@
@,~b#'c4N#'b5B+&B+0*`NH+0/(N5N6 'c+4bb+06+46@'b+4@,E@h+46 'c+)@,EU(U*+4@h+4H(N4N/-.,`n +56 'c+;+6-./`n +56 'c+6bb+03+;,^d.+86 'c+;@,E4(9U(U*+4!( *+4@,E@h+4b#'c4NG'b5BA+JB+0N`NH+0S(N5N@6 'c+Xbb+0Z+X6@'b+X@,E@h+X6 'c+M@,EU(U*+X@h+XH(N4NS-.P`n +Y6 'c+_+Z-.S`n +Y6 'c+Zbb+0W+_,^d.+86 'c+_@,E4(]U(U*+X!( *+X@,E@h+X#
,Ws,,x,},,#,m,v,x,Ws,,,l,r,v,z,Ws,,,l7 (,~,3*'c H'b*
'c J'b,3 
 'c,~,<*'c H'b*
'c J'b,< 
 'c,~#7 'c"h,~3h'cg'c,~3h'c+|h'c,~@h,~ &'c,~3*'c 
'c,~2j'c 
'c,~3('c 'c,~2h'c 'c,~#
7 'c"j,~  *,~ @
4H

)~d(@d*.c,~ 
 (,~5JW 
c,~ 
 (,~7@4J4(2hd+3(c+/c7 l(@) 
@,~3(d+2he++@,E 
e7 "
@,~@,E@h,~ &(6@h(Fh*6 *,~ @
)|h(Ff,~ hg,~#%((
'.7 'b"j (,~7 ([({d(~)?27 'b"` 
 (,~jg (,~4HW7 (3He2Je+6+:aj+::l(5(:U(+h7 'b"` *,~3He2Je+>@
,~3Hh0J+Ai,~h` *,~bJ_+<,*
,~,>,>,>,>%i,>j,O,^x,^x,^,^,^Z

'd4NW0,J+N/,uA,+U0,P+P ,+U0,a+R/,PA,+U0,d+T ,+U ,4LWan +W@h,~4(ZU(0LU*,~1L+] i1L 
i,~S( *,~q@  0 8 0     #\c?H:@@,>fA,]+/Q,~-0 w $38Q+v6R

\U,04:v &" P)[ &# H)[ 
.*

 L&"O@&#+|6L&#+y,>fA,]+/Q Z&"O@&#[&"0v

+| :(ZX+ (Z

+-0

(w~/&"<"QH%n, [
%n<
QJ`,w~5L@pwxw~ w~QX R``+
 w~[@XX R``QX@0w[%n.<pw*w~Z,(#]Q,	Q8Z. *8o J&" +-0.Q &"/w~  
w.
QJ%n,XZ%n

%n.

R LpZw~4N$8Q %nX 
w~[

(.

 *:g [(.p%n ( Nw~[`,>,>,/S+4V) %nX 
w~Z.(#]Q . *:g w~8 P&" 
p J@#]@/Q+-0 &"/w QV%n4V8,XZ%n

wZ.0#]Q .< *:`8

 L&" %n.R H0#]@+-0

.S &"1(}+=,>K,O+_

w.K Np0L+@D@+-+D+V+W+`+o+~++$7H&#+F@@&#+H,>fA,]+/Q Z&"[&"3Np+Q1n

+L,>L,>M,O/S+p,>l\[&"(P AT7Z+-:&"

&" L8#]+-,>+m &" Hp *N. Np2xp+^,>,9/Q4:-9Z,>p,-/Q+-,>,l/Q p w*N.
p Jp2xp+h Ad4Ng +i9d,>w,.+_@@'q:

&" /p8 H0#],>,9/Q5:-+-,>,l/Q p w*N.
p Jp2xp+w Ad4Nv +x9s:

&"@@0#]+-:&" 
/
p8
 J #],>,9/Q5:-O+-@@p &" Hp,>p,9/Q4:-7N&#+[&"0P+@@&#+ 0 P's,>fC,]+/Q4Z &"10s+Z*pQ*	,>Z.pQ.	,>Z,pQ,	,>,~/T+7Jp+^,>p,>,>p,/T+-@@p &" Hp 
&"1*s+Z,pQ,	,>Z0pQ0	,>Z(pQ(	,>,~/T,>p,9/Q4:-,>w,l/Q w DA5H7Np+^,>p,>+6H&#+&

<U,0+-[&"

p/.

3L+* 4U, +- )[ H&# 
)[ J&"@@)[@/S+-0.S@@p w 
$ Jp

p`L+5(LLp:p+1p,>l\'o 
p`J+?(J Jp:p+;

p0l

+C,>4\/S+8 w(P Hp0H+H,>P,>O,O/S+IgO/S+@	`04c004c[hS04c0$cVZ2,D\2,x y;7;0?>w? el;9;dWs:~:vA@>L;5<
><%(<(</<*<-;*;<;P0`@ p @@P@`Pp`

PP 0`P@P`P@p0PpP0 
 PPpPp``p@P	0p

	``@	`Pp

@p 	 	pPpp

` @P
P
pP`PP

p P

`P00

PP 00@PP

0@PP``pp`0@@`0@P@

 `Pp`P0 p

pp 0PP````0p@p0@ @  `p

00P

Pp  `P

@`0

0 00@ @ Pp  `0000pp` `@  P`@!`

@P`P0` PP`PP 0@PP `PP   0` PP! Pp`P

$0@"!pP" `"0"p@# P#@`#P##`% PP$`$pP`%P&P'0 &0``&@P

&p`P(P'p``P(pP`)p@)0P`@@)`P+ `P,`@+p,,0,  `,PP.@P`P; @        ( (0  @  @@ @  @ @ 8@    8@@@@@@@HPH P@HH    @ XX`@DD D@ h xxx x@ p p   ( ( @( @@ ( ( ( (     ((@  	 @   X(X( (0X(X(0(  8@  @   @  X(X( @@(HH XPX@@P P@  @  @  @`` @8SYNTAXACT"FUNCTION"-0S( H%n6*(!+b w~

l" L%p+d

w~ 4m N%p,h Z)\

)\ w~(0^pc <I H0 *jd w.dne w~(*_je0c0P+rO@'w 02Hf+r : Z0+r,Wu w 
)\,f0g .3L@*gAaN+{Z, Q,	,>,>%i,>_,O/h )\+-0

.h w~[
  J)\Z

  L)]Z0 N)_Z000+,>w~,>%i,>`,O/h+\ w~ .0HQ@

)]Z0 *0P@
AaN+

 ` Hw~ w~/(C H)^

)_0c P)^ *0P@
 .0P@G
 (0P@G
aJ+

)^(

6.4J+1,>%i,>a,NL/i+1

)^(

 4Ian++ )_Z4J(i. 
@ J)_ .2Jj@

)^ (0L@G 00L@GaN+) wZ*hQ*	,>+/Z((/(C H)^+10a P)^ )_*g3P+1,>w~,>%i,>b,O/h,>)^,>w,^/i

w~ Z)]QZ0 )]0jpc 82Hk+=

)_0k0P+= 01H+=,>%i,>b,NL/i

)^(

0c .1P@ )]Z
 0c 83J@A*c 00J@Z

  *0,@
AGaN+L,>w~,>%i,>`,O/h+U 8Z

  Lp2xp+U 
)].
Z( P)`.l3N)^9N,>w~,>%i,>b,O/h9N w~ ,ll*g0J@

 )^ .0P@G

`LO@'w@/h+@	`.<ID$JO084I8SDG(0@ 4C`C~3@C&lgC&vC@C2|s@C2:C6C6'C6MdC6Md'C6|C@C:MmCNMc@CR

,gGF@G"#@G2|s@G7RG7TG7YG7CQG7CRG7CTG7NG>u)gG?`G?C@G?@G?$GGNMc@GO-I3@I|gIGI$GI%dGI
dS@I
dSQI
dSTI~3@I~:I~KGIMS@IF@Ie}I&i`I&vC@I2|s@I2:I6'I6Md'I6|C@I:MmICyINL{GINMc@INMjIO-IR`[B@[B@[&q`[&r@[&r@[>!`]&vC@]?`]?`]?`]?`e

,gGF@G"#@G2|s@G7RG7TG7YG7CQG7CSG7CTG7NG>u)gG?`G?C@G?@G?$GGNMc@GO-O3@O|gOGO$GO%dGO
dS@I
dSQI
dSTO~3@O~:O~KGOMS@OF@Oe}I&i`O&vC@O2|s@O2:O6'O6Md'O6|C@O:MmOCyONL{GONMc@ONMjOO-OR`[B@[B@[&q`[&r@[&r@[>!`]&vC@]?`]?`]?`]?`e

&"0L+\O,~@,~6H&#+_,j Z&"O@&#[

&"0L+d,>\@,~6H&#+g,j Z&"O@&#[

&"0L+j:&"@@h#]+k+@,~6H&#+n,j Z&"O@&#[

&"0L+q:&"@@h#]+r+@,~-0."T &" Hp@@pO@)`l ,W Zp4:7Lp+{:&" ( H@#]:&" Lh#] &"10s+Z*pQ*	,>Z,pQ,	,>Z.pQ.	,>,~/"T[
&"1J+O+,j Z&"@aZ+u[&"1N+

,>"J,><\/"T+6Hp+,>p,-/"U+,>p,>,>p,/"T@/"T+-0."U &" Hp@@)`6J&#+O@&#,j Z&"[&"0N+,>\

'p 0an+%,>w~,>w,B~+',>w~,>w,C/"U@+-0 w~*"V ,0J@

 w0"V (0P@A

aL+0O+@+-0."U w[ Z  *j"V ,l"W."W+@<7+A,Wu+;+<+=,Wu+>+?+@ "X+@ "X+@ "Y+@ "Y+@7"Z "Z Z%p w *j"[S, L%n,h w QT  .n"[n"\ 0p"\S*GJPd  QP%n Hp,  
pXR( ,XLHXXH."]0N+QS:GZH+QXJ`XVH("]0H+US:GZH+V

wXLX@/"U+-0."^ (!1Z*'gZ

2j+\,>"J,O+O@p	 )` Pp
[&"0H+`@@)`+I, 6x+c +M:p	. X8@@)`[&"70<"r+j6jp	+n p
 P)`.
 (+M7jp	+I[&" p	.[8 
$"r3*D"r+I 
p	.

( Lp
 "^ P%n,  p	 . XXVP>p	[
p
 Np0J+4H}.[
 0j

+} p	.[87(D"r+},>"K+*"_0J+ZX0N!+ :XZX+,>"K,O/"U+M .n"\ (h"\0"]0P+	S:GZP+

XTX 
Xaj+

S,GLP *j"[Z`P

XaL+G,>,>,	8/"UXZP+G>p	. @QHP[
p
/*+@,+7++&+'+(+*+-,Wu,Wu,Wu,Wu,Wu,Wu+/+1+3+5 ,l"\Zp
n"\[P,>ZP,>,(/"UaZ+7,>,1/"U+G ,+0 ,BLP+4 ,BLP+0 ,BLPZ

p
1L+6 :+7 ,l"\l"\+7 ,l"\ :+7 ,l"\+, ,l"\ :|BZP+7 ,l"\ :z"\ ,>,K/"U ZP[P,"]0L+>S:GZP+AXTX Xap+AS(GHP0"_0P+DS:GZP+GXTH 
Haj+GS,GLP  
p	.
 Z(+e:

p	.

 &" N0,j Z&"d +^/"^+-0."T w*"V1J+S,>"L,O+O@'w "^ N%n 0QP%n,  (h"_ *j"]

wXLX &" 8#] Pp5P\ &!+`*"`4J`,>,>"`,>"a,

/"T Zp 
&"

(#^ Lp w0"a1P+e 8+f[8 `7Jp+k."b4N,>,>"`,>"a,

/"T+o3X"b+p "c P%n@@%p X%q ( H%n,h Zp+d   0QP%n, ZpS( H%n 
"c J%p,h Zp7,+{ p 0p"V (h"d 
 J8 ,l"d,>"e,>"e,>"`,>p,>p,:/"f Zp p 0XP8 wXH8S*GJ8 p0"a0P+S:GZX+XV8,>,>"f,>"e,>"`,>p,>&!,D/"g Zp 
pQJX

pXLX w0"a0PXV8,>,

/"f+-0."f[&"1H+,>\

&" Lp,!L Z&"[&"0N+	 &" Hp * J's,>fC,]+/"U5ZN )` Np@@)`,j Z&" p("g0Hl [

&" .0L@ 00L@GaN+(,>"L,O+[&"0H++:&"@@h#]+.,W

&"8

 L&" Z0#]4:#[

&"1L+[&"0N+I 
p8
2J&"+I &"7X@#]+9("]0H+9

`aL+9,>"e,>+d ,j Z&"[&"0H+=:&"@@h#]+@,W

&"8

 L&" Z0#]4:#[

&"1L+D,>\,>4\&" p N&",>"e,>p, /"U+ 
p J)`[

&"1L+N,>\,>4\ p2N&"+R:&"O@h#]+\,>,-/"U &"  #][
 #].
 #] Jp2tp+\

P Lp0"h0P+[S:GZP9VS(BHP9V,!L Z&" p*"h1J+f,>,$/"U Zp &" 8#]3P"b+[

8#],>,>8#],/"U+,>"i,>, /"U,>p &",>h#],
/"U Zp[&"0N+ 
p J&",j Z&"[

&"0L+r:&"@@h#]+u,W &"8 N&" Z8#]4:#[&"1N+y,>\,><\
&"0J+}:&"@@h#]+,W&&"8H&""Z+#]4:#[&"1H+,>\,>$\
 aJ+  06,<"r@("iMaP+,>"e,>p,C/"U+# 
p,"j0L+ (`h+,>,/"U 3X"b+/"M,>,>p,^/"U Zp+

pS.GN0,>"e,>p,C+",>"i,>+!,>"e,>, /"U p/"f+-0."g w 
 aj+*,> ,>"M,>%i,>"N,NL/"Td

&&2Lw+/ wZ0hQ0	,>,>"N+o &" @#]2H"b+2@@p+3[

@#]8

Lp

p.,QL%n,  Xp "^ N%n w P%p X%q, Zp p 
w,"jl"V .n"W pQH@ 
pXJ@4JH &"[8#]46H p. &" 
.
@#]

( Lp L  p.708+H 
pXJ0=6A w 8`h+L pS*GJ@ w*"k,"kH
aJ+V,>,/"U Zp3Z"b+V,>,>p,>w,|/"T pS,BL +j p (|BH8 &"  #]3P"b+j7vp+j 
p.
 ( Np("a0H+e,"l *0L@
("l 00H@G
aJ+i,>"a,>+h,"a0L+i,>"i[8,>,B~/"U=v[ 
p[( Nw("V0H+z

82L"b+q,>8,>"O,O/"U+ ,>p,>b/"U p ZpXZ ,>"e,_/"U Zp p w

8 L@ 
p P(S(GH(

w 
0aj+,>p,"/"U pS(BH8,>"e p[h,>,C/"U7p@/"g+-0."l@@p@@p )` Hp[
&"1J
+ 
0J	+,j Z&"d @@)`+ [&"0N+ B &" Hp,j Z&" 
)``Jl ,W Zp4: U[&"0N+ -,!L Z&" p*"W ,0J@

."W 00N@*"W .0J@GA

aL+ *:&" * J #]:&" p P8#],>p,-/"U:

&"@@0#],>p,-/"U &" 
&" (#] N #] 0 P(#]8 H&"@+!K*"W1J+ K 0p"m+ K[&"1H+ 0,>"O,>$\

)``Ll ,j Z&",W Zp4: U[&"0P+ :,>p,>p,IV/"U Zp4Z : Zp+ H ,7Jp@

)`aL+ @,>"P,>"P,>"I,O/"T+!K,>p,>p,!R/"U+!K (0N@ *0N@
GaH+ IZ

&" Lp,!L Z&"+ K, Zp4:!K[&"0H+ id @@)`

"^ L%n, Zp p 0p"ap"d pQH8,j Z&",  Zp5: VO+!K

p pXP0,>,K/"U p[8 Hp*"W0J+ ]S:GZ8+ `XN

 al+ `S*GJ8

pZ0 Np("a0H+ eS:GZ0+ hXL8 8ap+ hS(GH0 p Pp[

&"0L+!O@'w paP+ m,>"Q+!d @@)` "^ H%n,  *j"m ,	l"] .n"n &" Pp p*"V1J+ x,>"Q,O/"U p0"a0P+ {S:GZp+ |XX8 6:
&"@@(#]=v |:

&"@@0#]:&" p P8#] &"1(|+!,>"R,O/"U+!K,j Z&"[

&"0L+!, +!0L+!Z&" Hp,!L Z&"+!

, Zp70p+!K 
p,"j1L+!,>"Q,O/"U p("n0H+!S:GZp+!XX@:

&" p N0#][&"1P+! 
p

&"/

/, L(#^,>,-/"U &" 8#]XP` p H&" Xp p P)`6Hp+!! p+!K

p."h 00N@("o *0H@
AaP+!;."o (0N

@*"o 00J
@GaH+!6 0 N'b 
0 J'b "R P'd,q "c H%n 'c N%p

'c L%q 
p0"j P%n,h+!K "c N%n 
0"J%p 0"P%q("o H%n,h+!K "^ N%n, Zp

p (h"h *|BJ0 
pXJ0Z`00"p0P+!CS:+!FXL( (ah+!FS:GZ0 p,"V0L+!I :+!J:"V pz"p /"l+ ( H's,>fC,]+/"U4Z!PS:

,~,>fA,]+/"U,~-0."U6Hw~+!U",.l&"6Lw+!W"0.p&" &" Pp *6Hw@
 .7Lw~@A
aJ+!` &"

 #] L@#^ &" h#^ N@#_7Pw~+!c

&" . N0#] P0#^7Lw+!f 
&" 0 P(#^ L(#_ *.j&"[&"0P+!ol ,j Z&",W Zw~4:"7Nw~+!g:&" ( H@#]:&" Nh#]+!g,>p,-/"U[&"0P+!t:&"@@h#]+"0P+":&" * J8#],j Z&"@@)`d ,W &"8 H&" Z #]4:"[

&"1L+!~,>\,>4\
&"8
 J&" Z(#]4:"[&"0P+"	,j Z&",W &"8 N&" Z8#]5:"
O+":&"@@8#][&"1N+"`+",>\,>D\

&" &" 
8#] J0#] 0 P8#]8

 L&",j Z&"@/"U+-0."g w[
  Jp[(Z

P LpZ0 Np ap@+"&Z
 Z

83J+"&,>P,>%i,>"S,NL/"T wZ
  Jp

pZ Z03n+"+Z0 Hp7Hp+"G 2 Hp2rp+"G w.Z8 p.Z@Z
`0J!+"5("_1H+"5 0p"m ah@9"-6.(!+"9:"mZ:l.+"::"mZ:lQ:	 Zp60(!+">:"_Z:l.+"?:"_Z:lQ:	*pZ,,#
Q, (h"q.aN9"-,>P,>,>%i,>"S,NL/"T9"-@/"g+@	`S",:C#};Y###	$(,L#  8  Y3!`Y	`Y2)`Y)`Y:)`Y!`@PPP`X	 XH@8(0Yq`8D8(0@0 $(($@,@88F ``@00(@<

~}}||~~comma or end of statementFunction namecomma or right parenthesisexpressionlist=j=i=c=`=+<k$k5k-kk$`-0 w*(<1J+#'S. N%j N%n (=XP%n,  #] XH wXD,>,V/(=Z*(>0J+# S:GZ+# XBZ.(>0N+#$S:GZ+#+XB ah+#+S:+##  #] 8,>,>,>(>,#//(? [#],>,>#],/(? +-0

.(? w~*(<1J+#3,>(/,O/(= (@ N%j N%n w0P+#7,+#9 
(=XJ%n, S* J%n

w0L+#@ w~((@0H	+#? (A+#B (A+#B w~((@1H	7(B (B Z%p,h XD70+#G (h(CS:GZ w~*(C0J	+#XZ XD w~XN0(D0P+#NS:GZ+#OXB8 8Z

 Lp2xp+#U .7. 9#PZ  PpXB@9#P,>(D,>w~,/(?+#d .QN%n, XD 0XP w~XH*(C0J+#_S:GZ+#`XB  w~XN0(D0P+#dS:GZ+#dXB8d   /(?+-0 #] `,>(E,>,B~/(?4:#l,>,#/(=+-0,j Z&",78+[
&"1J+#r,>\,>,\&"1P+#x,>\,>D\},>(E,>,B~/(?4:$ X#] V#] . N&",>(F,-/(=,>,#/(=+-0 #]@@)v,>`,He/(=  V#^46$#*(F0J+$,>(0,O/(=+[0N+$((G0H+$Z,XQ,	,>,>(0,>(1,O/(?+[0H+$,>(1,O!/(=S,GLX

(G L%j L%n (=XN%n,  `XPX #^QHX[
,>,>,/(?ZXS,GL`[

%_5L$"XV%_QV%_+ %_XV@XV%_+-0.(? #] `0H+$07L%j+$)Z05P$4 (H P%j P%n (=XH%n, Zp 
p

`XL(R`(Z`(@+$h `

`0L+$I7P%j+$5Z
@4J$5,>(2+$W 
P Jp,>(E,>,C/(?4:$h p N#]0(H1P+$V7JP+$G P Np 8 P#^ [#^. Pp2rp+$C HZ
h JH9$@[

P,>,>P,/(?[#^8QN#^+$H@@#^ (I+$] P P#^ [#^. Pp2rp+$O HZ
h JH9$L

P L#] [#^8QN#^ZX0H!+$U :XZX+$X*(F0J+$X,>(2,O/(=+$h*(F1J+$],>,>(I,>(>,

/(? Z#] (J N%j N%n[,>,>,/(? (=XH%n, Zp 
p

#]XL([#^QN(Z#^XP(Z(((J0HXJX/(?+-0.(K #] Hp 
  Jp,>(D,>,C/(?4:%I p 8ap+$s,>%i,>(3,NL/(?+%I p 
 aj+$x,> ,>(3,>%i,>(4,NL/(K

p L#] (@ N%j N%n (=XP%n, Zp p7J +%;   Np@@p@[p Pp2vp+%Z
p.
[

(.

p8

 Lp9% p&( Hp .1H@0(LGaN+%D.(QH%n,

p ZpXZ0 
p pXP(QL( p 8`h+% 0p(L@[p Pp2vp+%6Z
p.
 (@@p [

 Lp2tp+%1:p P p.XD8Z`8 P0P+%/,(>0L+%+ p p.S*GJ@*(M ,0J@

((M .0H@G

aL+%0,>(>,>,B~/(?+%0 pXN0(>0P+%0,>(M[

,>+%)S,GL8.4+%[

,>,>,/(? p .  89%7Pp+%D[

p,> p,>h,/(?+%D an@+%D 0QP%n, 
p ZpXZ( pR` QJ

p 0`n+%DS0GP  p #]XP8d  [
p,>,>p,/(?@/(K+-0((N5H%M,>%i,>(4,NL/(?,j Z&"O@&#[

&"1L+%V,Z#]4:%b[&"1H+%W,>\,>$\  #]XXX4X%b,(O0LXV`0(O1P+,>,>(I,>(>,

/(?XZX+,j3Z(P+%g,>\[,>l\
(P J%j J%n

(=XL%n,,~-0

,>fD,]+/(=6X+%q,>fA,]+/(=3Z(P+%y,>(5+%v2X(P+%sO+,>fA,]+/(=3Z(P+%y,>\[,>l\
(Q J%j J%n

(=XL%n, XV`+-0,%k66+&O+ 
(Q J%j J%n

(=XL%n, XV`+-0.(? w~ *2H(R@
 ,2H(R@

G
aJ+& :+& : Z%o #] X6NP+& (S H%n@@%p

w~ L%q * J%n,h ZP+& w`H+&,>(5,O/(=[P0H
+&" 
(S J%n@@%p w~ N%q 0 P%n,h+&C 
P.(S0N+&6 P,(C0L+&2 P0(T1P+&*

P*(T5J&+,>(U,>(6+' P((U0H+&C 
P[( Np 8ap+&C,>(6,>(7+' P0(D1P+&C

P*(V1J+&C+&* P,(C0L+&:,>(7,O/(=+&C P0(D0P+&>

P 
0`J+&*

P*(V1J+&C,>P,>(I,>(>,

/(? ZP7JP+&X[P1P
+&X

P*(V1J+&X P((W0H	+&N 
P[( Np 8ap+&X,>(8+&1 
P.(S1N+&X P,(C0L+&W P708+&X P,(W1L+&W P0(H1P+&X,>(X+&*7PP+&^

P*(V1J+&^,>P,>(I,>(>,

/(? ZP[

P0L
+&b7NP+&b,>(8,>(9+'7NP+&f P,(<1L+&f,>(X+&*7HP+&o 
P.(S0N+&*[P0H
+&m 'p8,>+&a7JP+&o,>(Y+&*6JX+&q@@p+&} X ` h,>@,K/(= Zp6(p+&v +'K,>(> `,>h,/(?,>(>,>`,/(?,>(>,>,/(?7PP+'

P*(V0J+' P6(@+'7Lp+',>(9,O/(=+'K

P*(V0J+'6PP+',>(:+'

P*(V0J+'
+',>(;+'7LP+',>(;,>(<,O/(?+'K %o0N+' PS, GL  w~ P%j P%n (=XH%n,

PQL` 
PXJ` PXN` PQP` PQH`[

pQL`[
P0J
+'"T``+'# PXP`7PP+'&

PQL` 
PXJ`

PZ
0 .0J!@Z0 (0P!@GaN+'4 
P[

( Lp600+'/ 0+'3 (S H%n@@%p 0 N%q * J%n,hXZ`7JP+'8 P((@1H+'8 
PXX(7PP+'?[P1N
+'?

P0(V1P+'? P*(D1J+'? PXX@7NP+'C

P0(V1P+'C PXX8,>, /(=[

,>,>,/(?[,>,>,/(?7@/(?+-0.(? #] X7HP+'Z[

P1L
+'Z P((Y1H+'Z

P.(V0N+'V,>(7,O/(=+'` P*(C0J+'[ P 8aP+'[,>(U+'l P0(H1P+'`,>P,>(I,>(>,

/(? ZP7PP+'b,>(X+'l7JP+'h P0(H1P+'h,>P,>(I,>(>,

/(? ZP7NP+'n P*(<1J+'n,>(X,>(6,O/(?+( w H%j H%n 
(=XJ%n,

PQL` PXN` PXP` PQH` 
PQJ`7LP+'z P((@1H+'z

PXX07PP+'~ 
P,(Z1L+'~ PXX@[
,>,>,/(?[

,>,>,/(?7@/(?+6H&#+(,j Z&"O@&#[

&"0L+(,jZ&"O@&#[&"0P+(,>\,~,>(R,>(Z,>(F,&
/(?,~,>([,>([,>(F,&
/(?,~,>([,>(F,>(>,&
/(?,~,>([,>(\,>(>,&
/(?,~,>([,>([,>(>,&
/(?,~,>(R,>(\,>(>,&
/(?,~,>(R,>(],>(>,&
/(?,~,>(],>(>,>(F,&
/(?,~,>(R,>(>,>(F,&
/(?,~@	`SY:[q(^}-(`f(cx(e(hJM(i(k(m(oh  (@G#hgG#kGG>t8'G";G 8PXX((8((XP 2F(8(``( 00PP0(80k:N@@00$@ M7 S?H:e@(}P~~}PSubroutine namestring or 6-digit integeras unit specifiersas format specifiersrandom accessUnformatted I/ONAMELIST I/OList directed I/ORandom access I/O-0 +` +T H's 6,>fC,]+/+a4Z(y,>+a,9/+a4:(|,>,'L+(| +b +T Z's=6(s,>+U,O/+a+,>+b,'L/+a,~,>+c,'L/+a,~,>+c,'L/+a,~-0.+a w 
  J'b

  L'b.+d1N
+) Hp7*(!7+U +V

p.+d(N..: Z'd,q 'c P'b 'c Z'b 
w,+e1L+)6.(!+) +V Z'd+) +W P'd,q 'c Z'baX+)"'b+) 'b/+a+-0.+e w~ w7HX+)

X0L+) "w< 8,>X,)/+a Zp w.67LX+)( X0P+)'"
w<
 8,>X,)/+a Zp +f P%n p H%p 
p J%q , L%n,h/+e+-0.+f@@p@@p w[w.w Hp2tp+* * Jp@@p

P0L+* P7N`+)< `0H+);O@p9)=@@p9)=@@p `0H+)C,>`,>p,)/+e  *.jp@@p+)} ` `7J`+)f0+g0P+)M7Lp+)L +f N%n@@%p X"P%q ( H%n,h 6.X+)O,>+W,O/+a@@p+* X Hp  `[

,>,>,/+e ` 
`0J+)e7PX+)Z

X0L+)YO@p9)[@@p9)[@@p

X0L+)a,>X,>p,)/+e  ..np@@p+)l X XaN+)d :+)d : Zp+)l[X+)d XaP+)i :+)i : Zp[,>,>,/+e p$p.pp7Hp+)}*+g5J)t +f P%n@@%p X"H%q , L%n,h+)| X P'b X H'b

+X L'd,q 
+f J%n 'c N%p 'c P%q(+g H%n,h  P[
,>,>,/+e+* P[X.np .QN%n, Zp6Pp+* pXZpQZp+*

pXL@XLp

p 
pQJ0XV0.4+)3Sp[p./+f+-0.+h#][`7JX+*,>\+e,>,)//+a Zp[,>,>,/+e@@%o@@&",>X,Ku/+a Zp[
p,>,>+h,>+h,F/+h[

,>,>,/+e +i N%n, [pQPP pXHP[
p JP

%iQLP9* #] 8[,>,>,/+e,>+h,>#],/+i+-0 ( H's 444*<(X,>fC,]+/+a6V+*;(XP+*>.8_p/4+*6,>fC,]+/+a5Z*<7@+-0.+aO@p 2@@H)a=2*B,j3Z+j+*E,>\++.,>fE,]+/+a6X+*Y

+Y L's,>fC,]+/+a4Z*L 6+*V paP+*R 6,4:+L 
&" (#]>

&".+j1N++!+*w +Y H's,>fC,]+/+a4Z*W 6O++!,j Z&",>+Z++O 23XL+r7=2*Z56*^,>,>+Z,O/+e++L[\,+@D*`++!+*c+*m+*{++++@,4:+L 
&" (#]>

&".+j1N++!(+k1H+*j,+k0L+*k@++!,>,>+[,O++
&" (#]>

&".+j0N+*vZP0H!+*t :XZP++!,>+[,O/+a++!(+j1H++!,>,>+k,>+h,

/+h ++!,;5 ( H*,j Z&" ,;7@@*[
1J++!,>\[&"++/l ,4:+L 
&" (#]>

&".+j 01N@(+j *1H@
AaP++,+k0L++,>+l,>,C/+e++!,>+\,>++,+l1,++!,>+\++,>+l,9/+a4:+L &",>h#],He/+a >
&",+k0L++,>+l[P,>++,>+m,>,B~/+e0+j1P++!,>+],>P,>+],O/+h7LX)a++$,>\+r,>+^,O/+e TX)a@@p7P&#++'@@&#++(,j Z&"[
&"1J+*E[&"1N++,,>\,><\O/+h++L w N%j N%n +nXP%n,  )oQHX 
)gQJX

)iQLX@@)i@@)g@@)o[X.+n0NXV`@ 26HH)a8=2+?4t+KXTXQT%n, QTX 27NH)a++K78H)ag XZPZ
L,QJP48+J.+n0NXV`8=2+D@/+a+,>+o,*@/+a,~,>+o,*@/+a,~,>+`,O/+a,~@	`H+pH+qm%FE[LSH,H,,cf,,,	_,,p3HH

HH

0(08XX(hPPP( `PP
SPACEFILEC\yCOxtE2M?PS:NJ0S?H:[>$P]lPa$:aaJ~I1J,e@e|ReN8gRM9igPk:N@m:7

	keywordarray or character expressionarray or character expressionintegerspecified-0

,,I6X+,@+ * J's,>fC,]+/0<4Z,%7N$i+,$,>0=,>0'+,' X$i+,7N$l+,),>0=,>0',O/0>+ X$l ( H's,>fC,]+/0<5Z,/ ,QL)uS.ky N$l+,0Z`)u,,I Z$l :+ (- H's,>fC,]+/0<5Z,6@@$m@,~,,AQZ$m4Z,? . N's,>fC,]+/0<4Z,?,,AXZ$m4Z,? *. J's,>fC,]+/0<5Z,@O,~ :,~-0@ ( H's,>fC,]+/0<7V+,H

/, +,C +-0 444,U(X ( H's,>fC,]+/0<6V+,S , L's,>fC,]+/0<6V+,S(XP+,[.8_p/4+,J , L's,>fC,]+/0<5Z,U 0 P's,>fC,]+/0<5Z,U7+,U+ ( H's,>fC,]+/0<4Z,m

0( L's,>fC,]+/0<4Z,c :+,g 0( P's,>fC,]+/0<4Z,h :GZ)u+,iO,~ : Z's,>fC,]+/0<5Z,_ :,~@,~-0

.0> aH+,q,>0)+-!@@$l@@)u@@$m@@$i * J's,>fC,]+/0<5Z,y,j,>0)[,>l\
GaP+,,,1Z+,y4:-:6L$m+-,,11Z+,y5:-,>0*+-!,,\5:-,>0*+-!1Z+,y * J's,>fC,]+/0<5Z-

,j,>0+[,>l\,>\[,>l\u J$i $i	z`z+-,>%i,>0,,NL/0>+-:6J$l+-,>0,+-!@@$i ,$j L$j
$i+ OH$l@5Z-"[
)u4J- Z`$lZ`)u+-,>0-,O/0<+-:,>fB,]+/0<,hd

'h L)q (! H)r (" N)r 
'j J)s 'i P)s

(# L)t7H(#+-- (% Z)t+--@@)t 
(" J)u0J$:

(%

 L(l@ )u`Hd  )u`Nd 
(  J)pS0BP( S0PH P($ ,!1 L(!,i1Z@,-;@/0>+,>fB,]+/0< 
)q J'h

)r L(! )r N(" )s P'j )s H'i 
)t J(#6L)t L(% )u P(" ( H(#S*H J($,0@l0-.0@n0.00Ap0.(0Ah0/ ( 
)p J( ,i@,~-0.0>:&" 
'v J'u J #]:

&"@@0#]6N&#+-V ( H's,>fC,]+/0<5Z-Y+-X[&"1H
+-Y w+.3@@&# &" * J #]

0/ L's,>fC,]+/0<4Z-b w1P+-a,>00,>00+-}O@'u+. 0 P's,>fC,]+/0<7V+-l 
/* J'u,>fC,]+/0<7V+-~ 'u$../. N'u+-g * J's,>fC,]+/0<4Z-y,?,4:.37P&#+-r@@&#+-s,j Z&"[
&"1J+-v,>\,>,\`,H'u+-~6N&#+-|,j Z&"O@&#,>01[&",>l\
'vJpO@p,2Lp+.
,>02,>,>02,O!/0?+.1 'u1H+.1,>'u,>02+.- ,
2Lp+.:p 'u1N+.1 'u0H+. :

+.3

'u0L+.,>03+.,>'u,>03+.- 02Pp+.":p 'u1H+.1

'u0L+.,>03,>+. 'u0P+.!,>03,>+.,>'u,>03+.- *2Jp+.*:p

'u1L+.1 'u0P+.(,>04+. ,>'u,>04+.- *

2Jp+./:p,>'u,>04,>05,O/0?+.3 ,2Lp+.2:p 'v+.37 pO/0>+-0

 w H'v * J'v@@&#,>,-N/0< Z&%5:.: &%+ &" 8#]0P+.B6H&#+.@ . N's,>fC,]+/0<+.B[&"1N@@&# &%0H+.E &" h#\ N'v+.F@@'v"..n&",>0B,9/0<4:.Z * J%o #] `0H+.S 'p0N+.R * J'pd l  `,>h,>0B,CQ/0>+.W,n+ 'p0N+.V * J'p,>`,DV/0<[#],>,>#],/0>+,>0C,.4/0<,~,>0B,.4/0<,~,>0B,.4/0<,~,>0C,.4/0<,~,>0D,.4/0<,~O@'w,>0D,.4/0<,~-0

 #]O@&% ( H%od l ,>`,>0E,CQ/0>,>0E,>#],/0>+-0

 #]O@&%@@%od l ,>`,>0E,CQ/0>,>0E,>#],/0>+-0.0<7H'z+.z,>05,O/0<,0E5L.|,>06+/O@&%l  #] P @ Xah+/,>X,>06,>%i,>07,NL/0F*0E0J+/! &% N%pS0 P%n,h (0F1H+/,0G1L+/ 0QP%n,  R#] 8 HH 
.
0G JH

0H LH .. NH XH 0QPH@@H .0H HH VH@@H,1. Zp5:/! p+/&,0G1L+/,>07+/ `3PX+/ ,>08,O/0<+/& * J&% . N%o,>P,>0E,CQ/0>,>0E,>,/0>/0<+-0.0<,j Z&"[&"0H+/1Z

&"0LpO00N&%,>0I,>,B5/0> pS(GH@,j Z&"+/4,>08,>$\

&"1L+/9,j[0P+/6,>09,O/0</0<+@,~-0.0<,j Z&"[&"0H+/FZ

&" Lp 0 N&%,>0I,>,B5/0> pS(GH@,j Z&"+/G

0I L&%l

&"1L+/K,>\,>4\-0

O@&%@@%o #],>`,G /0<,>0E,>#],/0>+-0.0> #] X H#],>0E,>,/0> #][
#].
#] Jp2rp+/y H6LX+/c2R#]+/`,>0J,H\/0< O@'{O@'|+/o,>09,>0:,>0:,O/0?+/o X1P+/\ X 
` Jp[

,>,>,/0>,>0J,>p,B5/0>4:/| pS(GH@,>@,H\/0< 8O@&% 0 P%o[PQH#^Z
PXJ#^,>X,G /0<4:/x[#^QNPZ#^XPP[PQTXZX5V/w9/Y #][,>,>,/0>/0>+-0.0<O@'|Z#]6H`+0O@'|O@'{+0 `ZZ

[.

 Lp2rp+0 H0P+0 HS*GJPO@'{ 
Paj+0%i,>07,NL/0F Pan+0,>P,>0;,>%i,>07,NL/0F,0K00KG

aL+0,>P,>0<,>%i,>07,NL/0F+0 H X 
P`j+0,>,0/0<.2+0@/0<+-0

 (QH%n,  
wQJ`

'}XL` X'}:'}S0GP(@+@	`H0LH0N{0Otq0PSvy0("(4(6(H0T0T0U0VZYEYwZYFY]Ig0X}MS0Zq0\0^S0_0a0bI5rM&dP((0"46

8 `X
exu}['.P$PNOLISTNOCREF''NOLISTNOCREF(*)constant(*)integer constant or "("ENTRY namePROGRAM name, OR /IDENTIFIERCOMMON variableDummy argumentExternal name-0.8 8 H%n, Zp 
p

w 0XB(S.GN an+0m,>7u,O/8 w7H@+1),>8,>,B~/8 
w ( <+@<0s+1-+0u+1+16X+0v &! p

`<

 L@S*GJ@Z
`1J+0|,>7u,O/8 7X` &!Z

`1L+1-+1  `[.(QH%n, [8Q

p V0S*GJ0 
JX8[. Np2tp+1
 7P`+1- `7V` &!ZX1N+1,>7u,O/8 p

X<

 L@S*GJ@7V` &!ZX1N+1-,>7u,O/8+1- pZ( P S,GL  7L`+1- `7V` &!ZX1P+1#,>7u,O/8

p X< N0S*GJ07V` &!ZX1P+1-+1,>8,>,B~/84:1- p@@8 p/8+-0.8 #] 
  Jp [

p.
 Jp2tp+1U P Np,>8,0d/8 Zp4:1H 8 H%n p X%p,

pZ0 
`aj+1>S.GNXQLX %iXNX Vp p @ [. Hp2rp913

pZ
0 Jp,>H,0d/866+1IO+1[ZX `ap+1R p6, +1N,>7v,O/891CS*GJ [
 XJX pQVhQV 91C p

pXV0XV 91C913 #]

  Lp[
p,>,>,/8,>8,>#],/8/8+-0.8@@p #]Z Z
 [

 .
 Jp2rp+2@ H6N`+1o ` (!ah+1j,>8,>,B5/84:1lS*GJX+1u,>8	,>,B5/85:1nO Tp+1vS*GJX+1v `1H7` `,>8,>,B5/84:1lS.GNXS:GZX`T+1 Xah+1y :+1z :z8

Xal+1,>X,>7v,>%i,>7w,NL/8
[,>,>,/891a #][

h,>Z
h,>,/8,>8Z#],>,/8 paP+2
O+2@/8+-0.8@ #]Z Z
 [

 .
 Jp2rp+2, H,>8
,>,B5/85:2O92,>,/8 2T8+2O,>7wZ(`Q(	,>,>7x,O/892 /(C(6,$J+2"O,>7xZ*`Q*	,>+2S*GJ` 
`aj+2(,>`,>7y,>%i,>7w,NL/8
 `an+2* :+2+ :z8

92 #][h,>Zh,>,/8,>8Z

#],>,/8aV+24O+24@/8+-0.8Z%ZZ`Z` Hp 
X`j+2I48

/,(

Z0'n8*8

AaH+2I,>p,>b/8 ZpXZ` p V8S0GPX /0( 
@( JX7Lp+2TZ04r2T p.Z@48

 X`h+2T 
/*(
Z('n8(( HX=r2K@/8+-0Z%Z4X2Z*80J+,25+ 
&% ,3J8@

 .3J8@A

aL+ J%pS0 P%n,h 68 /((Z 'n8,80L+  ( P`+-0.8
 #] 
  Jp [

p.
 Jp2tp+3 P Np 8,>8,>,B5/84:3	S(GH` p  [

p,>,>,/8 [
.
 Jp2rp+2} H Np,>8,>,B5/84z2|Z`H92w

8 L%n, Zp pZ
XJ [8QN QX XH`92l #]

@ Lp[
p,>,>,/8,>8,>#],/8/8
+-0/8+7y,H's,6,>fC,]+/84Z3,>8,9/84:3,>,'L+3 8 7z Z's=63

,>,>,/8+3",4

P8

 LP `[P4V3'[X,>ZP,>,>7{,O/8ZP2N&$+3+,>%iZP,>,>7{,O/8(80H+3.,>7{,O+3]Z

,>,o9/8aZ+35Z.HQ.	,>,>7|,O/8+3^,>8,>,B~/84:3^Z%Z Pp 8 H%j H%n 
8XJ%n,Vp,QL%n,.XNXpQPXXTXRX`T%l`R%l'zXHXZ`X4H3EQVV'z`p6Jp+3H[%Z+3H`QZX:%kXRXXTX[PZP8XHPP.QN%n,QZPQVhXRh``QTXQRX7J`+3W`PXPX[,>,>,/8+3X &!XPX[#],>,>#],/8,>%k,E/8Z,>,

X5L4[X[H,>,>7},O/8ZXZX *1H@
 ,0V@

G
aJ+44V4[X4R4
ZXXZH+4ZX H'zZX4R4

XQLH,>8	,>,/8O+[XZX0P+4Z`+4[X Z
H0*P@4R43R%j+4[`,>,>7~,O/8 
'zZ

( L'z,>8	,>,/87P%j+4/Z
X0J+4#[X5N44 %jQHXS*GJ +445R44Z`ZH<XPH H< HH[HZ
PQJH

%jXL`Z08XN0 08 P0[0XHPQT0XLX+44Z
X0J+42,>'z,46+45Z` R%jZH N&$,>%j,6Y/8+-0 w[ 4X49Z XZ`+4:Z

L'z

wZ04X4=[0QP` w[h,>,6L/8 wZh,>,6Y/8 Z`X 
wZ

( L%jZ0 N&$@+-0.8
 #] Hp 
'p Jp,>fE,]+/80Z+4M p N'p+4d 'p 8ap+4Q p H'p,>7~+4s p H#]  
X Jp[

,>,>,/8Z%Z Np@@'qO@&" %j Pp@@&$@@%j 'p884X4`,>,9/85:4` p N'p p P%j+4d 'pZ

h,05:4e p P%j p H'pO+4| p P'pZ%Z6Hp+4i[%ZXZ%Z+4jXH%Z,80L+4m,>7~,O/8 p P%j pZ
 0J!+4q :XZ +4u.80N+4u,>7,O/8+4| 8 N%j N%n 8XP%n,  pXHXXXX*80JXV Z``@/8
+-0 #] ` `7H`+5 ` X[

,>,>,/8+5 Z`8XZ`

8 L%j L%n 8XN%n, ZXPXZQHXZ
XJX #]

`XLX ZP0N!+5 :XZP+5(80H+5,>7,O/8+(80HXVP,80L+5,>7,O!/8[,>,>,/8@+-0

,8,H's,>fC,]+/85Z5",j,>8+5$,j3Z8+5',>\[,>l\,4QZ`,4XZ`[
`,>,6/8QZ`@+-0.8 8 H's,>fC,]+/84Z5T,>8,9/85:59O+5k 8 N's,>fC,]+/85Z5>,j,>8+5V,j2Z8+5U7T'z+5ZZ

P4L5D[P[`,>,>7~+5b[P5P5G[P[
`,>+5aZ
P,>,6?/8[

P Lp7N%j+5M,>,6Y/8 %j Hp,4QZP[P,>,6/8  
pQJXQV(S,GL(+5j,j3Z8+5Y,>\[,>l\5[P[
`,>+5C[
P5J5c[P[`,>,>8,O/8+5kZP,>,6?/8[P,>,6Y/87H%j+5j,>,6Y/8Z`P@/8+-0,j3Z8+5q,>\[,>l\

X4L6[X[`,>,>7~,O/8ZXZX *0H@
 ,0V@

G
aJ+5x4V6[X4T6ZXXZP+6ZX H'zZX4T6[

XQLP,>8	,>,/8O+[X4P6
[
X,>,6Y/8ZXZ
`1j+687N%j+6,>,6Y/8ZX H'z4H6Z` ,>8	,>,/8@+-0.8 #] X Hp[
,>,>,/8

pZ00N!+6 :XZ0+6!(80H+6!,>7,O/8+6> 8 H%n,  *j8 ,l8

l8Z`` pXV`.80N+6*S:GZ`+6-XXX Xap+6-S(GH` XaP+61,>,>,	8/8XZ` Xp 8 H%j H%n 
8XJ%n,  pXN`XX8Z

%Z Lp %j Pp@@&$@@%j,>w,6L/8XZ` pXH%Z 
p J%j /8+-0

Z%Z88 (1X@ *1X@
A ,1X@

A .1X@AaH+6K,>w,6L/8 Z``@+-0

.8 %j Hp@@%j 
8 J%j J%n

8XL%n,  wXN`R``Z``Z`` 88 P8 p H%j /8+-0

.8 %j Hp 
w J%j

8 L%j L%n 8XN%n,  wS(GH@ p H%j /8+-0.8 8 H%j H%n 
8XJ%n,

#] Lp &&XN`XX8 8ap+6o,>8,>8,>%i,>7w,NL/8
 p 
11J7,7,QZ`8&&081P+6,>,V/8[` *QJ%n,  ,l8 .|BNP &&XNPS0GPPXVPQT`081P+7XXX+7[`*8
p

(0L+7	@+7
 ( @5V7@+7

[8 Zp p.(QH%n,  Tp 
pXJ`

pXL(4V7$[427$ . @ Hp 
  JpZ

  Lp 0 N  J0 p. L@ < Hp7.p+7$. 8

@ Lp p 
02J +7#,> ,>8,O/8>p+7=27 &&(80H+7-,>p,>b/8 ZpXZ`

p p8XN0 && P0S(GH@4V70[,>,>,/8[#],>,>#],/8 /8+-0.8,j [1H+7:,>%i,>8,O/8+7s Tp,81L+7[ 0Y1 P'p 'p0H+7AZ:@,>,>8,O!/86L&$,[,>8 ,>,B5/8 Zp5:7F p+7sS(GHP (h8 Z
 J&&,>8!,9/85:7Y@@&& p .n8!S0BPXZ#]4X7pZ0`[@0H+7p[#]427p

 0.8 4N7p P HpZP4T7X

X LP HX=27R+7p,6c@@&&@+7s 0Y( P'p ( H'p6J&$,[,>8 ,>,B~/8,>8",9/84:7p #] X [. Pp2rp+7m HZ`HXXH(80H+7jS:GZH97e,80L97eS0GPH97e,>p,>,
/864+7qO+7s,>,#/8/8+@	`PU?8"}8$p8'8+H8-H8.mSfa@H8.8.H8/H8/8/ln80(jO(0(X `<XX8`[Mc@
exu<``H  0 0PP#0 `X( (08@PPXEXTERNAL namethe name of an intrinsic functionthe name of a non-generic functionINTRINSIC nameRECORDFILETHENIFTHENStatement function-0.9B w69>(9>+@$85+8~+8v+8:+8B+8E+8J+8Y+8g+8t+8v7J&#+8<@@&#+8>,>fD,]+/9C Z&"3V&"+8~,>\:U &",>l:U,>9?,O/9B+8~,>,82/9C5:8~+8v *9?.
 Jp2rp+8~,>,82/9C4:8v98G6J&#+8NO@&#,>fD,]+/9C Z&" . &"(N@  (9?. Hp2rp+8V 
A
L9}4J8U +8V98RO5:8f,>,8/9C+8~6J&#+8\O@&#,>fD,]+/9C Z&" . &"(N@  (9?. Hp2rp+8d 
A
L9}4J8d +8e98`O5:8f@+8~,>+8C,>,82/9C4:8v6L&#+8mO@&#,>fD,]+/9C Z&" &"0P+8o@@&#+8g *0P@
 ,0P@

G
aJ+8g+8~,>,82/9C5:8wO+8~6L&#+8{O@&#,>fD,]+/9C Z&" 0 &"(P   d9}A5Z8t/9B+-0.9C@@p w 
$9} Jp

p`L+9(L Lp:p+9 p,>l:U &",>l:U,>9@,O/9B:p p(Z Zp4Z9 p`H+9(H Hp:p+9

 p,>l:U,>9@,O/9C>'o+9	O/9C+-0 (QH%n, Z*PQ*A` J%^Z

., L%^,>9D,82/9C5:9@+Z%^/8 Z.h& Z%Z 
9D J%j J%n

9EXL%n, 5R9&[%ZXZ%Z+9&XR%Z[`5P9),>9A,O/9CQV`XT`6J%]+9,XX%]QX%]+9-QX(XX%] &./0"06+ 
<
,>Z%^8,>,/9C+-0 (QH%n,3Z%^+9:,>9A,>9B,O/9C ,.l%^ wn%^ +@	`0d9G00d9GS0d9GVZu:uh0 5

0p0 @P@ P

`@`

`@p0@`

p00p@

@`

@@

`@@0@ 	p 	PP
P
`	0p@

``

0 0

	P@	@	p

p
00`P
@

@@

P
`p

@P@

P5}?}'}?}'}?}'}?}'}?}'}?}'  }?}'  @K?    @@@}?}'    @@      ILLEGAL CHARACTER"$"LITSTRING"("")"END OF STATEMENT"+"",""-"".""/"":"CONSTANT"A""B""D""E""F""G""I""L""N""O""P""Q""R""S""T""X""Z":4:6:7:9:::;:=:>:?:@:A:B:C:E:F:G:H:I:J:K:L:M:N:O:P:Q:R:S:T:Uhpx (08@HPX`hFORMSTA-0

 'p*B0J+:},>&%,-N/B68+:| +:&" X@#]@+-0

 'pZ
 1J.v+; &"Z8#] ` P&%*B0J+;,>&%,-N/B Z&%5:; &%+>&"@+-0

(AyS
,Ay(L.
.Az(N.
0Az.
.
B :'= +-0,>fA,]+/B:&" Z&" Z #][
&"1J+;0J+;,>A{&&Z0hQ0	,>,>A{+;,>\` PP,;	 Z`S(GHP (hB*BjB

` LP .nB@+ ( H's,>fC,]+/B4Z;/O@&#S, L&"O,~@,~ A| H's,>fC,]+/B5Z;4O,~@,~ ( H'q@,~@@'q@,~-0.B ( H's,>fC,]+/B ZpO@p *$2Jp+;A:p 8 A}+;P ,)2Lp+;D:p 8
 A}+;P ."2Np+;H:p 8

 A~+;P 0!2Pp+;K:p 8 A~+;P (&2Hp+;O:p 8 A+;P;@p+;Y V's,>fC,]+/B5Z;[0X+;Y 8 A V's,>fC,]+/B4Z;Y 0 P'vO@'w+;[,>B,O/B+;c X'v,>,-N/B Z%o

%o0L+;a &" h#\ P'u+;a@@'u"0.p&" %o/B+-0.B ( H's,>fC,]+/B Zp4Z<", .lp . N's,>fC,]+/B5Z;v p([
 '0J+;q,>B,O!/B+;q\` ' p( %oXP8'0P+< 
'u J8(+< ( H's,>fC,]+/B Zp4Z<", .lp3,p+< p([@'0H+<,>B,O!/B+<\`@'

p(

 %oXN0'0N+< 'u H0(:p3hp+;{+<,>B,O/B+<	@/B+ B H's,>fC,]+/B5Z<,>B,O/B,~@,~ B H's,>fC,]+/B4Z<:

&"@@0#]+<$,;5,j Z&",;7[

&"0L+<:&"&"Ph#]+<,>\,>4\B@BOH's,>fC,]+/B5Z<$,>B,O/B,~@,~,>B,>B,<2/B,~,>B,>B,<2/B,~,>B,>B,<l/B,~,>B,>B,<O/B,~,>B,>B,<l/B,~-0 ( H's,>fC,]+/B4Z<=,>w~,>w,<l/B7L&#+<9@@&#+<:,j Z&"[&"1P+<N,>\,>D\

.B@@p@@p@@p@@p@@p@@p@@p w~,>fE,]+/B Zp6Hp+=+@d<u+=[,Wu+<w+=+=+= 8,=r Zp7,p+=(6P&#+<|O@&#,!L Z&"[
&"0J

+=[@@&#d ,4:=q &" @#] Hp>
&"+=[ 82xw 8,={ Zp6.p+=[ +=q 8

&" Lp,>B,9/B4:=q,>p,-/B &" @#] Hp 
p J&"

'p=0`n+=g:=Z)vp,>h,He/B=Zp60p+=[=+=q6L&#+=,jZ&"O@&#,>B[&",>l\B,={+Zp6,p+=),+=q w0N+=[,>B,O/B+=q2HB+=47Jp+=1,>,>B,O/Bd ,4:=q &"  #] Pp+=2HB+=A7Lp+=8,>,>B,O/B,;5 0 P*,j Z&" Zp,;7@@*[p1H+=[,>\[&",>l\

&" Lp,>B,9/B4:=q,>p,-/B &" 8#] Pp 
p J&"@@)v,>@,He/B Zp5:=[+=q,>,>B,O/B+=q6L&#+=^,j Z&"O@&#[&"1P@@&#[
&"1J+<q[&"0N+=cO@&#+=f,>B,><\

p L #] p N #^ p P #^ 
p J #_

p L #_ p N #` p P #`,>,-/B@/B+-0

 ( H's,>fC,]+/B4Z=wS8
+=zl ,4:={ &" 8#]>&"7@+-0.B ( H's,>fC,]+/B4Z>S8
+>,;5,j Z&",;7[

&"0L+> &"+> 00L@ &"*BAaP+> ,>B,>,C/B4:>

%o1L7B B ZpZ`ZPZP[P.< Pp2rp+> H.B,>,>

p,0/B9>O@&#l ,4:>

&" 0#]>&"7@/B+-0.B &"  #\,>B,>,C/B76+>5

`al+>$ :+>$ :zB &" NpO@&#,j Z&"[&"0P+>*:&"@@h#]+>Il [
&" ,1J@

 .1J@A

 01J
@A

aL+>6:&" . N #],66+>B +>K:&" . N #] * J'q,j:&" Z&" Z@#][

&"1L+>?,>\[,>l\GN`,j Z&"[&"0H+>I,j Z&" 
&"1j{+>*,>p,-/B

&" Lp+>*O@&#,>p,-/B@/B+7H&#+>W[

&"0L+>a B P's,>fC,]+/B4Z>S *+>` 
B J's,>fC,]+/B4Z>a .	QN&"+>a

B L's,>fC,]+/B4Z>\O@&# 0QP&"+>a B P's,>fC,]+/B4Z>aO@&# *	QJ&"@,~-06Hw+>d 6+>fZ

.,QL%n, 7Nw+>v 4 . 
.
w

( L =4>j <4t>r . w. 
@ J8=t>o wZh.(,>,>,/BXV` +-07H&#+>z@@&#+>{,j Z&"[

&"1L+>~,>\B+?,>\[,>l\
&" (#]>

&",>B,>,B5/B4:?S0@GP` V`0B(B *3P@
,B .0L@G
aJ+?7P)v+?,>,>,B,>.B,>,A/B Z`+?

(!al+?,>`,>B,O!/B@+,j Z&"[&"0H+?O@)v+?@@)vO@&#@,~-0.B7H&#+?#@@&#+?$,j Z&"[

&"0L+?&O@p+?'@@pO@&# )v3Pp+?+,>B	,O/B+?+@/B+-0

.B,4:?9 &",>h#],?:/B68+?3>

&" +?9

&" X0#].B Lp0N+?7 :+?7 : pQZ #]@/B+-0.B w*B+@,?=+A+?F+?[+?]+?y+@+@3+@v+@u+@E+@u+@u+@u+@u+@u+@u+@u+@u+@v+@x[

 ,>,?:/B78+A wZh,>,?:/B76+A w,B.

B	 L'd.B5N?P7` ` Z'b*B5J?S7X X Z'c,q,>B,>w,/B

B  L%n@@%p 'c N%q 0 P%n,h+A,B5L@v +A@[

 ,>,?:/B78+A wZh,>,?:/B76+A X2h`G4 X2N`+?k 
X2j`G4

X3L`G4 X30`G4 
X3*`G4

w.B A<B1,>B,>,/B4T?u 
B  J%n@@%pO@%q ( H%n,h+A 
B  J%n@@%p@@%q ( H%n,h+A[

`2LB!+@,>B,>,A/B,>,?:/B76+A,>B,q/B  
X(J.
B! J`,>B,>w,/B +A `2PB"+@v,>B,>,A/B,>,?:/B76+A,>B,>w,/B B  N%n@@%p0B" P%q * J%n,h+A[

 ,>,?:/B78+A wZh,>,?:/B76+A w,B0L+@"0B1P+@,>B
,O/B7((!7B
 B,B..:

+@' Hp70(!7B B

 
p,B#(L.B#.

. Z'd ` P'b 
` J'b X H'c

X L'c,q,>B,>w,/B B  N%n 'c P%p 
'c J%q w,B$ L%n,h+AZ

 ,>,?:/B76+A X P'b 
X J'b7((!7B

w.B (N0B$.. Z'd,q,>B,>w,/B 
B  J%n 'c H%p

'c L%q w.B% N%n,h+AZ

 ,>,?:/B76+A w*B%5J@_.B, 00L

@(B* .0J
@GaP+@Y,X L'b(X H'b 
B'd,q B  N%n 'c P%p

'c L%q*B( H%n,h+A

B  L%n(X"H%p*X"J%q0B. N%n,h+A.B, 00L

@(B* .0J
@GaP+@p,X L'b(X H'b6*(!+@j B Z'd+@k B N'd,q B  N%n@@%p 'cJp%q , L%n,h+A

B  L%n(XJh%p*XJj%q0B. N%n,h+A,Wu+A,>B,O/B+AZ

  Lp@@p 4Z0 Np2tp+A p.Zh,> Zp,?:/B Zp 
pXZ(4:A

p 0.np9@{,>p,q/B Zp pZ*@Q*A` Jp 4 pZ

  Lp2tp+A p.Z8 PpZ*@Q*A` Jp7r@9A
pHp=rA9A
,B&4LA *Jp+A7p@/B+-0

 wZ  w~.Zh+-0 w2Hw~+A/0H+A w~ 82PB&+A w}+ w}

w~ 02N +A# + w~,>h,q/B  
w}Z8(Q8A`Z6PQ6A`

w~7r0+A+N=rA)(B'4HA- *J+A+ .B'+

w0L+A2,>B,O/B+ w} @ H'b 
@ J'b7,(!7B

 B~(N(N w(H.. Z'd,q B  P%n 
'c J%p

'c L%q w H%n,h.B(+-0.B7H&#+AC@@&#+AD,j Z&"[

&"0L
+AH:&" &" Ph#]+AWO@&#,4:AW &",>h#],AX/BaZ+AW &",>h#] Zp,?:/B p Z #] Zp6*p+AR +AW p0B(0P+AU :+AV : 
&"QZ(#]@/B+-0.B w*B JpO@p ,2Lp+A`:p w.B) :5NAv+Aw 03Pp+Af (3Hp+Af *3Jp+Af ,	2Lp+Ag:p+Av .2Np+Ak:p wZh,>+Au (2Hp+Ao:p wZ
h,>+Au:@p+Av w[

h,>,AX/BaZ+Av wZh,>,AX/B+Aw@/B+@	`

'=

'=

'=

'=B*pS:Yq,YE,Yw,Y],Z,YF,Zr6vHB+jHB,B-_8cB.B~CHB/HB0HB0HB1)gJ^P}u%LFE$ P`PDPHk:N@M7 eK: KKS?H:F X`0X P  `X00G"#@    SDG:X((

0@@>p>8hdimensionedTOWHILEkeyword"," or ")"///,//,/-0

 aH +B9,>w,>M<,m/M< 
w~

w[,M|[0A7X+BW *

w~(J0A*O 00J@.M= (0N@G ,1X@

GaP+BW 
w~ .1J@(M= ,0H@

G 01X@ *1X@
A (1X@AGaN+BW

(lBSO/.",><N wZ*hQ*	,>+B{@ 
w~+@,BY+Bx+B`+B`+B`+Bc+B`+Bv@+Bf+Bk+Bc+Bk+Bp+Bv+B`

w0M=1P+Bx M#+Bx

w0M=0P+Bx M#+Bx

w0M>.M>HaP+Bx,>0,>M$,O/M<+

w0M= .0P@(M>DaN+Bx+Bw

wB0`p+BsB\\+Bx

w0M=1P7M$@4ZB},> wZ.@Q.	,>,>M%,O/M?+@+-0,>w,o9/M?aZ+C 'p*M@5JC,>M%,O/M? w*M@1JO@'w wS0 GP8 aP +C,>,>M<,m/M<,>w~,>w,C/M<+-0 w*M@1JO@'w aN +C,>w,>MA,m/M<,>w~,>w,C/M<+-0.M?@ w~+@$C+CI+C+C"+C'+C*@+CH 
w,MA .0L@0MBGaN+C8 M&+CI 
w,MA .1L@0MBGaN+C8 M&+CI 
w,MA1L+C8 M'+CI 
w,MA0L+C9 (ap+C3 (`h+C3,>M'Z,(Q,	,>,>M(,O/M? w

 al+C8,>M(Z. Q.	,>,>M(,O/M?@+CI0MA (0P@,MBM[(A.} 01N@G,MCGaH+CB M)+CI w Jp 8ap+CF :+CF :

pzMC+C8 
w (+CP4ZCN,>

wZ.0Q.	,>,>M),O/M?+CP

wS.BN0@/M?+-0.MD w~ 
  Jp,>MD,>,B5/M<4:DU w0N+C[ w~ 
  J'u    +C\ w~    4VC] ` 
&%1J+Ca@@p . Np+Cc . Np 0 Pp5VCk &%0P+Cj 
p.*QJ%n,  Tp

p pXN0+D>@+D> `,>MA,>,/M< 8#^ [. Pp2rp+D8 H0H+D

HX L`,>ME,>,B5/M<4:DU0ME0P+CyS*GJ`[
P5JD.MF1N+D

(MF0H+C :zMF+D

 :+C~ .nMF[P PpZ@5HD

7,@+D

 P N%pS( H%n, Zp 
p 0pMF ,lMGS.BN( .nMG pXJ S.GNP Pan+D,>P,>M*,>%i,>M*,NL/MH0M=0P+DZ
Z

p2J+DZ0PQ0	,>,>M+,O/M<+Dl ,M=0L+D,>M+,O!/M?@@`

H1l89Cp[,>,>,/M<@@#^/M, 2#_ .(#_/( Hp2rp+D3 
H Jp4JD2 8 Np p @ Hp4HD/

p  2N0+D/,>0,>M,,O/M<+DU:

p ..#^82L+D)9D% p. Np..QN%n,  Tp p pXH@ p Hp2rp+D> 
p.

p 0#_ N(9D9 MH P%j P%n MIXH%n,  
&%0J+DE p p P8S(GH@7.&%+DI pS*GJ nM@ 
'u J  %o0H+DM\`X

p &QN0 L&

pS.GN0XLXXTX6N'zQV8 V'zZ`X[w~,>,>w~,/M<@/MD+-0.M< w[w.w Hp2rp+Dc H,>X,G /M?4:Dc7LX9DY,>M-,O/M? X Pp[p,>,>,/M<9DY@/M<+-0 w 
 &'8
j &'  2&4)V}=2Dh

w[.4N N%pS0 P%n,h  (hMI6Jw+Dp ,lMJ +-0

 (QH%n, 7J'rQX'rZ'rXN`XX'r wXP` 'nQZ`+-0.MJ 4#^@@#_@@#^@@p@@#^ &%0H+E

'u2LMK+EO@#^+E L#`+E1(

+E : Z#`+E . N#`[

w8

 LplMK w[w.w Np2rp+E}Z`P H X3XML+E(ML1H+E &#Z,hQ,	,>,>M-,O/M< X+@$E+Ey+E+E; 
&!QJP[

0L+E `00+E) &#Z*hQ*	,>,>M.,O/M<+E)0L
+E([w.w3H+E" &#Z.hQ.	,>,>M.,O/M< MM N%n@@%pU, L%q 0 P%n,h O@p+E)S(GHPO@#^XXP6P#^+E9 
MM J%n@@%p

#` L%q . N%n,hXZP"#`.p#_ p`H+Ey 
`$j#`

&%0L+E83*MM+Ey &#,>h,>M/,O+Ex3*MN+Ey+E5S*GJPR`P+Ey[
0J
+EA &#Z.hQ.	,>,>M.,O/M<+EC1J+ECS0GPPO@#^QXP X Vp X3XML+EK0ML1P+EK &#Z*hQ*	,>,>M-,O/M<[0P
+EX[
w.
w3J+ER &#Z.hQ.	,>,>M.,O/M< MM N%n@@%pU0 P%q ( H%n,h O@p+EZ1P+EZS,GLPO@#^XXP6J#^+Eu[P NpZP Pp @2(8+Ec &#Z,hQ,	,>,>M.,O/M<

MM L%n@@%p #` P%q ( H%n,hXZP p 
8$
#`"
.j#_

p`L+Ev p @/88$h#` 
&%0J+Es3(MM+Ev &#,>h,>M/,O/M<+Ev3(MN+Ev+EpS.GNPR`P[p,>,>p,/M< H[
,>,>,/M<.49E	7L#^+FB0M=1P+F1P+F,>M/,O/M? 
&#

(`l+F,>,Dq/M?,>MN,/M? Z#`,>MN,/M?QZ# &%0N+F
 aJ+F

MM L%n@@%p . N%q 0 P%n,hXZ#a+F

&!XL#a p<7r+F</4Z
P5JF;[P 03N&!@(MOM *1R@
G

&% .0L@GaP+F#,>MN,/M?XZP+F;Z%[ Hp7Jp+F7 Jp.MO1.+F5 p6, +F5 
pZ(Z#a2N+F5

pZ
0ZP 02J@[0 *2H&!@
AaP+F5Z0 NpXNPZ88XH8+F; pZ

8 Lp+F$,>MN,/M? Zp pXHP *XJ =rF/4 &%0P+F?S:GZP+F@S,BLPS,GLP+FF MM P%n@@%p #_ H%q * J%n,hQZ#_ paP+FQ(M=1H+FL1H+FL,>M0,O/M?

&# 0`n+FO,>,Dq/M? 4#^S:GZP[w,>,>w,/M< 
p(
.* QT%n<

MPXL%n, .Z`#_Z%[XN#_XV%[Q6#^ Vp*6P p &#(MP0H+Fh6L#^+Fi @ H%pS* J%n, Zp

pS.BN0 .nMQ 0pMC (hMQXLX+FiR`X /MJ+-0 w 
 aj+FpZ, Q,	,>,>M0,O/M<+

 al+Fv,>M1Z. Q.	,>,>M(,O/M?+

w 0an+F{,>0,>M1,>M2,>M2,NL/MH wS(GH@[#^5HFXP#^QP#^+G

#^XP0XP#^@+-0

.MR w h Hp 
h Jp

h Lp h Np p.w h Pp p.w h Hp 
p.
w

( Lp w 8 p P&%3Pp+G7Jp+G6Np+G paN+G p Z&% 
&%0J+G p N'u3Np+G7Hp+G7Lp+G,>`,>M3,O/M<+G7Hp+G

p L'u@/MR+-0.MR@@p w[w.w Hp2tp+HX 
P Jp

%o0L+G( ( Pp p @ V&# %o0H+G5,>,G/M?,M=0L+G1Z%Z HpZ
  JpZ  Pp+G2@@p p 
  Jp   Pp+G9

X L'u.MS N&% @ Hp 
@ Jp6Lp+H3 %o+@DG;+HU+G>@@@+GB+H-Z(XQ(	,>,>M3,>M4,O/M?+H[[X4HH

&%0L+GF 'u+GG1,

+GH : Zp	+GI ( Hp	0MS0P+GL X+GN*MS1*

+GO : Zp+GP . Np 
p	3Jp+H[X Np708+Gh p	$8&p H8[8 Np

MM L%n@@%p p	$` 
&
p J%q ( H%n,h p	QZ80MS<72+H

pZ0 Lp
 
MM J%n@@%p p	$`&p H%q . N%n,h p
XZ@=2G_+H(MS<72+Gv 
(
.
p7,(+Gv (.pZ@ MM N%n@@%p p	$`&p H%q , L%n,h (.pXZ@=2Gj p.MT1.+H 
p

(al+H p[@2N&!+H 
pZ(Z

`<

XL`Z`5PHS(GH`Z%[ Hp7Jp+H Jp3Jp+H p(MS1(+H 
p60(+H p pZ

8Z
 2L+H p pZ

8Z
 2L+H p[82H&!+H 
pZ( Pp pXP8Z@8XH@+H

pZ
0 Jp+HZ`5NHS:BZ`+H,>MN,/M?  pXX  ,XL`,>MT,>,B5/M<4:H/S.GNX &%nMS0N+HU 'u HX*M=0J+HU p 82PX+HU,>p,>b/M? 
p ZpXZ(

p p N0S0GP8+HU,>MU,>,B5/M<5:H0 Zp+HU,>,Fj/M?5:HU+H/ %o+@DH4+HF+H7@@@+H:+HA,>M<,>,B5/M<+HE,>MA,>,B5/M<4:HFS*GJX 
&%jMS0J+HF 'u NX+HF,>M<,>,B5/M<5:HD Zp,>,Fj/M?5:HF Zp(MU0H+HI :zMU+HJ ,lMU

#^ Lp p,>h,Dy/M?68+HO Zp+HT &#QX@(MV*MVGaH+HT,4QZ` p P#^[p,>,>p,/M<9G#[w,>,>w,/M< p/MR+-0[%X4XHa 
w2J`+H` +Z`+H] w N%p MW P%n,  +-0.M< w ` Hp6J`+Hp6N)v+Hk,>M<,>,B~+Hm,>M<,>,C/M<5:HoO@p+I *QJp+I6N)v+Hs,>MW,>,B~+Hu,>MW,>,C/M<4:I ` X,>M<,>,/M< [
.
 Jp2rp+H~ HXVHZ`H9H{,>p,>,
/M< Zp4zI .QNp[w,>,>w,/M< p/M<+-0.M? w 6H+I6L)v+I

,>M<,>,B~+I<5:IO+IQQ6+IQ

+@4I+IL+I+I+I86N)v+I,>MA,>,B~+I,>MA,>,C/M<4:IU 
&"

 L(#]   N(#^,>,N/M? +IL6N)v+I",>MW,>,B~+I$,>MW,>,C/M<4:IU  [
.*QJ%n, [

Q  N`@[ Pp2tp+I1 . 
.

( L 9I,,>,>,
/M<  7N+IL  
&" ` H(#]

` L(#^+IH6N)v+I;,>MW,>,B~+I=,>MW,>,C/M<4:IU *QJ%n,

 L`,>,>,
/M<  7N+IL  &" 
` J #]

` L #^,>,N/M? [,>,>,/M<[,>,>,/M<[,>,>,/M<[

w,>,>w,/M<7@/M?+-0.MJ7Hw~+J$7Lw+J$ w~(MX0H+J$

w~.MC5NJ$ w*MX0J+J$ w0MY5PJ$ 
w~,MF LpO@p@2Np+Ie:p w~ h Pp (2Hp+Im:p@@'b 
w~

( L'b7.(!7M4 M5.: Z'd,q 'c Zp 0
2Pp+Iv:p w~ 
  J'b

  L'b7.(!7M4 M5.: Z'd,q 'c Zp 0

2Pp+I~:p 
w~ ( H'b

( L'b7.(!7M4 M5.: Z'd,q 'c Zp;@p+J$ w0MY PpO@p@2Hp+J:p w 
hJp',2Lp+J'b7((!7M4 M5.: Z'd,q 'c Zp *
2Jp+J:p

w 0 N'b 0 P'b7((!7M4 M5.: Z'd,q 'c Zp *

2Jp+J:p w

8 L'b 8 P'b7((!7M4 M5.: Z'd,q 'c Zp;@p+J$ MM H%n 
p J%p

p L%q . N%n,h+J$@/MJ+-0

,> w[  
``j,Wu

w.MQ0N+J>7(`+J1 
MM J%n@@%p `&0 N%q ( H%n,h+JT 
w

(3LMK+J:,>M<,>MZ,>MZ,>MN,>` MM P%n@@%p ( H%q , L%n,h+JS,>M<,>MZ,>MZ,>MN,>`Z`,>+JS w 
 `J+JF6,`+JB `+JT MM N%n@@%p ` P%q ( H%n,h+JT7,`+JL MM N%n@@%p `&0 P%q ( H%n,h+JT,>M<,>MZ,>MZ,>MN,>` MM N%n@@%p 0 P%q ( H%n,h,>,D/MJ,^+-0 w*M[0J	+J\[  Xan+J\,>M5,>M6,O/M<+ %o0N+Jl w*MX0J+Jf.M[ 00N@*M[ ,0J@

GaP+Jj+Ji.MX1N+Ji*MX0J+Jj@+Jl,>M6,O/M?+ M\ H%n 
%o0J+Jo@@)v+Jp . N)v w0M\ (0P@[
8 ,1J@

A0MY *1P@
AaH+J{ ,QL%n . N%j+J|@@%j,

%jlM] .nM] wQP`*M]0J+K@

lM^ .nM],>,J%/M?XZ` +-0.M^@@p w[w.w Hp2rp+Kq 
H0J+K H,>,JU/M?68+K +Kt6Pp+KXXpQXp+KpXX@XXp+Kp@@p H `7N`+KC[0H+K,>M7+K)[

  P Np Np M_ P%n P%j M\XH%n,  *jME,4QZP Zp

p .XN0QT0 p(MX0H+K( p,M_1L+K*,>M7,O/M?+Kt,>MA,>p,B~/M<4:Kt,>p,o9/M?aZ+K3 pZ*hQ*	,>,>M8,O/M<+Kt *QJ%n, Zp p ,XL8Z`8 pXP8 p H8 P%l H%l 
'zXJ8Z`84JK=QN( p P'z[/(Q,>MA[.8,>,/M<,>,K/M? Zp5:KI Zp7J`+KH,>p,nw/M? p+Kt7J`+Ki,>p,nw/M? p[8 pXT@XTp M` H%n H%j 
M\XJ%n, [

pXLPQTp .nME pXPP[@ HpZ
@8
XJ@ ,QL%n Pp, pQZ8QTh pXHh[
p Jp

pXL( `[,>,>,/M< p XQH8 
XQJ86LX+Kf &!XZ8+Kg XXH8[,>,>+Kk[,>,>,/M<6Np+Kn p Zp+Kp[pXH8ZpXZp.2+K
[w,>,>w,/M< p/M^+-0.M`(MV Hpd @@p w[
w.
w Jp2rp+M

H0L+L) M\ P%n H X Hp@@)v*Ma0J+L.M@1N+L[
 5JLZ. Q.	,>,>M8,O/M< pS0 GP8 8ap+L(MY0H+LZ,8Q,	,>,>M9+M p 
 aj+LZ, Q,	,>,>M9+M6LX+L X[X4PL *QJ%n :+L@ Z%j,  %jpMU6Hp+LXVpQVp+LXV XVp ,lMa,>H,I/M?QZX5:L"Z`X+M!0MU0P+M *BJX *jMU[

X Lp,>,J%/M?XZX+M@@p H X7PX+LX[
0J+L.,>M7+LC[.  ` Pp M_ H%n H%j 
M\XJ%n,  ,lM],4QZ` Zp p 0XP8QX8 p7J +L;,>M:+LC p @ Np Np*M\0J+L@,M_1L+LA,>M7+LC

p0MQ1P+LE,>M:,O/M?+M!:
&" p H(#],>,o9/M?aZ+LL pZ,hQ,	,>,>M8+M ,QL%n, Zp p .XN@Z`@ 
pXJ@ p H@ J%l H%l

'zXL@Z`@4LLUQP0 
p J'z[/(Q,>,Ku/M? Zp5:L^ Zp7LX+L],>p,nw/M? p+M!7LX+M,>p,nw/M? p[@ pXX XXp 
M` J%n J%j

M\XL%n, [pXN`QXp 0pM] pXH`[
  JpZ

XL  .QN%n Hp, pQZ@QXh 
pXJh[

p Lp pXN0 X[,>,>,/M< P0Mb1P+L{ pZ,hQ,	,>+M,MS1L+L pZ(hQ(	,>+M pQV  P0Mb0P+Lx,MS0L+L| pQV 6PP+M &!XZ +M P `,>M<,>,/M<,Mb0L+L|(MS1H+M pZ*hQ*	,>,>M;,O/M<+M! 
pZ

XL(7l&"+M pZh,>,>,>M;,F/M?>&"[,>,>,/M<6Pp+M p Zp+M[
pXJ@ZpXZp.2+KzNppMVNp/M`+@	`MvMy>Mz%2Ns1NN%i}N[%NxT,)zCllT5#]80(0,00  (F(((D(0PPP((D( 0 D`(`0$@P(`0(BP$@( @0D08X$@8$@@X<(@ 88$   8```@ 8HH0 X(Xas INTRINSIC or EXTERNALas 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@pwPPw	McMgMeMcMiMkMlMnMpMsMua variable or arraya scalar variablean arraya subprogram nameDummy variablei4r[rrghrDUMMYCOMMON variableVARIABLEin an I/O list-0.Q w&(0 Jp Hw4HN$,>,N/Q:)w p.:Z(0/Q+-0 w@ 8)6 8`X(085VN(+-0 w 8)6X(05VN-+ aH+N27j(%,N3>(%@,~ Q H(& *jP~

P~ L(0,>&%,N'/Q (1 N(06P'r+N<,>Q,P^/Q+N>@@'r[
$8
QJ$R`$ * J(0[

$,>,N/QZ$4NNE (H(0Z
$,>,N/Q@H(0:
$ , L(%,>P,Pc/Q,>P,Pc/Q@,~-0.QZw0(S+Nd:

'n0(2O@'o ap+NeZ
wZ,,Q7Q,	Z87Q8`Z6pQ6@@@p/(H/.N/0P 2 * Jp2rp+Ne

p2LH(29N[ &. 
&*Z(8)-Q( lQ04PNc>'n+O9N[:

'ol

(% .2Lw~@ %{ (0P@AaN+Nt 
%n Jp , L'l 0QP%n,  p H%nZ&&5NNrQT&&XT&&+Nt[

&&XT0QT&&+Nt Q 
wjQS,BLP

w~ LP w~ PP w} HP .3L(%@ 
%{ 01J@GaN+O,>Q,O./Q  aH+O

%{1L+O,>Q,Pc/Q>(% .6p(%@ w~ ,3HQ@

A`N,N3>
(%,>,Pc/Q,Q*QH

aL+O %{ .0P@D'k w~ *3HQ@
AaN+O,>Q,jP/Q
&PO@'kO/Q+-0,>w},>w~,>w~,>w,NL/Q+-0,>w~,>w~,>'n,>w,NL/Q+-0,>w~,>w~,>'n,>w,NL/Q+-0

6(w+O( ,L)y"nw

w&, 4LO+,>,O%/Q .(H)y@+-0.Q w8QZ*dQ7Q*A` Jp

Q L)y@@p08S+O5 Q Z)z+O6 Q	 P)zp 08+Oo+@dO9+O6+Op+O=+OF+OQ+OX+O^+Ol+Op:
pZ

w.
 (@  2&4.6)V|=2OA Q	 2N)y=2OD+O6 
p8
 JpZ

w.
 ( D.6V+OM04@+OMT)y+O6 \Z4PQ4A`7X+O6X)y+ON:
pZ

w.
 (Z48Q4A@ 2.0 0XX)y=2OT+O6:
pZ

w.
Z4(Q4A@ 2.. 0XX)y=2O[+O6 
p8
 JpZ

w.
7v(+O6 Q7X+OeX)y+Ob @  2&4.6)V|=2Og Q	 2

L)y=2Oj+O6:pZ
w.,>h,O%/Q+O6X)y+O6 *J)y ,L)y@N)y :)z/Q+-0

.Q
 w~ 
$Q4Z,/Q,` LpZ.pQ.A` Np 8$, Lp

2xp

+P;p  Fp

O@p2Hp

+P:p2Jp

+P:p 0F+P 0Pp (2Hp

+P
w ,QZ"8Q"A`

7F+P
 (2Hp

+P:p
w<
$*Z"($]Q"A@ $<$P

7F+P .(Hp+P (Hp $<$P7F+P .0Pp+P 02Pp

+P):p$(Z" $^Q"@` *-Jp $<$P$

.,Lp+P! 0Pp $<$P(
.*Jp+P% ..Np ,2Lp

+P3:p$0Z"@$ZQ"A@ $<$P2
7F+P2

.,Lp+P. ,Lp 02Pp

+P9:p
$QZ"(Q"A`7F+P9Fp+P7;@p
&Z
(+(/Q
+-0

 :d@aZ+PG

D,>Q
,>,PH/Q+@+-0 waH@+PK,>Q+PPaH+PM,>Q
+PPaH+PO,>Q+PPaH+PR,>Q,>w~,Ou/Q@+-0

ZwZ
w~/$(,Q

.Q

&,.<78+P] $a< P$a5pP\,PAw~N$a=8PY@+-0

 $a< H$a5hPa,PA

wL$a@+-0(Q

w7X+Pk $a< P$a5pPj,PAX$a+Pf@+,>,P^/Q,~-0

 :b@aZ+Pt

B,>Q,>,PH/Q+@+ $\< H$\5hPx,PnF$\,~-0@+-0.Q@/Q+@	`:(&H(&(&Q)wQ)zHQ     <$@PD $@ %FTN?FTNHH

<w~<w0w



 Line:BINARY OUTPUTASCII OUTPUTASCII INPUTQQQOBJECTLISTINGSOURCEQQQTNDWL 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 2Q Q$Q)Q.@	`ZMT Size modifier  treated as FNA A function without an argument listDIS Opt - program is disconnected - optimization discontinuedMVC Number of variables  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 be incorrectVNI 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 sequence numberFMR 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 initializedSID Slash (/) in Dimension Bound - use colon (:) insteadIUA Illegal use of an array - use scalar variable insteadCAO Consecutive arithmetic operators illegalDII Previous declaration of intrinsic function  is ignoredCHO Global optimization not yet supported with character data - /OPT ignoredWNA Wrong number of arguments for statement function IAT Illegal type for argument  of statement function TSI Type of symbolic constant  ignoredRIM RETURN statement illegal in main programDIM Possible DO index modification inside loopIDN Opt - illegal DO nesting - optimization discontinuedPAV PARAMETER used as associate variableCNM Character and numeric variables ACB Argument out of range for CHAR, high order bits ignoredAIL Illegal length argument for ICHAR, first character usedFWE Found  when expecting FEE Found  when expecting either FEE	   or 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  backwardsABD  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 number 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 character constantLGB Lower bound greater than upper bound for array EID ENTRY statement illegal inside a block IF or 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/CLOSE parameter  is of wrong typeNEX No exponent after D or E in constantLNI List directed I/O with no I/O listLED Illegal list directed NIO NAMELIST directed I/O with I/O listSOR Subscript out of rangeIID Non-integer implied DO indexIBK Illegal statement in BLOCK DATA 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 largeDDN DO loops too deeply nested - reduce nestingEIL Expression illegal in an input listTDO  type declaration out of orderITL Illegal transfer into loop to label IND Improper nesting: DO at line  has not terminatedINI Improper nesting: IF at line  has not terminatedNIF No matching IFAHE IF at line  already has ELSEUEC Label  previously used in executable contextUFC Label  previously used in FORMAT contextIVH Invalid hollerith constant - 0HIVC Invalid character constant - ''NCC Can't store numeric constant in character variable CSA Can't split string across numeric and character variablesSNC Substring of non-CHARACTER variableICN Illegal combination of character and numeric dataCEN Character expression used where numeric expression requiredIOR Substring bound out of rangeNWB Numeric variable must be aligned on word boundaryNWW Numeric variable  must be aligned on word boundaryOAG Octal or logical argument illegal to generic functionLND Label  must refer to a, not a declarationSTD Statement  is a declarationIBD Illegal substring bound in DATA statementFID Can't initialize character function name ZLD Zero-trip DO loop illegal in DATA statementCNE Character and numeric entry points cannot be mixedCEL Character entry points must have the same lengthCFL Reference to character function  must have a fixed lengthOBO  may only be specified onceUKW Unrecognized keyword IXS Illegal  specifierWIF  is illegal with internal filesOUB Only upper bound of last dimension of  may be asteriskAOA Assumed-size arrays only allowed in subprogramsASA Assumed-size arrays cannot be used ISS   illegal in SAVE statementNLS  may not be declared length starCEX Constant or constant expression requiredMST  must be ECS  EQUIVALENCE-d to COMMON is illegal in SAVE statementEXI Exponent must be integerRUS Relational expression illegal as UNIT specifierUNS UNIT may not be specifiedNMD No matching DOSMC Size modifier conflict for variable IOC Illegal operator for character dataION Numeric operand of concatenation operatorIAN Illegal assignment between character and numeric dataNYI INQUIRE statement is not yet implementedIFS Illegal format specifier,> &X+Wv,> &X+Wv,>,>
&X	,X
&X
&
&XS~ &@)Bl
"=fW{
&XZ Fx,^,^,^7@x	`
&X+x %i&"QDx6@,X[x."
",~SKERRCGERR?
? Internal compiler error processing statement 
? Call to  from 

Debugger execution:
@	`-0 w&(A 7VdZ

+X w(N.X! Nw2NX+XZdZ

+7VdZ+X 
X2Jw+XZdZ+@+@	` APPP X((

((((((
(
((	(00000000((

88888888888888888888888888(@@@@@@@@@@@@@@@@@@@@@@@@@@PHHHCcV T#f ASSIGNMENTRBT4} IFD74STFN OR ARRAY ASSIGNMENTWCT3 DO\T3_ DOdn END STATEMENT FUNCTIONQAT4F IFQCT5 IFT#l SUBSTRING ASSIGNMENTArgumentAn array@ \( PUNCHeL* DATA@ \( PRINT%4/} SAVE	E.o SUBROUTINE\+M OPEN4.Z INTEGER4.^ LOGICAL2V IMPLICIT<2

 INTRINSICB \) FINDK`\(} REWIND< T$i CALL\+Q INQUIRE$/: PARAMETERT52 ELSE@0\(% REREAD:`T$$ GOTOE,/L DIMENSIONT& PAUSET%J RETURN4.` DOUBLEPRECISION9 FORMATl,n INCLUDE\(q BACK	Ct.v ENTRY%,1. EQUIVALENCEI0\(+ DECODEeL2g NAMELIST@0\(" ACCEPT

/; BLOCKDATA>0\( READK`\3 UNLOAD	E.g FUNCTIONT3u ENDDO\+O CLOSEK`\( ENDFILE4.\ REALT5l ENDIF\3
 SKIP> \( WRITE<1\ EXTERNAL
%,/R COMMON4.d CHARACTERI \(( ENCODE4.b COMPLEXT%b CONTINUE9 T$ ASSIGN@ \( TYPET%{ STOP/' PROGRAMAY;Y<Y>Y?YAYCYDYFYGYIYKYLYNYOYQYSYTYVYWYYY[Y\Y_Y`YbYcYeYgYhYjYkYmYoYpYrYsYuYvYxYyY{Y|Y~YZZZZZZ	Z
-0.[p (% Hp 
(" Jp

(# Lp 'q 8/'m Pp 'q 
 /
p J(%

p L("  /p N(# 0 P'i,j  
'q

(XL'q5LZT@@'q p N(% p P(" 
p J(#@/[p+-0.[p %n Hp *QJ%n, Zp

p L%n p@@8 (% P8 (" H8 
(# J86L'q+ZmQN'qXN'q@+Zo['q N QN'q /[p+ (" H'l 
(% J*

(" L* (# N'm@,~ 'l H(",>[k,fZ/[q 
* J(%

*8

 L(" 'm N(#@@'q@,~-0.[p w~<&(.( Hp0h+[ :+[ .:QZ%n .XN%n, Zp p 
pQJ@ w~ H@6Lw+[ :XZ@+[

 *!XJ@ 
pS0GP( /[p+-0.[qZw}@@  
w~

w}/

/,QL( w N( w~/w}<,> w}.:,>,/[p@/[q+-0 aH +[,>&$,>[q,m/[p 
[r J%n

&$ L%p,h [`4V['[X,>Z`,>,>%i,>[k,NL/[p+[: 'p([r0H+[0

`al+[-,>&$,>%i,>[l,NL/[s+[.S.GN` X%j .n[s+[F,[t0L+[;([t*[uGaH+[8:[t,>l\H,>&$,>%i,>[l,NL/[pS0GP` 0p[s X%j+[F `ah+[?,>&$,>%i,>[m,NL/[s+[:S*GJ` X%jZ
`4J[E

'p 0an+[E,>[m,O/[q ,l[s@+-0@@'q *6h%q@
 ,1hO@

G
aJ+[O,>[n,O/[q@@%q aN +[R,>%q,>[u,m/[p %q P%p [r H%n,h

`al+[X,>%p,>[n+[_ 
'p6[v .0V@D*aN+[b `ap+[`,>%p,>[o,O/[p+[iS(GH`+[i@@*Z(1P$+[i,[u.[vG

aL+[h,>%p,>[o+[_S*GJ` +@	`("06aq{;qw 0$@0`0@&`$`$(,`H0unknownidentifierconstantlit stringlabelstatement endrelational op.NOT..AND..OR..EQV. or .XOR."**" or "^""&""("")"":" ",""$""-""/""+""*""=""//""'"[x[y[z[{[}[~[\\\\\\\\\\\	\	\
\
\\\

EQVPE0OT8.NE. OR .NOT. OR .NEQV.ND@.AND.RH.OR.ORP.XOR.QVPQ0.EQ. OR .EQV.T0E0.GT. OR .GE.T0E0.LT. OR .LE.RUE.TRUE.ALSE.FALSE.H\H\&H\5H\*H\.H\H\"H\2H\$ FORMATn executable statement\D\EENDOFILENOT ENDOFILEFALSEUNKNOWN	RETURNED
ACTION	STATE	-0

.e (" *1H$@
,eD
 'lG'kA
aJ+\j `P+\^,>e,jP/e@@'lZ&& HpZ

p4L\j 
p (`p+\h:e	,>lQ7,>,O./e	  aH
&` pS.GNh p h+\_ (% P'n@@'k (" H'j P%i

(" L'i (# N'j@@&$@@*
:
'~@/e+-0.e	 (" HpZ*pQ*	,>,fZ/e ,0F@

 .0F@G

aL+\|("+\v[X"1B+]@hp`p 
("2Jp+\}1B+] %n Pp,>(%,>dW,O/e	 p Z%n /e	+0F+] 
(" J'm J(#(" , L'r aN+]6P*+],>e
,P^/e,N3 :,~@,~0F+]("[X"1B+],\r1Z+] :,~ : Z*	@,~@@*Z("5H] ,$ L(" dX N("0(" P*,>dX,]+/e,~

(#`L+]" . N(% .A N* (# P* ("3H*+]' ,L*+]$*0*0P+]*
(#

(" :,~-0.e@@* * w6H`+]/[X"+]0ZX"

(% L'n$+@]2+]1+]}+^+_G+^%+^&+^*+^4+^@+^G+^N+^O+^^+^b+^d+^f+^i+^r+^s+^v+_+_+_	+_+_+_1+_+_0+_4+_9+_=+_C+_D+_H+_M+_U+_V+_[+_Z+_]+_^+_d+_f+_g+_m+_{+_o+_r+_t+_z+_~+_+`+`+`+`+`
+`

+`+`+`+`+`+`+` +`(+`1+`:+`B+`E+`L+`R+``+`a+`f+`i+`t+`y+`z+`{+`|+`}+a+a+a+a+a+a+a+a+a"+a'+a)+a/+aC+aK+aS+ae+af+al+as+av+b+b+b+b(+b>+bK+bM+bQ+bT+b\+b^+bc+bg+bj+bo+br+bu+b{+c+c+c+c+c"+c&+c6+c@+cC+cO+c]+c+ca+cf+cm+cr+cy+d+d+d+d+d+d+d+d+d!+d#+d-+d8+d<5F^("7F+]}6J`+dL+dK0F
j("

(!Q,A` L("(" 6P`+^[X"+]1ZX"+]1Z("3H(!+^

 "+]1,hW 1F@+^6N`+dL+dK,ik,hc 0F@+^,>*,>dY,iY/e	 6P`+dL+dK1B+`\0F+^>("+dP (" 
 aJ+^,>dY,fb/e Z(%+^!

`L+^*.dN(%,>dY,fZ/e ,A L* .$ N(" (" P(#+`U".An("+^e1F$+^) F*Z:g+dU dZ $+]10B+^- F*Z:r+dUF%^Z%^2P%^+^0,>,95/e6J*
@GaN+^>4P^;,>%i,>dZ,NL/e	@@*
+^>,>d[,>%i,>d[,NL/e
 
*

d\L(*:*+`**,95/e+dP0F+^L("[X"1B+^K,\r0Z+^T : Z*	>* @*+]1>* 8*+^0F+^V("[X"1B+^Y,\r1Z+^Y 
`0J+]1+dL *	aP+^X@@*	+^Y ( H'i,j  0$ P(" (" H(# 
* X(*:

*+`A1F@+`\,\T("0P$+Np*d\+dMd]@@*+]1.(" 01N@ (0FA@ *0F@@
GAaP+cA

'k L'n+cA F* *	+dU0F+^u>("+dP $	+]1 (% N'k (" @aH+^},>dY,fb/e Z(% 
(" J(#("+^~:
(%7J*+_ "+_ZX" (# N'm d]+]11F+_\ 0! P(">*  *6J`+dM+dP ("0N!+dP d^+dP0F@+_ $+]1 'i P(" 'j H(" 
%i J(%1H$+_ 'j3N(#,j @@'k 'j N(#+_0F@+_ ("00#+`\,>dY,fZ/e,j +`\ ("0P$,j ,\T+`U * X8*:*+_A2Xd^+_ : Z*+_@@* (6P&$@ ,7J*
@

AaH+_&,>%i,>d_,NL/e	@@'p . N*@@*
 F%n@@*

 (" P'l,>d_,fZ/e 
(% J*

("8

 L* (# H'm d`+dM0F+_2 &A "+]1 0 P*
 $+]1,>,>(%,>d`,NL/e
 .n(" * d\+aq . N* * da H@*:
*+_A `N+_B 0 P* * 
da J *:

* da+dP db+dP@@*+_T,>db,>%i,>dc,NL/e
6N`+dM+dP .$ N(" 'm P("0F@ &A ">
* (*+]1 07N&$@ *7H*
@
GaP+_T,>dc,>%i,>dd,NL/e
 $+]1 dd+dP,] Zp,]Gp`Z+_|+_\ aN+_\ de+dP $+]1 db+]1@@&$@@*
,>,>(%,>de,NL/e
 .n(" df+dK ("1N!+_l+dP df+dP . N*
+&$$0./06P&$+("0H!+dP0dg+dP,>(%,>dg,O/e	+]p0F+q dh+dP $+]1 .  N("+{ dh1F+x,>(%,>dg,O/e	 0!+y 0  P("+dP,]`Z+| dh+]1 `0N+]1+dL/&+^ dh +`[X" di+]1:*
AaP+]1(dj+dP?N** X8*:* dj@@*
@ *7H*
AaP+`&,>%i,>dk,NL/e	@@*
>

* 0*+]10B+`+,>dk,O/e+clF%^Z%^2P%^+`/,>,95/e0F+dPZ

:r+d4 *
aN+dM0B+`6,>%i,>dk,NL/e	+`9,>,>(%,>d`,NL/e
 (h("@@*
+dM0F+`<("+]17P*,Za *$ J("

(" L(# * X8*:* dl+dP . N*
6P*+`G d\+d . N*
7P*+`I dl : Z*	+d * 
d\ J *:

* dm+d 'l N(" * P(% * H(" 
'm*J(#@@*dM+dP*3V+dP5V`V F* :J+dU 'p0HYQ+`Y@@'p+a,>%i,>dm,NL/e	7L*+`] F* :+dU * d\ H@*:
* dm+]1 dn+]1 'p1NYQ+dI (Y( H'p dl *Jj*	+d %n(N. N%n dn+dP %n 00N$c@ (0F@AaP+`s 
*

dodL(*:*ddjd(dH*%n0N"'+`x F*

+(Y\+H'p+dp+dM@$)+]1+.Y*+dH2.Y4+dH7N*0ZH'p+dI $!+]1+%n(N.,N%n,dq+dM,%n(N. N%n,>,X/e Z'p4Za dq+dM dn+dM . N*
 (h("S* J*

* dl N0*:*+ar 0z+a%S +b1Z

7e+a8+b B*	 ds+dM F* *	0z+a,S +dU0Z+a. e

+dU e

+dU@$-+*	/.	+@<a2+b+a5+]1+a7+a9+a?+aA@0F+]1S:+b0F+]1S:+b /0	+@Da;+b+]1+]1+]1 e
8( J'u * J*

/, L* ds+dP?.*+aO *(V.6p V*+dP *2He+dP,>*,>dt,O!/e	+dP7n*+aV$. *(Z8 Z%p+aW * H%p [w H%n,h  *jeje

%n0L+a^6NX+a^ 'u HX Xan@+ac,>eZ,>,C/e	7Q6 F* +dU dt+dP@@%pO@%o@@*@@* [w N%n 0
 P%n * 
du J *:

*+bP,>du,>,>dv,O/e
S. N*	 * dl H@*:
* dm+dM dv \ N*5NdP $1+]1*3V+dP 00V@ (0F@AaP+b 
*6:(+b [w N%n ( H%n@@%p 8 P%q,hQ: Z*	+d4 *.j* .6L(@ (0V@GaN+b
 $2+]10* +av *7P8+b:
*+bZ*8,>,>,>dv,O/e

* dl P0*:* dmS( H*	+dM@@%p@@%o@@*@@* [w N%n * dw H@*:
*+bP 07N*@(dwGaP+b!,>dx,O/e [w Z%n 
* J%q@@%p7L'q+b%,[GQ:+b' ( H%n,hQ: F*+dU3Xdu+b76P'q+b]0F$+b76L*+b-,>dx,O/e,>*,>e,Z}/e	XZ*	 0QP*	 *	Z* Q*A` J*

*&,/."N*"+b: (

 H%n+bV0F"+b< *
 J%n+bV2Xdu+b]+bq * Ae5NbI %o.h%p *) T* V*).t*.*dv:* V* /6.*dv:* V*+dP6H%o+dP:%p+dP .
 N%n dy+dPO@%o * du P8*:* dz+]1,0 * N%p * P%q+c>@@*0F"+bW 0

.P%n+dz+dP0F"+bZ,Zp+d{+dP,>dY,fZ/e;(",Zu,&,"/e [w H%n+bq6N'q,ZN /( H*

*@@0+d@@*,>e,>e,Z}/e	XZ*	 .QN*	 *	Z(@Q(A` H*A0.0	 P*

*+dP0F+cF*:* d~+dP6P*+c,>d~,O/e*d1J+c .N*+cZ*,>Z*	,>Z
*,>*,[/e+d@@*@@*@@*@@*
 * dl P8*:* dmS* J*	+]1 e0F+c$O@*+dP1F+dP $=+]1 e * *1&+c,,>e,>,>dv,O/e
+&6P*)T~3T*+c2,>e,>e,>dv,O/e
O@*P)T

/,  T*+bH7N*+c8"h*"z*7H*+c: :+c: : Z%n

* L%p * N%q [w P%n F*,h.e+dU,>dk,O/e F*S:+dU 's0N+cF0B+cK+cH0N+cI0B+cK F*	+d42N+cK ,+d40FA+d7*("1J+d7 'k N'n+d77N's+cV N*@@'s*3F+cU0FA+d7,("1L+d7+cM,Zp+dP*3F+dP5Vc[6L'q,ZN F* :+dU,Zu(">

("+d7@@*@@*@@* $>+]10F+d7 $;+]1F%^Z%^2N%^+ce,>,95/eZ

:d+cq.(" 01N@ (0FA@AaP+cl 
'kJ'n]F*Z:i+dUF%^Z%^2N%^+cq,>,95/e[:D H*	+d4Z(" 03N(!@ (0F?@AaP+cx $,+]1 $+]1,>e,>e,Z}/e	XZ*	 .QN*	 *	Z(@Q(A` H*@@*
F*:**3F+dP 00V@ (0FA@ *0F@
GAaP+d $E+]1 $&+]1 .Y5+dH7N*

+d+:Y6+Z'p+d (Y+ H'p (Jh*	+d .Y6 N'p 0Jp*	 dl $"+]1 . N*

+dM .+N*:0B+d)@@*	 e P* /(H*,Zp e+dP0FA+d7(("1H+d7

'k L'n+d70B+d1 *Ae4PdP 
/*J*+dP0F+d56H'q,ZN

*	*L*	edl+dP,Zu(">(" F*@+dU . N*
* dj+dM .0FA@ 00F@GaN+dJ *

 *0H+@
 ,1(@

 00h@A

G
aJ+dJ .Y/ N'p $++]1 dr6H`+dL[X"+]1ZX"+]17N("+dP>("("+dL6J("+dT3Xda+dT * X@*:*6da>("("+dK/e+@	`X:!1$$

e*
("$$

eQjfFh6$

e]$$

e]6$

eQ6$

en$

e$

eE{'l6$

e~b6$

e6$

e$$

e!fHhfI]6$

e!$

e^$

e!6$

e'$

e!R$

e$

e'$

e'$$

e'$

en6$

e-g}$$

e$

e$

e]m$$

e~$$

e-$

e~HfJ$

e~6$

f$

f$$

f$

f$

e-6$

f$

e-&6$

e36$

e9fKS$$

e3$$

fF*|$$

e?$

e3$

e3$

e9$$

e9$

e9A6$

e?$

eK$

e?$

e?<*6$

eEfM$$

eE$

eEfOfQfT$

eQfVfX$

eQ$

f6$

f0H*	$$

eW$

eWD$@("g"000000@XDX}|( ~H@

@  @.a@aDAFa(a@a@	a@a@A@a@8PHRc`@P8PbPP8P8P`8P@@

p@C@r`@@@H@.!

, DQ

/Y

/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> )0Ech@P!@(*E`*E*E

 **E`(.$)`D@$)($)($)(

#
($)(a8.cB90 BH>C>B0>B8>B1LB9:Cb`X

A`>B92B92B92 B92B92Aa2B92Aa4B92Aa4B94B94B94B92B9@B80

B9lB9rAa:Ai:B92(>A(>a(>	(>(>(>(>

!(>(,((>(>(>(>(>G(>(>(>(>(>(>(>(>(>(>(>(>

(>(>(>	!(>(>!"`D!@d+`

 bd+a8.d+#HrId+d+dd+d+d+d+d+B(d+d+d+d+d+d+d+  d+!"`D!@E9.!@.#@.*@.E9,)a8.E9.!E* G!!E9.!%9.!E9.!E9.!E9.!E9.!E9.!DB$E9.!E9.!E9.!E9.!9.

E9.!E9.!@.*@.*E9.!B"`>@P>!@>f:!ax!fB
!cb!f:!a8>f:!f:Ff:"f:!f:!f:!f:!:!f:!:!:F:!:!f:!fR!a@0

f9d!f:!fB
!fB
!f:!`@@`````````````````# ``````````6$

e]$

e]$$

en$

en6$

eK$$

eK$

eK$

f$

eE6$

eWSTSKIPLEXICALNULLTHENDOTTED OPERATOROCTAL DIGITOCTAL DIGITa maximum of 24too many digits6-digit numberlarger number-0 w*k.,k..
 0Z+fa 0pk.Z

XL +fazk.@+-0.k/@ w *A`QJ  6

w0/.  008@ (1x@GaP+fp3Xk/+fo,>(%,>k$,O/k0@ 
$*.
 =6ff Zp

w0 0X?+f~Z("2P(!+f~,hW 0X@+f~,ik,hc 0X@+f~,>k0,>k0,iY/k0 1X+g" 
w

( 0 (2Nk1@ *6Pp@
AaH+g!

wk08XN0N0A`QP0 * J'r(k1D*aH+g

86P0+g 88XH8+g

@0L?+gZ("2N(!+g,hW 0X@+g,ik,hc 0X@+g,>k0,>k0,iY/k0  w (A`QH8 8

@aL+g",>,fb/k/+g#,>w,fZ/k/7p@/k/+-0,> k$ H(0 *J(07X$g+g-,>,N'/k/R$g4Xg- 0P(0,>,N'/k/ .N(0,>k2,N,/k/,>k3,N,/k/ /@ 0 P(0(6)6,>,N/k/@)64Xg9 
.* J(0[4Xg> .N(0,>,N/k/ 0P(0@S)64XgB 0P(0,>,N/k/60(!+gD,>k3,N,/k/

(!al+gG,>k4,N,/k/ (!ah+gJ,>k4+gL,>k5,N,/k/,>k5,N,/k/ 
aJ+gP,>k6,N,/k/ an+gS,>k6,N,/k/ aP +gV,>k7,N,/k/

al+gY,>k7,N,/k/ aH+g\,>k8,N,/k/ 
aJ+g_,>k8,N,/k/ aN+gb,>k9,N,/k/ aP+ge,>k9,N,/k/

al+gh,>k:,N,/k/ (!ah@+gk,>k:,N,/k/ 
A
k;4Jg~,>k;,N,/k/ ap+gp ,!L(0

aL+gs (*H(0 aH+gu *&J(0 
aJ+gx ."N(0 aN+gz 0$P(0 ap@+g} , L(0 ,L(0 0P(0 , L(0	v &(8
 ,>,N/k/ &.

&, <kE,>,N,/k/ &(.(  ,>,N/k/ 0P(0	v

k< ,>,N/k/ *J(0 &k<  &0j0 08+h ,L(0,>,N/k/,>k<,N,/k/ ,L(0 (0 H(1,^+-0 aH+h

H+h

FaX +h2 
`J@+h1,

`L+h1 ( * N(OF@4Zh+,h0Z@+h+l V(+h1 (.*2((+h/,>'k,>k%,>k%,NL/k= V(,g$+h;l :@+aX+h4,>k0+h:aX+h6,>k=+h:aX+h8,>k>+h:aX@+h;,>k>,>k>,Ou/k0 :+-0Z("Z
(!3H+hA,>k&,>%i,>k&,NL/k=.k?..$.Z8$\Z@Z(!.  *#\<
3v+hI . N( :@+.k?..$.Z8$\8 SZ
(!. *8_", LX V(!@@(.("7@+@,~-0.k/@/k/+@,~ aH+hZ :@,~6J(+hb aN+h_OH@4Zhb@+haOF@4Zhb,h0Z@,h<,~,h<,~-0Z'j H*@@(# *k'"
Z, .k'nk?.*jk@05Phl=hy *0n@
Z

'j0k@ (0P@A
.k'"Z00(k'hkA..nkA, (0L@A
`J=hy.k'0N+h18!1+h7J`=hy0kB0P+h~ X* . N(#+h@@(#0k?.0$0Z@$\Z Z(!/ 2x*+i@@'h+i

*QL'hQL%n,XZ'hX'h *QZ'h['h. *6g ,!1"

.l*Z(!/

"L(!"*.h(""*.n'j"
*.j'i"*.z(#+-0,>,> (	t,(J,^,^+@,~-0.k/Z(!0H!1+i7

aL+i& ( Np6P* P(OH@4Zi",h1Z@+iX6L*+i% p Z*+i2 p P(+i2 ( N*OF@4Zi+,h1Z@+iX (.*2((+i/,>'k,>k',>k(,NL/k=

(.

* L(,i@@*@@(" 6!1.k?..$.Z8$\Z@ .(!1 H(!+iF@@*7L'h+i@A,S.0!1 ['h.(!1 *8_['h<,>,>,/k0+iF 6!10k?.0$0Z@$\Z Z
(!/
"
.*!1 J*5*iG@@* ,k?.,$,Z0$\8  *.QZ0$\Z Z
.
Z*/
 *8_"0 PXZ

(!3V+iU,>k(,>%i,>k),NL/k=,]0Z+iW :@+iX :/k/+-07Hw~+i^6L*+i\ :/+@@* :A+

w7N0+ia,>'k,>k),NL/k0 w@@  *$ J'j (# N'i N'j,ik

(# L*,hc0Z@+,>k*,>k*,O/k0@@(+-0Z'j(k'0H< .6L`@ 01x!1@A`N+im0x!1+it :@+ 
/*!1 J*

(!/

.,!1 S.0!1 *8_"*.n'j"*.h(""
*.j(#"

*.l'i"*.p'l"*.n'm"*.h'm"
*.j*"

*.l(!"0 P0@+-0

,>.k= Bp Dp Fp w 8&" $)$|=8j F($ p p p@/k=,^+-0

Z&&4Hj &&,kB,>4Q7,>,O./k0  aN+j7p(%,N3>

(%,>,Pc/k/ &&*kCB
w`J
&`Z&&

&& 0 H&&,>k>,>,/k0+jO+-0.k/ 'kG'l*kCD,kDDaH+j(,>k0,jP/k/ : Zp+j(@@p aN+jK7p(%,N3,>(%,j/k/,>k+,Pc/k/,("0L+j0>(%+j>.("0N+j4O@(% : Z'r+j>*("0J+j9 (%&6
 (%/< H(%+j>>(%,>(#,>(",PS/k0,>kD,P^/k/,>kE+jG 'iaN+jI,>k+,fZ/k/ ("3P(#+jD,>(#,>,PS/k0`(",>kD,P^/k/:(",>,P^/k/+jK,>(#,>(",PS/k0@@'lZ&&4PjN,>p,j/k/O@'k@@'i@/k/+-0.k/ 'k`H+jW 
%i J*

'i L* 'j N* : Z'k 
("3J*+k! k, N*& *1P$+j_"
*.*#76+j^ ,L*&=6j] :$ Z* 61
*  ,18@

 .0x@A

aL+k0*&1P+jh *J*& *J*&@N*&

*&`L+jm,>*,j/k/
&($@@*&
&* k, P*& * H*
*  .1X@ ,1X@

AaN+jp * @aH+jz,>k,,fb/k/ Z*+j|:
*,>k,,fZ/k/ 
* Jp

("*.2L*@ 02J@GaN+j+k4XkX*& *2H("+k7Nw+k p P*+k=6j` *&`P+k
&($ : Z*&@H*&
&* k, Z*&+j_ .6Jw@

k, 03L*&@AaN+k *&`H+k,>*,j/k/
&($ *J*& ,L*&@P*&
&*+k  *&aH+k ,>k-,>%i,>k-,NL/k=@/k/+@,~@	`\:(&kLhkMh<'jkQhkShLkTh($("H**kWh< 0 x

FORTRAN V./G/ST/F77/NOF77/OPT/NOWA/C/SY/I/M/EXP/NOER/L/EXT/D:(mn@	Page<0:0<0`$@hD@D-Jan--Feb--Mar--Apr--May--Jun--Jul--Aug--Sep--Oct--Nov--Dec-INSTATTRANSFRINGSINPUTEOPRESEOPRESTOREOVERFLOW, LINE TOO LONGBACKTYPE+kY-0.m_ (!`h,l 
aJ +k_,>m_,m/m` .6L$~@ (7P'o@G 
mN ,1J@

GaN+l 0 P(0Z8pQ8A`S(H Hp mO 4
.*J=4kj .7L'o@ (7P'n@GaN+l,>mO,mB/m`6J'o+kw m` Pp ma Hp p.ma Zp+l mb Pp mb HpZ.
XJlS,GL(Z,pQ,a`mL(0,>'o,N/m`@P(0Z0p,>,mB/m`m'o0H+l,>mP+l,>mP,mB/m`6J'n+lS:vx Zp+l
aJ+l,>mR,Pc/m`Z,p,>,mB/m` aP+l,>mR,Pc/m`,>mS,mB/m`@/m_+-0.m_ ( H(0,>mS,mB/m`7j%|+l'Z.pQ.A` N(0,>,N/m`@P(0Z(p,>+l(,>mT,mB/m`,>mT,mB/m`Z.pQ.A` N(0,>%|,N/m`@P(0Z(p,>,mB/m`,>mU,mB/m`,>mU,mB/m`@	v 
/
(  Xp V(,>,lu/m`,>mV,mB/m`	v

(  V(58l=.mc,>,lu/m`,>mV,mB/m`[(/'u"4vlHZ*pQ*A` J(0,>,N/m`@

L(0Z.p,>+lH,>mW,mB/m`,>mW,mB/m`@@'u,>mX,mB/m`,>'~,m/m`,>mX,mB/m` 
'~$*j0$*2&
p  &.2,>,m/m` &(2 ,>mY,mB/m`

.,&,7v+l\,>,m+l],>mY,mB/m`,>mZ,mB/m` '~< ,>mZ,mB/m`,>,m/m`,>m[,mB/m` 
$*j0$*2&
p  &.2,>,m/m` &(2 ,>m[,mB/m`

.,&,7v+lq,>,m+lr,>m\,mB/m`,>m\,mB/m`@/m_+-0

.mc ( H(0Z*pQ*A` J(0

w&,j07X+l},>,N/m` (H(0 w&(j0&*t7X+m,>,N/m` 0P(0 w&(t 082+m .N(008+m 0P(05Xm
 (H(0+m,>,N/m`@H(0Z*p,>,mB/m`@/mc+-0.mdZ(pQ(A` H(0 * J(0,>w,N/m`@

L(0Z.p,>,mB/m`@/md+-0 `H+m*md,m]N
aJ+m@+ 
w0J+m!,>m]+m@ m^ N(0 0 P(0@@)w me H*'+@,m&+m=+m(+m,+m/+m3+m9 w~,>h,N'/m`zm^ ,L(0+m= w~,>h,N'/m`zm^+m=

me L*',>w~,N/m` )wnm^+m=,>w~,N/m`

)w8

lm^ .(N(0 0P(0+m=,>w~,N/m`

)w8

lm^ .(N(0 ,?L(0 ."N(0@P(0,>m^,Pc/m`+-0 wZ8 Q8A` 6
0J+mG .n=6mD `n+mJaN
'w aP+,>w,Pc/m`+@	`'nH&%mfmgmjmlmnmpmqmtmumvmwmxmym{m}mnnnnnnnn	n

nn*'*'0%FTNWRN   No?FTNFTL   L\BB
 fatal error and  fatal errors and  warning
 warnings

[ No errors detected ]

 Size:			no code +  data words
 Run time:		
 Elapsed time:		
 Dynamic memory used:	no words

 Compiled:	 Source lines at:	.0 lines per minute
 Compiled:	 Executable statements at:	.0 statements per minute
E-0.pn aH+n*pn0J+n :+n : Z'p,>%i,>pc,NL/po+n0 
'p1J+n$ (% Np@@(%,>po,>pc,O/po p P(% ( H'p 
pp J%j J%n

ppXL%n,,>fB+n+7N%j+n&,%b@@%j+n(,>fA,]+/pn pp H%j H%n 
ppXJ%n,,>fB,]+/pn:pq.pqH,>,j/pn@/pn+-0Z'r4XnFZ`*pr0J+n; X`n+nC,>pdZ0XQ0	,>[`,>,>pd,NL/pr+nC.ps 01N@(psDaP+nB,>X[
`,>,>pe,NL/ptS*BJX  h,>pt,>,/po+n2O+-0

.pt@@p@@p 8 `%; Hp4Hn_

p[05Nn]Z00hO+n] 0`n+n]6Pp+nS,N/,>pe,mB/pn 
pZ

( Lp,>,j/pn,>pf,mB/pn p8 Np1n+n\@@p,>pf,mB/pn,N/:'o pZ
  Jp5JnK=8nJ7Lp+nb,>pg,mB/pnl @/pt+-0.po@@p 'z[
  Jp

p`L+nll  . Np,N/,>pg,mB/pn,N/,>ph,mB/pn p[h,>,j/pn,>ph,mB/pn,>pi,mB/pn:'o 'zZ
  J'z5Jne@/po+-0.pr wZ
 "
.j%k7V'z+n}ZX4Nn}ZX+n{@@p4VoZX0P+oZ
X :2Jw+o+oZ
X0J+o[Xo:2Nw@aZ+op*Jp+o7Jp+o[XZX5No

X0L+o1ZX2Pw+o1 
paJ+o+[XZ

` Lp,4 ZpXZ`,>p,6Y/pn pZ8<XP8 8< H8[8[
P2X+o"[8Z`QZ8+o'ZP[@3X+o%ZP+o"ZPZ
`XJP pZ@8XH@ @8 N@QX@R``[X4To.ZXXZP+o/ZX N'zZX4To1[XQPPZX0P+o6[
X2Jw+o6,>,46/pn . NpZX+o@/pr+-0 'z4To@Z
P0J+o?ZPZw2V+o?O+ZP+o:@+-0R`%Q:%X:%*:' (2h+oI@@ 2(+oIQ8X *:8 ,P L'@0t+oN .
+NP'@@P(.4+oJ.40tN 40t+oV (
 HP'@@P(.4+oR 
pu J&%S, L$O@(%@@*d  /( N%h 0 P%{d Ndl   P%| (' H(1@+-0.ptZ%[ Hp7Jp+oj Jp.pu1.+oh p6, +oh 
pZ( NpR`8 pZ@+oa@/pt++ol-0.pt@@p.pv (!1 H(!S*H J($

(2l+ou@@02,+ouQ8

X *6 @@%`S0%`.0%a *6%h[( *0( @
 ,1H@

A
Z( 00N@A
aJ+p[(J+pApv4Tp`Tl@@,Apw4NpL/po : Z(%,oA 
( J% px H%n , L%n . N%q,h Z&!@@%jd ,>fA,]+/pn0Z+p# 
aJ+p ,-;+p6H'p+p5,>fB,]+/pn+p_ 
aJ +p',>%i,>py,m/po 'p ,.py8

$.'p.pk40t+p- T'p+p> 
/*<
+@,p/+p>+p2+p5+p6+p8+p;Z: ,>,>%i,>pk,O+p=,n+pN,>%i,>pl,NL/po+pN,>pl,>%i,>pm,NL+p=Z: ,>,>%i,>pm,NL/pt7J&$+pA

'p.pz0N,[O@&"@@&#@@'q

'p8pz4XpF,>,9/pn4:pN 'pZh,@7J%j+pNZ

( .1L@0p{GaN+pN,>,nw/pn

'p0L+p,n1,nG,o`,hd6P'z,nd6H'o+pZ `n+pZ * Pp Np, .p{, p 
p J*.pv,kY `N+p_,iZ% Z(	z+ +p.p{@/pt+,ok,~ 	`	"p|pp}($qqqq($qfajXdOXq
hX8  DX X4X[Mc@$@(%@}w~|o0$ 006$04(Z@a dummy array

Undefined labels





Unterminated DO and IF statements

Line: 
 CLASSIFICATION - STATEMENT STORDER6q6dq

KyI(w]y7

KwH(w]*

Kw(

Z: *(
gqp|
gopn
gjpcJgepc
glpa.)	okK8o`,moA
J6(o9
e!4rnwy.nd

 sMnG
J0n1
}
e}n
g<@
gdngv}tn\Ap*'\Aqmf\Aom_\AjmNN\AemN"pCmB
NZMmNZK*'

u^Vwm

u^zGlueFl
}
qIkY\>(9\AdkY\Av~kY

%C0*L%C,*

%C1kE

%C/k.

%C*k$L%C%k$7rk"
+qj	jP%
y*&o#5&*&o"]t*&B*%
G*+vG*&rOj 
Rvj
O@?j5.3*

vWKiY
}p%:iJ|.*fnyi(T"iWbf*5.3*
}p.-hdWeR*

v(:3hc(TthW
)hVfT
HXDxhSmXLh<^|+h #?M*

%
+fb
_S7fZe3&*

%A0@

%C$fZ%C6zDfZ

"e P*L"e L*

"e Qe

"e Oe

"e JdWL"e EdW

"ei]+Vbpq*V?[z*

"eI]T.]T.H]HYxR\r1VfA1'}fA15{fB1}afB1qjfC1UjfC1<4fD1[fD1&fE1#jfE
0k}e]

#B

 #?9
VAF
nW@*,*$

B*
)8_*U*XS `*
2E&*#d*Ga *

CL/*8*
\Te!4**

L~,*

HF*^\Qx*x?f-*
J~UZ*
ZL3*	^\=**.n*	
J~W4*
J~Va*LnC*HFc*;-9*

"etP

"e D\T"e Vxd\T

"e_*L"e_

"e_[w

"e_[p

"e_
[kL"e_[k"e3*

4[G

YHz]*

 At[
}
Jk[

%UtZ}
+qjZu
,i

ZpZa
+qi6ZN
eB|7\7

Rp	A\
?	A\

k%	A\"G	A\$
w	A\&'}	A\*

"	A\.H	A\5

"e;g\[w'.T][w.@'(tz'}

+]t
\*}
gGG

"e^e

"e_ZN"e_{$ZN
LnQX"
LnOX!JLnEX!
J~VX
gYK,Y(
gY{%Y*
gZ9eY+DY.
gZSY/
gYcGY0
gZ<Y1
gY{+Y4
gY{&Y5
gZ<Y6
uY9
0KY:^}:3YE

(Q$sYF^}YI
gZ&*YQ
gY]CY\
eD%Y]
gY|FY`VpKYq
HFZ
M,Z
V%6#*}7t,Yr+o

v}G

vj-

wU0

w9

v-
Ln=X"
LnH_
LnDXLnVz$XJ]heX

_S	Ky
]hdX]hv4Xr0Xr/XPYPY4WsP
&u^
"S!W{PS3Y2WvLWuY2~Ws
^:Q7J^:Q7
^,,Q79	8938x-8x(8w$8w8v8u8t4

4	44
4	}4	x4s3yl3xh3vf3vc3u_3tY3eS3dM3cH3bC3b>3a;3a63Q03P*3O$3O!3N3N3M3M
3L3=3<|3<w3;q3;n3:l3:f39a39\3)X3'T3&O3%L3%J3I3C3>3:333,3"222~2~	2}2}2|{2my2lv2lt2kq2kl2jg2ja2h]2XX2VT2VQ2UM2UJ+F+A*=*7)0(,($

v^

r^p^	m^j1g0b0^.[.Z-V,S,h,S8vL8uF3PB3&=3$7_25*328y-4

)3w#3w3u3`3(	3(3'}3z3u3q3j3e3a2i\2iX2YR2XO2WK2TE_-@_,:_6_2_*_&^q"^n^m^\^4^ ^
^9a
^:Q6^:iQ6^t1P)wK^t1L)w^t1QQ
KPz

Pu

u`TPn

+#=Pl
HFP^

%
cPS

u^u}PH

u`UfPA	K{Ou
2O ,O.
gCO%o#",)y,h!?O!dMN/
aTEFN

]A)w

"dkl9^t0HS^t1DN^t1V{TNJy.,)v
y.1Mb
y./M<
y.*M#Jy.%M#
\|D!Ku

%@HK2OJU
EZTSIV
2OFI
2OUjHe
2]VH\
2NUG HYc	GHXwFj
2NfGDy}f:Dq

QzC

QW4C

Q][B~

QtB5vxf
y.$B5y.6|4B5
y()v
y(B)
y(B
y(
AyJy(AyM:AX
[~A@
LC A\C=Aog?:
M9?,
HF_>b
Ke5>L/6A>s)={dN
=r
2U)<lfr<O
}r<*

1Aq<(

1/<%

lI<
^'`B;d

YDRW;7

 I&;5u6;0

]wM;*U{ ;	
[~:vup)vvda
y(:vy(zT:v(}Q9E(}O9B(}J9>K(}E9>]'95(|39sW<8(yK82G{:dG}:d%^%:UG|(yL}(}D82(}V~82
M>6Y.az{6LH9<6?Z6
}
'35l
|352
2dM5
y

14}

(Q"i4F
}
}46
}
3u0y<3_
e3,!3js3

Q32g^'b2V
i
Cc25^}S2

6N31\
q31.(NI?0da@S

&0l0
M3/R
a`3/L
2ds/;

s/'
})S.vu5s.g
HFS.d
M-.b
eD%S.`

(Q%3.^^}.3.Z
=kH-;^\@,nq&T,1
,?)ub^x$3+Q
Ks+O

r:`S+M

r:^*@rLYg)a
\|E3*
\|C;)/Kibn)Oob3)K|)
}
S((}
2I(qag
(/MV>*(/
_Bs(+
}Rs((
Xd3("

hS(7(
(

rWA(
2ORA'L}h?&
{/s&

%S%k
M@%b
D8:$i.a|s$$
Z3$
Z@#f
HF#/

De*A#af/8p)`/8q"q/8o"T/8j"IK/8e"I
uf"
.SJ{!R

"eD0!L

`k

8H,$

8H3N

(QW

8Hi1
4XNM(/5:+&Js
L~$=e
]y_]

YT=_W%A>)`
DE(&/5<T/8dW/8v|TW./)\./m./c./
^K./^

8H>B|ts{)`v

)^sj,)]sk))^]9O)\

8H^]03)\'}
"
eCsm.+p;./^./}4^
MR!-
MT

A$
~-?.l

"e3j8X_)[8Xf)[

"e;l	y8Na:49K@v7I<;9-62z:n2z5l2z4q2z2s2ynuh=w2yu2yy2x~zu~u|uuv.VTv.VRv.UPv.UN`7HEvWKW<{S.$wZ[}hM%<[

F2L%

F2J

fl^

fjP

Q~d

Qxh

Qua

Q"k

)i6F
R;F

)N39

)*O;

R>O

	N0:L

4I^J

lbu

l:}

{@|^'|]e$|]O ]AR^l>U1	U
wM2*t,_2*9zY1}iA
iz_ 
h;W0=G0<m;0<]+0<T40<I<0< "K;X
gGGB.ed,Z.e2N
bD:S.A{.Aw

-v$]
\,!@,b-{	
Pi6G"J "J`"Y@
P>&"
P*O1"(`
PmA
Pm>"<!c@
OHG
L6=|!tGz
L
?@'*l	r&E5LJU0)+4A	WJ{.~R.~O.~N.~L.~H.~A.~A	.~@	WI=

j)it,;i9z5gz}i}i;3];4yv9:fp@]y>O,ym8yl6PO3eFd,6eF2*x:/e"H

dW$9q|!ZGxd^H#]&5L&+T2W
L>Tc
L>OqKjNKihWO%l	mKi.LPKiL%@O(PhOML>Omdq
eJl0)M
eJl/S
eJl*KJeJl%K
4; g|c;)ZK!o*)Z)YKnC)YD8E{)X@)X	rV)W
)|g|c;)WFw)V
4TX8KnC)Vg|c;)U
)UFw)T7y)T)SD8E{)S_,]U )R

,a)R<3&)Q^hM)Pr;V)Oe!$2)OeA@2)NeAy)NeDbG)Me-7)M
eJj0\
eJl$zd

r0)B

r/

p

r*

oJ
r%

o
MQ

"D]k
\|E3Fts{)L}
7")LFGtS)Kn(y})J

sl/W[)J	x,)I

s)I	rG)H

pT
l/W[)HspL)Gsj,)G	x,)FVY)FUu")EUuS)EUuS)DVY)Da`
^?)B

pXf

r$

r6{T
T0)=T1	T/	MT*	HNT%	H
LCY{

CiV];#F)Bp;V)Ap;S)A$<.?)@6z.?)@/7iKp;T)?p;I)?p;I)>spL)>sj,)=RXHT$KT6}$KWH=wxE|xMC7kxWC7?M#AjFhAE0;wAE*WpADpLmPP3iG
YP5PAZez"P[PZPZPYPYPX68o5RP
P	P	P[4S)@B\2BX0P3N)<P3)<P}
%N	C:K	C:I}
}H	C:F	C::	2V`	2G;T^vR{w^AG	2.4g	1kqPyvgiyXW?PPPP5+t4I^+s?XPPFgPFfPFfPFePFePFdPBXwT0
HN|

8H>Kq

SME_

8HXqD

8Hv:(Hk"4
M	yH

SMO4Y?);?A);K=-
)@E;--)9{

@EU&<V|TEWMB:WM13WM0.WMWMTWMgWL[WLZ3WL@W&hW&c*W!s\WD2WUX\LUX\J;UX\CIUX\CBUX\7
8KP+)+pX4)+KN'),pX-),>rG	`5

%.)U5S@ 5KJ 
;%'+P&/[S5USgx
xUqe:UqRXUq;}Uq"7Uq 2UqUq{UqIUqBUp|FUpnkUpg$UpeUpeUp[rUpWXUpQtUpQUpNfUpIP$j3-A)91)		
&u^)*u^
"u^t
jZ.)7T^K#S^C+k)0^C+f)/^7O.).L^4O6A~(2

^"CF)-TY[.[TY[ R
TY[!TY[TY[iTY[g

TY[eTY[
TY[	TY[

TY[#TY[TYZ|TYZ{!TYZpV

TYZb3TYZ^fTYZVCTYZEQTYZC+TYZCTYZBrTYZBk	TYZBj
TYZBKTYZ1eTYZ1ZTYZ&nTYZ TYZTYZTYZTYZTYZ#TYZgTYZ9TYZj>(2P>

TFm%:TFmXTFl{}TFlb7TFl`2TFl\TFl[{TFlSITFlSBTFl<FTFl.kTFl'$TFl%TFl%TFlrTFlXTFltTFlTFlfTFl	PCX3	`	+#U.)+#B/$a+#f$`T+#@+"q$aT+"pf)*P(a@&1}9)8%
G&)) cZ.)2T #e:)9

RR+PL^}B(HPxoPrf#\'+S)K !c@(Ty"	`SyhSyh|Sy\w SyZ(@SyJS3

Srx  Q4P
cSTk:({LG&))	xo1({S[k\
ST-x	P
+S<
SJ7SJ3SHdCP
+5[
+-xP
+S7=S6wP
*|JP
*{|S2Nn	P
*i	}K	`Rov,@RoBf PD2@	Dz`Risb)@RisbRir~_9q		`_9h.	` _9	`_k)1M
(w(M
M	J(JRW	`
MLWP)M	PUKI
2#lkI-G&)*R8R8]R8(R8AR8R8
R88O)10xF/$\0xf$[0wu$\PNn8j(]n8i(\n8i(Zn8h(Wn7}(bn7r(gn7r(mn7q(pn7q(in2"(zn2!(zn2!(ynD(Rn!(an!(an3(Pmrb(bmr#(TmYF	`RhDR]3R<# RVe:RVRXRV;}RV"7RV 2RVRV{RVIRVBRU|FRUnkRUg$RUeRUeRU[rRUWXRUQtRUQRUNfRUI'$sZP(2c94(2K,mle,mqK,me,ml
0j!(1@d	W(0
,cL(0@d
(&

%
!(%(%

%
L($(#

%
w(#
HF("
P^o&("
P^n@(!A(!

e( 
8+( 
xf_(
Kt(
/f8(33(G3(
K F3

$r1GI

"Q)G

qm/x

$rPxC
Khf2O
KiboQ

Do?	Rx',m8'q'~

%	u'~

'}

'}'|
})rw'z
e-S'z;!'y@7@'y
HL}'x
HFz'w
HK+o'w
HKWx'v
z']'vox'u'u
}
Ji

'-B

't

'Jh

't

'>fL's

(`~
's
a``'r
J'r

(`~'q
+qha'q

ve?'pp,h"'o

]Kk'o

]6
'n

"e0H'n
M?W'm
J~Ve'm
J~W7'l

C?'l
]='k

V#A'kBB'j02'i
}p+

'h

'h'd
M&'dQg'cQe'cQS'bQQ'b\a'a

'a
F(c{'`xE'`^qR'_
FpO'_

(pVG'^
y0'^h']%1']4<'\[u<'\
4Y?'[?A'[
HaAX'K

(a ,'J

"RC'J+]G'I^^uj'I,!'H^}Z'H

rWw"'>w'=
/'=
Z@1'<d;e'<)';
tfH':

(IO*':

)4QJ'9'?3'8!m,'8Lq'7_D2'7
+qis'6	7M-'(
eA&'

Y17'
2dJ'

&hns'

&hq'];l
(&>l%.&=&=
\pt&<

#B

&;53&:5oM&:5k:&9
];O[&8
K~&7YoH&7c'L&6^uK=&6
I.n]&5
I.m&5

YTC@&3

S-q@&3
\|E1&2<E7&1

r91&/
+W&.
\rW&.
bW&-
a>?&-
.?&,x?B&,

S(:&+
OF/O&+}g&*
g&)b[g&)
^$H&&
[e@&&Xq
o&%

&%$
Ln!&$	xqA&#Q&"

=?f0&!

qL&!
MF& (yJ&

DdMO&
}
c)&
2I7*&

(It>&

8DX;&

4%C8L%
*:%}

  tW%}$;:%|

(pW:%|
P^o%~
P^%~

YL%{{

%s	D %p
Y%p^\c7%o<*o%o/83%n
_%NE%m

 #K%m

 "]?%l
P^#=%l
e6b3%k
cNj7%k

Uu<%jXf2S%j{0%i
G&%_

Q3W%_c&%^G%^({w%]
&%]

 uW%\
M97%\
h#m%[

 #?a%[

S#?}%Z

%"=%Y
LTB%X
,cw%X
\}9;%W
a`c;%W

Qc;%N

%9;%M

 %;%;/A;%:
M=;%(w].N%3+;${y}$$~
vr$~

&r$})LW$}(Tu-$x(Ts$u

dcZ.$sWDZ.$n
H$Z:#]4!1bnee$e%e%e&e&m!&m!&m!%m!%

m!$,md,mvZd

8DYpd

8DYqE

8DYoB

8DYjAL8DYeA
OsK}3

^x: -
Nv

gX+dX,d0<$?}T3
MSE(Pd&Bb
A4yk!4yS4x

8DYdg8DYv|pgN~6M P?q4PYP:4T~6fSfPE\PE\PE\PE\P
Xe$eTP Q4)
b)
c)
c)
d)
d(dF_(dF\(dEY(dEW(dDV-DP}6P}6P}5P}5-D|T=?j:T8G:T #?sw^:/P	06wg5%$H3_gjoJnzEnfAnR<n>8n*3n/n*mn&J)WJ(nSJ(ZNH)%mZ!Ckk+CXT+J\R+
C38+


;%'+

RR++0'p+"8+

5&=+$

5&<+(']a+,#\'+
^gVYg0=g{p0\B:/\>X\>5'\7N+\2g'r'I(\)8*\)7\	\	)\+,\6.\.,[rO.O[mNO[mO[m	O[l|[l{&O[l+O[kO[kO[j]O[jRO[i%r%H([Z[X%[Qgr%0[Ms/[M"-[M	+[L,[FG[@v*r#eOD^w'dw]!+{0