0y.60 @  y.$S4xk!4y A4y&Bb U^0 ATA ~H=lHN -0,> aH +,>w,>,/ w w~[ ([hA 7X+ ( (H(A(O .0H@, 00L@G *1X@ GaN+ w~  ,1H@ G  *1X@ .1X@A  (1X@A G aL (@*+ (pO/2",>H!Z.hQ. ,>+A@ w~+@$!+>+(+(*Q*T "+(+++(+;@+.+3+++3+8+;+( w. "t|vx8 Qtby./@by./@by.1@by./@ by.1@by./@( "@)1N+= +> w.0N+= +> w.,HaN+=,>( 1,>,/+C w. ,0N@ 0 D"by.*@*by./@+by.*@-by./@.by./@/by.*@1by./@2by./@4by./@6 P@6D aL+=+= w (`n+= +> w.1N7@4ZC,> ? wZ,8Q, ,>,>,2/+C@,^+-0,>w,/aZ+J AG *5JJ,> D"d"e;g@:by./@,>,/,>w~,>w,/+(R-0D aH +V,>w,>,/,>w~,>w,P/+Q D"by./@Jby./@Nby./@Oby./@Q QW4Rby./@Tby./@Uby./@W QzX@`@ tX (*DX-0R.@ w~+@$[++^+d+i+l@+ w, .0L@ a0GaN+v + w, .1L@0GaN+v + i w,1L+v  D"by./@Yby./@_by./@aby.*@cby./@dby./@fby.*@hby./@jby.*@k ( l+ w,0L+w[(A07Z+v (al+s,>+s,>Z.(Q.  At,>,>,I/@+0 (0P@,M[(A.} 01N@ }G,GaH+  D"by./@mby.*@rby.*@sby.*@uby./@vby./@wby./@yby./@}by.*@ ( (+ Jp (an+ :+ : pz+v w (+4Z ,> w  Z.0Q. ,>,>,u/+ wS,BLh@/+X-0. w h  Hp,>,>,/4:t w6Lh+0 D"by./@by.*@ by./@ by./@ u3{by./@by./@by./@by./@ " 0P+,>,/@+d h `,>,>,/ 8 [. @  Pp2rp+J8 H0H+D HX L`,>,>,/4:t00P( '+(S*GJ`[ P5J0. D"by.*@by./@by./@by./@`:@by./@#by./@%by./@&by./@) A* 01N@( *1H@ AaP+< :z+< .n[P Pp "2Z@5H<7,@+< P NS( H, Zp *j 0p S,BLh p ; pXLhS.GNP.0N+HZZ p2H+HZ.PQ. ,>,>, /( C+Hl , D"by./@+by./@/by./@1by./@8by./@9by./@=by.*@Bby./@Cby./@D "@ E0L+G,>,/@@` H1l89[,>,>,/@@/ @M 2 .(/( Hp2rp+^ H Jp4J] 8 Np p @ Hp4HZ  @V p 2Lh+Z,>h,> ,B/ D"by.*@Fby./@Gby./@L`:@Lby.*@M`:@M`:@Nby.*@Xby./@Y ((Z+t: p ..82L+T9P X.8QX6,  X.<  b Q6*6`  P P_  XHe,6 7*+j pS.GNhj  " k0N+n\`X p QHh Zm pS(GHhXZXXTX[w,>,>w,K/ s@/+ D"`:@[`:@^`:@cby./@dby./@eby./@jby./@sby./@t rt;u (u-0. w[w.w Hp2rp+ H,>X,/4:7LX9x,> ,Y }/ X Pp[p,>,>,/9x@/+t-0u w 8 j$   2&4)V}=2 w[.02 N5S0 P, 6Hw+ ,l  D"by./@uby./@zby.*@|by./@}by./@by./@ jn@Xby.1@ by./@ " + Z(hQ( ,>,> ,}/,~-0X w,>h,> ,/+ ( -0,> (QH, 7JQRZXNHXR wXPH QZH,^+( -0.  D"Y5by.*@by./@Y6by.*@by./@}f: 2NfGby./@    $ 1( +$ :XZ+% ,XLZ`@@@@ w[ w. w Lp2rp ( )+;@@p@@pZ` H7NP+/ P1HO@p.4+/8 P( 0H+ "TD(1 P+@43+6+4+d QN P0P+E7Jp+<  N @@ `"P D"`:@ `:@#`:@$`:@%`:@%`:@&by./@0by./@7` D @9  A : ( H, 6.`+? ,>h,> ,/6H`+D =Z,hQ, ,> "(B,> ,>/XX+T7Jp+H @,>h,> ,C/. Np,>,>,R"(K/ D"by.*@>by./@?by.*@Bby./@Cby.*@Gby./@Hby./@Hby./@Iby./@K (K4:( *1H@ ,D aJ+R,>,/ pn S.GNXX ETO@6J+b  N8@@8Z P D"by./@Lby./@Nby./@Qby./@R`:@T`:@Tby./@U`:@W` D @W "X ( H:,XZZ " .jZ $ ` Lp3,+` F,>h,> ,G/ @ E` pXP+6S.GNR`+6 P0N+t7Hp+i ^,>h,> ,_/ D"`:@Z`:@[`:@[by./@]by.*@_by./@``:@aby.*@gby./@h  i, Lp,>,>,R/4:0 (1P@*DaH+s,>, q/ pl S,GLO@ P Tp(  D"by./@iby./@jby./@kby./@lby./@nby./@qby./@r`:@tby./@u (E@v5H|7Lp+|  PV@@V `"H * JX,6QX7LP+ P0P (A ~+O@p+@@p.4+@@p.4 P01P+,+ P0J+"A7Np+ f,>h,> ,h/( Hp,>,>,R/`Z+* D"by./@w` D @yby./@by.*@ by./@ by./@ by./@ by./@ by./@ " ,1J@ .D aL+,>,/ ppS0GPO@.5N " 7Hp+ Lx@@x X"N 0 Pz,6XV6H+2 X2,`+#(  Z0hQ0 ,>,>  D"by./@by./@by./@`:@by./@by./@` D @`:@by.*@" (@", /  P@@Z H * J,YXZZ $ `" .l X/`  @+Z8$ Pp30+0  ,>h,>  D"by./@#by./@#`:@%` D @%`:@(`:@)`:@+by./@-by.*@/ (/,"/ pXJ+3S,GLR`[ p,>,>p,/ H[,>,> ("8,5/[8QP.$9(7H+y, .1L@ 01L@A""@aN+C,>  D"by./@0`:@1by./@5by./@8`:@9`:@:`:@;by./@,/,>,/XZ,>,G/""JQZ C haJ+Q  D"by./@Bby./@Fby./@Gby./@H`:@Hby./@Iby./@J`:@Jby./@M * M L$@@$ 0 P . N&,+R 4XZ[ < 7r+v/$Z5Pu @ V[ *3HQ@ ,M  01R@G aJ+^,>,I/XZ+u ^Z Np7Hp+q Hp010+o p6,8+o pZ Z 2P+o p gZ0Z *2H@ [0 (2NW@A aJ+oZ0 PpXP:@+u o pZ @ Lp+_,> D"` D @O`:@R`:@Rby./@Xby./@\by./@]by./@a`:@eby./@q ("r,\/ Zp pXN ( H8=rT/$S*BJS*GJ+} LM@@N @z  N 0 PP,QZ[ w,>,>w,8/[(.. QDy<"@ XP, .Z` D"by./@rby./@y`:@z` D @{`:@}by./@`:@by./@`:@ (@Z^XHXTQ4 Tp*4 p K* 0J+6N+ h HzS* J (@(, ZpS,BLh ,l .n XZP+R`P / +-0 w h"@(ah+Z*hQ* ,>,>  D"`:@`:@by./@ `:@ by./@by./@by./@HXwby.*@ (A ,//+ haj+!,>Z,hQ, ,>,>,/+ wS*GJh" "[ 5J%XZQZ+'  wXNhXN D"by./@by.*@by.*@by./@ `:@"`:@#`:@$`:@%`:@& "@@'@+ -0. w[w.w Hp2tp+, P Jp ( X 0L+1 U/ ( P:p+20 P0 p6Ph+ .+@,5+)+8@@@+< (" 8+Z,`Q, ,>,>,>,/+/[ `4L 210 +B* 0* + A@ : Zp+D* 1* + :+A[`7*X+ZZ X$ p&,XLX[X   D" 2NU(by./@(by./@1by.*@:by.*@:by./@;by./@?by./@Bby./@H * I P@@ p$&( H . N|,QZX,< 72+ (  Q.Z@ Pp JI@@I p$&( H . NL, pXZ0=2P+ P@ZZX LS@@T p$&. N ( HW,XZX*1*+ Xap ( b+[X2N+ZX> 6L+gS.GNZ Np7Hp+z Hp3H+x  k p.1.+x p6, +x pZ@Z X2N+x pZ0ZX2P+x P@"s p[ 2Lc+x pZ 8 JpXJX:(+ pZ0 Pp+h6N+}S:"@"|BZ+,> D"` D @Kby./@Nby./@S` D @Vby./@Z` D @]by./@`by./@kby./@}  },/ XDX ( H,>,>,/4:/S(GH` =h >p+) D" ,>,>,/4:/,>,/+) h 4+@, ++@@@*" ++,>,>,/ D"by./@~by./@by./@by./@by./@by./@by./@ by./@by./@ (+,>,>,/4:/S.GN` n >p+,>,>,/4:/" @,>,/4:/, 0L+ :z + 0p  D"by./@by./@by./@by./@by./@by./@by./@by./@by./@ (   Pp,>X,/7$+/ -QDh*,G aJ+(,QZ p ( J[ p,>,>p,/9+[ w,>,>w,*/@/+ D"`:@ by./@"by./@$by./@%`:@(by./@+by./@.by./@/ 2]V0 AD 0-0[4X5 w2J`+4 +Z`+1 w N[  P[,   *A 8+3-0(. w ` Hp6J`+D6N+?,>,>,D+A,>,>,R"A A/ "by./@6-MQ+by.,]MQ+ 2OUj9by./@9by.,@,>,D+I,>,>,R/4:Y J ` X,>,>,/ [ .  Jp2rp+R HXVHZ`H9O,>p R,>,/ Zp4zV .QNp[w,>,>w,L/ p/ D"by.,@Dby./@Eby./@Gby./@Iby./@Kby./@Lby./@Sby./@Xby./@Y * Y+/-09.( Hp7Jd @@p w[w.w Np2rp+ H0P+' "Tb  J6 H X Lp \0N+g@@+x5Nw@@f* 00J@[0 j (0N@AaP+pZ*0Q* ,>,>,;/ pS* GJh haj(s+xZ,hQ, ,>,>,o/ D" \|D!Zby./@Zby./@[by./@bby./@hby.*@oby./@pby.*@uby./@v (DD v+ * Jg6HX+| X[ X4L| 0QPb :+}@ Zd,  } Al6Np+XVpQVp+XV8XVp (h,>H,/QZX5:Z`XO (+ ,0L+ 0BPX 0p[X Hp[ Jp `L+7.(+ "@"   P{@@5Z( H , L^,+&Z(+&7.(+  P@@Z ( @" &, L D"by./@by./@by./@by./@by./@ by./@` D @by./@` D @ "   ( H,+&  P,}  pZhQH` L@@ * J . (" N,XZ`S0GP` 00XP`XV` XZX+@@p H X7JX+V[ "(*0N+,,>+A[.  ` Jp  L L~ XN/,  0 D3p,QZ` Zp (XHhQXh p7Jh+9,>+A p h Np Np0 D"by./@by./@` D @!by.*@+by./@/by./@0by./@3by.*@8by./@; "  ;0P+>*1J+?,>+A p* 1J+C,>,u/+ 6Nd+F " D: p J +H,>,>p,D/4: ,>p,/aZ+N pZ(hQ(  " L,>,> D"by./@by./@?by.*@Aby./@Bby./@Fby./@Gby./@Iby.*@M (@D M+ (QH1, Zp Jh LhQZP pXNR p PQ[/(Q "V,>,Z/ Zp5:\ Zp7PX+[,>p,/ p+ 7PX+,>p,Z ^/ p[h pXXhXXp  JN J0 XLb,1 [pXN`QXp 0 Dgp pXH`[  JpZ 8 XL  .QNc Hp,O pQZ@QXh pXJh o[ p Lp pXN0 X[,>,>,/ P6PC+w,0L+ , D"by./@Wby./@[by./@^by./@aby./@cby./@gby./@tby./@vby./@w " Ax0L+ pQVh P6Hu+}*0J+~*1J+ pZ.hQ. ,> ( + pQVh6NP+ XPh+ P `,>,>,s/6Pz+ , " 0L+ ,1L+ pZ(hQ( ,>,>,A/+ pZXHh6P*@+7lD+ pZh,>,>,> D"by./@{by./@}by./@by./@by./@by./@ by.*@ by./@by.*@ @ A,/>[ ,>,>,/6Jp+ p Zp+[pXN(ZpXZp" A.2+_ pj p/+Y(1H+&,> D by./@by./@by./@by./@ ,Q4by.,\Q4a[!by./@!d"e;g@# #,>,>,>,/,~ , L X N, >X[,>,>, ,/ H2J+36N+0 V+=,> D"d"e;g@#by.*@$by./@%` D @(by./@,by./@-`:@.`:@/by.*@0 D0Z(HQ( ,>,>+; H2N+96H+6 V+=,>Z,HQ, ,>+2 9,>Z(HQ( ,>,>,/,~@,~ D"by.*@2by./@3`:@4`:@5by.*@6by.*@9by.*@;by./@< 2Nt> ( D>-0Z. w h+@$A+z@+C+F+v6J+w w h N+z h "F*5JH7P   06NP@( *1H@ GaP+p6L+w @ O(0H+W R 0P+T,> D"by./@>`:@C`:@Eby./@Fby./@J`:@Nby./@O`:@Pby./@R "ADS,>,D+V,>,>,R/+r7P+n6.H+j R,>,>,R/ *[4:z Q1J7  ZpZ H LpZ0 Np pZh[ h.3hp+h p d h, D"by./@Tby./@Vby.,@W`:@Yby./@Yby./@[by.*@]by.*@]by./@d @e,>,> p,8/: p+` w h+r,>Z(HQ( ,>,>,;/ (Dm+z,>Z.HQ. ,>+l P `,!4:z,5Lz[,>,>,+/(ADv+z7J+y,> D"by./@gby.*@jby.*@lby./@mby.*@nby./@rby./@u`:@vby.*@w (@(x,l/+zO@@/+!-0>. w h ` `0H+, 1L((+,>,>+ T D"by./@x`:@yby./@z 2OQI{by./@|by./@by.*@by.*@`:@ (+ P Lp. 1N+ ,>Z(0Q( ,>,>+ ( H,>,/"  Z4:3[ 0L+0!0P+Z*hQ* ,>,>,>,x/ D"by./@by.*@by.*@by./@ `:@ by./@by.*@by.*@by./@ (@+37L`+ ` P @(!4H,>,>,>,/  Z0+ 0  P@@[,>,>,/@@ D"`:@by./@by./@by./@by./@`:@`:@by./@`:@ @@@@ w7Hh+/ h P [ .  Lp2rp+,d ,>H,/ *@""(5:)@@+3[H,>,>H,/9% P[,>,>,+/@@([ w @ "0,>,>w,./@/+{@ ` D"`:@`:@ by./@'by./@+by./@/by./@2by./@3Jy.%5 y.*5 "5*,. 7/ D"by.1@5by.1@5by.1@6by.1@8by.1@8by.1@9by.1@9by.1@:by.1@; ;46 D79:DR< L? D"`:@=by.1@Cby.1@C`:@Hby.1@Iby.1@Jby.1@Jby.1@Lby.1@L MA8 (((,(0 F(D( @ U0P Ph h0  `(`((` `4` ^X(X X4XB$@ 8$@X$@@<  fH00X  `8 8@ XK: KKF H P oP0 hXIN EXTERNAL STATEMENTAS DUMMY PARAMETERIN TYPE STATEME wNTIN DATA STATEMENTIN COMMONIN EQUIVALENCEAS AN ENTRY POINT NAMEAS STATEME  NT FUNCTIONAS COMMON BLOCKAS NAMELIST AS AN ARRAY OR FUNCTIONAS AN ARRA  YAS A FUNCTIONPBPBPwPvPwP@PtpCpv@pw  P   D"by.1@N y./O y.1qby.1@ by.1@ by.1@ by.1@ by.1@ by.1@     A VARIABLE OR ARRAYA SCALAR VARIAB  LEAN ARRAYA SUBPROGRAM NAMEi4r[r_rghrDUMMYVARIA  'BLEPARAMETERPARAMETEREND OR ERR ARRAY OR NAMELIST NAME  0ARRAY NAMEk:N@ D"by.1@ by.1@ by.1@ by.1@ by.1@ Jy.,b0KNc^}:3M`^5M D"`,I`^FH`^G`2VG`^4F`2kF`3E`^oE`3D D"`.D`^EB`3B`3%A`3%A`_@`2@`2?`^1? D"`_>`_>`3=`_<`^ <`^ ;`_7`^2:`36 D"b2Nt'eK)-1dQ4/bLCY{b2OUj eMQ+ `<*o\eK)-ud 4( D"dYHz]'c gz%`{0$b\|E3dqLeK)-be!4r^bP^#=Td "]?S D"bM yHlbJ6(I`:E`Qc(Hk"3ed sQ"ed sQed sQb2OUj D"dSM OdeMQ+w`<*ob pTSeK)-WdSM O7ge%8bLTB0gm!%0 D"eK)--c(Hk"'dQtc^hM}bh#mgdqLted sQ_ed sQWed sQM D"cXq o`<*o ` xqA#dSM Oed sQ|bh#med sQPc^hMrc g}B D"eK)-ed sQed sQ{ed sQ'ed sQ;eY]g "dqLjcXq o!d"e0H D"ba``bM yH`/83` xqA ed sQ `/83kejn)eK)-b2NUz D"ge&3dDdMOn`<*ojcXq ogcXf2SbbM yH_dSM Of`/83f` D   D"eK)-rf,h!?Fgm!&{bNZM Uge$'bNZM NeVVnGbJ6(Egm!$D"ge%Dc g}bNZM gm!%(( 2