From 17e70cf6011916a9bd64af6a9da2064ab569acfd Mon Sep 17 00:00:00 2001
From: sharetraitproject <sharetrait2022@gmail.com>
Date: Wed, 15 Mar 2023 16:55:45 +0100
Subject: [PATCH] updates

---
 Data/.RData             | Bin 0 -> 72196 bytes
 Data/.Rhistory          | 512 ++++++++++++++++++++++++++++++++++++++++
 Data/ShareTrait_raw.csv |   1 +
 3 files changed, 513 insertions(+)
 create mode 100644 Data/.RData
 create mode 100644 Data/.Rhistory
 create mode 100644 Data/ShareTrait_raw.csv

diff --git a/Data/.RData b/Data/.RData
new file mode 100644
index 0000000000000000000000000000000000000000..ba47b7dddd72072f2f357f604946ac10c1699737
GIT binary patch
literal 72196
zcmeFZ2~<<rwkTR2tF#n_QWR8#l%+x`O=tw9OG+(7rPES~(nUb&`@Tt2WdkZgM5GfT
zg$O7Jkv24G6a<9ONrccP5ki0vAf$nGBzahM?!D){bMHInzVZGa<NfjHSea|>m9^&H
ztD9@iz2=^Pv~R!q1GX$ux52Iq%f4B;^wT$+c12(h#7~aedW7%!Mu;D7bUpZZ)7dNs
zhb>>TZ-s^~`BaVsHMmwaxaC$fj8rsKHMp>qn>dU2T1W6Ma*pHjo$oG9$cK-t6r#GK
z2gHTR$aoqqk^lI+lL6TFlo+em?%G+bCoJ50RKAnvWA8GOy2}3M)fI>7BR<Uza}JbG
zdTJGQSy`trYO@z^Z&lVZj#znns;bQsb$o^$HC$5JrL8MG{}7_OoO#SfO{w}~RzY56
zU`WGa&+sevmzcicz3$;971|S{mc+Kv5SN<4M-M^wvU|HCu+D=wGo*cjkWz3rkgrok
zA6LAH1@$OiH{pm1L1N=9YFweilvCh{Pc4ci0yvNwhBiWa!9i@<T2O}#___QNrVBZN
zU0qkiK+$Vl#Y;H+7lJ7k<fYIThIF9oQ3Dbf5JM@+rYE7RFy;zYWGJ44YH>o2v#}tg
zJBB_Uj_*g30I|>9qzblp)KYkU&bwD%ZseI;)t3z}gQojoea@Ic4;JP;C!1)Zs*iu#
zo29ZM&wAc^q1vnfBYs3JX?X<jEY$bYh)(Nuxm<^6%X<oQY0LwDGF6wj?hPVKQ#(KI
zY_4fe@$hu1ZXRi^0YS0{N=qfD&lo|d9xSqTWnSTxm%5*vyy`1cJQ~a51Wg{E)rZ{4
zA;O?qd)<sah^aJ~`PjW+DCewtr}jW;nKq<hbPJ@ie^|W>`Ez9H(~w9(Q)C)@e7qyp
z*SBuj?ea?vO4RABk3MHNemxiNrmQ!?sJn}j9E*o*Jj^W?nmghxEup!<S@(mf4Y`l@
z7hr-juf~3?>7&fD)s`BPc~LsR*rcw}#j4A^sMxWYSPf5`;$qf0?fBo*ir%K!KRkg4
zu_7)-RpoU1R5yYg9Rfb+TU-PaF6tf0gn56Aa}D3W4_s^pEd&}^no1g9t7$trt-YCV
zf;E{XosL=rO($NtsnPku`2;lY38uf{LiI;ui^hvDwLG7B5a+MO47j=s&ji=$JI@bm
zWSM&!nTJJ5hCZ3^dEf|i6o-!I71Rfmn~H0iKc;sqHhGBkfW#i7n%UjEODRq3&l_Im
z(!Z<9xf*;vGbi}<WFFXnvXGelx<kd5^Vr<T-Q*CZ;tWPDJ4Z=qFnb`)9=4kN<am`A
zcKE{VG_dQr@Iu=DDznD^-Lnm}<YToj$RXLkFwe|UQu;X0CSSyywd~I^cyvCb#sm*Z
z!#o?pUK5{gbqglem#TOkcSlh7(j@?Rl$p8b`f*TVH-y{Wmuiq0NY3K6=Q2ACR+#Il
z1}j<MdbX{uV;IQF4f?rY0x9|n9XHhhT)El0`VC<*7x*!aHFL{-q%U`-BVFx2Z?C95
zIhgR5Tzf$LHwOM7$@WQ@o;&on0xO^;=4mo;YT6?M+1t^4P&|_sZ6VH7pNqO)6CCc_
zs12v3(KPUC#2DnFX(A69@e450U7ucQKk3SMZxnZkK9J<QQG>fN>dYBCk2MlACs#Jx
zmyI7%QdLnrN44e*ANAa&ULc=3L#rL<J;DmyJ)J0_*QEE@AKcO~t#_QKa(+|sJW7#A
zNJr510Q~(8te*vtzmTo?pXb}YxFQ}r#6AEN+sk{8IeSg}_di#fO9e$grK13{e3Qf)
zO(4rUY&D+@OF~ThJ6T+7xgP-9&#v3)*gd04m~1Vj)MHd!o`P3N19997r1Mo5N}VM<
z^S_WGufsgVuFuUN2LaF)9^23iVtNR^g(+JLF>^!wP+jxE5jt}^sf7G|{chW6P5SE2
z^W{0{JXXqsw4zwFZSjb6b$I13B!5cF2#>WIhH!KPr+bMP)Bv|-QkCPxgZkj7q;i@M
zpcf#k@$gFSm?<%bP)1?jX1R796=v?d%kvK7)_8)--QWSaR;a>@Stt6{-JjyM=W2J_
ze=C%)%q5F`U$16qPEP-L0{L1;{)iWN35<y9yED!cj|=o?e%!uuxH%;%ETqv4N``sq
zgx7CldSFK4_b^K`3m-l6-I?ZfKb!RKbPeo;t8CDw>#@)(;hYjttoA)OHD@5bHvd^%
zy30<nB&RE`rZty0h8N*U&kNqEAem$9&B9AiY|dug6I5aSl?LV+cX@5h$5-SSmHNC8
zCv)WaaTqti&GP)iFvM?3?~kgPKmuB#C4=11SkBPGNoCEeAU#%Oc+2Jslf2|oVJZg=
zn(eO`hMWb&a$LMxV;%z|msB8b82p`|Nexo7+1m6fX!WdB!;B|L?wbq!vfkL3p@r(m
z^IIbec<vFh_p+BN50AKl+FSKoDm{i|BR;|>Mi;r~<Db~KxCe1}$!g-W`Zyn4H!uJV
zAQZX}rPHPX@9f7fra6B;N`09FP9Xthc2rvfR-PV<Ph8J{PHWx}H(ZTTh-%_deUN*o
zmSm6VzPVJD$ja8PS<GBcgm4trE;out*-wt_4j;`;_~SZrqj3Ds=szw9GaDtXnr8?{
ztjZq2Xz5Nw^SaT{0Uw)A|KP3@$dj>vf>4L>FgL_CVw5lMoku`G^Jz|shc6sNu+mn0
zjKa@Snk^w&g_BW|7G_AXcU1Glyx`}6t1*dJk3u1)-VU%Dbw|&Jz@S5k$Ga!hWXT!l
zLD3Hw<n$4>r}WKu@Oohh&%~?E{EpA7%Td0~^Vf#W_f+T{ft25G?g*=MgArefeP474
z(|WwHDpZHnAh-%~#!57cp^@TO`Tzp`<u3JBTj;dy^<fn%KG%5yg^P!VZ1i53;OZg)
z4?87#(YhA3><c8{-l7~FnHe5=IvZsh)POs*>}u?$MFkzzp$tBHR@e=)&&}m+3cC~(
zIlaLotEw>F*~>|!+&gO6U(?nuO3t5|yPIDIFwmpJ;&kGFmt_fE9K($KL(WJTDXvKC
z;^K%91<(1%96{G^*Cn)<fyNN0@WgCTr?z<kYxVH-?cV2L|Ic<Bi26)!$xiV22hqpQ
z=Y^t=DS*)bK(I;wj4#(`#S!9<XIZ|zD6{o|_J2S*uK=Mhz*ny>>g=LQ0Z*zb4L+@f
z_a3FZ8FJRm3IA|IA~U9rH(jPI){;?JL>xIxJv}rbI2*!Ajy{Fvtcx<~%86WcJA=^~
zd%z7Wak+IfeTmx@odcdr1{Wrta-^rJ6L<~-rsj#Pn)A+h^W|IY{&i|S{TZZryy=Yd
zv(@%cEG}w&69k+fQ00VESD$8^OIR73x6(hB_zZ2)z`q&btW^<^?e3Ik<HA?%Di(9}
zR#?P%lg1X0S~7?zquJx3N&Lr|`7)@5XcQPKn<3>lPgH}aS->3yiJdCS7N2o43SP3#
zERym}qMdD$#7arl+|L&6{q$vZUC)zIsh;%3q)sRzg1wmAH5nhtDXf4bE~u1;h)IX5
zn|)@Sk!x9#MA}uwXtWSuSW5o}>BY)K%BJf#L(wq_<rZU3{zYOT#S9Uj8p#irbYHfT
z@n3N~6{}DvVa;uG^@mXSx``6yT4+f)*mLp)<z_rV(W-$I_x`4<DRG!pLMCwXt(LC_
z^8ukT-C5aqKd{0<{thtdIxPI{Jke7Agx{&v$^c0F*zkeHW*g;+`P34Er0R?WIv84Y
z8KMQ@$|9*KQv7mE*9ut9d!N{@EbHlRFRvP$YhqQ>MnXqaJC=ZAVGU+E{zB+#UvRuv
z<a<Z=*V0iHWbMd8^Cl{Q5HKpgEYZ5wEKVd&&Zbl;lBl0-Ffws3nns+x?TdAfP16v1
zCDZ%pRtr|qa=f@A{w`ed`ptL`L~*0?K_Q`jy{SC7h~~X!fuf19*O1Hf5>Y=yKD5-$
zqP%XQjuxvFN>IP~?{pVkkQogW8M1So{WIXQswHIO#NkwB&l*0Y+(t$%M2ZHtILp`Y
z5Q3tCiWGjBRd=P!haKmjWY#!Fc|LZ9d3y~s`>BrBI&Y^Vm~5WSo-7i|VhWKv6<zbK
zCRRJg7oJrjOnxWdROzP%_jt`AOGq+|^HbFzXQHe;x3HEPDWpS$9z+v@$0TpbMQ1sY
z@2aC2H_SE1L|nmC<f~UTdobv6S|@ao^kb<zwB9g^DOcz%oZ_wNdHg;(u}L~1E1H;H
zA{5922F(FB(l-V1FRfWJtYs))pkkKbk5Nhv6~A8v0>%<V&6lOLdL~fA%QJa(7>!)W
zZ>J}(6~L_&h=giy^wV8Pg6J+dCQ-q`LlMbBlB-*I+PeX;84t@|is(6}3znyD9ne&i
zhkGQi?NpaX3?I%QEQYr(@n!@J`gpzMohBW(NSW~B%6D;uNZ%Q#5H_7WP}JBBthTW3
zb&qCRA&fSb7TvNYnvv<A4la@Fwuj@{pWmtLHA$K4yK)s`e<YFjSr>tem`EnpkcEht
z^#d9-uew+)qqSPL#44vnPzgGpK&{iQV0kAA6~4X(whWi|+aL>xbF-D}HwIsH*M&9J
zbM9v&;cOg73wNG^%>lEyTT{Xk`&y7q@)uPIlSLj-0hhPMqrp{g+SFBSSc4F4*$ugS
zxxXU9b$Mgu`F2L;(pwl!h4BX;kqYH&nsy;g5&cWLvigbp;FGI)o7i!Ru_q?x6Mn77
zu&WlWoNTrinWGYo9Yr(;>Nv<;u{Ob-2Ti6W96`Y+X{!ny<of}UN|P=h!}jM%2h%l1
z;x#`3V;06_EnCedxOY4yI0XCF927tIu!VXWZK5Lmoh_L_n+S9;VY1IVv9PJCE~%WQ
z<WGxppina=YewfpB|80R38nxw7O~=Mu8;^wiq+ePmu*&atjgs#SGu<XToT!D+A&Dq
z$=KvQ2%)q<fg9)Hz2MQkX$4g|Ha8lU5Fe9Ah0vDyu5dhp<5ci0VFqWVf)ACy0Slz7
zMidXzsnSkO^i^SXN-@XAVueN12|1`m^cQJ#36MTjmvoB=eBhc?7>tF<UW3AiIY}IV
zD+!lG$HrOD%bCh~t4lp;>Ia46S{h8(MMBtWwKG-xo}w)2oT)3r5s<P&v8&*uFw$))
zKK`fW?#=x)!HcR!>3Dpaj%EWh-<f8}`jG0hKCXh0$d&EPV3DoY%nM^yFr4-C^kfc*
z`x{c&8oeAV)Z(sGb_o)uIN`&%#8DH@>)1(vlXSKLPJ}J%m*bKb4w;gP(Gy3Jg>D~j
zE@g)`%jbNRuOiZ*{Rg6FG8t$~ZaUlvy~0KU>LnjBiq(0TUuuc69%wYMD?9Gxm|}KJ
zA!mPz#CnLQk6J0#UgL#Ueo6E<?=q)!29~4Q<H0UC?z}Gj<WkFOk(6>4?=`7lvEy-m
zpR;$`X(4@N!=5Q&>r7M5eggXxbzmYuz`mU7awF{8+^;QlVffg);gg63Uu?g1U1S&F
zV1k^*(L3qWUJbnI`V`UQL=Cr=tnd{z3nq9Zk4ki4nM)Q3s{Wkea3(TlOg`m5P-rQf
z^y%|drD;kA_vRKguinF>aEskeQi09P;C|#HeypP%X}Lf_R!j)D<^p(=`tfi@bxM)B
zhaw0YU%t2|G1;mWCqt-Wi3>vK5xTr{MRO}I(wlAt6v;xtT1oteRgKMyqOPJ>1xX)f
zG=N^o@5HhZa6*{SqN|U{EXd;BrnFA++);T7d~q_TfeH4j67}~vE7nNms8)8KI!ddC
zeaIO><n`LA6<w*J3)Lp2{7otYO^94?tjjYGDrenjCnVkCCe}Se(bkHA@?=?CM`(26
zV~l1qD_vndUys2d-(#FG6Z2hN9N}Dn1Qfx0*Q#Z-&dyh9L`ri)k=)$PQ6_}usr~-2
zP!t8p_Y!u7rE1bRHSn_dLQ!@vi$je+SFFfIPq3b&@j~+0=JK_J{PL=^IG#i!OZi&F
z><C2-1(PfoP{S>Yg%9U4)|c~wQKM{%6&*eZGQUgIQjA-c?<nFj$!q|LfS;&TU4t(!
zFh*>`ma~8=Fb<I3dUJ4Z<-y0nFkcE7F0D`N2Qg?H(@mC6@2{3~&+;=WN1Kpqt1KI3
zkbhm4qUCcQP3Lt~`x%{wCubJ>g6G1LXB#mw2t+ypf{yFM#!oIoiB_ynx{wKeo54;-
z20}RUE}avK;Nsb`#WfH=*l8I)70Dh!5og)$esn=+ZX8j;!R&AoiZ$pbLl>YaL_B*q
z^+snLl6_A#4i`*Pf+YB``ChbXoT^y@`;As5T1p8G>N4|+;4RjzX^OIUqC_7tjiF6a
z4r!-m^W64IS}i$jtLJ5lsczMQgtfPOo%SK9qrt9<cN8Ig{xJ=lmptP*p$`Q|rAh$l
zi*+M;(h67F^s`_&d|E0Ei5zM)Ig7>(Jy1$2s_WWXsnW{r*ff<>$V+whtl>g*i7kHZ
zO@L*@co5QKt^))nu9n#dla`+oGl&e05@py7i*5IsJm=iHQ%Z8e2$KRQtQ70H4gF1U
zjMSAQqd7k~JOY17$~TcNgS8*hOXTj*JfR=<5Zq~$=dLP2i+fM8pGAz?hRdeka^%%3
zY2Yv_=l!yZrs*=S6^ZOS4snL@Ny)S(1!*7@vBu>nTXIX2GZvHjV}ZSvyjQAWlZjRS
z&R*iw$`eI#V#}?Qu#rRlM1JMo3`IwsRR&np2}#+bSTFF+QM8kYHvU*$NPl(X&8Z=i
zj6ztqtYA{oK_;wsw$(u`gyocHrn4y&1Bv8bFh{g@%sDhskdmvFkc83I5E24sZ07(r
z*nzvL^kkYQUBd`DavtLm!StNK;AVGqh1W+3`-&|2EK>;8TmFXLJKq3Z4U{Q{5_nk!
zXsiSc5)IL@c{uJM@?nAii*f9hmsXGt(O(hP-uw5jO9Zi<@KB1u?UWG2yZ7!DYDEo*
zjsZmMJ17)4OEoa*!f;1C4-=6inF?5ZsXw7<Y8<;$-Z>v^f=5~2I3?^mKpbDGqC-t9
zIQHi83KB%g&NETo+QE+(Pg#ixso^W4QeiA{ZZ#A$!7OwKG%@;>B!CgwJa(DJE1h1I
z5seogP)4k0GQnt=7!FTe=S`-mB(gZU8TnW)n6}(Hp3^#M@<VbLs?%#Mk<SJoN{8`Y
z<u%O}BH_)&%s>hMD1&64v-O6~k@%&tk0nvQwW?2v5k7TeA!Y@Aeu}QOX(0s9?lKi;
zs|M9Fwx`P~gRcBLfKq#=g{8V9<{R&sc4nP_e5CuPr-5Ajh9&Z;Aw)_yZLUxf%kQQ{
zZr-wUk=XZn>h_j{xs|$C)Ft6oHwGU~wPUk#{%4RsB&Q+iLHwh=2Tnu`Hf~ndIvKHI
zc4kYcNzCWQ&DirJ`$KMR)6Tp8kEouwEe%NwZ#@&ecWhz7Bi1$&R{gx@s>J@fJJ77<
z>W|rMjqR%Zz&NZ-7*hZ1H+t7MDP4X07qvJ4dGc*-^V?}~xEteFkDB6(S>X=1(o2GC
zo9~Mw$9(wU#PZkw0qgs7O!C866rIbD6{n=Oeq7Aq)>1`d#2F(fbsg0bb@HHcYP)zq
z6J7ZwF$H^yuCy5%7{05d4%)t?&ZHcBH!@g#2?3^lyQHp9b8av8EP?oaq`*BpXQNGr
zzdrTddn8beScHhA!>D(Bs%xGbHVXWI2;Lsc;B{;pZhnAZMZ|<I&F&qm=~h?TJJwmk
zk7XS1R6B6Ib2e(&x7NiD@*aF{?4-9tDB-FDX>3~u_wJT7_sMBBY*UARSmeK$6zKqI
z3&J0^Dvu`(zOCA-a`0qc`&7iqgZ;>*dWnZ7uUK!RZ4oD*DMq_R$vdq6VqCS14660r
zzH`i{*xUH8|BYW;kB$|$+{(=SXbk4XUP}F`ll|$?Bd%raw>NN3nt$1kx%{tW(S_#5
z#yq$}`Tj%7t25s-Vi&&qkWgs(wXs*Z@^AkqvwEkIgwVS+&Ep}C8P9)w5QOcS3;yc^
zURwvf40owUz#7XQ$z5b)=l7a6w?x{S{yQ`%8b=m5<<)(ZPcy;M9Uhzitq;0yB$c5n
zvo(~D*&H`d!-<<&3|vpTNvRz(#n&Fylg@Dj2wlQ<NB6Zn(`ED4Ut%-F`iH|0$kLzF
zjx6v%Ju*p0EJ-@{gQVaraT5Cj&yN}Fi{SGJzVH&)796_I%?4HV+<=4psdp79OqXwo
z#P|6S``ng-$x${@iBKk^-Zrt2CqFC%QrvA&JP@f1gG2GSVem;3#(#|70y{|RI#%84
z(i^%*8tz$bM>Fnct2e_A_Oz_Sus@<VW^60WnuJOI#FS;DpyE~P?=YAT0p`)ug{*Ux
z{s^GUGfC1P(GVuzpXAy_#3|&=Shqp|lkw)1_++D{!rXmbbQ4A-ocX>^MA@b5vRC_4
zsRC!<NIv0+G_cHKU6LH^xgmejtw%S{VqM96hz=YgRpnj}GM0PZf~ex2&BMq|{QUD~
z&6KO4=G)h*<8LYLR`h=zufvGn-RoprxLc06b$hp>z>y6!KQy&`pJ1^cdFb8!`v|L3
zkFSLl-f%K{g@3fNecS92uZnV=Rru~5&ToRJ;TG@cyPrMzgeXWbKMIR`&T(F=cYU6f
zNWwgwzpVPK;5z^7Zq3Okw)UvmJNIq<_9M=c*l~+|X-FGK8|E@Sd}KYqSkd-%*AYu9
zMTJ2KcRmU4Z#~+ivmc1Q!Lg5Ud=7CIQMNrs<d5H=WuCX8y4Rwak9~*4LwC#rd-Q~-
zrpvnoPu@E(k6A9|CD1Pn>S{>?9lN5NFKv5_zv0xchakRjrQR7gYEF63Hu_+)DKdTU
zYIi~n*zfT7e*-IkEozFS;M<)u!OW)~wr8pd#TRXgEAr5Jl^+~?hxh7A(!13vJHrir
z{Cf~x+bU}&{=?!)LxN?MQs-V2$#jqQiB1mI-1W-dpr9z14v*N5(UjAnUzn^<2ncf7
zGqb9)TJ(WKhCGpf?{0hy3VHfVmS)LaHMfA`{|2hhRm*o`63fFZ0tV)BFrJ%!?+IDr
z0CW1)$JmhSpwphQgp<w32AgBA->n&|@F_mDA3peG{uigkU8+=eZA0@%m%A-Kj~{xW
zW@5T2^~Ml=r|N-pgNK^bM;ZmeABJ7B6^*Icl}h4|!(%>;MjJxKW4Be+&QCLywH>fx
zgK>Q2_J)S$79U3H$o%kCbY;)n&}n$_AqzW_V}bvkx~%Q7cgMS#`erk=rVS-s%!R0(
zV^0ItLX7Q$)B7OVs8f!OCzB?daw;0lD)xS1&}w@NZbZl4J$(k@L0CSM{OXwATK$Mq
z5sdZWJ@)1=`wKB7b$*|Qd-S&ZHR6_8$?>!zKSJC`sLq&<`LRUdEcpVvi24}vV`3~X
zwl6iP>Ty;jN!u<qX7x_WFP4d(+UA`<b?n~kXlJOI6CGUNyEnRFH4uLKjJR}RqITnT
z<au<U*o8G#>k5@$?#8>f+&!O_mBTztsr@B8bYIr;$v@7G^aD*+8A=_elYZVlY(L&B
z+SVXmur0X8Zx6L|K4;eYo>7y)?}(~w=uOw(Q(;%mxx-^Ws;a2yrueBB*1}0ntd*{I
z4}_V1u>Hw;eNvT5C~5rpnTa9K^})v1dg4I?!gQ)~C@G44Mmp7)1{g<$5k$qI`N8mj
z<h{}99Y+tAY8@pGPhG3IVFt*}wvVdWJXC%|pL_20_z(C|`G{NFvyQ*ueI`b>VggZB
z8E&@xR@g_WrF%=ScClLcTc`Bq^UTU<cw_OgY)uF)l#@gAX}xwOuosXUoTw+&^9r<h
z<r3)A=y#eAKK_hg+y^Pi-r&XDG~&<tAmsG5@sKA;PX_93!z58^k9FfnJoW9qU1lTZ
zM+(nE=Co&nwy$zOoKRD@VT006SD`)VuBABx)v;Afvb!MilO!-k*X#zr<0H$?m)teG
zoz>-+R9?USWCp3EZm=F$sWQnVnUGc5<Q<E7v&0>*y7x~E;zk~@o(&%c-CN0AJUnJs
zi@E{m20ex!K@QnPi7UruG0|2>TOH(do&Cz;k`qfYm&K<+$0-*Jsx<J(GxDa8Vr`P&
zUuCoZtw>6I1F<;)z3j5j#z(mMEb<t|P@57_f9r3dZRpz7bxfmY-FL*(S`f*t=BU%2
z1VbY_nDVmv|8Xd~#u$~WZXB4QdO9m$)z!x-MDNpzmIF8cXJ8JL;6%i;6G&LiReF=`
z*G<EBVT#l3O`C3SSp%3whz2(`OsoP50F;xUiAQWAHEv?3mUYBM#r@m8#w5ME{}f4j
z{dbC-{dOKOju6Fd-l}q<?*!Sw<o`k>1(b!h+zGthsChDB^w)(DPsYgYt$^0mnMgZ;
zj{biMvR9=h`Cj=B<ptBP`*Kd`ChpjG;>M_%yNXt0-y8YulpP0*J^lf3o?YgmmkEcE
zF^b<N!psA#PW`_L?;4fDYF>PPd#ZiQ!C_*>A^IqC<?XxMs=lA!9y-%!*uKN0_kWG%
z4NZ*m!@jh+?8xRnO-6n#-PBzIku-#@A5YA_T^l?0vBM*DV;h)wG*J7eUQ`Eux9nA0
zw^OywRD4zo)y3c@SpSQWz6tHP)S<d(c6TcR=4h6C^FP*c+}0YI3**mcc=O~?od{}5
z3k^9_9l2gJ=2QLKAL8~G4Pry;{ud&r)EHN%l>3m75B|Yd_0-Zjd}^-hjg<R}tt|i4
zNE8;8dQoR7>I)TrZPb4+!iP*Oal-SxH>mzW+>(&pE%;GJy`Rr)Ig@PbXZWQdZ-;Ij
z>sEXP3O<4=Vo_SAs-wwWiTivX8g>2$(kygNGL`N6@Ic-7VWi!h10U_#|M1tiG|fMH
zBIk!4--r%gl)GV7>)k_ke#v{Yr&#Ij+^<6%R^#eGuF>*6k7k!L!Q20!xX*X8KcS$e
zbZh6n_?Uh@Ngb*3RBK1YAN1^Zfly%V_Admt*1PMe{7KL|`qzO?rI^_ABbx)zAD$p`
z4}8hL{_36ISLn@2*@)^13$p3{`27U~!&g){RI+~(YIdYKlodc<Z~fzzzm{&x??BcN
zCO#Ltt4#W_-)-KylljLW^3fKzw}je61T5^B{?|rzW8eb;{clfk&A)H__laPc#|Urx
z{DnXl{m#38&;BRV#Q#|Icwe~DpZe)WB}G-%OF?*B-s2sAJoQ&!<!rg3rf>)3Vs!WI
z->*+DamtELPx%)>K{Cu@WpbtQf6!U6IF!YTvU%&T0%iZ@OU~Q5)R`K!w{u@X*^SXh
zQ2l?DvfnlGmFVE0uFTDRs#+;)W90sJl0>G?l@a?(Nxyqfs2p_q()&N#?Uf5ae^iBK
zoYN}V1llTcQ~%={WPSuS{1s@cfLE~acT|kLDw<fila`wBpGF41z#IGyS&Y`--pHua
zUZV?e_Y;M3;16ibEk^hMeSw5PMj7BPEHZatn`y@bBh?2T9_^z~VbwL$qaJ5AgyHIz
z=}}lD%(k&O4^V*V@ee+}upuvpoUw(U@%ABDzEbZp-=qD|UC($!adZf;|L^GF|D>#f
zHO(Y)-@NMP#eQ@6pF_z_zj_h+cS#WZOmSZ2@!1MpiOWrm1HA6*y)zG{MFQubVZY!g
zcb7c}j@NehGzP&WI(6Ikjy>qy=6fJ*L#;Q^Pp>+5BTd{AxmVospyKJahSl>GW)q`%
z!IK_J`t^gS|9|v<dmp4ZH`{8Hb+cG8m)ktmwN?I(Z|`F$4>*E-SkL79j%GjtB*i^C
zt{^9PW1T#A61lbmjNh-2Eh?D#FfFM}p;a}&%U;*(REU?s>Ctks%?O%iv7$f%5iOh{
zXX!o!0mGh)zA1{)MayDm$=2l)?N-Zm)Bznx4>G5?+cOZ>c-0gHHP0vud|C!RgFjsz
z=g>a$7u!pF{;M$j&ZT@qP5zT#E!}Jqg?9^H_Nmo1+)a^i?{>ltXLa8&&Ucvg_lc_l
zo=^*}-Pp}{Y`OjJy5YWm7F|7%ZZNj7{B3W2|Lv{sEi10B=MKj2a|w7&GQD!;Prc!b
z7TH+#ye3aGw{joO(U!QF*LKIJ<I#hK#hK0ri=#ff^%V^F0{6DvIdAS9)$`tFfAzmg
zY6jeY_fHG`f3v_x<=hW9S_~Yt_W9!WL|`1s$d240(Op#Y31v;aBYz8@yieN%MR$aR
z78fI6#YXfGU&dDZ&msPoqA{($MuqM@!%h)-+Dl)4p)Sl<BPyMt8&sE`{;!Bz|EWaQ
zKewPKH}{UwqCBcHH8V5wy3px46nXf+mLK$ODdR9lM^Nm)&B2F9HS!&>0<7cTOQ-%D
z(rE%SRpS|a5FNJzXd}XgpnGKP>&QNgSbndroiFv|v58ty@d?e6#`s3Oe0rtr(a>Ss
z$t9KGgJ!{1hEis-ykVS^=G{4fFqMAB0=@;lj#WG;Q6jfL%UZUGmiBRW)Qzl1a&t<Y
zwkv7d2;|`Kefx``u>o^)LdmH-C`Exq0$}k8+*zw+YMpp~W&IN<H{56?&08MENI_2B
zA>OgLO>3SPRQccehGm9`ipryx8&l8c!9Ojqm%!W)hI1*E&Z1xXG^VmKoQ98aSi(N9
z@mWf$BaOv<bG^`4`-t<=UV2l)ii)B+JP(pAJ={)|F%6MubcWYdRb3m|jxM;ZDh)m8
z7dP=ro{Nf8a+b+oS)HcSrt&d3j|RE0B_&@Y1itt?fT}gy3AYyH(h;kJg_s?Dg!%IG
z_|}m-iMe<lpWV2;-wU@gpsI+J#d(haYolrX@bCNv68t2ugp^b<37mCa*)c(|Bn3ca
zR_-bODSb)a)LrhWW9qQzer?ErQk^|1ejCbTRTOQ-kqjF$><h_<_o#)Oj9t!bg_-x_
zMC-l-R+6`d#I+US<8uksv+1i@`giBZ?FrM#Q^U+wP9lHT#2v_x=T0jFy?ykE&<^^5
z3Z`RnGN!<eez1t{|JFR~jB1fa6k-4jPClO(E!t0Bo0uXPCVMMvidsYPhE_HqK-@vE
zB!-oO5Lg0D$sK9szEyX+2DYXMoAOJlmo>bSWo!yOB02Qx3XF9>bq+8d)TQKwGsQ)*
z$5|%Zqq905pV9KNmb<fd?ZB*u1sNw<;-V<(l70g7-Ada-Etc*suXAcvVY6COcf*%j
zC)fPt#=Qhy8&Donp4}E*nwuPv5GjOC!rA7@sT=xGkt{0<GAd$i@?P6gnx1k^N8Ol#
zUO#p95g|y|dAqZYPG4~@T&EX4_2fnuFl8>w^C<9Af`LtevMe?M(Rl|;qhI$<IF#r@
zQ_!-en07<z0U=i}CRyaDC^=0i#xyI4yZtnyX7+X;)12)@01Gp<K1{UR2Zu#2zXc0-
z0AX`o&S?Hf&Xm|ZT>5cJM%%6wc5OK~R)$dm<~Dvj)~jHn5e*AslQuFp5#-`_{r1Yw
z*5Pw6!qYm{+sL=;x-k6rzfFzJIM&G7(d~;Q0(_$EGD6GmX!xz+HF02G?8t}CECBp?
z?>QQ*-Bt5I(FcVeg-Bh!kXN_tqPufE=2TwnbxBHvN}YY`tM7`=IiofsCUCUFtckgM
zN^K1C1>m{7y|dbwx6f8?L>U7Wy;0t0SvLV{e#%y1+2jGj(ca{wx8v$^@#vfH6Qk_<
zkSBW$@Se)b(HE9l@08nzmt?i!hKJ01C%m1a9s@>#9rE_m=S+ymVIwNW%4);3VRUO;
zBHlS~KWgH&2$c8(h_h8E_JH^krK0`eP$2kZFTPlCIyIkrvj4)s$f@$wF<rSY2SY8G
zIj%6g8L*`3?Um$45O^i{qzk@MSoa>o+hlBaeu6qvE8!D009v6QeEQbKnzIS71yRC{
zHs%&E+FlQlYP|C<Tf(y187TA#?dB_Y{HNFVcb{+UIxkGg?^a|To0<~giUN|{@6HJe
z<>O4nQ^4#@e~X_&i@x3DY{+UQLwop+MYlnv*Tm5io*Ay+4ph4zzhhy=dFo+tylqlY
z@5KdphvEAB&R73Z0%*1DrSji~d&n8f-XoL>C&!!}b@JG0meRo3$zFYZ$S%KZCsafG
zYu}>tUSeYEwF1p2&+?lMv7h4F4W<3vxpD;4rR`aQmJ|4d&2LW117(~HV6O^)sIIEZ
z(p&!JOvaG&R*)WfF;5zF2#qUkd!2xILXTHk)A#(TeX?Czs+;l+WHQ$y-)v`{fxf3<
zTM6stELG==DjRT>J8eijpK5_zXBE~FYV7my*Jm5(_<%Y?#cxCJ4S`y7iL7h2oZH@U
z2P$z!y^ffcWc-*la%5BTYx%-<@D4sBHpvS{>^%pBf?H4E5^g5lDpH-*4)34&1T5@e
z#m+R(=&@x1zIj<r;H9z^2b}VNfo7*qo+@<U8kc|Fj}<d&VlBIobc$-)JC2L_s{J;%
zW%VM<7=I=&#|vKDmAZAPvR~_Rn_$MVdG0s*4#g<5bz&Lbg=ybh+TQ5Yge-`F)eajr
z2qL4dBz!OXL<-%zd;z0P6>g9397s!MBt}74jL?Rax7<>lePyM<i2|fj{LxCUwVrRL
zeq#fjsy`sN#pi+$aogj2?ScDb?S;_1c-k5Fr9EYx>|s1Nnmskt6=>Up3}Nlk`ms=1
z*7ix1n5>xZLPRs~LbqRLNF{{Mp>M1v)iG%D^xVh#nA}2VWyLv6(uABKUWI=z+jEWi
zaOFB{$x3gsHHww4QI-oTQc)r^=DGxzFQ~td5V|$%XSv@o)JJ4Y?gcxSce0l^&piPp
zv}<yks2Z37l~R9}k!m~r0>B;LcAJ|7qiY{-^=uh<d$DC{lmnT1m4Ht&^ulO8M5j4t
z)8Y#5q`ID5>MY=Rm|7o1(+_tKw{+PTq^8=JlOXN43#-NLw_IpD$ys9?BMxq>Pk`qa
z5j2s}E_rHnbrpiBG!@V^EjP6B3J2hh*f3p{$Yze5E3|Kg9c;##?ry~3p)o^K8(G-8
zZ^HMUc<(C-dWdD4lQn|B++n$tDupGyjA@<(T8p|iolku=Rh&SxhQ+b|0?=~M=783-
z4Q&uklK?QbyhGUG+g-;J-WE?~3SMd+XoGX%((5>A;z{v$OHnIjQ<*c4*$1B*+B7G!
zqDVaNq?Uz2yY_kk@8q(&cT&<s%`m1-Ad=@lo$R2-_Eb(~qMy*-ddI;Kd~$0(Fjjd$
zUK!)P(^+N(FR9+=_g=VK$K@+tZ6!W_wrSwber~jnE6zE=?=<V19VoCMYbGoDV#4g$
z&~H0T$mEzhaEd>fERc7#n{cg>EuX@wR$?ea_f@rkni-*Os_L)nh7w86-=aDxoEj16
znNhvq?6-B(;*-(Lp>)@TT0#BDc9WJIrxinnU8#~=!h%kz%F0Rz&S^j%X*t#E?aEr3
zH0`}7v^5zjH)l<)+<?(GYRj%iUF-xs@-Xi~TXB=5KeHkL`^&lz1D(>D{iPF64W?d+
znx!$;$fAc7RQcoEMb9EP*bA^Qs}Vkb+fc^_uSf{X%k=7;lj&KjayI*Su_X@^z?R9U
zS)JCs_Rv++Fr~U_wmgQ#dlMf8cQ(Kx^LG1{qn{oIeLJAN75+9YHN}D(ecd(6rAR)$
zcjIP+#Fv7a#~uR+FUj@oWQMFuz#r1U<+g1uoyf9jS2f3rnRG{+LzC(p_j0@f|6X#T
z2|TOykdn?zgmGL;&6ApJXy%Ua5Ud~r<Y4bK>qME{w;bkXXr1u3p}UaT7U7Hw-!OPZ
zE;k>wdDp*PSn7`~4=%vOlNn;ORs7J-=sZh#_l)ujyC(ngAq^|*gP1caoot?rD_e<Z
zp#q@*t#o-wU@lOu=b%enu2R+dF_b?a0ZkfvmH-ji!NAVc=P{?YUFQ6#zb6bOj92Mk
zSeVknt-k|<Iq0h`r?!(_4Kzh7*VnD#Cv94E2X@4lRq6>zD?j0&FhhJLXdUY9mV|vH
z+%?rdV-VJ_LR2s7kTPC%zta-*12-lsyC#{zFOqjwcJEr!nC-xr7o~N{#u5}D9r%7U
z%%s=RfOppc)LShI;@vm5vR3Cz_;+HkJwpGw_~X=lcP)?xc<=T_fnhuXg!>LWFq;i>
zqNqfZ<AuM5r!=#e;>V<RoT#Ng9mAf~Vs#=9`sHv^8M2YOQqs(__gQkf8&4j*U_}&g
zK|l8DQqQ8cEBVmprlkQ0oI$TNh_%^D@18In1ABznROg$A3}xLqIQzuF|E{49K1~bn
zlK?7G=Ti*e-fDhbQo0UfRq`qUZN{z=+(GK~5-VdE6c_+xzK~c74AwTM=k{Az+IS<?
zXLFR}QHDCSfqnz(@{*=s7bYHkp6-QT-Zt<g%wG9Cjp8WO<uf7+G>Jt;nw$c^PImvK
zD0ZQD#?LUZXJg*;>fw2w65fv*er37Ta^!)c`y7ScG#`G#3#pYMB%{i)P%=~n^<HL*
zTz)^0y_KTpIof`i%NFZQCtf0;pJ{O_%eoks<?9J2Xh0`>P6i5TVSSarG4PZVwU$w6
zU>~}bn`Ep{L)tvi%D9c(qva5Gd}Ftz4RAqqxPdMPW#d~&3|q^d^I!qE4fUSARKk^U
zKQLK$*WaxqNSL36m>`0d%^r>r;6T(9ck`!S%~YEtR^Hj@dRK9@yjWl;TjOjnHME&N
z4Gr3ZxvkQ{=e!fi(#tPEGnRLibqzEJ`r136u-=0yM|DbNc4X3rOB?1~_POH7sm!4+
z+S`=~)|!09R{Bu*iYcv1otDloCm?JJyznYu6KgGwx_=JMNws}Z-yXV>x}Tf09>XHt
zleNDVB^n)uOQA4Cf+fO+f5jT<_kv!vKMIj>9AU$Ci24qdIQw!XVZB8(mH-g<3WtE!
zXHTGs&N*}}moKbo;*>MsGvw~-$M)9~j1kHMdQ^GULBEcHW`72J(S&Qc9>QV-2IQ@7
zOq?IBHRvc*7iF$HK_Lskg~M(zhSEb4P7sJi_n_)vaR6(}OR;>3n*bH`Qd!$@*AmRU
zuotkx359O&J$iZmelWDifeu1Cj-*pk%ZEzh789pxM6unB(p<%7LtoO+&Yu!2(-p^>
z0glAr6UO2ebDFxf7Ey8H@KV(D{;B+-C0659enOFTK4JkA<F)a);DECpNI%ww!GFRJ
zh(hj9lA3zv8SkX^^&jcs&gpd2Q!NZh_+BWMapeKyCC+7#^@}YFuN4D^rUW$L9y&a}
zgM)nn?&_JFpmN!7TN#x6_-vZ;nT<t^OT4ZSoF<%UVmA-ntrbUet3_}u@<^Zg{^qE>
z1Dui#cE;tw`FK{~>ifQ_-$aRq`Zk3Fd1_^yd@kW-L722Pm6%JYIJc}jEmc&DED%uE
zgqKz7D=xdfl>r~z%w<boab?L+G3YQY*C`E(lIeR1%i$KXlutXS`bCMNi`MA!Y-P^&
zso!GUCuF9R8blQ?HldIJrlF{+bd<1@eOeqX&JZ=b%UdE5tchP!?>3i)YkW#c<g%ZP
zm4>5c+crezJk<>bvaz~%dLt(3(OmX(aVeG>=k3MvjlXS(72I@1zxixesx!F0DvT}-
zAGmTikqZZ#Bk<Q+da3c=d3%Y@Cv|8#{YeURx6ZuH#<oI#y0LG3qcYIR0ruic1ZTHJ
zGbrtR24Sx6IJ{WBD2+oDbEV$_U$pL5T**@(5Pk#64O`5TJ5oyK6gh}T)iju5#bf<o
zqMsk@{f=nHDz8Q`VS@$l_Jh~OQ!UChznd)us5GPRTr0)8X!oL^&KoQY0khd)S?{9B
z6W9jeb`yItR*6r}U9E+*D{*BOSV8)2@ZAjt7v|*=9>$7rO;PtzByy$S40LeH`_kx`
zB6Z?`u?Y>8lNh#+U`-}y^=D9OEVxoF)O#VfohuVuw1$@D5SFZst<9`F=Rd975VQM5
zvYx=??6AcRNkS~Y&RX-GGlat^Gv9{n*Lr}iBQq$}ji1G324$B@2dCXR4Xs2bUY5N5
zRwbLTRC|dJm*c^Dp7ZVXqF8=A*OK@1hWPTLm%Co1Mu$4TXLq#Qkku1TZ%iaUK-V*c
z_}vDN18*>$*^<K-=odW&u>tEzD^o8wK23%JO!N_+>lblO)(41)V@OZ#RhSl2tddKp
z8r)abfzbe<gkvh%v@KGzXmK>V<|W`E8mN-PX)hokUQgcqnT05cx`GjOGV*$M`9E3a
z>&6GS7`QCQMX_*I*7NjIsjTM`@%Y~3!q654W^yTe==UgW$pt7HvOF%M%|t?(UP3c&
z5fNDEoPC(`BOKw9kz`QVn8?&J&-J48;JeIOvY@BDWDX?B*JW8US0+Dfpbyu)V&QXF
zTPxA!^77ksd!4h)Fl-Lu-sNV_UPoE`F-NIY6N_IPMNIVxYiL3dO>O9&)BN$!pU84y
zQ>{QI=-EXNcJmjul))DXJ}mwVW5m157QFeg$s%2IE&_03DH_duIx+zdvd+MoFZsS7
zc4RLmI*}1;8=Jd4)2>r~xG`X%)y|sGx~E{x)1o+#-WpDi!Ns{9)#9jLpo1$X;Rv!k
zE?s(@UqmtQqr=H%j7ExEDF@}6Av$H<?+9M6I5;M_{HAADda0DqlbP+9M7c_@V@WHr
zlRG4|NW@JTTqyF)0xyspn{60us8=`&?n7V^YNK+IX54$D{-`ocw61OmAXY4mzF9q4
z9*73;>^kJFo*pgXA#1`1Qn8O;H-9Z-^^&91;{<Rye&$h!j5=q!(KH?b9cC%t>IGSF
zZ<ZQ4atbnmonl9{O7`J8$GHv!7dEa#0JWNXQjQBz7-uHSajuW%NTK)GWP~h4|Kv!P
zhH%U`dPi51+(EfHbD0abc=<}9MGUjVtl@uW;U;DI+BAiRqxAJd4x5S&x1^uNe>Wf%
z78DJHK?BDr_c9%&mMb+)UNG63C{mT9F+h=--KX5f7W8v=(NP0HkOEH}6Cfr`s$1t;
z9HmrUtz4V_@S(#bN<o6>K5>FIT4Jt=y~LH&ginTx#Sb5FC~&{*n5clHC-Sm&hcfee
zcfqx@Z+eXHG=fIFS{uQBpPzlrxw!)J%Bfj4PBFFoZd?+Kc2>1nFEaS^T+Hj7R^=v`
z@=C*Bufsmv$g$G=TxYkz&rN#&^Y{6R?{AiusC@WeoqmZ*9!Vr_XTCuDnz5cDhS0rW
zoiIQDTc<*nFu3xu{h>k{nVhgR&Tq28o$dT*0I*s%4j5hAoT?i7{g!ZWfZ@mLpC{0J
zeoj8A^2|W<T)ixD(CH2`R^!jJJ-Z{Qk6(^t8$^9m*+Sh<p`L}6-A?^3byr`Pb{!zN
zXT9EM()@$@E5cwNMgx+mVZLE6d-df$H=`dQm$T7>S1%Q6P#%#?T_5V7xDs;tQeoj_
z06{!k5dQB-VKJas1C6EJAM@xKy>Z`{-@)DM!cbaWz5ijv1@dX8D;+rEP`&T+2g(sw
zUpT?Q-IRdr_;C8rCDjFXFz<e0L0<5=r{!ZqJu=-mXDMWFP(?xGlN+EYliOP+(y62W
z7lpp^hJwxDD(XXhhk!S4?&^nlE4h!hsWtv%Qk10znkOsFnzO4yZtA*^^|&_H{#_FH
z1T)Dcs093%6gKFtl^g#TwKr%2TXm5^$kiY|)>ctTOl&X$cZV%@{`bPTG>pJ!DOh_a
zYBc{FK^)UaCdeQC_P;ZBdZx&e-EkpZ|7yr-Sb9h`FTm)|F4V@lG(Y&_7lQIg-zngO
z%fW)s*Du3=eAu0FUYMn;RX`ec*>Qk|b0scp+qrQB+Z}zb%sj+vT>e=lS3~F1i1tlt
z4B65A|0I$_smA$QUo2&I(|&xHvd!$?=#hmzd$*Z|W{w@nASE&G?Q~1f=;UsxX}mP^
ziLSTMH{DW|9QvsOvOf?ZQwxUFk8-x?OG@QQ`U~ua&rzYWdr^cRs#_72k`(<YHa3sw
zRq3%|K2Kvdv*GV?QEN)O_Etsd3$J{f&I=!!Zq7jk+Sd!r@A1jLxWqJZLFafGH!la}
zPok6{XAs*OAL49(-l$GVE>Q~>rm+RVACuF1r{^v-J2xvjBXN%J2h|wwwlz8$>hbQK
zq=9DR9$23kiO*=zEODZY8l1W(kNdds+3Qqh{JDs$w=f;1q=wMLD)+6eN8%sid)T4s
z!Z)7p-@Huy*~Ys6eC*9zGS!3oxE(L;I_7eHZU~0poX6LRU$=IQBO+C#9j4^fwLl}F
zC&xY#K?0?2eAwG%O77jYZO!pbupmBzp*d|S?euMMe!a9`x~$4R#>u>X`qt@NHIW{G
zSkGJC+k$rAU>Jcc-@X4@#}=6Td*0`!ue;82?tD#mTB&O4KNVRRe&nR-saTj3!*@Vc
z^^>;9Z;_jQvO0Y=a+jSgcqy}p!b$`gz8l%L<vqopeNSGsP+(_3RB7zdOM-^%Z$^5Q
z<3@g+FP-DQY3lq{EjVoWbok!rV~zLazc+;uPhyd2_?-`MiAwmyG*fI)X82g}Pm7sJ
zTi-LT&VI}<<Np9pSIKx*WX?)_LXfj89v3Aa%DB9^clA(Y;bylg_aZ1Lel1P@;a&_P
z$sqj!``|v=2`GrTcAq~qNvq+6<=b+y@FfPqa|06sd}h(y;pw9I`?QTQ(TNhvilS~F
zESH|6Z*FHa8TV6->gJPb?B9nOnLO_>I<Ox_*ZN2|U9MW!vefg7OG~Dk`bgEfqI2id
z@3HTkB*H=`YHY(&@A0&hA9OWYK0mJ2`jIPoF^81UPHOuJ@4*6Knko;w<{mXsfE^Nf
zzAYvFFykrfSxJc#Dj8nJvMF2>xh+P=-QpYxco+;bs&=2PXu^0bCPqvu-dzF=`5?Ex
zw}7T6pBEMt30cW+*2n4+{XQnwL6v}2xtyat=ritT>(@h$V=m8DF`CxB=r~)H0B-uy
zg>wReK&_JWBoBkf;`wSeJ?JdiwA?Jb#wn5N=$^m?v4ZjO)*x0S^=MM-O*OdJ3$G-n
zG74I7aLh=no#%fgiI$5|w04M@d<z>pU6Zu_j-Go|U%27}Qy7vc<N2RU(zG9#gHMlJ
zy|*~V$-gGJ=H>-l@<a?Q?H1;bU`cwG9Cw64IQm))@FKx^)MB}2U5oarW77L$cp|1I
z`n{8WEpu*=XM=^OF|PIJVp5rmx-)4E930lqWVjOiM+qGVth(0YBAvunQ`KyS+>&Sj
zwM>HDkkH-HdYKiBMw~6<Gze^j%!G#|4t)<ZIG}~jORlswABNuNUp`nAm;^0D7qFzO
zd85FN`}wv))l`2qPk?f;k$K;eh6yV<E@m<Q;v~N~63y^IG~5GaLc)usje~Ia8`8#?
ztAQ@=CAL-JX|eA8!7S`2xLaT7{hTq=A6$d)67(gxY`EJ}DGW^mZhTT;dozrc9V_-~
zv91otoOo$lU5bsYOtLgUCl_>@{^Gem_*m*yT{^IwQ=|D@>&dkkm1jj+%w+Z+R-)kv
zzhA(3ZRPtO1che)MpuE3%#tYgiuIFTPy_<6-(dri4mA(?qC>32OAlQasBhy;mbS`#
zs&V~Ok&~5zhA=W@w9tLs^Zq{*dj9r*g@QYc^s~4<VT!r>r!bQ>V|>IU{~yhuj5^V~
za^=6Uk9Gec41M*v?yPp*B<m}*jb*lCQ#td`+^=$!W4u6OH*=Xd4D&clV){P2GFmm-
z^sZ#w!?WhtP;=~!zc-%Wfx5pOJ2pN!Uvb*g==@oX-4~Zkfj6r?JU^hS`_<~wn`;{`
z1PwdyyPSpTQRClj2@q~La4Jg<I{0s9^-P~qh%dbQINDxm^=^s}A9$sD+`8ni4w(!%
zFAn8az0$NXfaC^$82P!*KkJ%Xa0uaeOYlrkl&by2KF@sxi}($HOv65x;T6%V9b9|8
zs*73r8CvGmr4?17uMUuiPYFJb#bJ}r1F}N;&AMk-w*TplDYeMQ(YvOkAuh@xI*k(?
zLok5$nuF=4xsUd3xMQlu)XvW{gZZ&cYHX#W;^@-XeW{66<F<;%wfT*0)6uT714D!8
z84bn=$ley%vm}o+<cs9<%nkbxpF`Vbl$fD{&}&+M`e4d|uF&*@znIX|m?bMyJ@ebT
zBi*KHm9;y4hstw+4n2@LHB!}xvH4$JFhOaF*bo;NM}k@F{3j25O`bJ&vZ<S;bdi4X
zM}xS9n4n(A<HU@=alix%m021b`pAp*D7VGKqOfj0RYz^zsy{XuAw9xs{I6^{9{H7a
z)c=byd-d=F-tCH;!FXj}u%5wGtXK04aP9c&v1@4nInU~M+oYPERSkD6(!O~rL5hA}
zxWscWJhiuvlQQ|@L}5l<Y1*~jL6OSBpvYAR`blQ!|6uPuz?xdNzVTzl28gIAEs6>%
z3L;Iqii%3Jf=J0h1Vrf_LK2m#l-K}~5)lQJ5_(UfRH>nN5_*6D0g@0>_dj}$|D)%6
z&pG$K=e_Uuyx+HyCwunZli4$~XVzLXv(|62y87gu-ULjm$m19L#EkDEv{y8sPP-o*
z4^L^Ab#CwU4PMssKH6Y>j$7n9jMXbBjgki^#aa2XMDlEIyN9dUh`s2(u8^4LU&SYs
zMg975@_i#ufT$9pecl_&WyBdx>4e4OU-;<Dd0Mu8F}nP<vHrv17QnN=yjNx)yC{Dm
zs<CrSCQ|!ns&)yx>d?Pn&GE&w=P%iP{MDFtp{ix%cvPJULfbcBcrrxupIZH%w?b%%
zEk>ru*pc3Q@NK>Q{9m&}S(<p^#dyCE{KC-&u#usnG_u?+oOm!t*!LIG|C`P4xj>fv
zQS{NcBum~5Lr%#H_G{(~3)qb%-SGVf|5uP)Q+2@|igNEXH*$2Np6ZyaOvkub9?x;_
zMlu|;fA_yg3-4r@W4t%b`SPY|!7u7V)^kX=pZyIKlhjtv8c(kgxt$xCBAEE$v+ee;
zCftARz!c0hNHvvi&*QPuYlKIrCKUr|o`dec`UUR9)p=Sz*F5r@JuVknoEQ)v{=1~u
zp0>#Sdd6?lkw;Rc3CFZeGhhGvluv!uR|j4?`Dgj=<=RTOAAUO3YkU6aKk$>^F5F#0
zL=gB_|90W`p~(wpCDCmJ{s<spD0MWvnprc;x9P3i7)wO7hJS}rHlPw1Dk$n|k(G79
zauPc`<P^F|Lgnmr9x>r(U7n=sXlpu7x?2Blq2a=fE{eD2KMeP8+PeKeLEMDO$nZ2i
zCk@9Tl~qeRzBd6aIw-p-TX(5n_u9Wn%fPngUrh;rvtnh(d9<s_tD0A+$`|cC=Gby~
zI;4)r9E3w9AdVb2o;}LL@c)AdUbFCPpH3*O-jd2MdhAxu-4v#2<U8CFNYk}Ng~R9E
z4<Gt4Z1>zcWT&0yqn+sXs-fgSKJjR=c6iI9-TeZDGpGOaWV<un5mN;h^X7T*i}DGG
zYx?$Q@(GAyXpfRtg*rhKe(cZxBOm|&?rSZQ(vHQi*N?*sT<2SoD?<fh{taGkA^jxI
zpgXv3)wliwIv&o<=5eEOvW3c4Y5O~(8?Q1f+}t@q3d)R{1>QW)8y7nhk;OMIw*&^9
zm+ywuFcmmFUwh5{3_@Z5^(v|DIbo*{-4F`D_Wy$4*TZA){Ih?n3@|7rRgB&H)=%ks
zUy|Ph;^)x9rH_e<mQUS~@?BrXNiO2Z^sKjE#!j!E{QK0_cHuS&JHF=ImZVTK8&_s~
zRIAM3+}hs@vTx2?xQ`dg?tOFN_d$sbJF#NFf+hd{-skg{<VXMW326Gi!HPYfN|<^P
z!J3Jc-6|&CZST?BDm?vu(X01{$+`bIdM6Qm^!Gz`Kv)$@awxdi+t=q<8C28CD6O%u
zw1F95qzP~TGA$>M)R)<k7K3@P#~}gtzPRuG72S_SDLnWuDvLbr5{Qhh^K7{3?;ZF5
zyMO(tF}&pL@uQxHs~-7*lh)V1BCj|=?aoBG9nb2y@U~8Mdo58^uluHlFl98idVOU5
z-$Ju#16^=?!S6fa*9?5yOEgyc{H0Qj`m9><qXPeOO?~T8nCj+#e*dNJ?q8~<{j-~(
zOTN9OLidG6Q=aeF1{+y{=NC*HyE|^m3e<H*rXPrqRL}-L72fv0fjAMbelOxifd}!J
zZ3XrBgmd|OOK)gv_~Up}7DsttLSGzR(TzQW^g87U(pQJs@@n)|?|15UCksD)^=y}q
z_BIDDuK7((`-f2TP5;lFuS#cW;4pz*wCM3Cu8x1%Y4(R+9N%AT-jWbqqjWPps#!HE
zjpvN?-IodP8mv(n6RicsAD$5XZ_1Uug3Qw?p0n-DrL6os_-w*o^$7mH9RH=Wd{z55
z3jDqAQz((6-xd6GJ#dj;MLGN>H4C+N;U#PTOX>f)6RcSy4?jm5@KT%Vy!p&*VZ=6A
zQS#5Jft`{GhztM5FXnp0&nMLV{7cK~S0H#gGmi;=%Q$rIXuqRE>k0wNrtby6GdzKf
zGG~(482w)%cT=%qz9eT=oVb@40rhPK{l;w<ax3Ab0ad2l1^sV&Dj<?2u0~n>?2)8h
z<9lFa&`OQ_MzKcqMugkAb0vsp8l@UhwZkVsd#aO)>bkaY<D38fmi8|pXW8aw0Qy6q
z_c2?vm|%d=kMj{Lf#*K5H)3~ceDlTtd5e;2KC*Vna7W3G(Klf%@ZcAhn3^4<^&d4b
zo;AxMcNBPdoc&BP?K>Cp@3S*H21mES<&S(}@PFA4{GU5|{m6klpD*Xq()0DbA?%>*
zzvC<4pH96w<@3HSN<ryQh#hAAH|fNmmIsgjbMbdqAo#CMtTcKydm7dZuH}J<4Yhm*
z5mO4QWMnIb{Vg2K-ppq$zd^#iez!m8yN4*vAKH-lV?X9M+O0dw2fJ2<?rk1A@fUsn
z%x)(dr2gZGp?vk+7e>upugfgza4e$@-3wgnb`0dr`}vD0|DikoA&L=`9LO*F=?`Q5
zQpy9Ia}BdUerkfT`&ySG+6U_gioTowqOgp)&XYo=NBn-}p<lbK{JsBc1||RYu;`mn
zjfP>f@-IeLf6K4jo62$0hBM#M?9C2I%q5jS;TeB)duCUqL8{*8N#%<40wFFIG0xQw
zNJ3NFjj`1^BQig~0akS7Po(AG?F;O10G|m1l$@62Ur0y-NSwuKU=6iJ7lEiL1&jlR
zbx!F`Qjkk6dPrOWjt80aD|2bs@}zdhPd_aq-K2i{a5SP2v$jYkV4L=q&<}byz{}Sn
zf)J<gBC1`NuWh=IsNO!G)3YuntPrE>B0m|!(}#}kYhNPJ|6nwH*Z52-)dk7ZoJ!1|
z{+Qd3+J>;Kf8+gZEae<36##z~Pj0O7dI`nP$ReL*5K`79{7b`+JtrBZ6XRobrX&*q
zfe;H}&_3BB8mSFmlF8dpr{0NEn(yOG>P|y@m}9kP6Z@Go2l7A{%J`S48oa3OzeH_z
z;xPY7)bT=?<u9pP@luUd88KiGHf9WXIx??$ACu(!EzkcXv<x3A<oXzYGnM~U9U6cg
z8y)^JEwm!qup&KOI=CNK*N-LfS7u-np&@0OrCRtsI7@_rb5k6zA^oC5Io%t}`GU6c
zxd|NVfBwWFo^1H-Sj=<pUc~J$?c?tD$*!0`oUHf>ka(hpqWY{-{4yOAdm^w1r1bo=
zm;S%^y;UUjBWCxd^r}Ge{p1ur{=I+nh!LApe^C^VwaRh^KNy$;l|MOA1cf}+nRhdi
z|3$JE<L_sh8vNi@f73P=+CCa$b93#WS;+@YO&g;cz5wMt|7>l>TjW>w`tKzg;G^|)
z>X%--^Vi=0qr-8Q-r{65*ZF6*M8zC$$?neWgEd_@5zWerUq_IC6?y4TFq-f{f5Sg4
z5PVZzU)wYQSNk};hd2HiMP*%~YV73!EOkwg3g0ic$(dgbSQxTY0Sz8Y#$cpP<I`n%
zpej*KBDFlbQJIN@-VXaGZc}&wDvpLcyU~lWi5I|6ai(L^6Qa_lo75n;PJ4N~r%3uw
zCWrpNpZ{<j)L!aH`LbG?>hZ4oufga18Ng18t!syadsgcgq@lm*XZ~quoB_fh)jsyC
z3DDOr(+7H@XZ+Jo*GiA@WFS)h>t){bZO-EZP@Y#(>{BblP+6-VH0a;4@KNK5dVU@n
zZRqGn{q-(I`3s+Yp#^aLf(NwJ54nhg5m7vGhGFl;3&9J;3850fJ`c%dOZA))Hz%G*
zBa;e864ljX349VkK2hXwUSt@wrdWbf=o>dys7*e?Jye`YFx@e_ROtlOs#qT7oq=}1
z#fxaHRr37<T|^+QsdAxqvAJP?5zWoz7a{pY@_iAKUnJks9|*}WqW90_DT*h0^&!8>
z(=!R0{;vV6p=SpDK!5OWb;k?MTkl0+vKxQ)y1P34V;kZ?Tp<wfSvcK|;uHLh5GFi$
zGxFL(8a6KME1&pXwf^y`&#5d67ssjJtv3w3P~^RCDq&;769*QYApTv>c<^Lq#~0sP
z)f_2KOvywTn@i>u!jdEwo_kSk2D@sl9n@nQR`xLqtVElG3$@SaS1ve`M%(Z$U8rAB
z$@1krDSx~$!1oyiuk7A>pYII-zG@AB-jr<EU{~I@hc^doTUuHJ*KYaIp!X}3+JXX4
z!u|{5AT<-P{^>7d;g={nhR#gB;_eKb@|E%FhrMnkt-(1dVtLi;c{o;>3u*t&b~S%{
z@|b7cJjn4l1DxFDC*P_{ziS{r<-_+PtauGmdcezi@y`{w1^5R;ppdYgFT&+hRC<$$
zN94BN^^w&fJb9J#iV!wa#f>)=Z+nCyfgi_TadTBrP44?se8oRTU;O8HQw;6%X#{-G
zH{Ho9_1G_xSN0bTz~ui)-~S!T!gtd5d}OtwrB`9{_fuZ~FxmY5y!-!L<o;mZV#LiK
zEW@^NA8D$u`02x?&|mCwxqQEXP5#uf@(qFCk&pGYv);Ac%G){Mb2t8=x2JsxKKK1X
zQy++jKdG8MMG&4be=9$co~yi#XNAfGpFTJ(w!y~z_Wv{iSDi9*7@u*;FTJvGY3x+q
zF1q^fBW=0trLY%{m96F?GTp?3w<%ZogDniR-t(3go0ZR>{TC@<`hoTvF!fVc6=C7+
ztql3C(f@{h$Jf8|Z1rjuKy8^#+dTNUg-(R?2cO%fE4y@n=PS1Dpg_{VwZ=}Bzh%+$
z-%JE%*UQr!7s0Xhgv1x;Kn<IKw_ARwm6T^tUhIrenA=g#W4=Yga#wCdED#%XDt3%|
z^E5A-)GrFa^3xIkqNry%NGJIo7>ChQ5iD&FXA-fu6#>@MiPG<PTP_FFqr3yk<s>Lx
zw@9O%_$U{19qbY;AR$)2+s%6*HfyxM3x`SpVQt5Yi)ahi`=ab2YFSPkwnpFQ6MEYc
z+dGU9TlLL!J}<-0)paSq&K-R1LSK$wJ6v1vH(DAGYE<*f-Qyd-tXqGXzeimIKXp1Z
zk^U*_U|EFz%|F0n`v;9BKlzpn7NY-+MPl#p&3?Fj=)XL{puMKmh^sC5O-esB&a7LK
zSBy)lgIgZ#ZhR)$u*v?%gZc(ddNmJ_u|oEnxvS5r&nOUFnf`74vDFqfeXll+?(_IO
z!iL;iKnhtTzfWy>o}Rk@A#b~jfB$=%@4ZK|wyC}2?}%Lz)m`7s>n{b28w#eT89U4`
zAM+-SEQeGCxs9&*`?$w{G9~Tq<6odMd-tt1ZIo2pZQf}5_;*IK|0kUm@+^C)^*n=*
z2i~!cw4fJK|H@ibL-FJ@G1cZTquTjAkoUVf6@$hv>it4*Saj5jBMPRmsJd3A&wF~v
zzbT!?#(x3r{fFN4Rr&w^*{5V%C*b4_-(URxzxj~IzvTWvyc19h{L#$Y@2CE5L0S)}
zIwyRYQ5&|`v3RGVDrbKAEw1fLZrcr+Z`TX+HmP|b{yFpQ)JyOCx%RuhfBKKJ{WZ=Z
zIg=h|-_u^4YY$)bm583Y*wL0ABKT(i?WwE%&iWTSj;5@=w6!4Pt+np{hu2LyR4Tt5
zT4s3%yN;h9zKYqVd{c~fkSZ8?`LXis6N}QDzc#GC#5;LSKyGBte~A|CRp%a~(wo0@
zyHdx;f9(0-t>nSm_+~qNSJ)Re@IIrj5@f=Iu>6j!x@shVGVP^uPwiC%jhS_$OH__6
zVbGa?y2<LPZlk^Dq}66=&ER^zQgO;adr=xnNn;wywdVxHa`zM;LiD$nHFl<@NSv^-
zzt#`3wXv}o#laJPZ+HG#>coEd;+@d<QTxYS@Eb-q8dbUAqLJCOT}El_ud}kFPMm(k
zH>rFUH@E>F0B-L-u4l5ISLN74h2ZJBZ3VqGXZ}|AlD{)CWK>CgPl&~+@8>PNeuJ0)
zZ$E3eoA@hB8E+mH%`N!W$?fk6OZW~HsDLj&wf}RB-oF6j`{z*>u%f&{_83+!dJxXI
zRg^d_&p`M^r?VtgJvur81^U5@1mHO&70_{>fH$HA0*0T_oHZwPCY(jEOEb}QtMZP;
zdKV}5xISFT?cMlXJHl*vi9xu2+b>$5t_E!v_A$R*Lj1tba%P^WY-=#L)Ew=iadSJ|
z={8s>v1lT|VQRclp3ArifDWU}M^5uLThe!tD;VfPV)grpp5|~#IVWVi6PJ<y3>sCy
zAXc|6m9!aUjp{de!OR#5*G#nSW1?~IY$rUNcQO(z?6mD;qj6KVV;*>DMVl9>g_n+Y
zZEPEE%6n05%ES8rOWa8YX`{^-+l;GxGwb2zzzVRK)|QFQ#WlQ{^YCzBu`TMg_4b4+
zcax~zv6nHDCWI9C2?Y_O_33b69$W4<lbyXZCOB8>I@@baBX9%8a=>LO86Mqql>z35
zkZdEno+9}Y2r%LA$Gxp#Af{Tlm^<Os<vUWMj9rNDuY3_Z<I1VmC5GaOgn-H<L6|BP
zN~EVXO9IzDcs`c5Wia`y`^wnuCS{qV8a-@Znjff%6<$iyj%RSsiHMgG!kbu!P-V?U
zq%#%@jF{}M?UA+A7anIPIrFnbBkWjEHZ#2&YWo2V3GD=5^X+fo<4#nv&<hO9RKPj5
zg-$10xsC1Y4^<W@SxT>kyI#9S393!)L|zl>;(5D45v2h0G>-l-4>#pb@~ND*R59a@
zYmjeGC^N|#4qa~*Um*1;3lDL587!3qS6sU)R5pW?RsctTBoS3W#I9O2JAmovH7TEJ
zEGo{liuRjL?M(~0iiHlU;z~vXC)n?Opbi`jAMD-?2KAFi^YmiJtI>;AE>$N=n&jr%
z0tOmLS!DniDe=TlIwNPP%rq&xIpQ?b216qe*#1?c*c$zA!(+6x-5Dk1ansBMiGhSW
zb08vWfjCzL8;!XfPeef`+Tl!&jn4Wzo!nahh|qR8qlELwg?&WzwHjF42o1(g7EI}s
zs8LHtXTxDYn}c;h<xv#&l7f1MmSfjOQdCbVgLY5{)kX9nQBVO^F<_Lo4Mg%7N7ht@
z1+^0IrQ|r@2`M;Z#U^_IcywHMfU6y>(@G?yV59sXkd6^kLV}=jgd0O5eD)%lVu%Jk
znmifBE{DJw_w~rj-Bdw|?nR0$k~~f{!~6JgMbneK*pPUu0p1Q}>@H|m50fkl^$12C
z@(1B`sEr_R>`OIp5+MLnGuq2muhq7-QY_<Eroo&pP+0bvcTh7}Cc=f&Lb(Nl=c{wa
zNAc=}a`G~FkfI0fVGK7-grFDujaV<4P1$-gW#*b$5KVWcpFDJ`@5pp2$`R8bhYP*9
z;MIFr5_Pe}Mvz-U+f$h&19RwTvB9t3<LvL0r;6;?nOR_sqskW<p_OwYP-y&NjIw5g
zXwJ*&cUn;bkSwpxF(%iha*oCJq;7CY>@4Tvjm3+*II>X!WyZ)-XS#muMu;iy*j|E-
zT^?Rh8+Z(7&b~pgsewmse+p67Nboz^!+KO80MsS}n;_zfWK0t)19YaQ+XEq~A(sIg
z%AX)AOwaKjw8L<2Q7BGxVgx}*z^E!5OUjzFru$0t?vYGeT-dP<WuL;;a;wIoye@iR
z2fHN|97aRu`1h!y=V<qI<<^(ky7=BoGa?3Q+1o$4OewRz5}@S+@yzppFK}-+)mnEq
zEd_Wr3lF{^Mk8x6va|H2f;9Sih^5zjfehLAsv_Bg(`t%Fn?rk8HCU&GKqOQ)BET!S
z-MO66oQ<m_C+V>J(3PLqoXhZ{MbmgXAwYc8>lS^yYnok#ZE~4YoDRO@?{vk>a)(zl
zy8m#%&FE}nU^l9K>8X+RO-=C99F6;+%((Z!Oj+0MTFyepc!lIb0DktaX_7je&`_C$
zRb!~);669rmRk>vr#r=qBS0c9YSUHp3hmk%I6P+}HCqoT17kcx1M<Ky{5aQEGN=EU
zLK;?6d4~DnpblZNX_fByT^}op@s8crWMAkZ9V`@3%dSo6H+6z(EoJ%<@7kNPuI>;b
zn3h={<&<JIOI$n%hyaWm2vSXlGc*TCabV<SuTu&UOd5jElFEUrB0+n2o8?x#HZKc8
zs{`4TC9x}^j~Af%^q_{NDP|F?@-3D-WtyI(vuCDYN*!P`9d<_qs3f56h%y!03ruru
zt1_Z<ytYGiU3fFjwWj<r3VI;o`SN^HB)XZuOq=z|jBd5_1&h2*r^q`VSln60&APm!
zVAwRAsO9C~qlj^7Aeu4Q6452(XY$>E_6(=uMS2&<fsjqN1ti%O1FtdFcBnzunzc<R
zT|e$80=Z~>g9fUDt&Jz$mDEe{{`5W^Z#+KQLt8#TxK56<!?L-(P6&{=ACA-=JSfQM
z7Dh-ebF%fyjS956<Crq6TU9+PlX->0o}fcCxn+ZHW7Q3j(;{5&Pk1caj@4N~DC%3d
zF9Iy~yW$4zk#4=i?G;X{vyiTbgr<=G_bw3oev-UEQKJ8VLni{Wooiuv?J%U~_V5x2
zPwNa$6yz@oZ7Soq6_pITkTVB41qTKzK;9s3eTyFKaU)P&m4@=)H=tEWS2ZTk7F;W}
zfa|mLNco_67_%=>Uc&RnG7Ho$AR9~~Fe!yN_Hu<Q#S}N^gUgSsY@+D|OgthPZ-i?y
zT4e~!&8*=lvINC|tGcIx>}^%twL-URqiS>61U{|^zGq+ufv?*T#H{eU(-BN+%UfLb
zsw_YtX`L^e@`hiyxo9$G5NCq1R?rEqSW?RY3y-0zMCg1lI5fTMfJB(<V3>TO79FBn
zp{&Xe^qz<luI$7anvZ`-hi!)e#BgUTIGI)%X>Nk?>JTyAplSgwAa;kR2ZPJ;tkxQ3
zKtk@iZ*xsG4~{X5x3NIkGy$VF;D$G`G1l?CUTn=MGr3*_w9Lor+0C?%H(CwX1lnum
zwmQTHiQ$g{O{M7=3FjAnvp({DGcR2SgVO=;!9H5WVS9sqmrzznFi9^{aoSvrwgC&X
z9&7R7X6qN<CTDFlDkJ+0m$z%61Khf0D?7!Sp>_pjcPjU#1<a0wxCpK@eXYk>Muo_#
z_`>2r2ri_!u>DgS#>DG(@e%}O;ZvRAQNe(SD|6lvqBfakVCnvOXT(Lbw1$%{3)ODk
zC@!bE&uxWC(tW0^aG1Pd5O{;gfE8pJVyY!1XJqxJ*12r2#W6_uw)b<IyI!O44T|`6
zu}Sm`?snx{VSYo_s?JOJzTxSOU1n3|<1#_|g&G;%&!M1Au{gAALqi&R8_cVXp9mwp
zQX5vi9JNEsm0RJ;sp^J%o#VE;Hl^rYi6~d3zeD+ubjZDomO%OSMFA{Tb3(h1<FYQf
zKPvrp27kAX=V{bVu_b=^HCBa=F}s#FTqL5EZ8wptQ9-MQOSli4r3Delj5$egz>U25
zGGrvw=To=J`dE6rTlc6SuhfPm9xU_b_kucBU+}Y;>BILKGH}Wu?R{l6JYeCW7~Bh9
zyg$juo&)V5_;1oY$X?DkQ9D>hC>!nr3-ruJG-1W$N{7;nwMu3OhszH@qBzV+ugYLB
zyVvM5g12k67)raazXLN&|B6j7LeO!?wcnW&5JCFGIZJ^00d_!(q3Twc<{|cUjvgHE
zH1OQDS{|M^LEV!i5Nk460?+Msb-?9W;j;kdaD6MOJeRmCG=wnFu1X(>ix1-AGEUbY
zCSbXELz7LhGN!#LsX7vJ#zwiiQRPw=i{5h_vX+}i@pKr0#-M~yDr^_j18f)N0=Pb-
zm1-O?nmIJEIQ-=1<v={+^s*ThPOIc^)}A!h2nqL>q>)+OT8Au3=E5>zUIVY^<CDPC
z<r4_r>ueu%f$A>LI%yba-(spXu{c+mIXT_@!`)&i%>!!tDx;^;OY1(lGIVv!Ji<Nr
zf*XAN*{>B;EhOa53*yvKK@4)_^3c3uYOo&#B+2?9hYDRofQ+Q7VgsPhf!Y=Fu&Lp9
z!vzhPBl2ojE5gZ^U$Ff965z@uzLAdXGtX5IqFXdYt^7zF{_RTy#YT<kDj(#4>vdml
zjA!=6=Mo&VS~!VrJSbF=;Q+rjnr(I`*sSj3IXMUGt~qQmtIK6cAP<&(-TkzMLL;-j
z)HGA+R^B|@)GF&b0I{rWSSW6s4RGJB$bEN&eur*?F4RB$yxr4g=Y$*qii=0|NH^jq
zM<@s_^5hXZGdwhbK#{lpxZ5Xj@%C<z)iLiDgflt7-B%lfLpDevE&RF!^7OpRJdrC1
zo8%3|IXx~}<*tvd{Av{2jnO)qNUNGIKdHv%=5tmb$)Suli2l*a1nM-qQ@1js7{8IX
zs{{QrHh=kxnZ;M_tWc3ruc^)jV;Jz>#y==lj>D->cU-DHLIicEku&D|GF+~3t?OIn
zC&sA3%eu?NmcD+_PVVe{8xIlNX-5I%If#P8U6(By4}@=2B(;N;)TK2=P=dHOX`~1C
zK_!(~*9!0w4>%c23H7vl4jFj;g1^>hBW|BeQ})%+5F(_!gUm<K2xZibfbpcJBlH+P
ztb4sr^M<^v%w-mD?+OjgA~>@OwZQ`p8|<n(u+8c)I)fFw#>Zmm{EgreF~>y7k|QWj
zU(D8trFR45CtyIi{JA7v2X|{?ap8IQc+5D=Om$beYd=DOOrIcB3^;4N(Gc{I{JhnJ
z96_txga?cryru{<f60AAaBO=!ajdptV8zs$k*p)E=(aNz<)bEQoEe=YF*^dyoq2AX
zT@6v0#oM3Y>E%6#ic39TRt}6!dSmBi=5cL{kYF=6z~ej!MH_xoL^jq4H6{0d+3-T`
zP|sfIJ-!g)+5id(;*<})cEM7;wc<V$aUF{0$b5#8_W9`I&FQz4Cx~sY!VyJoAXT$i
zb@$`CVe;kPBU4kd;#LT9X!laztuk}4uUh%D8rWih?{Ge+Ju!sXj%ct1B$L94m9lRt
z>DBX>%3b^wI9t{Cidii$l2avtOtFe`U#LGV*M(3x^$ZzWl9u5!dQU!Ki<NBR+TQs#
zt2f7ecSB>BU`pki!API>C3&=n6~2HPvR=NLJ}YZ)nFmL>%!*khSe1SVX1JtA8m-^h
zmga-QR(Slnb;vp#)Vi;lX9e0|&23fX3{}CzLQUKATt0*k(@w-oKM<@)2VQ_F93lJA
zSp869`f$^p^PsKPCm7`sI5LBJuzj{|{>I`V!4gvcFmkG&RtE|)mG>{Ylk4d#$8c>-
z^fL6-Qrie;Q;jRjeI+qlaJbksb^vY_*6p+}W@=VE=?)WGINw}joMwO4maxq7NRJk1
zU`D6c62Rtrv<9777so{x=nGv361_F9n%q2(sDCJ?|FNEbq&zZBi6N#FZKP4|{uDZA
zD9PKJ`TFf5J=^Y7N>Q#kn^WfOHYjO`(zE3)D$oX~ZdSJBOEV;ElXmS2jj8t>{QE{F
zMs#{?pQBZY|3Izi<L-wz`#?Q?muK}4i@6VVc~6Q?At*MJJ3Y%~O(R(|P?vTLM0LF4
zekv!ZD87pyq$CkK?@T2i$PK|cF4B_N@fY~C=mrVAr)EqzZQKU!p&50jhFE6OL5e0V
zFfulCw!H$wBxP%eIhPtUx6%g>b1@?a-3G6=P2ZCb=^pW;;g&V=5iHmp9{4^!sylj-
z5|HMAo_B6{TTiYga!v$jZCBAk32KqOMkto5OJLP$`Km8zi6bENw`HocDemLPP^OIX
zFr0jnU^IHv4Y?E9oo-0H=&Q(dQ68_<Xq6|kILn&bYrJB^iT&;i$GjinQZ9FpYDbG5
z0BQK>CsH*hV~YoRgw!fKS7xj!hpWYmk6LPHk!!k#32ty8s+Pei1{N1MyO!#z=nd`*
zzK2cm@OFxeHZq2XHhnn*C?X@|+|b)@I9D$RnB3-+R@3Y1-K^-omXne=tmJ}!iy{Wx
zK(s~{BefTb%R8QJL{(8zE(c&e4-!XVCgCVuhJU`@%w-|Jz+x=0z~K-+N4K;k6yq>%
z@bp^lof>G?Hbg_88=O?d6d8eah1WU+7B`3ZsLZ-N?Lq0!5Dsf2cyB&>v^;uLyR4Ry
z5-<R%qBY>K_6gmJ+T^Pvegs*JHrfV@A168U0K^}36S_xOGm)tl6xK}QHF+$qzB?RV
zO<@xZNuh#V6q<ZD{9s*|i+l6V6Px$g9l4=yYqUc_=G5_1=eC?Wwe{lG#$9S>qt35g
zapKjhSL<#Vg{_DfO91$<<mFMkfjmVQ!e!o`8ndckn%Y%*SEhRM`*&q+%WajSE~0d^
z#xu3SiA$l?83B7w&t8m)N)u1ib7op(XjX_K?zz3BotiAqWnYQdX8bm(Z(n&T2W4L^
zDC)9<irF*`J_Px>dZUTBJxxCeZycqK+Dr1AEY@!)Z4#Oy>&O>?x-|1<Vri1)J8a$j
zb=Kbwm3NQ?j(00sX80awRh~np$1IsXj6x{QrX50Oi5G;QcouyNxN-{{(hB3(p9W!t
zI*gXD!OoB#T-=`4ZOiamQ;>GB-m3%FcWoi!s7$&9)acy7*w>sVcA0v&fSZ%-Pc7U}
z?S8RoZV#g2&n77c+ZRAb(Qxk7N#9NA0YX%~wv2qDJj@@epq{kKpq8};8kGwJ0)42E
z!wtr_FxHI9<C<x>N+WDu5=1E)v9k}beAw4|T-?6et52t^JZEH`tUSM_e5OuN)aa2c
zF1d2D)F9d_G`t|{C4D%BX2#u9Bg$t|{u0-DhTKrE`$S3LT&w@l4BxZk8MHljv|b)3
zr=KOswvrEea*jRAk_m0+Mr6z&eM~IIQaLxOmAm|NUNGhFu+2!Z0_u_p9iX-BC*vX=
zSzLE^DrwcWF8>*MrgB5nL5BfHUM?RZJ5UcgsazPx4By@YCt&OC>N#}4)Q`@BX>ijW
zclW#Kz+>nUBqZ-vj6QRA8kK9dMFNHWWWET9lCj+`X@~HbBDgrPlO#7?G^%qW(18P6
zFzuap1&Y~bc%57<2RUBZ&a53pTyycl>HtFI<b`?UVj8w4^evhf<J>5Z`L3Iym%*cH
z@=LXAwv+n?Kp-Hj2uH%D0l{eIC;_w}sWI&W1o1<dqY~ltMsg8RXT<U{Yjg^1o5J9D
zFX&~Ywde@KW15<&IykWH;2?*?PA|8wf+KtkrjSUThEf|A62Km5YJkV^JF$o?)S^)$
zuY7ssH=4jUi4m|eMtX*PKPZ%YFuui$03IK7VRq{R2gy3;M;CM^QVP(mAu`KIg;w)U
zFo0Z`i{nt1P5mHu;A~d9V+<ZhfJYm$;1?JT<qR*NJiF)F9FBWXjE{!00S=kFF7<bV
zZCTwMKO&+h;0zqb%5$9P1p?qPPF_qT8JBw+SUYb_f$f_H0aBorX)+O8KS5%RP9Vp1
zEjc)veec;qf-yI&se?tS$JR?@I5>(uqotqg#xm_~NreO6kLKioF#3BsDh;@*LIUp1
zf+q&^Zi#cl9m{hGAnsKamJt~cVZ5}(S^|pNZ9QNzY7wu;p)l=xqp~2tA<*Pp5mu+6
zHfaekT7ak|`^_MFF1&^#=S_Qq=45~{FFzKNg3I0QgGIB`9n<>ZSe+Z`<{ZC8uq|Yc
z%c;fIpP|x|u%F=hFh(UUa*D$xBytau<)*==fKYrDorr@XSws?QG3psNfS2gqJRJef
zRVy$a5Qj(eUt-RV;TF60aJ*Ueex_I8+-3WWrb#f6&D$Ftj^TzCwGmFhandoKXs$+=
zDH)*(uYz2f(q{QM4t0TCfV;bqNrYn6lhX7v&yQ_2xL0{q4l<;oCGUqwlCMu8D!5NE
zLgS~Pd=a})<mKVp#piIkRLQPur4z>nX0@by;{@Uw!{cfN@6F)bMI04}w`&1cPU1SZ
z(Iko<2PQz?Ysd+X1oqP{?BC+GSNBrMIf9dZkqMb<Xg%6)L=vigGSg0Y#p&wS)3FG6
z&@0T`-2GRWQ74U;H?NaF$_Rau9oXS^)Mf8h530nb`{fc)!F3FD8os0N<)b8cJy~OJ
z_fPvAcT0~7JD*h1;;U{WOletpQnd$?iBH|9)Z)$gySK01Hc>HHQr{?P6u4zVS5a@R
zBt7ZH(fIYMW&W}QfuS?D5uxvnUNFGH$7anXz%KEt)fzAE&kPS?V{A<9E}X^j56($s
z?Tj6=CQt2aM!BYwuRT97u;?h6M{j?6k42c#=&D$&Iz^r=*|^Ey_~eP4*S_TFU1{X!
zo##JYeh>I^^VPOe4e9EiNE${pD|nel6qZ!zs)HFL(n&-Ubg+d#cU(ma>GiaT{!^py
zr?gR6eA1rAS&gVYE8?hZV*xFC+|z!ap-t{n<mD1{ZDs1IirEEyZN2@l`_z6Fv`pEq
zJo2?xsZV6B)XM>D<`m@5n1p<^WJ3H^QpiI)25#O?312z1w%z}^>0K7p!r~119cI>l
z)zXvmfb-?!I2^C0qR7{261##R=(M$wS9TF^A(KC9F*ViDY2?&5#{sw3t6c3Lcpj#g
zczzlzb!(1(7dmtT$dM~H!mYul5}Tag&kRFm<TkE}zyt<7YRW&Eh&b$;hci&o{rDCi
z7#cndBfGtoCl3p0k)L(j3&aoOyZ5e2J@;W%%9%I2M>BTI%#ReiC!csU2zg(3QoxyJ
zX{R<|AL&xvT+-aGG;Bh?nsI#>GRa4FS}XdP?9V^L7SaCpa{SJYlVwN7)Q!!pHecN6
zhpto^*?6<f<95b^Q5rGX-5+6_DH{}z?o%@zQfcoWM7UL=F{43u*3LXr23HsP3rdNe
z6ws>u^deN#pL?i?-gCut&rK(i#;$b?PmD8FvUW5qG@pwl9#_{w#GT{F@0kfSX$TZ?
zP3fMUD-o#L)}=N_#n-+o+0+X~V0Sp1QTfM?W7{X$xid0}DBR28D7`b}Pag{Kmpw-7
zcjx`&ueIiqf2bG3=@YNP76`S;(<B2tL(Dxb%o0xHB(_ui$8+=Gc{-x<i&KQ1d6VTL
zR0-78&?`>um)<ZRu7Frqm$6GRA6D#qFxV*Tb6m0j6`+pyc}LKEO<e84a+Y1=GsURX
zP--4{NxYKBjH)w|m?xACp!sT64zJaciPytDo@k>K)BVxDEa)ea7A=jl()}ISDvj8k
z`wp8s;=>dTeXGBcJftE)zk_Z{sy!*Kg-z1OZOk3vv6$r}_Y%0rSH@Axcgs54w_$z2
zX-iL%`+QysxZ8PB?WBvleApf%cP&%n=#tMihTf!MJ_yt);Zxf@E=(yk+qHOLcnxVf
z|N8Ed*y|5>zrkhP98%X3iPN8zvOjT-y#9Le8Jv$@3njb`osv1VhM}Y*-RR0c+$Orh
zq49d-=5<hf8JYQk^W?1#F<?$(|0cB*w2a;Qt0(*k3x@iiQivib+D_{A;#O6*|D#Ik
z+EiIx^*qzmH}#M7N4KS8)o6w2?JMItFlGy~iAmt*H%pJ&@66sm=bA<?*rl-l6;U%!
zlqujXP$g`lX*er}33LrivT2^vicv?~?LysbD~>kAsphejLX*-kgJNr6fsV^*fd`10
zif45F32ybLT>~dj5g2ObPj%4Ba!KbHb6VEwT{*Z$rQMN9KvOa?z-&PQnFPV5G7d#g
z;50gt+9v&GI;`$=HGp=Y8u6p;1BW*ob0VT$F8L4AtL?+cig0KcNh`|_v*O95TH{TB
zqo><IZEr32Qqj^m0#BGxv2u4`YkMTF*~x;)oZpy5m!!zOySrM{Uf7(qeb;87oV;??
z!tSUjoBAB9TJhDU4(0kY8X*Vya~f~%ac>oFn_^5Wy)b_2pk4Qp`1t8ttyH>P%6Zam
zv`b&=aVaf5Sc(s0NOWbLlCfPorJ{S%Z*s;;wc}IpR)74Gx|T~)Z)`}%upJ@)aHz%t
zG=yHXT(u}R&3AyRdF?!S$S8;;&pNt(tPN(F;&&{Pd18ZB5iEs#Eqmlc=`LB4)BY<1
z5@CYx;{ExD6)aMSRc5oolPtLmFC)#S_KfAGQfC1zm*)Cf)$^oR>e@SXPZAWY<vyiR
zVvcuftw&pDvJY3a(Jp#|O9wZYPL(WeP4zkwYqeRgJMAJGz0*rTYEq5%Tw66i&{s5V
z3q(&(T5yXgb#TXxsZ#YU95n4@dCM+4!7IBSWa$dC1|S+1Z%E_5FVe2jts~9%7VyQO
zL+Dv+eMEGXEODo)TFpn!&RDJuN;`fM>1TL<#|zMtDK(m}zw_>M>Exe}?QJ_IVNCJe
zqU9plPHuU0f&#m7j<9ld79At;bJ?aXQ~sI-IDUKGwX#U6VeG+yS4-9PVi}B|t5=!m
z2t&%Ml~#1Ia~JL1U5ewLuj%F?J(s(ShOyp39WITy_`M-}Z8&$9w6SvKqk%g$w?%f}
zn`pSn#Gew^l1Vy2VQ=%dLc54bK^%slZ!z7g<f1=%*=@JU3fmo7Lrhl!=X50>VwIij
zHovHZ%*LCpPa#g2jqW&&%Vf1u2p`d1)}CuCAVsJ3F~>cT=5;5<Ey1-dG{FXeSFE;?
zBkSzFV@h&^i>=c8f7ZO9Q|{wQE8G3BCNNt&FK<T}IJxoX+Q!wJ^}7{fr%IJy8*A=3
zIaLDOnkHt@+paBMV<w$C1@5s}k>hD8GDuu9V5Kosl4>H4Gn4cWTFU3KcVEqyKcah*
zJZ(SCclISK?UcG?uaX>*_U7`Q;xkCu%SA39l{R;eOu=RjHpv_U&fELTd%Rn<9y)B>
zepf4RMk|@DvT@hbi4$E+)!?|Q=gDiBRxYjrLDwqrYYh4Kws_4%8$&ma+@qcGCA)EI
z)WhD4`bJ{(K0GAXHNH&U&u|+my+}oio8WIi1z$1nu}p+m0R$Ya9U8d5RBl}|iFTZc
zLCDimK5#wGZEh2LvjhwIgmH@A7t}((5g1p7<=8?##$vF;=jgkwJ9Gl4SbVV#2^&gV
zin94i4R;h{<)PrGwghb`D$ijPwLg5$UU#ZA!j^#dMD93GujG1y#IE<p?%MrmqOJv_
z<gzju<geATe&suO&Z6fbj@GVwa}8N-nqCEDuOoZH(pV{1MET5EcX<0W&*_WluN{Hx
zNKE@#6s0@qAGJ*<tA%bmGPP{=hL!Eg#Csi-sLeM-Z`@&d_BAOcs1h2r>LNP*ej;Tp
zUSp$eHMo?!E}7iVD~892f8NViTdR0b&0C?sfqPk~`>aBuB43hDL>75q(l;@g;`%r$
zP|UJ6huspMWj;8mY4O^7tfQ!LWao1|cqw7w6$wPZ^gp=2Dzck6#ZUn;d9%S_)T;L%
z)avk22|@UxxFqy#(c-L)k(Kth@U&E}U(y`Hs0Egkve2AZW9Xx<BlFgBxrJUJ-{v*A
zuT<d16q?mGzqa_)EIxWk^;xt1*>k}0Y_>|iyu@tCBaDus!TnEGZnKnoUS{fv*jvo9
zi>C;yKp`8I@JsfY_4nK`X9>WAWD@h|7u|c9je|ek_m6ESZ~1_gXQM>Jj5B=e{K?M>
z1b8o(@BuTQybe$GL0%}8obkaL4h@oO4!EqHp&z9Q3yP|mF$jp7x+6?0;RZoOJDoi<
z$?m0>8eWk()<Q^;yNH&h5rsSO;%~Lomx3D}4;fIl$_iM#@(Z^0k%5$9sp=N5agfLO
zP%n;6N7Oa%fS4t^Cz(`2@EF=_iCv0{S~S!-rVE$Je$B~w<y~2dQH(SfnP#mVy31A?
zB&bt40VS*D+KyFD6V8>QW-ZZYEVqb<8FM`YuDP44YsWeyt$RrdPe<p~Kw-OJdDD3_
z$Z=H}2XX6O=zf}*Nr2>hw>BMoWC-ywpCCl#6dy0OqNa5(ykhO|3IM+%okrk2eHg2K
zTRGeHoBiPfPbZYSAQeWQ(CX5;eMiY}*=v>ezam#^rjhRRd0I)f6FjbAeYP#lEr!;f
zIM5WHK@gj3bt@(mISPl?QaL^5=wa`rjm5eIRj2`H!H;mqrEC5^*V(m*PFy1_?|YIS
zM+Z~aZ1wHb$atW2;q2%U68&ksCz$eHwUKCd;v4~Yy>eKMlenmi=4zFa;f93%!>?c#
z2ArAoP~ZuTRjn_IxP}GAwvpd>f)*YXV)fz12dDK(74vtq2v*c!An}4xZ6r-&N#Ab%
zqWn!ficYf++*NE0Pdhlt?{kCeip-LgY^O`>PpPxjEKTt#q-Rpogra=r%6-qMP8&;x
zRtyrhx6zLxTL?~bZRK!8-|VVV$^EZM$t)$XPRf!W7B0Rs11|4+6Tqz8`RBv{HZ@2A
zS2Q;;(r$Q-As@o?;ZlGWa0@s!M+D8r0;UW-7RX(PcY%ei*XaYes71t*>KK-HGxQT2
zr_-nNm}NFDG7i#m2IRVyjcu4@B70gh1waGfn9x?n@>N~}<Di8@V}MyIY&m`2aoR^m
z7MP?-W^DujO_r&B42UhI8Op3i)wfR;1BzUGHyWytm9hl%(^+O@R!To$1?bIkJ4wJK
zk&#Yk<#Bk%H7r75JG@(yV+LWEk|}z;*$N^NtAPZ}y(xLM!Jt7dRtygFl&lP(5+HcE
zsV1klc2uwW9k>a^oq@u)!8txfEMyjd?VPiRMgh(Ma2pHDM{;gqxxFKufM=ObJisj?
za^SKUt_!bk<&u$^98f2#m&r;QX$4{kfFcK+h~pImd0R(<0W^4U5sL^(Ix-PXWwSHb
zDa3JmB1lW;b4mRey$n4Z4%e*X4}*DgTPc)03L**lOVk-&RN^mDHGoORKZzO*r<VVk
zDzBpDb;9C6$#}T@qq_Qat5@DTzH9UE4<l(odq;pxuZ7l0zupWmvhBHiU!yJOeGr7r
z2ZGo`d^*b?KL?QnXb^<JuX(-Sd~E%9NDhDB3Aa0L6Mm3>;-93*)l!_qima13pi!f;
z&0yIyE(~K@*93-=z!M)&NFvZN2Ao*Gt-zyxYp*lFQR9mS;xgs;C}8_D1iru0#E;}*
z&BbN?CI_*R)yM^$%0|B>7n^PVgK!Z<XE~0&mDBHAAA#T4&+XqqT=mUo7!H$k9e_8v
z0Y11&Alj|AnBvj6DvAXU;fw|h1+ZnBYO#KjFe-rCb@UHu5m$LrF@+o$@nd2`>|o0f
z0DT-{x8m!2`oUZM(W|b)2~Ozc(+7{Ql?g<cP4pC9=ljoqc8<U;9)BDnS;HPZ{$rYY
zywXe&>R|~L)|XfXb!s2%+pZpCGNB$5k}CaHPiy)j!oMR$lJ-9q1e~-2KjMB~=h3UU
z@%R1cM>YO!kAuOE=)6Lc*B*^Sg);tG<NhaY{;yu<3OCjb*~F-I%G@!oIvSG`VSC7C
zXT!CczZ4vYU$;BLYg&eGkQxL)ZxZ?!OUPE(vFyC-&#K{f{0F=BKli8SpjN!ks+|d&
zwC&7V>U%nFMKgo6gg0%^IKH#~Ldel)$(wBV>;C71x$v^amQ#ZN*0Yz|KP|_^UEeun
z+|r(NV#S6FcUNwG`O}*H$A1`HezRJq9cl4*lsOl)PdN3cjjr&sS6kogKYif*#fO*v
z<{;HrKW@teP`r*VcTd5lAmG7JpRA3@8;O1F>OIa{mSqX9mPw+|6YY<$cFyb)+4^MP
zz=Q>;i&87hU1}ml?p!=|<b-qXO{48Xb`2o5Qq$eAf$XTa!b1B3#-%Wwx*1`|-})O@
zS6z@&#vRgtKHm74X~G)m^F1e}omngc=QvAQ7B4?}UUpDOOsRwXJV8ZB7M-x=qjJor
zka}!`zsJL~N`2-Oyv=5Z{><o7QbbtB`%zO{)&{Bfnv9{?AayB~#e|7ve&ewGn5QvT
zPDdY??mPAtGUX;k>vX>~v+(ZJE9FM~N0-BokGX3k-+8#{vAT6Jt7ADn2ys(eDgC*@
zsZTj8L#6pD0Bb>rW9N~IThC>Vr8NlO#&tCLv&--9UluQju(C2-y~!Erwd>)jXSMrs
z-tKv^?ox?sU)r5%oBQkNhfZ9jALu-Fv~apHt;${M@fu^XqHRL=hLeiWnk&~6_X%YR
zrWv28r9W;X$)D53C7v*j=j+|Fds~UH#HH#}1B5Fs_n>ma;?Sf--PvuPhx2>4i^S*^
zqi{Y}=1B&pVkfQ>{9X$*W$(}O_S!BqOO_G3Vy2erZ?JcG9SDBmQ}Uy;Z>;!vD*j4C
z`=<vp?0&KqOUvw|Hm~o)+n-s4dEE`!73;OVZR4=6j_?6SrJ{B&Ls#!Hs;1)E>IzlQ
z1eBxo>imA>1yfm)^p@)@rP{HLQjVrQWc|VRy(cH)%RrtI`(81<d*f}Agz$|H4~wkU
z3mIXFR>s>+j%TJizq>(ost9X1MteOz@zX{XtN!gWk5>%VoS<~p98f@doPFG}@Zi+0
zv98poC-T;XqT-gWqb(}N-%v}rHU1S6oA(Xnybqt>F{}0dh?Dg2j_c94#>Y;tt`OE^
z$yuz*G?EM~X|j1q37B|Ngu)3g?e0qJMP}_ADAJNnUF16vo{$b!F&7dt(wbI&Kwdc<
zH>%}h+OeWSdRo=;?Cssd8Sx3#Jquy$KuPW{k7L&iKNZy2tuiAgRIWCf??k;SWk)}I
zr{%0-g_ZA6OlF#t_07;hNxS@Yr4t*rM#I~sHR&Q{?{R8^gE_$s{r0DXlMpA7(WjTT
zWQmBJ&L<abxtCZZEvQ|4SJJF#_ju@YuF~AK=)4xc3gVWjm^gTxD||3b@m%J^`6&LL
zXzsbVd5347%|G7~e!M#Rqh*>{^5yDWw<;sht?Ot#1>{0pHp(O0R848a^<!8Ei8zZj
zvt(7p4olw$)a~7$&R({b5^c$wc{zScs@Udwqby!N$YXvQl7Mm%+Wpwj<Fa_qdPK=f
zck7<ZQZSFMd+!yUPPIjoN$8j1L6m2Nxu=x^LP`D3X_=;;o12-rZyNgZ*VRU=wi9bV
zZLuoadGF}l@Trl`lEe*u!$Gs762t@dgXXWM?%eMJJ-hrWs(&L?`*e_oyqSmkxh?oP
zcSwm)$~wUw%^jSd1%;lLUz3|0J?+b687{w<X)JNQC{|i{4gATdb8mu)`5WBfzH>b)
zPJniwi-M=cmTdfiLc!8zV`Od+XS)#M-CWmBiIYLOD0eKV`Ak)DQ*6*I<9HB4d47{*
zS^T=K38RI=u2SU*Pq$Ob-^!FrN?Nq;Aqy>_viRN7g4V}+!#rQkU8;B^U25>rTU<!=
zOmTRC`O7lKYQzU6hl)y7hsvkV&P#bue_a1~s5i)|`kYbHv`7#%x^pt}{QDr8*4D)=
zwCwQJ;gQ9<@m(ha#n`0xx5JL7HAt+ev^+(vS`HMh#|sW1U0$8MSan{%qVAY)Rom{T
z^TlYWA1!9paDc3j_3~5GmYE`DSkX~2&xbv@c{7dYXP=G9Y+ctV9dL=;@RVvQ+{&_-
zCXU?{&N-}@Auzkc;3g*PTB%g+Q`Z;x@#abCQ<shpob0O&+E19zGfhIB*o%iUrd_U{
zEPjuU^*Og)IBR&VMg}=6uvx7#FwIa@FtU;5-ZLg#m*Qsl&S77WOaHLmQGWLz7d?;b
z*PIRxJLQWh=9@SSm7er-=|Up9WiBbwH49CA>}c^}=R@~0<a~`+XZm#;O}FljX!)3%
zD-rs#!Jy%kqvx(+L<vz0?!Ky=<bGXP8`$5G%D*R8@Zc7+!kqTk1K7<%{XLXIa?(-C
zNAy(lMmgcut+mg)C3M4ziyITe6i{Zf>)~k=$#n`9r*7C6=CA11uTV3$xl@$`X}L^=
z5+2H~BE(THAAvzDw56^bh<jW?(krfHbQ#)R-Xs1Z?<5FZs((rZL_sESqQV{;Siq>O
z6!9CeEdhXflxz0}t>==Sch7oKwAL1gRumt>Ow%$sK^)zj`lwQAsZyN=Vz!m+Fa^?L
zB5S4FbGcp><5wIup9N(Opf<dGfU@rBJRuZ>vi5k5@)HmmgiNR*mh7cc72)HPZ8xQ|
z;Z<o5-i4ex_FRU60WL|sb}n^r2;Mhr3fZawK?w?7%U$Hhd90FB&9asiD^ncC`V5V(
zme88KsBX>}zjN&I7}DKq__5tBXOD7;Lp`UfOxC8=EXwcJEZ^`%+V;|^U1W#aS-03Y
zw*v>Fd>YP4+3ogo%jyx58aZ&;Mf}pq)%r{2&*5BUA%P*mHj9I2tEwp5N<|I`C9Mfu
zS|3v@oU_O1v}TN>0mPY+yJVnd9dIzZ_xglxvFw)ird3^=jjEHcE}mD6TX3ImQMkA#
ztYhk(a6)&-7Hh2Pi|A0=gGYr??}dw$goN={Wb>rc%jZvDvA56PVm+Imc8|A1bK0`F
ztxJQmlxkb4Q@f+NlrR1sCE8UqpkEekd^=S`$UUR!DeUPcOY7@JdUJ#mRhlB0N$xGf
z)q}cLaJ8}H#Zj8&9q7rG?MZ@JJ}%08rQ)Us-S`F95o%n0VqZtDBJ7i-&hIyul!-We
zwQrwH_vTik&W=_uNZ2#Im~rN#%k!l<?)f&)Rw%+U-W{9sz4vKA0t&IZE;B4_jZ}R*
zx<Tkzo<+KQ{8mkW<+1FPvF%dFllY8;twV2nrwhM`6S$yHak6~H)+iKA2!awrvVx`e
zBq!DBR-b-3M^z}A@8oY$zB91lfU?gm*7Bh~S&GUqoO*L9(ycHEHC8W|1W{|r%l5CF
z>P&x7g?T9+6|qa|N}l$h*WjuOIhjRwpjhM7-ka?v*caQSGRpnuB$C!i@g!HsXuQDi
zP?ohfd+%e+%_BEqT_SJW7oQGZ&VD?ft{xr|bs#XcF`Y;cczZ8~=A)S58TApur`4bw
zG95&&pS+1wvR?jRndePy-1=4`k!nb*+B>P{=Zdv>e^{tzp#EyP#!sc%kWg|T?5^wW
zLkfx7Gi!w&b<`V2IP77Yg2Po#?G%c-9LQkI*>9GN7YnZK2MK2#PF+uXs<~dLs1=<r
zGWy{4+HU`(-BK;eP5>#6<i3s&WAk8QG~i|7{s~%7mtPR6V@JHP5j~mJkylc%^QXw2
zC(k&7XfMsWf#{PbHVilR@5mkWS#jkEX;3tNld`$fCZC|BeVgQ2VlN&(2m;2;Y#yjy
z9x^u=4tlJz(4uWH-V<2Q3DW3twX2=44$72;6Kc%QoMLjeDnBlfJN0wD0<dH0KoIM!
zh)|uW6#E3rQKWQf^Lma~?EoM6e$oe@(MI<eVTV+!66Z|;MQ^WZVa`37FH$xfXkOTQ
zyHx(@vW!!Z&v19M;Qt3jK)SyRWhaa`gDQ^#5cb#{>FIGJ;bYDs%W<Jv@YyVuF|Ktg
zv|fEC{K@R?K>L=o$anRVhY+D=^H+<FP7r|?Y#XL$O&~l6485c0F#B~u-??LOFySnR
zW%>T0gg0Ed^ys@2gm)b0l(K{TL_FTnSnQz&bjHPT`@WDRvR$8gI!tdtL-O#0b#88i
z|3V74n*TQV_Hg*K=$0AKTwlNM-u4`5o3Y3se|s8{R?0maksk%0WGXDrn=ggRqd9i9
zWBH(Mo=S_wly)NI;omju#y0rab2EKo`xhd1P|<4H<xs*EZlE}MyBrbq*vwJ7_zV#=
z`+DzGVImRjDdG5jcnRU(HdN{BRc<2sJvqH_{T?FWGO~Fbj|O4*G}ewixS7cFY>c0F
zZY(r%RIJ*0-;uE2GOnKV#h!2sd1hR3<{Gpx^VclbGlVy?fJ-*&DRj(W+c=-+Gc@{m
z&z!0_0UBt%E}C~ZTkppDntHR^6ZYH(6YP6}3GZ31&%tCH5t(K4toqP6!sUKT&LQIh
z5$a03=ulZtc=A>rh(BXP#6Ib^S~qVag0uZiMC^tTwh1HoM;eC_87l|dtDIuc=Cpd2
zVMq<(kg2zm7=InQ9v!YPGLvA=tLqu-iH``k<Q!MqgzwOOHg&x9W+nK}%?Lj_S08FO
zJ-N2MTbi&l^HtjB&qO%e#=EghgYXKM%stA{1RW<2v=|zuGS_LwpEGi<5fNs-GUKTy
zVwMjU?$szIqH*jiyHEHK;c3ITA8-f|v1z`C$McI4;R(_ACi71x44LI)pT%$x*@LoN
z5m$#o-FBbLyIeOB;Z@!zgkN8U+A*bDeB`FU*F8c@iUoV1Q?%rG#+f%nWWnXTosJ8j
z&S_cD$J}dBv*hY#y?biV^0;tve90*yn0c~lefAl`2)NvEWFaqMSj%iYZEp?j{nsH9
zc?#^|lky0s+naGmRt7QGkB8d~BO(cBmxgM$!A>G^?ySZ!6>Gx%d=JMf*GA~sU3n<g
zr-LYR*u3g`)dh{SIJZs{{Z4o_FO^lcN)m==;Ut|00r2`DhsT<AR)qJ>9JY$+RKhoH
zb<ct7!SMMpqa)H`A2eU`?y5Sb0<AL-HysYDB^;aUQn<P$nCs8-$0XU7h`v@z;Y^K$
zW_#t29FHQ2@UzX+cPDoe5&6f*H_2!cfjd=GCat`~iu2IH+-F^{Pb1vZTP1BK-6afF
z6CdZ2I%r|WeYMlIgfm6zny|AH;fp@0COb`v@G#|CpLhw|q1Or*ZXbkB=5<KjG?pAH
znb+CyjJY4$uvD*h7Slh+`x(F8;7SA*ehq!*^$zMD-bp>=vX-#LtZtKjmc+DEXY<Rq
z3kY8x@1kX{N`%+1`I+FpyM%k9^S;w7nDZpNe^d3>oPoH{+OP3z^Bzo}BSCm(p6?!e
zE`VtlB9aEXPO<t$gqF)598`M%J~H=LiC>DK^ObwBn<Vo&_Hc0&R^+kvb%Z^9ndth<
zkD+7CvqTPsZ-irtNLWIV24PQV=kYpp4Z259y{?$uNf^9S<F1tz5Qe%;#Wi6DR5AB+
zb(=j{`!~WdHsQ+CqgI4{;p9y<hi^mIvKSHJBss!;_=5W8%Dd1V^F_S-v^LbueI)Ol
zyqItf`&w_Qc$KipM?R@x?zgxb4?oWkVJCc!v#RO^4iGMxi?bz`g|hlL@SWbDaLRta
zGi?$u*DLQ+RV+usn>F#XUhYz4+MjNh=9d&AV4VDH$@>?qeHJt__iZZIzd@Hoq-o&t
z3c@~i>B0;zL&B5dw^n$`a>D5PFe7u^Hp1=Ax%`kWCv-U&&sekYF*L8fr1V83g>Z=2
zUD+bh0bMyaM+bMY5&q33VS}9*(5n9a>zJ&Qtm{F0b3%dt0#3qMxNq^gEj@(mL6%ko
ze>vgYtN(pIUk>5iUuv>@R5jsCin1)(^bI;brhaNX7R$OH;oCn+$JK5lVT{k=nW&dZ
z_&RUa+RPcu+7Ci&e;y$MjS?l&$5#=4<GQT4j|I@0ZsOD!p9}31++SU8i69(3@{CcL
z;|b5S=k{Z+6cHYm8RAw4?Fgr8UXEneb;5PRTYbdiPf#bMEYoT_8(NrpEd_nT#oRYm
zY-bGYySREd7^>QO(D)#zZCTDb=6b$EYR|9~Xq4Eyb-$tmGd}bza}J)xx*p;9e(uGv
z2q(gmRb4J=8Oqw<L941;jx^VB)_#=m&nZ<_e0G%?FJIWp$d4t0Wl6QlkC^kFc{e(h
zQ3>tqvxH69Dv5;81hIANxrxA#iTn4S5P-VE>GjI05k!dY19|Q{2T1PsAi}S?I?lHp
zB3zrrRBp(vf%Zdp>bHMVA&l622d21eBaBLiO7X;EXypCQc`_*gIx8g~9Y|sN&-4#m
zn?0Fv-)5;sPL~2SrRcmeeWgpddGA+$9BWLtzR&5t&*+BkIpch5PR}A7N`;&Tm7;{V
zuK2|q>7;>uoygm89+S)`&|dEsHQzClu+1BhSo~Ol@H4*;Q4J;Bt8%$yjhX8gNw>iy
zzms)+=uFHX_I%An!YA}hq<Dut)b1X!WAGD0!gha1((#Uigp(`mOKZVi!d<RtVC^D8
zL>(JvHdOB?yxg~CpJz1?M$DJIC0k!J*F`ZeCR$G<>~nbQ;u^og`{{mrLRQuh?r{Pm
zJD2DWTt}FZd?WVeAgEP1dg5u=FsA*BI@r1bVKDcPajr>(_p7_R@cQh5JltWi;qcm3
zcZlf9<t-%><9@#{B|>iu=R$rp5oA6`O4C8Y6W8q|tZhyh^GC1tyOvA11x9OHTquKj
z=00hb`x_$Az%6>;K%H=pzUtJrb_{g(=UZsFnZXzon>esfW3hmB)IyiEv4k<PJ?_c@
zb;33HNbn|)(a=ouZNs9YH>>ttAZ()wK2$uOOE~Cv&iHLNrFg`lAz|W&;E2i0b!Bb-
z(NLzJU0!T4PfL;T+t<WC3#ua=4?3rJU%gNGnrtI3-#J6rUp1LqPY5T%N*=FLHV=b#
zy1(SRva;)p9drMl#yw@|id}?Dqs3-~z6#;FU8_D!pmty#!N_ttC&3p>#D`p7bl63i
zaG#En+u!H~tslbYeU#^i9=hM+;%vDR4l0E2y5zx(lWK%Z&~Mk9r*#AQlwEJrwQ*xI
zphxa$?&EEiP#+*R_jF`5blf;TQf&7tBJxu0y5#pK%zdxuxAODLp=sy>uCZFD32#&7
zpjWSFL%aNeal@B75%&Iegv)HVUfQSG&~=;7>G(DCf&Cp@%2msQWlhlL_n=+elxJWc
z$f>fnsQe*we<!WmowYcHh|>JuZIr8L=l2L&5^ay$8XaZ!`@_+XyvqpZg^MMtzQ;q)
z`DSSaO)=&^LDn*Dt0LhtJu5XNY%URy-=JC?<u$NhWP90_rz>U-O>do3_Y60OZoTj8
zCw@8wU&l!4cQ*tRjyU%-M<y!~!Kv~BWdWK*h+dDOcy!~KEIXDS+9hs${%Tdpx-VfQ
zheeI^b0GW=9cPVSvXKb96`nVp_Z4A;c4#f`@Eq8;GMe{`FF4N3yTz79O{YE+UU7}#
z_oEIHF6KUPft4+DUA3zAU7`o!U2%HN$Qf)zkmh;%d+OiT1&wwpaf{~vZC}=(uUYE?
z=;{ia{mF9_5q~{&*L0nB!a2*APif>D!tq$cZ0pfsMD&~X-I8@{iQwHLj(PLX5dND1
z6S}@NL(i!1XQlZr5f01Kp}SuuL1#GM^Pz#kM7Ze)SujP7u#M$9F?;kK!abGeVc{Ab
z!Wmn2=IM#YM3QIjx@5s!L?-j41^0~8M99qCsc8F_f!{${zsGVj_lN2i-w<xjpfjym
z7ol~?EgknS$D!wyvf6{V;e>Of`{W3V8p7+`6qPuwif{zEtaCTtMud(HX}FcbAfl&C
zKIY}@V&=K(?GZY_T2~OEC<p&-tM(F}GTwz!>z6{y!}#@QFU@4;3CCSWJ1d~IYK8XM
zckDzWQ!|qP<Rii>xR%Ftr7B_A9g_GM&y1U10pDG=L=t`lwq^WYSwwzAaOaR?>4e`*
zx%TLim4vf$i0B~3G{Rrfbol1-Lc+mU`U*a4L&rSh&rVZa3FA^>W5i=u!XD`P$;>p7
z@S5CkTFqAvJ(E|zvZ@{pJ%+^!H9OUa=##?-EQWq0LjCz1I!)#*=TOll5?#mdC#(r0
z;*UCqaxQRz2Kt?YvZ&(5raDu5sK55c_(jo7BC2{Ze#gqQ(Dbn)Zj}-H!0)yKg<c%z
zizX2MDM7|!dxsIZ{LdEe#AONBO@oBh>$6$E#}c+rI*Ca!BZ*k#lVOa+Flc)`mMAP9
z18sau<R+X`gvQ0!9FlA#3E$jV>uq%I60Xv<(>QGe31@(K32)j9B9dGn)M(H?@OvxU
zpcsboxNIVQ<zqo{ei;#U_X!QuyaGL{3kZ++I>Kfp>}uF<###?RkK~&rK5hF5V_)*;
zA-pFC@-z3B5M?o~Ai^`mevlKtJK-2E`o#D{CJ|e2yT@Qt25Y|zZTAAS7Y@BnxM$rS
zUwBb<;P+5Y4tr70bmsbq{;o>%CUo`x9?Qz71N&A%<CC+?+v^Db%UT7V#r}kcxreE#
zJw(KIrG{5c^&=cd?=<c6Akec*(S_~Pi-A1M^C{Eu*jqQ~xU!(BDba{&e+Rjr=shO9
zuTKVSxna*-r>)Z1kh^mr&vTy~@vvcO0+G;qJL9{|UBaWC#kC_nfUxPgYlh9eNZ9D_
zr+m?iEENtcCfo^PJG@U95sph)S87y6p>fN>Irg%Ktlw3k>BjYdXQP;YJv3mq;$a)Y
zHTr`khq?&iRXQ!IR9!QWr)l0LoYv<?4a<H_1m+ugsHF2l9W&2|Z@fr&ukEaQdMXuK
zl}?LvxjrMp%f1?adCSZb)<eVFMg>AU-A{A9ak6u+_)4S%0>^TGW5$E{Ml$^BX6W`i
z^MUuR^WT0~-5SbRypW3sDSg(vw$Gg~>TbRY{undxyJ(AF-q(8>>j}s0gF^2Xrw;s{
z$uaiSc$4W-M0~{vC{;2f?9x23cFA7{t|xfs<)E*5V~D`evtJJ6>?536xoRUh=0Kb9
zixphc3kdg$Z<i0Je1djquBgqy_C)e|)F?mSL4=De<qkiQKm<>el%BX|P1v_W)!U`<
zM6^)EE&IJK;hw)KA?%bV;n7u_8b0C%bkqGU>-R~TM+yJzqDhx-@e)o&#g@*!)1j$i
zY^3br+06CfTG>w9nb0<G{rn@FTL}Y#hQ1uPn+T24SReK|h`Ha$i<`{OOLz-CggUJ*
z4*br_{mpy&*48P6M`q9IodFY})!vFr-{%71(_Hmtu*L^yqrcZmc@CR9H|9Ly4#|;S
z|Kc(c+`9HngMJp_<zVMuw62W^zg>QFklYKx$F+2@{JVO>bH`dR&g1~J&3qhe-t>xy
zZM$22<Vrc=Jv3s)#y8A;ruj>vA-10NyCt;H-%a_3z%&C54Z=1xxnQy%2Q;S#3I`6I
zPeeskRno;zLdVe0ieqD$@mEdw*`!ShL~Pmkp-0Lm5<ZV<!l${9vhpxt_gN%%y+D@m
z9JQ|&T4o0omU}(cS*#_44mHir+0D$Ox0;8l-cf|E*-f_t&8`x$vSs|+{Ne}N3)$w5
zjv1Ld&@U;g!!J|b=n(EP_S4r+b{_cqqTrHa=l6I7LfhGU(&NTHV6JP{*<4iSBpj+<
ztApP85YYpk$26~ghAy2iXRnuL5w_#L*FD#)A)=C+ie8p)2}k0Q`&%b0A-oeTeLSBz
z59C2!o*_K%txrI=kMxMj!|Mox=3UV}p%-*FP9b7yd!iH>c7*-?(dUIxS_64mWc8xu
z4xvM#D=Nv|Waga#JqIIIAbA`w;Ze_;I&a=FB5WKqU-%&pVe?(N@$NJs!qZYFU2VIM
z2+htLp`y$S?ezCdMz(3E%2{^k+!$3VyWNE_lXv?<h6rJ^TU$MEkN|XlTTmgmBZ){o
zt&5c?pASuRpUS`8QqyqxW+FiUJ}P+Zricay+rZyf8TB`;Ye#q!0o!{A_9vbse5NlK
z<fPa@WB-1g2pzYr7nr9^#F+c#Owk>zzq1b9k3XPFKJtn#bP1eae(FXs5$NAX65(9|
zI|qGOMR*q}^WX858_19C5nFc8%~K;ByUdm?IW`tL4!dhul+1^Yy(_oa_tXyPd2R?E
z7r)p@gln2ZH}ixK?2|c;U(ssyXD8gNFDVP`D}uHYJq9y)216UoYwS}4KGoD&5blT<
zAqia138zv1yWH?2&~@u^$b{M*gyW=rCRbt!;gA=5xjN`9be3lEEzjP_`g<(lS}=Od
zZky(Td@J;{RrQ@)01-O)@DcminS>)GUN2lAkuZjr$J`VwCcN{mrUme*4g7txt2=@*
z=DP;r*cmakr(6T-nR3QpF~T-s#wNk;G{Q0dru>^U3D&+CdW=>W*EMxQEB(78d)nrt
z7ZPWnj^<Cc<Bg+}lkEof&#e12G55JkC-$)Rsf5q)<WBi(QBY66)B8Zr>K(PijSfK7
zI!?wk)t9XOD-q#USZ8^_lCX#Awb)wA59Bd6(+9T;l*SOw;#+h1t~L(jMLrd44FRpm
z(7>uk^P%9(!Q5xfR}Zuo<gB#w+0a1*E(usW7$0ZtH{q+K#G$nz%yod~*|8@cTMz78
z*$#*uad7!Ycm`$NS}`J&@P7KDHSOwqB57yGnRehPv@`SOWc{UtZ_4TA;fE#?u8VhE
zeP-knjtj!RH`+fD!Ee{{@71djfqNPHezOFacG4hRv>=_Z$JI_qcU=HoC$1b&%}pje
zx77DfRKEc|E5kQ9P7Nc1tr^h$wH>-Qb(yV}X6C(WKDG9R2Z`XE;lYy6qzU7*)-<!6
zn?#h!+OBCtX!~WhCl{Fevi13QmwTLs*2n_R<`r3lpDbUs!nuO*8eLrWCU+9ybFg$Z
zJN%w-uN}b{!>KvYj%OE{_)d2SVS7~Z`1=is|ML4Xo5>+93FnhU^3bQ;1us?-zSkB_
zVhIli@)1|usvCZbg$P&Mx@m!*))JoL^97SnKVh!FCq`F@zatWgJD;97c@8?5`&83y
zQqZCEaboVJw?x`AVb~q^SJ2(Rk0cB^<G|^ktcciVLC>pqXF|`UG~)$pB%t+af!^y4
zQwH|CylpR@ht!@SqBI{f-o)MC`CXN8_vDVNxZ6p%hT4yHIJ=pZuc2*1*7GBt^@OW=
zT;(X6f&5M+H+l~ivT7rOEoNi8?8*qI*f8^OkwU_2ICvQQo(#e@#$cqj;&8%Ya96{+
z&5-b#6@+~VT0HP~NXD(<J<8WF5w61f;(Qw0h_uB^4k7<q!YRLA*w240;TRWiZuVwR
zBF@}j+8nw}*cH5EWVa|n2eZAF#4+Z+!pgZUTAT1nB`6sNs1Wf(j2q*H6bW0BhRjvX
zn1SoC{=Ue%9&cg@$Eutp!o7a+h+TJ{60SxiB@^azON0ff@UI;{ke_(eb#92YY$QC}
zwFXVUJcaOH;M?nNmrVFg_X`w8E+xEsZCh5A-zEZFj~BEUF#RSVFwyn=2f{vVt#_u#
z0U~|Pz>v>BV&LzFtbHjfZ*uK6NS-8?J+NP-`IvBLpXk&m;~=~@CzGqqErd~>bY#`d
zJi_7jZ9ms$J?6TuUP({tK4GKzo?}#8^s7tN(50OEuy_PB-*Y-en5Q>`<ftpP$?Czt
z@AfoP<C!andvK<Q4BHNaW)FW}K3NomtDj$7W!wo;#a4>xEBAr;(CT^@2TKtB?0BJN
z^Bxd=SA1!8^em9>GC##Frvze;4CHe)cf+7<rCE<>UIoR1QQP7cF9e0RydUiq3P66j
z-B8`A91x62iC^u$0AyuWwC{Mj3Pg)y{I~g~gRIrudx!U?0MF-jVkLqKFs$_aZSx%o
zFv2pX_Xj6XTK?*F!RmQ1f;)Ge;2C2W<~(J*-^8~tBL9h>tav#L3#^FYS!oPIzn{L%
z6P*OZBI+)DIk^>v&Hl2(=vp`oD_j5Ek82I6JZO3@FDC=T79L56op29SOp~}I*Jr}8
zrjZPzO_eZWs?VjVO5QLc@Ro96wl56J8FM75LJ3qQie~LtuM8tB44gNo3&Hq9i-$PQ
zIRGO^ztcR<^B5*R%<LK4_6bIoZ;W27A_8i&?|2AzkAg`y?^`cEvWE$R4x(jq1z-{g
zIxe-h19jeAel|JdU}8;8?I7W?pxjn=zH31sNak~e#MHQgWbB8S^!LJ`G~?Y?ws+;A
z*r4mhYj+Zq<=5>MxwHtB6L}oeyQhP)IJ?4f<pZEB=F7_wcMgVZmGIuSP6znw3(sxb
z*9!7>Ij=Q7>;h?5@l4+lOkV6R*?z7A24Bq6mFHUu65kgIKj)VPIgV3<rN3_gsqy+I
zvhP=c<fXBCC${beQCZuTJ45AR?8Loq4>@qb#0mQ*j?-*_v4=NT43dk5iH5=HCl6nM
zakCV)**~d+YKvw!|0!b_tuEA(*Ggc-mxp`zZOVpGOM0#pzl?yfgV>LRY6QRphX{=v
zq5>11%IkUTxeKcMyT*rk2*Icj<1>e~q+sOJ4)H?e3K$V`UMB6`Cm6FSi1A%m4OHXq
zJ+r-g8-{OpEx)JN45PlbEEVG{hKczbzp6KFgPAQ>R`!?Xf_kHstf#<hn7}z9U+%$7
zP`k7Isc`Btm~b_N@#WcE7zc9YlDQ2q#rBw-^YcI$=OZ>z+13jtim%#dpE4X2>OPvf
z)EIzVRKW7dTT4M<e%95uG1p+Qc+aX@zjhcp`_-l9kxcu!IQ+27a%mX0>UzMf_G%a+
zAO1Zhk7-W<AKKR?kANX-#<|#wGhnz(nB}?y?_iXI*{rIRuP|st%_>{I7oc*;Cp$!4
z7sgH<nPYjn8%7D;c%G$@0K>)kYs}|Ng^^+%E^|H4fbtrdi5wTiK{-4vX<K{*sD6K3
zeODwOMn63mb}geG#;xDXI9fgjCT!2r9CJ7xMpeh(40|yHMm4A8Pfpzis`BRiZ3@F-
zoRmh0@P{QZD$i-Jz;FYYsOt43RHqOox7{%e`nCh6x_iY6&f5&r=NO)8JDUcRdz?K6
zSMP)=b4>S5z3c*0E<V>>H~lS4y%;-pnA9wo!d@)@LAL-jRLrxu7_&gbJx|EA`YRA?
zuc4C^6k$Q<mEl2OKEk}RYY!b~B*OxGo+sJW$}pd8|87sNX+UlkT}r8r0<znC{kNn<
zm|M0r^@Yr6nA>4earAlxkSHCC#-q_-c>d(K@2xJNe_qMVg-nBebB4&T+_(e`G6Sa_
zkiH0e*ve-Pd$I#eI06L?CtU}#THa5bTTg(g#@e10g|EO!^k8b`p>wc5AW}+GZ8_|d
zKN+T`dj^c>yN^-&vJQ+>dTyOvZwDqfw~sO5PJ%tpX4O8veE>|4Ja%xdz5$l|mn>T~
zZ4~TFOqsq+R}%E@7)f@Do&qEHSq9fvnt}f6yZplX=U}h$_*@3hX4osyo^<^=2N>3F
z96a)39qc{$q~hI1PB7lFF?3A+BQUp1o?|$y0`@;?X<2>t5}4~vR<*qT7WNxi>Og2A
zSk=nNUQjCm^Xu0>?r$gs3&(j)7JSpdMq~HMFs&RoP+%K#gv%eyGe3@&96twabo{y9
zhU|fZ8YYLVo?Zj1^7VrA*Cc?o#d3>F^Z39qp=FljwPJ9zz1lT)eiEGY&+GK-jD=Gg
z{)e0PS%Q=7gX3JAPJkW5S80L66>yk;W4Gl!TR0SIGbkWG8tk?8j;~ShgkxM<AH)}=
zf|-(Dlgbzy*f;uhSx8em7|q&}#V}(7{cC5F7O}ksgZiNy_g6ZDiQwFY$(uUCXt!9X
zMx+QB+cj*HVA|ilhlLZk6urTyw8@h#pbhq}san_8_5dupTTeaF&ji!c!RPnvivhE=
z9P|A2Wnju3wNSL|5g6$8h!$?03VU{bU#=H=11#pdALAbO2KE(J*o_yN5BnI4f{Gg&
z!Dgn0nC#WTV0HB1T5s!(a3FEP><+0fVEy7*@a$(@V6E%9EkW2B4kWamk-ppw*4)qU
z7~U@f>$I<S4X>-<;Gy)rPc0sT_4O6o<w{n8!=SM%k|ue8t^7^JhVH3w^rNl$t>ABP
z%+`Tl_~=?V+@Rz(YjZ8wWz{H5xx5+<Z(LA!>d_W(aF)M%;o%i<{QTz9_RTZFvE9YA
zdd_O_5;1;s;TRvBEKHhMHc1Mct_hD0TIB#I@+B91l$Z~fDi+AQCGP~6%x5~Q*L1<f
zk9%)jk`x11-kF?RRt<%dC)!q??y>@tBPpkOtTRC0zj959O)wZ*4%*kHzY&bAx_H)(
zzYqI|G|XBMGz*O7MlF;*_YL-q*s-Pgk{IlhvS{4CavkiQl)@D`whQ((XU-O#yaSA`
zojDn(W(T_?zrIyoy$JMWggrYxYr-DBmxsU4GXSGwv&*xJZ-8k~joNsv7qCB3+}}FB
z2u!Yc-(RqsX%{W~G+b>DfZ4t<ciT0uz_ifk`UBtxvvi*k^L(YjXqv&qpqh(db~&G|
z#CR!~c6&Y9DDDRPmu1WtwV)czc;ip5$l(GL+ehV}r=@~1PYdJxnDd~&sba9*{19;2
zyj;sfE)QI91w9K9WP@{ad_LXGn+z^_tHhogu)&4q*aq|N5^y;aJ*q}A7tZi6(;9ng
zB%GN&L+7jM1vsC;?ijD&0R9qU>oVn9z%4cS=*H8t!0lzxxwlLF!F|2@RHtrfaF-al
z=ZnD_@CY7~z^j!FKK=#8Z$h-etKh1-bNGC?$GO%w+wwKsc6y(Dj%OPbp8Xgb=Q9Ed
zHy>H5cjW{W7GBuaGI$LX-aPccZjA`s<2M+sF;D4l-$l5BqEC;5!dx@w-DAE&Y3z{_
zopy03eWfj`6ch-hcf`dES7bnGK%B-q=DMKtacOh4&v__)a5mZBrw~e8Y{qwvl7doI
zjiDoigP=53Kq#wmDm>!wAR`Rd!Q%x@r`HBefX8cew3o_lgeQ+JOTuR`;7Jkp*1R<%
z;7R@XfUjHj!INtlj8)U0!sDHh_Q!a=;K_$IX-k$(`CGkjubR*78Vuzy>XE6iD?E`;
zygq&6OL&)aByx?{N_cIcCbVjc43v-eC|SR49+az!7Dw*OgtEql?(o5l@J@P#`PgM&
z;Z5qbtNaVEL-Veg!FrWfq3M*<%Ahd@(6U-@jh%=vG>>@yQoY6!TI6-xJEzD)8$;sp
zw*!&T9GshLnlT4j`7Gwmt^NS5U(*f=N!CE?L$0h>clJQRkwd||huOnj-N|pI1#;oW
z9OL-M-&&y{(L-_H<9Towo*4xwKZ1J?Eu)M)OQ0b7^|zBpKEqwjp`nE(ico5MJ$$pT
z9h7b(3MIZ8Q0gFjH^%!0l%8BvK1xUx9`%@RD$FW^QvZ;p3vW(fj<2l1JT-18t>@jV
ze7PAODf1MK`aBjMjoguW?D$o9uejmD>Zx_``o6dkyRsv^1KDYN&jdpGiCx~hhxp)4
z`*}MViBa%jTzy%mp9j3(?)T{u&o_8~Z2p?>6|3O={AIxz$CktU9fq-QB|rb$uh*_2
z^Tuf7Txd5{uNhIo&zujjnY)wrKr`pJojY&5f~L!AjiT#0p}Dvz@x$vC(DEj}%)M+f
zG^<@ZIC^FQw2SO7$~=?|H|1Ij8bocOSi*hK`SGXW;qy}Qz<4cqXxyXIw8t7s%ZtD0
zJpTY$hlA&8=FEcpfN1Rtr~DyBz?$pr)f-Tv_Fcna$|krIRLvc`pan|YK2H=ak%cFM
z^KZH(6~L`db{V}MF}Uk@)G@Ru2}*;{i)zOe!=0B+k810uK>5+Fsj<U^;C=n)0~yoA
zq3qlV#XRrFP&PlPE{jtZD%9IoY-tpM_p{VT?ymNR%8U9Zp1+oa58=W^PjdpGA~&<q
zO#J{<@T65{yqgE_%bJJIKQ{rMou46O<;o3Z+UL(7BQxM__lLt}wd(NdwaSh!JDB#J
zRyZSraSfh1R7^S6<O$`ReSbHF*IjQ`+xfnSS5<R1iC#8^4@Xsp*>A{&cN<)E$BP|;
z_XUT`OgA+{v&5#!rEQYXy7t*~9)|_cDzSd@<FgN-?c~`}8f)yJb-0U}{laU|%A-4a
zr~650U6^<O;v^ktJyuarIeaTLtL&{*S{(?DdyV9#>RUmhul4>rpH4x|Zlhx})y_eU
zy5)!2g72X|ZQm9no*7UTYux_r=o+Y#V)wn6eFbV(E_qrL6abCdu1mc~j3w-)P|P=U
zHS`FH%FT6NL)Z>2v=6CphHkG<PZte;Ll}$9{W9*3Aq-x=pbi^3!saq3t#z{(VfR>F
zYds^KFvRBF@ZaSKUse?t$vQ28j<LBng|dYS+c2|l?8{sT8(YL@=jjWf-TyGjpA!cy
z8=7?2E2~1=gt?CwwcjTUOX=%3GVc+F<Ggbhy{8ezZj+_SQQrvLkiqAl=iMe8A|=kw
zJ|Cc4Qp>3zcPO+J4|iHTellUmW}T{5Re<)*@fwu}#R$95`ZzwBV}v7gtIWw=LWC`%
zrG3(pOVF`<({h8J3~2S3_dP*$I5gz$F=*Jl4&E2~J$D#!2rA|{=w|C3hR^S|k7LUz
zgnDPgT;tU@q3K!G``i3d&`fT)M?aYib+;bE`m*;>TRmd*s<vZLeY3G##daptcg8;H
z;?;+y<QIbyIX&US?U#WGL)4&hvVg*rX|v$-6XSE5<2S<Rt<^DZKB4frkc~^%Qx$42
z1UY0K9}Nu(e3IZ%26gwoE-0R?1yw@anbkM#q5ea)vv}?XXpUWe^~6qlsM^Wv5^-@W
zVceCfku!=QY^rDDbMqCU?fEi^08{2T%#7q17nlicgIp_TG&7&KJvyBj6%eubp2~Ge
zQ;8J)yQI*l38h69ibQDBhMvYi4k9{kt4Gh7-9+q@Tg`my=Y&UFc9(436e3>Ga?#ms
z6Omk>_-6CVNkn}4SjO7oCL(w0{Z!6f(L|Q#HP`;t=43Eu?AW*Y6N$u;!ybVj)QGtH
ztqB1~KM*O;2N@T3B@>w!9t`D@CZZT}=tAfYdm<UKWS+2$84)j98qOH3LgeCyKlt1|
ziYQ1|F5hr@IFZwASs41<j0}>^J#DjZ1d$t-J-Ox$2T_a`c=%Rn7?J6Gc<ChPOd>Dw
zSm66{Cn9nC`Q5vnkBH=rm1dg-C7|o$#AhCFUO~J4Q>myuLkPF8#SN83f`mI@{=FWF
zFVK~t5jb|_62j5RR$4s9iLkd_SmtNsO}O9kDyDB_C+u45tX#em=xMfJ??3G+VN)-S
zsH-R;Z10+<Zq?XJI0gko1)9!>I`0CmvYFb1b9O^`(kBLVRLTi<9SSGxR^M*E^*RPU
z3l8#e+}KDMmz-2?ICT=P8P$3juSP<1^}(E_&D)_#xV_Qx(OV+Ag->+kWgckQ@_4Ai
zC~xR#y62Z~AVox^1k$sb_7U-N8C{F2G$QJ{>evgPV8VO*f#B(-21IaPf@#6=CqyV(
zX?1S*SR%1y*GieFmqfNx<()Qf43Q0)GW4yX3E>|hcjcB~0uehF<=O7Nj0jJ>dP?=c
z7b4*xt(#<ikO)tDHuLC#+eC6+`~!0ZF2cKL_7wN?3Pe<D;mpmk$BDR1{=2T*kwm0t
z&lP3;_e5By)S%Q!o3Q)o%UE5VPdNSRkLS2;A)--7265@^Bz!S8-TQ{TfOg44?-s{O
z65jj0pCV|9?Gr#}|98T_=9}Z-w6)OK&xDcISAZt7kZ1g}_Y;A<3)@CD<rDVVeFDNx
z^<7lYOTV`;zcEG7Hn>-y1f6}iwI%HI`rW(xKG5BNodJHhxVJ+~;5n_=;MjKoB1ro!
zz`Q%N3xu0qkMmt$10qbnbJKbpeYfW)qW#w+9P~Quy{$(z6E4<u`rAW8e|`8isqX`I
z{m%(?wEwmJ?Vzc*TWh{UJAHmOI(}{R`PmtLA85YNcLVrN$CZOMKD2*gv_BI4^#~vB
zrzmTF=>2-=b8z-`SCt6%UdAkx@b&kTaQ2Tk5$*36;imVmqy1#f3s3)i5YGN_Ck#3c
zoOIk<X+IhC{+x6?+30-p(e?}~=b&;SDwpUVCn7~zoXTbBbMp81i}2F>3(@|I(fWLJ
zK7?sMWN5#|`|k&})E>F0oIdA3fB5Kq7_^=c9S;tAT|p`rqwNH#-LUlX-n}0mqCn?W
zv4394AbMR%T2F@dpEZBt{o@5)bp9mheR%2hS@tMG=TVYAAIlC{_RCM_RhZ5v4}DHi
z*8I`yi_w1Y(dQGScEL&8bI^J3ru}N8?Rcnt(|$r@e>-TT<NKA`K^JY`NbRq)|GLmj
z{hEFs@bgyI^U~*HqxY$z{?keC^QphzP)7SzNd2ydHE;Ae`04Xg|AaO=FTzyML+6EM
zr$SWEpnk-l^UF@>i8UUq=j))?t?M6G=%oHqMg9Cm|Mj4o_U|+G6IL8y**VLO*y(-Q
z=sd~N`$|*)V585+@)L2^_2{@svgVJr8?b9S4s7)KSbomI@^fl8qSUVVXgvvPA1u3K
z*&Q#-Pw2cf)A6HzFc9~iP<<EWkJLWeX}oTu&&5mo$w}w4oA!?tmst1ZpyS0(?S>Vf
zdgyq_vf9z-V)?HCD_+v^V#R$?dVL{k2O=z{_hI=x>$@<W9}zk})P7iTop7+?BE1id
zYtT-|kBdGp%RUF}l$A&5bF%KkPTL96IKr||VLINd_$El_gO%4rX*)4`KUO{yqxRcD
z`%UvTYut$lwM#l~tUL>4)IV!zyMg&*<ptU=mL1W&PuS@7cv=2N?U#+(M?1}Huj%@M
z`X_T=(|^Bb)c@~OzrRcMEmZ!A_NRkhmy2Gvmey~j@rE`2JaoQUd5?!>|J0u=S$@HK
z9{L;-bY5BhBuVQDP(L47-_Yk77+3neg4zf5%Yk*tcRIcw>GQMl>~q%ofY$5y`{!i&
z2h_9j2W!1W?T8iMS?d!q%7V1M46V;vx3K&|oVH`xw;+99dCD@>j$~Q+oHZ`2bscRd
zN1vCM+AY`b;xZR~u4by|q~pi3cRuQ`tn2gA`4XZ1WyMWaTxR7p);x)^;up1lX;!|Y
z_CVti5v1cFM#r~?+EovoKURFC{TPU2G|sc~>OlPAXI+mzFAwc6YrV#b^Q`qIA8VaM
z+e^~%5TN%LW5rwgoOIlX6l)zq?VQG6Xry*T^X|Ynv+RoHuibi$Z0lD)gr_6)YNFZW
z;O)l;kK)c6Lv4$7Rdk&$5l+2w(_Fln$W%KV=0CQU2+!~E8Gk&3Fyw9?Xp{Z|CGQU?
zpE_6wH6vUk=bgR-&y<f9);@NF`tb}+*O}tbw12tl9IItS=>F_Ua+P|_am=W(h;xHh
zIbzE=XAjLiccMJjC&0@}7k^coXu{@xE^fyJH|XB}`ol5%&Cqpz+ZLjo4h_CsElER)
z;Mvs5ONRI5pw{Udhiv*}c)VZFe1p#;!lyHFNYmLi!YBVa>HOirgjXTpc-C%qB5~Qn
z%KG6F__i&aF(U0Qd@_8XzV@6ayigl;swNrWsZs0wEdm<w?sD#dq2Gkzneh{?v%%i*
z_(kOep%tg0GXBU1?RT@FaY$k2v<p`7_Oz>&E{7vjG(_lHo#rRfZ=a4hJ?t^GRh?5=
zDOW<cZa0X1AM$~4+$dTV*l0u8K6WqIX>*$Jwz1DWww<}pT=`g0taUGQ-?TEdp(UBf
ziG(GJ)m<TyImOzH#ttIo9NMlXKZ8gHywMt4ltsAKj_c%8VD5LuoHE%W&<r0ZPhENS
zwj&Wa$}7nB@;Z@!vZ(gx=EFpGtVzu}w-hqO_;HcCvn`Qaw(Q&O!tc;r`)P6v*Bf}R
zG_HB3&_nq4ZRSM>>&4KN=9p@%kO%LIwL?c6&49)`MXS|2%HaJlL%r276RP$NPq4k5
z50#ZeWqm{&;nRKM=6pmQ-p=I99;Un!K3kODsVce(-(`fy`YFDH^7+XX`=3U^qx?_&
z7b9Zfb#g*hh1(VAkUFt>i`EdRKWbCu+Bpsy)$|ok<`h87r5e%7;zLlkG;9B66)X7I
zGH6nG#d7G7-V^v}X*OXGic%4CafLe1H17o6H&C_zcuw|;?a=*NQ+@s`b;6+@*Ywct
zJ-qjk)&Jo06u$Q;jrN^&9ojnMm+L&5K)6hWTh8*Ig3cQDynP?Np>9=mVoC4<Xs+8Z
zKRebHUVhu@sxo^NVULzS`11M_!m}Y_tXB^w^svv`X}(O4@ESIb+Pdd8+-Z}3IM-bt
zzV(!E)IVQOBzEl{tx_ILI6l6dJ}c@z5w5x}@uHy-%I{xbH?_G0wVxV~FB|e6-udUG
zj`vO>98W3_9+Wg9j9pn@T+8mj({BN`6IvvpCX}n#slA1nr%i01az{gJ!A!0r+p7t?
zO5U~bHZ`c7ZA6l@pFoRTSwn=l9yD#tE{z$!fpDLAcx~U=eb8E!=WFJ?9$II1$G^%*
zCxdfuoxP%~O+-VhS1HwwgPx57@p~H^p^Hrh+?T$FD$S9tTeUL@&qhcd<sDD>bj?LV
z6m~+f+gO1ar%w=u57+XVxp`1Ke&p&Cj)w5~VYwIAtsC&DJK<WvLw+KpX}rH-moBtP
z*gU#&UIS_p_J!?rnoLCADJ9?WI7);`rO>ISRfJ#aaFG!i1K$IUBvUtSg11rKrP(f1
z3AezpnKOpA!RK2UoU`VfC+xdiB94xIMA)h%dQ843!Fz)@!)o3p5l*LNGe2zQB;0z3
z7rCrRfoikjH?9+tp!wuS{tfbTph{z{_UevyC}}IzP~60Td*VU+y@i($C64=_H>*?-
zC4&ch>RT*`%CZn|&Af1EGIVy^Z#oU$bWPq6p*;zn^_-p^@ctkXVZ;^A&rKwfQ`jO~
z9G!@O?gpD3`k6#xb5g_VvX?~Y#TWkC#zMkYFlLl>{#NLGo4)ao$ZlxgxTo#*WPKv=
zElD@2VGR)z9e;24=L<wQTkY}?2P?ukrtSFJCO$}snc%u9h?$3KJ{RvbbS9!<M}w4_
zvWei=5I3i;&4k<8J+G_LgYe#bCpl&C1Hw>RG%cn}pRoCfvxjBa6Uh}h7aTRG6A^Zs
zK$G-qM6~{7kV_07v^vMg-}IPD82T#&Gr##mZ9dzPbI*rD+pA?K&ot#hS(WF;!m43J
zJmv7!gEi}kaPyMMLl)d6d~$`O_S^9jwuf^*EwYM-4(AeSH@m6Oeku6%$Hn5%+3B|?
z?j9dBEctHTC=o!o3WD?%y@Lt6vf<!}(~X4vNs9KJ8<x=d^3L#wQ9B6NGLDP>{Kuek
zUfJeax7X0V%0_v*`%9>k11{gZYs`JE^dRZS!-!O%Ws_Z-Gm)5<Gy3~gdm@<8xlxrn
znXqxi<meq^5Pk`+(un6n2$ylO#jJQX!X|h8!t@LLP*Yfwdh|&hk>GK7qSmZH#K!Xu
zfh893O2;ogrs6HsC}dS^a%SF-U7-2+I%jAx{;2J(ya76fbDD&P=tAZ2or2%hpAg1j
z;hfFhiwNVE-Xx_l>`Xu2G<n}g=6*8JicA=@0vctKW(|5&4lP%1-dfr-5n4vI=3LDl
zLfAN;4$U1`Nf<A8`bZ01f&7svHQtky3D>2twX<aiv~fGUE-u%D8qaJ|k&{+X71%6#
z_4*2^xbrFf;rn6G_W8?F#|f&?<R`MMXUcZyl+@fWIW+@XJT08BA2EXGH@0kiEUgBQ
z_jv?)y1jviC6R&Ss?S3Cl2s=g7L9@X+nt4FHpoF;e4*R-Y-WDCz?(AnFb}kDmE09q
z^A)<cxn*$H1{0p~Ny;)at%%SB_i&%GFNEimflA#R3Bp)7Xr0eg6~cFGL9|vU8{y@d
z^sd2e4PlVD+pC_1LxYjEYK+P`B7E#ha`9*-Xc5pG|M96L;bJJ-mH{)qZrQXbWzQk#
z-mw0lgLx{{Yqlh72aPAZt2fIX-RVMjH>Fg?xfT&2?S*DHUpYfh^mdM!OP&%==PAW1
zX3EfRrM70-g~^0>yqIjrsWs3gzw?Qq@Lj^FZA=V4l?YGf^A4VOTL-#$1ovKBBnFM6
z@9p{4I1=79ZF{h5=v1iDUBu=8Ac^n>jNGJR8c%r7R({W%%mz(@hG(CD(1K@L$wWF-
z<Y;UEI_jS>;o0e(deLwP5lG<keD_I?xu5R)gC{(lSUT%gm@^Sq6^Y|2N+9fW0~#&5
zlnD2&i8ppBGrx~ed-S3^frywX_*&*i6Gr$hl3C^j9q%glrGD}tTq{fL0>=drNlw>_
zst8Bu;g}r%b$KqdoI0l=Ea67jcW~5ptY1#p4McbOs*EITZzT3FulI)*ulIAKWHO=s
zV@HHbB|G7{qd4{5#$7~VI!I(H*%N8g?(Jhu(~0<GEk)<GB}B&dD{p<?Qz98HR3)?H
z72zu?7&Sv{0+B8*J(;lZCK1rls+Yf@LPQ%gZ*4pAgvdu9?sOUSoQSjUT%{HBib&{t
zWIpxHCY*)O1vIOQ2*-gZuj3L!iRjYhgB$kmf@fUQ_{zEGL;3bEQ%4nM!MjJQTr(V{
zh=}alWlHPU68^f8lSZu*CA^iBqfBnN5`IS=u8QNjMCg3L?Dr!*p}k}#L-;;(Kj&lQ
zl)WLJh`nCwy~Jq^5sC2Mxx(LzxsQ(GE7vF@j4?;Oi?_tU7yp;4d`9yLADiD}g)$Su
z{w!p$?qh2rdhc6-?Uw)|<}pj#%rk+Ain%uF`_CbQBdW@kO@Z*tR1h3KawGI;f1Hs0
zZY*Kfc-1{$>>#|JswroGm=CG~iutpHnDI2f?O>X7JmILmI8kF$CgF<l)wp`M6`s7k
zY3pM@m~g2+vcF+1MmX-<-WEBxfv{hE^Xi$eH4&R>DQNkQn+U`;rpk5|63M{Fm(vd|
zg4W$iAG!ml5pF+u4%?xJiNK&sC&W3G34hMMT>F(*2+vlJ!9C}<5HYsUiE4>63EzZK
zYgczkK~=`FSYnz;`1Vz$CS25j)*bEVzH}DBmr}nmJEU#l_6i=y2}hR^{<ZO9*4_ey
zeeEa4{4=NF>595cM&ef@IP}{Vc_RlR6uTzjppzZpYCZ7cq0D5$wr>922ALz!nd<Y-
zcwR9y0Kawo&8g5GY_NW;_6H*Uy<pvkQ$q>cs{^ARPH-aJ?1E1O3U0#7$Qg&e)VwF0
zLuY1KxeE{uuPe{b?EgpvePR^+d70NcBKl_a$w`D)rKwGKwJH%mfBVCoD?UVgOlDWh
z4N)QyGH$qI)Mz5NF`(ShWffG6SkO_a=uBkm!|Un_x04~wou|TVR}rywHrXqz2N9Xd
z6Kw@WYlyTF-{?1!PZR!hzMi9(zd(71e`FYQ{~)NElB@B#lkgcm5V7(zCeniO()Q9$
zM3P&V*TZoT;n@G+@{VCPM8v1Ex?w1D{hXz_@wS0F;kW0N_-Lm___!kkBX*WE^-V6H
z8qEm1b-@a8@ib@;kqr`vd<u2b)MifA`9y@C*}sZr%OV1G(o-%jJwkYPu~}*PWf8u!
z7pIo>+S6UJlCw>>q2)ly=L4r=2uE}7yW=S~L}ppCjIQ7dBH`h?dTvPo5zn7CYS{4E
z@Z{;m^ZZ45gvUOei`R1=^c?cs_fb=vNI$EZGlRhowPGzVA_O@J7YvUtF4cq*iNryB
zc<vHj3m@m>LGOs9*S651d#Z`#CYhE|r7}dqEiOsG(T7Og$&qBsz6_1Z+v;_Pj)vO3
z!Er`kFF^Ojvu|(CON6FzgDXaedqUBni4CrA2|RqT?m%&l0uiq^Hc=juN%-2?-8IM}
z!Yi4VBx`n^h%OM{mZJEL2*g`t?O)tT1dpv<k@2b!T187A$(~Ci>=RwKIKDYV*e!SR
z7xV6b_J`m0&pmXGDEfJf_bwkzq!S-)(k_r8QYIs!a?U&^++5nc#oXtibMB3bBTG*~
z^CH2GOOkvDV@=UhMZ-Aw_GZnnOZrcVzz%)QMKj8vYVRG1i<zlJQn+@FTS*4t<a{|U
zc#Z{;+j{?N%ZL=h>0op5b@w+S`lNBy)N_SIlso;)RfBXQdP01?p2G_wtP{U%XwO<`
zP_=q|Kt_!4@~QJZo1{PlyiK#-Xq_SQa=8V(=ZwkV-Meo!I|ajg$r-!0$iF6{XBBSt
z$XgQ07jo{FSu=>N=bXnmB`=BWxfGrIDldrS#J%4yy33G3qUs9wj}yWeYH)%GoglpT
z4+v%$ia}@Ol11YqG>PCR?v9wcP9nNy$qU7H6(U|5Af)P2N<=+{7an_|0xxE^i;OF3
zA^i2_@-qgVBV2B$-dL<@CMqLJb{o_=6Zy%mUzcq<Lliz<Eq%RpCsB|c^DbAXfN&K@
zT_}w3C;YH0QfTocBJj0GTH|{M5p@4hyYAC;!ZEe*X`cE^=$^@*x73O0|C^*fcuK^;
z{qSOb1*73mXlFKmGS31cB67O9J+>NNjCWdiB~lIAnqNH)-pWQK42>(^`DPOSRY@||
zmu-o{SusZJ>T85+_0-cU!>$uXpsh~#m1WSRw|%FZtuwUC7Js|H_9A?qvcULWmJngv
zymfNUw3UR-rYrq%@Cm}RMDV_@>rKLww=sH3BM0HUFSsFAY685S+&2AG_aq{`;MTFn
zPhS&Z2T{ArJmqj(UM<+O^&DaIRuPI(X@dJ3=S+jB1fnv%vh@B09_IR@CARF{4kE^@
zw>;dC9lCD%AB~y3fp9o~`M#{N4H}M}DLE7p1FZ{B=`P-}jBve^O!q7s4j)&n8hqqI
z0o)8w$i4Ay5)n6=ue9~ed?GyDYp=@8#Y9Q!sY0F6I3n>fCeQW7aWYsV<;AY34EXTj
z#+7UPY@tC?!1(}wBav7+yCGSroJg(U8!Z#U#>}(+I*Za55b<ChrM()t(B2_nroYXd
zFeX*lJzS6sU*?MCbj;`?($lTttz;C5)HTPm^>fz{sY~sFwTHT(J)kFIud6RK@jgpy
znvnsm^}%KmgCn40X5dEGh*Bc(PV8a8)02cxirxL*;wwbpfu7*#x$K0SZ{dfvAFKap
z{ql$F8%AN;{E_t^2wT{&{g);PK=%-TBSD!AsP#zddgwTW2u0S|oPWqcI5J1Y22_d=
z{#RFZk8D>XLZd`i>Bv2X#v&)acGXg7<tYl>w!s)`*XJ%!(AouU>vLCq>u`bA@Tjh-
zCKm9JWA6s>^g<|?9Tmsjz5!~~uBu);IvkqUwn%&DK7q!YPNM_ISP<S75gpf~TnR_4
zO6rBSB&dN^v!6UT0`+I?r?&h0LQUZ6b5kePK%M2?`N8Q{P_tl4!K$U~P#;`l{cg<*
zXkUJZ=j96@Xq@t7@-WNCP&@4$|9dSrXdD!{X7`}eP{YIZerpW}w7b3L;o^6Ou6KUp
zV(&@8r=VGf=Wn_~ginsDy)O2a@Z49_47hAbxHmOSh-11q$6#O0R>nrCtY9-dd&Ui3
z_iU8ExZe^gU#Gas58ne%s!{`1X|9L*E`K@umnWfWDR%(lOfJ;MoSOO2rxxnZ+Y7EM
z5`-oljv?X7-cZB0eD1h$gP{2Reb3aB%=u)zzLrwE5*nr561avY6YkUgXOCQ%PS_32
z?|i?058kUshA-8;4Gl_{TDJ4@!keBWi&x7^5H^*a86lnDp)GXD3Lb_4G_Q$P^IVh5
zw13S*mqxFK?;N`8bjODhc2~*Pf@?L<{yrgcua-2lyRPJXd)N~mainV7&5?tegY4po
z2E|b2^=P%_Ss!Q_F>URH^*Yd5+;qY6Ll%5nr=lP}t%fj8Umf>MgbgZ!>>f+cn+6S!
zw|%L$Spm)V+heAE42Ksl*FLwM)c`eevb#OIwcz2snDIPQE<!io)ty&RltH(y1tf<V
zK|nx~C@3H~M@fPr0+O@j45Q?n2b3g|vw&n6lE4gUND`F{L!Ke$9ELChhyUMIXNUSv
z?K=Bz-*m0FtJin2s=F_``+J`!<u3=p@~MYeBMbHnc~jnP-Pz=I#MeSIN~IgNlsuzW
zD-V#VayltL*Y(qN4okP%tMwoeBZ0d6`|l|5J9%W@`jp-<bs7ZPR}Y5FjcBDA*FC=h
zwxH9fcGxUbyhAa#z2TX!R=4|333`}Rm`s;^8l~u-)Qct&-1nCIxq}~j*^|lw?NL)|
zp9X|3m@d3C*}%z5g!`in`EZsgLz&1V8W`jqafcym3&iFYCcS_unaGk|*Sgup%7~GR
z^s|&m9af8|$<8Pb0iXlODsF9^KI+!}ED(W8269<(NZWu3e?nsXecW|P!<$X&G5)?X
z;cw#n^NW5lK8cZ!5ea5AHh`7REi1gZ&mE<IxpcxvMAgdDSUyP8vR@S|z)(Y%pF-is
z`)C$VZ-0p5gDDe%-dGuRK|L4C4R)g?Mey!+d9ES=i7zTQpPg5PUpfo4|2C>A=)`_M
zK3?=VP#QnqO$4w6;tn3<jeYpN7AZHjwj+MjZvgy$?tNss;|~=vwQEr|B>tK937_%o
zVaSB~R&$X|0D&IcqIe+EE!{^}t>am!E9+KFY*o>j3iRA&>|5*mwQsVL-<^x{c%Fjb
zSHDUwg??TjbaW(hf*qHU=M<c0;OPvVnpBA})+Ws}wUrHPp!KRy?+}Pyaf5k4f}<Db
z#X1M$(iBr49fU>H4b1wqV%lG2zm2WitF4u%c8#jLWX~rDG(b=Ji|KH?L`;5O$0%AA
z?ZndYI}2;R|Deyr&vHt;rXQp<{uCJkQ;+8*2I(=p1iYdB>-3w}U4Ftak5_490o8;?
zOnq5c`i7lqb#z*zRWX&ln42B61{xM6UyQw>qLdXj(vG1C>)SV=Qg2Pamyn7bvZhs3
z&=~qswPtMs%%C3U$7o1gK!apnt~e4V80;u9wLQkqd-774j^2^g$|Hef_>Vx;=BV>a
z-#ud1V&>PqQM?35$JnnlHC(LEoo=(fh^7ro2YJUXbTI%MtICV}jfg4Va<wrI!YL9Q
zLlZMMwiT>Au=}J8N$sxD`sDo&LcGK3af%6<!5@dD_S-*g1G@$7R=-}0wr@D?4s^H5
z0Z*T~1-(7uiW1|JcDL+eh~n$>GdUNhf&8kE5i$;V6zU}U?nIM`xCZiu@N|efoMp*%
z=Z^dn*<P?%S5FhEV6}#=HylE;tlm&T&Xhe^`2z;plp_8d&<EC_&6?%MTGzKMpH_8F
zYFsB!m>;m(tL;)Y|26~`YUl1dKExZ1;~E@D{VhL_Is&UY^1gES#WBN2+w~<LF^Zcw
zN*QB?dTzmfd{1dOdJ@llRgP1opxKQy`GAHm6fhBDi^s5`WX9TXZ|1HrHwcmZK-qr8
zcUNzg<I&%OhFNPsalcj_^iN%tIpgXd=E>YYDa2jbgB%}r$9VU^EWdMge<gXd+2$O^
zRXhL{am^;ygXD6;N`-0i2ftUXBBR1K0}v4+OmhHxSEkks?PS0ML7gAxlhRSGW&+1K
z$9yUR^_eie>3hq$!)3Eokb7T@T_|s0fk3)_OsiiWp&~D-8^COYAienAe$fyh;!wDe
zf#f$O>#ozeS6BNd(4?|`{X*w^B7~nziT{oOQLcdhnez$*Q0(W&HFileqS=PE;~h`7
zL(>4qgC6uga5>A*cTLWe$ldJbU0f_4?qDv@H!d?g^MTh@M$fcaEWYoQXvdkLj1Fo?
zZ>D&N7O6R(nAfJ+)28+&Hyp~Jil>HcnDS%oV1G7MO}JRB{s<06bSSW#2K#OcNv~tx
zI!QZuB@yN~+;<9c-;uazdU106UMmcR87yD4jtsuGP=nPrSOZtx8n{7Ywug&G>~P&v
z_V9p8-F4_^%Fe3JOF>m01=MA{q>N2l@QB}>hnTWd1S&xbT$bjKcl+X6&#P}3T%Bp_
zQBkMEYPVZoX3z_luYf9<BM?MHZF_W?7jGGs2dC8D`fiXvSaY=f>4XjmH;!m!w>|>;
zY8M_(Dt?Okyyj!PzeO}!u<`N*k4H$_?zpfkk06VJ*oUsu`PWcR)1)5p=7-B0yBV+*
z4e{>E)4q~8MzXxUsRD8D19|t~8JhXxCoJYyQ4{BB_f;AUB-AYo#1$U}GO=z5KIn9t
zHDf+AyZ2_?^#J~2=rpK}4@uni8+exFD1R<Y9)(?WvsGE7j3Qe672!HyL^S8DGPFAn
zNT_@0IvxKtta_6dpcn&VS$lfhSyEHX`ZVxz23O55N~4N0cg=$$zpaJH<)J=+SoI;;
zFupcY@n-EkxGj=pyZ!TxYd2FqY+Mvv!yKvI(Sm3x`wZlFYF+C(DPUP$e`(LvfdyiA
zZ4UdDYk_IE^*^st=<eV70@%-6QsAV&cd#fj>u@y~c0(xhqpXFOwj1@TmOd-Ka=9p|
zLM7%ikM7%%rFK-+kHYaWje!AGE4%j}IAz)9!YXmRBnc36Gs{4fz0d(<>d7Huo^92R
z3dcP2SY|zkj>5d3u+^%F883diu5mwtLw>{~RgkwkpOw$EB)s)ThN#Vm7Q+1<FLiN9
zSiBNO7OL#kDy3CMz|_1_Jlv{*kFzE622B9Ki9c*)ixuSweN{)AXgl#%;qb+b{ihSv
z_DM6_>GPUimQ9zg2Z&fIR**&i>pG5t4pA2j*dyecWplZ9K#iV_wYqColNCntgqE@D
zRzMFwRIO;Z(%T((d8V;s*I4p#r+PZML8T`H<^BAe%5lBOk*9SRu<~4m)!J#DmU1(N
z(-A<Twdbn*ud)kD5o=l%sUT-BC!dFkuiXF(luvN==4pk>hnnuysHc$C#=Q?7;Z%?K
zGg1l^zo@wCGjxukTmALCaG$GN=SBH`<}W6B59tCrQUZmG9{VuBUvcsWH7A5YA0flb
z>n1DI>Ab{mqzsa&QZhP|!#TP>{7etLf+=G)F7Ts1T$fPiv5@5<e-6Xdr^z2!DudNC
zukM9f@{$Mfo<F8!zd9$AL_fl<I%Je}Z10K5Z1SRTO^yUX>Ws?Kb{)xsa|*aU0xbJo
zlK@VU1R!ik?=ZW^3rga)Y{TnK{Kapd9^flW*J-1gvd2dbZf`dBIp9^pg~yKCnhqJ@
zr>^wG=r^Ioy|=bpN4d}L$NTtqo=G^M7&Yb|XH}57M03YU`%T_oOeHW&znsUF>ZNfy
z$#x)IjCQW$J&U;q@7DA0YL#MPsnE~fTMGcS7LCIuK0dvO-pgz_dq;h-n)Q8r#GU|&
z%X=*@Ed$Jd1OmAma6nyiXgn5P6Ja*q%bMRx(O@3UF)(p9$)OUCIKcjo$RQG2yi<TN
z!UL=RjG+g^9nP+G#0WIgp&GQ%S>!8&u`I`XcOxf!8GMR3byv>d;mI!%&hlSDqawR*
z%Trn?`*MHIOGoaDMr~3P=1a<XB?7a{hga18t-K}0TSs9=!&2x-`+DGdZ!Y`gGM#aX
zKXyATQmk7BQ1^{uDOBU;UOt@=vjxqGy$-wkt4+SOh{m+X$$Rvl8Y1XqE$8KJy2&EH
zN&P(-GfUgKzW^1^&8JcL_A2UZ*HexNzC!7tX3o$}?-cEoBu$Yw*U6BHG?G&}albxS
zuVYz$bqYSq7-!uLJ;rdVfCtawd8;N52xI{@d1keduT+{E40Uy>6)!ekj*8LaYx>C`
z)yZOlxgriui{Dj6mJ=cxgnao|_E+DIJ{}$i+DURRw474kKafg#sSPK`r6`OuIIE$_
zuh`YXz<zb0&pKmRdSs%Skeamib<|H{e>V>pV_DaYG(9e}H-Mt<T|Zh~QdxKBw~rmR
zUPlo*Ev=h25<?WTp^~+Ubi>aWL@1cC1i0{S$(Q0)gdrO;Jw7>2<ZW}@2cO7N@R>t;
z)vlsNL-YoEHCr6w+ryBab@~lbP$%Pphjkxijo&)0l3$-Q&G!!T>XBpaF^w$?7Si1S
zC7>01t7Ui~`~KqZjE*jHEN-K9f!R{tPfc3Vs(VT2r<I&sOq%c@B3jXy-T2P69op}n
zv<|@s6I}*AG`pysjsqPT56&#q;}h)<oHRTDvkMV>jLe}#L4fKZE-kcP4Q4~I3kodD
zZpIsSJG7B(S*io@imAS&7WE9mha60BNcuht&fG~;@61^TQTVgF|CYu<e!w!s>Lj3Q
zuU{WQDKw$(l>$p6L-bG$7P#Cxh8#N4m&u3}V{UQDnmR#9<L+}T*S|y0hnJA3N1uoB
z1M}OEZv4uE;Rcd(n+WFn$Qj=FH*`D^-&z-zHt?iaRvl0cmXhf{hy7i&Y~X1*Z$~G4
z>qTQIrax1&(2R(+QMxDYxeQSaR|8p9)&WjOX693wjpy=qNnhS}2|OV3U!12C!VoL+
z#2f5zV+e3LAy5Q8|4BW0!OgnZx`!C@UBgl}_)!;Q9pE#*y!+}jH2YkY<pZ`kng>Yq
zhtfzO|1ryR)aHx|j1-kP``GlzhWCDP(6N8ZG$STP)!5JQ533XM2w{4r*IwM#eUelq
zsmLQfXqGTAU-f7vNlNH`lnAkL(xDnL<gvlA!#bbq`jwKyS0t|ZVH*+@==2cJV!NR-
zYqy39^Cw1^eLV~JcJg|6%6OVIr(bp3t28pCcTEuA3oIHs+<?whCi)ya_az~RCJ%yI
z{xu!Y|3wj$74US^;Lg!d$mVzRxa!)H#kql7SIID{s3gF%K$SCmdb?ppk+=(X>cik^
z>k&E^4eRpEhTKba<AebGY(f%0VX-k#dMH$GQ*-qv9ZI+8*P4`h51S8if@@*0BXd}I
zcTdi``T)z7_8lLpNL;z|K@<;>deg`h1Hnrj2$Qkl&_;#Me_wiUu7}F{)}sD4lU>Xu
zt>M**kw6xlZRe@j0M3w^|4;iYBeM4yXs~bmqx-a+Lc2PR1EJBINgHJf?(LTq@5@ue
zXvO~cf0Ef4_Z8!+f4Oz4Xa*HB`?#3k(b&G=aH`=25d{7YIK4O5D~f{e+tp5VqJbX*
zEBveWaSoU47PE#l@k1QF#qvcZ<$rjcuPa?9vOqVn$E0sff&S7y3H=(Xhv=XjS1x;;
z4nQ0S*^U^Y9y^Ji;ReU6Z@NmD?^-oLv7m`Hs6NG^gb@c_wg&0ax%6UuCx?7>?(f3(
zMAh~a=>9j8hQW4Ag~-DPx2{0xdKpt?XX5aH8y*=oGn`I@QvCE|B$;V!-4leiIymZt
zO1#PS9S&RvsOsV)_v39$S;Ye1VLgbM6OxRV#|F21Q^|85?I%J<p%lqdq2M2#ydgp)
z`hKkcubuV!_(13RP9V@Z!9aW$D^BG6o`JT!mtgU19gy$uDyQGjrER3AL_~SjR%Ey5
z4gK}WI^?~IfOkcCR#RXsA@u#9oTb?-#`goe0=fM<I4)EagN!S+A%cvt6sd@Vusiem
zd^nh<3nn^_Xr-qo9$JACEW8<uAWcD#ug*VdkB0k?S5~Nl1a!*=^#>WV)J3zrpnRl{
zXJuLs2BJc!$jk~<?eE$462HzVxgmor^0H^O)G|pu<B8ceEF^|ddtq#HMDUtbEl*}J
zGVO)Qrj*5)_0Z_EF`?cTT`_B3jQkG`z>tUzXD_W^aN?#9@5ac{N8u#{1EU`g#n#nD
z05e<oy|S%F(mPPrth9WKJ9jSf-kz5mnF7A#`VB!^fmRx1G=q@Vnw)Xs>-w=)!ur5_
zbA=zW!w}u=HFm`uY(@B8{0+U`m)d}E#SDB8Kant_(8lJSFbkrrCWo59N=k3psYmHL
zcP9_;mhm&p{@l-9<{v<MC$ZWcrxo9DM6mEVsA#N(`k<s8x5>fI92YvOyhl(*ypZ{(
zM!iDrut6Vl2IC1LZ?nKOAKr@>S=$x0l{bg?<X!%{aV_QiHC7+e_w%F}=Z#?C6*ICA
zyS6OQTo)8u`s!RcNCJxoHi3$kVSi<SPPc`i$V6f9*i$Ihf8;&U<uohSln2lM5&F)d
zmLsIuPx}?=$^&RCSEcF9Z)3o;CsR|K2N(3O6GK4tG|Bu2rtaAa67WYy$6m?aQ<itl
z4rh4>M?nA4agXr^p(4hiu?*Yy?Slc1*wE1jK=(eu>R?fF{{ZRC_)0nwo;Pgu9XA45
z-;s+Dk#rmm52+MBZr6^ZLHnZY&uXAg=ljDxgLNHpGdtmbB{;+ybUIGjBS=6c=qs_z
zBVvjm$$~S^kI%$rXmZnvJV|$ZrH0M?eTAp}i3Azy$_V4^WdrhSYH;HgmIC>g6ZsyG
z9KV4E?DI^M#4!(-+YxS*zs*fKt_-eI8q8p@Rqk4XrJOk<NSD50HWFLt`9J<X@|n2!
zBv%a&v^QAbb`{&vcc>ozKoDm#1@aZQ;7fZg>b%Xr9fB1gJs-+h#_=poa8C4IZ_hK#
z%di~IMuDOZd8qb|KtCMT{uZBi{K&L!TkG#*tM=2(Um@o(;>!@Iz-C`PtWJ6P^s{f#
zN2cEeJz8^Q4VSK@Ie;O;)Mo@4$UZwUc*~E|0I)Drdt=A|_K^XK=q-r_sz*{~^eUlC
z<3sDp*7v_!GozMQ3H?k<c7oNzY^KJd#8J9i;|0HzXpO1A7m^4FEG=KChfTWh;2`?>
ztFZDs!O1Qm9eX9|DDT6g*#thiP$Iu0CJ$H8$Z|8k8JK*CX*wtfCNE%Y$nm(Z#2-J^
zD4bmNwS8zWi*iBqOV<v+-_aiqvMN!Z_GC8l055@7a36)S#rL2LfA^;0?PQSLY)nCd
zIoXEH=9k7g+h8>0nQ8!&i8(}}NF?h6&pl<Iq0XfyK>N$XsJ=3`llB0w=#|WKU#M8`
z5B9O}^vKWPzN8+L@Nr2K6B(nIVeO)KM>3E5aA>cy{-UFsQKt=`;)TismZIhzV1Elj
z+mACVwi@^4LDQqyil^L+6_jM38EHL(FBfmnB{2-S$ARfE|BpEp6n_V^Dgz%-Ft;Tn
z*1dg5F{fBAQ$0^WxTE_M%1nlHT~GQql5{#G-E!P+SWsO~bYtnVFuM)(%KLDJo|;sw
zF7oMf!1}#w1>8i=4^L3R3+2?cT9!-g!u{i=2sU%L$$Z(xDfdWF?OI#k+G9R1v9-3K
z%EMQ(WIvzaBFWBiSJJ76=GZyHE?0-mxQypJyqVI=8Foo@32jVU_puMTt2|w=K4WM$
z`Mmnw6qG&|AI@3_E`)qs@@;;?c}bP_XlP+~A`xe5NeS?7$|)i-UBQBRTMb{Cc0cU<
zxNDf@$V8IRj-i;R_3w~T<>ht=XVOMJ!UFWX#<ULPA}aRFiu4auh=`}CB}Ei%8@3XC
zAvuXA4sA8*oJup#MY$^yqMwv*p~h0|2lkM7J^55wZx%Jgd_Nm3Unz&Rclm103`tIY
zv}H6E3H(bf*1~&;RUXX-p*qVi<#?0ZcRWyu)C!rXcbSXf1u4oMN;&GBpRe7-4q#>m
zT%!+oo-Zy~9UeWq1IB<%4(*?2B~8{0^i|#G=;f;$9(;`YHT$C&{o0wZ_b5joQP-}k
z=FrPReiR4Qv*#oFOpj&=9PxId0o(;k8GmBW%hs`f-PFZ#q13Tv&@dl9BnjG$NDSTe
zU{o<io~{;_Q~ksztmvOYl05htaO*<8dI(c)G%g7#sU0+`q*0QKI@neo7MFRoJ^pi)
zHpL{&yEqunG4?yF=XVbDyonqz^X}nT7at?#YjPVS%ySY8wC*1C!8!@C<?8pzq%4+(
zvoCom0k~EU5^s~dT_WEZ6=>y3_bP;rpu5D2&c2oH70G_kBF-PW+;M-tD*ySybH_uM
zi$wx+;zwAzh;&VIy>zvJ2-fTMBX|t)x1twnpCK|7mLHWTBQU>~db(y()aSQZPog>0
z&zk*!XI99xD_tIydAsYa8By~n1D)#Y89pzf?7n*Qu(za7rI9qo(z-MdyN7O1t)D3r
zRlqIF7T-jTEw^sMpFe_R5>y$cXp!54m+NSqbirgNmu9vXZ6V#q3DMH6!Yu2h!{d7F
z4M19Gwn>-eBdaWJ7|b_Z@L_E7dcAEX;g^}{CnCID;X>D9VQ7n9)_C>(?j)*c)Ky+<
z88}Xz)%2`WKGIlIWv*eT>=HkC;^d74lb5M{O2&`remb|MDfHjFO+!!a^W=`Y(qlu=
z-e_RYf@T6R*Riw=c+Et4P8dHdQA4#XN#6sa;|^IJ^vYqbrUUq#8<|a&Glhf;ulQS8
zWw1COtx=q}y0K)}V2H(YabC;`OU*LMD9rXWENs8K9+>>tNNaJ?el~i^S@yP{j35k-
zMw0%rrTH)Tl>Zjdg28-5HHZAS!~QcC3iIKAmK3OX$A+>JFaw<YzvxB(nrZZ}dNIr$
z{{*%8hvcOvl;-6$<bBCm!cmasVq}~6K_FZrNA92zM*r_&#;sgzw}hK^9*ItgJaw5y
z1n0jB&u;aw7tE)c|1tCbe&ohWShjyy;6J5Ls+VN^>Kn0$uf35I)FKU#wpP`$HqoL|
zb<-*^of7;dBqUs;!DMYw)-pKK=@j2ati`WKooS)vbQM&(^#du2Rb#9O)w!`P!+drL
zRjb*mT0FHSxu?IjQFS~>CnoZ{X!>CtiSA|morDqpQ@T;<Uf%t4`B^4dt>%Tu@9r?2
zo0U8HkL)`+AFdO)#|h5@eAIIKs>XlxG5Pl5PG<g_6gB_fA<dcxcsKB-AKn$}os|9>
z0&+ZfdGFtfL8yBv{9lV@3+Y4wE%?G=X_M3c-wS{QWo64J=9^|c+IE1gq9S3~G1}f0
z5Ehu26hYKX98~?jyf&O~_Hcix_BXw7|AyYUf`0uMxa4le!ERgv+ybafutzJs<(jY`
zU*c-oJP(>7f4DT#zqQrG<&7SMTcn8CT+J3W-+EG)q0G<KklmqY$?-k~3PmYb>qXiu
zKWrUJDvK>kE%Sz(QdFw?{y5Oq6}~^ntgpD<ZxFCpoEkZ9l-FbkU_1%ZFfc|;OzR`N
z$ClylD!b_TvYSl)>Irc>2MY(Majx8Mdg(f8k=MFCrwpl(gt!R&o#;|nPTM8&_0050
zAGlCpM6||YlB%9>93eb$uoshF3M*`5aujl};6|rqFc{Vv5?6C(7*fRSwkK9gpyRL0
zWwt~=vyI=3ZYHZ2eSVXoVWf_fN6g<5BP<;uRhCv2e|PKJU~vxyp;r+BCbP~Zs)dxk
zS2ihrzQu-!i9QuGw5VRfsOXsNNKkap&vlWpnh6oUi#<`x6=Wd8BRwWIEvhiM&fcwr
zM&s?yE9;J%L4mWNMB-6WO!l`-@i780`>nOH!OC%buj{em6zDXrF|Q`?i(FOG8td}A
zxyjqec&=MB;aM;{I0cM{$9)ZO*cB0?8;M5Kp=DdngC;RIv$sEbT&rH%=T%uAsk1wL
z;~#HCV}f{j?`nrRzj_iRIM>F1tsEv6vF7{sUFqEl4sh#QWS0o&h-lM68pT@AVE(js
zX)|PyiG4H9RYWRAZVk@*>aI_;c{u62K`;QW(>WjHnL*L@oNvlik4>vDmz(a$H%#TM
zd~b;tpMKzTj8XOs)6_gx*THuL?4$aRsG!`kt-P@pTtrBIc6zI6`{z8(FyovewscW;
z`wtVBr9vy*<MlawQFrd^%uJ9NQ&7+eyqx1~&bL`jExoRX?6AUTWOPzkKxpdHh$YeL
z%@sJ8LU6}Eu>6`(;o9izAo9Gi2~NJ}S{Nkz3qFZi$-`cA-K6GWE3eQB*JiHQckQt2
z&0Ra^3uiX`0$1M*D!yvoIT+<%6#nLW-)l!-Um&0iQLjIV&z)wEn7}mZ0Ywpwe1bn^
zK<!EC69hKe>PVH|^~S%{`W|Y3o%OxO_p?8r!0~Y&C{US{o48xtPH9)bOJAI5ra1?>
z1udEUiLrncHx~31;b}c_v4Uo9X{SgKT)|aeQNl+tJfxrWH<>YWTIuPT+XnoWBRGbc
z$)+#K0N4fKF`76~k`DVFPvW(1g+zYJ6-~-*`}>HiRk)x=j?7Z9HOXlJRx&YZlM1U~
z^zd4355AK$FKc(=MXk8y9OT-D4ZvhCZ~_#UgD5Qw&Timx`p(M}$nZntBTB~#Kc#?d
zt5~O8R3jVLD95O%sIB3%y4(PqaO*d4O{`7ZeQx)dzcFcv16fZ~B5!QW(bqDEMj1Pg
z3?0xAgKGqAzIDf#m3?|I{dQ}sbmwA$Bt4-0CY@{K=-sg3*sWy0%Snji(P=|M(Pq(R
tD*+_$6M3woow33SJw0Ls3hogW`bQU*xfZ-{ws9j%t^7Qa(@FW>{{eOva2fyr

literal 0
HcmV?d00001

diff --git a/Data/.Rhistory b/Data/.Rhistory
new file mode 100644
index 0000000..4a3b31d
--- /dev/null
+++ b/Data/.Rhistory
@@ -0,0 +1,512 @@
+main = "Cumulative records in ShareTrait")
+# ------------------------------------------------------------------------------
+# Cleaning working space
+rm(list=ls())
+# ------------------------------------------------------------------------------
+# #Libraries
+library(dplyr)
+library(xlsx)
+# ------------------------------------------------------------------------------
+# load data
+rec <- read.xlsx("C:/Users/fleiva/Insync/sharetrait2022@gmail.com/ShareTrait/data/datasets contributed.xlsx",sheetName = "raw_datasets_ShareTrait")
+str(rec)
+plot(cumsum(number_of_records)~date_of_contribution,data=rec,
+ylab= "#Records", xlab= "Date of submission", type ='l',col = "lightblue",
+main = "Cumulative records in ShareTrait")
+dev.off()
+# ------------------------------------------------------------------------------
+png("Cumulative records in ShareTrait.png",width = 7,height = 7,units = "in",res = 600)
+plot(cumsum(number_of_records)~date_of_contribution,data=rec,
+ylab= "#Records", xlab= "Date of submission", type ='l',col = "blue",
+main = "Cumulative records in ShareTrait")
+dev.off()
+plot(cumsum(number_of_records)~date_of_contribution,data=rec,
+ylab= "#Records", xlab= "Date of submission", type ='l',col = "blue",lwd=2,
+main = "Cumulative records in ShareTrait")
+# ------------------------------------------------------------------------------
+png("Cumulative records in ShareTrait.png",width = 7,height = 7,units = "in",res = 600)
+plot(cumsum(number_of_records)~date_of_contribution,data=rec,
+ylab= "#Records", xlab= "Date of submission", type ='l',col = "blue",lwd=2,
+main = "Cumulative records in ShareTrait")
+dev.off()
+# ------------------------------------------------------------------------------
+png("Cumulative records in ShareTrait.png",width = 7,height = 7,units = "in",res = 600)
+plot(cumsum(number_of_records)~date_of_contribution,data=rec,
+ylab= "#Records", xlab= "Date of submission", type ='l',col = "blue",lwd=3,
+main = "Cumulative records in ShareTrait")
+dev.off()
+# ------------------------------------------------------------------------------
+png("Cumulative records in ShareTrait.png",width = 4,height = 4,units = "in",res = 600)
+plot(cumsum(number_of_records)~date_of_contribution,data=rec,
+ylab= "#Records", xlab= "Date of submission", type ='l',col = "blue",lwd=3,
+main = "Cumulative records in ShareTrait")
+dev.off()
+# ------------------------------------------------------------------------------
+# Cleaning working space
+rm(list=ls())
+# ------------------------------------------------------------------------------
+# #Libraries
+library(dplyr)
+library(xlsx)
+# ------------------------------------------------------------------------------
+# load data
+rec <- read.xlsx("C:/Users/fleiva/Insync/sharetrait2022@gmail.com/ShareTrait/data/datasets contributed.xlsx",sheetName = "raw_datasets_ShareTrait")
+str(rec)
+# ------------------------------------------------------------------------------
+png("Cumulative records in ShareTrait.png",width = 7,height = 7,units = "in",res = 600)
+plot(cumsum(number_of_records)~date_of_contribution,data=rec,
+ylab= "#Records", xlab= "Date of submission", type ='l',col = "blue",lwd=3,
+main = "Cumulative records in ShareTrait")
+dev.off()
+# ------------------------------------------------------------------------------
+############################## END OF SCRIPT ###################################
+# ------------------------------------------------------------------------------
+cumsum(number_of_records)
+# ------------------------------------------------------------------------------
+# Cleaning working space
+rm(list=ls())
+# ------------------------------------------------------------------------------
+# #Libraries
+library(dplyr)
+library(xlsx)
+# ------------------------------------------------------------------------------
+# load data
+rec <- read.xlsx("C:/Users/fleiva/Insync/sharetrait2022@gmail.com/ShareTrait/data/datasets contributed.xlsx",sheetName = "raw_datasets_ShareTrait")
+str(rec)
+cumsum(number_of_records)
+cumsum(rec$number_of_records)
+sum(rec$number_of_records)
+#cummulative records in ShareTrait
+sum(rec$number_of_records)
+# ------------------------------------------------------------------------------
+# Cleaning working space
+rm(list=ls())
+# ------------------------------------------------------------------------------
+# #Libraries
+library(dplyr)
+library(xlsx)
+# ------------------------------------------------------------------------------
+# load data
+rec <- read.xlsx("C:/Users/fleiva/Insync/sharetrait2022@gmail.com/ShareTrait/data/datasets contributed.xlsx",sheetName = "raw_datasets_ShareTrait")
+str(rec)
+# ------------------------------------------------------------------------------
+# Cleaning working space
+rm(list=ls())
+# ------------------------------------------------------------------------------
+# #Libraries
+library(dplyr)
+library(xlsx)
+# ------------------------------------------------------------------------------
+# load data
+rec <- read.xlsx("C:/Users/fleiva/Insync/sharetrait2022@gmail.com/ShareTrait/data/datasets contributed.xlsx",sheetName = "raw_datasets_ShareTrait")
+str(rec)
+#cummulative records in ShareTrait
+sum(rec$number_of_records)
+plot(cumsum(number_of_records)~date_of_contribution,data=rec,
+ylab= "#Records", xlab= "Date of submission", type ='l',col = "blue",lwd=3,
+main = "Cumulative records in ShareTrait")
+#cummulative records in ShareTrait
+order(sum(rec$number_of_records))
+#cummulative records in ShareTrait
+sum(rec$number_of_records)
+# ------------------------------------------------------------------------------
+png("Cumulative records in ShareTrait.png",width = 7,height = 7,units = "in",res = 600)
+plot(cumsum(number_of_records)~date_of_contribution,data=rec,
+ylab= "#Records", xlab= "Date of submission", type ='l',col = "blue",lwd=3,
+main = "Cumulative records in ShareTrait")
+dev.off()
+plot(cumsum(number_of_records)~date_of_contribution,data=rec,
+ylab= "#Records", xlab= "Date of submission", type ='l',col = "blue",lwd=3,
+main = "Cumulative records in ShareTrait")
+# ------------------------------------------------------------------------------
+# load data
+rec <- read.xlsx("C:/Users/fleiva/Insync/sharetrait2022@gmail.com/ShareTrait/data/datasets contributed.xlsx",sheetName = "raw_datasets_ShareTrait")
+str(rec)
+#cummulative records in ShareTrait
+sum(rec$number_of_records)
+plot(cumsum(number_of_records)~date_of_contribution,data=rec,
+ylab= "#Records", xlab= "Date of submission", type ='l',col = "blue",lwd=3,
+main = "Cumulative records in ShareTrait")
+# ------------------------------------------------------------------------------
+png("Cumulative records in ShareTrait.png",width = 7,height = 7,units = "in",res = 600)
+plot(cumsum(number_of_records)~date_of_contribution,data=rec,
+ylab= "#Records", xlab= "Date of submission", type ='l',col = "blue",lwd=3,
+main = "Cumulative records in ShareTrait")
+dev.off()
+str(rec)
+as.Date(rec$date_of_contribution)
+#cummulative records in ShareTrait
+sum(rec$number_of_records)
+# ------------------------------------------------------------------------------
+png("Cumulative records in ShareTrait.png",width = 7,height = 7,units = "in",res = 600)
+plot(cumsum(number_of_records)~date_of_contribution,data=rec,
+ylab= "#Records", xlab= "Date of submission", type ='l',col = "blue",lwd=3,
+main = "Cumulative records in ShareTrait")
+dev.off()
+plot(cumsum(number_of_records)~date_of_contribution,data=rec,
+ylab= "#Records", xlab= "Date of submission", type ='l',col = "blue",lwd=3,
+main = "Cumulative records in ShareTrait")
+plot(cumsum(number_of_records)~as.Dtae(date_of_contribution),data=rec,
+ylab= "#Records", xlab= "Date of submission", type ='l',col = "blue",lwd=3,
+main = "Cumulative records in ShareTrait")
+plot(cumsum(number_of_records)~as.Date(date_of_contribution),data=rec,
+ylab= "#Records", xlab= "Date of submission", type ='l',col = "blue",lwd=3,
+main = "Cumulative records in ShareTrait")
+# ------------------------------------------------------------------------------
+png("Cumulative records in ShareTrait.png",width = 7,height = 7,units = "in",res = 600)
+plot(cumsum(number_of_records)~as.Date(date_of_contribution),data=rec,
+ylab= "#Records", xlab= "Date of submission", type ='l',col = "blue",lwd=3,
+main = "Cumulative records in ShareTrait")
+dev.off()
+# ------------------------------------------------------------------------------
+# load data
+rec <- read.xlsx("C:/Users/fleiva/Insync/sharetrait2022@gmail.com/ShareTrait/data/datasets contributed.xlsx",sheetName = "raw_datasets_ShareTrait")
+str(rec)
+#cummulative records in ShareTrait
+sum(rec$number_of_records)
+plot(cumsum(number_of_records)~as.Date(date_of_contribution),data=rec,
+ylab= "#Records", xlab= "Date of submission", type ='l',col = "blue",lwd=3,
+main = "Cumulative records in ShareTrait")
+# ------------------------------------------------------------------------------
+png("Cumulative records in ShareTrait.png",width = 7,height = 7,units = "in",res = 600)
+plot(cumsum(number_of_records)~as.Date(date_of_contribution),data=rec,
+ylab= "#Records", xlab= "Date of submission", type ='l',col = "blue",lwd=3,
+main = "Cumulative records in ShareTrait")
+dev.off()
+#cummulative records in ShareTrait
+sum(rec$number_of_records)
+# ------------------------------------------------------------------------------
+# Cleaning working space
+rm(list=ls())
+# ------------------------------------------------------------------------------
+# #Libraries
+library(dplyr)
+library(xlsx)
+# ------------------------------------------------------------------------------
+# load data
+rec <- read.xlsx("C:/Users/fleiva/Insync/sharetrait2022@gmail.com/ShareTrait/data/datasets contributed.xlsx",sheetName = "raw_datasets_ShareTrait")
+str(rec)
+#cummulative records in ShareTrait
+sum(rec$number_of_records)
+# ------------------------------------------------------------------------------
+# Cleaning working space
+rm(list=ls())
+# ------------------------------------------------------------------------------
+# #Libraries
+library(dplyr)
+library(xlsx)
+# ------------------------------------------------------------------------------
+# set the working directory to the folder containing this script:
+setwd(dirname(rstudioapi::getActiveDocumentContext()$path))
+# check directory
+getwd()
+# '../' goes up one level from the current working directory, so this creates
+# the 'Outputs' folder just outside the 'R' folder
+# ------------------------------------------------------------------------------
+# load data
+rec <- read.xlsx("C:/Users/fleiva/Insync/sharetrait2022@gmail.com/ShareTrait/data/datasets contributed.xlsx",sheetName = "raw_datasets_ShareTrait")
+# ------------------------------------------------------------------------------
+# Cleaning working space
+rm(list=ls())
+# ------------------------------------------------------------------------------
+# #Libraries
+library(dplyr)
+library(xlsx)
+# ------------------------------------------------------------------------------
+# set the working directory to the folder containing this script:
+setwd(dirname(rstudioapi::getActiveDocumentContext()$path))
+# check directory
+getwd()
+# ------------------------------------------------------------------------------
+# load data
+rec <- read.xlsx("C:/Users/fleiva/Insync/sharetrait2022@gmail.com/ShareTrait/data/datasets contributed.xlsx",sheetName = "raw_datasets_ShareTrait")
+#cummulative records in ShareTrait
+sum(rec$number_of_records)
+plot(cumsum(number_of_records)~as.Date(date_of_contribution),data=rec,
+ylab= "#Records", xlab= "Date of submission", type ='l',col = "blue",lwd=3,
+main = "Cumulative records in ShareTrait")
+rec
+View(rec)
+# ------------------------------------------------------------------------------
+vline_month <- function(s) abline(v=which(s==levels(rec$date_of_contribution)))
+# keep original order of levels
+df$date_of_contribution <- factor(df$date_of_contribution, levels=unique(df$date_of_contribution))
+# keep original order of levels
+rec$date_of_contribution <- factor(rec$date_of_contribution, levels=unique(rec$date_of_contribution))
+#png("Cumulative records in ShareTrait.png",width = 7,height = 7,units = "in",res = 600)
+plot(cumsum(number_of_records)~as.Date(date_of_contribution),data=rec,
+ylab= "#Records", xlab= "Date of submission", type ='l',col = "blue",lwd=3,
+main = "Cumulative records in ShareTrait")
+#png("Cumulative records in ShareTrait.png",width = 7,height = 7,units = "in",res = 600)
+plot(cumsum(number_of_records)~date_of_contribution,data=rec,
+ylab= "#Records", xlab= "Date of submission", type ='l',col = "blue",lwd=3,
+main = "Cumulative records in ShareTrait")
+vline_month(c("Jan-97", "Apr-97"))
+# ------------------------------------------------------------------------------
+# Cleaning working space
+rm(list=ls())
+# ------------------------------------------------------------------------------
+# #Libraries
+library(dplyr)
+library(xlsx)
+# ------------------------------------------------------------------------------
+# set the working directory to the folder containing this script:
+setwd(dirname(rstudioapi::getActiveDocumentContext()$path))
+# check directory
+getwd()
+# ------------------------------------------------------------------------------
+# load data
+rec <- read.xlsx("C:/Users/fleiva/Insync/sharetrait2022@gmail.com/ShareTrait/data/datasets contributed.xlsx",sheetName = "raw_datasets_ShareTrait")
+str(rec)
+#cummulative records in ShareTrait
+sum(rec$number_of_records)
+abline(v=as.Date("2022-11-01 12:17:00"),lwd=2, col='red'))
+plot(cumsum(number_of_records)~as.Date(date_of_contribution),data=rec,
+ylab= "#Records", xlab= "Date of submission", type ='l',col = "blue",lwd=3,
+main = "Cumulative records in ShareTrait")
+abline(v=as.Date("2022-11-01 12:17:00"),lwd=2, col='red'))
+plot(cumsum(number_of_records)~as.Date(date_of_contribution),data=rec,
+ylab= "#Records", xlab= "Date of submission", type ='l',col = "blue",lwd=3,
+main = "Cumulative records in ShareTrait")
+abline(v=as.Date("2022-11-01 12:17:00"),lwd=2, col='red')
+abline(v=as.Date("2022-11-01"),lwd=2, col='red')# internal launch
+abline(v=as.Date("2022-11-01"),lwd=2, col='blue')# internal launch
+abline(v=as.Date("2022-12-05"),lwd=2, col='red')# critical mass launch
+abline(v=as.Date("2022-11-01"),lwd=2, col='green')# internal launch
+legend("bottomleft", legend=c("large", "critical launch","BES meeting"),
+lty = c(1,1,1),lwd=3,bty="n",cex=1.2,
+col=c('green', 'blue','red'))
+legend("bottomleft", legend=c("large", "critical launch","BES meeting"),
+lty = c(1,1,1),lwd=3,bty="n",cex=1.2,
+col=c('green', 'blue','red'))
+plot(cumsum(number_of_records)~as.Date(date_of_contribution),data=rec,
+ylab= "#Records", xlab= "Date of submission", type ='l',col = "blue",lwd=3,
+main = "Cumulative records in ShareTrait")
+abline(v=as.Date("2022-11-01"),lwd=2, col='green')# internal launch
+abline(v=as.Date("2022-12-05"),lwd=2, col='red')# critical mass launch
+abline(v=as.Date("2022-11-01"),lwd=2, col='green')# internal launch
+abline(v=as.Date("2022-12-05"),lwd=2, col='red')# critical mass launch
+abline(v=as.Date("2022-12-15"),lwd=2, col='red')# BES meeting Edinburgh
+abline(v=as.Date("2022-11-01"),lwd=2, col='green')# internal launch
+abline(v=as.Date("2022-12-05"),lwd=2, col='blue')# critical mass launch
+abline(v=as.Date("2022-12-15"),lwd=2, col='red')# BES meeting Edinburgh
+#legend
+legend("bottomleft", legend=c("large", "critical launch","BES meeting"),
+lty = c(1,1,1),lwd=3,bty="n",cex=1.2,
+col=c('green', 'blue','red'))
+plot(cumsum(number_of_records)~as.Date(date_of_contribution),data=rec,
+ylab= "#Records", xlab= "Date of submission", type ='l',col = "blue",lwd=3,
+main = "Cumulative records in ShareTrait")
+abline(v=as.Date("2022-11-01"),lwd=2, col='green')# internal launch
+abline(v=as.Date("2022-12-05"),lwd=2, col='blue')# critical mass launch
+abline(v=as.Date("2022-12-15"),lwd=2, col='red')# BES meeting Edinburgh
+#legend
+legend("bottomleft", legend=c("internal launch", "critical launch","BES meeting"),
+lty = c(1,1,1),lwd=3,bty="n",cex=1.2,
+col=c('green', 'blue','red'))
+#legend
+legend("bottomright", legend=c("internal launch", "critical launch","BES meeting"),
+lty = c(1,1,1),lwd=3,bty="n",cex=1.2,
+col=c('green', 'blue','red'))
+plot(cumsum(number_of_records)~as.Date(date_of_contribution),data=rec,
+ylab= "#Records", xlab= "Date of submission", type ='l',col = "blue",lwd=3,
+main = "Cumulative records in ShareTrait")
+abline(v=as.Date("2022-11-01"),lwd=2, col='green')# internal launch
+abline(v=as.Date("2022-12-05"),lwd=2, col='blue')# critical mass launch
+abline(v=as.Date("2022-12-15"),lwd=2, col='red')# BES meeting Edinburgh
+#legend
+legend("bottomright", legend=c("internal launch", "critical launch","BES meeting"),
+lty = c(1,1,1),lwd=3,bty="n",cex=1.2,
+col=c('green', 'blue','red'))
+# ------------------------------------------------------------------------------
+png("Cumulative records in ShareTrait.png",width = 7,height = 7,units = "in",res = 600)
+plot(cumsum(number_of_records)~as.Date(date_of_contribution),data=rec,
+ylab= "#Records", xlab= "Date of submission", type ='l',col = "black",lwd=3,
+main = "Cumulative records in ShareTrait")
+abline(v=as.Date("2022-11-01"),lwd=2, col='green')# internal launch
+abline(v=as.Date("2022-12-05"),lwd=2, col='blue')# critical mass launch
+abline(v=as.Date("2022-12-15"),lwd=2, col='red')# BES meeting Edinburgh
+dev.off()
+plot(cumsum(number_of_records)~as.Date(date_of_contribution),data=rec,
+ylab= "#Records", xlab= "Date of submission", type ='l',col = "black",lwd=3,
+main = "Cumulative records in ShareTrait")
+abline(v=as.Date("2022-11-01"),lwd=2, col='green')# internal launch
+abline(v=as.Date("2022-12-05"),lwd=2, col='blue')# critical mass launch
+abline(v=as.Date("2022-12-15"),lwd=2, col='red')# BES meeting Edinburgh
+#legend
+legend("bottomright", legend=c("internal launch", "critical launch","BES meeting"),
+lty = c(1,1,1),lwd=3,bty="n",cex=1.2,
+col=c('green', 'blue','red'))
+#legend
+legend("bottomright", legend=c("internal launch", "critical launch","BES meeting"),
+lty = c(1,1,1),lwd=3,bty="n",
+col=c('green', 'blue','red'))
+plot(cumsum(number_of_records)~as.Date(date_of_contribution),data=rec,
+ylab= "#Records", xlab= "Date of submission", type ='l',col = "black",lwd=3,
+main = "Cumulative records in ShareTrait")
+abline(v=as.Date("2022-11-01"),lwd=2, col='green')# internal launch
+abline(v=as.Date("2022-12-05"),lwd=2, col='blue')# critical mass launch
+abline(v=as.Date("2022-12-15"),lwd=2, col='red')# BES meeting Edinburgh
+#legend
+legend("bottomright", legend=c("internal launch", "critical launch","BES meeting"),
+lty = c(1,1,1),lwd=3,bty="n",
+col=c('green', 'blue','red'))
+# Even a quicker example could be
+library(data.table)
+library(dplyr)
+# ------------------------------------------------------------------------------
+# Cleaning working space
+rm(list=ls())
+# ------------------------------------------------------------------------------
+# #Libraries
+library(dplyr)
+library(xlsx)
+# ------------------------------------------------------------------------------
+# set the working directory to the folder containing this script:
+setwd(dirname(rstudioapi::getActiveDocumentContext()$path))
+# check directory
+getwd()
+# ------------------------------------------------------------------------------
+rec <- read.xlsx("data/datasets contributed.xlsx",sheetName = "raw_datasets_ShareTrait")
+# ------------------------------------------------------------------------------
+# Cleaning working space
+rm(list=ls())
+# ------------------------------------------------------------------------------
+# #Libraries
+library(dplyr)
+library(xlsx)
+# ------------------------------------------------------------------------------
+# set the working directory to the folder containing this script:
+setwd(dirname(rstudioapi::getActiveDocumentContext()$path))
+# check directory
+getwd()
+rec <- read.xlsx("data/datasets contributed.xlsx",sheetName = "raw_datasets_ShareTrait")
+rec <- read.xlsx("./data/datasets contributed.xlsx",sheetName = "raw_datasets_ShareTrait")
+# ------------------------------------------------------------------------------
+# set the working directory to the folder containing this script:
+setwd(dirname(rstudioapi::getActiveDocumentContext()$path))
+# check directory
+getwd()
+rec <- read.xlsx("data/datasets contributed.xlsx",sheetName = "raw_datasets_ShareTrait")
+# ------------------------------------------------------------------------------
+# Cleaning working space
+rm(list=ls())
+# ------------------------------------------------------------------------------
+# #Libraries
+library(dplyr)
+library(xlsx)
+# ------------------------------------------------------------------------------
+# load data
+rec <- read.xlsx("C:/Users/fleiva/Insync/sharetrait2022@gmail.com/ShareTrait/data/datasets contributed.xlsx",sheetName = "raw_datasets_ShareTrait")
+str(rec)
+#cummulative records in ShareTrait
+sum(rec$number_of_records)
+plot(cumsum(number_of_records)~as.Date(date_of_contribution),data=rec,
+ylab= "#Records", xlab= "Date of submission", type ='l',col = "black",lwd=3,
+main = "Cumulative records in ShareTrait")
+abline(v=as.Date("2022-11-01"),lwd=2, col='green')# internal launch
+abline(v=as.Date("2022-12-05"),lwd=2, col='blue')# critical mass launch
+abline(v=as.Date("2022-12-15"),lwd=2, col='red')# BES meeting Edinburgh
+#Cleaning working space
+rm(list=ls())
+today<-format(Sys.Date(),"%Y%m%d")
+library(data.table)
+library(dplyr)
+#Cleaning working space
+rm(list=ls())
+today<-format(Sys.Date(),"%Y%m%d")
+# ------------------------------------------------------------------------------
+# set the working directory to the folder containing this script:
+setwd("C:/Users/fleiva/Insync/sharetrait2022@gmail.com/ShareTrait/data/cleaned/development")
+tbl_fread <-
+list.files(pattern = "*.csv") %>%
+map_df(~fread(.))
+library(data.table)
+library(dplyr)
+tbl_fread <-
+list.files(pattern = "*.csv") %>%
+map_df(~fread(.))
+sessionInfo()
+sink()
+plot(cumsum(number_of_records)~as.Date(date_of_contribution),data=rec,
+ylab= "#Records", xlab= "Date of submission", type ='l',col = "black",lwd=3,
+main = "Cumulative records in ShareTrait")
+abline(v=as.Date("2022-11-01"),lwd=2, col='green')# internal launch
+abline(v=as.Date("2022-12-05"),lwd=2, col='blue')# critical mass launch
+abline(v=as.Date("2022-12-15"),lwd=2, col='red')# BES meeting Edinburgh
+#legend
+legend("bottomright", legend=c("internal launch", "critical launch","BES meeting"),
+lty = c(1,1,1),lwd=3,bty="n",
+col=c('green', 'blue','red'))
+library(purrr)
+#Cleaning working space
+rm(list=ls())
+today<-format(Sys.Date(),"%Y%m%d")
+# ------------------------------------------------------------------------------
+# set the working directory to the folder containing this script:
+setwd("C:/Users/fleiva/Insync/sharetrait2022@gmail.com/ShareTrait/data/cleaned/development")
+#Development
+dev <-
+list.files(pattern = "*.csv") %>%
+map_df(~fread(.))
+View(dev)
+#Fecundity
+setwd("C:/Users/fleiva/Insync/sharetrait2022@gmail.com/ShareTrait/data/cleaned/fecundity")
+fec <-
+list.files(pattern = "*.csv") %>%
+map_df(~fread(.))
+#Metabolic rate
+setwd("C:/Users/fleiva/Insync/sharetrait2022@gmail.com/ShareTrait/data/cleaned/metabolic_rate")
+met <-
+list.files(pattern = "*.csv") %>%
+map_df(~fread(.))
+View(met)
+View(dev)
+dev$trait_name <- as.factor("development")
+View(dev)
+dev$trait_name <- as.factor("development")
+fec$trait_name <- as.factor("fecundity")
+met$trait_name <- as.factor("metabolic_rate")
+View(fec)
+sum(nrows(met),nrows(met),nrows(met))
+sum(nrow(met),nrows(met),nrows(met))
+sum(nrow(met),nrow(met),nrow(met))
+sum(nrow(dev),nrow(fec),nrow(met))
+joined_df <- merge(dev, fec, by = "trait_name", all.x = TRUE, all.y = TRUE)
+View(joined_df)
+joined_df <- merge(dev, fec, by = "trait_name", all.x = TRUE, all.y = FALSE)
+joined_df <- merge(dev, fec, by = "trait_name", all.x = TRUE, all.y = TRUE)
+View(joined_df)
+joined_df <- merge(dev, fec, by = "trait_name")
+# set the working directory to the folder containing this script:
+setwd("C:/Users/fleiva/Insync/sharetrait2022@gmail.com/ShareTrait/data/cleaned/development")
+#Development
+dev <-
+list.files(pattern = "*.csv") %>%
+map_df(~fread(.))
+#Fecundity
+setwd("C:/Users/fleiva/Insync/sharetrait2022@gmail.com/ShareTrait/data/cleaned/fecundity")
+fec <-
+list.files(pattern = "*.csv") %>%
+map_df(~fread(.))
+#Metabolic rate
+setwd("C:/Users/fleiva/Insync/sharetrait2022@gmail.com/ShareTrait/data/cleaned/metabolic_rate")
+met <-
+list.files(pattern = "*.csv") %>%
+map_df(~fread(.))
+# ------------------------------------------------------------------------------
+#Add a new column to identify the trait
+dev$trait_name <- as.factor("development")
+fec$trait_name <- as.factor("fecundity")
+met$trait_name <- as.factor("metabolic_rate")
+# ------------------------------------------------------------------------------
+#merge all data sets
+joined_df <- merge(dev, fec, by = "trait_name")
+View(joined_df)
+# ------------------------------------------------------------------------------
+# export the merged database
+setwd("C:/Users/fleiva/Insync/sharetrait2022@gmail.com/ShareTrait/GitHub/ShareTrait/Data")
+write.csv(joined_df, "ShareTrait_raw.csv",row.names = FALSE)
+joined_df <- merge(dev, fec, by = "trait_name")
+joined_df <- merge(joined_df, met, by = "trait_name")
+View(met)
diff --git a/Data/ShareTrait_raw.csv b/Data/ShareTrait_raw.csv
new file mode 100644
index 0000000..5be26b8
--- /dev/null
+++ b/Data/ShareTrait_raw.csv
@@ -0,0 +1 @@
+"trait_name","name_contact.x","email_contact.x","doi_dataset.x","doi_publication.x","comments_reference.x","species_reported.x","comments_taxonomy.x","realm_general.x","realm_specific.x","elevation_of_collection","depth_of_collection","lat_gg.x","lat_mm.x","lat_ss","long_gg.x","long_mm.x","long_ss","origin.x","comments_location.x","date_of_collection_initial.x","date_of_collection_final.x","comments_timing.x","maintained.x","maintenance_duration_days.x","maintenance_duration_generations.x","maintenance_temperature.x","maintenance_photoperiod.x","maintenance_humidity.x","maintenance_oxygen.x","maintenance_oxygen_units.x","maintenance_carbon_dioxide_units.x","maintenance_food_type.x","acclimated.x","strategy_of_protection","sex.x","life_stage_general_initial","life_stage_general_final","life_stage_specific_initial","life_stage_specific_final","size_type","size_units","size_value_initial","size_value_final","test_temperature.x","test_oxygen.x","test_carbon_dioxide.x","test_oxygen_units.x","test_carbon_dioxide_units.x","test_photoperiod.x","test_humidity.x","comments_experimental_conditions.x","development_time","development_time_unit","comments_development","maintenance_carbon_dioxide.x","name_contact.y","email_contact.y","type_of_reference","doi_dataset.y","doi_publication.y","comments_reference.y","species_reported.y","comments_taxonomy.y","realm_general.y","realm_specific.y","lat_gg.y","lat_mm.y","long_gg.y","long_mm.y","origin.y","comments_location.y","date_of_collection_initial.y","date_of_collection_final.y","comments_timing.y","experiment_location","maintained.y","maintenance_duration_days.y","maintenance_duration_generations.y","maintenance_temperature.y","maintenance_salinity","maintenance_ph","maintenance_oxygen.y","maintenance_carbon_dioxide.y","maintenance_photoperiod.y","maintenance_humidity.y","maintenance_oxygen_units.y","maintenance_carbon_dioxide_units.y","maintenance_food_type.y","acclimated.y","acclimation_duration","acclimation_temperature","acclimation_salinity","acclimation_ph","acclimation_oxygen","acclimation_carbon_dioxide","acclimation_photoperiod","acclimation_humidity","acclimation_oxygen_units","acclimation_carbon_dioxide_units","acclimation_food_type","test_temperature.y","test_salinity","test_ph","test_oxygen.y","test_carbon_dioxide.y","test_oxygen_units.y","test_carbon_dioxide_units.y","test_photoperiod.y","test_humidity.y","comments_experimental_conditions.y","sex.y","parental_age","parental_age_units","parental_size_type","parental_size_units","parental_size_value","mating","method_type","fecundity","fecundity_unit","fecundity_temporal_unit","offspring_developmental_stage","offspring_size_type","offspring_size_units","offspring_size_value","comments_fecundity"