PDP-10 Archive: fortb.exe from BB-D480F-BB_1985

Trailing-Edge - PDP-10 Archives - BB-D480F-BB_1985_short - fortb.exe

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

?p@`?x+#ER=q'p ,,>Z+@,>Z,>+@,>Z,>,>+@,>Z,>,>,>+@,>Z,>,>,>,>+@,^,^,^,^,^,~-00,
aJ+M "+R "+R "+R "+R "+R "+R@ 
^0J+\ aN+Y ; <,>,l/@@^,

l+a,>,l/ 0 P^+a,>,l/ .XN( ^0P+b@@^,
@+> B^0B+e ^; \<,
,,

^0L+i : Z^+B7PV+B * J^+B+>-00,>,> w 
 # JFS:	z+  ^] >V*>] :E	zg $aD+wS,V *>+@@H,.,l...nS0V *>
&5 w 
 1
&(
&9
&H
&;	b@,^,^+>-00,>,l/,l,>,l/@+>-00 ( H^,A+>-00, Z4@+>-01,  ^ 
.
 1/
4 J 1@+>-01.@	x /+>@	`:H,H



COPYRIGHT (C) DIGITAL EQUIPMENT CORPORATION 1985
ALL RIGHTS RESERVED.

M?LPM?H@M?H`M?IM?I M?I@M?I`FORTRAFORTBFORTCFORTDFORTEFORTFFORTG'(*+-.0?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&hM>xC'GGG;G?G?0GNhIIpI?8IB(I^(I^`K KK@K>Kb MM&0M&pM7 M:8QQ(S;W_(W_0Y:(Y>`YO[2p[N`]h]]]&]&8]&X]']'@]2X]B]C]N_(_&xa_e2g
gg6 C;g:pgBpgJxgZpi20mm0m&0m:8o(qpq?e3@Y:]2G'g?M;mN m;m:0CS6p[
 S:$@ ?>xZB+ $+-?FTNUCE User Core ExceededIllegal Memory ReferenceStack exhaustedMemory Protection Violation
?Internal Compiler Error
? at location  in Phase 
?while processing statement $

+HF00000+))
&? $ +`B $`B  $
&
&  ' "
"`dp+/7@&+6
&" ' "
"`dp+3
&# L F@&")D|&")D|&")D|&")D)BG(!$hP
& ? @ @	`R=q+'p#@ ,M?H@+ ?Z+,^@,A+,>@,~,^@,+
,>@,~,>Z+@,>Z,>+@,>Z,>,>+@,>Z,>,>,>+@,>Z,>,>,>,>+@,^,^,^,^,^,~Z<< \PQ>w8Z<pX@	` 9CC~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(I6 I6Md I6|@I:MmICyINL{@INM`INMjIO-IR
L@S
NL`S]SD@SMPSMmSuZS~SOS:$^S;S;!h`S?SNDmSNDmSNL{@YpY(YY2(Y3Y>8Y>:[@[B[B[&p[&r[&r[>]&v@]?h`]?i]?j]?l@]?eIaJaKbLYLYMZQRQxSTSRU\NV\[Zx[j]f^OymknH`PH`tIavJawKbwkzy}{p{c|dW}d~eW~efsz(

),0,0,0,1x,1x,0,0*0,0,0,0,0,0,0:(+h(

h 0, ( ( ( f`

$ ( l

, h 0@ j

&`z

.n

h 0( ( ( h f`

  &B&B&B&B:(@0:(@3:)x@5h!|*!x:)x@8h!|*!xx :: =n8l0h

j(x(D*(:(Gl(ow{}~?ow{}~?ow{}~?ow{}~?ow{}~H'|I'-0

.a (QHQ,} Z6JN+b  XN XP .XN` =S(@GH@A0XP`+wZP[`4Ne[`+cZ`2Hw+m

QL`  wXN`1N XP =S*@GJ R``A(XH`+w[

`4Lo[`+mZ`5PxZ
` JpS,@BL(

XL`  =S0@GP8 wXP`A.XN` +{Z`Z
`3*w+m+c/a+-0.aZQ lt Hp+@l+@@@@++++++++++
+
@@+,Od +@+, Zp 
p.
p

( L:5L,O p.p : H@R` d  +,FaZ+l  :+ :Z@4HZ@ Z:+,O

: p.pZ8XP0XL8d 7+/a+ Q+@$ +/+(+*,my++,my,my,my,my,my,my,my,my,my,my,my+, 
S&*'+. SFT+- 
S+. TFS 
&* #
 ,~-0 w   *F J , L 3n+6O+ .&( 2XX+:Z+3xX+= 8 Z+4 < P+4+-0 w~&(#

  `@4VF w~3PX+MZX+C 
waJ+N

?$,Z.0[ :?0p2+N 
w~ JX

`@XLX V`@7@+-0

,} Z: Q+@$R+E+Z+b@+h+l+@++#+%+,+-@+4+9+>@ 
:

Qlb S N( 0pb (hc

^0L+E .nc+E 
:

S L( T N( 0pb Qhb@

lc+E 
:

SXL( .nb 0 P(+EZ
;5Jo :QZ;XZ;+q ; :XP8XP; : S P8 =ah@+{,>,>d,@/a7X+y :,dle+|

: One+| *jf 
:,f0L+ : Zc+E 0 Pd+E7J=+ :XZ(+
 :XN=QN= 0pgZ`8 (hg,} Z: 
=

:XL( :XN= LQP8 Mhg *jgA( ,1(@

 00h@A

 .1H@A

 *0H@
G

aL+[5P :XZQZ+  
:XJ XJ : MQN@4NEQP8+E 
:

SQL( TXN(@@( Qpb+E 
:

Mlh+E[
;5J( :XZ;QZ;+EZ; N< ; :XH@XH;+E,my+E6J@+0 :XZ@QZ@+1 :XN(XN@ : SXP8QP8+E6J+7 :XZQZ+E :XN(XN+E6JB+< :XZBQZB+E :XN(XNB+E 
: TQX([

`QL(.hnb 0	pb S H(

T L(QJ( :+-0

 Q+@$H+o+P+S@+[+`+`+`+`+`+`+`+`+`+`+`+a@ 
:

S2L(+o+_ 
:,b2LQ+o0i4PY

S2L(+o T2P(+o+_

T2L(+o+_ 
:Z

(2LS+o (8 P(O+,my+ 
:

S .2L(@ T (2P(@AaN+o [

`2LT+j X:+_Z`4HlZ`+g,O 
:XJ`[

`QL(+_@+-0 \2((+s

( L\:

w~.

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

CXL(XJC+ 
wZ

@CXL(XJ@C+-0[Q08+Z`C+@4V

XXL`C+

 (.X(

( LK5,

 (	v, /( PK (/  
\2*(+

 ( N\@@X1X+Z.XQZ0XX .*4o +-0

 p HS 
i JQ:

p,|  .nj +-0

 (QHQ,} @@`Z`` 
w}jj

w}lk w~nh@@` w~QP` wXH` +-0

 (QHQ,} @@`Z`` 
w}jj

w}lk w~nh@@` w~QP` wXH` 
w|XJ`4P4.k (0N@*k ,0J@

GaH+4S:GZ`+4XX@7Nw+=*g 00J@,g (0L@GaP+<S:GZ`+=XX8 +-0

 (QHQ,} 6J!+B X!+C !XX8 X! .nj 0pk (hh 
wjl,\S0\(P.(](H.*]..l N`:

" +-0 w.(&(8

.,QLQ .XNQ,O  w PXQXX *!XJXS(GHX +-0 w*m0J+s.m5N_  + 
w,c0L+b (+ w0n0P+e 8+

w(n0H+h 0+ w*o0J+k @+ w.o 00N@*m ,0J@

GaP+s[ 7.X+z X+ w0g0P+w[8 `+ 
w,b0L+z[(7`O+-0

 w*m0J,my w}A.(N w~A0(P. w~Ap. NS 
w JT

(al+[( `+
:0ZT+

 (+	0q PT q PQ,|+-0@@G@@H w~ HG 
w JH7,=7^ ^ ZI,-7H@+-0.a@@G@@H w~ HG 
w JH7,=7_ _.: ZI Zp,-7H@/a+-0.a@@G@@H w~ HG 
w JH7,=7` `.: ZI Zp,-7H@/a+-0.a w6J +.6N +.@@ +B w608+2 8"H8 : Zp+3@@p w,r/,@ Lp4l91l +@., lr  8 Z +@6.p+> ( .hp w

h<

 Lh+9 w p.0@pr7Np+B w

 "L /a+-0 w~  
wV(

w~0 w~ w~ w 
 .
@ J8,>,*/a+-0 w~  
wv(

w~0 w~ w~ w 
@/
  J8,>,*/a+-0.a w~6J +]6N +]6J +] w~ w 
@ J8 @ H8

@ L8+z w6P8+e6H8+e6P8+e w~

w~ 0 P  0 N  
0+o w~

w 020 +i  +j   
`/
X Jp5Jp`X w~@ w~ w~ 
8 J +z p0P+wS2@RX` w~8 w~ 
` Jh+z w~ 
` J8

` L8 ` Z8/a+-0.s w6 p 
w

( Lp,>w~,>w~Z.p,>,T/s+-0.tZ(p,>,>w},>w~,C/sZ*p,>,>w~,>w,C/sZ,p,>Z.p,>Z0p,>,{/sZ(p,>,>w~,>w~,C/sZ*p,>,>w},>w,C/s,>w~Z,p,>Z.p,>,T/s w} p H@ 
p J@ p Z@/t+-0.tZ(p,>,>w~,>w~,C/sZ*p,>,>w,>w,C/sZ,p,>Z.p,>Z0p,>,T/sZ(p,>,>w},>w~,C/sZ*p,>,>w~,>w,C/sZ,p,>Z.p,>Z0p,>,T/sZ(p,>Z*p,>Z,p,>,L/sZ.p,>,>w~,>w~,C/s,>w,>w},>w,C/s,>wZ0p,>,>w,{/s,>w,>wZ(p,>,L/s 
w~

p L( p N( p Z(/t+-0.sZ(p,>,>w~,>w,T/sZ*p,>,>w~,>w,{/sZ,p,>Z.p,>Z0p,>,C/sZ(p,>,>w~,>w,C/s,>wZ*p,>Z,p,>,T/s w~ p P8 p H8 p Z8/s+@	`

":2:2:2(((((D`DhD0D8D(88(`(00```@>`  80@ ((D(06  6 h0HPx
(,>,> = S@@@@@@ z 
{ 4#5H*/44H (n+&)G/4G4B#0n#++,-#0n .7 "`/%
<g

<	.,%
l0.%<gmp.(.
ej9`h+)/4 <	M.5B Tl(+6dh+).4l(`d+!14@34
+$.4@)|t
 Hz J{,^,^,~1434
+$.4)zt
+U(U*5t'@h+' Hz J{,^,^,>
,`a/
,~4"&U(U*+'#1v,~).4(&6
/6$64"4,</"H.4`,~,:."H/4`,~l*`d.*ad.*@ej9+@l@ph\	gl\	g+>

\	g..H,Dl(`l
d*dh+Bl(.4[\	gZ\	g,~ (pG/4 (pG+K/24RK/"42L)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[
  JZ

L	.

a0N+
%(

a0H+
% 0

b ,1P@

b .1J@G

aL+
%,>

Y+
/ ,

c0L+
*.

b0N+
/ :z

c 	0

c0P+
1,

b0L+
/ :z

c+
1,>

Z,`]/

d+

w*

d0J+
Y (

e H

e J
(H. $

s N
3N

f+

w 

(Jj

a 
3H	+
@,>,>,>,

f wQZ@ w,

g *0LB@
 	.

g 00N@A
`J+
L


3L
+
L,>	(L,>:w,>,

f wXZ8,

Z4LJ 0

c P	 *0P@

a H
 .0H@G
 ,0P@

G
 .0H@G
aJ+J+D0

d5P 
.

a N

a P
 w*

h4J
` :z

c+
i

	 00L@ 
 *0H@
AaP+
h w .n

h+
i w ,l

c,

Z4L
u 	 *1H@
 .1H@A


 01L@ (1L@AG
aJ+
u,>

[,br/

d w H
 
.

i0N+
} (aP+
{ (h

a  HwZ  Z+
v

8aL+ 
w0

i0P+,>,>,

I/

wXZ0+,>,>,

I/

wQZ0 

 Jw 	(

j0H+

@aL+

j 
	 JwZ( Z	+	 	  aN+,>w,>,

I/

i wXZ@ 
 Pw+J*

d0J+F (

e H

e J
(H. $

s N
2N

f+

L LS,>,>

[+I


 *0L@
 w.

k 01N@,

k .1L@AA
aJ++,>L,>

\,`Y/

i w ,l

c 
3N	+2,>(N,>,>,

f 
wQZ( 

3J
+7,>	(J,>,>w,

wXZ0,

Z4LJ *

j J	 (0J@

a N
 00N@G ,0J@

G 00N@GaH+J,>

\,br/

d+J L PS

] HT,>,>

],`$/

i+@+-0 w*

k5JPZ  NZ  P+X.

k0N+T[
  JZ

  L+X 
L JS

^ LT,>,>

],`$/

i+ 0

c0P+_*

b0J+] :z

c+_,>L,>

^,`$/

i*

Z4Jr 0

c P

0P+d * J

a L

0L+g 0 P

 (0P@

 ,1J@

A .1P@ ,0J@

AGaH+r,>

_,br/

d 0

l P

l J

mPL+

 (0J@ ,0J@

G .

mD`H+

,>

(Z,>,>w,

f Z 
w,

n5L

 XZ(+

 QN( (

b1H+

06L

@D

 :GZ8+

 (0N@ *0L@
A .

nAaH+

,l

o@+-0.

d w~*

c0J+

 w~ 00N

@ (0N@GaP+

 * Jw~ w~ 00N

@ w~*

c ,0J@

AaP+

$ +

H w~ (0N

@ 
w~,

a 00L@AaH+

+ . Nw~.

Z4N

w~ 00L@ w~.

c *1N@
AaP+

4,>

_,br/

w~0

o0P+

C 0 NG 
0 JG Lp70=7

` p.

l(N 
w~(J.. ZI,-

p PQ

H LS H HT 
w~ JQ,|+

H,>w,>

p.

e,>,>w~,>

q,>,"/

q/

d+-0 w*

b0J+

p NQ@@S   PT * JQ,|+,>w~,>

p w.

r,>,>

r,>

q,>,"/

qZww (GH@7@+@	`	wf<=E3:A

bB(0(8(  80

0(@  h(@@

    @(.@@(000

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

w.8

3N+,>,>L,>,`$/+ ah+
Z8(Q8	Zw[w44

` L04P
=aj,+,`Y/,>,> ,> ,

/,Z6*`+",>,>,"/"+Z7L+

.#0N +
00J.#0N+"+ 
++.p

 
0aJ+,>,>",>,>,"/"+7J+

6.0+,> ,>",>[
0,>,"/" Z+
00J+ @.h w~ *%,%D
aJ+.&1N+7L+,>,"/" Z+ Z@ N# :0.@ w~(& ,0H@

KaZ+*&1JO@_ & HQ@@S

 LT 0 PQ,| Z7J+,> ,>!,> ,> ,>,>,"/" Z+  H@@,>',>  w~*',>,>,>,/( Z  A0 P8[w,>,>w,p/

Z
0 J.( 00N@ (0J@GaP+&S:GZ0+&XL(7@+-0.d  [w.(QHQ,} S* JQ

) LS,| Z  0p) (h*,>*,>+,>,>,>,/(  *j+[

w.,XLP & HQ@@S L PT JQ,|XZPS.GNP w~[

8 L[0XHPS0GPP@[w Pp2rp+Q 
.
w (.,4NL =ah +I,>L,>,`Y/,>,> ,> ,

/  .XX 0,0P+PS:GZ 9BXV`9B[w,>,>w,p/,>',>  w~,',>,>,>,/( Z [  Pp 
w~.-1N+j70 +j p#
h :0*@aZ+d  p

8A, Lh+j,>,>!,> ,> ,>p,>,"/" XZ8XZX +l XHX /+-0 w~1H+

w L w~ N w~ P7H+,-0L+x0.0P+Z

  L[0 N+Z 0P+[

  L..0N+

O@[
0,>,//aZ+ Zh,>,//`Z+,>L,>,`$/+ `N+ =ap +,>L,>,`Y/ Z

@ L 
((0H+Z(,>,//`Z+,>L,>+ Z
@ J+rO+@+-07Hw+Z

 0L+O+0$0P+ @@,>,>,>,+/+,-0L+&[ ,>,//aZ+* wZ
h,>+)0$0P+*Z

 ,>,//+@+-0

./@ w~< Hp2xp+3 
.
wZ

(2Lw~9.O+49.@//+-0./ `h+8 w+g *QJQ,} S, LQ / NS,| Zp70+B p *j0 ,l0 .n1,>*,>+,> ,>p,>,/(  (XHP wZ
h,>,>,h/ XXP,, .0L@n1 wZh,>,>,h/XZP w*2j2[

 ,>,>,h/XZP w03p3 
& JQ@@S L HT , LQ,|XZPS.GNP.,1N[` 
& JQ@@S ` HT , LQ,|XZPS.GNP wQV8S0BP8XNXd  7@//+-0./ w~*-0J+l + w~040P+o + 
w~,(0L+r :+s :QZQ,}  wXP` w~ 
  J`

  L`[ 4N|[
 ,>,>,h/QZ` 
w~,(0L+Z(ZX..QNQ,} XT`"2 .

 0 H@8r 2Z
X Jp2rp+ .Zh,>,>,h/

XZ0 .(4h59Z(4NZ

(,>,>,h/XZ` w~040P+Z

8,>,>,h/XZ`7@//+@	`_6	kZ$@(8	0$0((( @F @0h((aJ|G88X``(  0aJ~8G  D FP. FP88FP8F@F0-0. wZ
  JS, GL([

  L[  NZ  P[
  J ,l 00P+XZ
8 J(0H+X, .0L

@( 00H
@G, (0L@GaN+S ( PG

( LG  HI,-  NQ H PS 
H JT

( HQ,|+X  PQ

("LS ("HT. NQ,| Z 
(0H+sZ( P,0L+s. *0N

@
, (0L
@G
. ,0N@

G
aJ+n @ HG @ NG

 LI,- 
 JQ H HS H PT , LQ,|+r  HQ @"NS

@"LT*JQ,|Z ,0L+

@. ,0N
@

G* .0J@GaP+

  LG 
  JG  NI,-  PQ

H LS H HT 
. NQ,|+

 LQ 
 "JS  "NT0 PQ,| Z  0,3P+,>0,>,>,

/ Z  0,3P+,>0,>,>,

/ Z  0,3P+!,>0,>,>,

/ Z .4N$

w *@GJ0@@

*0J+A.0N
+3 
0 JG 0 HG6.=+,  ZI+-  PI,- H2P+1 wS,GLh+X2P+X+9*5J: 00N+7 wS*GJh+X 
02J+XO@+X 0 02N@ (6J0@AaP+X wS.GNh+X .QNQ,} Z

XL@ 
wXJ0S(GH0 (h .BN0 .,>,)/ XZ@ 
XJ@(0H+PS:GZ@+PXP( w QP8 PZ
@ J (GH8[84HX[
8QJ@Z`8[@ HpQP  w XP8,>,)/

wQZ0@@ 
( .0H@ , *0L@
AaN+s Pp7(=7

p*..: ZI  8 HG 8 PG 
0 JH 0 HH Zp,-  NQ H PS 
H JT

( HQ,| Z+(1H+	 
w .n 0QPQ,} Z

XL  
wXJ0S.GN0 .n 0BP0 0,>,8/ XZ  
XJ XH( wQH8Z

  L H[84P	[

8QL Z`8[  PpQH@,>w,>,> *,>,>,>,"/ Z S0GP8[8 P( ,0H@

l 0 ,0P@

 
. (0N@A

aL+d70=7  
.. ZI ( HG

( LG  @ NH @ HH,- 
 JQ

H LS H NT ( HQ,| Z 
aJ+@

. 00N

@( *0H
@
G. (0N@GaP+; 
0 JG 0 NG 	 HI,-  PQ 
H JS

H LT ( HQ,|+Q 
 JQ 0"NS 0"HT0 PQ,|+Q

w 0`n+Q70=7	 
 *..: ZI

  LG   NG  
@ JH

@ LH Zp,-  HQ H NS 
H JT , LQ,| Z

.1N+V,>,>,>,

/ Z 6j +} =an+_  PQ@@S@@T * JQ,| Z wS(GHh+}  PQ@@S * JT ( HQ,|+} w *j ,>,>,> .,>,>,>,"/ Z aH+q,>w,> ,> ,,>,>,>+w

w 
0`j+x,>,>,>! 0,>,>,>,"/ Z

*1J+},>,>,>,

/ Z * .0J@ w,!D0"A

( (0l@A ,70(@

A    *0p@
A 07, @AaN+ 
 JQ@@S

S0 /@"HT . NQ,| Z 
wS,BL( ,GL(+% 
,0L+ (0p+

wS(GH0

wS(GH0+%00P+! wS,GLh+%,>w,> ,>,>,>,>,"/ Z 
w

XL( QH(@/+-0

S( HQ*
.*S

...(N.

0.0(P.

.." HS:
,,|  wn#S0BP` 0p# +-0

S( HQ*

.*S

..

0.

(..$ HS:
-,|  wn#S0BP` 0p# +-0 w[
  J4J] Z80P+P 
$ JQ,} Z

 .XN0 XP0 wQL 7J+]Z(0N+V QH(,>,5/+ZZ(0H+Z[( N4NZ(%0HXJ8  HZ

  L+P@+-0

.%d   (QHQ,} Z

Z0XN(XJ0 0p (h&,>w~,K/ Z w,1L+n 
aJ+m & ZS+q '+l 
aJ+p '+l ( HSS* JQ,| Z  XN 7,+x 0p(S:GZ8 w~*) J".($
.* Jp.*QJQ,} XZ8 Z

  pXP0 ( H 
w~Z.(Q.	 N

w00P+Z8+

 
0aJ+S 0 PT ( HQ,| Z+  N 8 
 Jp2xp+/ Z

8 Lp   .S*GJ *0J+XL +,> Hp,?/ 
  . XZ@XZ8 `P+):

[
0 Jp  . 0p),0L+$XJ +),> Hp,?/

  . QZ8XZ@3X+/ ,.l:
  .
Z0XP(S(GH(:9

 LQ@@S  PT . NQ,| 
 XZ(S(GH( w~

 XL(S0GP( wXP(S.GN([ XN( ,l* XP(l*@/%+-0 (QHQ,}  
wXX( ,l+.,>,8/ XV` wXP`S(GH` Z

 XL`XX  +-0

. w*+ J Z, Q,	 L! 8 Jp2xp+V ![83P+T@+V ,.l!9P :/+-0.@@"[= H7J+.&0N+Z(4HZ( N" 8Z8 Pp2xp+ ".Z

  L$*0J9`[0 P!6(@9` 
0`j+j,>,>,^/ !Z08 P$ 6(, Hp2vp9`

$[
0 J#[( .1P@(,AaN+v,>(,>,>,`$/ 
$Z( P#[

@ (1L@.-AaH+~,>@,>,>,`$/ 0.p$9m9` Z

  L+Z@/+@	`:2:2:2

-l (8(((00(@@8(

8 (0 0_P00h(@(088(<@ B L`D`$ 8((CR@CTs@CT4'CT9g8$@@F F(F(0`$@ $@8D0B(+dGZ

I+@0-.0`n@0,KH,~.
HHH,	/
H(H(H,
$
HHHHH,

&
HhHhH,.
HHHHH,	/
HhHhH,
$
HHHHH,

&
HhHhH,+ ,mw,

+ ,

+ + ,

+ ,

,,+ + ,+ + + ,,,+ ,,

,,+ + ,mw,mw+ ,),),%,,,mw,mw,1+ + ,8,,,mw,mw,1+ + ,8,,,mw,mw,- * *+ + ,mw,

+,

+ + ,

+,

,,+ + ,+ + + ,,,+ ,,,,+ + ,mw,mw+ ,,,,,%,,,mw,mw,6+ + ,B,,,mw,mw,6+ + ,B,,,mw,mw,-hehe+ ,8,H,cJe,~hf *he,~A
HG
HI
HF
H(H
H,~H
H,~ G .&,] G .',] H .),] H .*,],>,>f,>g,>g,>h,>~,^' (,b,>& ',8,^,~ G .&,] G .',] H .),] H .*,],>,>f,>g,>g,>h,>~,^* +,b,>) *,b,^,~,E,F,F,K,M,G,G,S,U,W,W,\,mw,mw,mw,mw,mw,mw,mw,mw,mw,mw,mw,mw,_,q,q,9,E,J,J,K,M,Q,Q,S,U,Z,Z,\,mw,mw,mw,mw,mw,mw,mw,mw,mw,mw,mw,mw,_,,,9 H(
8,~7H"H(
HG,~ Hhi,~ HH8J8,~5*P .(H/..
"H(
8,~"Hhi,~"HH8J8,~ H(
8.
G,~ H(
HGG,~ HhiHG,~ HH8GJ8
G,~7NH+g4.k NH@aN+d(.+b3NH,~(.$
`N$
G+d6@G+j *@,K,~ *,~U*7HG+i *`N 
2Hi1H+p@
@,~j#H4N{G5Bu+~B+0`NH+0(N5Nt6 H+

jb+0+

6@G+

@,K@h+

6 H+@,KU(U*+

@h+

H(N4N-.`n +6 H++-.`n +6 H+jb+0

+,^d.+86 H+@,K4(U(U*+

!( *+

@,K@h+

k#H4NG5B+"B+0'`NH+0+(N5N6 H+0kb+03+06@G+0@,K@h+06 H+&@,KU(U*+0@h+0H(N4N+-.)`n +26 H+7+3-.,`n +26 H+3kb+00+7,^d.+86 H+7@,K4(6U(U*+0!( *+0@,K@h+07@H+V7@G6@Ga+~Z&@@'@h'@@( G .),] G .*,]#H+F,>,>g,>h,E>,^aN+K,>,>f,>g,>g,>h,>~,^(N5NC6 H+R,>,>l,>l,>f,>g,>~,^+0e' (,b,>& ',b,^,~j7@G6@G+

@,K@h+

 0@
8@@8,>,>,*>,^,~,>,8,^4Ne4He(NH8,~#
,mw,
,},,,#,r,{,},mw,,,q,w,{,,mw,,,q7 (,~,8*H HG*
H JG,8 
 H,~,B*H HG*
H JG,B 
 H,~#7 H"h,~3hHgH,~3hH+hH,~@h,~ &H,~3*H 
H,~2jH 
H,~3(H H,~2hH H,~#
7 H"j,~  *,~ @
4H)~d(@d*.m,~ 
 (,~5J] 
m,~ 
 (,~7@4J4(2hn+3(m+#/m7 l(@) 
@,~3(n+2ho+#+@,K 
o7 "
@,~@,K@h,~ &(6@h(Fh*6 *,~ @
)|h(Fp,~ hq,~#%((
'.7 G"j (,~7 ([({d(~)?27 G"` 
 (,~jq (,~4H],>7 (3Ho2Joa+?aj+?8l(5(?U(+r,^7 " *,~3Ho2Jo+D@
,~3Hr0J+Gs,~hf *,~bJe+B,*
,~,>,>,>,>L,>t,`Y,^x,^x,^,^,^Z

I4N]0,+T/,2A,+[0,)+V ,+[0,f+X/,)A,+[0,i+Z ,+[ ,4L]an +]@h,~4(`U(0LU*,~1L+c s1L 
s,~S( *,~.@ &')* 0 8 0 Z\     #\c?H?@@,>,~c/[,~-0 w $,38[+6\

\_,04:  P,  H, 
.*

 LO@+6L+,>,~c/[ ZO@[0v

+ :(ZX+ (Z

+-0

(w~/<"QHQ,} [
Q<
QJ`,w~5L@pwxw~ w~QX R``+ w~[@XX R``QX@0w[Q.<pw*w~Z,(qQ,	Q8Z. *8o J +-0.[ /w~  
w.
QJQ,}XZQ

Q.

\ LpZw~4N.8Q QX 
w~[

(.

 *:g [(.pQ ( Nw~[`,>,>,p/]+#4V3 QX 
w~Z.(qQ . *:g w~8 P 
p J@p@/[+-0 /w QVQ4VB,}XZQ

wZ.0qQ .< *:`8

 L Q.\ H0p@+-0

.] 1(}+G,>U,`]+i

w.U Np0V+@DJ+7+N+`+a+j+y+++.7H+P@@+R,>,~c/[ Z[3Np+[1n

+V,>V,>W,`]/] p,>lqp[,>lqp,>W,`]/^ (QH+ 0[(P A^7Z+7:

 L8p+7,>+w  Hp *X. Np2xp+h,>,C/[4:79d,>p,7/[+7,>,v/[ p w*X.
p Jp2xp+r Ad,4Nq +s9n,>w,8+i@@Y:

 /p8 H0p,>,C/[5:7+7,>,v/[ p w*X.
p Jp2xp+ Ad,4N +9}:

@@0p+7: 
/
p8
 J p,>,C/[5:7O+7@@p  Hp,>p,C/[4:77N+[0P+@@+ 0 PZ,>,~c/[4Z 10s+	Z*pQ*	,>Z.pQ.	,>Z,pQ,	,>,/^+	7Jp+h,>p,>,>p,/^+7@@p  Hp 
1*s+&Z,pQ,	,>Z0pQ0	,>Z(pQ(	,>,/^,>p,C/[4:7,>w,v/[ w D,A5H7Np+h,>p,>+6H+0

<_,0+7[

p/.

3L+4 4_, +7 , H 
, J@@,@/]+-0.]@@p w 
$, Jp

p`L+?(L Lp:p+; p,>lqp[,>lqp,>Y,`]/^:p p(Z Zp4ZR>V 
p`J+I(J Jp:p+E

p0l

+M,>4qp,>Y,`]/]+B w(Z Hp0H+R,>Z,>Y,`]/]+SgO/]+@	`g04n004nk704n0$n"&2,D,l2,x y -I!INM=N
HI#INIRqIxLVJ-JJJJIHzI~=P0`@ p p@Pp`Pp

PP 0@`P@P`P@ 0Pp@P0p
 PPpPp``p@P	0p

	``@	`Pp

@p 	 	pPpp

` @P
P
pP`PP

pP@00

 0PP00p@P

`p0P`p @Pp@``pP@

PP `0``Pp

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

@0`P

0 P`0

@0p0@ @ P@ ` `00p  P0p00@@ P0@"00

P0PP`p P 0pp `  P!0p p!! P!pP`P

%0@"P"@P"p`##@0@#pP$`$ #P$0%pp%0%@P `%`P&P0P'`P@'``'P

'@`P(PP(@``P)@P`*@0@*P`0@0@*0P+p`P-0@,@,P-0,p ` - P.``P`P= @        ( (0  @  @@ @  @ @ 8@    8@@@@@@@HXP X@PHPHH    @ ``h@DD D@ p  @ x x   ( ( @( @@ ( ( ( (     ((@   	 (@  0`8`808@`8`8@8  H@  @   @  `8`8 P@8XX h`h@@` `@  @  @  @pp @;SYNTAXACT"FUNCTION"-0S( HQ6*=+r w~

l7 LS+t

w~ 4} NS,| Z-

- w~(0nps <Q H0 *jt w.tnu w~(*oju0s0P+O@^ 02Hv+ : Z0+,my w 
-,v0w .3L@*wAaN+Z, Q,	,>,>L,>o,`Y/x -+-0

.x w~[
  J-Z

  L.Z0 N0Z000+,>w~,>L,>p,`Y/x+l w~ .0HT@

.Z0 *0P@
AaN+ p Hw~ w~/(F H/

00s P/ *0P@
 .0P@G
 (0P@G
aJ+*

/(

6.4Q+A,>L,>q,`$/y+A

/(

 4Qan+; 0Z4Q(y. 
@ J0 .2Jz@

/ (0L@G 00L@GaN+9 wZ*hQ*	,>+?Z((/(F H/+A0q P/ 0*w3P+A,>w~,>L,>r,`Y/x,>/,>w,n/y

w~ Z.QZ0 .0zps 82H{+M

00{0P+M 01H+M,>L,>r,`$/y

/(

0s .1P@ .Z
 0s 83J@A*s 00J@Z

  *0,@
AGaN+\,>w~,>L,>p,`Y/x+e 8Z

  Lp2xp+e 
..
Z( P1.|3N/9^,>w~,>L,>r,`Y/x9^ w~ ,l|*w0J@

 / .0P@G

`LO@G@/x+@	`.<QD$QaR	84Q\4$4Q00.@.0B0G"#@( & h8SDG(0@ 9C`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
LGS
NLgS]SDGSMS@SMmSuGS~#@SO@S:$^S;!`S;!h`S?`SNDmSNDhgSNL{GYq`Y)`Y!`Y2)`Y3!`Y>9`Y>:[A`[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
LGS
NLgS]SDGSMS@SMmSuGS~#@SO@S:$^S;!`S;!h`S?`SNDmSNDhgSNL{GYq`Y)`Y!`Y2)`Y3!`Y>9`Y>:[A`[B@[B@[&q`[&r@[&r@[>!`]&vC@]?`]?`]?`]?`]?!`e

0L+vO,~@,~6H+y,t ZO@[

0L+~,>qq,>4qp,>',`]/'&,~@,~6H+ ,t ZO@[

0L+ :@@hp+ + -@,~6H+ ,t ZO@[

0L+ :@@hp+

+ -@,~-0.''  Hp@@pO@1l , q Zp4: ,7Lp+ : ( H@p: Lhp 10s+ Z*pQ*	,>Z,pQ,	,>Z.pQ.	,>,/'&[
1J+ O+  ,t Z@aZ+ [1N+ &,>',><qp,>',`]/'&+ ,6Hp+ ),>p,7/''+ +,>p,>,>p,/'&@/''+-0.''  Hp@@16J+ 2O@,t Z[0N+ 6,>qq,><qp,>',`]/'&+ 9, q p8 H Z p/''+-07H1+ ?

W 0an+ ?,>w~,>w,S\+ A,>w~,>w,Sl/'(@+-0 w~*'( ,0J@

 w0') (0P@A

aL+ JO+@+-0.'' w[ Z  *j'( ,l').'*+@< Q+ [,my+ U+ V+ W,my+ X+ Y+ Z '*+ Z '++ Z '++ Z ',+ Z7', '- ZS w *j'-S, LQ,| w QT  .n'.n'. 0p'/S*GJPd  QPQ Hp,}  
pXR( ,XLHXXH.'/0N+ kS:GZH+ kXJ`XVH('00H+ oS:GZH+ p

wXLX@/''+-0.'0 (
Z*'gZ

2j+ v,>',`]+!O@p	 1 Pp
[0H+ z@@1+!j,$,6x+ } +!n:p	. X8@@1[70<'F+!6jp	+! p
 P1.
 (+!n7jp	+!j[ p	.[8 
$'F3*D'F+!j 
p	.

( Lp
 '1 PQ,O  p	 . XXVP>p	[
p
 Np0J+!24H!.[
 0j

+! p	.[87(D'F+!,>'+!*'10J+! ZX0N!+!0'4P!,>',br/'' :XZX+!$,>',`]/''+!n.'4N!$0'110+!$,>',br/'' .n'. (h'/0'00P+!)S:GZP+!,XTX 
Xaj+!,S,GLP *j'.Z`P

XaL+!g,>,>,

I/'(XZP+!g>p	. @QHP[
p
/*+@,!6+!X+!>+!F+!G+!I+!J+!N,my,my,my,my,my,my+!P+!R+!S+!V ,l'.Zp
n'/[P,>ZP,>, B/'(aZ+!X,>, K/''+!g ,+!P ,BLP+!T ,BLP+!Q ,BLPZ

p
1L+!W :+!W ,l'.l'/+!X ,l'. :+!W ,l'.+!M ,l'. :|BZP+!X ,l'. :z'/ ,>,
/'' ZP[P,'00L+!^S:GZP+!aXTX Xap+!aS(GHP0'20P+!dS:GZP+!gXTH 
Haj+!gS,GLP  
p	.
 Z(+ :

p	.

  N0,t Zd + x/'0+-0.'' w*'(1J+!s,>',`]+"8O@_ '1 NQ 0QPQ,O  (h'1 *j'0

wXLX  8q Pp5P!} +"*'24J" =an +",>L,>',`Y/'(,>p,>'3,>'3,

/'& Zp

(q Lp w0'41P+"	 8+"
[8 `7Jp+".'44N"* =ah +",>L,>',`Y/'(,>p,>'3,>'3,

/'&+"3X'5+" '5 PQ@@S XT ( HQ,| Zp+"*d   0QPQ,} ZpS( HQ 
'6 JS,| Zp7,+"# p 0p') (h'6 
& J8 ,l'7,>'7,>'8,>'3,>p,>p,/'8 Zp p 0XP8 wXH8S*GJ8 p0'40P+".S:GZX+".XV8,>,>'9,>'8,>'3,>p,>,"/'9 Zp 
pQJX

pXLX w0'40PXV8,>,5/'8+-0.'8[1H+"=,>qq,>$qp+"tZ

 Lp,%w Z[0N+#1  Hp * JZ,>,~c/''5Z"v 1 Np@@1,t Z p(':0Hl [

 .0L@ 00L@GaN+"O,>',`]+#.[0H+"R:@@hp+"U, q

 L Z0p4:#J[

1L+"F[0N+"p 
p8
2J+"p 7X@p+"`('/0H+"`

`aL+"`,>'8,>+#7d ,t Z[0H+"e:@@hp+"h, q

 L Z0p4:#J[

1L+"l,>qw,>4qp,>',`]/'&,t Z p N,>'8,>p, :/'(+#- 
p J1[

1L+"v,>qw,>4qp,>',`]/'&+#Jd  p2N+"y:O@hp+#,>,7/''   p[
 p.
 p Jp2tp+#

P Lp0':0P+#S:GZP9"}S(BHP9"},%w Z p*';1J+#,>,#K/'' Zp  8p3P'5+#/[

8p,>,>8p,p/'(+#/,>';,>, :/'(,>p ,>hp,
p J,t Z[

0L+#:@@hp+#, q 8 N Z8p4:#J[1N+# ,>qx,><qp,>',`]/'&,t Z[
0J+#$:@@hp+#', q 8 H Z p4:#J[1H+#+,>qw,>$qp,>',`]/'&,%w Z p P,>p,!o/''+#J p N+#J p 
 aJ+#H 06,<'F@('<MaP+#9,>'8,>p,Sl/'(+#J 
p,'<0L+#F (`h+#D,>,0/'' 3X'5+#C/',>,>p,n/'( Zp+#D

pS.GN0,>'7,>p,Sl+#I,>';,>+#I,>'8,>, :/'( p/'8+-0.'9 w 
 aj+#Q,> ,>',>L,>',`$/''d

2Lw+#V wZ0hQ0	,>,>' +$  @p2H'5+#Y@@p+#[[

@p8

Lp

p.,QLQ,}  Xp '1 NQ w PS XT,O Zp p 
w,'=l'( .n') pQH@ 
pXJ@4J#p [8p46#p p.  
.
@p

( Lp L  p.708+#o 
pXJ0=6#h w 8`h+#s pS*GJ@ w*'=,'>H
.'>D
aJ+#,>,0/'' Zp3Z'5+#,>,>p,>w,

/'&

pS.BN0+$ p ,|BL

 0p3P'5+$7vp+$ 
p.
 ( Hp,')0L+$.'; *0N@
,'; 00L@G
aJ+$,>'3,>+$.')0N+$,>';[

 ,>,S\/'(=v$ 
p[( Hw,'(0L+$"  2N'5+$,> ,>' ,`]/'(+$+,>p,M(/''

p ZpXZ0,>'8,>/'' Zp p w   N@ 
p P(S,GL( w 
8aj+$',>p,&F/'' pS,BL ,>'7 p[h,>,Sl/'(7p@/'9+-0.'?@@p@@p 1 Hp[
1J
+$20J	+$5LppO@p,t Zd @@1+$/[0N+$k  Hp,t Z 
1`Jl , q Zp4:$}[0N+$V,%w Z p*') ,0J@

.'* 00N@*'* .0J@GA

aL+$S: * J p: p P8p,>p,7/'':

@@0p,>p,7/''  
 (p N q 0 P(p8 H@+%v*')1J+$s 0p'?+$s[1H+$Y,>'!,>$qp+$f

1`Ll ,t Z, q Zp4:$}[0P+$b,>p,>p,Zn/'( Zp4Z$b Zp+$p ,7Jp@

1aL+$h,>'!,>'",>',`]/'&+%v,>p,>p,%}/'(+%v (0N@ *0N@
GaH+$rZ

 Lp,%w Z+$s,"9 Zp4:%v[0H+%d @@1

'1 LQ,O Zp p 0p'4p'6 pQH8,t Z,$, Zp5:$~O+%v

p pXP0,>,
/'' p[8 Hp*')0J+%S:GZ8+%	XN

 al+%	S*GJ8

pZ0Np('40H+%+%S(GH0 p Pp[

0L+%GO@_ paP+%,>'"+%+d @@1 '1 HQ,O  *j'@ ,	l'/ .n'@  Pp p*'(1J+% ,>'#,`]/'' p0'40P+%$S:GZp+%$XX8 6:
@@(p=v%%:

@@0p: p P8p 1(|+%,,>'#,`]/''+%v,t Z[

0L+%0,$,+%40L+%3Z Hp,%w Z+%4,"9 Zp70p+%v 
p,'=1L+%9,>'#,`]/'' p('A0H+%<S:GZp+%=XX@:

 p N0p[1P+%) 
p

/, L(q,>,7/''  8pXP` p H Xp p P16Hp+%J p+%v

p.': 00N@('A *0H@
AaP+%f.'B (0N

@*'B 00J
@G.'B *0N@
GaH+%a 0 PG 0 NG 
'$ JI,- '5 HQ H PS

H LT p*') JQ,|+%v '5 PQ 0"NS 
0"JT('B HQ,|+%v '1 NQ,O Zp

p (h': *|BJ0 
pXJ0Z`00'B0P+%nS:+%qXL( (ah+%qS:GZ0 p,'(0L+%t :+%u:'( pz'C /'?+ ( HZ,>,~c/''4Z%{S:

,~,>,~c/'',~-0.''6Hw~+&",.l6Lw+&"0.p  Pp *6Hw@
 .7Lw~@A
aJ+&

 q L@r  hq N@r7Pw~+&

 . N0q P0q7Lw+& 
 0 P(r L(r *.j[0P+&l ,t Z, q Zw~4:&37Nw~+&: ( H@p: Nhp+&,>p,7/''[0P+&:@@hp+&>0P+&;: * J8p,t Z@@1d , q 8 H Z p4:&3[

1L+&),>qx,>4qp+&<,t Z, q 
8
 J Z(p4:&3[0P+&4,t Z, q 8 N Z8p5:&5O+&E:@@8p[1N+&8,>qw,><qp+&< p.:,>,7/''O@1+&>,>qw,>Dqp,>',`]/'&+&E,>p,7/''

  
8p J0q 0 P8p8

 L,t Z@/''+-0.'C w[
  Jp[(Z

P LpZ0 Np ap@+&QZ
 Z

83J+&Q,>P,>L,>'$,`$/'& wZ
  Jp

pZ Z03n+&VZ0 Hp('.0H+&Y : Zp+&Z@@p p8  p Pp2rp+' 
w.
Z( p.Z Z

`0L!+&d0'11P+&d'(h'@	ap@+'&m:'1Z:l1+&n:'1Z:l!Q:	,pZ.4'^Q. 0p'D*aJ+&v,>P,> L/p,>,>'%+'('@0H+',>,Z/'' Zp,>,Z/'' Zp p .3P'5@ 
p (3J'5@AaN+'20+',>P /p,>,>L,>'%,`$/'' ( Hp,'/0L+'0'D1p+' * Jp0'E3Pp9&\+'*'E (0J@,'E .0L@AaH9&\,>P /p,>,>L,>'&,`$/''9&\@/'C+@	`'Sz<=Efa#lF'V	P		*'X'\'^	w	|z#  8  Y3!`Y	`Y2)`Y)`Y:)`Y!`@PPP`X	 XH@8(0Yq`8D8(0@0 $(($@,@B@8F ``@00(@P<`X(`

~}}||~~comma or end of statementFunction namecomma or right parenthesisexpressionlist=j=i=c=`=+<k$k5k-kk$`-0 w*-}1J+'{S. NM NQ -}XPQ,O  p XH wXD,>,K/-~Z*-~0J+'tS:GZ+'uXBZ.-~0N+'xS:GZ+(XB ah+(S:+'w  p 8,>,>,>-,(/- [p,>,>p,p/. +-0

.- w~*-}1J+(,>-d,`]/-~ . NM NQ w0P+(

,}+(
-}XJQ,O S* JQ

w0L+( w~(.0H	+( .+( .+( w~(.1H	7. . ZS,| XD70+( (h.S*GJ 
w1J+(S.@GN w~*.0J	+(<Z XD w~XN0.0P+(%S:GZ+(&XB8

=al +(3 8Z Hp2xp+(3 .Z8 Pp*.0J9()(.1(9()6*@9(),>L,>-d,`Y/.+(39() 8Z Hp2xp+(9 .7089(4Z
8 JpXB(9(4,>.,>w~,p/.+(H .QNQ,} XD 0XP w~XH*.0J+(CS:GZ+(DXB  w~XN0.0P+(HS:GZ+(HXB8d   /-+-0 p `,>.,>,S\/.4:(P,>,'g/-~+-0,t Z,"978+[
1J+(V,>q{,>,qp+(Z, -76+[1P+(\,>qs,>Dqp,>-e,`]/-+@@Z`*.0J+(a,>.,>,S\/.4:(f Xp Vq . N,>.,7/-~,>,'g/-~+-0 p@@k,>`,Y}/-~  Vq46)*.0J+(o,>-e,`]/-~+[0N+(v(.0H+(vZ,XQ,	,>,>-f,>-f,`]/-+[0H+(y,>-g,`a/-~S,GLX

. LM LQ -}XNQ,O  `XPX qQHX[
,>,>,p/.ZXS,GL`[

B5L)XVBQVB+BXV@XVB+-0.- p `0H+)7LM+)
p

`XL(R`(Z`(@+)S `

`0L+)07PM+)Z
@4J),>-g+)> 
P Jp,>.,>,Sl/.4:)S p Nq0.	1P+)>7JP+)/ =an+)#,>L,>-h,`Y/. P Pp @ Hq [
q. Hp2rp+)* HZ

h LH9)'[P,>,>P,p/.[q8QPq+)/@@q .
+)H P Pq [q. Pp2rp+)6 HZ
h JH9)3

P Lq [q8QNqZX0H!+)< :XZX+)@*.0J+)@,>-h,`]/-~+)S*.1J+)H =an +)E,>L,>-i,`Y/.,>,>.
,>-,

/- Zq . NM NQ[,>,>,p/. -}XHQ,O Zp 
p

qXL([qQN(ZqXP(Z((.0HXJX/-+-0..

 p Hp 
  JpS,GL(,>.,>,Sl/.4:*0 p 8ap+)_,>L,>-i,`$/.+*0 p 
 aj+)d,> ,>-j,>L,>-j,`$/.

p Lq . NM NQ -}XPQ,O Zp p7J +*#   Np@@p@[p Pp2vp+)rZ
p.
[

(.

p8

 Lp9)m p&( Hp.(QHQ,} p ZpXZ8 p

pXL@QN@ 
p(`h+){,l.p2vp+* Z
p.
 ( [. Hp2tp+*:

p P p.

XD0Z`0 P0N+*(-~0H+*

pp.S*GJ8*.

GaH+*,>-,>,S\/.+*

pXL.-~0N+*,>.[,>+*S(GH0.4+*[,>,>,p/. p

@ 09)~[p,> p,>h,p/.+*+ .QNQ,} p ZpXZ@ 
pR`(QP( p

 `l+*+S.GN( p qXP8d  [
p,>,>p,p/.@/.

+-0(.5H*4,>L,>-k,`$/.,t ZO@[

1L+*=, - Zp4:*L[1H+*>,>qs,>$qp,>-e,`]/-+@@p . PM PQ -}XHQ,O  pXXX4X*L,.0LXV`0.1P+ 
=aj +*I,>L,>-k,`Y/.,>,>.
,>-,

/-XZX+,t3Z.+*R,>qs[,>lqp,>-e,`]/-,~ 
. JM JQ

-}XLQ,O,~-0

,>,~c/-~6X+*\,>,~c/-~3Z.+*d,>-l+*a2X.+*^O+,>,~c/-~3Z.+*d,>qs[,>lqp,>-e,`]/-+ *XJ` +-0,*U66+*iO+ 
. JM JQ

-}XLQ,O XV`+-0,*U66+*pO+ 
. JM JQ

-}XLQ,O XV`+-0.. w~ *2H.@
 ,2H.@

G
aJ+*| :+*| : ZR p X6NP++ . HQ@@S

w~ LT * JQ,| ZP++ w`H++,>-l,`]/-~[P0H
++
. JQ@@S w~ NT 0 PQ,|++1 
P..0N++! P,.0L++ P0.1P++

P*.5J+,>.,>-m+, P(.0H++2 
P[( Np 8ap++2,>-m,>-n+, P0.1P++2

P*.1J++2++ P,.0L++%,>-n,`]/-~++2 P0.0P++)

P 
0`J++

P*.1J++2 =ap ++/,>-o,>L,>-o,`Y/-,>P,>.
,>-,

/- ZP7JP++M[P1P
++M

P*.1J++M P(.0H	++< 
P[( Np 8ap++M,>-p++ 
P..1N++M P,.0L++L P708++M P,.1L++L P0.0P++L

P*.1J++M P(.1H
++M 
P..1N++M,>.++7PP++W

P*.1J++W =ap ++T,>-p,>L,>-o,`Y/-,>P,>.
,>-,

/- ZP[

P0L
++[7NP++[,>-q,>-q+,7NP++_ P,-}1L++_,>.++7HP++g 
P..0N++[P0H
++e W8,>++Z7JP++g,>.++6JX++i@@p++u X ` h,>@,\I/-~ Zp6(p++o +,H,>- `,>h,p/.,>-,>`,p/.,>-,>,p/.7PP+,

P*.0J+, P6(@+,7LP++|,>-r++~ w~2N.++,>-r,>-s+,7Hp+,,>-s,`]/-~+,H

P*.0J+,6PP+,,>-t+,

P*.0J+,
 P6(@+,
,>-t+,[P0P
+,u+,7LP+,,>-u,>-v,`]/.+,H R0N+, PS, GL  w~ PM PQ -}XHQ,O

PQL` 
PXJ` PXN` PQP` PQH`[

pQL`[
P0J
+,T``+,  PXP`7PP+,#

PQL` 
PXJ`

PZ
0 .0J!@Z0 (0P!@GaN+,1 
P[

( Lp600+,- 0+,1 . HQ@@S 0 NT * JQ,|XZ`7JP+,5 P(.1H+,5 
PXX(7PP+,=[P1N
+,=

P0.1P+,= P*.1J+,= PXX@7NP+,A

P0.1P+,A PXX8,>,F/-~[

,>,>,p/.[,>,>,p/.7@/.+-0.. p X7HP+,X[

P1L
+,X P(.1H+,X

P..0N+,T,>-n,`]/-~+,b P*.0J+,Y P 8aP+,Y,>.+,q P0.	1P+,b 
=aj +,_,>-v,>L,>-o,`Y/-,>P,>.
,>-,

/- ZP7PP+,d,>.+,q7JP+,n P0.	1P+,n 
=aj +,k,>-w,>L,>-o,`Y/-,>P,>.
,>-,

/- ZP7NP+,s P*-}1J+,s,>.,>-m,`]/.+-
 w HM HQ 
-}XJQ,O

PQL` PXN` PXP` PQH` 
PQJ`7LP+- P(.1H+-

PXX07PP+- 
P,.1L+- PXX@[
,>,>,p/.[

,>,>,p/.7@/.+6H+-

0L+-,t ZO@[0P+-,>qq,>Dqp,>-e,`]/-,~[0P+-O,~@,~-0.. w  @@p *= Jp

p2lp+-'.

p&, 2X\.8+-#[\.v Hp4H-"  \.v+-'3x\.8+-& 8 Zp+- 
=
-@/.+,>.,>.,>.,*u/-,~-0

(-w4H-0 p `6L`+-0,>-x,br/-~,>.,>.,>.,*u/-+ =ah +-7,>-x,>L,>-y,`Y/-,>.,>.,>-,*u/-,~(-w4H-=,>-y,>-z,br/.,>.,>.,>-,*u/-,~(-w4H-D

jaL+-D,>-z,br/-~,>.,>.,>-,*u/-,~ =ah +-K,>-{,>L,>-y,`Y/-,>.,>.,>-,*u/-,~(-w4H-Q,>-{,>-z,br/.,>.,>.,>-,*u/-@,~ =ah +-X,>L,>-|,`Y/.,>.,>-,>.,*u/-@,~ =ah +-_,>L,>-|,`Y/.,>.,>-,>.,*u/-@,~@	`fdko>(?k)Q.	P:;.!	m	7.$	L	h.&0.'.*.*.,..
./.1.2.4	<.7.8<=3/5Y/6]/7/9-(  (@G#hgG#kGG:'Gk' 8@PXX((8((XP F@8(``( 00PP0(80k:N@@00$@ @M7 S?H:e}(}P~~PSubroutine namestring or 6-digit integeras unit specifiersUNITas format specifiersRECrandom accessENCODE and DECODEREREADUnformatted I/ONAMELIST I/OList directed I/ORandom access I/OUNITRECC~9C2:C2|pC2|s@C2|t(C6 C6'C6Md C6Md'CNMiCOwCR

,`G|`G/

Gey`G@GZG"\J;G2~9 G3k:G7NG7NG?@G?C@G?$@G?$GI|rIRI$II$RI$PI
d\IInI}jSI~H7I~KGIex:Ie}I&l`I'4\ZIJ,IR}OR|H SI S&

E(Sj/;U&U&9:U&-|@U&~rU'	ZU:~@Uj/@c$Ic$Rc~0c~9c~:cMPcFcF@cFIc2|pc2|t(c6 c6Md c6|@cNL{@cNM`cNMicNMjcO-cR

9 kN.)<uF@ @@@(@8@"P`0@0@"TYPEPUNCHACCEPTREREAD-0 45 4 HZ 6,>,~c/464Z/F,44L/B2X46+/B,>4,>4,br/47,>47,C/464:/I,>,,I+/I 46 4 ZZ=6/<,>4,`]/46+,>48,,I/46,~,>48,,I/46,~ =ah +/Q,>L,>4,`Y/47,>49,,I/46,~-0.47 w~ w7HX+/Z

X0L+/Y"w< 8,>X,>,/j/47 Zp w.67LX+/b X0P+/a"
w<
 8,>X,>,/j/47 Zp 49 PQ p HS 
p JT , LQ,|/47+-0.46 w~ 
  JG

  LG.4:1N
+/v Hp7*=74 4

p.4:(N..: ZI,- H PG H ZG 
w~,4;1L+/}6.=+/{ 4  ZI+/| 4  PI,- H ZG waN+0"G+0 G/46+-0.4;@@p@@p w[w.w Hp2tp+0i * Jp@@p

P0L+00

:+0

 :.zp+0_ P0N+0 P[X.hp+0_ P7H`+0 
`0J+0O@p90@@p90@@p 
`0J+0,>`,>p,/S/47  0.pp@@p+0\ ` `7P`+0F,4<1L+0",>4!,`]/46@@p+0_7Np+0( 49 HQ@@S

X"LT * JQ,| 7(X+0  
X Jp  `[,>,>,p/47 ` `0P+02 `,4<4L0D . Np+0L

`0L+05[X+0E `0N+0L7HX+0; 
X0J+0:O@p90;@@p90;@@p 
X0J+0A,>X,>p,/S/47  0.pp@@p+0L X XaP+0D :+0E : Zp+0L

XaL+0H :+0I : Zp[
,>,>,p/47

p$

p.lp7Jp+0\04=5P0T

49 LQ@@S 
X"JT . NQ,|+0\

X LG 
X JG 4! NI,- 49 PQ H HS

H LT*4< JQ,|  P[,>,>,p/47 .QNQ,} Zp6Pp+0d pXZpQZp+0f

pXL@XLp

p 
p J0QV0.4+0Sp[p./4;+-0.4= p   `7JX+0q,>qq,>qx,>4",`]/4= [. Np2rp+1

 H X `[,>,>,p/47,>,0/46 Zp[,>,>,p/47@@R@@,>X,]=/46 Zp[
p,>,>4>,>4>,m/4=[

,>,>,p/47 4> NQ,O [pQPP pXHP[
p JP

LQLP90s p 8[,>,>,p/47,>4>,>p,p/4?+-0 ( HZ 4441(X,>,~c/466V+1(XP+1.8_p/4+1,>,~c/465Z17@+-0.46 w $51 
g<
 @ Vp2tp+1(

`2lPS+1+ `20PS+1' :+1+891" U&02p+1+ :+1+@/46+-0 w.w~&(  ,3xw@

 .28w~@G

aL+14O+,>,1/46 0V+18 +5V1;,>w~ <,>+1= 8,>,>w,1,/47+-0.46O@p 2@@H2=21A,t3Z4?+1D,>qw+2k,>,~c/466X+1m

paL+1M 6, -4:3(  @p>*4@1J+2Y+2 4" NZ,>,~c/464Z1V w *2H4@@
 ,2H4A@

G
`J+1y 6"+1j 4# HZ,>,~c/464Z1_

w .2L4@@ 02L4A@G`N+1y 6!+1j

4# LZ,>,~c/464Z1e w3P4@+1y 6!+1j 4$ PZ,>,~c/464Z1k 
w3J4@+1y 6 O+2Y,t Z,>4$+2/,>4>,>4A,1,/4776+1y w2N4@+1r \5T+1t3N4A7\5w \6+@l1u+2Y+1y+1|+2+2+2)+20+2=+2J@,>4%,>4%,`]/47+3(, -4:3( 
 (p>

.4@1N+2Y(4B1H+2,4B0L+2@+2Y,>4%,>4&,`]+2$, -4:3( 
 (p>

.4@0N+2ZP0H!+2,>4&,`a/46 :XZP+2Y,>4',`]+2ZP0H+2,>4',`a/46+2Y,4@1L+2Y,>,>4B,>4>,

/4= +2Yl , -4:3( 
 (p>

.4@ 01N@(4@ *1H@
AaP+2',4B0L+2%,>4C,>,Sl/47+2Y,>4(,>4%,>4(+2X,4C1,+2Y,>4)+2%,I ( Hx,t Z ,I!@@x[
1J+2Y,>qr[+2l,>4C,C/464:3( ,>hp,Y}/46 >
,4B0L+29,>4C[P,>+2:,>4D,>,S\/4704@1P+2Y,>4)+2W,>4C,C/464:3( ,>hp,Y}/46 >
,4B0L+2F,>4C[P,>+2G,>4D,>,S\/4704@1P+2Y,>4*+2W,>4C,C/464:3( ,>hp,Y}/46 >
,4B0L+2S,>4C[P,>+2T,>4D,>,S\/4704@1P+2Y,>4*,>P,>4+,`]/4=

\6=7N02+2\,>\51,>4+,`]/47 \6= T 2@@p*44J2b,>,>\51,>,>w,37/4D7L+2d@@+2e,t Z[1H+1D[1N+2i,>qw,><qp+2l,t3Z4E+2m,>qs[,>lqp,>4"+2r w3H4@+2s 6\6L82+2{,>4,,>5P,>4,,`]/4=+3( 6\6L82+2w 6I6J 2+2{,>4-+2y 6I7J 2+2{,>4-,`]/46+3( =an+3

w 02L4E@ 6I .6J 2@A

6P (6J02@AaP+3,>4.,`a/46

w LM LQ 4FXPQ,O  6\ 
 2QJX 6I

82XLX 6H @2QHX 
6N (2QNX

6\ 6I@@(2@@@2@@ 2@@02[X4N3[X04F0PXV`ZX4P3ZX,4F0LXV`[

X4L3[X*4F0JXV`@ 26JH28=234t3(XTXQTQ,} QTX 27LH2+3'78H2g XZPQRP483'(4F0HXV`8=23!@/46+-0.47 w~ HpZ* Q*A` Jp,w7X+36 p7R+33
 0t-/43T+3/5R35O+36:w+3-@/47+-0.4D w~ Hp 
w},4.$,.4/$..

,6` LpaL+3Z0J

+3C"(.hp w2N4A+3Z :Gzp+3Z (0J@ .0J@GaH+3K",.lp w3P4@+3Z:p+3Z@@p

p04G0P+3U6Nw}+3P 4/+3S0N+3U w2P4A+3T 40 Zp+3U 40 Hp7Np+3Y,>p,>,3)/47aZ+3Z":.zp paP+3{ w}0H+3a"*.jp

w2L4E+3{,>41,`a/46+3{0H+3f",.lp w3P4@+3{ :+3{@@p

p04G0P+3v5H3j 41+3t0H+3l 42+3t0H
+3n 42+3t .0H@ *0H@
GaN+3v

w2L4A+3u 40 Zp+3v 40 Hp7Hp+3z,>p,>,3)/47aZ+3{":.zp7Hp+4 
paJ+4aJ+4 43 Zp+4 43+3aJ+4 44+3@@p7Lp+4,>w~,>,>44,`a/4= paH+4

aH+4 43 Zp+4 43+4
aH+4 44+4
@@p7Np+4,>w~,>,>45,`a/4=+4@/4D+,>4E,1?/46,~,>4A,1?/46,~,>4@,1?/46,~@	`H7<=7]H79LbB)H7H7H7H7	7
S	4	9?kF7
 7777	]	07?


>=<=77&7"77)7-c(c#c&wyHH

HH	0

0(8XXX(hPPP
 PP (P `(0ACCESSASSOCIASSOCIATEASSOCIATEVARIABLEBLANKBLOCKSBLOCKSIZEBUFFERBUFFERCOUNTCARRIACARRIAGECARRIAGECONTROLDENSITDENSITYDEVICEDIALOGDIALOGUEDIRECTDIRECTORYDISPDISPOSDISPOSEERREXISTFILEFILESIFILESIZEFORMFORMATFORMATTEDINITIAINITIALINITIALIZEINITIALSIZEIOSTATLIMITMODENAMENAMEDNEXTRENEXTRECNUMBEROPENEDPADCHAPADCHARPARITYPROTECPROTECTIONRECLRECORDRECORDSIZERECORDTYPERECTYPRECTYPESEQUENSEQUENTIALSTATUSTAPEFOTAPEFORMATTYPEUNFORMUNFORMATTEDUNITVERSIOVERSIONDIALOGDIALOGUEREADONREADONLY"4H4I4K4L4O4P4R4S4U4W4X4Z4\4^4_4a4b4d4e4g4h4i4k4l4m4n4p4q4r4t4u4w4x4z4|4~45555555	5
5

555555555555!5#5$5%5'5(5*5+5-5.50""""

	"SPACEFILEBACKFILEREADONLYREADONDIALOGUEDIALOGkeywordarray or character expressionarray or character expressionCHARACTERINTEGERLOGICALspecifiedDIRECTSEQUENTIALH7H7APPENDDIRECTSEQUENTIALH7H7H7NEWOLDSCRATCHUNKNOWNH7H7H7 H7!DELETEKEEPH7$H7%FORTRANLISTH7'H7(DELETEKEEPPRINTSAVEH7*H7+H7,H7--0

,7w6X+73@+ * JZ,>,~c/<z4Z7< =..$.7P8n+79,><{+7? =.:$:.<Wx+70 =..$.7P8p+7A,><{,><X,`]/<|+ 
=.*$*.
<Xx , LZ,>,~c/<z5Z7K .QN =.($(S*ky.<Yj+7OZ`,7w =..$..<Yz :+-0

 (- HZ,>,~c/<z5Z7W

=.,$,@.

<Yn +,7mQZ4Z7h . NZ,>,~c/<z4Z7h,7mXZ4Z7h 8@@@@`~ * JZ,>,~c/<z4Z7e,7w Z`~4Z7h818+7^ (. HZ,>,~c/<z5Z7iO+

=.,$, .~.

<Yn :+-0@ ( HZ,>,~c/<z7V+7v0v+7u (./: +7og +-0 4448(X ( HZ,>,~c/<z6V+8 , LZ,>,~c/<z6V+8(XP+8.8_p/4+7x , LZ,>,~c/<z5Z8 0 PZ,>,~c/<z5Z87+8+ ( HZ,>,~c/<z4Z81

<Z LZ,>,~c/<z4Z80<Z1P+8) :+8  <[ PZ,>,~c/<z4Z8 
=aj+8,><[,`a/<z,<\1L+8) :z<\+8- 
<\JZ,>,~c/<z4Z8!.<Z1N+8):z<Z+8- <] NZ,>,~c/<z4Z8, =ah+8',><],`a/<z*<\0J+8+,><^,`a/<z+8- :+8O,~ : ZZ,>,~c/<z5Z8

.<| aH+89 
=0J+8:,><^+9

O@= 
=aj +8=,><_,`a/<z ,BL

=.,$,@.

<Xn@@ =.0$0.<Yn =.($(.<Wn * JZ,>,~c/<z5Z8L,t,><_[,>lqp+8f =.0$0 .6H@p@ 
=.*$* (6L(n@GaN+8U,701Z+8L4:94 =.0$06L@r+8[,7P1Z+8L5:8[,><`+9

,8
5:8],><`+9

1Z+8L . NZ,>,~c/<z5Z8c,t,><a[,>lqp+8f,t3Z<}+8h,>qs[,>lqp,><a,`]/<}+94 
=.*$*6H(n+8lS,Lu.
<Wl

=.,$, 0n	z`z+8r,>L,><b,`$/<|+94 =.0$06J@p+8v,><b+9

=.,$,@.

<ch 
=.*$*Z0(o.
<cp =..S

 Lp =.($( 
 m Jp  n Pp  n Np , LpZ* p Jp 0p.<~ 	x6+9+9[4N9

 =.($(Z` qZ`+8|,><d,`]/<z+94 =ah+9*<Z5J9,><d,`a/<z,>~,we/<z,N:
= M.
<ep =

=.<el = 
>.<fj = O.<fn

= N.

<gh 
= ?.
<gp7N?+9# = A.<hh+9% =@
.<hj = 
>.<hj0J$:A =

 L85l@(<\1Hd 0<Z1Pd

= < H0HS*BJ<,9R *
 J=,	0Z@+94,95+94@/<|+-0

.<z,>~,we/<z =.(S
.* Jp ,p.

<~ 	x6+9= = 8N PM 8T H= 
8Z J>

8` LO 8f PN 8l H?7J8r+9E 8r PA = @x H> * J?.<n<i,<l<i(=h<j*=j<j @5 @H N<>

=5,9PS:H Z@+9P,9R,	@/<z+-0

 = H@ 
=8
0j+9X =.: +9Y =.. x<k+-0.<|: 
^ J] J p:

@@0p6N+9c ( HZ,>,~c/<z5Z9f+9d[1H
+9e w+:S@@  * J p

<k LZ,>,~c/<z4Z9n w1P+9m,><l,><l+:
O@]+:Z,>,~c/<z7V+9y 
/* J],>,~c/<z7V+: ]$../. N]+9s * JZ,>,~c/<z4Z:,N4::S7P+9@@+:,t Z[
1J+:,>qw,>,qp+:
,,8p> ` H]+:6N+:,t ZO@,><m[,>lqp,><a+:N6j]+:
] JpO@p ,2Lp+::p ]0N+:,><n,>+:G ]0H+:

=al +:Q,><n+:2,>],><n+:M ,
2Lp+:-:p ]0N+:! =ah +:Q,><n+:2 ]0H+:&

=al +:*,><n,>L,><o,`Y+:*

]0L+:+,><o,>,><p,`a/<} :

+:S,>],><n+:M 02Pp+:;:p ]0H+:4

=al +:Q,><p,>L,><o,`Y+:H

]0L+:7,><p,>+:G ]0P+::,><p+:C,>],><p+:M *2Jp+:J:p

]0L+:A =ap +:Q,><q+:2 ]0P+:D,><q,>+:G 
]0J+:I,><q,>,><p,`a/<}+:Q,>],><q+:M .

2Np+:O:p,>],><o,><q,`]/<}+:S 02Pp+:R:p ]+:S7 pO/<|+-0

 w H] * J^@@,>,9Z/<z Z
5::[ 
+  8p0P+:b6H+:a . NZ,>,~c/<z+:b[1N@@ 
0H+:f  hp N^+:f@@^"..n,>=,C/<z4::z * JR p `0H+:t X0N+:s * JXd l  `,>h,>=,TQ/<|+:x,$+ X0N+:v * JX,>`,Ub/<z[p,>,>p,p/<|+,>=,:T/<z,~,>=,:T/<z,~,>=,:T/<z,~,>=,:T/<z,~,>=,:T/<z,~O@^,>=,:T/<z,~-0

 pO@
 ( HRd l ,>`,>=,TQ/<|,>=,>p,p/<|+-0

 pO@
@@Rd l ,>`,>=,TQ/<|,>=,>p,p/<|+-0.<|7Ha+;,><r,`]/<z,=5L;,><r+;BO@
l  p P @ Xah+;#,>X,><s,>L,><s,`$/=*=0J+;E 
 NSS0 PQ,| (=1H+;>,=1L+;? 0QPQ,}  Rp 8 HH 
.
= JH

= LH .. NH XH 0QPH@@H .= HH VH@@H*<t JpS,BL=,=v Zp

pl<t6.p+;F +;K,=1L+;@,><t+;B `3PX+;D,><u,`]/<z+;K * J
+;FS.GNX . NR,>P,>=,TQ/<|,>=,>,p/<|/<|+-0.<z,t Z[0H+;WZ

 Lp 0 N
,>=,>,RI/<| pS(GH@,t Z+;Z,><u,>$qp,><a,`]/<}+;_[

1L+;_,t[0P+;[,><v,`]/<z/<z+@,~-0.<z,t Z[0H+;kZ

 Lp 0 N
,>=,>,RI/<| pS(GH@,t Z+;l

=	 L
l

1L+;q,>qs,>4qp,><a,`]/<}/<z+-0

O@
@@R p,>`,X4/<z,>=,>p,p/<|+-0.<| p X Hq,>=,>,p/<| q[
q.
q Jp2rp+<$ H6LX+<2Rq+<,>=	,Yt/<z O@cO@d+<,><v,><w,><w,`]/<}+< X1P+< X 
` Jp[

,>,>,p/<|,>=
,>p,RI/<|4:<' pS(GH@,>@,Yt/<z 8O@
 0 PR[PQHqZ
PXJq,>X,X4/<z4:<$[qQNPZqXPP[PQTX(=0H+<! ,l=
.=n=+<#,=l=
S.@BNXZX5V<9;~ q[,>,>,p/<|/<|+-0.<zO@dZp6H`+<-O@cO@b+<M `ZZ

[.

 Lp2rp+<M H0P+<H H 
Paj+<9.<x4N<8,>P,><x,br/<|+<9S0GPPO@b Pan+<>,>P,><y,>L,><s,`$/=

Pal+<B,>P,><y,>L,><s,`$/=0=

(=

GaP+<L,>P,><z,>L,><s,`$/=+<L H X 
P`j+<L,>,<O/<z.2+<0@/<z+-0

 (QHQ,}  
wQJ`

eXL`=Xe:dS0GP(@+@	`nWpqrH=`GmnJrNTZ`flrx0@5"@54@56@5,@H====poIo{oapoJV7=	P<=		$=q==<=o= ="=#I5rM&dP0(00"46*x

8 `X
exu}['DXDP@X.P$PNOLISTNOCREFLISTCREF''NOLISTNOCREF(*)constant(*)integer constant or "("ENTRY namePROGRAM name, OR /IDENTIFIERCOMMON variableDummy argumentExternal name-0 wZ
 1J+=-,>,N$/D~ Zw wZ81P+=-,>Dg,`]/D~ w+-0.D~ D HQ,O Zp 
p

w 0XB(S.GN an+=7,>Dg,`]/D~ w7H@+=q,>D,>,S\/D~ 
w ( <+@<==+=t+=?+=H+=c6X+=@  pS,GL@,>,=%/D~

p 
`<
 J0 7N`+=t,>`+=a  `[.(QHQ,} [8Q

p V0S*GJ0,>,=%/D~ ZX 8[
.
 Jp2tp+=X,>`,=%/D~ ZP89=T 7N`+=t `7V` ,>,=%/D~

p 
X<
 J0S.GN07N`+=t,>`,=%/D~+=t pZ( P S,GL ,>,=%/D~ Z 7L`+=t `7V` ,>,=%/D~  p X< H@S,GL@7L`+=t+=a,>D,>,S\/D~4:=u p@@8 p/D~+-0.E p 
  Jp [

p.
 Jp2tp+> P Np,>8,=./D~ Zp4:> E HQ p XS,O

pZ0 
`aj+>S.GNXQLX LXNX Vp p @ [. Hp2rp9=z

pZ
0 Jp,>H,=./D~66+>O+>%ZX `ap+> p6, +>,>Dh,`]/D~9>
S*GJ [
` Jp.EnE[ XPX pQVhQV 9>
 p

pXV0XV 9>
9=z p

  Lp[
p,>,>,p/D~,>D,>p,p/D~/E+-0.D~@@p pZ Z
 [

 .
 Jp2rp+>R@ H6N`+>9 ` =ah+>3,>E,>,RI/D~4:>6S*GJX+>E,>E,>,RI/D~5:>7O Tp+>FS*GJX+>F `0H+>>*Dh4J>=,>Di,>Di,br/D~ `+>B*Dh4J>A,>Dj,>Di,br/D~ `,>E,>,RI/D~4:>6S.GNXS:GZX`T+>O Xah+>J :+>J :zE

Xal+>O,>X,>Dj,>L,>Dk,`$/E[,>,>,p/D~9>* p[

h,>Z
h,>,p/D~,>DZp,>,p/D~ paP+>[O+>[@/D~+-0.D~@ pZ Z
 [

 .
 Jp2rp+>| H,>E,>,RI/D~5:>fO9>a,>,0/D~ 2TE+>mO,>DkZ(`Q(	,>,>Dl,`]/E9>a /(F(6,$Q+>sO,>DlZ*`Q*	,>+>kS*GJ` 
`aj+>x,>`,>Dm,>L,>Dk,`$/E `an+>{ :+>{ :zE9>a p[h,>Zh,>,p/D~,>DZ

p,>,p/D~aV+?O+?@/D~+-0.D~Z=Z`Z` Hp 
X`j+?4E

/,(

Z0nE0E (0P@*E ,0J@

AaH+?,>p,M(/D~ ZpXZ` p V8S0GPX 0pES*@BJX 
/*(

( LX7Lp+?'Z04r?' p.Z@4E X`h+?& 
/*(
Z(nE,E0L+?& ( HX=r?@/D~+-0Z=4X?,*E0J+,?+ 

 ,3JE@

 .3JE	@A

aL+ JSS0 PQ,| 6E	 /((Z nE
,E
0L+   P`+-0.E =ah +?>,>L,>Dm,`Y/D~ 
p

( Lp [p.

 Lp2tp+?Z P Pp @,>E
,>,RI/D~4:?`S*GJ` 
p ([p,>,>,p/D~ [

 Lp2rp+?T H Pp,>E,>,RI/D~5Z?S pS*GJ89?M E NQ,O Zp 
pZ

XL([8QP(QX(XJ`9?B p   Np[

p,>,>,p/D~,>D,>p,p/D~/E+-0 E

 Dn HZ 6,>,~c/D~4Z?n,Dh4L?k2XE

+?i,>Dn+?i,>Do,>Do,br/D~,>E

,Dp/ZZ=6?d,>Dp,`]/D~+(Dh4H?u,>Dq,>Do,br/D~,>E

,>,>,p/D~+@

=al +@,>L,>Dq,`Y/D~,  P8 NP `[P4V@	[X,>ZP,>,>Dr,`]/EZP2N	+@,>LZP,>,>Dr,`]/E(E0H+@,>Dr,`]+@@Z

,>,M/D~aZ+@Z.HQ.	,>,>Ds,`]/D~+@@,>E,>,S\/D~4:@@Z= Pp E HM HQ 
EXJQ,O  Vp ,QLQ,}  .XNX pQPXXTX RX TO RO aXHXZ`X4H@'QV  Va p6Jp+@*[=+@+ QZX:NXRXXTX[PZP8XHP .QNQ,}QZPQVhXRh ` `QTXQRX7J`+@9 ` PXPX[,>,>,p/D~+@: XPX[p,>,>p,p/D~,>N,Y/D~Z,>,5/D~/D~+-0 =ah +@E,>L,>Ds,`Y/D~7JM+@H,>,CI/D~ .QNQ,}  aXP`Z``4P@LQX@ Xa *XJ`,QZ`,XZ` p XQT`Z,XQ,	 Lp4T@V P< PPS(GHP+@Z =ap +@Z,>L,>Dq,`Y/D~[` PMZ@ H	Z
`,>,C/D~QZ`@+-0 =ah +@c,>L,>Dt,`Y/D~,t3ZE+@h,>qs[,>lqp,>Dt,`]/E+6Va+@k,>Du,`]+A"ZX5N@}[X[H,>,>Du,`]/D~ZXZ
X ,1J@

 .0V@G

aL+@o4V@|[X4R@wZXXZH+@xZ
X JaZX4R@z[XQNH,>E,>,p/D~O+[XZX0H+AZ`+A[X Z

H0,P@4RA
3RM+A
[
`,>,>Dv,`]/D~

aZ0 Na,>E,>,p/D~7HM+AZ

X0L+A[X5PA! 
MQJXS,GL(+A!5RA!Z`ZH<XHH 
H<
 JH[HZ

PQLH MXN`Z88XP8 88 H8[
8XJPQT8XNX+A!Z

X0L+A,>a,A#+A"Z` RMZH P	,>M,CI/D~+-0 w[ 4XA'Z XZ`+A(Z

La

wZ04XA*[0QP` w[h,>,C</D~ wZh,>,CI/D~ Z`X 
wZ

( LMZ0 N	@+-0.E p Hp 
W Jp,>~,we/D~0Z+A; p NW+AR W 8ap+A? p HW,>Dv+Aa p Hp  
X Jp[

,>,>,p/D~Z= Np@@YO@ M Pp@@	@@M W8E4XAN,>,C/D~5:AN p NW p PM+AR WZ

h,05:AS p PM p HWO+Aj p PWZ=6Hp+AW[=XZ=+AWXH=,E0L+AZ,>Dv,`]/D~ p PM pZ
 0J!+A_ :XZ +Ab.E0N+Ab,>Dw,`]/D~+Aj E NM NQ EXPQ,O  pXHXXXX*E0JXV Z``@/E+-0 p ` `7H`+Ar ` X[

,>,>,p/D~+Av,Dh4LAt,>Dw,br/D~ Z`8XZ`

E LM LQ EXNQ,O ZXPXZQHXZ
XJX p

`XLX ZP0N!+B :XZP+B(E0H+B,>Dw,`]/D~+(E0HXVP,E0L+B
,>Dx,`a/D~[,>,>,p/D~@+-0

 Dx HZ,>,~c/D~5ZB,t,>Dy+B,t3ZE+B,>qs[,>lqp,>Dt,`]/E+ .QNQ,}  aXP`Z``4PBQX@ XaR``,QZ`,XZ`[
`,>,C/D~QZ`@+-0.D~ Dy HZ,>,~c/D~4ZBD,>E,C/D~5:B)O+B[ Dz NZ,>,~c/D~5ZB.,t,>Dz+BF,t2ZE+BE7Ta+BJZ

P4LB4[P[`,>,>Dv+BR[P5PB7[P[
`,>+BQZ
P,>,C//D~[

P Lp7NM+B=,>,CI/D~ M Hp,QZP[P,>,C/D~  
pQJXQV(S,GL(+BZ,t3ZE+BI,>qs[,>lqp,>Dt,`]/E+B[6Ta+BL,>D{,`]/D~+B[ZP4PBO[P[
`,>+B3[
P5JBS[P[`,>,>D{,`]/D~+B[ZP,>,C//D~[P,>,CI/D~7HM+BZ,>,CI/D~Z`P@/D~+-0,t3ZE+Ba,>qs[,>lqp,>Dt,`]/E+6Va+Bd,>D{,`]/D~+Z

X4LBw[X[`,>,>Dv,`]/D~ZXZX *0H@
 ,0V@

G
aJ+Bh4VBv[X4TBqZXXZP+BrZX HaZX4TBt[

XQLP,>E,>,p/D~O+[X4PBz[
X,>,CI/D~ZXZ
`1j+B},>,CI/D~7NM+C,>,CI/D~ZX Ha4HCZ` ,>E,>,p/D~@+-0.E p X Hp[
,>,>,p/D~

pZ00N!+CE0H+C,>Dw,`]/D~+C. E HQ,O  *jE ,lElE
Z`` pXV`.E0N+CS:GZ`+CXXX Xap+CS(GH` XaP+C!,>,>,

I/D~XZ` Xp E HM HQ 
EXJQ,O  pXN`XX8Z

= Lp M Pp@@	@@M,>w,C</D~XZ` pXH= 
p JM /E+-0

Z=8E (1X@ *1X@
A ,1X@

A .1X@AaH+C;,>w,C</D~ Z``@+-0

.D~ M Hp@@M 
E JM JQ

EXLQ,O  wXN`R``Z``Z`` 88 P8 p HM /D~+-0

.D~ M Hp 
w JM

E LM LQ EXNQ,O  wS(GH@ p HM /D~+-0.E E HM HQ 
EXJQ,O

p Lp XN`XX8 8ap+C_,>8,>D|,>L,>Dk,`$/E p 
 1J7   QZ` 0E1P+Co,>,K/D~[` *QJQ,}  ,lE .|BNP XNPS0GPPXVPQT`0E1P+CvXXX+Cv[`*E1J+Cs,>Dr,`]/D~,>,>,>E,(/EQZ` 
p

(0L+Cy@+Cz ( @5VC{@+C|[8 Zp p.(QHQ,}  Tp 
pXJ`

pXL(4VD[42D . @ Hp 
  JpZ

  Lp 0 N  J00EpE p. L8 
<
 Jp7(p+D.

8 Lp 
pD02P(+D,>(,>D|,`]/D~>p+D`

p p8XN0  P0S(GH@ (hES*@BJ@4VD#[,>,>,p/D~[p,>,>p,p/D~ /E+-0.E,t [1H+D-,>L,>D},`]/D~+De Tp,E1L+DM 0o5 PW X0H+D3,>D},`a/D~6L	,p~,>E,>,RI/D~ Zp5:D8 p+DeS(GHP (hEZ
 J,>E,C/D~5:DK@@ p .nES0BPXZp4XDbZ0`[@0H+Db[p42Db

 0.E4NDb P HpZP4TDJ

XLPHX=2DD+Db,CS@@@+De0o,PW(HX6J	,p~,>E,>,S\/D~,>E,C/D~4:DbpX[.Pp2rp+DXHZ`HXXH(E0H+D\S:GZH9DW,E0L9DWS0GPH9DW,>p,>,
exu<``H(6$  0 0PP%0 `X( (08808 @D@PPX!*&EXTERNAL namethe name of an intrinsic functionthe name of a non-generic functionINTRINSIC nameRECORDFILESKIPFILESKIPRECORDUNLOADTHENIFTHENStatement function-0.G# w6G(G+@$E7+FJ+FB+E;+EL+EO+E[+Er+F+F@+FB7J+E=@@+E?,>,~c/G$ Z3V+ED,>\H7 ,>lH7,>G,`]/G$+FJ =ap +FJ  *1H@
 ,1H@

A
 .1H@A
 Jj+FJ,>,E3/G$5:FJ+FB *G.
 Jp2rp+FJ,>,E3/G$4:FB aN9EQ 0P+EX :+EZ0P9EQ :BZ :BZ9EQ6J+E_O@,>,~c/G$ Z6N+Eg(G4HEg@0r+Eg[

LHV2L9EaZLHV P  
$H7 J+Eg9Ea ( 
(H(  ,G.

 Lp2rp+Eo ALG_4NEo +Ep9EkO5:F,>,FK/G$+FJ6J+EvO@,>,~c/G$ Z . (N@  (G. Hp2rp+E~ 
A
LG_4JE} +E~9EzO5:F@+FJ,>+EM@@@@,>,E3/G$4:FB7L+F* Zp =ap +F aH+F 
0*d+F .2 N( G P(  H(

S L( ..n aH+F 
0*d+F) .2 N(  P(  H(

S L(+F(*G,GA
.G0GAG
aJ+F! 0(d+F! 0 P   N  
 J

S L  0.p aH+F)

0,d+F) . N0 
 J0  H0 S P0 ..n p6P+F-O@,>,~c/G$ Z 
 ,0J@

 .0J@G

`L+FJ 0P+F5@@@@j+F 
=aj +F7Nj+F1P+F Zp 
0*d+F? ,z L(@@(  P( S H( ..n p+F,>,E3/G$5:FCO+FJ6L+FGO@,>,~c/G$ Z 0 (P   dG_A5ZF@/G#+-0.G%@@p w 
$G_ Jp

p`L+FR(L Lp:p+FN p,>lH7 ,>lH7,>G ,`]/G$:p p(Z Zp4ZF_ p`H+F[(H Hp:p+FX p,>lH7,>G ,`]/G%>V+FUO/G%+-0 (QHQ,} Z*PQ*A` JAZ

., LA.G4NFm =ah +Flah+Fk G! Z+Fm G+Fj 
G! J@@,>G%,E3/G$5:Fp@+@26+Fz6LX+Fv,>X,>X,>X,`Y/G$+Fy,>X,>X,>X,>X,`Y/G#.6+FqZA/8 Z.hZ= 
G& JM JQ

G&XLQ,O 5RG[=XZ=+GXR=[`5PG,>G",`]/G$QV`XT`6J@+G	XX@QX@+G
QX(XX@ &./0"06+ 
<
,>ZA8,>,p/G%+-0 (QHQ,}3ZA+G,>G",>G#,`]/G% ,.lA wnA +@	`0dG)00dG)0dG)<=c#<=>="&c(c&DH^7 0 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"HHHHHHHH H!H"H#H$H%H&H'H(H)H*H+H,H-H.H/H0H1H2H3H4H5H6hpx (08@HPX`htx 0@HT\dhFORMSTA-0

 W*Qy0J+Hf,>
,9Z/Qz68+He +: X@p@+-0

 WZ
 1J;+Hq Z8p ` P
*Qy0J+Hq,>
,9Z/Qz Z
5:Hq 
+>@+-0

(QWS
,QX(L.
.QX(N.
0QY.
.
Qz :" +-0,>,~c/Qz: Z Z p[
1J+I0J+I,>QY Z0hQ0	,>,>QZ+I,>qq,>,qp,>QZ,`]/Q{+ZZ`S. NQ,OXZ` XVP ` PP,Hr Z`S(GHP(Q{hQ| *jQ|,Q}lQ} ` NP 0pQ~@+ ( HZ,>,~c/Qz4ZIO@S, LO,~@,~ Q[ HZ,>,~c/Qz5ZIO,~@,~ ( HY@,~@@Y@,~-0.Q~@@p@ R< Hp2vp+I, 
\R JZ,>,~c/Qz4ZI+O@p6\R 9I& p`N+I/,>Q[,`]/Qz+IM2XQ+I>: 
Q J p

gaL+I6,>Q\,>Q\,`]/Q~+I6O@g =an +I:,>Q],>Q\,`]/Q~ gaP+I=,>Q],>Q\,`]/Q~@+IM gaH+IB,>Q^,>Q\,`]/Q~O@g0X+IE , L^O@^ X],>,9Z/Qz ZR

R0L+IK  hp P]+IK@@]"0.p R/Q~+  
 p2JQ+IQ>O,~@,~-0.Q~ ( HZ,>,~c/Qz Zp4ZIu", .lp . NZ,>,~c/Qz5ZId p([
 0J+I_,>Q^,`a/Qz+I`\`  p( RXP80P+Iw 
] J8+Iw ( HZ,>,~c/Qz Zp4ZIu", .lp3,p+Iu p([@0H+In,>Q^,`a/Qz+Io\`@

p(

 RXN00N+Is ] H0:p3hp+Ij+Iw,>Q_,`]/Qz+Iw@/Q~+ Q_ HZ,>,~c/Qz5ZI},>Q`,`]/Qz,~@,~ Q` HZ,>,~c/Qz4ZJ:

@@0p+J,I,t Z,I![

0L+J:  Php+J,>qr,>4qp,>QZ,`]/Q{,~ 0 PZ,>,~c/Qz Q` HZ,>,~c/Qz5ZJ,>Q`,`]/Qz,~@,~,>R,>R,J /Q~,~,>R,>R,J /Q~,~,>R,>R,Jb/Q~,~,>R,>R,JB/Q~,~,>R,>R,Jb/Q~,~-0.Qz ( HZ,>,~c/Qz4ZJ/O@j,>w~,>w,Jb/Q~ Zp7L+J)@@+J*,t Z[1P+J-,>qw,>Dqp+J86*p+JA +JA@@j,L68+J2 +JA6N+J5,t ZO@[1H+J:1H+J:,>qx,>$qp,>QZ,`]/Q{+JA  ,.l@@Xq XXq@@Xr@@Xr@@Xs@@Xs@@Xt,>,7/Qz@/Qz+-0.Qz ( HZ,>,~c/Qz4ZJQ,>w~,>w,Jb/Q~ Zp7L+JK@@+JL,t Z[1P+JO,>qw,>Dqp+JX6*p+Ja +Ja,L68+JS +Ja6N+JV,t ZO@[1H+JZ,>qs,>$qp,>QZ,`]/Q{+Ja  ,.l XXq@@Xq@@Xr@@Xr@@Xs@@Xs@@Xt,>,7/Qz@/Qz+-0

.R@@p@@p@@p@@p@@p@@p@@p w~,>,~c/Qz Zp6Hp+K+@dJk+Kk,my+Jn+J}+K+K 8,L Zp6,p+Jq +L6P+JtO@,%w Z[
0J

+Kk =an +Jx,>Qa,`a/Qz@@d , -4:L  
 p Jp>

+Kk 82xw 8,L Zp6.p+Kk+K! 8

 Lp,>R,C/Qz4:L,>p,7/Qz  @p Hp 
p J

W 0`n+Kg : Zk p,>h,Y}/Qz Zp60p+Kk+K*6L+K,t ZO@,>Qa+Kw 8

S2LR+K7Pp+K,>Qb,>Qb,`]/Q~,L Zp6*p+Kk +L2LR+K$7Hp+K,>Qb,>Qb,`]/Q~,L Zp6.p+K" +L w0P+Kk+K-2LR+K/7Jp+K(,>Qb,>Qb,`]/Q~,L4 Zp60p+K+ +L w0H+Kk,>Qc,`]/Qz+L2LR+K77Np+K3,>Qb,>Qb,`]/Q~d , -4:L

 
0p Jp>+Kk2LR+KD7Pp+K;,>Qb,>Qb,`]/Q~,I * Jx,t Z Zp,I!@@x[

p1L+Kk,>qr[,>lqp,>QZ,`]/Q{+Kk2LR+KR7Hp+KH,>Qb,>Qb,`]/Q~ w0N+KL6Pp+KL,>qq,>Qc+Kx,I 0 Px,t Z Zp,I!@@x[p1H+Kk+K@ (2LR@ 
T .2JR@AaH+Kh7Pp+KZ,>Qb,>Qb,`]/Q~ 
w0J+K^6Hp+K^,>qq,>Qd+Kx  Hp,>R,C/Qz4:L,>p,7/Qz

 
0p Jp p N@@k,>(,Y}/Qz Zp5:Kk+L,>Qb,>Qd,`]/Q~+L6L+Km,t ZO@[1P@@[
1J+Jg[0N+KsO@+Kt,>Qe,><qp+Kx w0H+Kz6Lp+Kz,>Qe[,>lqp,>QZ,`]/Q{+L

 Lp ..n p P0q p H0q 
p J0r p N0r p P0s p H0s 
p J0t,>,7/Qz@/R+-0

 ( HZ,>,~c/Qz4ZLS8
+Ll , -4:L  8p>7@+-0

 ( HZ,>,~c/Qz4ZLS8
+L3,I,t Z,I![

0L+L +L3 00L@ *RAaP+L! ,>,L?/Qz4:L4

=al+L3,>Qf+L2O@l , -4:L4

 0p> 
=aj +L30R .0P@,Q} (1L@AaN+L3*R 00J@,R (0L@GaP+L3,>Qf,`a/Qz7@+,t Z[ *0H@

.RA
aJ+L=,>,L?/Qz4:L> ,~,>Qg,`]/Qz,~-0.Q~,>R,>w,Sl/Q~4:LU*Qg JpS,BL=

wZ0ZXZX[X.< Np2tp+LQ P R0H+LN,R,>,>,S\+LP,R,>,>,Sl/Q~9LH

plQg =ap +LU,>Qh,`a/Qz@/Q~+-0.Qz   pS*GJ`,>R,>,Sl/Q~76+Lp

`al+L_ :+L_ :zR  NpO@,t Z[0P+Le:@@hp+Ml [
 ,1J@

 .1J@A

 01J
@A

aL+Lq: . N p, -66+M +M(Qh .1H@  01X
@AaN+L|0X+Ly,>Qi,b{+L{ =ah +L|,>Qi,`a/Qz:

 ( H0p * JY,t: Z Z@p[1N+M,>qr[,>lqp,>QZ,`]/Q{+MZS(GH`,t Z[0H+M,t Z 
1j{+Le,>p,7/Qz

 Lp+LeO@,>p,7/Qz@/Qz+7H+M[

0L+M' Qj PZ,>,~c/Qz4ZM *+M& 
Qj JZ,>,~c/Qz4ZM' .	QN+M'

Qk LZ,>,~c/Qz4ZM"O@ 0QP+M' Qk PZ,>,~c/Qz4ZM'O@ *	QJ@,~-06Hw+M* 6+M,Z

.,QLQ,} 7Nw+M< 4 . 
.
w

( L =4M0 <4tM8 . w. 
@ J8=tM5 wZh.(,>,>,p/Q~XV` +-0.R	7H+M@@@+MA,t Z[

1L+MD,>qq,>4qp+MH ,t3ZR	+MJ,>q{[,>lqp,>QZ,`]/Q{+N,N4:N 
 (p>

,>R
,>,RI/Q~4:NS0@GP`0Q}0P+Mp*R
0J+Mp `..&. Np X.(&( Hp3n+Mp < Pp,>`,O/Qz Zp 4 
p Jp2tp+Ma p. .

  L89M\ p8  
p Jp2tp+Mg p. R N 9Mc p.:,>Z

,>,p/Q~[;Z
2P+Mn pQZ;+Mo p

pXL8 pX V`*Q},R
 .3J@0Q} (0P@GaN+N7Jk+M},>,>0R
,>(Q},>,P
/R Z`+N =ap+N,>`,>Ql,`a/Q~@/R	+,t Z[0H+NO@k+N

=al+N,>Ql,`a/Qz@@kO@@,~-0.Qz7H+N

0L+NO@p+N@@pO@ k3Pp+N,>Qm,`]/Qz+N@/Qz+-0

.Qz, -4:N# ,>hp,N$/Qz68+N>

+N#

 X0p.Q} Lp0N+N! :+N" : pQZ p@/Qz+-0.R

w*R

+@,N'+P+N1+NE+NG+Nc+N}+O+Og+Of+O0+Of+Of+Of+Of+Of+Of+Of+Of+Og+Oi[

.,>,N$/Qz78+P wZh,>,N$/Qz76+P w,R

QmNLI.R` ZG*R5JN=7X X ZH,-,>R,>w,p/Q~

ROLQ@@SPHNT 0 PQ,|+P,R

 ,>,N$/Qz78+P wZh,>,N$/Qz76+P X2h`G4 X2N`+NV 
X2j`G4

X3L`G4 X30`G4 
X3*`G4

w.RA<R8,>R,>,p/Q~4TN_ 
R JQ@@SO@T ( HQ,|+P 
R JQ@@S@@T ( HQ,|+P[

`2LR+Nq,>R,>,P/Q~,>,N$/Qz76+P,>R,O/Qz  
X(J.
R J`,>R,>w,p/Q~ +P `2PR+Og,>R,>,P/Q~,>,N$/Qz76+P,>R,>w,p/Q~ R NQ@@S0R PT * JQ,|+P[

0,>,N$/Qz78+P wZh,>,N$/Qz76+P w,R

0R
1P+O	,>Qn,`]/Qz7(=7Qn Qo,R

+O Hp70=7Qo Qp 
p,R(L.R.

. ZI ` PG 
` JG X HH

X LH,-,>R,>w,p/Q~ R NQ H PS 
H JT w,R LQ,|+PZ

 ,>,N$/Qz76+P X PG 
X JG7(=7Qp Qq

w.R(N0R.. ZI,-,>R,>w,p/Q~ 
R JQ H HS

H LT w.R NQ,|+PZ

 ,>,N$/Qz76+P w*R5JOL.R
, 00L

@(R
* .0J
@G(R
, *0L@
GaP+OG.X NG(X HG

Qq LI,- 
R JQ H PS H NT,R
( HQ,|+P R NQ(X"HS,X"LT0R
* JQ,|+P.R
, 00L

@(R
* .0J
@G(R
, *0L@
GaP+O`.X NG(X HG6,=+OZ Qr ZI+O[ 
Qr JI,- 
R JQ@@S HJpT . NQ,|+P R NQ(XJhS,XJlT0R
* JQ,|+P,my+P,>Qs,`]/Qz+PZ

  Lp@@p 4Z0 Np2tp+Ot p.Zh,> Zp,N$/Qz Zp 
pXZ(4:P

p 0.np9Ol,>p,O/Qz Zp pZ*@Q*A` Jp 4 pZ

  Lp2tp+P p.Z8 PpZ*@Q*A` Jp7r@9OzpHp=rP9Oz,R4LP *Jp+P7p@/R

+-0

 wZ  w~.Zh+-0 w2Hw~+P0H+P w~ 82PQ+P w}+ w}

w~ 02N +P + w~,>h,O/Qz  
w}Z8(Q8A`Z6PQ6A`

w~7r0+PN=rP(R4HP *J+P .R+

w0L+P#,>Qs,`]/Qz+ w} @ HG 
@ JG7,=7Qp Qq w~(N(N w(H.. ZI,- R PQ 
H JS

H LT w HQ,|.R+-0.Q~7H+P4@@+P5,t Z[

0L
+P8:  Php+PGO@, -4:PH ,>hp,PI/QzaZ+PG ,>hp Zp,N$/Qz p Z p Zp6*p+PC +PH p0R0P+PF :+PF : 
QZ(p@/Q~+-0.Q~ w*R

 JpO@p ,2Lp+PP:p w.R :5NPg+Pg 03Pp+PV (3Hp+PV *3Jp+PV ,	2Lp+PW:p+Pg .2Np+P[:p wZh,>+Pe (2Hp+P_:p wZ
h,>+Pe:@p+Pg w[

h,>,PI/QzaZ+Pg wZh,>,PI/Qz+Pg@/Q~+-0.R Qt HZ,>,~c/Qz4ZPmO@p+Pq

Qt LZ,>,~c/Qz4ZP~@@p , LZ,>,~c/Qz4ZPuO@p+Px@@p 0 PZ,>,~c/Qz@ Xp  3XQ+Q

,>p,Q@/Qz 2XR+PO+Q?48Pz:

p paN+Q1l+Q (H*R.  (H. +Pz1l+Q (H*R.  (H+Q

p .1l@Dp 01l@GaN+QO@p+Q@@p p *1h

@
 ,1h	@

pG
aJ+Q,>Qu,`]/Qz6P+Q,%w Z[1H

+Q# 
p`J7Qu Qv,>[,>lqp,>QZ,`]/Q{+Q?6Jp+Q) p`N7Qv Qw,>,>q|,>QZ,`]/Q{ paN+Q4 TG VG Qw HI,- H H ,04@

 *1V@
A

aL+Q4 GR6(Qh4HQ6,>Qx,b{/Qz:
 0QP(p R NQ TS VT paH+Q< :+Q=@ ZQ,|

XZ0p@/R+-0

 ( HZ,>,~c/Qz6X+QJ

w`L+QI . NZ,>,~c/Qz6X+QJO+

waL+QN1x+QT,>Qx+QO1x#+QR,>Qy,>,>QZ,`]/Q{":+1x+QT/8+QU/87@+@	`

"R=:ouAR$xc#R%R*6EHR/6HR/TR0S	0
	R2R3	4R4R6Q?
<=B<=hcHR6HR7HR7HR8)L3	e7):2bB	XfHR<HR=R=R?RBRCtRERG$ &`&PP`PDPNONEHUNITFMTNMLRECENDERRIOSTATF ``F0`00X      P  `X00G"#@    SDG:X((

0@@>p>8hB

@@dimensionedNONE:oI:o{:oa:p:oJ:pHR

MultipleOther IMPLICIT specifications are illegal withOther IMPLICIT specifications are illegal withTOWHILEkeywordkeywordkeyword"," or ")"","///,//,/O'Z'"'" or octal digit"'" or hexidecimal digitoctal digithexidecimal digitoctal digithexadecimal digit-0

._

,aH +RM,>w,>
w~

w[,_T[0A7X+Rk *

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

GaP+Rk 
w~ .1J@(_ ,0H@

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

(lRgO/.",><_[ wZ*hQ*	,>+ST@ 
w~+@,Rm+SQ+Rt+Ry+R|+R~+S+S	@+S+S+S&+S*+S/+S7+SA

w0_0P+S =ah+SQ 
0aj+SQ+S?

w0_1P+SQ+S

w0_1P+Rv+S

w0_0P+SQ+S1

w0_1P+S ^n+SQ 0ah+S3 
=aj+SQ 0ap+SQ+S?

w0_0P+SQ+S9

w0.HaP+Rv,>0,>^o,`]/

w8_ 00X@._D`P+S9(_0H+S1X+S1 =an+SQ w6(@+SQ :+S@

=al+SQ0X+S :+S@ w7(@+S[
@A*  ,1J@

._M

aL+SQ+S

w0_1P+S1 0`h+SQ+S3

w0_ .0P@(_DaN+SQ+S9

w0_0P+S2 ^o+SQ 0`h+S4 ^p+SQ 
0aj@+SQ qq+SQ

w0_0P+S: ^p+SQ =ah+SQ*_ 01J@._AaP+SQ :q"+SQ,^q4LSQ,>w,-/_

 Zp4ZSQ =ah+SJA:4ZSJ wZ,hQ,	,>,>^q,`a/
=aj +SQ

pA,4LSQwZ.hQ.	,>,>^r,`a/+S[5:S[ wZ(8Q(	,>"
,>,`a/

+-0,>w,M/_

aZ+Sb W*_5JSb,>^s,`]/_

,w*1JO@1wS0GP8aaPr+Si,>,>,/

 gaH+T	 
w

(`l+T	 (`n+T	 (`p+T	(_ ,0H@

._A

`L+T	 WZ@1H0k+T	Z@1N;+T	Z@1H=v+T	 w,>h,>L,>^s,`$/_ wS,GL8@ 
w~+@,T+T;+T+T+T+T@+T:

w._ 00N@(_GaP+T* ^t+T;

w._ 01N@(_GaP+T* ^t+T;

w._1N+T* ^u+T;

w._0N+T+ 0ah+T% 
0`j+T%,>^uZ.0Q.	,>,>^v,`]/_ 
w (an+T*,>^vZ0(Q0	,>,>^v,`]/_@+T;(_ *0H@
._M
[0A0} (1P@G
._G
aJ+T4 ^w+T; w Lp @ah+T8 :+T8 : pz_+T*

w0+TP4ZT@,>wZ08Q0	,>,>^w,`]/+TP =an+TI w @ah+TI*1J+TIZ.@Q.	,>,>^x,`a/

+TOS,BL@@/_

+-0._ w~ 
4UJp,H0L+TVS0GP(,>,>p,RI/

w~ 0 N] 0 0+T^

w~ 0 04VT_ ` 
1N+Tc@@p ( Hp+Te ( Hp * Jp5VTm 

0J+Tl[p..QNQ,}  Tp p pXH@+UG@+UG `,>,>,p/
.
 Jp2rp+U(8

H0L+UHXP`,>,>,RI/H+U,0L+U :z+U :+U (h[
P JpZ

(5LU70(+U P HSS, LQ,O Zp p *j_ 0p_S(BH8 (h_

pXN0S(GHP (h_S*@BJP 
Paj+U,>P,>^x,>L,>^y,`$/,0L+U!ZZp2P+U!Z,PQ,	,>,>^y,`]/

@@`[H1p9U(*^q4JU( H0N+U&,>^z+U&,>^{,>^{,b{/
,>,>,p/

.,r/, Lp2rp+U< H Np4NU< 8 Hp 
p

(ULp4LU9p02H@+U9,>@,>^|,`]/Hp.(QHQ,}  Tp 
p

pXL( p Lp2rp+UG p. /p @r H89UC 
_ JM JQ

_XLQ,O  
0N+UQ p 
p J S,GL( ,l_@n_7hw+UU

pS.GN0 
n_ ] P0

R0L+UY\`X p QH@ P pS(GH@XPXXTX6HbQV  VbZ`X[

w~,>,>w~,p/+Uo H,>X,X4/

4:Uo7LX9Ue,>^},`]/_

9X@Pp[p,>,>,p/

8
j

  2&4)V}=2Ut

w[.4_n NSS0 PQ,|  (h_6Jw+U| ,l_ +-0

 (QHQ,} 7JZQXZZZXN`XXZ wXP` SQZ`+-0._@@p@@q@@p 
0H+V

]2L_+VO@q+V Lp+V1(

+V : Zp+V . Np[

w8

Lp(

.,QLQ _XNQ,O Zp p ph_  w[
w.
wJp2rp+WZ`PVHX3X+V!.1N+V! Z0hQ0	,>,>^},`]/

`0,+V9 Z(hQ(	,>,>^~,`]/
+V8[w.w3N+V2 Z*hQ*	,>,>^~,`]/
Z!JQ@@SU0 PT , LQ,| O@p+V9S.GNPO@qXXP6Lq+VF ! HQ@@S p PT * JQ,|XZP,>p,>p, /

p`L+W,>p,>`,/0H
+VN1Z*hQ*	,>,>^~,`]/ Vp X3X +VX, 1L+VX Z(hQ(	,>,>^},`]/

0L
+Ve[w.w3H+V Z*hQ*	,>,>^~,`]/
_! JQ@@SU, LT . NQ,| O@p+Vg1L+VgS0GPPO@qXXP6Hq+W[
P JpZ

P Lp02.(+Vp Z0hQ0	,>,>^~,`]/

pLT. NQ,|XZP,>p,>p p,>h,/
p`J+Wp,>hp,>h, /
p,>,>p,p/p/+W1L+W,>^,`]/

   `p+W,>,U}/_

,>_!,8/_

 Zp,>_!,8/_

 
pQZ(


0L+W,>_!,8/_

+W"   aP+W# 
_! JQ@@S , LT . NQ,| Zp+W$ 
 Jp p pXP  
p<
7r+WK/4Z

P5LWK[P 03H@*_"M ,1R@

G 
 (0N@GaP+W4,>_!,8/_

XZP+WKZ
> Jp7Lp+WG Lp(_"1(+WE 
p6.(+WE

pZ02Hp+WE 
pZ(Z

P (2N@[( .2P@AaH+WEZ

( LpXLPZ08XP0+WK

pZ
0+W4,>_!,8/_

 Zp pXPP .XN@=rW'/4 
0H+WOS:GZP+WPS*BJP 
pS0GP(+WW

_! LQ@@S p NT ( HQ,| pQZ@

paL+Wa._1N+W\1N+W\,>^,`]/_

  
@`j+W`,>,U}/_

 pS,GLh[w,>,>w,p/
,_#0L+Wr6Pq+Ws

( LSS. NQ,O Zp pS(BH@ (h_# *j_$ ,l_$ pXP8+WsR`  p`P+W{ 
0H+Ww

P$,+Wx

P2lp+W{ ,>h,>,`]/
p J  /_+-0 w 
+aj+XZ, Q,	,>,>,`]/

 al+X
,>_Z. Q.	,>,>^v,`]/_+

w 0an+X,>0,>_,>_,>_,`$/_ wS(GH@[q5HXXPqQPq+X

qXP0XPq@+-0

._% 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+X(7Jp+X&6Np+X. paN+X( p Z
 

0J+X2+p N]3Np+X07Hp+X07Lp+X0,>`,>,`]/

p L]@/_%+-0._%@@p w[w.w Hp2tp+Yp 
P Jp

R0L+X< ( Pp p @ V R0H+XI,>,X/_

,_0L+XEZ= HpZ
  JpZ  Pp+XF@@p p 
  Jp   Pp+XM

X L]._& N
 @ Hp 
@ Jp6Lp+YI R+@DXO+Ym+XR@@@+XV+YCZ(XQ(	,>,>_,>_,`]/_+Ys[X4HY1


0L+XZ ]+X[1,

+X\ : Zp	+X] ( Hp	0_&0P+X` X+Xb*_&1*

+Xc : Zp+Xd . Np 
p	3Jp+Y1[X Np708+X| p	$8&p H8[8 Np

_! LQ@@S p	$` 
&
p JT ( HQ,| p	QZ80_&<72+Y1

pZ0 Lp
 
_! JQ@@S p	$`&p HT . NQ,| p
XZ@=2Xs+Y1(_&<72+Y
 
(
.
p7,(+Y
 (.pZ@ _! NQ@@S p	$`&p HT , LQ,| (.pXZ@=2X~ p._1.+Y1 
p

(al+Y1 p[@2N+Y1 
pZ(Z

`<

XL`Z`5PYS(GH`Z> Hp7Jp+Y* Jp3Jp+Y( p(_&1(+Y( 
p60(+Y( p pZ

8Z
 2L+Y( p pZ

8Z
 2L+Y( p[82H+Y( 
pZ( Pp pXP8Z@8XH@+Y1

pZ
0 Jp+YZ`5NY-S:BZ`+Y/,>_!,8/_

5 pXXS,XL`,>',>,RI/
n_&0N+YA ] HX*_0J+YA p 82PX+YA,>p,M(/_

 
p ZpXZ(

p p N0S0GP8,>,[=/_

+Ym,>',>,RI/W~/

5:Ym+YF/R+@DYK+Y]+YN@@@+YP+YW,>

j&0J+Y],]/NX+Y],>

5:Y] Zp(_(0H+Y` :z_(+Ya ,l_(

q Lp p,>h,V/_

68+Yf Zp+Yl QX@,>,[=/_

(X(*)GaH+Yl,QZ` p Pq[p,>,>p,p/
w2J`+Yx+Z`+YuZwZNS >)PQ,OZ +-0.
.
Jp2rp+ZHXVHZ`H9Z,>p,>,

,w,6H+Z(6Lk+Z$,>

+@4Z++Zd+Z,+Z7+ZP6Nk+Z/,>,>,S\+Z1,>,>,Sl/

 L(q   N(q,>,!o/_

4+Zd6Nk+Z:,>*,>,S\+Z<,>*,>,Sl/
.*QJQ,} [

Q  N`@[ Pp2tp+ZI . 
.

(L 9ZD,>,>,
 ` H(q

`ZL(q+Z`6Nk+ZS,>*,>,S\+ZU,>*,>,Sl/

L`,>,>,  
` J q

` L q,>,!o/_

[[,>,>,p/

w,>,>w,p/

+-0._*7Hw~+[<7Lw+[< w~(_+0H+[<

w~._+5N[< w*_,0J+[< w0_5P[< 
w~,_, LpO@p@2Np+Z}:p w~ h Pp (2Hp+[:p@@G 
w~

( LG7.=7_ _.: ZI,- H Zp 0
2Pp+[:p w~ 
  JG

  LG7.=7_ _.: ZI,- H Zp 0

2Pp+[:p 
w~ ( HG

( LG7.=7_ _.: ZI,- H Zp;@p+[< w0_ PpO@p@2Hp+[:p w 
h Jp ,2Lp+[%:p@@G w 8 PG7(=7_ _.: ZI,- H Zp *
2Jp+[-:p

w 0 NG 0 PG7(=7_ _.: ZI,- H Zp *

2Jp+[6:p w

8 LG 8 PG7(=7_ _.: ZI,- H Zp;@p+[< _! HQ 
p JS

p LT . NQ,|+[<@/_*+-0 w(_-0H,my,_-5L[A,my `ap+[E (h_S*@BJ`+[c `ah+[N[`4T[c,_ 0L+[L 0p_(_.h_.+[c0_.p_S(@BH`+[c*_ 0J+[[ .n_ 0p_.(_-0H+[Y[` 
=aj@+[c

X.,&,3,M+[cS:@+[c 
=aj@+[c

`+[V .n_S0@BP`0_-0P+[c[` =ah@+[c 
M2jX+[cS:GZ`@+-0

,> w[  
``j,my

w._0N+[}7(`+[p 
_! JQ@@S `&0 NT ( HQ,|+\ 
w

(3L>+[y,>>`Z!,PQ@@S ( HT , LQ,|+\,>
,`J+\6,`+\ `+\0!NQ@@S`PT(HQ,|+\7,`+\! NQ@@S `&0 PT ( HQ,|+\,>

+w*00J	+\[wXan+\,>,>,`]/*0 ,0J@

GaP+\)+\(._,1N+\(*_,0J+\)@+\+,>_,`]/_

+\H _1 HQ 
R0J+\/@@k+\0 . Nk w0_1 (0P@[
8 ,1J@

A0_ *1P@
AaH+\; ,QLQ . NM+\;@@M,O

Ml_- .n_- wQP`*_-0J+\G@

l_2 .n_-,>,[d/_

 ZpXZ` 
p(_20HXX( /_

+-0._3@@p w[w.w Hp2rp+]9 
H0J+\W H,>,\/_

68+\S +]<6Pp+\UXXpQXp+]8XX@XXp+]8@@p H `7N`+]
[0H+\\,>_+\k[

  P Np Np _3 PQ PM _1XHQ,O  *j_,QZP Zp

p .XN0QT0 p(_+0H+\k p,_41L+\m,>_,`]/_

+]<,p*0J+\r,> ,>L,>,`$/+]<,>,>p,S\/

aZ+\{QpZ0hQ0	,>,>,`]/ pXN

p L  NO LO aXP Z` 4P]QH@ p Na[

/,Q,>[.8,>,p/

 Zp5:] Zp7J`+],>p,

/_

 p+]<7J`+]1,>p,

/_

 p[8 pXT@XTp _4 HQ HM 
_1XJQ,O [

pXLPQTp .n_ pXPP[@ HpZ
@8
XJ@ ,QLQ Pp,} pQZ8QTh pXHh[
p Jp

pXL(`[,>,>,p/
XQJ86LX+].XZ8+]/XXH8[,>,>+]2[,>,>,p/
w.
w Jp2rp+^k

H0L+]t _1 PQ H X Hp@@k*_50J+]N._1N+]N[
 5J]NZ.GQ.	,>,>	,`]/H+]W,0L+]WZ(8Q(	,>,>	+^[ p 
 aj+][Z, Q,	,>,>_
+^[6LX+]` X[X4P]` *QJQ :+]`@ ZM,O  Mp_(6Hp+]eXVpQVp+]fXV XVp ,l_6,>H,Z/_

QZX5:]kZ`X+^l0_(0P+^j *BJX *j_([

X,>,[d/_

 ZpXZX p0_11P+^jXV8+^j@@p H X7PX+^#[
0J+]y,>_+^[.  ` Pp _3 HQ HM 
_1XJQ,O  ,l_-,QZ` Zp p 0XP8QX8 p7J +^,>_
+^ p @ Np Np*_10J+^,_41L+^

,>_+^

p0_1P+^,>_,`]/_

+^l:
 p H(p,>,M/_

aZ+^ pZ,hQ,	,>,>_+^[ ,QLQ,} Zp p .XN@Z`@ 
pXJ@ p H@ JO HO

aXL@Z`@4L^!QP0 
p Ja[/(Q,>,]=/_

 Zp5:^* Zp7LX+^),>p,

/_

 p+^l7LX+^e,>p,

/_

 p[@ pXX XXp 
_4 JQ JM

_1XLQ,O [pXN`QXp 0p_- pXH`[
  JpZ

XL  .QNQ Hp,} pQZ@QXh 
pXJh[

pLppXN0^X[,>,>,p/,&1L+^J/pZ(hQ(	,>+^Z pQV  P060P+^D,&0L+^H pQV 6PP+^R XZ +^^ P `,>
pZ

XL(7l+^c pZh,>,>,>_

,m/^>[,>,>,p/
pXJ@ZpXZp.2+]B pp_( p/_5+@	`_L_O_R_P<=hEt{_d_f_h_It_B_i=q_k	PGa_m_m?rwriP	@	F_q_rL	P	s_t(bB_u	L%}wUQz	:;$q80(0,0(@800  ((D(F0D08,@4@PPP8D8DP 0 D(@(0D`(` $@@(`0BP$@0(@@D@8X$@8X<(0@0 (``DP@`$   8`(@ 8HH0 X(Xas INTRINSIC or EXTERNALas dummy parameterin type statementin DATA statementin COMMONin EQUIVALENCEas an entry point namein NAMELISTas statement functionas COMMON blockas NAMELIST as an array or FUNCTIONas an arrayas a FUNCTIONas an identifierPBPBQwQvQwP@QtpCqv@qwPQw_7_<_:_7_>_@_A_B_E_F_I_Ka variable or arraya scalar variablean arraya subprogram nameDummy variable$&i4r[r_rghrDUMMYCOMMON variableVARIABLEin an I/O list-0.c w&L Jp Hw4H_|,>,_w/c:l p.:ZL/c+-0 w@ 8)6 8`XL85V`+-0 w 8)6XL5V`+ aH+`
7jA,`>A@,~ c HB *jc

c LL,>
,_/c M NL6PY+`,>c,bS/c+`@@Y[
O8
QJOR`O * JL[

O,>,_w/cZO4N` (HLZ
O,>,_w/c@HL:
O , LA,>c,bX/c,>c,bX/c@,~-0.cZw0(+`<:

V0(O@W ap+`=Z
wZ,,cUQ,	Z87Q8`Z6pQ6@@@p/(H/.N/0P 2 *= Jp2rp+`=

p2LHQ9`3 &. 
&*Z(8tQ( lc04P`;>V+`X9`3:

Vl

A .2Lw~@ ^ (0P@AaN+`L 
Q Jp , LQ 0QPQ,}  p HQZ5N`JQTXT+`L[

XT0QT+`L c 
wjcS,BLP

w~ LP w~ PP w} HP .3LA@ 
^ 01J@GaN+`X,>,aO/cO/c+-0,>w},>w~,>w~,>w,`$/c+-0,>w~,>w~,>S,>w,`$/c+-0,>w~,>w~,>S,>w,`$/c+-0

:V c *SjcS,BL`

w[0 N`0c<+@D`l+`t+`o+`p+`q+`r+`s@ c+`q7c c Z`+`t :l+`t :zc w[h,>,aO/c@+-0

6(w+`{ ,Ln"nw

w&, 4L`~,>,`x/c .(Hn@+-0.c w8cZ*dcUQ*A` Jp

c Ln@@p08+a c Zo+a	 c Pop 08+aJ+@da

+a	+aK+a+a+a++a2+a9+aF+aK:
pZ

w.
 (@  2&4.6)V|=2a c 2Nn=2a+a	 
p8
 JpZ

w.
 ( D.6V+a(04@+a'0T?+a" */Jn .Nn+a	04+a& ./Nn G: Zn+a	Tn+a	 qsZ4PQ4A`7X+a	Xn+a):
pZ

w.
 (Z48Q4A@ 2.0 0XXn=2a/+a	:
pZ

w.
Z4(Q4A@ 2.. 0XXn=2a5+a	 
p8
 JpZ

w.
7v(+a	 c7X+a?Xn+a= @  2&4.6)V|=2aA c 2

Ln=2aD+a	:pZ
w.,>h,`x/c+a	Xn+a	 *Jn ,Ln@Nn :o/c+-0

,>c,a/c  aH+a^ 
^1J+aW,>c,bX/c>A 06nA@ w *3Hc@
A`P,`>

A,>,bX/c*c,cH
aJ+ah ^ 00N@DP w ,3Hc@

AaP+ah,>c,Q/c
&`O@P@+-0

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

2xp

+b0p  Fp

O@p2Hp

+av:p2Jp

+a{:p 0F+ax 0Pp (2Hp

+b:p
w ,c;Z"8Q"A`

7F+bFp+a (2Hp

+b:p
w<
$*Z"(pQ"A@ $<$b

7F+b .(Hp+b (Hp $<$b7F+b

 .0Pp+b

 02Pp

+b:p$(Z" rQ"@` *-Jp $<$b

.,Lp+b 0Pp $<$b
.*Jp+b ..Np ,2Lp

+b(:p$0Z"@nQ"A@ $<$b'
7F+b'

.,Lp+b# ,Lp 02Pp

+b.:p
$c5Z"(Q"A`7F+b.Fp+b,;@p
&Z
(+(/c+-0

 :d@aZ+b<

D,>c ,>,b=/c+@+-0 waH@+b@,>c +bEaH+bB,>c +bEaH+bD,>c+bEaH+bG,>c!,>w~,aj/c@+-0

ZwZ
w~/$(,c!.c"/

&,.<78+bR u< Pu5pbQ,b6w~Nt=8bN@+-0

 u< Hu5hbV,b6

wLt@+-0(c"1H+b[ ,A`QLw

w7X+b` u< Pu5pb_,b6Xt+b[@+,>,bS/c,~-0

 :b@aZ+bi

B,>c,>,b=/c+@+ p< Hp5hbm,bcFo,~-0@+-0.c@/c+-0 =ah+bxah +bv,>w~,>c+by,>w~,>c+by,>w~,>c,>L,>w,`$/c+-0 =ah+cah +c,>w~,>c+c,>w~,>c+c,>w~,>c,>S,>w,`$/c+-0 =ah+cah +c	,>w~,>c+c

,>w~,>c+c

,>w~,>c,>A,>w,`$/c+@	`:BHBBc+lc#c&c(oHc-c.c(c&c#     <$@P $@`

0$@ %FTN?FTNHDH

<w~<w0w Extension to Fortran-77:  VMS incompatibility:  Fortran-77 and VMS: 


 Line:
BINARY OUTPUTASCII OUTPUTASCII INPUTc/c1c3OBJECTLISTINGSOURCEc7c9c: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 2c>cAcFcK@	`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  ignoredACB Argument out of range for CHAR, high order bits ignoredAIL Illegal length argument for ICHAR, first character usedRIM RETURN statement illegal in main programCCN CHARACTER constant used where numeric expression requiredHCN HOLLERITH constant used where numeric expression requiredFOO Statement function declared out of order or array not dimensionedAIS Extension to Fortran-77: Apostrophe in I/O specifierCAP Extension to Fortran-77: Consecutive arithmetic operatorsCCCCarriage control character CNS Extension to Fortran-77: Concantenation with variable of non-specific lengthCOS Extension to Fortran-77: Comment on statementCOV Extension to Fortran-77: Assigned variable appears in character expressionCSM Extension to Fortran-77: Comma field separator is missingDEB Extension to Fortran-77: DEBUG linesDFN VMS incompatibility: Default file name on VMS differs from Fortran-10/20DOW Extension to Fortran-77: DO WHILE statementDPE VMS incompatibility: Different precedence in exponentiationDWEDefault widths with edit descriptor DWL Extension to Fortran-77: DO without statement labelEDD Extension to Fortran-77: END DO statementEDS Extension to Fortran-77: DECODE statementEDS Extension to Fortran-77: ENCODE statementEDXFORMAT edit descriptor EOCExponential operator ^EXD Extension to Fortran-77: Transfer of control into DO loop at label FAR Extension to Fortran-77: Format in numeric arrayFIF Extension to Fortran-77:  is not an intrinsic function in Fortran-77FIN Extension to Fortran-77: FIND statementFMT VMS incompatibility: Keyword FMT instead of NMLFNG Extension to Fortran-77:  is not a generic function in Fortran-77HCP VMS incompatibility: Hollerith constant padded with spacesHCU Extension to Fortran-77: Hollerith constantINS VMS incompatibility: /NOCREF switchINS VMS incompatibility: /CREF switchINS VMS incompatibility: Default for VMS is /NOLISTKWUKeyword KWVKeyword value for LNE VMS incompatibility: Logical and numeric variables EQUIVALENCE-dLOL VMS incompatibility: List of labelsLSP Extension to Fortran-77:  length specifierMLNMixing logical and numericMSLMulti-statement lineNAM Extension to Fortran-77: NAMELIST statementNDPNo decimal places with edit descriptor NEC Extension to Fortran-77: Numeric expression in character contextNIB Extension to Fortran-77: Non-integer substring boundsNIG Extension to Fortran-77: Non-integer as index to computed GOTONIK Extension to Fortran-77: Non-integer used with NIS Extension to Fortran-77: Non-integer subscriptNIX Extension to Fortran-77: Non-integer as index to RETURNNLK Extension to Fortran-77: Use of NAMELISTNPC VMS incompatibility: Null padding before NPP Extension to Fortran-77: No parentheses around PARAMETER listNSCNon-standard character in column 1OCUOctal constantOIO Extension to Fortran-77:  statementOIO statementPWSPRINT (Specifiers) statementRLC Extension to Fortran-77: & used with return labelRLC$ used with return labelSBC Extension to Fortran-77: Substring bounds not constantSEP VMS incompatibility:  is same as program name or entry pointSMD Extension to Fortran-77: Single subscript with multi-dimensioned array ANS VMS incompatibility: ASSOCIATEVARIABLE not set by VMS on OPENSNN VMS incompatibility:  is same as NAMELIST nameSROSymbolic relational operator SVN VMS incompatibility:  is same as variable or function nameTLFTwo-branch logical IFVFS VMS incompatibility:  is a Fortran-supplied routine on VMSVGF VMS incompatibility:  is a generic function on VMSVIF VMS incompatibility:  is an intrinsic function on VMSVNG VMS incompatibility:  is not a generic function on VMSWDUWRITE with default unitXEN with external nameXOR Extension to Fortran-77: Logical .XOR. operatorRLXReturn label LNCNon-numeric operand in numeric contextNLCNon-logical operand in logical contextCIS Conflicting INCLUDE switchesINC Extension to Fortran-77: INCLUDE statementSOR Subscript out of range for array FNS Extension to Fortran-77:  is not a Fortran-77 subroutineVSD VMS incompatibility: Subroutine  may differVNS VMS incompatibility:  is not a VMS-supplied subroutineVNF VMS incompatibility:  is not an intrinsic function on VMSADS  Variable  already declared in SAVE statementOHC  Octal or hexadecimal constantIMN  IMPLICIT NONEMBD IMPLICIT NONE -  must be explicitly declaredLMA Length mismatch for argument  of statement function ASF Illegal argument  for statement function DIM Possible DO index modification inside loopIDN Opt - illegal DO nesting - optimization discontinuedPAV PARAMETER used as associate variableCNMCharacter and non-character variables FWE 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 ISN  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 range for array IID 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 path specificationNFS No file name specifiedCFF Cannot find fileINN INCLUDE statement nested too deeplyCSF 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  specifierIXS 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 Not yet implementedIFS Illegal format specifierIQN INQUIRE - neither UNIT nor FILE keywords were specifiedIQB INQUIRE - both UNIT and FILE keywords were specifiedNNA NAMELIST is not allowed in NNN NML= must specify a NAMELISTMST  must be ,> &n+mz,> &n

+mz,>,>
&nn
&n
&
&nS~ &@)Bl
"=fm
&nZ Fx,^,^,^7@x	`
&n+x L&"QDx6@,n[x."
",~SKERRCGERR?
? Internal compiler error processing statement 
? Call to  from 

Debugger execution:
@	`-0 w&(A 7Vdp+n# w(N.n% Nw2NX+n Zdp+7Vdp+n# 
X2Jw+n#Zdp+@+@	` APPP X((

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

88888888888888888888888888(@@@@@@@@@@@@@@@@@@@@@@@@@@PHHHCcW@T(J ASSIGNMENTSbTAk IFDD'STFN OR ARRAY ASSIGNMENTXcT?w DO]#T@A DOe$ END STATEMENT FUNCTIONRaTA4 IFRcTB

;a BLOCKDATA?P\-( READM\?r UNLOAD	E; FUNCTIONT@_ ENDDO\4 CLOSEM\/L ENDFILE4:} REALTB\ ENDIF\?a SKIP?@\-+ WRITE<>& EXTERNAL
%,;x COMMON4; CHARACTERJ@\-U ENCODE4; COMPLEXT*M CONTINUE:@T(g ASSIGNA@\-3 TYPET*f STOP;L PROGRAMAo?o@oBoCoEoGoHoJoKoMoOoPoRoSoUoWoXoZo[o]o_o`ocodofogoiokolonoooqosotovowoyozo|o}oppppppp
ppp > HQ 
A Jx

> Lx ? NR | Py@,~ Q H>,>qN,5/qS 
x JA

x8

 L> R N? y P|@@X@,~-0.qT w~<&(.( Hp0h+pf :+pf .:QZQ .XNQ,O Zp p 
pQJ@ w~ H@6Lw+pn :XZ@+po *!XJ@ 
pS0GP( /qT+-0.qSZw}@@  
w~

w}/

/,QL( w N( w~/w}<,> w}.:,>,p/qT@/qS+-0 aH +q,>	,>qT,,/qT 
qU JQ

	 LS,| [`4Vq
[X,>Z`,>,>L,>qO,`$/qU+q W(qV0H+q

`al+q,>	,>L,>qO,`$/qV+qS.GN` XM .nqW+q*,qW0L+q(qX*qXGaH+q:qX,>lr+,>	,>L,>qP,`$/qUS0GP` 0pqW XM+q* `ah+q#,>	,>L,>qP,`$/qV+qS*GJ` XMZ
`4Jq)

W 0an+q),>qQ,`]/qS ,lqW@+-0@@Y *6hT@
 ,1hO@

G
aJ+q2,>qQ,`]/qS@@T aN +q6,>T,>qY,,/qT T PS qU HQ,|

`al+q<,>S,>qR+qB 
W6qY .0V@DxaN+qE `ap+qD,>S,>qR,`]/qT+qLS(GH`+qL@@xZ(1P(g+qL,qX.qZG

aL+qK,>S,>qS+qBS*GJ` +@	`>M	0?J

BH0 $@0`0@&`$`$(,`H0unknownidentifierconstantlit stringlabelstatement endrelational op.NOT..AND..OR..EQV. or .XOR."**" or "^""&""("")"":" ",""$""-""/""+""*""=""//""'"q[q\q^q_q`qaqcqdqeqfqgqhqjqjqkqkqlqlqmqmqnqnqoqoqpEQVPE0OT8.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.HrHr
HrHrHrHq}HrHrHr FORMATn executable statementr(r)NONEW   NEWCASE NEWSTATENEWBIG  NEWSMALLILL     TAB     LT      BLANK   SPEC    DIGIT   UPPER   LOWER   FOS     EOB     REMARK  ANDSGN  LPAREN  RPAREN  COLON   COMMA   DOLLAR  MINUS   SLASH   PLUS    ASTERISKEQUAL   LTSGN   GTSGN   NEQSGN  DOT     SEMICOL LITSGN  OCTSGN  COMNTSGNDEBUGSGNUPAROW  ACTEOB     ACTINIT    ACTANY     ACTTAB     ACTSTSKIP  ACTREMEND  ACTGOBAKNOWACTLT      ACTSTMNTFOSACTGOBAKNXTACTEXPLT   ACTRETNOW  ACTCONTLT  ACTCALCONT ACTCONTDIG ACTCLABSKP ACTNOEND   ACTSTEOP   ACTENTREMARACTMULTST  ACTCLASF1  ACTMULTNULLACTILLCHAR ACTCOMNT   ACTDEBUG   ACTCOMNTFOSACTINTERR  ACTNOCONT  ACTNULLFOS ACTCITCONT ACTCALCLT  ACTENTCLABSACTCBUGCHK ACTENTLAB  ACTILABILL ACTILABEDCKACTILITCONTACTILABDIG ACTILNTC   ACTILNTI   ACTILNTD   ACTILITNC  ACTILITC   ACTILABLT  ACTUPLOW   ACTCONSTSKPACTSKNAME  ACTSKLPARENACTSKRPARENACTSKCOMMA ACTGETLIT  ACTENDLIT  ACTBAKTOTERACTSKCONBLDACTSKPHOLX ACTSKPHOL  ACTHOLTAB  ACTENTERM  ACTUNMATEOSACTSKILL   ACTCLASLT  ACTCLASUNREACTCLILLCHAACTCLASBACKACTCOMPAR  ACTCLASAL1 ACTASGNMNT ACTCLASF2  ACTIFCHK   ACTDOCHK   ACTARITHIF ACTLOGICIF ACTDOCHK1  ACTDOSTMNT ACTENDCHK  ACTCLASF3  ACTCLASF4  ACTKEYTERM ACTUNMATKEYACTSPELLINGACTBADCHAR ACTTHENCHK ACTBLOCKIF ACTSUBCHK  ACTSUBASSIGACTCLAS1A  ACTSKCOLON ACTKEYSUB  ACTDOCHK2  ACTWHILECHKACTCONTBLANACTLTENDCHKACTENDLTCHKACTENDLSNACTEOB     ACTANY     ACTTAB     ACTHOLCONDOACTFMTHOLPKACTHOLCON  ACTREMEND  ACTGOBAKNOWACTLT      ACTFMTHOLCKACTGOBAKNXTACTEXPLT   ACTLEXFOS  ACTRETNOW  ACTCONTLT  ACTCALCONT ACTCONTDIG ACTCLABSKP ACTENTREMARACTMULTST  ACTINTERR  ACTNOCONT  ACTCITCONT ACTCALCLT  ACTENTCLABSACTCBUGCHK ACTUPLOW   ACTCONSTSKPACTSKNAME  ACTSKLPARENACTSKRPARENACTSKCOMMA ACTGETLIT  ACTENDLIT  ACTBAKTOTERACTSKCONBLDACTSKPHOLX ACTSKPHOL  ACTHOLTAB  ACTENTERM  ACTUNMATEOSACTFMTQT1  ACTSKILL   ACTCLASLT  ACTBADCHAR ACTSINGLEX ACTDOUBLEX ACTNOTDOUB ACTMAYBDOUBACTENTIDENTACTPKUPID  ACTENDID   ACTENTDOT  ACTTRYREAL ACTMISOPER ACTGETOPER ACTOPCHK   ACTMISOP1  ACTENTGETCOACTGOTINT  ACTCHECKLETACTBILDDBLIACTREALCON ACTENTRLBLDACTGOTREAL ACTEXDBCHK ACTGOTOP   ACTCHKPLMI ACTNOEXP   ACTINTEXP1 ACTFMTQT   ACTGOTIEXP ACTHOLCHAR ACTHOLEND  ACTENTLITLEACTLITEDCHKACTTIC2CHK ACTENTOCTQ ACTNOOCT   ACTCHKOCPM ACTOCTQ1   ACTGOTOCT  ACTNOTIC   ACTSCANCHARACTSTRCHK  ACTSTOPLIT ACTFLEX1   ACTFMTEOS  ACTFMTCHAR ACTRIS     ACTSTOPINT ACTGOT6INT ACT6DIGIT  ACTSKCOLON ACTKEYCHK  ACTKEY1CHK ACTCONTBLANSTSTMNT   STILINE   STSKIP    STCONTINUESTNOEND   STEOP     STTERM    STCLASF2  STCLASAL1 STIFCHK   STDOCHK1  STDOCHK2  STCLASAL2 STCLASAL2ASTCLASF4  STCLASAL1ASTCLASAL1BSTLEXEME  STSKIP    STCONTINUESTTERM    STDOUBLEX STGETCONSTSTFMTLEX  STREMARK	STINIT	STRETNX	STNULLST	STCOMNT	STCALCONT	STCLABSKP	STCNTCONT	STCITCONT	STILABEL	STLABSKP	STILNTCONT	STILITCONT	STGETLIT	STSKNAME	STCONSTSKP	STSKPHOL	STCLASF3	STSPELLING	STIFCLASIF	STTHENCHK	STDOCHK3	STCONTBLANKSTENDLSNSTREMARK	STRETNX	STCALCONT	STCLABSKP	STCNTCONT	STCITCONT	STGETLIT	STSKNAME	STCONSTSKP	STSKPHOL	STIDENT	STDOT	STSCANOP	STBLDDBLINTSTREALCON	STREALCON1	STOPCHK	STINTEXPONESTINTEXP0	STINTEXP1	STHOLEX	STLITLEX	STLITEND	STOCTQ	STOCTQ0	STOCTQ1	STCSCAN	STSSCAN	STOPOBJ	STFMTQT	STFHOLCON	STFHOLPKUP	STSIXDIGIT	STKEYSCAN	STKEY1CHK	STCONTBLANK push - nextstate 	return to  pop - STATE endofilenot endofilefalseunknown returned
  CHAR   CODE   ACTION   STATE -0.} > *1H$@
,}D
 QGPA
aJ+w' `P+w,>},Q/}@@QZ HpZ

p4Lw' 
p (`p+w%:},>lcU,>,a/}  aH
&X pS.GNh p h+w A PS@@P > HO PL

> LN ? NO@@	@@k H{@@|@@|,wF:
e@/}+-0.} > HpZ*pQ*	,>,5/} ,0F@

 .0F@G

aL+w;>+w5[n&1B+wD@hp`p 
>2Jp+w<1B+wD Q Pp,>A,>||,`Y/} p ZQ /}+6H|+wH :~ Z|+wI ,.l|

| L}R`0 AQN0 ? P0@@0 ( H~0L+wS,	m 
|0J+wS,>|},`]/}@,~Z>5HwZ ,$ L> |} N>0> Ph,>|~,we/},~

?`L+w\ . NA .A Nh ? Po >3Ho+wa ,Lo+w^o0o0P+wd
?

> :,~-0@@~ h w6H`+wi[n&+wjZn&

AxLS$+@wl+wk+x+x6+z+xE+xF+xS+xZ+x[+xn+xu+xy+x|+x~+y+y+y+y+y&+y0+yJ+yM+yb+yf+yl+y~+z$+z+z+z+z%+z&+z.+z/+z4+z5+z<+z>+z?+zE+zK+zN+zR+zU+z]+zc+ze+zh+zi+zj+zp+zr+zt+zv+zx+zz+{+{+{+{+{+{+{$+{'+{.+{=+{I+{J+{N+{Q+{\+{a+{b+{c+{f+{h+{l+{o+{u+{x+{~+|+|	+|+|+|+|+| +|"+|%+|)+|8+|9+|I+|d@5Fx>7F+x6J`+|O+|70F

5@
j>

=Q,A` L>> 6P`+x'[n&+wkZn&+wkZ>3H=+x+ "+wk,> 1F@+x00F@+x/ S PP6P`+|O+|7,
D,M 0F@+x/,>j,>|~,	T/} +x/1B+{E0F+x9>>+|u > 
 aJ+x=,>|,=/} ZA+xA

`L+x@ . NA,>|,5/} ,A Lh .$ N> > P?+|q".An>+{; PHQ (7Pk@GaN+xP4PxN,>L,>|,`$/}@@k+xP,>},>L,>},`$/} 
~

} L(y:~+{H0F+xX>[n&1B+xW,w10Z+|M : Zi>~ @y+wk>~ 8y+x/0F+x`>[n&1B+xd,w11Z+xd+|M iaP+xc@@i+xd ( HN | > H@@@~,>,/} 
|

(`L J| .$ N> > H? ~ X@y:
~ }+|u1F@+{D,w >1P$+xt 
| ,GL( J| }+|u }+|s7Nj,~Q | *GJ  H|>
~ (y+zn7Nj+x{ $+wk $+wk Fh j+,~@`Z+za | > P8 (BH8@@~ ($ H> P?+xm A NP > @aH+y,>|,=/} ZA 
> J?>+y

:
AZn&,wF 
? JR

| Ly } .~ No 8`P+wk+z-1F+z-7Pj,~Q 
| ,GL( J| ,! L>>~ 8y+{; >0N!+|u }+|u0F@+y $+wk N P> O H> 
L JA1H$+y$ O2N?+y$,>},/}@@P O N?+y/0F@+y, >00#+{D,>|,5/},>},/}+{D >1P$+y/,>},/},w+|q.}4NyH (0F@*}AaH+y:

>0L#+y8 | 0+y9 | 0p} +yH ,1F!@

 .1F@A

 01F@A

aL+yH 
=aj +yFaj+yD | (+yE | (h} +yH | .n}  ~ X y:
~ }+|u.}4Nyc,>},b{/}+yc2X}+yP 0 Pn+yP@@n (6P	@ ,7Jk@

AaH+yW,>L,>},`$/}@@W . Nj@@k FQ@@l > PQ,>},5/} 
A Jx

>8

 Lx ? HR | Ny }+|s0F+yd &A "+wk 0 Pk $+wk,>,>A,>},`$/} .n> ~ } H@y:
~+|.}4Ny{ (0F@*}AaH+ys,>},>}	,`a/}+y{ ,1F!@

 .1F@A

 01F@A

aL+y{,>}	,b{/} ~ 
}	 J y:

~+yI =an +z,>}
,`a/} aP+y{ }
+|u,>},>L,>},`$/}6N`+|s+|u | 0BP87P|+z P|[
@ JS JP3P}+z ..n| | N} Ny 8 HR H> H?[
8 JA+z 
y J|

R L> *$ J>0F@ &A "6T|+z 4~ 0GPP.42t}+zq (GHP+z 07N	@ *7Hk@
GaP+z$,>}

,>L,>}

,`$/} $+wk,}F ? HR 
|wJy},~ Loz0aN+z-}$+wk$yH+z. }
+wk1F+zF@@	@@k,>,>A,>},`$/} 0p> }+|7 >0N!+|u }+|u }+|u . Nk 	$0./0 P	 >1H!+z=+|u0F+zG $	+wk | (GH@ P|,>A,>},`Y/}+xs | 0GP8 N|+z` | 0GP8 N|1F+xs $+wk | 0GP8 N| 0  P>+z` | 0GP8 N| }1F+z\,>A,>},`Y/} (! H>+|u ( +z[,~@`Z+za | 0BP8 }+wk `0N+wk+|O/&6N`+|O+|7 } /. Nn+|u[n& }+wk:m+|s>nm+|s>~  y5.zn6L`+wk+|76L`+|s+|u6Nm+|s>~  y+wk . Nz }+|u0F+|u@@z+|(Zn& }+wk n$..+zf }1F,+|s 00F$@ *7hn@
AaP+wk }+|u?Nn+|(+|u".An> "+wk ~ X8y:~ }@@m+wk 07Nk@ *7Hm@
AaP+{,>L,>},`$/}@@k>

~ 0y+wk kaN+|s0B+{,>L,>},`$/}+{,>,>A,>},`$/} (h>@@k+|s1F+|:6Pj+{6JX+{ | NX 
|

(`L J| | > P8@@~ ($ H> P? 
~ X(y+|c . Nk6Pn+{) }+| . Nk7Pn+{+ } : Zj+| ~ 
} J y:

~ }+| Q N> x PA x H> 
R J? ,~ L|@@| y3.|+{9 | 
 `J H| ,.l|+{4 y N| N}@@m@@j6P`+|s+|uo3T+|u4T|q W0HoU+{A@@W+{},>L,>},`$/}7Ln+{F Fh :+ ~ } H@y:
~ }+wk }+wk W1NoU+|= (o, HW } *Jjj+| Q(N. NQ }+|u Q 00N$c@ (0F@AaP+{[ 
~

} L(y:~ } ( Hm } Pq+|s }+|O Q0N"'+{` Fm (o` HW }+|s $%+wk .o.+{g .o8+{g@@m ~ } P8y:~+|( .o2 NW+|= Q2N}!+{k (o4 HW+|= $+wk Q(N. NQ }+|s Q(N. NQ,>,n/} ZW4Z{t }+|s }+|s . Nm ~ }+|' 07Nm@DzaP+{| $+wk2X}+|= $!+wk WZ08Q0Q` Po }+|6NX,

',>,>A,>},`$/} (h>S* Jj

~ } N0y:~ }+|s }q3F+|u 00T@ (0FA@ *0F@
GAaP+| $)+wk $#+wk .o9+{g7Nl+| :o: ZW+| (o/ HW (Jhj+| .o: NW 0Jpj } $+wk . Nm ~ }+|' m0N+|s:l+|s . Nm ~ }+|' . Nm ~ } H@y:
~ }+|s .0FA@ 00F@GaN+|5 m *0H+@
 ,1(@

 00h@A

G
aJ+|5 .o3+{g }6H`+|O[n&+wk }+|u0F+|;>+wk Q2P}!+|> *o4 JW $'+wk6Jj+|A6NX+|A | HX | 8`P N| | 
> J @@~ ,$ L> J? ~ X8y:~+xm0F+|P>[n&1B+|S,w11Z+|S 
`0J+wkZn&+wk iaP+|R@@i+|S ( HN | @`H P| 
|

> L(@@~,>,/} W0No4+|] o5R|] }+|u |

 `L H| 
| > N(@@~ 0$ P> N? ~ X y:

~+xm A NP > @aH+|k,>|,=/} ZA 
> J?+|n:
A,>|,5/}

> L?,wF *$ J{ J> &A " Fh :J+7N>+|u>>>+|O6J>+|y3X}+|y ~ X@y:~6}>>>+|7+@	`X:
$$

}"k>6~76$

}F$$

}($

}"$$

}F$

}F$

}(<=>=6$

}"$

}:JQ$

}V/c#S6$

}($$

}.~7~,6$

}.$

}(+$

}.$

}.6$

}4R$

}4$

}4$$

}4$

}V6$

}:3$

}"$

}F96$

}g$$

}:$$

}gH~$

}g$

}g$

}w6$

}w$$

}w$

}:6$

}@$

}w6$

~$$

}@$

}@$

}@D$@(

@"g"@@ @@
@
@
@a@$	@h6@h6bh6B(FbFbFbXVBF

 
`P
 
#h
@
 
 
 0


c$	
b`XCi6.`4.`.@4.%H6.%H6.%H6.H6.%H6.A$.v

PPPPPZ P\!P\

P$	PP^*P`Q,PbPPPPPP!PPPPP&PdPP\!P\!PCp|``x@#iD0EB`#i'A$	#i%!0#q#i#h$#i#i#i#i#iE#i#i#i#i#i	#i#iD8D8#iCp|`a6@dxzDyDyDxXdqA$	dxz%9**CpzdxzdxzdxzdxzdxzdxzdxzE)dxzdxzdxzdxzdx&	dxzdxzDyDydxz@`@```````````````````````````6$

}F6$

}V$$

}V$

}:STSKIPLEXICALNULLTHEN-0./ > HpZ*pQ*	,>,5/0 ,0F@

 .0F@G

aL+~*>+~$[n&1B+~3@hp`p 
>2Jp+~+1B+~3 Q Pp,>A,>,`Y// p ZQ //+0F+~? 
> JR J?

| Ly . NY aP+~>6Hj+~>,>0,bS/0,` :,~@,~0F+~F>[n&1B+~E,~ 1Z+~E :,~ : Zi@,~ (.h|1(+~L,>,>L,>,`$/1

| 0 N> NR N? Ly[0 PA@,~7H|+~b

> L Ho o 01.~@*1DaP+~Y",.lo+~S (.ho |3no+~^,>o,/0 :.zo+~Z  P>

| 0 H?[0 ZA@,~-0@@w h w6H`+~g[n&+~gZn&

A LS$+@~j+~i++Z+4+6+:+D+K+T+V+++
+++%+1+8+:+T+W+[+f+g+k+l+q+s+v+w+x+~+++++++++++'+1+M+U+a+b+n+++ +3+4+:+A+F+a+k+p+++#+%+)+,+3+6+;+?+C+G+J+M+V+^+f+s+v+}++
++<+,+:+<+A+I+M+T+[+\+c+e+q+|@5F>7F+6J`+r+|0F

5@
j>

=Q,A` L>> 6P`+&[n&+~iZn&+~iZ>3H=+* "+~h,> 1F@+.0F@+U S PP+U,
D,M 0F@+U,>j,>,	T// +U".An>6P`+}+1F$+9 FhZHI+  $+~i0B+= FhZHT+FAZA2PA+@,>,G/06Jn+CZHT Nj 	+>n+ n$../. NnFAZA2PA+,>,G/0+0F+R>[n&1B+Q,~ 1Z+Q 
`0J+~h+r : Zi>w @r+~h>w 8r6P`+r+|7N}+r3N|+r 
|3J|+i,>|,/0,~G |.2(2GaN+Z 
|

(aL+b 0$ P>+@"0.p|[@ HA .$ N> 
> J?

w X0r:w 	+,>|,/0,~G | @aN+n ($ H>+@ ($ H> 
w X(r:

w 
+0F+x>[n&1B+|,~ 1Z+| `0N+~h+r 
iaJ+{@@i+| , LN 
|

> L(,>,/0 .$ N> > P? w X r:

w+h 
@@n $+~i,~Q | 0GP8 N|>w @r6H`+}+7Nj+

 $+~i $+~i.> 01N@ (0FA@ *0F@@
GAaP+

P LS+ Fh j+7N}+3N|+,~G *$ J>+h,~@`Z+# iaH+@@i+  * JN 
|

> L( .$ N> L?+h `0H+~h+r A NP > @aH+,,>,=/0 ZA 
> J?>+-:
AZn&,wF 
? JR

| Ly 
+~h1F+7,~Q | (GH@ P| (! H>>
w (r+} $
+~i >0N!+ +.

4NR (0F@*

AaH+D

>0L#+B | 0+C | 0p3+R ,1F!@

 .1F@A

 01F@A

aL+R 
=aj +Paj+N | (+O | (h3+R | .n3 w X r:
w

4N@,>0+@,>,>L,>,`$/16N`+}+7N|+b N|[8 HS HP3N}+`,~G+c

R L>+c R H> ($ H>0F@ &A "+ +,>,>L,>,`$/1 .$ N>+@ + =an +o | (h4 aP+R+k/&7N`+|Zn&+~h  /. Nn+[n& +~h:m+}>nm+}>w  r5.}6L`+~h[n&+~h6L`+}+6Nm+}>w  r+~h . Nz +0F+@@z+Zn& +~h n$..+t 1F,+} 00F$@ *7hn@
AaP+~h +>Nn+ +}".An> "+~h w X8r:w @@m+~h 07Nk@ *7Hm@
AaP+,>L,>,`$//@@k>

w 0r+~h0B+",>,`]/0+GFAZA2PA+%,>,G/00F+Z

HT+x kaN+}0B+,,>L,>,`$//+0,>,>A,>,`$/1 (h>@@k+}7N}+D | 
> J 3H+D3H|+<,~G 
|.4,5GaN+5 |  aP+o *$ J>+@,~G 
| (aN+B ,$ L>0F@ &A "+~h

w X0r:w+q0F+F>+~h6Jj+I6NX+I | HX .$ N> > P? w X r:
w+h6NX,

',>,>A,>,`$/1 (h>S* Jj

w 	 N0r:w+@ 0t+WS+_0T

+\(

4H[,>,>,b{// 5+_(

4H_,>,b{/0S:  Tj+B Bj +} j0t+eS+m0T+j(

4Hi,>,>,b{// 6+m(

4Hm,>,>,b{// 6 +} $ j/.	+@=q+`+t+~i+v+x++@0F+~iS4+`0F+~iS4+` /0	+@Ez+`+~i+~i+~i+~++@+~i(

4H,>,>,b{// 7+`(

4H
,>+	(

4H,>+0F+~i(

4H
,>,>,b{// 7+`0F+~i(

4H,>,>,b{// 8+` /. (Z8 PQ0P+ 
8 J] * Jp

/, Lq +?.p+ q(T.4p Tq+ p2H8+,>q,>,`a//+7np+#$. q(Z8 ZS+$ q HS qZ HQ,|  
Q0J+*6NP+* ] HP.95N-(95H-,>,[=/0 Pah@+2,>:Z
,>,Sl//7Q4+} +@@SO@R@@z@@{ q[ NQ 0
 PQ w 
 J r:

w+(,>,>,>,`]/1S. Nj w 	 H@r:
w +} .0F,@ Np  qz Pq5P $+~iq3T+ 00T@ (0F@AaP+Y 
q62(+S q[ NQ ( HQ@@S 8 PT,| Q2+X.

ApaN+X,>,`a/0 q h Rj+B *.jq .6L(@ (0T@GaN+_ $+~i0q +F q7P8+c:
q+aZq8,>,>,>,`]/1

w 	 P0r:w S( Hj+}@@S@@R@@z@@{ q[ NQ w  H@r:
w+( 07Nz@(GaP+v,> ,`]/0 q[ ZQ 
{ JT@@S7LY+{,q+ Q4+} ( HQ,| Q4 Fh +3X+6PY+50F$+6L{+,> ,`]/0,>{,>:,p`//XZj 0QPj jZ* Q*A` Jq

{&,/."Nn2N;+@@n+ =ah+,>!,`a/0 !+@@r0F"+ (

 HQ "+0F"+ *
 JQ+2X+5+Iz A;5N! R.hS)zz@@z 
/* J{zz+6HR+:S+ .
 NQ "+O@R w  P8r:w #+~h,| z NS { PT+@@r0F"+/ 0

 PQ+0F"+1,pR #+,>,5/0;>,pX & "

' $0F+9O@r+1F+ $"+~i6NX,

',>$,`]/0 q[ HQ+I6NX,

' /( Hn %+FAZA2NA+F,>,G/0 %+6Nr"hn n.hS $ +~i6N{+L $$+~i>{+t =an +P,>&,`a/0 n.p{7H{+T ,Lq>{+QZq@@8+[@@l,><,><,p`//XZj .QNj jZ(@Q(A` HqA0.0	 Pn &+ZnZq2N+c *QJQ,} ,.ln0F+e '+Fq:

l+0F+iFq:l+]6Pl+k,>',`]/0*(1J+n .Nq+kZq,>Zj,>Z
n,>,>l,pr/=+[@@z@@{@@r@@l (+,>),>,>,`]/1 w 	 P8r:w S* Jj+~h )1F+81F+ $'+~i * z {1&+,>*,>,>,`]/1 &:l)R ./(  Rz T{+.

4N+,b{/0 l1h

+,>+,>,,>,`]/17Lr+O/pz {"H{3H::z l0p+ :+ : ZQ 
z JS

{ LT q[ NQ Fh,|.=+,>,`]/0 FhS:+ Z0N+$0B+( Fj+B0N+&0B+(+#2N+( ,+x0FA+z*>1J+z P NS+z7NZ+4 Nq@@Zq3F+30FA+z,>1L+z++,pR+q3F+5T86LX,

' Fh :+,pX>>

>+z0F+z $%+~iFAZA2NA+@,>,G/0Z

HF Hj+B.> 01N@ (0FA@AaP+G 
P JS FhZHJ+FAZA2NA+L,>,G/0[H&+@Z> 03N=@ (0F?@AaP+S $+~i $
+~i,>>,>:,p`//XZj .QNj jZ(@Q(A` Hq@@n $.+~i 	+~h , $. n0N+a,>-,>-,>,`]/1Fq:n+ m0N+}:l+}0B+m@0r+i@@HS9g 0 PU . HqFq,pR .+0FA+z(>1H+z

P LS+z0B+u U8 PU0p	+Fq+0F+y6HX,

SLj+B,pX>>>Fh@+/+7N>+>>>+r6J>+3X

@ ((000000DP@P}|(  h
 @@  h
 h
 h
 h
@h
!	!(F@pA(BA(A(!(A	b(XB0`X"(B(fb(d	(dB(4
9@84A$	`X@
`@ d#$)
D!#D!#!#A$	Y	B1@YY'Y(Y'Y'%'Y	a&*@(@( (E	&*&*E	&*E4
"H"H4"HH$q>
@0XV 0eq>
q>
eq>
aP4
eq>
A$	P*,@0*B8*

"8*B84@* $	 *"8*"P* *. * $ *@$ *@$@*@*@* *

"8$

"82 *a,@(@( (cY,a ca0aP4cY.A(cY,cY,cY,cY,cY,cY,cY,

Y,cY,

Y,

Y,

Y,

Y,cY,cq,a&cY

cY,ca0ca0cY,6$LCALCLT#<>===<=><=>=DOTTED OPERATOROCTAL DIGITOCTAL DIGITa maximum of 24too many digits6-digit numberlarger number-0 w*

@,

A.
 0Z+< 0p

@Z

XL +<z

@@+-0.

A@ w *A`QJ  6

w0/.  008@ (1x@GaP+K3X

B+J,>A,>

7,`Y/

B@ 
$*.
 =6A Zp

w0 0X?+YZ>2P=+Y,> 0X@+Y,
D,M 0X@+Y,>

C,>

C,	T/

B 1X+} 
w

( 0 (2N

C@ *6Pp@
AaH+|

w 08XN0 0A`QP0 * JY(

DDjaH+h,>

D,bS/

A,` w

86P0+l 88XH8+h w

@0L?+vZ>2N=+v,> 0X@+v,
D,M 0X@+v,>

C,>

C,	T/

B  w (A`QH8 8

@aL+},>,=/

A+~,>w,5/

A7p@/

A+-0,>

8 HL *JL7Xz+,>,_/

AR{4X 0PL,>,_/

A .NL,>

E,`/

A,>

E,`/

A /@ 0 PL(6)6,>,_w/

A@)64X 
.* JL[4X .NL,>,_w/

A 0PL@S)64X 0PL,>,_w/

A60=+,>

F,`/

=al+",>

F,`/

A =ah+%,>

G+',>

G,`/

A,>

H,`/

A 
aJ++,>

H,`/

A an+.,>

I,`/

A aP +1,>

I,`/

al+4,>

J,`/

A aH+7,>

J,`/

A 
aJ+:,>

K,`/

A aN+=,>

K,`/

A aP+@,>

L,`/

al+C,>

L,`/

A =ah@+F,>

M,`/

A 
A

M4JY,>

N,`/

A ap+K ,!LL

aL+N (*HL aH+P *&JL 
aJ+S ."NL aN+U 0$PL ap@+X , LL ,LL 0PL , LL	v &(8
 ,>,_w/

A &.

&, =

X,>,`/

A &(.(  ,>,_w/

A 0PL	v

N ,>,_w/

A *JL &

N  &0j0 08+q ,LL,>,_w/

A,>

O,`/

A ,LL L HM,^+-0.

A aH+{ =.:+| :S
.*	 Jp ,p.

O 	x6+aX + `N@+, `P+ (  H(OF@4Z,w0Z@+l V(+

4.

2,(+,>P,>

8,>

9,`$/

P V(,+l :@+aX+,>

C+aX+,>

P+aX+,>

Q+aX@+,>

Q,>

Q,aj/

B :/

A+-0Z>Z
=3H+",>

9,>L,>

:,`$/

P aN+% =.:+% :<$:ZhoZ@Z=.  *p<
3v+- . N; :@+ aN+0 =.:+0 :<$:Zho8 SZ
=. *8_", LX V=@@;.>7@+@,~-0.

A@/

A+@,~-0

A aH+A :@+L6J;+K aN+E =.:+F :S.0 Pp (p.

O 	x6+J+K,w0Z@,/

A+,,~-0ZO H@@? *

:"
Z, .

:n

R.*j

R05PU=b *0n@
Z

O0

S (0P@A
.

:"Z00(

:h

S..n

T, (0L@A
`J=b.

:0N+h18
+h7J`=b0

T0P+h X . N?+h@@? aP+k =.:+l :<$:ZhoZ=Z
 / 2x+q@@M+x /QPMQPQ,}XZMXM QZ
M[M.
 *6g 0
".pZ=/"P="
.j>".nO"

.lN".z?+-0,>,> (	t,,^,^+@,~-0.

BZ=0H
+	)

aL+	 ( Np6P P( 
=.*S

., Lp .p.

O 	t6+	+	,w1Z@+	S6P+	 p Z+	! 
p J(+	! ( NF+	,w1Z@+	S 4.20(+	,>P,>

;,>

9,`$/

P 
4.
 J(,	@@@@> 6
 aN+	% =.:+	% :<$:ZhoZ@.(
 H=+	;@@7LM+	2A,S.0
 [M.(
 *8_[M<,>,>,p/

B+	; 6
 aP+	5 =.:+	6 :<$:ZhoZ=Z
 /".:
 Z7,@@

aL+	? =.:+	? :<$:Zho.8Q aP+	E =.:+	F :<$:ZhoZ
Z

 .
Z/
 *8_"0 PXZ=3V+	P,>

;,>L,>

<,`$/

P,wT0Z+	R :@+	S :/

B+-07Hw~+	Z,	g0Z@+6Nz+	Y :/+@@z :A+

w7N0+	^,>P,>

<,`$/

B w@@  *$ JO ? NN NO,
D

? L,M0Z@+,>

=,>

9,`]/

B@@;+-0

,	m,> 0X@+	l,
D,M  +-0.

B > Hp *
 JZ,/Q,` L . N 0~ P  ``H@+	z ` 4# 
{ Jp34p+	z ,L=	w28}+
,>,/

`aL+	,>,
/

A.8+	z  N},>,
/

A@@ 0

U1P+
@
J+
Z .6LX@ 016
@AaN+

=
8 =/ H/p"H> V= 
=", L( | @ N?[@ HA 
y

( LRZR y 8 PRA0.Q/ PQ@/

B+-0.

A w6V +

=Z67Q6` Vp

w 0ZZ2N+
%Z
8
 J@@+
/ 
A

U5J
(8Q+
(Q XZ[/ PZ
.

 L*8X  
w

( L( 3V+
4@P+
2 .p H 
w6L( H(  |3Pw X|

|3Lw X| y3Nw Xy y3Hw Xy 
X3Jw XX .0 P  wQ*8_@/

A+-0.

BZO(

:0H< .6L`@ 01x
@A`N+
G0x
+
N :@+
x 
/*
 J

> Lp A Pp 6~ZX3x+
V,>,/

A.6+
R 4~ 
/
 J

Q2v}+
^".nX7HX+
]"

.lX.6+
Y

=/

.,
 S.0
 *8_/*4_7N|+
e"
.j|7J|+
g".p|7PX+
i".hX".h}"
.jy"

.ly p PA".nO p/ H>"
.j?"

.lN".pQ".nR".hR"
.j"

.l="0 P0@/

B+-0

,>.

P Bp Dp Fp w 8&" $)$|=8
} F@ p p p@/

P,^+-0

Z4H ,

V,>4cU,>,a/

B  aN+

7pA,`>

A,>,bX/

A *

VB
w`J
&`Z

 0 H,>

Q,>,p/

B+O+-0.

A7Hw+

 `L@+O w 0@GP8[8 PA 
8 J? 8 H>@@p

PG

QaL+% `n+%`N+% `P+$,>

C,Q/

A ( Hp aN+H7pA,`,>A,
y/

A,>

=,bX/

A*>0J+->A+;.>0N+1O@A : ZY+;(>0H+6 A&6

A/

 LA+;>

A,>?,>>,bH/

B,>

W,bS/

A,>

W+D NaN+F,>

>,5/

A >3P?+A,>?,>,bH/

B`>,>

W,bS/

A:>,>,bS/

A+H,>?,>>,bH/

B@@QZ4PK,>p,/

AO@P7Jw+O.

X4NO,>,`e/

A@@N@/

A+-0.

B P`H+X 
L J ,~ L 0 N O P : ZP 
>3J+

> N 01 Pp 1H$+d"

.,#76+a .N=6_".0$".pp :$ Z76p+

  .18@ 00x@AaN+

(1H+m ,L ,L@P `N+r,>,
y/

A
&@@@
&

> H 
 J

  01X@ .1X@AaP+u  
 aJ+,>

?,=/

A Z+

,>

?,5/

 Lp > 02N@ (2L@GaP+d+

4X

	X 
2J>+

7Pw+

 p H+

=6e `H+

,>,
y/

A
&@ : Z@
J
&

> Z+d 06Lw@

> (3N@AaP+

! 
`J+

,>,
y/

A
&@ ,L .N@H
&+

% 
aJ+

%,>

?,>L,>

@,`$/

P@/

B+-0

P A Hp 
> Jp

? Lp X28|+

0 ``P@+

/,>,/

A.8+

+@@X p HA 
p J>

p L?@/

P+@,~@	`\:B

_7

`7<O

f7

g@>H

j7< 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@

(-Jan--Feb--Mar--Apr--May--Jun--Jul--Aug--Sep--Oct--Nov--Dec-INSTATTRANSFRINGSINPUTEOPRESEOPRESTOREOVERFLOW, LINE TOO LONGBACKTYPE+

l-0.r =`h,
aJ +

r,>s,,/s .6LN@ (7PV@G 
b ,1J@

GaN+Q8A`S(H Hp b 4
.*J=4

},.7LV@6(7PV@GaN+
tuPptvHpp.u Zp+
XJlS,GL<Z,pQ,a`LL,>V,Zw/s@PLZ0p,>,U/s V0H+
aJ+/sZ,p,>,U/s/aP+.r/(@HL,>g,U/s7jU+s,>h,U/s,>i,U/s@	v 
/
0  Xp V0,>,/s,>i,U/s	v

0V058/s,>j,U/s[(/\"4v

LLZ.p,>+,U/s@@\,>k,U/s,>e,#/s,>l,U/s 
e$*j0$*2&
p  &.2,>,#/s &(2 ,>l,U/s

.,&,7v+,U/s f< ,>n,U/s,>,#/s,>n,U/s 
$*j0$*2&
p  &.2,>,#/s &(2 ,>o,U/s

.,&,7v+,>,#+,>o,U/s,>p,U/s@/r+-0

.w ( HLZ*pQ*A` JL

w&,j07X+,>,_w/s (HL w&(j0&*t7X+,>,_w/s 0PL w&(t 082+ .NL08+ 0PL5X (HL+,>,_w/s@HLZ*p,>,U/s@/w+-0.wZ(pQ(A` HL * JL,>w,_w/s@

LLZ.p,>,U/s@/w+-0 `H+2 
=,x.pN

aL+2@+ 
w0J+5,>q+T q NL 0 PL@@l x H+@-9+P+<+@+C+G+L w~,>h,_/szq ,LL+P w~,>h,_/szq+P

y L,>w~,_w/s lnq+P,>w~,_w/s

l8

lq .(NL 0PL+P,>w~,_w/s

l8

lq .(NL ,?LL ."NL@PL,>r,bX/s+-0 wZ8 Q8A` 6
0J+[ .n=6X `n+]aN
'w aP+,>w,bX/s+@	`VH
z{}

  (5#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:	.  lines per minute
 Compiled:	 Executable statements at:	.  statements per minute
E-0.~ aH+,*0J+) :+) : ZX,>L,>s,`$/+C 
X1J+7 A Np@@A,>,>t,`Y/ p PA ( HX 
 JM JQ

XLQ,O,>~+?7NM+:,*M@@M+;,>,~c/~  HM HQ 
XJQ,O,>~,we/~:.H,>,/~@/~+-0ZZ4X[Z`*0J+N X`n+W,>tZ0XQ0	,>[`,>,>u,`$/+W. 01N@(D*DaP+V,>X[

`,>,>u,`$/S,BLX  h,>,>,p/+EO+-0

.@@p@@p 8 ` Hp4Hs

p[05NqZ00hO+q 0`n+q6Pp+g,`,>v,U/~ 
pZ

( Lp,>,
y/~,>v,U/~ p8 Np1n+q@@p,>w,U/~,`:V pZ
  Jp5J`=8^7Lp+w,>w,U/~l @/+-0.@@p a[
  Jp

p`L+l  . Np,`,>x,U/~,`,>x,U/~ p[h,>,
y/~,>y,U/~,>y,U/~:V aZ
  Ja5Jz@/+-0. wZ
 "
.jN7Va+ZX4NZX+@@p4V%ZX0P+Z
X :2Jw++Z
X0J+[X :2Nw@aZ+ * Jp+$7Jp+$[XZX5N![`,>,>z+#[`,>,>z,`]/[X+ a@@p4VLZ

X0L+EZX2Pw+E 
paJ+@[XZ

` Lp, ZpXZ`,>p,CI/~ pZ8<XP8 8< H8[8[
P2X+7[8Z`QZ8+;ZP[@3X+:ZP+7ZPZ
`XJP pZ@8XH@ @8 N@QX@R``[X4TBZXXZP+CZX NaZX4TE[XQPPZX0P+K[
X2Jw+K,>,A#/~ . NpZX+&@/+-0 a4TTZ
P0J+SZPZw2V+SO+ZP+N@+-0R`PQ:PX:Q*:h (2h+]@@ 2(+]Q8X *:8 ,P Lp@0t+b .
+NP@@P.4+.40tc 40t+j (
 HP@@P.4+g 
 J
S, LOO@A@@xd  /( NK 0 P^d Ndl   P_@++t-0.@@p. (
 H=S*H J@

(2l+}@@02,+}Q8

X *6 @@CS0C.0D *6K[; *0( @
 ,1H@

A
Z; 00N@A
aJ+	[;J+	  A 4T`Tl`Tl`TlaT+l`Tl `Tl @ A4N* Jpd,dd ,	1Z@+o paP+O@A,>,>{,`$/ : ZA,U@@}@@|@@| 
( JP 	 HQ , LQ . NT,| Z@@Md ,>~,we/~0Z+- 
aJ+*,95+%6HX+>,>~,we/~+o 
aJ +0,>L,>	,,/ W ,.
8

$.X.{40t+6 TX+G 
/*<
+@-9+G+;+>+?+B+DZ: ,>,>L,>|,`Y+G,$+_,>L,>|,`$/+_,>},>L,>},`$+GZ: ,>,>L,>~,`$/7J	+J

W.
0N,p~

W. 00N@Z
0 (0J;r@GaP+QO@f+R@@fO@@@@@Y W84XW,>,C/~4:_ WZ
h,(7HM+_Z  ,1N@

aL+_,>,

/~ X0N+$,D,\,N6Ja,x6PV+j

`l+j 
 Jp Lp,W.

, p p H.,

`L+o,	ZP Z(	z+ +.

@/+,s,~	`Z"72jnhO'7)8  DX X4X6X[Mc@}}w~|o0$ 00$06$84 a dummy array

Undefined labels





Unterminated DO and IF statements

Line: 
 CLASSIFICATION - STATEMENT STORDER