From e30b6c3ef72aeca689b1d8862801d58f4f2be10e Mon Sep 17 00:00:00 2001 From: Dieter Menne Date: Fri, 5 Jul 2024 09:20:00 +0200 Subject: [PATCH] Changed hyper contractility to hypo --- R/sysdata.rda | Bin 1964 -> 1973 bytes data-raw/generate_sysdata.R | 3 ++- data-raw/nodes_edges.xlsx | Bin 14362 -> 14345 bytes run_all.sh | 5 ++--- 4 files changed, 4 insertions(+), 4 deletions(-) diff --git a/R/sysdata.rda b/R/sysdata.rda index 11679facfa58b6dcce36a3865f55249a7f510f40..70e3783f6e9310f3c600f63581e1aa4b556e7785 100644 GIT binary patch delta 1960 zcmV;Z2Uqy4548^tLRx4!F+o`-Q&~(ifoYKrC4YYucg@q#^~YrnfB*x~02*qUGKr?1 zp|vz%fHE2l01W`pZAL>wAY=e!8Wm5001-%0i`^rl{D1T z&}wMYMnC|>X`lcA001;JF*E~#plAkxp`ZgpA*O&DXa;})$YKBu2GUZEGynh@00000 z0Dk}g0000;h#(*eV?<>=QwftMgFpZPGypU*8Z^dJ-}(#~!M4WxeqS@yw+%!%V&&@Mfaged^-E6Ab>0`d_FBdgM_ z6%YqwI(D&=ngay)5jxy*!AIBOYoXM{hJTOatTskOY#Oyp)-;*ZE5wh-cU1`W{fOJr z#=vNF5M6+J$D`9IDl~z#3A4eZfbn6#V2FHBdGMbv_V>LM0btMoj-DUO#v!?I(-U9g z;o7qrE2noa4}RtQ;350Pm#mo)EO`_#!2r%UZ1bovj^?!y6`cpv#!_w}M1h?`GJi6P zqDa7ql_O-Q0bamKO%g!b5SSqeiLrtbh6sir5~FBBSZGW@3#sccT|Jmp6GX6WD-4in zCMF??u+OLN?vNHonIOF~n1Bp5%P6N}2y$Vm146~rhPAG!GE&<~*rUd`J{@m*m<*#+ zY|jQwODvp<`xylyF7?QO^wm%2w|`#q75Oav+}@ikVq)Eow-n>DS{Zz4M}V=s#M5E9 z%HXf61AmF?CI=zcltCWZZ=xXrkxE5uC|WpBkAFh9#GU1id3w3;T3}}eZd|!;cJ}OZ zQ>5+FtmAWj@zT2t>^WM5E$WlV-8a5NU$%=n`(Ib%Dop@EJa4e0suCcsCqdrbCP@_ZiO#HcGeQjQZn zWDr0h0Vo1a)}Uz3Kqx6iOn)c_a#H7~0jFZ6Z|icNsam&iiUk++qi;VOa67ynM6}>S z6sYI*)B;FBec!J(1~Dz!vN5jiK^LlBD~+;1;je2zAlndtf#86F2oey=h(H<;AQ_qh zmWdTXN?_p;BGrJzh=X-XiIFh^3?hMe3iWN;Z*nilLOo8`|+-%Kg%vPTndQ@?WusvNBc$TV}sT2~&C}IFdF!&PR zn#u(7n#v*tR1=bVsVpN3>0{1XZ$lC&PkHKZo9Jshu!K~6F?-4S?-C#zF*ipnslJz$ z(oRFQE_Ug%*YP;!c@4p2T~vdJb?Cf-J2|by2KScyX!Bc{wMm64MbI0Tn zIc1=((z&#(nUCG6XeR;O-L}LMHqR^w$APe-N|NBHjE)TH9a89kA#a9se zMM9(4X$fxQ7k{OgZL5WdFv&r4HF=X87@s!@JjJw3V;IbnY*3RLYVSdH7p~YgLa&R9zqPCC8-ZBaw9g{xVQel(#;9~LH--#C8xaRtmAei&5uZy31Z7~H4!p^@9;Nbo z;MvT-jO`M*%^7CN`GE<_(h5|wz;thvebrBWKc4! zZIGc$6A6HtvJ@n3O(v5L{!vi05t@K_K_MApAd@-JkW{slks${GnNeY@8cnj+2sSXl z%qpM^U_=qK_lV|q!iC6^IWcZhxOuIrOCl_JdglHk$>Lxm78_V2Mk@#*t4X1Vioilh zbPL-h7=H(`1B4?~&xr3eH#9Mz+_EB#BS>Kb)YDV3hS9SZ%e3s_qdJ-~JRCmK3rM*V zh(i&j{IVOvOwM{X#)itQj)uWLv{_4JiLr^zf?@$yg}|#6*$L$-AeIoJK?ho`IBX7P zrUQ`kQ;{p7(g;bXg;tAIl7Q4Hpn_3Hb7zKf8-GS0e%K~p$T~-np<6S94#+mvDA>th z!OVsr;-lY9@g_4R70UL}SGxucjAGQLSsJyHGAdMx!i1?L5hM-^1frv`6;lUwpo-Zu z9Rc>-rRimQ6uZv35?=hmbt-#D{2^%DT3Za1RU6T!n@2?~ISmerSBqFI-xyJ~DnLj` z(SLx#2gV|OTVmU&u}5F zHGmeh87aMyn(s!^PGoP`XcDJ|iUVfiA%gboS*A3XjaD!i^g|Ofa;`RHO_;kT}Y ze1C2>bg`@&9S|324@Y0c>=hMSK-vaG5YT~+KuS!6E&o>&YhUAF4fqO-fPD zSxCW;%kPZh5ieusZgA{eU4ns0u339Yq^q-U$@Rn*ZY_l*^NwHF+%dHX_-zY!9)A-$ z?MY}-LYXaTqe@#@8)j`qLzIBB2#^(IRU%04D54dLiekkO<%tng_fFIYd!XOW4&T|H}_iCuY^XRcnOBe%Z1 z`O-1-uM1XfJI(QHJ>A$=xDAb2v}EjILL{TJGDD2v6+lCRaa7_eYyLcc!aPf5mRU(O zY=j^|Bthcy^yaS-4La6V*nftT-0(Kxw`#3_{4B3lx@-u5btjF9>0zM;cwC9~0T_V; zJn%svG=U7;9Pryh3k%N;czB$M?aFwTc)+D)`9On05DqQ~7!ZjDJz{})p+MB>8r?P7 zHLW~l)W5b1DRN%xy0KJ(1_MZAe*6+M?=?oComl0442%oZz|ov#N`HtTl>sn7L)P>i zFrhmzHAubfH@`Z-&nLg>tC|4fjVs5hpiIyg(hak$zAV|*n zLm0^loWz6(Tq;!Mb{+i4-Tq_IFM6HBQ_i6(0Ov;(n9Fhz86}vBxTIrR8*!i0wx!x;#w*ejBhDm%j4^fLf#h#*kZS*R?gz9fPCViQR_5> zw(yJ6%r;fR#D5rMpt+j7$&HLpjf9>Bv`k|d%#&u_)GK3<e9bD{AEd{=?K?)9PwBM{b8jJ@a;Z7v3 zhe#nNo)uaxOC^mUYSfgVlgHB{I2NfRb zZiz9OD6UtwioMt{Y-1LpnPh5fBxF>n6@>{>NFb621%gpg*b1qGy3j>znT~+_Zc^ne zuR@o3*CI>bkWQkfxPOusjkTq)$wg7Q8fma}Qp1SQ=(Rjr!DjeEjfqkMLPm@R5IzwT z?SESq-9?9L0(LAgHKnbaN<`3!MkB2Nu|u3)dXAe)5^55*y5ey1c^Mw8_JddfYeABm z*%_}CY$W7H?Ph^0ci5mdZ6X*imtxH^q`dV}iwdQX&lYa3D{^pu>jN0K)vXU#S(zlm lO`wKxj)!eBEc%;BSkYYzu+_6>Pb=9HY=Hm( diff --git a/data-raw/generate_sysdata.R b/data-raw/generate_sysdata.R index e002eb9..4fabe6a 100644 --- a/data-raw/generate_sysdata.R +++ b/data-raw/generate_sysdata.R @@ -1,6 +1,7 @@ ## code to prepare dataset goes here ## Run it whenever nodes_edges.xlsx changes - +library(dplyr) +library(stringr) nodes_file = rprojroot::find_package_root_file("data-raw", "nodes_edges.xlsx") nodes = readxl::read_xlsx(nodes_file, "nodes") %>% diff --git a/data-raw/nodes_edges.xlsx b/data-raw/nodes_edges.xlsx index 09b71ae629025961121ae2c67d276a3f4e3cc124..8f64d5b9f7c08fc1f4a6dea92187003792f6bbc1 100644 GIT binary patch delta 5828 zcmYkAWmME%w8m+M?oR1$kQRo90YOq)x;sVq6GI6|4BaVRLpMr?w4g9_D%}VQ*Y|zz zy6c_~`@>nkea?ro*0ay^WP8MVG>BrM>6KE0VG>w$fR1~P0AWZ$^ONPTyl}cgEUrp0 zxJC6?&(-X~sAB_-J2d&2MN$9hVXBlx^Wl}RLTp0tUe{@t)cTOENt(kz8ae!fpv0xX zmM@#P4!`y9{gZJjt5UpbZ-epdk$@4=URvPEuQAQ(nq?OoS+3UFlyY9NuDU7Q5K=G} zwPg7kP}LVi)oAhYEfJsa{nSyZp7GZFzyPukkVsfLZ8uJ zI=R!HYQsjZ+5Bk`i#Ort!Cup$ufwouQbO20ZNId!`+OzzrFME>`VOt!*hb@&o+5n# zphB{Kdm!TLAaqUlLXFsdXF6(%B@=DUhq82Y1_*1Y5Ey4M$=TBX5c%P}pKYV(M^sBs zWWcQPjtcek+Tr%MU#l}K<~6iIo~P*RKTABi6pte+ygQCbkJq~0yN)rFb5N|59YODJ zgI=^7k@u&~%nmA-M!;C`TQ^O2Y6*@KN@tbbd4Hi$-|EqilTfJF>cV@zqE+0#xJUel5PdTyxn)C z%q2mzfOzrL41>1)&uIth-0~(7EEjTD=J-bysnEB~@(cb(6L8CM1ZR3}A^+1BaU9f< zqf4s?=bgO4^zv~Z^%FYm85U{NEsi1@nk;LNF6;%N0uTc$M9)Q0^E0{b^N%MHz+m62 z^P>=wm6e^0w~xuNkcI1YZ52aQd*@~s7DRJLYzlTp(jJ!zR$}X&ZOL{YI9Mgje-yMY z^wj{5j)BZWL4lv!=R%+H8{St|P2mi1Y?DkCd#O)}M<=6l!YjfPhh{mZ(LdZ=m-2}6 z%;!?Q22ytzXm>nRt!Pv3QZ~D-SkSdfu&*-8cT8o!!HpvM;@;m*1QNrJa7nvZ zG^?hw^_JiP=hvAqrsc9T1jA^o)p1Fv1Pgcf7*9E=iCnPZf!CbZd(P@uS_?brbnau9UD>Uiqe$-WKM{b*{@H0{Yn(c5(p3-u zuh(jLZCQVG{;ac9-`T|#NLr~Em&oUm>+HNC;8VS%Ldah_Ha_8cQYkP+tX1y5;uKVS zV|G_>i?y1Z6f>(5+|y{=QyD$kag4l=pYc_!2>{gza^lL%l z9(E74(5WL``16sVl1BN9?14|;n z%;aXS{nggPMihghoxi{VZt;obH!7E5TG`^;~vImmIiCcNl^7b-4Xr zwkL%`cGqaO(#ezd4J2RFkd5kG47f?UNd&67IksbMWFzSQZgg$5jm1}~ZbM(JG zgDLy#waL9pJ3X|{D=JUS(m54vnisMuv(=lHdsq8+_fJuqf7WZ47COGy0kt~85yiVX zsLGB2Ejrz&Ri0iM-*%hX7UgTa_aRJ)qA~f>cH|bAlBTatIj`~VI(?qJY&glh@ay$n zOLV`g+&)upi5}o4L&dLemXPS4vvWLeeRbm%Q0B9B#=Px3PeS`Wc}ND+p5Y)&$(y+Ak>OuW(;{odK#NOi zgTg?x>_CY)VTgs}6Y5s5DugjlF^^tzKQmsW%h>hw9P(H1!ZOkCv%fyx@>-+Rd8t|& z3rm>Rb&WqZct4%<#@15g?}vr*`O{UxMnFP0ej)?15c80q7RfHx6uk zWM%0i(gVFL*uu$i!JAMfDvo&we|ZGwg)ml^csAPiw*4zqkk+RTS5lRspdWRvteZy@ zz$Odal14#!Et3MeXoB%%diP=u7ayXzs)_&EIE89V%PRBv=$!_OMm5pyqY-JA#e^5l zn-T_6vAW1H58I}Fhv#iibOr#!M&4M)n@g{cf9zi%PMIoXex#+H|3N$s+F8h~(@P^V z%KjJ*T6iBf>7%W%(_c1h6hgl*`aer42Lxh%)x)1#QPO~y#zK~{&o$vdSge9}YKF@z z9YXS19E&r`kNh8JQl3()Hkm8v7T#V@+tV!CVm_w7USZtFA$p=aeqW;JWFpl|kiT90 zS35!|>S^fdKA=xteX`4sy_bSQ77;GDy*q&*SJ0xQ8&#P0U?GKhElbKF7OC?YV9?vg z)#5)zN28_U&*(jIX+@`o-byCBAE`R^QLWsGD(U1EMz^8RNBqkuYwdspJYp00r=X!d zO*;QA;l7=t3Pg2je-P^soz&kC#4wDWFSM+T_sm@FTt-vfyn8~qmp;mq6?N?ax>;ux zVf&jlYAQKeQun(vm;l`?-cPCy@CsseKB5K0=rywsL@S*KN3jijbr;WtIKrbJAl=3d zM{L;UwjQ-9E4McG~sxfz)LJ}&~2!@0Lgv}mpVs*E7S6|r9Tw3qO^lvbkf27Is%|wJ^?|9csJ&txPFMec2RRN&)cczBS&pYvz$aUU)?5wM z6XKxivH?|>{YfQxbjgm zajNn%$f+3%!;8kW)D1{<^FtD7={nAEgZc3KkY}*iu_pAp!Ju`%ekI7M%0I>El-vgR zPz>NCruY?K??@Wd89-VDoKqvX7N8YV=CW1aejSA1|9BhB? znBrTkbEj@@?bnguzTlwIr*X9MohlP?GTH1CRr=EEFng%HLrD>SQ|nutEM6A>wo2KA z+y`qW$dVy*^@Mvgr7$M5JBiDQ4Q$F(taACjA|CChcUdA2WsXxjYfF5nOst)o`xkSVvBm8f=-j`2xkyhq-!T4i7=8>@3+8x|a!f>u0zaq7-_NR(7M? zG12uX>P>?ZvF=P?Avv>rI>0C#uc6#5+8~LJ4(+9xMv?6GN`Px?zqg|KH8TgDa{xi_ z;=|=aryM}1-$!ONc^$XOZ9%RR3B{B5Q#UDB$ePsPYlBi({1Lf6n_>)}?%Pv)$t+t7l9W=hR zC2aHT=!x;2%A<+eOSs5_)|@3V)l~@WLbDJ)TeR5KGpsjkC9-7gMWLou4r0<^Go~uw zrD7e?SJS*yu=VAu0oT_@k?>6XxJe!^G{r`7D{7*j#5%zxZbbMci8=k;hl^+JU@L0S z$e}L3z_3rK&3#P+q0(}Uqm3TlXH(@}a||;^xXY{ZV@MgriI*?PHUM3(GLFe^P=v{k zzfrZbiK$AbD-E1I=9JlTk2uWzqGS(PHCu#n1%K?P7EIvS>Sy9?R@R%hFPk~*2oKS+ z#*&p{_Bb3a%K8AGl;++6pSQ$)SjMfdD|p{R8>dfMDGKY+PKjeoNFKv(p4omiC|XRQ z7W0#2O|&?>vKto``s3{caiI@$n&D=W$){)AAW~1Fw)Fn5N6Nzk#KqJE8fnVFHj*CI zmZXPH)l&YOG(MEuMm{D?5mi+eAqe^dc;E~9b+apC=J&Wp6vT?v_@ ze&1c?E*K-ay159|?KqNS%A)YJ6v1vTU2Z^KDjoE`cOZ||M$3lC6glHXf96W%=zE?R zYyq0#J{-ou36Yeg?-zz_N@%xh`={R_Yn}EMevq}>;opSN)31qqHQ9Su=@f|TL{0if z%ztJx)-=Z4i8F*rmfZ}zqxb!i@E#CehYw`TMJu!Z z#{DYY8m3R=ytnY}SK|Ku>3)Kc8+h5D@6*Zj3(X4ez0(iCvEf?5%R2s&j$X*p$M)Rv z!-bLeQH20?QCRCR6&~}f-c;({yd#^%_{gYUwdxeRv1d4y-yo9r8@xge zyQ?y>Wc6({SEmg%JXAg8YM%qUZB=Hn+Js0R~@Gmp%jR)6#J<( z*{B?crHld&Bw2oEk__o~bc}eChOCaE?)R9di`R~1fu78%_BJ8;U)TwdmnpB_FlC^5yHgAm$Y zvS8tH=T_d7##j?<1vOaM2p@BbS@`$tw8*PCqk3SsPjQ}aka_H4OEZm6&s5a)A`>Y- zeJId;^@_(w#+@ibfQ6A@hG2G~H+SELhe!KR%Ix+!UIck$SS8{{%7wbj%CUd3I-UU9 zwu$Zeb3wFesouOVg}!h0wuT75DwnMD2t|Z>gPS@?NT2^8C8?~{3|X`?wVLNXK6BV< zA`>94NqZo~DUm4)U0b+sJ$xV%Kqao~pJ~7mE7u7!-{V1PsRibsyBRl>^>#j}X~=}) zxVGm^;={-xsgV%2hAb6)5D$OTR`pgrB3Dqfw0DDzz1f(L&;efnsQKb1t?RmcfT9}E zY}r5eJ$N8(MvJ(k(rLR{MEheg&THCEBR5#XZlQonB6+v$Tk>yJwpt4-8LLg6{)c-_ z%1a#4Zz`s@vJV{`rDB>@3WWJ+XdRcrs^j$Is}IC28{YoNBKNbQmqOb8f~*^1ofT{q z(s$k!@<_$lm=~vIeSQL>bZg0J5Q8U|qe67EFqau5U>h8yz}Z(bi^a3D0!@KPQ4TYQ zJ1QiVP5tTTU+bK-T);BTvY7vhbz9Q87jUtVs+%tpcZJ4nUWSK!5$9T zAXCckALeZ2G3oW;PKRF|1SaM$1*+C}iG-QvpNT&GcAX9c8mWj9ryL5Yi$3xfI+b&D zxUZmx0oG*W77@4dWrR5^i9Id(9EzG08|1^y8ckFqNsu;z^;1zqdu{EOY^q;09)-m_%mDD{U-Pojv6H_|PMH%H zqovA;QTnS@A2SI>0Uf*9Ka-90DNx2}w@&sTHCZ?9(c!aJdAoHhX^(h2K^<+p<~)n$ z@(}13=cCb!KELYWGBLFrmAR+1@BSLA{f@-Ut>av|12?y)vg2f1ZF ziqfd}h>U{5yZ?eYEdFKm|I*`qk)i(*x&~3`f3{X!OrGZd1}PyD5-HOEU-ht5F?p1J zPS_zQ9qdYskmlc)Kt@8+K|w+y`u`-7Cye2_Eb>p7`EwcMW?1gu8U; delta 5897 zcmZ8_byO5y(Du@xfUwlk5-uU#-L>@6AlAPv$b9a2)#(ozzFNQ3bD z`TO2~-uuVgb7t-{XU>^3^W2#jw;Z>R{5a^+(lpaZVH|42hU*F!L2yCS6Ww`W&eAQ4 zT(~3gbaF?yYjB*l!}7+L}i{GRrE@DBWPpob~w{nSLDqHzD#=g zn|?)nqU?!wgR+CElYVM?MM_o=BjrA=COZlf_3mKu(~=c2<#u;~)B!Qc@LbIPk7{$0 zd9nsuRJPZM3RXw+iiP}IlHzs_5U=hJ!i}V^SdUPA?3g?3NaGs6VOt&;D|iA$u0EBb zuAQ%SzPQtmoR^&x(v?%Fd!>dbQR0*%o9))c;F;74$-SN<2K;^aYfT&$=a4rj8KP~6P+zwylv^i zxQ7h+I2s9usv{|(o5`W^L=-60ckT4IT0soU-gc?s$2J6yAq#LL*Zs%#2kw1 zI*qS;z8MRlQpn(_f2ZX&Y~!=p5c0WsfE+<~N|IeG45)DNk;~Mi^E?n%Z=IJXJI^#A zbIkT__Ycb2J!%|qQ%Q=7(fxVJ!DD2b>?G=4&P~2m3p9Y$HfP6M_)rWr6as_3MGBLG#z$gPlcTaD|2`%WB>#g$bv>W8fk&-1vel}YeD#6EE2L*QTBp}eU;J1E{=m1jT&jgx=1Os3-Q(IrnDBp4-D zHmCGbQMMB1|LHD(Rf(LM$M2`_j$HkfX@4CC;>s#}Si*os<9n*kj=@yuvUyHaQV(B- z0&%PAz`p)_=|t%E8)dX5sG%enr=2}>K4n=_sRdy_THZM}&#xwM*Au#bDmL}PcKqzs zJK@gheD>>3x5$Zz-$gl&0Ub&6rI)o@RB_n+W1uun)PC_}0z9 z#R$%ovAX+3z?wQj1KeM5*~7;1u!P110?gUz%AQ;deu!&Qurnc^Ha7%?9|9|=-#^1* zyw68~FUbX-AE%?!7Q^&>hbOPF{O?K1$~^Iu^cNrdUO7m<6}6YBNlhZq=Vs(N$a}+) z4n*QEL_8Vg&r;*WfVu=11zV~Guan!G#5ct@E7!}sP)y?Lbk)wInna1dhiD2=xpjHA zd5-(0bcVc=%*D2Vf%`8dW^(RpkJuh?szedKz_yku(Tt=36kHX~s89`!iW zi&Jr`wvT_*Wn8a>)qtxvIUi7;OCbp?bQHgNL)Q70ayP#p0%w$?^rZM`q@t;Yx&fem zEouDqmW)OLm$Vy+w(nSkhc7U@q^l%BSD4?p(TH1k=td5CP*%s9FkXpPK{*et^q>fk zM)zSq+|tpI2X|D5h6{B;^p82=X<->t%u zNdOp6zfItwb3tjm3q$;Sxk8wpj$%;jBwQJ9nE4-g#fE9lM9McpeHb1o1WfVvI4 z)ugF<3OfXVq4Q{`mv><$Rz;A6(D&a$aCZ}0F|!bIyD?owpI=?Bm;976laWjjT&Fb$ zrZZ)1(PZ*ngPXAjGp~xS4Mai5#i^LvM^E=RV&Jn4j`AE;$Ao^Y|~6bW6{ie?ckc zOGJbvZn}_eX?AbtOgXo7;G6RD_*VLC%z#FGotlQ5wIb;?)yL9}*miHaL=FF! zJ{sHvb!DLF8ExFbU2;tIyd98_#~}VQju~m3C(`t?rt&6ST8n`k&uPO3*}}bUaOUt~ zU}B8%lwkv{-!@vs)`J3%U!D(_zLk~Pg5sp!9@R6Fc^=- zreZ>D3lRjHIXuaxUE>Hb@)dqi{7N;T)L1otMKeVQiUyktK+GCfp1N&B8Ebh$t&Mo8 zI2KK85cTa(H$F;vWcj->Lh2@amnKoPR`rm?&Wihe+VK|*i=%M|Z82KzJKEQI`#(QN z6(BkgB+ISvDgUjIa4QM#YkBvaiva&m`%wty>%kb>&<2uaI@V2C%h7IGydve0mr`JG zkK{4+`<(+v9AtF@Zv7gVyCCl7wl^t)H1!uBYwshx;N5v+Q>)r*|6H~J46~^#5O|Wm zH1#v;c(*Ljj-KpWf80<}nOb8P)%EbmlqpWS(>S0lU_4QE$om(Z!cufiJEr zo1T(}fH&%@` zcAMURi#NajVwu3`oVJugB5cL9bnyY+Vo@P-);eLRC|nS8acZr7T&lIWeCB-dj`Y%8 z{HoK>a&1B$tDBa87lLQ2O-{Wwd*L+M^|uG=t}y+C6$84bDSuxNX| zY)&p2Rph<%dH;C6C<=9%DHjj1*xr@O?~^D=iLc;&aX2?`X^nBz0reJ3iapqpAgaS> z6D2@C5RaZjsP#sSdt(jJ?+1sCYN`qIO^&~%UA;Cf*-X8$2i|81@H*gr-2=0~lp&iH zv$3urYvfEhpaTahVBTl7$qY)%A4^+To=I6woQ=3p%f{A5;bgITVhtkJ6wTz5;wM!z z&hRNak`*>zeoU6@+p!COYSe>xG`ue!ab@N>Y<2p46pW_bxPfNEU&2N3oCOz2N)Sah zD@8@5C8C1NOHi_~huJG#*ym9a0}r?x%9FeC)M_9F(MMFr1?lxgm9)U1Em^_56_UWI<}>bGlhUE4 znDPyX3Oai4^suGY8d|Y@Qsj|aq9T(J`-*W;m_D`HnT~ysn~paF+&Pc3@~&GkOE2J) z>1(KtdE*fciMeCqSYGTiZcE#S2;w1I+b^2G!Tit_4B5(L_TpF_T^mSFI? zf@j8Z7v!nui}8-y2luH9Urf08kXS=hWrqMuPep?d^)iLLWPc!)PEhQnlx0QHFNiST1_@&_FiK{ptv#`G99$7<_~ zu1SLlPRKB{2PC6OdY(6jW6x} zl7d9joQX9*x(r-T`lXZ|Kl+f%Gu0X?I(+o28`KZK5%*l>1)VMuN%~Xr;DcvMEMg6D zOw_0h4gFB6EMJRe z!}I~Qahg64!NV0fwH6Hu8bj}dWZEF01$MNd3c0+o&29$ZqD{^c6Z`X#HWSw{0lcB1x{pA9CECH=X|7OkUp$lq(zLv)tfSjE%C zgQHUsM{hgG_i|47eWZ1$F@0roW5zRwlZ=6C#LT|>zLSIqQE@hU=-o8VxFo zx|k8|cwbFoB#}8iRpq_a$cx(QLY0%vJU-c|z(H(&A3Zv@bE#b)X;lwo;J0lcQa&dv zspl~aBMmT)ZNt1^!GX%sd&ZReuyPJCns=->pfj&2?dl5cWV(%rpvoIxq=DMvZ9*&& zvT`=Wlo=E?XqwK^r+xAjw~I|q&0z{|3#R$i_ci8G+&%LdE)%ZJbQHheID;?Y{$o-2 zfrqe|;cpeQmncEg$Gyr0Ga?^l>d1YW1QWtz4|%9(H*7?#d&a$#f-`?4-*bGWyQKbr zbpt%qdx+dnQhK|tZvzEVT7NEQ;vuiQST^Jde+Awa zKQDWKdl=SvS3f%N^pB$vcc-}Vdl&$~AOQeC3;+Q9oH#x0Ej(wkEPveI6sT_$oe z!4i>4`gLX|gIU;iCZFETu{6`}{Vs>O=)AklpzcnS;A7pgE8nZftBy6`EgPOhh)E(O zUDMo&X1hIcd=QTgGI_iR-v?OF`6JxJoAArLdX?pi z7a_}I%&eWtHMX*T-7g0lJVj7MjI&(jqi?=8Q~}cb@E$1iEGx25AzH*R+S%`GLY~-r zaH84oMDO&pjeKHMW9Lvh;7|*lUAStr5*AXZ_l3+cI3Vt97t2R<(0$5f=Z`lu>l4mx z2%6)Ma0F7%K!2WCsAat`b?_x*TKFlp{8uQ8a$@#MPKp$lz48lw(oND4Dq+CPI+`#| zXQhlIVSrYVOhaF=5rr8KnM!Gov&=xEos1}9!p^qoGRN1Wy}iguDXr=0oMFbIRd7e0 zV5=)e2K(tV%ps{(tL81i(ivU^RtnltiZ5*T4zUSYzPYfkadjqb;oNiC6!Rb`A=Uur7M&HeValR*UY=`CxJ%eA8)T<(z6Nc@miI-5((AM5I7g7mv% zBOk#6f3%j7>28h{jIYFTu34f;o6khn>(m+R&zgsd{Y-(s$9Ok1db0>uxEx)IREO0H zBl}N#=aJ;k7A>mMFFRncIPPxb`6S*4K?LQlz(E>G9(|1whTRZiRa|d6sJb#~I{rMz zIc~w}dq%(JY~E)5c(iqK|Tu=1PLjB5sIgYH4 z8~?1B&AKG?i&&MExqteb2-e3j69n~lg~R7AJfxFMM(kwRe2Q6;3$}tZ!!3V&aTvt{ z1kHaO7gea*GsUdxHM<*$aB9y)u;H6jLzX;rKt77k*QvyxJI%8)9iEK;T<+-f{0)h6 zN*f@aw{suxZfX*jTPdC*&%{e?IvSZD5*haPqT)*Fx=?*C$}>V8dVUvO(TAv?kl;ov z-8f4M;UzEO=}cMu`iTy5>7xD8(vVVy7H^S_wNfA?k;P(~5%TUGU4Ov<7LVHVQN=Ij zmJ23k3umPTYFyp?%qI3XG?zhHY@v}a-WHyn}Es=h^r7j-qrdnt&_31?yO6!dz!1tYY~s(B3g2P#jP+nE$3^o`WJaGJ*T3%`E} zqhQ_m8i)e)l{{(*Z zsiMZEJr!r#5Wi0K^48QnLmSR$o+L=XekK)Xlo60w)M`o10X3&yOx16W#HH?guNxeQ zjE#(0>5Z$Ph^2MH^fSY)Bq9s zJykSO)O;yk&Pzs_n?Bc7`x3yyrBf&+8s{MQt6(t{dUg2LG+RjbM`FUp4`Sc33`+vV z>%NTQdgpKDYIh(B$syX@{l(z^^DvWuH0A$g-oNDg z|4%FOt$;M@6bo{dh5EIo3JNOwUuwn#VE;AK0siF$1pt7e0sw^ni}-hkAn^qyQ0|dx Xg5oGc$hf~U6FDj