Trailing-Edge
-
PDP-10 Archives
-
BB-D480G-SB_FORTRAN10_V11.0_short
-
fortb.exe
Click fortb.exe to
see without markup as text/plain
There are 9 other files named fortb.exe in the archive. Click here to see a list.
?p @ ` ?x + E V=v 3 *x $ 8,> Z + @ ,> Z ,> + @ ,> Z ,> ,> + @ ,> Z ,> ,> ,> + @ ,> Z ,> ,> ,> ,> + @ ,^ ,^ ,^ ,^ ,^ ,~ -0 0,
aJ + M " + R " + R " + R " + R " + R " + R@
p0J + \ aN + Y ; <,> , l/ @@ p, [+ a,> , l/ 0 P p+ a,> , l/ . XN ( p0P + b@@ p,
@ + > B p0B + e ^ ; \ <,
, ,
p0L + i : Z p+ B7P j+ B * J p+ B+ >-0 0,> ,> w
# J FS: z + ^ p > h*> o : E z g $ aD + wS, h *> + @@ H, ., l . .. n S0 h *>
& 5 w
1
&(
& 9
& H
& ; b @ ,^ ,^ + >-0 0,> , l/ , l ,> , l/ @ + >-0 0 ( H p, A+ >-0 0, Z L@ + >-0 1, p
.
I/
L J I@ + >-0 1. @ x / + >@ ` : H, H
COPYRIGHT (c) DIGITAL EQUIPMENT CORPORATION 1987
ALL RIGHTS RESERVED.
M?LPM?H@M?H`M?I M?I M?I@M?I` FORTRA FORTB FORTC FORTD FORTE FORTF FORTG ' ( * + - . 0 ?FTNNGS - CANNOT GET SEGMENT - ERROR CODE:
C2` ]>tP u7 M: I' [Z C GVx ] Y& I&h o? m:H eH GS GH S` S g> S q S M7 m: ]> aC Ib mH Sp a0 g& SV Gx G:h I H g G"x o: S g:x iNH C C&` e&h M>x C' G G G; G? G?0 GNh I Ip I?8 IB( I^( I^` K K K@ K> Kb M M&0 M&p M7 M:8 Q Q( S; W_( W_0 Y:( Y>` YO [2p [N` ]h ] ] ]& ]&8 ]&X ]' ]'@ ]2X ]B ]C ]N _( _&x a_ e2 g
g g6 C; g:p gBp gJx gZp i20 m m 0 m&0 m:8 o( qp q? e3@ Y: ]2 G' g? M; mN m; m:0 C S6p [
S: C0 $@ X>x ZB + $ ++ F?FTNUCE User Core Exceeded Illegal Memory Reference Stack exhausted Memory Protection Violation
?Internal Compiler Error
? at location in Phase
?while processing statement $
+H F00000+ A B
& 6 X $ . +`B $ 1`B $ 3
&
& 9 ? "
" `dp + G7@ &+ N
& : @ "
" `dp + L
& < _ F Y&" )D|&" )D|&" )D|&" )D )B G @!$ hP
& X X Y ` V=v+ *x @ $ 8M?H@ + ?Z + ,^ @, A+ ,> @,~ ,^ @, +
,> @,~ ,> Z + @ ,> Z ,> + @ ,> Z ,> ,> + @ ,> Z ,> ,> ,> + @ ,> Z ,> ,> ,> ,> + @ ,^ ,^ ,^ ,^ ,^ ,~ Z< < \ hQ>w8Z<p X @ ` 9C C~0 C&l`C&v@ C2|p C2|t(C6 C6 C6Md C6Md C6|@ C:Mm CNM` CR
,`GF G" G2|p G7RG7TG7YG7CQG7CRG7CTG7N G>u)`G? G? @ G? G?$@GNM` GO- I0 I |`I @I$@I$II
dP I
dSQI
dSTI~0 I~: I~H7IMP IF Iex:I&h I&v@ I2|p I2|t(I6 I6Md I6|@ I:Mm ICy INL{@INM` INMj IO- IR
L@S
NL`S ] SD @SMP SMm SuZS~ SO S:$^ S; S;!h`S? SNDm SNDmSNL{@Yp Y ( Y Y2( Y3 Y>8 Y>: [@ [B [B [&p [&r [&r [> ]&v@ ]?h`]?i ]?j]?l@]? e I a J a K b L Y L Y M Z Q R Q x S T S R U \ N V \ [ Z x [ j ] f ^ O y m k n H ` P H ` t I a v J a w K b w k z y } { p { c | d W } d ~ e W ~ e f sz(
),0 ,0 ,0 ,1x ,1x ,0 ,0 *0 ,0 ,0 ,0 ,0 ,0 ,0 :( +h(
h 0,0 ( ( ( f`
$ ( l
, h 0@0 j
&` z
.n
h 0(0 ( ( h f`
&B &B &B &B :( @ 0:( @ 3:)x @ 5h!| *!x :)x @ 8h!| *!x x :: =n8 l0 h
j( x( D*( :( Gl(ow{}~?ow{}~?ow{}~?ow{}~?ow{}~ H' |I'-0
. 9 ( QH d, 5 Z 6J `+ b X ` X b . XN` OS( @ GH@ A0XP` + wZ b[` 4Ne[` + cZ` 2Hw+ m
QL` wXN` 1N X b OS* @ GJ R`` A(XH` + w[
` 4Lo[` + mZ` 5PxZ
` Jp S, @ BL(
XL` OS0 @ GP8 wXP` A.XN` + {Z` Z
` 3*w+ m+ c/ 9+ -0 . :Z d lN Hp +@l+ @ @ @ @ + + + + + + + + + +
+
@ @ @ + , jd + @ + , Zp
p .
p
( L M5L, j p .p M H@ R` d + , maZ + l M+ MZ@ 4HZ@ Z M+ , j
M p .p Z8 XP0 XL8 d 7 + / :+ -0 d+@$!+ >+ *+ /, ro+ 0, ro, ro, ro, ro, ro, ro, ro, ro, ro, ro, ro+ 2+ ;Z f@ [ f4t-FX 8 =t,
&* '+ 1 fF f7
f&* + >[
g4j7Z g@ 7t + 8FX 8 =t5+ 8 g fF &. + > fF fS
gF
&, #
+ -0 w[
0J + G w 8 @ ( F H * J
3l + HO + . &( 2XX + MZ + 3xX + P 8 Z + F < P + F+ -0 . 9@ @ [w~< Hp 2tp + YZw~. #
h F 9V
&, `X4V`,>X ,>w~, */ :`Z + hZX + [ waH + i
W$* Z,(s : W0n 2+ i,>w~, / 9 ZX `XXHX V`X7 @ / 9+ -0
[ d4hm, 5 Z M
d+@4n+ l+ w+ @ + +
+ @ + >+ C+ E+ K+ L@ + S+ X+ ]+ e@ M cp:,> f, / 9 M Z * j; , l; p0N + lS0 GP + l M f P8 f H8 * j<
cl:@ p<+ l M fXP8 ( h< * J8 + lZ M5N
MXJ XJ M,> f, / 9 M Z
Uaj @ + ,> f,>=, R/ :7X + M.=n>+ M gp>+ , l?
M.?0N + : Z v+ l ( H v+ l7N O+ # MXZ8 + ) MXH OQH O * j@Z` , l;, 5 Z M O MXP8 MXH O
_QJ
_l@ . n;A, 0 1, @ * 0l @
A ( 1L @ A . 0L @ G aP + ;[
)5J9 MXZ )QZ )+ ;
) MXN0 XN )
M `QH( 4HlQJ + l M fQP8 fXH8 @@8
cj:+ l M _p@+ l[ N5NH MXZ NQZ N+ lZ N H N
N
MXL( XL N+ l, ro+ l6N R+ O MXZ RQZ R+ Q MXH8 XH R M
fXJ QJ + l6N )+ V MXZ )QZ )+ l MXH8 XH )+ l6N T+ [ MXZ TQZ T+ l MXH8 XH T+ l M fQX8 [` QP8 (Ah: * j<
f L8 g P8 QN8 + lL g,> , v/ 9 Z M M f H@
f J@
g L@ gnA M+ -0
d+@$o+ '+ x+ |@ + +
+
+
+
+
+
+
+
+
+
+
+ + @ ,> f M,>h , */ :aZ + '+
M,B2L c+ '0B4P
f2L( + ' f2P( + '+
f2L( + '+
MZ
( 2L f+ ' ( `p + ( 8 H( O + , ro+
M
f2L( + '[ g ( 1p @ [
( . 1l @ A aH + ,>( ,> g, */ :+ g : 2P( @ aZ + ' M[` 2P f+ X M+ Z
` 4L Z` + , j MXH` [` QP +
M
f2L( + ' f2P( + '
g2L( + '0C3P g+ @ + -0 p2( (+ +
( L p:
w~.
w2L (+ ."w~.z (+ w~10 + 2
wZ
VXL( XJ V+
wZ
@VXL( XJ@V+ -0 [ d08 + 8Z`V+ 8@ 4V:
X XL`V+ D (.X (
/
( L ^5,D ( v , ) / ( P ^ (/
p2* (+ D ( N p@@X 1X + IZ.X Q Z0X X . *4o + -0
H f
C J d:
, | . nD + -0
( QH d, 5 @@` Z``
w}jD
w}lE w~nA@@` w~QP` wXH` + -0
( QH d, 5 @@` Z``
w}jD
w}lE w~nA@@` w~QP` wXH`
w|XJ` 4Pl.E ( 0N @ *E , 0J @
G aH + lS: GZ` + lXX@ 7Nw+ u*< 0 0J @ ,< ( 0L @ G aP + tS: GZ` + uXX8 + -0 ( QH d, 5 6J 3+ z X 3+ { 4XX8 X 4 . nD 0 pE ( hA
wjF,4S 05(P . (5(H . *6. .F ,> , / 9,> , / 9 Z` :
4 + -0 w.( &( 8
., QL d . XN d, j w PX QXX *! XJX S( GHX + -0 w*;0J + /.;5N +
w,G0L + ( + w0<0P + 8 +
w(G0H + # 0 + w*H0J + & @ + w.H 0 0N @ *; , 0J @
G aP + /[ 7.X + 5 X + w0<0P + 2[8 ` +
w,I0L + 5[( 7` O + -0
w*;0J , ro w}A. (N w~A0 (P . w~AI. N f
w J f
( al + B[( ` + H0J0P + E : Z g+ I.J0N + H ( + D0J P g K P d, |+ -0 @@ Y@@ Z w~ H Z
w J [7, U76 7 Z [, 7 [@ + -0 . :@@ Y@@ Z w~ H Z
w J [7, U77 8.: Z [ Zp , 7 [@ / :+ -0 . :@@ Y@@ Z w~ H Z
w J [7, U78 9.: Z [ Zp , 7 [@ / :+ -0 . : w6J + j6N + j@@ + ~ w608 + n 8 "H8 : Zp + n@@p w,K/, @ Lp 4lu1l + {., lK 8 Z + {6.p + y ( .hp w
h <
Lh + u w p .0 @pL7Np + ~ w
"L / :+ -0 w~
wV(
w~0 w~ w~ w
.
@ J8 ,> , e/ 9+ -0 w~
wv(
w~0 w~ w~ w
@ /
J8 ,> , e/ 9+ -0 . 9 w~6J + 6N + 6J + w~ w
@ J8 @ H8
@ L8 + 6 w6P8 + 6H8 + 6P8 + w~
w~ 0 P 0 N
0 + + w~
w 0 20 + $ + %
` /
X Jp 5J,` X w~@ w~ w~
8 J + 6 p 0P + 2S2 @ RX ` w~8 w~
` Jh + 6 w~
` J8
` L8 ` Z8 / 9+ -0 . L w6 p
w
( Lp ,>w~,>w~Z.p ,> , / M+ -0 . MZ(p ,> ,>w},>w~, / LZ*p ,> ,>w~,>w, / LZ,p ,> Z.p ,> Z0p ,> , 7/ LZ(p ,> ,>w~,>w~, / LZ*p ,> ,>w},>w, / L,>w~Z,p ,> Z.p ,> , / L w} p H@
p J@ p Z@ / M+ -0 . MZ(p ,> ,>w~,>w~, / LZ*p ,> ,>w,>w, / LZ,p ,> Z.p ,> Z0p ,> , / LZ(p ,> ,>w},>w~, / LZ*p ,> ,>w~,>w, / LZ,p ,> Z.p ,> Z0p ,> , / LZ(p ,> Z*p ,> Z,p ,> , / LZ.p ,> ,>w~,>w~, / L,>w,>w},>w, / L,>wZ0p ,> ,>w, 7/ L,>w,>wZ(p ,> , / L
w~
p L( p N( p Z( / M+ -0 . MZ(p ,> ,>w~,>w, / LZ*p ,> ,>w~,>w, 7/ LZ,p ,> Z.p ,> Z0p ,> , / LZ(p ,> ,>w~,>w, / L,>wZ*p ,> Z,p ,> , / L w~ p P8 p H8 p Z8 / M+ -0
"1h + @@ "+ :
"
" w N0 Q8 Z00 X + -0 . 9 d Hp [
wQJ dQ , 5
X p N dZw[w4r( ` PP 8 8 =r& / 9+ -0 [w~[
w2H + 2Zw~Zw[w~4t1 X 2N` + 28 8 =t.O + @ + @ `
4
4
4
4!!! 8 8 8 D` Dh D8 D D0 8 ` >@ ( ( >( 0 0` ` ` @ >` ( 0 @ ( (( D( 0 6 6 h 0 H P x
( :,> ,> U e@@ "@@ #@@ #
4 #5H]* /4 4Hx (n_+ )G/4G4Bp# 0n #+ , # 0n . 7 "` / %
< A
< t., %
l0 . %< Amp .( .
ej 9l`h + n) /4 <
'. 5B` # T "l( + dh + t).4 l( `d + {14 @34
n+ ~.4 @)|t
n H J ,^ ,^ ,~ 14 34
o+ ~.4 )zt
o+ xU(U*5t @h + H J ,^ ,^ ,>
p, e7/
p,~ 4" U(U*+ # 1v ,~ ).4 ( &6
/6 $6 4" , /"H .4` ,~ , ."H /4` ,~ l* `d .* ad .* @ej 9r+ r@l @p h\
Al\
A+
\
A.. H , l( `l
qd* dh + l( .4 [\
AZ\
A,~ (p ! /4 (p !+ %/2 4R %/ " 42 &)H (
@ )
H ,~ )
H (
@ )H ,~ ;n=Z%5X.b'bN::q["$Dg -V k&9 A#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+ OA e1#`?,XNvR'nbT'u TX+E n5w,*)Z={Z$mjoV-4Refag?
z!/ l4m46GBa2JzOoNl!#kBGLf3
,@ h b .z@ ,H WZ mP@ B( Rr ( N@1a-9y*g'7T %IpZg>,LqA-`
li6HmH*5e+!OoK
k>
CcF-7j.|5dyb{ Z
o( CJuR#T=S&$fCt n q-/024579:<>?ACDFHIKMNPQSUVXZ[]_`bdegijlnoqstvxy{}~
! # % & ( * + - / 0 2 3 5 7 8 : < = ? A B D F G I K L N P Q S U 0
6r5\.z@ 8 ?1
k>
h 5:#Ei@
B]l $-#Q : $D7- @ * xpD85+2vo H /&- {*7h/H h 47gUtov)x% x 9 >}8+
/[I ?/"v1
}v h D7\:B2. H I(*K,
uEo "x T!u)W}2!R % Y1-:v8z
EA ' ^9:>y $ 1 )H d)g
5z6h[ +P i0U?L&&]mM -x n#4Gs?
J#[ 40 ~"u8w>,@NC 6P2gr{Yq;Dd 8X;D,u#h[ ; +e;z
* = >PVR`T ?0$:([P-Mi I AP 51<v9
\+ CX#=a8T5"mN@6$ | 00 -0 w[
J $Z
; L $.
( +
$0 @
$*@ G
aL +
,> + $, z
w*+ 3 $(
$*(H . $
w
&(J j+ ,> $,> ,> ,
n/ QZ@ @w,
$.@ A
`J + &
&3L %+ &,> $(L ,> :w,> ,
n/ XZ8 ,
$ $0 0P @
$( . 0H @ G
, 0P @
G
. 0H @ G
aJ +
$+
0 p
$.
$0 w*
% 0 0L @ % * 0H @
A aP + Bw . n
. 1H @ A
% 0 1L @ ( 1L @ A G
aJ + O,>
$.+ WZ( aP + U ( h
8 aL + b
w0+ ,> ,> ,
wXZ0 + b,> ,> ,
wQZ0
& Jw $(
@ aL + g * j
$JwZ( Z $+ c $ aN + o,>w,> ,
$* +
? $(
$*(H . $
L f,> ,>
#
& * 0L @
w.@ , A
aJ +
,> /,> l
,> $(N ,> ,> ,
n/
wQZ(
&3J %+
,> $(J ,> ,>w,
n/
wXZ0 ,
$ $* 0J @
$. 0 0N @ G , 0J @
G 0 0N @ G aH +
$,>gC/
$, f,P f, -0 w*
*Z N &Z P '+
2. +
.[
J &Z
L '+
2
_ J f
,L f,> ,>
9* +
7+: z
9,> z,>
L '0 +
> * J '
&,0L +
A 0 P ( ' ( 0P @
( , 1J @
A . 1P @ , 0J @
A G aH +
L,>gC/ &*
m ( 0J @ , 0J @
G '.
m,> & '(Z ,> ,>w,
n/ &
w,
^ &XZ( +
<1 &QN( &(
m 0 6L '@ D (aP +
f : GZ8 +
m ( ( 0N @ * 0L @
A &.
m@, l -0 .
w w~ 0 0N
@ ( 0N @ G aP +
w * Jw~ w~ 0 0N
@ w~*
A aP +
~ + 0N
@
w~,0L @ A aH +
w~ 0 0L @ w~.
A aP +
w~0+ Y
0 J ZLp 70 U7
w~(J. . Z [,
Z L f [ H f
w~wJ c, |+ *f7* @J c, |+ ,>w~,> ^ M< U :
@
0 (@ h ( @ @
8
@ ( .@ @ (0 0 0
h Kc- a CN=m a -0 w~[
J *[
w.}8
3N + ,>{, dz/ ~+ @ ah +
*Z8( Q8 Zw[w44A X N +Z
` L +04P
Uaj + ,> _,>{, e// ~,> +,>,> ,
n/ ~ Z +6*` + ,> ,> ,>,>,> +,> +, Z/ Z +7L -+ ,> ,> ,> ,>,> ,> +, Z/ + ? + P -+ ?
+.0N + /[0 H )Z
0 J ).0N + $ 0 aH + + h $( / ," + " + h $( . , Z ,
) J ++ /,0L + / + 8 $ .p ,
+
0 aJ + .,> ,>,> ,>,> ,> ), Z/ + / ) Z + +*0J + 4 + $h .n ,+ ? + 8 1P + :,> ,> ,>,>,> +,> , Z/ Z +7J -+ >,> ,> ,> ,>,> + + Z -8 .8 =4
*6.0 + J7P -+ I,> ,> ,> ,>,> [
0 ,> , Z/ Z -+ L[
0 J -+ L[0 P - @ .h , w~ **,D
aJ + Z.1N + Z7L -+ X,> ,> ,> ,>,> *Zh ,> , Z/ Z -+ Z *Z@ N -# , : 0. @ w~( , 0H @
K aZ + m*1J O@ r H d@@ f
, L f 0 P c, | Z ,7J -+ l,> ,> ,> ,>,> ,> ,, Z/ Z -+ m , H -@@ ,,>,> w~*,> ,> ,> -, P/ Z * * ,A0 P8 [w,> ,>w, (/ ~
*Z
0 J +. 0 0N @ ( 0J @ G aP + S: GZ0 + XL( 7 *@ + -0 . ~d [w.( QH d, 5 S* J d,>, / Z f, | Z .7, + . 0 p ( h
* j
, l ,> ,>
,>,> .,> , P/ . n
[w.0 XPP H d@@ f
_ J f N c, |XZP S, GLP
w~[0 P .[@ XHP S* GJP @ [
wJp 2rp + . .w8 ,~,> ,>,> ,
n/ ~ : . XX *9 [
w,> ,>w, (/ ~,>,> w~0,> ,> ,> , P/ Z / .[
Jp w~, 1L + G7* + G p #h : 0. @ aZ + A /
p 0 A0 Ph + G,> /,> ,> ,>,>p ,> , Z/
/XZ0 XZX + I /XHX / ~+ -0 w~1H+ s
w L / w~ N 0 w~ P 17H 1+ r,0L + U00P + pZ
L 1[0 N 1+ pZ 0P + p[
L 2.0N + iO@ 0[
0 ,> , t/ aZ + ` 2Zh ,> , t/ `Z + c,> _,>|, dz/ ~+ s 0`N + h Uap + h,> _,>|, e// ~ 2Z
@ L 2
2(0H + pZ( ,> , t/ `Z + p,> _,>}+ a 1Z
@ J 1+ OO + @ + -0 7Hw+ wZ
0L + xO + 00P + }@@ 0,> ,> 0,> /, / ~+ ,0L + [ ,> , t/ aZ + wZ
h ,> + 00P + Z
,> , t/ + @ + -0
. @ w~< Hp 2xp +
.
wZ
( 2Lw~9 O + 9 @ / + -0 . `h + w+ G * QJ d, 5 S, L d,>, / Z f, | Zp 7. + ! p ( h * j , l . n,> ,>
,>,>p ,> , P/ 0 XPP QVP wZh ,> ,> , H/ ~ XXP *
l wZh ,> ,> , H/ ~XZP w(h[
@ ,> ,> , H/ ~XZP
w.nH d@@ f P f * J c, |XZP S, GLP ,
wQV0 S. BN0 XLX d 7 @ / + -0 . w~*0J + L + y w~00P + O + y
w~,0L + R : + R : QZ d, 5 wXP` w~
J`
L` [ 4N[[
,> ,> , H/ ~QZ`
w~,0L + oZ( ZX .. QN d, 5 XT` "2 .
.
0 H@ 8ra 2 Z
X Jp 2rp + s . Zh ,> ,> , H/ ~
.
XZ0 . (h9fZ( 4NsZ
( ,> ,> , H/ ~XZ` w~00P + xZ
8 ,> ,> , H/ ~XZ` 7 @ / + @ ` K ! v W E$@( 8 0 $0 (( ( @ F @ 0 h ( ( aJ| G 8 8 D8 D8 X ` ` 0 aJ~8G@ D@ D@ FP .@ FP 80 FP 8 F@ F0 -0 . t wZ
J 4S, GL( [
L 2[ N 3Z P 3[
J 4 , lt 20u0P + 8Z
8 J 6(u0H + 8,v . 0L
@ (v 0 0H
@ G ,v ( 0L @ G aN + 3 ( P Y
( L Z i H [, v N d Z P f
[ J f
6(w H c, |+ 8 v P d
( "L f ( "H f.v N c, | Z 2
3(u0H + SZ( P 6,w0L + S.x * 0N
@
,x ( 0L
@ G
.x , 0N @
G
aJ + N @ H Y @ N Z
j L [,
v J d Z H f [ P f 6,x L c, |+ R v H d @ "N f
@ "L f*x J c, | Z 3 3,w0L + mZ@ H 6.y0N + m*y 0 0J
@ .y , 0N
@
G *y . 0J @ G aP + h
L Y
J Z j N [, v P d
Z L f [ H f
6.v N c, |+ m
v L d
"J f "N f0y P c, | Z 3 2 40z,z3P + t,> 0x,> ,>{,
n/ { Z 2 3 40z,z3P + z,> 0x,> ,>{,
n/ { Z 3 3 40z,z3P + ,> 0x,> ,>{,
n/ { Z 3 4.|4N
w * @ GJ0 @@ 6
3*|0J + !.w0N
+
0 J Y 0 H Z6. U+
k Z [+ Z2P}+ wS, GLh + 82P}+ 8+ *~5J 0 0N + wS* GJh + 8
0 2J~+ 8O@ 6+ 8 0 0 2N}@ ( 6J0 @ A aP + 8 wS. GNh + 8 . QN d, 5 Z 5 4
5XL@
wXJ0 S( GH0 ( h . BN0 3.,> , / 5XZ@
3XJ@ ( 0H + 0S: GZ@ + 0XP( w 5QP8 P 4Z
@ J 3 ( GH8 [8 4H8[
8 QJ@ Z`8 [@ Hp QP w 3XP8 ,>, /
wQZ0 @@ 5
3(u . 0H @ 2,w * 0L @
A aN + S Pp 7( U7l l
p *~. .: Z [ 3 8 H Y 8 P Z
0 J Z 0 H [ Zp , v N d Z P f
[ J f
2(w H c, | Z 5+ t(1H + i
w . n 0 QP d, 5 Z 5 4
5XL
wXJ0 S. GN0 . n 0 BP0 20,> , / 5XZ
2XJ XH( wQH8 Z
L 2 H 4[8 4Pi[
8 QL Z`8 [ Pp QH@ ,>w,>,> 3*,> ,> ,> 2, Z/ Z 5 5S0 GP8 [8 P 5( , 0H @
l 50y , 0P @
3.u ( 0N @ A
aL + D70 U7m m
5.. Z [ ( H Y
( L Z 3 @ N Z @ H [,
v J d
Z L f [ N f 5(x H c, | Z 5
6aJ +
5.w 0 0N
@ (w * 0H
@
G .w ( 0N @ G aP +
0 J Y 0 N Z n H [, v P d
Z J f
[ L f 5(x H c, |+ 1
v J d 0 "N f 0 "H f0w P c, |+ 1
w 0 `n + 170 U7n o 5*|. .: Z [
L Y N Z 3
@ J Z
@ L [ Zp , v H d Z N f
[ J f 5,x L c, | Z 5
5.w1N + 6,> ,>,>{,
n/ { Z 5 56j + ] Uan + ? v P d@@ f@@ f * J c, | Z 5 wS( GHh + ] v P d@@ f * J f ( H c, |+ ] w * j,> ,>,>{ 5.,> ,> ,> 3, Z/ Z 5 6aH + Q,>w,>,>{ 5,,> ,>{,> + W
w
0 `j + X,> ,>,> 50,> ,> ,> 3, Z/ Z 5
5*w1J + ],> ,>,>{,
n/ { Z 5 5*w . 0J @ w,D 0A
2
( ( 0l@ A , 70( @
A 3 * 0p@
A 0 7, @ A aN + v
v J d@@ f
5S0 2/@ "H f . N c, | Z 5
wS, BL( , GL( +
5,u0L + } ( 0p+ {
wS( GH0
wS( GH0 + 0 0P + wS, GLh + ,>w,>,>{,>,>{,> , Z/ Z 5
w
5XL( 2QH( @ / t+ -0
S( H d:o.: S
:p.: (Z . ,p., (L . .q. .,> , / Z f: ?, | whS* BJ` * j + -0
S( H d:q.: S
:r.: (Z . ,r., (L . .s. . ,> , / Z f: ?, | whS* BJ` * j + -0 w[
J 74J@ 7Z8 0P + 3
J d, 5 Z 7
7 . XN0 7XP0 wQL 7J 7+ @Z( 0N + 9 7QH( ,> , / + =Z( 0H + =[( N 84N=(
0H XJ8 7 H 7Z
L 7+ 3@ + -0
.
d ( QH d, 5 Z 8
8
"Z0 XN( XJ0 0 p ( h ,>w~, 0/ Z 9 w,x1L + Q
9aJ + P Z f+ T
+ O
9aJ + S
+ O,f, / Z fS* .J d, | Z 9 8 9XN 7, + ] 0 p
.* Jp .* QJ d, 5 8XZ8 Z ;
; p XP0 ( H :
w~Z.( Q. N ;
w0w0P + kZ8 + q
0 aJ + r v N d@@ f 0 P f ( H c, | Z 9+ s N 9 8
: Jp 2xp + ;Z
8 Lp ; :. S* GJ *0J + |XL + ,> Hp , $/
; :. ;XZ@ XZ8 9`P + : :
;[
0 Jp ;. 0 p, 0L + XJ + ,> Hp , $/
; :. ;QZ8 XZ@ 3X :+ , .l ;:
: ;.
Z0 XP( S( GH( : :9t
v L d@@ f : P f . N c, |
;XZ( S( GH( w~
XL( S0 GP( wXP( S. GN( [ XN( , l 9XP( l@ /
+ -0 ( QH d, 5
wXX( , l.v,> , / XV` wXP` S( GH` "Z
XL` XX + -0
. w* J <Z, Q, L < 8 Jp 2xp + ; <[8 3P + 9@ + ; , .l <95 : / + -0 . t@@ 5[ O H "7J "+ g. 0N + eZ( 4HeZ( N = 8 Z8 Pp 2xp + e =. Z
L ?*|0J 9E[0 P =6(@ 9E
0 `j + O,> ,> , A/ t =Z08 P @ 6 ( Hp 2vp 9E
@[
0 J ?[( . 1P @ (A aN + [,>( ,>{,>s, dz/ {
@Z( P ?[
@ ( 1L @ .A aH + c,>@ ,>{,>s, dz/ { 0 .p @9R9E "Z
L "+ ?@ / t+ @ ` pppji!!p!
?
?
?
?
?
?
?
? S (8 (( ( 0 0 (@ @ 8 (
8 (0 0 _P 0 0 h ( @ ( 0 88 ( <@ B L ` D` $ 8 ( ( CR@CTs@CT4'CT9g8 $@@ F F( F( 0` $@ $@8 D0 B( +L YZ
[+@0 -.`n@0, 2 Z,~ YZ
[+@0 Z,~ .
[ Z Z, p/
[( Z( Z, r$
[H ZH Z, s&
[h Zh Z, .
[H ZH Z, p/
[h Zh Z, r$
[H ZH Z, s&
[h Zh Z, + , rn, s, s+ , s, s, s+ + , s, s+ , s, s, s, y, y+ + , y+ + + , y, y, z+ , y, t, z, z+ + , rn, rn+ , , ,
, |, |, rn, rn, + + , , |, |, rn, rn, + + , , |, |, rn, rn, * * + + , rn, s, s+ , u, s, s+ + , s, s+ , u, s, s, y, y+ + , y+ + + , y, y, z+ , y, u, z, z+ + , rn, rn+ , , ,
, }, }, rn, rn, + + , ), |, |, rn, rn, + + , ), |, |, rn, rn, hLhL+ , , 0, kcJM,~ hM * hL,~ A
[G
[I
[F
[( Z
[,~ Z
[,~ Y . A, E Z . C, E Z . D, E [ . F, E,> ,>N,>N,>O,>O, >>~,^ C D, I,> A B, ,^ ,~ Y . A, E Z . C, E Z . D, E [ . F, E,> ,>N,>N,>O,>O, W>~,^ F G, I,> D E, I,^ ,~ , ,, ., ., 3, 5, ., ., :, <, >, >, D, rn, rn, rn, rn, rn, rn, rn, rn, rn, rn, rn, rn, G, Y, Y, !, ,, 1, 1, 3, 5, 9, 9, :, <, B, B, D, rn, rn, rn, rn, rn, rn, rn, rn, rn, rn, rn, rn, G, }, }, ! [(
8 ,~ 7 [" [(
H Y,~ [hP,~ [H8 J8 ,~ 5*7 . ( [/. .
" [(
8 ,~ " [hP,~ " [H8 J8 ,~ [(
8 .
Z,~ [(
H Y Y,~ [hPH Y,~ [H8 YJ8
Z,~ 7N [+ O4.S N Z@ aN+ K(.+ I3N Z,~ (. $
`N $
Z+ K6@ Z+ R * @ , 2,~ * ,~ U*7H Z+ P * `N
2HQ1H + X@
@ ,~ Q# [4Nc Y5B]+ fB +0j`N H +0o(N5N\6 [+ tQb +0v + t6@ Y+ t@ , 2@h + t6 [+ i@ , 2U(U*+ t@h + tH (N4No-.l`n + u6 [+ {+ v-.o`n + u6 [+ vQb +0s+ { ,^ d.+8 6 [+ {@ , 24(yU(U*+ t!( * + t@ , 2@h + tR# [4N Y5B+
B +0`N H +0(N5N 6H [+ Rb +0 + 6@ Y+ @ , 2@h + 6 [+ Rb +0+ ,^ d.+8 6 [+ @ , 24( U(U*+ !( * + @ , 2@h + 7@ [+ >7@ Y6@ Za + fB A@@ B@h C@@ D Y . D, E Z . F, E# [+ .,> ,>O,>O, >,^ aN + 3,> ,>N,>N,>O,>O, >>~,^ (N5N+6 [+ 9,> ,>S,>T,>N,>N, W>~,^ +0M C D, I,> A B, I,^ ,~ Q7@ Y6@ Z+ t@ , 2@h + t 0 @
8 @@8 ,> ,> , e>,^ ,~ ,> , ,^ 4NM4HM(N H8 ,~ #
, rn, q, e, j, k, m# , Z, c, e, rn, n, p, X, ^, c, g, rn, n, p, X7 ( ,~ , * Z H Y*
[ J Z,
Z,~ , )* Z H Y*
[ J Z, )
Z,~ # 7 Z"h ,~ 3h Zg Z,~ 3h Z+ ih Z,~ @h ,~ & [,~ 3* [
[,~ 2j [
[,~ 3( Z Z,~ 2h Z Z,~ #
7 ["j ,~ * ,~ @
4Hx)~d(@ d* .T,~
( ,~ 5JD
U,~
( ,~ 7@ 4J4(2hU+ 3(T+
/T7 l(@ )
@ ,~ 3(V+ 2hV+
+ @ , 2
W7 "
@ ,~ @ , 2@h ,~ &( 6@ h(F h*6 * ,~ @
)|h(F W,~ hX,~ # %( (
'.7 Y"j ( ,~ 7 ( [ ({d(~ )?27 Y"`
( ,~ jY ( ,~ 4HD,> 7 ( 3HW2JWa + 'aj + '8 l( 5('U(+Y,^ 7 " * ,~ 3HW2JW+ ,@
,~ 3HZ0J + .Z,~ hM * ,~ bJM+ ), }*
,~ ,> ,> ,> ,> _,>[, e/,^x ,^x ,^ ,^ ,^ Z
[4ND0,n+ ;/,A, + B0,+ = , + B0,M+ @/,A, + B0,Q+ B , + B , 4LDan + E@h ,~ 4(GU(0L U*,~ 1L + J Z1L
Z,~ S( * ,~ @ A C D F 0 8 0 B C #\ c? H '@ @ ,> _, o/ B,~ -0 w $ 38C+ g6C
\F, 0 4:g P H H G
.*
S
L O@ + n6L + k,> _, o/ B Z O@ [ 0v
+ n-: (ZX + (Z
(w~/ < " QH d, 5 [
d<
QJ` ,w~5Ly@ pwxw~ w~QX R`` + | w~[@ XX R`` QX@ 0w[ d. < pw*w~Z,(qQ, Q 8 Z . *8o J + -0 . B /w~
w.
QJ d, 5XZ d
d.
D Lp Zw~4N8 Q dX
w~[
( .
*:g [( .p d ( Nw~[` ,> ,> , (/ D+ 4V dX
w~Z.(qQ . *:g w~8 P
p J@p@ / B+ -0 /w QV d4V), 5XZ d
wZ.0qQ . < *:` 8
L d.D H0p@ + -0
. E 1( }+ .,><, e3+ P
w.= Np 0=+@D1+ + 5+ H+ I+ Q+ `+ o+ + 7H + 7@@ + 9,> _, o/ B Z [ 3Np + C1n
+ >,>>,>>, e3/ D p ,>lvs[ ,>lvs,>?, e3/ E ( QH + n 0 [ (P AF7Z + :
L8p+ ,> + ^ Hp *?. Np 2xp + O,> , */ B4: 9L,>p , / B+ ,> , ^/ B p w*@.
p Jp 2xp + Y Ad 4NY + [9U,>w, + P@@ l:
/p 8 H0p,> , */ B5: + ,> , ^/ B p w*@.
p Jp 2xp + h Ad 4Nh + j9d:
@@0p+ :
/
p 8
J p,> , */ B5: O + @@p Hp ,>p , */ B4: 7N + v[ 0P + @@ + y 0 P n,> _, o/ B4Z 10 s+ qZ*p Q* ,> Z.p Q. ,> Z,p Q, ,> , o/ E+ q7Jp + O,>p ,> ,>p , / E+ @@p Hp
1* s+ Z0p Q0 ,> Z(p Q( ,> , o/ E,>p , */ B4: ,>w, ^/ B w D A 5H7Np + O,>p ,> + 6H +
<F, 0 + [
p /.
3L + 4F, + G H
H J @@ G@ / E+ -0 . D@@p w
$ Jp
p `L + &(L Lp :p + # p ,>lvs[ ,>lvs,>@, e3/ E:p p (Z Zp 4Z:> j
p `J + 0(J Jp :p + -
p 0l
+ 4,>4vs,>A, e3/ D+ * w(A Hp 0H + 9,>B,>A, e3/ D+ :g O / D+ @ ` R04V004V R " 04V 0$V 4(D T 4( x y !%M MRPR
RY w ~M MLMP i!LaLYU U8QaM MvQ%N.rNN NNMLwM| = P 0 ` @ p p @ P p ` P p
P P 0 @ ` P @ P ` P @ 0 P p @ P 0 p
P P p P p ` ` p @ P 0 p
`
` ` @ ` P p
@ p p P p p
` @ P
P
p P ` P P
`
`
p P @ 0 0
0 P P 0 0 p @ P
` p 0 P ` p @ P p @ ` ` p P @
P P ` 0 ` ` P p
0 P ` P ` p @ p ` p 0 @ @ @ 0
@ 0 ` P
0 P ` 0
0
@ 0 p 0 @ @ P @ ` ` 0 0 p P 0 p 0 0 @ @ P 0 @ "0 0
P 0 P P ` p P 0 p p ` P !0 p p ! ! P !p P ` P
% 0 @ "P "@ P "p ` # #@ 0 @ #p P $ ` $ #P $0 %p p %0 %@ P ` %` P &P 0 P '` P @ ' ` ` ' P
'@ ` P (P P (@ ` ` P )@ P ` *@ 0 @ * P ` 0 @ 0 @ *0 P +p ` P -0 @ ,@ ,P - 0 ,p ` - P .` ` P ` P = @ 0 0 0 0 0 @ P @ P ` @ @ @ @ @ p @ p @ @ @ @ @ @ 0 0 @ @ @ @ P @ D D D @ ` @ p p ( ( @ ( @ @ ( ( ( ( ( ( @ 0 0 @ 0 0 P @ ` @ p @ p ` p @ p @ p p @ 0 0 0 @ 0 0 0 @ @ p @ p @ p 0 0 P @ P @ @ @ @ @ @ @ 0 @ 0 0 0 0 ` ` @ ; SYNTAXACT "FUNCTION" -0
Uah + ^
w~(
,Qal + ^ wZ.h Q. ,> ,> _,> e, e// jS* J d6, U+ b w~ l / N f+ c w~ < u P f,> f, / k Z f, | w~( 0 ep k <Q H` * j l
w0 lp m( fh m* k0J + sO@ r ` @ 2N n+ r : Z` + s, ro w. k( n * 3N @
, oA
aJ + z,>@ ,> _,> f, e// j + -0
. o w~[
Jp Z
Lp Z0 Np Z0 00 + w~,>h , / k,> ,> _,> g, e// j+ b w~ . 0H T@
p Z0 * 0P @
A aN + F Hp
p 0 p Pp * 0P @
. 0P @ G
( 0P @ G
aJ +
p (
6.4Q+ 3,> _,> h, dz/ p+ 3
p (
4Qan + + p Z4Q( q.
@ J H . 2J q@
p ( 0L @ G 0 0L @ G aN + ) w,>h + 1Z(( /( F Hp + 30 h Pp p * r3P + 3 w~,>h , / k,> ,> _,> i, e// j,>p ,>w, U/ p
w~ Zp QZ0 p 0 rp p 8
2J s+ ? p . s0N + ?
@ 1J + ?,> _,> i, dz/ p p ( . j ( 1N @
p Z
( . j 8 3L @ A , j . 0L @ Z( , 00 @
A G aH + Q w~,>h , / k,> ,> _,> g, e// j+ \ 8 Z( Pp 2xp + \
p .
Z0 Np ( r3Hp 9 R w~,>h , / k,> ,> _,> i, e// j9 R
w~R0 p t, t0L @ p ( 0N @ G `P O@ r@ / o+ @ ` ).<QD<Q M R h84Q G s$DQ ` ` .0 .` B` G"#@@ &@ @ 0 h 8 SD G(@ ( ( 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 |gI GI$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 ]SD GSMS@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 |gO GO$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 ]SD GSMS@S MmS uGS~#@SO@S:$^S;!` S;!h`S?` SNDmSNDhgSNL{GYq` Y )` Y !` Y2)` Y3!` Y>9` Y>:[A` [B@[B@[&q` [&r@[&r@[>!` ]&vC@]?` ]?` ]?` ]?` ]?!` e
0L + nO ,~ @ ,~ 6H + q, \ Z O@ [
0L + v,>vs,>4vs,>((, e3/ (6,~ @ ,~ 6H + y, \ Z O@ [
0L + |: @@hp+ }+ !%@ ,~ 6H + ! , \ Z O@ [
0L + !: @@hp+ !+ !%@ ,~ -0 . (7 Hp @@p O@ Il , !k Zp 4:!$7Lp + !
1J + !O + !, \ Z @ aZ + ![ 1N + ! ,>(),><vs,>((, e3/ (6+ !$6Hp + !!,>p , / (7+ !#,>p ,> ,>p , / (6@ / (7+ -0 . (7 Hp @@ I6J + !*O@ , \ Z [ 0N + !.,>vs,><vs,>((, e3/ (6+ !1, !k p 8 H Z p/ (7+ -0 7H I+ !7
k 0 an + !7,>w~,>w, X:+ !9,>w~,>w, XI/ (8@ + -0 w~*(8 , 0J @
w0(9 ( 0P @ A
aL + !BO + @ + -0 . (7 w[ Z * j(8 , l(9.(:+@<!I+ !S, ro+ !M+ !N+ !O, ro+ !P+ !Q+ !R (:+ !R (;+ !R (;+ !R (<+ !R7(< (= Z f,> f, / (7 Z f w * j(=S, L d, | w QT . n(>n(> 0 p(?S* GJP d QP d Hp , 5
p XR( , XLH XXH .(?0N + !eS: GZH + !eXJ` XVH ((@0H + !iS: GZH + !j
wXLX @ / (7+ -0 . (@ (
Z*'gZ
2j + !p,>(), e3+ "O@p I Pp
[ 0H + !t@@ I+ "d, %.6x + !w + "h:p . X8 @@ I[ 70<(W+ !~6jp + " p
P I.
( + "h7jp + "d[ p . [8
$(W3*D(W+ "d
p .
( Lp
(A P d, j p . X XVP >p [
p
Np 0J + ",4H". [
0j
+ " p . [8 7(D(W+ ",>(*+ "*(A0J + "ZX 0N! + "0(*4P",>(+, gC/ (7 : XZX + " ,>(+, e3/ (7+ "h.(*4N" 0(A10 + " ,>(+, gC/ (7 . n(> ( h(?0(@0P + "#S: GZP + "&XTX
X aj + "&S, GLP * j(>Z`P
X aL + "a,> ,> , @ QHP [
p
/* +@,"0+ "R+ "8+ "@+ "A+ "C+ "D+ "H, ro, ro, ro, ro, ro, ro+ "J+ "L+ "M+ "P , l(>Zp
n(?[P ,> ZP ,> , !:/ (8aZ + "R,> , !C/ (7+ "a , + "J , BLP + "N , BLP + "K , BLP Z
p
1L + "Q : + "Q , l(>l(?+ "R , l(> : + "Q , l(>+ "G , l(> : |BZP + "R , l(> : z(? ,> ,
r/ (7 ZP [P ,(@0L + "XS: GZP + "[XTX X ap + "[S( GHP 0(B0P + "^S: GZP + "aXTH
H aj + "aS, GLP
p .
Z( + !y:
p .
N0 , \ Z d + !r/ (@+ -0 . (7 w*(81J + "m,>(,, e3+ #3O@ r (A N d 0 QP d, j ( h(A * j(@
wXLX 8q Pp 5P"w + "~*(B4J"~ Uan + "{,> _,>(,, e// (8,>p ,>(C,>(C,
n/ (6 Zp
(q Lp w0(D1P + # 8 + #[8 ` 7Jp + #
.(D4N#% Uah + # ,> _,>(,, e// (8,>p ,>(C,>(C,
n/ (6+ #3X(E+ # (E P d@@ f X f ( H c, | Zp + #%d 0 QP d, 5 Zp S( H d,>(F, / (7 Z f, | Zp 7* + #
p . n(F 0 p(G & H0 * j(G,>(H,>(H,>(C,>p ,>p , P/ (I Zp
p . XN0 wXP0 S( GH0 p 0(D0P + #)S: GZX + #)XV8 ,> ,>(I,>(H,>(C,>p ,> , Z/ (J Zp
p QJX
p XLX w0(D0P XV8 ,> , / (I+ -0 . (I[ 1H + #8,>vs,>$vs+ #oZ
Lp , &y Z [ 0N + $, Hp * J n,> _, o/ (75Z#q I Np @@ I, \ Z p ((J0H l [
. 0L @ 0 0L @ G aN + #J,>(-, e3+ $)[ 0H + #M: @@hp+ #P, !k
8
L Z0p4:$G[
1L + #A[ 0N + #k
p 8
2J + #k 7X@p+ #[((?0H + #[
` aL + #[,>(H,> + $2d , \ Z [ 0H + #`: @@hp+ #c, !k
8
L Z0p4:$G[
1L + #g,>vz,>4vs,>((, e3/ (6, \ Z p N ,>(H,>p , !2/ (8+ $(
p J I[
1L + #q,>vz,>4vs,>((, e3/ (6+ $Gd p 2N + #t: O@hp+ #,> , / (7 p[
p.
p Jp 2tp + #
P Lp 0(K0P + #}S: GZP 9#xS( BHP 9#x, &y Z p *(K1J + $ ,> , $H/ (7 Zp 8p3P(E+ $*[
8p,> ,>8p, (/ (8+ $*,>(L,> , !2/ (8,>p ,>hp,
p J , \ Z [
0L + $: @@hp+ $, !k 8 N Z8p4:$G[ 1N + $,>vz,><vs,>((, e3/ (6, \ Z [
0J + $ : @@hp+ $", !k 8 H Z p4:$G[ 1H + $&,>vz,>$vs,>((, e3/ (6, &y Z p P ,>p , "i/ (7+ $G p N + $G p
aJ + $E 0 6,<(W@ ((LM aP + $4,>(H,>p , XI/ (8+ $G
p ,(M0L + $C ( `h + $A,> , @/ (7 3X(E+ $@/(-
(
7.4Q+ $A,> ,>p , U/ (8 Zp + $A
p S. GN0 ,>(H,>p , XI+ $F,>(L,> + $F,>(H,> , !2/ (8 p / (I+ -0 . (J w
aj + $N,> ,>(.,> _,>(., dz/ (7d
2Lw+ $R w,>h ,>(/+ % @p2H(E+ $U@@p + $W[
@p8
Lp
p ., QL d, 5 Xp (A N d w P f X f, j Zp p
w,(Ml(8 . n(9S0 GP( p QH@
p XL@ 4L$m
[(p46$m p .
.
@p 0 Np N
p .
70( + $l
p XL8 =6$e
w ( `h + $p p S, GL@ w,(N.(NH
*(OD
aL + $|,> , @/ (7 Zp 3Z(E+ $|,> ,>p ,>w, {/ (6 p S* BJ8 + % p . |BN 8p3P(E+ %7vp + %
p .
0 Hp .(90N + %*(K , 0J @
.(K 0 0N @ G
aL + % ,>(C,> , X:/ (8
p ((O0H + %,> , (/ (7+ %*(90J + %,>(L[ ,> , X:/ (8=v%
p [0 Hw.(80N + %$
2J(E+ %,> ,>(/, e3/ (8+ %-,>p , Qv/ (7 p Zp XZ8 ,>(H, v/ (7 Zp p w
J@
p P0 S. GN0
w
( al + %),>p , 'H/ (7 p S. BN ,>(H p [h ,> , XI/ (87p @ / (J+ -0 . (P@@p @@p I Hp [
1J
+ %40J + %7Lpp O@p , \ Z d @@ I+ %1[ 0N + %l Hp , \ Z
I`J l , !k Zp 4:%[ 0N + %W, &y Z p *(9 , 0J @
.(: 0 0N @ *(: . 0J @ G A
aL + %T: * J p: p P8p,>p , / (7:
@@0p,>p , / (7
(p N q 0 P(p8 H @ + &x*(91J + %u 0 p(P+ %u[ 1H + %Z,>(0,>$vs+ %h
I`L l , \ Z , !k Zp 4:%[ 0P + %d,>p ,>p , _D/ (8 Zp 4Z%d Zp + %r , 7Jp @
M
IaL + %j,>(0,>(1,>((, e3/ (6+ &x,>p ,>p , &/ (8+ &x ( 0N @ * 0N @
G aH + %sZ
Lp , &y Z + %u, #4 Zp 4:&x[ 0H + &d @@ I
(A L d, j Zp p 0 p(Dp(Q p QH8 , \ Z , %. Zp 5:& O + &x
p p XP0 ,> ,
r/ (7 p [8 Hp *(90J + &S: GZ8 + &
XN
al + &
S* GJ8
p Z0 Np ((D0H + &S: GZ0 + &XL8 8 ap + &S( GH0 p Pp [
0L + &HO@ r p aP + &,>(1+ &,d @@ I (A H d, j * j(Q , l(? . n(R Pp p *(81J + &",>(2, e3/ (7 p 0(D0P + &%S: GZp + &&XX8 6 :
@@(p=v&&:
@@0p: p P8p 1( |+ &.,>(2, e3/ (7+ &x, \ Z [
0L + &1, %.+ &50L + &5Z Hp , &y Z + &6, #4 Zp 70p + &x
p ,(M1L + &:,>(2, e3/ (7 p ((R0H + &>S: GZp + &>XX@ :
p N0p[ 1P + &*
p
/
/, L(q,> , / (7 8pXP` p H Xp p P I6Hp + &K p + &x
p .(K 0 0N @ ((G * 0H @
A aP + &g.(F ( 0N
@ *(F 0 0J
@ G .(F * 0N @
G aH + &b 0 P Y 0 N Z
(3 J [, (E H d Z P f
[ L f p *(9 J c, |+ &x (E P d 0 "N f
0 "J f((F H c, |+ &x (A N d, j Zp
p ( h(K * |BJ0
p XJ0 Z`0 0(S0P + &pS: + &rXL( ( ah + &sS: GZ0 p ,(80L + &v : + &v:(8 p z(S / (P+ ( H n,> _, o/ (74Z&}S:
,~ ,> _, o/ (7,~ -0 . (76Hw~+ '", .l 6Lw+ '"0 .p Pp * 6Hw@
. 7Lw~@ A
aJ + '
q L@r hq N@r7Pw~+ '
. N0q P0q7Lw+ '
0 P(r L(r * .j [ 0P + ' l , \ Z , !k Zw~4:'47Nw~+ ': ( H@p: Nhp+ ',>p , / (7[ 0P + ' : @@hp+ '@0P + '=: * J8p, \ Z @@ Id , !k 8 H Z p4:'4[
1L + '+,>v{,>4vs+ '>, \ Z , !k
8
J Z(p4:'4[ 0P + '5, \ Z , !k 8 N Z8p5:'6O + 'G: @@8p[ 1N + '9,>vz,><vs+ '> p .: ,> , / (7O@ I+ '@,>vz,>Dvs,>((, e3/ (6+ 'G,>p , / (7
8p J0q 0 P8p8
L , \ Z @ / (7+ -0 . (T w[
Jp [( Z
P Lp Z0 Np ap @+ 'SZ
Z
8 3J + 'S,>P ,> _,>(3, dz/ (6 wZ
Jp
p Z Z0 3n + 'XZ0 Hp ((>0H + '[ : Zp + '[@@p p 8 p Pp 2rp + (
w.
Z( p . Z Z
` 0L! + 'f0(A1P + 'f ( h(Q ap @+ (6* U+ 'j:(QZ:l 1+ 'k:(QZ:l !Q: Zp 6( U+ 'n:(AZ:l 1+ 'o:(AZ:l !Q: ,p Z.4(oQ. 0 p(T* aJ + 'w,>P ,> _/p ,> ,>(4+ (((Q0H + (,> , / (7 Zp ,> , / (7 Zp p . 3P(E@
p ( 3J(E@ A aN + (20 + (,>P /p ,> ,> _,>(4, dz/ (7 ( Hp ,(?0L + (
0(U1p + (
* Jp 0(U3Pp 9'^+ (*(V ( 0J @ ,(U . 0L @ A aH 9'^,>P /p ,> ,> _,>(5, dz/ (79'^@ / (T+ -0
w
aj + (&
`l + (&,> , @/ (7 3X(E+ (& /0 F( 6*DQ+ (&,>(5 w,>h ,>(6, e3/ (6@ + @ ` (d f r< U M H X F(g 7 u (i(m(o ^ c fp # > D(x ( 8 Y3!` Y ` Y2)` Y )` Y:)` Y !` @ P P P ` X - X H @ 8 ( 0 Yq` 0 0 D0 ( 0 @ 0 $ ( ( $@ ,@ B@ ( 8 F 8 ` ` @ ( @ P < ` X (`
%/ /{Z */{0J + ) S: GZ + ) XB Z ./{0N + )
p 8 ,> ,> ,>/|, )/ /| [ p,> ,> p, (/ /} + -0
. /| w~*/z1J + ) ,>/W, e3/ /{ /} N _ N d w0P + )%, 5
_j/~ , l/~ `QN 4N)'QB8 + )'
/zXJ d, j S* J d
w0L + )- w~(/0H + ), /+ )0 0 + )0 w~(/1H 70 0 Z f,> f, / /{ Z f, | XD 70 + )9 ( h0S* GJ
w1J + )9S. @ GN w~*00J + )WZ XD w~XN 000P + )@S: GZ + )AXB8
Ual + )N 8 Z Hp 2xp + )N . Z8 Pp */0J 9)D(01( 9)D6*@ 9)D,> _,>/W, e// /}+ )N9)D 8 Z Hp 2xp + )T . 708 9)OZ
8 Jp XB( 9)O,>0,>w~, (/ /}+ )c . QN d, 5 XD 0 XP w~XH *00J + )^S: GZ + )_XB w~XN 000P + )cS: GZ + )cXB8 d / /|+ -0 p ` ,>0,> , X:/ /}4:)k,> , ({/ /{+ -0 , \ Z , #478 + [
1J + )q,>v~,>,vs+ )u, !%76 + [ 1P + )w,>vu,>Dvs,>/X, e3/ /|+ @@ Z` S* GJP
aJ + )},> ,>/|, */ /} X p V q , L ,>0, / /{,> , ({/ /{+ -0 p@@ ,>` , ^S/ /{ V q46*"*00J + *
,>/X, e3/ /{+ [ 0N + *(00H + *,>X ,>/Y,>/Y, e3/ /|+ [ 0H + *,>/Z, e7/ /{S, GLX
0 L _ L d /zXN d, j ` XPX qQHX [
,> ,> , (/ /}ZX S, GL` [
U5L* XV UQV U+ UXV@ XV U+ -0 . /| p ` 0H + *.7L `+ *'Z0 5P*2 0 P _ P d /zXH d, j Zp
p
` XL( R`( Z`( @ + *n `
` 0L + *K7P `+ *3Z
@ 4J*3,>/Z+ *Y
P Jp ,>0,> , XI/ /}4:*n p N q001P + *X7JP + *I Uan + *>,> _,>/[, e// /} P Pp @ H q [
q. Hp 2rp + *E H Z
h LH 9*B[P ,> ,>P , (/ /}[ q8 QP q+ *J@@ q 0+ *c P P q [ q. Pp 2rp + *Q H Z
h JH 9*N
P L q [ q8 QN qZX 0H! + *W : XZX + *Z*00J + *Z,>/[, e3/ /{+ *n*01J + *b Uan + *_,> _,>/\, e// /},> ,>0,>/|,
n/ /| Z q 0 N _ N d[ ,> ,> , (/ /} /zXH d, j Zp
p
qXL( [ qQN( Z qXP( Z( (0 0H XJX / /|+ -0 . 0 p Hp
Jp S, GL( ,>0,> , XI/ /}4:+N p 8 ap + *z,> _,>/\, dz/ /}+ +N p
aj + *,> ,>/],> _,>/], dz/ 0
p L q /} N _ N d /zXP d, j Zp p 7J + +B Np @@p @ [p Pp 2vp + +
Z
p .
[
( .
p 8
Lp 9+ p &( Hp .( QH d, 5 p Zp XZ8 p
p XL@ QN@
p ( `h + + , l0
7Lp + +I@@p @ [p Np 2vp + +>Z
p .
( [ . Hp 2tp + +9:
p P p .
XD0 Z`0 P 0N + +7(/{0H + +2
p p . S* GJ8 *0 ( 0J @ 00 , 0P @
G aH + +.,>/|,> , X:/ /}.0 0N + +8,> , (/ /{+ +8
p XL ./{0N + +8,>0
[ ,> , X:/ /}+ +8S( GH0 .4 + + [ ,> ,> , (/ /} p
.
@ 0 9+[p ,> p ,>h , (/ /}+ +I . QN d, 5 p Zp XZ@
p R`( QP( p
`l + +IS. GN( p qXP8 d [
p ,> ,>p , (/ /}@ / 0 + -0 (0
5H+S,> _,>/^, dz/ /}, \ Z O@ [
1L + +\, !%Z p4:+k[ 1H + +\,>vu,>$vs,>/X, e3/ /|+ @@ p 0
Uaj + +h,> _,>/^, e// /},> ,>0,>/|,
n/ /|XZX + , \3Z0+ +p,>vu[ ,>lvs,>/X, e3/ /|,~
0 J _ J d
/zXL d, j,~ -0
,> `, o/ /{6X + +z,> _, o/ /{3Z0+ ,,>/_+ +2X0+ +|O + ,> _, o/ /{3Z0+ ,,>vu[ ,>lvs,>/X, e3/ /|+ * XJ` + -0 , +t66 + ,O +
0 J _ J d
/zXL d, j XV` + -0 , +t66 + ,O +
0 J _ J d
/zXL d, j XV` + -0 . /} w~ * 2H0@
, 2H0@
G
aJ + , : + , : Z d p X 6NP + ,% w~2H0+ , ,>/_+ ,'
0 J d@@ f w~ N f 0 P c, | ZP + ,( w`H + ,(,>/`, e3/ /{[P 0H
+ ,.
0 J d@@ f w~ N f 0 P c, |+ ,U
P .00N + ,E w~3H0+ ,7
P .00N + ,@ P ,01L + ,7 P 005P,:,>0, / /{,> ,>/`+ -e
P *00J + ,V P [@ Hp
al + ,V,>/a,>/a+ -e P ,01L + ,V P 001P + ,V+ ,7 P ,00L + ,I,>/b, e3/ /{+ ,V P 000P + ,M
P
0 `J + ,7
P *01J + ,V Uap + ,S,>/b,> _,>/c, e// /|,>P ,>0,>/|,
n/ /| ZP 7JP + ,x[P 0P
+ ,]
w~2L0+ ,x,>/c,>/d,>/d, e3/ /|+ ,x
P *01J + ,x P (00H + ,e
P [( Np 8 ap + ,x,>/e+ ,?
P .01N + ,x P ,00L + ,w P 608 + ,m w~2H0+ ,x,>/e,>/f+ ,[ P ,01L + ,w P 000P + ,w
P *01J + ,x P (01H
+ ,x
P .01N + ,x,>0+ ,77PP + -
w~3L0+ -? P 001P + -
Ual + -,>/f,> _,>/c, e// /|,>P ,>0,>/|,
n/ /| ZP [
P 0L
+ -7NP + -,>/g,>/g+ -e 0 7NP @ w~ , 2H0@
A aP + -,>0+ ,77JP + - P ,/z1L + -,>0+ ,7 w~2H0+ -3 * 7PP @
( 7NP @ G
aJ + - ,>/h,>/h, e3/ /}
Ual + - ,>/i, e7/ /{ 0 7LP @ ( 6NP @ A , 6JP @
A aP + -%,>/i, e3/ /{7NP + -87JP + -),>/j,>/j, e3/ /}7PP + -,,>/k,>/j, e3/ /}[P 0H
+ -0,>/k,>/l,>/d, e3/ /|+ -8
P 600 + -8,>/l,>/m+ -.7PP + -6,>/m, e3/ /{7NP + -8,>0+ ,77PP + -@ P (00H + ,7[P 0P
+ -> k8 ,> + -7NP + -@,>0+ ,76NX + -B@@p + -N X `
h ,>0 , a%/ /{ Zp 60p + -H + .),>/| ` ,>h , (/ /},>/|,>` , (/ /},>/|,> , (/ /}7LP + -[
P .00N + -[
P 600 + -[7JP + -U,>/n+ -W w~2H0+ -X,>/n,>/o+ -e7Pp + -[,>/o, e3/ /{+ .)
P .00N + -p6LP + -_,>/p+ -e
P .00N + -c
P 600 + -c,>/p+ -e7LP + -g,>/q,>/q, e3/ /}+ .)
d0J + -j P S, GL , 7HP @
* 7PP @
G
aL + -p,>/r,>/q, e3/ /}
w~ L _ L d /zXP d, j
P QJ` P XN` P XH`
P QL` P QP` [
p QJ` 7NP + -|
P XL`
P l0 P XP` [
P 0J
+ . T`` + . P XH` 7HP + . P QP`
P XJ` P Z
@ . 0J!@ Z@ , 0H!@
G aN + .
P [( Pp 6(@ + . @ + .
0 L d@@ f @ N f * J c, |XZ` 7JP + . P ,01L + .
P XX( 7HP + . [P 1N
+ . P (/1H + . P *01J + . P XX 7NP + ." P (/1H + ." P XX8 ,> , )/ /{[ ,> ,> , (/ /}[ ,> ,> , (/ /}7 @ / /}+ -0 . /} p X 7HP + .9[
P 1L
+ .9 P (01H + .9
P .00N + .5,>/b, e3/ /{+ .C P *00J + .: P 8 aP + .:,>0+ .T P 001P + .C
Uaj + .@,>/r,> _,>/c, e// /|,>P ,>0,>/|,
n/ /| ZP 7PP + .E,>0+ .T7JP + .O P 001P + .O
Uaj + .L,>/s,> _,>/c, e// /|,>P ,>0,>/|,
n/ /| ZP 7NP + .S P */z1J + .S,>0+ .T7HP + .X,>0, / /{,> ,>/`, e3/ /}+ .q7LP + .Z,>/m, e3/ /{ w P _ P d /zXH d, j
P QJ`
P XL` P XN` P QP` P QH` 7JP + .g P 001P + .g
P XX( 7NP + .k P *01J + .k P XX8 [ ,> ,> , (/ /}[
,> ,> , (/ /}7 @ / /}+ 6H + .t, \ Z O@ [
0L + .|, \ Z O@ [ 0P + .~,>vs,>Dvs,>/X, e3/ /|,~ [ 0P + .~O ,~ @ ,~ -0 . /} w[
0j + / w 8 @ @@p ( = Hp
p 2jp + /.
p &* 2X\0M+ /
[\1 Pp 4P/ \1 + /3x\0M+ / 8 Zp + / =/@ / /}+ ,>0,>0,>0, ,/ /|,~ -0
(/s4H/ p ` 6L` + /,>/t, gC/ /{,>0 ,>0 ,>0, ,/ /|+ ,>/t,>/h, e3/ /} Uah + /#,>/u,> _,>/u, e// /|,>0,>0 ,>0, ,/ /|@ ,~ Uah + /*,>/v,> _,>/u, e// /|,>0 ,>0,>/|, ,/ /|,~ (/s4H/0,>/v,>/w, gC/ /},>0 ,>0 ,>/|, ,/ /|,~ (/s4H/7
aL + /7,>/w, gC/ /{,>0 ,>0 ,>/|, ,/ /|,~ Uah + />,>/x,> _,>/u, e// /|,>0,>0 ,>/|, ,/ /|,~ (/s4H/D,>/x,>/w, gC/ /},>0,>0,>/|, ,/ /|@ ,~ Uah + /K,> _,>/y, e// /},>0 ,>/|,>0, ,/ /|@ ,~ Uah + /R,> _,>/y, e// /},>0,>/|,>0, ,/ /|@ ,~ @ ` M W R t1 + n R 80 7 - '0!
& T 0$ 3 O 0& 0'0)
!0*0-0/ 0101 03
: 7
07
08080:0<0>
0?0A
0B0D0F #0H 0K 0L< U 1I 1K D 1M 1N I K 1O 1Q ( @ G# hgG# kGG: 'G k' 8 @ X X ( ( 8 ( ( X P F@ ( 8 ( ` ` ( 0 0 X X X 0 ( ( 8 k:N@ 0 0 0 $@ 8 @ M7 K: S? H:WM e }D` } X ~~ X Subroutine name string or 6-digit integer as unit specifiers UNIT a rewrite statement an asterisk as format specifiers a rewrite statement a namelist REC random access key relation/key of reference specifiers END REC in an indexed read an asterisk in an indexed read a namelist ENCODE and DECODE REREAD Unformatted I/O NAMELIST I/O Random access I/O Indexed read key specifiers UNIT REC C~9 C2:C2|p C2|s@C2|t(C6 C6'C6Md C6Md'CNMi CO wCR
,`G |`G/
Gey`G @G ZG"\J;G2~9 G3k:G7N G7NG? @ G? C@G?$@G?$GI |rI RI$II$RI$P I
d\IIn I}jSI~H7I~KGIex:Ie}I&l`I'4\ZIJ, IR}OR|H SI S&
E(Sj/;U& U&9:U&-|@U&~r U' ZU:~@ Uj/@c$Ic$Rc~0 c~9 c~: cMP cF cF@ cFI c2|p c2|t(c6 c6Md c6|@ cNL{@cNM` cNMi cNMj cO- cR
9 kN.)<uF@ @ @ @ ( @ 8 @ " P ` 0 @ 0 @ " REWRITE statement REWRITE TYPE PUNCH ACCEPT REREAD -0 7U 73 H n 6 ,> `, o/ 7V4Z1^,744L1Z2X7V+ 1Z,>74,>75, gC/ 7W,>7W, */ 7V4:1a,> , .*+ 1a 7V 75 Z n=61T,>76, e3/ 7V+ ,>7X, .*/ 7V,~ ,>7X, .*/ 7V,~ Uah + 1i,> _,>76, e// 7W,>7Y, .*/ 7V,~ ,>77,>77, e3/ 7W Uah + 1q,>78,> _,>78, e// 7Y,>7Z, .*/ 7V,~ -0 . 7W w~ w7HX + 1z
X 0L + 1y"w< 8 ,>X ,> , 2
/ 7W Zp w.6 7LX + 2 X 0P + 2"
w<
8 ,>X ,> , 2
/ 7W Zp 7Z P d p H f
p J f , L c, |/ 7W+ -0 . 7V w~
J Y
L Z.7[1N
+ 2 Hp 7* U779 79
p .7[(N . .: Z [, Z P Y [ Z Z
w~,7\1L + 2 6. U+ 2 7: Z [+ 2 7: P [, Z Z Y waN + 2 " Y+ 2 Y/ 7V+ -0 . 7\@@p @@p w[w.w Hp 2tp + 3 * Jp @@p
P 0L + 2-ZP .7]5N2, : + 2, : .zp + 2 P 0N + 21 P [X .hp + 2 P 7H` + 26
` 0J + 25O@p 926@@p 926@@p
` 0J + 2<,>` ,>p , 1s/ 7W 0 .pp @@p + 2| ` ` 7P` + 2f,7]1L + 2B,>7;, e3/ 7V@@p + 27Np + 2H 7Z H d@@ f
X "L f * J c, | 7(X + 2@
X Jp ` [ ,> ,> , (/ 7W ` ` 0P + 2R ` ,7]4L2d . Np + 2l
` 0L + 2U[X + 2e ` 0N + 2l7HX + 2[
X 0J + 2ZO@p 92[@@p 92[@@p
X 0J + 2a,>X ,>p , 1s/ 7W 0 .pp @@p + 2l X X aP + 2d : + 2e : Zp + 2l
X aL + 2h : + 2i : Zp [
,> ,> , (/ 7W
p $
p .lp 7Jp + 2|07^5P2t
7Z L d@@ f
X "J f . N c, |+ 2|
X L Y
X J Z 7; N [, 7Z P d Z H f
[ L f*7] J c, | P [ ,> ,> , (/ 7W . QN d, 5 Zp 6Pp + 3 p XZp QZp + 3
p XL@ XLp
p
p J0 QV0 .4 + 2%Sp [p . / 7\+ -0 . 7Y p ` 7JX + 3,>vs,>v{,>7<, e3/ 7Y [ . Np 2rp + 3, H X ` [ ,> ,> , (/ 7W,> , 2!/ 7V Zp [ ,> ,> , (/ 7W@@ d@@ ,>X , b/ 7V Zp [
p ,> ,>7^,>7^, J/ 7Y[
,> ,> , (/ 7W 7_ N d, j [p QPP p XHP [
p JP
_QLP 93 p 8 [ ,> ,> , (/ 7W,>7^,> p, (/ 7_+ -0 . 7` ( QH d, 5 Zp , \ Z [
1J + 38,>vy+ 3m@@p O@p :p , !% p < ( .p
p Jp QJ@ >
.7\1N + 3K[ 1P + 3C,>vz,>Dvs+ 3m, \ Z , !%
p <
(
.
p 8p Hp XH( > ,7[0L + 3L,>7<+ 3g[
0J + 3_ 7= H n,> `, o/ 7V5Z3[ 7= N n,> `, o/ 7V Zp 5Z3WZ0p Q0 ,> ,>7>, e3/ 7W+ 3x p < ( .p ( XH@ + 3^ p < ( .p * XJ8 , \ Z + 3b p < ( .p , XL [ 0H + 3i p 0. + 3g, \ Z + 3i,>7>, e3/ 7V+ 3x@@p p `N + 39[
1J + 3o,>vz,>,vs,>7<, e3/ 7Y+ 3x, \ Z p
p QL "p .: ( < ,> (
. Z: ,> , (/ 7W p / 7`+ -0 . 7V w $8_
g<
@ Vp 2tp + 4
` 2lPf+ 4 ` 20Pf+ 4 : + 48 93} i&0 2p + 4 : + 4@ / 7V+ -0 w.w~&( , 2xw@
. 38w~@ A
aL + 4,> , 3y/ 7V 0V + 4 + 5V4 < Zw+ 4 8 Hw~
w.
w~&* + 4
O + -0 . 7Y@@p O@p 2 @@HI=24 , \3Z7`+ 4 ,>vy+ 5s,> a, o/ 7V6X + 4[
p aL + 4) 4 !, !%4:6; @p> *7]1J + 5Q+ 5 7? N n,> `, o/ 7V4Z42 w * 2H7a@
, 2H7a@
G
`J + 4h 4 %+ 4X 7? H n,> `, o/ 7V4Z4;
w . 2L7a@ 0 2L7a@ G `N + 4h 4 %+ 4X
7@ L n,> `, o/ 7V4Z4A w3P7a+ 4h 4 $+ 4X 7@ P n,> `, o/ 7V4Z4F
w3J7a+ 4h 4 #+ 4X
7A J n,> `, o/ 7V4Z4O w 0 2N7a@ ( 2N7a@ G `P + 4h 4 &+ 4X 7A N n,> `, o/ 7V4Z4Y w * 2H7a@
, 2H7a@
G
`J + 4h 4 $O + 5Q, \ Z ,>7B+ 5 ,>7^,>7b, 4/ 7W74 + 4h w2N7a+ 4` T9+ 4b3N7a7T9. T9V+@l4c+ 5Q+ 4h+ 4j+ 4t+ 5 + 5+ 5!+ 5.+ 5;+ 5J@ ,>7B,>7C, e3/ 7W+ 6;, !%4:6;
(p>
.7]1N + 5Q(7b1H + 4q,7b0L + 4r@ + 5Q,>7B,>7C, e3+ 50T + 4w, 32 Zp + 5Q, !%4:6;
0p> 07]0P + 5Z
X 0J! + 4,>7D, e7/ 7V : XZX + 5Q,>7<, e3+ 5Z
X 0J + 5,>7D, e7/ 7V+ 5Q.7]1N + 5Q,> ,>7c,>7^,
n/ 7Y + 5Ql , !%4:6;
(p>
.7] 0 1N @ (7] * 1H @
A aP + 5,7b0L + 5,>7c,> , XI/ 7W+ 5Q,>7E,>7B,>7E+ 5I,7d1, + 5Q,>7F+ 5, M ( H , \ Z , M @@ [
1J + 5Q,>vu[ + 5s,>7c, */ 7V4:6; ,>hp, ^S/ 7V >
,7b0L + 5*,>7c[X ,> + 5+,>7d,> , X:/ 7W07]1P + 5Q,>7F+ 5H,>7c, */ 7V4:6; ,>hp, ^S/ 7V >
,7b0L + 57,>7c[X ,> + 58,>7d,> , X:/ 7W07]1P + 5Q,>7G+ 5H,>7c, */ 7V4:6; ,>hp, ^S/ 7V >
,7b0L + 5D,>7c[X ,> + 5E,>7d,> , X:/ 7W07]1P + 5Q,>7G,>X ,>7H, e3/ 7Y+ 5Q, \ Z Z (7e1H + 5P,>7H,>X ,>7H, e3/ 7YS, GLX
T9}7N0I+ 5T,>T8_,>7I, e3/ 7W1T + 5V
T9} V(I@@p
T9}1j + 5Z,>T8_,>7I, e7/ 7W
T:%A, 4L5],>T8_+ 5d T:%A( 4H5e5T5e,7e0L + 5e,> ,>7J, 6</ 7WaZ + 5e,>7J,>77, e3/ 7W(744H5i,> ,>T8_,> ,>w, 6J/ 7`7N + 5k@@ + 5l, \ Z [ 1P + 4 [
1J + 5q,>vz,>,vs+ 5t, \3Z7e+ 5u,>vu[ ,>lvs,>7<+ 5{ w3P7a+ 5|
: 6N(I+ 6 : 6H@I+ 6,>7K,>9,>7K, e3/ 7Y+ 6;
: 6N(I+ 6 : 6H@I+ 6
:6L(I+ 6,>7L+ 6 : 7H@I+ 6,>7L, e3/ 7V+ 6;
Uaj + 6 w , 2N7f@
: * 6H@I@
A
: 0 6H8I@ A
: . 6H(I@ A
aL + 6,>7M, e7/ 7V w N _ N d
7fXL d, j Zp p :
IQJ@ :
8IXL@ :
IQJ@ :
8IQL@
: : @@8I@@ I@@@I@@(I
p [0 4N6#[0 07g0P XL` p Z
@ 4J6'Z@ .7g0N XP` p [8 4H6*[8 *7g0J XN`
p
p XL( @ 2 6NHI8 =26-4v6:
p XV( QV d, 5
p QV0 2 7NHI+ 6:78HIg XZX QRX 4869,7g1L + 69 p XH` 8 =263@ / 7Y+ -0 . 7W w~ Hp Z* Q*A` Jp ,w7X + 6H p 7R + 6F
0t -/4 3T + 6A5R6GO + 6I:w+ 6?@ / 7W+ -0 . 7` w~ Hp
w},7M$, .7N$. .
A
,:%6Lp aL + 6l0J 7a+ 6l : Gzp + 6l ( 0J @ . 0J @ G aH + 6^", .lp w3P7a+ 6l:p + 6l@@p
p 07g0P + 6g6Nw}+ 6b 7N+ 6e0N + 6g w2P7a+ 6f 7O Zp + 6g 7O Hp 7Np + 6k,>p ,> , 6</ 7WaZ + 6l": .zp p aP + 7 w}0H + 6w"* .jp
w2L7f+ 6s,>7P, e7/ 7V p an + 7,>7P, e7/ 7V+ 70H + 6|", .lp w3P7a+ 7 : + 7@@p
p 07g0P + 75H7 7Q+ 7
0H + 7 7Q+ 7
0H + 7 7R+ 7
0H + 7 7R+ 7
* 0H @
, 0H @
G
aJ + 77w2P7a+ 7p + 7,>p ,> , 6</ 7WaZ + 7": .zp 7Hp + 7+
p aJ + 7aJ + 7 7S Zp + 7 7S+ 7aJ + 7 7T+ 7@@p 7Lp + 7 ,>w~,> ,>7T, e7/ 7Y p aH + 7$aH + 7# 7S Zp + 7' 7S+ 7"aH + 7& 7T+ 7"@@p 7Np + 7+,>w~,> ,>7U, e7/ 7Y+ 7+@ / 7`+ ,>7f, 4/ 7V,~ ,>7a, 4/ 7V,~ ,>7a, 4/ 7V,~ @ ` H :L< U :N IH :M % ?:O
: :R DI)ji p RH :TH :S
2
-H :UH :VH :WH :XH :YH :Z:[ f 2 9:\
:_:b:c:d D:e ;:h:i:j * s z x> U< U:n:}:y l R:t; ;; hgh c d H H
H
H H X
0
0 ( 8 X X X ( h X X
#X X (X ( X ` (0 ACCESS ASSOCI ASSOCIATE ASSOCIATEVARIABLE BLANK BLOCKS BLOCKSIZE BUFFER BUFFERCOUNT BYTESIZE CARRIA CARRIAGE CARRIAGECONTROL DEFAULTFILE DENSIT DENSITY DEVICE DIALOG DIALOGUE DIRECT DIRECTORY DISP DISPOS DISPOSE ERR EXIST EXTENDSIZE FILE FILESI FILESIZE FORM FORMAT FORMATTED INITIA INITIAL INITIALIZE INITIALSIZE IOSTAT KEY KEYED LIMIT MAXREC MODE NAME NAMED NEXTRE NEXTREC NUMBER OPENED ORGANIZATION PADCHA PADCHAR PARITY PROTEC PROTECTION RECL RECORD RECORDSIZE RECORDTYPE SEQUEN SEQUENTIAL STATUS TAPEFO TAPEFORMAT TYPE UNFORM UNFORMATTED UNIT USEROPEN VERSIO VERSION DIALOG DIALOGUE NOSPANBLOCKS READON READONLY SHARED '7h7j7k7m7o7q7r7t7u7w7y7z7|7~8 888888 8 8
88888888888 8 8 8"8$8%8&8(8)8*8+8-8.808183858688898;8=8>8?8A8C8E8G8H8J8L8M8N8P8Q8S8T8V8W8Y8[8\8^ ' ' ' '
'
SPACE FILE BACKFILE DELETE statement DELETE INTEGER CHARACTER READONLY READON DIALOGUE DIALOG SHARED NOSPANBLOCKS keyword array or character expression array or character expression CHARACTER INTEGER LOGICAL FUNCTION NAME KEYED H :g ACCESS='KEYED' specified DIRECT SEQUENTIAL H :kH :l APPEND DIRECT KEYED SEQUENTIAL H :oH :pH :qH :r NEW OLD SCRATCH UNKNOWN H :vH :wH :wH :x DELETE KEEP H :|H :} FORTRAN LIST H :H ; DELETE KEEP PRINT SAVE H ;H ;H ;H ; INDEXED RELATIVE SEQUENTIAL H ;H ;H ; -0
, ;U6X + ;@ + ,* ,J n,> ], o/ @]4Z;/ =.. $. 7P8n+ ;,>@]+ ; =.: $: .@:x + ;
=.* $* .
@;x , L n,> _, o/ @]5Z;* . QN =.( $( S*ky.@<j + ;-Z` , ;U =.. $. .@<z : + -0
( - H n,> _, o/ @]5Z;6
=., $, @ .
@<n + , ;KQZ 4Z;F . N n,> _, o/ @]4Z;F, ;KXZ 4Z;F 8 @@ @@` * J n,> _, o/ @]4Z;C, ;U Z` 4Z;F8 18 + ;= ( . H n,> _, o/ @]5Z;GO +
=., $, . .
@<n : + -0 @ ( H n,> _, o/ @]7V + ;T0v + ;T ( . /: + ;Mg + -0 4 44;a(X ( H n,> _, o/ @]6V + ;_ , L n,> _, o/ @]6V + ;_(XP + ;g.8_p/4 + ;V , L n,> _, o/ @]5Z;a 0 P n,> _, o/ @]5Z;a7 + ;a+ ( H n,> _, o/ @]4Z<
@= L n,> `, o/ @]4Z;q0@=1P + < : + ; @> P n,> `, o/ @]4Z;z
Uaj + ;w,>@>, e7/ @],@?1L + < : z@?+ <
@? J n,> `, o/ @]4Z< .@=1N + < : z@=+ < @@ N n,> `, o/ @]4Z<
Uah + <,>@@, e7/ @]*@?0J + < ,>@A, e7/ @]+ < : + ;yO ,~ : Z n,> _, o/ @]5Z;k : ,~ @ ,~ -0 . @]@ / @]+ -0
. @_ aH + <
=0J + <,>@A+ <kO@ =
Uaj + <,>@B, e7/ @] , BL
=., $, @ .
@;n @@ =.0 $0 .@<n =.( $( .@:n * J n,> _, o/ @]5Z<*, \,>@B[ ,>lvs+ <E =.0 $0 . 6H@p@
=.* $* =( 6L(n@ G aN + <4, ; + <*5:<9,>@C+ <k, ;h5:<;,>@C+ <k1Z + <* . N n,> , o/ @]5Z<B, \,>@D[ ,>lvs+ <E, \3Z@+ <G,>vu[ ,>lvs,>@D, e3/ @`+ =
=.* $* 6H(n+ <KS,Lu.
@:l
=., $, 0n z `z + <Q,> _,>@E, dz/ @^+ = =.0 $0 6J@p+ <T,>@E+ <k
=., $, @ .
@Fh
=.* $* Z0(o.
@Fp =.. S
8
Lp =.( $(
m Jp n Pp n Np , Lp Z* p Jp 0p .@` x 6+ <f+ <l[ 4N<j =.( $( Z` qZ` + <Z,>@G, e3/ @]+ = Uah + <p*@=5J<p,>@G, e7/ @],>(, |k/ @], :
= `.
@Hp =
U.@Hl =
V.@Ij = a.@In
= a.
@Jh
= W.
@Jp 7N W+ = = Y.@Kh + = =@
.@Kj =
V.@Kj 0J $: Y =
L8Ml @d (@?1H d 0@=1P d
= T H0cS* BJ T, =1 *
J U, P0Z @+ =, =+ =@ / @_+ -0
. @],>(, |k/ @] =.( S
.* Jp ,p .
@a x 6+ = = 8i P ` 8o H U
8u J V
8{=L a 8 P a8 H W7J8 @an@L,@bl@L(@bh@M*@cj@M @M @c N T>
=5,=/S: H Z X+ =/, =1, P@ / @]+ -0
@c H X
=8
0j + =7 =.: + =8 =.. x@N+ -0 . @^:
q J p J p:
@@0p6N + =B ( H n,> _, o/ @]5Z=E+ =C[ 1H
+ =D w+ >2@@ * J p
@N L n,> `, o/ @]4Z=M w1P + =L,>@O,>@O+ =iO@ p+ =l 0 P n,> _, o/ @]7V + =X
/* J p,> _, o/ @]7V + =j p$. . /. N p+ =R * J n,> _, o/ @]4Z=e, Re4:>27P + =^@@ + =_, \ Z [
1J + =b,>vz,>,vs+ =i 8p> ` H p+ =j6N + =g, \ Z O@ ,>@P[ ,>lvs,>@D+ >-6j p+ =l,> ,>@P+ >, p H@p
q Jp O@p , 2Lp + =z: p p0N + =t,>@Q,> + >& p0H + =x
Ual + >0,>@Q+ >,> p,>@Q+ >, ,
2Lp + >
: p p0N + > Uah + >0,>@Q+ > p0H + >
Ual + > ,>@Q,> _,>@R, e/+ >
p0L + >
,>@R,> ,>@S, e7/ @` :
+ >2,> p,>@Q+ >, 0 2Pp + >: p p0H + >
Ual + >0,>@S,> _,>@R, e/+ >'
p0L + >,>@S,> + >& p0P + >,>@S+ >",> p,>@S+ >, * 2Jp + >): p
p0L + > Uap + >0,>@T+ > p0P + >#,>@T,> + >&
p0J + >(,>@T,> ,>@S, e7/ @`+ >0,> p,>@T+ >, .
2Np + >.: p ,> p,>@R,>@T, e3/ @`+ >2 0 2Pp + >1: p q+ >27 p O / @^+ -0
w H q * J q@@ ,> , =9/ @] Z 5:>: + 8p0P + >A6H + >@ . N n,> _, o/ @]+ >A[ 1N @@ 0H + >E hp N q+ >E@@ q". .n ,>@d, */ @]4:>Y * J d p ` 0H + >S k0N + >R * J kd l ` ,>h ,>@d, Y,/ @^+ >W, 5+ k0N + >U * J k,>` , Z</ @][ p,> ,> p, (/ @^+ ,>@e, >3/ @],~ ,>@d, >3/ @],~ ,>@d, >3/ @],~ ,>@e, >3/ @],~ ,>@f, >3/ @],~ O@ r,>@f, >3/ @],~ -0
pO@ ( H dd l ,>` ,>@g, Y,/ @^,>@g,> p, (/ @^+ -0
pO@ @@ dd l ,>` ,>@g, Y,/ @^,>@g,> p, (/ @^+ -0 . @^7H u+ >y,>@U, e3/ @],@g5L>{,>@U+ ?!O@ l p P @ X ah + ?,>X ,>@V,> _,>@V, dz/ @h*@g0J + ?$ N fS0 P d, | (@h1H + ? ,@i1L + ? 0 QP d, 5 R p 8 HH
.
@i JH
.
@j LH .. NH XH 0 QPH @@H .@j HH VH @@H *@W Jp S, BL U, AX Zp
p l@W6.p + ?% + ?*,@i1L + ? ,>@W+ ?! ` 3PX + ?#,>@X, e3/ @]+ ?* * J + ?%S. GNX . N d,>P ,>@g, Y,/ @^,>@g,> , (/ @^/ @^+ -0 . @], \ Z [ 0H + ?6Z
Lp 0 N ,>@k,> , W+/ @^ p S( GH@ , \ Z + ?9,>@X,>$vs,>@D, e3/ @`+ ?>[
1L + ?>, \[ 0P + ?:,>@Y, e3/ @]/ @]+ @ ,~ -0 . @], \ Z [ 0H + ?JZ
Lp 0 N ,>@k,> , W+/ @^ p S( GH@ , \ Z + ?N,>@k, / @],> , / @] Z l
[
1L + ?R,>vu,>4vs,>@D, e3/ @`/ @]+ -0
O@ @@ d p,>` , \{/ @],>@g,> p, (/ @^+ -0 . @^ p X H q,>@g,> , (/ @^ q[
q.
q Jp 2rp + @ H 6LX + ?k2R q+ ?h,>@l, / @],> , ^H/ @] O@ vO@ w+ ?w,>@Y,>@Z,>@D, e3/ @`+ ?w X 1P + ?c X
` Jp [
,> ,> , (/ @^,>@l,>p , W+/ @^4:@
p S( GH@ ,>@ , ^H/ @] 8 O@ 0 P d[P QH qZ
P XJ q,>X , \{/ @]4:@[ qQNP Z qXPP [P QTX (@i0H + @ , l@m.@mn@n+ @,@ml@mS.@ BNX ZX 5V?9?` q[ ,> ,> , (/ @^/ @^+ -0 . @]O@ wZ p6H` + @O@ wO@ v+ @0 ` Z Z
[ .
Lp 2rp + @0 H 0P + @+ H
P aj + @ .@Z4N@,>P ,>@[, gC/ @^+ @ S0 GPP O@ v P an + @!,>P ,>@[,> _,>@V, dz/ @h
P al + @%,>P ,>@\,> _,>@V, dz/ @h0@n(@oG aP + @/,>P ,>@\,> _,>@V, dz/ @h+ @/ H X
P `j + @/,> , @2/ @].2 + @@ / @]+ -0
( QH d, 5
wQJ`
xXL` X x: xS0 GP( @ + @ ` n > p q rH @o H @p U H @qH @r Y 3 @s * '@t G . m n 1 ] i o u { 0 " 4 6 *x
8 ` X
exu }[' DX DP @X .P $P NOLIST NOCREF LIST CREF ' ' NOLIST NOCREF (*) constant (*) integer constant or "(" ENTRY name PROGRAM name , OR / IDENTIFIERCOMMON variable Dummy argument External name -0 wZ
1J + A,> , Rs/ Ho Zw wZ8 1P + A,>HV, e3/ Ho w+ -0 . Hp Hp H d, j Zp
p
w 0 XB( S. GN an + A,>HV, e3/ Ho w7H@ + AS,>Hq,> , X:/ Hp
w ( < +@<A + AW+ A!+ A++ AE6X + A# p S, GL@ ,> , A/ Ho
p
` <
J0 7N` + AW,>` + AD ` [ .( QH d, 5 [ 8 Q
p V0 S* GJ0 ,> , A/ Ho ZX 8 [
.
Jp 2tp + A:,>` , A/ Ho ZP 8 9A6 7N` + AW ` 7V` ,> , A/ Ho
p
X <
J0 S. GN0 7N` + AW,>` , A/ Ho+ AW p Z( P S, GL ,> , A/ Ho Z 7L` + AW ` 7V` ,> , A/ Ho p X < H@ S, GL@ 7L` + AW+ AC,>Hq,> , X:/ Hp4:AW p @@8 p / Hp+ -0 . Hq p
Jp [
p .
Jp 2tp + B P Np ,>8 , A/ Ho Zp 4:Ar Hr H d p X f, j
p Z0
` aj + AhS. GNX QLX _XNX Vp p @ [ . Hp 2rp 9A]
p Z
0 Jp ,>H , A/ Ho66 + AsO + BZX ` ap + A~ p 6, + Ax,>HW, e3/ Ho9AmS* GJ [
` Jp .HrnHs[ XPX p QVh QV 9Am p
p XV0 XV 9Am9A] p
Lp [
p ,> ,> , (/ Hp,>Hq,> p, (/ Hp/ Hq+ -0 . Hp@@p pZ Z
[
.
Jp 2rp + B5@ H 6N` + B ` Uah + B,>Hs,> , W+/ Hp4:BS* GJX + B(,>Ht,> , W+/ Hp5:BO Tp + B)S* GJX + B) ` 0H + B!*HW4JB ,>HX,>HX, gC/ Hp ` + B$*HW4JB$,>HY,>HX, gC/ Hp ` ,>Hs,> , W+/ Hp4:BS. GNX S: GZX `T + B2 X ah + B, : + B- : zHt
X al + B2,>X ,>HY,> ,>HZ, dz/ Hu[ ,> ,> , (/ Hp9B
h ,> Z
h ,> , (/ Hp,>HqZ p,> , (/ Hp p aP + B=O + B>@ / Hp+ -0 . Ho@ pZ Z
[
.
Jp 2rp + BX H ,>Hu,> , W+/ Hp5:BHO 9BC,> , @/ Ho 2THv+ BOO ,>HZ,>` ,>H[, e3/ Hv9BCS( GH` ` ah + BT,>` ,>H[,> _,>HZ, dz/ Hu
` al + BW : + BW : zHw9BC p[h ,> Zh ,> , (/ Hp,>HqZ
p,> , (/ HpaV + B`O + Ba@ / Ho+ -0 . HoZ OZ` Z` Hp
X `j + Bx
X 4Hw /. ( Z8.pHx(Hx * 0H @
,Hx . 0L @ A
aJ + Bx,>p , Qv/ Ho Zp XZ` p V@ S( GHX ( hHyS,@ BLX
/, (
0. NX 7Lp + CZ0 4rC p . Z@ X 4Hy
X `j + C /. ( Z
8.lHx0Hx0P + C
8. JX =rBz@ / Ho+ -0 Z O4XC*Hz0J + C , Bb+ 8 0 3VHz@ ( 3VH{@ A aP + N fS* J d, |
` 6Hw /( ( Z .pH{.H{0N +
. L` + -0 . Hu Uah + C ,> _,>H\, e// Hp
p
( Lp [p .
Lp 2tp + C8 P Pp @ ,>H|,> , W+/ Hp4:C>S* GJ`
p ( [p ,> ,> , (/ Hp [
.
Lp 2rp + C2 H Pp ,>H|,> , W+/ Hp5ZC1 p S* GJ8 9C+ H} N d, j Zp
p Z
XL( [ 8 QP( QX( XJ` 9C p Np [
p ,> ,> , (/ Hp,>Hq,> p, (/ Hp/ Hu+ -0 H} H\ H n 6 ,> `, o/ Ho4ZCL,HW4LCI2XH~+ CG,>H]+ CG,>H],>H^, gC/ Hp,>H~, */ Ho4:CP,> , .*+ CO H~ H^ Z n=6CB,>H_, e3/ Ho+ H_ H n,> `, o/ Ho4ZCZ,HW4LCV,>H`,>H^, gC/ Hp,>H~, */ Ho4:Cg,>H, .*+ Cg
H` L n,> `, o/ Ho4ZCf,>Ha,>Ha, e3/ Hp Uap + Cc,>Hb,> _,>Hb, e// Hv,>H~, */ Ho4:Cg,>H+ CY,>H_, e3/ Ho,~ -0 . Hp p7H` + Co8 Z` H [
,> ,> , (/ Hp+ Cu
Ual + Cr,> _,>Hc, e// Hp, J P 8 NP ` [P 4VCz[X ,> ZP ,> ,>Hc, e3/ HvZP 2N + C~,> _ZP ,> ,>Hc, e3/ Hv(I 0H + D,>Hd, e3+ D/Z
,> , P/ HoaZ + D,>H ,>Hd, e3/ Hp+ D0,>I ,> , X:/ Hp4:D0Z O Pp I H _ H d
IXJ d, j Vp , QL d, 5 . XNX p QPX XTX RX T b R a uXHX Z`X 4HDQV V u p 6Jp + D[ O+ D QZX : aXRX XTX [P ZP 8 XHP . QN d, 5QZP QVh XRh ` ` QTX QRX 7J` + D) ` P XPX [ ,> ,> , (/ Hp+ D* XPX [ p,> ,> p, (/ Hp,> a, Y/ HoZ ,> , / Ho/ Hp+ -0 Uah + D5,> _,>He, e// Hp7J `+ D7,> , G8/ Ho . QN d, 5 uXP` Z`` 4PD<QX@ X u * XJ` , JQZ` , JXZ` p X QT` Z,X L p4TDE P < PP S( GHP + DI Uap + DI,> _,>Hc, e// Hp[` P `Z@ H Z
` ,> , Ft/ HoQZ` @ + -0 Uah + DR,> _,>He, e// Hp, \3ZI+ DW,>vu[ ,>lvs,>Hf, e3/ Hv+ 6V u+ DZ,>Hf, e3+ EZX 5NDl[X [H ,> ,>Hg, e3/ HpZX Z
X , 1J @
. 0V @ G
aL + D^4VDk[X 4RDfZX XZH + DgZ
X J uZX 4RDi[X QNH ,>Ht,> , (/ HpO + [X ZX 0H + DoZ` + Dp[X Z
H 0,P@ 4RDy3R `+ Dy[
` ,> ,>Hg, e3/ Hp
uZ0 N u,>Ht,> , (/ Hp7H `+ E Z
X 0L + D[X 5PE
`QJX S, GL( + E5REZ` ZH < XHH
H <
JH [H Z
P QLH `XN` Z8 8 XP8 8 8 H8 [
8 XJP QT8 XNX + EZ
X 0L + E,> u, E+ EZ` R `ZH P ,> `, G8/ Ho+ -0 w[ 4XEZ XZ` + EZ
L u
wZ0 4XE[0 QP` w[h ,> , G+/ Ho wZh ,> , G8/ Ho Z`X
wZ
( L `Z0 N @ + -0 . Hu p Hp
k Jp ,>), |k/ Ho0Z + E* p N k+ EA k 8 ap + E. p H k,>Hh+ EP p H p
X Jp [
,> ,> , (/ HpZ O Np @@ lO@ ` Pp @@ @@ ` k8I4XE=,> , */ Ho5:E= p N k p P `+ EA kZ
h , 0 5:EB p P ` p H kO + EY p P kZ O6Hp + EF[ OXZ O+ EFXH O,Hz0L + EI,>Hh, e3/ Ho p P ` p Z
0J! + EN : XZ + EQ.I0N + EQ,>Hh, e3/ Ho+ EY I N _ N d IXP d, j p XHX XXX *I0J XV Z`` @ / Hu+ -0 p ` ` 7H` + Ea ` X [
,> ,> , (/ Hp+ Ee,HW4LEc,>Hi, gC/ Ho Z` 8 XZ`
I L _ L d IXN d, j Z XPX Z QHX Z
XJX p
` XLX ZP 0N! + Eq : XZP + Et(I0H + Et,>Hh, e3/ Ho+ (I0H XVP ,I0L + Ey,>Hi, e7/ Ho[ ,> ,> , (/ Hp@ + -0
Hj H n,> `, o/ Ho5ZF, \,>Hj+ F, \3ZI+ F,>vu[ ,>lvs,>Hf, e3/ Hv+ . QN d, 5 uXP` Z`` 4PF QX@ X uR`` , JQZ` , JXZ` [
` ,> , Ft/ HoQZ` @ + -0 . Ho Hk H n,> `, o/ Ho4ZF3,>I, */ Ho5:FO + FJ Hk N n,> `, o/ Ho5ZF , \,>Hl+ F5, \2ZI+ F47T u+ F9Z
P 4LF#[P [` ,> ,>Hg+ FA[P 5PF&[P [
` ,> + F@Z
P ,> , G / Ho[
P Lp 7N `+ F,,> , G8/ Ho ` Hp , JQZP [P ,> , Ft/ Ho
p QJX QV( S, GL( + FI, \3ZI+ F8,>vu[ ,>lvs,>Hf, e3/ Hv+ FJ6T u+ F;,>Hl, e3/ Ho+ FJZP 4PF>[P [
` ,> + F"[
P 5JFB[P [` ,> ,>Hm, e3/ Hp+ FJZP ,> , G / Ho[P ,> , G8/ Ho7H `+ FI,> , G8/ HoZ`P @ / Ho+ -0 , \3ZI+ FP,>vu[ ,>lvs,>Hf, e3/ Hv+ 6V u+ FS,>Hl, e3/ Ho+ Z
X 4LFf[X [` ,> ,>Hg, e3/ HpZX ZX * 0H @
, 0V @
G
aJ + FW4VFe[X 4TF`ZX XZP + FaZX H uZX 4TFc[
X QLP ,>Ht,> , (/ HpO + [X 4PFi[
X ,> , G8/ HoZX Z
` 1j + Fl,> , G8/ Ho7N `+ Fo,> , G8/ HoZX H u4HFqZ` ,>Ht,> , (/ Hp@ + -0 . Hv p X Hp [
,> ,> , (/ Hp
p Z0 0N! + F| : XZ0 + G (I0H + G ,>Hh, e3/ Ho+ G I H d, j * jI , lHwlH{Z`` p XV` .I0N + G S: GZ` + G
XXX X ap + G
S( GH` X aP + G,> ,> ,
IXJ d, j p XN` XX8 Z
O Lp ` Pp @@ @@ `,>w, G+/ HoXZ` p XH O
p J ` / Hv+ -0
Z O8Hz ( 1X @ * 1X @
A , 1X @
A . 1X @ A aH + G*,>w, G+/ Ho Z`` @ + -0
. Ho ` Hp @@ `
I J _ J d
IXL d, j wXN` R`` Z`` Z`` 8 8 P8 p H ` / Ho+ -0
. Ho ` Hp
w J `
I L _ L d IXN d, j wS( GH@ p H ` / Ho+ -0 . I I
H _ H d
IXJ d, j
p Lp XN` XX8 8 ap + GN,>8 ,>Hm,> _,>HZ, dz/ Hu p
1J 7 QZ` 0I
1P + G^,> ,
%/ Ho[` * QJ d, 5 , lI . |BNP XNP S0 GPP XVP QT` 0I1P + GeXXX + Ge[` *Hx1J + Gb,>Hd, e3/ Ho,> ,> ,>I , )/ HvQZ`
p
( 0L + Gh@ + Gi ( @ 5VGj@ + Gk[ 8 Zp p .( QH d, 5 Tp
p XJ`
p XL( 4VH[ 42H . @ Hp
Jp Z
Lp 0 N J0 0I pI p . L8
<
Jp 7(p + H.
8 Lp
p 0 2P( + H,>( ,>Hn, e3/ Hp>p + G|=2Gr (I
0H + H,>p , Qv/ Ho Zp XZ`
p p 8 XN0 P0 S( GH@ ( hI
S*@ BJ@ 4VH[ ,> ,> , (/ Hp[ p,> ,> p, (/ Hp / I + -0 . Hv, \ [ 1H + H ,> ,>Hn, e3/ Hp+ HT Tp ,I
J ,>I, */ Ho5:H:@@ p . nIS0 BPX Z p4XHQZ0` [@ 0H + HQ[ p42HQ
.
0 .I4NHQ P Hp ZP 4TH9
X LP XHX =2H3+ HQ, GB@@ @ + HT 0t P k ( H k6J , v ,>IH Z`H XXH (I0H + HKS: GZH 9HF,I0L 9HFS0 GPH 9HF,>p ,> ,
y< UI II 7I (I ~H I I I IH I %H I I H I I
: I" D 9 M = X A R @H I#I#H I$H I$I$ $ &I% b " ? ( 8 ( D( > X ` <0 X 8 DX < ` [Mc@
exu` H H ( 6$ 0 0 P P %0 ` X ( ( 0 8 80 8 @ D@ P P X !* & EXTERNAL name the name of an intrinsic function INTRINSIC name RECORD FILE SKIPFILE SKIPRECORD AD CK UNLOAD UNLOCK statement UNLOCK THEN IF THEN Statement function -0 . K w6K(K+@$I*+ JD+ J<+ I/+ I@+ IB+ IO+ If+ It+ J:+ J<7J + I1@@ + I3,> a, o/ K Z 3V + I7,>\L1 ,>lL1,>K, e3/ K + JD Uap + JD * 1H @
, 1H @
A
. 1H @ A
J + JD,> , I'/ K 5:JD+ J< *K.
Jp 2rp + JD,> , I'/ K 4:J< aN 9ID 0P + IK : + IN0P 9ID : BZ : BZ 9ID6J + IRO@ ,> a, o/ K Z 6N + I[(K4HI[@ 0r + I[[
LLP2L 9IUZLLP P
$L1 J + I[9IU (
(H( ,K.
Lp 2rp + Ic ALKY4NIb + Ic9I_O 5:Is,> , JE/ K + JD6J + IiO@ ,> a, o/ K Z . (N@ (K. Hp 2rp + Iq
A
LKY4JIq + Ir9ImO 5:Is@ + JD,> + I@@@ @@
Jp ,> , I'/ K 4:J<7N + J Zp Uah + J
aJ + J
0, d+ J 0 % P0 K H0 !
J0 ! e N0 " 0 .p
aJ + J
0, d+ J 0 % P0 H0 !
J0 ! e N0 "+ J ,K.KA
0K(KA G
aL + J
0* d+ J ( H( P( !
L( ! e N( " ( .h
aJ + J 0. d+ J 0 P8
L8 !
J8 ! e H8 " 0 .p p 6H + J"O@ ,> a, o/ K Z
. 0L @ 0 0L @ G `N + JD 0H + J*@@ @@ + It
Ual + It7P + It1H + It , 1H @
p . 1P @ G
aL + It Zp
0* d+ J9 0 m P( @@( ! N( !
e L( " ( .h p + It,> , I'/ K 5:J=O + JD6L + J@O@ ,> a, o/ K Z 0 (P dKYA 5ZJ:/ K + -0 . K @@p w
$KY Jp
p `L + JK(L Lp :p + JH p ,>lL1 ,>lL1,>K, e3/ K :p p (Z Zp 4ZJX p `H + JU(H Hp :p + JQ p ,>lL1,>K, e3/ K > j+ JOO / K + -0 ( QH d, 5 Z*P Q*A` J TZ
., L S.K4NJf Uah + Jeah + Jd K Z + Jf K+ Jc
K J @@ ,>K , I'/ K 5:Jj@ + @ 26 + Js6LX !+ Jo,>X !,>X ",>X , e// K + Jr,>X !,>X !,>X ",>X , e// K .6 + JjZ T/ 8 Z .h Z O
K J _ J d
K XL d, j 5RJ|[ OXZ O+ J}XR O[` 5PJ,>K, e3/ K QV` XT` 6J S+ KXX SQX S+ KQX( XX S &. /0 " 06 +
<
,> Z T8 ,> , (/ K + -0 ( QH d, 53Z S+ K,>K ,>K , e3/ K , .l S wn T + @ ` 0dK#00dK# 0dK#< Ug < U > U hh /LX " ( 0 5
0 p 0 @ P @ P
` @ `
` @ p 0 @ `
p 0 0 p @
@ `
@ @
` @ @ 0 @ p P P
P
` 0 p @
@
` `
@
p
0 0
@
P
@
P @ @ p
p
0 0 ` P
@
@ @
P
` p
@
@ P @
P 5 }?}' }?}' }?}' }?}' }?}'}?}' }?}' @ 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" LLLLLLLLLL L L L L L!L"L#L$L%L&L'L(L)L*L+L,L-L.L/L0 h p x ( 0 8 @ H P X ` h t x 0 @ H T \ d h FORMSTA -0
k*VN0J + L`,> , =9/ VN68 + L_ + : X@p@ + -0
kZ
1J>v+ Lk Z8p ` P *VN0J + Lk,> , =9/ VN Z 5:Lk + > @ + -0
(V'S
,V'(L .
.V((N .
0V(.
.
VO : 4,> , / VN,> , / VN+ -0 ,> _, o/ VN: Z Z p[
1J + M0J + L,>V) ,>h ,>V)+ M,>vs,>,vs,>V*, e3/ VO+ Z Z` S. N d, jXZ` XVP ` PP , Ll Z` S( GHP (VPhVP * jVQ,VQlVR ` NP 0 pVR@ + ( H n,> _, o/ VN4ZMO@ S, L O ,~ @ ,~ Z
2JVS+ M V* N n,> `, o/ VN5ZM O ,~ @ ,~ ( H l@ ,~ @@ l@ ,~ -0 . VS@@p @ Vt< Hp 2vp + M)
\Vt J n,> `, o/ VN4ZM)O@p 6\Vx9M$ p `N + M-,>V+, e3/ VN+ MK2XVT+ M<:
VT J p
zaL + M3,>V+,>V,, e3/ VS+ M4O@ z Uan + M8,>V,,> e,>V,, dz/ VO {aP + M;,>V-,>V,, e3/ VS@ + MK zaH + M@,>V-,>V,, e3/ VSO@ {0X + MC , L qO@ r X q,> , =9/ VN Z d
d0L + MI hp P p+ MI@@ p"0 .p d/ VS+
p2JVT+ MO> O ,~ @ ,~ -0 . VS ( H n,> _, o/ VN Zp 4ZMs", .lp . N n,> _, o/ VN5ZMb p ( [
.0J+ M],>V., e7/ VN+ M^\` . p ( dXP8.0P + Mu
p J8.+ Mu ( H n,> _, o/ VN Zp 4ZMs", .lp 3,p + Ms p ( [@.0H+ Ml,>V., e7/ VN+ Mm\`@.
p (
dXN0.0N + Mq p H0.:p 3hp + Mh+ Mu,>V., e3/ VN+ Mu@ / VS+ V/ H n,> `, o/ VN5ZM{,>V/, e3/ VN,~ @ ,~ V0 H n,> `, o/ VN4ZN:
@@0p+ N, M , \ Z , M [
0L + N: Php+ N ,>vu,>4vs,>V*, e3/ VO,~ 0 P n,> _, o/ VN V0 H n,> `, o/ VN5ZN,>V/, e3/ VN,~ @ ,~ ,>VU,>VU, N / VS,~ ,>VV,>VV, N / VS,~ ,>VU,>VV, Nd/ VS,~ ,>VU,>VU, NC/ VS,~ ,>VU,>VU, Nd/ VS,~ -0 . VN ( H n,> _, o/ VN4ZN-O@ ,>w~,>w, Nd/ VS Zp 7L + N'@@ + N(, \ Z [ 1P + N+,>vz,>Dvs+ N76*p + NA + NB@@ ,>VT, P\/ VN68 + N1 + NB6N + N4, \ Z O@ [ 1H + N91H + N9,>v{,>$vs,>V*, e3/ VO+ NB , .l @@Xq XXq@@Xr@@Xr@@Xs@@Xs@@Xt@@Xt@@Xu@@Xu,> , / VN@ / VN+ -0 . VN ( H n,> _, o/ VN4ZNQ,>w~,>w, Nd/ VS Zp 7L + NK@@ + NL, \ Z [ 1P + NO,>vz,>Dvs+ NY6*p + Nc + Nc, PS68 + NT + Nc6N + NV, \ Z O@ [ 1H + N[,>vu,>$vs,>V*, e3/ VO+ Nc , .l XXq@@Xq@@Xr@@Xr@@Xs@@Xs@@Xt@@Xt@@Xu@@Xu,> , / VN@ / VN+ -0 . VW@@p @@p @@p @@p @@p @@p @@p @@p @@p @@p @@p w~,> a, o/ VN Zp 6Hp + O+@dNo+ P2, ro+ Nr+ O+ O+ O 8 , PS Zp 6,p + Nu + PR6P + NxO@ , &y Z [
0J
+ P2 Uan + N|,>V0, e7/ VN@@ d , !%4:PR
p Jp >
+ P2 8 2xw 8 ,>VW, P\/ VN Zp 6.p + P2+ O' 8
Lp ,>VU, */ VN4:PR,>p , / VN @p Hp
p J
k 0 `n + Og : Z p ,>h , ^S/ VN Zp 60p + P2+ O06L + O, \ Z O@ ,>V1+ P> 8
f2LVX+ O 7Pp + O ,>V1,>V2, e3/ VS, PS Zp 6*p + P2 + PR2LVX+ O*7Hp + O$,>V1,>V2, e3/ VS,>VT, P\/ VN Zp 6.p + O( + PR w0P + P2+ O32LVY+ O57Jp + O.,>V1,>V2, e3/ VS, Q Zp 60p + O1 + PR w0H + P2,>V2, e3/ VN+ PR2LVY+ O=7Np + O9,>V1,>V2, e3/ VSd , !%4:PR
0p Jp > + P22LVZ+ OJ7Pp + OA,>V1,>V2, e3/ VS, M * J , \ Z Zp , M @@ [
p 1L + P2,>vu[ ,>lvs,>V*, e3/ VO+ P22LVZ+ OX7Hp + ON,>V1,>V2, e3/ VS w0N + OR6Pp + OR,>vs,>V3+ P?, M 0 P , \ Z Zp , M @@ [p 1H + P2+ OF ( 2LV[@
f . 2JV[@ A aH + On7Pp + O`,>V1,>V2, e3/ VS
w0J + Od6Hp + Od,>vs,>V3+ P? Hp ,>VU, */ VN4:PR,>p , / VN
0p Jp p N @@ ,>( , ^S/ VN Zp 5:P2+ PR2LV\+ O{6Jp O@p @@p , !%4:PR
0p Pp >
.V\ ( 1N @ ,V\ * 1L @
A aH + P2,>V4,>V4,>V5+ OH2LV]+ P6Np O@p 0 Pp , !%4:PR
(p Np > 0V] , 1P @
*V] ( 1J @ A
aL + P2,>V4,>V5+ Oz2LV^+ P6Hp O@p * Jp , !%4:PR 8p Hp > *V^ , 1J @
.V^ 0 1N @ A
aL + P2,>V4,>V6+ Oz2LV_+ P"6Pp O@p . Np , !%4:PR p Pp >
.V\ , 1N @
(V\ * 1H @
A
aL + P2,>V4,>V6+ Oz2LV_+ P,7Jp + P&,>V1,>V2, e3/ VS, !%4:PR
0p Pp >
.V\1N + P2,>V7,>V7+ Oz@ 0v + P/
Xf JX 9P-,>V8,>V8, e3/ VS+ PR6L + P4, \ Z O@ [ 1P @@ [
1J + Nk[ 0N + P:O@ + P;,>V9,><vs+ P? w0H + PA6Lp + PA,>V9[ ,>lvs,>V*, e3/ VO+ PR
p