'===========================================================================
' Subject: PAC-CLASSIC V0.2                   Date: 02-06-00 (22:21)       
'  Author: Phillip Jay Cohen                  Code: QB, PDS                
'  Origin: p.j.cohen@usa.net                Packet: GAMES.ABC
'===========================================================================
' Pac-Man Classic v0.2
DEFINT A-Z:DIM SHARED K,S,B&,Z&:V1 'Created by PostIt! 7.2
SUB V1:OPEN "O",1,"PACLASSC.ZIP",4^6:Z&=71082:?STRING$(50,177);
U"%up()%/%+%I+%*XmiMJ7-9tO6.%%tJ%%%1%%%%uf%hqfx%xhSy/'y0/&J,+#++4
U"1p%(.,0%.0.,%;,-+%*+,+%*[,;%<0/+%-/0*%+:)+%<*/-%*+:+%/J+-%,=/,%
U"/-0,%0)J)%J)/+%)*9*%.Y,+%<.?Puuuut-tt10%Q0Q0%a0QP'%1&G%H9:[L\7X
U"i'Ta*+[7H9^<oepj->x0AWqsj7j_c^Tcf:md>/[-Oup(X.6d1ePc;vx#,)xLbV\
U"8kB*=0$LsbT+wW$wx=lbWm^^_yDaZHHrNlZ6<rTx_O4nj#D.IDuFLt>E^tY')wM
U"#99:*e-G>PZ+U#>GUtndoda(Ka4*LUFDf:cl8PMKk-7zTnBaDvkb/l[tfDU(ob$
U"5PhzI'7qbQX2dh[.T><u'I>>+ZSuH^82JkiRHPvx^^dd]etZuZL26u?-SuFD6Bs
U"aBfbu)TwRSH^2NWXM^y;%=Gr0jH.l2L^.d'L8HPO\ENVtVTn4QwDFH?X;:aA0iB
U"2H6BHVG>.pdtz*w??,NRsUH+nJ3xl#W:gJiPUtStWo6mf$sa<v^n-<M8sy'n#J.
U"pTItV<q_ut5PNT^d#NZw2#NQvxb+fpZflaf3j>tRQ^xYkdw^8Lfs:TqDx;up(GT
U"kkx,wsw2PtN(tj4Z<5^?u8bvx),n#4Nt*l$nNCFSr24s+ui5WDP+K:hD36L&sgC
U"LmYf/6#X\Uw]rQ=hl%vtbDZ#6jEuId_BNw,-[o_UWo>'$1pGj$A4b_uK$0.h:hu
U"84TWo9#wD^QH:'pY8OU2It)jVq6?[8mS8PBlg5^Xdw+NPq(_-kNf]x]nr_7W&qv
U"29tcdTcfdo+tI(6Vtrwt::X4HW.S=ltd8WaWudNqljOnn8-=Xt'E]N.Au-45Pk>
U"qf0_%zNpS.#T=7B\&^idtw1kM&tl=.0[aeqzica8K$hExeh%$i(PtYKO69l.?TK
U"T$.P(X:K^lrHNXOluX3Xk&fVT<$.6<6/Eq?8)$(kc;6&%t'6Amd;4VIn+S*$QqZ
U"q1;s#wTtlp,3W8Ow\l>8F8_)HPvqzScP3ndKZ)AgR7O0r>hHv)SmS.b,BRQ#h=k
U"o?Tp0QPmT]pyDQt.OpXt5[Q_c.u53*0S0J=Q++alm6GNN0S0#9A>\tLH0bxF'%q
U"-h&X/-8N=ga](WrEs<f(\n.penuXH?tBP*W.?.t:'6)iT_R\9UqR=^8w>GX1Cey
U"H\+IFYrUX:XqL4pABdG$'DsNH'VRtEsE$?[qh($^:yBbFk]-lXh];*uXndi-=1$
U">^3BntX&0<6,O+arh\?et*nx/sJ)X5jKmVg<*.-g.^c6\alVNk7Bjx.<p2wCS8]
U"^Mm;4xN35lIToH4\$-_^ixT0bvRaWGK*F0f[Muxq*9?wE*i_fcP5qU.;1^oN%]2
U"&rq9rX(8ITo.dEghI>4WKFUQln_/_WrV9uKEo-qsM2DVUYd_MrEz]^;PK[dPO(I
U",r-J=eh+dFdYCdrnK4td;Y&.5AWs\).ZnXQmT.g61sD/3SKxpIcWaauS__*2lK0
U"bQZP8F&ps?.+(WDcH.fGnh$oc=(gjq?d+=ueqQ=Hvx%.?'nbn>B\fn]ls0MSd.m
U"u.s?2$(]DpjoqzP3jkp9\=m+0+c'ncK<UkTP1vBXKb8VPu0$d\'oPqoO)GSp$x8
U"w6XcxSk?l<sg/I)H\lw:]T9w2-dF9./NbHp8hqIVLuWg^XclskcYQsKEPc6GbV(
U"l[wjJMd.ZuwH\8UI<pH*28diG#:2dN\M#FAAXZ\6c*;$MQr/yhtz*rta.puq]fo
U"Bn*T)vq\ohJr<NeiiO_'d8FUs:T8CL)dHsxgY76\IA4Y1_hs<ywa#9>s&1Xd[W\
U"Khw*1-#4u%.JBc+t]oM70A)o,[/BZx1s+jl7x/iW9DPGp[mXC#4T-tv.RA-h0\p
U"N5x)DL[o.VE7MRzi160(odrK*autPpV(yFv07c,QS4i]Bu6*HL^o1#0DE-3,Q4$
U"Tz=kRLu1'HWnUYcq58'LFAoG2&&Zd>J;Uztuot,,b6_0<8a=]$V'M9Z)1S:B'C<
U"lZ><s$sI*p+)FVJep;,diB>9WOkoOr8wQS^/iX.7:q<(CuJ)LFSRcYYqRd)L_-3
U"QFonWnV+h'sQ/TUAr&7(]&-RAB#>zH+l_vDMYE7IH/p#PM+jnrTF\:G9QTf4$Y&
U"j&;)vEzf_zYkoX76I'9p)d6nAo8p6\oEi*Bp^gK#j;QTr5Vpj86Fq8:&,)<Rwt=
U":K*Sj3k.n\5'NU8f8Q:06-rX;)%.#4Lnl?VotFj/Cl0VGi_Wrp#Cf2j/8$(*dd.
U"34LC6Hrlc%:1n2T&PIOG:7-u2gDog+h_hHkh\YAjrwG=Zu=JY]^,\Xun09;b)B%
U"GH-TnrvV8WU\C#=ZoL^G]aG<Z]UZ?P.P*#NhHHH;m-E\>=MP$pT0eT7OQlG&Dep
U"*=RDTUipo^C/$Y,zeJW>Uu(So.SZOpy$Vwx$<'ytdkn&932:y#_hMa/UW0x<3rR
U"D^SGj.dCRU7O[Ov>yc>NvR7PMlk8%RzzwmK;$2ujMde\9h.)E$A^+IMFUs464*3
U"$_g\gTKghgpf]/6tR+3d/GavC&8>(ao&bEdt5*2gE_-4VpweB6URsaR3JPDO0ob
U"tuQ=M9FS26-S_x#R2CAMq1#u*$*o&.a&..Sq>hzMzdS,A,e,JR<--_OR:b:pK&3
U")7%Zrvdpl7x2M1O;Vm5RVZpLUTb2pS4zN3ql7DgB.-KP3Q$h)l*I(sgUr[h;,^i
U"A.2oR4jngieOHUv=UmcDU4Nxv%nN7ff$3:)nt);cOhok488m#]TnJF'sB3gd,*6
U"Ht<s=tt]<%-i*=2ZQU0_xhZfVgZ2<ly(J<x&(-?M(IplAsMcsU'l=H2Ia)P&0JR
U"c&[08(Z7faW,7E6)dprR)wWEe8Jvl(]OkVDPu](H*#u\wMOEbq4z7sZN:(d]BYx
U"xH1sUMZ6K\mAasiVipx&+]Q;I14/cMf?6<W,L00Pp_Z%85'&$AYEB19?N=nPY<8
U"Vt&<RiTQ$V]5k(q''R:euwx13,eN.ER.JMtUlQ9QZfUW$X9A,F^6BGpKdL-\HEo
U"NP%]T:Fm2#$UVd8]D&iG_74..ktDcErj/KQ?g/uzCh\CEKhe_ur7O1*4F/p'?j;
U".n]f+*DR\\oUk;?_rdYb$;oAsR[w5d9^jW(-hjqZ%ULtkUUuVnTiu+H5msILVAB
U"qZYB(q]pAW6WOMB.HZSkE2[iG23l8QMzGC4TrYjvZ:3d]pV?7FfuE#[[=yvLu7D
U"trScL2a:8g\^$JM[EjFPn&*.3j8EaL3$Zbl=W0oXK3=c<$n2VNO3L6lrl.#rxPV
U"CWBSfakir#+^vi[*mX&pgvU3?KK%9E4;=Uk\^Q%gyfKR+l\YxK\=)\mzis.3.<E
U"d$SE.[/D:qX(0MW/98K.WOpI(VPHQajAyI3qZacbjNIy/kD&kw3Inw>LQX7):qW
U"f+cXR99Sn-j$3=-2.0;\-ZT)gyU&]5iX>2Yo/o2(;snqH1E,UM^cU#0pO+6+Gt7
U"t559ib_^>TM8pljC:aKY>g>r*f_UTUTs32,F=63+)=&HLinz%4s?G-<t8T$*3s*
U"wmgzaYt4Z\ZX7SU3'ZwljA%pD(Fn3(B[ZO[gjr*%Z)L;rg^K\j0;?gPTIEXz-*%
U"8a#v,&=?_iQn:\^zhWHLl1F4)41y)*2%=3*XCA4^)FH:>&YveI$KSp<ky&M7jLO
U"Dg8^5kp0Z]:f$f+#VB1s?>Bo_SIGlQR'b9k$XIIXyeG>(6'G[J\G:7KWEaT[WCH
U"bB^d5U?(=;nf?Mz=z('_FTqDvG:D\cCvdj($:SpHC2CX783*<Io\BDArs;C*2-t
U"NKf(f)'KZi8+Z_[M-k%ohYd>q)_A]mLk;%3_#\_;YMS9.[l:DM[]T(?s0/2]Wp>
U"&,fZfM7X>h$/uL%GCnM-I(9eJL,A_Pogk/WAwi1yIU/U>Bw4U^m<2)k$6D1K[BK
U"o?jQq4=2YS<w&7ui:Xv_*iuF[p'Y.+/kwP%>cGyiCw_3^h\k37ihh/JY8:#h-E#
U"cJV.ha:;Hxut1q+8Sze(HP=T,P;YIsj]\4DTKmWqpNP^57b<%e2QQ,WQR[Fud36
U"]qyYMjn.]^-+FB0LC9dGFw4(E7yz'>Ml;:B*cvPJ%(vCq';#5),#3?bf#yL*7*0
U"/?AEMf%Mp\FX:gVNQyp90eue[3tZtPbS(YmOwRbs?]<IU$HZ[4=G*-s>OU=MH)V
U"7C[)8\c%qR0OO:bIb[\g<GI40tp#Y7g.ik1[]_Fi:i)V_\tND5,FIg+)tD_(hKG
U"(YxzRVjT1YJRj:s8ocPJYC<,9_?U%peVS8l+h67c.h&\0(/Lv)0HMFY)6Rt2jqE
U"z*:bl4H^sTS/+%E&5t-EQ4\1aMN*RG$FWMZz1cL_v-6h(9&][Fd1\=%gPFggGq&
U"?^70ah4eLB>+DcPm'_umj<-A$%SKuJl<t(W1h&./g-A9bUidjf,DPL4YZ4a$w6)
U"dKv6eSg#hG3WA/]OsZUM_f6[>AfCSWNM&Kv$Guo3mROWgC-fjw9ck0(FAe%m2PK
U"t&5fT<qR$oucH-V?BJ)]=^d+mnRSi%wJ6\N>'DAys_\Ky1U*AJHlt&+Hl[&8p5S
U"AyfUs8o?JG=HxIbiPnNNXSY:tv-4A+8G=o=&T[P1yU(u#C\e8:(=-gP)4l1*lnt
U"8b4I#np8Vhi<0q5d=J*X<[<q(tQa>PLuqcQ^81)6is5KiGrsDk>s-n3P/eDqXO_
U"Mx^NVidf_hvwM8q,A6HmWLm1>]8>#0rjP=/C6&b+64i8MXiOVet)jWMN#<PZVHV
U")Re/zrN_6j:Ft7X$\$yEr3pF[#OR9:&EgYZ:Pbrlu1/vYln;%\9\N88&Las2]<?
U"1jfkd6_S'z0f>uO5\'m<*EPkE0:Nr$KrC.o;P&'>]1jD-eq*D&mDOv5,&sJ<rgp
U"xZsfX28u=;DNk0Ce%zUM'[#8pGY,sI$%*g;[G7G8-.AXK)<C?AZ12R,_#)H2U^f
U"&ELT2rVeSfs1Wg+yJ+]?B4OOdY1c3T+IfUq\+1^D\d7g(91CdSzDw<)(.G)dk9A
U"T]idpC:5p%\hiMF2-sl.ak+9p*rkI98o8Tv&Z.;Bxnj_E9Mc&Od#$K]9-0Ith3_
U":yoF7nbpMG6=\WA8^H+b>]AsE1l3IAh:vSgG#%:Iod<;bNJ*t))99>R>as<=AFK
U"24'^Vvym+E,bb<eJ.LX]t3i]I_N#]+J[M2Wiu/$BOZEXvV22a,?ZYTj$<%<:\C(
U"p0el%lBl\%:J-'uH,/DMax9o%oM;2=Y;TDn-rE*\dRgB3FGAOLop/GX*I*4l6H)
U"7S^CE*Iv<f]r?U,+$et7A(,]bTp.Np5jq',37g?K,AMlv2R4>#A0M9S?2sU#bhy
U"QndG[opHpFcPQ5ls/]o(tWZ0V<Aa#7d=A\PsIU#dS)tduo3Zk']Jd;DBWCmcL??
U"g5WmuUU,]'u_kQ>R31(UE)zj)#WL<7<-w1QetMqX_I,%7s9Bq=6k55u,di*KD:>
U"rjAiqL;0rS($Oltd4.NjZ>N,KfjjiAUX?p+]?],9g5%pq4_FJ%c6Ku8=tN[)]iJ
U"Vm'FsxU,9p&bS77,s&Yl(+w<k8HqWb=($xGv7d9B0$9_%b*;3LSN-tpD19oDr,/
U"b%up()%/%%%7+%v1n^KY*(te%/%%%lD%%%1%%%%uf%hqfx%xhSl%wV4%%7(I:%[
U"L]^D9Jql&=D.+[&8Y^roept%()jarI^xx#*(S$SnYAnfG&_uiAYGuDNU,vm;2xZ
U"GN9(]uFqx9Yiv$N8O,?DP?GNk*,6$<8A$#&o]4u9E.Q,?oGdQDoj&ENknPE'-w3
U"xsV:EgOg&KZ,nl$78r>mx*DeBx]b8\4S/c;;dW)d;Ji/BBpaDw1bncDI.F-hl8m
U"^\b:m2JVwEH,dg.rNJe/MqBc:oZ+,J?pP#u&xUn?:2[$/&%3;-ZjMR]CKbis&$s
U"Y/kc?s]x*<G7d9l%H$u4bI9%egB44]&YG$i?2ceB_-923]ev(kLadGBXlVe+xkk
U"DA$+a9^2WY+:l/:eKlt5$s\>kk,)Q#fO5;fld,oZ,[<i_/qv?<2s]m,>Q24C=Fk
U"nE3t$aAm(*XCAh8mmC$mLe?JajHLOGB^tIgFH\akq(E$m;PBsE95Ii4-$etYqmB
U"s#^^D,_lgqo[X4GrP>Bu<7tx2fn8sOZo>yv9^AJb3O3pxpYsE)P\R%uH'ptyv9t
U"nQdjPOiGnmRvGn0<^tlGXD,k?,4r%3KrKl?G^A3b_X^1jH,5\:3+GBQUZ#OdA&[
U">#D'$&CaJ6caT$_YVk)+1+))\P?TGBd?$=W72gue)ZD2kpd7DOE/mEbp5PD6v0:
U"/pri-RBgB$As?4Z9:w;f:$Ao#^w$8ANB8HR[&MSR+)G=y\D>lb8OGL6(3OISluQ
U",TUd'X$$9]%q'M7_T:AI,dQ^,+9tAet9*Mo^%KV'ffZ4Hp+G[s[gJ0pp4$biMsa
U"B*T,mDzu)hGV-<2'#kCv#gNusaBTkL7*;2?oDo$)YMp+0S'Ux*G#Bx(EXLWYlBf
U"w,i^;+PxV()Ox-^+KQ)8](m&i$O6=&F3UdS33x?p3?3HHZVSD=3aY3(tW\]fYAN
U"quuqip9<>,b9tCihW\/G#3Y/c;#q-4_UF*/5g>iDgBWah/i?lr;Vx5vB_]3XuWT
U"F$Rm^ls,=QghAqa,ie9GdHAue<Z9EG0C$S4ArYZQc0^uT0Z4\v40aek-vjGl<W;
U"QAU;*_53N)bBiDG.F>mDkEp;W3ERlhf;$Vrm8U$uf:^a8k#8/:<sxWE7sX,[OD_
U"\pZCwGP^\=A<9r=3\cYN%FRU4O+?m9G6n.FGJH?G,EZgoG07dWt8ZS18Btk#2tk
U"rT\lKt8Iu$,BY8kvR&ouWLUTHL=^n'tA%G+wK($q6N,(61,BGZlr5BLNLNF<'Mv
U")JFanBeJX#gKp3^l;rnv.?AlGn_6Fx$,Oo:$.LDl(F^W^8EekcCj3]?$Nm'2&bq
U"G&\^oKQ1>Bs9^k_:lLa,G&er1Bs:U^_Zl?L#$B4CpF3)'hjd)VF35pSfmpp:/xr
U"aQq4$\O;s.CxF()HUM^OJxXN?g378_,NG&qcbl($\O3Sn87e$%dZ%qJ+(G&B_gt
U"vgPkxVBFE\8#KueY3=4BG&F(FQra5$%xc:Km7jdGPEKX,uafw7Qk.],;Cm#vumN
U"wNSs+-G&#tQ]cxZhi)3kshNGYPe(*-%MT,swF<Q^^/)R4Dkr_bzFjT(^/69<:yX
U"R\:vFf#8'fPV$q4+ux$:D1^/x=QvpIqr_Yq5PB9MehS3cVS3^0Z7*M$(m_as:7^
U"E<$Ca]4O(gl(>&k1n(U'o)BmE(L:M7GVO#],'%s9[R<(el(BguOrxBV2U=aWYag
U"=+uX^oY5vVF[9z?H=^'G)Mv(UbNM=cW:pGPBn4EV<?]^A6)jL;O.hglR([5Bd7A
U"o,,B9+4.Efq,\k(_)gGa]7g'g#G8T,nt3$OmT+)-KM8[dv2=IrifX0s*[f:33uA
U"ux[;Oe(^jpDGquotfRhctL1xkklRht[<J>JSBiFO3OoBH/9G+?$VA2I?1=guZ)e
U"hnR$$ujfqN_3U9Ch#LH$_<84,FNekxwfGDb6?r)9.=e:j(h47CEm^dqaqK?$,:$
U"vH#a$xU,&;\S;bu94$VY_][H(u^JnO2X/s,x)VTr4FL;42vU6ULk^7n-$IO*=B5
U"L-k(?$oCUuW9mOUQ?g5.^^/9$a]<1$s__4l?OfFXpaJgvul$RV*Vj:XD[BAp\gd
U"&37v-$y],,^0d4XM8=av[)VWb8..%J1A]E#pW1]mB<Qm,7KO<<Rlm$klEpVi>9,
U"tR%u/%F68H:eSHZ_EGLTIj0BS^<pHg&lz6m#Bj?1qclp-*t#C4$)B4<axhD#>DC
U"?o9g$UTX^bkuHrG?'t5J4YnH2Uj/x_j':&/AD/#:r$0BFflv\JS$j$4O>)kqY.-
U"f$([*]-FDA=7Oj2V&kE-B$F)=)2kHc2>F678BV[AS%YiBjX4uNHVkn5pWR?VKV^
U"NMnO?%sg$L:S'>FT;k]_q]GwutS#:<G^hA.$Yg?9[IV;GQF,D&s]J62OCGQl\\(
U"$,YBr[O8/xZ8a]pd$:QWtXrgKt9EGh2:oEBRGsB=2[R2-a\u/V(f$hkG/:dhi=<
U"rkD#usW<2]G4-YSkb6FuxOGN=#jqYYNuwm8uSX&dd$f8R+aek=OS7wP6=BBtmTV
U"GKe3]NZQJxHSO9HbUdAgK.'MHXugE24QfFlz91Lf&9KAuq9iUrcfq8/<?pBiE#X
U"qzr%=8']L,CO_LVYHQLGD7?l]2B9%ctAQn+.$Etrgl?p^/,$#(w_v8kaq.N$O\[
U"Rk4Yk[h)=ZC4E3S'XDVea)$/<0R\k(+[/,upq.G^iFOAgF&G&3j5Am\+A)^:1$P
U"BWk/)B9RC1akbI,Z$aaiD$[e*;-W6(:lr4R<lZ$YGPn]DG2Tv)bPm,-<I-v<^u'
U"xXMCi<V_\4^Uq,8N-fAGw_[4%=DgKfbXe?(>k(ZN5HO/p'uUCkOuE\4YGP1+c9R
U"p9KcE[o^A)I-qifTPj\S/Se8pF:33u-^^+Qkb^XCU1crb.D3N<ZZ_P)H>#d7&'6
U"YE(B4>qTCZ1D-ohA)8n#yq\6Fvl9eOAKWI^ek>EXnYgq//^dE$F3_Zpp]Bp3_lx
U"EeF3_Qj8^#U3_vV)KA3]E<NQXd/+gI$xk(=bG_%:DsE3OGSx%A4v:O_q]3q\+(P
U"E^4&er1GGxdVdB>/*oaVw>9HXE^i9IP+-&Z(2]i9-(a4'f4&G%6ITE^Iefolr/.
U"&]R/E2\208a,q]>k9aA^y1*st_a7s1X7o'7=DMQ-NayUcGwUq,n+d'/Ab_.('pG
U"y9FAY0=fY8Sj(-H)[L1DssE9pU%^3],fRdW45pp2dcqvbQL4.Py+jx7*/?a%Ca#
U"=C':4mx49:BW^?AiI-TwT)D],Zu:.Edn\6uH6.%5?up%()/%%%%+%0v1^KWYh<-
U"&A0%%%lD%%%1%%%%ufhq%fxxh%SlwW%4%7(%I:[LI]^9J1ql=D%.+&8XY^oe-pt
U"()7jaI4A*(s#SOYA/0G&_(cxxHw:EoZd;QJ_4oZ(uD6hQ[,WqrRPO(u^>;KM$Af
U"Q^J/SBF0B<u.wdrj,d#GN$Ako6AhHJ+(G<0$?o$l^-5$uwpX0=]T2D<q*e^)oBg
U"^tuVX2RMR$;CPN%=u$_g9'GjOxVm.PAt-*<48j_p4W$c4l6xhkN6h(:NQ_imuPN
U"=4FjxgA'=,GnD>h^u(\F8evOhVmu%darCc9c4Z#AuVJniJB+,;mWL$xNCWB2c]V
U"\NES$4Kvnb406lPVHK$;?1l:DA_X$FYN$s>[q9?Rc2l$Pa4$/eqKG$m98TC<63S
U"eB>./x^[l(7/rlectO4$GOMB_Nks(VX2o;$$$rjlL9TUCiOGBePI'9^21MIGEek
U"BvB'0i,oRW$Yhk<uF'%$G8e$sY1lr50,B^IHXbkO$8BygqE=S>%6x%hN1aHBGMs
U"37pyu5KGNJT\&[2e:AXx&-TES$cx#Bq=dJL%TNAUnHQdvs7l20aBuDl5W$1QQIJ
U"^6\7hfx=]QBuHpN*nji%N_H$gO_$WYNUPY)CrlFx3TTubiEE<xllDT$Y8B?SX2D
U"m]<kG*x#s'1_veE+tl,tZL#MeqBK9LrQ%sYXPs9&6m,B2k?gNZ::$t$H#jDG8iC
U"iY0vq7?(UO\PqOv*N]L&tLg&mu8V8ZwO:(kld7t8MKg=Q:uZXa,BO*uo7qHQv^6
U"uGHdNGvPL[O$Hx?wdUdNsb)e+K)0Z9vLFEn\+_e69wo4nY;ZiZ%iG$+&r&WDD5^
U"vO,[:eGBv.w9$'wTC=?V^1ph;e0v<(A9W^9dL5;L?s3xirZjZhVgX5Jo1B2>Qn5
U"H=r>^4Z>N+4:eqp($gBFX)5TU^;_YS])BnG[<8DLFcgqBWBO5N%R=qn,ie9GdHA
U"le<0w1-br&WG079GzXc=WXUhmCc[Z18+-d%Ft<\3,=/RX9+9Q^hc=uipwA$ia1H
U"44eJ[>_u:GZIB'53=d.%tug,=pr+#p0;E%nE<L5v(OFarU>IAE.NA#kbA2-r\#E
U"#?cU0g2GZReXERmZ<VI:MRW^>W?G,tEgoG>PehAr$#gwraE\u$G$dOOglJi;L4h
U"b-F6b2-#V^7]Q^,oW0K>lnl(J(tnY-$2B=>K*GP.+)cBA+C]_>k_2>C\DRBeUbF
U"M&GZn$8B%eOB$TxH)Ba3$AAj3G(^GEG&hC]o*z^fO&GV8?2<-$NC5(4k#Nr)$R<
U"P3$Os?ie[y:XkX^^E,z<m?C#[H9G&LQ9DdY?_x_QN$O]^Sp0A5j'0B9soFvJpaY
U"$OfW^o>blGNgm(EE\qlBwuZrs]^uLQb2mt%?BuUjt>ldPv*tBwqxhR_d:+_Q^0^
U"tE\GQO6J[H__]*-lE&mHSEV[;eldE2h%co'E4r9g$6TfKw=JJYy\o_i'M/-Q,6B
U":>d<\p4b#2PYA'GQqFE'wX5Tvl:$.7=Glt$6PY/VhB&d9cYL^qijC8Nd0OVI#?X
U"X)bo6&CUQT2N/F>GTuE+B3k*T2IA562BXP*T&qekGDGdi?NI?JR2$hJBFpY5SQj
U"^^n\L4dxXY&U,vMTv.)ADaKg8ONk_im*eAg)*P67I$,gOS1OvB0I^/,H$xeS/v5
U"PDRA,JO+=i]]Fh92Od92O.2?M_d07kB%G#W4s^2u^$)H'J7VPRrRt_x$Um]dB00
U"[IN1FGHOMWFLw5lGfpAHhte?d;vNu[W,3?U-=hkmN$)HK0ib^CE,/UW/Bx?$Bk4
U"Vkurl0rDlD$ZT213BrsajHa9?,u;V9LQcf8q8H($A7ssOdJ=[]>]0m?t1olLjkw
U"7iJ17\^QhbIM+tO1TWgq2G,us2TWjQ%Ox[]aoYa&;&>+&9]GhG[Kj9[)a8s,LCX
U"#Tsd*($NXchZ_'u#l%oS:tkB8=0&1WN)5Z0.R^vde3M5.TRaCyfB#Rq3;5Zq6#)
U"6^5vx/j91x$FOkSTe*l$B^s4CGhZAmHN/=f2YQaB[9<f8#4?OXLAhRdP#-AIU>k
U"kHW$,E0W$p,YVlGH,#Jo,_dLa=WQ$]9)(=PR$n(Tg,R^dbamjj>:ljd#tN1,pID
U"Q,_T&:EI50U>G,:2=$Da#GCG+o61*B$S<u$CP2/0cNgKU>Je#xjR^dE0_PCc49l
U"D,$rp?$/fu(l/r:P;GpfKDalUXVlqxlx)WVHdjd\=_I[^-].]lBbfq;m/&:,E0+
U"^iC3k>0_$1M:E.(7tBUmN+x6M3oKGmJN'O41U_6aBOuz^#.ncMKiVUgii2]q]*x
U"(fIUa25c0d3F*b8[Vc&7b%\2X/>Ic[;Oc#O,$60BzKDTC'-6C]0DE,HnE9'4Qm'
U"uS$\[_b;Qo2*HeG+9YJt?$Mh:7uC&d[%rjb892X$a8[e+ZJ(\g?ql,[=lCiG3o7
U"53ek,Au%gGL3ug>#nk6;d#P;h1Sgf6(rRkl,lEaK)jKSjj((_fc991%l4(Zjo1f
U"X/E)K2^-I61S>7a3'&r;&gan'QOx%OO5W=Otwv^83*RUdW/KfQQWlgB[5btOEcr
U"-\_,C+cxSsasYtHp,CGjOh1a#[c2k,c]l$hl2S=.)5?Jl6qZk4-uGdTRK2:Uds3
U"RJUQ=_k*b#htNI[mNfgXqwhmnjL[^d5rK8*v(>AGH#O$(\ltJGGH$tR$PQtTh8C
U"-44OKlBk5KbhB.NR'8-jtlhTiXlbd-vBmZ8r=G;Vk5*vr6p*4s>UwpBS^c.lU2]
U"JFR,2HqBzx2QpHPM5Fp5bcseA8HXatO=CtV^Y4,VbtzA9a^8C.lf>]0D3&kg\5e
U"5#aWQm$3KK,-u6ti4Z*p?A()f5(mV]0^wQ4]hP0RwMTu<GV:rb>qHZ2EMMS-[K\
U"kl,1TSw##UcQcdEiZ40VW\.xIZG28B8Q8/A+i,4vZkirkqzfiwqEnxtc\4b2MxE
U"=0TSd7vp2pmmWOa#>rYAn\WhNh5>F$d$h&6.BuLGfU[5ocN\aX3T$8k$8\B3DWJ
U"jvFztn4^FVE_e=>LqYACLF_OkK[k8j]0v^/Q:l#7/DOkLARFM(GVbR9$sHV'Nda
U"ym<;GFV#kF'[Q\li+QQi3gXDLqm,[nZ97Ph<]I^0[iwPl4;L/$qZ])<ET8DxMs$
U"P<wcxs&DU=7pFRs6TnWUhA0k-2nh*<lPhuxxGR<LJ\]_lz\[kqQQ0qvxlx3xT#S
U"68o.Co$yJond%qk>csUit]5/k^]Ie$<_0v\<'B$8OeBj#6$9S8:^A'B3tP'$GF_
U"Dn[4'z9JOen^tN?2x<=LICSq%Sl-[E$a^f0,E0H2/&OK?ln2IxB+8$B:^e/h?A8
U"Esmu;w/YgIM^6S8v)G&a#=5^2+Pl(oE&$wFl<'P?=;t$(,/?=^,;U$9)cG&bjH^
U"j55o3V.)eIX(&P$%(4)=&\_41/4DqKd-if4_B'UK_<Z\L(t]Fln7d$I,lKJE9lD
U"M2=fL03oGOe6R\T;MdaD8bYE+BENHm$IY:]t^A0)%vRr*W$hcEK%$IecGN-U>G&
U"-rf'D'aee3#=eTI=e<_'&.-)u&9i-CXj2-RbB9+Z/6MW1G/G&KDQB%.9YA90M_p
U"O?X2q8/(eM-4SAv:O<s2I1[K%TY[>A&]C(/'?nY'';(_o=7%$,Y8NUP0Of=^o17
U"y,x&:*oG&>t#c4U1[3U+Yp#5T$ew8e=SW2OBwnBj5xZxbRBu$POvRYCuF(x+vwU
U"2/D3s?O2;dOr_8YG7-)I,8F3QA%34Ees6M1:,?iup%()/%%%%+%0v1^K>o2JG%=
U"/%%%lD%%%1%%%%ufhq%fxxh%SlwX%4%7(%I:[LI]^9J1ql=D%.+&8XY^oe-pt()
END SUB
SUB V2
U"7jaI4eA'Kvpe/F)#,&Fb+-G&a+,ZVA.P56?k39N$^cOCvpD_KuiZNN$IaEN?HPU
U"dk_BKE785$$d:^lddi[HGfuxZrLlqG(T[;bE^i:lZKqA=AlF^w(G?$siaW8BwO-
U"3a&DF]$(cqeBg$rqnxrbldlklwGxZPq\E/E$Me+TGr3zov4P[Zg]xl9l4$+0v(u
U":e_]NaKx,#&otd'>HVG4C<GyuD?)L4HLp#MFKG(kRuu\UYWsr8BV?(/BZsx2Bs7
U"WLAsD$uXt)eUrO>#l#Uluxka#rD/$r^H\g(ST5;BB0dUvCtnc1^osT$tqPSB3ek
U"p+FGx8lPi4ruAgqKGVJn8V+pU)MMeztel1CQf:#^Wh+vRo2(vY2+Plx;#D'&<Gp
U"KE_Vv45_eB#+qk2N2Fbu4+qeBEHQwak4)F]C=KhA3G3$]>oYAGjl8Zv#HmSmw\M
U"kYKLaeedG8RoGr5?^+4Mkv6Vlx$kx#uB^6TGztPPBwN?eoRhairoBx/FsQ,>FGe
U"23UnLc9<h$w#IdIKi5By%3ll2m5z8B/S=^P2i$?fDp&[,XH>GN<pD5exHw=Dk+H
U"xb[h9WAGTABu^YBoQcuaC2xTtQs^8c^qd?<el.nI,IRrk=%(liguj1D'iv(n-tD
U"?U&w&79;vt8i()HtDgZG]^UNJu[uGJ994w,]m#Y)/B7.y;[8t22VF]1?AhMMGrQ
U"^JOYc+N\WOk*+&x<16q;N*=DcZ&:(9k0DX/eNGo1gKqKMIal$#V8jDGgfiRFu0S
U"#UN'k<mIeFYp<\pX3DOmQh,G3Vj6-lE1BmiXHjGQGx6J?Q2,>uwf4l*:kH1?drx
U"+Abd_V\6<a4-lHX,Nt?gf0j%mF?>wxxekv..$N>D05><FtCDUD:clrQDP7$OV-G
U"J1#RW\Te^>(/e#A[A>$>'NrFf$mU<$VVbSj\l/Q$A/7g,z^#IdE\OH]fD^tH?#r
U"Vlbu\]t*0OCt_[WZLEHm=4l?_uowGBkn\1b?#wGnH\?Vk2^pJ(8-2I1<l/Fjj4e
U"kuR#DxV^[F3OuQr9G-VW^G3GlN-AaqS=cUX^Gu\UvJuf?rv\X3;$-jxa%7n3aPr
U"c+7+rpm_WSmKGzun:lx50nV%X[T/BX*o0KN>llba%GBQ4^pFsHsn8kroKGfcF=^
U"v*$k)):]OqUo9^*ejUAPEIEQE=S<ClRJBeUnjFGlDFHR^oScs$u5VvlP)kBE$F]
U"PdS?PruQc'i3GX4Fgb7ds\]QvsPu^2WQvY#g\-Ap')FOsU8FFiU]*$l;V]Ab,ie
U"3)-SU8dF$U[$XK1;L2$U>sIZdi]VVrSlhlDrg[1l3rkr1c/xEqP1]PlJrmN:qE^
U"X8)FNtH4,1+&t'Cx<m^'iMpQF\G$gU0EUsYE+$,B98PBMjt65>Bd#Z3DOLLjx]+
U"4^Lx'fA0+VD-Ux-U[cERah0BRee-9>K$x2SE3iREvD]VbfT3haAIDMi/tm\46RA
U"3Umn,Vdp[V_HqG&<ttQAOd4?*G=&rXp=IYfA:UNEq#*eXg_sD3Q?9xQf[&5Yw%T
U"leqoi5X[9f&G&)Y9oqTPf$ODt(dW]JispA#%BWL&^xmltt<R#VC%:tx%jsl>P7?
U":Ga6E8<UF^cH<O*Dw5bgRd-rN?G&+O[*XPGbe#Ek?%[PahB[5Guf:DhBt%5]3x_
U"<3aq*PWBW^xEcY9VM,tuArN3COxa$p4+ZFrI<PiNHqHN2YF]G3QxCE-i?_/\SZk
U"=Y8nooYJ5DPB;7%45\\a##\NLI\LtHG7GEP*F7X0?lenjbxV9pyb]lS5?<juNHV
U"o/5^fT_EG9$R(fmXc<\(x\pqGLE#Z8o%tAqPJNdn9XhHX['BIEcWxPY7F%Z86uk
U"=R3u\C9c(x<R$Avdi'Ks%Opr%Ak?sE7)R0G$D\qE]x:hY?vG*pZl$[rZc20,j/u
U"DEMlu5NwB0(?rft/5y:tp$M)wbm_=%#1akUYUBYKmka04,dR^uWemHjlVQjN$2n
U"t.+\T^Uo:%jYir6et4fo242^6Kkq?6u?0LD=M]m,0]\Ee*-$RQFWq;?<GFWs+lB
U",&M=-eUs#TM^Vg/<=t$knZj^jkc5G14B'EtlHgu?#eGbcU2RxLev<?5o)B5]XW_
U"pQpZK9K$d;F?Ws_2.+IC3R'sfK#lt$jVv<dP-V&&6MlRKgTr^<i<V&OxI,\a;3c
U"hnbRDCKn(%/>10]>^Z4yN2gDa^DK\[FKuegHMe'Me$1rHgRfK3hBIAirqzn>4dQ
U"&[gV'G^[=w?lT]z&bg_&pT4k)>^R5I.$,]sJ^*E=':X$<aUFCU^^W29D7K??K<\
U"Ii^2JrmN9\U7T$E6S.>$6<p,z4lmYd_T1+6;C$E&E5k(RklZ,EaKT)KSj\P;1q4
U"F#9;-=r3kE,Ce5lnu#lI(4nN5FTo>&?c2k?,]l$Zh2S=3.5?JUuG+p5b</YDZj^
U"6>IUI87e]xeH]x;k,5B^d>>e5[)EGEde64OlgBk5bghB.R2'8-tp(V9R]M3s,uQ
U"LWI?QVePP_Qk=Vh<Ajt*vH6nN3m4K4\R6%5Le8G?iC+#jQwn/opgTK?.*=Z^=UO
U"4TY^,6TjkHYLq+iJJ]]P+p,&Il#)AM),AGLP;$B]*uBSX<:PRmU\EGY/<H;A#$U
U")_kh\GGQ28BQ48/+g]-4vkiie%x[C92#AV-9rr0BZX4d7vRu9pmOka#>9+5aleZ
U"$17B5Doda?fUGR-9pzwHHF];NxA]UX4hFwu4NHV$k5pWuRVsi':^s3o]%c:O8$w
U"vE^Q:l[#/DO7ka8(dZd$<2meBqLHs60cZ%khWW[>ASB)HQ+r]U_WbR%#WuMGxaE
U"gDQH2T,E]Gi3<.pdg6tDG1-i8BYQ?w]Gi%3$<Y,qxbrZMa&lSz\[qU=P+vgVR\w
U"6D\kOHS7w6E=Bxn5jA$$gM^vJUd#6(.'MHXcgeefsq]A22E?P5%B.-k_o]ni#+Y
U"B_U[a6$]6%%\+2uee[Wx+Em&bBG;x^m,TI,ER'q(AYrCrgwknWOZfvB>s6Z8W1n
U"w,xx%$la2aM$%E.4DiW7%%tD:kqGr7\6:E]w^L))EMVM>oxq//#QK%K;\P6BjoD
U"[F*]&ELG]:_\O:FbAN4%0m3MYa%%C&G.=)sn+C$%,O3)QP^L?31GR4&N8/3qd&_
U"1]A-?iDc:&oxE%ZpE.TW']N3*0y%f>=Or#Du1XI*()p#^U1_,o9%CQu#NQ:+?6o
U"-x9Ied^,/FZfixk=('YP09D+.$9k69ek(g<d(UfTB1BQG%up()%/%%%7+%v1n^K
U"^r),Ws1%%%lD%%%1%%%%uf%hqfx%xhSl%wY4%%7(I:%[L]^D9Jql&=D.+[&8Y^r
U"oept%()ja'I4k)*u.U%k39NF9)(vBoL4x<<durbuLwGJa(jZDH2w)C+SG3h<qRx
U"&t#lx9QG2P7_b&e$Pq-kVc-<6wN\N?-ulliGi2R7p9#T$cUe+GReFa*TcXmlkZq
U"GrR>7<xFZ74nON1k6<kItn8tTTBlg$6Wd1dP#4rh+=rFhxdWZ4SxlrLNG*c/wHu
U"pl?$sBZA4?O3k^BG/+Q.ZJxHLjjJ<$faD.Za(G^i4&c5ar1Bw$rUixAWhk?Fms-
U"D)jqBaMU^dmN-AxUY]xHL2AaC=&>M$M8U-<xb\d'_$,OGm^+v_[YL10KKN$SB=u
U"#f9G0NdO$9I4G:]Q^2g\k,]$GO),F?'qG^1]JESGFD^]D^=b?73leDpDl,Bt4$m
U"9Zqqs8kG$_Yj,qXsm/$HCbqX^fWhku#kM9N84p6haV?=DlQx\+N35hl0bmQ^n[L
U"&tm]Q^7U+^v,.m1Qw$U.quRbzR9]Tl^7BXAXZplwgkKYr1VjuRZJqV%^wRq39jf
U"Y+-nOCuASYQFG8Mmiv7&-iG.Wqik^*O^8BUt<+(9VKbsYWNFW6c:\$#cv6KMI^#
U":M5WD-8.$LM(<_ks2_Wn0qW8/9##C5,g0Y7Rm=?YxB#'Q=_Ud+'Mg]VNquuqip9
U"<>,b<t]*\F3_A==URVmVU;Riq47O2GJl1P1>F]EX2c.xqBkFi5>Xl4K_A5b+Y9^
U"IZ4YRl_Nm^Q>V<%6K$37'r7QTcr0^T06Z4v4)2\%Z*GN%Y_a0h_,5TWH1pPlh?2
U"OY4q'I$ia1H44eJ[>_?:GZi_2?VH.=8/,Z11wopo7w?$vQ*dAvX[WBLQem)Kg\3
U">_(8QtpG,kg5e8\K?Vk^DpJ(-a2I1l,/FjLA67fkMVNo=oM^SQur9GVBW^O>7,d
U"\AcbhA$t#gwatE\uGQJE2kbrrbFZ7+pmQ_WmUe41rC;7/$A?QXk:)FE3<hv0oLs
U"5GN(tnY-$2B=>K'GB&;VXB;9.iUG+6$=&3,#9^Ep(j3(L_Fmn&/?0+oSrlu+aGb
U"L*)ZRUgrQPg:FCe7,lL^,8C3a&*G(e\VRxaWVWpRL6k#8ALlmRu(Tk#T,CuD7]'
U"'+)PgQlEjl=\,FZH;R)<bDoIl-PB9=<RA9W^SdR=K1LY2$qRH?_D#FWmLA4rZF3
U"?HP2XZ[G$Bgs3e;fx0rUEG0mNh:E^X38FNtbrGJV745To4b9&=iYx(gW?lV\0w%
U"#rlU:lT?jYG6;>ek;QHvk2cZx^p>Pvx*44g=y:Uw4$3x&?A?Pxh$?$um9tm]mUm
U"L%\74C8.aV(>ek>NxxF4PxNtP0RH:p#mU6qJ[_+'ctX,(E8X#V:B$eQ_XlfsU#x
U"lBR^k3rpV_fVx]vx$Z]=fk;hkHu$PYvkn9/$NO&GaclvF/ft$F7AKV_*R=[cLi7
U"tmxXrwhkZl#PCYGS3Dt[W?pC\;t>SOWpEcGxtSb'KJ$tFg9c(9m1ougUEOEodMv
U"(ml#]A2J.qU4w6P4$$RL$o5Zot5G$FJI5'nce=8:(4')eF]H3[F7^Ao)R2J;<uo
U"Me()RD=+1n=P5#uNma6gAe)?N0j%&7-V?siW^P/8b+7*-k&/eA'g.7E](Zk#P7m
U"3EG&9Wa:Y]$a40ttT%M+Tt(,sT$?r+n7:LEr25Hk%j:g]l\h<%W/Ly>6.bM%kL,
U"3f?-=h\kN$)lH0B,$BQz8I$dbogd3jlbpTY8KlizB3rKzp,G+qFpC%Gv0<N#(Ut
U"z0vGX_2k)BKInO75?K&z9+]$kd$t/YuLZbbAq]?RdrtTxd:xsKB$FCYU\ztn4fF
U"mG*^xc$iMG#'g)X^BmC9r)SJlE>Z8o%tAqPJNdn9cNl\\f,-l>6x]7G,K[q&NQ8
U"F+L>'LyW&4$c+.D5M*[8Zs9W==<1[*3_/Ubz>..jwmH;\wh7cCfgZDrA]_KyVHZ
U"hAmn8kjUrn1YaBV[9f8o#4OXoLA<V2SdpV%WYq+o$X[2uV&EGN*/?EZH$F=ueFc
U"UWHvSjKfAgm=1YHdc,U4+1DJGa0\Xk\f\\Uo/?hpd&'EX8.yejR==[F+F\eQr,>
U"I^#tO[?G2<4O_8v#,2;rC$X>K,UmZVEr0[+_m$9,$xVE4B4Fb=DdI&8#AMoeA=0
U"Y[GvLp]nSrj4Tl037HR&L.lROmx$XJZLG_8NTI/F\:ei$IED5Mq]uEgOPdxR[#n
U"[n6EHm4+4bt%])1+kG[#?y]cVFB]#4c?d58MEm6dodT)4AsF3<X5tE4gI2km58u
U"LcT<._[ruc%Y.<H#v2CML?Mj*59wm4LYtq+CoV#;f0$/0jtowr:EGaim'/$R;a,
U"Bs&Le:/lxJ4i%t/<d\%rjb892X$a8[e+ZJ(\1?qlpsq?c/)5J.X,EGS3V%F$8>M
U"E02oG-Zn%:\-EaEK5Wh[5BGfHWrlN:i7>&UHMAR3h:QJP/PuFV3^PABe,pR\,93
U"RQ=IoOI4n/I?^o#\JA^ts%7FnI&ZP_D<=<ORP,=EmkD/jE\K,r\(_E,tIw1rqPV
U"H8+hS\19H5A^#duwkX&$L/[Ypc8ilmzf)%:+mftj?$\kF-x*:7-[DCA=[_5#X$C
U"q^#IqQ_O9%.])l1-cpv=V$ueH]x;k,5B^d>>e5[qE=V<R9-Z+L6acp(Fcb%NGF?
U"iSt4FLM42tHObFha)S?swm15\ND[1]*V?i>mroU?gD5.^/a9$A9'r1XmQRQk=Vh
U"<Ajt*vH6nN3m404\Je9EUG,]iYla/5/O^fISS4Vx4xA_=qw9&w99P6\YSRN0A1=
U"o9<il]jcuXH[J]c,7)I\<.V\='1Y#e&A1PlBVJLAI'^;GX3<#'Tsa$;%K]U#Zb?
U"G(W*<M\k2tgU-LMX_^cSo2HXDy[-wG.s$QA5FmciB<c$lWmg\o.LsEBh$tF'WG7
U"j7eD6XLUuhII:B6\<,Dlql*pkQ%3$-'h4[qC.BL?GfU5RocNasXgpv-D20]u$iZ
U"6p>D0sW2*W;s,BgOSV4G#HkYi7f91GiK=^VA8=tD*%P_\94c%\]=+huig3J)GY,
U":#a>.d]-C06ZIEp5Qe/jHG;J;GVlb;rztJg3bOGOxTgnB;=vd($Ftl9GhA507:d
U"bD9EG.BGmIcw$/?Xe48BtYQw]]Gi34&KXV(?o9r3bBW^jJCZI:Q$c\Gcuu;5dbr
U"ldu,4^(;?E$y6Jod%lqkcsfUi]YpU1,ulH2R=5R,<Y&kt%J5>?lB2wlXA:^RQQ0
U"p%:3SAKqn9u>u.N)0CNJ_>uy(v[4&8k(SkC?r=3sjcIYUmA$ODLa]''17apq$o9
U"t_s#3QjQrg94pqKj>A]:pI],;s:,]U^bjK6waE:es<vGg-0GjSuO2$O\nT7C27(
U"_P,$$OjkMc0OB+%b<Bh/]B99_Ye)lGBO:.E#W&#,(_v/P2m4:eTw(:Bw9;at7B=
U"i#f&pA6_7wI]cmK372'b>V:O&Od-Go(c3Us+fk%^8m^CDFg<#w'_[J?mm*Es/62
U"l#3#tQfg1br+fA?/KO+]8=G_?5PmyuTMDksfV6r'k(-OU4<5CE#gb_,8mAF3I&J
U"kHRFWsXX-6IwrZ.'zoaEPu^kRsomU3ONl(YD9b[IH0KnVhG6B7E*xR_jQ7t,Gx$
U",[GA$;]G$,%t/Q$o$GPZ9j;QVs*GP2ep2mZ<3wNi%XY.9d%-Q=Q=,(:D.M6Soa(
U"GRQ.&JQ-a+^$IF]GBn#j*'0B:>AJ2;o3.8UMvV^UP?Yp?]CcC&_%Z7qu/2(I;]_
U"<+B),-IeD&Rn&SP+b=w)j,f?Z%n&OMmK/:;0:4C-LNoP<j]Mx9MmjPk/b9/,:1'
U"=04)lJd-uft/CU&xaa-w%H1#GV%aALbQ=2$Y3k_:Au/nD_9L5Fu0_=OX=C^[9wn
U">?q?C%h,LoiF8l,N?,)aJ=:A_]OFUOS1Zg)i#,<s?7<ZjfiIQm$]#-TK(CCD_$c
U"])&S1u&=%7,:h6m4#0-X_'i%WD*Fp4M+3A-a\oBJ/ChL;_UoZiL0m,&(7y1&(7<
U"1a+%up()%/%%%7+%v1n^KJx=8WM5[%%,s%%%1%%%%uf%hqfx%xhSl%wZ4%%7(I:
U"%[L]^D9Jql&=D.+[&8Y^roept[()ze's&c--/\:]j6iN:.CU/%53Ehe0_&_Vb?C
U">c7>B9>]4l'i+,ZB$7l,qlU'G?QaGi6H0e?]QB=$MJr16YgPUsVG1?S6'ZCYUS.
U"u/JK9i)p:#A9Fs[vl+CabUYj.9m*(]pYmS+Upe4(U[_7SoB<WF2cAgex6:<ou.Y
U"g+'gCZD3wHQWlL=n2o]P^a#_tY97fv.hs9wD]<=<t%8evX)w>-U$<\*^:L/QqTv
U".I==8Ecf/GKk^iE6Pi:kWP)oK5)P,Qs897AFw)Bl=%V/:5N'CX[gDW=n:sL;SnO
U"]t8m6&Y]YUSv+Z]6><+>Fm80?8&hv.5sGV)>?4Q#,Omj);hpm'GFqu6s)B[<3rK
U"O8E#Y%=7xEG1$Knu$>OmD%B^tEKFKEbw*HT$(A?liK7Cm=U->QIg.B.k5CEM;/_
U"+;U/^0#V:dfKgT#faCgJn*'Nc<vQYmcBUHF+K^[/>GM(N)m0MO#I]S9q89jsM9x
U"bY79t<U9?HOTML9t8T.'>'[#Id(&MRHbPt+37h,QM,41d&aCf#A43cSo_uU-lji
U"98n1.kn%*F)B%I6hukavCu:YOt1KCUN'KH=G,s%df_)h?[A?ba*F;.a6?#1zX1&
U"T''\R8H+gtA/B=2H#=XEe\]VrRAUdg>kZK-Q?H/mC&G,\d/]ZX:*/m>707_1Bpi
U"]79MX9b.6EK6SO'aO5zq4%$?n%ZSX%-N[ut)G2Z/m-+M-+]_[n*9JYX+j\p?<E#
U"<&5.,RmL%#?7&VBj8%'mt+Z_F(p1F=m916KURPH7Aes8[E%3Y^]M]9b:U.n(i/C
U",dE:'YSY-qY7D)iJnV(pR4erw%BL&fpn1e9*Wv79fnk2q8&/:MEW169Fd1-OdO8
U"Y0qa1l1q8RJNQ#vgaRE]#F+aSYBu%)]+]52HOd2K_sD^Q&QH%e(5eR(GY7-Ge4D
U"I/MumAP'JwS6ufw&6EQp^VJ+G8R&p1%O=5<^S+uEJWV2JbUs+8LEiOV'r8%%IMH
U"mP7)Je>7]L:ba(lL9.$=XzAX6x4dg5r7DpqNG&wd&SIEws';mPrXN9Ae19c>1dg
U"'kh5h/P0catQXM\n%=#-Yw)]Im&>Q+:i1AB]gaR8I8EXb?(3l111O\0:+G+^nW%
U"b%rul)Kp]/oC2EEI+cY&EF4_>s2&OG+BCPHmbPr89JO2g6^UP(Y<7Sk7c1X*_^t
U"Odq1WotYCSo=Ja+_DY'w)],9#%b\4%?n%,Fj1],VOe1'DXmc(0/]Q#Ud0/K9q?N
U"F'5tjBY0+G(+xl(5m_F&?8jD%,Ow)]du%&?(&K>H,Ut+A<=gesC]Od03=?N'FaE
U"5x50?[GbUr+Ue2%h9/UN59^VkUY$xS-qW8/962(OO4d-++'mf(Ca4,Uo:LO7UD*
U"a/Dq%j)S=[->Dim+qfY.NuL'5K?nUXZ&ip&Q\f?5G/7iA*7<a#Ef'M*+16Al9SU
U"[$qO$i[8(GYOdo3Q&ZFN['*Lf#F)YLwW1/i3B:#M5B&(To#BBe[miWN4B=k*+%f
U"x=54&$8e#U5n12LAQ4)mSDa\o^kuj&XTtL8g/1-NJ/B'56Bebkq8Y%<CDqFUYUK
U"[t'>g.ssotKEn'm3uOn)&WMd6AN''nF;aeWT%r-REdSHe.d&MF2Wgn%oH6AeO>r
U"/W_Snu:bghg:Fju.S]W:FC2nWCL.eQ#g()<j+6U:n%3$P6#^GJ7m\Rd&I$Y#*6.
U"p%$1L=olW),G,%:(sX*4aHlJoYxIAg,\Zq78-)/KnL_I\f9%a8G%P:=d:uS0Y3M
U">BiCMnBrKq2,Ot8='Xj%6o;tQh&q'CWVOjedbps)q)Sn*]j3X/)%0<js#EeFK.(
U"-O)3C6p%,mvWo)/A,aX0n4OFlq.O14H(U7T2nL%E&_]CEqy'2sQn*s,49vFWY2M
U"j]9Vq(=W<Cd7enY7&E+)ct<,=#k<+Wo%l<q4.Ene^5P&(B^8vNk1\O^(Lbbeok8
U"Y2ok1q8TU(u.8='wTS&%xfR0%xfT,&xf9L%x<R1]xQ%10;Qn_L9d.4AoLO0w0Pb
U"3Z8Y<g9PD7cQiL;IO+R7$(V*)+L&^fJ4Q^%tR#8&(5&LF\4qEhx0qQ+,un,mE7Y
U"W[0?aA0ienMj]bOTb4=Ga9/mm%':&a$L(%uQ=VQY(DSw(S&w(0MIa1WO)&6U#3M
U"n_(*]s(5JV%CU4^=n%PvGoF]:N31dOGOa^,3cY$OQ&_DOQ.GdZYPENY#W2Fx?KX
U"aAiL9hrpX*bXr.EMnW:KCePLO=-1,d+v+0HOikOn#-Eg\#x^0?567Z2KL1YWor.
U"^jH9u.?'G'*/EA(%Gg+URN[S'>/JO5pO#-Ea4<:]Y>8y>ZL$9tOqR8%_dIvpsa<
U"NOgw/S3#e')e,5Dm)f?JBgK43F?M'5KCn%eSV,ia%_gF(Q;s=0]elHF2u.O7VLr
U"/6NEO-VGdGvAAY%c)j/'B(3WE<]q8%&3kX5975&(OR%RMn=%-Y'C,utO.6iweI,
U"u-(H[=6KIc/WO52j,%7O&D*8bx:&I6)_Qn(*91PY[4)p%s<r+SYvSUDOt,0)*-;
U"h9WOn%LZ%i.%;o82l_OAE1V.uSvxLwJ<U*Ua##*A/r6[h5L<02F'JEp=;oKNB1f
U"%Ggep+C8V)n?)?Q37%W(A%GYh7_+(nUF8QQC[IrH?uMS[1U-3#*m7&N9=SR7j\;
U"Yj9?%:ZA^#a'rW]*g9U+5:e\_7ooA#&.*s&Z,AYBc7'_#]_/A$)V.j$t7*#C5S+
U"bdk9jZ<o;2n8,&^25RT7&);r;_X9JQnc992j*4O[mb/u)xrYYQ9+(lL%L)boSd1
U"Tol%m*D4%$kUCPYH?;^+fkM+XM\?o:\_2b/w)>%1*\=/.+[d(&4>dj5;qM^6niv
U"..%bM-=dFM%4&<kq3[j9)K2+(N?FXG;w6?K4]H/u6<uXEX,lD?)?R&G-9r.'(+0
U":4((l+l(ucj7&wd&u(qdo9ucn)CDSJW#e[-Ce%\F36&RX/z;wK[A&J7a%V>cI?J
U"O-4(Jw8ZOF#[tOcKlF7%iCYuZi1:Q11oW.+_[t%LUBQ7+nQPH.;,xEEHg]0%i=7
U"/ojJ1;FkqS0'TUW>[sFfEM7?NQ8R#ct,OYL5/yjb94&AB(g6byiIMI1N7'e.O];
U"m-CFhU.-$:l5'g34517TFkvR(-MbCEak_F(^t/'Yk&6G_w)C4(4p-I6)jA4i5o&
U".1;sd%&5k:BjMif\PPb1%dfZ>'nLUgIh:7g:LPt8[9^-hJoA'O9_8)'+;]'e%i*
U"l]\Eihi8_)w))Ozm)%PH6](qgShCAR&,eS(]KFX1ZPJJ1_qF%_tO%yg(IU-\Qw7
U"U<>2)/a%6%$A+i)?N'e'.K/<C'F17I]6]#B:M3?;.Sq8[Ui%S3IWl/LmNQR:78Y
U"tJ?=-5:hOA2-m')_HUh'O1b2b%.#qwd#&o%XDygUNd''S<.m(kY#k3At_RR#jp#
U"O[:mfY<IRSZaWId&]O%<wgkJ05?N.'CP?A0+SYIE8IU9s8U&+(nLU.N(UA)]jiu
U"_\Q#l/,eh7iEg/a#i#a7eo\Oo##%WQLH0;U7<u<H[6eyi(-=cm\zsGagJSmZ8C4
U"U&>R;Yu%T7:Z^/pHA\0GD\8SM1V#%*UQFfFW=<9F*d7&eIQK=.QA5LMZf83WER.
U"heGiFcZeq[e;-n&W=;o2e/+5\W73gn9)UY'w)E&p_UlZiq3N;[aB+I(&++-Czq.
U"cAW]u?m-Cg__R0fZ&K5=e:gsiu.?)q&(fW.Oe9MA=NN??R'l8%\+Kctu]70AY%%
U"]85['S'F)o93y;XP1b5wLPXn?MD9EM[E,^MNiMB9%5o9Y+_ta%gL90v.?)&M'X:
U"OqYok0Z*OE&'OF/g##5e1nSSg0%=wDL'5QT&Z?1^ngS;9+2gt%YVl*n\Y%G1dd&
U"O9L'wxo7k)1q(go.f(JgUfJ,QwC(=zN2)WgIy<MoAf%'/&\%Md&AJg5p[9s2943
U"9;[LhquQsCm_'G#D*2$d3Ou:)sRg?MSwPc145;5JK(oS+.1d&D-oHQ&q5%*[G(Q
U"J.(uQ&?hY4iFn&hRR&G1<,_w)e7XXY0:Kj;N(UN'A\vf)4eZ7C1869h'Yx;Dn.%
U"=M')KPtjTq.im%%mmQBIn(NAQ6AcWgQ3/fftOdDG?5MC'kLPU3S3bI#],o]v.m:
U"$kR%)9w)1'dd&]]:tcfW:YP]#\?f)n#L%wiC&&Mo>O:u)C]_dX2cokv'N5x)'Zt
U"%q%&b:<%Mu%c;OOlfMw8?Ma'Q'A,0u+1\Y3%\)rp6Y%a&GmT4&Un%%=:9DS=%O0
U"m(?\1>]RiTY*;vR'efXd#-usLI<Q0&b5x84*1*%JO>5O7(%nL%%/a1[X(GI]w)%
U"?.hGMh:YevS.)kPjBI#%w7'4&uN:pr]i:,R,1+26<'i#=]C)7e'Ar6'7>09v2mI
U"x#W%+*i%l0D'D*#/;m.6/Sd#&e-B[*3UORf5P/9%6#MT#EGp7e<cCon':up.S4Z
U"*'U^/(qO,UCaPio&ouVDrC6:q%.%)u:u6:r[K/sIa'E1#D3)fg'J'32p6o9Uh26
U"QtV,/gU8X?Z^G?AiO1'_A<Bj#5\1)kn%KY&;X[]K:I_TA04Q?GW86D\0t_uY6p%
U"U</'#n-HPo2kq)b?2fRB<EHO7-5w)'0#Ei)rC;%J'NSgbL[t9F'ib?\N'5wF1_t
U"O'^(HA+CnL%%UFo6&p29qaU41q5O8?)K#-2E_5G)P)?N'qC)N'Gs)XYUUg,<$=a
U"M(x0ouN'%E*XE(G7(1<YO2f%&Eq3Rj<[fi:+rwF)%%RGVs8oeL7_O=+nD5</[q8
U"#%?%n7-F;R/]Ggu%-d&%p(7QQOVc/R<2U28EEn5ns1jCQ=T<i6N_2QBX#n,O8Hk
U"u.d%S?)BRe?3defOl%8%]%;eWJiI9pQha9MZ1h/gKemCAQYTgfiU#gkeRSH?4?A
U"/)BOBk#5O%(f%'=C:n&cYg&Y/m++(#gfG3,?iMK9;#a8'Y93B_BL%Kmb%UL)O>%
U"A%Y'elKr+5;/L'K'>u<V(kM[89.^%$[_7_f)j-PoYTs)1T,/9F2g7kn1:&0_L-9
U"JZM&QtG]h[WaE\O-]3:/gf.f>#O0.(G1s5O#J86Yx-<<iN(&6q8&+?uXD,?uXD'
U"-uXp*-uXp%6uXZ+-uX0,-q8<7*iNT-6YxM%?9xv%>Oxt&=%xp(=%wh,=%uX4=%q
U"8D4%iNdX%YxMs%9xvp%Oxtm&%xpm(%whm,%uXm4%q8RD%iNmd%YxnM%9xfv%Ox]
U"t&%x]p(%w]h,%u]X4%q]8D%i\Nd%Y$xM%9Hxv%O-xt&%-xp(%-wh,%-uX4%-q8D
U"%*iNd%6YxM%?9xv%>Oxt&=%xp(=%wh,=%uX4=%q8D4%iNdX%YxMs%9xvp%Oxtm&
U"%xpm(%whm,%uXm4%q8RD%iNmd%YxnM%9xfv%Ox]t&%x]p(%w]h,%u]X4%q]8D%i
END SUB
SUB V3
U"\Nd%Y$xM%9Hxv%O-xt&%%L4up%()/%%%%+%0,(iK0YP(_)6T%%%Ag&%%1%%%%uf
U"hq%fxxh#Sxk'%4%7(%I:[LI]^9J1ql=D%.+&8XY^oeKpzz%=b1eyntr2kOB5e;5
U"+:$\5RoK^Y#W,'\j?bSg9z):ecfV7Ca'R%Juope%r1]Q5)6[V&bK:bP131zIOry
U"CY9Q4[p\VgE3Q='Mje8d'lY/1Z4%fpfV:MU&6fOvl\^W&sE8$bR37+G2oI?/ipD
U"oH4HqkMoWPkq=kh)&CqCyQ5/]$b+^B(TRJxrn5Mt*G=6R2TJeJ/JInc&4nFgNon
U"81bT\.wu>[Ze?bOP%91QAIvujjK6h*8-YKX_<)z%0Vj?#rIf&sYSv2WTf%fd(fv
U"srs?,Z2G1&c<C/DP)E9dnnO+fG=$QxtSiW?0-b:r_WS;_.8WH]ryf^/TgMzUlj&
U"G8yx*gZ;0BItJ*ZAw)=.&dYse7#J7P:6%<rC3u(J<,.YrwC$>MCuEw,'JWs7ALF
U"Slbe*,pcT-4p2b/nYLQ1T?CFwi,:dxPJ>?#knuC]]at,O$k<<SfOw*Y\q:'LXbb
U"gyWfKhd3_D<I]uHYrDVp(8=nl?m\.dp^:OOMx+KHy4,bnSxU^ODo20?zJ<Ovry*
U"i0))PhM(),_etxwP8NveP5^BDpPhjUFZ^c9e8C8b3>5dO3.y&Yb3Qxm5yCvpF;d
U"yzP.Z%5aAPRX7ij5zB2RR#px(Q*,v'tzXs>6)$9lH$,H5,drg;3nY;R((hVe;qZ
U"'S)(_vgbO<(9eCi,8'NPvOCGYfV;M6O)?JqFEe/HfViIr()/flS)_eVOy5&jQe*
U"FpO5f)jc.;R&ynl7qa*JS?JkVQ.>ue+MCSSI>%J0K2LH$5sLD.c]MOgu5[OMo_7
U"6j2oXjdNGyNR-4-mMq<P\OCLo:nt*npH0</Zo0Lw8\z#7_N,g>?++>(S$W8u\js
U"n-*qJZjO.:lRn8F,]xE:Jjg)[PcOvmP\TEzdQZ6HJYj:6sy^l3,PUZBtDfU1Y[W
U"M4VVc)^_d:>&\N1odP<TMl4?,2b^mK0nk%6aR9U9$m_.I3aq8:R1YFh?,b:hV&l
U"r4:D5MVY:V:%'0Zo7HES<St+V&Ml2i7?iGI_],USCKf(L76VdWf=qiQT/;%b<h-
U"xr/4<Yot;&<X4giV/\0nvk0146Y5F3tH.HP(FZaoGbk(FCuGHgt60h,v=>OZX]&
U"0tdicg7Wthn%1WXT8uc>jWOgO%<Wsl_>v6R4U%pbv/6odc2\uu[o3k;M)dKNR8L
U"a+H0'sAs.flW6HHq5l2jlW044l=6%*,;nsscFRVU*-G0lWw;Sdt)d?^0qC9mF#O
U"pF-fRUyG,.ofuGcNdlR.Cv=;/U>undR2>H$72A*:7R5[Xq*cDnONVz&2Y:R*0T6
U"_NzVm\O&AeMU3E&qvFbY<V4DcX'BTMdu.HZ*Y4#*HYv_0R^y96p.=JMj%=-E;bM
U":D%6jSD6zSlkh*p.:,z>$fHoBpgOE=Wsp40]*<8gLgdh$;ru2LG-&4[RDt.2iXX
U"]<PH$7JRi3&d+/7fenMmfLJFLgTZ4sfi;-T#kblSk1;GANQL$NwsOiw9fLfRS4L
U"&k#,[tZNeU$8ZW^pvqrdM)Bj:Zb_?U6tC4$K/p_*&)EPXaD/QU[$joKt\EVgf'p
U"N'hKGa^Z'Snz<>=$(eM1bLn3\VrYA^;I(KrGi'ido94MIoh8XK2jXT4o>54Hg,B
U"dz$tlr(7\0oB[])A4r06xJvxPzkT^LGHFurugjXN5E5-H7syw(qbKJ%_YMv/qkb
U"mhQ5N't3P;NkZQ$xbpo=QU_)ltlQgFDR1HqlmD9A2s\J5>i'DBBDneaglHG.BVs
U"U3m[]WK)R4*oyB_tj>X<pCa7B0_8bE/xfaQ>5=Ad8bABor%PnB6]\b3;BJ$CrrB
U";Aj5OEIMX5$?Qq6T=Rec>iA2Wi:twoU$pn7W?Ofo8KLT[US/=[pTF[1s&rO)jW.
U"+Y,ukaKH?och%UlVF-D937-qPZ)(PabMM)/g?ptomX$/354><44n/CbSa1HeDz<
U"+=tGQ'-F7fv?eJX+l(kLma>Bm#S>D9GID[<m9$/5M%86j#>0<R[Bs#J0_Y3=fGd
U"Mn-.x1e$l&;;GBBqRlI76^x]ZeD&=[h,D]gm\DnZ;TG#S]+_DARVbv]):S:ax<B
U"n1tWQ>&12A<7l-<j+*N)[a>Y:P)2Fr[Bde34ZapKE8uJ/_>43?v3Qj#3dh23/:i
U"a%#%d;)rnN&sa3wY[a?_o?4]#T#6(0&I_mqW&[k)Q19(p*v1bZ2v+/f0N-KrExd
U"==N64scLH'\Mq_=hTc6%.Y_%?01dC/:<oTYb#PRfy89cOWp.Fj^hX.C3uK(*Fe5
U"j#Zc)Z.Oa]GTj$TN]fa(f0'f3t%b\f\ch9ii77TMiv:'s7SDc:Z2r>8MKPoUJj,
U",7rPx$4sxfvL7T-[/3N>]omkAo/ti%?*&mDSmUj1_%j#lmN7N\Z1-:>hf)1<LdY
U"8GvQ*'IdE3YoliVF_)[]r.fYg/3eou\GC#<WZl<mar]Nvnd<rlp[2B1,R(KiAa:
U">g9%DM+84vqt*jmCE]RKpx7v5-hIaf-q>ngrgZtUf'2KTlrX,Urbx_Gex,xur05
U"r1loN$$ESXm<$my[,+o1H7FBVgDkg+m;7#;SKf6EqET'[GijIK<lH-J7]6vfrNg
U"j$6r&*&xKZnp10kRk(+e.l(ilaDNZ.qqu0[(]Ze^'B_cUK(J5dAFS01RO:Z0faa
U"b\fIqpU6k7:%<5eQ8Zv6Rhf09N7L#sT^B*h4-7&pR7<1P1rm/HS?.%2vi\-g+t7
U"O-w1[X$CQ7,W>?Nc^9jL%HnZ&6w[c1GhXZdQ3iRPf?T6Ck*/52Nk:*h40;j09.e
U"6T9bp5xozXC8MP%V:%)#Y;\3Cm(h+2=st.N_R_fP1Of/]C+0xtUX:EOO_X-)o\r
U"m)B5IQ(%=_^HQs;.]6o*>E$GsIlrMdv+*f1*#3HCf8Hl$YT>.j;Ng8m:/[PzP\C
U"jcR#e=TFEkMNE&4'jN$5(j*]=GOOS\ALrBq]AJUNdirr6pLcgW5\hDV=5#A0^/m
U"1VIDe&*->MrLMaB,QL0z-dr?AW<+([baS^j+cKh#$rU)n$W#MVQK6G$urSD&Xmn
U"K66'0A?z_6t^LVu<dU:(KR-,NW^?527O0aBE5&Cz'MG_#pvY>?NY9q:TF3P$g9G
U"5D6O2,HdMyjak1<DOCT>HtVuK.([>YCH>^HHr-2x:'V,/:g\*Aj]lUsBMVxEG[a
U"9=^\]\\WnM:1*HG$D\>/9P2s?.a$1^x4RjPOZX\2?j_e[N]u0jlojgWkEIt6>+A
U"_\tt=<TcaSIn%jF\5H>9Jp/OHDbj\tGp[ft#foj$_pxbpJ*>0/K#&Gq:-__[B\4
U"1-^rpReMzLBAeYtfg>y(HnDWZHB.8sa2A'J'$+Gn\tW>;Bm]fO>/^N:/K0FNxYw
U"E?[2a?,8C3V90S5$+d0BkBS87vZiJ)F45iLI]AN6?yS+h/w8h6Sc%)X>>?i5v?f
U"DSc/IFX7Jk9M8GV1^k(JT=h:h(:<o>KSg=;.JjvX/t,d8XX,03S<:UvaAfjCjy2
U"lEuS_(CG0a7xZ_k/HsvC4VLe)Ly(AuO>qravc\tO&6N$'4lOx2P/PdDn(X^.m7Z
U"CVD-Lw=-5)[.^WOw]zm1KWgH/^TQmaY_s.4[%A47zS-#X8N&ibA-BT/6pzLa2SW
U"oque=GaT=ILcCIN3d(WJS)Q;rWl9'/v=om68G$rEDCO>(:r*37[YIg=wn56E.-q
U"Orz<[R=m8w#Nz+N+M]M*([9[X)ZR)?>neD37b6^pqCNAuJnZL-q\E(AzB_FG3KD
U"V.sGu5k3YnEDwKqIEyZW9)ODr+[Q]Vk08JhuGb,qUbg8lWf*3FfAIN455Gnn$Ba
U"NikV_k2XW]?YoMoVbjyf5Q-6d;a_IhQ4lU3GpX'KkYR#zi<L^GT\kimv0em1HJ8
U"0DQTlW3#RDu#tQe,p:(9.PQVli8Px43uS4o:42kQ^ElG_Sr;Va^L6s6s;Q(ihH.
U"g(#G,0r/Z;tXOO'-<<')jUz.>ZKQ$m;g.-&:H,(z_V]D1<ZN9S0DkY[uLw8xk*<
U"ib(B8AQG6Y;V8(TUqnCp^ST9Z)nbF6Qk(L3f\5OC_:J3hUh/,yXJC0p#g5tgcI'
U">8<R):8_66'Q(WGq&B3+8R*hvgqYl%qwqdS?VdpT,pr8zZJEwBk8Mwo7=94qUd3
U"NM-r[^$=I4RU(Q3LiDyc+/3q6xbHG/2_Zcc8QWiJk$Mok&jQ3jU8Eo3DSB8CUIs
U"#);6LE3#fn>I#[[[arOG;S[3ed/bt*9Q4HlKLb'E57x#FTcQn$UG6Z^?)NEiV;]
U"V\J;tk&wvO-mxp15KS[9(bf.uU.SnW3+/8l_E,tUW8)W#'8MimX'rkl#8B21zmn
U"e01Xj&?k6a'gV53BdXJBK\Ir.x1Dd<[gUlx:ldN]*86c_FeJ?4MmoTuyG;YEaEZ
U"V$MFgok5H>'DLSxW;YQ;(p?s)S70UxpplaK9mIAcEj0gGq8lJt3fiql7$;E)Dkk
U"0y[O9y-fK++(DJ*\sifFCd$8R,n_47qoFGV^J#SJXi(>Vgo7y$%d5;AC$uVjK:H
U"6wa)N,2_q&Ss,\8(N+R0ds2_VN-hnBXsZ-LICpnpv>gub8mH^O;Ml)Kdoh8DY:m
U"d2chs7YrH5\gwTuZMalKJA3pw$\;hqBSmlB1NM\g3qU=+R^,1BA*+,ZVp(y>--I
U"f[tbkQ5beUJ$m^3N]2GFT[*fkVSP,2TlQc1#S)dC8TLhy(K23&?:c2u2';0A\xR
U"EDN3,>YD#O/xSzqdw]63YlQaZ3?K0gq8ghWLamdh1$Bg#kPU[a#bk[[BF>k7f31
U"1%6?m<rq5ydRTU&>poCV,Q8(Q)cq\Y#.c\0z.*VxkS=toad,=ml\^q7t7q&^NR$
U"_BUVG=pX<?.$WOAGWx^E?^;Abull$^(S*^rRu'KSeyqL.5v,%:[xTNtUF=5PJ0=
U")1_[p5CCymY-rK9q_:&9>m0^/phh1HuWG3PsT5Sn=/r?m+%o;J.7SxeSNL1v&hb
U"AaS3r1fzide(?P8Of#be&s-F$$s:F<]gwjt>pSJ.;P(D&U^FKez?bYjwI=p[j>V
U"YaT\WI2B%K4A)nX(N-$vn-sU,h(Db+HJ*ES6kVZDRJVf^rrUu*]?1-xR2Aa<&:9
U"(*(l]AN]gTrC_h_Ua$HojNdrv_>iq>laaW*5umuS)ZLsy#tZ1V*2Ok%>#lTT$21
U"^eJG$_Ou)%6VJi_F(S1FHkUFc,6NB;[xIU%#O;^S#ziFoCOX=eCDp4ZU7QlcFbo
U"R<okO\&E1>7D_k7uU?<R_H35jZAQO:sP/4l[(9PSkMds#(>d]#HGA>nb1+ds\q>
U"16uQc,ec0r&PBbl$#MFnbf)lTgd3#JFIsR)h;#YQ4K;igGiO[O6y18<s:BEg+7F
U"gSp242Ee1xp>H:Bau')H3_A\9Sg<sQl=B-(oYgP%8Mug]bqYI,u0UJUVeh24PnZ
U"icN+/UVLf\p/tYn3e1phd9Ir)D'4+K=P1,M&[.uC/r\Ez\^CtVDiQ\DQvIy)2)e
U"Q2:,]u8*,6Ce<0Sue(/\[t;=;QtCS,vC7Qh^1knqi/o^W9;&(5#:(w+rWqDd*0E
U"4.;q8&?b^G7aqew:S'GNZd7q)63k?,pGeKw>7wUx7D)]Kg>+,R;(q7c0k%3DWDw
U"Ge.Nvc-uAJEK'Da&y4+^]JpLoS&Ajh:>cbK$ACHl.y8&'I][RR0=3$0/8b8f/Nj
U"1vu:Gq<%Sg^M\K4DEIV<XiAcgEi-bjCNy?/g;k>UJEr7Yt77?EGai2?I91=ZN_F
U"&oY>:cT'L^>Q;8i;Xo=WHp.^izBTH\#0l:&I2ULarq'Y>JfD7Loh;4ZJw,F;Qp7
U"AWNku.X./&K;hPHlFVS'o#Ao5?]Fx%p,,+[)wQd*d_a0sYTFLYo5B]NJrDkh'PP
U"Y5l;vk)$H;0^az;*7+x4;70r-g?u$eNkv_R+*FCRN10,^Q'27I0u(S^/91F'A-'
U".YLO*BmxG=gm55uatwG,s4eW;hTX8jv+]'B5hWoT-8DYvc'2ipF^I4g7j>U9(2d
U"fuuH6kJO?YUgI_[pEj*ufY[hu(L[WNA_vPGT/Q2J^*b;vnhx'+pr'UvLaZ*9ZNp
U"S#iQES[*/.\WsDoD^4W1lol<-Vb4wSK;NFcO>;e8ajUNSgKkMNKN?WGN#brBI4E
U"[zMz8,u?Zt^LP/%0wi&-T7CtmT5NXRR#U?UWUf.CEnB6Yx'_ESLsB$^y7L:ds3Z
U"61ca<S*TzZjBj1J4Q.M;j:V]AqVAAFc2sc[/Ujl9/OcDg/N/,)qeIkI+_A,3(.#
U"p#f%'r#\mop+o$Hrv,4?m,r%rRNJZBB^OsS#jiNJe39AhPUWY&Cf[7jO^xLA]l4
U"]]/s/kXgg5V7wayt*#7&rTFhS]*ER?Lr9J'6oqmMs7Q9,&)v\3ZBHemdjJ^KXx/
U"kJ'C4\G[m7VU48J5gSmO<[.$<VoK?Sy#(wkk?aJKIaUkiBACpTyZV4wDY'IwBg&
U"v(?>I)bS4&#okOA6JN8BmXFwD+_Ya5gBO?f'#$e&4Q_0q+VsmWbb#v=g%Jm4#L#
U"wl6VzMILy4ZUOk^ob32-u*Fdc]G$ak3X#So/_\2<X:ErWCR0poz))ImTTl?4Hi+
U"[co2<5YfgTw,V35&f?-+&IVoBK]j?q,UtjhT.R\L<'dh53UH?:03\5KA4m/MBij
U"T:[#K=9Dd$U:m3:RSESt(5]yMLKfSu(v3XF<t0^RCb<?cGT++6,CmdN;ko-O(aJ
U"$-F]sE1Mx*k=:8RqBBJORLm9x^[ps9Zo$dMOY1?^07c4vwWeEoG*ZFS]+#%7dRJ
U">QCYr]PkfOLtsZ=Or0OU-1SXGxTpaYZJPXWJu:H7<pLP#(SUkIKLif/2M5FC80/
U"LGZN%YT*IdA5740fn,KJYk',S?c93?BieSp35Y>X61:Eyeh[V,K(5L5,&6aQ0cj
U"'*e<m_5A.-PaQ&]\'VQsb]MGImLSgzW$qZvAeY&CAdv_y55RrZ_9/=$Fbi6.dfA
U"qxU\+q4zs9R*cL?E9Ka7mr8/^JOF5P;8H/C)6#WXe)E&\gjy+GntY#W'DA.W^6>
U"_)JonyokKSljSr]D<[=1u\ET.KG3rt;m_C.7'oDU&4hjD[F+N.O,o<P>/;l_O,2
U"Jl=5^FC$[e93SkH2ZPOmyxs%7im\Fn+w_=+h1C5bawg.a&;ixW+9_71u1=*rMo7
U"U6X?R>G1A/4Lag87cVk(kE/?w?=R]<M)uC.%+qvoK/cj/wLeg)P%o-We+O-1%9n
U"^dyRm_lvD+7Lw8%'C-'XI5^'V+djF[.7K7pEv4C'82gJQ'#z4CF8rE^_+'1sVST
U"JARZl8x*Sm:eBS#+brs+MCikmGJ3-+L0xUL(5M+YR2&0AZ(,-7)1f=1>/]kJ+j=
U"=J]r]O5>d,1(+e%e?irbeo(y[bP+6?e\iB88<Go<oU;w3SQJ%OB4V\PSz;I/Xi$
U"gZ4RY]HbP)4p.?S60$TK*XUQO?2b9\lxR'd2oy\AKiEB<;0q/EOs:iNrMk/)&h2
U"c/z$htPX)I\TgyB]16meQJgoo4HsKbLZRK7XTl$KmEY/lY%-JokLWU0=<4i?VDr
U"dwiGqu1'H<%SzW.\D5R#:YEq&G-?'(&5V#]M971x._^(3W%;*CES<tg9J]NCf>S
U")R']0,b6::&;/zea2V%NA/\'';4u$8[2Ru)i#:Qv.v?,4C/9mdGj;J^9<JGmZog
U"MOcAIB>ihO^?U&4&&p-c^#Y3<KcB[aOj[5w[-IFZmrE=#$pNuZ=zUBk/pZIDFQW
U"Mp;\*a;da2TcNN8jeE,P$F)M(X2qNe_4),K0ZBeL>qHV6]vSrenwLh=)/-N:$i0
U"Nqx''AAeIKe4*?n$5&k5qa9I\'Q*7f[fB$OT?b.rL.C)3vDr:.;id6JX2gA5t(6
U"K(yt7-7%>.skR?WM\-Hf]%kVy[K>Vhh0?<&0-Q_e&FTTW+A4m^VsY^c)NRITH'4
U"k_FD9>U5R.M&-pMGL+E'MNV9xWx'-=Q+eR'ltCj1F[&/TmL/e3E^r>-K6k%5$tJ
U"knZdj:uN=ww(ikoBi(E&XMRozZ.0p2cWRA(VyJ%e>yo_<^ihby.BVFLGj>tcUuG
U"uS7AE+>KlqyA>nh<jaB8#<0UK2Xi3T?rZVeusz1_LZM69o2faMw#nCesz<TK&yu
U"_G;U2uY_BfwgJUjYFjB[u%5HV>f7z,UN?l)<o$lTuMO'_=s90nJ,woQeE[I*<Ff
U"[[+]rwCc3LFw;)U3yDg,^q6jMBBDhaW+oD#wEK<_FqAheqFL\n\fv80eR/4KA8<
U";3yDJMm$4Aso/EbmqT;.UYCqe*/:KJ*OkRhLWR7h0nJo<k'E8FkSoUvr[dLtnc5
U"3+d4/QvV%3eANF8vb<P00]ZF$Y4CkCxFU^uSfW4wVwiLfR/g^<aX5,qk_L94u)W
U"wVKnJk.<jnR5/')#i_b'$x*>WLxIeu?XJdZWRLU%rI]e4%:O[dhHQjE28%k&M.+
U"=($2OT))Q&EUA+:O10Oh;O1)1J%S6)Gng7&?.1uQ&[uY]L)dQfN2/W/%LA+4/(c
U"EqU'Y2ivAQ-uQCv%+#9DhmY%W]0+D/q6+X%q&5puSDj&'*(uWLA.q/1/$;m1eVC
U"\E32_DIQ*RdQ=_dVItcc0bwsmVQP1C7nUG:X3#gVPKio/\On=&Czvm^%;R71WIf
U"+hNN;S\AOQ=_s8$^cBmMvp(fR)(5C*I2AH5CX'<aN=6)^1jjOM6H/m$F)R(2tm,
U"(xkgXV69,N5QPG=>&MH7ipJMJ40U+biP6A;:QvY89y:edSbFdCxsjX_3HF:[Ez<
U"%=gJwf/$_X(IR=WHi>)LC831/,LE0^u:Hv,O*:E91UapM4\y0y-&HW%.sh:9xP4
U"Lb[EPO0%m[T56G-:7I4El<XDOYNRm.KXW9r&5taUc:9>G5XI;O-/qaUI-aZdUoH
U"DQPcvR%4LPB;>eU.84ckc0P%SD[Xf=dK=S?[e)h_Ah.rAVu3:oAO9,hI)Wo/WIH
U"L].velpOUA?M)7b&\m91s'.>?.QCVl,M-dVe?aX?(VcPe;<0LMXlIlnuxTWJU7n
U"Ff7ti^DFCW]BZQ-ndD1U\5Fjm\*X2%xU$S5GE>a0tJ[+Es<HmV$YqD<e':U'cCj
U"BTmv6bphr[YRw,8g(R&Oeg^b/a<&Lw[T7v:G0WWkBCS3t5)b_q0(-T[&osp:),P
U"TU[6a0O+*u]Fh[wy.?-t7Nf^Q/f;AXv;)ZYrm_\r^BiGA?51^N0g:[mbCQ\<k<u
U"XAV/$#'s(H+sa91/(,AfB7h3Y4*/AuPc&<Q=Fd9RSt0TVDVCYX^2ZK?5fPScU<m
U"i+C[*SF,o$'Ga)?/ZO#XH03&X>.XkGJ?ghISI,NL]1nrAQ/eRk?tB6Z*rX4,n11
U"N_2(Rlgj5'[0KjVV=EEhzc*g5?Yx3<OKS:m4WfS$.QnNPI#)\8a_)q*t-S:67%?
U"I9ff6qApr9>6.(2q24z7vu:-Z0k225:Y8A&K:<h>sh*Qd)5+,1Mj(WzW:hzIw70
U"n1s<[(hLXui+I4,^u\%/k,o.u*-5<NQj$bW7F?3./K5'hT<Sqk/mT(aam>UG%:m
U"<p=V_c:Aa0#)8an-g5&*MB\:G:]+,v,WeHp:9%]#NK5t\-Gt[2Y7<P#Cy7eq.:L
U"OD*<BxrlQ578bAVw[5#%F8(tYZx=2ui#[)Qz*9JE835m5X-&bK:q,J'P;cDc\d7
U"$._q]hwSvh)E<Ur1#$G#:aSUEJrQ4g#F9/h#7%T?aU.,$,x?_;0]R8iN3xYa2<R
U"\m9aS:A_TZToC%Pl%.2ip5O]?_W#YegIV*ZnMl\7p+mF<$%OZ.;Og5]70+kv[[/
U"9%V[#H2-5-9P9d2.g(^Cap2[Fq\#POvb\R*XMO29)kk0v'#?HF0sx?<nE2&DIIE
U"C#G[j,=:9L(8eq$Z7D_ap2bB*/Oi*VRR+BfrfgH/UgvDS&xuqpnJ/OFAH_CT-:i
U"$KIjpf1EB)_#P*('=R(ldg3-:)mZiV4QSF*kwJ:SD?e6z2aYi_V'Cs7o62AyD#:
U"F\kmT:AJj#9#M>='PVXP/18M4:xy\D#3o9<ZVlY<_89q*99Y^_+W\gq2gwomrUV
U"#,p5mUfieqNV4hHs]n1QqCfGY)=gJJ3R/:eL''6HXe:InLe3kB7&Py.B_wu2#D=
U"kTpA*l4i2D3*eA3VmqAwQzuZR)gcJsQnyJLyAQq2jCdpKu5RTLTLfrdin3ntwA5
U"J_q;>*[wtleeP5.%x^Yzi<m(^uJ5a5VH(<B&,Q//5%FH$Me*U7k%m'ZOS+rk)'M
U"_UkkX_1ZrV>f+\:Gn5hh*Y,UES-%h>t/pI[B%*B+sM3Q$anN<K;Tu3,xj9V<V]>
U"y>PO&wV>N*\PKg+,%av(&4W?D?n3eVi-hn#nf,AG3=dKKX$S['HF9N^9YOCRO07
U"^LHcxc7WISM^6)F]\B4l7T]<VXNFcwz'QfBTA*e_meRJ(a;+>]s\&W9B$ni69]f
U"u^TNAt28rJSa7?-qQR1D\mpO>.;+k&]jneuv7rkB2\-sEvKp_;31RTouZjfRqYB
U"JM#nU\:-O+YB]8DroqR7m29,Rc9lm%WgA^[I>J5u4$k97$eO.rLY[XemL7IAdlm
U"2L#mgn_5Ls^spj\FAE_L2\RrVkRclCFI)3-h&IQ+#=&Z+<u]55.rg3ftDti0JGG
U"=Do9[mQ8r&,mfq4m')ZINEYzYxM8j[YLd25>Xy/<s-,molcK1'deTPacOl^d#.n
U"mgib?(/KBHrb9wP$\1VcFJVK/H_aVi>Ia8gC2r(ct4w1Nk1FmW:2hlwa;bUeIE:
U"[7q*ccYoLK1s_';L-[CbwKpm9v5_eUiaRJqES;K-1t][y[pDY7pBgcS=B.Unk%?
U":8.g9;AG]_p:*_en<<6WYv[eyFcvW:8qypxedP&sDC.Y9(W8t82\(8[;8q^_KWq
U"ymUta2aQ.G,[^N:G:$[D8nmrgw\Tj.BfW(;[c5#JI.)$Xa9G#jd92u-xV*rnLf%
U"+78;CK3De+pMxToH(d:>i',-%$uA7T]?X+1sfghQp:D9V7-O[OLqa&?g2lGgSh_
U"^+:MXmLl*)[69$PTAVSj5oVy:EpZZCPi8l,PU_axE0vL3]p;7qP5RX'1J$tFh*5
U"nCQC\\Ahr$'HYbqgKFE_,q(Pb>2GfI\)r\,hL<B+whb09geusnmKASSK7C'R'g6
U"&ZYIIL#aC7d[0som1?;^J:CHg4Y+/4ekm6JDPmID1$n$q8+IKq.OUz]OJA6GCbe
U"Ut6#$t(_4h)=1Iidqe-qP[JFVzugZH)3h^Tq>%_SR$2fak[_p_Gj/BB[.nB^d=\
U"Du+F4<+uIY8b?Ige^j68RIh990'7H(:V8+&ZoL4#_7Jf3)C==h_$w;JaGpQ(B_-
U"t^7IKx:A;;s%=gj2<BoO$)&3tt^-^1g0xi_Y.JD]bVD*<bJ-+.SCv8V>(>_qKZw
U"0FbZrQ<i(WnlokTbCGu#PKv6u5?m?H-PkhMu(6dn5'HO#RbjP'Ls(%hsYc*45eY
U"IEZw.KOiGiGgHn6,J?H,oSXFPfiGT?74(k>OQBQ3?rnMq3VCKU//eG+j:eLI%i+
U"gGu=S]TUf:LVmIAF?-G]FX:m)8r9m_5yEZ>K1p/yXBlAGyC0,:BX3Vy-rtCOX2+
U".8:hn6*eRdZS6d6fQ((7aJJxrOgtURq:lggQ8VEM&]OF*,8.lKkGd$6b2U_:1<1
U"4j<1-<Y\YES8;hOd#fKYn]qWCA'FuW>aD-sRGmONL.W79pHbl_6L8F3=)]E>v5X
U"K<C:U<\mH*RpZeYNkdP&<i1nvZtYL[:5jq=+OBMD7k13Fb6[^nHcvi/$d1579AQ
U"Q5%es8m778mj3a?.x'mM?VSA#6^IHJ\6K#fFjlB3J5yet'kV_h(&GGoMt:rmn%i
U"J2eHc^Ci=CZVKEGn\nhYtP<jt8ZEjl>'c#_^J*ms1H)G<[6[S1TN)ZU[A/:#O[I
U"ROJvh5%O?9A;QCQrGO%*(SVV%nn,/2Be6Qu*CLK\$we3a4QaM0\7]#[=BX^[f=k
U"7^QyP36TZBe'/HF^RTx-R$&h3MUqlLIC(px2,qd)crnv1EBlCO\</;&H5ITe*Q;
U"soy_Gh$KMl-GjF'[V[&S<K$h=-l:Jib:1cK*]\cX.2^-952_l^Z7*&OolSbRAW2
U"FNMq>'D(:_CwdzS[#R/^^)P5=/>OoP223UCq34ClAHH(:&%;AjU$y+;GLXidu#x
U"MF0n[IGdDaVCdOl\mlZ27MKkW=o=<2)A^p$>:Ak4Qii<L?aM&/E%r38$w8V8?+#
U"d:YTIPj(kUsV[H%<VCdK-+-6&X)ya$(pMlIig/XJ2vuYW%PIO%+i^=Dcx$btPu.
U"genM##;NmE(C6mmyW<$T+*UbZ^JhfygP_M+T.K#GrT'Y2'QK-bEJfTUrq40=Sko
U"'gET63C,13(^<Kmrb7W<F)%Uc6[gOWVe;B/pTaFb?*aI5<Go+D:8b#f&^P[camB
U"QECSYh_A;l'b_,Ac4q[9^NnQ)OILBKg=RJFbLZI^S84&ina+md3;(1*4\u5TC2S
U")]O^H/I6O2goIrj$Bg[uz%%b(wBTj*jz%MNuZe1q-k:jmF&E^U9hMO1iUF6)+(e
U"K6$ZB-e^PdcA7AY?1bF2iO#G/VH*k0.t120?)yM'cymg?+#rsa3.)c6,+Z1>T2e
U"/nc7a2&_-s>?WwEOqf-%$7o7CWc2=jSY$]s4dgmcADtO1b(lY-UgpuU9:?fcQ)i
U"^cPCEwE?Cq[M8R\%Si,kiAjYe71vXzA#++;XYl_-VToOlc?DEp>ozKE,\P/(A(.
END SUB
SUB V4
U"3fP>+K]ldj+MY0-V2SdL+<n6>KAX'%iM<W&4u:#_89T1qK?e?x(X$lo$OwoPaY4
U"lrfFsT7bk#y-&]9Bz6gJ.BVnab%gl]tJX^g<AY7v(Bc;Rr8.2BL5Z7UnkB4qxwF
U"^k$U6Geq,T&7D<]^HlSA_A6DDPr'D24r<Cg-.I<-$qu+.lCwpZs?nGK\aK:'Xmd
U"x+;T5Th(1DJ_;5c4=iVCkWn'?20Y9,q7[=c*,g+kospuG]W)+^IHY=+j'pJI<GQ
U"m5L*JRS*#6<rw7YimMiS4r:1Q)?.6WE[y&^YX_J0rn6#Iq9_0M7rJLohVQm-7am
U"^JPTo:y:jYGi:[^7CI/_[?H+s]o9\MQk6cT6Z%Q&;>_ZQ+=i)c&O)(3Qjmx/f9H
U"+MeQ&fI^g(UY.?jZ/g+K2aOu:OB,WZQ=Bi6ZO#)(sAilu/9;09O9[1]qE_gQ&8&
U"$VQ=2?lcNI*(-Ciks/95n-'0++Uo4RvUY)%B$/+'U1nQ+=ig$<*/9(%Ls91X]a<
U"VSQ&8t[fpUY'H.8/m+axYjf:Ox.0+O1[AM=ikN:OL%)1M=,?A%&7)(w;)?0jD6s
U"?X0O(gZFY=U1C-jk*q:-im(mbAah*gPc6K-PQ%i3#or1E7=].5Yn(EfQ6\1M&K-
U"Qs5Do9jlIO]q4Y0bzp4m)]oB6rmIf?8T(F44fxG6rmOpSSd8gH]v+cU(-),f+p1
U"f4<Q?\mP(Z?WG5[;\(Mi=,^8<pF.M?LLI?rwmB5xt[l<hX?#.j(NgLii+qP4JCR
U"L?b7BU6jRAN929.An6AgmIu?0ZD\0AbQ?d&5kl05qD$kppa?\%m([G&8rI29'se
U"21nRg,^DkY9nEQBn+MN\UpHsZd*=mmh,cHl?Z5U3GYsRK7X]KqreA7^P6a<ZJgl
U"Ab*Xfb;hq5<QIimauRo2r,O-,Ec7.6R;Q3p4ATAs$pURYrThn%$LQfQqZ+c4MYZ
U"pk1Sj1qF'd][GHe/yE.ZSLD2G,sb40[+YrFUjdBI/*Cnr:pmamMO4r>&THmk4_3
U"Lf#W?5a5TDGB1SbP2LFh#h8]hR1(QL)ZDP=n5sr*+lCW0<fe*l9_WXaR'U)a)N9
U"Q\x]DrNMxbgX3b-GMdkmLJmH]qwdx^]nMTgd5vh-Gj0T'mtbnKGQ/sa.Zn[deJP
U"D$rv1XLefX$]sL8vX(Tan;x<c'n3'aO2;%%gjf_>Xf)x&gn9K--Yh8:)MU3=1h(
U"1(dnj\*0Tn6\9jG&0r[=vF>2T8lZ/lL=ge:fq$MX*E&<5q-k8Ln^MY(ca]B9i,)
U"Gq>r#2mS(JUVht0jWiR?[Iq+3FB&R=lC3E,JZ,ajo30^]XL6\HNi155\1>#;*W$
U"5.\uqTrlSeEAbboG9l/4x+Beo[4To9P21;fb\:Qr5fu.Rk?Hv]2U<p'W%ShtWSG
U"8SC(0W%J4C[Vq8RRK/3&z#X6FskkE=K_&O,DL\P\jfn3h/MjR<U\L9V+AocCon-
U"RKLf*cE%MO^%tG(8YYF^=)g[<gDj#JG+IV]>O:qE511<CB--^SIGp4u7WT,-2Ln
U"7RH4a$R[nE<V$OS1pg5c(CIeycqSI;\rwD;g<'0Uudj&9/D\/S48,>nD:l&$:cR
U"p-.dY%hUZJkKeZ-Jj[W9ERl2nh-S^#]:,kHqP(ib=_q]GDKZb*nq%:iC6AWKoQd
U"qi8I'L02\(]q6AF_q8H.^2J_HHRd5*B+4_k%lBWeXbq0d0M1jGrC;nH<YuBi;V&
U"GX^$9ZhWWb6_*xSbi;jZ$j_Xi54XEYjXjUnpwWQ7=c]i*jm3>rej]talD1U+Nb>
U"(?3T4s(]At]eYpcQPe2)6q;yjl.7#YlU/f*sG;hH5(GCJA'F-4:8h_ce7igb3:H
U"bmfFYxn8q$T;B31=[m7Fn;XSro/s7;Oua&OFq+'Maq+,)1EJ.i$nKe2suIg;A4m
U"3s*aX,R+,O.,J4P;vuUx:9dBaB^5p2i^.u-^Y+^1,tBkp&r2R2/+^'i$^7^^:yg
U"&AEJSTdr\OCZ3Xcr,PdLeaRi;3KXH,SP&1rXP]aBELJS2t*nb1FQd:R9O1*NR\F
U"xPaHgxtnWt[*&ip0Zw,2GU3Q>[=\.>(_sF9:TJC5\a>gWovL37/R+t(Aku5ZNJX
U"OV_6K?[GU.Nklg^o9E*v2qQ)=XUYu8d6JXSAL&&$gWM7t,._pRDm9_MKK=zwtIF
U"(dbVe+De[+z3]=g^a\N^GmAoqo^=\ky4U'=P9e*[S+2bF%]J2o$E+I2ywz\su,S
U"oRQM&L5LAs:j0ZUDp]/6A/wkpm36GlR]KR7?IYxe^W_Pr1.R3]CKr4T2rg[f4WA
U"[H%BOC-\k.RXh;;pQ>5IlkUB+je2%uS7Ij[>+S_\1U-#5FCdc>V^np5B5U&<Zi%
U"\m.,GO^2+-;:JJ#AuV(/%CJ>:%VKvRT(mq/f&2X)p-+u?i:51/osI>^e+ABH^*E
U"_,C\5.TxX*xSQeZR'dH:771m1CDKSpseI'c6B1iV#(+2.8?#r1i&qLuSgvQ[nL)
U"3mm#eoW#2O[G52.gXhdcW#9fpV#i&UqA-FsliF>pXU*i$pPa]AhHjMG7Cn7+&$H
U"15*#gC2UN_2'R_18iYMENYM'y_T$4C([7FFd.<UF6I]o<dk_7[&O(PNn>EVITM0
U"gG9k+M^\H(A5/wme\V;o5PCKQ(?%1QH?a8:&2\]-3e#A6A/7\7:f55mQe*<HfeZ
U"h>LR;pgE9[EUq?IBVhcE<3Q=&2W/,39]IuBO1,_2Du3;r-79E)<8%i[b$pTe['0
U"x=/$A)G+eDP%(ufn2$xN'1,/.WSzIG%CLYRM/G6l-OF,N1FsktH4%k^H&EY+Q+s
U"#vplwJ\w=&nFdHWaDp55r*,gv<8:4rFuIX]Ts4U?Do\Bqqil?R=W1h9PaK,h?2T
U"K3eS;^Hbrt#ALv2r_SiEhiWXjLmFqgHE;O[jAKaRp7X3QXYo^u[nanOLl-/B.K5
U"neLW?#cA8mf+Ju6#hMoZiei4Hm(sqSENJ#I8s)kABI#2B,;&qAk?^7^YkK*I8_K
U"Cv;pIDfX/Aqm(X_?b+X&vn3nA).:P)au8n%(=Z5EKajxr;_)A>mE$i3L$q&[^tY
U"I4F2Ui]<W?PXgJ)ZVSSLX%K2jH_InYEn7AU['7=wYoQknYYq:cX*/r6d4on[hIi
U"xp,0Oybo_$(Ctea6(MP5IK?eqS0Imc,pqXHM[NVw;I_hIotcoxA':uiO3O.$fBd
U"5Wb_DafdC#?//)GKqE7\Ch67a7:=fQ&v/AEMO/x='^?5x]t^ADZb_v**a(<bs(T
U"of,ks.P\ma>k>q7Op;63TXcGa>elZ9Kdqs;Td^c+cKjtdH:bKfa4,k$*b_:2iHH
U"SOr:-($2kfY(v\.e$lRO,vs?6Wp=A;pgM1BS,f:U#7cu:+L[f:f+'#93>RWIWPk
U"omJaacDeVvkbQGSC&=l1./iBh_A9cwCLoG5Gs>-T^MRUon)c5,)jrgPWj6-7R9d
U"eh+NSQG2poJO9tJde>)olVJ%[xqKQo[_g2[QuN7V>o4;b03q;wdRFLZoy(K-am&
U"X_T%ebqdpQ7oN2_8rz'#<'gWWRI/Cq%[zJ8o,jRW47&HGkmY^Y>a(eo6%G-.mQ/
U"bTLAXL]gxQYfCNsj:/hpiMA:OnugZRr)Lnc32/#a2v5)D'U=NG?'6Ib[*O7K1>B
U"]CnR,xFqOS68tE)fdz/b:q3AP+Rg4pyX2:V<-d*1[-5qFSgPpl>Ex6/GGB&o,]R
U"E$n]^NF<CAVA3384UVV82as2J_^a$^E9'bBADf2sGJxX5]_=23Q5WE8gpt1_1n3
U"pLMM_hnTO?1C/&wz6ZL.Wig\)0v<*Dpkk]'i2=XgMiODwP/XL?RLrCk)_R%v(x*
U"o$hFX.u(D4jZAAA>34Xg9ww^#/3Rw9ZQh7u'm)3rL)v3<oefJjXQ:Q5elMULhiX
U"SbG=R%$ZAs#edR.u)=n-/d]kc;FLH.qQM7<i7G)Hk:0*g#d^n:'=eE-5LMd+]t1
U"9vsZ7TIqc(L=[VR)E1tiP0)tjB&xQLVewe?-/H6W&xQ67Aj[Kr-]B,80W36,bbg
U"q%++NkZ-'25Tg:V,e.wY;Vue[Jmu1#=5crh.V+64u4NGvI*c3qenq&j>Mm15hj0
U"fc)#2OD3dx)*c+MQK%/.>byDU<\(HV'vZEorhxbt.'A)=Ws1A*?[r]CFv>d:vT(
U"VpY.4)O>yV2;pyJ'*a.z(u<fv>4jjn%.v*:8>)$pmz>;ZtKlmFDg5x1;?(L+EKh
U"06*ne:f\5f$&V;/ro:.a,z78Z<7VZIDg&qEVzQe[9q5UFK.(T9m7Nn9qU]%9ZUJ
U"f=m3^QMnp*R'EP#?0xa=jF?'Wk+1<Yq?c[M\T1QNvt#EIufo\9TZZx3VQ6z:H3L
U"Fm=x7A*[kNs(9$RRj&,0F-qUxRnMJvDhhoa?Z(gQA=^uM,uF-ggXyxEfC-^8Igp
U"wyTEY1zXSfQ'E^t%EJU_V[=?-?MAL3;)B#o#Yt.ZyjrZCw1ARKp$W/cI>;*&#cd
U")g7rhWK)x7Y\,JiS_X<Qq,4WC/v)_O(#lNP1#-uzbV.K(&dv];*-ORg6DXMMNHy
U"XYC7=OkI*Zl?]k2(=r;(_&Ax2QZ('56W^0fFTg+>1/Lf)bn0ah,yga3u/;oC=IZ
U"ZGA^Dmx0AA5<9]L_as(Nx[$x[^KxZ$?3aFAaMK2rZ:?=)3Iu]0fKk51aYXA%88.
U"1D_$c2(G;KK/1#_UX6MhPt/Z]p9ao8,_waVv:Cc_5*8V*v/Mt?l\M4)Fc*XhXor
U"b9I:AWO77^hvC?6?P-HUIlu#.yfu#./\oLH.aiAI9.37;ZX8^ZavM_sjTK2Fq%j
U"#k[jr#*jrz8X?swNMGmw^62&oGl*%G1_2PV)LY<%7?[?08o6j'JozKYC<OQXO<I
U"EGp&Nl<Ov5oY%TO<)*1[<e_w+OBB?0%C%\yv2AJo$jM9Z(q'-jvz)*d/Ram^g)L
U"Qsnx+=DGa7+ADg6w2*aU+dL0O&^CoKjI^;A8NOv((,us3$:A_9^Vam1CRm8X\B#
U"2)__''uDbY[D55s[,eLvPed>3Y&g1GEIKh'jFn<P*<[8M_Jr+U\.k2CdQMiHw/H
U"A9ONf+'pU+$J)Rgr_p[+qoM\o>v,s+BZ+-JB=ZS'_M__Dw&On^g4rLvoq7.4Y4G
U">0VaxE_om7+SBE5Q_eU3:9/_E0^MbXq*/YE'67/n/g(Y1eRWVCAo&*O/QA33p=8
U"O?8cN^54%smA1'\w([*u.^:5Oi&%vBMQ/t3c=%0dY;+%6r,1osOy#,/rx((T3Y^
U";t&k[[?EE:/WK%,,K/mW\h0zbx-PmIO-RE^\#.m&$LVJ>-*,roA3BE$KdfLDKuQ
U"+_X*qC5aM^;dE'iT+>,d_C7dJeedmOKPfE$T[^L?-D+x(O3B(WY1H7i44Yrvo.K
U")eLJhB0A&5WK(fv3bZ%JV>#JiJ9mV9'Rz]nI[.#bh8IV56J>BqQv*Xz5GFHH9Ke
U"HMq9(-4BXljAbZe%>mmWaKcE2_GkHBil$m:JLHY3>%cR:[8'WooEDfJ)o[bX7EH
U"v7\QWs$=>OIXnS?eXi)oQw^7>xucX%MlBTF^dqftV;Y'Tww^TY1.;X==:>YH/Y$
U"*d^The*aa(ReLp8>lHqap^r^:J8Ok\8Ot+K-?ESD6UJT-,-W_LXL68aw*I,Moe-
U"ae(yl>^Qd1BCQg)lA(u03Xx=?o2Se5g\3g5,mu3.?O;5<n,KllfcTOjxC\3v6%X
U"S?z_cnN2/M(4k&cT7p0X%h?(os7csXSCBZ=Jm27noKaglbZ7;1Al_&AxlHW?gs\
U"?-E7egkajC-+BrAM<I0E*?]k*\$G7LSZ(KZ*_r<E%rC*Ke+5g1fZdb#,s=LJBF3
U"Du-gpqCc1<,E^jV4\i3+^d#G?8VkBq[.dupnPb^dgQ-BE'2oBQg?:QMAQ+CAQqk
U"FI>EN;_WaCX0;wEKQ_Z&I;xlfQ_H$7>CGXDcxx6/%mumgbR]l'E(.GUt3b'CTv0
U"nKm1gIHCAg$0Hn4^G3[>lI<EO/N9RX;l:2c>Sdz]]J7CbGjyHp=5hEsSOSfW/<Z
U"?T-#aQ0cO]+#t)RZ5louAw?53JV#Rr1K]NBq=m%l7L%4[^#up[RK1JCIi\nC(JA
U"IncbA[]qA',5l]X[2Js0]:AaKTHHV/LSTJ_)U?4O<,X=k_O+)9.jw9JA;8J5.H9
U"Z?M(c=2#F,6?BYB&\_7Sy9eT()]i;AUA%jAIDoel_I8J&B*oXkY9TFQ1X)T=8\a
U"*-$+aZ;s_%0%R8dwJfY*$WFpaO257b7/+l2Zwg(K5GTVJDW18^9p#<IG_hYX^eE
U"h:jC+XEc3]](lDW//2ghj(sY^MUgW9gV?A?+7Cq=H7>p;I+GZxY4Da>cLCNs?c:
U"mAqFjq-w:Wq&5RsMgia2\wq)wl,3+-ZxkE+W($)?t;?T7eJ-4;[3x[70xQFM5)u
U"LxGPY=X.i*+T1dX]*Jb8d^B<Sq#s0>0Wou52?Ph=Jihyg:=,Cm3To5gC(a8h3Ig
U"$qq7_jCVHZYL(6I]gll#$q+G^9jR.2S]BIMP*efq7K%vvug#PAIR:7ieH(YDcI2
U"xw;Oe<;dE?8AA)((3unN2C4[#TtnnOAGftPk)Z'0S*dx2$2rTK^IrAA=\3fdnl8
U"_,#CZwU771ABCng&t(2>:egqdl<=_C:dt^j,Y0RC#4m^KSJkd:qILw3&2-e=yk]
U"CREtUnRCRjn%kEsb\QJ:jK5nC)LQ0e3Oj^l3GVR,H-44vaW(:7id6#?UyZU.\V(
U"JSKI^=.Fl-:2K\m:G$bceyMcIS3DVvE9/loSS+o$BI-Ir./22qkoa3dfi92;#9?
U"U)eEijA%/2EX[OYe<(L)YM%1*flJU4&7=elI9B7JMwU]20[+e)))'#a6AYQ>dwF
U"g;8#.]6^O'qu5A4G[0T+?qe\[1u06P71Q^<67qiRT?aC&-YmC7IM,5[T?bB^gOy
U"*JOSv1)$\7?*;1gQ);9ghSxEi<%mmo(#6B9$fIUoRF<1GoA#]/dqScIYGM/c)+f
U"aae[X;5tA'9(WJ#eWS5UYP6:%mj9/?e*4#-t.7#qQ/Kmof,2K52d8dm(]B2*dh]
U"EK^]0n&VR=4F);''rk.;(skho$)g]c#IW;Zg7V0*)'Q*H#S.;Ck1;N=/X)Z3_c/
U"v[^J'qUCSnJ'(9Z*klU?;me&oj7jP0\-*P$KD#nX%2:nqss&)2n8'^3m?D[[Z87
U"e6Ca#Yzjb++gKu'^Enh.uCbkU?a_Y/s:]Y#GfV8,WkBnXHhYrfC66i$=]RrYT6w
U";q/.wKrAegA6a_;AYSo*1JlBD&3EFIh/V\*[D0aQ]V7V(nPQU9B([GxwHx1Wt]5
U"n^vXW1On[JkB:RVG%vk?&.'QIgeUFRFv+W=G+_'Mfjc3/CfeGTn0$b++JC5$wog
U"EE=PK:u0vGR,+N]noGrY''fj]R>T]31MwKw^dROcfPYXkb>cTnmrn>P'qRv;u-7
U"m0#)Bz(8<g,NMFD9<;87*ocO+O,tzCsAGf%q8gr,htG#DJ8,\6ZAK&r\<jzUu.&
U"&WyTp9f7Jti:R%rYd1eM\SoFr-ua[JYF.Y\j4W[bE-;Co*HsZgj)*UBM;Q=YQB)
U"KQ7Ag[H'=iY*BGAKUx#P=Li*ca,*P9Rms[eq<egEq*:^LTJX<sL^uch,/$JJJH^
U"KQ=77Zlj/'O>K=I.,Yi-rtnHJKgE[pXQD;j<&J)2)?9TR62tiJUe?'MEp0h+]xG
U"A[nRl2m;8)[G-S_U+PDeGUjxV[Tph9i^Ue_qae?'H+1]mkHLEC)hgq4YAS-y/MZ
U"6KVSy'ops<;'Dq]M&SRtl0$Tu[umAe<pRdlRcp2nX:0PiIWDKo(YQ,YR5kRAUhM
U"Qg/yD.lJWoZHTYhR>S(tJkEi/<2Qtk2sKJqrTJqdAce=iY32m^q'Gi,0)eVfjp'
U"9&ew[qbSBB:[')8b#pqi/AP'pA'PLJS%);usu+8B7hIIn;O'w78GD-Y+]^%FFc%
U"/zKTKy^OG(SR2/yAo2\Uy3Fkvp(^*9-?zX;cSELrwr-R8:c?ajon5j+:Ws&fuN0
U"*(pgBht'=B8&=(ve)8p'eeMjKeivaO0ZZcOE*-9-N\IG\V*u=:giw25Ck./DPYP
U"/+4*>:MIKX-R/1W5ihl;XBJ7]XS1Nq%w#iu>.#HNGd-jba>+D..Ic\<h/1Y#Xrt
U"OCqMCK/>nSs8Bq4Pn2>#D5[PqwhCq#UO<d*j#d>aDRL\%h]>xB2YCwu=BSA*BC#
U"L)rog^5(E5vYjW%;&<H2b[m?MqHq\o/sx^=P:G\[o/s&%j8aYjfmQpoAAyQST\S
U"IrpgNVV=_Awb,RMx^s;oA+s%^g?_Rw7n_#Y7EO&/%%OYc>)7[nO1f#;3,Ts#w<:
U"\/39[\OiAI#U^91STe3()p/_-&CI7?OV;*Q%<9kQh/Ho):%QIF_oCM3%5&RQI)>
U"h$8-E762oh-eH-4l=(N0n\CIUlAMp03s\H0)F.M]9(&Dk>INvUOt:M'C#8N9:H^
U")76Z11Ov;Im=>qkT[b9+qQ5=p%Ti/+=S5u%nE-B47l5t?+5=#:(RxvequGl#KA=
U"^SS(LCA?-OTN99?=N#*K7/c\EI3joW,%ws]9YZ9q1&.#-t0b=R3#fU/]m+I-6Dt
U"P5')A^1N#>Qh\KX)?S+/D0*4uM'A2aQ4FLYZo8[m<QJf:=21ID0kY/oNre)]29.
U"fBM'<&[LJUJcvuq&7lEY+z0>*,&0E50EMc/Ohih?-YZ3n(Wgs2Ipr9O8a#OD6BI
U"S'%n_'YpMA/;[vBITMi$r5d(p/=ARLG(-sA+jh%lcd)uUJ+L](b_gxw1(U?s*-.
U"\8)u+]='J/:;&j;LX7(*;q>.)/5h/[^A1>:m7[&,6]xG#Lo6=+9+u%D^f4Y&S(i
U"+f/MK\7:V1MgXWl&8PhGn&/5]ae%[eidnn4<nDUYC)U0^U^>feq)?4x)5f>$O[#
U"[vRSqVr,%^(9-_429T:_'Efmggka%U#A-dQ8$L-9*qQ&vV#;?TYY0h<?cOW)Cl;
U"5?)MaO_v5R2r;'OAvV#eVebLW.23c2bZ^Yi\KM/DD8?GlS/WD869^Cg&OEm_m[V
U"b8kH;WxO^:_K$fS6LI>qEw%UGk_1oDp39XJVEg-TY[-8JrlcD&xL[5V*?Arw;j[
U"M#.bAoe93Z1+:C1yw\'nRuj1\Ci(AAdi(T\hG?IA=i(v#I?%z7\N/YM^7O;.lYo
U"e+//mqsw5K&[%Yn:n=*RaP%93U7n/6lLw_]=gO[deBFiPSi\SSA/4Hn/d^;Ba^]
U"&8&8_3M/_X$t.Rg=19&Tuf[7sM&5B7tPSaw2)?&5k6H%DigH[DBl^T;CKTKEMaa
U"6;]JyaS6l^c;/v2'mH$u(HnW/-\,=j^RCel\50B)fZQCM0TJ;Na]u6D\oy_?CWs
U"oq'K60B^Wa\.'Inh0tlo,IBjiQRb'a%%OLSagE0$i-'#G/eL7>WX0uI[m.Mi$-%
U"/nGe%zyoF;)PLl(XdNio3tK?><rwk%Ge9]#K6Aasi9hkCN?iR)TVI6&7]7&'=m2
U";E-p+Ze-ax:p7Al<\$?QbGu:7I.&r=ZJs<+RADk2efI0G<t]M*.VGs1hAf7#RY*
U"\U7Me%>Z/%[/)TeHR4LY%)['Ee.ruQB5/+XBz.dr$]u1m7sG,p:$7+?'Mq_7g&F
U"/Yo7.bb?^,1.l[6Dp4TT+I-47)i7xjbpd-F%%Iv9Co7a$DP/gb_VSkSaNckE-%H
U";F5;/1pAkC3Xjy?_UaqZJk[h7o)m$$ea=Sd)b:3jFN>hT)3?TOuG$2XGj[lwGuL
U"MP'c=)T_/1PVSrcMR8vCJ9W;(p9llCEki0,(jIJh1$K=;qa+B-O=g$#70I;:6Zt
U"6I0c_'1E/f9E<u:#H7iR%4xP[O(XAvGh_5;BMMwtW#F2n=S%x,q/K5c2A>xPqmU
U"Yt\Ilgep]qFEB.x[6k)fsRoKmk82D4El8B<dojYQ,eX?.JKk0lnj4LojmbL[t>8
U"<\^9q5t&Y'Vnt&JDu[mj^kc[fb6CYWF]6tt:rX,-4wa%ck&*?t&*#d_2j<<oNv7
U"75:[t.JGDU^;orH:0B+x3x>i/.ic2([uAWroVdo)aQ<QcWrUng%^f+mp>o?;%(7
U"X[]HlL^#b&[r0?;*5XD(bXZB0ODM)^*93erA)$AtgTeARW[;<C#jB(ke]O?mkBR
U"%)3C9Y<K#ImX/OLGIme2od4dMM5GQ60C?#f7kc?rI+mcfH?^GI-k&N?q(isrZ^C
U"e[blA-X-dF?^VUS+Sw?T>$YUC6MGVCmTTS9aGvHjikpD\EY4^i7HlJS[8v7Vu-n
U"0Xv*?O(A$/j2mk#SsH6h17j71Ds1m\X&xa[0K=7m*)Umy+9%&>.3[H-iOg'YC6X
U"*AXB*IV1KhXj0ejX*)SzZwK>6]^eq]kgkjQo+e%dbAbKNJF(rLa-,)9#l*sGug&
U"rcCy.EXp&?\\:.X2_\0%g8D4^g7g]nQtmj%ug(0%5eU%L%Q:KkssST/Hje^9%Zn
U"52p/_g\#/*s,g]vocR]8(%neSJ+]u6d'k6dq7LeUc-\#:ZI3O>?8y%D2eYDqLbh
U"bW4DO-M>C92UlMRaTkD_,5hmfgcq1MUV&1aDsN&wlVy>u^m?L$CY&:I<C:R:6Pk
U".sHqA;T+=<d^,ne.(mKu1T3yQ,RA5CXZBeaI-k1X/O_G9)yA$&Anwp+4*Xr-<IU
U"ve:Gr^DKrOjS/QE:8*>3n9PQ]rg3%Fg1jAC0&2O?inQ>%;31<5yq'[.J:*+>=uP
U"/Xw-qa>uIm\*i>QAk\mol2F$=#wI\C/W6PBsK0LJRUA(W>r7xAOP$VUwAX/?vO*
U"XntLr_/YD\AAQ/'Aqx>1(9U6NOFLV>HRrrF)Q/PxL(n5Mm(K&BB*BaB4SnQCa3e
U"Na:%uWlyK/Ij%ZgaB[4Q_AQgPB*U;72OcC3IlGncK+XY6BS7,0,EV=PT-RP(91Y
U"aPB=Y&*Wq70=T>YI*O(_r%C^A1ns[o)usqT/aWxmQCIMs[qaC_*J8$#_RIa[$no
U"#6(C_Kl'baSyb-6C+?Jd:#eIbg#)TJb%0b#JbF%S\?](,2akr*j9)/*sB)$_Vu^
U"ht7l%-)c*5aJT/#?[w8IiNT42'9&fRe-MxUXYG+VR3-zAg<_D8QsMG4x4Y4BSz^
U"Dc='7-\Q7(>53/z]2l,T[<-zAf04oP?tjYrX*4#wO.;vX-^s%?UlXCfG-G=EO.*
U"HTD$+$h:/?Frn.qJ7I;UWZ1hYn)Am9dsJ.gk7y0\,i-4r;\(Iu.M/aB^rQj*cR;
U"K_1a,[9*s^X5a6P#suiie(ivZ-1Y=,JQ/87[]+2f;62kcC#bfCM9:OCqOp/?\=_
U"g9.WC[u/PVekEIO7RH;^Y98:k[-=%HXy.1o6M/._*HRkuRx8'ok$(Ed*RChhpd_
U"n:LRCJxrg4%)BKgE#P=&sm-Iiqy'+UIKmm$6,7NL1nKSTxG+gQ?Y\Gq/UHh8sFu
U"5(7Ut_u;#w't\ZTXfZH)X'5QPEaRB(=cmEJ>N&L[;7;gUAn-97u)L0ldGmZ8Gpv
U"'3gI#*OYCX;EKY1E4Dax.Bvo\ndV6B3FX;60dn]WKIjbe(1di5\.5%rOHoK52<F
U"40#jtESiZH^\#Vh[LBnncKj[+6+K\L+pkkJsJWGAp#zD5WRa=jTKwWE=L(\r(Wm
U"YkX[_5H^E>m85S5HF/>vz4pDe>4F_,IZ<pZWI\07YlUe7_WNI[HVe5w^tk<VCVe
U"FomKt-[.<Y<l-;lr?cWgKoTFToyIcoI+F9PIjsxMR=9^XX/_P,uA[]VJj*wE+v)
U"<4f+q1;iemkdByf/h$L$LA$N6X#f8hCjmI5$i;o<_CM%/i?B:bea#]?-=sK+BUv
U"oRe'TPKhFetI7'V(RqCkD>d+,bxqtUDCgoooJ/Ye\:J#[s;81s8YGXRokfnd8KI
U"e$RdtCF89ePa/A$n%^K9E,$+N8vA&m1?m\YgInAiMZsHj8A=b(%np<-D8LI\9+w
U"KO)x+2nJJA8p;K$Ol$Kg<*3U2-iLcQ5>+I5-3b)5-U9cfiCW/I;JgU_26Y<'F%G
U"^Ybg9N8WhrF]vO_cG4/O4hp%Y^?,IO=hpg+1]jqU+Pp?^eXJ0,82J]YcU__7L^+
U"APY4TRbhe[R-%1#mE_VF0+KC#*2y/=8:*yqD(uTk)8yE3&(zCHu4*iFeR:elU#(
U"zeW.*%mu%Q%+D)S'e?&Y*%>#vQ%k%%c/Tc=Aftd>^oi16GP4)[W+eT.QmmAe*xf
U"1i();FKLF3&yI1+23hx9(kp7+B*Z26):?3:QUOc&T[u:<(RdP3jz/U'=xKbhDFp
U"H<=r8R?LIdQ<C2ao$K&.5(:Xt.OKS%wg)O<%M2i7A4[5eUY/rX.;V+&&'*,G6JE
U"i]=#'Zb$W19$\aCSjpGk()4hgCyurECxkj:2*/3:,5MHd[yLU*4OM]S>x&2NbwI
U"Bg?#1<SLE=FC($=*5cTm:^x<+5.LsKm^'FaN$V0\N5KGZU0c:TuEPx[bY/(**i-
U"2yDV/,*q9c&T6E;P'vW>A08N#axEamMTc-UhyTeW2qt\zJx6Mp9mw9SO)[Mz9-e
U"b;UgNgTyE:VG)*9o8xFDK;JCI4zH'v*.4:S_tpag>inXy_bR7,Tc2:?YQ]FaS<#
U"AdkJ:6EU]$X8n_;1;Wg5D/qluWANS]K,1$xj0lB\365(4Xgln?[)l,LD7-mZgGG
U"[7r*PEfmd)nD3uY)TEL+U[fGG[7j*K/Ro+s=EHS2Q9ASX9RV,U:2K6>]C]Y&u1e
U"H8AF1n(%+S#6d-Eo9MnJG-4S[5SgF^80nW9^7fE6<MF)Jq-1($l;T'&>Z&FS+U-
U"*4-T2uUl4Vd_?L2mf;Yx.\p\-y(=_Pg+e,Cb%FHddKu/;N\*4<pG_9L8b^HoSU)
END SUB
SUB V5
U"<.H-3Px%FK9a6TE:t[A\/:\qtappU^rDaS6CV0bgE^YcN<4C7Uk*-:ta_7y-rFu
U"v#\R#<l2H8x[qm%'Z$BgN2M6FmFlW7Ue?IQ2tr0<S.YKU83d=FUVg^F#9H0\Cch
U"Bn_tbd%X3E3Bt1l>MH%u<vN'?>DqW%KkuHb*V&KnX>>jg$0[%-N;BQU>bJ(rk_I
U"PB\CDarkEfMZvS.Fp<.G=W>+JqPctYCje#:$?gV144]K6l\C'\mNp[qHUNerlWA
U"nfigE<(,\4n%B?3Q9Bq#r3FkL4>P-3v0^VBuA>3kL_$kz\GhfIi&tH?aZHHV4dq
U"VAd11UlEtl3e]mR6W>g\b.+ShVQMHe6KuKZUYU*lZ&U;c:\:3[cqGAK$gwR4*'#
U"wNWlL%H.x?u)WXdC'mLWE5-4'Kn3dNhx9QxKs+Q,][/Sc-zX1D,T^P'7K^z&5e:
U"p#m<tP7:(gl6xWE?h$lojoiofK7hg4-[IC5O'C0G*_9E)nn5g7h:#kbzRahVm^&
U"MUH>gK-bSJR&DDF4RnRFj(L>wxrWa?tuuIwa?otsbG9V[=QYBj_c/)xD9YRe;>z
U"ppm*^#,xZ_EracW3-^ksp]mqex[+WgD%8AyL6hcSTDfV<,_=BhG?j%OW4yu]M//
U"WQh5Al$FeAke>Hh_ntV+iV<.APiA=8+FtbITDDj]pR<(NoKP?-pYtspDXa[Y8aV
U"Vg5E3SP/,:+;k5xBN,XYwamp#R4Hn,YTt,ZRKTgmEUCbm;>,M)_wOuF66/)<h8)
U"G,hj#9$?nD<8P[rO=bpB9jb0Uog(TW[ljrH=LaXS6tQ#55GeU8.7HGJFlXVD)tR
U"XmrjH$NAI7>a&,n',HJJrm]HV;O;<^]qL(TWbhCV*^Jwz[;8r:Ves#kP'CBaN>>
U"MBMJ>k3%XlHM4=OhYd9e-lvN2g)6I?A2;^gAJe=mTX]]B\xCq*gIYd-=\*0fe);
U"(J>O_2[7HXgW7k5D$Lsu+V/FrEwxQ*Z&W,bLRU\U4>V7]bjAZCeqkjsh)EjVJLK
U"rxNBq%eV0(RK$ce\RURrJ.>]AV[8b-fV_:iro;5ztkbM*Hr5+;cZ>2++UN7cds?
U"DJ:w2ZnJt.Yn6-=c+k:l8<f;lZDY=H9QDtI-;7/eWIP_MIu[6f?97CnWseo-^3N
U"$J,i3LHBVsV<:)/ti<(q2DnXN97T$q,1Oi]hrB:7MFM?Z$k5<a'jnld_M5T9P<x
U"q&R>xjUv1>2qz#=Mp'TWkN)m9;lL03X*6A(O#s=bBHA%WGcUAs=6TTnrdMfReTb
U"=f-/W7Xp+')<)\iP.=6aG<Wk#.xxY5966YvP)hUdpAbI*8a./DI?X,VfBcWBhu6
U"XTN-=a3Gds*0&Ev/xO?,h52)ZjQ?d5+d1^ur9hagT6pw/NSOkpzTk4f_3P1NMvI
U"?:C#;_9_IsPCTo/(LyNLW(b'?.RRJ9:gr)jTKbmDK6XuMy:*gLI)Xf9bbNQZaOY
U"O8eINS,vSBz6,9fN$qpUJe;smEDh,czc?hy\;OyRDm)2(.u4QKGnr=At[Cg74?S
U"NOzOy6sW=prE>j*&F+AqRb++JMJv81DH%uHMFc(k'pG/:'2bR0BHS[i.Yt30f<h
U"B?TB$39RlFN.j2O>j\#^$k>ZpFixklZCo0P^IE_#[HVct/&$nRkqxt95$#JtJRW
U"]8=3TwsCF,>b;)[F[E*g6+H&TeAia><mtFx?b;aJkTbNdFNfJjlXixDELXo0Tz2
U"0XiBI66;6Tr#T2m&hwPL(b.kfqtdQH8u^9_RwbM1)OSu$BCZ)S>\8X50wIMPodl
U"\)4zZJRdVP6[4h]PoKMvORUQ+K_$cNEq26RR\EKb=#<prX/YL9Q#zi]%OXE[3&s
U"bp'QJ?_M;jW2yLNZQ9IhuXmD=rLTs)reB'n#yKNK]:gFwbp10+6*C-EB':WbGIg
U"onugD]hULl=j1H0Yx/7#dW_$a7x*Xaj+Ny_O)J>,4yH-?/>X_1[/?nP/TUluIEw
U"6C<ChU*X2[gY7Inf5&enw9*R5x.8DK4y[Kn71SMn,(RfZ:Nh$$3/Q=\;XIGxS:h
U"c5PAaEV)nFmgy\0n$wE4.^#5E%ifk^F8o+[AjW/*T?Dw8B>',Sq2PTJ.6X02=&2
U"'9*#sFgy]ZpOX0fR.>Wr7?<d_:SK-.j3IT'j)J6%UeFFl=&GD8hX*b-5(G:kkax
U"Pg=m4RiocGHyKVa]_ZD]e92YdTP;Q;1r))7FX1EfU'?j8YulSc.amdOhV0Gk>]'
U"0(8rN#y>wjH,W65<RYxt&QWJ+^DO.bTt]Aq$+[B[5e0ce<+omQ>i56w*Wc8GBYk
U"iHbe0F)=jAx_$s$Wo5VkUm;ahUyAsakH08L>xlD$w^Y7k]d(WS$G7a^YRa,n^iq
U"Ie&X*?c-)ZdMh+.mJs;,RPeT+w)ZulKu_Wr+eaiHK90$/<Oje1P_QB5*kY^KMH0
U"jbb]eSkW)t,q$Y?G0/YTE,[e.>&hzzA:dB$#M&)iy]Y2jQNKELlAtbRmLH>889%
U"%sutcQK%IfCXoDSl18&?>DsS;ME;M8ba&Fo+Q<F<D*,W>e_9KnSQ:.mpBcG?B+7
U"^7;rp?:P>2ij?x)h;8RD=8.BsX]lZ[EH1iN0]K(_AHpYfkR:Y]$ouP:')[DLp?h
U"tT3'3A^XA2U]Pn4G4G*EVoOOlXO/q3'ts$0IR(^,.HD5u8#L%e<7(#,'I3,o<sb
U"A_:>f+.dLe0F]NF/lJvbT+1FMywT0It[vRSXt73AfEyEmeph$UYt;IB]ps&OgB9
U"FSf)+3V&VNq*2:l>cX+2YBrB7iKtf*k0oZ-/BfWmz/oWpBEH,PAYiTra5vra^Ur
U"CnlFGQucSEPm8XI8-JA)F\AKqw>U.w:d3Q^LeoW_^71..9rWNLZWiJ8YXioju?o
U")Bq[v+#kJ*_+]?JFvM>c:3.%qLj,tUghg^*p<(Dpgj51(J97GZ(c4qvI#4022Xk
U".Ym;:.CI>0Zi7S9.^hxw80qLq??KKb28JnL$9O38w0E?y8'lMeZ?Xgwqaj3g^/5
U"#<Z=tfS+'i2f.Q,L;ngCPZOS7Nj?:11xVUhKufdYpSWskCixN9777d<;f6_(PWD
U"<+)x$zE[QOiEYBgY-<iNHkV(IiUv/_R6'=w3g1yUH\UT4(912X(EZzCKqZ*TAW7
U"6;va4Z#9gVR>q+=d=cJphWeb;Z07HQbYcDblo'R['TnsrE/VVe[At7JI&/-AS=x
U"MSl3ROWsKU-mrei#cXJxg>/trH7aQu)cu>uOX/sc^i<-?ZSo>VSqkLX'SRlg:&t
U"ma-HeiwORc_qY_9A1GNiaH#;Ex$WP'd,mY;bQ4uM;Qec1gh_%B#DM?e\4Cj?k2R
U"6mnu23-2^>s*Q(;ic-5a6UsMAaw?Zdh?Z)7][3[p;tFQA5ln81I%iCTMkLL:r.E
U"M1k.'7i3)6G+7?,p6CBeWD;4>'Yw-2jDe4i(f/2y>,(_Es*LH<2ST8WRX[^-D=v
U"I75pCTWW'U4WDNTtku9X+[b_#)UP#7DPL:HbVjjl3ZKJqEXp(R2wpSMGn7CC(,p
U"TA*\a2IcpR;Fl#m]eSwFKDYpW$N\PO'-^]z6\L(uD;Lbou<vM>6P-e%2taO7BDs
U"P(SiO9IuB/-uPlhedgX)iCSk/UN[DRrq\<Pa<qy^ARL%uL'G*S]q7b6\vL7f8Xb
U"0PxFBn>tC($XL#(m(WFmUW#sr%Xo\;;8db3?$3rI;u33s?a*#?0VLmLpbWe\5Zw
U"qgq(X:=:R[5KQ4;1^c$z=hm<;G0p3d]RA,\eby+,fGJUG%^7*Q_(7<EWL92H5h0
U"Z$NNKfXx'-5-H&;>JUn]mRJrkun]$FA=(gi3cYd8BQ#^*C+O15'RZpS*WOL)Bp5
U"JC5Xm(ENEM\kUfk5UJo=-5^B%82L:H9bE7L&>92OAHX(V#gRX?:5A/;[N==24KD
U"c,7R+G2:r$24RLnWw3?$S]5G*jW\?CL0oENcCe5;t9.W(6r'*H>9Knu\ro+em>0
U"p%P]bp1B+$eP:W]0mY+IMO23EJIIdfaf'g*Dc>**fNYYM5Ozr[Fvq-(NBd?Dig8
U"bsFQbB\S6&F(0(xO;Ua+QV4+pR\+nTc^,p,v.E]2p=o*5-44>M5/Je('$:a75fE
U"jjO6fCa9#-O+1kM_HbdU%[kNRQskcEQ)<X%)1h[4od7/KN=3RM.]lpN8U9&$o-?
U"7v4?6/Pm0WIFJ-W6B3W&;ogEXCVh81pWu.0t<,c[7EI?[aygL[W)UjQm)BER9GF
U"21fT[wx3k8'X$C;(QVD#1<lXkH6eEe#nUkN7MoC/hah'K1huOFD1B+K2mC\yW><
U"m<QRWf<dCDYouuZ4/-#Ax\#Kq,9bZhc%hY.oR_u32t\ehN78dnApT&oR1LK%G0?
U"eG;bYeh$<-7A\I?+m9#oD4Lm=y(gBbpi4kS<H)D&<6bxWkUE[:4D2E\?3)tx_DJ
U".f?QRK[uWh5_#3B$eK14dW0$BJCVI\Jf<&#VS[Xl<CAtaFl/VB?#1n/Vt>DQ;MD
U"Cy5&Y:V(_GNw;)h2kwo9.4D\Sfs52+l&E8SK&BTJeu/aV\mYvIEEOE_Eo2qr(LE
U"VR0if7pL5g/SmkSb$$S,M-ER,Q*$gqMi72fj$GF*F7Gu4epLRFPBcS3G-kj[^-+
U"N5MO-gAPFPY48S''nq9D1X=k+v^0DP3fw;\I6v8:L9;M)%4;Z(V,;.a=E=H3Rk0
U"j4v4sJE*w2?#r<]m4PLD0'njaC;ZiG87ZR#EiS'oh1iP\j[p?0bngvd*HIp[GkC
U"Fi5_W\*k8ujpn%mVb/(=<[B14j[QN<kaqY1Dpk''&CVN.;m69;'v]#6J9Kq5e$:
U"tvW=E-AtQ60'Uc3p,N_FkegOpl:$M7HEi2\f=<w1Hd6#PGhk2%?r'bxUR=<6e0;
U"KE3m5K.&np7Xi<f#<AF$u3/M[KgM/jeKm6cj$ZZor+UhQ%-S<Y.'U7ST]E%GiFs
U"r8G3<=%R#7fKdSopr82dZ8*%4.'6t$eY's<J<&UHJir'K,FxmZH*3xXQk/FMqoe
U"MPnnKJKD#8$_0<xrSjGru+$+Y06O_h\<S;:HM2d)Oo)[4RYP(\'o\U%01hy[qij
U"m>7SSZn3U':CZn;XeB4)O\y%paP9jXLFn^ahNB$)u_PEU]O9(naZ*)4Iwz>g\jj
U"cWA^7>4Wae-WaasGq5$,0>Y4okXEjRQ>SsAa%ITBnhpk_5IgaO48W1#h84PF2_/
U">W2>yu00a0kW>?7b1gij\J3M$0x;#1WzE'H#d>sl=#iC\yAO#GDkK)G>1_>e<na
U"kqj0Fp66gHJ;]fs_%Wa8hPB.]nk/d/MtwqB*[Fr#rU6]?GUqEHLkpB=f6B5jDT4
U"P05noo#8.ZSP)oJ7Rc)X=,R;AS:-BA$Cno*0p3yK^EBQ^3sB%fB11:U^$MbVVho
U"KdNTF_L'h\_;KIr&=PFfE_ps#=U;,3:lf9><F_9s2'5SlgYZdN.*M%G.cp#W$Jh
U"bDUrfJBrIsD5lmwjkr9$=/=]XDK#I5lbMfQW%25X.RqU.Axle&9S8//-]J-m)O]
U"97-1Xb()RQ)7Hb+oE1F([Ip_i5F/Wq;/.9QBaV_OxXhi8j>'-bxnCvZiG;hX7EA
U"TwIYN_$a7VT(g[ME$9;m>0WIV'kJeYx*Ia/Y%v_R9?*\(ndBOND'?O(JkNv/2*h
U"b\+ib&.-gxG<Rvs7Pc^f[,q;Gk]P=;.'DHo81J6;TfMChLm9MI:hZkukPW:h-6=
U";Y2V2H*S.JELpsx9tY_TiW0[HxM:\re_x&2l1erQ,a7JR:p\NVTeCL<A_g3Q,Qv
U"6UK,iYX#+(%?ijvdrp$emp1CQG%Mk&(i>9J.u>Xtp'0R:)/PF=,l_8&lDK[o/(D
U"GCbQ:4ZI5y[2l3bY]3[CgQ7CAniMEddGI[)L24%)$k0u>ZA_u3Y\3:Jekl%7[%k
U"e?gAmOO<B%Au2Ge)Eeo1jC/B+plOwJpM;-8GvX9eQ[tRD*KUnC%SF(iSsJYCU5o
U"I4K=eN[nr9CK//YoPXEZC+B6.4t[g,)&42Qo^w3hS.aUe\1?^RE,WE>8ECjuZ8O
U"ZD&-fjMYrbo5B1_H2S2m-c\'S4(pL_9aT2_%Iy<WE)A&BJ)hS/EMk]b]+#%MWJl
U"ohH)jXanDL<t5Z#&6\HZ'+G2N:H^Kcs4fg_'>w>Q6L4g5FHih8qn&H:kF0#vTu=
U"eZ4;nS;\[ir42Xim99.IR3i:Xq?5_s\Tdx[iouT$_*Ywb1=$^[*DJ6Qc5#9ZQsH
U"*QL?#gvPmZ*iCa#/[ZeT1M<-j4:e*n'i9rTwn2;FQJWzZb'bUS2]LsW_\gtT4L]
U"E=WXgq4rF%CJTT>ZTEt>/dVhe[hU/7buZQC<:[aZ8/+#SYc-amq7M9COL;T>%X/
U"XpK+]M%SUD]Z_03lQu7$=Os\h&9^C8oMKW>R(L+Q<+&YE9SVVbf^HU%i)$8d1mC
U"eWM]G3[52;MP]YCJ*-I7Xf,.;3-)Q-5Cu^c<D8%.%C,OT[A>8AOfJl79ThMajW-
U"/f\G?5HJ+no2+L5nj80r6JL2bCK1=_nUL,U0<2*3'x&G9nE\OgZ767R7tV1hQz1
U"=hg:I)nQDa0BPb7a_Ke)vC-d&SZpe>CG_wEVQZJ1Wq$yB'Dz7u*:o,_r#YL,8eE
U"7?WGA#7y5=I;a#tyF9cOqpEO_4E1a\$&2MO#UnOK;]Hi7Y?-;WINWmvXA7mcd+4
U"+b.HYQm4BWWJVZ]Fv_eib$C-J_rsKkk\G8BHCk<ZV5V*Lf2rTEI'v.FuwTG<)aZ
U">efX61\1KKG/B]*C;oZa$\Bb&CQ#UXW9O_Em.&F7X*a3k%1t&R1di8-BXx]U2TO
U"UL%)YqK;<FiH*=#oe3LSO;,(li&f>gcq/X'a&7rA/&#r<'i]+a8=+OQR&&\.nC/
U"V&<GswwAl.1nOkV[h3+B.h6T8r_Vdhl63?PMXUq::\i[1[V2ICz3Ic&h>Fumlk?
U";B>Qwa#vy=<VCx,g]=[JSL7+ai_gGlX1-1*+EbY;n7wX:i(O#0\QH+(DXb&HiBA
U"i7d8A<MKt:6;2'\hqK4>2XVp>simP\BW?l;*<k3J_sEXl*?1LgbDs69I1wBIavs
U"U(\F7R=k4g6Qmm)hkxh=%X9,YRyVHO\51pp1'A4++Y7kn1#e[.A7C.7T34I?^S-
U"E<#P&rkbi_nJ#Qu)7O^K:=DV6'iIrcPuCM%os_Oe5Q;'\&6YTTSGC6$-o*6\?ZN
U"ltoW+Fjj>3:9&]IMSvWm;5eXf97>WfA#r:9^Pjk#r3*R=oP_R<)5W++ioJ/)[CC
U"dO8)uh]7mKcFX_2n:l#&t7)i.nn&kW1.Ac(D(Bb\cDg^\&7qMDM5>u$\n+dCT3j
U"GJK2>94pLn\rd4lJKG4T>S*.o+bkC\MQSTN^6:l5d^)T;m5tm+ztU=3^Tzi%AXX
U"<'QobIW=DF/V[4q)#q#FAY+c3Q0AhG*[P+bK42:4rMhOqf[iyj8GBO<(]BlFIEx
U"Rl8_AhBgM2'x$A=;CD9WG>ZaBqi7L8Vkj>O5t5$+O=0OYj/'Ecgt55/=t^K1P%R
U">.EuT3wYpW'E>T\aIwj$4UJJgr'<qdQOYB%1w1D%,):J%ikKK5AexJmbjl:+l5%
U")f7xMu1-Wc%WhZOqMA?<2P58S3GIjEKBsUEKYCY#erkW&/+,;<PF-7bm(Lm9Ie1
U"3;?;*u3BogEXRR]q8SstEB3,3q=;iv\m-#7AM[:L1?5RtGqgtq-=Ieqe?d[X#b0
U"ksTl>UCm]EJjhxPC*[N.Hs+hYni:Y7-AE+j>QpuwR7AKk2wwTh33lw>G(+ken6;
U"9,;w\DA<G'Y81BO;Q%pHZ;]:iWjDoYP2J0ios^i\*,#>[;(5w,3Q:g*ZqESdMli
U"JU(7OfVbwB7iJTk4J]k(j3p6.N/O<'3WfiA1Tw]'b.v[^iA4SDYWnK%sCNF7OI(
U"=3gy/c\Gip/$MdccHCiGuOqF1_PkLCru;+4q0XaFF<Iug7=+'45mue&:+SL0P^W
U"KOl83[fSFIXf76TC03GkJMzN0<5.[izf.#L0nE0R51a&NleI:9e-9b,=U>A3xF0
U"ph4.q:+32J2xSD\75=G8:B.Bo(3&opr3j)G-$)*JBla_mF,;?4;_SnR6k6^*.I_
U"m8VU34QIZ;ZU\D+j)85UPJS#n3T8&:)FQ%*mo&B=fjXWf3ZF=WL1=.Og,M:uoTe
U"0,HQ,bbitGuj]qtkutAjjV\k4+Q[SX?Z&#QY%ekPS34,8s][r>l%pK,e]rId1K6
U"j%KU/vD4jXz\x1.EM//+6[GdABm#hqE&XwWuWW=Ajp$M]&>L5BdlWIf5#6qeHmx
U"%LWV7CS$G-K/S&>;UU_O44kUj)gN3#]ym*$X'$,xQo6DoHJofjb/<[fc8a.+YN)
U"4YfvJ#XRWoM(]2'(UoV6*EOK)d_Hg?dj/7a#feHC%QD)Yirw^C$#s-I.2YM<Xt:
U"YJ/9ToVj=bH5'986yJ],7uZS%lF#YK.j$vP.>s;BAEQ;2s?7[H=q.[[R-gQ+I%6
U"j'*_g84QBG$qGh,OSyp1G17h.X,+MM+c7S;s>KQ87N^lCn53wB)68J*4G_Qql6j
U"Ed2G=Z>$3dfjBOG;k5;/nJSPTbA]:Vh._Q2WUCv<YkjZm=urE79)X1WbE0>Gs8w
U"M*\3T)kvM2yl#'mDP]Du#yEo\;+&=RsG1fH+[bOf?P[;6ksa([MHNBD]B7pA=C;
U"Ij#VrE+[pe(k3]WJ]%Q\AR0'e019Zt&&#<F#Ys*m>\<9sA0Y-6-\MxiL;<[cZ\>
U"s-DV<kf]<^g.V<a7r035RYfZia#3hc^lTD9gIgIV;^-UJyA+t]xr__tN1<lknq9
U"7aZk3^wtza6Yu^Jg9wtPpCxtdnaKJSA'Pe&U(bP%L.RredxAE$ltA*'-'SyM])i
U"kFxGNd[x0M<CR9xTcUfq/H,byVu-15j;r#agQ\1j#S*8t[_]uo70I31A/JGDYKM
U"]=6mAcKJRM2(G(9dCY[3<lOHT/[T%$'lt>3iR]S^X'I'?6QQB#HNWArvl3)cR?\
U"7HWQJcfmu[19DIQZf)$be6?$fIuf3i&3WtF#R&F#8hmN_IAx'&..NUM+jE30&.v
U"=JON2L-h&?2C,eMeF:JPB:K*+*Z01y=.Blmk9A#e2bHlbGy]ks)k]M65)M'>D+1
U"v<:BOKL:gU1PfH/gq+;;nBIw+F]wJfUBTd&mhEh,NaMORRfq))X;'R.oX&yJYQ7
U"PVbl>afEB#+B[&?;:#obl&Ie&r$.X&F(7m%2(XeO_IXCvXNe\*uQuaDW*VFeeI$
U"Fo$,#tAnRJ&Fm%e4W7.+Y$nFx/Y5ok5IUW)q:p4GXO;-Nioe.80V%/IhzRJblLy
U"[t77^LR/00I[EbO-5fPoEOg\gX,YBd'5nheRyfW5o9=XQ1e,AJ0'M>7n$\>PYCZ
U"A]XKk_\H5Z6HTl$WW*MdR>+<>#/Ki7x-E2a\$n62]f>Q+=uXlVEe&HD.priV56#
U"TCb_b>nKk.S4aN^wl/f/X8DXT6>g6'$PzngB#3R#Fzv]ed,iYe(sXk/8kEnQD.-
U"bBK9&Wu:J_E)o7Rl.0Ly^.w:dfD'c1:ECUUyLY$cXm5wb]2e&e9h4cjQ$A0c)f)
U"SJ,50&T5\noboM3UD;JaLbR'r=ClEm3'0Y7Y?bK)K97AJWPKfc's[GiKy[qjyt=
U"5T'uqjmB>FeCHT=-%gR/en7rZ180cH#.yq=?/]AY&4mkG?irZeUouqWQZ<XXAob
U"sFI5cZ*t_E;M__WWtJ*cMAanqi\8?iqMXP)?4^fq9<qM7RG0n:=DGK-FV;sSiV^
U"$9B;$)cqY\aIMC_Qrs#?V76X,i%J7FR?7UIIIuq$q*\%%gcwn4=Iom,Rry/0aG[
U"'d'?1YAN-grC9m%\'5(YNGgjIoA#je2^t[j)C0)=8UhW;O%k*Ic#M827]+sGL&]
U"w?&/Cc[&m2h9qgHoh?Pv;=/%wg6%KFWI1e2?.U*YIqS/4Hh4N^A9S1;13n(.cf:
U"eWrSE9Gq/n1G42V%/pO_>xUG&UnpNr[m?IBg)Td-,S;wcUgcea-;RQVFBOuQgP1
U"<Ze/>jVWf+7W4HjKy[4Pq?WlWi[KB3vaN;TW'gE#STJp=bl2_)1[QJ.k?^9OGhO
U"9&>)E/tA;XAD*;kk;r+VpaAh.JA9jD'd15MJpr#U]:,rHZ?.XQCp[be<g.1%M?*
U"#IL:D$h4X\,l.>s\)U13$Gi5X](UK>L09MIK1.\29jgn[<7REe1CQtXs%V5s#^t
U"qBJPG-pO0B?.6R,O#cdSl)g0A73Os?IK9um'*JNCxtXEEr68Um+gjB1vwg.v^t8
U"b(2A/>c,1*,]/Yy1^\wA\-s^lGKe6xcMka^6el(^<:uCF6?E)\=&<Ej+G4BJ'*9
U"XG#]>M)5%m0f%)k)Iq2K.lM0(V1A'11=Nb8QR&4(v6Kr3(Vjk)Bd+o/mXC_f2'o
U"1mRbdf'e3Biy<#1mGBkLcYl?^i^Kk1is?P5]MJqIt=at.l-aF#7NIRkR,ciAy]6
U"aVpcYPX-<I(r3T>k?/m]QN8>1HdBLWM+?$.[5ef\Wd1kejRm^CwBO$>as^5bk/x
U"1Ze]vVH,eWHidV0v&DHwO_G;uoE;4twu0DXKp0prX=X89lCyrc*f*i8Hr8FNh/.
U"Vw[qj:u/l'on\ciabHBfhXAiMiXg)PEnj-Y%QR1r0Ag76ALp):Vh/Acnomj&qWq
U"EEq1wDGJT)edVAmS0[tKqXNk5]X&\J+lVi;.X3Vh1GY=AGaPH%ToN93//,hP<ua
U"1PuBtG5B89#pMAk(_0$?WQJ6IVIRNo<e)EQ<91?\e\w$c=Vig9io%tKRRo\'F5y
U"^c?A'Dk[AwJho9V'W,5;$^>O\&)38P,2FP/$3T7(HA,jLY)j,JpArS=4qbj5k;s
U"tbjRRrC#W8ICxC=c&]0>rsC6hLR-S[w;M.;uG^AbTprdIDXA>P=%7YAcjx%H6^o
U"T?V674b\wZ&0J1ZV]3,?S;A;CR:vgGknWb?rZ<?.HKJuPEH7[BFVMxUK9BhaXDa
U"?[K+q\*S/.bZ\nN7Ac?bk\syatX+g\-/YOwlInEYU1.(?&eB\'KDO00]$Z$Tp>k
U"/:UEJIVrc*Z$Jv,l[9a6_EhZ/:/EqpG/:n*wcJlMUs?KM$8-GY?Y8MWrgEuuC&b
U"GJdP&=k+1?Xo7.O1,#\YdSf3d::CyVT5/:T4kP%saA^Fpm7yZ8yW.(&h%Vvrtqq
U")+C%/#KA==)XcOyLDw\%^y\5?\'RdzXyXJr;xwh9u%5SBJ.wS/k.*/q?][[SQ=i
U"gDyrROBSEw&5mlZ#vZbv<c=-z(R9bM??M$HMdd'AZ-:W$_CankVNss]Q7VZKUj,
U"#eiQWhJ9WbRVDxzJD6R[T(iJ=VP\bAsP/+SlPuCg4[N?_o7CyvC&ak=F>&CD1mA
U"ehyrJiwfpao&g*aYf=k(IDkZ]j\ANUq,wE<8QMgMw2NR_Tr;tO$.%s2%JCp6be>
U"?HJX9d^NDvdC$N<Yivl)=e(+_<Akkti:[?6xbJSmg+RJfJ$.lOC6Svjy6H.BFcu
U"iG+c(=Rq'/v^BDKo?1gRBAqM?,HtV<pQU(4\,D\A6cr#+DlSW(eiXUA<qgYaX,A
U"f&p#B9UQq<8AQ:lHZ3XUVS^kg_13/XEj+gDj90)s=Xf#ifTALg8,cmJ7:ERN0Rl
U"D$VMhtE0nqW<FhSVU3aeOoNJu-,$J)g$*.85;Ypwl^Th:m^Vqoenr'j$XjDr]vi
U"doNq+ixYInaGx-,lx4\kUm^7Tlt%I9xEX6Vp;H-'bDsRiTokJOdmjNY)J8[?Bwb
U"\89kuhgvfm8:z5$.-9T6qDR])Md6Y&MXfN95:TE.I&RCw'n0FW]]/=W'+2S=U;R
U"u)3C?\,)Kdef%fIFK\gfR](JoPBI1[7>)3fCozM^lQug)?R/=S($%]76YMR5dMe
U"(*Hl^Q1PP%#ay1iECO2i3w:g6OY*fxdJqua%aGKp;fTB_bxD=-<f4Iy&fNKHRDD
U"wb,e#fPOJp,lOqeW9.M4k-mYRH7/vrHROvN+'lRRiD>>dsskL#Ui7N^8-\.6(GY
U"RHW+lNZjVJt:MHbLQ67mXKEPm3c,DD[Eh*&aZ^F_K'bq^Sx^uHnYx49+PsEDKM,
U"nL=1N:%BJXT6RXks1=&ST8Gvq,9;Lw;uux]BZwo;L]iNO>kXZTLtX,YTj5tjhYp
U"3fg3LetQ]TFL;:;wfOVJiD#3SkKI[H>z?N-8<_K2FxSn.Fj\>Hqn6Id.Wn=]msA
U"ddxaPiZVq-Qr]\k]<tP[[L6b;uqfC?W(\k5%sUH$5r5pHKj8E8UIMiJQqN^,7)d
U"afEuIM>ag&HRVtB3a)(g<8c0U4A.3NnvgNEV%WajA\GEpdRi.k>3fI\I*qo>uJU
U"\Xaj,klrY32>o%KN\i>qp>eGbL<PsOKbKbPG7h)jfgL7Kbl<16XK'NnHeXuV_af
U"JF$XIrk>)M7:vwX\DYYXqp;y(\A<u9XqDm7C92#_H#rS3[7l?%GD8CF8UerTajI
U"K[Z0e<$Y&iv^*)4$K.FndC8_y$+MGsbmBgg[:^FajD85on47U\8U$%Y=lN74qsg
U"6KK582KbU&kaS$_PMfsX4*Fc;>u=B+Vl&K3m>Wt+1$AauDMpxbN]Wl#^lULt2dM
U"hURG[10:V^rEQCb:x5)$GR\60Ydg_7zCAWQre#YXQXKTsv:K'-iDM\AjujX1Et/
U"1,##maE0:hC<8O^^,X0f63b>h<zr1t\f#]0b1]_5%=3uS=Xawg;L>mkcLh+X\SS
U"'(bx$<T7JCQ6-1NlHGSM<ulG(5Ahw;cVGB:G8OIWMQ2EjIby3jB[s,Slj[+*,YH
U",4[Ln)V;'_rrnYU;5Tceb1^V[U;Ur%E=;8U'Xl%Q>/b;V;E#gZcwU95>R[I9arp
END SUB
SUB V6
U"X1k%p>hD.5EDQ&?4#<Q&\n5z:&Ope]#*(;w<.QS*5&i_IempQ/F)GFT^m5%t&p6
U"^F17b]Z[+sG%Q3b0-r4E&SW-8JqX.o-9iNy8g5PW\q.Z&-uNmJMS[8S99aL9pN2
U"[9A7oNw.Q&W8zB?NrQk?Qnu%K?HT9o97Yf,QLbOT%vfV%S]gR)riu0I=+]x2t;y
U"+Xl./L&r;6eDj)4yBsh<csuFK+*+Q_5NE+gK:%$*KPCxq>?qnIN/=Y'k?>:2HFO
U",<Y_x_<C[V+hqd#F*3Sx\o=mcYx<sf>:282mc)O%eV3Ys$j?NO5ri0sFE(T_UEL
U"I]=,sWGo%^WwupCR-vh>Jw4L/<;UwK?M;w[6.]>zol\kGNXI'#FH.uNPrM1Nqb;
U"w_5KwEi,N<K[h3/ThJo3>$1nTd)GbKJ<,#tG/S8]3ps8Swk7\bOWG'R\Km?57/E
U":6kTK8DKCCHKGYYD7Y2RoSj^B]fXKI9zQqAK5c;UDK=Y7:BGedMxZ;<$>[KV5yZ
U"NEaS[KQ'AO%4_qwCWfPi0Exw-Nd8\)h^DK_KL*pV1hGU>S/pZm1c9)rHt=A9Q,'
U"oSYo'Cl[#lm0Yn\ERbb(QkmJOi'Z.A0Ig=>WZuuT8sr;V\ltfk:KaJns3/-mFdk
U"gNu=x>Pqko,<otXEs6+y4*h=KuTw(ln^AU$^DcS1iinNK<F[lfj4)w8MwR$NZW_
U"X7u1cI^oBdkf%A?s#$vRi<==3FmqvBW\$2l'?O#^ZUP=Uo\8T<aFCf:B75L<Xnd
U"u+lJKN=RB'lf\gfbH7<RvfLBJ7=PuTheLI,obj?q)A<gE'V\7HL9qXCf27s+fDp
U"[>7O<#c-1E*rnk%%sonio26REeuIEEn]i+rfXjU:gBE>V(fZUhcsWn[TDZ1W7%]
U"qK#^.?[m><[VtNVUR)balsF%2-0$)pSQ0Yqh*pq\8r4?_[+-]SD$;XL3+Z:xBqI
U"\k&Fq??]heqiPBin8eq-1CK)5(c\Ln/QD^ZhKx0f>><X4XcF$>t<-<21AKEkZRD
U"U;Vk9q/+2Zxg(UK1TSsE57Lbb4G9bF5=Oc<ZY1X^R<X+0r</>;qHkh?F&AGAA4J
U"S?Ycu^ZWJmFqFoZX+Ppk0U$VU7xN<ruw+\D6:Woc[peu9a]uMHqa7MFd=4\>VXk
U"k$iBiuq_[qbO_uo%Z-D*Zriq*J<kU+0<:^+017^,=H8E^sc4okCF1&e3F+(C6ei
U"9a%7U0Ce$0>E=aBORM]7.:ZGB7.c>9XY.hLRW$=#2$#YTZe*NjK:oD>/2L2Jo>y
U"_dSxtS5V*>F%\5,cG0Gsf?'GtQ/(VbaSL1&a7a>BifAsZ9hmlacKa_K2?1,m^?D
U"ON2GbEcTK)\f*M[:naHtmLq\s:\/$+3kpp1K+H-vZk:=4Ko(l):nJhnbKDs44dJ
U"&IbU2BK$+LgdK$EczA8+V)ClBE7J\18q[8m3-S?Y3[hP]/U=YhZIOt^GrbG,Qmj
U"j+0V1Oh2gPv4G*3R2E3^(&4zyK,^,J>oIfPnbT3;aiCwWU/%b=h3X#*:$2\1]0/
U"/A#ht4d\m[d]/ik#*3X;0N^BT9:sM:B*gO1?<yG:k4bC6zR,ihv:?\3KTb-K/qR
U"HrKEKs6V+/5H,Jxf,e(Cr]AuF?Td]RM.zkq%JN(oJWM9a#d#)0Uj>Aj33a$r/G%
U"ULA:w?w2hdi>QR'W;:sGJu3-ppyKGusk>p9H>)Y]X9CM>#Y8H0RWd9pAWMk]'7:
U"b3dB*+h\#_Yex:%meV7)*O%A%iU%aS/e:)3$s)m[[CP:8EUhh*&P(*6l=aTt>_U
U"2$,6t:AK84H5/9NiNMMQ('<\6J*:GB7,8q-%iI?kj/ThIUh4F^Zm,8<&kE&-sb=
U"Xdk-+\qgI-g<k.V=r6a*#7T*_R+y*+HHvTneTaD1[h;OL1<94fT]ah#qJ;)PBb5
U"<UGj=(j3-\S;M1JX/x7KurkV4E$m-0#DaM'.(rT-fodM:a*p;2)F]%Tm,c2,\)*
U"d'b[bnsHaB9]kB0=kD[ieMhsqkKW/[BGVI3_#Akm]5_2Emp<=g0XV5\l6L;5<CE
U"F1i,psi^Ajm=Xk/1xEa%fXDk12phJ;(]E(..>qT7yY(8a6U2Ln9]+^WEjg5a^XM
U"G2Is402yW8(c+2k)NH;QH.:74JVtdLPo+aM'l+Pf/Z3Cjw->WMii*zsG]eOSa=O
U"ej>U<hdrDyW%KJ56L<CAqIBE^#rN(dUPiR.n+6s6JvFFSvkLrDU7G</_B)Ltca<
U"O4mPh)fsMpqaw76LRr>N;:o76&I8g;o<\:0jdAa%svuFQSA7%9fN86S4uUc([<,
U"Cdb*UieUOn1xmSnUW(L=-]ELQQZVWjk*Qn?X*jCe_uG'Uk5hX;XTXS^9N2-?rbs
U"Z-Jf27Zj]N)xq<98,oJii[>VK,*0JpgHTSRN#ggqex,RiU5_EQC'7XszV$TCFvG
U"-P3qyVdsA$GE0p(1lC/DCbu.>7a,K?vCl:23,3J?I3^O;z%WX=zS8BdsGR=m8>\
U"Adj\)$C&2\REj\6ub%1P_#Fi&$T-a+e^)^T)#GUd_YgVAWqr6(ePYB&^HyUWk73
U"1$G>#a5C$Uonf&(JMQ,eDsMq.2u5Qq=BBm,<UgKD(Oa2b^Fp*&'hUR/.mE5$)&A
U"iLq33RK6=ZJDrMbutOQ&QehUIxVN2t<zBxaJW2Krt:e^8t&=aDrQ3fUe;NK$t8(
U"dQLpC(6=-D6861#:TS'Rt\8)2)MASdH#?5,FsIpJBcJa*>Acy;j3/Y%izYC+>U2
U"hKsT#zKHr0xHVa%E[iu5&#1rG43RAM9ApZuh)G/feN<_=\^xd*xUeUgNeO;KB&R
U"fe+#YS-7IEe-&,iIElDOST^2zGOk'w&?F=,XT,A7YEo0rDoNcLmf34?Ieyj'DO/
U"9\W1:4&&Kk1U*LfU_oJRnO+f$.Yw(2,]nwega$253#>$gMol#aS,;[*>ixDlq.?
U"Por[NgRlLZV0$Z*2e>Y;uC:]jY$Jn$Z(6p:&g_ICdq0mDKO/=GMhs=Pj1U%%SUD
U"FH?$WjK[wkTixXL<2U^_Yjw,E^1+35qhR)l#;3qSxBW9:M=Bb-<0X?Lcwf&]U7D
U";SFg(:)k>PG?\p=RV.1[%MBW/aj5:PgOX)x/,1$v8#,bM1*,/q9OGvO;RiUR6S0
U"h1;UGg1V./+F4d61=+Mw/wlX+q8lX+q8lX+q8lX+q8lX+q8lX+q8lL+G<OC%Q&N
U"82$\FN;W)*j.j=.ETzKxO*oFAa$_7pLbmn4F,#CFUishJU*$WNcj)X_Zr-ST?v[
U"Bl47CVt&c4RMgDwWk4fth#\+ce#Sb4[nPKE7=mmTBP^d<f]dh&4e+kRk^7rX\3l
U"^4O-cR2)fkIcu=,uIB6%_74_A=-B%G_PQ9Bk4_87]vMESp8*3Ba]CC]W,BXDR][
U"S%sj2Zg;WQ?FgxfK(s7QeYWSIH/1g2v3?u4F>)=rC9)Z*EqNxTxa13K;%<K>\$O
U"en>f]q#Fhuqm?BxarpjoU+H6L1pYkA8SQI+$W<Ne83o/v6;H0r3I?]>r;[p0UTp
U"<)\Y0D<WT_BQ++8M#ez4)-a;Ka0O;.]UJh4tl%>T$fGpQV=vXut5WMOfErY#tj^
U"F5HRSkfUM(AEU$3\JfA;>$Oh/GR[Y97JOuiFU=GhcFj#G*tJGHUAI$hPWS7MiT>
U"U;v1pj,uhVKK*f_>ESh'[Z(4g#wJ)rJW[:aK;+Q)Yc+<.49;iIzeWV(4S2Ii7$F
U"[?:h:kQc:5zH8Vb-(V3e1Ss2I_[&icJKAi+1ESsCi*;_nfEA'YH%L?hkh\rq2hp
U"#/-%na4vM_P)v^ny-msQR+k7jfM_hWrZ?fK_zdGY1;BUZ3gNlEJLE_D_^1H]Ez#
U"gFBx+q+]O:IAVvIjp)1i/5SMpL8L$Y:<Bc1JaA[cSz6_'V(1'Q3Ed^^QIng25-+
U"34<=3;AIIKRcjQVu_*b/RxVXFk;OTj0IN+K2FR;^*>N;;vR_3uKot\xr?^8LhT9
U"r+]biXOYa2jtX<]sk/s0?<L8\1WY,>>5H\F\m2;Mq>YO/Fh9;At2mkNjqt'WIkJ
U"l0rAp^RH0bGH=FraYd^T*CyhMw%^HHx;Z6soNa;vRr9Z7s9J<8pIp(t\Cic[/CR
U"f[6#Y;pjIXojuf\cp-gF)(mY(SI['uir>UmE_[oQM[T%n#+SD<s[nf\9&UAWp9B
U"_;:Hl1]72SY>*3H>BT$mmjVF)^3=D=^Q4X5.QN>I00&/;>43JwT+Z2gQJO[h54^
U"[6S(v/U-%,ZFLJUE*=hpR?Z/HOyq7:14WIJg12*R?<K/ZKr'4uspSB81#k<Tu/A
U"s8xXT39FkI2pi7?6E0QZBTEhZnF)9\WQPesQJCc>1GoJSE[moB,nb6WLSGU*(B[
U"EBl^#e73-=#U^(p/lFGU'\B[7HQRiWmLq/\l=rPRL4cXSqjVfPM+;'>Yh2*oJ,C
U"^eXtp>E;O:,+P5U+aeCx>zE&CT,?3n3R;Dr'zAGcs.6V6C;WbobdIKqE7)'iDP0
U"_C'U.&Cv3G*I),4B+<DsI;*\/UWfL4e0W6=)3sDK*<C>s^x[T<QTQ17F\6HJ9G<
U"HYQNMQuNJLuxr)+I71$9ir2>6i.OzUtH=lM*9BpX2%\$0QLIQPZaIq0k,3hl8/P
U"ZC7i#0'WfK,j1).<rB_cL=GiFkLo7)ieXB79BJY0\Xv$)6iCY$F_1<S45f?)hCY
U"Baxj#n,?Z]JBcIIw/cugN6euEb[t396dVIqb^d<05?SrD.XBFYD+uP+TS>.Kp[N
U"G#5nT',KGI]WGeYmQ-l]&Qk5U$b\;WAk+T7sW_b_k+i,Fk;Rj.Ka07Enk;jRsoB
U"8&mjqb8pX/]E#\PLx.FH(9>%:/^\QQ:D+A#H,T.H8R;]2BSSB>aOBrBu5:xj6?Z
U"G(KoA>gXUFAjV%[1_p\OK0fS.f7mAvQOl#AVe*Ak#O.$SSCA1OAD?[A',]B,KM]
U"-UJcJ;n-WXnx^zM69dbUswd-LdFjk.qBbZCxFfHKO$q=ucQXuHHXU5OVJk?Po8H
U"lB86pECb96NRh#sj7w0j\[ZlLm2F9p#>x>w[6nhw*%ln()751Qu%p()/%%+%+4%
U"tRi4M6H0&O\d%7%ov%%%1%%%%ufh%qfxx%hSgfCx0/J%,+#+'41p(%.,0.%0.,;
U"%,-+*%+,+*%[,;<%0/+-%/0*+%:)+<%*/-*%+:+/%J+-,%=/,/%-0,0%)J)J%)/
U"+)%*9*.%Y,+<[.?Puuuutt't10Q%0Q0a[0QP%%1&GH%9:[\h7XiT%a*+7mH9^ob
U"epj>**20A+ziao?j89^*b8qlZ$,'&jHS^LPyUNGZP'\)9'-pt+B0,H8qLr^3[wl
U"-1amVoW6f$Vq#>d.%Dd\Tu$xATo.Qpj5jZMwT^_Hz9mhe.0plJ*$^JC%M.r)#Q\
U"?\*.yaKx=+6OD#thith0OL\kK/JvoHvxd96q$79<3>UH-W]H%UOOSIOCDJHfOtH
U"ZGnw8Ud&h'PN(-\u$Ex#FC[wf]O[h6o6SSNui-6H4l6ND$Nt'm;B1=er5:toq&i
U"p(VBx->=pEk:fw_ymW$L4re=e^x5&2sce\)dlPSqKlcp*]Vjw#Jth%EIfskC%Xr
U"wCFD]D($wjCpU-\iA0$WMvv;ZSLp(XK%#7Kh$Q&$gJ)RRn3e#;^n3DsXeN]sA.+
U"(h]:eB%*[c1kvKjupqOJWDMw9+8/.l3QPUn\o-^X0sw8/4<*?#Z$?XJ6f?$&.-+
U"Y1Dcgj,E6iw,hL>e'Q'wEdhTeqqoA+X=^YjUbMr>c(L%Z8O+_==\/X#(X:pZ[qc
U"iP8WOTpk8eqn_WKE>\RC8Y:r1Tkh,*MHYw&knLvZla*o8tKJnEMl8(sF<r-08lk
U"/#pY0X=R-wnYGIuAp]?,lcgCmwjHAib4=k&K/4RbD-D=TP(ZgxX)rFsw\To\kNG
U"r7Bc?0x%0BEFkC2.9zAP$uSVhH']6Z6Z$M6RHQ^<s:Yf,A-%$:)rB4uVtAIC]]A
U"-mChmg;Gb<VU+Rh?:1i>L(YTy=u)f^RC;qH3.+hIyd38zr1?)#_.f^33iC$rr%a
U"r/SivfjbO-4Q;Vf=ZkN]g')T^-9U+&2ZqnXWSp4rjWD4+CpnF7cmMTO)#zl?$-s
U"EV-y]p$V\M?gI$8V]/->*gMOkU]Zw9nAi4Z\*jc.Nj-%>MFBNwLHL&gLhs+jM+M
U"dDF#BXK]Mrsg$oM$Cc1l3xCUHA[ulvePa#;N>(tyKfQU\I,3[Y1Sn#rWd>F$'+t
U"2><Fuu5#LjahI7-?fyTIoZ+cpUmf[DH&ub$qgT'fZz4IjF/VLpa*uo5L%ppSkhl
U"K\JU^hE#Kh7F40S&7HfL;KEhTm/KBMt9a=W5EPz3D5wIoS/pf,g2RIw3B$RLee+
U"3>>]hY\EQZ\IS<$7U5X>E<m_U%z9(zlh2fh,:)QJ5(Vmz3hF&4>TPcEZO08'+qu
U"H\\OZRB'__pEI1uRmC/.f#gBiUN=Gd6'v0Q=46([8Vl:W%+..^KFE_2ov,6\G69
U"/Ih+Iy-:2:fJ&xhp>=l7cpo>VWQYqUaIM1>FHD^OJ6<q]ss-x08xhprb(Zi8)O9
U"Bk[0Wp_o\hq5.8e9<&e</fBhtbs\I#M4jf].aWoRt2pb<(Stl)h:ZKjZ&L&n+dC
U"7S,\Z8go1>MR?E']6hI,bI=hMn7h2TnpBj6imAN)C_K0fhD.g?=r2R*GF6'4VNv
U"b/3b.Qb39.?JFY?0e0IUt9N<U=6B)kRDMijeH=s+N3POJkBm<8_9$gYk=esd_qt
U"pwpQ?oF;c84Ag*O%#Cy3r[daY3-lP3GQ4=po<:P]rtgTp1WfK,]L2LjlA<-l:>N
U"qJF9rOUe)BI=+N$<o+Bq9'S4Ap.+mb[=jh2514*50/DmsQ.m]_0u0X&D?/DHEt1
U"b6wf+f6Qlc5NLbL/NnM(8]fElv7_K-;ILmQXYVml\iB-p3)HQ,G4A?e'yS:*RkE
U"J0<\US;mC3:F9GJd8(D-pJB)pfsMtE]gtBGCioc>eahAa<\:zSa)EXSY)85S+B2
U"00kO3j=^'tP[mD4>3zWER2K)Cm0,RY,4a?sIT8E(HmfPfeoa?(NellBx0]JJap_
U"Xoq5'41eBBWvLp8uawwM^,o2>phJ&9mAOc6:1]K17YMbu9_<_57H=bpqD_0%_bs
U"u31A$Ic1lQ9jr-o^&cCr/\VI_%5EkMQThhbkUL'e2xcP[J.sUp03sd<_A$I4s,O
U"LJ<]_Cey$Smq+rg<?7OqfWP*ZI3wkbGV^bfbaR,T#;[Vnv^U00=^ze=j;As.aPT
U"88t<b;ZY*M_i/9kgUAtR(%IuLu1sz&mG$=v^\z-Mwhpbm>icilx:Bma3<P;.F2l
U"^K;#eP8[nEKNL_=D+6&wd;NO:l2IKj:ekEgNBc5VApap5#eh8Ry8QPr6TB.mI_w
U"3)VwY6#k/A=?SfI=PVfe3]$-OS=LJBBV3o9Rm\CMP\$3ZgDW=$aAZ&K3fk\B=Z3
U"T&k$^EF&?$EWcV'VUI3iw'0IK;,ek\</$\U.S\p5WH2yETt=u*&Mq.SUU^]p98+
U"N5N4l&F,ldmxyA#o])VbY[j>7jY-q[tYLrMnD;G2(Tm:lgYBYd32Di[?Nu#nWHm
U"C+V)y,R0UYw%s-+f,Di+vAw3YJO/NP]UfD95muB)bIy,;CJy(EaV:D9G::S40/l
U"j]PNdPVI$+p3q1Q<;m:4sM&2fd''(b_q,A1;bu\m,7cbOHg:-Qmew4B-Y.)tpyc
U".%LD/1DOb_8D49n,l+,-AF(?8'9FbcR(3bp(>?m4\U,AKH<Y&Vfm%G97Fbmc\?m
U"43j4:CE#CDGm&)BG[s]d0LibEMM6'CF7NqEtuaXg24EBR5H2N:_10C]EsJ51ffk
U"'Yq[rowl7i6n$xmnd:PZ#hC$hq13/)ZY:*X'p[-qq#iR3xrkKG\3npOn7b7l8VN
U"XOI,f''euq_ViPro.qp(D'gwn&?/n#2;;),Au)vT&STS'hi1-5XSvvr\?C,jF<O
U"rpS]bgqG/+=qd:bKsTY(,+U,;/.X_;5X2qbke%]E=>b]JJ3FiS^*\.DL6_I:]l7
U"[A>,bI7'[_(0khe0\ms8B6dfGC:M-Ss%=N]7f_RhcYx5A+hq/To=>ZhYa#,vKLQ
U"S&*ZT]H95m#>&U0AX7>YDa'.]Z>LkJDG+-3;<oghZHX/#2^868XF?Yqw5g-P>rO
U"g-v(Lm6iYQr?Hre58K%=4JwDHb)5O)&8-EIBy[88NYcq^X$3>f7UE8'^Z)c58dC
U"OtH]HL;H_'AQ0]0O_,sxQD5bf4tW0LZU+qgO'-Pf_py]gQf'iFEa<J.S#d.&hU-
U"v%x47Tdt:=JpxT\m+d](W6b]wuJF4v74G?UvNBIqKQoI5J*F%YpP/[ies:eaZ]4
U"R,eAlm*3&4I;:vm$P$5Gk]2utU6\fiqd>#EkS\iFV#6bkH?Y]h/?ah?8&Zs^:8]
U"L.f#RHJMH2?kV5BU'O<QnbHBjIpm1J)3NYKS$D;\,;qS/=f'Y+A([gsS#:ZfG9D
U"\r7S<?>k4Fj4Z=d2k-?R3I%w&'/SG>Op3RdZ]88rvFMs;r#tJr2/U2?Jwir-rf\
U"OKQ4Hc2#==S$F4_*7^'$hqO*l/$IJ%9G]l>/mXmrk7<-fMGQsc6VW:QN)ajHy#l
U"C4)/odJ]?Gxb)(D'4M\us\I16-Vu&'8xNB3_)G(PcEPW%e)NmwMfs8=v*+Pm:2t
U"tio4VVsnQ:j2s1P6)aMMDH^nFqUpn?cBMRom]O(fezcogJyfYOU7J_>_a.TM4h\
U"3u4yUJhn>^51AVX;]SV*d&61B23H6>#6n^(X:SPyo]]CawRh5S3c2E?$>,Xmv1<
U"7t+ABsUI=,9mK</UdA^b4q>r>K#b3U2EllG3QAm'bcB>Mf<cG<6(bw\Fs;j->_Y
U"XlT_oV?GJV3uC_cUI4wo))aeZ33^W=LtYP&eMfHWX9HRjrM.nRf)M\sZWgXP/jY
U"pSifIVWH;b+\h5sLlZFs%+h(RH?huk1;aLIV0/1KGrA:tu^eodcU,*[0^aY2>\)
U"pxPCTb>8YJ*<zo(_Ji2?Qv0&w.AFb,o<u9U$r/\^aT9QBJtQ+:OZqThEOs0<<hx
U"NTIEQyB4UR[,hq%hkgET=G.HK',D\)OCLuhkVD4#C'qpR[5cnS86#+9oRM_<c?M
U"sPwD-9QC/W8P^l2BGVe1c'k).)qQe3Xo/7b)*eIF^1A_[i>]Hf723/3Op,71yeC
U"&nYK[R2ET?PcI-(D._e$i4MOPG;:OiOGo+%L4EiIeEIA&2+^Cxe,6k9?Rfx9xF*
U"Y1CJ$0Ou_:c%/5OCURB9o9o#WI/\IvzX*1&)ue[u1%$EgPE54'J_l5C=YAAXT%e
U"+%0_cPcc0/QlU4%+(kk&j^gx[M7NK+,48w;G5lfz4V%(2JN?#rF*BS1]&z&aE,[
U"3l_2CQ<eS#r<$,\S1?<&q$.buK(m2DFTciSi()k?fT>QslgQP\6yr/A59VQU:#n
U"zXDol9;%f1uTb.*M^w%GFI_?&T$y='UlkvR$G*3;E/etWR-$Qutid<gpc7XoZ.<
U"8r)c=W/wZ_iCb;LD\gVT:<1w1fgLe\r]3a7PrfMcZ2Wg)yKUr;xX&8Wt2L*QV09
U"3H9Ou3E<d33d2<^DIpaO]^kFR9^wh#P6>$$yU4jXlUgu>Ut.A)5cZ%d[pHRl>m.
U"\a\IQur$wQ]j4uqt8gl[ijc&KJR(7E+8=wuDa2UCNn9#0&?$NW+jeTqs20U:rQ:
U"#w^E^;kTXIrNcRxw2Mp-p=*-^Y'+cqIl:'7]DokMb2\c2R94PkRh5VZHw4=3I](
U"YRD_oN4FYt^_l5j\=EaF8>BIS]pIn-u%.Eu(<doG\w,NL27^-Ee?Y\nBo7NGRh$
U"XieVuCCp7^1t>&?LGj57F&0w&maQn4ZSnssIi&1MXF\Egqb*^rcYUrS,A\KO.IL
U"+x6Q]sB.4g$Mg*$MdjtoG,V5p>r'[ZYc.qTp::^iE_-B\Y#I%aI2^.a_p:9]vu.
U"*N$^yp,t,JV^LnZ'Ow-o.dY\GA=2Bi;*j&*)v_[*(YC(/Vvpbp+jrIxEr'38K<w
U"mDO.*lS+Y;4bO=$NU7D?<RFjWFgcavF-MV*fz,$i\&VNsqyF7wndoda(K[4VxK5
U"r6A#RhJovSKquf8H$ODuZWYw,Bw7T$r:dwk-t:bq=+.dl'4mVW'p2l>%of/EbMQ
U"AR,'PyMB-NKu^_kXfUk^2uUmq4_>'1kpJMxPYYc0HrdHja^E*im47t^Out7WXjA
U"k<$gWNOcl_.c6ZcNA_;q1[/i2fq['IQS^FcPAnJbQnbDC?_5KZiu1P>\e<KPD\v
U",dqFR-$]sMo:?tdE3pCdloC7ttr6:QW=%)vbOdLfi$xDqfp32VVA=2u&os)K.3\
U"_B]%Hh<[_WY%V:7:'0LKC]%<'Dvq/o?\&d^2r'_9PgDrPWT,bocDunAH*G7]A]a
U"x$OU[\U-J9LSVt2QLl00dvmC(1<L55Yd8SRP-]w-XwaEP^t>z0n'ljA\H4Uf&Mn
U"RWgwTfVEvLjTM>m)h]Sn?UD8\-c(?t6\te3\rW%>Q0UaGkQ6'h-Q$J-F*Uy&wrd
U"k:gpKXw#dn?^sN\EJc>6*\E[$nBmr?lIwQ1vRXCLugHgUhw9IL/$AQ4*>FoAFP'
U"MD%JFc],N7_0Zpco.E1_91h#]c']MU4N1zE\voe.K1eqRM#H^J_z-F.NX'vQ%7:
U"^QXl]);u0LZv^Qdzg^mb84c,Bn/<Bp+qL3d8AAw=KV'CU^yQ3Bpq&j2W<$^_8XF
U"v1seD\wGvKRGV4N*ZQC:gAaQ&ENiLICl30/YOCGhA'%4Nj;F,KbmbZ9CV[1RpVB
U"x7oVBNRoVB8ke_8cbMEP],(\VaJ:aK6S\l,'$\#QO/G)ZZOC41\pL,u-SNj1&Tf
U"YC26avE_mE;k>o+ZPZ_ihR$pPoH<X,R8EGlpT.ccwlNa<e]5sc&UQlG^?'6_^*D
U"U_A[dA4NjZj>,KTqg,l;$hJ^(N*f2e^gw&hkzWdE]uSdP6rD=tdNTSk2Sm/]T(t
U"WP_>.8soHdgqcXQpZNU.)Z%]2^elud9fUbfkNfLxG^^36PwXQ*R[QcwueZ44qE5
U"z7pILAIQpu8Wp8)9N5$qQYWlhMg%OL^Qm2QRNUZ(Ub6u,%ME$H5O7W%?O0/T]s;
U"O27;EPW6,]$K(xmBl6Rg;9c[kz&.OUdhjZh%F=C1yAB;5j5jh#QL0[:yQ<1obp(
U"E1C,hf/FP[G(#&8lCLE2P>ZDHa17]ue&FK3=QQq=<,GTZaxN8PD4U;Balp5O?m\
U"YN\-ob?dSGJq+:*(u_/E\OJQY)S-N5qOfc6Qv5j#+s;U*Fh&exI=T/ogQEsB#x]
U"M/SJRGpERPwB)ys8x%*GJPMRcck#1^-*2fSP]-im(<&jQg6#M?#VQ>_Y\8mF4]6
U"FP&N%(mkYqN0&LFc#VD5K8K>K_+b],FrnQ'cPG-KN$l3,9)i<.imqZ]'S<)#x->
U"RJuySi>_qR>C;M]-,0CuDuW%fNBak:mO6<e<30B'K+TU6=jk]]AEG/d]h+/(8/<
U"vbvSbXE/&)L_h$;k5&2]V??C3H1:$18/Ie2hwHT0]^yVrLgZ'GZ_xYi]1um5/Bb
U"cY19^[ubvoPhWt?hAL)+-i+CDC2.uhm;w5Sh/\UkhSPBA.AZiNfV;)rH60iD):u
U"H/ikq[o;Lz<AIO1gV5RXX4Y#:'#L/)*9OB:Fh,%_ek(5[WDRA]oCeJ%V'pr+bI&
U"0MB6,iKFQ=4filem,q<?HA$?%sZ9&;0/2+2$0Ie&6oiBb([-l+fAo<[RUgP/kQU
U";KH(dhifHc:\6elpX>SYH24$2<B>zpU\,iBMAy^E*BlMgE*'fnlmaS;d4:o/vNh
U"4?cM5%v0O[dpoWWXQ)[hv]a5TrU;7/?HW0Pvcs.M/BW4/]+LlX#kuq+VIL2NJTo
U"V>P,>AFdC.W\^TrH;GE9Dc%MO7C00*d+/a^AbHmg5F17o2%IFa/sr$53EB7VV=l
U"ZxrHpJ27o(Hg8V;^ORL'C_QcpGi.LE\^(-QrRF+:IWseu]dY7Vd1h2DkS0_GS0h
U"MU&_7<5VtMGqRLf;8,(u3[:M8XSItJ7ivp46Vpf.DsCm'aH94(vVT<&y34.5j0L
U"D,:a*E83CV7LxkB7.*wa57;1mmB,Hf^]Ic7mcIazGg08ZH+%=Mz0mmo&)_8wILI
U"cs]_ZIWB*GelZ:8g(74\*;LHiw&[KUpWBFO0dsFD10bG''$lEi;Hxp+5d$n2D5l
U"jPj3_X??ikrLHGb^aVY47La$.NH$5Ea>_=J=J'-OPCx]?Pn-ydMScg&m2NsM/p^
U"SlJan5[\7=5C3eljFAB8LD'n6bw\09J)JeWU#n=TH/5S'Bg9vs+XIjs?>o*H.::
U"gAU-CcRHDj4hA;=P=-s4pp,l=hT]QoBD27(2i-pG'Z)51_Pd;j^,.ih=y:d1OZ.
U"yseEZ,XG)CnL]Wcns?'>\XsS(2d&^];*0e9Y8X0kwo'ru/sQvov91CZ^O?0FT9^
U"Gb=9=Qb.dKhqUl[;svhxgce^Q6+-*ED'L-+RZIZ;KHHFq^9$Tg1[D&9KKLSR%E/
U"L,KE]mb(S\3EC2(Z-VcEgu>Ck\z;lJX]Uj\E>H6M\x)fsiL_9Ijui)+ljCrCT,^
U"a<$Dq<KKH&S9]$B48KF*ypErmAw^UxbJg0q:k//=Yg*.ZV27^6K:N/:EUX:M%o[
U"Rs:ZChrG3dCjdL01?f_KqUs]+h/-_/qxO\Aj7:kBb]/4)aW93j/Hu=7Yl02a0J9
U"]J\BLQ9bvP3/*Mng]&]ib(*blQ#;79qtklT&7\.?>'bQz'XQPaDMG'sB*+wsz88
U"]RJG.q9J&]k(7#K[7Lln+STlXGkXMzuLkmMIk8dbWY#0BLUXoH>4Gd\sh]s;]Tq
END SUB
SUB V7
U"4GD=K%;Z^V5A1<?gjY)KQhiuvBlpYYQSVvFO)DR$81G'b(&mIfH\gpY:t190tiZ
U"sK5(D2mq0Pf.6HhP,pRVn*,8whLCw\3MZs,MLO4r,v+71YjmtTQ9QL6%FCOHYr)
U"Wv=p1O1k:ifZ]_h35AxT;yQtL%DYSH-$OTPAw^0JEE5iJlXKOM1Eo1_gl^mE_qB
U"Wp>7$BSS)99[,OpfF9eek2OlT4nSA),S.:rOTj:YWJh92q\15H('R>SnBTj3(7E
U"9*F:g:ag>eokipRjD_VJY\Pe#XO=/EqDsLQ00WTAz;9;ksw]u-0l4K6\]6H-GF*
U"5$4#Uqn%ug\BXDx]kcgiE%-t+.aQbT/^(=ZK-uqHKFGBwJ2(/KaqMBBgjF?&K?L
U"1meO%XD=Z#^]+bOs%'M1Ck>Br*&7b-AH06&_M^]wA]U'zbO#%OMRGW:PcZ_>tSI
U"2-gdFG[a5&q8iIA\57;Dc#]5aF-+C%W'3^5#?SkRDe3t8W99&f%GtJRf/F_&85z
U"*0[80ot+=wMj,sg-pllP*'$.lCC1*vMc3=DnoT;GV[cedB?=$&-50,f;)[Xd^Lt
U"_Ne^Dnml-%CrKgGn[_ilc+%p3B_[gW6/WSS';AH$YCKa3gn/6NZ9qNCDQJrA;U\
U"?RJ.S-R1L8InS2,QIaqD21Ja8IbbEE-'i^p*qG+U5f,St+W%3,[ca0qh'[kUNQ(
U"((21/CrjU>bM/:6H0C6-dqbR:TEAoY,H.Ij-8fuSp4$iH76ew]C5U,P/YH3]ZC#
U"DL>E,fIv&lR$E5nS+=$/ClwhldO9df69)Lpsrr*hM%=AO&(pXq,'e[qZQXLSQlu
U"#0q*H->N;l09ZcXLMHNAF*aqD(-cI^u^lSULQFvOK6iP_P5x$DI/SpI;uZi:faH
U"+bg=5l1iup1<m7^6[kntgqP$;P>Z0uDurCpgA^>sG/'>UtVI*h?ALuhw1VFC>6f
U"_^b<.H\ig/eb:,[[4/cT]LpomX*2vR^.Lcc>FbIJTKM]$kHfcIE\wB[0Ofv3GI\
U"s7/+<:$bcWPQpiWO0t4ll8OUc6#'nWNYPI)v9g,K]SYPDB07$s%)Eg#$?k(b=#.
U"rO=,mWLTtcQLmIIB5lU>?4q3b'Ou0:h44B9Q10hb32BQg==VAeC$?JPBV]jC6.O
U"mU2sp$:)[+B2W)X1)Fz<)/3yiLM[Vg#S=fW*,zV2kh*0]nUV$\kqB?'Y\/G6YDr
U"]iO^9h5uRM?Eh<mSUX%5]hL-R;cGXlEaBSM5h+MQ*_8aX8nEIyWX$Mjj*o:V'Ms
U"Gu?EV_>YWx_wKd]sv?22Iej7g%L.vYjn-8m$aYs4b0C.G;vpII,KZn=s9;[Q<WT
U"OMCoJ5Kep$?ZhU3V5+esep*-GsbDj4_#$[Op?7HE;e#Z.=,ekqi+%DpFZK>S[Ec
U"&M0F$aVvY)GYnKMSC#Gi;Ov;Q,:^_&X:dKRo0lH\Oo<h5fZv0#eF+q,;F*i:lcf
U".WG;qY<+wG^=l$)AMlb;ll<+rj3q-<4XSD$gEgpXL,]rC_>UH*QGn<WK;]4sA5e
U"gBQkUH0JhL]4Q^YCSI3*Coh1tO]j.,_C3IvHBT:3\Q-6>?C>FU4Ie#v18Z(sg%]
U"+LDUf<<iBW/T31g9kaRaL,nrF/$5%VOFj=lUh3R,&W):qjm4*$75VeSSXJ4S5c4
U"<3PdgE8[\CS1oV7KgTo^-'L&+U'X&Y%+9*'&i5%%QW(LzxfR67MweoIWc.xuS)'
U".NMMGQ39c%+fz/4o_p3Dg8(+_]8(1>aVa8&Z%)8ab52:;B9U5UavI\mV4i%m(&p
U"MJy-Z8KMJ&FkS<SM.b-;MY+pIbBa^O$9aCWD6mW.mPq//)VW6%R)-]A#Bb9n)cU
U"MBWPb]l39Aaow6TvfCE88B5Q,gsF9I0l2mR9J]LmN$z%AT^>J1eiA4BP)>OQeC'
U"$kBBvVlfc0_fX+>qpKO.,W;m)&>l%MS7B'nXBpX%idDa\5q;k:K;eUZVc3>o&Vz
U"W]%11sWc9YUNt2%Xtnc\[\]KxZaE8#9ZsfLUL,XF6]AnDGTMhbk.Das4H/BkkA+
U"DkSaF9h6=DNAE-UHaAE&$%>1[rI+$[f/B-dRM*<XY3loJl3%L&w.\U[A,xjR1JI
U"ZX'Y3B<e0pLio)R7]FbY=gB[rvbM0p[^Bj'>SSUC__X$*:s(T7GD*aulWLXGpq1
U"*[:>jYR2Y^tY#f7fPUQg*KG^1I5G+(>a6SS8V0[1]7fB44a*C[k3M9rF]3EGsFP
U"T4hYe_Csa/EmPh;1'*_W%2h)z1FAVUE]29/1hQmM%Q8amm1?NILnHuGChbIm&bT
U"LF_coEY%31;9GG0(:m+j,V#3ME?dO/]2(B'*-5ibEe$ZQxI%+IU]EF?$o5[:xIO
U"=_E/TLf:w]T&:V*6w'Mp+.9]p/Q<.qLc>T9PF_V[bMUKSOENpYOJO#1%7b_gU%'
U"IM#q]bcXX2\ZfI;kEn2DFi5[RCQ9;QrJ;hOQ'n+*tfO]fC/0.P0fPn]*)(*:76d
U"lNAh_H^E'Zbqn,0Whs;G^9_0'$ya*crvW)ht4sV\+XPcfX6gFx3AjXJZ*#:3mt/
U"tq,veVNTOX9j*Okf[i7]P&H$K#-,.t%oc+l7/u1OYm*Qh(Q9FA<$j3m]3HWb43D
U"o$m8nl1+=V6Vfa3j]3Sl$c<.V=$mG(h)+A5x^0YssR4qhWQu6<+nFsY39A1[m)X
U"8KfWaAih3h,dz]d,yuN>QcYeTr].,sMp*Uave9uP_qh1uu9UJk0'p:iUMxw^?SK
U"U'U4:T:O7T]M_-7PR^]+R?o+_As*p7\0>3;-<L3U%),wWAo:4AjpA_<,7e3H%\H
U"6t;HsbslLgbbx+&q)56BO6\$0oeaJu?]DNC>-o?gZ);;/D]IZf7oU^'Uk(^OO;j
U"c=^=?C._N=slKkI#c>#]M/fyXeQ(/mKuK.:ChBtk,R?626#jEV/sh5E>lC3k+_F
U"ol93]>OJ,1,4^_33L)XePs5VEE_9GWi8Spx=2:gvRgPvOmtC4hNL%09S88$?#j%
U"9;_Khm/$Znobb[DN$-VO&j27+AH:v7*K;a(4O%HYy\YPO4dr_,()fw^o[iJ?7#>
U"rj)b9J]7&s+-q[^>3I#9G0'ncc%K*q/),rMC+WGllL8gS'ZeCF>Cz[/U(l7ZF]U
U"lkC7;BPHmal\_*o1HiAau%_:1P,5PaSOz._(Hc2:tJE=pEK].3DhGPof_Zqhu9g
U"]]BHTTYG]T$^asiV35c-3&8SI\xa-D7$5oKO)E2>uS_iZu7%wSipPKt#Ak3'5o\
U"ag';v=%C</q1q,1a2?xSG7TTuX:LHS;./xx<1F;K$D?XcpkKYwEv1^cLsJ[qWJE
U";IZZiv>G9Zw;v;QpX:WO4X8e)TLs;VInd?Ct7sBb1=U2hB13Y7A+h[+lu$ajVU]
U")92gU]gl)GGMFGq6]1B6VN_UG?M]?MrqvJXJ_rJDSW_T1#k]m,>NEP6WLlG?c;V
U"GZ^b+Mq'Cp;1WtzVjeM+czKYV$iC0H,V[o=HMiGka_&PXTwpdK5,p.Llx6'g4xL
U"Oh[1Fj]s9p\3nZ;TgF(3:m+E+,FcgaI>?X_))gW7F4H6%pB24gX4=dMj=C:NK_^
U"Q03BW0yhiphiI=M&r+WH6%AIWW/NKb[CVhSOH+I'alD)DWqn2iDEd?6pl91ilA'
U"ZCB(LEW3S$d+I'1kTW3tBNe=dU#kfs=HZU8Me?mE,b,$>CgDTR1bxVmkne5J\O^
U"spxiPPZ^uhBn<TH/PSgW8ra7sb;]g/#b*aUPrI/WIA/sgbWJ$3&1%L^$mP+>t<B
U"EK:kmW(pd?[W)2o&ZLtbbY+\g3iF3\(i,4GL\Yslp31kE1=q7H.H8AfHLA,Vk=G
U"sxh=^VGUWX'L5^sdhsKqhazLif;<z:OX%UYSg[;9W%LYs:4=[YFUC(GVvPC#=?B
U"*T0mgGeB4<Mr-ZRk(E%:eg4<II,Aj&Ua$>Ge;+L9G1.Mzn6&Us=[SW%,t0D1Tc0
U"YDgQ9vfC4_?W1$.U;?-.*qUf=(?Gk#=Y]t(H+36+(>(wTegI?&f4=ENn]oFY#6\
U"hAI4]c]&am;)P1-Md'eR<%D]c0,p$&4:d+g]0um[1fu(%72P%>e;5z0&V'LVxGS
U"+F.KA-4A+;7.28:uEg\1aO-qoQX#saSgs+JGM1&b_Q8O:xs#rx<.WLd?u_=v8f.
U"&bu=%CY8aIdhvggjg4Oh=-[Vrt;:IGOCRAzb#cNpI,(*%]4nyEo\5wwc1VC>jfU
U"#k_qEAW(vcsMj/,SBRB9aCRw,6#FL-d=Nx/Qd1lL*3M.$hs=u1XnYKFJrDbzLDQ
U"<]5mF4olT3BR0MC/bg0*nTqRCepmac_SZcJAX(DJ\8Vl5dc2E5LXVBFya=R^3cz
U"PBd-GI(2?x6:hn#nqL*\hg%EJIufvU57A4)XDs]X#hzS)cG^3npAD+vrZ-w=A*x
U"s5#t(Vfw]tKjt80[dm$do<_C#)Mq#.XPAXjd]38oFn25LIqSop,6p#<G/a\,URE
U"ZBmkjMh-/)5*9m'hCXmD/A0,WdKgv/Ih'R9#KhD6NMHVR_%*<-s[#V2>\LgK8Ek
U"(;?%TffT4Zg\D-xdpp_e'LLB\V$HF$D5h1vTi.hIDAF,/rD=o-?>JE8rQo^dChj
U"L/r98Qib-BlcsWVDJ\%bc*=q/>yrh^rA^sF]B(t.ao1/j7f%0UB4ir/C$R<cdI8
U"bXZ=WErt^l;oE#$vc]W#_#e_A5s<dICH%?V.p_X6ZmPhvfF23)RNC%Lr>ohXCjj
U"bEt,NMrs1o;82jWDwTbI#HhjrenU9rB32_DPnmH&X2<uUxiwUd4U:nZIqGSZ:_A
U"U8ttu8Eh#mci&f+anj$eM[rEJIC.MgEQ=2In%<sXUHsGarY/O]D#>UaUm?BlUaH
U"0l4Ut%.qdR0/k*V=M3pvEh\2TM0jZ-#kXMCqV57W^W.mBS^e/_cSkimA]e7H-6r
U"ap+IiO$^L?AVgUfC]hafIIdokwT9R;+2tYUGHU8ml>p.Q[&=3KO.;q,/-.p=&mh
U"26T8j'0$M<gX2XG/a9_Lk>MT%.gc8kQ=DxAvR+RZQc_c%wG##CFfCE9[cTbw2<I
U"ab9>;tjtpC\36dU+L'SS)F7KwMkn;dM8d1kB&rP?&=A2A7N]LmHJx6\=wvdmb?B
U"?VGtB:?G,YMWLW[-R68$HfPZpK1$2X6iIqDWmr5LiRSYZsB&^x(lXn(9X95i)pG
U"WO.S]eqfC]HIm4r%:4kHACH\SB]c<a1e$3G#8SoaX#eAOm8ZI:2&H]0:AWJ>w46
U"d7;ROzIm%9;A0+UTY49Wvr5x)x-C]ShzV;Sgd-=/1Md,.lT:N*b^h#NmqaIiJ&1
U"fmK0&9Sb9c/%EgJdF<EDE(R4/'.Fy?wA_L4j8_(;F#nEI\S*OCXa6%w9.7('U<q
U"?IWnvNP/OS&zKHl<UP6I*Peg55f=X7sV59Gr\IPQvf+e(F_ugw<T*Gro^'&-VUm
U"8FFSnIR)GkJW_?*H)]Vj>EkTp/cy0_NXzblN^T=k^6/XA^zt#?rY\uJ7bocFJA*
U"^;[0CKUt<8&=GsXr9)()#ClSRYR9j.[F4K]M]NUr]b8\bAA0=HB5L4$RGR5)Ui#
U"B4Bs:FlfI,D3v$(qy.d</vsz>#\7nQ1P=DO/^mX-]VCrQ91dI^0gfH%f$L_0,?Y
U"gXMP5HM3+>'(T=-g$nQUN83ltNWP#&dN:1A8_jK)03fJhp^Mf6C:zVBQfpi0dKm
U"=o#Vj/nS;5)j$)R6MEdV,XCWjc$+b>4l^IU\/trpk\c<K+8Mq]-j[]R8/Q1k^]<
U"aN/,&'a.D0[cSbNcTDte/7d[Iq[jN8<.fQfe/GEtWt-[raH2e9KTZtf]J3Wp1Nf
U"xQc:;KE%E'(>>:c\=kEAh^,N,^#;hRh*K'.XlFSQJ*-4<ZGm)Mhj[YtG9.Bwt%0
U"&Y92IzA5JIhixNeWQGM;IVag16K(NXTlCjVPIwo-v\5%AO($Q<\gq;<Z]-JEA$_
U"?dNN#1:&w-pgY:z\JwggSMR?C0ugw9[N6w7mG7EE\<aD8nGR*=a;sxQoAIz#[.>
U"M#+mbw_O&DPo<WlQQVTQCGwU)vYb_+[Z*$FrY=i3px*gDT8f7gtMB:igG.kP[mS
U"?^Ue(glLkc8Wt-o>PNxN=yOtd9UAs4[plNTS1fxzI1yWxI1gDWiHS&D^hhy.^SC
U"D6R\$n=kD1GQKYA;_(9%Yh(>;&1QI9$_mlrt6\=0FYL)r[F2g#S0H'Y8eIH^;Do
U"4hEf7uW/vhTD>?31UUuYSX<B-u26:?EOUG.G\lf2OSXr.qoaY-g8N_tL0L<;sSb
U"-CvPID-aBrrP;.C8.n,Bn5]8V&=/l%0KI;*aK(H.:DPGKMi/N1(gZ?5M>j1(v,1
U"&;tj1(IQ5\o$s'%$u<8Y:]y'dZBuf2qVg+0L<I_djut_0y(;18-D/Ejy3Ttovft
U",'nh0l6(Nc9RwihcQFDb7A?KZLYsB7%mLW.[Yt(W0b-i)h6MwJ'TXI<'VL=6%o^
U"&ue,^tgmve=j_0WcNWO?xRRhuFoagh6gMwdL,kMZo9WK^?RujlUEcsb:l3'j>[l
U"X*T74?0(CX<'<I3t%ExCOB/GW,\Ik>1)\N1,p]r3c'0m\p81PpWVKd-V,WtZK,%
U"T4ceh3Hpa0ME%n39OtKV-dyAiQ,PB;$1.\4mKh\CU^5aXap#iJ9e_AuDkhm3[g^
U"[I/S1$=+j>KjDJ%4z?T,$=7R#/)O/t$J:6Umo^:q+ba'5[)pR8pJ't]2vZUCNa+
U"p$&.+m%BO8h:aK*)IL3paI^0MhzBgb&r*&G^ow_VK]+kwc:0#HpK6)Gk8b5aAOA
U"F&1mvbATvg1+,Ar4gpmSnX;?=5Z^8r^L:q#Wg]wIFjf,WK5hakSn&BWX0U5VOs4
U">GE,VnrDUB\Bn(.O6lTFcF,L6knqoiCYMI+9+>a^;8tbK=X4=M=nxK?DuBIBoI$
U"b7w;Uh>QE5,1n1l<s_i:R*5pnnjm;deJPuih,xNKX_qI1A\<&)L^]VSEHBBgCi.
U"oOn^m.JRu%PI]V]T?IkV?I>1^C0sc3-P%U\EBvJ>5(15\O+07,S*L1MVT)rH]ZR
U"tS_E_EZox&I,xlG%tV+csl$IwJx8hjACqw;d7F7V,G6'Si$bJ[SJih]-#s8UD&#
U"3$B\_qEP#a1i*S]asf[a[;LIU&]b$=w70$VZf9Z_O=4=C0A1$C]&5c1R$kM/Q/2
U"D$Gj]B#D9D]38m#0Z'3qAFqLL0sb\(s7HZg_q2i6<sHVnw#9,IikXrE2lV1JB0G
U"^b6kC9e(a9R:-vA?:\$U.(af?[lUu?R=75Aj*>#v#+.O5eZ^1Uvr5Q/gVDXuk[L
U"mFL\(lg,<k]d?+Mu>^=zwag-Qk,w9;Tt6SY.:MAEdi]TW.s#ow:wY:yKLDCu%DJ
U"lYE^:D>?-tYi9A%1=Ugm#b#3Fkkk]&2v0m+^)B'$o\es3]:/_YNMos<\:C1(YZT
U"1p.ae(YK1DjtOfm&o[yz-pSR*.O[::.u)jrAeu=liI+/usfeT/GY')'Yu)oI,t[
U"Cfrqas5)_4diK6euw?x.K^i-KEPQD,H^0M.ylx3;QoB?)iI$1]A*;og5Q;I%8xK
U"]S>c:17(^N7K9E^s&Z=>8t]:#J%^5w/.w+^2b]Mb5mKD91U.qBV2?5O4a.T8sK(
U"*;g%IQ7WOL3qZeha(G1=+g,..nVP%n-8.a)=em%iUw&%x_'o%7G<QdBB?KOvAH/
U"g>VVG3'$+?#.+XsAAhrAiiTgH&#Q_V*m$o'[-p3^#^KsVQrU=+,1<&#,*mm:(Bx
U"q+D>Bp'(y[4G#^,)Cd3m]:pZRTO*;iIq.iegS\0VBC7zEQY%mxn=-1;[=>/\T7'
U"3u'796j<xfW+UXU&Zx'L+qX&%J4S7&$K29e?(P'BZ;<B(Ds(.]?tuWI+,g44$db
U"Uf0hVf>E)5C_UkU->Rlo5/;l'D1?o#ZZ*\MEnp3F=:LA[FTjX>H%;_H170raO6h
U"T$/NC*Qs:Z?Rd'5DpA[-u)EL^DL<$wpbJ]1?^rr8JOT;\L4hlGlbG=LU6:4WUXJ
U"fMTB,]<\\PUSUa/Bj3_;,<:^dF=QD&Uh&mjtzjOoCdo>yt3<f>8OAH&[^a0]/?:
U"K5+t;7isR?-BQbm6O$ik2;.p&>N<O?%xiB-n(qORn(R-_;4.,*B#5c3RL2[6*jO
U"eGJ:u.4*9F/tQ5)l7cl)1I-$d%-<xG0P/%YCWZM6U:'0$Ci++t,S'^bM0l?A+l)
U">)=/g?,\vPG-__?aGC-s]Jp+toghJxIAE,pRkR/Jf76r*lgm%ULJATRrRY09&NI
U"kupLe=UycY,b^2J?+0Q$^tSAVg?H*NH-Thn0]A**/v_n7PbZ:k%[C\=tah%Nf&6
U"*9Uv+6LS375\kiYmT-3lB.2x-E.1KT(*3L^A3,OV$e'[R,PCK$JejEo]+/.1aUm
U"Rl:K<PF9#9H';IG&JDgO+77zwq0:lC=KA(N70;VB2'I7JXl%-Sk;qUBZ9>_FOc2
U"l'GIbfB(VZ7GTv6F]P[DUP#R)P,jF(b/-u_g$3]tofic+eYkG^'vnd%OX.Mu?F:
U">eKS(RJ?f26tu$uQ?RbbAI(2]S$YOhQhpO%[;P7=(JUuT?/&EG9bS3'C#EW4S/T
U"?rQ()0FqK<A>:1TX*z#uZ_C+#^zi6*Il0\B3pbBDA\JS#C=fA920YiBrH,qj8'a
U"#%>D&Ph]eG/?p3s5rtx1/Az37S*.BI-O:5%JkRx?C-(Kg8m;9uj.phV5YMh;$?w
U"8('ef0N=9>M,[2k3neP1jsOE[tld4Kn'kG[KiGpb;#7cmAMKK,en+QK,J._U3Ib
U"s8f=(azEMkA:lB&ES)2+_/8,FI1t]C5_)z.y=wr)DVPc_crC<,0'A\9l=ky1P$/
U"h(('8&C[cG$E=_gu)5CI]3&PO8Jx=]9:2TijF6(&$7.CG#&0EWJSs75p%4=&^>-
U"gZSMsf4dZqW>(gWr(uI]x,PKQQx2Qv#-*A*<_QV'7YB2/]o$&ehg9i4RnQ1Bsfr
U"ScZI+Oz?<p&wyZ0U#kAk/U)vJoQOKk1=kjLAs\>fHl8iA7;/$5/%0d4^aXSk>/8
U"R^fm_kM&10Bnb5<)ZD0M;[[-CN]o9-YZJ'[[),VTX&aJH)aGXT,5L'YfX+kSA+R
U"6NUp&?s:zTo$AC8o3JfYk=9]bi3DliCT?S.<;lB9<f::u5X\W)y&m:XgQ5I*5=C
U"-D1vUmKJ'O0+imH8UHqKKCz\-)r$Sh*k5<G1>/^Yfcl\&:)X&>A-iaQ-33jl*^S
U"b1oTbT-9Ta$;LnYUHB[G6j]X3d$w.fv'I&'j-UXy)MSG\O6:Pg<Zs/0wCo;:ksY
U"X7U+Y[Vk,b++9/_276U=929=&:F;;-LGgN%a;rb'glG]?M<*uX+gCg]N2^=ZJtu
U"YKTd38SjGx^_?l50'hEE/AEjDGhRXwTN)JTst7ffw\X$Up_Rn]R=51dVajooWP7
U"^l\Y0L+7Krib?vl0NI6iXbiV)CQ,505E>3iK^$x',WnsQ,lN[);a$k4[BljGA$7
U"Kn_$LaUYZ]yBqX^M;EUapDA6Ml:s1a2*;NN1<VII*1Wm*W,m9Yz$/-8;Q2u#J(y
U"ga=tU;^o't;%RG?[ExJ-7P5St$7hQCQTo+'q0F:D'd1RsiLrTv6CvJ=VJ1q3i6J
U"GBF3lhh4E)QRR)v4^J2-#BOPUNI8E=beZF,&SsK^Xg#F\kB,g'd=gT3o_WV2JY'
U"s1s\BK&<Kr2F-g)diID*C<d^VQ2_qKI67ny5Gr69wBiHiOm1hFG0qrO3N^rH>lS
U"7?$chKyVtd3(f$4SjzBOsR^tRU1YnqlbDt:;'QZ4QF5,r_=&/NW[:7=70Q4rt2)
U"?\Vb/+1Crn?cG=nKNtU(w;Cz5nfVU.7_z-sfCxId01]+bAo'MY;=5jl<b]GRx>F
U"g3Lu_fAx5x$+%d>M&Q3$JkkDvIa]MxL^2nODsIo,+%&H)dk\s'N[]HP36gs517S
U"Fqu+G*Lf<7)7q0PaNA5LM7Y\b=Q'4UFow4r1%_y[hf;j\7YA_V3:W()cv9N6B],
U"TB7/n<j741Lh,IiYL*OC+b^UXJF;RF2eTI._P(vI^4k-_cN%lGlnl3;naZ7:Qg0
U"wZVeB-K'Qo:4F:B$%nQJJjh9*UCO:bBj.>\g*nQ(8YyTB7/0X+dBv:DlAc:;tJi
U"DDR[ZMpW\H-76)\(2[wRlah2Ir4&;/C%U<Q)#%;+h7D_YUKsI;A_Nf,MR*Qr:3c
U"QZg3e0l\irVqV+?0+Ht>HmI+]3/.-C$M%20[znZ#\=gU,UmPL_eZF#iMqM>kUU]
U"MG8e2*f%L92TGv*+c<L7dAgIfgCF1B'muSlJqcWVTLCDpCbCPMevbSD>$-#60He
U"%&8%hNqZ*JQ=S_xuVbdIgl'M'EG(*<6FHkPaeKdU1Ak5pX%o=]_/Or>4T#zIkeD
U"hk]b$=s]r'7LiLC^bqrs$#aj%cZ_n=tP;;C>q/AENjEX4rHFMLA/WkleaC#UzjI
U",Rjsa=BI-DUBO#LZ(k5;Yf.d=0BWsv#QeXy+rd.$_Z/HDDcU8I9;nSxwu28KnKX
U"lS:ET^W%HxP*4P&Z-FWGN4fnH$-gX:ovI6Wn^CZ/uNdZb6Ctil9+D=>gHPQCxr=
U"qAA0pmHaTnRYtcnIo3C8NXe/kWxVB2)TJ7HX=l&x]]ZufMfLJ0R1_V-mM/\)=q\
U"1i2jChS%*iuIpSsWDVUDq/9eT[yD6pDfHT?:S1nsGh2PCiTPGF&OXnU13CA\X]Y
U"rj?d7#0xU??v;]^F^7#<#lkVf55-aC=d:+iYG;Y&G4_F:oG*$VwXV$jh4j%;:F9
U"vNQG+(J?pQRe2&Ck8gM,b$#)(]D;-Np>V>D2L9#bKrvJF\t8G-eo0a+X<8^cw)#
U"(BDk]4w1Tmyh/P[YJ+N(>U-f<=FSG>Mgu&6Rqf8[lVQBW'r0ILVwxaJsn&a3JF2
U"7I>$HKuQy^WJ\o2XXuXwsa#:CtMRVl/j)DL^iR.QnH)o__9+wfu^psVW2z:g?]?
U"RnaEJq,61R_ldnnXoqN;]rRdUx-ob<qacs,axlU\NLr<kjiFg#HBYBnEUCaYU8i
U"&,ppG%4g:Jt_\$DhhBR7vx3;YVT-UotV+;WmGO.TT6VvWF:r3+:?HL<RbU1%3zA
U"4-HJ_a7LkGImPpdYc+-3H?EBCn_VT:&c<L>SInzT%5f#<pkJdOH6jqDp2d?:Cn7
U"l,lhOH*_c$Wmil4nA9idSz4OW\UISTCWy_ETG76f/kq$tJaU50E\yapooVlglum
U"Ex=nYVYVfsQAT4zUrj$AJkqq6aV]NTFB+DJ[7b(cfQ)Qnd<]3eHm(xd\nGh8(nd
U"zt;X^>KA&\1QMeaaQ,eeM/kfhc=$WwZaI/wCwd&Z25mfKpUL^yR-%wFjpYPE.Af
U"BAY/o?^BB6E-NIItm-,3#xB:riQYIW)Do*8/(&3O0JnqOf<0-8;/_\tpp):,#j>
U"(U$GAru]]qPD%]g8QD49*Z&X.6%c<U08/g;7L7xXJ>0;?0mmuWpJOWzA#'-n[g1
U"X<9FAG-i=&^Clu+&sGd;4If&8T9)8HnHU-2jafVHk'%mJKH=i]eB>H]Bof06q34
U"JdRJwFARh4]DCW3]eJlo7u8Rh,4BCOOxo_2oRp/e2pA347:hou4>+Vq0>%P#(<S
U"nSXDgU96c:'z8sMWEMNtHNYp,C7$jNF2fH2Kt3SK9l.Fo?GPj$8fogL:U/NgAO&
U"EO6MmR+pIpFb(iEmp%5Z^1%2[EnVNsVainFfxk4.[ece%>pNIk&Z8BRvHu2H\b)
U"gUy_XI)bM3\;oM*L*#mPSZ<;/H1/s]rbsGY#ZSYoUT=7V?SF3.*j?Ap/kxj+x'.
U"po_).(#pXQ[kjuAKp?VG%%$=T%9')JJcq,V$UBP1;C]N&A4GgggK=/dBz\lX_#2
U"IJ:j0:V+,]Y.R0do4i*4#ZPy79g.F6:[nxN2cP<npQF5NM7?gS(h?P6Fz0UFT',
U"6w8pM-Qi[0k<nT^/;7l$<J[f$uM:H=iY.<<-EHaSkz:4&kgi#ani*s/W&>rD,qP
U"c'IRNLKf61wWG1_Su*/+,fr8N9n2J3YB;4^EiEj.b]jl]_&c9H$]-nHCLGKa=ih
U"ld%Do+qBP(C<eVZy[]83UNiMeY]i&O3KijR;AQ)hBI)3curRtsRC5_uW.Ylw=+h
U"M(7$:HA+AT?/YBuU0vXvFQa&tiIv_dW51&_%0\mq++?4,(FEb\7IBKq(T+s'&[s
U"+(<%3k)?cQfI,qS09>,5Ob)%6mi4KBd*A:[(8C4'.RJi,FUU6[>Uipym/*;2d-(
U"vjaG2U5Au;(d5bFJgTYuWRhBA#Wd(VVpji:p5U,fFJ_Oni$=bB_b;?(5,911W8j
U");h;[,Sxq[%<hqQ=BTz+JE'%q8ge$V&5Y7&-a,3FX9&n+7t(D+QF,cde7i#=+)9
U"0.D./fm5DAa)Uo-d40KVQ1QVV21%z5,kYu[d';ZRmWIR<DF.80]B^5qR'?^.0Kf
U"-vPW:#iX'8(9*&nG6MeY)XG:<<mODQP>tsIEADUOBV^E8rx*NDB+kS=aTw.YWk]
U".GrAa>juIJ>jpVA&xR1b/nBG#J)Q\bVn_W$H(3FNU=_b/<c9M62ubX=:-kc1m*'
U"m0o6i2jE:Z-,fUp71L<.7gEPxPCA7kVp(&jP,3&cvE^Lg4tXMF9MUm=KLg?'v,i
U"JjCgKgej\mq>M0BIFEl^TB:80Kap>mf/HY2MR(;SSZYaN^K_:)0P^E(5x&&fE1+
U".*(1Eo.+3k9%]'-AH^)KAid-fZ]7uloT1%IHpyHUu:OFZFC=x3,3&?^D[?zF--0
U"UZPd+TsCkmBWYLnU$*[Z>+kAo1jg#qKOr3/&e&+Br^tYe*AxoVjp[UWOP33-_z>
END SUB
SUB V8
U"F(9urXC#+B1]]4q%/AlRDuA9PCA?^a5RGpA*c1\Q1,>o(%up&'%9%/%%+%+%)*X
U"iMuJ79t%O6%%&tJ%%%1%%%%%%%%%&%E%%%%%%%%%uf%hqfx%xhSy&'yup%&'9%%
U"/%%%7+%v1n^KY*(te%/%%%lD%%%1%%%%%%%%%%%%E%%%%y6%%%ufhq%fxxh%Slw
U"V%up&'%9%/%%%%+%0v1^KWYh<-&A0%%%lD%%%1%%%%%%%%%%%E%.%%M#%%%uf%h
U"qfx%xhSl%wWup%&'9%%/%%%7+%v1e^Ko2'JG=/%%%lD%%%1%%%%%%%%%%%%E%%%
U"%?L%%%ufhq%fxxh%SlwX%up&'%9%/%%%%+%0v1^KQ^r,W%s1%%%lD%%%1%%%%%%
U"%%%%%E%.%%+V%%%uf%hqfx%xhSl%wYup%&'9%%/%%%7+%v1n^KJx=8WM5[%%,s%
U"%%1%%%%%%%%%%%%E%%%'Mb%%%ufhq%fxxh%SlwZ%up&'%9%/%%%%+%0,(iK0YP(
U"_)6T%%%Ag&%%1%%%%%%%%%%%E%7%%Ks%%%uf%hqfx%xhSx(k'up%&'9%%/%+%R+
U"%tRRiM6H(0O\d[%%ov%%%1%%%%%%%%%&%%E%%%,2M%%%ufhq%fxxh%Sgfx%up*+
U"%%%%%%-%-%'I&%%'=8&%%%%
END SUB
V2
V3
V4
V5
V6
V7
V8
CLOSE:IF S=184AND B&=Z&THEN?" :) Ok!"ELSE?" :( Bad!
SUB U(A$):FOR A=1TO LEN(A$):C=ASC(MID$(A$,A))-37:IF C<0THEN C=91+C*32
IF K<4THEN K=C+243ELSE?#1,CHR$(C+(K MOD 3)*86);:K=K\3:B&=B&+1
S=(S+C)AND 255:NEXT:LOCATE,1:?STRING$(B&*50\Z&,219);:END SUB
