Enter your search terms Submit search form
	Web pdp-10.trailing-edge.com

eQh+
Q`
"x
HM?H@,>Z+@,>Z,>+@,>Z,>,>+@,>Z,>,>,>+@,>Z,>,>,>,>+@,^,^,^,^,^,~Z<
 \
	Q>~
Z<pX@	`CC~0C&l`C&v@C2|pC2|t(C6C6$C6MdC6Md C6|@CNM`CR
dPI~0IFIex:I&hI2|pI2|t(I6I6MdI6|@INL{@INM`IO-KcM2|S0SMPSMmSOS;SNL{@[B[B[&r[&r[>e

)

)

$

%
!
&

,
&

/
.
2

*
/
3
*
3
+
#
5
+
#>z(:(
Lh(

( l 

`j 

Pz 

P
Nh(h!|P*!xh!|`*!xx@
Qn(?`ow{}~?ow{}~?ow{}~?ow{}~



-0.U (
QHr, Z

QL`  wXN`1N Xq bS(@GHhR``+
[

`4L
U[`+
SZ`5P
\Z
`
 Jp
S,@BL( 

XL`  bS.@GNh wXN`+
Z`Z
`3*w+
S+
IZbXN`
 /U+-0.UZrZ
$] Jp
0h+
yZr1n
+
g,+
x,
{ Zp 
p.
p
 ( H`5H
o, p.p
 ` P8R`@d  +
z,{aZ+
rl +
y `Zh4N
uZ
h J`+
o, ` 
p.
p
Z(XHhXZ(d 7`@/U+ r+@$
|++
+@+@ 
t&*'+ tFu 
&* + 
t1*+&*7 #
,~-0 w h
 ( H

2l&
 2XX+ w han
+Z/0 
(
(V,T3H+O+Z+3xX+8Z@+]+a+c+i+j@+q+v@ ` 
rjV 

t Lh
 .nV 0
pW 0H+z *jW+z ` 
t Jh
 

u Lh .nV rpV@hW+z ` 
tXJh
 ,lV . Nh
+zZ
`5J= `QZ`XZ`+? ` `XNh
XN` ` t Nh+z7Jb+C `XZ(+J `XNbQNb 0
pXZ`8
 (hX, Z` b 
`XJh `XNb mQP8
 nhX *jXA( ,1(@

 00h@A

 .1H@A

aL+Z[
?5JX `XZ?QZ?+Z ? `XHhXH? ` 
nQJh
4JzQZ(
+z ` 
tQJh
 

uXLh
@@h
 rnV+z ` 
njY+z[
a5Jf `XZaQZa+z a `XNhXNa+z,<R+z6Je+m `XZeQZe+n `XN(XNe ` tXNh
QNh
+z6J?+t `XZ?QZ?+z `XN(XN?+z6Jf+y `XZfQZf+z `XN(XNf `,~ r+@$}+++@+@ ` 
t2Jh
+O,~ `*V2Jr+.Y4N	 t2Hh
+ 

u2Lh++
 u2Hh++
 `Z
h
2Jt+:h
+
@,~-0:w~1(+ 

w lXN0 Ll+ 

wZ gXN0XL g+-0,>[r0h+Z g4Z hXN g+$ ([

r.l(/

"Ll3lZ+$ /l0z,

\	z,

\ /( Hl[
r/
("@@h[r1P+)Z*hQZ,hX.*8G,^+ 	 Ht 
Z Jr:

	,
a,~-0 (QHr, @@`Z`` 
w}j[ 

w}l[ w~n\@@`
 w~QP`
 wXH`
 +-0 (QHr, @@`Z`` 
w}j[ 

w}l[ w~n\@@`
 w~QP`
 wXH`
 
w|XJ`4PJ.\ (0N@*\ ,0J@

GaH+IS:GZ`+JXX@7Nw+R*X 00J@,X (0L@GaP+RS:GZ`+RXX8 +@	`.,[
hh

h(h88hh0
`

``@
a
	

C
^
_
_
V
U,>. 4c 

 (lg*

 4Q(lg+*)

G/4G#t0b2+4Bz@@x1b+m/" Bx "(B7 t"`%

/  %

0.%

/dr.,.dn.,`l+v)

/4 (&00LX./4@6Bx+ja@..@dn.,5,~)

.4d,`T+)

|t L N/,^,~ t7 g

U, L L,>	,6C/+
6$ 68}g5'G2"NPQ(\:]/*DB$esI4[5RmP;ar!Cd_4b%-)Dt]w!znX=3vu5
9J.L 9k1C~=(H%]<~

42Z/?T+OA?0{/Je1'NMT'&Wa&5uTX0-YP+E	n<95w,*%cZA)Z={Z/PC$L`%PD2+}?x/$U?^6|ov:;mjoV".z-4Ref*yG8Fag?5Wy&W
z!/!F{hl4m4)xZb6GBa46q:c2Jz b&t^OoNl(zpQu!#kBG3Lf3Lf3 (2>@'0j=@&h/WB;M2@% /H.H;::J(@$0N9(-<bR8kzIF#C<M|,4+a;
7A6Yi,@"Xrh+/^b6r5\.z@!pgAI,H*-
1|WZ4x!^;mP@!B()-z-f Rr3Y8y( N@ 'sKc1a(1p>\-9y*2>,N4g'7T?
lh<\j6HmH%NiJB*6$D$$D$D$D ` 	AP:b8T

# nD	
$dy$*%a>1FIZ8g9t> ("E#I
(L&irDR*
b^Y-KJx`0l3f4[~-0.- w[h
 H
h
J0L+0. P
m Jt,>+( w 
(J
j0 

3Lw,>0Zp,r/0 pQZ8
@w 

A`Z+F,>*w,> Zp
,r/0 

p
XZ0
+F0.5P*24J	.n0+ 

AaH+ww0+w0p0

mLt,>,>*+D w,4 01L
@.4 :1N@A 
AaZ+3,>m,>+,6;/3 w,l0 

p+ m Nt + Pu,>,>,,6/3+F@/-+-0 w(45HLZ

h
hLN40L+P[h,P,>,,6/3+ 
G,5D`H+q,>
XJh
+f 
QJh1+q6Hq 
 ,0H
@

A
aJ+q 0GPh@+-0 w~(00H+z 

w~ .0L

@ 00L@GaN+z ( Hw~ w~ 

w~ .0L

@00 (0P@AaN+
 w~+ w~ 
w~ ,0J

@

00 (0P@A

aL+ . Nw~ w~.10N+ h
 P	c h H	c,3(L
 w~(N.

.

- L	e,

u 
5 Jr 	d Pt 	d Hu w~ Nr,
a+,>w,>603,>,>w~,>6,>,8/-+-0 w(10H+! 

50Lr@@t h
 Nu 0 Pr,
a+,>w~,>6 w,3,>,>7,>6,>,8/- Zw .GNh7w@+@	`#<
X'
Z


(h

 h8

h8


h

hh h( 
Kc-a
CN=ma-0
 w~[
U J

w.F8

3N+cZ* 
Q*	,>,>m,>E,6/F+ ah+g,>w~,>w,V/G+@@
Z6(
Q6	Zw[w44( ` N

XL4Pq,>,>H,>H,r/F Z

aL+},>H,>I,>H,>J,>
h$
@.j

haL+,>H,>L,>H,>J,>H,>
 

($

h.l 
h1J+$,>H,>I,>I,>J,>

6.0+3,H,>I,>H,>J,>
aJ+A,>I,>H,>J,>

w,>,>w,/G 
h
J+00N@H(0J@GaP+TS,GLh+TXZ(7

QLt,
aZpQ,>R,>R,>,>,>,./O  (hS[
w.*
XJP 

S Lr@@t m Pu Hr,
aXZP
S.GNP
 w~[h N
8
XJP
S,GLP
@[

w Lp2rp+{ .w @(T4Hv,>,>H,>H,r/F  
.
XX(,T0L+zS:GZ(9oXV`9o[w,>,>w,/G,>N,>H w~.O,>,>,>,./O Z

hLA0 Ph
 

XLX /P+-0 w~1H+! 

wwLNU0L+0U0P+Z

^
0LZN0P+[

^L0N+Z
0
,>,"/P`Z+,>m,>E,6/G+! 

]0L
+&O+0K0P++,>,>1P@
AaN+5[

 
,>,"/PaZ+9 wZh
,>+8,K0L +9Z
 
,>,"/P+@+-0.P@ w~< Hp
2xp
+B 
.
wZ

(2Lw~9=O+C9=@/P+@	`
O
J$@(

8
	0

h
  
 @
 h
@F h((aJ|G

h
X(``  0

 -0.

YSwZh[H
h J

hhLN

Y,

Z0L +wZ(
 N

Z0P+w(

[ *0H

@
0

[ ,0P
@

G
aJ+r 8
 H	c 8 P	c,

[.



R L	e,

u 


\Jr 	d Ht 	d Nu 

\ Pr,
a+w 

\ Hr 8
"Pt 

8"Lu*

[Jr,
a Z

]0N +	Z
h
J

Z0L+	.

] 00N

@,

] (0L
@GaP+	 (
 N	c 

( L	c(

[.

R H	e,

u 

\ Pr 	d Nt 
	dJu 

\ Lr,
a+	 

\ Nr 

(
"Lt ("Hu0

]Pr,
a Z

]0J +	(Zh
 H

^0N+	(*

^ ,0J

@

.

^ 00N
@G

aL+	# 
 
 J	c   N	c0

[.

S P	e,

u 



\ Lr 
	dJt 	d Hu 

\ Nr,
a+	( 


\ Jr  
"Nt  "Pu,

^Lr,
a Z

_0

_3N+	/,>,

^,>,>

`,r/

` Z

(

_.

a3H+	5,>*

a,>,>

`,r/

` Z
,

_(

b3L+	<,>0

],>,>

`,r/

`Z

b4P	? w ,@GLh@@

]0L+	Y.

\0N
+	K 
h
 J	c 

h L	c 

S H	e,

u 	d2N

c+	J wS*
GJh+	Y2N

c+	Y+	Q*

b5J	R h0H+	P wS0
GPh+	Y h2P

d+	YO@2N

c@ ,6J @

AaP+	Y wS.
GNh 

d1N+	p *QJr, Z

XLh wXH0S.GN0 .n

e0BP0 

\,> Lp
,$/

e 
p
XZ(([wQJh[J

h
QL(
Z`h
[(
 Hp
QJ 
 w 
XJh,>

f Zp
,$/

e 

p
QZ0@@

] 00N@*

^ ,0J@

AaP+
 Hp `n7

T 

T 
p,

f..: Z	e 	c (
 H	d 

( L	d,

u 

\Pr 	d Nt 	d Hu 

\+Jr,
a Z
,.

g1N+
" w ,l

gX0QPr,SZGJ  *j

g,BL  

\,> Hp,3/

eXpXZ@ QPhZ
@J

h
4L
"[h
QN@
Z`h
[
@
 JpQP(
,>w,>

h,>

h

\,>,>,>

iSZGPh[h
 P

i .0H@n

j w h`n
+
c

] ,0J@

0

^ .0P@A

*

^ 01J@A

aL+
G Hp `n7

T 

T 
p0

f..: Z	e 

(
hL	c(hN	c,

u 



\ Lr 
	dJt 	d Nu 

\+Hr,
a Z
ca+
S,>w,>

j,>

`*

^,>,>

`,>,8/

iZ

]0P+
RSGNh+
cX+
c,>w,>

h,>

k*

^,>,>,>,8/

iZ

d1P+
[X 

k (0J@h

jZh
 P

i .0L@n

l

\1H+
h,>,>

f,>

`,r/

`Z

]0L+
p7.h@@h 


\ Jr@@t 

h8

 Lu 0 Pr,
a+
y 

\,Nr@@t ( Hu * Jr,
a Z

h,>

`,>

f,>8/

i Z w 
 

0

] 80P@0

lD.

mA ( (0p@A 07.(@A 0 .0h@A 07*0@AaX+ 

\SHr@@t 
h/
8"Ju
,hLr,
ahZ+ (

]0H+ 
h0j+ w 0p

m wS0GPh+ *

d0J+ w 0p

n+ ,>w,>

j,>

`,>

f,>

`,>,8/

iXZ@/

Y+-0.

eS( Hr*

U.*S

.

U..(N.

0

V.0(P.

(

V..

n Ht:
	H,
a Zp wn

\S0BPh p/

e+-0.

eS( Hr*

W.*S

.

W..(N.

0

X.0(P.

(

X..

o Ht:
	I,
a Zp wn

\S0BPh p/

e+-0 wZh H

 
8

XL 
 w[

hLZ0
8XP0
 w[h P
h0J+R 

oXNr, Z
QJh7N0H+X 

QL8,>,W/

e+\Z

80L+\[8 H

g0LXN  

ZL@P+-0.

pd   (QHr, Z
8Z

(XLhXZ( 

d 0
p

p,>w~,

0/

e Z~(

q1h+oZ*h
Q*	.*
 J
aJ+r 

q Zt+s 

rXNtS.+Nr,
a+Zz ,l

r :z

s w~,

q"L
.*
$

.,QLrpXZ8 Z

 

\+Pr@@t (
 Hu * Jr,
a Z

 "2P
+

h 
.
 

Z0XN(S0GP( 

:

.

 
8XJ0 0p

s3X

g:.
.n
.Z8XP S,GL :

9

 

\XNr@@tGr,
aZ

hXL 
S.GN 
 wXN S0GP [hXP S*GJ  
XJ  ,l

t@/

p+-0.

e w(

qZH
Q*	2J
+

; 

[03N"+

9@+

;9*
.j

5 :/

e+-0.

e@@G[b H87J8+

O.

t0N+

NZ(4H

NZ(ZN Pp
2xp
+

N.Z

lL

u0J9

E[09P

E,>,>,`/

p9

E 8Zh+

>@/

e+@	`


{

	H

	H

	H

	H

	I

	I

	I

	I(h
 (
 88.(h
 h(
   

h

 


00

(h 0_Ph0( h0@8h
8.h8B &h(hL$ 

h$@hCR@CTs@

@D@F0F (
 0+| 	c 
	cZ

	e+@0-.

x`n@0,c H	d J	d,~.
	d,
	d,
	d,
	d,
	d,
	d,
	d,
	d,,<P,9,9+ ,9,9,9+ + ,9,9+ ,9,9,9,;,;+ + ,;+ + + ,;,;,<+ ,;@
+ + + + ,<P,<P+ ,C,C,?,>,>,<P,<P,N+ + ,U,>,>,<P,<P,N+ + ,U,>,>,<P,<P,K * *+ ,U,`A
	dG
	dI
	dF
	d(,`@,	h`@,|*.	h`@,	d 
	d7,,	c 
	c,~	d
	d,~	d
	d,~,<P,<PL"`d*7@:,~,,<P,<P,
8,~	dH8,~ 	dH8J8,~5*
"	d(
8,~"	dH8,~"	dH8J8,~ 	d(
8.
	c,~ 	dH8	c,~ 	dH8 |*.	h <	c, }*.,~ 	dH8	cJ8
	c,~7N	d+ N	d@aN+
(.+
`N$
	c+
 *,~7N	d+,>	c,>	c,>aN+
(.+0H	dJ	d3Nx+(.,> H	c J	c,
,>~0N	dN	d H	c J	c,
,^,^x,^x,^x,~!( *,~#
,<P,7,.,0,1,3#,',,,.,<P,4,6,$ |*.	h7 ,
	d J	c,U 
 	d,~#7 	d"h,~3h	dg	d,~ &	d,~3*	d 
	d,~2j	d 
	d,~3(	d 	d,~2h	d 	d,~#
7 	d"j,~  *,~ 
 (,~5Jt 
},~ 
 (,~ &(
6@h(Fh*6 *,~ a`+H&(
6@h(Fh*6((J,~@
)|h(F~,~#%(
(
'.7	c"j(,~7~,7 	c"` 
(,~4Ht7
,U(+7 	c"` *,~4Htl*.*@d
ej.(l(
,~7,,6;,^x,^x,^,^,^Z

	e0,/,

{A,
+r0,r0,+p/,r ,4Ltan +u@h,~4(wU(0LU*,~1L
+z 1L
 
,~S( *,~

v@	e
X     HZ @7 6Q<+7 6Q<+	7 6,>"pLpcX=9+7 6,> p p!`7Pp+35V  p+3:<2<7`B:
7`B2
 /6`: pd<
56l<L"`cX=:50l<
L"`cR=:d6~d0~4t>"`)Pa|+!`|
+CL"`cX=:a|
+$L"`cR=:d6~d0~+$%.+$x.`v
h6ev+*dv
`v,@lav?)ld6~5V0cX=+y7)av
=/`Z+ydZ,?z<+{d
dZ,?z<+{@v,^ Vpd8 Xp,~d
dZ,?z<+|6$6$?,>+,)P9B:
l"`L@cX=:,~l+$7 67 6Q<+G,>7Tp+y44Z  p!`7Vp+yFP46\ p:<4<.:W@A:`|lQd6~d0~))%% %+$U.+$|.+$}`X
.8
)[+,L"pcR=9J+JL"pcX=9M+M7 67 6Q<+b,> p44s  p!` pF46v pPbV}+i+ycP}+~:<4</:W?A:`|lQd6~)'%JcT=:.'[58*=*L"pcR=9d+dL"pcX=9g+g9&6aZ@+4+97H7H

79V9WH
6,>In,Ak/a,~-06H#+O@# 

w 4( (nO/0"1v+/6 
\d,(5:S.(NXF5X+ ..S P# :[#(Z +,>In,Ak/a Z# :[

#(Z0+-0(w~/"<"QHr, [
r<
QJ`,w~5L@pwxw~ w~QX R``+  w~[@XX R``QX@0w[r.<pw*w~Z,(CQ,	Q8Z. *8o J" +-0.a "/w~  
w.
QJr,XZr 

r.

a Lp
Zw~4N:8Q rX 
w~[

(.

 *:g [(.pr ( Nw~[`,>,>,/b+/4V? rX 
w~Z.(CQ . *:g w~8 P" 
p
 J@B@/a+-0 "/w QVr4VM,XZr 

wZ.0CQ .< *:`8

 L" r.a H0B@+-0.b "1(}+R,>[,6?+t 

w.\ Np
0\+@DU+B+Y+l+m+u+++)+;7H#+[@@#+],>In,Ak/a Z#[#3Np
+g1n+b,>],>],6?/b p
,>l@T[#,>l@T,>^,6?/c (QH#+ 0[#(P Ac7Z+B:" 

# L8B+B,>+ " Hp
 *^. Np2xp+s,>,N/a4:B9p,>p
,C/a+B,>,/a p
 w*_.
p
 Jp
2xp
+} Ad(4N} +9y,>w,C+t@@	r:

" /p
8 H0B,>,N/a5:B+B,>,/a p
 w*_.
p
 Jp
2xp
+

 Ad(4N

 +9:

"@@0B+B:" 
/
p
8
 J B,>,N/a5:BO+B@@p " Hp
,>p
,N/a4:B7N#+[#0P+%@@#+ 0 P	t,>Io,Ak/a4Z% "10s+Z*p
Q*	,>Z.pQ.	,>Z,pQ,	,>,/c+7Jp+s,>p
,>,>p,(/c+B@@p " Hp
 
"1*s+1Z,p
Q,	,>Z0pQ0	,>Z(pQ(	,>,/c,>p
,N/a4:B,>w,/a w D(A5H*7Np+s,>p
,>Z0pQ0	,>+'6H#+= 

<d,0+B[# 

p
/.3L+A 4d, +B@@#@/b+-0.b@@p
 w 
$( Jp 

p`L+J(L Lp:p
+F p
,>l@T[#,>l@T,>_,6?/c:p
 p(Z Zp4ZY p`H+S(H Hp:p
+P 
p
0J

+V,>`+V,>,@T,>`,6?/b>	p+MO/b+@	`U04j004j
f'
04j0$j

g
x
 
y
X
+
*{
+
+"
*R
*L
+
+A
+k
+G
*d
=


P0
`@

 p
`
@P
P
pPPpp

0P00 	P0	
`

p
@PP
P@

pP@

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

0P

P
`p
P
p
` 



0

`

  

P
@



P`@
@  	
0
p@  	

 @

`
`

0@

Pp
`

p0@P
P @
@ @  	p

 @0	P

` 	 0p`

Pp0	

000@@@
P 	
P
@
 
PP
@! 

0PP

P
 
`

@P
`%`
`0@P

pP

``
%`P 	

P

`
0
`P `
`  	p

 @0P

P

P&  P
`

#p@!@!0
P!`
`!p
 
"0
@"`
`$
P

%p
@
P'
 	

0&P 

&0&p(

P 	 

'P
`'@'p(P(p
@
P(`
``P)p
P)`
``P*`

P
`+`

 ((

(









 
 

@  @
@@
@
@
   @


 
 

  

@
 



@D
 D
@ 
@ 
 

 
((( (@ 

 



   ( ( @( @@ ( ( ( (     ((@





 
 	
 @ 
  @	 
 
 
@ 	 
 
 
@	 
 @ 




@@	 @ 
 @ 
  @
   
 
 @	
@ 
@	
@
  
@ @    @
  @
  @  @





8
SYNTAXACT
"FUNCTION"-0.2 w~/( H
h
 J

h
0L0N@ *0P@
GaH+u@+ 

..03DaN+ 
(
Z,[,4.mP+Z*@/*SJ Lr 
p
QZ(
[(
H.6n6 l[ P  ,l7*1 .1J@ 
A(1 ,0H@

Z
@ (0*
@A

GaN+!,>w~,>m,>1,6;/5+* 8
Z
@Jp
2xp
+* 

pL3N~,>m,>2,6;/59# w 0p8@/2+@	`Bl[J8l[J.l[$l[PJ
8&0hh
 (

 0

hC`C~3@C&lgC&vC@C2|s@C2:C6C6'C6MdC6Md'C6|C@CNMc@CRdGI
dS@I~3@IF@Ie}I&i`I2|s@I2:I6'I6Md'I6|C@INL{GINMc@IO-Kc
`M2|S3@SMS@SMmSO@S;!`SNL{G[B@[B@[&r@[&r@[>!`e

2j+i,>,6?+O@p	[#1P+C,K:
p	.
 Z(5:oO+F[#70<!+s6jp	+w.
 (+F7jp	+C[# p	.[8 
$!3*D!+C 
p	.
 

( Lp
  Pr,  p	 . XXVP
>p	[
p
 Np
0J+4H.[
+0j+p	.[87(D!+,>	,6?/

S:GZP+XTX Xah+S0GPP (hZ`P
+@>p	. @QHP
[
p
/*+@,+1+++ +"+#+'@@@@@@+)+++,+/ ,
lZp
+0 ,+) ,BLP+- ,BLP+* ,BLPZ

p
1L+0[:
+00,ll+1+,l :+0+,l+&,l+:pBZP+1+,l :
z ,>,d/
Haj+@S,GLP  
p	.
 Z(+o:
p	.
 

#L(,~Z#+j/+-0

# Lp,~ Z#[#0N+1 " Hp,~ Z# p*0J
l [# 01N@ (1N@AaP+[,d:
"Z(B5:]O+J,>	,6?/
#1J+P[#1N+c,>@[,><@T,>,6?/+Jd ,>p,C/
@B.
@B Jp2tp+n 

P Lp.0N+lS:GZP9gS0BPP9g,~ Z# p01P
++d  2Z&+uZ.h
Q.	,>,>
,6?+; "[8B.(
QHr,   Pr 
p Jt Tu, Zp 

p.n (
h "[
@B8
XJP @B .6
[@B42	 

.

.8HpH0`h+pXP =2p0.HaP+,>,/

"[0B42# . 
  Jp.0N+, (0L
@. 00N@GaH+#,>,>+",0L+#,>[(
,>,,k/=2,> p[

h
,>,,y/ "[hB,>,>hB,/ 
p Jp+0,>,>,,y/,>p ",>hB,[/ Zp 

p L"+J p haH@+H* ,0J
@

.0GD

(M

aL+<,>,>,,y/+J*0J
+F h`n+E,>,/
/* ,9 Pt,
a Zp,>+H,>,>+I,>,>p,,y/ p/+-0.@@p
[#0H	+V6Lp
+U  Pr, Zp (h *pBJh p Zp
+W@@p
+W0H
+X,~ Z#+M[

#0L+:,~ Z#,d Zp
4:K[#0H+3@@p p
,1L+cZh
 Pp
(5HdO@p+f04Pf,>@[[#,>l@T+ p
00P+j,>
,6?/
*0J+t@@	c h N	c  P	e,

u  Hr 
	d Jt 

	d Lu .
 Nr,
a Zp
7Np+ p
 h
 H	c 
h J	c,.

 L	e,

u  Nr 	d Pt 	d Hu *
 Jr,
a Zp
 p
(4H 

h
 L	c h N	c 

 P	e,

u 	d Hp
+ 

h Lp
@@p,~ Z#[

#1L
+0L	+

O@p,~ Z#[#1P
+,>@U,>D@T,>,6?+9Z
# Jp,0L+@@	c ( P	c 

 H	e,

u 

 Lr 	d Nt 
	d Ju 0
 Pr,
a Zp7Pp+% p 
h
 J	c 

h L	c.. N	e,

u  Pr 	d Ht 
	d Ju ,
 Lr,
a Zp p*4J+ h
 N	c h P	c 

 H	e,

u 
	d Jp+, h Np  Nr p
 Pt p Hu * Jr,
a Zp
,~ Z#+6 p
,1L+6S0GPh[

#1L+@,>@[,>4@T,>,6?/+ 00L
@ (0L
@GaP+AZ
# Jp
,~ Z#+C,G Zp
4:[#0P+` 
Jr, Zp ,ll p
QNh
,~ Z#,K Zp
5:LO+ p p
XHh
,>,d/
h
 Jp
,0L+TS0GPh+WXZ( (ap+W pS(GHh pZh
 Pp
(0H+\S,GLh+_XZ@ 

@al+_ pS.GNh 

p Lp
7Jp
+ p
XN(
Z`(
00P+{,5Ly0 (0P

@, *0L
@
GaH+t 8
 P	c 

8 L	c*.
	e,

u  Hr 	d Pt 	d Nu p
, Lr,
a+  Pr 

8
"Lt 
8"Ju( Hr,
a+ p
S0GPh+~XJ8 

8al+~S0GP( p
 

p
*Zp0J+P:+: pz  +7p
@/+@	`
j|[
zc


PXPH0

h00hh$h,h
(

(

.h$ 

@

h(.(@8

88@

~}}||~~-0S( Hn Hr 
sXJr,  B 

XXL`
 wXV`,>,G/tZ`.t0N+8S:GZ`+9XXXZ`
(t0H+<S:+>XXX 

Xal+?S:GZ`[

B,>,>B,/u+-0 B `,>u,>,,k/u4:G,>,-/t+-0 B@@
0J+S.v0N
+SZ(X
Q(	,>,>m,>n,6?/v+S.GNX w Nn Nr sXPr,  `XHX
 
CQJX[

,>,>,/u[f5NXVfQVf+ fXVhXVf+-0

w Ln Lr sXNr, Zp `XPh
R`hZ`h@+ `
 

`0L+@@ Zp ZC4:[p0H+x pZ,hQ,`@0L
+xZ0h
Q0	,>,>n,>n,6?/v+7LP+ P
 Pp @ HC [
C. Hp2rp+ HZ

hLH9}[P
,>,>P
,/u[C8QPC+@@C x Pn Pr+ P PC [C. Pp2rp+
h JH9
 

P
 LC [C8QNC(x1H+,>,>y,>y,r/v ZC 
z Jn Jr[,>,>,/u sXHr, Zp 
CXJh
[

CQLhZCXNhZh
0t0PXZX/v+-0
Paj
+(,>m,>o,6+[ TC 

{ Ln Lr sXNr, Zp7PX+V 4D 
X
 ( [

.

 Lp2rp+F HZ`PXDP H0N+D({0H+?S,GLP,| .0L
@0| (0P@GaN+E,>y,>
,,k/u+E 

pXL.{0N+E,>|[
,>+>S(GHP8.2
+1 X
  [
,>,>,/u,>y,>X
,/u 

/

o LDZ`D D..
QNr,  pQ 8X 
D.
8
 *8+V@ p 
CXJh
XThd  [

,>,>,/u/u+-0,~ Z#O@#[#1H+f,X ZB4:q[#1N+f,>@V,><@T,>p,6?/v+@@B 

} Ln Lr sXNr,  BXXX
4Xq(}0HXV`,~1L+,>,>y,>y,r/vXZX
+,~3Z~+w,>@V[,>l@T,>p,6?/v,~ 
 Jn Jr 

sXLr,,~-0,>Ip,Ak/t6X+
,>In,Ak/t3Z~+	,>q+2X~+O+,>In,Ak/t3Z~+	,>@V[,>l@T,>p,6?/v+ +-0,z66+
 Jn Jr 

sXLr, XV`
+-0,z66+O+ 
 Jn Jr 

sXLr,XV`
+-04"/t5:.+V@@D@@E@@E8l ,>,3e/t4:V w2N
+) w Hr@@t"* Ju , Lr,
a+- w Hr@@t"*
 Ju , Lr,
a ZC@@D7LD+4 0 Pp D2H
+4,>q,>r,6?/u+4@@p C Pp D Hp 
E Jp 

E Lp7NX
+D 3R
+>,0L+>,>r,6?/t X
[

X
,>,>X
,/u,>P,2
/t64+G+V2H
+G,>s,6?/t+V@ w Hn Hr 
sXJr,  

pQL` pXN` pXP`[QH` 
pQJ` 

pXL`,>,A/t p7.h<[,>,>,/u/+ (
 Hs,>
,/t,~-0,>
, /t  w Hr@@t"* Ju , Lr,
aQZ`+-0,>, /t  w Hr@@t"*
 Ju , Lr,
aQZ`+ ( Hs,>,/t,~@	`>

>@
D
D


 X

X
(((X(
(



(``( 
00(@FH@OCTAL DIGIT STRING OR 'TEXT'
RANDOM ACCESS-0 B   * J

`1L+,>`,1`/  [0N+( 0H
+Z*X
Q*	,>,>|,>},6?/ + `. 1N+,>},6?/  w Hn Hr 

 XLr, QV`[
B,>,>B,/ @+-0
.  B w2H +$ :+% :
 Zsl @@D,>,3e/ 4:< D Np7PX
+. X
,>P,2
/ 64+1+<2N +1,>~,6?/ +<@[
,>,>,/  

w Ln Lr  XNr,  pXP`R``[QH`,>,A/  / +-0,> , /     Hr@@t"*
 Ju , Lr,
aQZ`+-0,> , /     Hr@@tO@u * Jr,
aQZ`+-0
.  B X( 1H+R,>~,>,>,6?/ +p Tp@@Dl Z,XQ,	,>,3e/ 4:p D Pp2P +[ 	q8,>,> ,6?+p 
s1Jg:pZ4:p7PX+d,>X,2
/ 64+e+p@ 
w Jn Jr 

 XLr,  pQN` pXP` pXH`[
QJ`,>,A/ [

,>,>,/ / + ( Hs,> ,K/ ,~ (
 Hs,> ,K/ ,~-0,> , /  Z`0H+~ 	q8,>,> ,6?/  

  Lr@@t". Nu 0 Pr,
aQZ`+-0    
 H	t 6,>Ip,Ak/ 4Z,> ,N/ 4:,>,+    
 Z	t=6,> ,6?/ +,> ,/ ,~,> ,/ ,~-0
xBX`X0H+, 1L+#,>~,> + P, 1L+,>~Z0`
Q0	,>,>,6?/ + 0 P

  Ln Lr  XNr, QT`R`` X
XP`Z``R``Z``[,>,>,/ +-0 w h
 H	c 
h J	c, 1L
+60 (P
.  P	e,

u 	d H	c 	d Z	c w0 1P+: 
  J	e,

u 	d Z	caX+<"	c+ 	c+-0
.  w~ w7HX+D 

X0L
+C"w< 8,>X,-/  Zp w.6
7LX+K X0P
+K"
w<
 8,>X,-/  Zp   Pr p Ht 
p Ju , Lr,
a/ +-0
. @@p@@p w[w.w Hp2tp+% * Jp@@p 

P0L+ P7N`+` `0H
+_O@p9`@@p9`@@p `0H
+f,>`
,>p,=/   *
.jp@@p+ `
 `7J`+0 0P+p7Lp+o   Nr@@t X"Pu ( Hr,
a 6.X+s,> ,6?/ @@p+ X Hp `
 `
 

`0L+7NX+{ X0H
+zO@p9{@@p9{@@p X0H
+
,>X
,>p,=/   *
.jp@@p+ X
 
XaJ++[X+ XaP+ :
+ : Zp p$p.pp7Hp+* 5J   Pr@@t X"Hu , Lr,
a + X
 P	c X H	c, .

  L	e,

u 
  Jr 	d Nt 	d Pu(  Hr,
a+ P[X.np .
QNr, Zp6Pp+  pXZpQZp+" 

pXL@XLp p 

pQLhXVh.4
+WSp[
p./+-0
.
 Jp2rp+D H X `[

,>,>,/ ,>,S/  Zp[,>,>,/ @@s@@",>X,2
/  Zp[p,>,> ,> ,
/ [,>,>,/  
  Jr, [

pQLP pXNP
[p PP mQHP
9+ 
B ([

,>,>,/ ,> ,>B,/ +-0
 ( H	t 444R(X,>Io,Ak/ 6V+P(XP+T.8_p/4+L,>Io,Ak/ 5ZR7@+-0. ,> ,N/ 4:e 
" (B,> Jp,1`/  

ppZ0B78+e[0P+d* 0J
+dZ.`
Q.	,>,>|,>},6?/ +e@/ +-0
#3J +o,>@Z[#,>l@T,> ,6?/ ,J Z#6N#+s,~ Z#+Y #@0r+z2XL &+yZ*L &Q*	Z

( Lp[(+|.2
+t 
#J,> +d 

p1L
O@p,~ Z# #3P + 
p0J+:"S0 P8BO@#+U,> [#,>l@T,> ,6?/  
p0J+7Np+

,>,>,>+e,+ ( H,~ Zp@@#+U,~ Z#O@#+@d+S++++4+D[#0N
+Z# H

.  01N@A

aL+,> +I:
"Z# H(B@@#+'0N+$Z
#J0L+2,U5:'+v,> 	,><@T,> ,6?/  p2H +S 

"Z0B Np>"+U[#0N
+/:"Z
# J B@@#+S0N+3Z
#J0L+OZ.(
+H,> 	+Q[#0N
+8:"Z# HhB+.0N+A #* 1J
+=,> 
Z0`
Q0	,>+d:" X@B,> ,>,,y/ +.,> 
,><@T,>,6?/ +.[#0N+QZ#Hv #. 0N+O,>m,> ,6;/ ,U5:S+v,> 

,><@T,> ,6?/  " pQP8B7H#+W@@#+X,~ Z#[

#1L+o #3P  +^,>@[[#,>l@T,> ,6?/ ,~3Z  +b,> 

[#,>l@T,> ,6?/6Lp+f,>r,  
 Q 

X ". *6P+n@ 
w Jn Jr 

XLr,"8XNXQXXpQPXZpQHXO@"/ +,> !,f/ ,~,> !,f/ ,~@	`>
>'
 "
.H #H $
*
 %


 J
 K
 M
 N
B

X
X 
@(P@@@	@
@

@

@`@	h

h8X.(

`h
0 (
 Xp(@@
G?-m
SPACEFILEk:N@k:N@
M&dPe|RCOxt	I&aJ~I1I'XzI'yM&d\tE2|:yEV4i9m:7a	Iv::
KK(OPENOPEN/CLOSE,PARAMETER"="
PARAMETERKKmfYCONSTANTOR4VARIABLEVARIABLEOR LITERALARRAYLITERAL~ORARRAY,NAME
VARIABLE
LINEND
DEFINEDk:N@-0, |6X+ R@+ * J	t,>Io,Ak/$4Z X7NO+ W,>$,>$

(

.

/, + v +-0
 444!(X ( H	t,>Io,Ak/$6V+! , L	t,>Io,Ak/$6V+!(XP+!.8_p/4+ } , L	t,>Io,Ak/$5Z! 0 P	t,>Io,Ak/$5Z!7+!+ ( H	t,>Io,Ak/$5Z!@,~ 

$L	t,>Ip,Ak/$5Z!O,~0XP@@Q@@,>l@T+!: 06NQ@ *6HO@
GaP+!+, O1Z+!$4:!d6LS+!/, d1Z+!$5:!/,>$+!L,!5:!1,>$+!L1Z+!$ * J	t,>Io,Ak/$5Z!7,~,>$[,>l@T+!:,~3Z$+!<,>@V[,>l@T,>$,6?/$+!d6NO+!>S*Lu JO O	z`z+!C,>m,>$,6/$+!d6JQ+!E,>$+!L@@N ,P LO
N+ OHQ@5Z!N[
4J!LZ`RZ`6?/$+!d,>Io,Ak/$,Kj 

	iL H
	kJ P

	{L+!X 	} Z
	zJ:

	} 

L	wl@ N	| 0 P	y,L"1Z@,!e@/$+,>Io,Ak/$ 
 J	i 

 L	y 
 J	{6L H	{S*H J	|,$ l$.$ n$0$!p$($!h$ 	w 
 J	y,L"@,~-0.$6H#+!} , L	t,>Io,Ak/$5Z"+![

#1L
+"
w+"8@@#
,L	t,>Io,Ak/$7V6@C(Z./: ,>Io,Ak/$6V+" 
+",>,>$,>$,6?/$ .
2Np
+":p0X
+"

+" :

+",>,>$,>$,6?/$ (2Hp
+"(:p0X

+"!(++"%,>$,>,>$,6C/$+" ,>,>$,>$,6?/$ ,2Lp
+"2:p0X
+",2+"0,>$,>,>$,6C/$+"+,>,>$,>$,6?/$ 0

2Pp
+"7:p,>,>$,>$,6?/$7/pO/$+-0BwH+"I 
	q0J+"H . N	qd l  `,>h,-6+"L,Oe+ 
	q0J+"K .
 N	q,>`,./$[
B,>,>B,/$+,>$","9/$,~,>$#,"9/$,~,>$#,"9/$,~,>$$,"9/$,~,>$$,"9/$,~-0 BO@& ( Hsd l ,>`,-6/$,>$%,>B,/$+-0 BO@&@@sd l ,>`,-6/$,>$%,>B,/$+-07Hp+"k,>$,6?/$,$%5L"n,>$,6?/$+l  B0$%0P+# *QJr,  VB 

8

 LX .$& NX .$& PX
 .( HX
 
% JtS, Lr,
a ZX .QNX@@X .$' PX ` 
  JX@@X,$4:#O@& * Js,>`,-6/$,>$%,>,/$+-0.$,~ Z#[#0H+#Z

# Lp 0
 N%,>$',>,,'/$ pS0GPh,~ Z#[

#1L+#,~[0P+#,>$,6?/$/$+-0
  Jp,>$%,>,/$ p[

p.

p Lp2rp+#H H `,>$(,>,,'/$4:#JS0@GPX `0P+#D `
 P+@$#'+#A+#)+#*+#+ P+#@ P
+#@ 

P
 Lp.$( 00N

@*$( (0J
@GaP+#; 0
 N	c 
0 J	c($).$ H	e,

u $) Pr 	d Nt 

	d Lu p*$* Jr,
a+#? $) Nr 
0
"Jt 0"Hu0$( Pr,
aA:.$* ZX[

,>,>,/$+#E `
 HX[,>,>,/$9#[

p,>,>p,/$/$+-0.$,~ Z#[#0H+#VZ

# Lp 0
 N%,>$',>,,'/$ pS0GPh,~ Z#+#W 

$+ L%l 

[

#1L+#[,>@V,>4@T,>$,6?/$/$+-0O@&@@s B,>`,0O/$,>$%,>B,/$+-0
C.
C Jp2rp+$ H6LX+#r2RC+#o,>$+,1W/$ +#~,>$,>$,>$,6?/$+#~ X6P`+#t,>$++#| 
`
 Jp[

,>,>,/$,>$,,>p,,'/$4:$ pS0GPh,>h
,1W/$ 8O@& 0 Ps[P
QHCZ
P
XJC,>X,0O/$4:$[CQNP
ZCXPP
[P
QTXZX5V$9#iC[,>,>,/$/$+@	`FFH$-;
$.40
$/
P690	w"	w4	w6	w>'>S>\>)>:E&r


8
0.(h
exu}['
NOLIST''
NOLIST
, OR /
IDENTIFIER-0
w (XVhS,GLX 

Xal+$=,>(,6?/( w7Nh+$z[X *1H@
,( .1L@A
aJ+$r h
[`5P$d,>(,>,,k/( 

` 0 Np,>(,>,/([
w,>,>w,/( p0( (1P@,( .1L@GaH+$T,>(+$^ p 
p[X[`
 `/( Ph
 

h
 .2l(@ h
 *3((@
GaN+$Z,>(,6?/(+$~XaP+$bp,
$lh
p@@h
+$~,(hLpd@@ p"Z8
@@8
+$~ h
 P Pp,>(,>,/(,>(,>,,k/( pS(GHh p Hh
+$~,>(,>,,k/(4:$~ p@@h
 p/(+-0
  Jp [

p.
 Jp2tp+%& P Np,>8,$4/( Zp4:% ( Hr p Xt,  pZh 

`al
+%S*GJXQZX 
m JX Vp p h [. Np2rp9% pZh
 Pp,>H,$4/(66+%O+%,ZX 

`al
+%# p6*h+%,>(,6?/(9%S.GNh[h
XNX pQV@QVh
9% p 
pXV(
XVh9%9% 
B ( Np[p,>,>,/(,>(,>B,/(/(+-0
.( BZ Z
 [

 .
 Jp2tp+%D P6N`+%8 `,>(,>,,'/(4:%JS,GLX+%> `1H
7`
 `,>(,>,,'/(4:%JS.GNX Xah+%@ :+%A :z([

,>,>,/(9%1 B[
h,>Zh,>,/(,>(ZB,>,/(/(+-0
` Jp4J%XZ(<72+%W p.Z@
4(ZPh(=2%TO+%Y@/(+-0Zb4X%^*( 0J+,%K+ 
% ,3J( @

 .3J(!@A

aL+ JtS0 Pr,
a 6(!ZXz("+-0
  Jp [

p.
 Jp2tp+& P Np 8,>(",>,,'/(4:&	S(GH` p h
[p,>,>,/( [

.

 Lp2rp+%} 
H Jp,>(#,>,,'/(4z%|Z`H9%w (# Pr, ZpZXHh[

8

QLhQXh
XZ`9%l 
B ( Np[p,>,>,/(,>(,>B,/(/(+-0 ($ ( H	t 6,>Ip,Ak/(4Z&,>($,N/(4:&,>,+& (% ( Z	t=6&

,>(,6?/(+,>(%,/(,~-0
X
,>Z

P
,>,>(,6?/(&Z
P
2J%+&#,>mZP
,>,>(,6?/(&Z,>,PT/(aZ+&*Z0H
Q0	,>,>(,6?/(+&N,>(&,>,,k/(4:&N (
QHr,  
p JX 

p LXQVpXTp RpZb Np (' Pn Pr ('XHr, 6Jp+&8[b+&9 QZX:oXRXXTX
[PZP8XPP (QHr,QZPQVhXRh `
 `
QTXQRX7J`+&G ` PXNX[,>,>,/(+&H "XNX[,>,>,/(,>o,
?/(Z,>,W/(/(+-0.( B Hp
 
	q Jp,>Iq,Ak/(0Z+&V p N	q+&n 	q 8ap+&[ p H	q,>(,6?/(+& p
 HB  
X Jp
[

,>,>,/(Zb Np@@	rO@" n Pp@@%@@n 	q8((4X&j,>,N/(5:&j p N	q p Pn+&n 	qZ

h,05:&o p Pn p H	qO+& p P	qZb6Hp+&s[bXZb+&tXHb,( 0L+&w,>(,6?/( p Pn (( Hn Hr 
('XJr,  

p
XLX
XXX.()0NXV0Z``
@/(+-0

,>,>,/(+'  

() Ln Lr ('XNr, ZXPXZQHXZ
XJX B 

`XLX
 .(*0NXVP((*0H+',>(,6C/([

,>,>,/(@+-0
('XJr,  

B Lp &XN`
 0QV`,>,G/([` 0QPr,  (h(* *pBJP 
&XJPS.GNPXVP
QT`.(+0NXXX p[h.0
QPr,  p h[h8 HP.4
[h42'B 
.
 ( Np 

8
 LpZ8 Pp @
 H8
 L@
 
.
 P( < Np7(p+'B. 
  ( Pp p @
2Nh
+'A,>h
,>(,6?/(>p+':=2'1/4
XT`[,>,>,/([
B,>,>B,/(/(+-06?/(+(,>(,6C/(7L%+'[ 	qZ0h,>,>(,6?/(,>(,>,,'/(4:(
 J&,>(-,N/(5:'s@@& p .n(-S0
BPXZB4P(
 B ZP4H(
,(.1LS+(
@[B Np2rp+(
 .  *(,4J(
 P
 PpZP4T'r6X
,HP
,PX
9'k,'@@&@+(N/(4:(
,B,X/[.@Pp2rp+(HZ`HXXH((/0H+(S:GZH9',(/0L9'S0GPH9',>p,>,[/(64+(O+(
 hhp<0(


X<X
X`[Mc@
exu<`
`@000PP0X

P

P
"

X00P

&`
RECORDFILE-0(B+(D+(J+(X+(g+(t+(v7J#+(;@@#+(=,>Iq,Ak/)D Z#3V#+(~,>\)d #,>l)d,>)@,6?/)D+(~,>,(1/)D5:(~+(v *)A.
 Jp2rp+(~,>,(1/)D4:(v9(F6J#+(MO@#,>Iq,Ak/)D Z# . #(N@  ()A. Hp2rp+(U 
A
L*4J(U +(V9(QO5:(f,>,(/)D+(~6J#+(\O@#,>Iq,Ak/)D Z# . #(N@  ()A. Hp2rp+(d 
A
L*4J(c +(d9(`O5:(f@+(~,>+(B,>,(1/)D4:(v6L#+(lO@#,>Iq,Ak/)D Z# #0P+(o@@#+(g *0P@
 ,0P@

G
aJ+(g+(~,>,(1/)D5:(wO+(~6L#+(zO@#,>Iq,Ak/)D Z# 0 #(P   d*A5Z(t/)D+-0.)E@@p
 w 
$* Jp 

p`L+)(L Lp:p
+) p
,>l)d #,>l)d,>)A,6?/)D:p
 p(Z Zp4Z) p`H+)(H Hp:p
+) p
,>l)d,>)B,6?/)E>	p+)	O/)E+-0.)D (QHr, Zp
 
p
Q*A` J

p
.,L/)D5:)@+)5Z 
)F Jn Jr 

)FXLr, 6Np+)'[bXZb+)'XNb[`
5H)*,>)B,6?/)D 

p
QL` p
XN`6Pe+).XXeQXe+)/QX@XXe 
p
&*/,"Lp
3l)G+)5,>p
Z(QHr,3Z4
*K'

0 {ILLEGAL CHARACTER"$"
LITSTRING"("")"END OF STATEMENT"+"",""-"".""/"
CONSTANT"A""D""E""F""G""I""L""O""P""R""T""X"

)H
)J
)K
)M
)N
)O
)Q
)R
)S
)T
)U
)V
)X
)Y
)Z
)[
)\
)]
)^
)_
)`
)a
)b
)c$

0
p
0
 @P
@
 

P


 `

0
`
0@0
0@`00
p
@

p
0p

 

0P`
00
p
@



 0

@
  p

`

`
p	
`	
P



0


0 

0@
P

p 

0


@`$}'}'}'}'}'}' 

  ` `}' `\p
}'
 `\

`
@ `\@\
`hpx





 
(
0
8

FORMSTA 	q*,0J+*Q,>&,!x/,4:*R:" Z@B@,~-0 	qZ
 1J"h+*[ "Z8B `
 P%*,0J+*[,>&,!x/, Z&4:*[@+(,.(S
,,.,(L.
.,..(N.
0,.., :	>,~-0
,>In,Ak/,:" Z# Z B[
#1J+*q0J
+*n,>, &Z0h
Q0	,>,>,+*o,>@T,>,@T,>,,6?/,+Z#Z`S. Nr,XZ` XVP `
 PP
,*\ Z`
S(GHP (
h,*, j, @+ , H	t,>Ip,Ak/,5Z*O,~@,~ ( H	r@,~@@	r@,~-0.,! ( H	t,>Io,Ak/, Zp
O@p *$2Jp
++:p 8 ,++ ,)2Lp
++:p 8
 ,++ ."2Np
++:p 8

q,++x0!2Pp
++:p8,++(&2Hp
++:p8,++;@p++V	t,>Ip,Ak/,5Z+,>,,6?/,++! X
 +0J++/,>,,6C/,++/\` + p sXP8+++> ( H	t,>Io,Ak/, Zp
4Z+?", .lp
3,p++? p sXH@+[
@+0J++<,>,,6C/,++<\`@+:p3np
++7@++@,>,,6?/,/,!+ , H	t,>Ip,Ak/,5Z+F,>,,6?/,,~@,~-0.,![#0H++] 

"<

 Lp . N	t,>Io,Ak/,4Z+[:" * J B Hp
@@#,X4:+i[#1N++P[
#1J++W,>@[,>,@T,>,,6?/,,>p
,C/,,>p
,C/,++\:"@@ B,>p,C/, , L	t,>Io,Ak/,5Z+j 0 P	t,>Io,Ak/,5Z+j 
	qZ

(0L++i,~,>,[,>l@T,>,,6?/,++jO/,!+-0., "  B,>,!,>,,y/,!4:, 

`al++r :++r :z," " Np
O@#,~ Z#l [# (1P@ *1P@
A ,1P
@

AaH+,:" * J8B,X5:,	+,:" *
 J8B 0 P	r,~:

" Z0B[1H+,,>@V,>$@T,>,,6?/,+,,~ Z#[#0N+, "1p{++t,>p
,C/, " Zp
++tO@#,>p
,C/,@/,+@	`

	>

	>

	>

	>
,#
.
:>N,>',>S,>:,>\,>)
08
4H,%
'
,&$ 

P`P

`
DIMENSIONEDTO
" OR #-0,> aH +,+,>w,>4v,O/4v w 
w~[

,52[hA

7X+,F ((H(A(O .0H@,4w 00L@G *1X@
GaN+,F w~ ,1H@

G

 *1X@
 .1X
@A
 (1X@A
G

aL+,F (p,BO/2",>L59Z.h
Q.	,>+,h@ w~+@$,H+,e+,O+,O+,O+,R+,O+,b@+,U+,Z+,R+,Z+,_+,b+,O 
w.4w1N+,d 4\+,e 
w.4w0N
+,d 4\+,e 
w.4x,4xHaN+,d,>(
,>4],6?/4v+,j 
w.4w ,0N
@

04xD

aL+,d+,d 
w (`n+,d @T+,e 
w.4w1N
74]@4Z,j,> wZ,8
Q,	,>,>4^,6?/4y+,j@,^+-0,>w,PT/4yaZ+,q 	q*4z5J,q,>4^,6?/4y wS( GHh aH +,v,>,>4v,O/4v,>w~,>w,,/4v+-0 aH +,},>w,>4z,O/4v,>w~,>w,,/4v+-0.4y@ w~+@$-+-.+-+-+-+-@+-, 
w,4w .0L
@04{GaN+- 4_+-. 
w,4w .1L@04{GaN+- 4_+-. 
w,4w1L
+- 4`+-. 
w,4w0L
+-[(A07Z+- 

(al+-,>4`+-,>4aZ.(
Q.	,>,>4a,6?/4y@+-.04w (0P
@,4xM[(A.} 01N@G,4{GaH+-' 4b+-. Jp (an+-* :+-+ : pz4|+- 
w (+-54Z-3,> 

wZ.0
Q.	,>,>4b,6?/4y+-54wS,BLh@/4y+-0-?,>4c,6C/4y@+. h
 `,>4v,>,/4v 8D [. Pp2rp+-q8 H0H+-k 

HX L`,>4},>,,'/4v4:.04~0P+-OS*GJ`[
P5J-W.4~ 01N@(4~ *1H@
AaP+-c :
z4~+-c .n4~[P PpZ@5H-c7,@+-c P
 NtS( Hr, Zp *j4 0
p4S,BLh p 

pXLhS.GNP.4w0N+-oZZ
p2H+-oZ.P
Q.	,>,>4c,6?/4v+-ol ,4w0L+-n,>4d,6C/4y@@` 

H1l
89-F[,>,>,/4v@@C/4d 2D .(D/(
 Hp2rp+. 
H Jp4J. 8 Np p @ Hp4H.
 p 

 
2Lh
+.
,>h
,>4e,6?/4v+.:

p4..D82L+-{9-w.XD.8
QXr,4.X.<6Q6C*6`5PnPr5XHr,.7*&+.pS.
GNhj4 s0N+.\`X p  QHh Z  pS(GHhXZX
XTX[w,>,>w,/4v@/4|+-0
 '8
j '  2
&4)V}=2.. 

w[.45JNtS0 Pr,
a 6Hw+.5 ,l5
 + $Z(h
Q(	,>,>4f,6?/4v,~-0 w,>h
,>4f,6?/4v+-0,> (
QHr, 7J	sQR	sZ	sXNHXR	s wXPH 	oQZH,^+-0

+.K :
XZD+.L ,XLDZ`D@@D@@C w[

w.

w Lp2rp+/b@@p@@pZ` H7NP+.V P1H
O@p.4
+.V8 P(50H+/+ 

P
+@4.Z+/]+.[+/ "QN
 P0P+.l7Jp+.c 5 Nr@@t `"Pu ( Hr,
a 6.`+.f $,>h
,>4g,6?/4v6H`+.k $Z,h
Q,	,>,>4g,6?/4vXX
+.{7Jp+.o $,>h
,>4g,6?/4v.5 Np,>4z,>,,y/4v4:0;(5 *1H
@
,5D
aJ+.y,>,.>/4y pn5S.
GNXX
O@C6JC+/	 5 Nr@@tZD Pu ( Hr,
aXZZ
D"
.jDZ

D$

` Lp3,5+/ $,>h
,>4h,6?/4v pXPD+/]S.GNR`+/] P0N
+/7Hp+/ $,>h
,>4g,6?/4v,5 Lp,>4z,>,,y/4v4:0;05 (1P
@*5DaH+/,>,.>/4y 

pl5S,GLO@C P
 Tp(55H/#7Lp+/# 5 Pr@@t `"Hu * Jr,
a6QX
7LP
+/( P
0P
+/'O@p+/'@@p.4
+/)@@p.4
 P
051P+/,,.6+0; 
P0J
+/=7Np+/1 $,>h
,>4g,6?/4v(5 Hp,>4z,>,,y/4v`Z+0;*5 ,1J
@

.5D

aL+/<,>,.>/4y pp5S0
GPO@C.55N/D7Hp+/D 

5 Lr@@t X"Nu 0 Pr,
a6XV
6HC+/Y 

X2,`+/J $Z0h
Q0	,>,>4g,6?/4v 5 Pr@@tZD Hu * Jr,
aXZZ

D$

`"

.lD X/`ZD8$ Pp305+/W $,>h
,>4h,6?/4v 
pXJD+/ZS,GLR`[

p,>,>p,/4v H[,>,>,/4v[D8QPD.$
9.O7HC+0 ,4w .1L
@ 01L@AaN+/j,>4i,6?/4y+0; $ h`h+/n,>,.>/4y,>5,3/4yXZD,>5,3/4yQZD $ 
haJ+/x 

5 Lr@@t 0
 Pu . Nr,
a+/y "XZF[

D<

7r+0/$
Z5P0[
 *3H"@
,5M
 01R@G
aJ+0,>5,3/4yXZ+0Zc Np7Hp+0 Hp0510
+0 p6,8+0 pZ Z
F2P+0 

pZ0
Z *2H@
[0
 (2N"@A
aJ+0Z0 PpXP:@
+0 pZ

@
 Lp+0,>5,3/4y Zp pXN ( H8
=r/{/$
S*BJS*GJ+0$ 

5 Lr@@t D Nu 0 Pr,
aQZD[

w,>,>w,/4v[D(..
 QDr< 5XPr, .Z`EZcXHEXTcQ4D Tp*4 p $*40J+0:6NC+0; h
 HtS* Jr, ZpS,BLh ,l4 .
n4XZP+0;R`P /5
+-0 w hah
+0BZ*h
Q*	,>,>4i,6?/4v+ 
haj+0H,>4jZ,h
Q,	,>,>4a,6?/4y+ wS*
GJh[
C5J0LXZCQZC+0NCwXNhXNC@+-0
P Jp ( X$ 

s0L+0X ( P&:p+0Y05 P& p6Ph+11 
s+@,0\+1P+0_@@@+0c+1-Z,`
Q,	,>,>4j,>4k,6?/4y+1V[

`4L1' &10

+0i*50*

+1' : Zp+0k*51*

+1' :+0h[`7*X+1
Z

X$

p&,
XLX[X 5 Pr@@t p$&(
 Hu . Nr,
aQZX,5	<

72+1' ( .Z@ Pp 
5 Jr@@t p$&(
 Hu . Nr,
a 

pXZ0=20w+1'ZX 

5 Lr@@t p$&.
 Nu ( Hr,
aXZX*5	1*
+1' Xap
+1'[X2N"+1'ZX>

6L
+1S.GNZc Np7Hp+1! Hp3H+1 p.5
1.
+1 p6, +1 pZ@Z
X2N+1 

pZ0
ZX
2P+1 p[

 
2L"+1 pZ
8 JpXJX:(
+1' 

pZ0
 Pp+16N
+1$S:BZ+1&,>5,3/4y XDX ( H
,>5
,>,,'/4v4:1VS(
GH` &h5>p+1P,>5,>,,'/4v4:1V,>,0</4y+1P h
 
s+@,13+1C+16@@@+19+1>,>4v,>,,'/4v+1B,>4z,>,,'/4v4:1VS.
GN` &n5>p+1C,>4v,>,,'/4v4:1V,>,0</4y4:1V,50L
+1F :z5+1G 0p5 C Pp,>X,.F/4y7$+1V $QDh*5,5

G
aJ+1O,*QZ
 
p JC[
p,>,>p,/4v90R[

w,>,>w,/4v@/5	+-0[`4X1\ 
w2J`+1[ +Z`
+1X w Nt 5

.Pr,v+-0k6N,,y/4v5:1jO@p+1} *QJp+1}6N
.
5Jp2rp+1yHXVHZ`H91v,>p,>,[/4vZp4z1}2.QNp[w,>,>w,/4v p/4v+-0
5 Jr H 

XLps0N
+2@@ (0N@AaP+2Z*0
Q*	,>,>4k,6?/4v pS* GJh 
haj+2Z,h
Q,	,>,>4l,6?/4v+3E * J

X4L2# 0
QPr :+2$@ Zn,  

nl56Np+2)XVpQVp+2*XV8XVp (h5,>H,1`/4yQZX5:2/Z`XO+3G,50L+3E 0BPX 0p5[X Hp[
  Jp 

 `L+2<7.(+2; 5 Pr@@tZ( Hu , Lr,
a+2MZ(+2M7.(+2B 5 Pr@@tZ

(&,
 Lu ( Hr,
a+2M 5 Pr,  pZhQH`
 

5 Lr@@t *
 Ju . Nr,
aXZ`
S0GP` 00XP`XV` XZX
+3E@@p H X7JX+2}[0N+2S,>4l+2h[.  
` Jp 

5 Lr Ln 5XNr,  0p5,*QZ`
 Zp (
XHh
QXh
 p7Jh+2`,>4m+2h p h Np Np050P+2e*51J+2f,>4m+2h p*41J+2j,>4n,6?/4y+3G6Ns+2m:" 
p J B+2o,>4z,>p,,k/4v4:3G,>p,PT/4yaZ+2u pZ(h
Q(	,>,>4n+35 (
QHr, Zp 
p Jh 

p LhQZp pXNp p Pp[/(
Q,>,2
/4y Zp5:3 Zp7PX+3,>p,PD/4y p+3G7PX+3@,>p,PD/4y p[h
 pXXhXXp 
5 Jr Jn 

5XLr, [pXN`QXp 0p5 pXH`
[
  JpZ

 8

XL  .QNr Hp, pQZ@QXh 
pXJh[

p Lp pXN0 X
[,>,>,/4v P6Ps+3,50L+32,50L+32 pQVh P6Hs+3$*50J+3%*51J+3( pZ.h
Q.	,>+34 pQVh6NP
+3+ "XPh+38 P
 `,>4v,>,/4v6Ps+31,50L+32,51L+36 pZ(h
Q(	,>,>4o,6?/4v+3G pZXHh6Ps+3>7l"+3> pZh,>,>,>4o,
/4y>"[

,>,>,/4v6Jp+3C p Zp+3E[pXN(ZpXZp.2
+2 
pj55p/53M,>@V,>@U,>m,>4p,6/5

,~ , L X Nu,@

 >X
[,>,>,/4v 
H
2J5+3Z6NE+3W4VE+3d,>4pZ(H
Q(	,>,>4a+3bH
2N5+3`6HE+3]3VE+3d,>4qZ,H
Q,	,>+3Y,>4qZ(H
Q(	,>,>4b,6?/4y,~@,~-0
GaP+46LD+4(50H
+3~RD s0P
+3{,>5
s1J
74r 4r ZpZ

H LpZ0 Np pZh[
h.3hp+4 p h,5,>,> p,8/4v:
p+4wh+4,>4sZ(H
Q(	,>,>4b,6?/4y+4!,>4sZ.H
Q.	,>+4 P
 `,3H4:4!,55L4![,>,>,/4v+4!7JD+4 ,>4t,6?/4y+4!O@D@/4y+-0

PLp.51N+40,>4tZ(0
Q(	,>,>4b+49 ( H

0L+4:050P
+4:Z*h
Q*	,>,>4u,>4k,6?/4y+4Z7L`
+4B `
 PD @(54H4C,>,>5,>4v,r/4y 

DZ0+4C0P,/4v@@E@@E@@D w7Hh+4V h
 P [

.

Lp2rp+4Sd,>H,3e/4y5:4P@@,>,>,/4v@@

w,>,>w,/4v@/4v+@	`
5,
5.
50

d

5B
5D
5F
5(
5#
d
5G
.8cDfa
Y\T@
p
5L
5N
|*m+
g
A
tC

5O
5Q
5R
,k
,y
5T
5W
l>'
5Y>
8

(((,(
0 F(D(

@0P

Ph

h0 
 `(`((`

`4`X(X

X4XB$@ 8$@X$@@< 
H00X  
`8

8@
 XK: KKF

H

PP0

hXIN EXTERNAL  STATEMENTAS DUMMY PARAMETERIN TYPE STATEMENTIN DATA STATEMENTIN COMMONIN EQUIVALENCEAS AN ENTRY POINT NAMEAS STATEMENT FUNCTIONAS COMMON BLOCKAS NAMELIST AS AN ARRAY OR FUNCTIONAS AN ARRAYAS A FUNCTIONPBPBPwPvPwP@PtpCpv@pwP	
5
5
5
5
5
5!
5"
5#
5&
5(
5*A VARIABLE OR ARRAYA SCALAR VARIABLEAN ARRAYA SUBPROGRAM NAMEi4r[r_rghr
DUMMY
VARIABLE
PARAMETER
PARAMETER
END OR ERR ARRAY OR NAMELIST NAME
ARRAY NAMEk:N@-0.8 w&
 Jp.Hw4H5^,>,5Y/8:
/8+-0 w@ 8)6 8`X
85V5c+-0 w 8)6X
5V5g+ aH+5m7j	},5n>	}@,~ 8 H	~ *j8 

8 L
,>%,5a/8 
	 N
6P	s+5v,>8

,7g/8+5y@@	s[
`8
QJ`R`` * J
[

`,>,5Y/8Z`4N6 (H
Z
`,>,5Y/8@H
:
` , L	},>8,7l/8,>8,7l/8@,~-0.8Zw0(
+6

:

	o0(
O@	p ap
+6

	pl  

	} .2Lw~@  (0P@AaN+6 
r Jp
 , L	m 0QPr,  p
 HrZ'5N6QV'XV'+6[

'XV0QV'+6 8	 
wj8

S,BLX 

w~ LX w~ PX
 w} HX
 .3L	}@ 
 01J@GaN+69,>8	,6G/8  aH+61 

1L+6.,>8	,7l/8>	}7p	},5n>	},>,7l/8,8

aL+69  .0P@D	laN+68,>8,MW/8
&XO@	lO/8+-0,>w},>w~,>w~,>w,6/8+-0,>w~,>w~,>	o,>w,6/8+-0,>w~,>w~,>	o,>w,6/8+-0

8
{Lp08
+6N+8+Z6R+6O+6y+6V+6^+6h+6o+6u+6y:
pZ

w.
(@  2&4.6)V|=26Y 8 2N
pZ

w.
(D.6V+6e04@+6dT
pZ

w.
(Z48Q4A@ 2.0 X
pZ

w.
Z4(Q4A@2.. X

7X+6OX.8 w~ 
$8;Z,/Q,` Lp
Z.pQ.A` Np
 8$, Lp

2xp

+7Dp
  Fp

O@p2Hp

+7	:p2Jp

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

+7:p
w ,8%Z"8Q"A`

 4F7Fp
+7 (2Hp

+7$:p
w<
$*Z"(BQ"A@ $<$7

 4F7 
.(Hp
+7 (Hp
 $
<$7$ 4F7  
.0Pp
+7  02Pp

+71:p$(Z" DQ"@` *-Jp
 $<$7,

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

+7<:p$0Z"@@Q"A@ $<$7;
 5F79+7; 

.,Lp
+76 ,Lp
 02Pp

+7B:p
$8Z"(Q"A`4F7BFp
+7@;@p
&Z
(+(/8+-0 :d@aZ+7P

D,>8,>,7Q/8+@+-0 waH@+7T,>8+7YaH
+7V,>8+7YaH+7X,>8+7YaH+7[,>8,>w~,6}/8@+-0ZwZ
w~/$(,8.8/

&,.<78+7f G< PG5p7e,7Jw~NF=87b@+-0 G< HG5h7j,7J 

wLF@+-0(81H+7o ,A`QLw

w7X+7t G< PG5p7s,7JXF+7o@+,>
,7g/8,~-0 :b@aZ+7}

B,>8,>,7Q/8+@+B<HB5h8
,7wFA,~-0@+-0.8@/8+@	`:	~H	~	~
8


<w~<w0w





 LINE:
BINARY OUTPUT
ASCII OUTPUT
ASCII INPUT

8
8
8
OBJECT
LISTING
SOURCE

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

DDT EXECUTION:
@	`-0 w&(A 7Vd>e+< w(N.=
 Nw 8(2N+<zZd>e+7Vd>d+< 8.2Nw+<Zd>d+@+@	` AP




PP X((

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

88888888888888888888888888(@@@@@@@@@@@@@@@@@@@@@@@@@@PHHHM

















S-TB ASSIGNMENT+T' IFD'JSTFN OR ARRAY ASSIGNMENT-ST& DOdOe END STATEMENT FUNCTION*QT&O IFARGUMENTAN ARRAY@\b PUNCH
5L' DATA@\= PRINT5"a SUBROUTINE\w OPEN4"P INTEGER4"T LOGICALE%Z IMPLICITP\ FINDT  CALL'0\ REWIND%$# PARAMETER@\w REREAD"Ta GOTOu,#\ DIMENSIONT PAUSET\ RETURN4"V DOUBLEPRECISION
) FORMATl! INCLUDE\ BACK3T"h ENTRY%,$ EQUIVALENCE$\t DECODE	U<%g NAMELIST@\Z ACCEPT

#K BLOCKDATA\W READ'0\& UNLOAD5"Z FUNCTION\y CLOSE'0\ ENDFILE4"R REAL\&
 SKIP\i WRITEE<%- EXTERNALe,#b COMMON$\q ENCODE4"X COMPLEXTr CONTINUE@TH ASSIGN@\D TYPET
 STOP# PROGRAMA
>
> 
>"
>#
>%
>'
>(
>*
>+
>-
>.
>0
>2
>3
>5
>7
>8
>:
><
>>
>?
>A
>B
>D
>F
>G
>I
>K
>L
>N
>O
>Q
>R
>T
>U
>W
>X
>Z
>[
>]
>^
>`
>a
>c-0.@. 	} Hp 
	z Jp
 

	{ Lp
 	r 8
/	n Pp 	r 
 /
p J	} 

 
/

p L	z  
/p N	{ 0 P	j,M' 
	r 

(XL	r5L?,@@	r p N	} p
 P	z 
p
 J	{@/@.+-0.@/ r Hp
 *QJr, Zp 

p
 Lr p@@8 	} P8 	z H8
 
	{ J8
6L	r+?FQN	rXN	r@+?Gn	rQN	r /@/+ 	z H	m 
	} J 

	z L 	{ N	n@,~ 	m H	z,>@+,I|/@/ 
 J	} 

8

 L	z 	n N	{@@	r@,~-0.@/ w<&(.(
 Hp0h
+?Z :+?[.(
 QZr .XNr, Zp
 pQPh *
XJhS(GHh p
/@/+-0.@/Zw~@@  w~ 
w~/
<
QJh w/w~<,> w~.:
,>,/@/@/@/+-0 aH +?q,>%,>@0,O/@/ 
@0 Jr 

% Lt,
a [`
4V?y[X
,>Z`
,>,>m,>@,,6/@.+@ 	q(@10H
+@ 

`al
+@,>%,>m,>@,,6/@1+@S.GN` Xn+@ 

`al+@,>%,>m,>@-+?~S.
GN` XnZ`4N@ 	q 
 aj+@,>@-,6?/@/@+-0@@	r *6hu@
 ,1hO@

G
aJ+@,>@.,6?/@/@@u aN +@,>u,>@2,O/@/ u Pt @0 Hr,
a  

	q6@2 *0V@
D
aJ+@$ `an
+@",>t,>@-,6?/@/+@)S0GP`+@) `an+@(,>t,>@,,6?/@/+@)S0
GP`@@ +@	`	z
<o/
9 

0
$@
$0
0(
UNKNOWN
IDENTIFIER
CONSTANT
LIT STRINGLABEL
STATEMENT END
RELATIONAL OP
.NOT.
.AND..OR.
.EQV. OR .XOR.
"**" OR "^""&""("")"":" ",""$""-""/""+""*""="

@5
@6
@8
@:
@<
@=
@?
@A
@B
@D
@E
@G
@I
@J
@K
@L
@M
@N
@O
@P
@Q
@R
@SE0OT8.NE.EORO.NOT.ND@.AND.RH.OR.ORP
.XOR.QVPQ0
.EQ. OR .EQV.T0E0.GT. OR .GE.T0E0
.LT. OR .LE.RUE.TRUE.ALSE.FALSE.

ACTION	
STATE	-0.HL 	z *1H$@
,HMD
 	mG	lA
aJ+A+,>HM,MW/HL@@	mZ' Pp
Zp
4HA+ p
 
8`j+A*:HN,>l8?,>,6G/HN 
&` p
S0GPh p
 h+A! 	} P	o@@	l 	z H	k Pm 

	z L	j 	{ N	k@@%@@

@/HL+-0.HN 	z HpZ*pQ*	,>,I|/HL ,0F@

 .0F@G

aL+A=	z+A7[=1B
+AF@hp`p 
	z2Jp+A>1B+AF r Pp
,>	},>H#,6;/HN p
 Zr /HN+0F+AP 
	z J	n J	{	z , L	s aN+AO,>HO,7g/HL,5n :,~@,~0F+AX	z[=1B
+AW,A31Z
+AW :,~ : Z
@,~@@$ L	z H$ N	z0	z P	,>H$,Ak/HL,~ 

	{`L+Ab . N	} .A N	 	{ P	 	z3H	+Ag ,L	+Ad	0	0P+Aj
	{

	z :,~-0
.HL@@ 	 w6H`+Ao[=+ApZ= 

	} L	o$+@Ar+Aq+B6+BN+C+B]+B_+Bc+Bl+By+C+C+C+C+C+C+C!+C$+C++C,+C/+C;+C@+CB+CL+CS+Ci+CU+Ch+Cm+Cr+Cu+C|+C}+D
+D+D+D+D+D+D+D+D+D+D+D%+D4+D(+D++D,+D2+D7+D8+D9+D;+D<+D@+DC+DE+DG+DH+DK+DR+DT+DV+DY+Da+Dj+Dt+D{+D~+E+E

+E+E+E+E"+E-+E/+E0+E1+E3+E6+E9+E:+E>+EA+EH+EL+ES+EV+E^+Ec+Ee+Ek+E{+F+F

+H@5FB9	z7F+B66J`+E,+D?0F
j	z 

	yQ,A` L	z	z 6P`+BA[=+AqZ=+AqZ	z3H	y+BD "+Aq,K] 1F@+BH6N`+E,+D?,Lr,Ki 0F@+BM,>,>H%,L`/HN 6P`+E,+D?1B+E0F+BQ>	z+H 	z 
 aJ+BV,>H%,J/HL Z	}+BZ 

`L+BX.N	},>H%,I|/HL,AL	.$N	z	zP	{+E".An	z+C 1F$+Ba F	Z*=+H! H& $+Aq0B+Be F	Z*H+H!F

@GaN+BwaH+Bt,>m,>H&,6/HN@@

+Bw,>H',>m,>H',6/HO 
 

H(L(:+E$..
/.NF1B
+C,A30Z
+C
> @+Aq> 8+BM0F+C	z[=1B
+C,A31Z
+C 
`0J+AqZ= 02NHP@+Aq 
aP+C@@
+C ( H	j,M' 0$ P	z 	z H	{ 
 X(:

+Dz1F@+E,A 	z0P$+D) H(+H H)@@ $+Aq> 86P`+H+H7N+C# $!+Aq $+Aq.	z 01N@ (0FA@AaP+Gf 
	l J	o+Gf F	 +H!0F+C.>	z+H $	+Aq 	} N	l 	z @aH+C6,>H%,J/HL Z	} 
	z J	{	z+C7:
	}7J+C9Z= 	{ N	n H)+Aq1F+D 0! P	z>  6J`+H+H 	z0N!+H H*+H0F@+CD $+Aq 	j P	z 	k H	z 
m J	}1H$+CJ 	k3N	{,M'@@	l 	k N	{+CR0F@+CQ 	z00#+E,>H%,I|/HL,M'+E 	z0P$,M',A+E  X8:+Cz2XH*+CX : Z+CX@@ (6P%@ ,7J

@

AaH+C_,>m,>H+,6/HN@@	q . N@@

 Fr 	z P	m,>H+,I|/HL 
	} J 

	z8

 L 	{ H	n H,+H0F+Ck &A "+Aq 0 P

 $+Aq,>
,>	},>H,,6/HO .n	z  H(+F% . N
+Cz `N+C{ 0 P
H- J :

DH-+HHH.+H@@`+H+H .$ N	z 	n P	z0F@ &A ">
 (+Aq 07N%@ *7H

@
GaP+D6/HO $+Aq H0+H,AQ Zp,AHGp`Z+D5+D aN+D H1+H $+Aq H.+Aq@@%@@

,>
,>	},>H1,6/HO .n	z H2+D? 	z1N!+D$+H H2+H . N

+%$0.
/0 P% 	z0H!+H H3+H,>	},>H3,6;/HN+D)0F+D* H4+H $+Aq .  N	z+D4 H41F+D1,>	},>H3,6;/HN 0!+D1 0  P	z+H,AQ`Z+D5 H4+Aq `0N+Aq+E,/&+BF H4 
+DJ[= H5+Aq:
6L`+Aq[=+Aq6N N H5+H0F+H@@+EKZ= H6+Aq $..
/. N+H H61F,+H 00F$@ *7h@
AaP+Aq H6+H?N+EK+H".An	z "+Aq  X8: H6@@

@ *7H
AaP+D_,>m,>H7,6/HN@@

>

0+Aq0B+Dd,>H7,6?/HL+HF

*H L+H 

aN+H0B+Do,>m,>H7,6/HN+Ds,>
,>	},>H,,6/HO (h	z@@

+H0F+Dv	z+Aq7P,?: *$ J	z 

	z L	{  X8: H8+H . N

6P+E H(+EU . N

7P+E H8 : Z+EU  
H( J :

 H9+EU 	m N	z  P	}  H	z 
	nJ	{@@H+H3V
+H5VE F	 :J+H! 	q0H>0+E@@	q+EQ,>m,>H9,6/HN7L+E F	 :+H!  H( H@:
 H9+Aq H:+Aq 	q1N>0+ER (> H	q H8 *Jj+EU r(N.
 Nr H:+H r 00N$c@ (0F@AaP+E+ 
 

H;HL(:=H6A(H"'+EG+H;+H2.>+E9 .>+E97NR $!+Aq r(N.
 Nr H<+H r(N.
 Nr,>,<r/HL Z	q4ZEG H=+H H:+H . N
H6+H07N"+Aq2XH<+ER $$+Aq $++Aq 	qZ08Q0Q` P H> $"+Aq6N	r,?&,>
,>	},>H,,6/HO (h	zS* J 

 H8 N0:+F& 0z+EaS +F61Z

7HQ+Eq+F6 B H>+H F	 0z+EhS +H!0Z+Ej HQ+H! HR+H! $- /.
+@<En+F6+Ep+Er+Ew+Ey@0F+AqS:+F6 /0
+@DEt+F6+Aq HR HS HS@+Aq0F+Aq HS+F60F+Aq HS+F6Z
 Nr 0 P 
/( H H?+H?.+F (V.6p V+H 2HHT+H 

	qZ0 00N @  *2HHT@
A`P+H,>,>H?,6C/HN+H7n+F$. (Z8 Zt+F  Ht @3 Hr,
a 
haj@+F,>HUZ

,>,,y/HN+F[Q:+F[ H@+H@@tO@s@@@@ @4 Nr 0
 Pr  
H@ J :

+G
,>HA,>
,>HA,6?/HOS. N  H8 H@:
 H9+H HB @\ N5NH $1+Aq3V
+H 00V@ (0F@AaP+F7 
6:(+F6 @4 Nr ( Hr@@t 8 Pu,
aQ:
 Z+H *
.j .6L(@ (0V@GaN+F> $2+Aq0 +F* 7P8+FB:
+F?Z8,>,>
,>HA,6?/HO 

 H8 P0: H9S( H+H@@t@@s@@@@ @4 Nr  HB H@:
+G
 07N@(HCGaP+FU,>HC,6?/HL @4 Zr 
 Ju@@t7L	r+FY,@

Q:+F[ ( Hr,
aQ:
 F	+H!3XH@+Fh6P	r+G0F$+Fh,>,?U/HLXZ ,
QLZZ08
Q0A` P &(/*"J3JHU@@ HD+H@@0F"+Fk (

 Hr+G0F"+Fm *
 Jr+G2XH@+G+G"  AHV5NFz s.ht )
 T V).t.dv: V 
/6.dv: V+H6Hs+H:t+H .
 Nr HD+HO@s  H@ P8: HE+Aq,b  Nt  Pu+Gc@@0F"+G 0

wPr+HE+H0F"+G,?H+HF+H,>H%,I|/HL;	z,?M,&,"?/HLq@4Hr+G"6N	r,?&
/(HHG+HF

@@0+GC,>HV,?U/HLXZ .
QN Z(@
Q(A` HA0.0 P+G;ZZ2N+G7 *QJr, ,.l0F+G9 HH+HF+H0F+G<F HI+H0HI1P+G? *J+G<Z

,>Z,>Z,>,?b/HO H8+Aq@@@@@@ HJ+H,>HJ,>
,>HA,6?/HO  H8 P8: H9S* J+Aq HK0F+GPO@+H1F+H $=+Aq HK  1&+GW,>HL,>
,>HA,6?/HO &)T
 .
/0  T+Fy7N+G]"h"z7H+G_ :+G_ : Zr 

 Lt  Nu @4 Pr F	,
a.HW+H!,>H7,6?/HL F	S:+H! 	t0N+Gk0B+Gp+Gm0N+Gn0B+Gp F+H2N
+Gp ,+Di0FA+H*	z1J+H 	l N	o+H7N	t+G{ N@@	t3F+Gz0FA+H,	z1L+H+Gr,?H+H3F+H5VH6L	r,?& F	 :+H!,?M	z>

	z+H@@@@@@ $>+Aq0F+H $;+Aq F	@+H!F

*:+H.	z 01N@ (0FA@AaP+H 
	lJ	oF	Z*?+H!F H H8+H7N	z+H>	z	z+E,6J	z+H 3XH-+H   X@:6H->	z	z+D?/HL+@	`[:$$

HX


	z$$

I
'
Ir'6$

I$$

I6$

I6$

I+$

H^$

I
9	m6$

I;
6$

H^6$

HX$$

Hd
It'
Iu6$

Hd$

H^
$

Hd6$

Hj$

HdU$

HX$

Hj$

Hj$$

Hj$

I+6$

Hp
$<$$

H^$

HX$

I
*$$

I;$$

Hp$

I;$

I;6$

IL$

IL$$

IL$

IL$

Hp6$

I\$

Hp'6$

Hv6$

H|
Iv
$$

Hv$$

I\F $$

I$

Hv$

Hv$

H|$$

H|$

H|6$

I$

I$

I$

I<6$

I
Iy$$

I$

I
I{D$@8


"g"0000
0
0I5R}|2B@ 

@  @.a(aDAFa(a(a(	a(a(A@`a(8PHRc`@P8PbPP8P8P`8P@@

p@
C@r`@@@H@.!

, 
D
Q

/Y

/

/b$

/
8.@,`
@P@
F 6&)R5f 6

#F(6a8.A0,`
D@
y^8g	b8q`8

&q`8
`8a8.!n<chz<@PG!n<g!n<G!n<g!n<g!n<g)|<g!n<A0`@P@gQzaxGQz

GQzGQza8.h `>d>`> h h h 

#
 h `>a8> 
(ch@P@(
(
`(
(

 (
(`(R
B90 
BH>

C>
B0>

B8>

B1L
B9:
Cb`X>
A`>
B92

B92
B92 
B92

B92

Aa2

B92

Aa2

B92

Aa4

B94

B94

B94

B92

B9@

B80

B9l
B9r

Aa:
Ai:
B92
	
(>A(>
a(>	
(>
	
(>
	
(>	
(>

!(>
(,
(
(>	
(>
	
(>	
(>	
(>
	
(>
(>
	
(>

(>
	
(>

(>
	
(>
	
(>
	
(>
	
(>
	
(>
	
(>

	
(>	
(>

(>	!(>	
(>
!"`
D!@
d!`
 

 
d!a8.d!dy'd!d!d!d!d!d!d!d!A(d!d!d!d!d!d!d! 
 
d!!"`
D!@
E9.!@.#@.*@.E9,)a8.E9.!E).'!!E9.!%9.!E9.!E9.!E9.!E9.!E9.!DA$E9.!E9.!E9.!E9.!9.

E9.!E9.!@.*@.*E9.!B`>@P>@>f:axfB
cbf:a8>f:f:f:f:f:f:f:f:f:::::f:fRa@0f9df:fB
fB
f:6$

I$

I$$

I+$

I+6$

I$$

I$

I$

I\$

I
STSKIP
LEXICALNULLDOTTED OPERATOR
OCTAL DIGIT
OCTAL DIGIT-0 w*N3,N4.
 0Z+J 0pN3Z

 <

XL +JzN3@+-0.N4@ w *A`QJ  6 

w0/.  008@ (1x@GaP+J3XN5+J,>	},>N),6;/N5@ 
$*.
 =6J Zp
 

w0 0X?+J Z	z2P	y+J ,K] 0X@+J ,Lr,Ki 0X@+J ,>N6,>N6,L`/N5 1X+J5 
w 

( 0 (2NN6@ *6Pp
@
AaH+J3 

w 08XN0 0A`QP0 * J	s aH+J/,>N7,7g/N4,5n w 

8 0aP+J5,>,J/N4+J6,>w,I|/N47p
@/N4+-0,> N* H
 *J
7XL+J@,>,5a/N4RM4XJ@ 0P
,>,5a/N4 .N
,>N7,5f/N4,>N8,5f/N4 /@ 0 P
(6
)6,>,5Y/N4@)64XJK 
.* J
[4XJP .N
,>,5Y/N4 0P
@S)6
4XJT 0P
,>,5Y/N4 aP+JW,>N8+JW,>N9,5f/N4 

aL+J[,>N9,5f/N4 ah
+J^,>N:,5f/N4 
aJ +Ja,>N:,5f/N4 an+Jd,>N;,5f/N4 aP+Jg,>N;,5f/N4 

aL+Jj,>N<,5f/N4 aH+Jm,>N<,5f/N4 
aJ
+Jp,>N=,5f/N4 an
+Js,>N=,5f/N4 AN>4PK,>N>,5f/N4 ah+Jy *!J
 
aJ+J{ .*N
 aN
+J~ 0&P
 aP
+K ,"L
 

aL+K ($H
 (H
 (H
 * J
	v &.8 ,>,5Y/N4 

&,  &( ,NI,>,5f/N4 &0.0  ,>,5Y/N4 .N
	v	 

&

N? ,>,5Y/N4 (H
 
&
N?  &0
j0 08+K (H
,>,5Y/N4,>N?,5f/N4 (H
 

 J
	,^+-0 aH+K%

H+K&

FaX +K8 
`J@+K7,w 

`L+K7 (  N(OF@4ZK1,K"0Z@+K1l V(+K7 	v.2((+K5,>	l,>N*,>N+,6/N@ V(,J7+KAl :@+aX+K:,>N6+K@aX+K<,>N@+K@aX
+K>,>NA+K@aX@+KA,>NA,>NA,6}/N5 :+-0Z	zZ
	y3H+KG,>N+,>m,>N,,6/N@:NB.:
$:ZhAZ8Z	y.  (B<3v+KO , L	x :@+:NB.:
$:Z

hA8

 SZ	y. *8_"(
 HX V	y@@	x*	z7@+@,~-0.N4@/N4+@,~ aH+K` :@,~6J	x+Kh aN+KeOH@4ZKh@+KgOF@4ZKh,K"0Z@,KB,~,KB,~-0Z	k H@@	{ *N,"
Z, .N,nNB.*jNC05PKr=K *0n@
Z

	k0NC (0P@A
.N,"Z00(N,hND..nND, (0L@A
`J=K.N,0N+L18+L7J`=K0NE0P+L X . N	{+L@@	{:NB.:
$:ZhAZ@Z	y/ 2x+L@@	i+L 
/
QJ	iQJr,XZ	iX	i 

QZ	i[	i. *6g *"
.jZ

	y/
"J	y".p	z".h	k".n	j".z	{+-0,> 2h(+L8 0z,

\	z,

\+LO,^+@,~-0.N4Z	y0H+L@ 

aL+L/ ( Np
6P P(OH@4ZL+,K"1Z@+L_6L+L. p
 Z+L; p
 P(+L; ( NOF@4ZL4,K"1Z@+L_ 	v.2((+L8,>	l,>N-,>N-,6/N@ 

	v.

 L(,L@@@@	z 6:NB.:
$:ZhAZ8 .0 P	y+LO@@7L	i+LIA,S.0 [	i.( *8_[	i<,>,>,/N5+LO 6:NB.:
$:ZhAZ@/".( H5(LO@@ :NB.:
$:Z

hA8

  .Q0NB.0
$0Z@AZ Z
.
Z

/
 *8_".
 NXZ	y3V+L_,>N.,>m,>N.,6/N@,AY/N4+-07Hw~+Le6L+Ld :/+@@ :A+ 

w7N0+Li,>	l,>N/,6/N5 w@@  *$ J	k 	{ N	j N	k,Lr 

	{ L,Ki0Z@+,>N/,>N0,6?/N5@@	x+-0Z	k(N,0H< .6L`@ 01x@A`N+Lt0x+L{ :@+ 
/* J 

	y/

., S.0 *8_".n	k".h	z"
.j	{"

.l	j".p	m".n	n".h	n"
.j"

.l	y"0
 P0@+-0,>.N@ Bp
 Dp Fp w 8&" $)$|=8M F	| p
 p p@/N@,^+-0Z'4HM& ',NE,>48?,>,6G/N5  aN+M7p	},5n>

	},>,7l/N4 '*NFB
w`J
&`Z' 

' 0 H',>NA,>,/N5+MO+-0.N4 	lG	m*NFD,NGDaH+M/,>N6,MW/N4 : Zp
+M0@@p
 aN+MQ7p	},5n,>	},M

/N4,>N0,7l/N4,	z0L+M8>	}+MD0L+M;O@	} : Z	s+MD0L+M? 	}&6
 
	}/
<
 J	}+MD>
	},>	{,>	z,7\/N5,>NG,7g/N4,>NH+MN 	jaN+MO,>N1,I|/N4 	z3P	{+MK,>	{,>,7\/N5`	z,>NG,7g/N4:	z,>,7g/N4+MQ,>	{,>	z,7\/N5@@	mZ'4PMU,>p
,M/N4O@	l@@	j@/N4+-0.N4 	l`H+M] 
m J 

	j L 	k N : Z	l 
	z3J+N' N1 N& 1P$+Mf"
.*#76+Me ,L&=6Mc :$ Z 61
  ,18@

 .0x@A

aL+N	0&1P+Mn *J& *J&@N& 

'`L+Mt,>,M

/N4
&	|@@'
& N1 P&  H
  .1X@ ,1X@

AaN+Mw  @aH+N
,>N2,J/N4 Z+N:
,>N2,I|/N4 
 Jp
 

	z .2L@ 02J@GaN+Mf+N4XN
X& 2H	z+N7Nw+N p
 P+N=6Mf '`P+N,>,M

/N4
&	| : Z'@H&
& N1 Z&+Mf .6Jw@ 

N1 03L&@AaN+N# '`H+N,>,M

/N4
&	| *J& ,L&@P&
&+N' 'aH+N',>N2,>m,>N3,6/N@@/N4+@	`_:	~
NO'
NQ'<	k
NU'
NV'
NX'
	|
	zH

N['< 0 x

FORTRAN V. /KA /KI/OPT/NOWA/C/S/I/M/E/NOER/L
/D:(mn@	PAGE


<0:0<0`$@hD@D-JAN--FEB--MAR--APR--MAY--JUN--JUL--AUG--SEP--OCT--NOV--DEC-
INSTAT
TRANSFRING
SINPUT
EOPRES
EOPRESTOREOVERFLOW, LINE TOO LONG
BACKTYPE-0
.OS aH +N`,>OT,O/OT ,6J_@

 07N	p@G

 OM *1H@
G

aL+O . N
Z8pQ8A`S0H Pp ON 4.(H=4Nk ,7J	p@

 07N	o@G

aL+OOT6H	p+Nx OU Np OU Pp p.OV Zp+O OV Np OW PpZ

.XHl 
Z*pQ*a` J
,>	p,5Y/OT@N
Z.p,>,OA/OT,>OO,OA/OT6P	o+OS:tx Zp+O
lZ(pQ(A` H
,>,5Y/OT@
J
Z(p,>,OA/OT,>OO+O aH+O,>OP,7l/OTZ*p,>,OA/OT aN+O,>OP,7l/OT,>OQ,OA/OT@/OS+-0 `H+O*OW,OQN
aJ+O@+ 
w0J+O ,>OR+O? OR N
 0 P
@@OX H'+@,O%+O<+O'+O++O.+O2+O8 w~,>h
,5a/OTzOR ,
L
+O< w~,>h
,5a/OTzOR+O< 

OXL',>w~,5Y/OT 

8

lOR .(N
 0
P
+O<,>w~,5Y/OT 

8

lOR .(N
 ,?L
 ."N
@P
,>OS,7l/OT+-0 wZ8 Q8A` 6

0J+OF .n=6OC.OY0OYH`N
'w aH+,>w,7l/OT+@	`
	oH%
OZ
O[
O^
O`
Oa
Od	w
Oe''0%FTNWRN   NO?FTNFTL   B
BD
 FATAL ERRORS AND 
 WARNINGS

[ NO ERRORS DETECTED ]
E aH+Om*Qv0J
+Oi :+Oj : Z	q,>m,>Qj,6/Qv,~ 
	q1J+Ou,>m,>Qj,6;/Qv . N	q Qw Pn Pr QwXHr,,>In+O}7Nn+Ox,r@@n+Oy,>In,Ak/Qx Qw Hn Hr 
QwXJr,,>Io,Ak/Qx:Qx.QyH,>,M/Qx@,~-0Z	s4XPZ`*Qy0J
+P

 X`n+P,>QkZ0X
Q0	,>[`,>,>Qk,6/Qz+P.Qz 01N
@(Q{DaP+P,>X
[
`,>,>Ql,6/Q{S*BJX  h,>Q|,>,/Qv+PO+-0.Q{@@p@@p
 8 `C Hp
4HP- p
[

h
5LP+Zh
0pO+P+6Jp
+P",5j,>Ql,OA/Qx p
Zh
 Np
,>,M

/Qx,>Qm,OA/Qx:p1p
+P+@@p,>Qm,OA/Qx,5j:
	p p
Zh Pp
5PP=8P7Lp
+P1,>Qn,OA/Qxl @/Q{+-0.Qxl ,5j,>Qn,OA/Qx,5jZp Hp[
  Jp,>Qo,OA/Qx 

p[0 Np[8
,>,M

/Qx,>Qo,OA/Qx,>Qp,OA/Qx:	p[
p 

( Lp5LP6@/Qx+-0.Qx wZh".hoZ
p3Z+PO p[h Np[8 Pp[@
,>,>m,>Qp,6/Q{+PS[p 8 Pp 8 HpA(3Hw+PO@/Qx+-07Hp+P[[pZpZ

w2V+PYO+Z`[`5XPW@+-0R`aQ:aX:b*:	v (2h+Pd@@ 2(+PdQ8X *:8 ,P L	 .
 N+ QqQ[8X*87 
QqQ[

8

X . N/*81 Q| P%S( H`O@	}@@d  
/
( Jl , Ld Ndl   L@+-0.Q{Zc Hp7Jp+Q Jp
.Q}1.
+P~ p
6, +P~ 
p
Z(Np
@@8
Hp
Z@
+Pw@/Q{+-0

	w .0,@ 01L@AZ	w *0H@
AaN+Q 

A

Q~ 4TQ`Tl
`Tl`T
l
aT+Ql
`Tl  aH+QO@	}d,>Q~,>Qr,6/Qv,J7dd 
,L"1Z@+Qf,P\ 
( Ja Q Nr , Lr 0 Pu,
a Z"@@nd ,>Im,Ak/Qx0Z+Q+ 
aJ+Q(,!e+Q#6N	q+Q<,>Io,Ak/Qx+Qf 
aJ +Q/,>m,>Q,O/Qv 	q ,0R8

$.	q.Qr40t+Q5 T	q+QB 
/*<
+@,Q7+QB+Q9+Q<+Q=+Q@Z:8,>,>m,>Qs,6;+QB,Oe+QT,>m,>Qs,6/Qv+QT,>Qt,>m,>Qt,6/Q{7J%+QJ 

	q8R0X+QF,?m+QJ0X+QJ,>Qu,>m,>Qu,6/Q{O@"@@#@@	r 

	q8R
4XQO,>,N/Qx4:QT 	qZh, 7Jn+QTZ

(4LQT,>,PD/Qx 

	q0L+Q",P,P,Pv,Kj6Hp,P26N	p+Qa `p+Qa  Hp*Q~ Jp,

<.R
,0 pnQ~ 

p L.R,N\ `P+Qf,L"Za Z(	z+ +Q.R
@/Qv+,Q
,~ 	`I$
R
.\
R	|
R
R	
R

R|
R
U
+
/l
=DR
R'
R8
  D

X 

X4X
[Mc@$@(%P
}~|o(
$8004$0Z@%@
A DUMMY ARRAY

UNDEFINED LABELS





UNTERMINATED DO LOOPS


LINE: 
 CLASSIFICATION - STATEMENT 
STORDER
NON-EXECUTABLE