Directory of image this file is from
This file as a plain text file
?<2KRPCH,DHY4CI8OH<<(P$2 ,A*<"LNTC<, D4(9D8,J+8SDO(NU8SD[LODP/HA/4LO?H:0AL4?L<PL&<AD<4H\-\9?L(6DHLD;L*L>H;8/L:X=L-D6DTL-D;DLLD8+1DEL<H1L3H0(LZD<L2L0;LJ0OH101H6(2;LD0 L?P3DHL ,->4$JL-8;<HI4QZYHV> .RX*MP1*MP!0%]P1JYI <(AIAE38AP=BXCXA%HAINRU-SEAR IQ).U%K!ISK3]W5IBHLHKC%+*H=+Y:S0K6<(+WIX$ ;X+WHIX$ /S?:-4I\$ I%$ /0IY[0IZXKI^\KS0+;/6<H*F2K ?EFTO+>(+JOZ2A [2IS[SZS]*IO>< *[O==H++C.>(K<K; >O>2A *2IO:<(K9 :O8<(K7 8:A ?CS^+X2AJ+ 6J+ 5J, 42I:A ?BS"+X:A ?BS&+X2AJ9 3J?8A 22B/12AO\ [O\2I ZS\S[SZS]+J:A +*Q2C/0>A1-?=FORTRNTMPASS2SVPASS2OSV4>K/*[!RA704>M LT?L^MP>NLS>ILDFH>>DBINTEGERFUNCTIO8IREALFUNCTION8BCOMPLEXFUNCTIO8GDOUBLEPRECISIONFUNCTIO8FLOGICALFUNCTIO8EFUNCTION8NSUBROUTINE8BLOCKDAT9P.2HZ"2[VKV[^HKXJHJXLHY"2[YHKXMI[Z LJZ2LK[%J2\MK%\LR +W2A/EX/ ;LI9!HP> +7LI9!HQ> +7LI9!HR>(<B2A/%"/=>0 C8K?2A^K2IO>8AZJ2CNK.J ??1<$Z?1.$\?;/$N?2;$P?9;$R?9,$T?4;$V?4,$X?(0.$^?;.*$ DTGYNS"[W58P6Q07$78HA+S.KV5AV8V-CUXS0O)O? 46F*R]49LA41%MSUS=5?\;<;/Z%\X3PU5LGQ>BICECNCDBMBIBMBZ.BL2IR(SP*(KO>(*JP*K+9A<P[+<XSO2I2 [BH6* RUJT[-K?[PJDZ(*ASO?*W*%K>*Y =CICF<B*:*6JDZ(O-C<9J8JKM8J8JS-*;O-C<[MS-O-C;<(*AK:<(*HK9<(*AK8<(+K8A<(*A/72C.>OA??2AK6[[2ION<(/P2I ,A*"ONC5< K49Z8J[+SNONZUSN[OSP/PBO?0:A,?=P?&A?<]- 9?6:R;1*>3;/.:=6-61U-;1S81+1EA<12302JZ<1203;JO<11,62*;D <?34R -;>4JI-;><IQ-;(71<).-;++-2M :2;:64U%:2L&;72;1-61J;?+?.!91-3>,K!(.6,IS:/*7)?3;1=N;;971;973;HL62+;8;H:3187<?M0:(+;-2>4K\=?<5,0>=K3>-,782]/?*-IB,,00W5971<HKA>G3C&K6LO1 $HGG S*G$Z%SYSTAAI&?&?Z.FORTRNTMAE>>D=7BIB 3E32?KZS4O<XQ [HB =Y[A\+WB(\C^ %PA=T]? VRYGO3TVD][ $"M$" \"KD H4X 4 LB"YIX2? M.2J%?*YIL<(K?IM\MQI<H*THM9!K>>X*%>LTHNXM2J%?*Y:*THMXNHMXHK=YIK(X"2J%?*.IL> *1IN\MP"* INX *5HNXM*YH \MP"*!LHK<>(*RH K*>(+HNXM*HM8!K;X"I=XM%<X69X%;+QH*X6K:%:H*%:%9PGHG<Q:AX!%>MK%8+1%7+1K->(%6+1%>OPP"+1%5X!%8?:%7= :%6=CK9%:-4%5X!%9K8XH/7D/?%3D<=>>9 W2ILH< *K9$HLXLLH2AYR-RX$2A%3*RH$>(*%5PLPL2ILH> *VPHLH< *K%>HPXL%28!H6> *2K?%:%2%:HLXPH5> %>EDX5* PLX5K>%:Z^X+K=X"I=XMLN\MP"*</<P5%;+IK;%:H*%:-4%7+5K:> +/HLXJX$%;+5H*%1P$%0+5+Q%7+5:H$%1%6-4K9%:%28!X$H$8!%:HJXLLJ%:P$+*-4%/%8+5K8%:-4%>GT-410=X/B?: &%.=X*=%6--%0/?+ K>N%:%1%7+ JB> +%9[ %?7%7+ K0<(*88A<(*6K=> *TK > *T%,YF <*=%.=W*=HMX$H"X%%5H%%1H$%1IF*LS *T8 K =*S:%>RW-4%/%8*=%7+HK;< +KK:%:*MK9> *=%2<(*=YF%5JU%:K8%:IF%:%7+ K;> *=*M%2> *=NK7%:-4%;+3%:H*%:K6N%:%.=W*=*L%8*=+,UV&?/2=TST?+TH%/%.=Y/?%6/?%.=W/?K>/=-4%6*1YR%.=X*1%6*1%.=T*1%6*1%.=T*1%.<+*1%.=T*1%?*1%:%,%:K<%:%.=W*1%7-4J >(*L%>DF-4%2XM%2X".4%.<.--%+AAA8- %.<;--%7+M%/%6RKI%:-4%:I*%:+J ;%.<;-- ;D4AK:0\K9>(0Y/X/:XRXSXTXVXWXU%)+0A(X$ 8 8 8HUH$+%HSXRHTXSHUXT/70.+$A=>F\FJWF=% %.<2--%+8-4% %+ABA8-4%.<(--% %+ACA8:AYJ-4% %7--J> +T%?+P%.=Q+X%,8A[[2IO[< K?> +XK> [2A%+ ,0-4HJXL2IS[\KO[<(*?[[*:HK [H\KH8!X2ALJ2I\KP+F2A%7-4*]%.=Q+X<H%/K=[[*1%>CO-4%+H608-4K<%:H"8!9H%:%&-4A%9F8F8FX$%&8A%H$+&%.<;--%6--K;%:-4-.QAI>7:;?YHH!> .BRA*N"UJ]ZK?ZAIH2I^2AR.BJT<(*8AZT >"H:*R^R9.U%$COCF%.<<--%7*-?--2AK=%:"U2J&+H2J:A 6D-*2J:A 6C1*K<XHHK\HHP\HH?\HJ9\HH>\HJ?\HK\HIA\H B\HIC\HIJ\HIK\H2J 6FK;%:P5-4%7/$I<(+.J>> /$S$S$/$%.<4--%+AEAB-4*.*!HK!%?$>G<% %.<;--%.=X*=HLXOX=%"*=2IL%2AC?> + H%X;[^H7X<%0*=+CH=<(*88!X=HOXLLOX$LOX%2IL%K?\%P%L%\KHK\%: H;\KH<\KH$\K2AP=*!%7-4K>>(*D%>QS-4%>QL-4P=%"*=2IL%?+SL;?H+2AH<%1H;%1*LL%C?> +H7K^2A%1H%%1*W:AH%X;2IL;XJ:ALJX;LJH7X<LJ[^2A*WBBBBBBBBBA>A4BBBB=TBLPX7%?.A%,8AX%2IL%2AB> .AHLXJX$H%8AX9%7.AK?>(*[%/+VX7 : H,%1P$%0.A*\:AX8HJXLH$8!X$2I9ZD%>(.AL9X9L9H$> +X;AL9H9X92ALJX:H8 H7X72IL98AXILIXRLIXSLIXT2A%!X:H8 X8:AH9X9P$*:RA.A:AH$> .A2ALJX7+VXZK=X\++H[<P+*9HZ8HX[H:8HX:P\+%H:/ ^ %PA=T]? VRYGO?3*=X%6--%;*TK?%:9&X$P5*O%.=T-4%;*]H*%:P$*J-4"YP+K>%:/=H+>(.Y%>II-4%9%?*=%,8AX$2IL$C<> *=L$C;K:\$2A%5:A%88IH9K9>P-4I %:%:-4%>SN-4% %;--%?--%,YF%.=C--P5T+1IF%1H*%1HLXP-4%:IF%:%6/TJ3%:%.=T/T%6/T%7+-K]> +,%6/TSTK8%:/T%/%:K7%:+(%>DO-4%>BS-43)?MHA 6 CQ( HLXJXNYDRNYER%?+V%,YGIGQG%1P2IMGAE> +YID8 EGID]G2A%7+K?< + :AY:AX8HLXOX%/>HOXL2IK=EG> +\9ZMG]GQGH%\KMG< YGHK]GH8\KI\K\KH%8!X%2ALO2I\K2AP%+E%7+K<>(*J%/R.%>BD.%>TD.%>RT*]%>RD+KK;> +P*JR.%.<;--%6--K:%:-4%.<2--% %+ADA8:AYJ-4V)*?<=T\\0=XH!> .HQK?2I[O<(*$K>XHK=[B2AOB9!2ILH> * 2AOBA%SB> *P2IO2A.<X*$O*GO\KHK \K\KK=[B2AOB2I\K2AOBSBA%> *-2IHK9!K<>X*]2A%>ST/;OB[SBOBSB[AKBZH!> .2IO<(+ 8AXHK:XIKA[B2ALI9!2ILH> +"SB+X*]<X+ O[+OO\KHK K:XI\K2ALI2I\KSA+.*7K9%:P5-4+QL- 2BRJ%1%1%7+.K?<(*DK><(* K=> *XQ <*Y*UK;%1%:K:%:/9HQK8> *K;%1*DK7%1*D%/%?*(%,- %^*>*4*0%].?=-\%]/?:-\%7*:K6>(/5%/%]0?=-\%7+.K4< /3%9%^/2<H/2%.=T/2HRX$HSX%HTX %^++<H++%.=W++HRXUHSXVHTXWH$XRH%XSH XT9$HLXL%]1?:-\%>CL-[%>MO-[Z"Z7["=XZP<8$L?2\ AB$J $???>=U%&* IZ< *M%&**IZ>(*M%/**IYA%.%!<(* 9 X$K?X)K>Z6K=X%\%$)9F8F8F\%$)L%\%P%R6*[%>HO-[K< Q%,-\P$<H**%&* A%..%5%6+A%7*?K;>(/:%>MM%2> +A%2X$,$%/%2<(+P8AX$L$%:+H%28AX$,$%7/TK9=H+ K8=+ K<ST/T%//TK7< /6K5*VO [1S %7/ K1>(S / =P=HB<ZY.A?&<?\ =W[2?Z.%>SS-[X$%:H$%:%7-XK?< />IRK=>(/>P$2IK<D$> *YL$K;\$2A<H%28A%1%6-[%0**[K:%:%2%:%7-XK9/8X$%:H$%:* %^+M*5/ /7%!X:H8%WX8P%HSH[> /7 6%]0?=%1%0/7<H/5IH8Y*02IMG2AC4>(/7%?/7%,8A[L2IOLC42A>(/7X8P%8 KL+COS 3O 3K2 3K1 3/0K=>EBJBM-PT*,3US^A=U^H\P74^=XK?< *EK>+CK=< *JK<+CK;< *W%7*UK:> *TK9+C%/K8+CK7< *\K6+C8A> /5"(+%.=R+2ILH2A+C%?.(K4XH2ILH2A<(.(HQ> *=2ILH2AO3> *>R(.(PH H*-%>OP-[XR%2<(+NXSLS8!LR?(+RHS%1HR%1/2PSLS%:+DP"+\: X"/VSVLM/VH"%1HM%1/ HRK1<(+.?/% 0+&HT/%+N?)XD2,K[G$F?;$D$H=VC$B?>$?=P"*F: X".LMK?<(*AK>R.2AH!> *XK=%:NMRM%:.MNMRM <.MHLZM: HLXLNM.\%?.$%.=R.$HQK;<(*2K:> .$R$R$.$[4%?+)%:%,X$H$%:%7+ K9> +&P$2I9ZD$K4H!> +WL$C8>(IVJ4> +1L$K7\$2AK6%:2A<H%28A%1%6+.%0+,+YK5%:%2%:<H%/R4.4%>MO.4%>SS%2:.4%>SF+W^]DLP=XN?,D^ B = \LK?9!HL>P.X!%>PD-4%7.KA%9F8F8FZ%7.KRKA%J.KXUXSXTO.YK><(*]K=9F8F8F RO*;HRXRO*;9F8F8FXSO*;HSXSO*;9F8F8FXT%]2?=RYX*2IH*8A[OOO9HU<P O2A>P.Y%>ML.Y%7/OK<=+[K;=H+[K=SO/O%//O%;+*%3+*K:>(%8+*K9%:H*%:-4%>AS-40&0!+/:/-=>0 IU;?U,+1J=F0?P(AAABBCBDEEXFDG N O H I J KPLHMGPGQ: H"X": HMXM."9H HXXX8DH^HWXW8DH]HVXV8DH\HUXU8DH[HTXT8DHZHSXS.*OPSP<(+J%W+DI5$ HL 5 ?/BS= 4BH /3+Y*$K2X K2X(I, 1Z-*)D-XWH)> /!HWHX9PPZ%U:XZ/!/*& S^S^SSW/>GIS?&>NV;H7IKJJ\XHNOI0&8HY8!HRXYJ:Z7HS8D:HHZ?H*PJ;&<&=J68DZ6J58DZ5J48DZ4J38DZ3J28DZ2&9R7*JHYXRJ2XSJ3XTJ4XUJ5XVJ6XWXX&>.+N+$?DG-X$*,3??L<(+L[8L%8!K6>(+&P%S8+DK7%6IT[8L8!O8?H+YK7"!: +!: L>(+U: L\LK+X%K6\%K+8!H%K7.* S[6K+Z*[7K<[+ICXI>*6O.PY=1B?PS[W?L=WX X&XRXSXTXUXVXWXXZN%7.VX(%)*.AU[-P(HSXZHTX[HUX\HVX]HWX^HXX ? ? > ?XZX[X\X]X^K-X >*PH&> +H%7*;K=< +B%9 <*?%5%/H(>(.+NP&%5*O%/H(>(. +N RRX, ;+QK:XR 9RJN> 8.K7<(WV< K6> %//V%7/ K59H> ++<XP <PQJ/4%// %6-4K3%:-4"*M<<B=S-X,3AG* ^(=R$*+$X,%).AUX H,9D9DH,9DH *AZQ%7/? >"JQ>(*YH,8!X," 9VH M^]^/=K"XR <H&> H(8!H,=*.8!X,K;*0X,K:ZQK9XOH,<(. 9HX,<P+K2ILOXYLOXZLOX[LOX\LOX]LOX^X 2A&Q*3HOK8*2HS9HXSHT8HXTHU8HXUHV8HXVHW8HXWHX8HXXPRAG/NHX9DXXHW8DXWHV8DXVHU8DXUHT8DXTHS8DXS/$F,*,&,3)R)V)JHRHYXYHSZ.HTZ/HUZ0HVZ1HWZ2K?[*XSXTXUXVXWXX >J.9HZ.J/8HZ/J08HZ0J18HZ1J28HZ2<X =S**VHYXR <.HS<(HT<(HU<(HV<(HW<(HX>(+V;ZHS< +OHT<(HU<(HV<(HW<(HX> ?H.3 ;: HRXR+AXR.3K:[(K9[)98DO(91 (:0K([(S)+^/XP$<H/*S*%&/8/*S1/10X>\?6/U?:X+$,3$*+N?D ?.XQK>Z 9& = ?<H*M%)*T9F8F8F^ W=*W<H^ R. ?<H*\%)*UN ^ R *H% K<%:: %"+RK;%:8 H%%:H7%:2IL%C:2A> +R%7+RK9<(*$K8> +R/7K6XHLH%:P$*?K5%:%7+RK9<(/7K8> +R%7-4K9>(*"%>DA-4%>DH-4%&+UIZ< +%%&/XIZ>(+%%//XIYSX/XI*%:K4%:HR%:HS%:HT%:/(C6Q0?==TPS5$*2[T%7/?K>< *U%^/?<H/? =%.=T/?%^/? H/?%.=W/?*.8A< *ZK<+AK;<(/:K9>( 8*)9ZXSHS> 8AXRXT*.%/%^/?*6K7K7X$I*%:H$8!%:/6%7/?K5< +%!<(/48 X$K3X)9&X%K2XH$)+VA%9F8F8FXT$)+[A%HT\HP%+F =+B9VH%?H/1+^HTK0\HK/\HK/\H*.K.>(+(%/*.K-%:%!%:*4^ /CQ-*/U<8.=?= $!I ?X/X/(=X/RJ:X$IQXM2J%?*J;> *OJ7\MP$*J*SH \MP$*D PJ6>(*.MOJ5> *.J<2I^42A2J&8I2IN+^,R+R,R-*2A.3PPP>P2J%?*:*.6/,= <=B B>?:=7?6I.0F6"1*M.IF-.6V0"M&J.-Z0"161*J6I.1B4.5B;2;[D3I[NL&I2/WD3F;I3E FL7E*J6I.1F1"6*M.IJ-.4V0"M&J.-^0.0.520&;3NWTG E2I&/3NWT7GKE"M&J.-R12J%?*ZK?<(K>K=\MQI<H*SHM9!K<>X*%>LT*72J%?*Z:*SHNXM MXNHMXHK;YIK:X"2J%?*XK?> */K9\MP"*(K9X *3H \MP"*"LHK8> *<2J%?*X:*7H K7>(+CHNXM*HM8!K6X"I=XM%9K5XH2ILH2A< +Y:$HLXL2ILH2AX$,$X$%3+.8!H$>(+L2ILH2A> + PH%5PLPL2ILH2A< +Y%5/4%$CSCY ICGS?3D= <=B ?:>>58BIW=7: *OK?XW*N8A8A8A8AK>XW%.<2+M:AYC2I =2A%?+M%,YAIA8AX$HLXJX%2IHWK<\$2A%.=X+J%?+M%,8AX$2IL$> +MK;\$2A8 H$%1P%%0+M*%H%2I\KH%8!X%HKYB2AHJXLLJ2I\K2AP%+C-4IC?(-4%>PH-4%.<?+M9$YCK:XH2ILH2A<(-4X$K \$+W-TAJPH AAAB Note: Lines longer than 256 characters were wrapped