From b22c45ca34dd0b21de9f95e9987a22d94f353221 Mon Sep 17 00:00:00 2001 From: Mans Date: Wed, 14 Apr 2021 13:47:21 +0200 Subject: [PATCH] Determine grating points for fill function (step 1) --- HLCt/Parts/START.SLDPRT | Bin 48111 -> 47273 bytes Wardrobe/SolidWorks/Multiple_Drawing.vb | 137 +++++++++++++++++++++++- 2 files changed, 135 insertions(+), 2 deletions(-) diff --git a/HLCt/Parts/START.SLDPRT b/HLCt/Parts/START.SLDPRT index fb2df7b3598ac85097b56f1afdaca5db00324499..dc2aec7973c29f9a65a5321787fe64edbb3cbeea 100644 GIT binary patch delta 21297 zcmagGbyQVd_%4dHbazODbayD-NOwqV8Ug88f=YKc(%s!so9^!J?uLu{JLencjC;rZ zkGb~TZ@_aOcD*oZ78FkxZXRlDc9TSLt%Jff26$lvYStS?*89*BVZsP zOkOSPg^VP_if;9Q=V;bhWVl{>J3J=Jn114p>6i0q%~Hh+O8IovbYKs0E11EDs-N~h z0r}2yCqvQKZ|DKVfF&`ao}D9G*&>qcpjmgi+Fgrx%!$o%L0{YTrg5~jYv}_>NTN-) zZDgJ~fqX=geNvgJEXgs^CcCC3M&AH#@q9Q`)RsU7edsch=EH8$gH5WclN_rB8Z7Ir zcvo9GcGh?0C-cvp?*|Q*7rmv!!l!3? zrUX8!mWM6l5FK=IvZ8nW4snO2t~HwAs`%<}NqPw^eKVb#G4hPdxziaR|LbAE84TTb3PCYj#Gvi*R68FN1TV|%}`FQ+Q(cUP<} zeikJAIuF+kQor@aQvZ#a^BKp0+kVx%g_pgF=O-5~7FViwN*`~t@3Sd<$5#gM*Knh%p&VE-@3#s)>j~P#owfOM=(X1n z0P?k}K}Y6_4vE*>_Yt2+`Zs{=kBNXA5)-nb1IycekGu;0im{MN%fi#e!Rfl49LJmv z%!#&{jCb?fjS3}PwVDOKxr7NALtu4Db#hsr-0e|Rm;EtaqP*pX*y2y&X{3eaji>XA z4K+Mh9^M>U75L1wg#0jDvlP0YP=wsJfNptd+s4e9d$;g19;Vd9BB+&s)QiO-``##T zJP(0--8G#uca<4E7ylz^u8dGij^&`~_XqAJXKCZjDh4Ij2rCPGeA3C5^8?##)MlL) zj(gJj5%Zb09Yd{7Z8no!%CCZIGaN@j{M)~A0E5lk0q}#M^w`xs+u5D~AKMD~iDa1j3+f;G5ic6*5{w~ePbvQpo^mz9&xXYQ_)hx(AvEA7{njNDm8 zI?=?~H%vubq^y!I^hZVX7QC+>rjEY-1V-E?{Qs|pG|y3C^4KYl?ky)OGh?#*%uc9) zB#zC1YXv!*_Ywz!H>TXbIO{dI$KXYnFpx<8YUqEHu6E;OSESpNh*@C;mXb zJJkOGE5&j6=c>5HLl`u@Wz;ZfiqBtEI5w~ugYC~`b$V9!y#GoYDCV75S+oMh zpV6E!A|<7{-{*GElPTEy>K%R>M4#a7@)kEa#vFpjs?G)WC1i8FJ_=ZWjv-F1^CJ%p zuhL({YM||#k?b9%?ibP)qmLMO#6=IF;Q5Vhs=_xp1INqH?R(pfVEkhPtbTicc8RyV zQgCHRFj_xZzj?p>FqC{KaL}0UR^;yDU7^n~LWAF*WJS;bCtYeoFPWT^1v#^6@jSE= z!{&?j$^8%rFLPb2c8~>XSHvoI6fq?s@(OPRKaq0Z=3HlaE zpRV5^{ZvZgt;n=4_9>RpSC=W~) zDY2LuuBB7~uZ|_bCW82`VP#jiw{X{oT2?mfKdDnM-OP%d^<&AXpVt*r-5KxF9gn>% z<4d)jGS;^maFcZnVD$y&on>txbuPbPW=n&ic5Qdsp!mm!{>M7Tgj^VpC% zE!lrn{9jA_-{8?h$4x?sQ7yuoHCEZ$QJ!zEtM&`+@jM1S1@!g2>FtDgS?1cXU}NGg z2>WlF>=zPLy(7beh5ow|pt1bFQt~rq&?FcG%+X!_=3wRF^Gq)0 z^TtrCYrQ6w`<#*(44lW z+O(FXr-i#AOw1K#?6TCRxupvGg4;Q(HR0=d4w5JvLIvp^SK8zO~I4+zcr7B_47Si{wwdc%3 z_p|S_p`2Wwly+3VyTkG%g%70d&uhak!a`8*)|}e9sF-`Yej5r)W-c)l-I;#E{E6C2 zvZod$VUl37%M064JSaL|{DUJ^fEII^VIL(pva@EK8c!{xKxiuLeXd10m8*3T%jC8g z5KCr!OQNVG^b-^ zb(%TF4)3f9xf7D94$e+jrrA;H^mfl^%n9VQPaHLcfHKd6GAtOfET0mC7 zvHq^f#+wn=Cc2sN@wD06$TiyA@e69D(_Q~-{V(zvX`AnS&uk23p_|+`vvPR=B^-)FAMOG8Pi>CCSE}W4DyPLr>FVUNQ*%l`?DjIxa@R( z)}p;v^D=_Q>m{GY-**^qAK<#=zWg|h1pWjY9#fc@qPLAz*;qlNDvqSO0a zY-*oqCe3^ywWg%qAi%sLT$?~cgRtTM#45emBP(oWG!%3Mewg85#nE7iLrWXB0 zzoTrgsRV-7#SG87bjCVYC50b4tdMldM#31ewL=P{4gP{z*^F0!{xHtuw2DA=$z`wx zCErv~9wvR-S#u;ISG0uLI}hMviMww~WC4^$s}L_{fD{>#(W%8*T{{ZmVsJGTJid%PNp3f~TBrPZREeU!vF-fGEZ%ohWJDZW~#Ezigf026IpxiITc(>MCE z@!B8U8z!P))~{v>?Ray|*Bfp#aBfVveGJK9^pMW-(^t za}VP|@(fC6BG_d~;B1L-Y&In6iUI|7XyOq*FE-gbS5-vvjbKbSxc7Qgps#RvH!aPL zzCstS{Ad&VMR_djW#KZh>ie99%F~nYlTd?eASe=I*-2Thh#^6A`y&(KNIo~3;%N!| zN=oi(4->w!eOjlTkdGIR2Os8C{(SY(J)xXimgid4GZYjrqpNuNV^ja{Jq?Uh*N>kp zHsJ^2^mK5WL4kF{QzTYcBQgz^k|X?rFOYvH+3N*BbP5yRzp-{)iW5D|MEGxU#KcKJ z_0#K#GycDM%J6zcf%r->asJoYo#yH7{IdslBC&XeM5=>wU$ja--br3PJOs+IF@O6d z9}h6)`B#rmF+sElv(i7&L$3>D7Ce+cpZpUpT>d0k#m)i`{cnRX2m8N2JW2?nBRB>z z{@eNI#zgD3p*7l;^CyXnxIzG)K1hs-`LuvW9ffy0U`kZpNp#K|;?EbV(7BW$|H&~d zC5ZOndHA=;cwHp%QvF*Tzb=+|sYwQmdjZwyZ)P<$|GE1geR#d*;6~TKADkbzXHLd4 z`fjgdd)S8Dis*cxGa3^(8*u>1^M9JCPc|Ou#|#0{^C6m$j{<=6RGE5shWUgKY1)Uz z8c_U^42Dm{2TS`pAchJHo)`%q*+z>TO&lKuJ|GB^K*fl)7_F=qM3H)P#C#0LOY!hY6!WhO-7!tOO zN9$D+q!=q-g5S*~7|;qZF8~1K-OyMiHDUM707;KG0d5 zrZKpt!sUd=OMEOS*lgk5JV`ut$^4|+Hy<>dW19LPL#I@$_QYSJ@&PzedF0#|*%wZ8 z#kj|suE7T;b5KvC8Ls?JtW#0HX%I8a>d1;Q(0<#`h zij4O6>6)A@r}p(OMGV2hqiU(PVVOsTm~pamiSKzp;wpWz=ZH`5K$M?!Dg-HFncO%n z#!liXADnfjL=DkQ!j^Vqz5=YG{P$U6#FGS~UO0=@rk{b1Q36N!?6SQL(mJ?|pI=rA zmaeqYw>CkyTOq>&hRbuM_wqLFDxMX^d2;X76atxJWrMoJa99%_Dz;=J*4I2p1GYb$ zR#BJ$%!B=UWVtH8%Nk{%re>X6GtIt~STnMX^VkG224TZ8tPB=OS{vIA&Vx%Ukj10K zZ+W$gVP?${9(!te+h`Sh1$+|UENo+qQyUMYBQ}u9ACol@x~zVVu`JY%B5!$NY+Qh1 zEJ>}dPmE|d_qE(?mX5*^&^Bx<|M>jW!DId%c+uLaS7o19`FM^}Fl4f43zBiHkVJQE zUnW631o^_80aoS4rP*b+5c}=0y zf!Cgz9_2}4n(AAHgC_HUoL_})yWDVtR#e>JggY0~*WR|g-`wpQovvJAwnRf965B+e zqUwi9!8zr|T<%>(iovJsz(t*rZ<AFa!f1tiNGa&| zm}Hekk4^gG6_Wisp_JWx3HuUdNP71XkXV;C>Ysav-%O9qqV)8%W z!8p{Y?l9Ej+a?`~*4TSIBp#^qy9aN1e?tqRwqj9TcUb(YRk{?6!(yw&FExR41BA#> zH^Y>`?3UASV{QD{TZmd~CbyGWDomg5@yyz?!s)EgbV-ACguT&@f`0({@IzD6^>Gd8noJTypsR+;B=NNx9(@=sEvZ<>AE|AT}mW ztl^9xv&2pzlUgy_2syuE2iV@B)~nF43jR#F_KZ;x`-ZzZi!-zTr7JnA4VOoPk``a& zsO=NuxnzuD>I$zrY(ZiJfrQBONuDW=-cU+OX`Wes-ZI<+*QCXYaQZ>oE(zTARVnDG z$=X$eDOe@jOqi`!>7tg7CHMCrC&D@x9NPoSZ3l0lG|Ty?Z3!=2Z=jK}zD;^Sb#8_{ zY>(C4n6BaCYi8cYBUDJu@!;xJb^wo{MPgx^c2|o0Wij%B{8oBa33C|1S#YwvuS0)K zp_lhmMm;fUOoT4BB8!uI!%7{?T>td|ow8P%TNk=ELHPp4Hs8kD6ojiF$$huhSJ+;6 zYqrt|k%qfkW8z=9p+FIO->FI(=KFG|>?AxD%M{(VGo|RhRZ#~)WNT#XIHopd_1Yg# z9WxNh)#A0pRlp{K;Msmu$yP2Ps2Q&M}6`cK`qr<1C^6C%#NAwZ10>gw>vJrR2P z5NLIKl5VB8mDbq&0tNaAC(`8GQXJtSLd0s&JrJqFbh)z`X$h?A$?Rnqv*8P99Zfi- zt2n-m%@hA@ii{KvB@Smd82oaUJD50zfAz)KW)5-G${*{nhVp>ftzqRh_|NFBX<$4` z^Q)Y}|M4j3U|G@IQqfE)SQSzma3{vGw%sS2zD3Qvm<2BB|G}Ii6KiM-O@S#HH-tzw zlN(8o7x*LD84%>B3Y~J;a60^XOtPSZ7BXuVm4zFtfDtsUy9??SoP*xA+w3R~;uRZ_iSD-GEe!V)jd80PtwcIpqUBq{=BLKu zkMbi9!U`kS4(nIo$qu%Ds~d@@2u9q0mT)Thn1=q=6rh1>P~jN<{tTXAN@|&X76^+V zh-J(d_ATm^)sA;|zdr6pT^zb(CjKP2wqbp!obA&aXK?HWojnyhFkSj~V>xb(#eoo6 z*r^y!#il!6(?pOoF}5G-W&o!$)~-{tS0}O#O`M>J;hf%iZTiU>Dl1((Lh?fR0+$`yU58{o2P38O~IR z?MV#ZkFx~6{}kuzZ?;7;^XrTOQ9~ZoU9U3+qFei(59b$&hWw9?7 znF&hhSHDB@|2iV?WiiiazsceNh8sWNXl(p~zj_;`1EfCR(zpnHxYI*IhT4jh%%tMMQ`)))nDe($N)>IR~se zuK0hR*zpK8t|||(eW6#ziP2tCmySx)mR*SI-SPi2bA}j*%27IT3c(?i{9<$-*@xd< z0-Jrh@iwoiK8n z&A2Xv2Z~CgG98pe`t}BxyKK5z!mq%JO;jbp6t=|o*}_$PRDtjykdn$8=EmyDdEnWY z$&W|`DXu}ry>l z{C#Jmkc@!)SQC8_k!laG4>2YW;?KMfG|>!EBVlhZCWvFN=6;6-u8u?=imptlhFO32 zT&meEl)iQ{^=l>F4a3L0c$Wrb%K8#3>aEcnyLDh@wiuzR68v($RUFy7`KAqu@RU8- zRywCG2|UBV2w8tG$M7DBOY2sL%=2>vQ#yQek^JVI5OFadi8Tkpynyu{ID%J2U?aE< z1Q8{#Kj3&B&|fybR!IL6?JUP7QqM1WDbcS9=vE@ zJ8X!+DmxZ|7N8%ICUBIpEi@<=dp5Ebo7PeSgVoj4O-B45 zJ&oyRt4JiAT~-+xU5fyeG7K)j^D2ZwZ-lxPwHARm5&iZ7a_)*%7p?+0(ZzU+jnw( zPS#3TZkLd_JG!Or~f{8I~ZCTtaU?a!*NfK+xW z7ie4RCVF<;MG$WiHG4kse1^)m*hbe)?_y@ewX|c?F$YXKNlL4;f{{EhJI|k9CnSEq zSN18N2wYno=?;Xp>KiHMFy~jpsyec^e%5u<>h59iNKY)k2tZJ=hzQ1EYk)7aK}-$a zANIKV9rGL!ym->u=bFX*^x>F;Up$1^j&G(d>yQ*utb-#KkTSkoQy%c^cX6Rp=?Ms14A6~i(P?^B|QGD%26lhAwO&J z?2cB=RK4B|{m{vWmr;o7StKUIg*|CzT*p`UC;G5uh*8j(JgmNz4&`T?Soxy-U3A|% zc77tzy-M+F^%-6~$(hZec-L-`pM-i6k2yE0W}XT!CwM=d%oa|GV{vRFIAYLdf(2K^ za;Jjkwxl^%XC6M?G@7_ zar4w1Q7hp$7Z^7h@i9g!Hc-mWpN=aKi#_=wbymtqpF|9pdC_tm%?Tu9(Y@z-{b1-z zKqX<&aU}fK++~^g{zlNU)9)U*gYz@kWP*@+fKO~=V>^1wP=)MZ!#9#_Y1=Q#im!hl zC%^%~GUakucG~26uXy$Iixg_Z35EjABCq0$e)jS&b0OSjqbMf3-3yD0eNhLF<<Hc+2eBaKB)>oB}w^Z@!#3Qzrsl)1%Nw6tw||TGY*R z0JI$sYa~hTV*}DHvccNQmlc;)YDsOxsh$q9mu=6iUBQAvO1&jH54Xpl-v{SOCU0n( z?Yu0LcWyRO??`^-JY?&9cSIMD@mhDCN8On^724KU2Fep79EnuJDpevPZ)7J>i^RE%o<;Q6vW-S9T zmKD#M3qzuuk%tSerJue~s&vh^*ewsOm<>e5K2;aLz@)DPn_TlKks8Y|h6#Q_091IH zkCe3gHJEeFISLmr(Ew<5Lhnm_cSl+Y}XL_!^r*ACB}0u057W}U=GhmI=cH7Q6u zwUzaQkcqQmu8N90VD1~pk&1q7CIS&ket%iDl}PbO zDIVm^RNU@3*)K*|&g@QSQg0s4EI^Dc0w?2q5~{)Blh$*pcv7lCy#NbB1J*h>6+4+v z*p}-Q^qM3b0b9N2-7qbZI$`Gpwt!Qz)TVn}536$XmRkcBYpoiKm8B?Ek*5{OyrbtB&2u8NYACr6t-x-kc+XyJBm4;n&@Kh8dS0y%60SX?-Sf z07EU&fakA#~-D1fbH&lLj8x?1mKbC|^L8LvOw4A=$ z0hQ<_Rks+yQ~NjxVdt$SWh2iD;2F~mGg3d^lFif*|J!)|PGS&QWWYKhi0?}(gruWZ zkkeG&kL?SA;C#4n)F@Mb9@Jp-H#X=eFiH&?6nd^B=(zk{S1nGX3(1ZP!qds!~P_98zo z*e#(Ra7^kX;WF{CY%}diCsyY&iX8GJj~aSFM6`qz7*T+mU&cqg zcRg8#AKTM?z&AFQEb?D~k<2sPj6SxbcNicVrQ@bLr$rkh9qhHE(agY0REE2rKByjB zbg9#qS$xCgP^WW7Zcjv zckk|w5d5|mMc+a(x^w2aGc#!~L5juRUHCC3*&sTL=hb22CO+Wgq0oyoA77;JGv4&HiVxnTR#>b2j0i_DaRmkDk^OX zxuJ-8Nr74xIF3C?Y(O8tSv0_n`XI1!6NY%4s#H)|r$RXlFW6CDWbSfS z8*U1Iv~PRt!4p&@TyM_om_1qzH`u-GaZJ`<++TR}yz6ET(OK#=9lltg6h!Nl@p$sN z>*<$@;frhYj|V}~liOWXo2<7A$OHVU_S0petJeh4lhG#SYb-tVCvsF5kgDGSw2Sik z9Vea`oUzBWNGdSOI}nJ~QgkR-tTqjuS|-I9v`R7zM=i8P=KQraX>fMzg2hfUh?b#W zab6U0wS>-|CHebJakh`w=7Pp4&2k?G0-5tzOz-hiD^nAm)@SquswmA6@68AHcvhU8 z1P^>dchVgjS_JzrvR22-76M@av*CExIYifAqLfxF(gSX@z>)7lbvcfv%vKnFF(K>4 z#L3zzt_i9ST_nVc`w8EGmYq5Cp-0tYLxySJS=Z>G=tQv>r#j>@vf>w`A#+X7hsfm& zccMoNe-5^e{+|NDpk2w|h40cVdi|~qLn@OvV6e0=i9KIcc&rbaTFu9gxiQQaAU0^vP{$l2lnjw8*}t46%hR)xx;rC4p$C`ngDG`uaAv?dAe$rdz9)_mR;_8 z;2Xwg1~>HjvywViIlvW#aYF)AyQ{f-37MVL8D?EwU7t1P!{aTHY5ZCR%}m16fByE4POQLh7WIWnu_$xiNL!-O}X2@kBU zk&`}4RU6M4Q$y`;k>q1fP{tVTReRIp(XkDWXx=d}XZW~@2Fj`8@wgypI3q9!fgKQw zCzLMUdYK#mZrenS8G}?OjtP_!H|=;R1<~)NSyS*e^jYVA@rlj!@MRTU_*Z$mUlWPN zvyTnW4sahj46W{FN}a!x|GI|x{`F^rwdG5bUGds)WmvfY-3=pu1dbhLwalzzH$D=X zqet88}&G(C}Qoqxc+Xyg*f~{m7-=wJTgqY z#2BxL7D#%TpU+_t%*VhKR|VNHc5SA7!Kh|?`8nu?^4x4zCIkpoF*a_w0KURarR90; zC8$%Y&YLRPbo?N}q{UyvsGoQt1Y8BG4YeZbs5??Tn}2{D&)&+^BkJ6E>&^I)9uK)3 zvPm_DFVbVRAL|ynz@N~ny1kV+L!;)xa<;t{0*>`R*W?R^Cd{6Wtd&SaqCJV#T$4Qn zUPga*rH?zmP5No1J~o2X(-!_CfOv7j=S7<)%APYt(d(qh>%hCn3tHjLv@RrkqrSR1aU-$-F+=fitF+RPt5e2a1e? z;Q{i9>5pICj)MGRS@g5MI61VRY6LRZ+qz#18^B+9=DnbLX25=JS{BN;@tQ(9xAfrr zet5OmSY)!GC@U3~n_4h~^sT~>*<8{?G&l+2$V^BPHhRC2Me_Gf3{nRWW`cIlWR_Y) z6%$yM>kE#!_Oih+k)K>fk1Z5WsDZY3{{aLliSs{j7nzi{Oz}PUIGK&kYnWsO`!-yE zfOhQ^`@Lf`32)ASbas~NE&?qzTFGze*HCSW(Y}naQDsvD(G_j0O+Lzx5t1kIMb1PaVsv2nl|2yh@&Prc;lZ(SCi>3ws@>8M#9^v`LP4-@sn{qGr)W8K3eT; zJOT0$F72mh@#%;wTWjIDxG#sUhxmTRAjdT0AXoJww?5OXshqvRyd?T-9hqILNDs@ad9nUfx2^+ED(kwb<&gqo`Y z0j9GhP`>wHpro3_UvuZv3dp+Qzzk3=Kly3l&PYYAfnZIHJSB1(U*5ww-j47@Pf z$O2S8El)}fA|U;2wvS?v^c23$ulXf&=P6E`=@Flm%b(ooA!c8ubgqgaY}f3w+c=Uy z-#C;o4X8@4FvV#BmSXOA!{rK=LJw*UP3}ntjTx-ZT06ya4Jn7&cfH7G)L*zHN-g-A zHCQs!6I124s|j>*6YT304LM@;Z5OF{K%cTBYhRR=QucSDCeEiA@ZVHcdbTZR<81dM zCunQlpVs^eV6FMJRa6rIF=kgoiW)mmnKAWv5^J=7u-82UXs}dz?-b*Ul@4^)f|geZ z?U%{%#zy2qs|-+kMa&p>=9U9(3>g(f+oe`Gu^j_+Us$g>LK<*h?ZJ4%uF`CWiJaF@L;C6WL(GoEArVpFEVxp{0eJ&7s8Z>@_R*iCRxV z7K~$~pFoIN8AtESG7LAX{J4*z6183sC}s-Q4E_XZZi%$b5jrrp@BknA>A}?unu57F z%|4vLB`P@bz%?bF{?)%hL<245o_FkNfa8P~@=JZ{06R)W@AS{Ia4LtVwyF(fe+>!^ zhF4)iGiE362$EJtOcN?d);Y04h|E{E5(ecQs3~Ti8UA?~<5-hjvCH22FpiJBlz#Ra z2La5m8FGgw3OE)AV&>DomfL$7lFD#gcHJ0pR9kPp3evnMN|oCLWUf3|9G||#P5?^ zv!8FIML6-X!sfgrhtVcqrrTdhlz{z#eP%`(vK7Cq&a0qa_L*^j%t7#A?rAKnvRSu1 zz}t*z`DzQOa=yfWxxWuNV%Ty;hM@?b)Vbt~JXqBCk36`~^B+seQ@7-meBiZ`d;{jZyNpBx%vd!6*( zx3d`QbPr(v5j9nLu@oJNufcph=TOUe1@M&NgiyY;x(Y{H%>j`{U>D(kK}AqmtflJ> z$+{$w5bf#XBVzZBypb^#e7%owoMVqTR;ft&>w|Za+v&TpQO+qa3uevt86_4r_tWc> z*NENOhUgwd|8tZ9AI>{9NN8h_}_BF5pUhR!uVx@oyvLF5o z(!UJls-aG$C^Yj$w#>}C%nzD=Z12sYX|tBt)IMhDV=*>p{~HQw59yjvKupwtzIMvl zcI{OiMu+UyYY0) z>`%~CEbAH#+T?+*v^a{x1hD-k$#5DL9fF6l#rmOzbz--TVvh4Y#a$ROq71)OSkdpW zi=~5GDVz`vk~2dua*d!n|33R;X18$6*QA>D-#+b$iH^|KZq>GSu~XpPseo-^dP*cfr08zYu1wG z%?y7uE7pr+Be>r`8-$k_ccedhtzBspiP8l`V^HHWE}Sn%t1CCZfN33a+u48B=ia z9pOph1|?M732$4|;Pnxz-AR(qI7@O$l&bzunS}Y+EzV*mo;h8x6KF5*{7LTZs9I`o zO^NVe?^Vf-1I{0Dx#vJ3(+vjlP+OJa&lVZkHt|{ZXfpA*%Uqqu&0lemkL*1yk_Sb z1KYX#>1xy0w7zjJ8CWo60r9u@I&P7!h-@Zl*cc{Mgs=S#iP=L;ZJq7M^fTZdBP+v= z^c9p%t|^=d&>PZDa9JI4*#7mPdTP-n+Sn)v)WWyFEnF{0i&vnrJ?{ySa~Iz6GqA_e zr|3%m0o)MQwo5N4FYx#ljD#o%>5sIZFB|A$rFRW(A-WGqE4;6OexI0ld=WPvG+3|D z+HSsk{6L+TVVM0qs4x|%D`_)LJ{`Nj^A`p~YHQn!2-!B|csp1&TibUjbu7dF(S~(Lb2qMm^^_Qve@K2M@>HC5iw-9of!Ymh2jxG z?-+AhHIsDkvA_%BA4iXPNAR_5ZMcomckus}NZR7*b4cAN$aU=1K^pNv5#Sid}ylotSeZ2)xD;6hWp5y%+HeCTv zBcH)R*~7<>4bfK(QV(%?>SztE%W#S2=L{Qv^S<3o*VjPk1!fChVm#8p>zq?ySs!w9 zg^4^c?-v3V*kk_T<RH9oz~y4&}*@15Vb5BES0N>-%uJ2$nyrnzjoh+ zNFGh0x5)XRaXKr3`*^bb>lEeE+2(lX;1xQ10XE~dL;uqX-o?N*RAz?oHLM^0%^qTl z?+h&r#g6--fW)S|u;C2DV$bk}LpM1LtEipuKL61q1oPQ`=wTZ4O;XU}v2+lgBODx~ za97y7>)a@KXIFe3Ghl4xSJouR`aDecGy6!H5IEV!t$B#{bI6eS-MY1zb)vW(dyWu{ zIOUR$o5>#OvmFb$e4ao1^pzRYwnPpVT@bN{sy4ii!48VtE6qG6_K-PBs{ZX z75AX3AyN7uN)r$KMf1Hcj}>&U4k(J^Atr|0LV@!-L7sYM zmKrd;Bno4}=H}kO5{9isHjpNLs{ z@!Gs{m9!NfBMH9Fe}+BFc(iK&9OMCLs<@{bng5X2<=cy;wg6pOV`t&2t9eMKkw0}= z^*(23cZw3KZSh-0>XyoDFZ5EmG`UqS24Ukhv?l)}TbHv5ju!+b;DgV0Z@$=Wy`t&n z_HnV?W@B;%Xi1*nFJQS{e{@6~8wC zRy1VTl<|nE!WR#zz-Kf_846*n+O^4@lmx_T8{92eD@qUSuAfN_+?E@CBd2a!oH`{g z-w$9p|1bj10rcS_=-1ggU&MH32EbI`&LVL^xSQ?qQrtutAZG>)d6G!=<9+#V|>PrCHOW>~CX zvuaO!F80@m)g>yEKB3<|?mds}LIlA`c9%YNp{=Nab|KiHen42sI&20hKwte`j)H z&P`jhIh#@L5w#z_j_4omf4sohELLjA`gaRtH@EHkT*`vHqjj z{@RL-!2Ekyj%tB{<5CA=zGXUB@awrwqW~;#Pdn3g&Eqnmx?|+ig z2cHToAn!w-D4R|O=K;T0&aP~_NM928dcbjx1!MouIUy@F^~5T4uwGXKKiz(*U`&bO z+~#rtGeCEM{Q59}G49`V$@hpSrXt|mugd!&4+^u#*JQz9H}<&TGDojl8PM#y5cub5 z)WsvNIu{)BPzhkj!Lj1RMOANu5%O4ZqYH|SS1PqRv6m>lSjSiRd%jXj2gpF>_?(_+ zI_jdbD*B=oQZMWtxabW`53g{#C5HKLTNTJ`sE`10@V3c>m0+IcF^1^ywE!mVV{gzK zT1jD99kLXjd;73M9)-mxQceZbXn(R>mq7C_n|v|6>+@PI5A8#b*%bRSsyC1`_Tl*co2rc= zne7qhIa7nE+KY$FkzN^bi1EZ4-Mi?MPF=oJHFx1Fqz~RJ z$1aOa1NJ=?sSCq^>B+fQ56Nt;$3YlPd{z^H$bd1$QMV7M5TMsqn{k1$NL+kma>HfATaMC_YSrMZ(e#^%J;Pei;ADt&La!Loqf7%a8^t0up$ zM?(6Hvb7(kH~xm~)H)rV$lT}D6cU}!PCePqo`YZ0t8Xz>9(A2Ou2gp=dgOV}u;4+C zE%KNf(_1elog)>5>IURo9QfcVnE7hmh%Q07+bAD>GI?|3ohSK(Q0~`>zMGvRCarg! zGP!%_I)up~CSJ0Z;KYR^#@r%(g{xCRMAxZTnFgrknA>`Teo5O6%J7U1Rh= zJ<_QJh?FTWW9lK%B$;vhLTjwOANu;C3inof*L3W5@lV2zIUxsxe6ns!H@JGHQ5%%3 zTt8gSxF|xUT3jb7B^?;Og|!lI1N|yqs=hgX6slGtBwL56Mw4~H9P?WnCM(BUsP~*!)1rRc$H4i-Qy?<-8_&W)h7Kaq%EYgIvhLYcT}p_J=4lVw_pmWZZWy3;VYRGvcEcX0ADf49AZ1#m!scNo#@&JHIKr zzUdH+E%NWi#QO|xe!*#Z0&lC`Zl)G|+B@s2zh!;P8baWMOfr{j9!`}tALlcXVQuNe zY@wupexgEE&nCZ~@LZLbJ6s-LRIZlZ7^ik&vS#n)qyHmEuhRfK3BGh0zhYq{JhAe)#^+IqBuBpeEr4q~ zo%E`Np?&u=XQ1^LeO z0eOQPcIoG5#v?f7C&dHgf(xQT@bV2$ZmyGfP+*uNXJU1G+LNotbW7W*n1e3r{iH#j z68mDS($xMa$GwXERa05MPrV7Gcbt>%VPWCDZj66T_Vp6Z4$B%mP>JBn_8utatzLra9fn7i{LXc^tc2IiTQ`_m|WO z+xHy!#Je{lc=-EY*VaB%`pYvb;Pcp4UbR0yTkq6LUrWpk;HJ8dHHc}?Im_=9zI3C_ zu)ffM?B3MCwGGuP=zm@ZqZZO1%(rtqF?PsGiE6bl+O1^5!>4*w@pjIIb@=Au%C|N6p3hA=#&Edm=Y+O(v3YV}qE4n{ zI?u$I@2i5E4R!uN?3hFRS}w!zBD{y$-VLoKnfhQh(PCub=#L$$x<-#Q7p9Yj_-l?d zB#1P;xa+1+`~AUub|32`lp*<{6y!&F!#Se5qsF&12;{Eh)vc5d0swIU5-b#kY^&Fb zdpo*a;wharA0~P>Pi0inGbI>*%e#DG*=PYaOWE0~r6YA)1@4L>mi8^o6v^+S8HZDl z)O=cVjM!4n-$Dfr!dxgu%zEcSFVabg^Flf(iVmxjSc!uiD3+`~ErTK_;qst((ZNH- z6Ok7Hqz!uEv`0Lg_UH>&X<{o6LX(!AKwp|Sc`Y!%=19BE!5R@|>3E8!P@hAGTQrBZ z1^<+Q-~>aE&<{CDMmcL6TCrAwqF|w(TnR*o*D&+IyiLmzVIhq>7^o}{t0GmFmIMGR zDq|Hrf@?wm8UP>(KUSItG?gcVVd6vBd{CqjzD@k9_oU4TQe;8w@gEEgY8&W>O3aC2Roz)=WB<*bZdPP)IR|ZrB247AtIKpL{uI zHV~c>1M6Y61C?q+!8+2*>sqgi<6B|urUMz5EG_I{35c%3Lu9=r1!chFRy`G$h}kqn$#Egj{~nH#G>Fm&)!O58p&n$KaSy`j8Y!dNvNPyV)^AsADk4E0^Wjf z>puYiUlko2@zd{_|4VKWaS{hfmGPjz_&^b5!qB!d>@xM#NyJhJ^`dn49l$oEWj3ithg+mEx)lL~LsA=q3m;m8bE+GA^rx&Ox;a$Cf$!%d#3 zq;OLzQqDJzD;)kOEjBN1mDpBr6t;)Oz6GC0 ztM?E~Y}P4CCdG?UeI{c%_auG0`R49Rno--$dH4FS&svq{J+D6veD*1$Q!0bXK^tRA zs}BF*?F4*c79IrJxl=QnGzh-Rp9^EF7tFRX-!UmW z&oZ1j1DzEO=U$UT>vo}23#H|=b*n0L{RY@^cwlt{z`N|9SuwYWmC{-G&ZjlPvXnYi zJ%95bI%!!~irU%Hz2E~201lk{)V!IuB;Z-=+fIWPUYGVcH_!96RXG;c?6^j-Y5-vV zv=g~c-rMABE+f!V%2m-*v_zyS`N);5fdAt5sR9`Pp~u_9DxY)H-6933BLiXvBYW8q zFR`LGuZlpvcl53B%#XB~q|;t4 zLa|#f(FrbI^tlrpPcO3*APOIupR@?uH9=9?xX)m>2yUj!ILzx4tn3xTAUd$TeFYSi zr$|1&M>PDNkmjVHJQ%Db@DDp8B0=~evi|etj*lG|m7*^w`Q%Z%8}*ELE6K$|+BJP= zKZUbXAQt27xWmAIbM4ya=xOV7X_v?`2fm572ifru)#^Vxl3=XK5$>Y5=ENC2TVQKX zP&;euEW6ME%eX3rrL$MVx`>!kl~0R5YbO^s?c5TBe@9!jD8vt%+uQHG5O~)qY2I!# Ll|q*sES&ov7gW+4 delta 22129 zcmZs?Wmq0fuq}!N0txOC++AK=gA?3cg1dW=3GVJ5BoN%)-66QUySrVIoO`~z_jCVs zzZ9#gtE*PkOive_L!9115V1J9$bo@@y$f^~PqIb>g9d{ETWve_tc3&vJAV6p5j@s| z^OHn6g<2p{c-Zaf#}t~g@_QR}W_P9INR=rwQWa(~xym%u?i@dM9 z7?SgyKEQ|OjQYjqnxXL@zUBKr9t8t?^R6P;+xY)o!dbsL8~FzY&ykG)JmFSHRNZoT zc5}11VGE;8m0t$%MP^t+(yydfw@@M+&O1XkjX$Kw=nN!|Q~pDKmH8Ob8w-Hb0Arz_ zM9}&yoMW+o?$&)+ebP}?9jU!4bG$95casv^f0V1zAWP*h$nTPYf=J802|9=NBZ z?HNJT<*h|&s}t#mAlkwfL?{ue0CZT-1t7%1UWdlt)< zT8AXKK$}&^17};A5FYi1HZSA4@I`+c6vPYjGIsMjbG`iZu*Ibew0oOTaam| zG)R%*U9S0csy+<8oRCMthj#%JvH=8g@P2e_h$Ck{LbRvsV%a~pA??wU7nZ+>i;Fru$SixH~MyLmOsyC4{<_Pl{`Y!m@RJ5I^YoW7UY0K>o1CC zjC>lwjBr9^-qsd;Xm4?^QhnW}P|vxM$=oHG37&wxp^6k>f#cepmu+~0k?M8-qfwP& zP*A>aE~#pWx30DEMw7l!gBLrj9~>(35r!}AkcfQH+QT$+U~W|WsqBGTS?{w$taT)! z2MqVT+z3j5_4_rATlw|h86Og7CystVzn{4Vv-lAe2AJOrwZ)pOYLzsUbT}lw z%q1Op{_NQI&!}W%nf$FincGNKlw-8-^N_Hk*jLS(Ziks$zxstkE7K2%FK^@Hg{6+# z=Zfol{o)^q^Sb%m%k%5BHO%*8Y6N9b?T0=B8tdiaY&mM43fH3G;H26(sj9+f8z0GJ zvpZ$JN_c83a-K*~dHbCQKLOoOGyGy}j1rHlr;HDp%j^j%b(1_tfdd``#%x(fClqn9 zh_<3`>jR+-k<|9F`trO$x-Md%Q)pC;OF~M!i{h(iha`>=TiE1h;mqkf=Yxf*O>U1e z9%T{JI_r^y?Bj*TWQ*Fo>Q$DOk{3ca>$IeNshZ=W4Q3MKAv5;_H#TvDakO>k<;K3L zOT+KZQ^&t|3Vz;JXXbopzJAV>Gb=77%a8CVLc7Jj^eB=xDwn&^ z|C2In@S5QKg+P*v;eH8yb?)5ZT`?ZJS7alMhLfEk{JbKQ zq>hYvEL$91ZUI7wf04{!d~kviMbdw49Q^nH|Cf+sJMf4pvON95q|V>xm^MWvqf05{ zXe%x4!hN>%=m76L7e#u9k5~5i7fKwK)j-qE!?^K@qGcaJ`9C=7H*-F`nS=iBfAc$e zt7HNqRP|nshm7i_$>z+_W#r2_=b)5#=u+iGG%0K&j`7MYmz@cCNN4qx1U%N41WQTNy> zTBYKO;g5OQMYbdxoLz^i*Q6EYei^d}!bebe49TQJO&s0eY!xC*0kWzDi=5G|k?15* z!0(h?b`7%y^6pL?=>oF=h5l_Oh~38oIJ!er^mN z0z=AM%d37I(uUe-u7&YZ_g=o~JM)DxKuzV(v~?Qltb6RKukKS=kR;+ooI z!C09Go+@STvO!yloeSCYZ*=#W4kwBAwxbE$>|07I&iaM#31hjp`KbfVC&EH#HNcoR4vlZx8+A z;kw2cDYl$rwxH>Q(M=DtpnR)BE?0SFJ^k=qa)lp@k4c$VG8&GuP#1XovU!_Qy%FI)yk@frMDl@BYq83vpsw$mRZ*|5S&Dh4W(xDM$ci zB>cq+JZ`fX1$x`h4K*#F0p#q@UTJaURw-;U3N%-Lex7{HAv6bV7iYu4fovJ!_FYY!w`-{h)7c~y-?p(7B@%-*|Pkk#dnT5yF zjSr8W&24iJ2Pbn^VhD8O#Gg~zG@ese7j6b5<3nUSnNtZuB4xYU11ifP1$uERjxJ4*$i$V0>KyG>G{fEJ-t*7%@IUeXeh$nga^ga$R@a`(h>~Rp@d9Mq^^Ti#bUQMf1m`Dl{cjRlymJ^_~Sdq4d5?yb)7{hc#EK-3?Nq0)!y22921lRK;9E zn|EJAwa-4}IV3Sp@o|s+BY#f5e9B}t<)K#CxXBe%6}}k5LUHLs(3Q7^!VRSqZ$E~* zHHqr8zrkh~$yMY1N+|_vu&=aJ@=9@aM_^xB8ILb;r~)*`P~4t1v$%HI?TXF=tWa z_S;#T;DHBPJ(#d8Y_RTA@=o0Jb<&S5+lc6X4%&Dja)2@;ooXR*mjY3tj<2|)DxH?k z|5Jx$Q5B3Brxl$lP_6Cz`}7^{FdTaz@<5J1*U{t64~JCG?#39eV+r*EU$`J%i-g%rUmQ2_&eBEG3_R~P~XT0v%IW2SHP?uq!l zNr1_qujkel0*FWo8Q9Hr6Eg1E!+hg>lysi zfj&hUi9CH>9Y4?m4_|iL^`x8!`TV=e;Nud_&&%gN0d7?G?}|)LQgdw?3g>D2j_Qzc zGa)e(l$YvnKH<(Xy7K(m`6V3N-3ulff~jPw^&Z-$_$8$igkVyUcb6B^^>ZgEJgPx= zke6DtClx-f;6!=6pM?cSPH61M(_@8@G+M~#b#utAyvXQOj3P=Y2q^rLX_fw|;XIy; zl)KlB0$``YYN#(1&iQkYOJeeE! zyFQ&;^u*nD5Aqu@f#39e2V8ACMD6H_Sc! z#>292<0O7jW(9aw{I1eQQ}vt{byRg9LXttHZTnl( z=!35Xu^-$aI<_1|EP-rV3WRR#m*d#2VjJAuDa2Hn-26u^)?En<;IfgoLs(7eV#b~^}yo2G{On9=ap z6oF!#SW^Zpgg=vi8u-hV+^QlNVBY;RBn1TeHy8))p!_HG=Os+qOSWa~0E<7qb4D7P zm2En5Lvwq6h8pKq5{U{T>omO4`%92$9;x9&3Cp$X$KeR;-{(l3TB8*rTPHL?G z30+9lfT+y?23GPpc8rq*fb~!mxxImsSAQ4sot79nzC=#kTTq|_P2+}4fi3H^=@7Z3 zkR}^)5N;?gxV-#l$U$Ns;m=5za6gVDJmlYD24#PzM1n&16lrzX86A<@$=jz(UwnAs zU!P_3Od009Of$M^P%Vv<8>HE+T!PuzNy{wYAz5=PNf|+2_j#V(S#E*SOak~BI)VCf>pfdAs6-|<0JYqQ z{5%n7As0{n-nyOO3`k~v7=t+#mmvR{N3A}nwnl_HI0hlp`?&$*S4I4jEMzn5Q)J+3 zR4{qFti|1m@_z0W7%#JToz|TMWQiOmMVx=XEhQQJ3h0y0uHgP=e6*Z7wVMswy*v3+ zx+$7sCB}3^b)f?R8Ps5{1z_SdczW6r+9rDZ<+%@4Rxq=(5n%Ifyn^9iDAGTO-_J*q%;YiNZHO zPv9uR-$e>x+n42RxwD(|OU7teGTGEpZdoY4-OK6J$wBd$!v*Nce()=PxwVbzabxWo zmAC7PB6&Qu*rw!W43QmFDAw@v+(nIoM(6Dc(g@_b3GlvOCn>(^vsC_fT_<^H(~4s+ z<)O82^WO|}-4@U^(G;OASBG2D=Xw{S>cSOGa05t(&K#=MK;`3Tcac^OI`V1n+#o=Z zwIfuy(!B}%@9l+B7KAR?EE&2fCzYy5g}yy2I=TdCXi%8hfruQo1E%{u)3b-&SysLD z{F@*BVS(S!uPwb!S)#>dej5Z@p+ghevhf)Dkwi03Exh=1WA8q0yv}^>6E4p}zhKf} zLH}liw{|*L)XArWqlO4DH$^*lu8yYUL#He!$+)DHpdQ|z-K??VRpee6#Sc^i$zl4- zPswSXE!ngwMYon%dr^R_uZ>Tc=(**m<@%IS9$=2gz#XbuH}xo8;%oevAKQEI*c9k53(?I7usX}wUPH>{F?^D2TUmPTka(z!RCPrP z<)=#m`yaP+DM3G+Bp{P1Ia9YlPnI~IaZR%pfkDql%C3(+dq;gyy~bveSNisb8o!SeLc4sbWk7^7sl4h*9M%zb zOEz*jE$Pm2avtf%wsvWA2FRm6!otNGentYq(ta?#8047WpfDzO3_E2l(dRkv-4P%5 z4#7FwA$Soh&~V(xS$=C!-r#F~z+QyQnFj>YW&5ETNcLPshq$6EM;J>JNoo@wJW$DM zk8}w-j$G=;hg3Sv%4x>-bFGQ<;izzAl6k^AO#AtL6?d6B_Z5xMw(GfdZ34f=Q?d5n zIBUyxj-rGZdAf}HY8&WRETSWul{`4+Hk7b%)lEY*!@6satQV10Q*z97yr@Dv4FldV z?R<7CE%Yq}(Zzj^gP=nv|C=(*YQuso73x*zp(BOZ(2NpFc`*ykbp;JveJ2yom4iXk z@dG$2`XUg#p~mu&f?~+n0Y~L{IGm}cs-W>NCjQl7q@VnY5cZ-&Iz|?>Qh{m69#ojj z!hYCSY5kzRk#7jdqU~@ELRRq;S%7kq-lNMJcmaPpwW)?C9R+kpZ6)rzA`M1Qt{0~kQW@3(w*pVMK zFb1n^syb)saE~$}U+sjM@ss*<(#w~g%Z|(Ri*qV#KQIfAJb~Wra~EgIw*uCp&|Ba( z2c)I>QJ!^J+i=lqP#m>AHC&(0^R|wmN|8%Up?^QvNQE{dKNM6gij5JnR;l#B^gliq z4`&x8H}y};74hL{MIkNsNt&-QS~H)hBn)TPR)k;mB+%x^SH_dP&l(_EPONom*b z!U`{$d?zmD$BYfnlp*t7l!h#-rqJL-&#Y`wf^EiQN>%ruS2h`z!cxN5l>X{>G&M=I z-siF1J%|tG82opan;*LKbFOqYi7GRaUVnF{Q}EN;LA^eE{tQ`ARJ{e(q)Y)*)$&Ai zJH#NGlcEIkt+>!9PA4E2=Nl#+ue}txFNKAt#=3(Bz23!@cypomzTIc1v%Z!q1{=rG zu#sP4xE4h^-*vb-fHE?5V4TLYFY}dVD>Y>V&&*|7wPloat1MbEROF;)8-078tXO22 zBpa4pR_BhE!tI5g&YG1Rf-0US(18RynWNIu`dtG;y4HZWKs{hKn`1Dc#>?(CYrS`J z-U2lcba@>ey|v(EPezj7VUvJ+l{%(U*XFdWpT1fjh!_I98$eVuHJk$Z3|B+3_~8MU zld(uY{CCxak)2A!PR=+IR~d$SLU0Ri;UwO<0dYmn-khHJ`kdaj>5;GyS5ZPcdhoen z^N(YjsTt}i>}WvTnK_!f(2o9!J>$ImsONUq&Ts06rPnjE7M{*jWA$R4JGO zwlx1Ibdirtxmms0_4=4r%M59H!!(@bv*<2(T;6v26y$&aMv-xXxC8EuT&jS!ErSv0 zSMWZsibnnyq)f@nNZE-dwRtmJsY6dB|C1^``MZ0KEGQ@cDDuK^cb{}}8jLx2Z}*lO z-XH!WeCA34hGq>hUuH?-tQ@X_XU3FkmYk$ZB&dB^U7=e7MW8>1I?B1t*1?)F(wGL& zWlyEg7*PYR3y09WR-aFPl20S}=DVq~Y*q#v^d&}}+HP$(~7Up zLIfo;ai++M2<_1$+&2pAB_B9^Q!1y@8&wD~8Ew%vj3C-!?%OgQ77=PJ^h%{yv!gtM zLw093lZd{Mtl@*uc}fsq&}nhqD&^Jn#eDy2J?aKjyoNgJStk+EO+Og8W9S%w%!_Ih zHz;HbU@BwL1$nTppngIva4MbKsnR&DtI+Q#{HzCz}wEl&fF@P=TURuBVVa(yDKxBVh+9>H@ z8aNx!G}TlM!xEWJiT~Mx{Wze*V7yRb_{Wfk@gj}JG=ZS?h_1~Mri@Q3&&|Hwt1eFQ zC<}$jYjuX_FP3Bs1FjTBYP?Jku=Ds(FQ`kKkXu6!h03D|*K5C1orcb9;8^jgxxUoc zl@=t7IdrjTIT6AXtPv3&u%|EHsv@r+WL^uL4c|u3!M)SLoTH`HpL-37gVHEUrJ)*} zEK=80IJ+lWa(dF=c!sx_U40)u*4x(LVQAL}L(>8Gb^s7JSOz-pYj-+6qu3+1K=3i6 zZ|hbuwnHZSKq-Wo##GU5KN|YFO`AWAO4k>~W-h58_>8PxK1-K69KW{Y^KAlc5xy2U zWeYA9b@Co3tfhACg&fP-z@AdN>*ly?`lj!}f~}Ve5d#I1;IOamYOYcz>wbrs7e`~Rs_B#SL&A)T< zN9-4j0fRoj>tqB+Pqu0U;wJ~v$8r}|6_Q0#-CNpvOL@=q(ciaF%S;CP_}z+t)tE=#5|C4{uk)PGCvt~yF*ftdpI9O*Q<506;?=c8f<*?u=G?cTcT!;B zTm=7aT0rAj%=cC9^9>gjNDZW0#$q-JG4VLRh5KCDZ{akGFMqAf^@PsrqcLgK+U93& zmeS@&`lP5KJ!qbci@vQx4{7EA&^^Ghw4Ib0F|ffI5z^H?)JnCF*;;|WIg6=k#8I_z zOO9+-+1=6ufBZC^_VdeER>rcew@pSRvytmvF=Z>%B9*kBQD^q6R&qZ}ClWk=A{|XO zGZ8-H0W-EaqPpZYa9&iv;l!OlG1kzCT`tEXY^^{$Qb#0f;yz2jXjTT^%NC9Qs*}}{ z662V#LMn`RBcmvop}X-4kPMFwLE7Gg6LBjF)s|VB5yjj-*>>`$oF$Pt#m9-%u>Rd9 z7WrHD*=w>1d7FN60G_Dj!(r@Rv@1O`vWGR!9sbG(-_;UZkQ9W+`ZHrmJBg-GWG~HR zhid+~OEqz3sPE~>dO8OXngj!w* zd7k@mljCdD(M`s5dvi>vfyWnYi}k(oOtlF`7e1Q-JublPrc$IEkhvu1^wn4p(J^DKbBbQEMiK|FL(|v-?gw> zFKdHL)U?gt#ruBAHP>O&jCVo6sx%v1`FM?BTBWQZOR-b3GTr$|0%x`~K3t(+u2+`8 znAPjX6k9x78n51H`hvag3|6>ad!j3BXdN2SfTTcUV`Y~H__NOxvTx`$Zwb;G3BXCu z^s0mNg0f2yq|RR(Q1FqOm~o=!n%{X5F1>=IMwd;F5I!h{Q4HA-Z#ja!Y{O_E0#V0dzzX!qT;g_^ix3DnN9sEw__|x zk^hdtcobmYn)OY#Fq<-wy;3Kmp7<=Fkvw?}_B1tPW#f_eo}}Wv=^@*G-kDZ6QlsoA z*~j%}oRz*M#r^kevGx(Z16kZq_ncv{U&kRz7*mvSmggBVeJMSuG!m;OPZ#hz^k+)5 zd$0t7v36~`*jOTZyVq?-X2_yafxz5>a+FCWYcsrQ4>FAc%=wR7q^r}KcUup3Xt)z8 zGTw6~EmW&>B`F_X@bC8t&$spoW4|u9peJ9`D;CZ#kXW%JjEmTReNKj6j~+&HxNW^> z_e%XKk@slk_WF^(O*LwMQ_gdks)pmHT|Tc8&^=kD_koI+3$IBCCBk+)o*N>oVs!P5 zLe-FM&LqKI5V1_JT69=IEriIeRZ zSnK;)xvL}*GcX0)-N4#ZLWGsbOAGn3RA^A#@t){d4u@aMd3yZ zh*H-WANHv#&@cObtfX-xu~}Lsdj~U<9^+Qk{Ca9DG(Qh~A=N0G%;EUVf-=-e_t z&lB6rR}rEp2qmf|D1MMXsekWn^$6gASLAS>Tz8EaGeR>N>_w?agFe)g*8pG z4WYs_g_XPQcI&=C;ypr77>{lt} zsbrpBy>(5t@cn^Jnqr zi0t4Wl=$m%o93j3F(@|Msb2_5;;F8mcDzBdvc4Yc^rzd+Vr~tc>Ff7CL;;sjqtFrq znBFbm>()$p;R&kP`W$>ldzd{qN{6yu51)H!A^=^N(EruNMS#SoJ$ot zttR;Pq6E-UG4XU6IKg3}P{o;~42v+PtNn%#UxIiytBMhqCxmR;2i<|d^r+Wh8Xb;@@bNPlRJX*u(GEU0Tj?JviaEq!?fdO zwBT}vb9ryBG{WmWn)`|k_zp?($%Uj8OJq2umyI%~xzYxpGyN^XEYo4e;hXRwQ|{38 z0gb^nqUzI`o8Mj7{5T^@dxI!fpOD47nkXX@6_a~1jG}2PM!apHPc8F#Ijn4me3%Qy zL1SQ%6A_la)rWhOm>4R=CT+jn3F6ZTeE!UI21-ibC9OU_2bWwt-nw5B#_E7=fCz6@ z5KYqDC^{jqqJBJ_C`TwuiKQvOk!kN*GOG}wHrr-rA*^X`#ctqtf*8R<9?z)w2n^NI zU04I9GyEp)Ax~&$yYJMBdh!FeWA1GxPULati5dYGtmW`i&$2I*JxI$h-m|thbvzuU zimr|zQk4?aZ`sa)M!9^39X!hEMX+Du8$!BR*zk4?|2K?ssn_gU>N{uF~W0q3+WrHe0 z@GY>M^FesvLTQM#DWU+5EAc{|PXq78NN(9okh9QCJ`VmAcc`w<`mD6IdKj@Ki*Oa! zp6|8U_L4_P(81~;{L$6Njj~vzr|VXn*ARHtT2#J@wX8#IlN_O|RLxLpd3!))xm9He z6A5M-++6jvXqG5G3B8XWQV9Dg*q53x36(|s`tOV1Ct)rn?y{&=^E3H^LN9FWNN zzSf)n0sm;M!UDJxTUVkKGS#I#ZNjqS-$R?@Us33I&WLvLxbm$XhsY0@#w+AFoaJ+L z4;R@NV4h=4+EjMQi*WA7_1;pLm@t`>jD(_D@{&lz)%T6I z^QPU(dMtM-%{G+PBA=u4%OJPHPzWyB>lgV!x5OFNBv$N_Z0VGDL&Y~A0a> z^A87)28B>oB)}H!9?ZPtp&etcYA$}D>%!XytL65DV;k5H$mP^QCODNpc(H_3WAi=_ z{WwNYolU%gsTH+5^UsHw2KcHQ3xn!3*QkV=4Mt#B&p*A(kngsins=V`@IEJ8#8eyT z+4_huhvm`pb&Ei|*{bQ8CdfmRcGUo(K7jZ&jbc9GMuT;i*&`0U@3$y%>1Uw9WbqQo=aHlIm02FdPSgAf6`>P-f8nhHj$u|xSU&p+Jm zy}e^w`{k%?J$x;?eZzt=ltb8i)?j_7^yO34#>v?ydx<3eP4DqUSov@g?IUfG1(666 zQV)DKzGTEq%s}qYzz*3Zf;7n2^J3Hle&x_DK_-P81QGS>$)stWhW)i$+2%)BSH~sG zQFA6I0`%fMF&+{?t2`aKg>NHWljM61#P#>&ck|n3^J(Th+by^4jG=#YI*du?(AX7t6CpG(2RznljMO`z&! z#&spTZKKD+7YaCf>N7TSd0w5#j-`9=*;8q$IL?wnEbbOTo>bTU$jM2O@~&kV zAauy|UzaFs<**x~5OUp;?V1M0|x>^Ooxrm9m5DC2E7H78w5Og_-CP06_>6cYQwOYmE%) zra4FE!;7l>%#+F?QW`{Y1&rnA%)^`&_UKawPaf=_W{A;zvtm!52G)D47uMNAZluM7U_~eE6dWt%Va-d-T0VsnDID^ zna#7h{|c%53t_p`<>pXRm(I7@xh_G#`O$hozVbMq3{7=YX4vAPORb!uI;Z7_h_t^m zD3ZdL%84h5WX*xaHz<IO*MtHSP$F99mE*}?p(Rxn^@gz^YcFCskt~&kZ?k-}P2qKQ$H(9y6mN62> zmes9MNbTL52ITe?^rB3GC^Ybw1*blLF|gP|5ilW?;ol@7%DT?nfs&M?Khd!#^}R;B zik?|Uo^ACaFn$!7ElX}*yt*7|Zicw}I6_wySZK2HI2Hx#!DoaCe9h-? zJ}7a7?1rcjRk8J_omkBYH+}qE6jDb;+|&pu33XAZ}@Jy zg(#e94d$iH@WszHNsS>?Q)EdH5Q0wy9T}7zuG0oYu`0FTaz)mWeQLsYPuQGWR@zD; za-^_aXLgjG^Zx4H0@FnZ(zD(Wd&cW`a8VrKd+$NbIWjK=89oa^=$=9qvMsk#vRqzj zZjrB6OR;n-lC#==ctpi;jtyr5d71vc0=}gHP$MYiH>;c56(=os88?v!&a^g`ZIYbq z!b!2cj6Y-ankbn+mMMHqJoo&bAB#K&rlwofi8)$T#U_(jm(&g87MiH`{bqEDdGX*9 zqbwiJINO*;qiH3hgdfQU=7~AKePs>bq#JjxDP#~gN!V@Wt95eEF?_XiZ&klfu>j<0 zH?4lbNT#;qg2m+1k8Q>QKzucsA^@c!0&ms!e#x$mQk6M|0JLD5EwwMAd#m2kc(BVT zYRw%y`FrvlEcfdtJJVrCzm>*zlL4yV=4({2N5^7=P|%mevB*RyuGmohp*soKS%F=L zZcbXlBYxF<{MM=G7!|1{OE9An0)eLN0ZAt8j- zw9jec`oZBL)r=~0CE)zn1q#xNjI1e#;<(zedTy0TVor&DZ?Ny*C0yz~=U@^r1KsqI^ZbGD3WEO_{y@GS>?k zNpEuU^zr$kXq0JTWx^z5y_lgW^Toy>wo8FMg&RjhX`e_#4D#l1^Ibfh6CCpA<Bp3=;*^0jnvq~ z`|O0@no(g`COa?N4m#=Iht;^2yUq66DBrdkn~TbhBHChEGa=T(Q!^-NP2(k z?;fnRxN`XkmehWoN6={hth{ zO5^Ca?5v3heoTvHsy9#AjcQf}_QOXMk1}m06aCXyxzT|$8LUciajWrOM#Eo<65H+S zE>Sv2Ytf2~(>QJD-x3Y!3L7&_0W8ywx`h+zKkA@s1>A$QbZgo;jCmmcMQYfv)`Bba zgOt>gOv-~d&Quo&x43*TJDH%dr8V~JZIfy&MjMSLJVqseyXQ3w$pUK z8)OzrIZ#dbSPL3$=K{rI=mAg+C18*GZ_HEg5;VS0a*}ya+3Fu}tloKAZE_7I2bi#r9nAqO)3;kO@ zy&pIE1LtPdzkL!(2pTlCp4!dq$6umgCV30;Fq5H(E<78^OgmPqL8eU@FXA~F<{0jSUV>n)z7l2528lo1 z_@;Fcy4lSN(~$f(YrolBHGj(ng;Nq)R^r);8$t^9@)-s-;Xka0s|q-_2AY~arvuc* z4(a`2hK4^cZMmWkxq41-6=s6o7XRjv!TTQK?5ynxyHV#+UUi>iQj%+CFSQ(vEoPhO zwS{w^zvTfx`QZ?>qBacTJpTkb!MmMU?5Ixv9TRPH!{8R*f1P`tgQEG<`=6|qtg7iN zG&5@bJqyqm#w!12-o#ogmuHYx-6@Go=_2vpI5xgqoJ>H1_k6sop$A$7{^%V`1U&Gf zEwn2l40<_5-^lfC4JC>TE7jnhtC(=;6TAhf7tF_YFfYwpAGDr+`;IPT6n+H^ah>2ZmUSt zUs5uCT%NTQFkYexg*L;k)bfO<|$OyYx3A zDIf;LAiMX}@}o9*pRTNJeZvU(yAcKj7hT15;w-#%F_XWON#7y@yOwFwjd*tD7FDLS z<;%y8zp)wo+MJwex);XZZnk$EPiXp<{;kflvD6^If0?98%aEK9lWA0{*WH~*bKC?- z1IgMAQ{L*J?Oc(P+!pIpzJ=WB?q#ae4wS&(P_l4{z$eF{M!(OmXc~JVeuFb}?{$%g z*BlyB@Aj1Vw+R%po{XDTSJ-_nPddD^yWtR^nCOY)+J<1QQ)91$>B?`ugn!HI+`dDT zB?WdpUK?VUo1V{)EWj|=D4onVNbB^&3UO&-`o91fCE#I~HQF)q^6I^gev8VjlO2i# zLO&7*V^wur#(#7O??oWIhqc9JljS-$kymV?`&#c5xg& zfG|JgC$~u z<;oWnR3Qro9BAf0r8M}HP91y{|%>l1H@}~>}x#@S( zHRAp#XoiQyzZvLUW%Ks6=CD-%4okH*!&@@k zACz@#3zxQZVab%1`MgEV8xKad)|ZSj8}{D!%E@$LwY{|>h7TQ0C521*O}6$e1P%TG z&mUfudd!KGCc@$J!WlL*ZIFG7X@$z!es$r}5@|7+QkR?v?1s0^Kj3TKsomZKNsO?_ z2pzh=Woh(Ls&g-L!%AihM?=K*pS0Z^?k1S8dNDHWRrGGt7H{~|0V-S$nQ;ee9V#Ak z8pkRAlR7G?J}g4-4+Gqp0mYKr=08o+2>ZZgFd_MeDT$-TmAi7{ML zJ+P~-@}z!SXTzEmyK1~<1q21VZOgx=?BuYjOxJ(-j`xWU>}2E*1*WAPv!gVukUy!r zghu=Y%HW=z5@mtY*-C~zLi$twKG5zJ3<51badtsBn~kP1p<8`$seL*XmcuDdq+?1u zE`kq@!#;fhRB5AdOeQjM@dSE0+tj-iZ%>eWyTWFkT&igc=T6n?!wYW*|2$@qAJ`0n zIN1!ghpLj_La}AU)H6)XFm(tM1Lg4B%f{&|Y#e3@4Ys=5>Edj$SXrg?x)|0d1weq@ zEb-@&$1-5`xz|7a7&j+Ceazm=#_GQOH@lv={4fm23^{v^+T`v{Z@r11*>P+0bDcci z?~D~Og7qWpVNdb@zs`Z7boJ*KW{njuM1Iw;sdO4T%qR}J;Y`A%m#|*KM@6*%DvUuU zfTMdWYP@uq;=r_ir~Ri8aZvF78Z2qQUAJQU*W9SdI!)YS9vYH>UP$yVd1_GoZU%4# zhxf0`FG#imi;fE3`jzq9Z>FBiiKzHnx515_|*YY;55xY4$E#q@0{hwdYYud{H;Ntn`AcGx6b$}@)D=oNu5%tT78G`z0*|L;i$dWZ;_a|Io(Q!!JOhX18}h?e5*O zat5Rrcfi=4geVHNavMGPHni&MFq6SN;XhWm&{y?M_?5N2L6;WL@wZ)7tV(4kvyVT# zdkHg&`IiSWWUA7nI1330yGa%KA#W6JEd8{@M9f|v!Ve(T%l@kfz|PZDJ^Dk~B}d!o zFt8%}r#W(4Dk=%qx^?x6??ol~t8i!YI{m~deAtyIku&prDQ{Aa{=({r8}+S=hIly& zBGLH=_RBrt6FE-f!9~6wU48@%wi+`EyMe_dn<=u*?=ki6Tc3Z1#W?uxCa^=nmy`f& zEY&M^Tx88wF=0;?kAT#6qI{{rt-MU>;}g}timR;S%H$q}&g!wRsUxImATQJ)-lo`u ziPV6<%Oq2JtVZ%Cw)F}w`kGJf@FU1=)rNHNzZ(qy-R%9}HyD1{M6_Ns5pA&28im7J zmMrgO&2yXJr*$&cE6#m$jDh`{c)Tq*au4Qs)SM*Uq38PN+CbGeGi%6yw+TL%;lx5) zUH_ZBT3P-bRM}X62mfCe2#My)VPj(w4ZH`}cm7F-3~C zm~=Bqg(e?zMUNV(x#!4qq?h((7FMAQgKcHIO-doK_IlYrAPTPI&;!qd4kWx<@Gu4} zxsROpFR;aeS~nwMfy#(j7^WB2dB@FbE;W6AofBdywb`2E&=Xn&-|1V9`&2LDd7B2Z zbgKw!wXwP;XA(E289u9j-z>giU3@626($W zjMrK17N&YO98l*}yIl~Nta8N?cK7nK%XnXb;%p_=?Ln!Lt;32xjvjHVcHN(q_p^bMT5rm`md0-+BVW>4KnutbphWD80BEWvLdB4XD7%|57kn z|Fe$++?&jNGxwXh_fpOb2Rg3n%*NZDq7pTzz^_qS58Sl#^))X)y91AMW7W2rl4rk+ zy*_=NkkqG!@joO~Vypy?gz4hiKxyBHly#HoKFOR~8 zHZS*_&wP}*atrE9zU=c$qA}5yj*gkr!j65!Z}EpT{T|h_WK6YXSnn6FEHN@72Y1MXIk2C z8*17N{R#&!^T1!-FU|t5dvqqsQ9*pIo`uk1?ro6hC@20jFagagyBn+h)v>DZ6!Sxekr{P@y;tHa(#ba2SbuK^CV3~(D9TK5Cv*rsUsfZ~1A$?Ll5;K|@Dta(9~txVOy#Xy-xO`Ni-Y)(}9NgVc| z3hchXq=-^cdzYc?x>Cz;@v4cs=>;xJ96do6*xT$O)k?fdA(cXeQS$c4cZDzDd`Pckrw7K@rt$iIx^$WPP;Yms!@h>^LsFL64RvfsT zbdGCouKyulCUay9ObBOiTQ4@JV@%@M%yEv$&FicQ{RRC`dRTO3#g&q0I!inR`?3vXBXp&!rgs?g;V>h99ArEd(`x;4 zSeE#$!kf%*RqAFwr%kgOd3t*-GWj}pvUJ*?+aEV@E3uT2KWfHu(A(qt!NV=Yv}rLu z+f{Zk@z;Y!EjuqvxM)VDoRJY*aK~drmojGIY449MbEgNE&9_VxyCfyp%@sEKJU+wv ztqRe^_UVA_S*`^-5{%=^#EXYA$~>&`M54=#vINXbD@Was$di8~6-`=kuOD}msJgt_5|@`LHMMH!v8i)^i(1_s zT#E$Xhm)u$bX_g7ffV8T>*0Lo>5UXw&?`y`7nrOel)RMkgYB8;@pB$c7|;2lay6lV zA`$}M99)quv;Xdo4Xa(F^;|8<-+i@~%JjLbF1L5?nOG3WlDFjdd&5y#Aka2q_eIjO zAFXpFKUXX?IWe{-e5Y5t`2e&E`Fqjf3KL zVTqXoTqf(xl>4tJI*eLY*ANo>5+=o~A%1JCC2}5U!*)ONQ3jc^-x?$tsb!mB5Jq6r6K8#kq_W+kkE6U$fk8JQx-J;d< zh14U#^J({}AyrR*LmlvE_)-V3Mg*9ZAw``uW_VKvtqsTqbS8)RwhR(%C>J^Y+q_?b z=lMXY+W;VK__K!xRPQJVbtKYWo3+NyTI;P?V109EbFFjNW~CMXgqJo8&ljlvrOcTo zF}?iSc}}TxrtX@%K|!FUg*_Z}Ow1{V6MY+V$O{6={>+riY#T;^(iKSIcl(Vu0Dw*x zwPBH6g)kG;Vk!+L4JQkL85JmDBdA@}PcO8GBNQp`bXTC5CfLCQc0sBnyb>kW&cP@- z>l;Br-O-~O0w+0;;L%D>3>GTjq@%6P`sPLqGXLrfrJV=4Llso;DFTr|f4W7$8i(~xW-0X3Y{}bQwE5gQwr2r(T)7Zs7{X@g}L2#QDPBl4DiG9UAePO76@wu z<^5yTB7FRGC}>1b12xrXJQMDsRau?stGTxPVp=VnqH~Lwo2Rg2`D2^u4#8X7^CCEV=+-nVPF; z#bTYOW4)$`T{)Sn=ZffoOju(n)PsZfP!b;c0C1nSfK|&pHmu&r`-`JJGzX{jk)V1t zC(}6t(6CyD8qQ!`IC}E$|5QHMOM{ngl`72Fj>ok=kD7m30JQ%!P zqe9i`t3ff%1cMiYW&baeDL=bITY-oI06CgLDu90|$Q7zU1qiA|F&RgI#PFTec}*?K z%`OrEtk!fX*}H;ZW1~|=&tl5u1Ho}Y`(!)ssOVi$4BEO-Na*TdQ8W_DdH|qG3db-? zy6Rc4jc&_=r|VEm8L?oInh4deI%wV&4_+{!%~zqh)&=k-j^?+1J&Lz8^=B_OGI8MP zdX&(cw4bj*E#_!^s;4u$QJGH9p%tOo+))ISNHj_Q3?#mR6P5{bHPE88)gYoS`Y$?H zGZ^%>hoKCxBuBrCBxJEFNO9y$1Byv46MT_@q%P(GGzT+5%}g=sd<&YlmVd85IDa7nw5J^K)lXwz8f4U5xC81tvL5#Q%eu(Leg z#f~#iPf#tiAB|A0Bl4ele>D#Nx5c8n)85y4&ZfqZi;`TTlK*9tT!c@57>q)JNe0cb z33som-6ZaGm8jX=4Cf^#C+xl10PoNlFe&9``kliWNO<>bK?S#ZJFH2$Wv>ZL9M4~( z%v?k|$zIE7(G*(SODMkzp+1HGxy%Y!>ndzy>MM5_icj#{;$P98=qa~`>{kKr<#|z; zpT_K3sNs6|QWodQA8((+6+ImubB|f}n)4OoeOeA4UqkB7 z=4egkm$|eZ=()jYfe#9w1r)wC$b#%I7NAQACvu~*c6XRuq8^`(L368_ghp$Ka&j92u<;-rU5@jos&v86gG{|=jgsDCoIw#L6G)h2&AQvcT8 zX(j9LA7szfp^tOWcXI1T0Eole@`(qIhs$o_?z7&@7ul$j-qCYOdKpWFOAFl}mYtd#tLJgmg`yZ*1Aumj zWdP_^u!}FIoF?0TRI^fcxNa|-yI0R_h)w%uNT=?;nz81NTedIFK1zA^t+;c3Ii#N4 zXJwmr)y2Q!PZr&_OjT69hx$RgzNI>Ud1I&|k6{wOA;- z+G=P;W6&npj@f?lPx*n3DU(PyR-MQ%4Lj0Req2_UV>7CX$eUwSqte~?+{oh+F6ol| zxiX)PxVNMX&e{vcxbcE8lYT$F(%%C|hMagNA_hwKiZkj`O_qpS@NTr_-rAb&h%S#Q z@Ost2wVEaOsdw$*jc-vy*s-)e8AhcnDDwb7xtSLY)t`@gmdcN3r)s=cAK1szZIjCt zZDb_4WW(*~GWid2P+A$V0)?z-(=dnLzR0*iTSuWjr(1{n)LZq& ze8PN+C+_@qATC-L-!#OiN=*$%z{^DDc7>*J;emYh+&8UpvuQfSsPO=Sh81A`W9P_~ zNJ4GM@0Lx{1sVW3{@XFh= pointsDT.Rows(0)("X") AndAlso DR("X") <= pointsDT.Rows(1)("X") Then + recessPointsDT.Rows.Add(recessDR) + End If + End If + ElseIf j = 2 Then + If DR("X") = pointsDT.Rows(1)("X") Then + If DR("Y") <= pointsDT.Rows(1)("Y") AndAlso DR("Y") >= pointsDT.Rows(2)("Y") Then + recessPointsDT.Rows.Add(recessDR) + End If + End If + ElseIf j = 3 Then + If DR("Y") = pointsDT.Rows(2)("Y") Then + If DR("X") <= pointsDT.Rows(2)("X") AndAlso DR("X") >= pointsDT.Rows(3)("X") Then + recessPointsDT.Rows.Add(recessDR) + End If + End If + Else + If DR("X") = pointsDT.Rows(3)("X") Then + If DR("Y") >= pointsDT.Rows(3)("Y") AndAlso DR("Y") <= pointsDT.Rows(0)("Y") Then + recessPointsDT.Rows.Add(recessDR) + End If + End If + End If + Next + Next + + For Each DR As DataRow In recessPointsDT.Rows + If DR("TYPE") = "Corner Angle" Then + Dim pointName As String = DR("NAME") + If pointName.Split("_")(1) = 1 Then + Dim DR3 As DataRow = pointsDT.NewRow() + DR3("NAME") = DR("NAME") + DR3("TYPE") = "Recess CA" + DR3("X") = DR("X") + DR3("Y") = DR("Y") + Dim index As Integer = Get_RowIndex(pointsDT, DR) + + + pointsDT.Rows.InsertAt(DR3, index + 1) + + Try + pointsDT.Rows.RemoveAt(index + 2) + Catch ex As Exception + pointsDT.Rows.RemoveAt(0) + End Try + + 'Check if remove next point aswell (If angle crosses more than one grating) + Else + + End If + End If + + + Next @@ -186,4 +267,56 @@ Public Class Multiple_Drawing Return pointsDS End Function + + Private Shared Function Get_RowIndex(pDT As DataTable, rpDR As DataRow) + + Dim rowName As String = "" + If rpDR("SIDE") = 1 Then + Dim sidePoints = pDT.Select("Y = '" & rpDR("Y") & "'") + For Each DR2 As DataRow In sidePoints + If DR2("X") < rpDR("X") Then + rowName = DR2("NAME") + Else + Exit For + End If + Next + ElseIf rpDR("SIDE") = 2 Then + Dim sidePoints = pDT.Select("X = '" & rpDR("X") & "'") + For Each DR2 As DataRow In sidePoints + If DR2("Y") > rpDR("Y") Then + rowName = DR2("NAME") + Else + Exit For + End If + Next + ElseIf rpDR("SIDE") = 3 Then + Dim sidePoints = pDT.Select("Y = '" & rpDR("Y") & "'") + For Each DR2 As DataRow In sidePoints + If DR2("X") > rpDR("X") Then + rowName = DR2("NAME") + Else + Exit For + End If + Next + Else + Dim sidePoints = pDT.Select("X = '" & rpDR("X") & "'") + For Each DR2 As DataRow In sidePoints + If DR2("Y") < rpDR("Y") Then + rowName = DR2("NAME") + Else + Exit For + End If + Next + End If + + Dim index As Integer = 0 + For j = 0 To pDT.Rows.Count - 1 + If pDT.Rows(j)("NAME") = rowName Then + index = j + Exit For + End If + Next + + Return index + End Function End Class