From 76f9dd3233c6b0ea097c765172bf1ec7bff5de39 Mon Sep 17 00:00:00 2001 From: schuemie Date: Mon, 3 Feb 2020 05:17:18 -0500 Subject: [PATCH] Adding viewer for evaluation of small-counts meta-analysis --- OhdsiStudies/ui.R | 8 +- OhdsiStudies/www/favicon.ico | Bin 0 -> 1150 bytes OhdsiStudies/www/logo.png | Bin 0 -> 52680 bytes .../ResultsExplorer.Rproj | 13 + .../data/fixedFx.rds | Bin 0 -> 79655 bytes .../data/randomFx.rds | Bin 0 -> 51084 bytes SmallCountMetaAnalysisEvaluation/global.R | 10 + SmallCountMetaAnalysisEvaluation/server.R | 315 ++++++++++++++++++ SmallCountMetaAnalysisEvaluation/ui.R | 61 ++++ SmallCountMetaAnalysisEvaluation/widgets.R | 5 + 10 files changed, 409 insertions(+), 3 deletions(-) create mode 100644 OhdsiStudies/www/favicon.ico create mode 100644 OhdsiStudies/www/logo.png create mode 100644 SmallCountMetaAnalysisEvaluation/ResultsExplorer.Rproj create mode 100644 SmallCountMetaAnalysisEvaluation/data/fixedFx.rds create mode 100644 SmallCountMetaAnalysisEvaluation/data/randomFx.rds create mode 100644 SmallCountMetaAnalysisEvaluation/global.R create mode 100644 SmallCountMetaAnalysisEvaluation/server.R create mode 100644 SmallCountMetaAnalysisEvaluation/ui.R create mode 100644 SmallCountMetaAnalysisEvaluation/widgets.R diff --git a/OhdsiStudies/ui.R b/OhdsiStudies/ui.R index dd516d0a..877ea2c5 100644 --- a/OhdsiStudies/ui.R +++ b/OhdsiStudies/ui.R @@ -2,12 +2,14 @@ library(shiny) library(DT) ui <- fluidPage( - - titlePanel("OHDSI Studies"), + titlePanel( + title = div(img(src = "logo.png", height = 50, width = 50), "OHDSI Studies"), + windowTitle = "OHDSI Studies" + ), style = "width:1500px;", dataTableOutput("mainTable"), uiOutput("detailsUi"), uiOutput("lastUpdated") - + ) diff --git a/OhdsiStudies/www/favicon.ico b/OhdsiStudies/www/favicon.ico new file mode 100644 index 0000000000000000000000000000000000000000..849a1fa445a66ee6b2661717fdbbf2c7a495df5b GIT binary patch literal 1150 zcmbu8Z%7ki9LG=WeS*5yq|}lzH7pQ&6H!@7B_c+>DGMqI=OIObL6U)ygp}l;UO1g= zGaYG8r<=;8G%YcGk@jbQ)MYyDkLKF;Ja@bOxjj9{{;+B9-1y#)d+t7;{hr_L2qFr9 zV`2z=Od^W65d@DQ2oVlm!YlrDTnGYR+xS5U5nGLi^+jvUp0mwgTx7G}O*R|dWYa9p zoQG^O<1Bbc$)cB(EP2VsWiQ#Y#-3+=zR>S_y`Jbx8cKbj6I`~JDSkn(VNz537#V9HRy6}}Yu9qo}0!64(T znDtc0kGR~J7X|s1#W_*mKz~VMy`4GS1`YcZ@E5-YI~2H&fP>#nyC3M?Rl9Wzh#g{( z3HnmQ`KR~Aop)c;4T4%bI?@imrpv)gr7xnu!bFM`6N@5rKab3op>JIcplhcbVTwOvXhYH@f}IqjO$v$6FU;r zI#BjYIDK!NsX3{pr$T!PI53|U*1wSBFCI_!&gnm9UGIS%2{m>k9-x)Chnq9UDVtBZfbP?FB|&*LSWmj>yeWiQi9JT z@Arc9Jm2IvN!*mLhBRQ6eqKI<`x5p3}#5S5NVNprz~TqB&qBX zhLW9-EzdQ&TkiY&`~lAo&kw!ab-!Gn>vPWgobx{Kb3PFlbTk=gIcX^XTRY8NRe zC@sJrWoj7s7sjiW{@}+xTjlf06coiVep`C+;O~4^=!@qmD8iU1C~)A<4)~=zXDBHA zy(uWBqbMlkCn+d6I$h;MJSiw>#q3p8FKDT%@?CJbdClIzhJpg!mUhqc^5s6Zus5}y zKAEpkJsdvqqA2V)Q9kZ{dhly7_)Cf=`tuIqPtT|^Gegwz53rDjndrQ5Oa7xzF-+(K z7c5bcPoG+A^q%$e_FkBrTyLu#9kg9=T_5nxC>Ny=)a4Zw+kcOeFInglm5 z4mz^unl}V=ULMMhoRbuI+$tE!p%IZRcJ@NEi)D;4=~0G1+kjr@tTm5u^Z5Ns104?H z>)~F$p?HL4vu5*t4ilZn;WwiUCAE?|S(l8R9VEh%87U$KE9hkMyqHtNlbV?r-I$kL zC~jp}iOEdSvE3@!H?CTpoqcVk+Iflcx#+oAr|XWdANaaR#LH0L$yAC@XeX6UiyrI9 z(Kb6p5oP;Bgu~f!I!nMf#mLx*Gle5LK=0}9^Y79}=H~=zX}=FkhWD+Jtlsd&vA*k+uqkgHy+iu)Df}Q%JBQ9D}QZl;g@I6A+gZi1< zvfB*)OA3f3kNU*0`IiwkwDJ4goIe^K(>kW2sGyM0G2YFvE8n~;vsk!d$k`q-xp-P$ zPwlDQ%c>d~y%*jN1=!TahpyhcIT5?4SzV+1HwZ^pGbm2Jq(*;yKuP+nh|M|xIp}?1 zcy)AZDu`+Scq;p2*y~U=A?$QnH0pbzqq!ltugLY0ohC?_Uc%dja}Y8DR$zIzuJH zAc}qUNw$h+9!rJUhYR|Qfz?1(4(zkwmr%Py;=h8XlfZWJ!K|68l@%}W9b!~hbw0p! zP^G$??J4!~kmH#~PnkE_WcQn53sj)p3U-H50s}%uny9q{bBZML7`U3~`)SrfgT_wY zI(#4YnYgj2Q$<-26x%Sjxc|GX9~IA?jHXiRGvU+>daCryu<^j}{LE;PM$J=vA?VW= z!^-$f(PA!i9LkRgo=52;1G65|>s1`py-Xb$a#q#x4C}+=dYXE3PkG*-cz^UdY?bD` zhHxfB_bEHEZ^zvZ%d(haMKz@#40R`Vdv;HJk%rTUhQ4huw2&7cOWM~dt1Ui7@tD<> zM-t1?)M;64=$!}YWt<7KvE1KJIU6u5K6`qW&*ShGn`U#)c;~J8D(b^biDANRC&#+R zVa_a7-Zh8J=xzqBHW#*=#t7ov795*g4OyGnk6R7*(8Pz`(rhCEAB=ex^zA0 za>Dy#ITkrr?IX)_$}-$a+=|`ezg?Nu;>g2Q;8N+0k>*oHo$ATrv?^~OR9!HCStOs~iJ1C7C5xORkjIT5H--pHH1qKbMuzt9HL{@Jvw3#nD8xuGNJbvxBk~lDOdFM)-LE=87cJB^EL{3JpMH9!Ntce z`Zi}1vaT1tymI1_!jny$=sC|Up|`?c6uxnsJaSU^WTsKRQT<@e^BA9SpLCzxO$0+A zOckO3Q2U{=mBytj?+hdjO0TZev6)3>vKE%><{I44G1ipR_D%H&Tg#5QACssPqf^?Y zYFbhdQ8KGPyBi8|z}OQ{%3x4Mhic#Z9J^`%vByF+ zE;HUD)S`6kDf8?0wxe&JHhl>xe(W5)Rh!qQa8S0%pm!c z{#AA3U#HH;7<+>o(w4fF zu@y?zO5+cvh;C0^y~dx8wRcw7IM^2H(8mYl3Qo zYcsxo*;@2}?q@N|TIcJ>Tkzhf!+2nfYP)88?YqKq-;(ait|A4?C*BLJi&EWEDCr{U z@Pmg~-yiyh>_1&4_+2^NDIAq8cUeM8qD)iu^(RX4NZhYgJ?U z%<7t4y^T=H0z>Ip}@hdxBJIS*^XK-^~D3*}HYf+Dm6x zceGb&+(V2*9&)U4T;aGWsVb>^P0MzvWV2+o)YDp*RQ1`fma#mhyg<(2gs1EL7oR7q zL7H?td`WVzN){V?59y4-3o zlH*cvJzxLXh@OHc)*rL@V4~q3=VVG&%6eE;*nF?g`-(pMz69RZ!(B4lWr}5W>o;2a zq8Vrz)ERhV7h`aT8RQ4w*?s8m&whWohhCa4^+}96&x?)d8R@hWp(o1o%X+gWK2=Uo}3TpGh@^zM|@4l%+STn)I1j zb}Ss~Tga=CL>-cF^OSM%B8hIzlWMbl#TIObGj116^KV*=A#yY)V-tA#cAl`w8jEB+E0F==f{#Po4}vaZ)tiaoG0$y0S4HnDOX# zK|to#_zUyHx2IFDo|OC%x9c+2H*T<87*k`m_T0Dk_S#Y^NqWUK)ofT~tPk%CMeo}_Rrs2sMXvSWl`ZLg$9MqEq`8H@>PkT&iXi`ics)|`0RPDE zrf%q_>SANzW`EO(@3Ot44TS_sTvAqCLRM0o4<#cjDJ3g)(wCJng@U57S4&O#vX|Lh z8da5udil;m!umKH!VY$_j@tUp}NKXv?bZ)u^Y27u1rW zp4#rb8hiGDnwN_x$KBmQQ~xe)1JAj^lkeV1zAFtFHK=_4d_Au~_T!aWCtcmu#xNcq zI|zU90TpWddtsBOfBx5j6qE`ze=wf^42uT%c|c;HT_gFYN+`v7IQeJ$fd@1Q@-J~v zN?DM9@~dKzIPyh54>@-Ndv{{JEW@7M%0rplynS1itnr*yzcSirb70oGN&@?K+b zutJ}=GXagiJ>P32-4@t6IL+=YI$en}k`@rMqC9U%vFCgQ(H~u}vdPhNe|mF&XYXoz zN0KTF8wGOK#Jcd-5i(jn4F?Hcn`uMurhZoX+!sCd!lEBq(k=3VwrSqnWa)oUz0fp}?YrOC*)dt7IEA26v3&yt;$;?*&9ph+nPO z$sVa5ca&*qiOa$26_%O&63kfOXN4GM0#c{h<2j%|GXH!m;Vj2!^D&w zVX7G6`2zD?Uww@-o1NbgC&<(-7L}bU0)9uZC)J)f`|CIK`8+G@BHd_u3@|lL@d@#b zahLjxAp>-T3T*7bcdKsMj|h?9ZW47uHwMMbks84A8d&PHH5 zj?F004@g?vKc!j65jVVQWVWie!&PL3A&w-7#e=-`^VbZQsIpfGbvVJoeJM#%T)4z- zALnzxZ>dC?e9@WD@FIvDC2aPAUv-?EuJQU(dwS)vqIB9^FaGqN%e8C+s)a$?;!q|f zi*7Kj>_?d@z3$bfK$$Lo+D4*>_#C4Ik)2~4Pas@Hu|#aGl6k>C*ep%EbxLeJrZJ{n zKhFEtP0#|@&b5AC!PEq#L36pS1m~7+ngRg`zNFldlqpSOtz` z?OVc$4XKzv~m8|q&<2WY9z8}0|c8fx80+LyTV(({WhffZx}<@Ve_lH(C`?9!%k z#p6k$*9nyh)pYB|%hI+6(hseOBQU5(q_92|ij1#)xvwgOmx>~#h<4AO9byh1ZjUqw z(o3&)14+>BGnc8|svrB6kEAYwamV?*KskBAu5=*ndYH= zFzsuf5~~NSHGUkoYdj8;1j?EPIUHREg$ZrgXu-Y;x)R$zidQ?D*4dn==70EleGiq< zyY0PYaN8QTn#M>B;Z?|`Rau|6|I15K7+G^F|Z zLQ%roNqZjOktPA?LrMl;N2w~{`f*hA#&ozoE5cmpx9f2F4RzoBR`x{FMvW5li>G$L{NW!T z82E#~#U`EDu$h>KXZ(;hes>X5)2mTI*OQAU-DnF7Ise*_vuIWp3Vm#5iy@NQ_Afh_ zZx4{V6zzZdHV~H1tDmqiW9 z!gV7yA71#HKvH@h^B{)<80HP%0yV&S9_$Weh&5S$qHjYk_~?8*GLI6JLB#dOeH#S< z2J}7`m00Ye{LIC6eOXj1GV>6@c%CZmX_0JQEBfoJB5Nq~<@1d<2&95H$4d&%bic*yJ#!-M)3vVJ4I7wI_% zOwx7j0378#V%T-(5wQG+t!$cHEK-CRo{CZqP~5&wAHMwRu61`^0wIE#MRm>XswOqR z>F^!FH$MKf6P>!HCr?;+&_wA6+T&lCTGoxfc?%<(9Cf;Ns1fTwM81FgOmhx;$rji2 z>u7iqN*UMB1LvD$Kdul|@e=yDr-LN?s^3H`81I2FmwdSeu`v_#jy4j$v*80NskPvI zR_~N2V25h$!FDhmuLy)(8huLxt>7)0AZ&_bO6Jmp>wi49S~=JO$~_8+)NV(52FOTkj6Q&u2)&e5X;D1 z+GSkmdTjBE5la)H4(I9aYz*#8hKq5$(Z{>P9`^9VFHT&4xzdzH-R{9F@Dbm zBPv`X&eX+rcNNXm{@i<9Z!~LYVBT#Yv%&={13NMdlNi_uexk!oxim-${w|RUc+1BZI#~i z0UY-^s0T~WH58`ax#c>Bs2DhlF^I(X7C`m0XoQtP&ecAj1g_0XUm}tC>I`x8nz)3w zch&HSxdBLD8f@Ma#&s_8921S^04LDaa{+TFTn%eE47PT=^!1sgk8=kWgA`DpId}** z%LIa(zMr|B(d`lS^jy|Y6v6=tas74hTS{}0L6F;sYA)pN(A^hSsr*Z!5xJnTI`^- zVNj$*m7y0shRZjzD=~{Z*}{x$+qFEg+UZ}a zcd5z3{I_EVQtpZSZf6O73jA?OWNd2l)UiX6OcMr_&^6ST_R_%R znRS_+${V+niddFy;s7^)ppMi&fbgJzO=r4MY@e`U`(eP}v1^%eWQLmGe~C#j`GXnK zAi+Dsh^n(szkMWz?m6khn^Ytmnt+)F3D}%303yF;^`C)t zFS+P+b2!6l-?8s66j_poxmhkD>+J-B`w3xrHjS^|y-i%`>Mf&&izTD4%zJgD6$<49 zAR6FL_u{o0$ygH*faWxCOnpdNezh{{XB9aiZPBOnaTik0s1=Zd2$JNFf9a0qRpqVi zVIA7vnJCY-$&=0POc1T{Z}L(Wdl=A-*h@P@=piEZ^>a%Oc+uno#LaX4z4;NSB#*bj zSBM=ag%V>Mz8#Jei``fCX*gvxb4xcnpFk2?&-W|j=4WkZvJ+MJfowLkI!a+s=0kj@ zLF&mG6RcI}ci1CeE-$(ZRzn|i6tO-)NVA686ZefQVCsXXIoKY1mqyhl`$-o&Y^0<|C(|u$6L=xNWMhmFVRg@|;CZ2i=b2Ut|xd)At|muBME7 zh#{gWMri0Ltd?1=hpKzjZpnyJB34(esSk6BTT4{ETCs|~>mH0_cAc6*eLJ0e@xc|M zR|j;hP%}=>eDXz~yJ`0&(Y1#DVkt}_f9+w|tfGMk6k5UQMpDY-dVZ2Q#l9~V5gL!SFs0Ju&v_D07-l`A&CUw7FuJSdu!7o41 z?EssNsH8VVDl9J&&^+rOFS!x0S?2C)&ZvjhKd+6tKz=i(aDcQg4Oz8p>~WXim`BX9gp08^u{iHy&EDQ{k4@){-jW$)e~>*QjHfh)}o z*nCJ@ZqawQN~B8Z+<4j^ZT}P~R)4W%Cnejz-S-RVuA~`Xv)MCC#Q0I{Ot%&E^IVHH z74$S2iBK0e@3C!qe_J`0Wv^~9_RIq(ezve6_J+m`LwqAaz-)NbvLdz3%GJpMgBn9> z%doLCa$vaj-}c<-cs}ehiZoVk_Y$Z#k=y70MGhQ}sUz8JQ+=Wo_N>=`rGK4%DzM<^ z>1;jepj*}~KL{^!e;^sHzVYVz{joA~%#2*&<7dS3%PN{X(VLW!^j~z|-~HgQpMRpI z5`U`2yXNW;J-oB;I-0k6Jmc0Ke#!W$GEqTC; zTR*!uw9J@U%K;k85R8K^kJLFj&(|H$5)IFXwBBIN4l4dGl&$J~$6u|2zx9_%Gt>s< zEQxHYnj-~^`zn!*w}x5@KZ0%oAwEKj=>2|zG#p-gC_)2=lc-nqInvc<%inRAf_&Z) z!Hx0>`W{WZeqUjyDgBQ?Gvr;Z|h!@=K>*+LWY3HCxpO|!*Oi6I+tVRO4!!FRoR{4=i+S?o^& zw1<);2KVwPH`B_I+q--yOl(*T9F;67-UUtvN`yvU4fAvvKfKr%-(kEvscfqf`dW!# zeQ{#9xq9PR_9r*U1gx{K32#O>vCMVICcV(TgdwoJ&)4~DTUqq6huVAGq|JgjLJ$Mh zr2^tc5?)ySm_q&Vt>_(dO?~iyi}brc-iPL)VV(8C+OsDM|Z)ltniCnwqR@xW+8k0IdovYWpaO zLuO%3<@redb*j=fkpS7wL~SVIjj>|ovS`R^)^tk_@4HivO#oH^-x;BTdKm7t>hCfU zvDSHWy=w4ikI7En_{ex1aHx2OCCf`5^seMSga^Asa(jXXjy}?yufvVSSYW3UJOO1M zMd)h&vIad=dFzHf@vPU-UKcn*16?cjs|FEatEzde(fl3A^qg}qwd9d3)aT*TVIK)y zq0GiFSyTC?EtgLP-Ml7DofDQyAS+{ma~|iVojb=r;A4p6H=XtTPAu2F>A@x}R^*h> z$nr?6_YGl)G45mzm`=rAZN(8FWGmft(|}zH!)DiruCJlBzfP?&t7C21T$h&5m+jg7 z{#Bo{YrPkJUB=B}?2-|iR)FKWW;WDW&xC&nuME|19D4i``Nb<7;wwp?B+Gn?zMn4B z^$6SKNj>M#(E`!qv05!On&4>e*}!k!aB=SiE2~eI)%yl|(NdP#>?F(Yrv<&gn3Z~GWJ-NCWO4j z!SaGD&nKMkUc#TAGy@)dPL?<-_PdF;jK6d`A3Ro>OUGGs8QeH+Hu&2Sc(IL1F~=?D zH1!JBp7j#e;9%yaRnGg8mc+UR{c|hP{l&J_8ZRnIO*=4dVMd^Nl;s_&8=88-*a!d zMr>JSv|cXtKu~$Ch zCi*F`YX#s1%#}pD^gS+BEx!GYyLExNeL#H>+iS07m$%dBl=8`_(}LxVs|iY3Sad$& zrxCb>rf&-GICrlleCMdKGLqr+k1d1(_h*${GuQnS<%~VM7(M#_(1EiVjqU2cf!98y z;DLq2Q_TWH&oOdu_zbUoZ(SVvpdJT706Dq+0l{3voHJ9>-BP}9=YP9<_dMN9G_WHlkax_1S2=o#!FvckVvghQq%XRcN5m* z1_SgIw>{he^g-v5O+zYpe*|S&L8Wse>s9!Upt15G?(hWrMAAaUH_ttzI7Vs@dP?h7t_!r9BrGr!YT z>Sz9q4U!VnxB;7Ua{&wSrE=40&YByP14ejT3CWc?O>^E5zLKLA*S~Mt1zwy$ju*lY zDhcsBQkE03^6cdtG4@+^KJq@r!{R?qYh=Xo#lA^0gFpIhpylzFV$raW6=<9}AFPO# zvRa!|(N6D?{pvYaiPc6&8)q4mx~6FthOo*3>&14taRGkMlCuK+12}OZmF0YuwqF2s{>b4_L?l z*dP^uDim^Q;aL;bpI$bM)FMNUk8;jE*U@t&-*SO#Xr~{Evu!3Z?&DA(DR1fWcLc3p z0$`w6DVKc#jmfj2(fF@j7Zw-t=v9mLe}gt+mriK!VW86PtgvkQ^oEIK%H3Xr(A30<@$ z5vcuBH~4#m9w1!%2H*iNp2L%V2KCV;k!%ZiaXo*$oTZdy)5I3~O>42tzG=n1h^vJp z5AO^fGZqh96}S@qC&2~83c^Ib3wR}oRi_8QWN*6Mp#PcR7@#RAiRNR3w@}iAS1G%wR_fT~6@c3zUDJSA_oogUk zG}3l8HaT(q2mnIN!2(UBXLDeEuz*(Q$DKGWgWa#>DqHmVlgbK0geRQzIBl`mtotvB zhi#+P=#y$#N&sD&#G6v2B|bk1BQp<9X^d7}{60{+sM3Q4H5|BsV?`0C;`8}xT~1z< zTL|DT|4waUS{E`N|8bBu&miM(WP3_fVj*;0x>V2#`I4vyrTITy8VGZ^OOBkCYh_*n zJ>@9Nndg?0Bu_`XW*^o0fR5l?J7& zVZ<|y772hFuy4dF!)N}Lmf9~1fW&{onJjGxBVHVqm0;`t=lH!!SXB%GAW;WyM6oOj zD^?>k5RYBOdVKMua@D!b$%pb=M?CAVF#BPM3`FT-~mTTA?e4$`Vc=^}da!x|VHzlguPafirA8zrYTmfY^ z)9`L#Zu)`R=Z1xff8k_8B74q)IKOxKWu2ki2P=M+twfNqTiW48y*L_ofRxsRHhxno z#2W8ENJNk_{l~oyOk06e5sW=GvCQVSAO;q81VZAaJ+)Oe z=K}}#jKcxd03*hbv1+MJd6-sRieDKZ3b@ctUVuZp=HWv;%O57T@TC32`4r?_G*o=_ zlCHd*F$WiO9zugZ=65}p;kCDg7kxTS2Su`|M?ri;eEo4>D|GEQ+(!HksvaUazUq5N5qeLHX~n$@9_4B+U?Hl-5f%mxe19KT-c@* z^>F`p{InhFaYA91S$&S6FcJ(g@S?@xn~LPxgRtK#!aZ!gnsJ3l-i655cyd$9=GSoZ z)puCWyY6{c(_%8|JFGR2-)4%F51$J+mCs{O{8t<~nFH!BMpjag_0Q|rWS2!AME}e! z&R}j$ubZ}{TBi{wXDJb_Zbigzvn3Co-Y~AnN^3WeUZ!h^emhcezUKHl#&$6|^W^*_ z#3@Qc&G5e;aPvk#7i@NvEV*gVKQ*V~-dHUsKOl-AjbRm10=3>z73q>7XSuf9(R=1q zbkerK<<7n^d?0(VGj!_Q&sIP>T=)Z(YDmv|k1qZ1%|0*OrH=k(k+4QAcN|$*Sd+4rV4gvIQbmcW+jnpG(-v?cwo&D(a;X8EYh~(%iSMxspEA?0TJ(h~hO#Z&} z7MOS3-8)>w+LCCk;m1Wj+v*1Kxa@v_k9d_e+Jo@oCoe1|iQVnZ8L5aJgt2%EnmZ%< zdHP)B9L3bR&UK(i(zV-In??XCqpEJZ{Mzk}fLxi?`{pOE|t9 zviQ}g$IhPp;)a}v79aNT?#7lg1F~Y@$sxXRHcK4iVl8n2;IG1=WwDyd{^t7`2K4&# zD-%qeeHYQZ4dV&m-UHYFd%7iYgcj-9WlHJuSc)^5^!; zoBYYat1M(*m^92dc;~lYE&Z93gDcOyVH4VwVW!Upfq|D{X~S zK3~kXom{nJ02#@BA(mivH=mmMh1Yv`=V>jWWpT%c?zdG?9(kbNV~x#JvvnSVSU6d7 z?m=nX&lh+Axgke3d9tLXguk*Ckz$8>;2wH6G2aeWePa=lJy*PoT$j6WEw(dY=X-$2 zOX&AaH)wH`rYU=3x|;xyc8u1AfQ+mF=Y>koBl08TPjU?@+C2D zmS7-6(9%q2uBOzO4f$D&l3P8^ zP`6-ayeD3VWHqQU^CK8&Z5%~gc#jZBd?gRq0r1^l;`*TU{x9353WD`3=XTW>iH+eM zg-Ty(yyW=1fV6)ut*-6MYsQoIl<9dB9kA%|Nfk4>1Ljwe83CuFx zNSXyv^cGoP@=#s#{vt91D2~$$c_RlRTTj9jWfl!Im3PJic=36_Rb3Dj3_aWfkv|BZ z>qn?Qn&Jl~w{{3o1{#|OVXnzc#{&q_rt)83RP`_JiG_Pcv$6qYFaebEx^eO_u$FBg zx%+K>%KSAle9QMzGxafn`m9Y_T+;SnfjH(~U6eMi-=QMQlN2*}F7rv(VMQmR-;Pkp zf+eajVEv)4L-)l_ z^TOSjaY>!iAK)mRQRRvg7Yj9JrO^^wJ2rbB@Hn#urJvIExFOIC+j%S|YIc9~Z}7fx zlY}nokTTsxqn2ImX-d;_{HX^OG=L&%jR{#j4lE4g4JFUjuQU_I$}n3k18`rZ1Cn& zpp9A}d$0uZ#$!J|g13GjVok!p0hW|^gU~T!@H{$6e!ZN(qQm5BKHu#hGY<{7<$KQ7 znjSiC_dn1H6ohFb*%>JT-`U)G@aK3SX)uFUQ2tSPEWB6@1emZMCqmlN)w8)k*@vfh zhsRqOyAdbNW&(yqJxx9@j$ZDLXZ+P_ziT;9Zsd1{$$J=bv;)4Yv|fVmHGzsrBe?`L zv>?!JV?d*bT7j8RYFe3zk7T>|3x3;>LP?n32El zX-)t#2AxhWpiT#-FN@Tf7GgDjCOMQ8#@i%>0#w{=>3hnubQ%r@27<@HbHisX1(PGQ z+M-nUD@=F)(hN;I`5gB_*E9`85HR`yd-T><)CA$XCL4W)r>G=dhJ@w_iF|Z=e>m!hSU$)8n@2BanHhja7&xsqhhAM@2}ML%q6b?5Qnk zLGRDqRLqnGCC6Ufs5lN#(-&wOT$c9tiCND2X*59qzMF)ART_A)zo~NxXmdFRj=)_< zzxI-(6q49~)2%eox}dVt^oF-wEZ{|~gpRbH{BOS_K^4jtUHVm<55zD%Y}#0;DV#ML z{R*rqFbznfre3P$ai{Qf()||4bl6AL25DiljC;+=wH=A<*MFjleAbLZVLuJ$=`>`O4er{)cDkurEjE=UWi(Rgp*ZSMa8H$_W4So}u79 z8wC7kz2L<=rp0MsG!Uabk3HdW!{t9$Ge9^}L6Ksqg`i0Y$aZG!q5GfrlmW827cJpA zKEUHJu3yfy*c1rh5wjQFl0FQl+<#29@~2ID7cx9B$OD_@*?ZN(oP*FclfMC?KJl#5 zU=~jfg2M|T%&rS(9cWM(UJVaetBH4xcUS}Cl+C~1^wtg|3bVeqjBt|BVUX~qNB9%r z0xuBmgy6ORxyx-^a@C;N3Phqjb`oM-Ee`uY&YcG&AOO zP5rlv&DFq6qaR8Rj9I<*0(GCrfBVEaEi#R)(Dh!5KfoZ40lRJ;x@+8YrM8w`Va&d9 z#^Q=Vs|gX=S~boIl9Eo6``Zea&@URW3SY>bIU7F#se8o=(Nm@Cs56@wwWi?lXg&cd>p)YXrMKr6UFlX*L#$8c~F zV}|=JFlnh@qq!aN7E7~?DV66% zw!2Cij4r)hoorYqPykKD_t={sBF10odq*V_a7uay<`Cl zq)s*vRdTkA5WJ}Hh2{MZj6Y_S2>z#qt03nBPIv=V{p(fxaDdbU16t^F39T0=_)Pl# z{T5)yB6zZ){8TrIRE_$s$dD7w6}x~9gylV`cv6~aauXt?T9^qre!Nx$7Fv5jNPS0 zN?-1K;qrFpf{A^)Ex&0%TU)RB0O&8KZrEFAsQRSdJ!fU#6yz=bTk)D6$H0p^abaL0 zBr1{YWW(@p_~T@O{H>=FP7QPLw*HKm z6P^4YCwno`_k;DCv*dn8d;W)_${!p_VaPE3#+X#D2!g;6o-QHS8UR|xAI$-Tuu-{% zk2CkZxe%t*h>H8djG@C=(>vcT9!u2myP+H2vihg|lG<;Jj4(ny?vfkfH34gvuDr+p zi8D~fJb|O9qnW^3c8b_~%k_n=nG@}zuW2V6&Q5)iWzulqFv!dJFydOf{q$2}iOFEC z`(oaW1EPP#jnkIIwIGPx+r1UwLj#lO+%JET4>DY}P#D&PBcN<$yHe8kTWq+PerNjP zxpFXDj2M1mG7>tL-@kKpqohfOy6eS%oEb`eKBZYtW+izc(Je?ECT%@Eg_oZ<8N;gNrA<`8YVcq(P z@Kq`or-IG&nMtR1(f+n8V8;F&Huk4D#Uo%2x}a4N6$cYm#&%K|*Q@`=^YmNn2Suj} z@)u_gek{`oU}5Mj=b;SsgNVz~T>Wd!h8|}tq$n`WBq~Zd0e?AT=B&qm=R8vTwg*Vn z9jRP_phV)d10Xf`|NAZ@kX&|f{P^}EEi+BGSOA+3jGHs&_>SyEn<=UahXW()F$gx^ zR8}hDvxPb{vwA^ug$}ybSMN_!|3yy@iw^;{Hs@U~=uBw`J`?W!H+2B&rvx1RC0u-v zjZ8fb%eacI&ZCrySYczH#BhHR^8#+LB=IOtK6q!wq2;hUL*t*iASC45!bYFuYokvA zFY4oq@9<50`|l$8^imKc*KQvul!BeR{D4Au#0#Gal!xEWHQu)ZHJ;?#9+6W_ubpt_ zBZg}!RGdla(0?xlAO)K2r@zz>1iNp>&z9)4i?pXE@Jt=qGb8P!nWaa67!u2AsP~b3uEu1zP@**%FE&oMrt?sq{Mp&c+zx}yW z#X}mi3L7qS#PE;d4s^4+(pkMD7sGQG#xGDnHSV4UTl1NDHT%M>)S|9ZMf}=dI9^7Ew~?snYxB1!^UEp z!fO@C_AOQt7^0o7a0rQYzjdPdgQv6Jul^8eX7cN~5oO$9di=@&y#LLoovdr9Kj}>^ zCgLg;+&wF<*Pm_t>kQ%uPWB{MQ6vlqb1E+ngYS2A>V{=A{LA;mAV|B;nJfqkPF7EAMv=~W zb(L^XgL?#W0|p)yc^^E=txjHz=b2AVW$3rbOCSO)zTTlgtU;}p1GF}bUMW_w{o&4s zH}16P1ChVwEa=*U@Z9mN@BhV}CBJrKPf`I+!7X~`+3i!?BlsMsY<+tf!?k7lH`AVn ztGyCyOyp3O%dB%<{crq19IMp++ILC2KLkGff@~G+eJ`Xm|J_di!hfJCc?O8kGGukb z>t)=%Mb+$&wvV5Xyo)kR2Ym|@Uz|5@r|p$|+j1h>jSZKiT_t+}yv^imU%qLUKDMu> zqb=&c^arl${;hvZwL#T01(Jao_~>Mdx(cdvEBEz;oaK zzZj2!3MjMF?S-usVUQaxq9~T!+VxFd{@nEPIEk{Q56^NY>JAK7x?z1mG+hvp`VRv%<$WfU~q4+ z2eFR!wKufae`_oeW{Y$G#x}#={s@@Wq^=<@>6zRWi#@*VGWoSot5&kit?@alFuy4! zVr@8&oPiZ_v;CI)e^;pc^#Wj_eze+>gUnSVXl9H{SpPig7ZV9(IuB32tP=!rRqEii z(3eB`hD~e~ybqBsN@%SfkGw(<1zbFI&uo4tl1Iyb6G0bJ`9&8h@)rlNsdKG9$!jEr z0owAvI$!k(oGc(htkFoI3LmV7b$n!iGew$f`2?BS)93LV;=SW`1lNDb#F=k4$hmhX ztCY(TKacD!aQY=_ieoHmfS|Ee`g7+!xrX*ep+m?Yl-UupoXG*n#SK=CvX_Li4Z5^- zr{4+V4&-us?er0<3zKW^0m3*V|!iemmuM8zUU;T5)HA z5dOkv?MqASn^)x}Um?=r)&56%PEOsC`PVBgFV_0)KPF}fno9=`Yl-Q?)Ea~QzhoLf zuDbAG3yBv?USdq|wbsUO%*M;3rDU?0t2qm0ZmvOBe4@KA1wAx?=sNpMI^lMb)O&1{SUIkJc$}CAa;)V zQG;*y&PjO;JCnw*;M2y=vQFH0|0LX+9}5QfrUrS5S4N$KI_r^Q+dr;WWYPZTL6BUq zsD%fc#HeJ1PS@&O>Hh_58lcKc(A;N&BHtawaf5FF5b?Ho=|?7eWNf*=KbznQ6V#X` z6c~!3EO*1emfNVU@bjgw4^OEM**VsO&uF-y$U?qBday>~E=%7}+g=w)8oBr1K(!5~ z2gVB`PxBC-mS!_-ZFHcDJT)?7DkI!IH*w$bQ&furWT-G*;o1_XceOsI*-05$y0&}7 znBQwvFZYRKS%o>!DghV@Jtl32EgitTE&lYFsJhEdt^b0dNe=T6gpa+XOWPTq=K5Ex zZ6LF841(4y5nV0Sb(N~l@cz(`(LLT6;K`^Wh7%&D+9Ws9L>~QG+W(FzD1lTXON3b_xxzojBSy31&J~_2} z=d2RlQBf_^Lz7M~)j_!n!VcbH-V*iLl@J-3==HL5Fa6~nIpd)w?3LX#3NS2ala9W- zW2gF`CZ#JJ5Cf$HfRH(=USl3@IuXMTD)7*@UWp0k=RBynNY~?1j`2Eq-&xD#8_zuS z2XPb{PNfkF=-MkkZwIh`X#4=M-l@tbdwqW9gwOo7l(0Onup$r`$tLSY*+MqL|0N?h z0wnjl72s4oY%xKQEz3IjQ{a8D+Q>eWYAFvguuXJjS0*0SP%YEL#dFUdL|H!Jm+MZD zzqkem4AR7}%y4f_Eq=v2+Y}&G>|PicdmU~sJhCfnocTKgC25F$4{`iSuUONwgwkkn zvR3X?BI>q*fJHif8bU8PM@;|@>X$F*DwltSGb0bGFH#_s*3)9cUt3i(XA)vU=+C?>e zwC(*$7!8Z7(%k~t6Z_uqRDNl8u%`gs0Y&n=%3qJ5Cx185P-tyI-1}&)&H8^0m;(&h zL>@XEd&0-T=rTsulvWF5ctDUBGEPEfpCsr=%v@y$x`B|7^8k|ukh!M#u*|-4Ytp+} z%SRhdX^4s{8s+V6OLuGt_9%h}MzH`(n4Vx7du2c%{HBlZ{tsi<9nbam{gaTLWMqpp z?2)pSSs9f=*`p*Y>n&SJ_DVt}6{WIe6Ov67;%$F2l3j1v>vvvnvr^yR{~liNd+)ht zJkRqy?+l(457HmwX;UaE?FkSqz-{J%hQ zy15+HyF9r~OB2EWI&855#4O(KzzG|`|NU~A-h{1W+YO;3Xn}F?0&-piQ3|1ALE2n2 zT@Lrk4-6M0+ZaFKU-RWn1@GO~MKc09)L)Xdq9gI+1D#j#d%?)ic=ngg2p8`7AB9>M#E^!lMX` zEE>qc3}j^gCiFJ&mT4+qZXd3bw32vlXe}|=WMdurqqlT_1#eqB)i9pCQkMsd;PkS9 zb~Xfe0&txVu-po9V@$*B=RZU4r7OjUm!2SOP)Y&jNGDeMBXB4DM+^g0IdhMQG~eW< zZV6LyrJ>n#nPhfP0NT=0`7IQNccRU2mPzFu>6Asz$vjubV7HwO*=?NptJwAUhg6-; zXMVgXNGVOwEMOau>$svaK5U%!j8vRPaHFk048%yI4wc6%xK)Ln){e&mk1T)8GK-)!hR9AGu(A+wp%+?K1wY3mVA*uMiP*bA5w;^|f@%Z%f4QfS> z@rovTo>dHjO67@NFWdnZC$tq+fCR3g_#OhufX={qAK~&7ba<2r)X>KNuw+xUVuuN?Bb1^ss@Ivtcb~aAdWO*IRWCGW`0sm4Ye}JR;Viwayoy zvejS>i<-P_*s|}^<$0@!*aGFDGy)QI>k5yBRf6DT7c zv;Hx1Mr;PfUqgHqQf^T=r*k$FL*F(ecbczlDD13E{?{DxLCA3QPzX0;N){$(^9Y?k zuY2$ngI0P1`xcArn_q#!6{n&5E{<_P6QM0<$i>~qtBulJajR^X!KjH(LK_2{DaRYe zd}+ZUP1eCA_5|_i)8r#&J$c5LZ*XxA5Ng_u@0nj*re`NK-7WJ1VM$hUcXNZUC`N1IlL z{psT}sMnk~-({YDQGq6dq?BP7G~DX?DMLGs(J#;2tv8$zm^SJ<@VU1Ei*7Gfx?aQw zB~@U<#sb5s)^k6Nrnh~uA0$44)cEE>3T#tD`wwv66*KbuFG5U0j&Q{p!k0aZ2$$=X{)jkkwlVk3)D9* z*Ql==j*&(2*Bgi1to!eVwS>)w zT^#HCg5OZt#$}%Vn%KSrKk?-k99)!8I<5|36J{D`CEHkWgK)#Rpk_0$VLUhRWs2g; zRAreMo2`RLBCaxW0_uBHMTBJ$UQvN2t$$ zH!1R|TB*?k0a|Lub0v?m0;Hk`y;m%xLI8x;#{0_$8N$Uh4k6+V8gf| zbQ0_BQP=@-4KGIArzqX=i7$Mz@fuvU`-%had~)@on|B7F11qznciUcw(~cPq6~2Wt z9|*X|?A1A_zuY{iKdI zGC+&v#QAz&=SQi=sdX5>EjD*$j9TcKlmvQM9BnFn2r{h8l|B*LCm3{TNwRq5GOg#( z8hXr!44_@wco25f1KH6%n7X$|^U6NKd@@C4UB!Q_g1r^Kq>9Zr3A;2l*(W{Z>gOxQ z^84;h2GvBE;k_8PG3HeOUO~3`Wr*n*e`QC~yB!j?8+YvY1dTLO-mp6c6zLSzD&rF0 zr8vps(DDtE$5j0H;}}e>n}?*4o$$)pe4M4nHB;)BPOIpQ8#%sG*DvIexl4GF6ZjoW zt#XR(S2%CawOx=#C{bJQBm=B&2WBWzt+PkbmKLAf@v4~0mR~`u$4r;_xbo>)!gYxf zpE?(p1QxP5T73qg)BI^4FGpV=yMf>$C4;B;j2&-tzEXPNax@r7(6OHJ5B{QQg72Na z?&7~)JQ$%SuOGQ8ab_$-USOTsWvGLcrMuSq6HRq5~|Ix0WR>scy%n`s@ z9x~IQo%HPd^URSCfub9U>eH@Si3Wv^o~yvA;xhg*8*gZGbCPSTV|bY!9Vp3LstKY7F?A-VA{?yR|F{#|Hua3FGfC0+_ zqgOSZs*|KpCzKrZ=S75E1>vH-3TqD`yYA0cb6k{my&_cpfG*k<478j~sY5?bz634vMCb2Yo#o`3u!@*uw-+R*1{^t^GzB=nd>pqTYF zCpyXWHJL*=M3dkF>?jS*8WGprc-PcPEN2l{((|W!wx$%HVT)1BLxZ%r%iW%48XjMH zXErzX==cKL+Adf>fl;tmxQ-rVg2OKsK|ZL6Wm* zu>2<3PtKw*FQCJ@`(&ZhIA0D5@8xL8)#lB8T8L>vO^E#lG~KKvoJw$U+#|B%(85Ph ztWG6k`qk-HvW$dbiCqMbwoOcaJx-r0qF?HEQ;DfL=7Ty(vJTEVV)3~};S??KN`&aH zwcLie!8y4x5{5Bqh2Yj$>Ke~B=IhUi3_U&VzaQMfMIi*-|E@-+ECSzSY@sP{Xv_&m zeuSVhOTl#vWyWwMi&Ofy`kpkhTpG6OBg`I0-fJ|!+v4)qUq70eZw=N?Nm?xycE+|vR6XTO z`P=_=FG5W`0)XldQq9tRg>szT5yq>s)i{KYX%Yng&BDm;;D`yqRMDMbIRsR{fe1%d z$e7I4H8zLqRW&1dtE&MsyW@ayXa)-J>Kcr;9$IK` zf&lavw8@Or!6D|jhhKREe!JW9?H8;CAfdZk?FFmk!&LG+HyJwe4D=^A$(ggHkqK>S zvdzg8ym3cMJferN!+#+#LrgQs-9O%6W$!+?!` zwjJ?>(q_-tiE{(Sbg;*&vZzE(dkXq(iMX6MrN|fHHdHkj)S&B&5nrB@|6G1x4=Glms z-Oaa>AM|K{t##;R%rwe;kHg8vJ@O0lh)fA}p=DNlYs~YKEG^bVBJVHzYb%8vfyDKP zVV``quzclcW&=P#t4!*W9gmR`$<cILAl~-4GHY&b^uJBW&(e%Gbr`$KX}0+s&VI1m)Rqd~LSp&EImS5G)P~_DVNazo zpK#D}XruaVW8a{Z`Cwy9twQ^BZp7Y!=7*TU51it*!8M+IqRzl_2q<;VXJMH=9N*q2 z--}f*ey386p5>dR5DEOtM`5y6uFj=(ew0xp-DT)X0Q>h0-ILa>2u zROuQD1l!EuMTXUhV)zDvn>A3?bj-e*q=tq$k-wF_nGLuS^l)sAy4AfOm@o%dRHuY? znxuZI@vTda#2yO=UIwJ;Tzh!?sy6e~Wqko8I49C@3(BVhDgJG(6I%JA~F2ACYXe=dgb z76(^tT(m$o3)O%jodB|%#6cxj9MkBA&mP{`PAOJk4io^5g!X~AaaVTd#+L|1^)JRD z!&^d>ncLYo7QbINb6qtHV8Hu6u;W03_Q`qZ+0_1c2kVJ?>%tEFXmQbGOQNK|N7`s! zAle^D1O&|Y+GucmfY(yQXOw2j-W@ObgAN%1W`3s8#iM?LZ`i{89CDwu2hq!Z)XL=0b3 zcN*>P3K~(;s2+T+nsMz%-pcgDwT7oSY!`sE|HT#hpr4DX>F|kZD*Ye4r#WI)vCex& zMeDIxkiZb!okU<6iDbyQk!rfUIF;n#{Z=v$x}cHX>hdGc9io4{9O&a5GPYvpPw<+P zO}LWeylRa?`g^Gk&_V{$4f@H)^q557DDb-NPVX_hmY4ST&^F;-#R!DeRM<+Yk7Q9h zZ)jz6C~SOm)+qgO0~Md4YW=ArX$@w}Q&z?T5;d1C1D{@N&ZAl7ati6wSy<431hL?u z_)o_jCG7y58Cb?l67w`sX$C9)C0$zBX{tt>>W-cM3I7;$8nl^G#()`wxG@-uQ5uY_ zOu3PA8{3(|1%hMGVKqZ-nxqGrV-TjXqY!|IX+dOt3>|yIfd-#*isG()5jDsUcJuy+mBq^HOV`46rataSk(99oLqq;I?9HKCv*$G-Bz@wNwm- zacO$Po5gaER@c4p3k&>sTbTz#f}RH}ijr{p(HQc!J6!zlX`&0g>1kLub{6RK#~{u$ zO_w^=jUE5yWzD!C1|%`f>}O2sE+4x4T58%^s%#zP676|6yg*w+vfo5Ntqi4bt_#w5 zGMUAk0W7(Sx4$JsVEP=z-`C&5YJrCr-F$AIbRjRjt>93=HQE&X>&WV0YAXC)G&wrkb8XO6(4#cvCi{@W z&qn<<%q@=ZbKct^(Mt66O!lVh{JFwW7=}x|OnV1yM{0kbzkc}U3!qC)jM>H2#U(Zu z{jJh;VSzt}!xgxWH?)JPUCzWrPfE z^ovR3yBWCfH^@1-j-9Q^HrhmeSA%A#B>jPT|ILDT< zZ9_)=QTKwQGRM-6#lmPlc+Jlhno5w0ap2DGoj+-5{mq5W^tpLe+eKn)S39ST$#wd5 zuusxAgB&4gb^sW}o*^^lQB@kpxSBA5Et@Wsxv=RH1>6WEYnLV$laUMZj^OeNs_gCr{CJN(hK}TrS`XatJq<{ zjpK_Dlc}Zb-F!M3XxD^R22~R^7n%S4!~F0*L9H&-n(?uW7?vB>+s|!m^MfKjCxiTb zuGI2emsQW|my(qQ1tGl)33@YmtU2uuDkGeXlD%5eR<8h6*eyyk;YvcqgopoHDKMSN zQqsg>f-4YJ2?Qj&&Hlm^%DkOn1Vd)a^$mXcoeL_)@T5beCVikgE_Q=Ct+`ZQ*2kTo zY_?qTiz6>4<#YaN7^P%GW9!XTx*s)XxgmJ4hO?Tr%&K;A@RNMm~-=PcHbEFY;I=?1BN}QTfMs`BHjJL;!>H_rLlI32+2@F#pGf z4#i4q;x&{3u3Tp z^U12!9vL7c>I4PM@*}RZHrxQI-$=!sI*=klWVArPw&XP37-UwyS;bQRZtkr+_$26t zZz1sp)`zm?pMJEa6mvbgp_(DQ2Eh$tAvh&BE(*vh=`(uwaZ&4~Ar*&u3<)xQ3|&S5 zqL{893qa#wzuf6dQepoNS`w1wML1Yr5q^yNK$ExK6GF2C6}3vL_PSriNT_*k99>#; zPkwUdTaIsZA^jFE!>%t}*y=Wp*k^>E;C!gf8i!hJe0mS!Gls&RBI*=~L5F9IPQ1*o zcWWwyuP4q7J?vjh(_&pjCVqZcNv~a`thw_(yWzC0IU5c@G>VkCl2#z|eV4|$gLWOI zD&2utMdy`Cs8wXaLKLI@u?uGXc&``~>jt4*2>ok-KKJ{cUz*P4qmNa+L(yK7^pXGs z64~0f5AwDW8My*34>?w8+OemSaU{x`^T#Y9%Sv`})U4#Z>!)WhyGPXWZ>P<#k724@ z#=aYYk`wD&^el6r16FYA=L0e;-PRRY>Ht~qPnnp)`4M~F=m;}_@12Yv8c4a@nt^!2 z`nOM}LHklO(pvnorGjWHH<@><5%u_OrLTCzYBMz)TVLwNP}5Voq`1QU2>v-5gnHyv zc6lW>Wz895r8}_Zj<6;#yUIRJ5~q|mH#yXV7l3Al48%?=Yu~n&gO4_myY^a@Nh=K( z%#H_1KrY<{6?7OcyES%0gXmvpPh$;peN`>~fQ9OMqaOK|_0+@xdFt1r2aO($Z)}D^ z@nerKnK&a^ke>YnZ%Ebqxi_suFY(3u5rL6YdmzzRL%7&%NsP?>DY`}8Pdh}k&En;~SO$wPc|ISanUKy#0K z^tE_>347ClL#Pu^3C+l39z;F9t0zI~1=}yh*s7)T>edMprLA4f3$~&l!0kpjvFswZ ztKJLe?&8;0tg^1+r$YNf3qfDk7s++eEumE{(X9)&uvun=)8p`yFIDBt%j&R+ZleXd zl97DTtQZG4`R<&va#wyNB#IEZSN+xI-v@vwVBZlLST~upSYN@RAlyGq{-TfIB*pBP z8sO^JucZ0VT*-M-LoQMh+4gzihtF}`=D-JCW z>~ClPvGY;Iqx!`!uv1^tPZ%roLpPQl(WIb$91!@Ci^-bgKBTZK*ZX5L zlV7|Hm|BY(b12PgJ;&*R7RT3|&F_iwyIkEVEQY`56r=|Li(NTk4*?CPx|eLr=J3)6#5){VeOia6JjL*duif2yKhU^ep$#@`*SY8=`we&d(%#wy~}{v&Puj zh-;3@pW%rdDLaH-7$hS`R=f4i11^mdd;*cVYq|3oa>GYQW9**q`eoTZNiSgvm)`0Q ziiV`}wAbZJeq>&CnwtqUYpJN6<#E8!D6xCZo)KFy;B50t7+oE&1%Zs8%H4}z_9YXO zljR`xZb3vPCi;kHMbBUs0XQ(j^vg#yrHPiH-F(<^TC$eAt>DRG^vf-EQxs)98N@D?^ONjD2xTx+&_&8H83;*^D z@ZlHO*gYoq3}&r*UmSFTU@Mf|Li8w$1+*Rz+;C#Q>%3it%nQ1M&$jYtP)YgLp&W%r zu0f4Mu7+e1ylD<{d55+5Z}(Do;wL^Vo#1*ZDN(L|-UrO=fV=!$x|aEU@M<+K`p$W~ z!O%7{h}N>F7ZWsbfxr+MKu`k^Ij(=oXfyE4=MoONma70F$OgQaO|7Ns_WqW;VCVKr z@0$+5MHiTfc*@v)e%Qz&>?k+r4y|Ks~T zq5`o?{nL-$)Kw>=r8o;P)O)@A_V*N3tJfO*`Wxc!p#7==#QM=I2mm4G+5^NEf4mQ6 zyiY~Mn7CDAb+Gb{9%fgeII%j6gr!&3$%vtB%<{Ip`B=UR0nJa+P*-FWLF6JNx69I5 zcn!>NsG5ZdF98)|<3PakmIn}osMz@j+8%7UR7R%07*E5J7J=6oYS9t-lV$Zf zQCWe>>AtU~Cyg*|YIul_AF2{B^{;m#K(rc9hv~J{z+>LzUN?O;T+V`?`+98cbSJwE zE(QMf6Erh*ZgZFi%zTC3*7QVwIV8M4PJeu7eEq|#l`dLj!z<6UjVKWGhBmbwD}Hmh zGFe(o*!o}FaKPz{R?dI@Gt*qOX>G|kupP_<{5KpfbLM>-GWz96PUBL0bC|mv6RxMn zg~?aDR3ps3ms|aSfp$fVz}SC`c)Z`z(~}Zi?T0M&q#RI0NWrQV#32?<4>A?{ayR_l-dH)ExmJHODJ^R z9@-;f&M>)hq>Z%*#rZcMNf@gFe=EbGyL4MC5z_vYea=T3aId`$wAhWLAxIXWreXe5 zoE>7Z*WTxi-zdQ%m+KU#JezkwXM??<~P%IsAtu?4{Pk#T#?#K-5`=CVN?bR{8p#d#l}i}XS2rvb~j#!kan zhMm;yn@AtlQG=^5xqXe)y%oX16`Lj{=iEx<)+M339=*Z;)`=_SZd z!flMLuX5~SSBPzla4)nRHO7{@MyKM*$~S@oaVY3#`DG3moj8@%e7^<@=Lxn z<(4oB7flDVGt9Rs#Q5|82~7)T6YE&`b>k5&8~KMR^-8K$x1$63o#Em7kAp`czf6p- z#n$;sgH4;x-7a!1G7N3%O{-4TBL5YLlkD9ykwschaV1 z57cCCV?*r}Xl$3<*#5*$4~g@iXrZyr(Z7dr&w+kNwqg%%uOJ&^-4Xr8(<_I`9nfRH^h|J#ApTKy8_96NUC5TS8*-3h55Rhn2 zrj)~wFD)-TAViz}f_STRc)u=fzHixHdpbV-bme4Hke?gvS8posQnaDT*|8RrhWwu6 zBoKi4_lLn1d`E2GS<95KctxLA@}Ak~u~jQjAT8%W%^(^q!qN5nMhS7LA6dd!%Gb-F z=-i)Bxo;~^bh>~KMd>d%BxDRDKm#XKJt@LOimn-WMO%j2>iy)YQSaLn5tv9d<=*d9 zMqk}mbZJlm!Yg_DAjOC4tpDJ#%!6GpH{k)6;$|K(qB|{6*1Mgf$>9KkOKvNhz=(p)dG_Fx& zcz%?imAUF(3bMmsgMgwMpJ6-p2XuOxJ7)|NSSsU{7k%KXdjkbZsL=^fl%rRc3?EQt zrF@ed!hKOJXyq-fhO?e&zKoI}mXWADKpV;HxTprGsR>Iy{%8o{MgM<(*cd)+qo@bM zh$U3>1oGyD=@udIaLKpwne4sgj?|v`TsM>s)4}^L^1*sgnpBDHK)kSAz3kV=v#BV7 zt&pc6Xd!E?&T;B^p%MrG;t5NMjgA5&UgtxbDxxkuf;atWx-t-B)6KPv(Xy1`C?A_{ zC3>eF^R<3;`KKUdW>W6P3-jH>d}VAa>mvu%BwG|z-+lW#42#wO*WD{6L2HkkQj93} z3D;xkX5%wFiU^p$1*TSv2^7TF-~lVBQLeI%lifQ+LWe9{YhQb9hX{h?+S`}wo5#Ih zVcHEckl?;3Tmn=ZxQxbC#m(#wM9!<-(f(J!s$y*o|;z?VL=VX39Hna~5NdZ>}2 zf=2U#tsM;-+5Zi5l?< zH+;dekjw3jmtt|D_^dvK1DozXAMuQlGaq~3d|FJHHV{rE@U0zpBrRV>37*-1-B2Ao z{-*wuJOEuEQkBBj|I{^jt-9xSVo86dk^2i+zU&9t4P&OfMeVMuM&hbtN1P$-R$wn15_L zP@#=WO!y7^vn77Q=#<9CEdZ{c2#arsfN8J8k8jfM9G5?=O4JtE zVlzp8R>Op(TzZtC%zWy@52@E8_T0j z!)P%(8P75<2Nk~2*NelTjW(ll-+2PoUg;lAPzUd!_RR)5m#k`=;~8jOBL%$d!(4dS_^~7pl@s@3*zD&Q`CQoJtL3y!20WG`i>e6_Udv=C8~~ zEb4T{YCZayGm8STHpk>p$EziG>c?T}g;BiZ4`f2Bi>e>KAC|oq^EyEg--wN|3#&z> zJ>Z6jGt_-R>|NJ;LPGkqPL<+kmR|6Z15Y zuK;y{vg1C2g~TUo(xrZZgLkQ`oB&(zc(yD(g|G3tc#F^L#zlkH^rP_Ypx8#yYI?Qe z+)Aq7GZ}@IS6&}sSc@!;Hn_sxwah5I08K}p0;Zc3VtXb{4BQi?_A=Tt}h;>hYzSGjUHyo|#Jν(6@xf)WGB8Q{jnw zw&9yg8OJ|k6w<%2HXgcm!zf{n{03RW;5loKbL!(4)wXas4 zVmol}Q;Qw{c$+jL1(b+7@9~lcwDwY4c$kxGV7`mqX;a1T+Pks&JjkOf$(6|FlS!k* z+s=+@KyvZdwF?^H*QQ;6NBkX8Z|r|{(Me%U$o&(y`bVYw?O3=E$?nZFo)FUW1d4}{ zO9t$5J*GW+0Czkflx!S3Mv%2+qz@D5}I`rCtn!*U8(fo{p2N*Kjvz&vf_IyS+rl6X|1qanJd^Kk%d`b zVebM;%xPHXGRf37cv-NTwfBM2&=9RkzRlWZ8)N6@NrPV@RIefZkCnr|eig05wAZBe z-Y^NUyMfiwvu1P*ox6{;ZZrVP9-seG$TM}~59^+^R$39W*xt_OiX)%6P+&|BItbq8 zFtoQ}c&6aDHKuG+UQ;CS{*VuvP|ZdPL5-pq9g#p>5^&ic~g56HA3Q z1Wv^|7I=~SB-3rzwZj$scsxg@C2NJXEg5tYk|q!*tWr^o$)CQJX_h+$U-xyb7Q5)) z(|m)ZVAC%^-pe8NUPhwm#X@mK$-4t&DMl|BjsJ`0U*GLMvz`wCutg&Gs;WSaV9Gv? zX6?)CS1LK!Xg8#+&=3^=d9BoKu8X)u#q@Yczuufft{J>rWd(D)D_=fkW(J8fy({>X z_r=|mBF-KA9BEN%8ryX%&dgU8iy5sZ4uQiRpue6t=l)p)dBM9~%5m3}??&KU^wX}9)V9CWT75qpU1WmtZqoUus{G0C|b!sZXv@b8xRQ4ITMj5`?O_%!g z5yU5H=z(zw{20KqwC3w`c&FRvK$5B2Di*rgf|qV*@RLOLK?TYkh(5$Mc7OB6&K^Iu zLWo~Cq{#M3c;j}uuf`P@Q9%^gU*6g3$8)t8qJ}O}=>U$Y1M)C8p^ zc+9mC0!{con|-TyY_gUJ5Q%sDUN#7-XRPXl!fvMjUfm~+{JsZ2f!frPgVb=46SWce zW9q5|-pzrt|5`-;@(?P3gqBd6vYBB3I_Zm?ddbnPy)+hg%$Il~e_L%lyfa{l-Pt4$ zO-KIkS^vXQxkvA|&_%nAmzjiVKeQjuf)kgR6_ZJ>r#~IOTQIp?p1{ z&r05fm%uuX^XVtBOc8Ne-u<`DlEmrMutejsWhHS=LGJ#gGKi!F);OG`V|@?Je?*^s zo3f^0CGQA+)jLe^Z`&#cK&7Q)kv4Fr5?H5Bag|hZkZlCEEmnzZ(PD$l`&*3pE#k7F zSkhJV&LRB^_fewQ(x6P7)4tIxkhU~AR=e=mo0&|_$kiXu^19S|)8X0r`a)w~S|OlB z26Tlfe8QQP%p?E3LZJp8N0o^ZXWonLZ}H-ox&oSxSfhFz)m8JW52kU0KBK!aq^dXE z1ffCs#>H_L18k_1*jc>wtihJFK^Ukw$1P!mf_~4oKXh-(GyR9Ynx)apI30x+vxXDBF7c_|wgi zWaSgy9Sg*V&SwG5$*&EE1iq{6S&x<&zo(FJ_qk_b zF-5dl+D_c|iZb1eGV9MTzCuatHk~U>NnE_4F+xt8CKh7h^)ta-?x=kxc5fdtTrI(` zk$&+)(`ErO{j7(a_WYYaIlwYXggd2=#I2D}K2*4Oj^_vazuonBx6Xfe^b$=JE&pEf z`75~=R*MAb+#ySmNxN2TM;-SL>VlmO80;~(m5zF@WtVS8qE_wR8wdQ>lD_DA)=_+1 zYM1?cNYK3$oO;J4U!?r|qYa~%m=R$bxnwlVOJGzk@*5s)ZsuX$pH+r^vxlBRuWsVf zMVp0vj!ZrF$@c^|uQ5ihjS}*nvI2&ayv|ri9n-7-oh4jM^ti(+`}G)pm+!u{noZ$Kftv)dCof>xlkm0F z$+Wb6r1rL)LE)lm+ewAH4r}Y1eKDeG%s@$1vJ8D?`_?BkW9mDAA!j#R(z@L|rt9`Ot zQO}FQ`G)!sC3KK8<7(gE(8wx@e^K=AHZAhBt~npc5D&Ubam?KbcU*SE-;mU{xV0kn zunCL$m0G?0|8aKBqfVj?;Xt!XGwX&(N!(f!>Ni2w{PXA&97rEMpQ0$U`ex)#vpOrN z({45rHsJGwb0ejYu;FEV^T^MVn`?tV^Eb}6NrsHx2H3}h3A8*jdD~&eMR=h!e&rR!^FaV@MMjF6OQVLFd^T|X;$zSTdKTFCV4(>eyM}{C(4DNrFD)J97k4 z@!#c)N3D@C^8J5)t;8{luwiyuCrjO0GzO`z>7(WjmWrS1gx4s+hfWImr0mNssann` z(0p+p>sPP>g@MC}?zUzYQbMbhR*SJ|B>g`=Ry|=(zu?RhpgB9bPa?IWIooY}R6!DZ zz`5y@!umDlE?Q+cP-{)v(BD<^J;O^(Qy`{ySnV`&$(gyEK}uyv6kZ_2s>D%!1|sH7 z^y$v;6Iu5Dm^bKQZov7 zWKZ@pI@(mmU7UK0$@&bp-wQSJuzmRBb^)pElxRJwB1?4un{A_vO|IZQ9~07Nxg3MM z$`IMqDE~Dyw~f2`{as4xBu{wmY3SLeBl~O*V-E9=+3xIB*%@l zL#za7!mzlHJ1EADx!(tz10^>iqN$xVPS*XmL*o1)&S~i^7=Y%VwbA3so=n1gyIsr5 zAw_an8W;cElnAgqK36<<)FnQxqM0F{el+i#$}eB5WcNW{8&EBVM;FLZ`odSGQ z?(Chv*u#L^LOv(xalWO6_7KOZd-=wv4?vRpuPuBl=?(1|+$pG!P~_>Op>8W{`T}cu zp90o*1=F90mZ~=!+H7`@W7`SwM`|qPU^d%IHc|XQ*7cd;bt6YX20XJri@q-0o+aW2W>-TgDyh zPP@}T3}J6@*hgRF0=pg0gJ%T_u8M)y>v5kC?(goQzqmdyjR^hvM{x-w99T5*hhhJv znUl0>Fue&0*U~Me05o^2UjVW`E>cawkGCi5!;jS8T~>dTG1dFb{@%SXsi%~1m+QEe zkna5@>}8&2n~F{T-`^rEtu_mkBxajBh0V0OK}Cdc`7ASXZe+zC7hFPMFAWmoZ7uZV zcti|7y+#j@!HY1>XA?7N%%cy=gnzbQ@^#M!na&qlXF+V%z-KX)b3f|F|Jc)gX_#l@ zZwyLxzxplWuuTbOToxO#Jz4l#Nyk3rq{%k?fP=6|?^;*Pg=|e+Vww>zcMWT=otG3& zip)}qh8|8BuGGjv6zb}eUc!QRmVTAmt2*+1 z_;U6_g+r+Ct1xCZs#ghP$mH!2a%D~T1!Js;OfK*JM>&cr?ML&^?MRA^d$d3ptq60s--s2oEESmNV>f3^`lYE3Hq=HI_eu%|fbL9trS1 zi%rgJi4)YvRcAf1<3Z}u%W)p`Ej%q&i~p#pGJ>Ajlf>LsiGzTHIrADgdpU^DjJ}O_ z(ak6&8%M&;FK<$806to6;aEhx0!u3_$^X$e!jLx0)K4i1nx5kimN9&7Z_w zqQadr%YH^u8}Z0Fo^6WMQu%*>QaLT*nNCFa^5@LQk0a&{TR$xSFf|^x+3$tFgilJB zN_2c5SWlfjR6^0?)AKTq@xo#hG-B=V%~W->u3QwoALHeG`bD;!)x{nswWPc?XIZx^ zt{TuUPmHX?Ol#g?$nQh@`3O}<0ndj7$X8i|xmhi}QjD%2ROz z?a74U1^i_w4*VRRLm7Qv4kc;mU}v^ltUwhT3)jRfw%F9bN8bL3{wGXr7KWM?(>$Dk zsgXb?@I4u73a;Z%!}lNHnRBmvJa9_qD&zCyux@NFR#aL9B*F!{bQu2a57F^Jk9Iy- zUE;cA#|GR3Ly)U&gxG6K$YDpghlz!nO7ih@>p$49c(ZT6QJNd9mHaFU-qZjMBX zGZDjcXPniAny5GK;)o`gz$-KFo7rZvK~+0sD4Xerh+lFex8+nN#=FrrBj{X9)i_8M z+D9|@>P7h+nJM2!%V*mA+^4f6>E!>@Xq7>Kv{Ggc5$O5i_ZBh%=5)r8z9R~x8OT?m zWqQBP3UYy44sN?|P&Hh$q}a5}-4)1!v3I3Pj4wrcgya9cVDn($=ESqOQpt~eNk)U- zuEV}|{P{E80_UE@qmH;K9Y!gF>*IS`q}=WB&PG&E?i%Cs<*@EA*wv2zr{}nLTB_3z z2yuoyDYE8EdBOi*1C|7OKz(sm&3KWM@@&0{9%Ml1!zpR=7Fj1^<57W?{H%M03KRqv|7E2BCQgS4|!AwQ8+I!fg=Cu`Yo;G=O5k{tMVH_g3VO13{b5woQLfk zQt7Lbp}hAye=@r(0992lo$3N;yRkBc?LnTtSfQyRsFG#}GlSq7`mE^TGaW+19kKsyKm%KbWN4$z6Oj`bU*3a zi+B|2U}TO3mDmAr_;f|kzscLLH|7g>>F)CWQ94Oeq%Y`(sgFg%jM+z+d+2kG3J2;} z;E0*ehwha7tKKQ@xaQjQ#|GAqO=N+JZC^%K>G6TJe6R+p;iHDgR<|o;$qtFTx2xsf zu~Rx{$Fb)@s?bml@f6Xc$b_#oOi0mv9g_eF%jFpdP;7DTK#q8rg%X#8{N=6HBmOD0 zQ^V*Vt0pin{))yQ^atSNK~^F3IPe5MJseHakrCxMBuWVbPjrh9Q@x0FBX}KU0p%;H zN`Xbv^mfBT(tYub$RfQ*L`x;B)~}GB=XHvIoNapu5Zx{-s!gk=JXmge$!C@pfzIve(bryJ6H--E&8hg%l86^U(s5K~OJs z!mH+b*qFnw3*qO}x~sq!*cma{M*UmEXp<4O0)ec4vC-^tB=0m#az%uUdZMbb1*u2| zBfp7Kh3|tkMq3RyrkDq^*Q@q#oM}v1k#mU$o~Xl>;=Tk07+t%-z8cCar3t=}>9nt? z?rgQK6rcw_;;?+gj42BH&ApXV4$m#IHVc}6sYFa~S}iZcH)UfAH1e1#gAt@JOb^Kd zQM1D#0{d()myV}q zR0tLO|IFo~M~zUSzVI0mKobrJ=`i$oF26U^h`P6^43o9Ob4LvF71lq&>kA#sf7HrY7Zcct@Y=1h^!xhwyHR@kwf z^M40XR_NIy@Orce(;c*G=W^ze{?Kr6VqvCUD7m{1i`1rhI)~;TUcXw>vjC!&hmV;R zl-~_&*76Da)Rnti#ch(I#U2En)!d_jr+p~BX4k`_-gJPtftIl~47HN0>!cZh*EH5=cW{{mXQ2h5=WQd@s<}Ye<7m4evRB};b<1) zHry9=YVbk4^wYcY)3q7_#iw=2-wktETcL=nJ@u?&xYr~Ndq5R~Ih_~a#KpT9vjyg( zUCGzA%c^7{{2yBszsH*r;e*5kSJr~FE09+WcGB5<#IQ8^TQfVfxIn-5gzJMp5z@7S zCmBr*dfoTsM5k|>wRBWdITOf_kd4ULx%D^8zKqp5GV* z(bEnpV}-3VMp^r08Ats}TZ3Erj#IwCLbULP?O|RyryMPk5LoTN^&7F^obdqL)Q0E3 zBFk(k@*n+uU!UQ=I%)Eg$M5Z4s+hI%ODAoLcn;7Aqx`;yKK@Wq|A$TQC zii{0H$@PeWTyi#uz(&@QPl!YIk#fMHILq!i(dyQ_Y-^wLz!4Ke9u?t`|G`ySE%TJc zde_w6t!(QVjbvEeH=RAsf`=tHLRIX*7x7pJB`32M83Boph}@5De;2%saU?w{bSWwc zjz2U&$M^F2Gz-w)u*D$n3kw|oFUm)!E$Jk~ zZCCv6fU-lMQvqkpMd_ zei!FNqetm+w8{6;Q!iD2LrHygXOu*dA;ez|;?ufm}Pg9N#h5 zM8CAqOUZI~C3~M-BABH;C=XeN?uHWU3S|D4^${PqL>%8{hJ?GfK8w!j5}srrw<;iL zMIj;aLlyARB*&*YvPFtUd#`j2ZA|Pvyq+NVPe&6vE07+BV z;t0~IZe^|jN2nKsM3Nn{vOTSh~ z{L3y>CMwwEt>nw%SCJR&1k59opFt4bK05bRg8<*e{am>m1*wTl+Fd@V!>&1~sC-VGmd_3Zn8uIHN(P6f-#tISktS8Fbj|dUdt=@P2rG`F}Fc|2f_N`~Kbc{rf>z z%dITAqOiuvpMmHaAFvMiLW+S3J!K zvaV9`mBmMtpEO_6K68$pJkrY_x?^?vx8%0gli99GpwhhpNVho zGMhQg=uq6+vnP9Heyh;i-GVWrE3$T`Tti4%azb^q?DSQPOukUMQg?3Dcn=t6eeQwc0*UI@EHlnZYtsa${PJ zS|z(>?b*@*4@PI!qIL8@n;RFBPKN-u_^%W@alhL3lEeHzEoe3-w zsv>_9CE$}@VF^)_s|xj>T48Ei{Gb98+Ey6kE0@MMB!?F#Z>5d08Dn2n!}vyvc>0HY zl#0Sfbyp=otv>E&YZYPLdpF^q&KUY&PGuN>8c8hce=eAHJJ-~yK1hM7QO5cvFSNC8 zyJY(DP}Du_R=&LRT7;!9Ca8OS8%8j!XeqHj>;gtJsQG~j=i&tfWd2*T^fkj3S|ig3 z2d?Y5EI+0J;+V#)&pADmY|V}2Rn*$w9|N3AYZ?=-mwQ1ccjV%DgGyv9CXgx_zge6@ zyWwhvXO@U3rQ|IC@tuSsmbVy<1x9+wAJ+A(dR1!m%2yAns|tkfZaOZqS2E0)A$h_@ zVR8sPwr;;l>T=s&b-(+L(=IMldlH^LT>voDu=Xa-?I|ZaL3V@s!%^!OW=>723)g5! zJ&nrj6ZyTC1;;EKq#lpf5-;w=&faRbOlzHn*x=_*sP-J6+xO&nX!;6MMi51~U;*PA z(Ew0_@pLV)V@>4&+bz*~xRH9=$M4X5qMp-BMFl3x=e&4DHc8_x7yb&;8^f+@44cvT zt%d`|N?|8_^yYV7LnpamOBr-NvOjWSch8G_6`1l*D-EIaarz5Ij*-Hu_05L^EA_B`iDE$62bTm-Q zZgtd@mKljIym3vm<|ufcH*%-%ZPEoXzlsEkw5ec486TJUx?;!k{>y`E^AWQDtSjPj zyW{@0`b-~S2x$rGgm~6~;l=Qn(&&uyl}*NcYn;y?98L_l(#F3PHv2?_qXdX;{|^@@ zjtjCnr3^bozZZEKBCnpW$lSTof^^C9A<@y0kdM4qv>(i96a`NIi&+KvQS7uli1&<6 z3U;P1WIUlk1d^$2x3?qYsv6~XNX!v}W0VgPQ{7Mlx@L9XfKgpOmKvbi+l#bf=uw}|o3e#mQ(Za>Yw&iu7oCP}|i?S?*;+&59xx;v{j;tlqsc6W}1N>$!U1M5)Wa@N)re zwhK_*gT9?5`L72-%<617+lhBny?(t5kh9QJRmzP;CdK%s9~xf$1Z0OI$-t5(-=C3@(b!K*7T0y9y?7Q?JQf4_vJxfvTzneRMY_5hEAH{gGM zX=(A&mNjH95$f7bSb|$Q9p@fG%VUB2zOM<^M`dZ&0e|uUPFi+e7_OeNPE~5LQQx=x zme}Bz>%XQPWU-s~vBe{pLm+i2DB0VsRTl<1w{RN}KAWN_9MVL!o1eq&h1C)_G5Fy?r^Xn!1feZ?t* z7P`&~SseM)s-Z7Eb)1t_^W>tXwW7YmzuTqpp|BMEKbP8Q1V}uJ@pTdZm0fv#*IqO7 zN?Y}SjaYXx<%%xTOUe2$DH7sLvP@QsH}Bl>@?6UlZjr=RdyVZceSZIs!MC~llgUR! zCwRIqBx#}@bdp2r&PBrKnyd}>R6hNVt>IvPt!-5$!`ic0urEnR*VzwfcL{fA0WWb1 z-!bxrOZ!YzW-=Lceypqg-kD{NUaU2HCZD&!lzcO7^KgXby+V3QnPb|ho$Zg^ApcP^ zDdDOf(5|+!d0MwHzt+sXrr=9c@@`x8{7qPQ*O%If3Yk<0?#CJTA_WeNrv`Z6Pl)pC zV`HLi@Z<2xt!QCJ!7%ygKA95@v(rf-kSL2v)CtDbfu42B{koaqQrtz2xY#qob2-zu zr3E1!*L7J=gDnHLLGg+4&FwEijJ|MVjP*h8Zw<1S1tzZ&bpmboRj3-0jmn>@i`lT%WeZhW5Z<@)2NAzbccM znW{#yYcI8YXL|8-ihGZLYrgxQL7`pByM0X(#3rk4{-qH6{vM0^%M1i#eV=#bvUzGY zN?*Mi9#LY}QZr|p5XRwNfVAca5*Zzg0po{~fIYgF$fCyZ0(>K7@(50v(w@a%s6@`& z6g4A7Mh%`{D1NqP7ka7~hijfdPq#0CP9C0-a-gk+p0O$$v8L#s^k%;K=dB9pN6O}b pqQw7yWMV=8SJq^SM^VIUdCd}sfzK&N3}?Wfxrx>0^i9qYe*?78B3S?c literal 0 HcmV?d00001 diff --git a/SmallCountMetaAnalysisEvaluation/ResultsExplorer.Rproj b/SmallCountMetaAnalysisEvaluation/ResultsExplorer.Rproj new file mode 100644 index 00000000..8e3c2ebc --- /dev/null +++ b/SmallCountMetaAnalysisEvaluation/ResultsExplorer.Rproj @@ -0,0 +1,13 @@ +Version: 1.0 + +RestoreWorkspace: Default +SaveWorkspace: Default +AlwaysSaveHistory: Default + +EnableCodeIndexing: Yes +UseSpacesForTab: Yes +NumSpacesForTab: 2 +Encoding: UTF-8 + +RnwWeave: Sweave +LaTeX: pdfLaTeX diff --git a/SmallCountMetaAnalysisEvaluation/data/fixedFx.rds b/SmallCountMetaAnalysisEvaluation/data/fixedFx.rds new file mode 100644 index 0000000000000000000000000000000000000000..ab9987c5710b1ab379e90999d8eeaa5f2e2278b8 GIT binary patch literal 79655 zcmeFZXH-*L6sUX7@gPT0umK{?hKMv3=@3Lk6cD6KjYyN;gb+fAiim=Mfbi|C#6O}7`>8Z)}b8m?c2B91oeQSJJmj6^L)ke zC%oK4C*>_p#e7cOuvNSka_vQS_NeG*uO~HeNVye+jJ>7R={lfm0DLAJ%4X805ut4> zkOFbp^enbPjPaACwBb}JpG0Fg!y@N;|4cB!p7KcHz+sQOt~qFfMZt32Q89m*2fsX- z|MPEot*?jvtNy2l|BT?j!SJ6a_|GH$Hy!*pE&kt%33zkbZxh3holI}N6@nY%JM%I` zzVSG0`wkB5JAp6a5L3Q4M}*0(-IT645dKkk^o7nt!T(PF)4~56?cnK$@HhX{n1g&{ zXnfKKF~5taZU`snh9R?bN$h^*CoJoeYnH%oDVEpoocRs&(We-#O24Hfq!kYThWEu*5Ilb~4?i49{XZYg zs9iu-OixDn$s@ef>M-mM6IV$1ld9PwI+i8&c(@VLN)WsNrtYFX(iM}uDQk{ z7;(skRj#L9b;Qz=RllWcYv+`*dNZT&ko@rZa_cd8XoS`Bw`NII;c3GRyP$q7RJf!M zytf9N{s(4W>cd2eOj&ksL$E~G!H-oDgJDd$9kLXrT?bXb*VIwil2)4BC+C6X82(P{DVIq+r+RaVdNP4Vj!@Ks&oFWnad9 zVnrnTB8c>gDmq-Y#Dq%s+ZyCbkz8UTI@$vh&)G=mob6^fzu0JXT)7L1vMR;Cwv7e6 zvK;$2VWi5+#AZpMxR|C_c!ehZw8neV20Rv8bh~w<4X~|?s>bIzuK2G~4W8yi5JM{B z@qDQcVmRd(NII+<71JM==DUhnt3^hIIxt+rHpUo_d>0uFK4Xsod+U z>@}o-Yf-g+KtkIbd2P;-)q+E>XpMImfSji}hn^6_zu^__MY80nVZPD64s=E*OebDP z)s_TVOal?doUBR2jkTZK)odL;S1X7b^|Ot&G&Pa~Qz>c1FSnuS)^u$o|3;YN+FA=o zeYuvo+6qVbVBx`(y3i1@~jea;00_Dl6wKn%oV_pQ+fEC0`08@YA* zT9;cy~hmFor{vyZ( z)0hAcu(Pi#arY&=b#$;VSwOL}iuJ7Vcyk~3z1Ka2rj+d`igOJy)_ zd@w~RayY8{|0DOzos2oei4OZ~RUDM>J!jk3b8pc)n)iU9&4c65~Ij28Ce)mu>(*K9+%#GP49+kqHMTk<7S0%V}1 zbDSOzX#Y`3)e5Ev1V!6A0Uz+~$XEs_A701YWdZhJ+xQsD4 zoxL+bmFNXVO~X)i`VQsN$9GMUbuvp11{87Te{C#xHu#=IkK|tD?{dcYq2Z%#Dl5sd z1leGU9*8^kPEA(GGp>iRgLl@o-6REH9xG^$TC1dpw~*h%M{%xLZ);jP>BHCg$BHz$_=q!tSi5X7SS*V3k zbr!!TCHhUJB&cedg6axwHp3fng}SEvC#vq)?nbmV|NiNeIq&-)xvI~I)VZGZKvg#g+HpQ zH>|?7=5ntzI0fo^c;4y;*Bpji@*11#7+q>Dxn$8uxD8!AS6d5nNU5L*g6X}Eq1rzI zS(>%;NcRs?dY9Th5qW_YkrX>4Mjdwu-HN1Rl{t(9)aVfKqHEaF+5)M5h3y>Jf1Q8h zxs5`z1JtB{ZSxbJy!+WJoP4&tRO3jWMOo*X0}Rp2fXTpIU4go|Wq7|nv-J{*Glwj| zh5${|v3BX%Ynhe_Tg2nNMCLR>=WyKBXtGA)_mF&M`%myT1(^_Z1^rmsEVzdU=v zv+7K$j@|vCQEoHZoU;7z|UG(t5?Ig7$ojPUWkhqwVDlqAmqlacum93xbbmc$n zBHPz)i|gyZ8eLh>`)hi}rfY+hmQzewOC5M=!5Bz4&3l&~8Ke6R+TOvqJG*yNL9=6p zNoosuhT15R5|Z9U8rV;(jB2W^@TG$E-^@`n?cwU425tt~UzP}25E~y*;J5nlop7e) z4%cSSwJk3}-j%|J(tcs44U^l*3rNmb?F9k{(2V;R4%=8cFr(v338~Xp)Cl5rwJy3^ zgL+5TB;{mm)Qc#N4h=$$^v=E`E_Ar4Q^nfDCu>NHuOH^-RBwgte83=s0%Kg%Iutm? zjb*b887f&6R;I=!Z+(NShLGaWIC6j3AQ-XR5Ixn*i>O)IQ>vfAkdh?%t9BMk5CU|rvq3$*cb80RV3Dgi$d+_y$TCQ9M8B3By<3vu z?ElyWmwvuF&-GXniB(vB-j-3}znS?$gH^}}1d`UOkOo!zL5fZnrY1fFs|GmBr>3fQ zf_sC)FB~YvJlccWGAu@G`nL#vEntU1Xk8RuQWN=eoW`PC^V%}d02>&T_|qWiiqL^4 z7yY-$<0Hx?^40eW442VIP6#B3+B8;1E}geEs&cHC2&mkid z`hBcCqik**dPQ&<;w~s(o3yF-i;W*Dr`Y7^wq@(Z!JXU4peup zI(I6yYP4)}=P5d~Dw$EJ)jURTCG-OrHW|8R4*IhK_R7ANAm_-%tb|`Qy(ly8+_4ZDzWtNWWMUCKbWVJo2$hr5M>`ylXWS zq2Kk=d=*wxJX*if(y>5Q9c>OOel0q)n}adO0%4@_oV97$E(T&h=u>6pB%pRuU~`2K z7i%C3ej15@860h%d#Q`$z!#H+Xgal^HU~PZbSCNp8!q{`jl&Fu`oYAZYFiU8IlFk? zw&Sy3vkzOMPtozcK_Hmj+O|Q^X3;%)Tmb-TCX7%%R8vd`Dst3k6-dOp%Q}cWT=f2{S`L(Yt`yC5DC34EK-O7DT2x1{6On*v$vPp!xf&O5S~5OMxFj z3l?MUH;a7boJG zsE27)1$F1I3%(@eOh;eB4`8Pl^g;%A(r#i6$Yg}L&Tu=Yn2XaMf#2BDE7lkb*eFUMT5{YOjpHd%umJP1CYS7`T}ErIdBnIT`S!b zq&M*$MrAW-afL93e)t-;r(50zw$=v8zC;vvfDeFNwx;!CT%2Jz3=Rx;ilE}-?qgTTRm=M7QTpgC5Os^#b*JlcrHoti_kPQGI-WNf|pB)i*{ZB~Lbl zi9m&1ZdQ3X5;)q#oY`C$B>7@+F7h1cL(XDXy8!_}XoD&H0h+TVVe}M9CRm-ue^1{Z zK>U~knzBo?a6~#LXg?UYH-<7b{amv`$j*#LRdrhW;4*rp!_gKWBad@Af<%;G0`+pj zFU_)+r2>n?O z?;Q=>c#;E^;4t)mXHt+6aBY}@0|J7nao15vgzv38j6d6mZMnct;K6s@O zDwc6&3g@)b^M%Uoph+_}jGh%}+KZE{@jMP@MRW$Q>|_rWT&1yZ&d>@FAEi z?D-Wam$nc$C(d@^!ffO!i(;D6>k7_jZfz89c5Xu9pA+*B1PvjEniGO{WF65mR`bqW zd}*>e#r=?G%uhHBfTI5^E5AjMMbS4^=@l3%flf+NCs->GWJ2NA_>kJ4J1JpURL5e! zOBRP6!XX#V(Fkh7)h-~j{Hyny+Z1eP?^#}M1!@}1*EZa$g|GC)s)H8{NDm?Hn*=^9 zJb2N?mE8lRDI)=rLeRD3tkvg-ECK+d?Z81+boeS>&~ogChytBiW~1)HC*B`9UB$UN zazSOIEm(%N=M9?^*?zLFkG>RO&6`5@V?==87#IeHIlt!<2phqyo3i~3F2U7Fjro$A zn4IP%#)D4=@*y!dfjKRx( zK~O%6{D8x7;C00BQS<2Iv_2}A^|N)ck0Ce%Mo54PIn5&_m~w7OdlB$VEHxBuWJen4q!9N*~eCHBX;N0?bsE=ByU&zxz5eC zf_a&f-nOIl9{5D=2}B$P`n7OXZSVolt890QHtl2`)88M2+lJ7Y+#AU=Jb#sD4nty= zw>ianM%n$z?*O89cxRhyw^Z3-zBJ7(rf3NF@BJ{p1BeHlp_2S)BB6`usBye6Nt8h( zEx}|oXBP^~m!}Z9i_BcI_siu|LDW^F4B6@CKFY=Xau-$$Xyfe~37}c|)NJ)WUhzPw z{3{YqKlvxJe~anzYUVIrnad&ocBf)qpp#p;+HH)TDb^Kc{?I77K}An=#rqlN#-Xlu z8`kwvG&1KaUY5@xwADgmUXTTMxi?_& z8~m6vu(>0I+Kocs0+RrqX_c_YMl4n!S5wxutiqzxQQ<9}F~b8`~5*BT(L6X=1Ga{r>6nJXsKl<=7qXXo8*@1tyy8wWpd!O<{Q4BQqgO zEBZ6xYQIL~Q%{=k&&&~;>}Q~pF)$4=E>t#`Ea+QkfN-=B6}hhR&vZLP8Y%MYj_vJn z35d#`S*fX+^@YHJk5xH;qN8kW4ms#7d$it?_M=LQ&9c3yyw4ymc~YHKON0-?lArVQ z|Iq9p(clY2?~3;1HL{>zOl<_r1d5LxTWTIhcIfzi*H7UR_T!7l;+^P?X?31nhNSqY zW+0LkrND%Yq0M>@lNJwn>{(@4QJ{uYZAROg<>Xo_V-8EAB`#5dmXNxmO=xGxSFX!J zSBNV*`P(2OiX72`S%s|^SFG9#@gIxYDr|rEUDkBXHo)A0R}x+!i^E>=D?O9PK6cr~ zCXeo?6<9DF8s;?D@pFm&>Fs|5XdpaRz zC~7C`!xlD?6V5u5@+?qRQxhI34;xkBDcVM`EMqQMIR4T!Yy_1myA(W8)!z6VO{D8F z27a6O&IP^k6}SOrLDqn$*U`aCGccduVTQ3YwZ_*$%2`d}*UWre_+j!K?iPbWUNnGX zW%+bM2x{{fGfbTw#$wB~fS=l?GwdQVJHg~Ec_-D0##70Ny=Op8e;wPS;=m*Ie~%w@r# z8%&=t`X7P7iv;+WxzX#UI&35~1?fA5sS=xudeszK!G)M+#OW5w^Z{?#4kFE*l=a`c zwup&UE810}sk?am*Z^}&8%S-f^aer#47fo|K@{C?j+>ebN3_p9nro?CX<4GDX!4jU9S9u+IXW&yTF<3zwy}}1BGd^&E*NPuV-OrmbhGA&r zS7-r0`raVfs@9dNN0H0{eIWAvWSwyE<*blKc1xArsB^iqj9*V!ZyRZE4Ql?@iOI{_ zK}9$}oQpZAVm}l89%HbdDtYdNt)PMPa~ExSqjvD2#EH5P;!@#=R%dNBVYPYU$Cm9=rNGO~0{R(yYvIfuj=;5e+~_L?wg zEW9~8skMumkAT*~*=+j^)k2T#2Vq6mNt@)$ZYOL5-mKF-|2Vk=QIS`7(6;T>z~@44 zY0c?Bg?5>#9-2!jRvl+83q^7gk`%|hfWF77<)SFtXeuv}g?*UrQ1#TkhN zz!3h8;->!XydO)FCmlTeUCo9XYn5iV-)sw8i1sN$@-PVJgaX)Z@Yn#_dIDwolB0M@ zc>*=Tg9dgivy5-TfZ|a@%~1MF)im>)jpf%?pS|;MV03E?J7{w{L0^4_b00#V zG^MX~I&{5^B7PJy6|4Ac?fo6Y&%w_@0xt4Z9-IQ`XO%yG`{KckMzMNwV8#WV4Bv;G zad2KxpL6+yxP@Y#KF8=Y%92(;*lgM9vRVdFH+3k4vtuW|Dn9!0HYM$x>xuPYqf9{9 zT)5aNe_iw{DN9KS^orLzTebbGK0d2w!NTksb9siaK*`>`z0*=-q@ia1!M-rR@s&iT za})-Ne{gsK93;wB*K^g!k1Y`*Pt?lNuRu+g_eS}Neo*3=%>QcRKm9DLCK@}-~ATo zLk@`-d*^n))mA5pJ5h(0JK2STmn+fe0ih6q_j`wS7@aEbHfk6?PCE$6IfF5sqqWDMvRVLOwp?wBSreF_l{W0itW41)wp zyryA`)$YPK5S`uqyJmk5PG~))osBy`97s_DH8bv-M18yio-gm+8C(2y&DQ7SS;URJXQ^a#v5%*=Pw9ZY-GuK>XZLgoHe-e98H)AE(lkyp%WNT-{G2{f0ZI0Cbj9$cvRoOrp+MO^5vk(4tb?-H{!%?R^O}w(fRuMn^(R+^^HDKxJFx|5 zS8});PB7-%(VdX;FXOKd2=5&6@Xnmv)c_iNkdSYwuP^8x(4uk0;!=gOd#MI6?{o>( z>8WAMDuq?EhyvpE06Aq_8z1-jnhz`Tm}~EHLgLJ#ypa?zQXLK6;r(zr*Rd4Zv@p#9 zqI)%PUMtuyDIVmuyMXPdXW}jb(GFm?e7|bHtu`-0yCJdflt+TG8pK*8r^=~vVD^4d zqtWPvl@SkLv*nbq?Z{1y@$q6o<+^J;0J|Sj=CJyi5Q2YJmXjIA8~bRnzEqcF+2QAC zwNZ1NBHdAQuAnH?l7QCwyy%L7a;F#`*xNmtw4C<$Uxb{(O}8_>>}ByX@Z&%9R~G(p&Nby9F!lmlxLCsw(@7aGXunpcD5(qcL<>Kte>LeTOVL^e+c-M3K`2D zchTGBP8VPQM3>jl>BvbRs0!T?N9Jeun#VwhUc)LD5tmlq(bg!$i5$t|h>83pk2Q=` zI{UJ=^}?+#OU(l*??X0cS7J}9`P|G)rNoN_njZ+8Z2}S$-yadI>efA&a}7o)2#PsM zF|s?HEB#l`4S8ZwugV&T{hs=({%=Z`#j07^{n9+>B}j|Uz1`XTCtE*S0w(IgQYfV@ z{*wj$EY2QMIvCvZr%o9+yeVo)cgF-pSc}~&J2ezdFFcKq@R;Rq?p?&UpMp5lc}3?Q zN#yQPH}UDO*ZW`FD>kDdyf;sN)03x0_fL$CqN)P!)@vy$SZj+vvF{h%PxsV+T=$zr zo5Srr054$UMLF@kJB=q246>)kkzX600I$M*OqcEQZ+tAVOx$VmEx1eeDtM;dwxUuq zeq6+EcIfSR{U?Fgog>8(Fd3w_QLI_aQ49e0Hd@V2W^Fu38k|v$%okNpYU`6VbDi~< zWG&l+I24II?aK}WnI_M#JmkLKvQFZd)_K&CUnv-Rd+eIlj+5zyupFn*PqGf zMR-T-HLZ9H`=~jge3(p?=>CD_4&r+m*z+eE&A&z?%C6;16*l^$Kj|*X((i};3ob(nq(I(Y5A&;hbYY;T>hjK#`3iP!)d)LU}5q8ti8vN3W0ge3) zN}M6mD1Px zrCp!VB6|l9$%R&g*}U?k?+pnsY{De8z+cJ#CZ_IA^HTh4rq{4Q&Kh{o^zh|GTEoxk z!vcDdzBZAbnsGr&5%*>F?)!xCP3SBX5ROBCN8^948?oZjB1$!3CgQbO>nc<>ZN)O>#12E-m#TPoqtDq-3+vY3dAYFika0I zTt9!qM|YB=^0c^0>fR1?3Y6VomslE}trD^rBPK9d6A7FD?zNRY;z@Wm?Q!@xoco=< z5)rDYLtx%7`l~+?uG8Z{%u;d!m=ps1j-s`;eQmu`o<=ml=ZEEiEfoUC8i%2ZIz>0NopWs*AF zr>0e1+r2^Web@^9JMHJOW}+G1|D@l)|Mk#oHD~9ET~99;d#yolm*`6a27YzVj|QK) z5?=FGAzj#PDtKf=bntX#xK|S0%4*J9pO$+UJxt5U6(L%nT`nBhF*^8u_UjrPf=v^p ziw8c0+;MdqqrZC;>K9O^g~1#~9X-StDwxZC8CxYk+%=&lM^H0xm%TnxE8=--F3_!v zRI6ed)7O`+BsG|(P@N|l^UUzD>fWMjMvZba&fP}ts(#Jdj7v2ss+i^ zkI&u(s94==Y|k^}(aXP>@0LBVOQ6!9%(kTBT3*Sg$XClt&p*^rBoY)|w4r`wU9}qf z>&>4k0pdX|sg$1=$_0!?d%wFpnBNVNxV}}0QF~ZrkYlj{+BD_%1q!bdF4ln!Lic2v zOzN{vYU|hfPnvV|QSr}a=QKTJB(k~Dt$XES{hI7&atM@E9H_x*tlrzHULrCe+cKVY z%KFQEAZ+r6n4a6}cciRWorwFu%8dTdTcaZ`LlBpdO{Gu4tMs$-V6nnr8=dfX0*Tc6 zR%ZJHrb7Gen}v_ZF0bftR>|6QkL*RWG4aBt;_Ssvu4?m=v`1jKpBX?rQJ!Z6zG&`wDx%-~wRI8rPL>echRg1sc{k!N z&}uKsHkDIr9N=W{B+6cmm71Il3+=cX>)bpLX>VONa)VuG-hAkk-B+)s)-Um9(%9s& zX;y~KJ503`5%9|9MyX(HP_Nt~sh1KJAl0`nEDSy_3QPYB&T!gVr(W1%;8EaN_rF;N zy0xcls3tsQ>Fq?QaQ(Mr`@Zpt?+@=}aS-iZG|#4LMBZ(;lL=cv4co7LR9Hauc6hjU z_VOJw;?)_nqUk{GyIIDCbfYOfnd}VF9**wbQ(t2j_xpgw8_nv|-)3K>*jDaNye-fa zD_fX&BKA?w^AUTwN$Kamt?T_vYWVzN{9e(Lo@ z>;8KwLt8m{ISl=p2gZQy^4;%u4zSpt&1&Xu#)sQ`Uu|UL%U}6Us5QQEY66uZ8mzU= zHMbaV3bZh@oh_jKC6h$-7nhck1=70p-K=Y#9*$ls9h_0QdXz!%K<^<9rCFbZk^-)8 z==MPC=_OQ>zc>u_c|Q5VBo&6n1VsQ?gVh}&bJS*I z)6@#Ssai0zV?IQ){$SYGPGLd-VeV|5FFL7L74s;%U#2>2XonT-%d`!s*e zlFy4whXv%-rpd?0Iz^}-jWiTCenz@aY&eJ4AEWmet_Kz^{yXo5@AdBWZ6vAczHhj@ zw+X<>eh<3+InefnGD{|CGvvdZx!n?aaWGN6J*W5OPs3yrVorFXTSrb*adtSO%4rZQ zcGVO?4M_I*U|nH8J(3&R^K8pIeWkLXYqIcT4uE_kbh2>z<%iqNhks2}ZWH_C7Tud) zSO-R;RnIkqjU%R{cTIc;?USSCLWO+_SARYQj23L`l9C*vy`@c8FNzNh@D8(Tq@Ver zf@kJ$fCr#Ec5qIR&h|U2LAmneX+cq9;$wWuJ*(kKmoH~cC%twb9T3~C{rLcEPE_z8 zc~LRA5IfmDy}q)dJG@Tu;hK&d_RMK*d>8!lV)ssK+TzPU6DMW|!qi?b!QFO(UJ>&e zPkSakfCTphX&2O|=(wIaXAvbWH_+Ndkk==qGjlJ?rRSE*iW1k2-yWQf4ro=m6qf^% z7Yx)kGQK`VK@o{Lr!J|p19mSa3d1oWeFjz1(n+qcR@kQab-yf=69rCb^MmoNge=L_ z`J`r{)t0{&*g&@1D-hGclEuH~e?Nqb#2V37MT0|P-BA5}+&S)h5)mcSQ z{@_qHTJ=IvJi5Hb>01~HKm6%|?p%KI{dYx!PO92xYNmQU7{z0vo@K*HXeGBUe>8Ws>_A>xJ;sjP7C4uHvPZ!8HJke<=;KH=8^SCr$?Y# zH_XgQ;kxEFy8_c)u+CJG3OD*UyJ&mkfl;1#s>}Oqv!8z&Uq`7R8b$*Qa-4P5LciQO z=wL##22L#qpjRHO+5?;9;g7+5`pL9jrs3A-oG8mB2*yc}D{0(Y+8bE;z{RU>CP#2f z9Lu)$I9ankH+^f>x!QalcM+0MGZ9ScFTF5O)Z5~gvW2g2jxZIBfsMX0`nAM))W}p$ zY~eLceCkY!69npPQNAjOF}}H1O&e)OZQStow;MaQ(ijpBiOqPB&F-=}P^lP}gEsAF zWQK`dRh^F3Up*~-7>EhOy`XxTfmyjfKxc}~P`jO@K;#cyv&*wS=gGc|2 zSdUE^Z#TWNq#uH73&>!efarx(Ew3Okn7FyK09C;lOL0 z645x3=}L*}ONR3&51MbZmzbuedcRZ}KL&X$e_SG0yt{2iyr6|-`>pNEI7oNe>jd4Z zKy3bVm_EI?k}8{L{mDbIVIoX5=f$T_z)vP8y`oU}5iypB21Xr1YhjAUUacek?{`F9 z>L-7EV%}f}dYss5&zN09m&80ZyV=RfE1{NOy?T#xzQAGoN`TdmV`9ObeqBF;kgLNJ z3i4?|k49L+?HZ@T6+V9C1%eLe$(AN6GjxU9ya%j~*jy3xHkZeEu}hY8HHw8YCh>5P zzp>k0HC@z^H>E!v@=QGN1@2&>(e0jx#$L}Jm>bc${`Ly&&|-qNpLqoyhpLtu%X%$9 zsNQ}4t34ClELb91PZ_F`Yw z|4Eb{y=23ik+(a3wf__GU+DqV(&G3V!Q6rQB_Zo(g4lqe-QDp(pb9-i3cVD5(;!M| z2b~2EQBuPND)XGzkB_Kb^=FX{&yVPOH<*0Y|4`7IZ70Y0miOsh&m%M2N5=Iv2<&9Y zMMW^u{XO|)T7g8Xs@k$rKuSeNjX{A1<+}{Vl30j4tnytBmScFgAL4LYFfM&)S4h(J z4(1|Vv6E`=5^Ll#GIqI{d3FxHx}$%$H7(_=rn8@&+Ln*!^-BEldA-jrjJ+v^oj0j1 zy~tx_BW`!1HfoNPL1Ea7q-N>t9Yrf%jtB1DQl7)^y~0wDM)hPsUqN>CN~M&Gy>Y}a ziW8Wg7_q)ooNmFy>3$vEIgHPH1_>S4Oo3+=-uK!XqgR-gH1BSWftY(~vv$nn+j_`! z)?3L31-W=n((p-R5Xo?n3+pduvw25ZWzmQ~dXYJJ7 zTNck*!6~0x(OfUD2JaM4`ui*OLKUtC(znax!ZePylJAyvV-{DGkQWo{@9R@Pgg^F= zf3X;MDtrsR$kE4UexLRo%w$_ED17{3V;=MK#@3Y1+(L#4FjM^|A>tuFxK-=f%D+uz zvmVjxwwtgWx7OS%k?hF^2}*rI=%=yQ=j{~69okdIu6S+Xx$0%!q-g%XePFYo#DeN> zGr^S!cUH14WNvtI8Dr=4NZKPbrCH)|{H(tNDt$CeU83oSo{=hK@=lXM5wttF;YmUO zBb?XbnR^Tko#?h5OiPTsf%sTm;~ef_~f8B>!Y%g=*=R4BR)r2y3v9g?DXV z<=y+f?}>eNN9|+vCk7o})=zi!^%^hlBDgXtOJkvdo5-BdrGhA*;l=j2CD^(J1iLkD z(rn=JBke|nPT&wQ&N!^)9V)~QbrFxEILhW$TQSbpZCp}5JpGqY^GY!A{IdfE2 zSD#t`=+52{@FX(-t=C&WldSIibwivrw*9nJL|i`T^3#&)L+44#><_tM`Lqn*1^TZ1 z;-hhC{%o>u)A+=={P)H01qDLOV%EP}Tg=IhAkQ6~>fP#9Zi4L;Kho-kyJTX6 zc53LuCznmld9yv;5n`rmGYc!0q!lGMYH})bbg<&FwUzxK;n2EOxq+s~BzWxQ3P9q} zdfT`WI6kgezwfuPN0yN>i?1~9vlQjdlb==1CNes_jH!*AR(*I z^5bOeeQM#eK&>Funph?%O-8XW@`qdX^T{h0g(E+1rK8Med3*8L+bcTA^2IFTbT+-9 z*yw@J$pY9p^=GUty-=%n+RJGtO<(t+yAB3U8@^8TY6MZzjfCFlqR_7GgXm^{zT;UTGl zB9$U;2Lo`I_m}S(s4GDSkO>o2Loz4}Jw6}Q__J!B_2Zdpb6%CRQL=z* z%>@0nzg&HXMA7NM%rCR|`?^HzTMFyl_C&^`afqiqHZtEplN*t83jfsZ1w0+gEfCrB zuzwttlYeA*?&6f0o0$Gzm)>_spza`a?va(`u+7-8@RjMh_?|>+xX7Mi5w*L_eq`8T zyVHoUeaX4_dD->*nuF;%gJ-=Nlq&9{`%De{JmG}LtJ9fCz4z+yQpB1sXeU5riRNYJ zy0*T0oZAFXDR?qhHfZ|~3zcs4U0u<|Ydk3qyqw!TCq2-a?->OX;(c8(oejt7&88pD z(#(lokNG1^w!R{XpAa(8k)DUNb`$hsZjcfTHM?@+yGqv%ogYP7j(A5(W7*qNd zFEGx}?<;R>4qDMWeL?+S6g%*4|3M22r4c#QYFBexEgoZjWJLh+dNj#SeM zzok|`i|?R@V6EDVxWI^w>>HOVF1VaPg90DdJy-dzsL{WEwNPb!ZFYxo{6WH7XLsdZ zv4&fWOBo#v4U^jZUPID~vK!AdO?IMby`N)m2KU!!mPVHtEZ9|@D1HVkwR2rC$no|4 zk(-q#`?&#qH*lEyz6*B+`_$Ye`|CRqGYkO}CfoY!guT*6-mNA~M}onbh+Olx=<-1N zn+uJKK-Yw%zDv{p_EBELF`p4ms<1X~&!cfQv!KO06-olNXRd$)$mWLw5l{6t%m0j{ zM)`LvFcdTCJy%vI*qNsqnDt8^b~;%QzM&d0nrt@I4^WnxzLl!NO3K#^M+ic6*Bn7_ z7xV|b2t=@U?#e)~*XC@HyXJLyw0ITG);)(2uYXk%F8)&=MFGJeL1oW(MS3(^^T2QA%nHu}P}Y^tg{O>GAZYu~?-Y4x zQpAPp7IPM>gd^7pYROv9VK0{Kg_`sLX?yW4lU+t{@hu~IR`U|Tey#;no9)7fH^9w7 z89o*cl#F{4w~&xS`H0>pn^)2?g4^>(Lqlp=9h`O{l?KV|)!ut-EUBr$IcQ*@Ra*=1 zIae`MeC0>dZS?737r&gekn3{l4~by!lZt1z);b!#?!s8@vvR(?L1ZY;Hkl18=O-rm zP~|UtMyw#B>RbRUZOId-6PYrQYC9p~n>K+xCQf{z7>f*4)0^c{{xR%>x>KE;NOAD5 zNx=(Au%6}yao?65?7j8?^{za@(<--tjk?A`R(uy`ak&?P=$=va&M)GG&cUPw7# z{Ce#OkPF9#)z~{s#vxs7%}y=YtJo|lVl6{ixG5FPP&djL`6H&gX12sBhh6LIwH7aQ zHfNp18|8$-OaF_`0c$-Z*!+Zj51dF4lZuL_b4F$oAJVS8Q?SZpvRdLH1p0iZo=MV1 z3q^bnj(8yt~^ElI2%yHjx1M&u$(9X_37+hG)F=@}Lz8xXxf|(p zZ%_b!Oez1z_X)z2EEQq8`9DBVRk-63I|5P$3Jh8n_TOdZE)sD`?@2t~9jJdMlg!_+ zv)%z-);DR3wztRxC8-2R^zgW!7eQ8jq#EE}uQTX+nesH@#r=d){)xt>luv?yH;00@ zC6;x{vtw!UgH@G-?o$=}hWKTTPFa4PK9P(S5GkaTUYjK}Jf5y3|{L!$Dz!6`FuT0W8SN+Y%yLO!dqHKR9X zGG)p>4i_Wx%5{6M#cSdr_ZRqE7AVvE- zpW7Uy_2qfy4y-gAg>8fPDWSc|Ft+AU@8@dfW*u?Nrq6Wq!eg0d*}O*&(#R;}T)2#O zm{i0JUK%yuvH-G$Udi{=-MdLY(w6K%?zveAVMBo<1K(lPd)6OO&6l2SMhWNPe=$tj+0=3vD4b=f9a6>~4jkPBWyD>A?et)-|HMePd;=HAFXfN@ zTn_eSpjMW42MhLh>+myt$q-iAK0L?Xfl}MZ3*@h3@HDKgQ^5(YZtssQ_-ozRuAoLx_OA2(j~KbzLVcCo+>qF5(u8^AMV0}YVg_#kQA=(ZB_eG-CeAwwj4!~Bq?nYi>c$+>Sjc!PLLeupZZha44c!*nsVIQPaoA+Cd?!~5+oHfnp*kC8u$T``$8E;i z{RW>`{I9${K~>;qv8v6)TC>~%Ayk&Q@qlD`C|Hz2Jj=-P(-2jsq+n*`1v+YLFOna8 zIJm?7Rct9<;bXITvt#S2GStq68i+46+n2Ub5tbEFsBHGTX&gCyZClc7DHT-`*L(oi zkOFwbyFFtKcIk&)BI^HIeNv{~eV-C|qJ44yJ8>fLmHk}J%(`jdiRD14obn{czvlPX z_si~&-TAt^0@kZo`{zWmW~G{pxFx#rt z&4p|m9}@xNi>JzU+cba-v|pgxYf@+JE0E~82ELx8s>nvZdrhTNhNZ`~SOFQgR(0T>gZ`7I?Req(2mJIq2j4m0M zYjV=IdTKB~--BA7yn_&{WGoa2smhGn)hxgB8>!KO+AkR`meA}V7I9_*3d%~}1?}dp zyzZ2Dsm@5-RCH9_tnJdN#fp@p0BKIYE?#zYY#yF^4Qw7x#4JVai1bgI^R6BAWybgw z9UlO?caNKgCw~Ysxs)tS&^e4mHG7`Lhd@O=98BqZmy#HXm#j+vUy0tY`~Zl z&VEr9wE^zM5y+zM=gq7&-{c9J*8^sBF!CyXh(Lj}nIVO#;Okz8YcS%Ya~H zQy7BDXINfZxe6X%iXjHkJdBrn{0Jo@)I_j+?{eVM^A7Z99DFRQ3WdMJLP@Vgm2>3$f;Z_+NX@m%-08BMba9t3LeOWHT*Z zOkVd#V8}entX$TcoS4WdWVXTUs|G*H9?*EX(0TcAoE>Z&&3`Na+WhWq>UH;VUXk)I zDYl?AD>~!QnKyqeKM3;phY$VNcwk6Z8euHM+0MxyUh$X9=0Z_Uq9L|7VFtgjy^5|U zx*9KR^YY3mCfoFy*xcbS@JNOGu6M}na~Ns5MhqX^>QEz`6wU4f(mK0o2zzt{q)-~o zzKDYCbA?!$+M+1JN@WSo%>NQ_sE~vWEPn30^no6CLfESu;Elr(6pt3V$Nh7gFDJs+ z14ijqoOaD(2E3bf48yP1Ib;$?9MFe_^M>R5_tT*Ldd?k!wQ2FWqreO{1ybI~W$(u# zGbvrmmbg>!E0jVxrjXMokkDW@_W^}i3mq!?BXOu_YZUnrjCUeZ9C9f+LJ-qr$uU&- zD4Be=c;+kbT2P$-@Y?Htauy2Drj?Y9D9%>}7%=)q8%k+Ww2TovVJu?4!feL+2A@=i8(RM2{Z=|M+U5yDlhX8gOZ~hK z-Pw$+yFdhJX{m_nh^lm;@>fp`SAB`^X+2U$GTazfJ{tg!FfaXFau~0J5*SPLsu#3b zwEB>6TgTdPJn*huZu^1Rk_IT4Fbb=PY%LQj&pu@5*D^Oc*%BsS!i%^-Z49z;G{0P| z(w*g{l=F1#*;3pCwy76Zb1Y|PL!XPMc*FRaf@31MxOPX&M%m)pJ#wvFHY+& z?KAMb9ky}E78lKqdvJ+J-1a0@Z#_BhX@(DU{wGxX7LU$sAo{!^gzluVj8vC5NeFwl zy@LE39_Ven+2l~^GaTN3zpWL3*=oY&{h?B60h4pQU&JWh3kWiaoGS<$$_J+6)#esz z^Q$pKY2WrThb2ua?2|JdQJr9O->tQl*CcE|y0vO8@@&ZX%Fs(rEJ^>I9<9y>WY~@Y zvFOTRYmDVI|5*)sdA)Hv!Jh-26C-6gy8dJVD9vg1l54kq(B-*u*?_r6vTb8~cw<>~ zqO^s#zcU1EzavQ*w;4A({uXMpALDd;EK?xA?WoUp_Ro7Vzui#%jH1PJ&P%ws*aT${ z=ic6~P1fjY$vYxgM}=mm>+IE!*h$_`09vY_-G}hcWir_l4tL?KP{ za&dkG*App_Vh#Lc{XEl@|F#37__i3_eEb7YMO&dY`Xvg64QDS!?p~)#P4IxgVCsCW$jvclb=fktVRSz-a3<=Q<#DE;lmL;@kleKmpyb!XrGN@`3+ilxlpMP@pU*(BSv1Iv_fRSZJ z!){L`g%S2|h!i>?J5`wBDp*rmHXZ%yylYwgAX!XK!KR75gZ>9IwFyzn8w?e$ZOnW* z#%4HXR7pW~U$X$UES}$;n}l`g)GsqgF`uoM`v*f_xxtYpdgY(j^SC12#0nLPHvINS z3!iM3DurzI2f@He!RbxKW0spvid7w?p5S3ywXSj3eL*KaPD;6H;VGPta95rc(c%2% z(NMvdAMl(&{;a+-?Rw5Pr1UOlBYnNuRyIM_5BJ~zj~2DG1_(t=h-cN*8sE}q)_ETP zRX>wfdevby9=}YKL`cRq$zh0nG!Ie(Xpiz=?L4-fRGdZmg2iI*jI0H5;Ayn~KHd52 z)%s8sLJaZ#I24s=D;JdU{X~!M8h1K`RFEBXIDO43; zpfyGncX)y%oMq`bjR)=d4c;GpuMjT`epw$tV{D(Jk#4^o7cy2M0S{QT{nz7k?AS?d8NT9ltO$Lxc~I_!d~r3L)c^f zCn)HFxwp&NK}nQgHub_nkaRhE@2(3lPh(GknN$Q`@!BkC{E;(Sy)(~1{f~Uo_46Wa z)V&gKJt{Dm#@`f|DwL_V4wf~xZn%0ng!(Su&%}4JXR3DRI8|njf^+i9FID;G>5FE2 zz=u`yV*Rq0o3>6jDFJ>GLXP#b#T~%bWhL{(<+8DkIVD2niDr8{L!SKwR6KZ&; z>LY9>S}PxlFJ2jurpA=%NHPJ~<5?pe6|>eqhiH49%eU}Xg5MP@8h?8Q#;@P32-}(e z9Xquua(|n_dQov(&nOxK6L2nEkGyH6&-$%3FezEwXAYVxV-wt&A>1V-)e7wlZDCy) zy*OmPZRt)8ebOYDBoKmH!^0Glz#HJDm zgYkuUZ^z*pgPKbYEIPYp#X0KFI$uRLVSImbc~i%0P?;Bb?=XMyea{^3IA5e?IpOK4 zzXG;W{j9&ChF{{3aulQF%Ijd4$#_dB$*hSzo=phT81=u}F&PEV>wCNm@?PaJq)MMa zqmKR6S|_T_<1V6-f(ZyqNMrOM|p981SVP|k^r?x}}k||phxC?L7-Xf)#*A=`i z(PqfNUGGKp=tmse%WJo)itP~dhL1Eb>91UiP0ov1OMG2Rqk*jQY*YAq&a(OvwPn@R z;Hdc8bC-$`Sd#UinYEJs%TppM#~B^rLdkx?`bl8gnewrMzZHvc1q+o~vR4aNo{XJz z#|~%Y`_X1&{gEYdA{~p9?b?qq?p|$SZSE>1c9PP0Goax|y2{#|00Z|Bq^YguT#*w| zU0=8hcFBkxYDQKith%(9hGV|o8A3zazK2*DQ>HPKett6MmQ^yW-3X~PNhHif0L!9z z#L<=0yH`Ko9Ru3!Ot6Kigeu}fl-q760ynhRPcgFg;}Ox`BEni4!gN8-(AQ z*E0qD$@Ar#L=JZA>c%9D9d@L^y66it$cQ}_4KePkR4V~Q* z?pdz4Geg!jWp;4AA|A@F>t6wdc$Y?+Ukq)os~~(@D^R*LyJ5QaZ$P~*OZ9h69=EEO zUl|oF2pBp65z7lcyiRA`lkCzo8RTaQQ1!>34il8!DPmq$7!CZ0-s4t!)^c{$6(pFi z{=vv7D`pC;|1n?@tRk4NZTiqb(%DQH+cJ~=`aN}U#ta$x5z1MEyX0&AnZOM?Xl_}J>qxQ$Oub;4 zVKZqO2C%Ew?wk~EJPB7^%KbWkj?Hg=>Wj%&6{?7T6Y)T=^0`G0> zYDU$8d}aHTUJ5?q2&J(?cZBiok@i8}wS)VjN=wB4kz+0sS$LT=4zs?uOTz#d$c#G) z`1Pql*ljCEA0p9luhM*{sDr5~dHRiYet+K@cM2_ZBW-M7HMMrXWw|_C8Gxx8?$f5v zJZ&e=;rq8ThC-`Fg_p?AZ4x6<)_vDyz9X~$_>{i8_~^&{Mu{jMiKfVj8I~9xv?)oA zQrqlnWN)vS!F;sv{mcA{g~ZcTUQ5}uAXoHbNFbYUI6qZ^>tC$v-;8xOm6-B}Tq^EAx12KPgZf$() zv21C8Zrpt@Z8Nsx{mv{j*f#QyM$5umFUqaZeT|K`lKx6!7XDrYodagawVq0z^ikWd zXdl=R1Uv{qBP8-mQzkn@eBdg-QZY&xg@w4%8Z!T)j+KUT$)mbz@_&dnD<<7mH+w+8 z;;Ky{d@_;A@~fWL!77A_C4s@dWhH|*kF(A@JmM)QU>`ND19}PeNQ>B5`vE?FW<5mq z=uD(z1M5b(ix!P~-#0C|auSmxYg`ZJ&Y^LS{Kdz35uC+d*4q~2eljuw`opK5c#YH- z4816Z7N@jfb=Ob*s#B*ApC0Po6cX>CvHK`RHsT>%iGz_=F#~~qJCHAK>lWBr6jIUa zo{QrpD2P1RIp_qhYAZYn=0iGccJcA{B(Dga$_z*N(4ANKw-3>f^oFlDtx$)p#C-i# zq_1_)?P2c74CiT(HA7f^xO~*dL@N^_m}CiITFS%47KDoSN;&(0bB=+D&Zc`NG+RG( zysl1>TW#@*vJNPb++*){w-dGPyToUQ*z3kF8KTGTvwS*TjwOVw`gU{Ja=oc@tW4AD z#n_3K^tJBKS3WOMFU-%b>cVw{!8g>fDx`TLc2~ciioR8!jpB+GS(d%b6=<`p*OzUB z`PWZ$Fl3Y1V70-R-<&{C%0xbq_``&-4goFa{dLY)89o$rL*&>}j{qIZ_yf6{{Wpd{U8k>Umk>CvHk&$kziQv+q^EGNg>8GAKDy9!SQl|zd)`-Dy(jG>9SjT2iu z%xqA8{irA)a}rzT@t@Xw$t3w;kB%LZoWQK-pL&<7FTjnC(H_jIlbvlf`C*%@&>hHu zlbUpXk~8>UD%3WtT`sGBkj>%Bmh3o?T6ZxG#$Ot^@)aQmERR7lVCNE82? zv1=BQQS-@MbVuD6xQ6+=l#zK~rzK%bv99XX*tA@SG_p-D)ya778_sfa+p?`{-m*G! zkr=J~B0T2?Cdf`*BBSg*LjZuwYwf!?9lEHr{maKv+gl*75#-o( zSMb|vkL!wjaEbZ;xexnwj>^8B`E@sCF3US6_QxZ2p#R!Z_QPY!BkV+du9tlTHei20 z)lv=4-%9g}x30-?WfRXkdR0CVb6dCu0%vMEd^!>}5TwvMT75S-gt^z^Q~zDZ^ip2w zG4HCXb8f(ONw|`(IiMUVXif6Ci#QMtRLq!yETo+wZp3BgrI-m0GXId^GT)C`8|PS#Hy zvrAQhjQYLzpy!{HxP8K4ejfA!qfbLsaX!qoVx7e;gbGW(4|eyxHauMLoG7sO>cGZACuSue3w~6a)xF>?bupH zLwhcZ?rQRvpA1t=#Y?9t-JR8eqY&cj?;#&s9^Kcm09Q=?kND7WIJD|w6e+6>CY6;9 z)(Xap?()Lo+S9~<0H`@Fe+!$gp)7w=9e{<)7WMtI?Q|6opgvG}$q^|v=cUDI83g4)$DpW&SG47QJiPeUjo5Y_k_s^(C_=k(vr1SoFP1hERv3&PCFSYIFV7hs5|HWOEErn zVVhabcURHYOh?=IZ}iB^BXw`RU`UT5K=ns0*4zaR$>iG=Totb;Kr?p)V5`>ud=puiatXt>>KD3g(#?~` z&J;io^}`ocF2S+D-wi5)OQO}gc4p35d!p4}4?%*(vZC=y(a;y!d$!^k3PTr~FV_KZ za4ywC!WDOxPq}R4;~2D;yn#p&?>*LB`fSgN0F@0YMUWtSR%26QJ&Zf!ccI@Vnbj(5 zvZ2nMJzk!3Dwdssc1HxN3Sn}LJ_&f#(U#l}z7|TaIZUgtly`8krBl2dwemX{Fdsut z!|Ao7t5&X;PQY|0!wzmZLvh(WX{~F-k)3QFo1O2$$Q?(J*hR7Xj+&WS*y-iyDKh^6 zep&Zesa*8($7U-6)+%->QP1B|-~rAZCcB1@m>Cn$ZGsY%fGj)YgUa`ok@H=ML8ZCX z;%}S!cFz%(d}$KKX$?VUyu-k6#d^-Pm`APl@e1*JS6Yh&J(AL|YPr3hp)!4AU0qHb zNAkzt>jd*}b@igiRW7x^q(v`mtef_`oUO7q1O1nRQiIL+#ti9&k?K2pS!JKNG0 zMllDWg(VMrbry}=H=LgGzU8K!@mteMd`#9c2p7wti&+-ZhH93n2t$=*1N4(<;Gj#9 zI<1#J3p=-)EDi>c5HY`hxPX)lCe$Wg;((?qb>EwzHe+VHZu&-I`!Oi3cQ1?%(sWSQ zTkB7$f5b8Y*Gew+FIDp)WPTGna+d1auKg~rwy$(>o+NwNes)Fdry|z>{cMp+ASXOx^p`RMf!MqhlT2pjA z9HGatmZDHTY^wggqgKAZzP#1MN0v4L&oNiGTU;X;?|CCgfV8VQ;d`=&~f$uj}UCB#Q2wa9kO4^+p`oijVQ_pc~0S@bh1Z5 zyJ50!E@W(tseX=WV8z$-UVhB|fuq@r$MxKH?AEZIlibr-!_RT7eeO6K#Kkhje@G zy{jqm$WmCi2ZKW!nYesoX`zES*RQBZ>>uUbOOg#i3nN`F^+6=uIog=5I#nb|>D)YX z9^C3bGFjm+y54UuEI?xJ7r5hYc3n=B$QJo-ScC-hd`*%tO4sdaZbR1TA^?${Bg4!h zA&OabQ36UXfH#)$5k5o7|7)77zlt&8azTia+ELRCKPMuK4de) zpjBr-k=0S{uECWvF`b|_u5~X8T)y{7?^0Z4xb$YkLO$3cqg&pU44TM7?Jq;P zE3!hAGz&R{j|2Tu)>vD5gKoyc3wnY71JFHd*a6Z{toBf?-vzi2SrgDwM zdNKO;f39S%K`RgkgMscSE&5TMD|z5*@WHd*Yuuz(D`E!!>Ssn!H(aFFJ!>hp&6M-IILFoE9RKRI;4>`zLtSRw-c(S_*vN>61eQ{T72o$ZYlppG!6-PK z92bt_$Xw$5&wo8WrAatz)#9=k0Fsx+B2_*JvXcJpN5;`(@^dUjcEx!kI!eqYG3m8? z3U7~(Ysx)a4qI-}-dO``ld z(<3ai@~#%7dCx-MC^42xY_dq}Hk~h$2rGqGS~Wh#4F12z)+B+9FmL&(mB~EYnqfC_dm|YzheX_EAb3S#fR&x*$IEOtA=BWoWvjz_gk0$mt(f<@M+IglkFJ zSIEofw|(?PD;0H>pzh01f4u@}mHEw>y2^(#-(GA!4FlFSPO-)%X8XoSwVCrA^`=Oyx7ytA@P^CQeP(FL0+xo$bgf^{1;h=p zIs;S*foW^)LSJbBM~nTRWk|gr4b^sGh-T4a$djW%%GYJ8vSvg=pA~8<7R*GmX{L5D z|K{G8`IFcszu_7qciZ4wzdN*t(74!FgY66eS8bFxhOs9vBp_f^qu6CvZpE>YitR+5 zYI{V2ef>qL$H#?Y&H&bi74^*_RuBHZRF=>>0AKm{R6$gsdAl!zF?wp0U?v*jLb{TZIs%aF5bL>YD@yzVz8xQ$JQFRqy8?# zKtAReSB|pVgb>6Ad$9zgNrsL4ikSDx|Gv z(~pi}+u_|$@9qPiBvXiJ7BDFYsOu9}p&*xww%hB?+b38k%cbzwFN)9jRUr2H2Pajt z9#-62;m#WUI+oGD=T$0+0Y=I4qElvVIxvSpSEjN-+$|$cwn_ldpQ$r8smB9iK*LG= zs+^{|&gJhyPJPX`bDFiBzqJFtd2<14-)9B5h!G z9JgEEA!aXVXTBdF?2a|T)zSNIYZ3gX#iDZ0XXl_SV{~NZ2=iPaeIcFX(cRJH5R~4t zXJRoZ(dl@2aCrz(1DckL8L(5Za zs<%bkDv2Z?T;pNw=)fhyndUWuD$sYXzP?~dH}t&TKFU$6JeiaKQEGaO@l;AY$>n1#tdjLpfdD_p z-P~V~*7AGvT4HZsX$?1#7G1p$p>$6>EdSyrq2qbOmQ}_sJ zXWK;N-OlM1o?n0V8XhG~2&q_3*o4Y`oj(LVvl=J+LzD0`8swI##r`yt1+RpLFMs}; z;-xSuQsw-K@`oBxPA zGO1l*U5L|SWTc?Q`M<_)+kL6#s5c3=b6!vQIra05p%x1#X=N0Dg|kM_lwcs_D$RCO znXp0;n@m}}>+_WqX1Qzic!zL8^ky|6ib6}cJu)K4RMxd-7%FqIBs^##dDefGbav#> zGFfz5ZoYLnIk%T59Z`-;lgY}H4g7)=H%?2-JBE9(6a=?RD?^M%`J$7hSQbX zmKQ2hu=fspCvv+T;vJDaU(f)eU0Ezc{q$;}aP^cqX~f?vUFwxS8%{~9NKVZh{jIGu zVY@<(5iis!GY`pKJK@dK)$d9aFjJB)A5J)Lmb@bYAJ%j}7hViaorGC=uhzVKzH)&h zn=jfzrbv(D>l4(2OLsx5`Ju-hDs$5GK_g__H@xWTMf*ZN&5k*CI-(6HPbtp?OvFCn zWv8C3tARk#oCY&X2>OUeHB{;}{PnBrG%8wyI;*bakB4vmJ8UxI8K^=e73JT&Z5eGn z9Xxoub3PDiI;Ev_AZ#gQ5QYYTn5?-MOA$s22+!3v zRPSPVTd6*EAGatWfFN>wyH>R`+2;kk+A>`dzHa$k%+fR_6oeC-={88 z9dGwuwHGvBo$4fBqJOEb0b>KhJmE*X#wt85uDNHBt3EneuD_b4aSvkyJDB`x4&P8d zJW9j-UX8~wE>7KU-2SND3goFV_0`1OP~bf}DR2{wpEcS_Ag~w;C-EM+{wPOK zGST@55HGfC_a86Ge5u`^y!vs#Csh~9q(#_(EosMeZSUL%-_C1Q8(%>?^{RCF7=)b&s7Kw{$53)@YV)7gsR}wz55E-i2{YpdkC^K>lh0wXl@|Nf>1H%bepMKtop_qYHHaP>Eiv@r37$Yy>XHh?Fsml0w_E&AYaQAF3 z@yG@GO3^^C!i$2N@UcMr(&Hop7)$pqQp6x&QiyLE>F=Dz60+U+>Bomk=ej9a$>?c0 zMFg+&8PCS;!gvF#GHjoIZMcTCvCP$$GT@c!KgvD8C6-z>Wx2i`-$tdXyQReKgrZPA zUr8$_?Y(ei3Px^pSjR-rc{NM&dk!r9-A2!P(uT}I&*zVe??e~;Lm5wxmP(_5GtvjS`dI`2 zlv)>k6TsYWD!pI;G=dS>Sk5Aip&S@=?Ak8~veUGh? zp78*?^5v(pmHmtQ%ruFj=+k-+!@o(3l$ZUttwOqLg){V>W^+8w9^pblr_b3xuHoRmCo3^r z-G^b$>RV&x6uePC?=Lal$>MeQ4U9M(e4cpr%Is`>>vf{_6Q{oeqMy3uIxK^t0NV|#E@_sZero2>T2b&3=K0F>{9z>73%^xjGrbK$ zf{gp-Ck`2`?w7=0jYKy`K2@cq^ohq%nv`&J)1-F3y8e$-vBfUkYvyA<(FZFO2{h`K zXU9uS^?tRQ~$PioihJbiyzj7t?ypfC- zZ#i7L<2-yyFI?nLV}HX-&8m08cJ2`18$W-y82u#M(ss*rE;RtysAv=h$&!jXJvzWhcX*}$LL zkA~mUFPC0e&^%@oR9ibNR(+}1`Ppv+Hh$V}d>!Y`8fcfv@WmQ=tJs^x+$4~xMBHpj zKPvGiS7^+P@H-0?w?k=s1M^2r%AsDR)Q$?aX2}7(?#2^&k-6skQ!Lx7h!a4PzZC{O zDojPC#ma+rMb=x4(?g7K9tW6L1KerlX$K+ko-(CAIBHLWV7wn9TJ%@@?J6;SNmz-5 z^i<|Jq(q?TD?GT6h3|w~zw@C&j9%(`8mtZTy1%bs1X*o0-e^4aK;VL2b{np)_&5FA z2|s;pKV7QggdIsg0b)vXs2#s>kMQp`*df_;8g@E{`%$+dGU8eUx{+UOQ41`^$tp)xG!So3z9HB zcq*48vWd;@gh&4`t}v)RHoEKXn3PV44>Px~#zTB7n<+&^@cP<=XSnwlV2K+ZdaeWZ zPXJ%#w4aRGzU$ftQ{1NMx)-1CTJk6AaS&6XAP)VMy7^UVc0{7B`pEU?_nM#;gRZ zGj-}h|JHP=ZM6%`YX*4GgewShe12&C8YFAe`Xu)QV;LKw*n+L+RgV9Mc_DUcNy_{1 zd->m+6@qfQv?-42vKIZ(n(vj&q@PHXC4RyApsKzG@@G%ywIHJz;xaG#Fv>e?C7y4+ z@(#!KpV(TB!z|W6{aB}26>2p}|07Y?9wK<>(IbComC)?#(rsNlTCFoG=`tUEZ$_*71K6GC>;%POT0L6Lv^or2Wj}BtaFxTDX}U1fwaL# z_pY`J?62S4H}Ymp$qv(|2%G4#9`4*PxgZkTRHzW2NMVhoj)u23u7milU!M4uD+iw! z+9-qur)s;~I1ITY$)D$}6d>nk z_dm9wtI%QBrs2u11#O>_zlxqa2yLMo7LW7{q5a&C@74~U|NCBNm?D=AKJoshmGgQ5 z@g0HC95e;-T`lVQWcGydt80>h&5%HsOMkW54pNa<|<=M-7aJEL)igaY4)d+utP8LZEq(+(3Jk2bw2#VxB+HhL#H#+c#5xLBqV- z6~)m^sJis=$r@KMRQ{QJ=_?=wm4BTd8$A$&s)t%(;-Sk>ejv~6&=*B$7OC}~5&H~H z(K2pn!}8FSBov)x&jQV4N6f`TSD;=9*!D+QV63iuhhg$AJUg78Ch_w#JUe1K^C`9- zM*H_NjFxF(ylGc~*Y_uM5+~7V+FgJS|LBBwo(2w6sG)CBfv85u5W3%!P;>5FgTAiGEq<$d=*5w5 zSx%nN>uaE?mhJ)*QeHEC{{~>nT0?p$B?P8?o+f#nHiYNl54G)Lj=|Cgp~h34y-<@W zv+0ri4rM@(aC0Tp@)h2@`qC7t3;V*h?h@{QO-!j1Dk~sR?hD_Ljli~`+t7XL4GuS z)m>gQ$dCK?P){oa3Iw?BpGQGqq41F=K`&?aV&`VoNeKhkb3_O}nVKN?s?pqIyP80lMN$i@Jhgb~c-0FGL z!^Q+Tes;I7)INlqyE#Nw0*@dk<1E|ITpQ%5=f=fcA%jfsZK>o}k&qeY-}aKR7c#?* zGOds2LT2inB{znBNd07IF*#8WMTcJ>zdU&kig{JZzBMXAaZ`{X-|5>>WZtrGYq0{A zp;bOLdk>)f;x%9G_FQOgAsbLBj)l&}dMA%^W@wh5dl|}S0#i>{RM)npV64zbBcp=A zkEc>-ifUzGnuNM$Du+-{jZEacVdbz*&t;@g*aUeWI5*f?vLUapZK<5`0p#^2eK9=! z3JMMwS8m*`g?=NY-@Q-mAi9Y3?0wHu5N#i#K1o>t(RQ6%Xhv( zmmMLjwZ)0wa0tS@Zy6YWh=i~+>3Jj-&JfNbRpNC)5uQvf9Dk6z0`W?B)&)w;A+C$F zR4K|8;(BGnPEjvGyt2!MZ!5Ww_U&56;CBfqc=TcHR`gvcF#oc6oYoo&j^BUKxM~1} z`-Pd2GE2}W>J*gu*A@~+m>IHV(jdXTsiBYII3!$p7{l5y2Z`=yJB8JLK*<9Wmse*p zA>2FTh_sIagbgWGh}BR+*x2iL<)u^*ZlO+RRC)=*6U?76#y*EA-`}qMXJ#Pkz?)=4 zJu8BCmrcY(Le$AN`oMcz5dEmc?}u_8WKP?Ts8BRRX8g~?JLKDtnRp?GTg!;x%PTLu zl=7hVIMMNe(tfCydNElnKmv6UZW24~QBd!ZHhU$Q7OG!#dAY@3gEzB1QZH_nK&1N_ zJveFrk+$0(LgN)6@I7B1`uK1k6fBC>tYv?J=hDY($uEyUZ?9jT!Wkdv z@b;8hW{ZU(*4@keG}oY!gx@3JJ0)zsxx1m#S_lK?CoA`6qG9kcJ~>0kKLa|Or~Ln2 zf&p0n= zizn0`bfc7@^nqH3H`}`pzCg8;uzqhH1q?dqD7*9rz~E=6>BXl}F!+fy?<4Os82Eeg z+(A-37#esy{yo1Mntv4kK^Agoj;<@FW)UNBda>P^e=X2*lbka2KqNH9id6M~wSg+$ z5Hk9-C8&JXEa7tT6I70T2P7ULYQNLvNt4VOuq>ltD4s)k-!*h3gg{73e-qZ;1&awW>i9fs<%D`6j3 zX`s5EB;(2HQmAe?Ao^5`A8M>iXh!r$psL=*E>epM%1wsT9W%Y4?9Y&KF7^$30_SEn>U292y&coeplph+a= z=d;ub7=C6`72Mkd-O2y?{@&1nXJq6%A?H_NU^#Q-PTUSm^wuiSoe+buEzJV2xyvxl z$j~0!vjtOCl(5>v4OhUbf)*5;SLaj2J|H&9rs8zA~)po!S>S(n> ziEKVXw{;=qNSZU`zZ76!=uLq9&|)gBCM2lerIQ?)P+;8KtKm0K;Qol$e9Rn>GAb^? z^+pR)JggZwJQWG~A@7mMg&jy4qFYW_u!5x3_4m<|ry%X`8&zHp14z^2HE>Z*gS5jh zeoIsl=Bv2WI371aNADW3d(G#KZvBMPKSqCVM{hxC``4r0JNKa0 z!sbK}b29X@<|+S8^M>yEg+J6!jzZs{X`-3_5Oi73J%9W20xYcb&yI?eKxVq$%hp9_ zf}hnCTCBzrRO<}YOZ*aJ(nE{!N>C#Uw@j|M-$~AMvH;}6HY{uJY1yXVE!TIeT zNDUQcoL}ySq?GyhytD(5b81_8)PfgsKC*3fCVhjP4}S(1O#g!%p+5@!CwHMB!9dAU z$rS3>8kr7M=|f#*|A3IeA~adcIjes3hB}h7_vK%S!*G!2OSTwW7=AA>AYMcPeKJ{p zdd?)kWFh|%pF1wlb3R_dwYL}68dUcb3Jya~mCUaD>Ja24JXqCqXNR1Wg1tWr!jPLF zlHly*1?}TJ?W2Ay5Vd6^dOyt+qG}r%t_Hn@s77Ok<2jy${3J`YD|ZkQU0WHBjFrO^ zsR#f6KBXsA>|BSmK11*yZ?$OoqwvJ3Gh$(19UhGYJhXq44v_;yfpsqjATsP)&TLZ{ zLWUuc&n z7@)0>_`DjeG{k*nD*NXU264qXkHqd(LtLKpX2TZ2Z(Uz5t!CLk9((7LvN%5oQ4t6j z;Clj3KZx2IOeVwAk49{PuU|umj0J@ZF5T$NPsY&@8?9?4nyd}3A2VaWeD|4 zi94sc3!z^uyOct+AS^QV{rT~~kZk7_l@neJNjveov<0JG%CMS}%-U+BqJpSR(;09Dm?#goAz7BK3^Hc0UCLnw(GvSen zK7| zuqJTE+gg{v@9=oL@txRteTe=i;`W!~7sT+C*8IDq4KchsR3)HJW$&&mltN=1FPX-)(=9z!3@P=oALhuUiwmoMEy*I^}J=`Vg_fJ z%6#WDw4n>{#+=@J%GE*d!Pa0VTNCJ!ID3ZWMh^5yXTDV!@`j%3fp_}XR-os<(P`#7 zH|QX*7>{_&18x6>=bcU~g0?%$6xZ+RKnH*H^fbvaXrixSP+H}Lo=e^@`wTpwJMqmS z%TsTmJB9cmU%4vuu-q@(Ixq!2JMoVnYwW@F$uh&7x%?$6@$39fLuSB#e-?*XS^I!qCTpj}!0y_x=*z>lH3sF!uJTMxbmt zv{BNP-?)1LT0UoU%(Ia~%g1VQ1A9+sV|w?*^5X$$91a!fq)~t_s@f|BDi@)%n`33| zs~|zYyZJ}FfzGumXByWp(6*wlb8cP>#tp|ET-$EKXmsBs@5N&<{!Zr8a=oQ5~;h3*OKguLj{8=a8V3JotLgYVsNf`)}Ek%7rgXm%!xJ24aieHWA#B#JLV znbHwjW(Qv=zKPa z4^*;n5q^H{=!3*0=nUqSEq$mA9mk0*kB4_a*J-Ki%bo9_gUI4l zfVMtNkVNym_u+zZ2OBAP!3~1%E?<9Y)3gtz zUyMsBd0#+jfm*`exHc4;cKQ{Q(Ljx~dx9pXBGgO>SV@@>eC_x=y#%KN)R@zmbF^?m zchBXZ?L;N$|M2ue<6r=E7U#dCI7tm7E)V4#Pu4>hFWGjo)f-qg)V8G442JQt_rK@9 z9ER~aJC#ZOb(pLwYQ5QiA9{0FMz*Xqkz8%`YCnZ4)SW+5n&;~awQn1*T|ce|wJ%AP zR4yn${Z-Y#kgtyLilw<$s6H98m5&W*w#Gr0mByKL>0^*(QTnf~I2E$?!cM!XorkJo zf61u>7a+Nc@<^!>4hVME^H4MXl!y3zGt|s%zD-J| zgxc@Lzux#-!mGle>d@z3p&%pj#&Z5!C}8w*zom2^3h0JytX985(HpwDyK4ubo4I~n zrn4GS{I7AIZcc{ez=yxkNg9$L+4yLkeF`ZT`$d#DKSJV7Ut*4lE=aF=q!P&N1!*JY zjnWBos2 zigGo+diNDf>}0UH-!p_+frtcwAR_2A{M6s=dl5R^R6m6qeTR0 zkeWg(9bM8;-Z^Mx(s`Je_5@nL1Y54Y%z)+@*!rX z=*nwfg=(lT@r@=naD{r}<}P;MCa5Q^9u8ODg!-7xhm8v?P{S^eYTV}q4V^a%wx)TY zL5W(J`V~P{H2z(Y34n&kBVWaz%|M-2hxVCCUl@F(GoN}t0Qw^Y$y7CGVesMoD&LX2 z(4YIACzmcAh8f+@n18Z_*$}Ep&mXNYMnMA;%x>mG?bwIv5W!Ta7KvCBZ3uvNii1ao9_vCIcfdzyA$#boIP$aY`4+VQ zWw`2`>AK9^0k;sAqS zn6!C2x_aggOws!fNiV*KDekXt4&Q2nXAh_~e$*8sQ8KGGKEDU;1&23`j%Y*sSzk(5 zy$)!1sP#?$^_$Swzs^KPn;v!QqILaC7YtbW!cl#z5; z8nY7kGq&cqrW&Cxaz_8{c1=T`sO(MVoAQt+$gxE=$PIa;W0C(7L?Nr!+I!@|4iwMy z6er1dLeciy!W=(BU)c*Lp?{YM#p6HPGn)mV{G8muby-np%{2-#z0C)$wtEdHq#U8u z`j_l{%o}J^x%<@NV*^a(`DPmxZ9#SZ5fUMNLM}Jj4gW+=$hn5)Noi7VpeAge>y>vL zG)Kzbmo_JYeEqe>mGLgPcPlVN>aSP^fe;I-k-K z3PNu1%t@y}L4u91&u5*y@eFDkQ-ltbObg6rG`2B>?XD=1Yl3w85cKi5lk zq0XmC?VXN4fjeEFTuvN?kzBg6OKtWrR3q-X@Z>d&KI8EfJWvb0wPh#di^Jf{!fFr; z{}Ct(3%#XLIt)dvP3pA)oKVz0U%bcP0>zh0g8$7GLt%=fPt1KC$UUc0>oVgExmBmx zPfQO(ZgumW?;Ev{TOadeb%PSJHRK*?zS4&>gXX6Nr#GQI(`JTYo)ao498BXWTcGU7 zk3;j~#ZXUmfbK|tEOf$XyuF4uw98Iwv1zSB&%y4#@aRQo6`_}ReR~#Oj!mr5jU!CP zOlH-c^MxVFm^Lp(ewZ0LUHj`Xfmd$L3Mu8YB2kv8HFLu)D7(#VPOKRVWfT`bedabI zsC@qg=U}Kfp2z7mMhg>;*H6hu??Q?^ZE9$YAS63J`}X_yC?W5-E3=#_f#i?PA1)+O zK>ohL%%2-}5ZmbQn#^_$V%7DhZl9xvSfw+mlX3vDAH}Ele>OlARr%BlmS#eJDr&o) zGY?7J3|;fI?2yFu(CO_hQ%I&JyZKn|H01f!crAW-4P~K!XSWWwK^gV=e>PhWp^R~} z_lsK+R17C8{K|}h3Cnq1W~J+pWj#Kk6GsG@o4IGNtV5+sStn7fqLO{ z>aV#kK4v?b_{$GzgbbyqT^{;4$h?wvMW0U^GB3M(2YlUu3=-nX z+or#v@hwG-jR6(*l0N&^^X z{d@1wf+cjtJFHsz(!g`})bE`x&d^lktn%XPQ`isUdbad{0-mKw{CVS)1LJ!7PDihc z!*jzz+YQNLc!npx=H{%zL`=+=j~@vfu+o2QVHu&(awtXdq&qa4T)Xn_YC1G7mVaSy zy8`ubu4ac07D9FT^ncK@0M&N;cX|YGLbYwQztov+s2=#UVCWPA6&($|FYQC1@oD7V zJ`E)_?7T_5H~ADAHb1;jGS7fU&%AGHXS<;;=YZ!Z_X-Rb>!(tU>%nlu+4!8(0x%pC zuki573mDdaKr>czA0}8!$z;ADban+Qwh5X*r|$={HStA)js}El`azdK%m(c`KXg*~ z1_iQGM7#LWgx~|wNw^ocWKV8X8Rsxkl)>WJIAy8)~665f{=b^1! z%lV=_OwgN4x~~cR!LdK$$MYJhLt+ml42wbEk0%O~smjn(W+Lz)zXSS*U;EY>6Y`If zz7?-V2lSd;`<<*L3R5&=zl-`zVJb^fi$eSZA>TeV6(8q-=OL%P#HUZfM}5On+&Ool z?w6-(NuV9n?Z#ifK{QGj*A$5UsDk=)JjaOE{}S@fxnIkVlL@&=Ad&nEF;vNi-BK35 z4OPiSneHiGP!$zr_xSB2sNgr-h_~^DX4fNW!X5q46t-++$^Al^|AVL z#x-d9l+$9qLki3_1Oc`#XP-mx5i0Y;b}uN0VlfjJ?+>d)QEFnK6U z@OZTrOi3DWhJ}8FsSeejx#6xbGB~!gBcu$!{h2H8HmyKI_ODI%zIkZ4qSi}f^8y-f zO(=`AQ$eG@y4!Ry6ATFlJm!dTf!sV#{}qjIkgKzOM&~IL27UAL5nqA= z)4EzR%SOmJZ&i5q1c7hgk2P~Uk3jm8?5JeRCBnbTdF_@uh5eg)J#IGH-fM$`_(8vJ7x~$I|zw8KsrtRymYW3xy z`5Q@v2sbwjGf`Ja@K8XB%60#NB{nE-{6cc@5q9o=ohISzxKHh?(zoD`agA z7K-rygsfE&HHgwDXsQ8g-Cf9LnuwOYe;TruNaybz$%TwJ*KG$0evr|3&{l$C1TuQ% zoeLu`LMF)vW=_&2NJ&=Fv-%nhMRJuv+Mm{-Xi4Ln^Qj>yHqO~rvz>z?!I`Noo&+eL zY!+er5DM*+Pr|6;f}xqaXIJXYap;O^O;LG34y~jPPyf{k!_;T4ukm{|Fcx_50b5%M z^v6k_Gt17d<~fytB@Mse|JXKk|IsI_4;(UCLz4 z4_k$Z*M2|3=yxFEj)Fw=TOWw<-7WfM@*hO9inp3keu1Z1PPYfY--7tw9iEA7euy{W zlsf5V2k}@>CA%0OkUZ*#haQ|z5eXk|tJmIOALC3cs|IgR&C!Tae{%*^qy4GeW zH2>-LM${epE37}d?p%U2di}ydUMon=kUB{vmI$e7#A}7I|3R8p{P3}+FHlDJXLL+? z9wL7+m<(3TKxC`^8@Ata5ZQ1ix~#HgdSuMV9ZIOb9aO|>cMR%peSgsYuM27@iEn*9zXdqh+p;%zeAztnF*eLW_;)+fkZOSPa}`wAu;-N);nHrNQ`D>f*ot`qn`qOXRkR`%##zIWWj$-v_D8g8e3truf3H_#Ulp-IRtz;KNpznxFG5Xr_KIixBvkpv z?%eLthSEkQ$zahkC_Q&CgmsT_ey3%Y(iQZe^sC7yHPvw_iXbuAy-x`>$2`uT2^@v$ zJ?n?(%cY=tm+qDSUp1();5e`4a~!HR?{GYDS%JQqy^ERM^I%g=3S3?+@pa=rwO5sI_^_eG(}>hV^`R0}k0w_Qkc zvW0T)nIK=@X(-DMTu&kvfwHX7ru-;;08e7A+_v;Q5^kr9OIhPbOsXgIBGrpYEl*vD4t3FnBQv3$39FEJAuRvm?P znCc1po!g-J$1NB=6QlDXw+nh&G=;**BVqi`F@yg$Zo^>i(YB4PD=;ZXq@Z4`4C7_t zvVNBOFli9`kM;&DOgHG>+DS--k&Wtp3Oo)QQ-i%_*PlRL$M@x%m4Z-LqP88!{uSzq zwtoG7PT-}o2Vt6@f}s0GoR=G;6XdvFIQiKw26A|Ot}tnvK@Q9J*dN}ykYnxG56n!E zeNN7obvq1Fib^wjYJWk>@liAzX z(~wo~WO|NF1F|Y#h0)UpLe{3v1(EX4kfU)qW8GE=ss&daM*jCbCanYAkHR^qrf2z4 zi!xCCPuVLm?I(11l#gl*GeZ%N5M_+46%-Dfu2DE{3xz{!uX!H5haz9zgTGW*p;Vyn zUZeskq@N3u-I`K>^h5gPzo=6oo$|WeZtFWpKf7B3Hwz(!e1~Nu`5a_&zqrfEQ%CU0 zg#B|#(vZ<0D=TQE02$xz=>>I9LdMc=&ok0AD3u;FIqen=r3W74-V;M8B~4PCBYq2| z^p_6HeK&!+gzI~oY2wiBQMV;B84O*EO4D5pC!ojVm1y&69_Sbt9B*05fS2-2#%CT? zLzb_G!0e^tkmbMilIHj?f=27UIw%BLA-`OFZ=QrqFFzKSFeymWPrpi%*bHepZ*y&0 zbs$YU7o6-3A?;YPJrC&`BzM%t&0#g<`(N7EYKwycvFmqZcH;?r5>!>jOwXIu{Itz`@_qO^5O zvFix*SFT>LRjq@`V{0d(6jiq^F>C>>Go>?F(_zH4{&5VZ>X(6ZCar}zjQOGH? z3^M6tf!wM6CfcH9XiI#4+x+Moi2BGO)*|;EqS7<=TYZQiDl0_&pyMxy8Z*`TU#^R9 zjpR7toC(2w2V_Q=FGFyavGm|rHUuX||4C|!fG0E_u9lUX@L2eb{5C5@%DcH}l9q;xuieo-H9?8K$kOTik+N`OozI z^%4-;`H)d)WEMj2Epm30KZDS_PJg_?140`UPP?90gr`V7((*|LLT{eq`0_y*LY9*M zQ>hn(kk_O%^G56tD)-Z-_|$EP2%Oo?dY}Wz0_srP^B$7E7CoEWjew*dO7T^JDv)eg zc;jZ49aLV}SM5CY9;&;0mk#WALiL)Dfm{JIRIjIYyDa?&RYy4!%*ZBSLAi+fDg$9% zE$&Ap-421MqfMXB&+QTPuBuSL4n(P5nqy#7hiJO(o#tsKc-nq5D241lc=}%{N%xEd zJiT|2>2Sn-!u&4(=hLnMpX}rZjXP9V{eC z_zdkFd5#O;2cbu++>wV&5^A5v#hckZfpzPLH?&E;VCHZ3_qyN9u*i8nt(v$1mW>;x zuQyV|w0kYs{?&o^7v5I78xBDKz5enG-Mi3NvYg{LSPXr&G;$#}1iqo#`)n5-2|cN* zs*_c>pfmJj?e8ij=4-fa^e%%wj1{#ewuinpHIed9%FuV}O@67#Gnigpda0Fn52lOvQdvXTV7mNoi`E}| zm~uL0|7!gfyeH4#nPI1gq48yLf4>wMl42B89TtWmiH;J9<7INgJ#(+ zRXu{9pu11L0o`X(nY*&DL;D+Q69&pIm}J(eTbG@H=W5QJlNAKNNZ-~oA^7V!>sNCo zt16h2{j8fYKLfLx*?o)#b1<7O>XE%CKu|fGgT>cj!u(IM&+Y55{VD95XYeoRy3io6 z{O&7sT~uV%<%dVbB_C{pRWAH_+O6Tm4mv3$z;w z<k-?j|TuKV3A*hbCJ3msO3{}krgZ8)xRgFOjfpg!W+LWaCMdSf!)XWx8 z5^aa_rXMtc=A=+|`dRSEkR6nrUB>oMGAMs*8Mc%A1qxW7Rsgg>&3xoh$s-m}y}=dB zKz5H%zq4?(6MN`n-VJCTT_R2vKI#<(*~hcWFX{k)ig|; zP>nuIshue~Vn_&Ec$*e1!0;$p&hccj>tWGL-79>zb1rDouOJ$J58sR2U4|f zo8(;#fE2Q|wsUHuko-4HR5YI-QoTe+x7#%!E^9w2P<0A&trW#R3Y>zR(?o-0GNX`l z0@rU{WrJL!UZ#B-3aB>xoYci%1+^MMdNDPHP?MANeDyPd>+_gT4sIks9m0dDKp%MB zEZ;@%iQLIG0#p0zvg>J2ITQNK0g zoFR2NU@*yy;K!{ssa;lAq3r7kyR8$vQ1&+H8*2dtl)Yi2zkKgJlpXx9Wd7Glcox}i z7u25wJ+H-co%iXWdt!q@m-7Jhu9!UxlktaUss&~t+a%cRse3H=mItydZ?qn~aRIWP zs(UduA10{6FwbEn$X5DVb>ZzDC>ZQ8%vu+Mkj%o?o{d29$=sWRXKrox@A3m7)aMC$?Q4(ejvEOgMRRt4MUpH>q{RiVS-BpE! zyD-P3<`DF54?4+8Jq%5vp@W}9A+2NpI{1V?`bX^$xRb}qpu-DVOWH;xRIfu_5EmEC zyaLp|`me(Fj2hG~%zK=eS%SJ$u7n@QB%o?v#wUaN9CUEyIS0(Wfp)1OV*A@qpWbLMEErSF$5t!*VtFqL0UkWz#3ovGM*>pU3W6EKkKt%Y&DV<)vGGGR8d zF1+vhQRx3q+ac@p3Fv3YzI^da4D>U>^n^zl3~-SC6!A`i-V@A4A3hI3qmlh8!=FxQ zh!r!=@~?%4s0x?gN7tcIT;kszu>sVwT@2=%Q-H?J@lQ7r_n`60>A#!zETQr8O($AG zEoiJtkrw(G2lZTzzN1OqFnn!!_*?x$80;_=ruF5AktPM^1h*;}!p-)6vJe=fk5MJ^ z0hsoBul(uMS(yGz_2oZ)dYGZV91@>R@K5oLqh4iO@V%`>LS*R|wDEkNyhN)CZ5o-R zBEJivP2KF0!zd%P-}#vxa(W6H$0^iX^Xi~MYR0NC#{=r;dx_Sa%%Nc=iYC4lp`nXS zzG=zjf6rmP#v4fv9k#)=l!uQ(>rd~IjEc!Jb)pp!o*kWgD^E5&hy#D6h;Fzm8hLa;a!^G)os7WFzF^L535!%B`BV=z{>?w z0>@-p8?xb9hLP53$E!%RW;&;Txg0tath@(nwV{24g_!zmCA4=BbTuY@flhLImb|75 zFnP!IrQdi1lr5;kZr2QyesZ3&V7mjQ%hGZ+qK!~C+}&~Wh6Yr2tsg2kEQQ?r%K2h` zMv${tntuO!KS9Tnzb{)uZb6ag^nC%y5_cH#^Xq_;h;WI$&)1;1^TB~!Ep;gFaIhpN zy96aqe25z_eS%8k!Pim&8_>p1tJiYiFSM3Fooa}=Mo{aI;{~bEwp6IO_g^gGIwRz6 z-D`&GJF|RtqqR`YO1TqN)CAQmN`s9Cc=lcN#Ne?4c{WBncFUfmLPyq7($cTKYIt&F@ z1WJE<{Dl0>5o+Jp^H7_SalP5{9@N&Y$ctWEgW8&BQBmIPP<#6X|FtbQ=-u~gxsqoI z!wyGi{-c_O!55Ot&mLWc5&xCV8xM)0r-JW--tB1kGNF0#Km!pJCAjIT{FsNLdH$=5 zbG`(fyJ^1Z+I(omd){P%2R`wbD0|M6Af6{TRv9~_$% zG$E{imC3bO(QT-7|Fx^EAqZ8N|M_7~98?7|>Be*wLgoF_KRqo8d5=Aj;?D(T=-Mj1 z%K9h~+MPv54mGqvKh2Zt`M$@XeU#dvBE}nDUvTbm(=>xAkB-klceh|jM}c_N+YV+g ztDJb&?gzd1DI_8dA0rWSSd-a@$58(1=EjHcP$+k*`TC&ue@SspcJ$^PF!X#UsY<-E%%jxf0>Cw7CYU{H+$l`jwEknW)A|DF(53o^2g& z;fB})O7}a?9VDp1=w$dhBEJr)^Ig%sEAZ<8o6QylWg?^ z<4$ytb+l@bM#%#**C(ZkItw9lO^=1M;yYy1a8AWL9D_P;*%x-+h7c#;^P*Y$FyVY? z&yzc5Lu~oCUg}YD!n}N~n^FwKFy1nFxW*3&t@F7LBqbq%-K2MY{{tj27-rq$>4tT4X`A7E!Ph0pRQA4%0y9Ei~HCzuXzlB8lxvoMh zUr1yqYiTs!gv66-+~>TMAk{2d=;PNH5E~UE=YM?zVka3IdTbI2s#H?>+#F(O4I+<) zMMI3)0e|0#8AxYhclh{(5i&a5S(yoSn9-5DZ0Au6Y2T+$GkwX1%3m=Dlni#EGL!C` z!sl|RzOJugRFeSJO(~=|4jzHBr?PDaJxSrEkF@oh$B$vi+Je4j#|XN5AKp7Rm8#&$grHf?{odmraq#a`OzZpm_AvJJdYQ367(Amne2eJIDR_2>;(nJE4UD<=bS6@Z z!9Y=Lc$|SwI6O?Ck)U@VmL4&T|)6KOPP~XX2;C0Ly>RaH2(*jaFR8!2L-19+XCNy89VzDb4s9|(dlN^C9CaPkh~&lIJ`)br z4cGg}SFS*H-8}2pMH;AK&+nx;{RpaPCr>`xEf{y%Ner~7g!lP|y*zwnP*Z(coLZ(EYFgAM z19@_xra7f|;zteC@)Yv%EFOTWPt_ZCmr>O%Dy zoiVL%JWyGn-C?S>1g(E*?O}9Ze(Om}H}&ZAVs5jCB`UDt%{qWj$d+ z=FEtj=r8DvR`@F$^&O@qc^(Ft2@b?#De{oHwR1~$u>sPQ9X`xIn1BMdlbg?a`5-@K0^$t@AU~ON zx93y|vrl@@_%%FS0lG+FQ_)9bc3dtP6va z-^0k6d7zxOChv<9JCsF;DbVF;Ls{f(kX4ool+PtlUNpHy@Waes{hd!B>yvNiI?qwa zN^}~3XFmy9DbD1mkqTLZ!>xj`w2%=${q_Qj3FK%lzOXNngzV{vAQHwXf>vl~Fxf&5 z+u5IGCuSg<$K}MyfF-DkW`EdSO32CHtSgqCj|rN3=)HjpR7E%sk`Y%x)8fb1d4bPh zuwv%Rs0)Gj;v+o8bLe5HPf@ON{yFp>+*y16xgFlUQ=wH|y9v3k*4Q4anL+L^qkj)R z%R}yOdJcI_!g`Aw@g{ARfSkESVy8<1kfj?kS6AHzS!WL()XXL1sIxjdMw%3mb=t?L zikZ-t!U{QD>2E`!_s~bi*Bwy!EsAqCrau%qUo}k3OMprSGSiDx6wrQm z(7LC130h2)g3NpI|~y;3@6zRMXWkk#KOL*-r%q4OQP)oO%zl zx0~Z$&kjPLx#IVqf8W9m)B7QsVuDXoIrn=QltSL@>8H!~RFF6M;bKRFB@|r#puO=t z0R{{_$=MOkhXZK^GGS;#!E=vzNI1eq1_eJ^bzpq|H``_LH` zs7)3>;JqXawS#&R+>FCeJCu?$L#qx|wbp(=lO*6>&FvbCADIx9Y-&~C^$nu3C5?71 zeIY9ArQhluIfx4Le}8Q;3F0zddj5JR2$79cLBBRjAhP;IzU0v}5LxbE{Nyj;dispb z#s3_F2(kyN?>KxQDYMaMH0>WG)5pIX{wfN|G?yN$)5<}Trst)NlnYQGpzdY#Ap%MY zpNWr~d?KvV@C!w+VklP$9c*SWfg%kN<4Fnum<;i*Iw#%*eVPl$zsWB_$D8tL*`#V1 zq#vaH&D{j`%6aBCslQ;SyeFgl4h8f*y*DMZMbMxJEq4P7p)Wv!_0O>v(08vuQG4($ z42nOj|7Lvxs(!cAbHBX}Rpsx$ES)TXs!~}u?@?{2X3Tm&^ka;`?R~sG=R2TyQ#L)4 zbPbAAJg8I2H=sCPH>Mz`3QE|wPM?VTB>^$ zgHl9L>+pw()lmzoodpEa>FQu$O03_vKb2=rE(|_IoJ5 zon9={?+c}354^^fh@f4l;P#WqdT4EZ8E|Pc9oh}m#+!NnK-+@xD%-gs=ve36GH+{w z39a3JZShc;Bud%TNNI#gtDxVPQik9e@i~7?(}LG>+wlqi;WeG0;SVVB^o`=3ZHAItq1h`$-2@Gx|JzXtB{6Kv4j1R3 z(BJpr)NOUBi+Q45IoS_&5gf<9nF~REv}XA5wIHb5UwOw^aI=eE+obTFha z`ZU7`cW!qDF*W?8;T*You>xv}Nbuc_ECM$?Sfb>Zftm=PpohdlP-{zbOmsQ`dMFq& zZ7Z`OM`Y;iZ%TK_epR?aaV;FO-bmTIpvIwMv#g{qkmP5+P zxWG)OlaO-yj}Myz1*ANGKP;rt4T(i}>h2trh8&quhno%n*`Hjp{&-q;`!)7Vdqob^JvV+kv@iob zr1$=9%N>M#2U1%lhGjzkeQ@va9Z$%o-W_`GWCHoujxXF2{sZL#KZmT7dyOcZ3$+;q38>w^r+?hffs z6p-Qg^p{Pp3ZysN8`o-B6ZY9oW}PJ)l&inIrJyzqE9jq!X?eoDk<%CrM&Ek~bc z+7v-gRSsFsA%5t|Dt{N#EdsqkS6`o+J_lVA{GTSt)?v{|Uu&MX4>HM57fX**K_(f~ zo#spm$RyR&=H%pr%!5Dj|5ivqrs436#^WGJcA~yE8P*QTI)h5TPVhpqF3pX@M1GL$ zQtWW0>=Go*tsbUR&x3pqZDlfBawwpFbXzIJ9||ZX6-dWFLcaC~pm)yx-{->T6?&(j z(OJ!vjgY_VOY!!P_n)CTO!lRMr7qOhxCXc_I>E?l%eg1;9!5TzS6fu6L4PI7t(?bn zFtv5iBGab~db2AUxSj{YPZc|x_Df!n6J5qi8@mcQw>l1P{-c4M8+TT`c6lH-b(MF? z;3Tv&J3skF91GF5k2rE!wji2QN1?xj6ryRvU+PktLbSo5HTioY5MOlIc2v#+LS8F; zt)Lfykj7uHKQnxWkYdk!#Am-jsBn7q{dE}#7EEAhD&2-Csq2P(86*(-XKut;TM8n7 zTg+W%k%TC8Fk~-UUYtt00ok3B3b$tLAiK+07`7cCXVx@rK%@^k zRkoh8CFVoCgH-Z=%j^(OU$Ct!edHf+*M#_l!O!b=b0GV|>e)0oX9%TvV;**e z8bW5=Bxia2A!N|rJSAlVLbkg8o8vTsC*BJJftocCDY{MhqK)9=^^9Bo#y=sV>K(0f zQ#eGDE0u}_AArbOnV=%JaY)wUFHxB7gJg;eZ++Gr33}*$DG@Ow+l5En{%;>Di?wKv z+Veuizm4vIcUPfO(1hd0k{nbDm!G+R)&t7&9&V)BAB2Skxv4hGs}QNT$j!;LDOhX>+ zi-NEi2gpC(OJx)u2Klxs_A;qmkV_orn=6wK!%`Nkv-xq*IjP|jak~hb1^>t-T+@f{ zGmeLAC&HlCV5cW$qZif#+deOCS0i~XP1JiZLTUvMz2b~gB;O-`KOEbQlr{%bmvpb; z!S6s@F?Sg`ld8pEUfMve_cxbozCT4Sz6w$~R!8J~b!b9^B@5XnPT#&jY>t9d^m@>E z9fgQx7McZyQ826YZ*w+5DRb4l8!saNyx){f6BBYq_1+ehnnJE;Z`m1QjvyDK{Z38d z0CILqxN`1{Bm0QTk!Be;B)=)Oak4ZXsrD=^ZH~$#dE1qEI?idNWUATl6#fqnHq2)o z9`Hrx()xDQ4n<@Ee&wg!e8~JRIqtrs5i%QuI7&NSN2a5^f6t$#MFA&m*3n~qD6mbJ zB1hta0$n+LJv??OVBYuDkCPqw#XA4CUL!*OV}_3ILdTK6b$+OF^EdLJv{kUKPDOre z;k~B++>s}}%c<485*bcv)$lr{B2%4oKSiS*(${BH9l1-43`6P3wGZzho#Vfk0b7%> zyZ-6X1@lix_EUpKYyLLueb1y+etQUsrex?IOh14>N)ca^%yN+TUCfa4tOWAA(n*do z2O{qy+WpBK6Xap^W3`E9MXo`nqg8o_QEsSWy&rnAr;4iYb0sS<+MnWu-Q$TdIvTrTZ1lu29gapF&Dn_fuC;m zSO5N@gk8!19Le5?!lpZUn%a&Sa=O&;5--almuK;X-%Xv!8FKWOW4JtWaY?*{nI>fC z<~)16j1Hxx%q1RtBtx01|J3hP6rc>z+Ug*207{=a#ylsxgA%Xjwxgd8pDtU-Tk0q6(Vv&)J-9 zu@j}XtC({09-%}w4-vWME9A(Gl~&L%L(Vi?6``pG8)zVwY1@f;LZeth

NqO$XjK)bo<+si zE#FzB&!A$~eAo+lYgD92>}p?iK>3uO4@MA%@@v=Pr&Q-q;qnBFV09xZC~*qL|LsDB z1JU!Lug;=ur}P;ejzJU*?c^3!Q$oS!QW2V&{vcXW6tZh zgfg@rPZl2MLZw9SR|#+3P|3mbo10K3DsIq(lIX;v63q(D zQL{mm|8(0+oXHR+-Drqw&99;46tl&T$45~7v_()};TM$nLEKhx`Vxw)tyBpPlOk(U z(}|J_9pouKw?`fMA2L&wzxjT_1KD<6>7(&Pn0^PqwbC7>}dva)CoQ>&wZ{5wI_1_`)$07np);Mm#8<;fcYQ& zafg$5IN7e|Z^tV%_~1N9W$BFuR5N@mQkcsvN^AaiJ)%XTlvQDCDa)r zwfmX<8nu6A-0dDyM$LQWI%bNtDAo4r<9zUOy7*o58{pv+4@2z>YaE<*Ra8f`s7+4kC^;Jy(V*k zTp|+GyD>3CW-EvAH0GS1&Ph~q>0P-nq=ibpu4}SY)u^QPAf%x3Fe*Kp|KM$3i3;*` zP9$&_dDh#U4TtlQ&u*+)M9~s?9)_p)1XZ9wRt4L)L;J`%D&K$Hi3Krv!1Usv31WZX zEU&#aVy<^sbeR%DblSsTl-;P4;bIXRv4{pMW)0N0InW^Clo$8Y95it6H+*L`fCkP| zcZvqRQBOVf!S|6|)FPL4-(=@Qjp{pNh14dfVL|&yl;I+3PRqnB6egkS!}0UIETJe) zo*vTaWsl-X791<*pQA`QX?L+sH%hoMvhn74q0r;*_t6s@NV6m{?@tkd>_aE+=Y7dT z8m>hZ53>zq`F+DF-Hj5dZ5|1ffBu1VO<(2ST00=a-R!tUoi(J}`Y2-lcO2>C9e#Bv zJxAL2_CxRXnNZ-@1u|YCAr$P@YFJt3MZr^Hf}|=HD99DH)e};Q0)j^*yj=58+`{}= zeTp+m1SFjDY`VpV0*s`ZRGrI6_bHWPs@n+}5}i+ktOX)HXMd041fkCJ_p{d8?jRkP zroee$f{!-T+{{^girm-F2(y|>BR9#10s070w@TjXnJg4KruNu_J{%>e+#}3qE}+Dug39}@CxmtX6WQVygyQ}O z|6FO?N74ABha{6}k-wsd?8HDm3bE|cp0%Dq-kGMe?fmDEpE9b3@u(|uuOBdbaKiBbKPd($W7e{4**aD(4CKHjhe=)qlM{@)wol0yi6v@u4F1F#WUaeAMt~ zBkmWcCe%q>>^h4WYGT0R$wng7@KzyHNmN61sW+~{&pS}*KytXmT_aTbeu|@ijvAG& zFN%g55&AeAOM~1eM^yO6(RA>72@1RjucTkSiGo(gqANa2qrk^QO{D)_MuDxx#iC1E z$lsAdrKp;UvO*qJ%2jqKyPYEIlzt0kv+6{YD!*# zExt0S`ukn#WLFNVoWEXULrkb=#U1ZGj~^&;Hs$!wpG_#fE?Iu_TPI4yJQF#rVvS;a zr%CecU63)uQ2OSo0kY(_QuZCXi;M~BHK$1VkmbRXVJ261WO!~Z!}s^mkH-7AWy zs{6fJazh+d>1_F^dJ9lRWtEghdjplNKYcH9_d`tq+bI*Be$-ec6}a2QfEvXXwfZKZ zsF9W0YQ@4wE}Jxm_a~2|(G>YL%RR z0pykF)g0&jhJtzto_sb<$Tce@oayrs`COmBmMx7%PJ`~$o2L&TspY97Z}xVOanSK; z<~KVeRku8y|LrQ>1l@P?m@ z+l@Ors35J-h{wJX`Yb0|U>qGDPNkf_`n?AYzOXwpR~|qE|KV@Hi~CR?g2px?snF!} z_SV~CAv9~_d%zN?iKbO2vpRXp(d3ovhE&yUGIyz{Sap%^Nr&KdoecpH^O-kO*{q(Q|JflxX11XR2cX?|z! zH7cmq#0;77qi%&Qvt!yZg!&W5tjFyT)Vr300*z6ZN{v*ikRP?1(MX0NfbG}|G^RUNcg1fGjWSMW zrhn2$Bd5VLQAY>xNSeT{lZDHu@#$QQ%+xE?w30C8Wa`~kiG6a6az1@Bk3eCJd`!^8QlmM(YD zFd?UxukI56Vj;BSV5X#;3_{OoO`n}^ZV;Pmyc+7Hl_gp(-w zC@Y%G6!;$3WqE{w7S!V{n*F#li}<@E#x<26^;#$6lTyzh@I1>p ze&{*MWta6|(4j@SvjLVn3=SxB{kDwsPCm-}m#HsYRz)cpP3Ob6?2s8E9}x+wBhL>K z#{Z@+BGaor&$sngkgHEBEyc|P8P_lM61g!T^J|G~mdydks>U+=RNDrbw>BL4=r@rC z%bd;3g^}4+SuXgt0*W!W{@3{F5{S}wqfPgfqflCm zJ>yF8AC%hFpg#OC3MF&Og$}JD^8Dd3>7J-WzEXE`>2G7mQxUz9%>>AMRIcnq1Rrw8 z%AH-Kutsw8_41hpJEVP_U|jg$TO_wtbw9uM0x9?Kwg31KlBYJ&zmQT#$+U^Sch(Fj zrD0DRog0FZ$rcQgb9YdpZq+eqr57cnU50hpB2X?xu0D$P7Rr+iHF=(7MLFv0?8ywO zD96NM`-jsBWz4s1!${*$_|?^!+po7#wDV5XXYn5>l%-o2f8Pa#O`ggMhxnmj?pjwff9evb&R3E9}oc_^`>KqSl9{SCVYITX_-#+l6YD~W@3)NYK zDu*%G%gTsd7d-oYZ4tFPqVCTcB9y;B#{TUN>N=H|&nIZ0TICn^xqTy4AERrJ*~&+C zfwX&H?WR$!=kn_3hR3Lyey#Rc%pQss$605_nGyCIoTuNfMbR2FiA@a+LY)t^_GxXP z$bT|Uw>|%%V#tPsZn`Tf9lGTD@~#Fdjvjt6d6XO#VOY`r3qLC4E7cgqkE5(7J+ zHiUaNjKyi92xKpBHkG)du4&&LGV?E}Lv@n*vczxHK5p=L(WeA;jHg-dwwj^#-1qtA z<)?)F@}I2o16R}{-Td$*!UyH-VfkieCCbGaGp#F7qMY)nbk6sTC|9FC{wdTHWiEtF zC9Sj|`@MokoEgr@dByS#mlp-Hn}_Hdtu`R%Vy|N416pKrE_kIu8Hk!cKCevVN2Au^ zmy!ErcBn=7%OUUKB5F!6k&kEdqK5Ss{_-cX2s=f{o!^8=%FWICH=NL?fA2p~6-T&F zbusqkcho7dbXp7XN0m^zW3<8bsB*+j9FNeVawTn!;rpkka)q4q+a{or+rB_Hr6UUF zTi=+x_6tRf%t#Y2mZQMqO7NcaL?H-Un8i)x&pl~ZxMGVGGo8Fo^;3|gqxJ0EF)O5y zxz$`>zKe7lJ|;pGb4VdS`I2o=AJvl9L!3n~pt^a**8~|7Lf;PTDCv(vHS@iPKg?oL zm5pb(jHCxQ2dO>Wk=6| z#T*(N%a{BRN=3terwaIc*HKN8_y*H-G^)*98Y{cuh-&I>nlALjsQOY>md%q1RT^)v z*4)iN1A|8|e{biZ!RHV4lPdve5PA1Eqx&h;|0AfQ?>dkA`mgz_NgdFFdH$-L{uWwl z8>@F@NT9`V^nbyBoblN2?mt9)H_$v%=k%p6KRmj~X<*y4gvUs4je92&q4}jJ7H0ii zXfE16s#sBuX0~ZF|Gl9?Bx0IYqDw?nIsJ1+lo;X1vk}8ZT13eu?N9!~sPkM*Hb`g- zC2rk{SBxX@cI7qqQ2VN^XvHe2gS%%*Y=(Kk~DH?*y*`udn2dwqhhXf1>`Ulxn||Nj~qVr+-Ls= zAbaIz>9HJdl&Ucg%F9nc>9+f?w!QaInr?lM+3`9`_56@(5O{}@qpjK#j*n5XrK#K_ zCj*rd{$|n(siG1G@w$(DJt}sF+Z6H3p`z?z+PyYIlxlo%VK+z=rCYA87@0ewG@H3s z(K07W^;#~8=^CTt)ZL5|)D*~po(cDlsUqj?Mj7XmZwa~UUif|E7s%mqO^4dIf{=Gf zpQ@f-M3L49Hr0gOEvjwpT5)>v&GK|nBx1&JwJ#DyScacykP_DCO-5W}P%tW9 zf^APEK}E^y$7`G9P+?l8t7b|R6^=}t{4wwZ<%_;-K9Dd)1zr>4-<*3W|2|>lO{*fx z59goCb4^5fzROit4to&%x0gyix*Y|RXI>KXjibN>^@D(IX%yu1TVj@+M*+2nmzpg9 zkb1DW>)yjV$Z#U7owI=ysl(oQ9I;48T4~ZC-#jCv9(^JDVsZ}UUa7H#))t}s(LEx` zwy{L1fFrol2Yh31e;QVPI7tr9Uf_zLN6F@{X`Jb=G7 zo?4;a+ek8c)%`4Q3lb?`*!=pS0i`axp1_ojU+JkpA~Jo4px$4pU2X)5(~G97Bqhz&Q)CZJZ$fM#803mPcAxy`tf zj)%=o8@EgPp+WMENAxFU(Li}Z;nbr|)DL^5`pk~tGu>&81HJ61%gL>AI`tXqs4ys! z==~-5&4gL>8xhnh%S}_{4MZscK*Y~CoMNrnL2jJ%6AL(PcKzWb6-IN zYLd{qA-1UBEPX_4XBYKt$L#hqrckdX%iA=o6!jPgsJ8e7^$ItM6qIhDp3}Q&c22?= zL^uM2JQ1%su>ag7)XC5gsoZo9Dv_9^P%S=3#rFUDC0krkamSK&tSbQ(CjS`)EPh4q zwAe;QHY()3wlOI*Rf62dQ)-+(Q6ul_P4_N}1ITrQEV7NNAJNj(RbcBpV%V;i=Fc05 zuER?stS=Bgw*3vLC`8~sYTW!b1P!>`{m9Qppn-riPaHFlj&(xyl}d=z@cYBfm22@Kf-TEx)hN8!3HeaY2 zqqv=&w47cWim2X5&ZVA3(O%oHg=DrUd@g>HE;S1e<bYC zHfh5nG>=H$Yvb}p3uBd~w$vs(c2KYVvwsDer|xu3nwjEJO9}~bzDl&o35y*)vxK%J zV+LoOhw(Ud*vXjYYiN^of$^mi1zLZ2LHygi49#zB-WchiM+?!napBJSXudovGOC$@ z=0WEr!#$+&sQSiEe%lgiTL>&s9n?v?(>~ zRhHyK8&!SRr+#c`J?IcQ`Bo3DITmir`6Qr~clY{{I0Lj+)o^oX)I_VX`%!N)wa}`V z2hZIUN6Vqo$Ooqj(ZDC6Mdz9i8jOe2IJPFD!QJ5*V#gXZC?t{4^1YAxR~}3!?NXr} zL*>N`3tyBo?EWmssf)5rR~7xFy(?7Tl zqvc26jKfxoXnAg+MIiPZTD&jQqT1&{n}p}?ow?p{F z&l;h%KegzP;W;!_Id--G>>!#6*=IjbL>dU9AkC9v`$S)oHysL~Zd8PfDe^OTPd_u0M1DsXlE8cO$p7NPCrQb3V#?Ttp+{_A@87L$w}&$$ggYPVp!mZ zyyyR#q@E~59^!{d`Vrd5ReRE3QN|Jlzdu}S>AZ_ViyiU_JS-?k?dZc2ZH9uUEEoQs ztVe#^bFUt&g%GvpOmwvI}^hHN5y$1Qy?6S(Nzvk33s$l~H~nEuc{9!Thp z<<5VEj7Rbh{718fq?xBgzX_fqp^A-}tH2udW06uhu(K*dnCMCKE> zQE5R|fF)HAmFxs`4d{$eG2o0bD{U1jm{w%maa%{JoRXsRcO+0oFy6n2%on8tEZzU5 z^P$ubN^`+FN(6_fZjQMj$NUQM<@w{tIlE+=5!{ZPl>VtzFoT?hq}rFnERZerp6o}x zAQXA1oHh0~21NxtN4evJQRLm88z1>+6n-7jL+xdaLeT=Rm6zF3;hhTE{^^UTSmJgg zgwG!puhEK?s2)Lu=jtMHTs|o8PW2<+upi|=eR@58WC#@;_m|Dq{-T1|lZOEgN+`cU z-}!zs8)b_aRcTUAqF_L$WXQx<6ddJj%(}ycg7np~!A!SM@O=WC8Ko2Q8%}0XrCmnq z|8A1)r2R(vcZrW;)FP1DK!4z-!c(OGxuWo9nhGhs+7^@bhEQ(wSRs8!JjxU2s;w%~ zqFjEFve3#El%+_%T|j*jr8Q;eqP{;yr7IV{JCClR5*=fb($q~<>}KeG@%KF{&Ns#f zx?e;2>TTaJ4+fO1e0@n?Ufd)-ndgQZ&TsEZLeYfu=>fO`hGt3|%cx|1r*^Zs@i$6rM(%?1QHZ zc2iKhy(OD3;yP-Y*tu#1e?Y0TYQ@R{IVf$Q{G6v`8Kv^5Ew09Epj79rbWPSC6p#I4 zo<^aLs`6*$o7(zObx+jxL9IQi7RF^dhQ2_RiymA?Im@U_+J0*L&v(>kb0lS0M1H(`71s{y+z&K@@_=EsKDp%KD49W z;Y!+dB_0;Dg$z|F|e}UL$Ro|4HB~i73v!zBh=bZ`no9 z7!bzAq5meFP&ZMxMT>~Qv&om%%?GK`pun7j##I9iOg|VntS_N~fIeG8NHH4lzuPW+ z`2}&S&HF(yKWZ^Zaq?R)qDI7sT7U>CYJgq|x8ERYE?&EPyyrQpo_isha-kT-?-_9i zA3_u_;rdROxsM{>e^eI+CZfdKzz=@E>QE^2+oVMBVWhn$OGQ5Y9ohSq&YmZ51`P|* zm0Qm>ko6v!!)ZB7r20**ao)=T>0A?!oGu|p1~)1)hsx(jS6S`tV&{tVUgkni(q18L z{)OC6S}rI^+RXTXu9r}k@6x{i_ly9wn=>V=Pf(DPl=g+}e*_=#*0UicoL_Psjrk*Y zl$fc=tznKw34;oGYb6;%{?M)Vz4!yg?su}6{jEa5BcYbzK^!Rfcb(nRX&VL8SI^z> zMie}L+?;K{3e1!$dDY5nq%Ea@9I10Zl#3uUkvx(pJze3guiEQ zZwV3nq29zc(;B(YZtH9h-b3z#@!pj0k0O`Kz)5n;@5p(#BV6zk5sF=NP)P1}MRB0x z5)4p4v0nu_w?ti0%-LhQZ^Z#cZ;Btxw||bJ{LPt03V%>E&3WwQKPnVG9mf&QNQRWeX*8?IU*umKGaT1EfPyQggCzNT$mbWL?ee}F`Q1->{d{&Fc@k!K9!N$Zb)S)KVX(Ozty@xZ1}Q0nUC#bI58DZ< zE{8&v;jbHYx_*cR>@@7XC?9b{ffrvy$?v70;OS2`KUVxv;Ct{ZQROuh*nZjC!kmo! z6%Bv4crDe{<7|(;#a%9!h>3<^tOQb&9W{kof}qJ z)}KbjT@_M`s80L(E z?`7$J_9Lib6KY@MK7bPHPmd@rm7s*p12bM8Diq(t>)&YmP{Qx+lKKH+6jRF2mAXQS zjGyYFmlFMuC7|%&p>xNPanwNiz-`Ct1>0iLy@<7>r(*A@9u( zf00ri1zFa~E&1k<>wTT#brlNao33?;%N#&XS(Phe&F7GW_h(7{Ko&B#bInuJFCmGa z`x+k+J5s&4rE{G!07>lUG#4jBQSp41&3z5f>t)G2QzwlC3t2G4LDt-6New*VbdS;LO-j~AT^X` z{P!m`5Vv%FE)n~&KCQwLGeJY)Vr=2ui)=v`Dl&WnndraoMJ^9~hd$avPiK1KOA z2fM}%KBKOVVS$<2aRkF2;XB>Vs5|;P+W+8F)Cp=)9pxqXuBP9t%9D3!e0`RRM5zQ# zQuB1=>qpUqfBHzsvJ@ISyjmlkx`swX+f%0`{Lt`g>RNMPGaB^=un20`p^^QNq`z%7 z8nKeCOL>go5vN73b7Fr{Be{y|pVeE`7@@rErM-_D*W0Q44*H_Ti&nFLD!Zs=rMpKO zpG@HEFp7Upw^5kC99dY6N71OGk(wO3C@6Va_lx@@JTkuVJgvqN4e936 zW}8{@$ZL~xChDi~2vwD8J?~9CeDF;~Pqh@9{JSh9e4HLlo=0;98cq;$UO?{wofl{l zzvBOb?5FQ~Bl?R!Vmt;k(?E_ev# zM5~9tO=|P#GA*EMdH+6<}o=!|9g1%%WGX^(OI`s3id>nr|KO2 zSB#N4|HG>u$rcnleBPS1vDuxTjtQw*i=fcF2`4EcjoLrZpjz_Uu znZZt%3H2>H==l4f3W^$6jqk0EAdA2Ovq#pv$g0bJ+$Me$S+oTOjyt|Ymb2&Ny`JbJ zb3}U7`Pgz4P9sQo^2?(Ie-b*47?t`{kC5+@3cnG>81f{pUWz&(hrFsirwZ-_A-At< z(Y+i>JV=&tl(tS7X+AoP7Ix6!!8^uBw?qe!GN|fVp5{$Fn7HeFVvfMO#lja~KJrB= zoz%Tw(dsCf6r#$mEPxWv-G-($2MPYyBK%=H3gucgJpL}7LwT0vKg!>PQBL|ulEe5d zl!Mzndrt;XCb8?x{-idFs44mQ8xiu%j}tFSI|@-)zwQB4(u+s`_6a6KhA&nci-SQ(_qoM6>>4fXjJ0&+dvzd!w>%QP4_FQ#C5Am=KX;i&+9+Cksef#C6~#=BhAsF7p=ihMp*8M)6iu3q zU8xErNl?5QIZClJY{ zh-A(tBCfIdeV$H6ywdG+d!Yi6c!Sxi=osqu(Kj)~zelxEh6Me~YpDKdBRHG6-F}85 z3L6$hsXnMUJ!h}_mKT*yHIQgu{E13jm-1WxbfaR_!l4KLYpAfj=fdAEs@Qj8_RyEbyNQ{ zRiGVe>6D!R_B<9fy>C*LuN_5=_-vzX?O8;w_`VyR!-$L@8q|xn5ncu`vvU<8^ctz0 z)$&B0xs#F8oh+!5UMa9o`Vv))s=KNS)=;@&UZ;d46jfY#bIl75p_13L){_a0D40Lx zlx?+vA{R?mP7Cj&fcNvOGQ5o_BzRZTrj8Q%)7mW)3fqywTDY`1QxI7`g?)^x%0coR zHL7oqhLE21$7cI(B9bTRCf$_&hH7dWqErpasP6u~OfSrA>7-DamdW>H3AnWjc`2WJJa>a38)rSa3(-E7}a&Zwi>A$qFR!aC7s3N-ihzc4HP8qMYX zW(!Y@pxKSMti8ApM9CnMb(=QCGep|yK52-2sZV{~brBD1kN1Z>L|xV&H55TIC`s9R z|K7KDlvGr@8_F7r5?!^7QW1Yqn!Ub{tUnFKRaD9LcFEA}WMtouA%8R*qCD19@B_^P z0;MuC-O#jf^a4?l4VvUsaaHQLqNP%gc6R$uv@{+)_)1a>ExG1a96dDAV(<5<-dsIA zcJQ+M%?KkrvSB{&kg$VCTr4f$TQ%Yl&D17wc#KDW8t%Qye1QgI#n+e;a#1Pc!}0%e zOHj%3z-bT3m#7$b*E7UU6qQZ1Z!c9*p@OULew@U0)0v9VPQXArtlUw-M z3xhEf_^*6G{&haGuV*DaE|5hI&+M%PrF`VPf5Ve1^%HVD_N!RGql_F8{^u5^8j*cp z^(Nge!EYIFnoTRBnv?5} zQbUoSNxLzLFHrQln`K-=6^hDPefak}7DcM%sVs+#QN)?+j##n=DzYsQUGQB+#T@Tf z-vTp3 zf=*JR4$5mfL3-uvglc&dI0B<|j&?{@ zc2+3=yC~AHf1@%ZFG8yLb5tzd!ASE^T>jVNW~3TveV;S9igGJ%HIgJRQC@@m&vD@* zlw0-vb7Xjf;B(iG2z(eu+2VlI7mm@W`10qU7oRC6aB-#PAKW^zy2}eJBn?caew!kkQ=>Xu4|v`)QNJwfx=~v_YJauQpgop@x_U|nUP|$yj^i1c zM_7p3e}Wy1vc*vA?T!Bm1xirL9l@jaA2plYsBwuMsHRn{l3xufJ?Wgp~ukCI|u z>by7XQ1ymurWn;lf*(IQx#`A^s?F21{}>3WT-=v6K8q>|by}6IDyV-x`Szi=TZH~b zKW?J`4E5Vjtnr2`qW&oXts-52)Em88m)S#sdK#gsE)1i{UR*h{UAbmG5Kd7 zdGfz#u3vFQzQZr*w==FF&rQK6;q+t3_jXhGqhl6w--v2|SN{$;Gs`n zcf(H6A!GgH5KFdp!uUxOxq~KZGZ;M~;hjY7Ut>0=7I#paj-%Xzm!CZFuPr9u<~ee*Sp~ZIT8r_yz~# z@%5mlL5p&<+51p9>w6Pz;xuIIb8n&b>m`LTuD56&pt6+v=?PjG7>Mbon4#tv+DNhuX&R7ouk9P)DSXXg7NlwJqLMy7>G;t@althg~vIbA($W z!-fnEe|HX1`>LW*`wC6WV<9xMAkDQEdyj^FQl3lB9cW0t6u$JA6|KwH7@tfKqfG#f z@$dDEXhWAWM6T0~);YQ=Cv11n>Tkr^N82fA<+E0Asg{S!#$_(^X=ZgaesGk|IcSV&%NvQex01N_G$0E)?RDxB-(D7al?7- z`fjs&7{U3YaKHOLgW0r!RpZ^JH}H$@<9KQjYrAZt17dTIVBm;XK7Ft6M}MP? z=&`A5;ePqa{Y}I2Sl5kZ2fk<~qQ8ezM3lDy`e_AQ^cc@N9w#jI9DQ&OEI;#~J-?OqN)~o;mZ{F)nwb=kZcnS-p1wdL=WJ>m8 zAxLi+;4OYm7}A4J)gO>p3#r`_-8Z-^Q_P+jl#z>O;(suPT- z%v5~_mA5&s%QYsT_ng4U6&J&xVj8;AH?tUjF@R}4T(rxft5uM%+%$btpIuN}S6C~z@B`EnEgG9LZJ~N>Ve#gsWT**7uP~p>Ixl|l zm$d4+9&)qKgs&)G4CNU41;;$IAXEFMU|3rjWETjCEiL9pPyR)!tE+XvJ4=3D8zUEz zW<`RZMK_^4zsik=bNIlgGgM&l{X5|H@;2o*FJ->p+^ahEb~o@?YCO7>bD7y7y54Qz z%(2X7|71}WJrQO@z+*X0x3!QnRUTLVc_ZYV#JHv!i9s$XNIA35N!EBQBWHG2HDvB= zwY`0G7xYtAmqesIhM{ph!%F2Y4B|%HO}!Nj{d?)@=C1FcyVf{n=ec~=_(@>DBllvM zrH^?hrM?Ab@~0Os?2!qEhw^Ku(TMdJcUwRxa^MZk|rc3XO z{h_~FTh*rM2y_D?Zq?772sy{+mJ0%cAU`jDvrCWDtnr}VWcwG3AaAv8=-nQ-A@i#yp&_g>B# zR}C&Pu-*!W!F+|S=YN6evNkc-?aN`}H|prl#3Yy;8|0ai$_G=E7aR31xWc6Qne&E* z?Jzkf71ZrOe;9>Ys*iJC0<{gsQBC5Lp_X?ev%1_BYL1oT3vR?ft;wyZXIdasCMU-Z zTp9wQr0LrRJy3*%h+lP{dOn0SrwVxoi9`HW>dbu8+YnH09C%%~2F4!R!Ra@~!gx{U z^Ae*EFqUdEwkdlH!zBJb7AYRkzq;bfs`7G}>8DG2rm)7d*PGvtPb>x_{+NiD;$ARz z)SAy&)(VsK;qmS*PoZZiIHupx66mSb4HUXP0y>&T853TAhVF$eF&9g^L38i&%e(S~ z(W_U8{=wDTpk$=NGrna6q}6$2iZt3FYcqVcp!P*bPI|ui-grK6X+;`2#fL)dK-=Pg z;237xY6Y>FfoQQihfZJ~eHNx3yrnZ|!Ih;HXet9Iq4M%BDzgxi-uv?L5{HR9K=1nTAuDR8 zLVNLTJt42pu!#M*CZSskEMa_M&AC3Xs9)}0#$^Zd{5g#pb*$?M-z8<*mzZZdZ_aE9Z`V;i-6M*&7#pTxYW1+IkD7)FW1F+wLNGe!Z9dZr~O zLfwG}H7R+54d^qaU(C4DdN7__*q>D^2ctgY7yc#oU>sFF+7iDXW*)k^llmNE{eE>N z%zM^B$p=k&a;i|??__M3F%F7nrZw6$xj;45Id$E52IQ8SmGjAJg6TKX{=9EAn6d5= zHQm&}w4Spr_>vDClEbZpV@qL|nA$y8#2n5F*&3%lJHY7(V{N1NOE@iQWz>wi3#YWO z-M@I;0jBgDH96QDwljAvP^|TbjZnIK=7dIA@A68#Cw<+W=T{Tlv+p0JDk35xomd_P z>Agchl&Ta#npBZ4z1M&UC|&6#6sbZWK&Sx{0s_)|3B9+_0|XL64(GSd{TJ?C=gylw zYu?OSd(U_6{bKfK80&)t6Xaw*$@01MvI=-1DE7+A0UspDWFAM?q1m40^;8+z;&oZ! znO5J`J!EtOpUVEs@TC4_CDBE;ll@3`%-wVTM2=b&^sQ2!>jn!k>i67j&BxsMQ2HTe zO81VwuH$V)B6pzp>iZ(9KdoM8uKJE&&g&8i8h-Caq!XB{{b^Hl7)m829c9Sscw25O zzrIn|rn;JGEB^BB{vnp{bVNryOYmuc@Ix7EWj{_1=DYI)Fn@}j1x3S}o!(43J!A8x z;+AqV5JZyaL<=j(Dd2we~x~c!q}1wl=`2qO*=On=}dclYbf2~cn}VN07=&? z>z$phZ_gD`N&)^m1Pm>ofgld zmCJKqDQK%vhyiT6;~LFqD-^@d&y`q*e}W_@;6-;bbL~KX{ctx}jc1-;kUbdTRd7&u zI^p?iJh1-J2paLm`n0Y2?))&OwzMSB*5ah!Oh`YkTiq+m-ca}9K5f_)75?i(^siYP zhpU~8vL!|*Q?}fl2p2m|%_f@FJbIr`QNfo~lNY`%s*1`2V)%b~A3QV*$Cs&*2E3be z0=ORl@~)V=iNj=wSC3_vy$! zA3d`EGkdc@g9}PqxP06zDiC?Wqswrg)!_7fJswXd(TKRuuR2?@epbyFdbfy`-jb-3 z;g`*gXjj=SR>{{Shw#u1vbU-+#Acaxn>z`9K{Jxt0t}hbFZ|qrQj*lMCFVmfGY~?p zg*EEdIGfTO9h#r?%~ax8ac%zV$$nj~o!|LejR^DW)~y9|`uQ~?_Eobx3qtw|rh**$ zHCl7O^Mx?MRe`2(nDmF;9C2~Kz_vqJ$k9qudq?o<$H`RK+Gb%vQ@j05- zkey(2<>S49xT33)M^8^)t{vtKCHnbjZSE3aRrh`~H-6gsWMl-Ac3^C$ph5hxz9G61 z?j3o|zWtE~cCW+9Fy)SwXu*0k!H0g@=ovqNGmw1}z^G+{_l=^3j)WT)(O5mRGXTLX*V(wwxDPqcMOVqtpW(v7EmYN?Q8)j&AzhN`@po_r` zeht9M556Ptld+Sjm_6Kcm{5{dDA4vBp^XU-R&wLpts?|L?HjYQnPwi9+@M2=ROU3z zk01ker}qt58q0wY;BW_{%M{H3GLrCes&`4t^{soGj8Uj8e5OUOj>ap_bQn`s@=y_ySu>+gl1{GoLn*38-1`CmMT zabk-rC*7P$O{IyMRygK4cnwy~wiIyLf2myK;P#=<)eTxi>q6-vz05?mjOWHLJnV?r z>XUn?JHbbh^?NLbEi*f8U_Uu)P!6(-#c!!DQcv$*4>8mc{l}oVLu+kuEj$u3LWssx z54**`3(Co+IAvQv4T#4L%Ou+!>2Tk3d{bf2ss4S-sVrY^AHs&e`cld(56p);&qYtm zYcGkYSMBsL&`2c&vzLATaT7h?U2VT8cCil+{B#x8xfTo*SLaYEjdjLjvVrN10EDZqXGhm3<~D&raa- z8f#aK<{rFN6W|dKl0!3&PPpQowM{8mexHUkEO05~f1mHurN`#jQn6j@BfPd^Zfk}B z&2ttlneF(&ly4n`{ng|oUpo~z$)aFnlPbZaTA z@udn|*XcU_j~lI4yE1R*2G(!K&ehU9q{@w~-+7IB8{|HGC16+E?4R!_#1cXzEI0G6WRGV!}9m!>sa&ddSZyM6{e^od|2*LaUYqdZ@CVcYs z@Tg70m9nXW(9DC*fj1>69X%6Sr_mm-(tY^Swvpwn_a##;4COIaen*}G;E8w4VCt;} ziIuytDvox@nh(?+s}0tT4{O`=Hu6>dcrfslXrC~*rwo+BDt%2xQ!$jRQD<`x`65I5 z*rYQ;IfrL0M)?h%GHW~=D0i7;S9A^GT2(D8$baDGf0~1{)d_ICs^7G}!R-j-mqQei zw}|ou)^{NyOYH$UOoFE)%GP){4x|M2mePeDKW}rIYU(+xD`7H<&Q&cwa^btLxw>7FP0__)erYhXj8iU`Qvtxp$ zJt5jB!%1PMe`?mx|?YJlbMHE>uwtYYu1{6w(%OF{VoX#<*K_;d&hd} zx`Mgw^&1ATUHt2+`8hZ*;WxuzuOO9#q9l-15TtaIU=KXPH9>QF?wq?73;mSEkn*ePoHgU_nIOo`Jr z<5xi;<$lDB^r_P<-=>nMLW65?)?@uCXvMpneCkv6_zH($ZN;LcP6J3THKOT0&6&yj zmns4i*FEC&L0TX0W<^$aHTgTfZg{BOj8kyCAqp%dGjoARVgp-8@shO z=1lR!m|B2&O3tCTgP!qU1gFlT?Eb8TP`$QA5qh}6bG567(L>T>Gcpfcpl1FDF0e?# z(vsdR&Nk0NO@0cI-{eMMULM6JJ}d{+tZBa=j(m^nR996HZ{snPsKvE+R{g~Jr{pHz z>f3!fp9__vj42e?&{|+|<4Kgck_xxaFjCZw{%4>e)8t zoaE4q)%Kqje^3O+d|Ts0=@!~3Zdwi4SHmUBg{o3DKMjNE7B%|L&=ix7FR6nOn+l{C zg9)7Ndic)}yOkGrO4<3IuN~dx^azgejehG;ak+7d@2%m7y`q7;W^+rr~b^8-TG0X zB|(r${qOAv+!ya-=o7Q0ruq%*q13dkX8FHnpL1{FdrK$9aINHNn@29UV#=}T)kL;c z3(prGEcygf<}^nzEqaJ6N-h9=Ck2PSe;NNN&u}}jpV*fj{uBTB}*E3<63y~NV_wA zQ-D~j!_iMGYj8#(w;!3?_f*FVRt;- zpG`=Dm$i@#>O$4q%YhC>kH`5u6Q-MCl?^o>60_n7Uov+! zXG4$hI-Y<4%gH~1I&o;Ad-#ARwH8UFXIhf|eoI<-<*Y@-Qs)4b37%5vlNk|Bw%+%6 z`p;(VtQ>V0VxM)C)m%uyzg^eY4aiJq9MbbclV0Wb&dpKn29(-KzfyBfuVwbV`}pHvk`e7*ahGK*<*;?!^=#i#q<2dziV!V>HP6;;HZj zKOaJEa&z}~Sj1vJCO2&_GO2d>XF51=DS4_w9E*A_^>&G^W_FV`+b?Ri-_(Yto7>L0 z0Imsfugr-=k`$#>^b_p;ycpx*uKmBdox=(&(Nq&#Vr||8BSV0>&}1J6aEi#zY#7gV zVByCQJ8qqopgl>kdJd=g;%U(4h5RUqj-}F(v+~r@3AmT6Z1{S=>4GJiCQ~l38yb0B zAZgn7+*r|S*~djZjZ#Q6BUf)CkZiP?4UjEDj%{jCEIacNdcU$0-EESmZGq}+c=$PD z?4rv7);HL;ybO~&civDLuDWIDEaCZR>}@h; zd){z|MuKKy3A21!aJG8d>KD1)&*7x_?%1dbe3jJR$vMpM2o)Qxb z;dYSmP!$VfzvHWR*rnf1xym6YkKT8oi;ezTnIHC+bD6-8GcG7Yo+V0-S7z^WqT{fb?W{37!Puoc^X?&a~ z!kF$G6PA;>Q<@EEECt~@PnHKbr(dIAtHOEOeFn1$PdixL%w$8LK1)=MaX-YJs~c}l zHE90y0VhQ{y{X)pE-4wtDVk4o|5dpYdyOlXR04zydYVUo*Sp%vXFvPIr?s~YdscP~ z1w|f2G}20X3$!;ZW_t!Ub}SP*rF-l(6oSUInNy8iBV7Bv=HU(nOE7`YrJ9a(Qc(-0 zEIFxEn>8-=9Rq?L{wq&I8te^#a-iOCUHx)W6nFUjmJM%Nf52{LkzH8rZsd+7BAHd_ z_SfXk`6!Zf71){w#J}Wc4RSPOD<6*Vi=%-)JVC$ooP&cRmRAF0;0en>~?N(xCeyJ+;u1|5%7Qpv3+0Y=LVmP`s;vX_TLBLExECQ zv8}JCAA_E?-E~)mr<>tz!se5j|=HKJ|;W{y7mUfDuMs1rZ1^&u)Cw zEV>hEtx}CF8CQ4u*?KS|Y`3>8IT64)Yu;TAM1GslNEkzdr#@8D$h=vYxk4l%p{?0N z+sB(Vok+xT<=KJvo2Uc-zV2w&j0k-HXek53Mi9Jn&Q;Ql)N#sD|( zg|J8b3o|L0G*W;qHJmoOt`m^UpyHr|E1Y%%ti0V6<#I6N`m8|Sw-j_9jPxW(6MWNv z4IlQ7r=F(3EUuX(3+PL+pzk!;{w!K5+SgQ~F@Ztz`88L1PV%|t6ElYevr6kEgYL@4d*01Mdk-gpdijcAg>&VGlqZnPk_kPS&0jXJp>rsa{=#4H>sYmg0G zS5kgPG%IQas$1fsc8MF3r$5f2RJAvgCeo?`3d_M0dk2Kp&HT~>wh|%a>8N#-Z_wh| zBEW9W^B80NO*K9PwV*9^3U{U>8ks%A)*SRv^!k%!q)ij8UoS`=<>H-Od-*TBk-9v< zcj;qj0#nK2YHXj(I0(H7ItYR11S7Vk6xP`RO~`$z{u)==nP(dd(1NmbPttGDydbG; zFYlPJZU>Sgn6&jmu3kV97m{oq^E zy(f$GW+KW?f{Y2pqyu*|!ui(p)PCbJhv+l0<4_GW{_N^U5-(y;Yo#ByyQpc5Aru5l zrZh~IBqM#kwf-mTVi8elDYoNkV-?p-P#O$Ux9jdk;a!=&_TQx0fEd2W@2A~8GK#`O zXYTSKEke#hs>(+fK%YsAQ<|WOpq1SBGu<)ZT1>8sMWAeRCUCu9)5R8WkbUGHg^vQ_ z0*91uacm%E&6zwlN{ql9POtVC5hS-kXtwEo_StD~sz3gNFY_P1PYJNw$eh+EbZ*B9 zE>tN%gBg&kJNQHp*y9f=_s=>zdb|lwl-HgxhjlxE?6Q7)1)CGlnt{OTAMzFxXeqwd zj?*Q_v!JK5zClFS#k+%2HRW*F1p*nckcyS}tW1;1V&Y$cFkBtLiNVc{Ax@;G12fhB zonN^d{pBfD$RX!le^adiPHo|G1V5n6_dSRtc|Md3>cd;6VHL97Z*K-D7KDS4oN5 z&3Nx_{}HXhRnU+DanQ%BzH%Y|s(Yqe+Ewdd1%4`t17C&^J90_jRq>4)3vF&NVvxlb zgy|ZutW6L!s5!`5UenygAkR+QESNZDCxLJd{VOAf163&`5_xfczJEb|7AyxwAQD=E zV0y3gmUZ|e&+daMkPGJb<*a5J)-8K=$&v|s47|WEA&b14u2OsUff8OG0F5p{7Vcs{ zq$&pU)y2rBVzUX3#fH8i(!y!Ro?MLusAgZt3!nrxI)Mct{X-IA0`vJ-va@g27cFKI5-Rs$D;xJWS44oQ&W>ko8kZ<~ z;m1G1R+YK+ir-|2*z_j9_}}M%K5X2&O_Qzh=KrBxj=AH$>nT&;`oC_ns$o4p9;2-E zI-WfL@kr?l`K|l^swMufcFsv=)Y{SM)!o@K z;4wc9J<__J%`B2au>v8TqknSo_=s!*VqU+FBv*-u^^Uu9C;oO!`k%>{`C+0rpLXB9 z^GUjXN4Q6jFZ$Gc7njZ~H6Jq&lyv#)30c8S>0A~DX3hbB5+{T5uO}T}WW_WeiG0kY zFL8JRAvLZVk(``(eYdBtmJZu~XPH AKL7v# literal 0 HcmV?d00001 diff --git a/SmallCountMetaAnalysisEvaluation/data/randomFx.rds b/SmallCountMetaAnalysisEvaluation/data/randomFx.rds new file mode 100644 index 0000000000000000000000000000000000000000..0a2d788f979504c835944df2baa17bad4b7f1359 GIT binary patch literal 51084 zcmeFXRa9Hizct#H;zcT0@lw1%fdWN?)8a0rcyV_Nqi`w=hR$-ZhQCDeX}MX28Ir11rxS+lH74lKP95|4Z9`4qP8aP zNdNO8ITG6c78MrhyRn{@x*#x~DH3p3+WlBY3k&0mgG)?#3<&snPlt=?Oz@96qz9np zGaNY8ULQTs0|XIB(T712*Glogiv#0=2SmoP$Y2aL)m=`^aQ*p@pvdmp2h`<*ZG^!C zjQC-&58)uvs<(dDuz7Cra7g-J*gn6k0UM!Z-n+!GI(709>HjSLqrrcC@Sj-tPd@lh zPW(?@_9pAh22yLW9%!UORVotq-qxdG-c6QYjGT#(#eK z{%7(3R}H*VFZh02rvF#phQ0PT2B7#URi4VW;8&lKiT;F)^3uVU%RI##f;2&}?c>T- z*p*m+;csqY?*KD#65jvN{v*hL9P&RV7XDA32&fBa|T|JTK#`MTJ}xc zr?)R6|A#+@7@4Q_i*1#a^G)#3pw9o{YWyEV>`cbn{_i$Zd7;LvFPw;4&_QM;_tF2d zi`x%_kpHEWa6d5Of6p5F|C{xXPJJYJ44RPoZ+{72{D=DgQUMy9>C{wNh~&I-anVFy zmn3q5J>At0k@qWY`P$>o>_D)s!VKj5#3Re~PlC!KmQlTqxs}|zFz)0(4y%)<2WuuJ zE7Ql%P6oh73C##eg}7bmDUyNw-x)odaD=CsxD5ed;R@*>@}Q%gtUc4?Www#u?sU=tZcWtYYQK zm0Ld0q@3T^qfBzXk0;``y~xqbgCXY+9)xoq+mZ)>^OV{TFp>>D+wa}@n@H$lHjybs zzSFrGC&)+{z2EXT6{aPC+mQkuC!^w9R<)brj$%WLJlMR(twnBy)AXuokK<(H>0Tao z?{eOiuHbAH1CHa1L7`&hqtI$B$Z`%Mg9H*!90>BJ`n42UVhI|Dr(hgE91xoW^xFCG z+Hkn%BrPS8&IcG_y6ro$iH52f1dUi=^A;S($PWTJm^i0g2b=+#n2G2e92&VC3+c*$j2t(P-Vm%JjG%NQdf}&!(O4;uL=1@)Yt^2GLv`0Y_1+lf z9j-;3d^S%8ji+oPdf+6I$jbFFY}yNRtfVUo7xaebeLy-o_e#%G)qto9;z@(C?&PiJ z>05{MEu2rllmKc_B(bq`8wl!24-{wc@BZjJyDk&Exd71ttuZqD5v4(#InP$@u5kxFW{JDjJ6+H}v$Tjw=)ij`#o=zP6_etK z0kwKpg*^YTz{J`$8XIQ=X8#o<(sJh)ONJT0&#VHzDoh~_LIT?ZjZPzyK^@Zw0bZyQ z)XOhBdObyn^ymOR%YVU(dXVHjHt<7F*rU)PtyEV?B>EC2mijQSGwVWmtOkNO-C@qP zKuy!I*6ozpT{?BNA)KJJvx?89-+S`Pf5D7C6PMDM3R8q=zUL1aJiHSisD@K^R98XD zfiWTt7;*ad7yL&VaXEhhl=qZ(t47z)0w*@EO3<_&+)?u$6U-j)5cD(zd^K-uU7s5p z7#J3Xu=25*S>!>RSAn2JP#@I1*xEI3nuy zhlB)w)5CUvyb(XNqINE$D}sim<30Yk66_0 zInrhDDh7iK`z@j7)md}pX9g3$X{~mXv3HHw4%v1`|1F)zdU$ptl(K3dD>bjj@|%`N zP-@=QP>E|0Xk&EK&&k93>`Q{+aL$!&i0Yup*x|&j(UP~z*W1vZ`6%Bm1kyzut+ob% z{ou`>9Gvfg^|5v|e@b(%xo;o*#yR0LC{&ZZvX5w)GK-D!J6&;fKD*Odm+XX-(5)PI3w7^w9%d2KqFDy(mceCYIc93h$cA4DZ^shhnon#;LTu6|x8t>+$G_uTc(U8bh1=jx{c?y!vxP1aI=kSRr}{TBU#1^rzY z%@ZD+`G^oO6^uq6RIpD|X^j#SUU;CI582F-SR+}Z=RHc|C4PSzLpdKK5!j%Bp{v1# z6&ilK8z^7N?LoFPhkZa~LW$|%W94;OBJ4`J6(;wtafoh|&3)S${E8ya=w=-2cEVLX zsflScVVcH@Iy#GU(t9DNQI+Vie$sThni7$b=Ci#_+pw-6sHt?0SC%nb28 zL?AcrFJaT?XfNrzi4NX5Ll^Fcq#nfK@#ob(cc0UZE60Q=hh={_j)&LR8a9358oIS} z`w(UiJ7DD3FA%JB#VoFp1|=B;GQ2F#_-b-Ib@1?N{nRxBzULPLfKj9FdJYCpAfq0m zx$Ds;yF14MEyl0!0={d|tJ!ZKn{ZQgJeXI~iw4@K64Dwr3dqFx{VO$4%6TfpOqGn5 z^mXQqJHRnOYN7_!w}H{Juy!*+LmMZrezf|H4km;g$F9Q{7T*)UPPg_s*4~Sd5AkQ= zlfwytxyeH;zOJjH;ACT$>+O`w%ZJF$s6azCK#aT}#QIWA-st@tR>=0d?Y7D02h6=G zC?5^Ksq*jJ2>3JzHha5j?LuQw=}oyT8km&kb-n=;fr=#{Dt4ts1AwML6VYvNcGSnE zbM&PU(dl3+J=K06B?ToiBxF7!uydIbA!4ysG;d2?0C<00VuJKS!5OkH(XFaw2s;V_ z*@sGhVkhD|8+*Zz*>gBX`0Sape3LQ!VH^bBL>)PY0*#kX8Z_b;S?=j`Ie_rYAm(=+ zuCsdj3nJLbgGonETSK zd;d?=+ukox=jkANr?uP&Za9rNJaZKkXi^6`U2b#S-#~R~#-Z!HTy{1vQuEALH=%!g zY#I@e?0YS;5j8QYg?KzN(ZCbR3u|Eh1USky^4woaV3prOwBX+G;7UUo(ghCW;oN@~ zZ4%}Ah1#O4XaW%8IesPuR)V5Bw)K(>E=k4_QJz=@fw(5qF^KfPkb{4E62ak^+_1nL zBV~9D_~2@8oD!GvN*Mr>4-nw5{`YB_UD-!BI%BM2dDru9?P&ZDlW6{JBr&vONfAs9 zMMeFE8y*fiTl|4vV!j;0s-jIwPS8Xm2QZv}eH1Ok_A9B!Tl zMxcbi<+>;}C31Eb5}0@A4w+$|$4J3Br#Dc1(VM?q0W!$BGxX)S%m<90-1K11-oX>j z&gP>K#Qug4vO-S@7+ze4g2FN$rCa!C!g0rf_mq^{|8%~_sV*4Kv>qgpQd!&CZFWwV zo{q0;ylu#t>_4Em44fL$cb*4pf{R!KK*4!fe~WK2cZ!u%d6hLPYW&eA(**kO5)4%4P%5zB;4tT~l$2)fE>RNMZ z;&?xc18Wel_Whn9xw0YBKJK1ErF3Ly6CeRnna@+2MD?-V{e9|aBTjFjf4RrqkyWQt zF5N<62XVZqr8=0(b{ahcOrXFvmEuFmL!%i`8b(E1NGmuAR2%Isl^8;7>Ol_hfOZpT*tu zz@*pieV;4r26wQ&X%KJ$<8gT1(IxPcT+BU^ry(p2_?3TKqJg&IzP8_z_k)SQgoU{+ zr*^X=M5AvMUtn7QHmv#~RQ_KeOF`iF-&T z2}*>rXuz67t_d8+&xmi$ITsA3+%}oscQ;wpMckDE@(RiqFLH3^YX>gJ=v)}m zXPuq^XY=w*gXYUhzz)hf-N^tDr8oyxk` zvwPaY1c{hA{=kyL7?L!Pn5YxaOZ3tgzt#6pw1*$&1K%9c<^AfX95t$|;TyXDGQC&Z zgf0{=?=i<$jT`V4Y|#CTNKW1CaXw!>^HS`e_C+&(voD-*82*@cWYUBD*X2kcq}9 z9k|H&HFK$=b8A7Wi^)aIHEF!BqrOH#&d~xgr)k$*{j+HI#!7L0p#ShkG&RjKS&Qw7 zxr80!S_jGX>rGiec(Roca#VV#$0SIbk*QM1Sn&O;VALWZVOGaRQU1p3**kXa&kJO0 zs{@>jrSiOm!hflICxG|dH(J^GYZnv&OPi8O=l2~x!jeBZ1Ujlge(i5|Cx^V`1IHye z%;K#It$R3*HdmVOpi0Z7KEo`qnjh@3>ekcV4p~pG)cqn0;0XdV7F5x{FW}Z8zEwwl zk)cXw=7W@1NzO0^$4qz?>-q286ye*md1LMtK|L4c2xUUgqfhp>tC7GORD7bxz5*SY z^Z*OBdseP$(h|=2mn$;CfV0njrLrNM*5nJW<;wZeP*)zI%moE(u~&dsX96U5^dPa$ zjah}EvIifZ?R^})%n!Hj+D1=06vuxY>I=u%-L(S27;An!gYty4>jkMZ-#XulJQwk+ zksu^+si#DHx_A;S@$zRGi}3pFX29MIF|1;bXAW5S=0g>6FPC(h>U-B;)#hPJFZ9|F z0POFMHHkyS_@I%*>1nG6C;p>Yt{5p;9&TdE&rhXNL&|ug5&|(-c5gzD|9;NAeMe67 z#vNVM7~hi(o=4^Fn0;)nsH-h^BkIUB&FxaW<+|GPDb(aV;nFwZCjP*)g=@H-dqK}k z(*2X8(`P%1B8e}-%dxhUEXl)F$bQDiilb?_b1I1k727E=BLMgwLohnr84%0y-R(CE zx?IJulw^z5y998OAN(h$FlyI8smSrS1975b$#>U909b`~8c+;}^v@abA{)xg;QyPpnu#XX0QX*({(3o{j}L zhG(uwQ+LsrvV=!2Y4$kNf(fjUWYnekT-{O5s7&dYZJJ&!EQvSm7SFk)8b{4Q(6HqP zfj@=ijj#8sLSW%jp&el@Jxr4x{_(2JDwRE@cX2DN7}@x!5AlpA^be7$>#alVIKKe1 zdLIpqH7qc*weH1A)v0P?QZ|v`2^kmwXnR!cIlyu_JD!+QRsj7uy5C)VKf+t~&e}z6 zfc|y;>eH1X4>e#FKw$K$}9o)S0rtjtL-Ao{?2x$dq zF7|-2{%~9-p2_;q=?lR~M~3(?smEA%je!;#geU@eVS^5ONK+ucP% z{*$+ihkL_V+jA@$!>b+OCW_bJm6SaOFnr)Su<7#hOYn3)Sg12iBIv zrx#y2cXB-oWV~|cL+(qD6Vy|yq*$1 zGJGx7;EYAh(Jpm?$4{0auyJzMVNg8uk30Q`esMQDN&pPCn1+C z2Lr;9yeZger;g^-uymbu_fp%$PN1aNM@mCCJl<>B>y1C=a7R&g(nTL?--bvomZalo z-}+XVZmzzVxw=_BcDH!Owmw4gtJ;4=OGw%MiRe5#Nk^b{zU~ZO8BccAwz^`mQ>Oip zukN10s_#Y{k2Cn=jq;S3J8u&KU%G6}5>#IjnuV{cvS;kVexUFtAA5GgWu~Id?w;>s zf2AH|+MGz=ny?!5rcW7L&}3H8unmh?H?mRuFXowElved0%j!pHbzk0`n3tudYQNcq z=O@&q#9sb3ITw4H@)>pRH_^dx&Z4xG5Og(OP;N?I75wbezkqjFQ)QfOQ2J;d(@X6$ zb1K|5UjKRp?(Wz$PjvuhUFT`>|M}ZaG3t3tO+s#ZKEa;xd;WqbrA*EcYA+3LJ#!Cb zOOH~{m;8%{jW_J9%-aUiKM~!|#VWB%-x)o_ET+EPm$;XXy86>r36Ob3M2u&b^+*J}5PHxIk=-L7{Bc&VDPBoSC8fR2)q3BEf=O(wtS{aoY;GuqqF zCbY``yiEVDER?e;fxGP!=t)I1(;MI>tn35ao25iWysSZv`){vz>&9Wo7NX57IMxmJ zYis}RtDRC?>rrOA;2Fn}^zOxog0@;*oYU!F*haH?iOmOu9Y@QU%_-%+NV#h6nu=W= z-E6|*%b~j?&e??5VyDOW*drE|m6mgc797kDtk$ve5?3E4Sg)z~v5y9hx`nnh2h__2 z%4Xl~Fzgoldal0F(-|4%?O;4JWGvi0b@Q0be!3guC83#lPcxz!W!x&O6Pz#&4ohYi zTV$#5Z63wSEcDx1R&&7Bo7Q=A!E(Lv7S=XuX87jgm`Pygs04kcMWjFUfM~Kb$sPTH;L=9g%*K4znL!)v~t=3%GzFQF|QA% zMeUkAGs9>NM9oclGRbDK8sgK{v z!^+0?-sB+|WY5{(@$qV>H1%zwr79Z5y+=BGbK6IqK?q=Ia=y>V)p<^OzjYLsa;jGP zq5x*yhdXDl@{6O&<6}}O%VYO0Y9Mc-#Pn45lLAle{&*gNckVG76k%k`a|!`rqnShs zKJ$cq1-bW)Wm_ht?k`4>>BUhcs(~-v*k{3c*@x91g^_5BA2o)w5C0>9FB<$7I&rkXWQCWMDep(x4(&=gX^Nk3=rzP+QZ_2v9G}zuUzEDm#2_!jZ;~b_5m*B+{nOtlGc*+{#nGx&a&rzi__? zqkE&Mw_$^hBVh!qw4#fiI(Z%EpH^I}X=jFQsvSMW{MqVwF5FLrvLOJ-%4FVm}QsHLrc@Z!BB$W^BAq=qFxe(^m|ZG#OV zIa=KB=82Y=eu%zZI$&nQ(OdDJcb2#z-&%nZG^OAdjB9Vof(5T6zws}$auwx|Tk0$C;T6+$0J6M9)U$qW zB`CS*ClT9*r!XP+==15G(tX0r)TY!W`MVw=#0ffDWOQ~wr{CYj#Wt{=zaPRodIoEC z4QVU1`ocP)^SIdLWSxqFU85OW4HwzE)b|-J6z`>^Q~KkaBAaHp-pjN-WG8UX?+6%a z^?4~Q!(|KBfK5%DUGT=R^2L}$y2d8#=byy=u_w+>I?-zFP)S9Fw3WY4cwG29Dzo#% zag9;!4MrbdD+#PpjjS*YOj;(dG>PE-WihvM_8Dg_f5l^k=)r;;ldaL7z(b#DQ!3RghC>!W0AqEK(T z)wzJ_90H$RKg3QOcez*6$eUq)7Hu`3n@HA_ISui9Lto-WB`t*p688%*e}3;?vEpaQ z>Z1|c(dxI{8LDB~^NxR4OR;ywPx&VHwS(^Z4Q=^wV>AT?Ia7EJbb}pS2dXN>;N7s# zUW89$#DYfZd`4xjcN3%kfYDB%g)g@42W}ITiu=c7HHKYOHDjFy*2c@e`c{WrC&Dno z#=wHpU(Lq!rJk%HS~UW%>TIuipH9wqqV!|Dr{dI=1WuH!fo5-pYJ95VI-$6m?EJH= ze1{qeGs(1DM==pDjh}&ZIIN{V&(gTjgSZ;<7ITJ+{X94o3RIqYpWa=$wL(WaCUmqd z@teoO6Lz(CU%tdj$uy{Gx%}a^Vxcf%m>~q{L|^TI!i>)NoEB5Dpg1$a!>>*a(zHM~uXB@x~9`qJw`#i{a%&&4?3fJ#z; z8hKIw_MrEq@FYWer?{t}A|-Hb_C?`{J4%M^)S)OHpnWQSeaAfebvgaD=oM+Ik-<$Z zL?^-TEpxK5Cya_RYIUGWr&z&&_UzJaF9$CV=GOdY^$zEfNvz%ISlA5io)=$v9PnfF3-`lq)O*=TwQOU-o+y#&z-HZ(^LI6?$n!^P;jcVLVZ;v^6HNIjbZf=4ph=`KMiJmKO!oAV6mft1B1!)Eva_=(t|Oq&cG@SQR5OCl)&z-&A2L|G2|IDT_O^g`~VIA}mx~ z<8k}cJ{FlL7LC=PqppGmqT{KXCfs*`C(*~`{eF7S7QDhAJPalXy(spKkRU5Oubely zr|*AvYk1{I8ke!GaIV$&$a-?>Ph6LYfqLnVy+WU&fyfB$gr*X%BfEF~v-@S4$pa>wJ;`^{&CHgTU&qLQ%ktzkPx+B~DFM9d zsf#N$y{`?_n8Q4T(^)f@xTTcbDbc4)A*>78*>GOK)bUN=YMY%8i=xcj8v?dFW8(u4 z-Myp_ovou$NgW~x8$@{8-7+((`AV;kRjHLG1t0VC2r&1Y(4E|ir+Kp%$Sd71A`N=R z{Kky}Kqeeei^Zo#++0To{ZmGw6el=iVH0+v?zS!keQr)e0`wf*@s?7n>Gj$-CpkHL zdo_Ld|NdXWu$Yi%;a`2SZgrsQ)85R{q5`Y z^N)dzQXfif*MmT<~GyomdB3C73TKY1sNx?CX*il)LGD@8WuA$GpMu4r*?Jw+D zBOa?k+Qp6a?0~J3oC`VZJCy2~10F%a-9(rmx6u95`$i%z;+$ypSqkKjU%q@A_v05D zBJCk%C9fe5ee@iF6!$*q+EMM_{d&*c1p!AVy_0V|DDsltUGQ5bGEZEzMzy1W@r<02;O=^&SuW5G@r#w zPhe#W95S#~Xhmu~mw1vslO)E^^0(>3NJvd3kEeIu_{4{cF#@6d7pmehe=B`tec$C4 zXD7rJuZ+`*AgTmn+W4mdG8lcLq(t9uavdqpu7JjCS&O=~iH5ZgYj5D6N!i_hS+Dq8 zjPMLSusrCheIie;J)J}pdXRj@2dkrm?g$b9Skm`bJF!H`SJ^n zW`!@SHm-HCU*+jOp{un&{3tEHOUC&+jbWdFI74r&JSy^OSn0HgodQ5g+eQ91izlY1 zhr!!eN(}d7VZ{mH`J9>&;kDC8X4JFzfcRUrx>r32`Cs5H(Ps5~Yf{XZRN-ZKlm^+~ek@p(@8C$8VGx#L|>y0QZwveXo48Mec($0~d zm}D+}r7Th*;$?Wc6m3})ra@dRMWj#{T&&ivP-QxgHdS2BpDX0ax%7}{C#(MI!3huL z_&A1{tP~eYBT&n!YLt*Bp>vA$<>o9<=&bta;V~QR!qMTQv6=_AFWq=RiN4Y)Y`b!> z`1MQ&G3QxHZd+)l$_+{%+Qya;Pg-i-9@LCU*D?opPT}O#wAZ#O43tHD{ao^vU|q6D z3?4D|27BY>>-x<#UhK2ZLf!HWN`lDg87@}GF6;s5wipP{Ikb1~J3LJHK5^gLpes5f zg&m=mjoNBX(aKivpm#8;3lV|XuMec}cWRsecqa_-mDu&&a0vK=#W=#mSn_?aE2_=+ zaMy8whrjfj1tBt&*0Ag**gW~q0Bc#zA}#U@nl-o?xd%R`y4BWilL>5?RK)YiLmtE) zs+BwTZN6A9HPl{Ex}sU*cPJoqrK8q@!&JyJ)#d3f}-i zzpsyZ((bVivez)H7&8{&TAi{3+b>Ikg}rkj zus!vUo#na^b?+yZehj)gQXD^*+#Eb5J7%mnm}2yc{&cAsHD(te-kxzKZE_5CY*)QX zO+U^U_Ei39*MSn>Xt8*lv}yZd*JmMZM7`6khxvd($Co2usjd4%x#ew1fwkgo8A}xh zkzkeSr@)ayBcE$N%Lg%D#zGjw+n5ZIWTrrT$|>N8oBwg{3QKm;^yf$M?yZJdmxPSW zyZ*l4Gx0lCuC_H`F-&K=+-)DAW>2(7vfBZ-%3@?mUR_C5qQ3}o-WsR^q4X&&;F z80;-T0a2^c9Ag442z0)Rwp%fpf{NXMW3=G+bm7&jgf2yi`H1_LU$fM=B?B_HqeJkL+nB&M}&B?A!5&MfuP2AZ| z?#Mb@mz_}-Q4c_cm=0v~`AYRAXNDUzjHBIoh0X*N@7HPIGP_F_scm>5ut?R}UTS>B z9Wp;hqz(RVHG4-@9_wEN%*}1;;a?L+qJ>B*f02lH<#xfy#N4eFle#n>sWd7g3D(sj zR(S9F|o5q8Bgo?*5d?6+<sT3B;K>{`i~}JKB?#1!GODmHtXr-#m7#SLBJ%8vCO% zZ_TQlN3g?UWt4dr%3-P@g39+`)ahJR??jELlnXRh9gW8`Ya{m7wql$VW2=GOMkgAa zo~G`pOV`9NKbe5+l5RX%Y7~tNKo&?z0LF^*t-dqPA?%eQlHFb!%1(<;#%j)$tkkd9 zYbCN1-W$mj6D2DrcD>DHJ1TrJQlu8{ey-UwuZ1#UyVRO+1`cO~HpH(kPx`|w)E3o+ zU-~YowHs7qj688x-;cK76Oy2)0B5>w`bPg@Xa{$c^yzi&I z%g=9U4VymK&Y*E-Ip_?qk2+0fq8AL>NV%>Jf^#6D7nAfnC0(+_`QL<6{1anv)#@X@ z1VuPY&B>MU9~n51TDUq@S`3r?0Q^m&YG8Sh4=FsX-oAe(x7DgJJFvqbD%bnaXux#E zXMX;1EZ>EL(Lkbs&x<(e%3*r8?gpGloq*XUKP4?kefK=CcEr}+Yr^P^^2wD}dMey} zsbVghfjg%?O&QP>@L$?Xq$4QiIN_fjkRC1598b7y7V0d~+_X*DZ6`19aND{Irvn`Q zZRkZx1w?AY2iQ@cv)^f-mzS`&HB@OYW;A@3|FWd*@1;DLuvez-tYp(!VM;RVU(dRm zI`^0@)C7b>ft3?RT_7Rm{9U@0Jsf*AdSg^TMXk_{{sZ#e$M=6%a0o1$bLI*N@+MuH z&ePDnXV=r2;Fn$5q1UzJ5&Ov^l7t_;fgFa4Mur&s$IsbuhQ^n4BbXAddZNKaxWwx(&3+ud$Q5t1=(bP4nP}ENQeC4xfUmcIe zz{s*52&gC38Bj^fR^903i*nTd<`H$h{W4uz#&U-GeWAV~! zlJ^D|b#aQ>PA$v&{zSWRtGw3xB?;PF`=uZ6?+p^QZjzJMNa{;7IXPM7{OYtKG2?m( z0rMKK>@OnpX9GF^NZt4bRY`$Y}~{>2qYPAL&w8wM}cUK556AU>X?I0f-P~gCpx^L!S<1*WCU{=ymg< z``ce8#`WX{q2BsP2MTX%iTTEH{dZWtTGFvW<5M?oub*PB=fxK*KdWeD)-`IyRI6ND zl}c%R!}>q(R9j@a`@ksE}GIQo-?7Q;K+JTM7@32*&jtMD#>98WZ`$nJiX5^uh-B4KtScteFz zKCkM8)GAei3!}vtsxwk(a+CLT)1MYnOU@m(kxm|_V`sw9ZyJ!;{g&P57Sl0b6Wt3Q#X@9Rn- z+n_nRAXp~VAHUrt>>kXB8vDJ)Ned-?y<2mx7(dW`y&CR0s>9g(orn7j+I^p70&9H& zkWM{KnV_~_mRg7#ct6S%>hu$DUJv!TbcFd1iJb z%ki23HZx5%r}k`|+iSC85`oOTyJ?l*4eUI*wrh+%<55JDH%r!CTKdAWyt|I~cHUIx zx5e51*L?W-P!-Lx&n84X+0cDFrwpRJNI+F{bPj(_&N+-fyot0?NZhksgI%_3VaRuT z@GTz1IL>QxNed4^SI4(1jJNf4FZD_=L-O6#;?E2oDs#qoYv?aRb)fP^Uo_X&*`0ZB z2>#bEq=3CyngjzDQoY)}BY9urAEFO3Zapx$vktKLa5@^sz|Er1=x@&d$|z+82)kAG zvA@I{_b!pFO{f@w8tUZ=_ITxkCj}1pKMTHwa}Y95rF}gm7LJ|vNQ5s>;n_qF*Jx&u z;{-61A3k3Uo1}2dwU{#zmL4Lc2Sy?GFV6dfhoXe*f?O?%!2aUu=ckyYg(*kW-deWoO_(p zV$tZ~RetPwy5uy&wPT#-71_`H?Vnr%zt(o7S+cZrjr!)YLtdX9CKi(4>R*+7!I2q@^GJT5HjMU~J-A3KwrDi=QGYkLGp^@-TWS z8kTEKy8M|?>;fp(KWiA107ga}jHqnulsJ8_MDnaO)+;jDpIZIyOUCU1-A58qd447B zB|{^&nj_LT~L2i@N$o=H+3es}M4G;1@>9yLhuhCpBL47mKCf-5z39;X%v0XnsFf`Y1ixas$ zJzC~@?I($<8+J9D_1~PWeOokJ5h&^SgBcMuk`>#^DqUiKME&VpL?8i;gS!K7aX~oA zlFu;T)J^!lB=N+}zD%ma3yElY`pdDM--lyj*WN#igzk%$GOL5bWBTVOTKE%&JynuJ z4-!HYK9#Bq^=D0-J~S#Ttmh6mKA(1m#}7{*$FPpBXLOKZk#HLG4mYxIRJ03yn+Q-n z>kJH@%ddTL$1*-C+G4}>7W^lzwLy^bNuP0Q%MYCI>wje@5(l0F^_+7|E1C#^eKUiI zt6NF+_TFs z{{)B|e^qk*cxpD-r|F#`p)NYc+JMS3q|quNe!_>UCcYXT=+N}EQX<375?a_RKD@z; z<5u6T$l?H6_9Uxm{n^-;R4l40yLxl&S-N)svk%bzxSV{ysnR5}f@C8lZnd zcR1#OsK4QD~2|LY3 z)Zp)<+q`h#@w<(4s)!VOi{jcE#sP62h%5Xb4w zFfE27kNu?noMBQ4-#>@f0pQJ|O~QfHkyUkS*6PA{5CS{Q(zf&l*8={+#Iw)NIJo2y z@#5FJrmR;VPSCAiTx^;?4l}>N^LnY(G!uA_?}aE3nV44oAx0zpyo3N%dIr0m0)MKA> zwTEUJ~n+Vv({-^&E>8porf-Q#wK1<&u!8$KDowXa}|T^6kmD{txq2; z`Q_qXoKkiU366$*9h`|sikW4cma7=rJ2GNBDs46>6d)lG#mb7JOP372KqMq?IsWkB z|Ll!!5Au|cRQo%lVoCZOJmPtMVvKhSg~o4`JlO=_V!?GELVwUAr-%kkLVwhF$OLw^ zlln1uN2q^&9y+$SR!~g(Oqh4S`0E!J3Ici@!y$*)`VXO}?+wbDpBuCLOvD@u1a-)) z^>sM5EA45Iv7HivIThlakq*eFRSkV}g=GVn%9nl0_Yk%_0$7ghX(662{@ zWjyrPNIYXoO1<2nd7~#&Tkqx;ec2_Y&#>#wF@0FeBp|KT4C3J&Cfx~%*Lac2zj2Ln zIzkeCM?X&KLPEdQl8rhmAZ4`AkN3zd+!@maK63MZqR96cS5^h&J#yts=!khsC38c! zcBAtK3vmY}EOVk>VmvyJ@MWb5W%T^ts!>X7X>RvvTXAmnPW~ z+Or=osWCvJB5}dER1vDWVV7MO&g5nH=$>$}mvcW6CuNlI z{xgN9W@u|F^stL2?SCuuGdstCsCEk`h(7O^O!O0GZT?O!8`nTFK_sTMHz6j|LIFCzls*rv$jVSoGDE`UkHcdz`^yP~$VvCx7 z`&dcMzc6S+-5(&x<&B3p!O!Ylfi-6X9072$!yd}z^-tPLcOs6vyz0#~=;kQP*>2FW z)vO>cn}PAhg>d;JH#$Q@Svz=m@#$QI;J(ksFCCj6AzsTHx0CaXMYH0w4$%BqNlYjs zJJ;^iCIPF@J)hMS;uH}}!*)>MwLoYbEvj1^zfC1JG1dZFvk~r}AL)AG{3@t_IJ}Sc9Ad3!2iXn#>eB>fZZk))`&`!t7Na8fH}c-<+(OaRJ`4Unrw2B#TR_jhEjO@| zmLf+HM$TQq`*ZCE+&U+rg@0=CVNSqsho-eG{4&_aEmlvwwaz+YU|V-el{*uoh7Qv( zD);#gTt_F}SLfM9zeMWL#41Uio81;JvnHeY@4H|be-y*c_RT96N9-SyKA3|?CFG&) zoWfVs)uFMfdkafIT)al5k4H`ZgilTG?wp*@=zc^SRag&tQRn*%4zt~TB{VMjww@?D zwGrT!wR?wA=o#Je5{;xy<9l@bz`UsN_Jyp}X~D*Wo2`_hBo?ACN0A8ray;#P!7D^`W zU}KK5fVy)F#U?Gg0GThfKQGSLgp};Cw)|ci6lAGdjdwo|^^Y@+FRE{Z`t3_j`Z&ph z&v^ZoeF6sH&wA-}QPoZGnJksTampG(OwxnG`;NmiojGY*CcNOo@TaIZ3OfkgG= zwE>IPL)bGff$Ks-;2)=C5dQNe_{BPKNj#SYzpACr&6?ODJiC8RysRmNt#E}H4-UwU zPtn`Ieg~A&_@30R(17$VkGWH~DnYG}nzNR+9DEV%SS`C;3QClmuNS*1L)w1c?Lp__ zppNTv^Ej_d1Mjb$s571qzD!ygo81ryzPl1O6e)E=P{dD_dsp6r@4Vn$NtNjkB(wOs zvZyv>gd4BfcJdVXs@~#~v}gi9k7q0NZi_%fvajX31qUE|eU;k4Z8N-Viay=l)=7ZpWK*DsbIG;XHj5cBiIM>IUDq^2kQ_!QIT?9u-jQ|sr|Mc?4DoKx|vV_ z_US<$d=H+2wX~i@rePjfd-ZTWNo)n*%^}S5?ny)Nl=au6x_5xDLakl!4Os~K#B*O? zVmoA3vumQ4Q;EBbnp8|=w;O_U+zg6l!1YBKqf6u{l@Z`Evt@z<=aJ5xDk-2g_ zxCSwo=@vyn*n|Upfis;URBEgEyJcD6up}opP^t+Y9<=b-(fkPPn-@$Fm{SZ7wLX8` ze_9Y6XLXpJl6yPgL-*=khezPRcD+l^lLiktr@P$ro&}DtLRWK?^~0m0Wvd*iB#7wU zr>uDGF2u&F`B{kuL8L-e0C6mb#JcqA%Khh|?rF;!od6m{$~CE&ACHExF`JdHn`T1J z?D>&X^~OW}4Q8=u6HBPqU;cLOr)qd8RZu-=_Ihwskd2OGW`Tz)=?XrtUx4#smAY!G&we)r!6;;Iih~6J`&7cpB_E=JOaM2wHaZ!DS;DXbS23E{G?sHH4^>p6a)nZbDU;W4PkZPtY5!o^BsE9(p|jix!goQ26Y) zJ;cFoG$8Bc{L9T zEEi45ySy4IcNl0HmH0!s{?W_#MfX8s)a4s5$7KTbjGJ2KuL6k%tO~k$0YI&Nx+N&v z9b)P=r*4Q}35kaJl#1(Npr(quUVB;o>+erq57H+?Y}L3)mwL}Y+^1brS=j`k&@}(M zX5+v-bfE9c0=bP)cz#_Y6LTDtEs=VEcVQru3ltzJa*_Y;V?K}?ZWU(Q8w>Gnp$>*BSp(boH@z!f2T4WBiVv3LLDDAw zINxS&NGzk)EVEq$3GaFZnk45!sffjc9N7%0GCixd_L>`%rcJo?^R67!i_}Jk+%$w1 z=ASI3Tb@JNfp)#{y8%#iJ4h_)_<5*a-1Naw<~p?fh#Y58>J4qjl`MFUY=h*v8G6(9 zjDwWcdj7o@n;|L3xtZzRGbpgzu!2j(72*#Xozpmc6_Qt-`r!EKEF`}X4bwiI2+3E^ zeMn4>grujf^|vO;LJ|*?>$&axka}S8dhy&gNUnX$<^5_P_bKs+;v;cTYGS=$ULPl< zAAuRqqwc_qNPe^J(VHRVjb61&C_AL8ypFNfc?p?oPg?$zx&|*+6W*}1l~7W*?mp)^ zYp993;#<&l4qincI29{&9O~|sOtL#!2VWN*o-Xp$8cL1V`Y0YTgMv5bzVY^?Li_&2 zt~Vyy@HI;*eaj{n_)297J=9Qy5?SYiVvF$6A9N~p*VDf>*zVK?ny|mqYTcJ2I*riC=8iL&Qn(r}f zfe?F}IZ@IpASnA|>vMs62-$i@ZF^ZV`10Qssp@$RL1|Op3!YvK!LwNNrTcb6i22Iw z{=L(|=hn^a`0P#Kr_LX9+bABAe0&Vr}u^r6Qgwi>R`-<;$K*_`KYNy$05H0bZFFxZb z#EzZ(Z2zJS5Y>{h?}Tz2#45-5NZA+xHM7S0XOSpGwXK-SAI$~P*PmWGGG<_%eEE*} zG)^x_y{&Sib;BG;>PVbc?r;@C-l})^aDIi*Sv%gAeiDL^nEmeiYX|O^6SDh)zHNk% zm#G~wM%xFr?`~pMADHK}J}z|hzX+ki)vF9|(I8B~tmneSLl6= zILNVy>dGz)fQ*#jE_rh!C|P1VZ!1$XG&Kqyt~WJ?T-WTIx(5Xz-9y-AzONpXs*PP; za%4ZW_$-~nBH1mRK{O8oX`A#{y+?1uYmAi^j_r0DT> z2#e3PQ4X_f9C>f{ zphQRgN7_UODBh9s=|OKhxK1tkxbglca94AUVtcp0V!WzNUVGn|C%i@+6a26`cbCC;MMa?n4G;a@cM#NAQmWGd0=_ZW{RZN5s5(Dgj9=s&v_m2kwWK-13#&`v%;fS^KTHuK@1R zZ*tor#lU^bWNisMAMoG>{ewDk@QmYb@p_YdaNj)h%M!<6aNiXm=H$2&+)c+jp6lHK z-r|b-=R3ZFrv^)pFtrV0uJxU}?l%@C-y#>HTxcUK^Cujs;!uXjR`!P=$4tHhz@#m^U=t_{$#`%eG2ZzAA+{E~^l;W^;3 zzwdJDW_574Ucg(W<_*s*r}hg?cnD9ulrC~b*9>frQ;YB|0r#V;9-Ds`05_f;nxX}~ z;49>ybG3wf0c=}?B*Ttt5;Pq6BnSY!G_=(4#KKCRZo~!0G zzxw%OV0-H^CZ4n4HEqrw8y`RLOz*Wi9%}-LEc)Obei&jq@7S7hOoi0a5YIUObC6c* zX~Z^v5+uEl%X#Cg0%bgpUk2FoK;MV7<2S5*AcI?J!^0vEh?hv-_x@@n)UK&NGPU?7 z^luY+RxjZN{Ypj3hL`=IYQvA93c0Wk zoZpqTtF9Dpg(?$)2YN3#pk^y%@j^jm@%v4xMo>Ivt9fbELnvsU6gTgC7ZjITXKqw>hdiz?)TUSZ zP{a4wpnZ(@V0qJ4%1$E+Z(+0XTm(FDY*GU zZcH20_&J^U$-xN?J9ccmvvekWc$}(xE9(=~vT@m5ZSI9PYD^ZA4VR%+dcn%MuaCm# zJw_56>}BB-dmgp?o;4KYsJk}M=0KqeliAps7|34Ads)ox}pm5Dm_YTV>DBkp7qQmu#P%>j_ zZ{LA|^{LdR7b#y^pz2&Ihti)Rwy2ht7(;16Cv%9V4HeT4FJXJ(fLm*E;l5@^E=w-$Cp+>;nibYu;&rHylJz8 zcXAOFUen5pk%@!sHyUOx)(fB^X-e#jTPzzpSuj^3PG&q8Yx z6H~|X?a;XNbKNJS36QD1kXLo#EqGC3dy}hr4P>4;(0UmlR}WIs`F`KJsXc}N$5BXmc=WB$9!W@9yO}4oGz?xS zGoNYxwT>&gKXYH?0VsR;#yOZT1&X9TjSH}ohEhY9Xr=LzP%0+%ly>n1d^A>BRmPeJ z<@wvzwYv5}DQ&u$XI%j_O>^I{_3kFvK(4>?bN+`(3MYBq%V>g#+^4*@Sf=1v>O zv*15#g+<=(-Hh42^r6Zl3KCfsA@i zKgUyCkeO6)bJGVicr`<}yNe|U+GOi4_i~ScMt$>+riinU$T3~`mDJ0uzM|_TQhw=r@FAdWh zpm0O`4vi`IA>uLqc#tYjGtS8xa@bU#g#5)nkZ%cI{j%&N4Tx%ah+&((a z=m$GQSX^v=T)+ttOYDoeY`B2h$gi@qJ0D{1+omu(20+1_paA9UEs*RtwYkvbDin;X zH<@7|0x2;8m#Y)X;S+Agfs$OkbT&LyWse{J7xvSadH zi1;>{<7w$3i2HudY|8~rNPg4F`3oC30rv_P4 zt~`%Sv*J^FWs^W?v3u?m9hg8kBsQf;ezqYT#=QL*wigL)*5SJ42^3+sDxqkre~_6n zEbB5}jVH3Ao1}%DJBjeJQb!pZOCq;saJO zw!}M;Y27gvo-IoV?U^bqKag$U{LP+jxgFtBGN`nu2uo3nvHT^cNnq($F z``w?jcMu`2=`C5e6X}p^ zA*b#gB7)2GSaQeI5}}ok5x&Y9{+B&+KxbWVzMOsPjt_c7(#otTagjO^NcJ~gY!pbO zc&D4`?TaKF*VR|b*m@E{v6&8@$Ha-Gh4G!9^s8iUuwxeg>+eKh1=D-px^^;G>Z;9b zz4Ju0hjUH7hBy(G$=|g>CYJCOk6ZutZ3Pi~{dwz>!(n8qTbgr-(mlefIIh^sZa)#3 zo%>=@R1*<#W&3C;vw`rQJK+B1(`O>ArX6{Yse=gax^?LF^H1<)=9sJ9_CKM&d-@l5 zO+uzr-i_$3+Xe5vdMYA?pF@A*Q-SJ30DWCs-WT3^Lzq5`acU{kbgU!-b&sz-Qsp9|yao?SQl}GY~>K0uVV{`|^x-G!)KPfuF6?k7E<C)H`xPge(5-`HDq{$*iXxKa%+=GV@l8tMp7k z!uc}u`GQ6Lgj1N^f;MvkQRQ2>eeKN!L~+^7rRN2n64ir^E2r)3B65o*`6v2U62<*~ zCIYf;L{;(Rf@+~jWYJz{S2L#FM8VtDucMtJ3$F$=F*{iimDKfp>uYo`cNimXxVGx$m78#;R0UFR4W=cb7! z-Ty%p&vL1K^;IDXt3)hp+C0g`R{qt8=c$s((>Nc0UG7deYKnO^JKsRRo<^sYRs$J- ze?!<0PYyCs^+Jqp;!`p`t~~s4#|<*!#`N(0>YQZaA_WNp^6-bqx}8XC=2tRc$p)|L_Si71?% zHfzeHm1KUpQgDXe5i;ND;L^wY!ikQ2{-xgf5VGpWndIyq7qWiS%H1}3MMU!iQ_waz zPc+>sQrOjkh>qRUn5cu?L`Tx*`~zVgvg&2Z7oGFh$=db@7WK{ML|ehr`gLg?QF-uk zvAJbFQD|$~x;Ti3EYOr~^|X>83hz3`?s#^WC^W4xUm5R6RNTE49qL~Zm3iJrWX=l{ zg%n=4wfP5$@~j?3-DP5AerHv%2kQi)L2Kbv0R^)7L(k-@{hNtK@JGG$s34_V8$%l^FWB(lQw+!g0^Te9Ny+)r{J2lAY{pkFHehG@%~m-=kU zCMzE3hj)dQ5iMhT_pkPM$?8Sv%bHED63NN&mo9cB5-~CJk9!m|h@^tz`FouAh=_Fe z{UpcnM0Atpt{;UP$=u`!HmL_ch%|T93+D94M085*@uMgCiNt(m=CA$CM1mIbfT!D< zXl=84(Uo<9ENip5`%=x9Xk|@ao9f*~G_Lu550ft;%T;37=BStxt;^S>T-}VwYM&f^ zCf|)@nRmmf==XPs=F`yGA!HT7b8yfax`C%QM`t>nn z@wo_I(U_xzcrkO^cXW{Di(FzQ;09U#Va3;Kw@R{f!uoCI5^sq{uHW&Q4?T&->i9&l zyV_*dX-N^+uU3S|;Jj<$E-fNx5FG3h?Lb(zZSuVDd6#gSD{aeh-9cvYima{F$R&an zK^byyya-o%+u|e@cEbJM-SLLE4B-ylnW4L5JmGj)l<~~4lhCrae4O^+4B`ABcQb9x zdNN%kp=s%{S7Zj$sZSq!E)tGd)jg(9ga}8+6UVK3286cmrq7J|JcNTa^hXo#9y0Sl zhCoGF8o7sIrv)H@Z=J*%F!Isb*`&N^1tWez4peshE`_JatG+Cdp@9~^1_O*zx z#mwuQ_+F0)t(Gt1zTQB%{U5ztW6ei|!XIt}FD=4VnQ_m*P=)ZAH>!zFXdptSA8Nj8 z^b?`+9&YYV34}W+#bcFa6cN03@z^@Qg@pfU+?p3P!bEy(Zhij8V*~T{nDI5yVno_9 z?EDp0J0hTTdUY&yk_cXxT-iNQlt?Q^E5#^P5ozAc_Pys@iJ<8G%IsCrMDp0$!Z*im z5Yel3{Kjq{$#~1@UOW$W6J{Tc@nX^TWZE^Qsg`}4;0NzShqZ?alV6UmFt$p=by5rL(&FGpT2 zAX5B~7kYRm5ROUJJ7xJM5CL23&RmXeB55GWqG4P}=3c8eDsq@l=4dyqkFonkB=TQn zsB_s7ksC|1H%`tZqKkF19ye7I-lVSSTcWLr_?VyWAte-H&FS3pda5LuEq{>KF};9@ zFiW?WR`L@O@8%y$z8A>s4W25`Rt@-X7OKz_7)J!O1gq^imP2oRb7iM}0Q4J&Z$B1# zkW4k*BelB!A-sQ7+_?T@GW0*Te`0wm0s6x0*9F-FVagPV64+h{Uw*bZtUrGizN!db z{?t1O`lBT5&e;vDf1-D-+7aJG1TSBll0}S&xHkJdy*C5bZC<9#`PU9aaQ~w2mbO45 zmbmXrhO#{o^W0**YaoZ<_!fDC>;ptpFV}O=8eJk{9=6&1#R5X+jNS6!6DOH3X;mRs zu0qJij{;k0r^)=|{oFADJBYGSVD`&9mk2p3W%LBN31Ktsn{7Uc%vbriaB<))vgAy# za-QdRvPdk0b@rw8L|pKO_?-@WBKYjE-Gx9yA|Bmi)R*;;2=3Y0uG2QK?ufMA?%}(Q zh|9R^n`N;Qu})db?b19%P?hc4nEVbRn!94W!SR9h+?yQ^Oa>2$Liw!a0Ta!L0id8Sppo2Y71>eh9HD6l`?rt|zAQN7<%(sf#g%(F0Pa9ycI6b@Z$ z?Yq94sBXP5Rr=$A_roR04>YC|`I8C@SLoJ}g*!#8PG%&L`5!D6+BMu5nCI5IEI(vH zWNnXp5IDn2=9|6JT)*WS5t;01{j&Qhnb-5V_ke&4na{$vXJdFgng7y4D&u@MkvV?Q zw!C-)QFKh7lzA(OD2%VF?8vMllP6`DvBqYT$>BNC`Kiu?fYm2RPx{Zq+`+z@YL*&Ss4TF(Ugy^dt1$o5Jr zaY?dj-ukEw)2|R6+gUb|5etZpLTpYBQxRDaohV?_RECG2$y8_0t5huIbO93l#mHrXaR4~T-FsYr~QKT#<#7cWndCMvsTefcQG zL=^VBHnr;o6J=6@+Y39%(sxA}MLYS(Qk9$c$BV5d z+O)l$-{(Fi%aU(xo_*>YSvz|<&GCykSyp_xea4d|WO)qP+Rm|(Xq#+ul84%Dg8@q_>v#HyI4PpQRH}^o@l`sON4;dAOa3_pP>7 zQ65LMEQKzHtldB~j0(e-?P2WIP z$KIAdK1GsfsIP0BH=~khUKehzZ#N_>*VMjnSM4S%7R^ZT=6y_vZ}a#y{2Rz}e?gImUZCzIEB++*9vPdFv-nQ!M1Av|>xf={#T zAc7~1_ut@BAY7}~bjg2uNVvm{yoP^Df0NZ6mVB6^j!JEDj!L6G=OqP)+vJbfC zzx0YBvfNJv)<4-o1WZ`fes0bu(hol6KWix>!aNp7VY$+g|N*9lGfAJ#RtL@&al=Bdw z^hG083#&ZxsLuGlxLmFf@`}a*Y=RXkXN&!jx~?E?+dCp4^YMu9_-G<6s6Qi6cn*=4ohkM9bPSmzxTn^cX&;&E z;CiL>b$Xydl{K{@~7_8oj=L=%imZZT?!`CZS`g)^ZX!8Vy#{eDF9spOdRudNB+ z6(;pbqUVWJ_<_&cd8QLK<=rC_`j zZZ9Pg+^bLKJme#SQ#>4vLS2by9-qpkj2<$3yRXyq&Lc$JlgTt~l>?blF(+2?logpZ zX9Fv%lPeL~u~gK(Af1T9Vv)`(tYp>{hl9JnOeR8k^Vd4wD zXZY%^FRulDWMIiMZbQjQ=Ek*H_}YBtVvch!e9d(Dnij1<#tr@(>Y!%y}pH(-j~MCcb;h; zMda@Gny*Ac^PTpwTuUOju5Ow{tRa#3ICt%}Ij%(D^Yg6Q8Lx?8 zLTJXSMJ7Rf3bAJvkaoRFYeT( zBjX0{mwxKZeqT-$%k+g8@tG3wD;IhFcZ8C;8ob+%Meihv4rKRX`$ebFkGTTRq9Y|SO;;hcO#0jSr65PyU48T zIy;erB3!A{b&ti#5mh_(lV@Jl5t*9BC4vu65Y<)%pCH%#Xe2aYX+)Q4W-T zViNU=NGbc;Wj&rk6a(3Ia~`cGvU`?RmcQRhSlV~G{M>wsuqwovChhPdoHHlweErZJ zerO9Oa7r8?6K!@2`aD!4EV@5eES|lP%&_^AQc~$jCY}7Se$&^7gk{Y4JDRsD$m9v0 zT&(&+WI3vXtZal;{>3(Qr`hOccLJbWA;S)|>Va9brd@hm~T4d_Kaul4Cs47C2jLR(hE% z6MYsHFd>30r1@XHVJA%F#kV&nbr+F^O&`oA+s!2Mv>-N)l~;+vY4N~*B~!9+j@T84 z{(<$#gYWIEdzy%R)tc86)|3%(9e~l|P7zm$_8ZhOK1T z8f$6S#A!rDHNU!XdL0?KTZrOb_JwGCZogR|>p(QLo^(efE+dP^ux_0FB$F)t_9;b@ z^$`Kld2eTKC?wh;r0lz^2!RjrL}Z^VS-bscpQY6-0*7L*hW7Ol_0?VD*7ejA?XYUg zh6r<_?R@fd#DhhIi0*sIKISf2y?gumC2c(e^LwY!t)&G-TJwMRdg$lLt+h?+E6x|;8#KcG)&3-9C?rFy1GPd=b@%Lg9&5>OZJxOvWCC*w`gB*kf;_R@y%%KqblVeZYmA7jeEC%Nl`e$Kd0f!NU7AF8Q+r~FCo|!i@Qr!@Is-B*@S1Hz zaWj#*Fmbxe{Jlg*$})oaK?mWUy(BMvzUnn()lyW#+yzkf%23Mygi` z;dJ7OzrWRuOmFP%akX1PgzZ_hH7*?>GnHPas_*zrL^yPpWL|40Gv=iqPu_fzuorMu zKXZ*I!j}$l_@q}5A%F4H8DCG5nG2_X@@GmR0?!;5FIoGVu$5frjvb>)=FPfz&Z7JT z;j(@k%>G7{NVjKOP8NDYIK~=t+*z=g@YI~Hnii=}q*)vHDfHhX(xA#xv9ywK1qswX zEaM~M9CL&kgQN%U|E{N(&l|XoE-hIf_N^ro)t)X;{CxJ$617=4^ASI-|Gyk zl}rfd!ErgO+WUxfk``~t{lkRyljoGh6V4FsBeNFjFP0rxw>MN}HBKku%~FSZKYk$W zv()Z6o6I1hZoK*3;hltIg;JNxM`a>zo9UFYN``P=^glN}q=3woSUmHhNi~^r`+fJS zXFxc^etZ+tbRnWw_ZGNxnGms1P~R}lmT-i!njXKFM1)i?&6FCrZ)4XLI5~5o5E&!P z94fBX3qO4wSBeeHi_^61Ca*jx2A_RpKP(qAgP*m=ds#d7lQF?z4<`m0lJQ@kv*-s* zhwsg+7U}YCCSwBGnhFm_5T^Y)&tLx7L!`olGaa;22=80-hb~u&h_uKNq2vr}GW+%Y z>ML*FlQ|*A#oOzS5vfPBEZZHJiPXMk!wmUPgkONEu}0t-5f7LWDx?!j1ZI4+o{&G5 z5Q8iiWk+rzvT0uEg-2%zarUyY7ClLXf2eF1|NM!}m9kj&?tUsEQ#riK^`8;gpI(-F z^d}L?_w8-t>n95@Y~SUSolV5V`WFP*1QBVui#!g8f(hTsyR+g|$B}t+I_w!`o;Bv2Xi4~e51i``h$0d~oBg(_#uI_0)qKZ} ztsJ=T=2#QX!bSvFPf&E*RZixw?A85bZa@T<)Xo(4HvP z+&q?-t>YqjcIltAQe;W z_7#4&iNHDAqOCs{5Kalv*js_^1NT2C(%j$Il9`8=wzi1wA)KOYcRE63h`{_k`bJKM zMDU@;O>uh%!tuyMtzE{E@bT^wesWZ-S7#>4Wh{7M7&Z|fhenIU$HOj)v~XjQ*Cq1oq% zW{BSyD)yk$W+3 zeByZpvYt)#wdvEZMDC7$f3(vFqM~wFUSVGg(b+8X^F`-rvMz4=-Puq`ZxQw@*UZCySs>7-=cA6X&Gd>OE=d^+HxZ8 z%KTw|(M7WSCoNE2dLogmSQ|Z&Zwpbpn$glSK5O8qF^;3ylVt%(?dp%j(q?Vbx^)8Ve`$Z{t|5c)V z^ZJ#ZHO6GE#Ddl}-#m!+hmSwQSo4Xzq$qz=P%T**a7wngjfW^DKef-acthk{TXNce z{dWP6oL-j}G7$w@(BtV^Gl`IU+p4EMPDJeWxmL&QOd=nkG=0_A!$jfbyfI_0o+hHI zQ^n3ReIzo;=j-lr@D1Dtl*L~;)AGjxci zQ)#iZ=5-?Xfld8oX$J_P}Jt6bYi_(fMw%od;Q&EUj+&NS+KiBC0v*$;DF7Us0ynnf#|C{&!@6V6^+_r!1 zc=YGQ{aeTTZ{8pFC4{~fy~uC!M@rSYHY@gJ}M z@%?|j&v^d(|MdI++w)t=I$=(E-oKZ(Bhpy7FY&+4`=5^ckG!q&XMX+v>He*}9aX@sne^}F{jqB9Vxe9C`TG8M=l9qC9Us36 zTIcKhdH;W(KmYOiAIJOa{Vw`*F8{5(o#Qwj3U*rjKhFC%yXeo^9Q-`}x#s`r^*{3d z_5Qz|x4lE7@5uN3Ki@}xp6CDg{Qj;#`t!a2)BFF|{e%8I_J1pHhsxv1Jy-t!^xyxc z{{ChQ{kfxqpa0w6|Gpmn=lA`!|3CcweZ2o>y#Jf6^ymBjr+j}O{~zb~*Y#jLpZ7n# z|9?Fn(Vq`H`2PRP{?_zg4_5up{f+*7+5c(Ye~iz6&qx24=f`+H?f-QD|BlU(F}pAM zX8wEQUypA8k;?z&`u<%n|6Tw6>-{eJ^PT^-^ULK^-nzl%e|$dw?fE6?cRGz%|JU+% z3;lk;^1nA;Rptg%<_7+c$K!vT-{18deERek?XUm&{QqySue9|H@A`VS7_%SF z`S<+U*zv_?&HZ!!^ygX+zNSAHyL;B}f#aWf>CeL+%u9bx_8e|>&&35CVA3;y%? z!dUPA5677<`t#@qKmYgmN3ZYyH17XnKB7N&`~PXazuA6g`^MUfXa0QOU*j<&XE*)% z*Z(-b|NZyUe_oHj=SxQ3|KRT*{p0sz%-R0Eyyw`#B8KhJ*fHRJj0^yifSeZ09aI!#d{g{@(Q0@j4xUHK#w{r}ujS3vIu(PWk8gP5bp+)Ia^9>)7uF(Vy3U zt$(|v{_DAv?e@PPQ2$SVf1l4^*Zco1n|SvXuRnKw@O2ISdG?Igwe&pc9=-}%{dOg2p`z_`l$7}dCn#+s-IbKWaJLgXc zf6ni(^?B_;^`v{hgBM|^ZQky$`^WK$|N5RzZU5S^ngPb_WxO**3;{4@ci1Z^T(|3 zfbw6X)y6OXI9|=K;mP#XpY!wI*(&z_&w8Ww_v!udSx>Ly!VBwU8o6Hm<9M|LldnM9 zpY>kXnc{KEZvKO>3x8eC?k9t<3x3V!5}(1T&C{rK?!A8;FFlg~-bCxjKjTX{M}B6b zd$z;;+@@;Eq{J5Y5wbawb1LO>aTHpaQ~>^6VQJg z59|LLml*Y*{?~a7p5I@;7qqvZpq&z9`IGO%uP;pg$M+Zgbsx%L)nE629lr&w`Sba| z)=Mq)eo^uJ^j7?HJo!C6sQk%$^LN4hx&FVWd!9f2@Aq^`gIKq@OiP`{{d0V2;$Qq- z=6}gM{{PqBdw@lewr$#|1Vs=P0YyPE0s@jVR)K5%UgajoC zlCvOS6O^2DP$Vh}qL?GBGo$s)@@((C`_6p(e*6D-9mh=H=T-Do_miu-+bTW-*T`!q zze(p0FMifr$8Tpj>#pMCZPGkD%J}<&gzEqMZxvXD%KNi^T7Ha@Vb8_*d{zD1R)fad zqtc;e!40_+x`ailHDo>tgmA=9l{r31dKFj}j{uw@B{p_E= zcyQ8r#EVJSbHhLD^U0+16l(vZ^XgycCscm=zb~kWfA8MR#DhuoO4Wzw?-h&kYy9m5 z^$^PM_tVLFh<~1MG)+2B`Stqb_tP;n9-dF?Z^M($dxn3WA3XZaZD|AMH+h{O`K>zd zd_(ZuVqsC`Umuxhu5m3<4qdhzxq=ro%8mmlls@lr1f@aQn`kI z)^{_V^R=PhPg}R4e0KakKq!7Z>GP*2KhG}{>CAtV+o^w8-R{%X6W7}RgzQc7|5?wMAd-}X@47$4}D_0|n><{S^3c_h)G zs@>M=*p2x$MyoeFcX3l(^i@7z;#NA!$9&gVNAMTKZtZP#%^!apr~Ht0i9ep-soUMV zqjXVz{JR4}-yWg3S?KQ98LJx*8sF#cK~E-V_tO7Gc_Z#vHc3-_e`2=gymTj2zDvF{Gqv;)XO!|D z@K7R}3?2(~j=jSCn)%x_d_=}6PTe9LR@40f)yHb9V+)Sa(BB81tov}~Jkem!CVaj1 zJ)U34jt;dpU5X3EOXjU|Wkr6g3X<5IsdglqcilU)bF~4{;CFTQ-b|6yIh0I<9Yg5#=wxP0TBZ6S3IA+dfqzME!o3^=l4o z$Md`L*xGgjbsXaMAkTga?&lOYDtLI#86M{&%m7?)dTv(WK;1!wE3yP*21l=jh_ zKA)(*?4dp}9*6nWc`Y*0{UAn zzXln8d%Me2JrL<$Zx(2$qx~&>$t$1j=tI1J|LVAqB%<;A^wABnu9#o5wL~Is;Z=$w zyu)YMJxfE!YrinfoC(bb4J~{YE22G#s=n^V*OK^rTC1iT98losTECadk9;Uk8jb`?`1O)-weJx zc=sq#Rblp_$aFrQUy;u~^BQVg69Jx#UiYn-DXyQlcaB{IT94}Iy1jk(S5sZk?)&PC z*pV(>ML>FQQX)!kq4%O7y$MK%!~#f<^iHIsH0hnF5Kvm^oge`cdJ7>Wq+IU5@ZI&@ z`C)!JYwfenUTe?U^UOTYJQZ7z%&uaJYS>-E2RjZ@e((S>_Q}uq`F52pdcuy8p`#Hm^-E2tu}0DLXV}^^o2|o_O(A_%J8+ zlY}lxo6hbV;dCGGJ@v6}+WR*g7777py;g+RVOCmTLY&vG3;6P+6Hbk>wHd@x&+V^lWm$BlR8=8H{Qy?#eVfQFNkQ#$RTr z8+#s0x{40;aV^trH;LEjCB<)t??Md8<)#;mQcV>+*?+&BrdJ+8@AI;+V{)?=M=O}l=&9Gc<%pRI$7Z)J zJ5VNiF&RaGaD;2A1y2jWUUdf8`X&yQ)N+jGIlFl;6)_g)r4Rd<9da}#sUmkN&11{{ zN?FV0rcnL40JKdrH7?K%5YML({~r|IvD+&SCs*|Mulz+UgBxr23V4b=;T zzQNXkrs#PahKU+uVkC361dIuG>n>@+JEO?A8PWAd^Qln%Qp~UAiOt`@jXwQkNUHj4 z<)&w|ce|seFx7=H?#OqOhhMp;BPo2hW?&_StrAp*{Nh&(c zFH-RLm(zrCbXwYe6-7$X{fc3iG1*0IV$Bx>idW!GZP@vd6q4gu#Sj>}w*b#@;BMd# z7sbEw1S>daS4wyM<3D=dFt4~Gvzq3`EFvo}0m~=#y$Cb~7>7GxuC~eVT7DrxPPxHP zGZI7H%fFpC08!JU_(9I-RwvLaS=FI@)nbqtDBgNIvzpDbo=BR$I%!5x-+}+vFg5(a z{Z|5hXR4yi2{c#O39k?RR(eeT%V$=yHfE8BS?GN0BHt#V6xIbkwk3ZKc2#e$e+avY zP2}uSj`+%WCmE6u!;{EqSxRgZOk}?omAE(;&=%A*9{#BP1+K#K<$W~k+|Qvk5X+|h zCV$B*=68$IVmmu&yNcXZV0uKb<1Ovd?ODIhn#i+<4&dE8D=cCQ$%`Lh>PLZjvMqpt zN4#~-MmLjLk!<`^)@&XEir#Ny&}*B?HfH@~=ueQ}lnZ7pKS)}Ef)Clz zn>po1MDmR#d~&IKFVN1i$g>I_r=Vk}FHn=s(kb#$t!86RV}1b@1--=J^r$saSPY|8Sdgmr5v)xsEL)z(!2e#JUeBuR)A-Gr zm^<*wNndG!e1|V9!MoxHnf(|5=BQ7}qUUeHnWJ;BDGDu7Q zLdd_XvcJ@O9eb;-X|-7JJ9o<`@i4)8=30oV)b4PnPoEK?{K9g9t)N81wxx?_nQ&jY zK8jIk${OsEkccSi?C;!H#ZdyK2Q;z|<+O0}^qs?zKxNSruP@yLTy!FUHf|2ztH+$p zAf_4q+MdFs0n60C^Oefqdg4TY!ddjak-sc!UQ=s1gCl!RcL^drzV|ZQ;y!-t`kp?E ztyZPwm5!%F#U*zAZk`iuz8OKc@PdUUgR!lNind%dZF+lcA^9ZVufZz18|c4AY#rhiw=7wQSQ6Y>krkQdM{%w;aZVt*FjkhJ z&@bzAP$7#+4_Wm?h`=Lj2Rp6JQRZZ$FWXbPT4-*E&5cCDMEI0=Xi`*Jdx;=H?O+Da zl$~?iexg=$Qz$jP(KfBpK$u5=3(9Jql-)*E^PtSUOi;od+;4&(Xb>_(l5XNfN)*}z zo#P6ew1o=^1O8BFQM9Eu&$>4zfN?XV^{i?0%5<-WW$Xo71*o-|8esVK$g4clajpkF zf_{G?xU$d`ig;@V#_+Ilb&IGUf8s8EMf83U6W)JQ*}Q_D zfXYT%dmp`#_grQ4EvF1S@**o9?4^?8EV!E1ep{7upe-A`BSzQhRG2QMZR4!ya}4}J z+J4G|zGiiiFX+GWIw&@ua00vt9RWFx??HaOF*k*P8aMSmr@B5Esx(|&*|7Z=mCt(j ztCj-Aiq#?c>!4U4X^5xg{6-F-xV`U3%_Wf`AOrZI%kS}ANWx)I9k_q^DAfX<7AZ2_ z!CntI3u3qkPcdFrhEs5g`*=U5T0hEpVjrC zwB5#bb+(FT#?hafTFR)Z7T43VBbHNFYF;lu#45(A)BCd;2&yzSf!?(e|7#PvA$!=eZLQj7mooCMfxF3PNx z=h7XYU5^hP2$^Qev^)#c7*sfcfhkp+1^NN-3Dqxloukv4 zLI|r_Dvux(v0=}#eda`8(}IOPHa89c#KOUzt;T|Q4LfW?r)|?^acz@BIdKY1&&p1f zo^$l?Vfc8m>-N?tOg_=Va#=Zj;XMbBUqowI(G$BEbTxOy9&*OH3U(az)c)loZU3?H zJxe_=#JFc1YlX4Kt57m?%#zzvMWbb>jbKSBdG<}mO}5FlVV+Dp`Cu^7fM;CD{HE*K z&B7m~0~UZZ!(o-sV|B8zvCIvM_Mwmjhc9%~j?KLCF=@Ep-thV){Y9kUd3N6sGJCQ5^ z?wpS7NpR2E9H6c~>Ldg8UP;MPKkFgZXactr*K#c>a|}I6M8DzRw6lLlP_Y>* zZ-~i`N6FDqdxN5coQ!Gv0)CFIl){qX`u*iR_c6ap z<$6T5$5lDDr`Vm5<1=#zvvX(l#}ouc5UkSw88whDWeMamdS1XOnz@vwv1`2S#3Wn% zo**l0tFk$^tnKeLCg_0POsZ0`Y99V1vuFg`F9q@7hCQy%shDNxavhV(IN4G*-+m!I zVy|nXW#XmQD~j#4NYmST&LJ%cn!DB3f7p$X5Q2)}Z85edQx}ZFV>Y>Qq&#Fdk5^dd z4gbYj_^$xKm}OVW6BiKo50cF<4{{4-SJ0QWNjbwvm7@jxvSn#)<6b{f(qbuFr1%cH zsudRWrf={tliZ8G`^g9_rU$K%yE-aAdW|IL)9T*qelu5`(f-s~<^G|}cR!UFLd%Ur zu{Rssn(IFA@gtc$VkKnbHfI~|(y+Q2_nD>x*Vi!tA!zmD~In#>?h49dWZ@pnM>=3$DMS&-!{RcGHwnlPe>1 z7a)HURH;R4zd~+~tG3Jw|=%i+j z2O)wPcH60T`q@=9-6Od=u^wMPmvgZ$Sx znyGmTpK!yqafbqxY#X2G*;unra5268WU-Y(@H37mXb$mbj$~py1a(mpxEh{Rawvc3 zH-h$Z@YQ;KtL;vdf@~6DQ+?FHEn`LBUrO)&m+ySIE?N}w-9?FM(AEXDyH7rFv}+@7 zWDt5SGkC)Zv;Z9Qi4An-c!|F(=sPYxd^7)Z(cJ@PNV}!_@)X zfhgK<4)JAS+4@lA%hLA0{uY+iA~+Qpf5)v8TdnuZ{VPALv+v)gk%TShMNI4?PnZPS z@B50NZ>n8n8@%!x%X#4sBJZ*{{Ui2hee`P4!pPJyNk3y)ab)6<&ZNsT0&}RO;csYh z`a2%Kg;xyAXO&wa{ndP}yj&zLwI}<3(Ho9@Z5krwYj^QCJ6HBOW7X_5AA7mt!)k2A zx2vk>JNG&UH+tLJkZ{sT+-DlT1$NW6|H3MD6sC$=hpbv>8)zNjqDr zJqy{Aur8oA$1&!)dA0%0pj@P&O{KzkXxH|i0r*ZV zx-W9@yYz79CCGM@Mc7qp(D8BORD_8<+d53X%MEt+?I@Ea;bV|lff9!ib(HAc*kvVn zH8cBCjoD`85h^91Yk9CpE61^MBcLwdve$I)i{$QKRgcq%IEB&2#+x@~KvHVN-&-dc2r98c8FxK-%L2a6pbq!`xLJv;#+}@3cbwF z@v0Sq!e_>NPtr4uJ>rniqSs>f_aVJhpm<<|Qku-C_QJ<5U1Mkbmx#mK-!tnw&zT~Y zr98l$H%6()^#i6vhKwhM^W`LaHNA|u^P}*^P793@agdef*}lRK9cv2HeKEQh>ks9R z2~CP(H<(s!IqpHNTBEfyoYQyAwSSSMvJ~Ztlq&Tb`ewW(X^O67AhdXBY>NY#Dy3K> z!Ry-hjJ**GcUTd>NC)?;4e7bG2nDdG2bxRoKy>LfDoq%Te~2o!M3kpeU?QXXNb3he z+7*o)N0TYEitb1E9-J!=faOmL2pUkI7PiMtOYE`!w{7Af2z%qveq)@|?(xl$L*F0l z)CPqY2?+kxmH7+p1a0yk4DuNH$5`n_19*hLbz_fwDPc>-dM{|}QgPw>{y$5uE=&oI z-TuAS6|x$KdbVDewFk81MG{=>h1{6dxbuWy%4@RdkYn@im?9e*__m&GL_wNZapVaS znA-?UM7?7wj-|<`yEmK6m#xul@d`Ak7$d)@{7T<{w&5_u8Q7yf=*;<)9`HBjq-oh) zPSz;yO{CpmU5g*PLdX48m@~7rBF{7eX?B zSml71y0?Vt_eP#&F{(y8YsINAwkhVU5^|@epe>1CNR4}E@zEls=dV}aY&8CsNC3u5 zyZZDp>L^IGUgIViy=yz%lT1PG3;sqtt5TT2OAOVUxdXGdMEd(8z5hMvjn2)4ckExG zlZ2ICv2?YXK$;XVKnK4PZnqqEWD_Pct9OjRB6on4>3(%iJv$4*@&;xs7BEX4GQ56V zs4>0@dXVaM4nyj>H2vLv>{`Yl^G2X~`&x5)Pgb}2*RuqT0bNc{PQK~yY9IMu6u z=T77MDwQm5mB*_!8k{U#RtSa=I&2_#eMM;?dce}D$mMSOkbz7ux2#L(U`T1?3nb2_ z$)74DSWu3d~|xgPjjsR9ePlp#(GlOfpOcSwVpvNCcEbCOOQ&lxBVI@VpuNy)!nGziyKI|`^qTP ztv>=CIjx3WXM@U5rgY2v`gQsv<1Ef9Qnd$c_T$YbAvl{Q%YL~3l~FoY{1I-j4xF^O zjzhyQovm<)Yf~!oy`d!pqW_%RWg)h=_#G~Sa!t6?ex^u>xi*7RZ zr?^E9^ia7cX~o!|Neg?8=0ErAC1<~bJz=WS>Uee;hsc89#5+aPkL_BuzPYhP4KB6u?TGH~t0p)vB78)O%S%o?h@aYhdJ@jx z9XCE)QFek1l;?951RkHwkQ;5bP;N4y(tbH6-#3->;@A!>t_to>Dzdof7W8}frlYO@ zq9#_fmphr3%_>rJch0A$u9q>$9f_+M3Iq)bkt+#tJxjWq*VaBCe;M;opvNj*j3eqB zRk)KOGbM68oFT^K8y?k4^To%z*vOfIkEKcdt%zf--jT_H;U)U%i)gk{*jG)ZXm5rr z1{{EZKFR~eYfRmPgod~KXWWxigNFF3kfSg2D$S_yHmh-qcc^dohwbVWTbQ(}?SY~5 z=iKC|m!!Ox1AXcv8N6Y%hqZ9BGORa@!S98?@$*7x1jQqv4{{RBGO+W&)qQWm+TO5# znf}d8Pkzh=*UP0hPI;0;^`x2M*yVr(KODzmN7C-Y-fha+tlNneh&W}*Gar8uBQ{52 zXVLWEHlmP(OZ+A%O$X)XtBryw(@^)jY%_dLoCH8w)%+_^s{f#d;%J?b-LKXpvbQ!f zyqKlsKs?Yz@UDmRPDjrcFZ~SHwx?%*G(p2m0ur#VUEGdtD6*BCx;G@=eK|q7^;Wf& z>ZZho16Y{d05^mH=eyICsZ~s|JO)wi>KR#$E_}~y6jl!&qVnh}yQ4?rE+@phiLbiH zXXDS_VeDRkr+fdP*V7E=j4ARJ3(~7zDKGZhFEVWc?V>{*P?QJI1?r$ z_dw8F0~Z;Xq~_CpEBPXSm=3&_I{EN`sRl)TTg{10Tyt)A2n=G}L3p8r%~gj>*JE(E zY-vefDGs8yk3#M~JUHEj(jx=@sRtA}ajfw9JrQ$Hy1wDcp*Cnc<@LQQl=Vb<{|*qx#X@FP~)XdK1_{YkcG$8P3G*0=XmX{W*SGAGXA|{%S8j3w- zb3y8ThWfrtr~cm)8a)49Ui3tOVfjO(xexbW?CQ5?$Hb!-OqFf=5?OVg>NxqPXHT40 zeEOTz#k$v%A5LcF6n1yp+`=XT_~c;wIs!Y0bu}-${&^!p&L3Pp$2gHbs?N@1|C92upFh z{asi|chii|6zRG`+|ykCbvTAsiayFayd2&R;trHNVIQz}d$ zmEn^(>Y4aWTAMC1F9QCO6|Dpv`2DZc!UjpYn?Qi(q5QX0E5{@HQJAhO9uKqEe@r-9 zpjiZYL9%|Zy$15G^NKI3y%;)Cu+uPHEK0pg~S;X>*vP4 zM${rKxhq4zh`oJ3=Kyu7@1Kg z>#VN0jWNHaCXX4knVU^|#SPX=C&17FFF}x5L*;JOG|l5gPYZ+R_g1LIzSd(h7Idc5 z)SX6%Ry_w_XHs^obk|=hve)3%&!#S~3G%OSzvvy`yIS~^@C8f!KUm?3S|slI)fGs&RF@}Wk1OU0EEd=loE7*Gxvkot9+bPK%aET5)?`LN z(hoCrxjU)P{m?D#u@Bx-^Ai-^Z0+PrE?#6YbF;dE>-3wW4tl{$3oMtg_Gq!K#n$Rl z+wl3e)UrBNjQZYmTd5eIZxrVJUsFgF?m-@McZ@#a$07J=JW6MHkZy|-BD;e4P@8T) zar`aIex4&EMSP@JXj#t)#=b?HympK_wtd(eI%n0r|uF`C}t|aBa(wr!1{3bX3>O|hKr?~!x zGswK6GCA*H!DzYUo@XeUot?*L=E_u1kP*m-?-t!^?!Lxb@X#(Be&F!aw5*1G(N~%k z*t*6{ok=YHTUc+Jz|(!L4fzMXCF^#@6MApYd!{`bw)>axp5IUFJf{&*D^5Bk!DRHD zK8woWY%?8GWk?OEfD@Nmm8Roi44_`Y4u^``12nE}TGmLxLuBH3HUnFn8<2gaad*~( zdfhwex!`+(9PZ~)WcDH(|B+cOe9SiY;aLTtm>^tVla);?2Hp}^ z)$JpBI(Q{DNtRqR$Y|DuH`QF86uv+LiyU?Bh8glAU@d>>empyP-&}9#wIr+tbN4-j zNRi=|A=f${mxNUjYf%XRt(JIv@u%5$bv<~D>GJ!(9=ECH zj!t7A#_frIg4Ey9z+-eH(AF&0Z0geuT>dl8^U;J%X^&X-5smc<833#Z?!f~moW$<8 zh)*%x7m*i4*qL6ZRH~HyLvqf}L*w9X(;cPKqu(cJTB-(M2OdF4PQFr+Bvgf)ic& zebUqPv42h-^fl;{B8Q)xlVwVWrqg~|68U|ff#8i$&_Nd*e{yF6m%h-88Bm|QeTtu$ z)z~B0YIpSZvDaR_l>{t2t-YLBjC@PpV4QsuwQ*W*b&wjFDt3?F{dNYux5j@+T-aFCTKB!JfH|1DkFHdN^PS)t&>kI`k<=B(WXeNeNLC87do6 z6R+J+cr^ml(IQSnB-6en&-$n+h}MCGo$_knr-WM|dKdgBORZ~PaXC5lv=1M0pp zM|gToL;1uVRxj2-{DO#M5*zsaU9^Dd46jpoFo*r6b_y4V;eS@eC&QyDMVNlAx@;J7 zYf6$1YZ}$RZC~x6H3xB@t=LYuD5dc9#D&;@z5SJcA=}}{@m(yh>#DTQw2C&k7qz^D zH$3OqsW%*i$38wxn;eq0VAZjRBu$ElUhBY2;dm>*kLCXa|HDOHcn(f6@GaBK9sOg! zz#$34Ej_wgKQwU&?o_#nVfSgj2jc;-vL1g}Zf%Zn*^PfT0+h$@nl+FXPO;TZ)l=EX z*me=Q(k{#R>OJxuQeivSorE2%!*&I-%b?eIT`-lC5r03O@2M^?JIi0Q98W^!t zd9LHwcR)xTv^D?8Zj64qck!a)^VD;>bX(E8-1%vqNd%9Gv9OUq>r@IcD>ta1Cv&F_ zfCgue(}gFOM6$n>sN`aJBfQ8c9G$`x9C=O(ISp%r!szVof?ur}b0C z)O8bAOv7Lj#P*nU)~_qkyH~y|z;&v2gzVIm;R$w&?0HzIHMEbEu>bQ90Ps08OLA2> z@B=8Ko82Fm6U923z1rd1ognjo*&-1waZPoAe9ghWL+P&unA|f_Eft|F>$Lyga>bml zYX*JP>G(uLh;WFtG}j6j}jL*#&t_x!QlUb0fqN4I!kT9GxJk zS`+EYUan^#{2n5YhUIgBfn#Fj&HVM}9zR3d9@{mbscP_-hBQLy9G|T46H@|YadMlqOa62MupUUGOCrmi5W;GeU z!E-!h8E2hHisze)s(qCg*uaT3-E2|~oNh=0ftasZtlUCAI1}cy2@-^w9qf3c3*I9t z6TZ2y%S&Mbqw38p>ps*=Nu@I^3Q2o?evSR;6Zkclk2b0Kw$Hw?Zp_cqh)v z_w-yFOJ&}8TG1d{kd~Ii)A8%*NT^b*6J(Od%KLQ2?+Ybu=pk~Z%wWh*r7c%E5zlHJ zt5=!PmNAaAn_Ko48mC1|q<3B@Jy1RGpCZQ`;Sj%_Yj?I5|S@<#cLsOUs zu|5xi{4&i0VkKXKICk&$Z|O8m`a!&suYSBNJhk233+)Y&|B4hA&71~Z!I~!eu1|Q} zx?IASEq(u!#M_=P!E=vD21eW+{$beja23lD;QI6NE03~cD8y=>^@@-HI;Yu!uo#B3 zGQ;tiVP}z@bD|gSXZ$6a0O$}W?`Yw@)kQ+zy4=X_gq(arlt`0{!5W&`*^~i?pyg?>46!PNXNi9 z+`gfVqt5w#Z^qnoHQlz=O~QRl5~6W*=`9&{9YjI zrpllNM4#3tQLB~7B(bW?&TIfp1OLOu4k>6xU44B%@r=F*T6suFl_ZiiCi}1(>`p=_ zdU`e?@BM`Y8Kv&~@yn%P+~im+dS45Y38#b(doGN2zesp8yxJnIu{W2lT*~=~bPdlh zp6jO#>%P)>!CzN=EKG^~@Kpi{$zV`npq`0>diVqxxj6l+V?iM6{I}vV5xlU1tfuFN zK4l{U*PMqXyD4RsH|b6W0%-A4=qlyEtHa3#aoLUCQX)Kj%p7h> zh4hz!Ev)=2M>er_5@-4ZD{U0?G;ZFq@_9(&la8~4?onw44GBQZNiJf!V!s0FNcpwi zGbt74W19WMvol@y={75lw*Rs)S~^B2M$iYVN|=r*E2h3*M8tL(SS=)(o%J5rLRphB zZE~sAqz$D`&`A%i>hJL?>kR>wDzc?fQnT z#c^NI3vJ3+wk+_zbuw=IJhB}8z~#3qKbZhJC$q`6Fl+!OPsTMetgk=;s>VG3y>Og7M6CHm?*|%#7?kPS zd}TT{bT5>y@n64i0;M&4iW>7F7{XNkJ7vt2)BLgy>xeW1Y+h=ef3TVBl68~>oG|rG zM>C&dSk3VXtu4x1Sk{@IZ=o$SVC|>uAd26>C;hH8>pkfVKm5&q zEi(l+I=>f{YMS0UB2{RyXq5fF+;rskugxd2HV~#ktEiX-`Omvv337KFoCdH@R@>nH3=0;uyQEDnGB&V2tNy#%TQ4l zx(lD0Bmue09c|d#v*S2MpN(FX0vOwI1~IVf8>9B0;Wj6!My4ZzgZvM(j6@2i%jv6b zRG#b>*2%b#xp8E*HI*T;0vMK-glCoXFO|O>S-6eC@W{3Nm3j(e@IaqAw})hAh=k^N zk2f$O{MK$k25gACx9pS``q5S7W!tq78 zKF8X#%{#3M1Km2GGM3?`#il{m#r^(E|GE4x5%U7|NCo3&15g`j0y76D@CzQN#*=Ms ztE%?rdp|uZ9~$>trEMSt`b?}Q+UcbRY^3nH>tEfpJPU9ds7os^`M188^122TqMB{J_(~_W_46piJaUg_^n&}>(3{dNpQ&E@o*S5 z^H{pZ_B5A*m%h0>*0qxPRHLCLdROC*JJB=_267;HP)vLg*O<6RYP8aOrVY$^L)GGqrf7)&kN!I3e|@W$=wj0 zvoN9L!17wTdqLXyG(GoUNonk6pNv**KR2vW@nC(FSz{c=w;#FRS_KtgzH4q%C~os^ z&Jm;0yRd%QrDpahMvT9LBnXZAGol47J#nRbz3HQ>E~Ks9+eD28^9Whz4b_X3%XD-{ zZ~8&}{40y}q{1#*sE$$Pn5#>$R{AzdsMtL?SXtBKU-(Y|lvja(Bl!W>*ATfim-M{d zz(YDN5J}K01Fe3aYlb4)3d*P}CqK>*zR@dXls)1gw(toOk5#lv zcMPJ=5y4@-o!~BmVsl#H5Z*_WP(x+-<@OmWz)$NSSHP-=Wbrx(Wg9E@XbXb5JGDZ!#54h* zbU^=YNRt~ff2%i*4z$!$ej|d6BMdwyLxotqsUw;S6a*AZPf1r@J*Pv6TlIniiyol( z3mrH0QI2yo>5gD~R)a~ZZ`jL^`-k51glmPD6txAvNlgAc#Syb|`FxBw9S4@D>l}pI zA;HJkJK-19A*vtdA_M?QE|LKNDUlzMctMan7?wt?J~WLx*MP~N!}591thiFFe?)yn z=*d$_0_n{OC9MMnteK{i=*)eJdF#NKHA@ZVm$RlG_D*zxs6h0oW5+8DhXWD@ey4G~ zs=S&*3j4DVfEcU40~pYxkddYm;e41T;Q5!EE@o|UC}y* zKI5kydH?@xRPgVli&}lo2eJ2^;vW7_-T7)#C0BsNr+d$@KaBn#xL=NIx0NCSO@(QN zm--&O`{&B_{{{EU@rJa4PvPjk!QC7`Y5yxX9)EuJzw0PX48tH{M%ripFZP29d4PRL z8~EUVYG0^z{jP3)zMh*eT_Wzwj6b`2=YQW_fDM(rBdk__PV9XC1L6q$|MS+X`&9bm z_x?L{K0}Bo{ZE%Wr7 zkYDmVd2t~q$urv)Kw861t$+R_xet{beifw^!KjrERTxd}92HD&icg-Ze<8^u71G=$ zRhY4MJ7THS3D)?Udb~Pq3ZTeKPAEnN80-7!bAp&RvwwS@t+zX|oL#m!e;lCFMw(T& KU*V_w=l=i<^k~`u literal 0 HcmV?d00001 diff --git a/SmallCountMetaAnalysisEvaluation/global.R b/SmallCountMetaAnalysisEvaluation/global.R new file mode 100644 index 00000000..8cf45701 --- /dev/null +++ b/SmallCountMetaAnalysisEvaluation/global.R @@ -0,0 +1,10 @@ + +resultsFixed <- readRDS("data/fixedFx.rds") +typesFixed <- unique(resultsFixed$type) +metricsFixed <- unique(resultsFixed$metric) +simParamsFixed <- colnames(resultsFixed)[!(colnames(resultsFixed) %in% c("type", "metric", "value"))] + +resultsRandom <- readRDS("data/randomFx.rds") +typesRandom <- unique(resultsRandom$type) +metricsRandom <- unique(resultsRandom$metric) +simParamsRandom <- colnames(resultsRandom)[!(colnames(resultsRandom) %in% c("type", "metric", "value"))] diff --git a/SmallCountMetaAnalysisEvaluation/server.R b/SmallCountMetaAnalysisEvaluation/server.R new file mode 100644 index 00000000..e246cfc7 --- /dev/null +++ b/SmallCountMetaAnalysisEvaluation/server.R @@ -0,0 +1,315 @@ +library(shiny) +library(ggplot2) + +shinyServer(function(input, output, session) { + + # Fixed effects --------------------------------------------------- + + pivotDataFixed <- function(simParam, subset) { + if (length(unique(subset[, simParam])) == 1) { + return(NULL) + } else { + temp <- subset + maxValue <- max(subset[simParam]) + temp$parameterValue <- subset[, simParam] + temp$jitter <- temp$parameterValue + runif(nrow(subset), -0.02 * maxValue, 0.02 * maxValue) + temp$simParam <- simParam + temp[simParamsFixed] <- NULL + return(temp) + } + } + + filteredResultsFixed <- reactive({ + subset <- resultsFixed + subset <- subset[subset$metric %in% input$metricFixed, ] + subset <- subset[subset$type %in% input$typeFixed, ] + for (simParam in simParamsFixed) { + subset <- subset[subset[, simParam] %in% as.numeric(input[[paste0(simParam, "Fixed")]]), ] + } + return(subset) + }) + + filteredPivotedResultsFixed <- reactive({ + subset <- filteredResultsFixed() + vizData <- lapply(simParamsFixed, pivotDataFixed, subset = subset) + vizData <- do.call(rbind, vizData) + return(vizData) + }) + + output$mainPlotFixed <- renderPlot({ + subset <- filteredPivotedResultsFixed() + if (nrow(subset) == 0) { + return(NULL) + } else { + subset$type <- gsub(" ", "\n", subset$type) + plot <- ggplot2::ggplot(subset, ggplot2::aes(x = jitter, y = value, group = type, color = type)) + + ggplot2::geom_point(alpha = 0.4) + + ggplot2::facet_grid(metric~simParam, scales = "free", switch = "both") + + ggplot2::theme(legend.position = "top", + legend.title = ggplot2::element_blank(), + axis.title = ggplot2::element_blank(), + strip.placement = "outside", + strip.background = ggplot2::element_blank()) + return(plot) + } + }, + res = 125, + height = 800) + + output$hoverInfoPlotFixed <- renderUI({ + subset <- filteredPivotedResultsFixed() + if (nrow(subset) == 0) { + return(NULL) + } + hover <- input$plotHoverMainPlotFixed + point <- nearPoints(subset, hover, threshold = 5, maxpoints = 1, addDist = TRUE) + if (nrow(point) == 0) return(NULL) + + left_pct <- (hover$x - hover$domain$left) / (hover$domain$right - hover$domain$left) + top_pct <- (hover$domain$top - hover$y) / (hover$domain$top - hover$domain$bottom) + left_px <- hover$range$left + left_pct * (hover$range$right - hover$range$left) + top_px <- hover$range$top + top_pct * (hover$range$bottom - hover$range$top) + style <- paste0("position:absolute; z-index:100; background-color: rgba(245, 245, 245, 0.85); ", + "left:", left_px - 361, "px; top:", top_px - 150, "px; width:250px;") + + # Unpivot: + unpivotedRow <- resultsFixed[resultsFixed[, point$simParam] == point$parameterValue & + resultsFixed$type == point$type & + resultsFixed$metric == point$metric & + resultsFixed$value == point$value, ] + unpivotedRow <- unpivotedRow[1, ] + allMetrics <- merge(resultsFixed, unpivotedRow[, c(simParamsFixed, "type")]) + + lines <- sprintf(" Type: %s", point$type) + lines <- c(lines, "") + lines <- c(lines, sprintf(" %s: %s", simParamsFixed, unpivotedRow[, simParamsFixed])) + lines <- c(lines, "") + lines <- c(lines, sprintf(" %s: %.2f", allMetrics$metric, allMetrics$value)) + + div( + style = "position: relative; width: 0; height: 0", + wellPanel( + style = style, + p(HTML(paste(lines, collapse = "
"))))) + }) + + output$mainCaptionFixed <- renderUI({ + subset <- filteredPivotedResultsFixed() + if (nrow(subset) == 0) { + return(NULL) + } + count <- sum(subset$type == subset$type[1] & subset$metric == subset$metric[1]) + HTML(sprintf("Figure S1.1. Each dot represents one of the %s selected simulation scenarios. The y-axes represent the various metrics + as estimated over 1,000 iterations per scenario, and the x-axes represent the various simulation parameters. Color indicates the various tested + meta-analysis algorithms.", count)) + }) + + output$rankPlotFixed <- renderPlot({ + subset <- filteredResultsFixed() + subset <- subset[!grepl("bias", subset$metric), ] + + rankMethods <- function(subgroup, descending = TRUE) { + if (descending) { + subgroup$rank <- order(-subgroup$value) + } else { + subgroup$rank <- order(subgroup$value) + } + return(subgroup) + } + + processMetric <- function(metricSubset) { + metric <- metricSubset$metric[1] + descending <- grepl("precision", metric) + if (grepl("coverage", metric)) { + metricSubset$value <- abs(0.95 - metricSubset$value) + } + subgroups <- split(metricSubset, apply(metricSubset[, c(simParamsFixed, "metric")],1,paste,collapse=" ")) + metricSubset <- lapply(subgroups, rankMethods, descending = descending) + metricSubset <- do.call(rbind, metricSubset) + return(metricSubset) + } + + rankedSubset <- lapply(split(subset, subset$metric), processMetric) + rankedSubset <- do.call(rbind, rankedSubset) + rankedSubset$type <- gsub(" ", "\n", rankedSubset$type) + plot <- ggplot2::ggplot(rankedSubset, ggplot2::aes(x = rank)) + + ggplot2::geom_histogram(binwidth = 1, color = rgb(0, 0, 0.8, alpha = 0), fill = rgb(0, 0, 0.8), alpha = 0.6) + + ggplot2::scale_x_continuous("Rank (lower is better)", breaks = min(rankedSubset$rank):max(rankedSubset$rank)) + + ggplot2::scale_y_continuous("Count") + + ggplot2::facet_grid(type~metric) + + ggplot2::theme(panel.grid.major.x = ggplot2::element_blank(), + panel.grid.minor.x = ggplot2::element_blank()) + + return(plot) + }, + res = 110, + height = 800) + + output$rankCaptionFixed <- renderUI({ + subset <- filteredPivotedResultsFixed() + if (nrow(subset) == 0) { + return(NULL) + } + text <- "Figure S1.2. Histograms of algorithm ranks. Each bar represents the number of simulation scenarios where the algorithm on the + right achieved that rank on the metric at the top, compared to the other selected algorithms." + if (any(grepl("coverage", subset$metric))) { + text <- paste(text, "For coverage, algorithms were ranked by absolute difference between the estimated coverage and 95 percent.") + } + HTML(text) + }) + + # Random Fx ------------------------------------------------------------------ + + pivotDataRandom <- function(simParam, subset) { + if (length(unique(subset[, simParam])) == 1) { + return(NULL) + } else { + temp <- subset + maxValue <- max(subset[simParam]) + temp$parameterValue <- subset[, simParam] + temp$jitter <- temp$parameterValue + runif(nrow(subset), -0.02 * maxValue, 0.02 * maxValue) + temp$simParam <- simParam + temp[simParamsRandom] <- NULL + return(temp) + } + } + + filteredResultsRandom <- reactive({ + subset <- resultsRandom + subset <- subset[subset$metric %in% input$metricRandom, ] + subset <- subset[subset$type %in% input$typeRandom, ] + for (simParam in simParamsRandom) { + subset <- subset[subset[, simParam] %in% as.numeric(input[[paste0(simParam, "Random")]]), ] + } + return(subset) + }) + + filteredPivotedResultsRandom <- reactive({ + subset <- filteredResultsRandom() + vizData <- lapply(simParamsRandom, pivotDataRandom, subset = subset) + vizData <- do.call(rbind, vizData) + return(vizData) + }) + + output$mainPlotRandom <- renderPlot({ + subset <- filteredPivotedResultsRandom() + if (nrow(subset) == 0) { + return(NULL) + } else { + subset$type <- gsub(" ", "\n", subset$type) + plot <- ggplot2::ggplot(subset, ggplot2::aes(x = jitter, y = value, group = type, color = type)) + + ggplot2::geom_point(alpha = 0.4) + + ggplot2::facet_grid(metric~simParam, scales = "free", switch = "both") + + ggplot2::theme(legend.position = "top", + legend.title = ggplot2::element_blank(), + axis.title = ggplot2::element_blank(), + strip.placement = "outside", + strip.background = ggplot2::element_blank()) + return(plot) + } + }, + res = 150, + height = 800) + + output$hoverInfoPlotRandom <- renderUI({ + subset <- filteredPivotedResultsRandom() + if (nrow(subset) == 0) { + return(NULL) + } + hover <- input$plotHoverMainPlotRandom + point <- nearPoints(subset, hover, threshold = 5, maxpoints = 1, addDist = TRUE) + if (nrow(point) == 0) return(NULL) + + left_pct <- (hover$x - hover$domain$left) / (hover$domain$right - hover$domain$left) + top_pct <- (hover$domain$top - hover$y) / (hover$domain$top - hover$domain$bottom) + left_px <- hover$range$left + left_pct * (hover$range$right - hover$range$left) + top_px <- hover$range$top + top_pct * (hover$range$bottom - hover$range$top) + style <- paste0("position:absolute; z-index:100; background-color: rgba(245, 245, 245, 0.85); ", + "left:", left_px - 361, "px; top:", top_px - 150, "px; width:250px;") + + # Unpivot: + unpivotedRow <- resultsRandom[resultsRandom[, point$simParam] == point$parameterValue & + resultsRandom$type == point$type & + resultsRandom$metric == point$metric & + resultsRandom$value == point$value, ] + unpivotedRow <- unpivotedRow[1, ] + allMetrics <- merge(resultsRandom, unpivotedRow[, c(simParamsRandom, "type")]) + + lines <- sprintf(" Type: %s", point$type) + lines <- c(lines, "") + lines <- c(lines, sprintf(" %s: %s", simParamsRandom, unpivotedRow[, simParamsRandom])) + lines <- c(lines, "") + lines <- c(lines, sprintf(" %s: %.2f", allMetrics$metric, allMetrics$value)) + + div( + style = "position: relative; width: 0; height: 0", + wellPanel( + style = style, + p(HTML(paste(lines, collapse = "
"))))) + }) + + output$mainCaptionRandom <- renderUI({ + subset <- filteredPivotedResultsRandom() + if (nrow(subset) == 0) { + return(NULL) + } + count <- sum(subset$type == subset$type[1] & subset$metric == subset$metric[1]) + HTML(sprintf("Figure S2.1. Each dot represents one of the %s selected simulation scenarios. The y-axes represent the various metrics + as estimated over 1,000 iterations per scenario, and the x-axes represent the various simulation parameters. Color indicates the various tested + meta-analysis algorithms.", count)) + }) + + output$rankPlotRandom <- renderPlot({ + subset <- filteredResultsRandom() + subset <- subset[!grepl("bias", subset$metric), ] + + rankMethods <- function(subgroup, descending = TRUE) { + if (descending) { + subgroup$rank <- order(-subgroup$value) + } else { + subgroup$rank <- order(subgroup$value) + } + return(subgroup) + } + + processMetric <- function(metricSubset) { + metric <- metricSubset$metric[1] + descending <- grepl("precision", metric) + if (grepl("coverage", metric)) { + metricSubset$value <- abs(0.95 - metricSubset$value) + } + subgroups <- split(metricSubset, apply(metricSubset[, c(simParamsRandom, "metric")],1,paste,collapse=" ")) + metricSubset <- lapply(subgroups, rankMethods, descending = descending) + metricSubset <- do.call(rbind, metricSubset) + return(metricSubset) + } + + rankedSubset <- lapply(split(subset, subset$metric), processMetric) + rankedSubset <- do.call(rbind, rankedSubset) + rankedSubset$type <- gsub(" ", "\n", rankedSubset$type) + plot <- ggplot2::ggplot(rankedSubset, ggplot2::aes(x = rank)) + + ggplot2::geom_histogram(binwidth = 1, color = rgb(0, 0, 0.8, alpha = 0), fill = rgb(0, 0, 0.8), alpha = 0.6) + + ggplot2::scale_x_continuous("Rank (lower is better)", breaks = min(rankedSubset$rank):max(rankedSubset$rank)) + + ggplot2::scale_y_continuous("Count") + + ggplot2::facet_grid(type~metric) + + ggplot2::theme(panel.grid.major.x = ggplot2::element_blank(), + panel.grid.minor.x = ggplot2::element_blank()) + + return(plot) + }, + res = 110, + height = 800) + + output$rankCaptionRandom <- renderUI({ + subset <- filteredPivotedResultsRandom() + if (nrow(subset) == 0) { + return(NULL) + } + text <- "Figure S2.2. Histograms of algorithm ranks. Each bar represents the number of simulation scenarios where the algorithm on the + right achieved that rank on the metric at the top, compared to the other selected algorithms." + if (any(grepl("coverage", subset$metric))) { + text <- paste(text, "For coverage, algorithms were ranked by absolute difference between the estimated coverage and 95 percent.") + } + HTML(text) + }) +}) diff --git a/SmallCountMetaAnalysisEvaluation/ui.R b/SmallCountMetaAnalysisEvaluation/ui.R new file mode 100644 index 00000000..81b051d5 --- /dev/null +++ b/SmallCountMetaAnalysisEvaluation/ui.R @@ -0,0 +1,61 @@ +library(shiny) +library(DT) +source("widgets.R") + +shinyUI( + fluidPage(style = "width:1500px;", + titlePanel("Small-Sample Evidence Synthesis Results"), + tabsetPanel(id = "mainTabsetPanel", + tabPanel("About", + HTML("

This app is under development. All results are preliminary and may change without notice.

"), + HTML("

Do not use.

") + ), + tabPanel("Fixed-effects simulations", + fluidRow( + column(3, + checkboxGroupInput("typeFixed", "Meta-analysis algorithm", choices = typesFixed, selected = typesFixed), + lapply(simParamsFixed, createSimParamWidget, results = resultsFixed, suffix = "Fixed"), + checkboxGroupInput("metricFixed", "Metric", choices = metricsFixed, selected = metricsFixed), + ), + column(9, + tabsetPanel(id = "fixedEffectsTabsetPanel", + type = "pills", + tabPanel("Scatter plots", + uiOutput("hoverInfoPlotFixed"), + plotOutput("mainPlotFixed", height = 800, hover = hoverOpts("plotHoverMainPlotFixed", delay = 100, delayType = "debounce")), + uiOutput("mainCaptionFixed") + ), + tabPanel("Rankings", + plotOutput("rankPlotFixed", height = 800), + uiOutput("rankCaptionFixed") + ) + ) + ) + ) + ), + tabPanel("Random-effects simulations", + fluidRow( + column(3, + checkboxGroupInput("typeRandom", "Meta-analysis algorithm", choices = typesRandom, selected = typesRandom[grepl("random", typesRandom)]), + lapply(simParamsRandom, createSimParamWidget, results = resultsRandom, suffix = "Random"), + checkboxGroupInput("metricRandom", "Metric", choices = metricsRandom, selected = metricsRandom[!grepl("Tau", metricsRandom)]), + ), + column(9, + tabsetPanel(id = "fixedEffectsTabsetPanel", + type = "pills", + tabPanel("Scatter plots", + uiOutput("hoverInfoPlotRandom"), + plotOutput("mainPlotRandom", height = 800, hover = hoverOpts("plotHoverMainPlotRandom", delay = 100, delayType = "debounce")), + uiOutput("mainCaptionRandom") + ), + tabPanel("Rankings", + plotOutput("rankPlotRandom", height = 800), + uiOutput("rankCaptionRandom") + ) + ) + ) + ) + ) + ) + ) +) diff --git a/SmallCountMetaAnalysisEvaluation/widgets.R b/SmallCountMetaAnalysisEvaluation/widgets.R new file mode 100644 index 00000000..4ea974f9 --- /dev/null +++ b/SmallCountMetaAnalysisEvaluation/widgets.R @@ -0,0 +1,5 @@ +createSimParamWidget <- function(simParam, results, suffix) { + values <- unique(results[, simParam]) + values <- values[order(values)] + checkboxGroupInput(paste0(simParam, suffix), simParam, choices = values, selected = values, inline = TRUE) +}