Directory of image this file is from
This file as a plain text file
?<2KRAPCH,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;<HI4Q2 ;I2 OA6;N 7E[R+ECS+ACS7LSI3EGRL*M"/*M*/B 3F3O7L O3I N6 OI2 GP+RCT+OCF3W A3T2 7OCO6,N 3AWM2 WS3C;O7DKA3YJ 7OSO+SB,3OSL6 KP3IGM+RCY3B?OT*M"/*M7ROX7TSR",*M7XSS+R3T2ISSN&I2/GH3SR 3OWN2 ?C+MCE/U/P2 ?C+DCE3SGT7ROT2 WH+RGE"M&J7JCM2I?L+A/D*1>I+N3O2 ?G2 C3E/CZYHV> .RX*MP1*MP!0%\P1JYI^<(AIAE38AP=BXCXA%HAINRU-SEAR IQ .U%K!ISK3]W5IBHLHKC%+*HG=+Y:S0K6<(+WIW$ ;X+WHGIW$ /S?:-4I[$ I$$ /0IX[0IYXKI]\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[YHKXMIZZ LJZ2LK[%J2\MK%\LR +W2A/EX/ ;LI9!HP> +7LI9!HQ> +7LI9!HR>(<B2A/%"/=>0 C83S TN7G"J6/"J6/*JB/2 ?F3L?L3W;I3GN 3OWD2 GS+MCE+ACS3OSL6 KP3IGM+RCY3B?OT*M"/*M2I7J3S2I3OSA2I^/3RKA2 WN+XCT3IWT3MZ 3R7O2 SL7O2JRIC A*2>I3TGR7DSI3I;O6;N 3E?C3NGD+RCY3B?O7TN 7TKA+TCS3LGO3D;I3GF /TJ " 6!2J& S Z"5&02/;I3CWR3M;E3T2 3OSA2 SA3DWRS7S2J*IM PK?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.G?.N5$.L .]...&RPRQ>6J\ .P.BL2IR(SP*(KO>(*JP*K+9A<P[+<XSO2I2B [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<HKC2Z(A:I6X[%8AAI&?&?Z.FORTRNTMAE>>D=7BIB 3E32?BS4O<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-4O1%8SA!%?$>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*W<D<?2?9J8J8JC?<(K?8A9H=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-[A0Z7["=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 / =HB<BZY.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 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/0+^K=>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(.(P PH*-%>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!+/:/-,+1J=F0?P(AAABBCBDEEXFDG N O H I J KPLHMGPGQ: H"X": HMXM."9H HXXX8DH^HWXW8DH]HVXV8DH\HUXU8DH[HTXT8DHZHSXS.*:2I*LNG8J8JBDJ^JNGB9FJE=HJA8B^I&2JCNH^HJCNI^I&2JCNH^H*[$K&8HY8!HRXYJ:Z7HS8D:HHZ?H*PJ;&<&=J68DZ6J58DZ5J48DZ4J38DZ3J28DZ2&9R7*JHYXRJ2XSJ3XTJ4XUJ5XVJ6XWXX&>.+N+$?DG-X$*,3??&*K-8!K 9P< /K)6EK(6GK+K*6CK16BK/XK5K.<( [.. RK86D6A+[6O/XS,**;X<HS02K/0CD>^B?=DBNG9N$3C ?>FHD>- 8X 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/*IPCSSLURP/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/R2<WD/V*13PWD7FSL2,WD/V*13S3P7T T"/7Z2 6.+ACC7SOY6:CS3O3O3RR</EGV2:SP3E3F3TR,/EGV6:CS3O3O7R*/*M:J3MOA6 S7SN:3P?L/S287D[E61B:3D[E+L3T7D[E61N:3P?L+S>8Z*M*.CR3L;IK*M6* S7SN:3D[E+L3T7LSP2:SS3E3F+T></KB="3*M2*6/*=>3X*M.*F/"/626JN*/Y+S7ROT*8B *M*J7SOY6:R"87AJ:X$IQXM2J%?*J;> *OJ7\MP$*J*SH \MP$*DMPJ6 (*.MOJ5> *.J<2I^42A2J&8I2IN+^,R+R,R-*2A.3PPP>P2J%?*:*.6/,= <=B B>?:=7?&<8^ A6>$H;\R38R 6*=\[Z 6=]9K $($0$[F$A6\>%P=*%L8XQI2J%?*ZK?<(K>K=\MQI<H*SHM9!K<>X*%>LT*72J%?*Z:*SHNXMHMXNHMXHK;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%$CSCYTTCGS?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-TK-> +(KW ,S.+P2A: K./I9 LANX4 >F>D>GB$>PC$??<BAJPH AAAB"060"J6/"J*M2/WR7M[O7EV 3NWN3EWD3DJ 3IGN+RCY3F3I+ECS3F?R7MN +YCS7DKI7ESC7O R*M:J3D3E2 OB7OCM2.;B2,3B3OSA2.;B2,GM+T;H+B3N7BSR3SJ.3NJ,3A S3CJ.N*M"L*M6/WB3ISL2 ?F7RKT+ACN24F +NCD7IOT6 WS3B?R3U T+NCE3LKI7RKAY*M"/*M2.GP3LR /EGV.:SF2.GP*M:J3LGO3DZ 24J.N*M2. S Note: Lines longer than 256 characters were wrapped