From 699633f28f0722b99dbb3abf58fce3a60edd80b2 Mon Sep 17 00:00:00 2001
From: kriemo <kent.riemondy@gmail.com>
Date: Thu, 4 Apr 2024 17:11:11 +0000
Subject: [PATCH] =?UTF-8?q?Deploying=20to=20gh-pages=20from=20@=20rnabioco?=
 =?UTF-8?q?/valr@ad01d5e724af15ee75f032f0ab50125a7ae524a6=20=F0=9F=9A=80?=
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

---
 dev/articles/interval-stats.html              |  36 +++++++++---------
 .../figure-html/ecfs-1.png                    | Bin 75843 -> 76483 bytes
 .../figure-html/pvalue_viz-1.png              | Bin 32819 -> 32913 bytes
 dev/pkgdown.yml                               |   2 +-
 dev/search.json                               |   2 +-
 5 files changed, 20 insertions(+), 20 deletions(-)

diff --git a/dev/articles/interval-stats.html b/dev/articles/interval-stats.html
index ad06a23d..52ef0401 100644
--- a/dev/articles/interval-stats.html
+++ b/dev/articles/interval-stats.html
@@ -224,21 +224,21 @@ <h2 id="distance-metrics">Distance metrics<a class="anchor" aria-label="anchor"
 <span>  <span class="fu"><a href="https://rdrr.io/r/stats/na.fail.html" class="external-link">na.omit</a></span><span class="op">(</span><span class="op">)</span></span>
 <span></span>
 <span><span class="va">res</span></span>
-<span><span class="co">#&gt; <span style="color: #949494;"># A tibble: 16,894 × 5</span></span></span>
-<span><span class="co">#&gt; <span style="color: #949494;"># Groups:   name, stat [1,916]</span></span></span>
-<span><span class="co">#&gt;    name  stat      .id   obs  shuf</span></span>
-<span><span class="co">#&gt;    <span style="color: #949494; font-style: italic;">&lt;chr&gt;</span> <span style="color: #949494; font-style: italic;">&lt;chr&gt;</span>   <span style="color: #949494; font-style: italic;">&lt;int&gt;</span> <span style="color: #949494; font-style: italic;">&lt;dbl&gt;</span> <span style="color: #949494; font-style: italic;">&lt;dbl&gt;</span></span></span>
-<span><span class="co">#&gt; <span style="color: #BCBCBC;"> 1</span> (A)n  reldist     1 0.363 0.141</span></span>
-<span><span class="co">#&gt; <span style="color: #BCBCBC;"> 2</span> (A)n  reldist     2 0.429 0.483</span></span>
-<span><span class="co">#&gt; <span style="color: #BCBCBC;"> 3</span> (A)n  reldist     3 0.246 0.416</span></span>
-<span><span class="co">#&gt; <span style="color: #BCBCBC;"> 4</span> (A)n  reldist     4 0.478 0.475</span></span>
-<span><span class="co">#&gt; <span style="color: #BCBCBC;"> 5</span> (A)n  reldist     5 0.260 0.290</span></span>
-<span><span class="co">#&gt; <span style="color: #BCBCBC;"> 6</span> (A)n  reldist     6 0.286 0.186</span></span>
-<span><span class="co">#&gt; <span style="color: #BCBCBC;"> 7</span> (A)n  reldist     7 0.498 0.214</span></span>
-<span><span class="co">#&gt; <span style="color: #BCBCBC;"> 8</span> (A)n  reldist     8 0.237 0.245</span></span>
-<span><span class="co">#&gt; <span style="color: #BCBCBC;"> 9</span> (A)n  reldist     9 0.314 0.483</span></span>
-<span><span class="co">#&gt; <span style="color: #BCBCBC;">10</span> (A)n  reldist    10 0.149 0.410</span></span>
-<span><span class="co">#&gt; <span style="color: #949494;"># ℹ 16,884 more rows</span></span></span></code></pre></div>
+<span><span class="co">#&gt; <span style="color: #949494;"># A tibble: 16,712 × 5</span></span></span>
+<span><span class="co">#&gt; <span style="color: #949494;"># Groups:   name, stat [1,908]</span></span></span>
+<span><span class="co">#&gt;    name  stat      .id   obs   shuf</span></span>
+<span><span class="co">#&gt;    <span style="color: #949494; font-style: italic;">&lt;chr&gt;</span> <span style="color: #949494; font-style: italic;">&lt;chr&gt;</span>   <span style="color: #949494; font-style: italic;">&lt;int&gt;</span> <span style="color: #949494; font-style: italic;">&lt;dbl&gt;</span>  <span style="color: #949494; font-style: italic;">&lt;dbl&gt;</span></span></span>
+<span><span class="co">#&gt; <span style="color: #BCBCBC;"> 1</span> (A)n  reldist     1 0.363 0.275 </span></span>
+<span><span class="co">#&gt; <span style="color: #BCBCBC;"> 2</span> (A)n  reldist     2 0.429 0.039<span style="text-decoration: underline;">5</span></span></span>
+<span><span class="co">#&gt; <span style="color: #BCBCBC;"> 3</span> (A)n  reldist     3 0.246 0.151 </span></span>
+<span><span class="co">#&gt; <span style="color: #BCBCBC;"> 4</span> (A)n  reldist     4 0.478 0.292 </span></span>
+<span><span class="co">#&gt; <span style="color: #BCBCBC;"> 5</span> (A)n  reldist     5 0.260 0.431 </span></span>
+<span><span class="co">#&gt; <span style="color: #BCBCBC;"> 6</span> (A)n  reldist     6 0.286 0.257 </span></span>
+<span><span class="co">#&gt; <span style="color: #BCBCBC;"> 7</span> (A)n  reldist     7 0.498 0.310 </span></span>
+<span><span class="co">#&gt; <span style="color: #BCBCBC;"> 8</span> (A)n  reldist     8 0.237 0.213 </span></span>
+<span><span class="co">#&gt; <span style="color: #BCBCBC;"> 9</span> (A)n  reldist     9 0.314 0.104 </span></span>
+<span><span class="co">#&gt; <span style="color: #BCBCBC;">10</span> (A)n  reldist    10 0.149 0.433 </span></span>
+<span><span class="co">#&gt; <span style="color: #949494;"># ℹ 16,702 more rows</span></span></span></code></pre></div>
 <p>Now that the data are formatted, we can use the non-parametric
 <code><a href="https://rdrr.io/r/stats/ks.test.html" class="external-link">ks.test()</a></code> to determine whether there are significant
 differences between the observed and shuffled data for each group.
@@ -291,7 +291,7 @@ <h2 id="distance-metrics">Distance metrics<a class="anchor" aria-label="anchor"
 <span>  <span class="fu"><a href="https://dplyr.tidyverse.org/reference/mutate-joins.html" class="external-link">left_join</a></span><span class="op">(</span><span class="va">res_gather</span>, by <span class="op">=</span> <span class="fu"><a href="https://rdrr.io/r/base/c.html" class="external-link">c</a></span><span class="op">(</span><span class="st">"name"</span>, <span class="st">"stat"</span><span class="op">)</span><span class="op">)</span></span>
 <span><span class="co">#&gt; Warning in left_join(signif, res_gather, by = c("name", "stat")): Detected an unexpected many-to-many relationship between `x` and `y`.</span></span>
 <span><span class="co">#&gt; <span style="color: #00BBBB;">ℹ</span> Row 1 of `x` matches multiple rows in `y`.</span></span>
-<span><span class="co">#&gt; <span style="color: #00BBBB;">ℹ</span> Row 29251 of `y` matches multiple rows in `x`.</span></span>
+<span><span class="co">#&gt; <span style="color: #00BBBB;">ℹ</span> Row 28931 of `y` matches multiple rows in `x`.</span></span>
 <span><span class="co">#&gt; <span style="color: #00BBBB;">ℹ</span> If a many-to-many relationship is expected, set `relationship =</span></span>
 <span><span class="co">#&gt;   "many-to-many"` to silence this warning.</span></span>
 <span></span>
@@ -420,8 +420,8 @@ <h2 id="projection-test">Projection test<a class="anchor" aria-label="anchor" hr
 <span>  <span class="fu"><a href="https://dplyr.tidyverse.org/reference/arrange.html" class="external-link">arrange</a></span><span class="op">(</span><span class="va">type</span><span class="op">)</span></span>
 <span></span>
 <span><span class="fu">DT</span><span class="fu">::</span><span class="fu"><a href="https://rdrr.io/pkg/DT/man/datatable.html" class="external-link">datatable</a></span><span class="op">(</span><span class="va">signif_tests</span><span class="op">)</span></span></code></pre></div>
-<div class="datatables html-widget html-fill-item" id="htmlwidget-1a6e462f6a5b1afd8b68" style="width:100%;height:auto;"></div>
-<script type="application/json" data-for="htmlwidget-1a6e462f6a5b1afd8b68">{"x":{"filter":"none","vertical":false,"data":[["1","2","3","4","5","6","7","8","9","10"],["AluSx1","AluSx3","AluJb","Charlie4z","AluSz","MER3","L1MC4a","L1ME1","G-rich","L1MC5"],[364,95,271,11,259,27,23,38,54,29],[1.137279591256757e-05,0.0001422483102742067,0.0002219878617006898,0.001228980009274516,0.001318223097564575,2.701170077512582e-05,0.0001447550283196763,0.0002034066782869992,0.0002171987167282063,0.0004561281353810953],[2.106147521887765,2.91411990455348,2.043109896181407,5.807861348235957,1.891105432565891,8.149447178316812,7.653393871810572,5.790396679330367,4.889668306990088,6.069933070746316],["FALSE","FALSE","FALSE","FALSE","FALSE","FALSE","FALSE","FALSE","FALSE","FALSE"],["coding","coding","coding","coding","coding","non_coding","non_coding","non_coding","non_coding","non_coding"],[0.002035730468349595,0.02517795091853459,0.03840390007421934,0.2052396615488442,0.2188250341957194,0.004808082737972397,0.02547688498426304,0.03559616870022486,0.0377925767107079,0.07845403928554839]],"container":"<table class=\"display\">\n  <thead>\n    <tr>\n      <th> <\/th>\n      <th>name<\/th>\n      <th>n_repeats<\/th>\n      <th>p.value<\/th>\n      <th>obs_exp_ratio<\/th>\n      <th>lower_tail<\/th>\n      <th>type<\/th>\n      <th>q.value<\/th>\n    <\/tr>\n  <\/thead>\n<\/table>","options":{"columnDefs":[{"className":"dt-right","targets":[2,3,4,7]},{"orderable":false,"targets":0},{"name":" ","targets":0},{"name":"name","targets":1},{"name":"n_repeats","targets":2},{"name":"p.value","targets":3},{"name":"obs_exp_ratio","targets":4},{"name":"lower_tail","targets":5},{"name":"type","targets":6},{"name":"q.value","targets":7}],"order":[],"autoWidth":false,"orderClasses":false}},"evals":[],"jsHooks":[]}</script>
+<div class="datatables html-widget html-fill-item" id="htmlwidget-ecaa79cef1e78f03c04d" style="width:100%;height:auto;"></div>
+<script type="application/json" data-for="htmlwidget-ecaa79cef1e78f03c04d">{"x":{"filter":"none","vertical":false,"data":[["1","2","3","4","5","6","7","8","9","10"],["AluSx1","AluSx3","AluJb","Charlie4z","AluSz","MER3","L1MC4a","L1ME1","G-rich","L1MC5"],[364,95,271,11,259,27,23,38,54,29],[1.137279591256757e-05,0.0001422483102742067,0.0002219878617006898,0.001228980009274516,0.001318223097564575,2.701170077512582e-05,0.0001447550283196763,0.0002034066782869992,0.0002171987167282063,0.0004561281353810953],[2.106147521887765,2.91411990455348,2.043109896181407,5.807861348235957,1.891105432565891,8.149447178316812,7.653393871810572,5.790396679330367,4.889668306990088,6.069933070746316],["FALSE","FALSE","FALSE","FALSE","FALSE","FALSE","FALSE","FALSE","FALSE","FALSE"],["coding","coding","coding","coding","coding","non_coding","non_coding","non_coding","non_coding","non_coding"],[0.002035730468349595,0.02517795091853459,0.03840390007421934,0.2052396615488442,0.2188250341957194,0.004808082737972397,0.02547688498426304,0.03559616870022486,0.0377925767107079,0.07845403928554839]],"container":"<table class=\"display\">\n  <thead>\n    <tr>\n      <th> <\/th>\n      <th>name<\/th>\n      <th>n_repeats<\/th>\n      <th>p.value<\/th>\n      <th>obs_exp_ratio<\/th>\n      <th>lower_tail<\/th>\n      <th>type<\/th>\n      <th>q.value<\/th>\n    <\/tr>\n  <\/thead>\n<\/table>","options":{"columnDefs":[{"className":"dt-right","targets":[2,3,4,7]},{"orderable":false,"targets":0},{"name":" ","targets":0},{"name":"name","targets":1},{"name":"n_repeats","targets":2},{"name":"p.value","targets":3},{"name":"obs_exp_ratio","targets":4},{"name":"lower_tail","targets":5},{"name":"type","targets":6},{"name":"q.value","targets":7}],"order":[],"autoWidth":false,"orderClasses":false}},"evals":[],"jsHooks":[]}</script>
 </div>
   </main><aside class="col-md-3"><nav id="toc"><h2>On this page</h2>
     </nav></aside>
diff --git a/dev/articles/interval-stats_files/figure-html/ecfs-1.png b/dev/articles/interval-stats_files/figure-html/ecfs-1.png
index 8720e5d3383646ea8736805d39c2ade651d159e9..e4afe4c165a51543f63e98803d63915f496c2716 100644
GIT binary patch
literal 76483
zcmd43bySpJ^gj9`f+7Mc(jZ7GsiZVWjtD5-A>G}rB1$uqG*Xg7cPU7B4&Bn-%{}Ai
z`~BnIweCN6t-IE57BD#PaNe`e-uro;z0VoHy_1u|xkq{rf*>52w73EUVYosNy8c~E
z@QU`WAsz69`9VfX96W=^nOLn4c*3%kR(F6PiU8C%TG-z`BM72`VB(@mu8Et|Zk|d<
z^*4JbCvORF-J-Uj$4Xd`3{oMq%URH<tWhq`E+_P`Dj&%$H!sf|sBzp=$!l~kD6gnk
zSI#%hQ^1hea~DNhiw?x5E}?CvPD_0N?@rv=346i7@RY2h+tY--aAh%~ZSjKFVY!>k
z^VM6S1HswC+y7?wf8>u|VkBC>7mG&OstcUeDG41a@qcN&JyvYMkh!3NO~mRsOza@X
zh`@lR{mPwNPxlrZV*)L}+f8FK78UGRpjG<o7uHi%LD~UOKYO3k|Jo?B(m#js-#>iG
zB|Z`T&+GP&aZoNpJ=))Mx}yE}E0xs1|Hn5g&+$Q!<LG<<CBjtz@sLJxwejYnQM(N_
zu>ET<ulk0|zicva)XxoM<8}F>IOK~+{f+$#Yxcyc`(;~pR+c1ONk<3Kc(r9y>lgwC
z0bk<O5usoGCT$u8+mCx}ycJ`$>|p^ZwN{hdN%o!3Cn~HGXw6!KNdhI)%{s849@!*5
zWt+yU3fi^3HcC|qi56DDS&cl|1a7nO5+jWo$DA3r6$-D@`GE7&#jt2;+Q%W1<+I)w
zYu^n*2mXA+S5{Jr3KhnL4Bwu5DZ<^4H*<(|Tt$<S#R<Bzo(HmCEBv!&_M5Sdmzkjg
z`|aGic?Bn{%W+M?FV~TUDPQm?5qpbm8|^e<!|f3?{83y_!ekUCgk{j7!7xlVh~fIE
z&}Xf*PY8QGnn~4sBv+Y~+wyy}5=-sne%DbGHk;{UYsmQ`<xRFhn4n6!WXO8I0}~Td
zxltD(Y!J`qR4l$0VrPtyzTNms)57KKjIH4`4N<#Yqe7`${J~!(U+srUikFI@`(Zy0
z&r~YDyg>1g8``h(-HR+*tML*EoBE>|uu?-mR)qK4X=Ibx%CD~{2T=2mpDfb<#BDj2
zih)hI>e6_T1m2d;zg;Efb#c7)&KMHeHUOa_cX`(5GqW}Z297wRqIjpIlmTwel<l+o
zi8333KuoXH?{_lAbC`tEn%!KTAbD33BP)WTxryVg$)ll^Yb88^UEhsoP`Cnx_C3qV
z3M==$7NViVEH9ZD=7Ff^ib|TA8+`X5DlyaDTkTan2|O0pmuK({MR`GG-P0x_TG-G}
zc~uZbU8V&S9y|3;^ZrC{%)iswwNbc~xm^R(3A^171mqjfdTjVSEhr(wpr)qR6ds$!
z@!VGNPuy3Z_9P2x9<1~sKVo2)+0MW2N#a+nob|3fKiQ!aSV{KS9tb30BG1C~9e%a^
z-GCNWYSM=rGily6RqgO;uej|=Ld;uvfxXX!EE<n5nYF6k9W3_@0Y_ymh6xM3vT6Q;
z;|{`V2#yAYd#!Rq?Nwk%R$}=$b_pVF$B2wCPQP?KwzyP_C!9LyVsBfd3tpctYLpnl
zf>zWmoSJcXZkKxglugJ&L&r2^W`Hs}Bcz_>=w2=m@f{5-mhUuN<mxthGcq$rt+=tb
zW~&zJ#B-X#lRfugI3(<}t}~zTgjQd0K^d)JAwTZr6*f$4pZS~*rO?6xD4f6JzMAtb
zGh}bwR3aiEFzXXM87`=t$sLjx7IY0h`2e+3g7i0xD(9~9a_LVMov<jZ=d@c8CwR=s
zjFo(;mw2yO?JYio+%QOxqcMZ9a*yjoUWbndniK8RkG`!|HeOl1)3s|Mm}v02kX!k;
z%F8{Gw6fn{h%%&j+7n$rhQhB<xs-CXX(D>n$y8Y8<}L69Sz^@1>2>a??Q?a+w~=4!
zxD+9^zT1q4T<VB)+9;?r-&<(e_Y$5SKuc8yt2<O>w@6!lL&8NEgyF)L=rZGG);Aiz
z^al$zQR8G$^uta{&Elw)%w}~|(`MxP&&0H5JYg;11H^Xij*!(v*>egzH0b&3PedY;
z^(QkPsQjnn@`Sirvx|z}MKZ|83>O)XeZe79*w+}<Xj!ytS=__r!t$KO>$U0W{~_iy
zZWIeMA9Gw>PO!1wKLv)RnGI#Z%&W@Jh#F5@<TzNMRQ?H<S+7rauJ}DMS`Iy2d?!;5
zM|rweZ%U1O20Npf%AGb;tY#aunN;%ogGo3XLHKV>IrNQ4QF=vfuR{IQ2EnXVbGKlF
z7dwrGM;pjW_ic_o0h*logIUo#6j2eLEaP4$(+R^A<2<j;PZzfKyV#H}4F?oG-(QMt
zj1~-mJS(>xXP*X>-~++M1z68f923fbK=P6h%w$m4$&IO-BoPEhQihj~@HFh<gphK*
zQE0Zu?>PEgP+oI9Vetub&#H1dOUUc|RTmZ%_t=^`n4FiL4yo1PSxqmWoZlyWBS42l
z_toa|zC6{V^aoj2(c<7aixk5Xq=m%`xY^s9#ABy;pPNP2WMpJauYf$4Rn>7b+KsE=
z8p@I#629IGWBrQ`W!yncN>Nb}-}8mg!dIH%T9=)<;vZrG=3_<raMDriuH{L4!M>p+
zml={_q?SX7(9NZT;ML)fMxARh?OJwv=wJpclAP|gZ?|TZt^Nz4?W)BI0Upwj^*|;>
zKX83MApO;Hq|Q*2KX$p^?_2eUgEHq^Ha>YJCG0SqQa_MU+hxXgd`BM>5@O;%1o-fS
zP&mEeXjJnzy`@Q_ouuReSFF}OS-51_lY+FgH0P93(*f$96k%Nn35lAs<peI5Z7miQ
z3;;v{_anFb$_(R~cEs=Ef<y?@eq&P^=y;#~)w>L_@ih3^hT=3Cb2Ya7a-8mxmbu@b
zoUV?LGUldQy6$V4zwL4A-H!%CcxG1FpFoC6+S*ChjaSYv9Nmve4!yiq$v#ITsvDOF
zeMq5;&2-?L?9^0|R${m0pELCy8%52yL$lY%m2=kL7?NGnTDbbqsPKCQ4&K6Wx*X~+
zwrlwXlk3E++QXmz{_OuYux(MJ-n~2vKn;jt_E*=<l-EVg$Y+d<g8*qW@#S8Lg1Ov_
zc|Qq!d-w|-ZxxJ>-HS>Y#du1n-w6d3-B%~GY&k#BCI)+(=1B^Dt~PWz2=az{UoGAb
zA>ojOA0AKI+~MFu8F92ZK4ioRwG&$ucwa73-l@b;RZ+<@bc+YztnD)GBsx8~91DeG
zd2Cnz#Jo>T1>?7xLa{pvM&O)I>%(O`^|qtxCKw5~<P%@L$ESbW4`9e?InIPzo#uo=
z_zbqoTTX+hKi0q@<;-qr6X+Z2^SM4q^<K~U86{22cLRiH201F&irtUQ3pC2#zz>0r
z;85#g&d<mY2WwD5YqmXAy=6VP82?fd5Q0afa97UH<Xk}I{BJR!IH!|o7YpzXct)fg
z9}Fz<hfai`=jpCq;w8^*h`on69h<H0okBBTU3q!=Z-biy;T!zmFy7_wWhPiQ_ofCV
zn*c*48uupV0KoN%MNG~N@_C&f4h%?9QW(w&l0YTcsOh~lXbsl$?0o*S%zXw0;&%4j
z;@p#fU^w-gKBof5mr`V*`F7U;haLd|BB9Vcu^1g4O_5x0TrdKl^q;Q=W!Oew3`rSc
zxV#x1-DS4TKXP*!S$r^|)vvqDzW`%lxB37t(80huzMF0E;z-V`R@L=VCgZW5%3Qe*
zR#40(g#zTlZ`bJ>r`kjuC|qc};^cNX&-%v3(Q10w8#qcrtZ(VU%ld>avVCr@Q9$Yh
z_<kdpqgVQ(z*?K2H+D-Mjfx<@yk;?!{}8AlY4h*p&XZP^<*qK0GANzV#n!0R70b4>
zYf%DpQS9-U0Um|zFEsaq9-gBW;Tv@+3a6-1gmxYQlZv#to6k2#*M)Bk@%aY{(zIpz
z&6t9hyUp&015(P0is{&_RU%=+*Hx0i!~;JpzU;)9c7;C``?!bTjzELffZ7$AU{Na)
z*>lx`ml<|El1+S7+;b4QVm($QO6j@l2QaU&%;YxY7`$_F4)hJ;XNtFmLbFwU<&?cl
zKtio%rS%99t4=^b(Ive^qx#EQxBFV#?Qb+nOLALJWt$|s0oD5MU8>z;s}Zf(LC5U~
zY4Oa=%$oD{JTAlb2h(mVN$?Dm!SaGfQPdIAwaCrY3zyUKg7VsMQYhRS<Wq+B{%CoI
zA$lcEmV63gqp-1|i-d3gX&DezU4`h-v^sS}zY|jXXRMApOrbfx7UgzpT<JkT`ox?r
zGBPqwf1_2+4_61)hkk|y1_c=fW5wUqtgyry^}G!safMFx+>#k)Pq;wT={1)ZdTm(%
zA>o)P$G1~=z-iJ;&Z1r-Zh=IM08-*B^Be<I#qW5vTXO&E;$+A2EhIu(gvsVxHc@4l
z9>c6YxV9n;B#A6{$ru3!M#!wb)l6OW^g%3(=4cKQ&DZmts_M@juN@Cjhm*r0c_aX}
zDw!VboOv&8cwk`QA<z$NAdW@>1S%^iQ1>0gcRw(QVe_?AP*QqqsdEev#}tqmoRqX~
z{1<V0XJ=<>0|+BNPCtDRk-0fJW+!z>9S;^_sq_Ikquc)xiCJ`=lPui2Zch?aL)l`&
zvD(gY8DBL0biIy7<m#PwX6irf0UnqX;CT|Z(ZP_iIlKXhxKw&wID1`8&W@%@1ku8P
z1Q-Rnxu|O+^rE2<R17dUuE6duXPzUs?dlaiB4TK8DZjMWTmcVcNwdYYaT7`v{COxP
zZGQTJ^(<4v1Fkz$z6|93P!L<gvmAX`0H8BxmS+%ECQ!7}WV0tnbD!`qo%WlJr4ntM
zuzpvaJ;I{^i|}aExX!QxuHvFsIl2x6{XJuS2qLwbu2Eh|a!H=?zOaG~Vi0MiQeLe}
zB~2&|661HDYS%cLCCD7t0a&g9-~2?R(4gUP_WKC{7$46;Ezw;g>s(m15UA&g)OK+)
zCENkLPUwk-Ox(GsS<6aTx@e$XTZ)vow*N^E{SqXtg9evpZ>}o=&Tzm6KV#v?cV}Dm
z0VjQ;@B*&QDz`vx?{AP9#80vFIISzO=+wP3efDS3u0XB$weab0ypKt9Xix~Z%}hQZ
zEU7$|0ywR<<A6jBsBHMByI-`f0$~?B-2bWp(D2dq#m=3bu7(|ptMj88K*WxqD9c>N
z1M<u;cpzWB^kZ!=5F49(gK}SRDRP0dP*P~7AojVrn4R>Jla&pT<KN;$@j2j4Fi1-v
z!TGjJ<D}u29lBU8c=8<NE4OID1DPH4i{W7`I`j#;#HRTC#voeFO0b3lm1kfg^fuY&
z`s}<*_c{%fn84R-3qfqwdv!p-u7jYpVP7PMY9dQ}`SO}K{>p)pl1SIH_=($61bxE#
z<(j<D`tHRNkiZ&RALrpRtOHDib<{AFFv)rwH@MElT7Rf84Q@-}E(nRFgNq6Pcq4~j
z1f7%($tk{n|2}9Xl!9NSl^6u8wD9>r*hJkn7g8%-^b=;L02`EQ@g1lK79e;I=w}b*
zzrWCrEqrM<n4t$y505EAdUK!a{BSKD@IYZtQV7WYqd)larj1v}lYckRMG(7Qx_hp5
zV!{RWv)i3q8XV@s&wzmi({=v}qp}NrNY8{uG8o08bX?uNI6FZDT7^3Gj)3JhWOUCJ
z5|DM*=NqN=t?ZC5NPEsWK@aB_LTee38c8qvV}STrP5p!mAGY-vUuX&9k2dQ5{xY7+
zB8IhglYOi4=6YX19;IafxfN(yS4+qXon<)BdY#B=lR-rra)L)nJ&C-Eia+H>K!yC*
zEg4l70J0KS)pm;3ah=DYu>12+y%IqOEy42;HH^fw06udI3vG_3fL^$|K4}EeJe^tS
zeU!I8+t>)m9t^_;0`lr0<z_g}BsuQe7;yibBFCWdK$=8jq+`woITX$k{L-Nftod^S
zq(+tPe0uA5hkyMN-28Hm)-cMO^5Z_sS%3n@Fg{iS<Sk$81w2rSTe#KpL%lEme`}ch
zzqVo`a3u%zfz<X~tKDhX;KTl}Gt+NHP=)Jjy)i;&T_xHafQJO4j|Zv#-$h^R4%EdC
z>3x^r+32#AX6Apdrv`y?wQS7k3xXIhyeNVLT5G!hKV6@)6&VCNWJ+SOd+Wb3L_&dV
z{qI+ZHxLl>e~+bS03H5&gr@@}`|sEPGv92Z=tUb6;h3B;`^H^SL3{Nlb5G%{*kC2C
zAe~uyMju^0>zWCiv1B#=e+(+|wWFX4N@QK@aPG|sSBlO;3cnsaFgI<lSXPB2A`K~Y
zN@;>=ecDd7VHcUZ6aW5-su`?lRA+-|YX})n=o8`^7UNyxfJM3<<;f5=SdHYM?r?Fd
zCm#aqzk5&x_0L&Fg&zvTt=~6W&Un!tMU~O^6xP;en7lrE1T&x`fCWkizNz6qJUxTU
zIoQhn&(zejemVIv?;nPyEMF3aW)2#`@3{ouu$X<!nCM@$pwnhGtItSqA+MDh6rO00
z3AOkizqGS=&pG9Z3?BV(4~*yj&}<#4RBxcgXy%Do_`egv9+-2oh$2O{YqOY{k*%DY
zk3C>nTe`1<|KFWa)yu}H{*OHxidQ}=rkCaak1N+d_BOy3r_z=9``Z7vze)bFH-Vd|
zJCx7b(a-fi{Y1kbw~%Q2TI!~kW_Nlk;X)C^Hd50vgBAC+O6hiFNGJRbAgc7-^uNNT
zgLrfVKhGy@Bu@^uc^5Pz<UNkJhNp3xc@X1=yY;hMDeGEL_;bo&^6^SjkLe*vzE^*d
zPhL%3E@uZ}b8n9}D()0tSi1W3pr2^}UQvX2Eu17Ih7YzBOZccpkUB!9pQ{Z9eH_mP
zo!^cORve$8%@O11RJwm|J)-dJ<>ulx&^+IX4YjDqFm1zw3`0&%Ci2FtCw1Zw8-15e
zFDI%dpCoxVQ0`SZV2a2w<>p-EzC5?*LtI@pNSSM=h=Ob7I<)?F5Y?i9t}uM$)KTjK
zL6haYB{;hK1ly2<w9b0Oztx|@Q?AO7tgoL-vqTa;+q&4y?@9qlV==|8$8X7V^VhIP
z7Z#hY`ZY%y^qp8W#`k>FcJuD5vC>qCy8|iY@R163cV4i;GOZE`b$U1OJFMkKHX7B1
zYP9&hg~#iSWvCYzHW31iQgszHE`?|!$0f(%#&=Y*)(1ywV{!42SC!s_1G86jFbScZ
zViE52-y15?8Ejj`CtJVHBo$6aXJTR$q}#YO?OpkimU(B`(DTZyv=14vMGV|eic7l;
zM%sSvbJ0r&$?gk|(lZ)guSBgY=}<yiC9Sn@RCG5_@g23#Ce|+$j?V9#Of2fcaicQi
z-M577ME~vuDL7d{?GJzN^GGgl7!~KXDY(wJvh^%rh@pl#s&x;+X1(ZS_1eRvaxmSk
zDHq_hw#X7!2s3t)=^1m>!iP$dVPnGn78`LX8JAq7jUtMElsOg~TF`26x!9Nc!5$bV
zBwMf3xs)vzb#PTCK4esEE2vr0oNET+lYb|tHRR4Xoq)ofgot@dY{IsjRMpZ2>5lG|
z>qYODQ)?G)5VY{uB+~eji+(~DxV&D(f?v<{p3TeB%qX6cRULxND2b1z9=TVDWww)(
zovRc6CDvW>%~ci=6dv^=;vm?uW`o@S+xdI3(L$F|LzbAv=@AQb5k4iU^nmkyIi8Xb
z4|dDKiyzS%mn?N3rsG@II!h!ph2)XtXjP~?y8YO5gIk-fTrR#|95sHMu^119kL0HP
zt^87ner)Iyw~qX-bfzF0qD#i<ve+`iTF{6M^%Q)INwLW2q9tGmBgx@B^k`6Cj;+t-
z8T4XJsD*PD?lX1IVHC-XM#aW<Adz)RI|@CRSNV?G%`3`7y*cm*R*MzZKvs1P-Z=gN
zU+XWJg_>Q%Mb9-NGW6lc(TCPdEADXb$GIlPyI?NS-1o_=G_CCRUM+6KFTJD@BnoL!
z`FUP$j?bkVWtM3ByZa8Lt)KbPd`$;dpFm+lu9>7<TwyM099jLcct54t%7EztKj1yI
zM8!m)bdfvpvRAhCiABg+U6D|Ue*3vHW!CY+sC3`YV>ncD4<zL}-PIcf`=oZM;i7DJ
znT`3&cOhNREyE8rP#C7Zl8%P%jwB@XF}<WGlX$aVDBZSk7V*(<|I>Cerm+yTnw?t`
zh;8JQoR1^qp-Lk0wshHA(b(>XZY)n@$mD0FF1=~jp+g*o$o4mhuA3pJFWN8K+8a64
z)eJ1X^yl+vR1lY(+H9|K_Ww%bOs1kwlj6)Ao*^=7or7<v);tOlT>>&FWdgJH50c&B
z4Vhoc9r59qx%x3yu31}n!^d0hYgP1+VRU>GTugABzDJveg(awEMy73pgwDA%q;j}r
zaE}zKN#XkY*Q34CCtT@415@QVPL0iD+V!yel*D!3SKN`!_yf+--^RRu-`B~j`(A#Z
z$|>K`t%{qSsJe5o;?KG%Gk2TesmqSIm8>v<`&P<bDwBaZD?{3m3fsCDoH{v4vtPqv
z4$ZOqf<7ltj`FY3!*nALheO>HGkhxTuJ6Ob%J*Dr06(d>a9r2RYS4~e(_7QvWo#Vf
z+njT&EFU@611UlO1B>0tdl^xx(nwk2eKi_v)cJZ8uYk*}EUft%WZxZ1XLBq0(r-Y`
zGQCtp{n^9!lt>aNg9v9P>)xcBK*=IQ{uROC<cSNHr89SF(tQ`1n%5KwJrRJYL<nDo
zl)8k}X9%cx+3@N1bb6bAtn}1O?nU0}4<Xj3%+(1dl5BYBU4<MiNWq(`+AF>Pvr|ar
z4(;rRkWK1JeV`51INd)~WmVUfiu*mskyW-ZJClTXLoscRT}21C;k~hrxfwLWMHedy
zu)a4nx;PwPwRQ2K#8P+;Zh^MCqQd@9$HuJU8KI7&rv>jdV*H@~`afv|Z5JiFa-)*Q
zt-H#3qcz=81;H=No!dOonM!LHUqSYNCZ39&$hY4}tv*PYtN3+J`aLmAkM^44R?Sn=
zx{!PY4l<rK7k+Q&7H-(d)+sC+g<6RkFYOIe7Pdk>5<@f^>N4q^6}o5PmnKc6S=3jB
zcc@~$IQ2w!G{za4+ZHgE8@2y-IFFu+8IjEx6pRS8*+EOb%3=Y>GJmcz=M5xlI+T+w
zmtjBYY{tt6`F`p{85nt%=#agfoz)e|4|`cjonel2xR`EyN(AzDc&T|%kd(|i2_L7)
z*!oCHRcGW?o!%PRV$QJ9BWRqBFa-DOpDWoOTsDq<7bm!~P7(X;{d?(^6q0D+^Z+`b
zC31r;(I5WJ8ydnKPWfDUvi8;X%|HoG=+~$4Slj6#V_R~=9O4;*DD3|pKAN34h%7HQ
z_U{saN>Xg7RXez+C9{}S%2USO6dgGY9!2O@_d--hpt6D5c~$tHawf-oLmmcG#F3ND
zdWU}l^X=L!T54~f5*zyAw3qC4hm&{CgY8w|Eh<$tiifQD7&A}m`kdcheev$nHi5$3
z|IP3-UI5-~eUZ?fm&KMX?6*Bu>sYYmV|_2h>8g(SZ^jE;XiH^tUY(>}EX`Igvi4ja
z(bOMJ^t9D4vg7$~mOCD<rU|83ULy?gWS(%auaw-D+h|o0n&y}~_g-wUJK7$Eq=|sR
zzKQSN5jDOZ?2F&|VwN9bv~W~laxyhA8_l4Ygqrw}P~@;CJaB!Tz38Fgb_vEqgG<+D
zweyc4W=e*o&@m4YSB71}bQFX_)**da`c}{08RDT*g%WiAez68gFomA{mFHrYh;x@^
zN*ZVya7im3yNGl3qVamdc$RuURe5KpT(!8uY9}e*tFP25DP<=(<rRxkuQTCo5tR}J
zTEdWIB_^91Lk~`mS1O7M?0v8za(%<&1<I$X7wKTV$LM6F!dUl($1k%D&v`G3Ot+$2
z$1p5pWQbzgayd$8;>#E5BFPK;+AVIi!)m>ru*rUQuK9;UE@mYuFR!V_znrMjY;C{7
z^<`EhV7W<-@SeP^itY^}BIqVA_vCefmHnpg_A{@;uuccaF!&Wz4yn!ghPguHo<SMj
zy|0Pul?n5%eIx^!Vj@OJ;A~T`$k;wq5j<3|H~ZhS01rg+@{8$0{0WJ_btqaDXW1>j
zweVSFzvsJI;@rMFkJaL0zD@sVCb@aEP-mW6vG?VKFtKL+`U@;yPE^gZTEvw}U?4c2
zCl<g>=ehG$B_;fWf9q*xvGNY@1YI>XZxL1sNgbqd_`5yA>uTcs;8P4jUv?bVResP9
zp7E8)g$zTaLQPv^FZ%O0VdPTkOX2d?Ycn-Vu8XIR;nCxho2OD8#1}t+M+ZNntW#ED
zFE%|ZP~n5YBQ}W=67@Efn@0<D*6FodF-l{uYCamVeuCQNRQ7W#ku2e5E~{hA0TK2s
zyd8cp(~vGIXiAgcu>IG>!osaWp*^kA0Q0Uq<kTju5-vx{BHX~DzEaB=EnEn-CtsjJ
z7UJFU23daiJz|?N58?e{D2{w0gCZgCi1oSjtKM5wUHN1JRjSMihsqt>6hhYd+N+F;
zxZ}^vd}-sp_O!RgK_y|)Z=K36*FHPii+UY|X&h5}|EcYS6-^<TIK79|??Gm$LNqnE
zq~u#`d~JaesnE8J5lfOyCLT@0$whZY7pVvB9Xd+naP9qDRJCf)6|~<~iI0X_?)w%K
zjS>+EEk9FXB?%|*E)>v@MA>#~d%8Pq;I!vLi(|I7x36|&MiM$KDDlYi8>XWo$|iVs
zSUx9WOR+nNi>?I;8`SBFMe=LhL1rGoF=Z5FZypWxRzv%r!K~HCNlMHIr?>_w_cvJs
z5M$IiVH*#ispt6xH$S+t%p8!Wh~nHm!Rf7MD!u$moojUSc$;*L<IBwVealdB;g*}5
zZ&{LGEv6u>9?j|DYEkMQSNzRGibYo^;fL$EsjdCHeY+5=4RPp<hLGi^KL46VU2{!L
z{+!KX6P?xJFRn$#irMz9v)=DJ0WuqFzJa;9bch8<A}+5xghUr1l(V`Bfxr-EKWkLA
zy!4PsLIsyn=NT+FuQ2Mdm2;qtAWnXE?gHUB_wXT`K1laKiF7e9E^ZgP4&tly{F-$n
zg8gs2n9X-y&L3Ylh@q)TLEfTdxvc60Qi*R9Y=IZOzI7tNH~W9$2lw%FL#{Q{h-QmN
z^&{myEDV*{W@mKYE6X}mQgnMm@03;c@MkAd0)QACRJ(Bj1E-1qc#gwzTH31r7z$OA
z>SDV$ORB7+e3V%FVmjpIV#b_}OL`Z`*B~%=N3nl(RZ)XbodM$Q)J%52B=^&VP6K5z
zj!0%63N7AJfgKfc%%Vs&PQG6<kB?(As$@OW$D3t3KPdC?eT^Q<w~-8Ju%6mx#e!7x
z9et{Lo4uY4wzlKSgcfXi#;T))fey54oSROdI=SW47#=@;FmZUC-$z>zu0&(7)2>!U
zZsfJ&+pnuzUrP&V<uJ0;&cs%ahtX<OjgMT9M;hU$%DrH};371x02o8Arv3h*a+=*W
zBEqGv`PFpT%PXU;&>v^N>_{Oqaj;@FBupNq@jNaGxiXJko4*w3T*0!~ozMel??|2t
z$BII)K6EQ_-Q?!a|Ee*~chAL|Mi0`~zg*HyiZ;Sz3zq`mwRla(9%55qR6OE25cy`*
z`zi7HdArf$e_IMrO$67#zU~`FTnhJ`H4<*tyvD()X|C1@FH)bg7d|een7&LN^mioP
zb>N;kt?jh|%hsx69B`Vx${Xjn+ak+q9ZC{iKKdCJuLELvv4>gIX#{=rO4ubWw6oB{
zbwG-wCaCcnp6-5Ln8)kr>M~H4;>R8iA@0i`vvW!CwBV_gMW-6dS9-@nSGKtQwM1<M
zE0o5GVG@o`Hh>9?Gn8{uZ((Vju!tu&950F@_1GhmJr{h~C$PbY?R$8jbq5^N(N<O;
zSI1&&Nb3+aV6%PvbFx@P5pE#QN#*Ogcdg?=peoh1q9WC`F>*Y}vs(AE!>@qFbK2+u
zL}IuVmJl@<)|H!gGsh_BqV!<;-6O<`vbTR<kqA#K=q<I|jSQ^D=5w9otxbgAFcu<=
ze@;CvW@iev^aqGkQPqo1#SvIJDpw*Y^*M~hEGJK3x<@~{G|g@nZ@v9kc5>nsg$U1k
zih|P`oI*>3O;x7cycE0GY>zk3*g2c-y%w3#L*-i0y6KsO%FG9tmsr4xgy)W@YFrHs
zjfbJV*3b4y)>5cF@$37>ch#^#i-tnV>dv9*({HEQwt_dI9bAYKsGXeYLZpiIXLSN$
za$#{takRNM09<b%DtyU}GxHKCa)VCyhGdWh2C-Aa6ZAPhX^&LUDl5_4nn;f<5-$yJ
z-apB^j_DGZ4mqk@B)jqMu|VB27}On<ofCR%5RF4TxR@Z!?e-}pf{+gvovH^k&O|~r
z6m^7P4ac&hD)E0i8Y7mibAjt;In?X5+=iWF%^<_@k#8XeVdL`8jSE`u`0wdD5o3su
z7Ep42u=Nt1)(z<<Dkv9g3L7DiFs|+#nI?%dc)fUn;tFpNG*nU~vs$_RH5yKWf%H4o
zA6kq9B5E?l5T11bg+d4e$hIl@!F|CL-B3jvy%+mOUz*9G!C!Ca30WEobdHd3j8{hV
zLaH7AbVhsHCDW@g;&QJR#Ypn?_Y|YnJ9UJB;C)AOQhvc9Q+(~3{`v711tXFV`_?c2
zrX?z!ce~kLRMW$LzuP5&q0?`fHLeAjv?rUyEP}hE_Sd;?qW9jp{gL*dZxc$<_p=TI
zWE>u}aGv(ofF$CE!9~A@CqX)@<MwPoOilMKDhDCb7pX3$vY7myBaGg>atyPR3w*bH
zhf4;hWpRmFn7<+^xeTw)3qq;?vP>4ef97i)jG7~r{I$3F=5Ft|)(<;1-9t(0_#|+x
zd(G_vYe2f(AA4atXFZ7>bVGXnq^HcATVei4GfaDj58Zb-CsdNDNrwG&l$@8dVwu3i
zZ@+uBb4_BOY{OsprgIVq!S>rRrjReWB1OR~<<?6R+h2j@U4!lJ-i!N2B^R||${g!~
z?ukYj{k_}H6}6mh`ad&y(U!P%XC&s`S2f~m<H~BCDf<t<&U+EAE~7#L_gi!fZfS}9
z^ULe4INt3?PCoSdX(9e@GXShf-htc5j&f@sx2_6F+3jO+WcXRPN(TgVnj~U$D3<Su
z?;Q8t>Q4fv`h3aZU&SS}*VvkzMvIuN`OaFo5%?<?7kt6DsCr^TpJ*EzQQoI4RUwL1
zRlVs^&e}GA{kPO3pp&cjBP9KtDQ+Z_V3C$0QouOlC%I&&Ox7<la>k8B47Bi<sDKJ^
zZCHyW*IaA<O37B3oqJx{^>#X`*jVYsaraF%FuMLre!<q$9Glht^;={=Uq)a?e8#fT
zP@iYM>l+m)(N%aHtW7LrY$)U$&7kY1vhukz1l+crm|Gp)HxXXcv9laJ&^qX}A!JXU
zeZg_hcvr(rMDypZcB_;f6{2r{KG`d(=bL9lJi?`M(j0XKweXPTD5vj~Azh)y`ABaY
zzD-qoBr=}@KUeL;{dV+!$@`%ouKyJwhYQEA_81I<JR^{n(rkSv%`$VFq7FP>p5tuv
zZKLre6}=eYWFH1rv$Lc&1=){ROVomm)YyB!+z5JfsNaW3no&6R(4w>JB)l+%)*`G`
zOj0ebzoxe0kM<*I%{YIWL2Y@;+;5U|TFofa#M42&gtNp!yA>^*boBd^k`O1i{Bw`(
z!KM0zrC(|zHTOYypbDSrCZwCJO#S9FSOYINZ;?uuHYQrQHK;-(xIQShaPsagV)@JB
zig&-2dJknpxtL~;%`s!r#?5p@P`<P*!CXQ!27wb36pcIC7yqYTg^${^4k0yA3aCD)
zv@iLIItxa~*9qw`6Rl;maATE_(l;S)zl@@`^Rs+lKQ8rNkJlg><<&Mp?Ss(db9amY
z@?3tk-`zx?3ig{QCV6uOrCIO)yT^g-<wZ|It>kr%2STlQTsh0L*uHTlvgznX`N>gE
zIuH$(({sP;X+7SRaI45@EwA;OuRp4P{r7>1D3tLzx(-!Vsh)n1sBTey!igWIR2vFW
zU7?mhz5NY_^1yzZZ1X-;%jIFI;`M&OQfgrT&7bw~enJ8uWNM0CGv+32w>+F<@|dTS
zbTf34DWeKe@r;rCrc0h@@Os{0U@U$OvA<L+hDg*|2v|p23mt2l=tGA0fyQWmU2N(I
zkC2;PLo+zZ$wufbQz___B=cxEw^=`(Lf|+$ERWd&8B{*14Bzfmyt4jn>^wLR;$)SN
zhU@GjbHwg3=RKRsFK=@<CT;ZmC})DkcV}<4qoeWxTip$hn_r2};t5-r^1xINtp(ow
zFAZMPKo*#}NZacP%5uVIM>|$;%?9JNs&J6gqlMp-#Q#`au8OPK=<eUl=~noQp4C1H
zO=KAyvIW(YvdXBg%7CF&<_6;j<wnQ2=QipEkpm5I!{F~dcN`T}%u7V{>r&@rP4sK3
z|GC(}$++k;WWYAo4RVxaCZ%|A&CUD)JH?(56DL25E<jRa71T`K`jK2vJNq~BjE*lH
z5_?U;wJ`Wje#AgV>i#3kcW91^BSr+OpF0acr)z4P`7KYSdE<<#db;9AbQK>b;yWTl
z>TYZS8&5Y>5cZET;Bs}A#&(hD-b)FgX;Ax%fAR56eDkzF7eLF*?!0?|-Tvt3ly1@|
z2>g8>UQn^i=B5v@!6NDl%1r`redd_oJ=x9Yr7m;Jd|Vuq=#SP<M~O>0(>&TDb>~j-
za>+45Gv$zl{5cn*@#0@`{sMqCO1!JLYVdQPP9selx|q+H6;eM4JNC_!Me9zlvf}tE
z<uNkxcWE5B9_V~#*zo{N;7?!blDX5U<JNS;hmD>pbI*K{f$`8^R<!Qg(8Y`j);fGr
z6vAW9Fu_M8a?<n&oNO@?FjIP`*0rfEm2cViu6j!S0c56MzzcdFnn9IBEFG@jFBM|R
zA6ph)Vb|88S9cM6sAX$$popipNd&$mbr18)8+r!F?K6taBu2%%Y{~{z;pGu+1$l_m
zEN0Hq9hz8>$uZIQax?W}?Pvs<*StDzq;6!pDqjW1;03}z-CT{BrBvU)mD<%SkDJfg
zW%OWk?jrs5h_MMTWQaPn)J`pV?p-BEdkB)@thchFn{&olZMZcD^xq~-9SdzKVB+3<
zhF7_G+JDh}wMxx*`y=4Ouhc!*<!ie?VYW_uo!&zmRbz1=zaxTKERGHtep43v5*kw`
zW&3LkI{=|8_6hmWpu7EDOa9|jvSI~Tc7A$w!gJXQRRb$&ssIV<Ynx^#K#3%(>JL72
z=XCtwT42SZ3PTYO^E}DTn60*o_7#z;Iu-1ip(7%?F`<hVQs^QbVpBrc5z_Vr*I%DK
z{lUHf_(16{_uI0;SsdMoS1t=i96<$+Z&&;Idz+y4SD?ibP8U3I6cT;KHsopHV)(t9
zi&&$X#ae{tLqRn+FZZK_TqEg>_D!T(oVg1O%24prwe{b)A1*XL?a81eC2-)Osty@G
zK`qyl6ik}*I9!L+IO#vk&LGj&iPyrH#z+s?V%7J*74sDom!#Cn+)8B<nlUI8ny+!3
z?u-siqxwUNufuI{QP){$X-kMH(pua>3K@pgM}9hQYEsq4>~IOt;;sLKH*&xfma+qi
z%P0+e79Vki9mB2hKR&#{kv#Nr9^PNdkAn@Z3@M%B?ue|6L=6X<)?{#Nk$G%wHuR`;
zyqZ-egsfkH+N4ATXz%y)?x&s63ED<}h8{;`GlyUGtM8|ho$4*MH%P`0y8c11g|rAc
z$37D#*EqYR%4=Ol(314kEi>ZzvXVU@wQ-8M<<~@g;cu(GKyWjS8X0xOzYTQzcjzpZ
zKZg}xBMdOU!I%1_*=hiEI)Uy~yyd1*L3Q}a<RJ%p&kpIO+u0yXY0_u3@LMx~-WB(%
z-{)j^R>(d-{o9$ofJlREKhcpwzkYyvZ}^0Z#<TlPsn%anbf!r~cK%k<4Irq7*C<Kb
z7)MnESD0Z>aw3t<ip@<tD(8B?Wf|UjOxw{zNhbNz!iPO$wcBv2j!thbUTzg;7R;rm
z06~1k8tP_Y=O0SA2M4zVJrdVnJfiJz52>`(y!hA*La3egu?}vV&5?LU)X(#2xB(3T
zN@LOCO5^7LX?Qq3Kc{DSh!?;My#mL1p(#E(&f|jO*f7vw9aSflhUXt$VEVsI;RS~K
z2fufv7~@I8=-{B&r~mwBQ~=XHG5QNbTk9Aexuhuedi^;As-Nh_JODxJO_9RX8Wfsa
ze0OMR@MS{<<%dvZ0iO!rGh$7_Id&QEVlQ~t%-6|kzwK02d%ckP8?!bPJnm(^yOR8?
z$^&rc7YWKd8t%hM1g(Str%UM<Woq8Hn{~Voe6@_q*?EJBZ>$1f`+;2arkEXLT)64b
zD)nT3K)-`#m@=Xy_4o31M8j4JMrtjpa~Jw2Z9q)hM1(2$80Sla8aw(bW^QLEZut8m
zB@wT*)Lx@x&krHac=u9_Y<#sUjHM+adrU5DG#Xlz2|0K1jiWa1LsS38Q8Q>5yH>X~
z6tRB*`x6TQhe{&f`vI%h?Bp`zn}(MvnZL(&GfBd`sFMX}oiI6#LWEx`S(_h;Ltyhm
z2eSR6=J3uyf7_85gCE=YSi(~b|8BdTvXPO8%(7<3#G6t{&ocX@uD5Pk%)CXT_WV5I
z&0xDC`#hkQ_AW0KZ&At32K!ye1;}1sn$h@$)?)1)cI>A7h+zhGs|(lupSaDCw7+qw
zi`5^kb;dWz_qGGyiBI+7EP;KT60xT89S@$`&X4qRFx+4P?t1in)W=rZZ?%q<BREoj
z|4HeMe}ItkE@^U!#t<<lj-w%Cy6ElavJkS3rN2=#)3e{q3tvVL|CDcN*i*M#EFRVl
zy6mF(S8#OQ>jR*8Yy&{)@Jf$PzE$S|-ye2Jy_s8`>};=%fkBH7=sA^p&cr8w&LiTC
zX~`ZReRBu9SdI#yFZFwVLi!|3t=hgePry{2t*~taoUO3^gc|EXkR$^)f7t-+!R8+x
z=eO^OuUdep&neZkpQC%E%=&352fp+x%mYN+5|u&E-h2(S$`K{-y%U@2lcQ>s&%lRb
zAY3&G1UAxWWTddF^J7+Uw~^>PnYG~UngG2X2jNHh<I&yN#=G=y?gfLE8($mg7Qtgl
zJP`4aDH>{diX;r$2;Us%0q^jTelvnfetk|65KikrGnln~4AzN&?oPRcM7MQkoz8E)
zNy6)Tbo&Udbh5T%u>jZu`{VH;8emR4E=u%#LWLZ8iSu;)?n{HsE5v^4^TyO-tfw%s
z+3}`s^Hh(!-e{pjkH;$H#5HdF+@zcdeiy}AqUC?Z%f25|^Y)|U$i*i2loKX2?gv)K
zFudG2&=4~Kw_a68yT?6ToqA!?@5jC@w;Fm)%6rfVtmzGx$E{u7sc$}lPd1i}0BqA%
zh#@DAGmjPRe>N{6Sp)VF_)!dWU!Bw0@<#;1%)Wn2hN49jJKyqs_URw6)@$!~_(U3V
z*jO8Am8?;1@}KG*oCS+{T1KLZtq0AzX)F$ew|yN@)``7AA}D5;e2aBKry_ar8Lq}C
z2QkTY$nBa>c#@%;WQ^DVI}}@2`<KSvkO4I4=LPa|$Ce_bWwZwPC4VQxBEOp+uu@ek
zTOkzwbW|MoF7ofl$ju5PwuZ4`!vjW@8kt*E%7GO~ZAwOACqi1EBw)>&uofm5YxKKd
zQ+dP!a6T{pb53JpuJATgak#8>n<m|duiI}Fqx2%beDlqHM|4TPr%DLNXqqr9X<Pw$
z8&FiFI^=Vui_w+3ly(Vq_(kYAlHB&yMA?KsGiy=!LH%N}m1Y^k#jHQxmZn{8hX8cp
z9H&E_XxeBuKJO&$ypU@kjUu-ki0K1mNI!4#Fq=}tBJ*91!B@2t@pQNjkS(gHHWVo=
zaMHbtY^B!$31;=ey|H+=vKkuzNPPF7n`}!evVOyvm?b^4ze{|e_2d{D9eVd(`uFB%
zrea~z55c;){Ts!1=Zq+z^Bink_Nfz>b!vFg@g7ruk$e!onA_FaM3!Gbanee5)Z4TK
zIu+>9YKbBo-J-nL=m96+WsOM_N8XYB-}jT+Mrd>YSUwo-cl+vl8ubA6{(BbXFL*;4
zm~TRS$yXTaB7T$%tA}4M*WyA{PSo6cH(DklfW+G$gAEr$Je1PFQZb<qXgzOqA;Bo%
zpcnXrv~~hp!AJ=KE^gP5WLsi7wj|f_?hktxnBhaH0{Sr`9UP6dkH+XBK1hGpa$YNv
zyogQ&8A=va<VB2D-T%n#l}IkWZnk@?x|g)Es<_|Q1-3twbv-czLSB2wqbueflB7R(
z{&)Mt<Wvh3j)QWraqt`5N6Brh3+kqAZ%g%_hn&A2;R{Bm!U*Qlwa(vs3x<f=@e<@M
zdt}jv&f8AA*#WT5YwrlXS_Y&2U)(l#=H&|6C86<8_BYzvR_SE>lW7^D^*gDss~Eek
zim<7w?~mz#sNe=o`&5TuN3HC0T^Cq?49_-M8-1EcGKv<=j^}^Pi#2hP<s1F{nsWNV
z-ZH~KH{Z~JiYh=kHfEZ2+~5;>@-lyLq)V&Tl_wkQH>Sua$H}W;^i+HmJjCh83{Wvh
z_SMROLu9BE?9!!aO@AW5MA7rlxpBEr&C=(3jvuNH7iVe_X-nw~)12H|lkW9vpbOc%
zM}6FDYi0Q%G>_R7^dt_XYC&4pqSBhPbdal~IO2(290)gKThmL`0HFCkkF)WXsF>hr
zH!icpn(fQ_p%lCEJd3XWr}tDR<b=V&gpvj?M+bWe8?LH1?*4bCUOGK9U5W^HoN8zl
zlJu7yPs1di(lXcBPzu##qWg%$(uGv%u_d9UJZpe`?o<ZNiPgX-9e$KNit5J99>n8%
zSg$OcK6NoeCFm&o(uESZeYmt@hoc054HL$}^t5daBLS$|F<#BAC6;b0Cg1FhVRCVW
zu7Q3oxg=UY*2bL>(~>jG!t;d@kmPh(y4k0cCNCjF98@UE^^E#%HkzFgs=n{%wy2Y~
z--M-rwo0mnXP<YE6K1yji+emCXiJ}K($0nE<NJ!#8C-Rbs3+Fh@A__{wgm>;i75zz
zjT!)(PCPUhQM0H{B5pTQS>eWYitKuJ*2yCqUz6{1f9d<z9jVtwR(T9fyfg)lNoc+v
zD3p)|<uoE(xhTeBiieFq_|x$gWia)Jn0w)qxsm7wn+|}em<(jS4D{dpvjl4c2QRuI
zkKA<Dv;H{ef0c#V?%orRqllM{xD+L|BLu~tT%DP$$R}jCKS0uc=#l6a-5y{Zmh^AG
z`%jQSiRvLq`f%~0U#jx<qeVw^&Y__^?wI{NhlDzZ3T(YNkFs{@;QR1xyzqAp^w!2E
zL`56+C@u+m(fAKi2GRW_uKGx^Sz8aDaEE+eCZ%FWWkTMf{mf~Ui1R|FmOD8C=}j%Q
zic?4_t!Zquk8<|g7x=f@wXxXjeX0=Ix!`Qu$6^N18&aj92e8+6o5n)d@jH6YV}^Bb
z)DqoyQw+7TztkKgU&O@Jc7Lp(xE%7)VNB;B3;V8HErXuQq=HMP!WgIc30;zdytPB~
zj%x2FJ_6e_WwO?fTtQjI*)bA5*_bczV+=7_vi4PADfz!cEs!)i6ApH3s}Rat#=+Ix
zO7sGKGuxn;VEsn>sJ^K@<wc`yG+jzd^s{@&18d$m)NuNlx73FWTM;H(?5b}4X~iI+
ztNTC~ejFt<GTIt`?3MN^q-v{>k}?)1>AKw_%SYqwJg9#ts$XWiTEm4+0p=&cc)t*@
zgWg317i_8s{{#|%4Kzq6$y-D@z|@)XkVkg>ZGdIR{ZV5|6&bk7!aAf_KczY?GNn*F
zLg+TGeZFx7;tHw00Y0>4V5DW-VRB?gh85kzQ;#0r5?m}h>cWzTxUSD*9*aAoA@bkg
zu@=;~vRJv*&V~xKmV86nX!;F6?xh~CF@dKTQeWO|fRb?d1^3w8U}wW$_BTQt$xR&H
zF`%8C3eL9c(P|r<dPW&-^1NQWaf(G3srUiV>Uo8A`>y_0iod0vQ6o7c(JK@Qb<c;0
z)o;I$)(L7S>sO1L))dAUA!L-p^_1VFi7*N-Gs*to%;k&v0GxEOc!tp7Z<%~`fNXNO
z`6DS5%TPG!@9y^&-Hlq99VQKyi_;G!Z9u0f6?*{#!x9mrY#Esu@TP8|O&ch|f58<<
zvatmkqGp+Z-<mTzW8I}0?^DF@06;@rnEvvenXjqK4a6BG|9(289ze1NH?%4MF@&Ca
zAepaKJq?sKsqWdrSKBMVW|t>u4^TP}bo#H1vpq-EAC&!$Cv9|oe=1F_aMO^-3DsD8
z=!X>sbZXF?0b=A>oPEejlWdf8pGu0El)s|rs&p=JrLA!Z6|<-fT!o%&T4K_JA6?H(
z$A3rPFh_FoIhyv6xqniBAcD&wsrdS@xryk0VsvXjC*4Gy5u)@3<lGVNv?1q^gjP_>
zE++Q(1L)ovW`g6I;FFB%iaI*<y1H*ilXvPjU*KxsvptI-il15;S5#8(uoR}Mq=*KZ
z%nT%V9xR$|OJxy>d9=af^;e`rEg%Bgyaj~qj~jhqr`X#pFH1}UI>S&+<!Dq3Fej@2
zx2(BhW9R!vWi4YuKh_VBO!B*5)|VjYzyB9NYk?WtmsL|y<GS3|DnxivImS~ZGJEpp
z+Qax-5!T{CQBnPFLEQ9IBM*i<trKymt|e-#oGLoF^>g6Q^x`pY7yW)lgGPefDlg)8
zeWm~$CN9Y^e_R%}Ld5l$daCF0+WNaAR9^Bi#gnVeHf*uq)fg7$l@_P2YrAFo5tRnv
z3>Y}tG#7DQ%%<b>NWmfb!IO{Zt-G^W?fN=Ny7bTCU>~HY`PEs^gx+xqm&WjD4pgFG
zX0Io3;nziFx<1#r(svK3qooNXOL!6rmhP#qeQxdSc8I-Q0CZ^`la`0~f(~d~I3}%}
z)qiR-7nR7*9aJagoDoXgb+y5;SEG$c{hc7|c@sNtAJ${XjgQfP8x_R`dYFaf6*EQ;
z%9<vg|H$plD=;DYKvfy1w`AtqOn%p`UhhfIQ>p+Q^~%sp>ykhc5=O-7$~41Bg*&6~
zP2WsXo0N9a1^SJ^Y@FpLqlMa^>5rM_RA`kSiEv~_axrR87b`|4wI}nGH(nEqZj4N5
z1Ubz+53nK$&GVF>iZW*tNQaN+Rw+q1-@a|g(9!MY?eo@n`E5Hp%y_wb-wib1rVkQ5
zO&U^;M_;+wH>@ntal3x|3b%M;I43$|Px4vg!Clv)Cx4IqUo$j%_R&qH`8^Bz)@hRN
z&v-KIoN>8K*QWMY==QBvbz<sucC^zz+b{PpUxJF1x>LY%_t8T-RZF_K&tr2vFKAvi
z*&w@i5^H9Z38~-UDz8y63Fwl=D%|@f%sIvAQQ=JS@S#)BdQ<eImI+l_cQYp2!}sv)
z=_!l{`vOnA!}Y&xZR+3LtO}ZletqU9ZX({6JfBN1rSx`o?0a6<*OHJDo^Zj_&$l0z
z`wIU71~4Fg^E(b@i6K6|>pDIWVapR3P=7%ECJ^t={Z$*}wVrJ>sy(*?JDl}Pd(~`2
zNWESa^65+RA|HCWrKNI@A(G_lvxDN_GU8FRnlds$>Hc~J&CiAd&u`5}tDIGoQi%^6
z-IGo))XNd%v7M~g0=;d1eE1Nx!NcLI?$_cJD{fW8jCd99PcxHVr`RX?ePyR4s}mQ8
zE%?6{O!Hqj<z}Um5_gPJE_o;()lz{&+%N0<Z~&`?-No!~+Q3g0CA-9~XX3+lY3|1P
zzwmL>`y=jAqx*Xg7(Jlw)cUusu>Kv&$9YSX+wgZ5N?h)pwIa*a;KtfRt4vi-5v=>V
z6BFf8?u?_9+ypY@l26m*-p$put374|vn$9;5InO(8OZUUfywTpfpmY@Gw;)e2c`L&
z9P<W)foOlNwyXKYhH6%B8^pTpCz&{U88W9eYZ*UH3msR`m|*d4wI$07{xNvXB`*GN
zO0swPUTWNpsjz#_`_681A##EKbwg5U+JpD@Z$m-_JZJTBZ>4@*EAG7brTvI{JzKAx
zsIq*lO^Tugor&Ym_g@EEoUg^P^gqRZeFnSzmCIEb`6~D|%Y&5a2}D4{)!rLb^{?3*
zx4&K|5{#T^8$X4@Kjhuz3lbHlpidLqa$kz)!a<aT%eHX*j@9}}mA3f{6+rvqCocZG
zMJaF71KFgoBkm9}e}7^h`{irR8^4GMI|I?*XrRfc-O??gdh1z`oU6tLE6ziws8hqw
z%BaGs<#~#_1BdV6>gTzi+k+3@XBnU-hs7O(dxqxQ5OLn@hkk}UzOUe|*<%NtOPTlG
zrgSC__*x_FS0#uQP^j59V$AyOZE=?*r?oAC|5rXarM|LUpIVvM+z+SBkU|l)T1HRP
zy4z3_C3-%GWgDx!!=hOqANJGuL0>b`mU~NLPGN25YjN0oDK=Vg9@TB=^tEAXV1mjW
zR&cNZBpflinkMIW)oHpPqhEi<GUF*(yCi-3%1(p|HSHq()qZ^LSlrObi}&IUOujXp
z;!+B8DtV`+&CkT6ZYO-XPcm?=93@o4&Ca;%*60xT8O+dkwNFVIG1ns=qIu5pFK)^H
z4Mz1e3A5eSV)^gW1RkMvdYp1O8EP85WfRuO2k#$!&KJb;^Wp0feO8<4{(!1YYQ0%A
zbY`9%@1fJ1Lvk$n?uiOkS{{`?vguVm^oK^=D1@mIc^qxW^_r);^EFFec5bpBlF8F)
ziZbq5*EfbX^}qTiqIbPh-d1dkWcKYsGHJ{uX1j9+n-fI$uDX;71D|6H@N}a<h7}cg
zPX5x4nQ)N?KG&|8SnbvygkHZ%d8i)D=_HAd_s(UksyX>L)4Ewr`Sh{*t+LUSGv=Og
z#60UF_UvK3V?F8oOZjo&p2aF7DkEx(K*|r(@v*S8CpWCIW0kKrrqM*J<2pQeKlpuB
zXoY%kjvXd6lw997SuWzU^X%S3rx?8`<vri>w?DE2asFb&zW@5{|Dx$D!=n1$u7~az
zKoNfA0D_=^Al)*w2uOE>ba$5wNJ=U_gmg-GBPr6|-QDn>@&7*G=Q^{`jyu*``z(Qf
z58>LQLwPo{&4Ec-u%EZ(IadvA54VI6*f;5>?XV-}+eDz?|B$t|KRefYgoW7LRrECr
z$(RH(gP=7Oxd+z+Bsaw3&jjJ=LExo)+#D}z9M+yEiRGg)gyQTw-lQo{)w;d{n-UW*
zP)S9S)PMN4_3>Aah`z(px%lumLZ#5=PiktQ<^1W06{8Sb`+QoGTDH^v8B(?X|J23A
zXDHX${)|Z8s0JebTA(TruFaYYB^SD=IAiN9f8UOXz_p%S+;v76jLG;~Jfv5PL4o>Z
zKhl4pxUZ1bwI|0vnj7{luBB!$hE;ypNjxw<n5D)Q1_Udb_w6IS3a}b)TCh??>x10s
zum{MJ(Drn;Kcxj3bcl3}0{VR|rv2xU;mzz~&y_c&_tLN#O}`bkdx~yoCU?H5B|MZ3
z>nee+A1gf;XW|iavy;`$;#A!oCspy+<-2pcPzP8(aYUPNUr{VZv8lgkTTr_KT`s6d
zr-v54-~O!WgcbD|Im-Hw+l|hD3DEm9S}y2QET+If#d|zWt$VoR4V7)2y=}KBiSHA6
zBgCOHaCTEyA(OGZBpp+rsw8qM)h$cr+`vOD%9znyG3<Wc5a05XEputDm8!=ykiQW7
zuIC)-I6}1*Jrh@ywu8k;4r#Eu#gD;XuEBjo6_Y27_@<IN<A&2enz*U=J66*bpYHvL
zSbP#T4mr9+4|dZI2M%Qc)Am;ZgM&X}^FVV7W{B<U>r)Ky>e7>xwV;zMtLcB{9h}Vc
z-;PXdER&_~%PjVQdE==bQk`w!$EKvVql8X)Ml8*GQtkp@JooOjk#ukj{__|3u}Ot`
ztPXmKchh1Xd34aWcP&St6prcLD@jG1xPCYyFGF}b@M=<F>yOoy+G&M2{Pj=&T1^Md
zoadwJI-9?xj8P_tC$@F{BO><I^1_#Rqa>hd#6INmB=a7xJ7GVG)zI>MxA`%^rWmEm
zcxNbe-G#0G*PEpWtTeZ5tzwwe@rjnrNKkIAC9LDJBIx(Fwk~{8#hYdzc@oiy)D(*F
z4TwQys&aohr|NnY9yRuVD;qc9rpZQn6E=iJU<T=T?BS%Y8x}oLLx0KU1SHN%4E5tL
zX~EMijsJm)E!MPxj%lr~cqWu%Z@=t4o4jVtG4EyvSBukxjBY7)+q-;ziAAmGV3|X*
z?2+UEW72F=KCt|g_y%Z)=$GP0iqmNW?Oxe?t`lOT?V_D-7YeZO@Z(8Abtg3xk7M_6
zZ%Vz*E^rZnz{>&6ZhB_&`iZE{w}Puh@VDj<VvwrZ!yL&{G>j;x?Pjzh_NT5{mitED
zDsm&$?c}095Xzvxvty>)^_ZijO`<`v1;3|Wzb0xI2Qi~ES^luiKT~rpO4Gf;OPYZ(
z@gWjxIq;7kQKRdJMWHia@fOR$lf1DLb^rZnR?})^#~KE)*IC>P`X5kwKk$GA(U$2z
z7=(Ih_g0_`B*niyd$4?;kkQzTyF^nW@R3oYUbzAP6&+(g8oV=Gyxj{wZav{(0XrPY
zxhgNv|Ncb)D1(^}A{%&GD4}0&b+ImjNIv^rZ^%17miK5A*F7p$HK4Y&uXl$zHFLET
z5tlugRe3_krjo$J_b#AT4D~ib7Z~!Q*<Lh#2p-y<&SsXGO6xN+>~$?f$O|LM2**Wp
zA2N;iUQOtGJBe;+CEEla9Y7|on~i4r>cj5sPW=v5x0eRwAD;R0P-eA3bYn>;7cl~K
zyJ-Wfdk5qx7XJlMlx1Nf9T(oB9;jvdoiOHd2z{#`PjIbwKFD4kL;ns3^zbb;l*y|2
zKjEhGwp+z{zdH;{U0nqWqEm0d`%osg^DtcUhsu7_7;i}43H@F`wL*ElT>L{g`JjbP
zU<O%#(epWNj`vw{|6aZu-A<!|%l5-D7Y5ksIB&OA>dwBJ8b$hCq4*9okF{I|TEr;F
z5XJN-5Y-1gAua2HP*O^t@cp-blq!s)fxfsbd%{!yT9vgPD>|H0|8}b*Fxk|4mRvUp
zWTxGQH@UeB`)0u>O`8fTO5yIuEv2!3L$A^uQog{xwZnX8Z_gVB4C9-)IoMkjBhdHj
z8)o9HD7tCkuX}{tJIRY3!~)AIQaTFUYa~E}mAm@R%hfobdGt*DwvWMQ7GqBjgez~z
zqR<p=nm576egse~tJl-!Pq@6@K$!~{1fSoa&u|f-%0{0A<aT2>zvHKM?>3}>$P$fC
zr*9Izb^^HGi_g5bOpTX<Ds_l76UpM<$xZ8>Oa?mtxa^5!AEElw$m`1(c#hwQYn8xN
z?h867iLPk^O50K7p@4k+F|bU8y5#9d3e+?);Sc>@oK^nkD5PV63iaNUCmR(xy;_|<
zLzuoF+!Evas%H9wp6d&SG75akN5L+Bg=tQOIyrIZZ+M$Wh3ukh5`Aj{8}E>Cg^z^6
zr?e_|X#B+VGG3K}A=UV<>f7$2U6pt4WmP>@%EynQyjON0oduO>(N(;~tGVm+UnfHF
zR0H4!vmz!av+Z-QLmvnF7H%z7@p2p%l<z$)9bMxJW;}*=UKlvl!ms?l8nY*X>S3Um
zBTA$A?}z$Acb{Fl!I$ch{|E>e;2+o6S`05O$4*g8Yp;MC4ZoMXsu=xQQhI1X1@l3@
zw%b%`9e0EqBxUUyp`869^9)&=g2WB{YOk)A82ZWhh4_gc>Idj=pfsbMzA7gfIL|*2
z)DHshNqTydST`IK-H)u`rfl#b=XtkIk_S+1AYzQ8)jb2Kw#MlJZSq>-cXZIsq&uts
zEy+CHD!o+`W5^Y4|0~~EBjSg-sF#(e8GqlS<=6A64d5JB5-Jr2dkfo+#u%CM2u(F+
z_6@Qtj%c;t1vEmT@vpJ_%!)R%67YeQSR$b){~6JLR=P^4bh(DTSnfyX`e(KR^wDNb
zi=Yipt(pC|CaP$Hs!06$RqZpBWWx!&ykk8mA4AUOv<Aa`5RW(zILV&ztbF%CRP#hO
z<bu<}cc5P2gB*xXe}x5mSZR9%m6w)-ao1;?gBZ-vJNfr-T}DCYREgE+11;G|Y|fgS
zmfolQ#_Vr?P&)WW;~<`5aGQ|YgC7W6tNzlntLF1GzJckts))+PC(7WIk%DEZYY}r3
zk(C8$?<ZXdazpo*{)}9*_o$4sE^l_-715ON*=dj5r^rsDKUi>Av~=mWZK5dQV|wV#
zkC}IfTZ~x(Jsc1CiT=&6QNOHgUT8esbUdt{VCBIUX&E=T)`l0)zs#bPx<lTe5qz)v
z>yfR~j;4vZ4oOt%GOUU~J!LFlN<s&D*$)(f!447y8-=EOU>;T7X$Jq-o1|5C$8Gd<
z6P8c8`rCi|#q=%*PWR{QEw?UZOw?-}93}i??@7bNAKwlt`Z#Q6y)&8}NtxB#IkOYd
zUZT#qlYvdY67Dmme{wM3t(ML;QX5*s_F=c3<rLpL{82Zi#02RF19NUh>OX)aIHMAc
ze(d?*)Du}7_1tv}L4|5t824W<8sC9nM(xIOyk^k+__-;k&H6Q$f3JW88~i?(pOITd
zxbg>5f03mb*1Lw#2Fwgun*L{nyU~XzEFC^0%GL|No8^S|a90fNjyxhli@+QB3ig36
zvhLcgXP^G&s|*(FAt#)z<q2_?a<iMpWh+AC#p?oj7L_rnGbg8qU7V0UpcE^#{C+z`
zE`q%*$};65DfiSW3|bxlmCCOAz#JDR15oZ}s$o}Oie8h@{n=Y%{57dW0+Hni@P%-w
zeb)9f_(^{(C}^GVWagB_RQvhbVnn*TME$S9zKz_+kS-p#XSb2FZSf{{H_}j#a2EII
zU#OzgAa&%r7j3{IC^w?FRe^kw40N#%SwLo*7Y}LP8B26cY{z_{VF`DIC1OIo886J0
zCyFAZd$hK%pj`nEYIxJLQ*2+`C!e2Lf3D&?c}d1N`H4L2sV{}s*b$YN=%j@2u4kLU
zPs7uI{ASX1r(s9nc%@QOhV^y^Di=e_KgW|3PxW1lr`8({$NK@T6tq4RZ!wV)mA!1I
zsLD4g>Y%v@^u=w(7mVK4D6il8vEvRLYdX{y8#3L@*f6W-zeHVYyI`2~eOtP^R^4|F
z$PluH+l7oMO<Nq&r7Q%3UK}6x-GVcx+_MJ+q47i^u>s+%u4MF6k+;6`ZZ96xt3v(s
zjhvET-y*f&5rP@EJCRU;uZT2n`FIVx*Da`0g}-Xd{o&<Ew84ZYvf=z8=dwdVO(`69
zl4dhigp$FxjwmpfE`1+7r(F!i+g$;&NleDAIeSJWD1UyL9v8gvu5_6JBC8mr?jD6f
zNt8y|#16nGZj_Snm%^<&$@ey+VNAr<RD$RD`B72h$TzhEg7qI!iK};d3y=wrI;cyb
zd^s(d+vpX$4?^qg)2s54h_d`@zaZN!Mepn8#})1{XuPuy0#Kn*_%L7iQorvGP)Ly|
zWM<U#FY)65rPI%3lO!W=>*Kr_r3ErFufPS?Dng}GEc-~^jB?ilDs@dqUA`V&>nULc
zbReli3px;ub0CSMv&rkWBMhIq75OBOJ_zj55#IJ3QIpJ^4{l34++-3=l{me4xrIeP
ztH=|+fq1Aa#WOPZ<6#$Ie#1tes`oYmWJ?oX!sGve4@lV8XfUezT)3dBU|jygb;@J|
zVsyW<?UvGkE@3aPwW0qTn~LE9SDBcb42<a_@X0=nMm-WwB?Bwd&iVZYvzrBsi5k%Z
z#`_NiVNlymWyKslQ`cl#OxCvgGF#1jwMF0m>@HWzt?{`(UM~s%-lTc-voM=5TB@1`
zAYBxwHkb~GO_4b!aL;*7ZFO>%0<qqAnbryl4ZDfw687E?{cn<2?!8iWi~iWc+0K8L
zI&S)-cO|+C(3#wPns@#0BA-p~z59UwA6c^gw9vGdz2Z5}<%(R$ML#;568?>SoB!cG
zi{@@5!Rt4|CcA94dFdOMxX^gZe<+UV_+A+%HGOHDR<A?8j1ob7du9^X#bjlhJC&YT
zJYB>OaE$$c5{aK11tX&>>T~>n6SelSfT5O)zjAK!Gb{8Y;9RJ<p`jgHPO0(wuki0*
zh5h=*pO8gs`%*=H57~*p8(4_`pD0r_SM?FV(8Jfrn#W2X(s{sykDKq~=~QywHNaKk
zS=^Or*He)B;Pp64g3AzmaIPX@Zp<ZHcGSPO>OA*EZ$leubvvffb0!Rfo#G;33M|F#
z$G$B?0!%(U@tU|2hlzmzoLXR}pfc4CeK99S_To9u`vzFg)`1TJZr*XjgpK5z@eG<V
z)u^lI1UHyT!MR_y42g{V(6_K3=nInTx6jy5uVa@+)idj!s=XK~rTv&8{XGAs$;{Gv
zyLp!tooh^l<5=+cga=Lmku;~VE%@#+r<qJq?Q4<&fLhbRy9d=yFQ3|VArRSD6W`S?
zN~<X9C4t@)dwn*cigCyV911%n{x^0)E9y6E-(B#t6<O3!ncW(JrU2+Bu#1`-e>o2%
z<^tm6mjqdcmRzH9-rWlPK-*fN{({UsW)2X$xjqY!*n*vuDpOQ+%a^#{-XsLb?CGpS
z;P>5#Ga{h(iiM?Z(q=Rx>CxaAK=YWaO$>Z#jc`UT?T>Wf^N>GRATlISdjIQ{OWxn+
zO$s!ZO_x<b?T+7w_?s%<>GEvC2p@Z9ew|-`4O92c*BQEFsfDb}70CB!@W5ci@DFxs
zjim@0selh^0+%=5zg>_Yc`{FEPD7)Gj}!8}Ic;=OZ0|9~&fo3YM%EjhO8Y_!k3Yq@
zc;86rF<5%#Zg0w%>a(US6vQAQVv|)nmml-w2rMfm=-;!MG10xq-D6Kx#c-&1m`eI>
zJxgn8&T*`E8O#k~Ok5;$APNG|s(SieIx_PM@*6g_$fk{VxZvFQj#SdQDV>`UFGe)E
z@F$Ey{m7Iv@7`6y%i@;1K%r7cFc^V=j^m@r7N0r;kQ0bqxcpb|isHl3K5JuUZrs-}
zCT*KnZw}1-9b&a4TpI@Cz798g7`CD>2TQ-9^@~KrYAtLswu+OpkDVrz3E`p_GnV$)
zKx1_EW~4}mvd$nV+W-nxLTs7pPIo=KFk8)+asY<9oXO`M0`u<qQK-w;cuH#?0At#T
z=ri9pXLuj#gE61`TmHiL2-{23Stcu*Wd!CJk6cOi0$d>BoG>6bvz|&V=%iw-G^Ai?
zB6%hyBZwEN1y1fduz@kr{ezxp`QZ;%ObMt&<yIk!2LMQw8{s`u8Z}pOC@v-DIILMK
z>}B0|CW1MNZFOryRW2FdD7-sYD^*oso`(9H13;g=C^#+}wH8z5^)=s`Gp95{<KIpL
z>A^D8d_B1DRXw(ScaS)u>iiEAFKirsn=s24_p}OBe!2cejwVboM|Bb3tlkShO(CTj
zjlBBRuSx}xZSLvlXb0lwnVGFuoWFS9V-MX+iLG|`A{_D{9117|V)^XfS}VS79(8Vs
zX7Ut>ikrfgeb1O5HqmnXg>fEe7M(wTK0nDgqt6EbLz=b{bpC$dL5+Zog{D=B;Xtrb
zf5@`W;_X&?C>o=|e(`R7A?yhydrNf^omFR_i3qHe^6wp@Pd<Km=kxq|I{*H+FUMqE
zzT!8%16MkgBZ&5>`C&etmXGB6tv~1fX6e@N85ZP(0bNrF{G4$4tD4dQyQ~^hnb!FQ
zT}mTI<d80;-z0qx1cj0*oGXu37{wuA#@Syt!kD(v<ILBgi0$!w=qfVj;|pz7PEFvM
zd?8KjCPV33>fd2ZB_G3aRZaww#5i;%3`Us(1g%HHb_cbJud9ka0HJ;v8^HZ8UB2Ry
zR4xMjY|Z1ip7{*R2sGa7h-iZb%{#?-V{@`Brz`)(xS-j?{rsMYj>!6k7we4r7Apz3
zeidjgte6W6*#g?*E>i<O>TsE#o|STd!3;o26$YC<Uhzj-K#GVQPfu0{NO7yx6^=%H
z+nuY_qSw%P{yB6Cfk9@BT2ESroc+Wf0m$cHhx+K|7r!w1SszWY9m>FHQ@9Tt5*XqT
zSp<DGr4c)=(UKdnQz-w<vUs+-eU@%fpHyk(x=_f&)7Lw71pfOP2b}xi59egT#{5-N
z(Y^1DUD3R*K;vnj@=6$!`2^`Ryh<yi_obC4mB0=uG*gbA8cILcWi*7r_yZ7yPqmmJ
zA0D}o^>sD?L?1bSXA~)jNYgx1N0Wq_lPJ^y^Y)6~vq81QIgxH4VWe1CU9g#`kW^#L
z&*?b~mU<kq^RvQ5*ZNSa2d$8?Aa<l6pCFt~dudi%!0RumwihK>>7@~X@#nv>#P;tS
z4&h(2NEGDSoa`1?IVQ6z9Np?9N1W7&sA$~rxI2J?R*Ngs)c7TLOs^7Ev(?>60PGY9
zkBSc`&1g4vqpq35#(WCtWf5Bpn-|1~&Iz4&_Js}}Q|6Ff=IzBhDSCi0L!`o4nwT{%
z{>w#Y@|OxSV&$kkq$R2j7vXI=y7+WpC1$J|@lk3JHo4E8ZtrhN0k1n*H1er=)#Zof
z#1?=afI_2S3&rCbhk<o(%{Jk0@gOe98U!2NiFUu1JF`VL#af{8K6MyC8kpmjKxbwG
zib{Qt<B!$-E-p?l9}v8qtWdYbXqNPui)uXR<a}=Q?eUlV2%+Tz%J$}gu+x;En_5$3
zf2DE}$e2P->4Kbu@6ST>u>NVFvReTvy8;DqQ3yO|6|r5pne3HKUWX5{R;_0{aArK@
zygiNQx(GnD^sL&Tcx3<WEXt@VlQaY{HjAc1ou*i<&G)l%(vTj~PnfG+Tk4iZtIKRQ
z=}j6)S97DJ!1|0>dw_+CyA)UDk*;|M2KyF`K*QCTmS-q+l{}_2lLbwe%Od7p$X5&^
z-X!U7UuH#STOIDVNLR`YU7M+0PPYaC-LSQx<h6!k-dq?ve^{OgFlurT^>$LvQn(Ym
zISm(OsJ(%}Q@aqUk_8}4(ygX)wRwtN6BzUhe*T0~{ZU(fPz*Zqtp$Ma1QNnK0xNND
z8~***AD)x{r}0h)kE(nt5VIK&dV}jt1<!<l$;v|TqS8v@SP^b~xW2RZcgXdw)7oCt
zI^_nQeG<YDxU&Ibm$@h#iF?fGM%*(nH`1}VOPr)kxapVoI?zL8vw*@;fp7JllWgC0
z+ovbmv17Np0*sK4`jmCsnVlNY^+}1?0OVF@GI~|!LQ7vvRJ$)0H}13n!ZnVUIrS`K
zsb67C3+{d7V5K4xcawFCW4U3Y^&-(Wl=Cmr1@L*4?@Ya6vYI-0HD1Koj(y|$$lC^1
zr{yDYTWJyy$QH?q7nDV>?Y}cT>p?GMMD}!IS@M<fr>3aZZcU$51a_P~8ZcLTu1LJ(
zAavlXhXszG0gr+IX#v_D5}Q7OHJtGy+$t94P6|#zxNwS}lX1kzH&FwxXH2XoR!5kQ
z8NEJ6MrgcE@scOnC?fbma1`{#;8*F9-mgL3AL{@g^yqr_#sbw{4~ecV5U7(L%8IO^
zP}YCRts$EZr4%BUQ4z4qIkB9(`ILYF>ocMtV5J|J$1TXuK$%9D^}}&HJr7s+L<b9J
z$ap*IG!-7t?sE>K`U&P4=pa+~c<tKzw>ejfMQ#ZU5>%goTQnQ{GOe!Pf?-T3h<|~8
zjKm#e+b7$-k+`tO2IaS_N7qT8FaE-yga1-q{u*164`{gLxY>ogCfb&D8tZYo<63;Y
z?3|v5!#Dy#OO=JGp4gTjGB*WZc(pprYxZukf;adOhg~bvKl;CxJgI2KBetS#x{~5p
zUv-)(9@_)$v`t`Hli5f-r(C{#PyuW3b_KcpAP0w}&)wg_TeQ{Yc^+cET0`TN8l=$E
zR{@b0z4FYPi6FsjwrMAqD#nv&Eol7Jzu4Q}u+r)ET;ncL$ugqFX7m-IPfmhek<!E8
zLcTb)TrLtYUq!QiD;1ua5Q4fM?l8#@|ITH~u4N7?o8jhe1l{WhX{rg_1=dn@)4_3F
zGQE`2_HfhQ3YU-jv8(u1yL(DHe>$nI`>N8KcBlh|eup8><Z}}4U}2kw-TQ_{`ud@*
z-^LEa@G})9Jdkg8*~H@8km%3E8)3I__^1(Z-}i&DnOgMuU5;Ddb^@}yluqWg*Fma`
zDn1;ngs#QuXhQ3H6gD~2@N@{2Vx|yxOy&|@$8y)<oY24DfkUYLuV_PlmTK@OioYRJ
zt^h^Sr!~*3)^-zJHNyHwVR=h4F`Q?7LD;kmn6ULkbCX|^zQ@?l>*eG4`ps3JGyrXB
zwuAP;`wG-RF2()R4{L0?8+7o&F`uVLV;ys8^bkF?U$gTP$DJ)cpcSz`DD>ZPHAT+|
z_fA(aD4k=k&(1;B|I}BUC|pF%&(z!EdK8bcqaXqOE^6p0;Tx+ip;pQ*ho+=6x!R;~
zq(he6^m+&&BXF*R+MVVsBh2t(&q{W&6ozzwdJ~JXSy}zf51ximB@PHY;-Bt84yxcl
zNjnwMd{D2DAFMTJcl9`RSYiU8CDE^PAb+C>N6CL0ats{jJz0SS(Lu<?8f3}m?~BT4
z;7xhVTUrMTSMv-zl^U%bV?h0)tml**0%OYlH))mIlSov-7?bn?o>_dZZwfilHVa~I
zucj81ZUTyQfHIF;65W!1okKd02}f{&w8AH>d3GkQWtSZvY>K7y3U;WId8=M)!EXyx
zIW3WNo<nL@XCXu+tvjq>u+k=iAJ3;miwu3*<QK2`k2Ife;zjfPk6GP)md71H(Ec#|
z9;_q@UM}38R;DV)%p^qfDR$ZlJp4weqy`>iY>)_|DN2tar`FhAGT2=TT!ni1Y8oK>
zp##Np0Ai2T9PG3jW2D6BnyA>7?|GJOUu$u@g)!-&_`e4otJLxie*?b@<}9&!SIZAb
z7&ImN;dIh!K8yS&_)8#Z9j7T}&P62(2)wu*5$fkW8}VaGdQj6Tx5)sHkrxHwhNE`*
zj|UTN!O@hGz{W?ARLK^WhsdHkiEr#02jkvCe?rw)3ML!y#G#s9mNBx44}uBQJ*qJy
zKm-c$iXsMA|08S7xbdh2Q7eR6r(yf_Z0oH=@VM%krjZwiv@%eKh`x=_kDY;;F>CM;
zdl7d)cao{E=a@#Tw82><VmejmsRo<`7M%@RNdHSj+rX6#$tALSckb|l!3z~xuRh90
zha?WHZ9ADgql!UuI(;hevsA%N5YlhI8!4e2s_y^fl=?C*m6WnTaDyG7=?aW_tfvq7
z#o=9XW$pZ$CAPyRz?{K|{-rxk_@^)1pEw>G$JjNED0(8f3dgjY+s>G+P)J!n8UsoB
zWnp^t)N8*i4EDpxpBUO0#bQA%E(kp0QsaNe)PXX)6ZkUu(Ol+j$#!tx5k(I$aQ=S-
zrwczEy<|1X2A<vVB5mB7*;DizX5zE#Wjl)~C{)vEEt57$?6_XK1a1d3R<C}w>7y5Q
zYP(H!r6I%?HQNs-y>tc--LJK+d8@Bf%P)7q-QEE83#-IOGzvrc$%OCj+ci{#ohcZN
z6Bf>O?8<VoP(cRl-M5oZlf&ufTs#FZra9R1^G3B;N}!}9Qmr3n)^~m$46BUL+2R+I
zN<d3L#L14HcDid4;wn8Q1e?+U7Az3>2e`lJ2IDB!+dDvwsqsv8g7ZNlD=q!R<|4w5
z#lN!eiey<h7CH_#t;iC72hhem^Af*NnStLCh@O~QotBjX!%tL-fJJT?hRP6aPIcV<
zkWXuU$==*9^8x~Yjp)f^P30_hemf9{yHQH~c3whVwldW7$?8!bqx=GM>|B16(n@#9
z+2E1yZ8pRNTB_OV>ii@HM3B4lh$z9ch)#+y<>tSI_*28BI-AVcV5OSX=Xg-)^Jho3
zu2${DJ{`J0BDnj=L#Zj%UZ6eJtqy<XZVZD$XV!yOI=|wOlT-iNLcJ`lx-s7$l$a`5
z?!8QX@2CG?^0@+{E!l&TvgAwmJhdZ0f~<!)eZdFRn49`A7zZ9=-nqMzw>9kjb~fK&
zQ0B>`#0K1iEQkvYbWN=m&eLg9cLAutt#h~$SP7ryvvm_@OqqtVhfn@SJrCRd6wN7}
z*T*cUJu`)tN!6E-ep_MVT^;k!3It<TVY;N*?r}ix0iB6J9QBvju;%l3+gA$*uRo9j
zU&CFhZ9n(K3sgS!I-mgO#uZZ7Wt^3^MQb(le*KrJ4Lui7q$RYcxJ2a$TYY9dN8+TE
z$)jM7{Xb&qa4NhMez7i8ZqS7~5V_cz(6pTa;6@;8C$Qoyh@||(o7eujLUf;V<M?6^
zh#hf`TZ>KQ`o^&la|Y~0ZLiY2Q=a`EghFpRQ9i<igIGRsIiK~^v!3P1x}B#ZZ@URp
zR+qoeC`}RCArj8}0Hqu?zdDTlA<?^^N~xhk{;pyIEpOB>q>~re^^yNxPR#EQTg6E7
z6F`b>3}cU<+p%k4WHU&4D<2o3E}4}vo=Q8$ft6a={n;u5)k#8AzsS%kT!`>b=Psa(
zq#%k3m-v$=u}Sk8AN*{3`ur?S(S6ORhQ^n`g|AQ;Q_=rIy>BT>&L=`%xj&zr)DQEU
zn;r9lq@nTVPzSB`D^Jy`A)6oLZ^K#Ok=A`St2^R0x=ZFi`N}^Z#^1gJI2s*e`}ZdK
zWKCr^nze5PY1cjcz8J-GJ;YauLZN*A|6YPTKD+BHYqIBnX<|I*X3=Fh7HpAa*XEd#
z|31I!12kS8O85{~#QYyH`dEN<P6~g(5MO)n=-$V1<%<BG@*(p9l5vE3-R6+07SiSQ
z0%mpizWGmN)G8r(1NGmsTnp}GR|pX)IDcnIU`EFAYVVVX)j}1~@wi*p)-?m*t?V{f
zpN4nC&l0ODCC%lX7Nhm(%XuX)@~MV?acI2)jSoD-M3uXK@b8Z?6uG;$aRqDchlhr?
z@zh1CNT82HR7>H1<KT45WJxlg`rRG8_QQ{3c_EH)ZIeG5isi$GQSnUdAqm)T%Jb5f
zCvl+hvdr7Wnnju4zWedAU~}o%h(Oh*Ki{@GPsLLn5`n=R=>Nu@pUHcgr9sm<pC=Oq
z@UM^JS)Ccmv17$M10^SmD0imv4NhPsU*)zr>xl&d3QT^SI0*KGOYyfUD|3C`AzgAv
zKk-jVbgCE!jKs+AnnFZyk;=UH*1#VyU?7elxNs=~KWn5h;@j)c_n{&fvAwwoM;Jm&
zjQWj$=G6jE0_t%z6ifHe?AH4{>0+tExV4iv?O#n!lEl<yb%HG6d{J7shy$x}2RhzL
zrXFZ0+)G!|B8<_!vsCqj641TC9RD5mw=elWHLbBreajauJhFb6)2QUP7yC$M4HSJP
zTT)&MU)Z!-08Hd(1da+dC5Hw?RLROuv?_Ra^TVzDt}<9jSh>wkglvTX{RwE7aDWRi
zKe<z8wMpJ7@M4KW<AeUqf7oF=4)rd@rgV6C8yx$^(Y16*;0>gbM(2Bw)X`w1YCq7w
z-V3L`xcjQLAG>PJ4p3@Ko<V!4OtRZ(kmwv<VA^XE6E7?F0sw;|w}jk!#8Sfwq6L;9
z+g$jC&3o`51njXvj#wI_T_h3|Q2?Kw6k_!bj^XJQ?&@H396A*>?eU&wgx{NzY)SYD
z7d&=ZB;#v6g{3E9*%xtLd_#7tbuJl+TVO#ZEtOV&2kAF9!uDz#7(5un5x<C@%aBn$
z$(=w#<kfFsh_jKr+LyW2;sfNj2Fr7suO9;pjB?bLZ4t$aQ*sdOzJ`sr-zKq3b-vQX
zA98(GCo>^3KJ@**I9nPDSZtvuA6BH<#k}?MjV5?~LCtXyS6raJx2Yn0_?i%`6!j0G
zK$~%19-00=G4|{<gAmxBY~^Jq7TZ@AfLv#s8GK`%bC(&z@UfHr1KMNv2-Y7qeumSk
z*_i|aK3oYXD(LvW$2{$2?Ar`u0?P;SOTCQ?y-`#uei>*yz`qcIk*)!b;Bivi=KGDe
zHck&l;w7&MIThNkoN6o7(}8DBc`fNZ8c?Xsr*3V+2viU?{TlUH8n;c0-CEynf#rJK
z<S+7*g%L?Kuqm>B9}7Ft!SQ6{pb>HRgxXD+ItsC{>+>%#rcjSk6d(X2C%{|OzH|BA
z^OIO!OKK14g1p9Y9w0UWFc=Z-wX@0RF7IUySqOK;wrZ|qdgWHcYFrUAF>t`4P!r|1
zTT(sW3cfyz;2Cm3g}`+Zxa4sma24!Z`H^WjhR?8RA~eD0AOX2g3OGTFxSlP)FS$az
zT#qymA~}mFN$7Z?dVfE5xr?^*h?8+sU`?r;%?E>%9riqC+fVCmMP}-y4kTf)ZA|QX
z`pSz^q(v7B3=liNq7(UtecI56$LJ{m03nYbLu_Q^Oj<0N^H<t@GZx9HDyYw+LT32N
zX3pOfp^#eJ6Tx6iVkot~*V>|<l9neHJ%Y0HIyZy6Y~gQ*uGlkBuom{{fwe6fT;5(u
zXhTktfp|-<`TCY(eXz3!G=of2h>(uj#+W5cK2t3jds9>yafKpU(oAD&da&RBQ_Bwt
ztdtjXR<bHu8`Mo!4c|L&`ztJwXZWG+FH4G#mwA}_d8cUrR_GX21T0^kLy-S``FbBM
zp`yz2P_a9IJH9Un9|brgf`~H$%6DH9bw(<~1pukHNz);ob#tnKrUZYNl+1nC=QdgQ
z=)i@nN6q)_n{n5;A1KotXGw3@V!IItP)d0?H{M5eO@1B|t7L_B-RT0J>f8M49x&J`
z5)irKuSjBs!UsyiNGW<`VoK50-9g7590nelj*WXz0P<8cC<8TvGM)FnOq8C1+Um43
zs3HOb+h3CK6TIPZ!xQ8*mN3}Ob2g^~<ijg_Q+6&cNB>Z!0O48d+eZnfpC<dRf&ex9
zFF%<<-$&OC|4Gb4@r#Ncrwy+A5do`|%mF@@0H}a`+C_aaPzZ<waHRwMu*-E&nFGz$
zQS%VI;y6BC%hbLW4QW}b?#-_v;CVNJz?ts%nnTCkHcz-ix0_i#uc*0n@6oZEk~%^K
z(wvf-dv0+tNV~Q^3fvpSBcHVhUQ!$^O5@xy#E1o;ODNLJK0m6z(o)$De!h?@B7rM;
zB47rOvQc&Wkgk3sH<?-Ww?&)2`MwOFSkAA!*CSz-@il%jmXSbYwTaLpFOWEiz;+ei
z7>X%d;bE-;U|h?w7}{>2nFh&v_RX+YP#<(I&U&epbRq^E{BOX>&6t?A?$0!Kc|R5b
z=`*zL^Zc%^YW)BJ$HSv`??$D3O8z<syq6H4P=9aaw>lQ{v^z`vaj=-72jFv994J8`
zLhJ>ThYt(C4BF3Q27vPAX1%X>6j;nC9YRX-`*Fh<wa5}J68{tKStsOsgNalbD;)p<
z-DN6k$Bk0GjV+=W%Nx2<1-vIpAy?XCc2&UiYW@c7<=A9PfMBmg$S3j%$2kCi$u)N^
zL3r}|e$J^OmH()`w$i@LEbSG?Br&Z#c#P(Wa)Ud7(6|X;L!slZghwkXWH0ObD-bLj
zNB}4EPsBY6HCV|DwOoX;;pVl~y1pyfDK?e;w;-lQ4-oc`mg_Dd7fi$soO*Zfbi6I?
z(=l5;OpaetkX+5{OD)}=jqaER$V8xNX8wj1vPpIQw35-4Rw2W0c;}D(5Ul~jR}3fB
zh9kb3LNmwt;Jy(xw3nswZuk(mcTX!Op_1Mluk*HpUf&I$NC^(A;EU$JKRk*qFJ<&C
zE<7P{+)bp4j5=~JPsoF_v^9(YKwbs>nt)oHOt#kALtx=bWqV}bb2`PVbZx~F3f<{`
zh8QXI;ziN?^lnI$O0omNZ1qVK8v@E4S7qjXrR6@o&Kjm-A_)wjbhJ;V-8SuWWNT;V
z1Pt~UfspoF!DmO9DKoYgQ?WDkqZ1n3RhK)|DbazoAxF83#d4F!nou@c8@yYi0xQ9}
z@yJePlCDHp6vsqtJ2+ciNPvh_hKM*G@+$pC36Dd%-{>Ms3IQd4<VmURfffXAO%u4H
zc4J3M)^A%th1z~C{bqNfu1^daPeL2t(A4~X<kub`;b;arMbnBed1X??^#jE>oBBMO
zQwzpJ>TUo`w`{X_@y15erRd_}uK30X#0eS)U1PTSf>@9SQQ7N)_^i7@tVqX%{!>2|
z-PizqvIsgm`o3um>?s$RZcb63;#1E$IY)Xl+w%S%RW~)q1VCBC6>=CAAu;iL>ko2<
zZ+mI?c$rgd5OAO1R%>nQug{qxldad6tG_;e{j7!9#vJ=uzXuinoKMVppRwI>j*Cxv
zGx#G>)*V@ZK33>G-90Zo(F81bhSKm21pIqJI+)8ZKnqAJpkzD);*KE={WBh`AdF>l
z5C%vPYxzHr@XUFO5K=r!9lj`~KMzvse8AN(4v<ZiTJBVwa}GZ`+u7=5Hc-G0R9~h0
zE&^l|oIW;e6s$v0nFoi6)Noj9IBZFzjAa1h<wKq2;qK|hKlHQsrKp>7c&F^@4)`@W
z00v~n^K}kPY;3(Dq<XM=r!AwW$A{AFjX(lITTe-yiGV3R^T-V3a?XIMRAd9L4*99e
z#XCOw$@K$t12q2(+6v)~SD-~Cdtc<KO*|mhGnIv1h^e4S)ejQA-M!;l5JxANa|$1{
z5GDq@h&eCm(tW#J+U+-=jHt9)`|UOc$Z?szLvuJd)C}}*4~sci6@{=M73g0>{c?^T
z<KLwFTx#k7u7d7>&m$o&IufYS^`HZAxB2pwwE+_-&IDGu0Lv0;z%Pei2k;Raom%I$
zxV_Eex+1k|xtY=(($hDMv_o1}SWXuLdCwF+F$PTGqL-tt=&d4y=#WUbCWHuW>soAd
zMUdJE<~$S#RwV7~xvu;$?YjR|?c50mt79pMyKmTcoq^C9Vg%U!1z35Bk5&B<)5uvl
zDU0-NWTRNI84e<xkbW+4Zo7|nR85e&nNlCGOM5_N)^CZOO8f?@mbcepY|hHcgZ_2(
z<$pN7KT3h=2OM27%!YnED*;UJqE1g80Sh{05a8YyYE@c~UPyk`5P*WQ+D)q81sDmz
z05?CLlJAsNS7m?H%J~1D!5#vB3J?ldW#WyMoVa$CA=?g_g1&&RUB~v8pzd~h67E(Z
zxgbd-_gT-ONcl30AwOi^A`9yuJ^IMU*d2FAmSgv<AU|aL*By5!lK0F3^BxE^3^?ON
zy6r5GW?eHRe?-ko)AZISqTOyjhZZ86e$n}5MnNXW=fZYIe&hn(ULr?rd;Zy#yh!{Z
z1#l1PxsZ5AGCp<rxCOJP_<b;I>BCAFU6Ro!J?(M>F=s)*f#$VlB`SgNH4R|9<AF;>
zAslLTFk9^o*c+|t@pztZZ(r*_-Ku+bnAOs(s`sPM*6SfusxvS<)>>eT5!9SKNCu18
zQI>Doe%_cxraAmQ!3Jqk71zc`Nw%Db1D#uKasBTt?9$W8SqAal#5%C$9|-of1e<eQ
zKW<neYKCvQG%tQ#S<2mIC5A9$Deupot&cjJ(?Dc%6=RPg-z^>j+DS`$?beZ;lf`(3
z#5dZ{DVLnb<e8W-Gw9SleF_9@xrA?<0Sm5Ihb}?r-RTWafK%D`*_isZq{(aR;9BL+
zLpz`^nl5soMb(=<sHJ?U!1b6G>^E1`Bj}3L?;c;Q*iaKyRLxWq6M5?bqQxZGY055D
z(eCDJslly%qwOC)BMsQ^q46Igd+fN}FOGIvTA5pn5?BD~x<i>Xu%BkFGlteCO9WD*
z?$lH!bO@6=aday@7q@$y=Tj;N8eI0^Yk*M}>!H`rbaHL;D!^a1?kFKX9@_i#=r-%-
z+^;48x}PX)UF@k|s_pR;UB!5Jh!V4%PIk$Sw}6EEdF6+!)jbA%OZW?rUU^T3<wc?3
zx4xbML~Gq6A+>v8vDfcRxE$O!?Y>C%e_GV|*AUMLRUZz@D~hY7Gr9LdUJK03=J|y_
zZCa4KK`_|#7ob~S)16n(Y%S-(D8cz)iV>xyqM{Nk9@^1JD{;9HxxFAzBaprTct~fA
zkWwB^uiVoPSUY0)e@*G(0VM|=Ct}s;VcLZdI@n<>`k@gm{papf<%#KEGPK#Fu~vqZ
zJo>JNG<(*#q6ZMX=Ad%^6Q04nNgw2ln1Zi#(fRgjLKvqnm|y!10T(UcCd5j2?9oYD
z&Fo<xqSKRb>{*~c+k}@pIsK%2AHrat1_Z{KiF5;|Of5xbOB_`j4&`RH06(bcDDkXo
z7Z%sftF`F0r!6b$hRHvFV&KkvJI}hvi-61mOdgxYnmmaA6gt*`ucN(GEZh)cReV6S
zLVFLj;R&viYQZikL*5%un-9?8`-(VkZliu=(gBA6fx3QHSnNoR91tZ42bO;nl}HFA
z9&lk%U$B+-w`1R`{mnytEg#ra$oNT^&3#b<-S1%qdNr6M=nS|bO7zav+C|@`OIyFq
zdwbG)Ng?RY&QHZ*g2`lv-S(JvdTF*~=UX>>Anh$-t1g4%H1uEfINCovm8`)+`K(v^
zubi<L;j8m98(mpwybUTpht`W6b3cb{I{1}(+79PtmzLcI**wcPm}3A8nnDMkPKfgQ
z2mom2Q*294zgwK=lPbr?3zSzpR%*udA5W8l^{;OC%A|TPnGIz7s7p>hgL=7(FsdDG
zAW=3?-}2#rpNB~H{!(k1L><=r_p+~I{{|y7XKZ5wqly5Z-q+UQ0<&O^ZT<E6<2W}2
zfd&^PYo2jovVL7ynrpd_dUbTRg9+&;3*YwLEc}+}^dEP|Ut@RvL-G17z!kR+uoDA;
zT5l)Hjsc_An!6tc>@b9H+NkI5c)_cIq-=bU`*dL|kQ#pVL_@qkYe_|j53o3BbL49_
zSA<yYi@Wu@vEy(dh?9+yp<M9;znKe%gzP5E(J7X~!X^I;QYF8jcS}`32R0{hMMgRi
z{}?fM9k!@Ua|;vtDQqpXAruDttMF4IRL}CsUQJ0=D9gy~LYa2Ni!I?QYrfL&$=7>V
zIimyN+X`v}4ENaW76q;6>%e!H-B-`A4i~-x=5~0TW`k|F7b|J0Q6i7-sSZ7479$5S
z&ANeQ6GgLb8C;Kc!Rlj|NXPYRr7|jP8W~%&CuCOMgqPH}#_3f(8EAj9iNEKEEdl5=
zgp?bf>=Rtl&sv_3@6SIB_QjE~s9do{3EMfMCad4{dG|mo$572OL^6BtF&zD$;`P;Y
zHULgVf@g{3UO)E}Fj`1o{Y|nIS2+(jjz=e_@Yqpp4yCwt-QR3wP^-HgEm8u;&Z5p=
zLj?`pn(y3Jd>$i@k7~0C7q?tF_B+i22tZAX9eYG4;-Im)`n>#|2ACAmuXEH1BM@zH
z%8cHaRq26AX;YH=Qw||m0`=h$qJdFduqtJvlTKv5bgeQ%l{a<f>ZIQJGxBjApi@3f
za|8lcM2x(SZ-ev-sTo@6ISBiZpH^-S@9Slu^&kA*K3#4Gh|2i{mGof#_copg5wg=g
zHp$M9mJ+DU)n-j12S%$^n>b5OC}AQxCD>^qIyU6~Wi=;0BK}KA+ZIC$WBt_^pceCq
zDbTer(Gt25lRpM=6ZaN_6WY-T*y@EJXV?)S$MnWfv`(A3dHhq7;+u4c*$(fJ1Emrd
zJUe~Au-|{OGYr(P_{bho0Z5=fG1nMZ!{G;adAE#I$UsXeiBzG$$P8e}28D;JhCO=Z
zfE+%Hf$7G6W*@6vWg*V7^O?F1;Q83y-TeYM(SWgdl!EsvG1IG87EcoOzZY|+F_v9H
zSIE;rQ9LH3wB9{(Z~bG3TCTP}ZhB#_^qjFFd6TzM1goQj{y0=dUq%95#;G_V72B-|
zQKKHCfy}ukM3C*d{I!vqPz}t-?odQ|g4MazX_{(}J><_WC%<~Ie8*dSLWUoFOC)dN
zn!FmZTe*WmE!J4@Jzyo&dwmv}zv&!Jb#{IeXg9_KC&6N0oEN*vpkM7c3THgkG9ppZ
zGOl0M2H^Ia_#92djuyQBx-{x*uXR=jyh_n({?_LR7+%*!#n`yg&I=S-7uwm}B6r9S
z_i<xzBF!%hdvS5=au&_pcVZ&j=o<Z>7T_psj_g0s{FmcPe9j*&vz5qg7Y91VpnDAe
z5YWqaLutq~6LZ7ssm`{e?CrM@h@-5^fe>ubjii(R=EYJmo=)Ag642l{m#f=ZOHatF
zT(Gz<45=fCtBurb*Q3LPsJjRRJUW>@xoTk~#}Sra^+@eM^k(pmQ16|lf0vg>^e^_S
zs*juD?kFqIejRXyQA=J&-$i0IZ5alqG^vAl{{*~#`r1X{GvM*t`gnGrTlrxcKtz*Z
zg%@WE+Ox+(Au7yfYENjQ&LQ8)J-D06fcA>@_E%S;SP;=o`I6zYfDk$r2V>{=&WixM
z*;!CW3XYX)kFhf-JW^6pbqWCR)bzPfpNWDNHl_4ABm-Xm5#;MP9dq38oKKr;kTq;4
z>`>f`SXO?F(>AGg_#tV8AFtR)f*!G!fjd5a#G+C)4oaXiq;n*8{FRB`5tQl3W9Fr3
z@M7hPIY<~K6T`m@Nn>u}iM<~3UHhH2)V@j!Bv{}WkfX^+gfm>47o_bpx!u@&4HZAu
zw6gSDYR)>?85D)Cx8Z{xK$+GTyYc&T`LuSwGzM^?Z6fJlrH`jK_JP$Mg>)>7{G!z5
zECKhX@&=yf|H(t+>u5Ue7KA6duTI)MElH$or~W*{0NulPSiT2>)VO_=FzBn=8_6rs
zk7h94W&y59nUJBv`~^J&%Wo~ZM@6g;)<_laTWb*Pg0mS7#4%IfgeFa-zFwZnIa!j5
zUiq~qz+gKwABscQe<)GfK8UgGuuQ+yuPXmcYVYX$z9Ofh{Z95jHd_Ao#>SR@L(EJ}
zpP%6Omlj<$8dylzMV+tXjer###;}(ebEowe05xG6h;&e|`b<_EgPbqyBmJCDE}-$f
zT|XZ(R}{L5p3YufTzyHkbm3kESeu&@=fw;_FGF&yHT!{e2U^qprGYFa{@u4QSSqo`
zmdrNBZ{NEGDd20KPtSjfJ#DEk3B9%X*`Q<#IP~erE<Giv>&figZTa&}UW*;e+@&TC
zq8|~1e4~zi$wEM8wGKAAM2EdTzG3-e&|LL(x}w6S@1=K%7?#3Ck{RWBbzCUmjg)vU
zOqF%#&+9)M>5ZfL03iT<;9Bvc)!(NtW-1~Ub{@(AFZ#>YLK3R$%I#lOe9H)Y*uWE*
zbM5G3$vzg~b}bRu^z}2Fh|=X}@&m8BKs1F(JqmqacN%!Wu`EYv?nYw2+qdDdiv^8w
z&!r?K|A@F;(Lx+Qyk+7b>1!})ZN_}5dF9D5bEI&y(sVYA0s_jCW7tFu;3wOA(o0PM
z(r9#jQ)3scf5qW>{@HnN@{N#~(^u-Y&!9_gRUD*Zr*B{WzWk1-N8=4y5(On8T~l;C
zWs}2>Ew#Oz;t4x`E`!0jX~>U5%mh+au@@FiHxbhsq+V2qa&ygLFp5`&Wwq1{i<7qr
zY3fR<K3F9Bksn{&vpfTa*iTsT;6VG|r{hQB;;S<G_B&;&>)#5#fjvEv-dBxFXdn_&
z(lx+Cz6&tNjQ+exCFo8lm-xC}=xRQwGnAn7Oc1bZ7dpO+Td3)m@deq~xZhVhqtUuG
zU9#<zdxD}->L}VOK;eXomF<tzDXkWzEcyTlRB5<euDq}HE=?X3Cj5Tu%;U*U!r*V|
z`9cb;4{s#7$~Ylsy8!Dug_}a3KtVkLplR6tk1Rhqo>h%7<3^l$DZ??TaP@~(shF-V
zC1CD*0=TxWBJ4^XOl^T%AohTZ{2E|s3w3aKySuw<e^5R3K4EUhZPZk{otrh@<I^aB
zCij0%f8oUjv8Eh<8rf-V#E*(d#9*#}0%SxO3B6hrj8`x9Yr~&(`L;StQg1||@h9QC
zdrQ)rcYqu-Qk$cmsJcLd_JfDPMt{O+2^rA2h5$yXHD}nFc1tbETvpFPnWd%pfaj~M
zMGr+aR$C|NBkD0}uO^c`fMmm)=+Y_76RNY-%WU@?o&%UsAfV8S7Dy4xV*9zR*523V
z{`iCxEawYjV)LH=sUXg=bfj2*Qdbuy>OaTw>E~;}X_g=1emz&mk?v#T;^Oj&b0eRo
zLpxit<qPulOaH65<Hf3yt7dMjBdJ&4hSBXrf(i83kPuRx-J#elQQx@Ixv0jAo%REL
z3240beY?T@)==ldS5o>rDg?{k#;<LpYOp$MvIJly%1xit%rfkP;ugKigbR3%Lt17Z
zC7=h|E#4l^^RXyn`&RnCe5!t=FZ<u@SRWr&w7_5-@0o&0$D9}wVn+OwJr9BZ;0wI)
zz1t7gm9c|@6qk4VG(f_#AE10CPnQRspFB|#6nc8xIdZSysWo0#hugd)*bMg#2JE+r
zALqRYmG<f+fD>G8ILH0cWu$U40_QaqV~iD~8rwHE>W&CpKPhjd&43v*-U~xA7<@86
z8tz;#?7t82ThgA;cCBPfBQ(;;mhO9xsT~*~N&|Di<YmR>M}`k8P^#d5MSE`&<IqlK
z4|RaXli8Dqz3(uByr-c>GKuRVth5vDOLumg@bUATZ>asqxKN$0ty{Z$=aKH~t#DC)
zBosNV*6MQTMWhf#bfl<%M78VNb14LaF^8=+tUPzm>b;G{+zjzzD>S2%io#u;C_3}2
z+dQaUIs{}RE>UQDkiu8H7x>HqJRz<ajbaIQiDCIK>!P@CD#(2tZ5%!oXnv2~_d68e
ze6+r!f<hCZx)$tTxIL|@pb^NG*5w%)mfZ+b^y^7&yO6z2+pYZu)|R`4BlNWb<)2?F
z-oXovtJ>xiH`yTYKpQHKdllnrz52tVz_Xwiw|lufX#-;)fd8XklR10mT0~tLDJS?B
z556>D;^t?{DFRjs;Yj&@h(+sn>?N?%uy65EA_XwLC49Ol^Xr~a*N@a~bamnPn<~|<
z15CY7`dP}H0osk9bVP{3t`TW`Bh^$PX}^OG{@IDroAA5S#9hK(3o_+yZ&W|raRJaU
zAyXt^RiCx)hAW0%zvJp*9;V|yBL=HNq>ho++?HC{k8(>j9-8H=a{)K?y2FM&d%y-A
z1(fc4Ymw@)`Te?2N;vR$9Ha4{OfisuiFU2g$!fPd;BG&w>jzX(nfk4j55FZzEVyx+
zpwMRuD$#h0ghhJV>5YXToTziDSKImnPWk|_yH%GQ^9tJcJf(gi{v5nU_cWg8i(|dX
z2q}bOlLZ;{2DT7yHlrW9)`ou1C|m*%LCh(aw{C~?%hf;AJ$GY_4%<tcFST^++tCc!
zqVp}w0TJ*7iR!{mFXV3(#Z~Hc$<Ny##%_E5NdpeR-(kOfMZBBBO^lQCmh(>r>(kCP
zcgjr|j9KN+97VW#XVa*$Nct#|nQtLpmDy0o{mq#JV9?y=z|SVm7ZrrV)<k%=HPYKF
zd|AO!8pCvJeYi}SzSZ=?-wJg7^S21v@)k%>JdfH;A7l*je%>~-Gv$lD{4&^{7Xv&&
zWFFkQCMGczzZONLplgOZRSpt^Rzm|$+S^Vo_934!FUt#ZtT$gm3N_$D4|q-36%9dd
zMysRQF?STN;ei)NOVm8`_9&Z!--BEL8&tr$+5JeU40XIrUj&zo0~N4N78M-E7zztF
zJoDqzK1(J>v8VQz0~Mp#v-<P!C)Z->wO{$IT-c-#EIWcwK!fOCo1iMMM+wZ|zmi+B
zcW^E?OIPr1q`0Do6w(NQ&M`nzE(sHZ@FCw=ap?658F&I+qM4fCs8*_Ujo<0r)jK%6
zd(9z&oC`Z!GIDn}mrymqvG#Kvj-G=XkAKB>U7c5X!cM&a$Q!qf?Y%Z7cp@;fZI78d
zaqUa#*G!2ZCf`p{UPNHkm{H$9&!e}hXld+rS6>(#RJQ`6HMG4$4AyZ=9JG)@Y;?%g
z%%D6Jy7J0A;EETNq0p<3swiD`nFcDA?#)29Z|ZgdD@9sL*9a;_-N6iU-cIZO@4*J<
zHsW$}MH7R8*$;{<)|Ed}VEK-w!)}Vxhp{Pq+3!C+S@7{p(5Q9;O=E?}nVI!m&6~Y>
z6OORN=QTbrnI-vfnx3q?qMtkbKc2ojkjnRs`$3$H?7c@KTe4S*RFW?dvPUR;AN!zk
zY%($<A(556_sA}BY{$qR$KJg6>G!_xzs2Lault&xYup#UT$jFIL1ryex`b&9p>MOt
zoAt8RNOqW3ME=>ba09Ih<mGJ)_3rD&OoY)*-bzQ0B?XQdVs2wPr~imaxKL53+<QRY
z5#(z3UCn{9TJHOlwrrxXNmR0!wK=#=_)>DzRk1ffj;q)53q)T3zM1CIb2~}FPlh$%
zeCJMaJnux0K3X1yoE4t;F5|uPrM-e&^G3d-?Ycb)?0tZ0LYzZV09gcX@y7U$`SB4q
zXFiEzH1jx5M17?Csq;Jk0blinXQJD}p~x&71RHV<$KY|-P1ZcgE;;(7Cpr1mo0XFg
zq^_=>B<;Gy;d;0+9;{zxWw!b|r^R-=;fNJ0Z$4W!U+rwU!)je<;i`#nlhvDa6q?3b
zQ5Mv2@%?mTs-g@<*5+58YA{A`GBndG&U^;-vxAcVD8nz?lom1+K1zL!IRp`h=4d~e
zwq-_Pw!D_S^<<CAH3<0T*0qrW90;2WudR{FFPwhz*=h;In^~sD>fhqexZv$+@YMEL
zWBS$6v-oI0fG7P9nzKmKbJ974fP$va`EPmOBLX*t;old^mlv5IiwxqEQb^7kfvx6b
z&|qxx-1IBC6=O;q!`E1{*y&o_Es=rDd&x^K)&*l^(jDs&jJl>V&4)=Wtk<sl1m|>J
z{0U$qvJ-#4gw~6rSu&^^yk9PAJ-|HW+{IG8_(3g58dw0uMHx;RZ6F~Uj62IR=_56R
z^gGYFi{2sM#N4;GG=Dq6$8mv7)&K8u>qF{*bTwK{S$jnJuapHf*#hfM(z#FsFo_8^
zz3AAs{+-x@7y7cXPiUT>j|HB$zA(-=0-+t@{O1QDth*QBdHbxwexK%@_~*|EjU~Y!
zRJ?FQ^54v7{VRY`uxXdXJ$AxDvBJ<27Uu^1{A-3>^<DXFxELXXJd_9>OCaX-i}*Wp
zpqIqQFZE0>T`mQb6C8ZWrK^Sem=2tL{KlEX7cTGiolyX@Pj{X5h^F}o$Kj$a8-o?e
zk-)R3gZ?)qDKu#wb9&h!SA&VtWVX~eW<uVyhtVY8Sc;5{4Dr3HKpEpfPd~}k7@fTj
z#1kWPDt=kP*G@yJgT1R|9FbXsa7b00<fKEC6hZ?JJ`T5s)tkT4dlrJioo9vE@Q29m
zc|ue;H-VwTINHooRa1+?zpBygCKS6|2`JO3BhZogdG9Zt&GA1xZ{G`bMZNV^<je}=
zx<{t?qI5WmgQg(Eip0lFCKj2;D4i6~u)=8YTH~2Ol3kQhHCDoJeQ5ZD-p0tEEXGYX
z7@K5BZ##k)*V(hCfKsXBili2`L+2#T#!%BWCvHUYYB4{WhT9Xbnr<^Z<vGq<_ea0R
zp-U1+l&!?<qvC=O#9v1C%gFUV&xEi-2<<zxFNLQFL-D`j*&KEityP#!ha>Y^lP?Bz
zCmw&B6(eZ+5f_K#WmL}oDC#@&<hOFGvytDZ@9jp{?PvTo-*RuTee$w_Z_hMrHZIo+
zU7jy1;z6Ae48yOZa&vQ?XjQde0UGfUl2BUUA^wCn{K9=37vprg&V!jCO6qt_*DP(*
zl#0q#fG%w!OmIYm8XD>AyL9~Re6OBkJUS-aIP34*Ru(_s>wZqCNUX_C6h`b`x>!`=
zFwZL_(IxD=JVn=93lv%VuH)44r${+->d1~?A{lF(ocU7ujCTH7-7-wlJT-9>>9Jp$
z1qUxo5B-^HzE!3>wGt}XRoX&`1b*H5=0H3M@#~9f)!C=nk8}`Nw?#Qm6q>JELtGDG
z?jp?YDP0J&JvAv~kEii!jOcqdr#n|63a2m@oxm?)Xl{b42dbBzja^tL{fPfc=}(*W
z#4Vn!K48r3GY$N+ccAF$GaHZ|<%>S2B%Z7|^j2^dBGco_N|}eJdYr>EBGZV@3#5&`
zhxga*7r9d;1c!BAZ%x&VRSll$R_5g3S4}Uml-+fhk^-q*;k3J~r<FtuoBJP4aQn6S
znMb7cGqre-FQsw8`;R#Fuwv^Ce$30e0HL}Ehq>7iI?Fplt`R#tkedhNswa-!)2;{5
z)9cPg9eKGK@48b^T@l|TySf@Ky=?>;p>tr`c9fA=VsFciff4q+Cbqo%!qIoZ=l8UQ
z@stJs<}gb7pTqaJw=eiX#qj0R<U9Bo=Zic5M72hP+!_Zm^!l3+Vp!$!Dz{)b`*9rU
ziNY_XHJtL?rZ<OeS4A_WCqiJ))3F?)6mvP4FN`2-lSOPQz&p?-ETK<jk?xT3;2jjc
zQ>v(f@OKrOZz=w?oVIHQFDDL?X}4#uO49zqiug1<d9qT<ffwty=9Bc0DTSto-uUW$
z?X_FH$r(l|9#&dX9!zH(t|%NpB4-%+-I*EYIpf7M@4St}jB+nE?;yGvH)EVCHYi7B
z(G?}XSnIX7guerF(%v$?u-e*vT{%?yn~@RxnJ3O+6j!&RPokN2x&(`JwErp1u<Oy*
zkMk_W+oFSV$GD}{4nkdiAo7YFUSoYt5;ERBj@u=bq0~9q{aBe=G?|BiS(fcna$03}
zg8!;=qvn@~b71JUv;6fiTFRI(AHciEr>LeV1ILDnHc*~iVib5;em$I4uoXyTZ;fGA
zcm8<Kp;DCCJhxY$Wa>B@Y#Res<(3)}Zj)s`hwkF&;hEk>T;XA;5x$Jmx;=yUwKcU$
zWy(J4*=P{7Q*6iHm4FF9?z>)$!p0+1zxsai4P8~nma#gxVwheWXh^tFQmFJ@=MwUR
zIdaY=4OYl|_MW6Z8F=g#gDsN&O9yHn<!I#<6!gk8sgikEa`I{GQp5YZviAgU(z>d1
zD44dNY*flt4^3Q?jqdWD%iM8ZEe?3H+=Sa)9D9+WRO6qh@nuf|{`=>;ve841uU3~|
zzX*r8XJ`|t(q9pyL%5Z-%a}7c_SF7+KiQq^a!`WS{oYMDz664*Z<*;qd5MM*@`bO=
zn?^k<Bo1eDFj7%e8}r<pbv;ICdDdo=;hjRLF=5#qg;y=g5)CVv+N}jk`aBm!P3Bk#
zJoUV%SPoCw+;f=_COA@r%^%D9_)&u{ViN)0PqpXn+L&ZTo!eF>b5D0X_9I9UQsiYN
zTvq@-?OCM4)tmLB&*s%T923Rgv0{}6|M7Vd*U|QYufUW@bS^t*mJ9E)Di1FD<LWVl
z*rs;cw1*CJ7ff0&Nj1M@Fzw2R{t*aD)Z(4Jfu@DOo4mxN+?QRwV#Y;3hbrm!ny#UP
z1WsyqtvT{7na<fiJ$3jgQF@b4T}fb!VZsljeI^)%b_!HapiLC=gcZZfBn{%8`(&rG
zaCBvrnxky4cZ#TY-J-9u*F;l*Vx{A3)aGQB#nq*6t)><Y6+Bfs;F{y}6=P@{7fv!m
z(B-ePl!l9Lg1)OS`w})+;ZXk`^MdMSrhK7PsJwad<_Tr}>Ec)P$W|>VpLy}%V%Tz0
z!&^P-SrJDjt(#CMlmrz^777+VOlx3x`d<H$dZN=dY}f>**2=$eDRXh52ubl=G+g0g
zR3R3>KQD_i{yv1{Wlugq$4Z~PkoUhL?5?F;INxE_cn7Z|W7-kEUk`AYj)^-q{~cxT
zC|IuKs)wr$=4a_SSz95O)dqp)uo%E@tXW0nEHuIPBt&;sG@TA=*)!%3w00?8eaVLd
zRAwhc@f=4(Zs*#>#Kg90K|w*AzIFOLY;FUTTIFoe?OWIZ3?qVwBlB)xs%IRNhPEJ#
zIHaiTZ%@7s$>ExwDivqMTt0!0Nn8|f9J<qMWHYQq8fH9h8ilP)+%N`_iLqUKli>X6
zY#Tr3w8oAWE(y`6M)@p@nhaf1y)Bs(E5|*Ss@EV~!yzGXx{07+=@SIPr4f}TfYIU(
zO%7hV!8Aj*{*Vv;oVp8ubUd?UpjS8liGk5Htb<n;`R>!=SKoy>*2i}(T{>IWzdlpe
z4t>eUxMuO#XOp@;@*-T?L#6B@QdPSgwA9b>o1756C^nv6O{=Vw=u4F(1DR9X%C9dw
zZETn1!7wtR1-@^@ByV+5YjL)mi0wAnFKc_!O9%J5I;MlCiHmPdjOTt2A98lCGEXQ|
zX-j@spNm|Vq~BT15&TPD5FwROI1&kqY!kwq9#y00*-$_0dCvuuUsb$b8H(%s9C`nN
zwQ?{I4f;OWTX!}Pw<NayXR*)2bo<C-ePpYxcDZyhS^}V&Dk=gAjHY54M18&nWLJ}0
zA@)l=xCm^XH~L*agxWJ&c1x-+NfZxTfOGDu5O)0jvVw@t7|t<TY+^Eyqvb`22#LA9
zl?xf-IO1i^R_^O%PD_(sMfAmOrY92>SNlNCJahKGZqVK4b%B!hBp)(_Qu^XaEX6E7
z+6G=1mcFk`RsZ#^@VzdLzaNdHJu$4d?H$zeeWQ3?AFC6CFZz)@t+pXCkzUnfL~r#3
zWRNu$RgOHaS-WNA36aFsX*&pwtN$Ex^<X=v_dC^WXYVUh8{w9*d07jl6a9Xhc)594
z$W19ngG9aoNyPh|Ki)r?2-|gFt8a-;s$gtsELKcn`AUU_h1DBBdSjk?2hbj@jS$aX
z9#)BZ?OOgBsR$S=EiAkdPAA+MDLI1#xCck_)A=90LT&Y4d;gi3%+mC3Q?93`rW$rh
z!?}$0BlW5rs@`5zZT##m2Y6!v!{zj`KV@?&q(Fq8#qkxtI2DFS9vsq&!=MO)l3(yb
z8spii=je*JNwNMHx8UzyJ?FZ^bc+tE&X4o4dm5nAKDYLFs>SxQSF_JACvJ?OOn8cC
zFDW3Af^OI$OHY;2*}6ggA1|IS5#q+)Cxr{7St{Iher`i}U<|Ax{~pedwP6X$+M*=C
z-^S&!ASisIjB&T9?!4c+rIaT$TlK*miz^JI8?R<r4}OBLd=7B}aRIZ|6n;Hxy>*&1
z0ju{4$Nt8upG3Vy7inLHV$*lqtv4Tj+gd#K^wIUVw{c+Aeb07~5qZpSV=^Uv8{r6z
zC9;w|JiC$2azZ&l=c#@h%8=;HX#1RM(oa^$>3VDlvX`ZS-{#Mn#e7`qb>?4^R#GOj
zw1(hG-Rd=j*&GFY-xDa#5sU1;>qr3bgJimQ8SnDGD~ny^jf_m2O)oF5vt5u!JfCLC
zuC9wfzWIQ+K}fKs=bf#`a}s-9fO+DfGPQIIAjzXV;f-F5Mzv_*hFEx+<P4n4`(Q0$
zFU7dQdk!Gl8zL~B1P%I~hV+5mn>c;qozGqSu4b8MXGzhXt5O6Dj>qK^Q26hi1ZW_{
z8Sa$BXC3~Y8#-4=vd+Y?(tKsy5qt3>{ue>9*N=dp6-RVoMPYEwRajq9y!}1>XHHRH
zQHzel0c<R6B?Q`+z{mRs?I^9R@S9C{CX7W-L|XWMd8#bF-sYc~mF~xzUiCP%OX$A^
zuCm$}N4Z+AKrK^(y96wMmMgfW71HifRP6m$6UN_pOGvfbIFNR>+biyon;(2*$ivUP
zcR*dn$7PW3v83gi0Ta$f&jRCKXo;P@fn@WP%}`Aj)c2$-WMN1>J|nOy@CSu4F#%ok
z7l;)G-X7A`G_%%AC~H2WhpyrWYB2eKPY#crAzu`|qJy(hBO7!~TfcUp2QMTQ3a;9d
z!Z(HLr;C=NP*))XXa0tS=qNW|NrbS6$nqDAcT}IotTn8Dx{7GqdJAv+Ud=Y1RBQEC
zc=zStz~SJ1YIpevsd8N5iGUB)ZiI=A4D$`ZWhN4DV9s8LzKQ-Gx0lJsCi&jrYImAp
zJ3a--Y0rDdv7zyWF0bSddSlhI8$B^vpR80yJIqDPE4+OAQ&Lh~`UXUnJIzZ4#0oU_
zIwKWvFmXl3s@;8i440#;-w!Jpb}#~ayBAEp=@ewE=(BYk5_~85`b08!$SSwV7t|&w
z@*;S8d&aZOIPT!L|H61AFHNc)5kM9Z&h&-XD)B_F;Phn0oEdL*ou=O(;{TfEIIG;I
zuMfak8#+;31}hW^w=?=_;p!<yaFsD?#1VAPx*1;A1UUsH2he79Pe{4h)R|oJQTBYb
zi!1iqcXF*?%w3IxL*x`Ad^opYrBcNo)BcN;(BX4^GN1|~PXM00J{Zcma8Rq8%~7)$
zY<dHbSSW%;RswkuJi0qa_YMc$PNh*^dn;e+<g)+!!?eOg8?o6lsF5I3w*Kp|PzWlr
z*)iN(0%1KjGTftYviYAh-4JfE^N(#?i1mI~g3ByBL<SvK?o3obhc8Xim&q`sEbDpc
zfva7R(EYOj4!gCLrjHGvKx&M);;Rip(?27psljth5*uU-w~DCPrY>pbu5yui??Y?K
zzGt^NYozQgvb%27!n5Li0m|}cXu><K!Hy5(k#n*zGL>}CEJ;Ru53w+NH8aleGUR2&
z8=Vm8yf;aL)Vmkc5<|!`dFPl-X1?L;Tr(dm9GL2P0=Ef7n2f_iL!rdnCPk)Zy4`w5
zn;s*xMygG==tijd7SxNbFg>=0<M$b$4>qQ8i;q`)sAdLcMdS&K#an4Gr?wmKk4%<&
zSKV1~ibvi?Ug4dK*INx_ysHxPl&+V!Aygl<r3HDmoM~sWAxyGL?%PR&s|s7JeU=;7
z^xiWjlfUySmY0<j8&dwtY&nxe{TkuU0o8cVybj{3r^^=Y%G$2frBo4SznEx+YF7fs
z+8u?fr+xb$b885Dn<?vKUFCG0Ck&eM-Rpmp<KnscG)JrYWGNK~lJ_}muUY=Yw8r>N
zZ9~P1&Q5Hi%5EjXOGvk}GMo#&S>6BFj>}&*`XraSUZMVZ?6`I^uSf_OoNpn9Uy(n1
z=lLjQoZ8Fqls{DxEx+~gs_|00NHgaD^#aUq;$epObxSYBE`VP|Z?6`c#5)z+*@2KC
z_OFzK)^NtFP&9^lIJ_x(MU&C@JnIG9XD-gLOh1f=WM+|IrC`?-bGG9xp;Eo4%GCN3
z!c?>Y(D12+kFjuAadI)pG5S87o>02ymX=a9o%B0mi)<DhVKm3{bWPYs*(^}_Vi}li
z^pnNHb~OAiGO<5+c~JaoXz0Hso#)BtWaQ=OTKeX}AAONH)t&UhJ+VHt2$NSQ{%p`y
zOw>iKq39tF{Km|<?gh>tuIJT4buM&p97np<P|Sq*)cdJAq!Ii|<r4aP8;n8dgo>Xr
z&C*c5G`nZSLbmhiKCSATjXYh@34U-Y=C;=rTva6KrmHOb;e*9pn_YInf4K?&J7XHR
zdW!x7Dd$AF-AxY*e9vty8_=QE1VL7VpCWy>8|Zoy1>450Ga^H&c;^2+*XTgE7=Nr2
zG^j);TYqZ#oud|P3!G$R)r>c>W5dCVuO}L^o8?Ym%i{1L09`NXn|&cBnPeX>gxTt`
z5mYnaSxr2HV`CtD{0R@uYWXJiXntrkw+(t4qI+{-^spRuCso(T&AI;vKT$oRD(+}@
zZqrGgxcM%;&NUiwMCK)4|9s`sqX3qblvk9R`>S^qDQ%2E>O&ztN@mnC{CPSAU_Rg}
zY~KirvWlkQ;UG7ntvg&<jNDuok91foK4=|KsWrK7nS5X5Tx-?^9blv;Cbe#_>&zWg
zw;GO&r@(>rmjw(ezpqqie)J(QHuxP1G0tsfT`(h5(e@<nP{do*fP1C$^sDY^t8!UH
z739lk{Ml2u-l$o%jsG%*&CUqba^MUp!Z2<77i_pCv@=mg&9=9laS<8Wdz|uL)h07M
zbOKSH&`f|=wA+phGVjUled>U!;QaT;r1z?D?=VB=YYs%)K-p-X4OvEbeEjg{iMg3?
z)8sBU*U>ph94K^x-&^)Rkl6iGkwZJy{Xkj!8om<;f(ApB8;KeC*0ZDlUsiin#+&ZL
zhnW4FbjHoTz7+TgTFPzu@j4illd0zJ9td{ITPCMhh(=Dcb+SCG^>6u$h&t-}sdq6T
z0{S7S@o_h;BEq()2%)nf@7g3`sh3&`oLO%$1I>Yjpda_c-o~r~Tw_aLxufoEtFF$Q
zP<vbgPl~dc4JTqy^oS9f#dA@(Rmo%=FwKKwxjyHNFQZuShNb?&m_GpT93>3U?zdKU
zA0YHW;Wz(aG*7d^nSFTS{N5L;XJp1LA0srMylln=g(Cr)*YW#4j)8}_xj!z{e&xTz
zJ;SZ{qq=;Af<h%4H>##%qZ(yW^?TX*M5D`kUGTB?k5Y>+j|0lQUHf;aTr*CD+T3Qn
zJf*ShTW*Lo7)4waqfzk^=V>5H)l&lD3XveH430VAo91Qm?gf~M4p!n~nl?Mgx>fe6
z`mon0Jd6Pp5QKVP*<0GIrmVxC_{3eTOZB@xm6oF8#ecW{1n8emzutc53KEH)<z{(N
zo5+RDH@qpt)?t<sZ_clWDt|nb08>LmsUf8DJ<Mvceym?_(jJa&?|y#*Fg>E;B!i8(
zmxbWbbd({yW3KCoAxdqvI1B{<8-Gmx8XJKK<Glx`2hpA*LC8GscCFhB&P1Cl*VNY&
z0ahs6>kR(vlN`<m++r&mcNeE92~`c{+t`TSHgJLx=IykCC;iU9RLI&#YXk$TN?8Gl
zC}*UDX1RuTfW-FFu1p{yjV@J4kE%5VnKzL=gt}tZ;NWko?)ZsPJmqlU;Q~z%EwCW<
zD$+2aTWJw-JT(tf#d#8Zzx=5HypP4r5PwKU7iY04+MpoZY|6EorG-)fp>^A8kk7L~
z)H>(vybv^H*FO8BmXR~xN-3NG=ledNtlkszjC~9I<31*eSk9HYf-Fbc)K2x)yRP-e
ziF>1oKLj|lu7hF|srfAbt-$M-!_2Y{lV6`0Q3H{Wa@j_++%TO}D!yQC=7bb`T&BID
zfIv^&nZLl*n>t=!=gNA+Db+_t1E2OdB@9)Cg@-#b3SSIitIwRgyvprbKk8Nlf;6nn
z8yd>F!52d;pN7ldl`5<0b<S1v9PW$MU!v3(1qB~|FVKH}Lb`WSOr_~XTu+Knjo7&Z
zE#rU?ewH*-sQ19Lg&%|443@%a-k}(QD5ePyyzgEwZ`wQ;mGpnl7)|!zfUI&`Nts%y
z3l^JAB)xNN%7(#HO`HAr1HdhBG-oGj%l<H{QCiEJSqLiE+>G;J%PLQg&P$0eYxdzp
zSp43p!-SQe5m(Qg+br3Y0NJa_^W~tjNVquPij6^MA6F&%FEjhU1+lVyZ>G|8zhXn0
zw$bfE+n}<E!>tw*HDD5`^@*gGUQD(aRMDQ_T#s*WJ@!YPy9-RLT5^UzjAYdLb%M-)
z404W-^gBAd->ZosgGjjHYA;6?BY9dtZj7frkFHWrG`?P+WUsRJI_X`B!>}s+CPq=4
z^$Br_-A0!)x5_0>0A6}^$IRs{jYZ>GGi4-GB=qBv$^G}gZ<FcEjvzDE&}TJ7TxSu-
z4|0S<kZ+nT70Fc}j2#HO20uD@bp}ekS=^&3rzN7k&s>_CxWJ6hO@Fta(uOrX^!A%>
ztU%OW03y2>cA_X<5BPSx0rq^BnsQ&>&&WcL(aN7Qi`Pl{l)lZ(s1ghd^2KV2Us;*x
zTc(hm2Hp$Mng~N8^C&?mZ#z?vG|eo^H3RZ0WM0qfvss2MQ0Gbb4g2v$w%ljH{_%X8
z^(Lrshp{H~J%52a<#^k^AV*GFId%d0hp8=VVuW|7Kia6vt9DTZtQ_e8wNK9q3eR=)
znFFji`IK=-4STr!@mdP5zVyq{090h1?}?Ip-*~`B<eOAnQtD-T;e$;#7t%NfJ*Ohk
z@7r!*Z&1SX*GG4iHJNCy{pLbGAJgB>LK0=>kJWpLNjT0#*iTlzN>6=y>(_5{FB4MD
zNM7qe)YP=cQwmh7ysrtbv!Jr}-!%h+e%$XDm(>@un~o7L^anLSybO#@2Ej_`r5;Uh
z*iW&YT6|UBea!`Kuy9YgLhaz0MS1bCS2_>*z0~tqVtG?D9c3@jwIXdbkQNFGp!2|^
zuR0A>+D|%-=;)gL&VDTQH~zVZ->IA2<?+HR<J+3$fSq;C$SadT6cM7P^Z4`cj}Meb
zHtyyBvis!}w0Z6>%3wyKIynGH5hs#wnwEP1u4B=8ek)|?vij&G=Q~&tm5+UTrj6N_
zA^@iGR8Dk&S+bm4GND!|%l8|fL*1qXbnp3dDnO7|cN&NeO#$MfS9{kr`zP?sA)qLV
z1|`YclP^QFiqi0BPP)s@j_)EuVSb7R;qQyt%ho;Fs=>^JOJ0Gam?uW4G5~g@XJJ|}
zc#}f&=56xl=-y<y{Us2)pEu+g-mdvW-*{)<u}(<H-47e7Q#wjbGV`o2c+#aj(E8?~
zF{t3WezN@$OIjfScnWlVre%a1_O<?ujIi8U{=cQs&RuMQc6ae-%h6W--ZQ(|#s;}?
z?yzc5Zv*AZ33^2snr+BGq_d?K=h*+W_edIgyk5YSmCu<!9XYr7jEB|_k8mcP*Qxs8
z9F(qqc>l>e1ar%~rlmE1L}!*m2YfIs<KHL~K?1Kok9M=D-a(4n5;+#5yZ^AWNj}j`
zmfvZoQj&9D`}3eN<4KOw)y0f)@}y%Ei|bNf3ybGepqfz4%_Ok^1-3<w9#x=BkP{5?
zx3humT8ZF=_ZQLaC(sqKDIKDivG|JnLWV-~MgHy%`=P(*SU;KXShNZzdlS&5`FrTM
zOQPtMf^XY<-LQV{Fhc(g<auNEJD{OSd@nEb5NBb1q7w9vFjZ2T`e2ObCNhMS#k>0m
zbi;%Lpbu)k{WXoU-hmdL;eWbHuKP$^e!k|bUIMNY0pcr^7VlrE*r$3b=jraWNeK<(
zV6weAdmgL2KaGYV%{{M6O5tYt`>vEdR93EN?}+Ub(?26_@NGTV>uPWJnYbV52{Ge9
zDK5un3CK6&Hx->|ifQBSA<%@xx(Q!jXzCa0m2x7Pn3%{;E^Uh&2%sc6FPFN*8+b5M
zl6jp1_$P7qeAebqZs)2{S*?>`%{~m{1&QHA;Go(3PjuPKYCco{6~f@oJnoLe0bL~N
zkV}KJ2F|fAr1<bqp+Q+0C-9I=rdjGuz;ct#5S4np378VEP`g<cth+D!&d}S%yhXIA
zpxAw%uyMEClQZ88mzl0TiuSC^XKC9$!BfqMN|QtRhx=mR#{aL1ny|IYdTf+5iR9n9
z+y<`^IxgAbB9?zS)8X5$3weeUWDujRp<28o0<;hGi2ziWSs>$gRpFkr^%~3p*JwRM
z^Vli(1)l4Ezr0NPphq9F6Ml?%-qeh>mw6PXuBE8lDfG9Z;7ug~oj*#T{aPn0gDtOn
zHmvX028@*XQeFL(xbHEBeWuRSv2MGjC|vRCWDr7#T6DUleEIh6+weAMp&)6t;C*mW
zQNTZC4{{N?k&botEWWIJzFZ>h@SkfA@9-Q7#%(Eud2)9xKnH?8QM&~0l})|&f0{2c
zXGvUcFNLEYzpE}<A29G3jxZXfeWFZlwqv=wX)b(#Cpmf;mGhVU@87pn&ziCQ2=GnD
z&PXOYUq{ecDCN}b^Plzp%CF6$y|Z21<`|9#_o&UfIQPt^U7<^yX4<zUp%n$#CZ|y>
z3}?ADE<e=Z{Q0jz#6BMWOM&HEoMG|(58mHRwLm$~2#9p}DBV1r<d#f7b7fiwLDH>*
zLis2DgZcsY^wBv#QY7pd{Xxek4zx6o9&U26rn@p)$n^5%OQ%WuDjWz972+^mTT$n*
zJdm#B`$tnX!Ldd8(61Ru1xdVf=c0v&=B+(?B78r0cDR;HxA2GITX)#Wg&)gGx`!+1
zLkSN{`kK4JQ0njZ+0jtrAXtXyFezOJgeD&wCv`Xb<@xJ495)x9Q)s_f=!#YaQ<pni
zb=&4(BrfUBE21d5-ADBYqXv&|#X$)E;`-f~^%q5k4DE5Z)MXaWlqt;py?6YRB-ip;
z0WUsl#)h`sE9vw0@1{vU*TTHsQC1#NRv{I8-@zP4TkbX%$RY<Jk=KpSm|O*B<`(d!
zFW2y=`*(uL285(wnzxy|TGBmdLg7=B1}n8fFTU$hP<sx_?L7rJ%wfzrXxX7_r{Z}g
zw|J(lLjWC9B2F+KRh7;BZyT?nKSB!c4maucoH-F}%|6jJY|T#~Pe@9p%Uu<+Q4jEw
zjz069N>Xfr`@P*cb&Nn|NE#nCG457t7-J22e$+jdfRMsGz0DnY?oyG)S$l?!=#dd~
zvU+yTd?LQzx_{VAUsK$U+7Cuil^JY)4@2@!NZgeq6FNvj&$xecD4ZHrF|zxUrwIp3
zf_E;q1K0vihcnQ%Lf%JPk-frA%ydR>njt7d*M9Npr4(BTlK0-{U3U3a-$;tCBsDIE
zIo&^97h6T0LSy4ChH-cxe9n+xIp7*LF(D9vHG9f}8N@#fH7?E(C+UBs;r=#F@&A$<
zt{AcNm%#<K6INTfM~7X9Y>6l7Q`EM;-T#!(*>LsSqpMMOkxV4D0Yow&4H^~Rw`-Le
z7sXf3NsOZ-$^s(DH0KCNnUSEPN>jAXnegOuQPGzPU4rmh@i|U6!zsZRlF$)eQo6;A
zA=C@WneEKb1hOqtXo~kRk5QFPE?cRxiPxQP>%}M4cKz>fepbDPH)1|9UsA26>~>xJ
zOoH~ne^}=NDLVCX!W;QyS?bxqywFGl8^ewfW`f7<fz?M_Dufk82f;<6ec1war=}Ad
zb0zP{+C}4I(nOE8C{dq!U&8C)_{QOcvp+l6FF#i71^w^Na4pWq+|v@qmuUHD3T(+G
z$B1IrDJVFzUJh%wi~HcX4gNcDb~_7yvYF^bKTZPLjW2LO*h^FSRe3<bQeIqcuKA3y
z^6=}~6iL&7r>7o&8P^WCjE|<stU|m-pK{&tbH`Q#f~8>)s0YY@u%6MuOvogKXx+l8
zCq$D#>u7rcDdy%9x2=-oLCv=luykx^>6^lXgEPA&S1p^NzB>D@x9nLdJXUOC9VWyz
z9)|O=4o>=0+?+B=c@YnW(98v4PhIobco*M&pi|L)_%+?*CAqMH)y33C*ofBhc@w>p
zy>5|`&;F-trjL<TBE;#A27NvhSY+QGa(G*1K#%d>P5jbqAYu3Gp0dtnw@$%#`CSO&
zbMUi*3OX!+A@;KUlQ*+z>_o(W|Ie2#w*q2deP}<tCceeH2K9Ov@*D)@EV2Jk(Q)<v
zo1zgrN?@uf(@5ETvU2?2kNX?AE)I9~9NOE|>P<T4NWt0oQekAQ<ZG^E_lnsm-Fojt
zBlFhWXX~ms7<%j3*eb!ZbJ0+p0|w3tdCg3;f{f@{U`ujHXLjaSE}7l?^Ywz@kMX@<
zuZ3^bEMr!_M9=^IXwnJdK%xOrv(~o{j0;AM8nRArv6FfJW&E(V#oK1DfM?2G?{Oo#
z+4dEN7tw`N521B3GjHhh;w<K$r(X0G6m7$R8P?YM<J@QR=LMOb+U%T6F`W!VQE&ko
z4YF=AL<e-k`5PYBD_DC`jkIZ>&wkUha0Tv2^HyhWP(1A={mxGlzs#Tg@{zpSMeFln
z{6)=b!VP~$)IuY;XQhu6pd<GKnI2Pl#Am1ohT(?G!mY6ocAITMiBz=j3G+k!5rd|G
z+W5gGjpKutB)@(x?M7BOE3z;+g3Q>--79ewI6n;|27%<+@^zxdnU)xIVdcxs77%Q?
zNBX0s99m#!w|w>)JNzU5jDSh=agPq8E@u&!#YcA~B<|ll%Xm}Vbm>hV%^-HG_i0$k
z5svSTW=R}oV)RYO8t0f7;SE`TZDNHmgyo7Q5u~jE($Jw%e;j-briC0?_84VFt@D`s
zF6p8Y&vW{*QP#rshp;AE8YZF!WA?~olY*B+TP7f{LCumeOOC!+>4-8-5tTE2rJ{`Q
zz5h!!_;{_LxN~E?Y)<OLZ(qdU*UF?{IN+yZUA`d`Lie|cCms?<ilR9HO1f?;f%uAZ
zZq0y-A8g9I@wqq)I{z;k)Nr3_JtQ{vOd44X)3Cl@f6!OBobW{wo8oA7w41V@R^2a>
zKS)tz%?%TNC4?HG{fLc1y@zI3e}Z<A#Z%WNxneLDe^Cl=5D4wr0=;L%^Pq4ovJLD=
z{Xe{RjwS$yUGx1}3R~_$zr`h?nP4{kxd|O$1I=<zU$<A`Uh+F^DdRze#)_ftAYOL9
z&oS7<b(21Y@RdEs$I8(zt7HqBuV~gd;IC|khd!&OEPy2}bZ&ejQ3^?xQ8X@vk?s^U
zJ#zmQmX?b4KFuQC#6w@H&$1a$z86WhK2A%va9}|UhEyj8VKJN$m0w+C_;2h(HfR0>
zg12XXqz)RH@q?baxA?MjhA<5}m(O{9B3<gwF76wIb8?2=p*bm$7TSl@=t|@IcR=%?
z|L@LPB+=hmyW}S<j0EU1Oj!2#KIG&p<DrS(Zspv-#~90eB0=M&_fbJrEm9<9l-Trr
zWXV_2iRHZSg%(A`-S-+}J!;C-&OVXH4bQCIm4hTV{_CKl<<9*9TBRwVYL{5im-?84
ztYwBTJjZ_+D0Gsf5E*Sg+sA@%*mrla##yT7*HB{fdKWQ7#&P~&l)70XV#gf%%Jm#s
zgeOAKEC-nodI{n$aM&tq+aKcD;6h#Q#A~{Vkzalrh`}02%M$?hH(z_!g1Ny|NeADw
zQ5@1ccedpR$CYVuQq)G1saReg_)Ol-^<q?6`>ohu-$A^O6iUl-|C)&8MS?n0kM4gL
zp3p2pw~ysIdN94uhpc%J@-2J1-V=(ovW(bvSLCQ=oZ^dEze<;a?&W&2eTYIX#X<&5
zdOQD4<AEh>jE`(jo;{-z0$}ZL%hS|wA<&+{b>8fbsZF4vpqZ<jbXfmj`)$4u&q)Ho
zh6jR$DM4rew?tt>C8vQ582IoZuff?0sIyJ>T9J7P7=_S@)KgmvUV@KxM!ws+wH|*T
zcCFN4OzA$@-12F(YG0yjaOUvWv{40^?k1w%K)V}#&BPley;UfRjnRJd)>npf;R0PL
zgc4gPzfBUMbs)uey4M^YE@f7@c#$@<Lnug(fE^zsO0zh}s*ox!ysFQ(CsY>v_8Y1H
z_I8jR^NuwY_xcFd`Q)yHy7~+l*CROfaq5^fij}0>IZe9ae|eyh2oy+Le64)b@m-(d
z?VYi2Rv&w~UBB8_G~D9kRHJSN_@8-st1L#q#F17c0EP%q3vgd*k=vclxFlln1ZzDG
z$e$9Kk1V&<_J25@uWId4SEi=<rne!Y_`=kQ12vj_!9Xe__z6s#ytf<I(j#Wl^{4->
z1yGRxNq_b@8FRJgTes-xM>ks)8sd<7^P!zS*F;M)V{AwI_d~Qhh$R4wNBs)a?p2pR
zC5%WZ{<k9eqz@o_6fIcel>-)_7ZcxhAB@2^Nrbbz=5g=84Jy*{{4eIAQ*{RjT~$)U
zQ|)rrjvC)r%z<rMd?Z*GK$95Bq-z~ze>j^Czwq7LF~gz}*VyqrtwhMZDr0PEj^Bz}
zk{NSm-Nng0E5*Ii?5?n&BrBKQxhQ2Dv?;9+0<O_c032V3zSP0!fnE(u>}P*Nn~cW*
zP2=Wkh?tvc6-s>VpBE-+Ul@waBeL|bk~!Alpz~1OE-Ng454>F<Rx*jc=?!1EsBX1#
z&~-<!g`-gt*dRR7X311-h3mxF!^Qm4hJIU#J6FTN2sC1rcU;`l_M~>pSyK%r=iP9U
z02*=^D=vK5X&xbu?t03UUgx|{TKC_VG0;%lOFg#Km38Xhh^ldVn7nZ7Zljs25inYu
zpPtfcqur@nNR4q=OPV;rQM9o~S!__SdMcm!kw7?a%KC`ZJC`kVY?=j>nRIZUUN?_i
zHbSdBi5^^x$q;_>RQ;tfSgNfvHZ+xXwfzDjx~5Sc`XzeOgaV`re1Ia}-CFy}NfdK<
z_GRxD%VIpcb_f`pK|=RRddQxOdRkw8tSR*0Xl1eS(FacEul>tz`X*m5gVGwtU)^{D
zp~yGa!7WjHxgXds1yZhu*iY<#_-k;@vB-$$B>(ReDEeh5v(%Sr=OZ}ZrqL+#3EU&6
z$YD9WJp1A@xCUx{^5cWdfXeCTrvPx{<<kS8em7MDR}g*4M6dIdWX8&k%mKEh7%9ha
ztdpZS%w;Pd8QJVP;-uNQK@gPmR~(2<BCb_zW#)9<1Y#x;AWF&<SZAs7>3%S7AaT99
zn5R*&Ph-C?@Yaj;ijO)M9B@!ZX@nhX+jal~bT#7n#IV|VzbKMRe2hL<Krj^Cco6o+
z3Htrn^Hc4(<&S#z7^&YdkL3<dV0Gq|Evcd}Qd(i?PkB?4oG2`yqKp&xS$3%&dTQ-#
z^_s1@P7I40Fo{`6Q&1|&(x6Ba5#T%+&!wH8Zd?3wSmnG`nUD&gtWilx$&N`aPz>C3
zwEN>*lpX{BVHEJQBXo7rt_W;<{CzF%4hPXh%Q`a6lmw-3Kn0G9i)FSSXIW%mg=9Hy
zx$N{sv%>l43kMJrhUKI!K>G(>xb+GSC%cvkD4B1SKR*jb0E2z)_&Zxc&n!{R3yueo
z$}a}90hHX+g=JEPX_+W|(D)_cX=dnrbn%pepJU|-fFPRPr>-0nJKb=0Ct8SO>%=%N
z+qQa;$SgIo%gHI{ZN5csO*b-vqVFYTd_b~^uyS-tO?5uxY+zEEbaK`r$gFQK3fe8*
zZU<e~;obzD2Qes%b~>Z|dnETPFhSu>V<yZLns@CPW!#da9cHRaGg<!<T_mv)PrWc$
z2duNfvMyh#B-qoZ$zN7*X>%Kv5C3Hj)cldwJ!pTgt5kb(^TfDrYs~n{I*Q5SMpIe!
zUGSgJV;L%4xGe@2DqTP%au@4BV-x+;1jp1RmJU#b8+u9bw)4F{=cc3QR~B4=!1zK2
z5tkTg)_QkajzU{2tNTWkyrSa8jR2dexTkZAzHOPP#$)~lv5<IIFXgbwx*gaXt;2&o
z?{5iGCW*U8-&+ZtilqHFy2M_#R)dbd_&=zM!$S+4%Ef>jqKKpPwd#!WS`i=&RP4u)
zdZ0CN-HWS9`rW?koLP+R*egiM_wAuCs!BQye|XLv?iGsU6!35p)m5+eZ`oObzn-s8
z@E8SUIu`2d3in*u9hZHk0U}>5?ZGTPxl{{uh7qeXkEm8OJ8jZC{@hl4BvYy?umtvm
z3ecocw-2eD7>WUJK~0eaGcEejAOs|Z>dW6G;_29JcWix5+FwZ2uN1uN^MBbz!J|}c
zsI)d~XUXh&@<Rp^4XBrMPV8?L1(*445=1~hc$(A}*(Ms;PkDL^fJFj&f^MEp+*XN7
zy-k8Q_R1Ytd};=)nX=5$aAjKo*!TDwF30I1&-dfldgHrXtNUJe25tKiB^_%YFI%M&
zgO5-~K1}nR6n%I2lf*5#A0H6o_V4a0oX1LT!y3w`9~!GmFFBOa*@HgRd`hPCW}WHe
zW%1OYZfC{IR>5KWLp3mECd0SuFyksdTu0}npsxfBXb4c`Fae#DdLUyZW|0Z)Sv-uv
zFZe+tX?{@JU)88;FJ|0qT+=+ommiXL9`g1ASuWXs{yNZ%Nph*^(c@qLuNR=<b&Ioz
zoLEWOIPgnZ|Gt`i(BH3)>)Xo4j}gTAkoenrSEl4Q3N(xJU4L<A#z#AuZhLyXzQmSb
zOG=?xI4QS?vFIy>QnoAdk5w0X{0?6LHfjDdR9bQjY?e_h)lFmz3b)G@s2={4@`&BG
z#P{!yT+}_U`9+!;@Y({}q)^V*2~J+Zisa60<t5DEU)Zsd_`#6pghKHJI?^mvqVW2H
zLNC?wvVbXQiiv6P7x5m+*Dm@=Y8fHws}N5EOh|fdGM+#F)yM5u3ymkrj;>RcikBa-
z?pO2eKbB_)h58G8xGgot<E6-{s;u4rTb{G-Y{7S8p4Z9w)~Gv&Ah1pImTxJF`;PMA
z57w5K;9kRJ(gw?59i+QC*5W;OZe$DV2?%ke8fSY34zn^YWj7W=-1tbOgN#K=&8`SU
zZeh$zu(h>O+@do$`L|2j(6_d(nm}$?uyUh~|Mf?>3~^h{JBfF3AmH>iM6JFeaow6>
ziGydd-kV~RCB2l401~Scn3*0aRV&@3rroD`C-FRJ8r0@A<FUukq}lg(o5C}bKkU5(
z?@PXpS|BAM2vS^3nPq7hl;{el8m@X*0!oH&Ob>teulsGjwPkaZ=<1~so2{q?em0C6
z%h-H#e-Zfl3m<tn72)2IxuPvrI|mt<-i9gEScR`$vq)Nw0#;`tmouQ>);t~K$45bd
z|IdZ#OZpzeT6_E`pQYH5c>e1b?bf_-BggG^9q>HRwz!n%C=5g9<&(^oa1@KNGovnI
zL>IBE^u)1qtYOTLSFKxn3U4#KA~9&I1y<$SjUzmY2E}E&*e^lkaE@$o3W|}Nf&1MN
z`w2w`gn$#cSbANq9jkI(CXY-7wTaanh^E#6a<>p{b_{aI2XafW3yzM+LK2VxDpPz#
zEPfjK<qjTXuWSKx4$fG%Q%4@+1^RsKZzpmiGoMQZdl4UeVT&+moDy7YU3UC*n0xUT
zY)_fZ{rn)+bx<b$&624Eh3aM@5@-YxOLTl8UNpUBREXU~{HzkSS6t?Ha=t73<Wm6M
zl-f5VSZl0baS14pQ@D56WG59|OIqt9QlBs&10qR*^=h{ZODkV5=^^6#&vE5tkUE|d
zU{;V?NASjt;QrFhS*$^R^0|xg3(s!jf2NH*#;+W)hDHTTc{Z{e%=Ri+ToH&o6H5GF
zG2|v6TR#bAIgRcn<&sZd1qTRK@}3}_FM}5kW)2sN6^1OM;vVbS>w~($uQse5j(E1i
z6}U%ywkmq7Tey3foC6r>%r-F&m%~|>;DtW2Zc=RNjUs&&CWP@<psSYmx#(sV&hQ}}
zj0AAvKMww>UxQ^G`&>Vn#o(co9$Y^G{8yz({>r0#C5t-W67=(7Y?G8pf26G4M!Mz5
z>bVfT*!Tp$c{w=Nyzu~(Lo^rviLPrSTlqITGLEZP{_H|N*!8vu$RJ|wz2V-po<V>G
zJnaIj$0i0wZHBILmc1$BHAT{|2cF~gmuAmjS$gXHKeqh2R_9T{5s$l_%ihFqd%qjh
z)sz^^iy!Bh8@TpI5#Bm3<-MdI%?J0_hc9$sfzLX)oDx4g+QlrKEGxLYZ3*nM|35p<
z%ML~DcOBT<n{AY^tijYAKV5qK?{Mt=M9IZL9LaiP*q0RWaQAmDbZWRWY?-@~%}B`f
zOhENrg%W$a44{{t(G)8j?UEJB%C9n;SN#o_Z$7VCB3?}G9BCr424w%LFdHlJUmA0s
z8aXlK87h7?-#1RJtgJoxPp8JVC6b%UX6P0bem0PUYN*Jtl>!L7C^yjd-->5H*qcu%
zfCBNykRKp^c;s62MpCQ4>OilItvZbDr4d-VtU~*b5D=+4Tfmbx&-tWykb$(5*h|{5
zQM8$8Y7&e-X}h@Rv1Lrz1ESHar=rvJ_N=w9hZ~<Qd)zk{@<{_B7=%@{`-WYwuM-5(
zeV@H2KK6Kyx6x7_jCi|k9tKy|)&_n01mA+um8O$Y{NivkC&!Vbjx&2~-YMj>4rGeg
z0+>k72a{lE89a^Zs!@Ll-~s2J1bpnkw#vwRv$hnR{r#?=aKkc_&*mf^I3Fw&C^Xgc
z_wdwz?wuGqt%(PeUtVJZDi6a_a%b&YWG6<{z^ki2Sy5T}lZ1)ST;l4w{a;X!zT^HX
zOPaODN_~`8f~x62+r(n5U>K~`zXrv~`0;0W*+(8wwHgxx&QSg1%(tY;Vfts42~|bL
z(F8H8+XZ@-SbXD8=t_bT$@xpfcUc#vp*M|9zGCG-Sam|NZH$A~pK_<ZM9fXZBw{1)
ze-X|5Y)pq~=5btMeNi}0r<3jT?{kI*z!qf<5_+%XcZV64O)_TJiOS_;i4lJ@jh<84
zY^Ong@&6vyG;RPA6BQOLJuE?1irOt;29QPSB64m*CG?vdIf!>M#eyI0e>N<ObMmG~
zHPR2HfScl9S`iMb{ZB;jI(~SeAh1ZB(O8T0LDQc->u6l9K$jtSdE+mLi4<@W8QL~$
zmb%y<L>7d2D1bCp;<m^wdZb~(t2bXiJevgNB(T^w_Fr)P^PZxUp=U^8Hj(cT{bk1s
z;L6@)Hp3O4buRe08l!82gKY5!-<AU}l25K7v$vNl$z3`mXGf3qA~&r6zjeC#-O=GP
zM%tmU*s&tkbJu-O!8D2mMhwQ>IP*DMlwR*x{@_Mgz8i(%(KXzENd=NMn*z1J2cJAl
z@?Uw3*#ena!MasWC2gU*U0kT5X*(`Q138I4X2p+EJj)ARfQL);ieoZ1|J^}ZYS!FD
zviM1VR{<9kd^%d2)})Jb4-w7KR>2_{0{9Y!<qN?`fW-Xv<P-keEU!tns{p8z7nXf)
zI<@=vn;jJn6l4l3&My<hIvJgJ@H>@?#i5*3cR2i6CV~L}KVX$HkA4nTBy(lK|BcIB
z!C`6^%Nst*Jv^K#xupzN<!8IUL;xSP1!okpJpJ*FZ7_e5`FFMTunJ&<Jq+K>QcEx_
zX<^P_w8@6QinuD8E!^~7VLgc1(3`PbOs<1(Gy*@KON}lqDa1#D0!KZ{)2(i1@kEZ{
zUuRNZX?dq{6^Ldz!z6$j<jr%ZAEWw9>7$81K4B+ReDNql;5o=mpMg<~M4uNvxDf{n
zqcV$f*iR*v-`%o3@)yhC;TmO~bWM?F-8tIao-n2Za>oSZPJ8FtalWYc(2JQ+l%N!D
zvuVKhqQ*B^MG%jP|71-fx#X4X#d)p}-pj!mCa0T?=HX)QxaN9}4lXOS_W+sI8n*pR
zryRtG&!P5Uy7mf>W=7^C*`*Spr73Gc@Esa*v`NITIBDTWH<{U8yC-(rpMo<WNwNk+
zJ4KQQ#rY`h9+9sI7YYL-^iPoUZRXb!I-UGLPxhce?~RjewgR;E;H`m~fBKnlj9|Mi
zqKH}yP4YFb#!@BmPF9}&`siQJ$ituQt>CFtP_w~usr6@ve|Gcc=V_HGwznV$&11Z-
zMYf!>P`#xZF?UD~a%XBym;2=TLfv~=Xj2KCnbHPqETn+_-QW1KOlw;9;L2BT&mKR}
zaIL>7x^M%l*7<>z0U2Ww;Pu_KO<L;i{S6v9YJhYiIUQWc2@@Ax1MdZ~))Q?InyCZF
z^v_S`FwMb&D;+8-EjY#t9jXfrfe2>`q2AsOeJ2m4Ek*0>)cvQ6{b4?@eTgFy33G=h
zfUgg*&XGn9hfvUq&m&*deA|dKE7;D)VatL<ayg|*(H(u?HSNi~%6d4Uxg>aYl61Dj
z%%aHlmeJK1s?YiN>t0(h0Z1`Ii#?9HJ<Hv^RB76Kh1_%(L89J&UIGbT6YWEWET()9
z8ef8+Ou4$yz5_D!bLsPgXrX;ZniEggdO1-s>pBp4=gVUqW5=6<g47tF7tYs^uu}8a
zdSGNUjPLR4Q;TEYfs>fzWP0F?ctKm5tI7bcU~rnfH8;=+d#wJ1ao?72q5nJiMc^y;
z(A3AKG2`|=eb_|)O^Fu<jYD3;y%+X<-S_Y_v+AX(4`5yF*Q7TQF8)p)C5wsv;TwVg
zn#w1{%4?~1b_+dANrGq7<ZlOSOi}H{D5)bCNX)+J8P%~=2W`M|K~GV#*L8#S`SyML
z&jJ7v=+Tb4ZXWxtCRgLJfZg4$-T;|K!M8df0-?bs-h7GB6(fmu#*d`aTU^GM-sT<!
z9aF$Pf87e{Gqd%xQ>t8*580AXh<V`mFE5c%+U{%ilSb|1IjsLNbOrVo>m~Dk;LEmZ
zzj_z>ma5pm=^EmBFda47WH-ROj4a{gN($cXDdMs}`e#1cv6vd3y@9WTYb!@XW;8!f
zvV-q8eGL6YIhq9w&gnmfmAj)Uf}#DLF3RB#WcOvUCFYJ_ANx@AqRZAfAl=PZICUTo
zt>Z!2@f3wHp#1apl7Up&S5s^cT3pgAI%zkV1xRB}(!a08M^u&blaowV?_6lPN*p*T
zLP^n`t83P!aJ6q<K%_OSV8shE(mo2cMONOawuk=M@Y7~GbB^sUfFA60IZ#y{^JL>j
zSQL#4dsfbGk7iBTj}>vIv|OJ&i4yH9TKE*CoVAFxXqKBuiVz(7^=KU}=>Ux|832d{
zUCw<6*HCLNDvx3&8?X0x#eovmcxvG23EYOZ`ac?Pt}$OH2s4v#scn9=Kw8`wBNbie
z8HyyGzd7xgyb#~%a^y$dAcfRnEp6fhX7%|ByT!38j@I~6Mtl+q3>N$%PXr&+`3Gh_
z656L$q|IEstb^Etime}>W=5s~${r%h`kmFlVzH21!kE_!?57^ru{p5R$y>JDCAXIM
zwKqP9=mNh!@(#F-{70Nx+g(Jf>GlpdL0#{!6n#8dmtW{ylAZ5O-5h?crgr4<;pu0A
zAJpVvX}rqY%6lpuoV-Nc8r04({cOS5AB6rYN=|e%bk~%~vjxNBD~JV&^i(Wwr{5g@
z{UiRjN8+MflcLp!w5L4l{plZMGmh3rP)Bk+%L+%UsNy~KjG80ng>EkKp2y0IlH2_x
z%<i|g&*sCqGtfHhb+BTY)ekq!IJ5kD(-@>;U}{CQEFW14X13KID=RP3*<mPu)y1vB
z#2(<V7P@=KG1t_ON{1rPZ!xf5*yW%|S~EX3<h?_73(qhrxH<n+;j9ttVP5tU#=5K1
zF0j6@L6%VK1^V>A&~L=FgCz^%im8UX+HlUS%ZE6nt&+Ej^`Gxr|BY8ml$hN4F{b(L
zzHKP-^b4z^fvEH5MAUD(*B;>nn)ORc`hXa&{}E%ZEcD3UBlVfG|0fo__30%p&fVK}
zgrZq!J~ehkuv|W%hHn0sjRp7mR{=daZpZtY-fA$g*$Op=-ZbJufE|YTreX+B==(LN
z+lVDjl+F_<0#AgvIcV#w0Wu{<*h8bZ$2SnsZYb@dVH`JY%(B^008Q3}zO1u39-=|4
zG|bL5&hfOBn+`WADfL(C^dg|3AhEO`W`(DuZy?C)R=lByAtvhqw$2uBViGUmyQlJ2
z`2tONRN>FSHgFJ=79*qPx*-@O&@pgh<lA(BIaGw>L;<;b6>C7%h26_AkE;^_#3nRA
zfH}LfO8~v)%lq=7LirQZ;nJk*#+8e7zWvBj3WY&!lc;xvc*0BP@ie`W4ho8sB&zns
zjVh)NV->n(yTK@uEOFoo^9FM6e?HQNKL%?8?>7=6Cj&ewDPjkA2xok|aN*Z-G7=l0
zX2)L^!raj}a51vb>{go(<tAmmRTfJ~+|T?fZIRb|4`gXg{VQsa$n$49u8ILFMSRPQ
z6wFrdqDN|Pab|gcz1L1u^}=P7&-(wc_Lf0eeo_1ALn|p#(ujnDv~>Om5h;<9M!K5^
z=}@FWK)R&6yGy#eOS+M6&c1!;o&TBh;mn+w!xtQ%hx^{K*0t8U*4ler;Yb&QDB?a8
zYccUN?4a_GF@g-@uvZbiUOUXHL`WE`C4l*G1_4}<Y3#UUjtLsmUf9F-u$T2=T%V>i
zy&F^qr1>zlLbmigLmf_HsPY8q>j?r8W0VsNdugQ;p4(Z#MUV0cVg~Mu`u_O)yY+cn
z^rM=6kFpP8SnLm$VD0=`=I_6gSnfyApk%S0F^#l(LZ`>JDgo4ajm6?<!wsdj5ItFJ
z3XUm{w1un-17~m<j#KXIA0OO1ec|?sM7Yhn(M}kiIOW`$y<f3(*zc=nImYp=`{m=B
zp*1d9A??5Q&EnUW^jQIKufZz)u2{<2mqGrZP1xj+Y%7PMb`_OV<8AsRL^ALb$dsqa
zc1)tm>_lo$0Vud{N41WjI<6MtArNu(u2e;M=Ma_vlX+EA6utQ0RH`*G<@Q&w@a(f^
zr!GYQjj*)R8Z=X3tg-YFk#}_>;VR%F8l)@}IKHPqf3r$jjn$uEV^D}@2;Riqfo9kK
zr}+_{qmlZQ;FcONd25UoNAMY<T6d=@q?hMmcwdXeCfP$T@^UDWt2zxE*`<`iD$M78
zY{yMM%but2cIk6;U>??3P<|`EX8kZ{oPvPv#(<Yi@W9|0Ld-{FO`4=!s;}y*K#Hr7
z)Mr&sl@>;*^~xoYKwwP`T3P62ylo^8sljI#8mp0Jn$pkDTdf}s(p{gP)f(_5I`!J5
zKem8}TWJ|Rc?7T+keO?)A(obYv$i6m#XlR~C8^CkKc#?F=9ob8Y{hOW3sH{ufs2-!
zTJLN1ocH7xL*m{2I~yGFDLg;zn;)F_iYQa=xLU4vR;VRdTJrQun9Im8q##Yn@lAXi
ze7QwMEPWkUL;ch<!)XqVN6(ecw421m@4WRBQ&leC(!^Q3a*v`&Bo26-xCtRk(^EOR
z>X>@C>|X3yrYbN@j{AbrEsK*imBDBHF29iwe%?Lg<PSeu_FGte<MkdpkS|-(P4^;&
zV_5lw2%NOj@~czU6YvssJvozTPjGvQ8$gCRkknEXb+_bVt&PT7=9*|12c%>wIDUcV
z;-U3HW5duI_6z~W_*I@zkT}^tM>tTD`UT^C3?c9%d;v~9E$y_9D%A#MHM(D%1fDH&
zenA0A(zlLX#=mwc6)RaEwJ^c55H8>QP6?r!v%E@+AHHRh7u{~T&@$?O<5c<@jt@1D
zlJGb1jKdVsep%_U(}5F;{P9H@UTN&#48W=L(J@dmRX6i<oZGBoD{d871D$QFkq{$t
z^_&}IFD@mm)8^_eMzztqxFmECwAAQTfvNt=x8+9{d8GBA<_E5h;K6D^HNT5NaLagm
z_Oy1{;KCDs`C^r;N!{h4%jc(j1h_*ji<keYfU2D%D`);139vAO4uVRNe=SNY`9CHN
zbO_N?Q!{*%KZ0+Ubf$t=CbVe_5`W?J!l>)=M6jXjoqNA>ejqHEIXp3a=YFy2gcQ4Q
zHzSWQkMV0h+d3MdR(0Ezt-jk>9A#^Me)=jTL1v6-@qxYx3lOi#m3Z`A%L7a^H5~Yt
zhPmeA$5r0yI}#u<cqXUhM^*n2LMZrJgGNxbc8(mlA>LSv%(k$@U5Z2PP8aX99d5H`
z!LQ(UVXtDRE>Bb&^t$t<!YFJQeX4nW04i)1wik4KG0)%FZR~SQ+93{up&&lyk3Jn!
zrVr{M<K!Fat*W~Q8J}D0t!O4cjnA9k9Cv%C%ig!gSzajH#&AagjpdcZ?h{N~#b5CJ
z@40=!5!;X%h!&Ps2(h%ZD>`Kj3#|8Wr^;G)VV4AU0}FHDc9u%Z10xHxBMnBO;jgYw
zq73gY|DJE}`_nxwR!uN}>(cwX;W3)Aasnu56SfJS7XBL4B%1ib)$px1%qrg&Sn_+_
zB(~IH)u1ARJ?p~8u696ObsGagJEk-j08)OwqW2)-JV*EQg?~}D<Iq;9HG&O8gFDHj
zhn|yotFk!7N2(_>aTw-NEFoTZr|nfyrM!k*jQ;-D^y%^DN9cjvR4^*Sz8h>}t()^`
zQE6bq870E*2+8JE|3o~WF()_9Bm$5aE?n9=w=QLVyUjjHsUPy7nNETVtD$V^s$13h
zWloA*T+KH<MRG!ETp>+EJ+P!mHMgu><2s>=yj0mK{JJU{ILEkm1q4?4r`L1V!ZShK
zApq;u1xN;5PdG@ziWzLBtm<1TRPML{$8#nOFv%IA_Uq(1%&xfev<=~iiIMqCW7-ZA
z@rcJOy>68ffrqrxmA&T2TiChqR-o0j{2K8@gV>e0gH&a1Xv5ax3fuxSZxA%u@_ct5
zGnJRwjMM)cZU69xh3FI9v$WI~KdVvVl#UMTbzu@0y8x=n!0a;dS~yj1(O{{F=0jpu
zLEoof1vbuysi0n%wU)n$utjyn-JaXOsM&a<y4O1G7HQJojOjv}po6FilN4@W8Nf%1
z=zJ4ZsQzZxmdFtpbZzQ+w<2<L5f2R$%M0|G)cxiPy0?Uy@5RT%_Me&b-d~&tOCJPG
z|FtXlQhQDSmRP5>HNl?T4lS+`M{ACY44G<JkeftHR<|DamJ@$bbR}rZg`oziB?M(M
z82O0I>#lCK4?z>=G_Zh&poyhR2QICfy?$PP5&5;q9WESLlpQT>q~*liz}p>?LmfVO
zIYeKiHK*WW_}oq$o>PPIq}WqUR9vYVfbO-H`Ht^jCZ-;}DH$D`2PKn5Qjtt;UOMWX
zm<(C8==w=y(W?ie;EsmHyf9$6X=?H@z7RPhwMcdE-|-S_4NQq1ARlE@r=b0CMX&kr
z;%>KFxMW}N)6I`)(3Wvhd&3XDxfR!ipSx-V^L%~MB+gmcRLdLeP=uz@lW#5vnr=FX
zF0Lck*X2WQfz?8?E7v!^k6$@T83?25-l7O^u{jzJU;s}IfnIk*x#aeDzX(<H>#851
zN`qdgHQ~_8f&AB`n%)8yY$Nr2?xjI|+xl&;lJ$d{H4-S6FVE|iRKg2o^P6IwNrl(2
z!{_HX`((w}#9GhCWf+6GLCXeJi@TMR!#UF7?ONhm__|^F;dvGxaDwT6;20xyl(jJ`
z@8t}b@+{>8)~!3`68UhD0+|&P6cq^}E+cKtX2Y4hnh`Ehyd3NEYS@8Ixk03SynF}4
zMkwK~OWs@XE^6)~fq5bvy=)n{F(p!TW8!A6Jk+;EywZigz6?*$gzTID;K2UcH}cF$
zr@-J6Pkjp|&sC|<z`p&et>z@JEga6vEk&c7A$_>xfRAe=LorSh@JSA<kS^6OQp^_o
z+guNgUT@tiN~5+s)IBJ<e;`oMQFtd_rtdzh#bw$r@Tr(#LSS1?e7yMOT7`wHYKB2M
z7cB0FyStR_lwy!k@mU_I)}Zt^LXDqv^d*#<)l9h2A{~+du|ThF5GwU-CUWc#Vzl44
z9a>z1eEc8X$F%?r^$=Oa?FMQz)sMEz_DH&|YJ(grB!OFV)$yyprA1B0CQ8=`{_;}T
zS{h)aFw_xmkuyG`C)%ty=~;atLW@w`w0DD2B#3vf12(?gdeRaF4EAFZ*j!Db;3_<P
z9v$3WFTik&J#^LreC-tuFpL#_CSjI(zdKrezYhGs+n;93#hTav25>Rp47nIqSYHOp
zm0Zf)`<J<05>kj=c@A%m^i|2LbFCSm5qt(CfXB(EOL9*##5~HH{Tr!Drh3WA144}4
z0x?yB>!!VF+vJlX(Dmm!OYpu>5Q=0LCoMbpvD_7bb8$udZwMKpskpW89#-jMNO)fo
zEt7gF-MwMORq!l<{}HdxW&JgNeUROM-v8U@w2$Jag!mf9?)iLqL8qnI?9AM*I*_4<
zX~2ePy<JI+3tEG5*NT@&!pS}eH3E{Lt%Q3?=oRUs_gv<4GF@c+a?ejgAxH5_G^hN;
zJyR8d?#cWRx~qF{43K_&t}g*5F$%g(ocHN{4()ceZ?@UN-R6h6Teh_@?@^*y_kA1L
zy>?~FU=TjK?r2&_<ofIeQ^YkQf7&&KVniJ%EMxwA?eG4*O~_ziIh$FL%Mdk}{JH9!
zAOK2?z_Bv1fxEWCWxMdZ!lT`JbdbYz(z-d^nU{Ip@<5;_#8NMJ6rAk~z{?tHdQks6
z)O(+@x~*`4^iP;lLjLA<yBI2JAKz<0j@0q!y}!p)*`i{cUKsNM=>LiODQ{2c*xQ3G
z%Y~JgTT2|+icCRXn5!lUm@ec5RRnDzn(v*P`Zk~*f&kN!`2>8R9yYeH6hIRxQLPaR
zWavMtl&T_~P3TH|NBO_X{6Bx)=T{r%iY(*66Xkl`wIM~hhg$jWlLR)Fi4myIaaf2M
zpI3fH;i~Nc_JNXyI($W?MkDtugj`H=wiMOJtrzs(qv|=x$C!|gU;Rris7glS`Xv_T
zr=jSnZoj@a*_0CsJOn?`Yh-pEHDmVBE~+J?JOmA)Mi4mqkJIdO34}C`eZGry2WmSr
zoUg=~YvbdF<5Yx_a?gfxQdOT-6|pUxEAY$lCh44)0VO)-2HTi3)X3#haaR!=I#aPt
z&V7X#xS`4A-YN?!7w$!#`>A~%*(Zjzcu#Ar$mF;~bJ9&*=7rCbg*8v_inb=JoNmNV
z&ks;Q(-neZ_p@3D-J_R`_|;dz-9j@h;Wcw^;E%E;4gAuUURTckXM8|pABfhN3-W{a
zuWX_Tie5L!HT@vQI4w>lgs=sAhKceQs{gG8IOAQ-FkYix*y2iog{Z9UnCb$jP|w_`
z#BjRAF_Vzr#tuun)xi2an2zt?IB$`nUH1TVFWcHDeF8<GxX3LOEZ2@bYMm#u9ff0z
zEJ};>%)5cH18_9^3`30lYk>I_{HMA_uu%d&qH{|=0EC^HPBy&G*}od?e)pNxj*5h@
z1&2dPkwU6n)BtCFMG53%d{dkz3gc9kyB0g8`3nm_eEcdV0Zg-kqcr6WQu2(U?-Sg{
zpiHFg9CD&-lz3R=-WRpK94;0>xlunreS)r&cMRiFbAAdnHhy9l`48TpH&U8E4{-wZ
z(IyV!w7c{j2gDhZj9oh!);aDVRVPF>Yavlgq)Ep!g?=T?0eT@oje>U+nMO>0hf1vE
zwI-k=1GkaviDP7#fA^vI+0pw+w9(WC`T-R^f(t%+>K$KiUOJ*}bBSoVfg+#Nx)9LL
zQGpgh1EDcc4f1=Lz_lp1a^04j7wN4v2#Wv8bA!PB8cF#|*XXrKPp8kj#T8*j+#q6>
z9Y9gIQY*5H`My51?8zus_1mkl<Zs$^gy<Gepw|j1xD&*%J(kJ~^yQrZ4HWF&;E<d?
zq&XnF^5Q;mr3irsUxm*8ph>n}H@*DfD)1U)37TFlMiK{ZjV?y>tc1MSznnQ7nBDk4
zPo%WNF7XNdz;OC7Z;*iRs@p)0R%LY;4z2l}&rV$2=Tubjw=Q1TRjY$=KVjnlf0tAd
zSj)i-4-=`Y2GKjTi>-37vpGw;(Ao#*S@i^?T%Jr%X>XqeS=S=cMOCw`9q-C5uFz2e
zFr^ZiN7o1}#3JSxLFX>MI$+a4X9gZg*JK!Jb2B;4j>)a$A>+Us#_7G!0LsS0pgv;m
zZ-4n2b)tUS=1WQILAQn{K)axxHsX&sleOPMjx<H6Q9Mkkv8sI$NkdIdwH0eU_qUr{
z+pWIZkwLH7yQ*{S|2966s*O&*UUyN(6upXFFhwEyJp27GVq;!aqUM_e^-M6T8-`LO
z=eG7yAg$4eX)W0WaXLimj3VdWXueI$roeiSTmR3fyoU_B7!I0;11aJLHkVDOt{^fd
zX}ea0BC!T;DVds?Ko?5LPlzUbQ3L|K>j@Goq0Uh9txVrZ1{(*X*FRz!z%fw&Ya9qD
zSg^V=e~)Zx8Y|vB)+YbMM~NH0^vX_FgVU3x%7JwB-2C@kbeB={iZT#{vwjill2se_
z+NQ+a@ot^QT!6#Zr2q4jUd&N%5j7pRppP=$m{><Yp(%RM#|zF&D&MO)nDQAu{IN(d
z2Cn}^^M!#VK#dBMQD2-rtFC<Jl(RrT@PUGG8w9LRT?=#`vUX`g4Rn~`RQ0vs5}Gy7
znQR-{Unmz#`|7{YjQm>iDJFqfk|w1NhhexAn!QV!h^YjXGY_p0R0VvYiEu4Ls4JzD
zA~+nvCbwN;rK3JB1uBT_MI6VIgpO}H%h%!&SIVF+2uZ0`VG>ViYbbqzhU!s_@lLmE
z;g3y8@U(${i!CZ~-Xp<2Y1t&Tq&<pkLW7sB*m;)>I0TRAPAT{_6}bim6AH|i>?amk
z!=3_AYDdd8aG_eS79#@^hraLPjx4~xaZ1RXxr>gvm@tp()DIA$uk^tSTE};-z@<u8
zaXfaq%%dT)q+AvtaH)F!8nsW50mN@bj^9NMg==&R{P2)#3p>GL&qF@X_4nn9y-(yZ
z!mdh6e=QlE^<*s$jGQ1UR#r*Uxa-Fukp@34sE~A?YP%iE2RWo2^;te$tZ8kF+-bkk
z+~XBwpzFk7*ShT!z)5t(ZiKi`;*^e&)}1~bezT<tCv4n6pstaSf`=r^nx@s+2LHkv
z+(r^TT@(p$72NHSDJ$Ay-oK`dB7Q`6|0fvKT7L(qbv(~sHmA!^7+b%vCfy#V-zATt
zQe+EoD@XVV)s0e-?diUrIeGU~x%VGAk@0^*u6BO({@vBwOa%(b{jL-zSSA(}Cr1RZ
z-3au8z33?z^pOWuicbtuUgNdOKM5jM1;cXNJHx%fTwp8NSATgv(2p{@UD;8jK;_yJ
zkJmEPSO8v^{EC&A^qG6Za@(hV@3WAzl+rkj|B-hhA+QO__C9pFzJ`?I3jQ!Z<IcBd
z%+-+kSah|Jr}+HYYmf@J^ez5SnjX5A<0tS6*zUnf@pQ%gPe{iXqUQAbJbLf$F_(ft
zCT$k-{sgj3iKDTQA8aG@H(P~G={xp`{r%CW-<XX*$+_jR{<vNp)gV>6VI0YCuKf&{
zZU0tLeyh+fJl{!F)Ql`wsDSuP6`*VQ1@g$=2ez8&(T|99UmD4a0|p$c7m#qn!zyu}
z9lhdLSw0z=j2;Wp;xKF-MJlvO`WF(4+Z$1}I0Z4`FVitvoD~2&v=alspL&QlVy;iY
z8@RG@z-P@FcAj}0zElfjy?Y7&uu=@q;ozlX01|H-dIAPB4Ru<0ZK`wH5j%m%d9OHP
z?MNR4S`Ys-yB3LBk(2_iAv%lRn>fQ@?fo>6sP_<Aj3M3GhV;~ETl$o=w)A#95|FL8
z&m)L)-nCZuW-)(q$sp(E!xBCPsXOW&Psk!Qt?L?A#&GE^4{Or!C#%1y-+Bd_*4(KH
zJmn=3fe%SaCfP0hnil4G!X|AFs=vc2Y1&s$;;Ta0dVGQ;nhpK>^duWs6#xp2%l}g*
zhKP5s^Uu}M<XDMJ^H4!m)z#?ki*sW1DA!{;Wo;J6h3A_r19S9^xFIO=-+-wc!t76n
zlUZ51R}QOt_g9KS{;@bG<d`_W_x?qWp_?~EKxXJGFp=b+Llj_h>24Wf*^J7{%ALO(
zu`)6gT?em5cy+V+I)xovDI#%kq0uAf?@>B$j<kL1s67tq9qu$rPM?DOCoOgOLh8(i
zpw~>VeoT@U6p!vMtN}kJeIk<1x59DtDNMg$n;VWvQuDCJY5x9R?=`tye4$Re;NE`$
z06kbn@UP0qCGi4$ZldHHFI&S!4m!%|i+P%sBLV1$PyE4a5MO&G+c&Ph7Uyuj^8}fr
z94`%Ll9~lKJmpPw0~_MifYu|M?IxC{Y3;!?y~GujFE&i(zz0D>L3~o0(zc*v(fB5V
z<)j8!ENVz07N3SImf;+r-+#1B9<G^sFc7}q_19c4djn{wZA=F;^JY%W5wRBmzd6>8
zS?LXniLS&f^Fe0RbGIvGNm#dWM>m*E=M-^*#n5lqHINCgA9;i+KnSgQ>okmB28wgO
z+HhNMLI8!yoRvn-7U!fz&}fKp<1Bn1f>g%mQSe8@2T;~8#HrIL$hs0gcdc?)2q>R-
zbY7_!g4_``A|%npuY{6`Nzj~BBLAG>4u<W0BD?!G2Z`KU1WE5=BRzyB4O46cBg2z`
zcKQK-f0q(ZIYbw8+9}j3%b5?mE>JQRGE>%30<DeQX|W09NH~T518S<}pgO?qPYCYK
zo>AAU)q<QiehkTj!B`cAgb?K-!^81}$B9TMPfxPX>A^|uCKV5Ggn<y+1tTIrik!co
z^4WsRnBme?RRa9MIDcxWg35Gl*Y`7XMmg&41KM0zb=!05*_rNsksltZ(`}|0(TS1V
zxIuA<fEx4H{HJB*pFv-_%E8*>-gKROM>!B!K9Rft4Vkb<36@9tr~k`Kp9al$?~U3)
zKhnKvsq9q=mM66%ftTcf1`~if;5pNgKl)T$^4XD-7pUH`HlqcSxE2v0@Wn!7cgwtc
znI_ggEN}JmgrHi1!;s^a(1SjD509PC*MyJ;y|Fy0Hf9a&KgnVTA_3V2u{1s*4wdEQ
zJUgCiT1E>8aQ{m<&MPV}vL68w6}O5DOo#@>q~nXV>4cSF(*H3$yQc8+=R9*OJ@XsV
zX^0^gCP+9lNv#CpY6YokvVyH#iI0w|%U#8^yI86n94@+c9FGsi#}Qz&rq0iW?V%=1
zfs$p=IVbC{@dmVqe<>76#K)69eO$3RzicW99z+O@i$5?oF4bSf!_0<(hl?fpbZMRl
zgu{|{c19U3j3Zwf{_GQAr+6+cRu%^McT-kuHYZ3VB&`08qGe9d*E$-TRRyN_=f4FL
z^@e$gaoDP_H@&yd_{!IUo}xy~ZzaKG21GOR3(ZrM;lw1HBLxJ8*<!bywvMIu{DVQ~
zn(0=XribF<us<VPto)&LPbF|v6Y%See~@R-CSf$@0H5k*dLAA)_z^h63g3%0pgMJT
zEoyZT&^Arh?Ul-p9Q=l71`;RXIOLXSBVRxpJiJG185D}7Vqd@8fzvnCuuwKv6O^I1
zoKy}!?nuixmjsQZ_w&J~^sWG{SF+z0*&;&`N=gXN?y{V(Df}beTH*eq!|oyq>_S+c
z%pj@{Kcl+~QE4oat~#^tJo8Rs#cQ}yo{_{;+zB?M&F=nB-qq5D^4V--=+Z@ibGHkU
z2d0Op$pkI$I?^oS*^3j}sqAI&D)GiACj1~+Q*Kb&J{x0o^yFXMvEa3|+%x!ha7fqP
z{$w#?a<?#dN?M!7#b9Hz>?Orn4nT~w*N~cR;6IBYCXJd|)zFAmiPtyVvp&R4r|kcY
zxQ<{Bo*f~t-YU%4s6Hn5j)v6A5L^!avP&xAgnd9AX5)28q=pT9(%lLo3W}5ec_bvX
zoSEm`y0C#lCLEPW$>7Lp%8Z=FKUpB$75+#C`>*QxZcBrTMD*Tg5%h*n7PP?MPxC_R
z=ABd$NDPiSF`7LB9nkI-ZU7hWfBg3`NW<rTdE@fKA%!8eWezbTNJqi{lk4T5jrE|=
z)fjzn5=`J}T)0v#Uc9S$T6*ed$4qB3+wZ0qa2`aZCLKQ9aCw07>Bn$Rq9l3|-kZq7
zWa1n%g61zT0QO-5>`RNc3noq=4yxComhInAIwAcB4&k<P)z!ZdN|*>R4|3jwh~o64
z^g`}JU2bnFoJ^KR<!7ByC$|-;Ntc{R^>`haTUs(?IOExE&if^fKgdQjoebv1uRW(e
z#v5T->&V;O1G)SCs4Ru<d5ib09Gp49Am9DlWf{iM%(O|uVX!p@pAW!?u$X!XBHi-h
z&SVE7QLay93WlBXdN>?cM#nxk;#A+(MKXF&1MgrcLRQxG86#X5`%yJrN-<rGNSARZ
zy7Qo;EeQ5)WsIoO9vCXWytU|gq+jBBPO_|Hu4iBEs!RrachrB=#vK`Rm0>D=(-mwz
z&-LM#s)piFU4Ec{x97)4p;fCkWpx`?)sN%;6U(lhk^nbiExr5R{uTCS%}9n94NboC
z>mYt8Qw7AsM*o{P?sA{XG$LAa@!It^M$90a*mtXMmDw4hEIG>V!2e$1F|uPG?J|#Y
zy4lrV%u@#3hD-E!`)G1*2Zx4F$0X@pYAfdEMTraQCv9NgU7+A#;u~TF_w(x&zz&84
z+C37&(Dje9AIs}ATGB~C5Ab&rw@oGJFpq){4AD7FGJrE^f_Td={1lDOCzGR7@6I1<
z6WmS&0hij}1%i><EH9e25&HdF6Y9UB>j9_ujDbizcu$xr5`ouiM$T>ZhRW55{<m|*
z+uS*`pMdNtDzvu3-jvPps2b;t)Vsh$WM#tRM`bkEAqGo$_@$c!x0aBS=*|l^R*vTr
z;rC$=+>EZ9^lW_C6x($#Z<T8zO$bOlE_n&*kHOAXr7m)i`>(V4o2xRt1?fWbqYSn=
zkG2+ErYn0c6Vc`p{Ydot%niV&;S#ja0|1SR&f2oDE$L5IY*j;vCVI2bUo#y#0}kEq
zXk}+~ZBo0t&3A?rD@VN~v`4m!<ZKsX0*BaOB$Ym#D+YG1r4x#qEJ?7IdtYJ|t+SP>
zMj&whIoxhOG5+(oWGR$=IPt4Y`3$n@!(nTk$M3Kh0GQI+u4z)8Si}W0*421PmAbw~
z;dEf~`aF4xqe%qPbDJvi@%W>YA(Iy$1r&EkY)`A<^TVc{UjRztDm?%9<T7m4NP03^
z9R<VWy;S@Uck%TR!0zYLl7ztcSnwE2GU5fE<MCkxa<G@e9@L#@_7coLfZLt4NMq)|
z5P3<(efqV&C+}eZr?JCZ5(gJtHFZKeNBx1GTdu3EXKjN)u`!DH+w7bUTnl*U!V-HT
z;+{IPPf_Gb^wVobWWj+7k6&IQHkykWzqan{#|W8uxvgts%>`eAlvB=22%DIDG^>fR
z!<fh;x#HbrzvP>~>6pX=etl>-j){>gYKQxXfu2NEZkc?-tJBqd!hw~~zz84GQV-~S
zQ}4<T7!0C$iW5__Ckdz0sIof!1;J?AB{CS~*-(EAk6d0nGP+=YXv%`+6?Qe`WrT~$
z_n=a5tFOuM=Vn$y$AK=C_P^5OjfnplikLfXI9+df+*iyWx1<l~xFN^_TajCZ<nu9o
z3fW7*u%XvugZ#en_Uny}#?Sj0xp@~g1GyqMfbmPqZU+NL>#_Orlbqj1?o~zA4`onb
zp|KCq-3$;(wl>K)`3b#<LDy(+<(H`aoWLX0$u!{OH``(^T6ZC^6{R!~=z7hOL8%6B
zq&?O|&4(|!(pepZlz+6qVIuK$h$x%y6_O=n%}O5)s!pg1L*Svq!#H{u0w}0sqKQ5`
z?_0V=nWAF40bHVa!QbeS%)kO3qac-M6GY$6@Idtr-@=U>@_`cOxCt19_?ywqjGsP@
zSU*G0di{xAfy_+~f2sdQ#4rvm6R-`H0P`qe6}<e<H-;wG;+kx>6Xiz2q^%@-N^W*Q
zY@8BE_S2O>R)@KA5tG~{vXQ@7R8M;xI0{PGkSQ}O-mBeYbyyozPG~TaHLjiF^AY}!
zZ6q0Q0)>%qKwGW-X@LLEBE&7i-*0|B*L)LRQ#~p$rguS}^Y$?EcGagwhX&NU<GNAL
zl@O?@TI`=rN8seQ5}(h50vYPC_rPQ@1OT5$LHSR3cTZ~Qcslb(nLS)<X|#Tpc@R~s
zN#^SAh`~fB$CvVZUUc%NZ6=CR<W&J>*HPGuA}1A4F_{5@4tW78&a}N;9Y?R2Pk_IP
zD#Q~oRDrY@W|S}@4-fyVn)LbI>_HvA*3gOY^tmL2k!-y#>m02pK<daNC~Q#{<o=Fc
zsUON^pNdlX;>S1mQ#pqG2FZy4&=c}vd3QLzLgw>Wk~5``iZnes=D%GiLzvRZMB<;L
z=k0JU;;aAQ^OA|7Iwncv%^}UDa;ciKU<h#VoIt9=UZi^#U6Kj|<O?<adPgsil)sSl
ztYm=inZ>LFX>R*o>MHZ@c~VH1#q6nEYNcMkgosu3BEeFedqDLBcuf?fu*x#DHUe+z
z16HMzl3HKTTd1p^k5wZI3f^>lI@*mVdMCby=k36!*R^8MHvqO7guONG6^GFQs+}A2
zn^hne)x3q7As;>3$LhW^%8Nc=>GZ-b(g~VHR2a1U5@7jVQ?JkFgP996YB69>W`y~b
z1k}p^fcW6;X#4{M>o4C)Li`}!xv~9}JT-s{LTO%)Y$`dG*N&v_q_hoAjVYoaslkP$
zMzpLYbo^ZheQo>oOnRr<Mio#WVHfw`LSiVF&T!FndI<o&12WCx$jzl$$&MPpC)A;7
zAJN$RM1_)2g&th3qFre=vInFbLRdG5ew}%`^0!OGHiGlaERXHdh9I{SWLD&y2iy&T
zZ62Gfxm#{{+*Oc67bY4ynDE4A$sV|qJx7->2rerGiR7yAoqf3Jrzhc2+|ZnrA^w~p
zq0Ox;l%LecPwrE7(SY)(w`Echa0`!LNi659T&mE7U%C^hiT|SP|4toqI8Ar5pb8Ls
zNxg04@L6ovUaglc9eTmo<ZC?rYR>7ucvFcr6Mfe}D;Xd|8<inKMPb#1)e=0P;o;d<
z=V+}QE0v{HcbR?O4}fOBGAA6k1r9bwG%ZYs84LqQ_d!HqW%`@@OsYaRjcRjd3ZNx#
z<19p^AP~;lBl1?8wqJW*RC!!yN*7HJV6G3zQB%82L2~{+P%`}x%^{idOfG}-Z{hnB
zndIg*!4JIrc#KD3@%TVA<hzVeJ6l=uq=wl<&db{@0XRDQ?SjIG9nBjrZ{xXA*b)}K
zhR6KeEJX5U1X?3KQXeA_S`z{K#{}&s6$%YSz~XaM=bJtBHBkha%qyR#-JTKsBe8uz
z|8Mt3`diqt8sm}m5--$NNQ)Q&U?EK~mg%=Dh8x^cBUDspdQ%PVvz@*63UmDg>P!?m
zd@^I6D0mWty~QCMTg52oZhM!uo@I9YY7`IFgWRX`d*gP(F&yk{lpq<?4{S%JND=QL
z<4)?DOb`lEH!F%ntZZGOW0n|sD(#UVG)2^FQ>Z!46vQPHyaO^w3*kEo?_0XrQkW+j
zh_2k<_E?=zQ77aLfpRNrrje~j{MZ@QmPO2wO_AiUlATl`V$a-?#4{FgYT6#qs+P3O
zr19juHU0mboq33K7|$2ynJ;LO<S0eFkc_l-Do%fV-oMT<53X3ufpsmr+-R+gByg*`
zs=J=s^#58FSStbrwb#*vC%C2b;zMyIR$3ahQ+`#|g332w<^AU&LjZq@BWb179kW;1
zExtBF9rJVdN54pjy*U<0<XlA{rVL7a+}SQGi)FHIR0|RSSoPjZvG8wtxcDFXj!8<p
z`_b0(i_c>-$;TxEz-Z<{PHt~G{LgPxk*10hdLw71!*Zq?T7^D{i^dHT_cZU?*}645
zCZo{c>kN(2aXQB4b_8!~X{t@Vt-1Ud_1{;=RKfO?baC-hs}A5Wy)-||kV;+9;J)Yg
zRC!?dLEjeeo1MEhn@Q8|CwXy5lIDarFlrv>JC}dk!`V|xv+hU8!XAp_HBHmIG@hsM
zy-4$r_5O9|;H}RWWTnAj*?O0v+JQ2u6a<z2;MPLqlcBGM1`e0a`Jmj(XbBBG`nn$H
z-zZKvQruh=xx>2!rd*&}*#-Aq!qQwR(q_IgJzgB<K$E&#br4`bcC@L<-1|ejET@m&
zj$nv;#uM>f8$zXX)OnAA*uL!Zm+^Ja3rp9riL@S6Js>@Ln|`7rl5i~aq4u{dh&Q2H
zGliEM26`w5*z{Av+U{@3e-b}F)j7xm{Ep6owWLgSRx%NlmI(;lN99|lbplIGP*fIo
z)x3cvXSM|)D<TY>%UL81oR8ECGz9(!3ODZ(*|rSw@VNcr<1H<yLGe|1AZEoXtltpw
zRdsuAQh8qBkuDPxLB^TWbjqKcpS3(tTlW;skLj3EB=*`!;Gbtj2YEoB+ouKTGDf$F
zU_JMvk|<7f1NnjWCwi?HsV)!4(}_e28-Up-?TQtAb5VZ*eAMG@Gy8zk%d33<`dq;5
zC-a70Jpy4Y$|5#><Ss^G5=5Al@RH{LN$e^XT9G}>2P9Y?1#oM={fy-6vpPT&fo(kI
z=7rKRCEB*{L4oP6GO$C*35h@z33>42-0dok^4mLdWf~o}hkjjVa9*`Q)edki3S0&9
zk1bOEn&ANwe*qDanl&($U&-H|CsFSCN6QhcS0#W&1>tJj{%@s8qo#)e2|in;E5Q1O
zB8c?eiwz<FSa=x0y`7c?9)7c8tbVzC?Bl#y4kw6|Cvm(_5hQX*<baJJ#sH#I-CXem
zw*))x3ER@1<wC{P#UaKBWzLT6<S9w<E);~KfZe~&HQ;fJZHt==7;F&i9&Zg8`1`xv
z>Lh;|2|n*FM{xw)#+L7;`e@lyT?X{{%H$jRWW2nGB{JQW^1nl6>s|vY{h$D3Mm}#P
zXfSgRThE+?8<bsCkCVAS>t4!N4e38A5eG^a4=Ai0%73=a>DRsj?5nHWsmvP+9nJJP
zGW`(YYC0|_*APey<cz5t(mvUK`1+8;5Z)U%Q`&vT*vzqu7y}7H=E9Q8jUs5kB+OWS
zQB~!-v~aso^ruZZX2_+Z91$>OX8u^(X&!VG0WwRema4j&8_ZNLnXn?A)g<82Y5Iot
z{SJ-ytQ!D@3C4(;23@kGlZE;06VsX>Po#-x!3((4H${$(xN_5jTr^0?Zmyrh1%`>A
zs1x!ttbc}fhjaa>wy3zr$kPz)Z@qdj%Cb!qyFet4SMl%WH_j>ihMKLdeeWldrOlU_
zs=?WY+np%E3o_K@<-KoPMEN}&OmLm?P~d9_>=v;@C6%%9q|{Z0mj@#t(5zjY+7W|y
zZ-7e=CP)D?kITP&^6r@yayP51HdRUxjmEuF{>`(lEAg=0hXQnF&q|dm;8QMKXKkp3
zrt64pQ1yl?rQbQ{l&=(-9itmiCTD=VTV7H<<|n*c|6OU$@1nu~3O+>jY|l!|EqCe+
z0Lugk5a~N{0g@zI)Xf=t?0y8G8dvIzlHQC3M{&5;@uoG;jm(^JK)}4=fB!V_T`?s(
zVVL`VRLI1daui;<X`Vm^P@hFhGLFv{0@Kc!jr?LX;qUO(DP_<OORMcZ)ta0eQbbDv
z^9bS0^<xFz*Ve9D9Yk$~6WmVOozclurgs9!NG@*p-HT%*#Vk!LHRopFLgqChV0(l@
zTYcX@zhL{{S^#u%Bz%(t#5sgJW!|f-j)NdkB%*c`D-G0%ufq$OA0#L13**3GES~Yh
zWsHB>i``Gw4~rVh^!qarf0kLCG{pJx3EWd04r&-_cj(2>O8U7q5Ul(wIz3e^i=>Q;
zu>)q@Fp%2=U+-$-CX^S<x&j3XcvdT#O5g4wBXeZO@QjBYkE^P(QP66&)6$Uk&7g#r
z$Eyd}bN=e9gg(#>en*bsS>i%@6eFwTc@qh%>D5abr~m3XmJNmifvz1tf!10?TJdxh
z-K{^~rBk-4^K(EaJ}SQX0fTtc?gj-g5aEyfE_TfhHWWmx7EdNrHTnhs`4X{8z9m3F
z51WXSh;AxdCEpCs3j{}S6w%*_u5+I!f{SIFIIj#^gT(jIC?@YY;P^PGbku2ezabc*
z@=2Km?4_sGu_NX)*2NxQOS3hRn-kq9bIHL2E&~JL%I#axm0KRr28D_IQH9dzyx?(~
ztDh6h>7@be&BNa}U9E|OKbs-~oG`eWDvn(R5R(0`W1>MonCNh@nGPcgwzgDL2e|Jm
z?SX7=&X%KjXbOQo1#q~!{UTO2!br9<Vc#9(LwemA<QoVn%E=0u2-XGGZZp54VRy19
zIR?U9H7MgC1<qXd1<8@=eEqINl-Trw+-B~s)qIA5v6-zm0W+pU_OLH-UX}T<KId3k
z+%p|?<fo?YBgy7lCO1;4XB<tob0SEI=0jMRZ*C{^A@{NYgahF?#9N%O^ZoVon6#eg
z7vTj3z-9l6x{{vf61aC7F#pjRdZieZiHG4K8nIMoST0>yM$*?e7f6?E=`Pw-RNEVs
z*23k-a9~|?Jf*)U2!}g`#xFaib6YQ}o4C7FKlhtmG6j)ROh>5MKb)h6l1^*#aC`2B
zJK-fI-Orpo8<3TtxUQ!dGldn4{5>(V11L8!8-Pa&_uMU1L@*Z4ksIu1w26T!bLta3
zGVVmg^fVhu%!cXu-q-=LO7`{`w3;T7WZtVax^Bzdgt=rPK8N|KQ#Lj+aP1x@6G0_a
z&w+lqZ9ri2J#>CDXvARt%yUSC4%@kTA>zpdhwAJ26Z3z7WU@u7A?MdUG`#xq!i3%9
z<AfB-jFB&5wXzO5Zur9^R$iiRA5fDi1&ek0`}IZAcO@ADMSQ-(sUU)|Gg%M@iZ22n
z2Q}1=x=bgs$<1GcIgd*Or)F?(rI~=@D&c^OcKm2FPpDpA+pAE~pIRIs+R1mwA9m^u
zD)sZojq*G??=cH4FG~Ynnoy<)E68H8d*ROTj-ZuckbGQH>4*u+_~hqR`x^?F{jZUM
z(l{2;l8`@Ii^uZD#!8syH)E+8pnSxWJ>!nz-LG@9pkGxp04mt56D#hqA}-Xe5mf9|
z&(M)JOQ+iO@3pt@Hx&me@K9XnT`WA3MQ>IK0LyutD^7C^WYu_xxXbzT^(`9qhb}kN
zyrn(c0MYda-b0J47qHh$;IeLiTS^cg<w12V6Qy5hj!~Z7KIu*>u%bES-?4FW`ryr+
zWGx%(^@6*;PfA?L6W`|P%k0{OYz~u;Q(@q^8)t=zM-44iq)VKek?h_#a%CF8bfKUi
z7Org6nr_{H&@}XnwiCrkI<8F!{TSJlzUhd_n_0e~)`kW;eszZdpvqIsr<X-fbzFUD
zH9I&EFZn$n2o)U_ze&{Oi)v5tCr@wytx|I+Iug>1)o@0e=zatR7OHxqj(Quea&_wD
zpC=<G`R=XOA1nGg(=1Rl;QUCw5eC3EdkqdBp&-Vh!yZoz!T1#6>Y2?#XZ@s<iZA#%
zoe&x(Yd^0gnR{^6j_s<0eSkxb!p?`?8r$@-Ledlj*6Dcd$F81||BWixXC~Y@pner2
zi<GYY-#Vr|q8^*ek_tXF13d&GL-$)a&CH*LIZQ3r!@+MO^O1FC(V$#;Q)TEtO8k_0
z;%Nv4_1l!5dn5DBL1q}$PqUhr`#dohmju(OU9E9*i{V|#5cluz77R=~-$}FkIk9e4
z^#Izifo%2Lh`+>TC%HmJ$e%maNQG__<U;_b|0GOYj+No!oj08iiQ7cqjXcK~3&JV8
z>)>Oa-Npub+>!d||5~}}ko^(Lgnq!IL+(bm6S9bJoA-=;QY@mXo2$6sc9JRMK(8t=
zfI2HlMywoBl{fBtqJKLPdU7XIm{1S<A*Y`r^HnUBWr9x_cciH7^WJo8lHAta9}|`(
z-?e_~82I-J`w$||fndP~jfCwl&7#6qLyW_V-q=%qMo)1Y=PJb0Ux+4oFJQPYZfD>S
zEi1Xod0`;@8h9h%c1+}1$M%CA0T!FJ(RE%|fn5A=0j@EiUHFFh)bB)jdt{!VJ2zbX
zHdTGe`mM$Gz3EqZgX>PjmB;O%@DqTe_b><I9v0J4td-SSA>tJdEXSYZYsV^=Re_7n
zf+$^5BVR?k#XYyz1_k9^O3tk<C=S_BUy1~r(ED%cIx1gDKYBY9r!XS#x8A1HaqV;6
z*07K{b)<_Wa?wxlERXz>qKp@0rheG0{a0)#_$txge@hE;zWBl)Nfr?-H-HL>lSLA)
zQ@QcW>2gyH!W5(6MLkbh!U;)pS0d^(trtSfE(I{xnDR+)5BfwIfkO#$MP{|x;3sr2
zuMF<PfTV<aYd(!7?Gli7aN2WV1CF!ww{+E4=+=!#@YN@;1?~|mFs*m4M%<B7-x2WY
zKZ7aRe!}X7Jatk?U$J;+Lh&!v?bFs>Xw2Lx3A#tG1dXxQa@Cgr+gV)sMxvR{hjPux
zf!u3RPScOX`DMfNZ7F*vGmGuVdZ$*g2gXCklr$a+-u&Y05d3#r{|Vnf$%|i_ClH_x
ztdjY1*FQu)%HCj_ePD$vjR0dX^}RQpNShfN&-et~T|UT*C;uSw^gL24Z%IVN<DjE4
zi|Ny`6d)F|qQ%axm4l3g4?6Au#`Wf}cHzYQR5KZRyjBc&fZL`5eZZP_l4q?xrMl6x
zrNEu9J?1aR5SjsZ5*A0uuF?~8I{Up7Jv{~K1Pxd$*TcR0^X(K7n&R607Gak@`WBb2
z)~i1Ka-Gux6KE(c&`_pXt>$0yhgQ&eY;~lX!C+{TGjZf-^smDPoZBN^L3v5IIFDOR
zR=*gGgu@>3R#TVo%#d7C+u`ttJnPOGszqo<m>Gbpi`(eyKt)wipiU}Y|A}J9BN(e*
z)@(|?-ry_arQ1CR&SupPA+NaElPFZqvZ=g2<Hk`xLy!-jAcv$^#P}t?-RMk_`F!~X
zGwh{MB57YWs2eM-l@@oDL@>29BRPykMT31b6T%pIYu=;cedWRvH@_I;==jYi<>&1N
zGh(OPeotSRYc9(!xCtf-a@<fl8}BV89qopOimaSBzKKp*KI6L<4p?a4%wt2DdURSB
z6*FW6AxI7~*B95RN6ShudPJTwer=3pAy_lw@JGpu1!Yg7ybtVTLjCWSzbGthM`_7^
zX4(DxJx7(3%(itw?BkEdGQ2eN2GI98TowNj4fV+S2N|};l)<Knoc^Gyb4z=t*-UAo
z|2RFv>?ejwz--RUTr7J0CM=o=THZw^3F`>nH+C=!|GF6(RC;J)FFAhpTQ3XM5Zsh<
z1>#En8(1CJw)GyHaOI6WW((&Q-&tj}yn>7ElGd41DtaTI$E{5yySzwc>C^)ijrIAV
z_Qc4{w2klG!aUDlf;QAXdlLT<9VjSSrA7;C{VBQ|-0Rm_T~%;i7A-|2RN~qaetW1E
zf9>W`uvw(}X46S~5;)nurllQzB1z@rTdL-<Tr(hfwExWOJgRhcvFJ01`l*-nzj7~?
zb|<!|&!fQFU_wE&Z{9Z692Q;Ie;^P|a`_RSMDn*$(Y=K5BJpYc!w1Q+6x2ji#tYRw
z&ab$~Yp3AIu6mFp^`TUb0J6lJ2PZuf0xH+|x<G;HM2o+t``=7sm>W^zg$jR{Jz!Kh
z&HphZ2f;7=^7iIjj`!I1S#4IeCtttLwOH`n@vPj*P?-DBrpM_$2L{FTE^-KSS73}S
zLCQ2#MuJM(z}pU+H}4oi<iTsPhmFEI5o?}_WFf#wy!c`BXUq-%#vBzKtGJIui+|~G
zh!O5@^-f^t+=D|O2hAz=ycyvs^Z1lJzugg3@NIP{A+E%{fBoOHoQ+xJ#7Kk%XAIIP
zjTePXOAZ<u&rdcM2&doJI-H|ja#>KKq-Vz0KWKq`(n(_;C?~)GCBw-PglZFga+oli
zE*4Lx#UGz7HA45VycvYp)~`67mcxZzw7}&?3e6p;fNp_(tLqv{HOKf0-#t-*>7bP0
zwyZDMb0b_b!nm7F&;K;l?;MI6LK)ED-l^qo?-?oI3C!VygvbElFOCmACq#$U?G-vc
zMfBAe&PI-V)0Ns2AZ;|3zuGA;gWRu^I-P&IqiwRtlCO<iBIWIfAocKz@a)WJwv9HX
z5RLhp=}^<-m9>lPYQ#&`Fuv;dB1LC;Abe1dwd)x*qNl07vkl>W+Tx=f-L%Ye*<Uan
zIMLpwu_rrJo%hE9`3T&Jbe}eL2E_Qx37npKjCff^kP>+NJ!hW*wh8lxnIN*FwDdZS
zxI0ZO`Su!&^J4ihVp#b<KXMT6^jfBa;%726d-m0zBZCUoJF9}+_q5c<ABWjeM$8iG
z1$lnhxA#Qfn1|>80yTQAzA%!&f;vxdP)2yg6bOrQEcaoRh}%OeS{7nz(qjChXMmAR
z&_(woP|}TrrN~=8b6ko~kv+JzuelO;bu<>U=?4evF6o|uwWs|2wYsmVn_Rq#LZp<Q
z2&)d8?&h<Tn?Rm*;Qwe{u5@wOwDHz?XBA2sPs!;HIJ-PWNai)S<b*gG*6o?VvyMDF
z89MjiV=A{SaClJcJfM~1X6|e;`E=+&Qrtl5Tf&gC31*9~tM&<L=5FTh_Eg}j(~&HL
z+vh~I(QhnQB2ZW_>FhY2V3#S4Z@sY6Hqie8+V6~M!LKBIYy!Thn-g9|xVjbka1ZC=
zaqCO8YU`W!E1boeqva5m3WR50P4Lae7k3IH2ebglHvw6Sc~M}?TiiJ(kCKF}yHdXe
zNzTWZS&}&+#+Iv>C2_H;$<wY32QG(+i$Z3|tog-*^&E0GhuM0R9<}mTfGiM6jX`{-
zY!T9uNFqg-vX>sg!2a*F=U5Z0w(tk6dyJ7Kfm1(*KtkNn99XF3$+ag#%>i8BxG61z
z=S>m$hI5x)H?$LUIy^}2`Cso{%u4edXJ!l04$BkNb>{Rtsxm=2g+Oq2@_Z~|U7)qD
zsjJdwhtE!X-bwXNYp1PF@Z1DFYjjGa6bJT_wQ=%d3-jC2oaxEYpBzDqBInOCvWuc{
z$u&R~1>|HK@CYpCoRH$~9ZGnhymi9C@-i3#eUM1x=v2Sh9@@!hlw3+bxgxZ)ZeN@E
zJWIY7U;hgBpc4CuGD=chi2ZJqmV1wNe-pW@Qq{4>fVPfeeE*K|9+yRUV)xd&@S&sN
zK>#uLC<XOjZ3;vj;MV>IOWas!YfilDbn1_WIDOAt3jxcxudeY9nTU(<g60`1$q(0s
zMR0%i65mS4h^v<BISK<2Kf+!4+>J^`xqa6$;|AUJX|lKyQ82O)##X=3rR);Mh{3Jb
zXy5gR*BdR}oLi;t;?L2Y^(G9<ja)SFaVLWQnYb>iCV~jh$^Q`A9f$-!vf14vWSRE8
zH6E|xw&~reXS+_C!eDa8ZrM2I=;Pnnx`0yKV5$AVQsbK6su1rIfF{1*ow~j%Xeo{d
z-JDM>t$&8Cd<=q<E><l04PI)eiY;ExtIFg}wcC7@D{&vQdeNNWV{c}YaG_KJw=8Mg
z@1!r{EzN7B3&?r6K8{lrZuIzc@;iQW!r?<*JvRDCAmswXS8x3)F6>2j_4byBNxo`E
zR3A-yRRsr1-G$eo+GA+SxFgI*zC-SZzLN_H=Q(TfA!1xa{0^l#M{}h7d5u+M-VSyD
z{fhm2Y?gQ%=9-wC669#*hxjVzo^Lk((mRF|Oh{qBq;;;t1FO8e-@NL@6n^2kXPEYU
zb@4s3E5b7!GX=gUKSRXcs@xe?<6wzQAvjjTJ#t>0<%?1Zd7S;VM))(w#OB}4&+ilR
z;%0d>-{B#b6HP?%BE=~`TUDFO^|*-HXX~Nb>Ege#sI#P&W{!)&br;(Au&+7(Pb3sH
z2R6QoD+OLwC9tDbX}YOJj6TVH%1!fXiAzJJ_oq5WY>rxa=ljW!N`>@~@xPHBv6QN4
z+5#8ZN8XA2)_U}a0kt0sxmGjwZq-3mc#LDgJxeERX#3tRPi|q1W5{`M>|}RyYRLWi
z)IK)MHFVnPG=um2^AhFV)t$nF9c%HuFlBF~b@ONXu0ALH8*U@RyQr}H4Q}h{))OR{
zqLEMaM-ROwu9ES$>*6~rs7X%RL%u?cJw&Q1C-*~Iw_{Gw!2yfDq}|=Wocg-2>E|6?
zJ?@T|243KJ7%$3hI~{^12zXZYXMdczkzuh#aZ9C@wD$s17goi>$!i!ddW$pacx9%-
zr4CHHoj1=kQ74?;Ba8}5AHiVYsoqFv>UaBNcQ+RaNcx{G)jdt67C!AwUDcU9Bvp1b
zzM6SG$X~pP2)+y3W5sKT+6}xLGylmlm3*hpevV~gWV`4rNCbVV>le3NsHwG=qMCkt
z5_A{Fxz}*w!VG=Vg3ZyYQTx0xAu=g;O-ih{h|XE;@1-IZ|6xNi2K0rJc9|oU1Nr0g
zKYuCd)kr^_J8m<XA0^SGSWiO(hQ8uO4wh+CONwG^@8MluCbpb(S^i16WJWv>6TQ4A
zXU|upotq9N)lrJ~$I0XZhXp&x&|i@lT{MsmQ#sK&+eQfQ3M{6q9e)4$5J^Kxete^~
zt;Nf4LG3=fnWUTqeOaWv#>XjLKBI1X`tC*VomGT=WC8c(|Cxj>%At`e4KG8_5ZzTA
zjWOL!!rClNip+5n4R__*|M}XdI47h}?-;iWH(lK$6gQ^{!J~CWLB}7HGj7j|!zF9%
zU|&OUt{nV$MYFg5TY%w@bYBpl|55KnW`TZ-NXIRsK>sj#h1UT6hA|oX{9EQ<nKDQJ
zcBA6wV{Pbz|DPT*D|m=n@<S!?PLj^~uz>_|_=B~q-CS%JMci6-)-<7)#L2GIy=lLG
znDlYNm^pgOpPH?-pyN*NCboL`e!P>Smk?umP)k)IowM#@2+X7;o9=1{{B^=w=&LFe
z-4OwXo_&1^*Y^>{vZYKgjCIgcp~-3}S#bBns*C6RaOvTvb2Wld2f@F|20MU0-~xg@
zsm|3%)7{7{<;Syw%@?$_R>@d#Wf%0krR5I|G&qB$OnnD|N~%Fi(QC$=^U;RqIW&}e
zd!ElHru2ySvmS>E#;)-ynn{ki3H0F5)zbF_Z9rcdrtut^c~FngiPzVNUcejE*x5Oz
zAsQ%Uva|yRWih^EpfrYlCTeGA;{^IX+${pf@jN7HWA~JX$mtwtl%TzZbOKqj6B11K
zqi2diW4YQFlP2u!!1j<6tL})KmDB6r*&FkOvxgeF+R{r2PGZsX?PI%BI<fZPePNkI
zK{)-jOchIa(5JD`r#;(eyYfS|U^YuxL_te&_8Ks{GQPuqA_8Nj`2QdPj3-vGihliw
z0>^Xf_hmxOS+5%-`5q|b?D_;q%ho18o(0j=a`#kkOoP#tO2KKJS$hWTt@_wCWbO2f
zA3j7_|65akny{U{rN}jYdkc(x<GpdrPPu_nmLA)ryRTCBwxO2)Boz|9|M#C~UA+yY
zEu+q#BD!du%_7Dk6QkC~|6I`1UTuU{n>C%&IXg#`M+)ShTmm(Ef9xk^MQnTfK4LXO
zfN5gsR5DVa_N074%IduxRZmystzpEWQz%~009{DOOG%n5PpMEQ54ifKz@K4`e4YXt
z=eH5|5dy+JcoFj{Yu{;7WRJILROxH2eX52MJR0N3<}k|#iv!3sV#xS~?p!!{tBBX8
zH-6|NeEPCUqefXOXk=BG5XKQXpRnQ?Db0S{9&0a2rek$M!^@&q8fE%h@268(jt-d-
zkzaPkwfvu)<_jI!Yvhf0&5JUjmfw@Qp-21uKOc=A#QLnBxhIw8Fiup9<=tKD2panr
zs*)scTc;b{5O%%NyHA)Wr)i;Lb38g@t3PB|2+IT8J*VF`T2eggD<$nIjWl&>KB&&&
ztqO2YOCj4mqv^6r0W*=^!@G;7?Lr);W_fRC7*U;h-P`+0iXvjI&vb}tc{g|VYVq+d
zF9Ru>q>kKiaby9lnyj50m*;zrL9e<&IXlyc6Mjbl>YijdLB`ysHu(S5%#}wanfH5p
z>#ggw%*?A<DcWm2r6#SfsHka8nWCwaTACXMxdf;qmb=+9GiDUp1DWAMxu&Ls3ud@v
zr3f~dxuBv_ikc#txQohtu(@Z>J?EZ#?!ABA=fCH0cs}3d^ZPCz7DrGhA2a`fX`81-
zI@t;K_9ExpNGyilVr-9g!eujN>UkJ{+<cggx_;=q)#%)VI8<h;_?9aDZ8ev9oH#C~
z^)loKiR2&*U7ySJaUzaKio5&+p}T`F<iGo_TXskZ`QfY9=<yLojz=5LFysKQFJ<h0
ztd~umiK(ZP%&Jm<uSQv7gQpqCJMFTY@wR(OqO91of#kD#8fAChW&#o0hrS0EZ>sim
zT?mRkUQvLar(jKl1*UKalSog-8Y(eOm6*!Ab%7aIw)~BZlI^C%?%`It6vthS14T}<
z_h*ftz#XtZyfD`i_($`SON&s!2YIUt8%7+!5%p_*6%CUOm=~egP`l9g1{ri|`|Fnn
zm98Ix^ZL@npRp{4bVgDy?y9HtK<-BW3EkYzP(!i|n90~7ca^|&)W&se%Cdjx@)PNa
zLiUs+PV@E+7gBhiSN1YPeMoeyK8i9XIW;88rMqvbgxaiK1xpZJSmz*kzNs;Y)BqoN
z0gB04y^=<PaL)%u0tH*y`R;mO$SxwmMgA*HSax>B>;X3IADfXE$bY}lxGMtkro$sJ
zyMLK2w955h1pcFK=Z5OSz&2|H&#FK_UaEA?hWyMP{<|<3?(?YMH>7xB5e{M9gRp*a
zHnwcR{!gH~d_B-dZ$`ZYxMk*Yk^Ss&bZj)Kd(vKZ&y_y0zr#V(vifaMFONc6!Q-fk
zgjy`8MjqrGS5Yj<R%>r_f*Z#WK+(iFJwv=IMFbJn(7%>r6petw^b9-2TMKQU2um}9
zXh6OV^MojVHYoPsJ|f}cJ@+Q&L+ks$!8V^TygzL)nb>etWIH=-*@Od~G=`kC*tu<s
z)Oj^)&#~t>E5Q5oPZL_x)iG`I!j{i~O~|=3@ZXEHNFA>0TV`D&-b+o240rcvk}kgc
zY_+2<K42sOkK)_Q9s?2iuhgc7P(E~VE0$HWbw=`8+*OQVq9Y&z2jL)2#iSIV^`IPJ
zbU8d`Gl;!O^QyP^T=|I^9}eC=#j{KmFAq#L`+v+@;+cG!?9i{vyl(<Ve%U$Vg_1o0
zIN>^V$G92T_Ok8FuJL8SiiZ0%+c-rtPGL1-G(t_Qx)iuV#$;cr_%_Pt19CVOXt9@h
z76eC5@m<kdb7~m5r^!KfaQ|JKkl`^<)w&|V8+>CyI1{T2l>xiKSe{(!xHuU+Xwm1i
z!hn613-%+8Fosq^+UMt<uNzs!o#SxV^JWYuS+6?uhO)h!VG5gF%N20u&LCGf*<N;H
zWWJ?;V4gc(5*vtz`~R3=b?AEhB~ZB3gA8QDDRFV-i8GQ`aaZ_^<T8^;Nc)S76#sWW
zk&By{Bsvt8*f*!Nv>%8Q%;X%PD!;6*XFjBKYHLYM*bSmX_D7s?{|R5JlzLEGGn-t~
z0R7!o=H$SPWt^f7u%hEsj%>v+&&_{F=>T@y$^=*z9u`DyfG@p^YgjcmoAr4p7J$p%
zBk6dQ4qaTA^U4`O`J{?_fk&ML&K}&fG9-{KP(0nsVZvccT@IP?hw`-ihk-=+hf9eY
zd%k>*OPasNs>uj)Vis@r6r2iwa{q0w$N0R}qvGe62Qyq0xx-Nxz-mKo{Fue6d!fnl
zCY%mB!JTk5xX@`{f#l-%<GSZ6kQ!xQ)I<m71kNk@U*Egpd3}%iA8N+a#pwhu?1c2<
zMA7b^We+=XSDw<OWGrVd$JjniNpm3;;xtKnGg9Nmg`NpPB-y@(@oY=awxE(yR>;+{
zh1;rQkpZnKWj0iY!gcoDt7aixMW}u>Y`V2we!>R+yOsti`=iz`EA4lp{iixu#vF`B
z+(1X1-<i05<#qh*F{A2ze-gMDeHi~=@b~SQR}O4*yZAewo-Y#^1;eGrAUHtyullOp
z<ICpUj`f1=@_d25q6?$I7xb4WbZ3kmNN@|+iT@|JxeYHjO0;fSoylxLUtZAkNjgks
z=R#k^VYSX(|CTHPX+=)ywantjP?m$H7S17hn9tS%@zv!GN<~F=9(DSpt1>7(q3)e9
zVf$Zs`c~Bra+x<&eLO}pUD4WhV1WPfEI2$ghEY^&4$;x$@r2XedqHRvh!;dH*8+?t
z!p4R~_bsJ{T6LD4bz2XZqa1_7l=Q9B{yKf>%u0UP#qz}pY7^7pXtQY(Q}|aB)QN<!
zCgzE~sh@I-`$dZp2(JBbck<ER<bJ^&$Fs5=T|YNU_0!1Z0$soPeT!ZoecWO-1a+us
zTr}R0h5S}TVhT#`+7>DRm`T=F$X(m11=f#4JG?#DvaC)@L8~#LhDiDIxc)>A+J@9n
zF>Ab-KdRbrG=XAK(Rh>%RvU4-*m7nOd$>JD@7Z2dKg~y8N3Ewj*FDvrmu^}8dH52l
z<S>uSep%~&R)=KvN)oqq$vjCdA*YX-Y7OHb;`z`%#|=oWyBXgb2+k~3z|6^ca}qNR
z1CDWp6F?*gN@pc&^+W8AWZ@r#!Bq|(oA~D^?}kuG!Gz9|*cClF7HwNt|AqlnWxE7-
z<rik3#sBcj)xw+hl~VLsqDSFLJJ4c}mgt#)QcXDF4V~;N{rOJSo_!jWhOCl{z3Ev+
z#Y$7c^{Swj6IG~yU)|Klb}rsK|G73g-v8D}>*@bw71QY|m-*07BKY$x5XX;+-BmOL
z_jw*}N7w3VLv^S{^Jmcn;5MU;4oI8#eO|Qe8s0uPwPm$^u6Wmq32Y`}2Z>jXIp>Bv
zlIc&k?a@}2^n^CH;nfW3DK*Q4C=hD`V$*&kW$+nX%uv_<xkM1gPXDWSdQ+i>LVA8#
z9?~g6WggGrcK|!`UQLfaiw<_2Z8Yb;_NU#x0Yv#2fB)-JWkkS&AYy4#V_EMzj2ZsX
zqxFMVIJ#FNlr&Q-o%-(1Nnsl6Vn|yPGmXm}#7EcZ_&*>L)a0kFkl{%AwLKi;eHz5)
zF!sMe2VUcG!|RulCRfsw;#}dir`z<Z%(>@Lhfp%L#}n^*%Qvn=U2{p?40@%AeG5<4
zi-0IkkkesWYp{N>#E)$4U8b`$q5`2Dig4f#U~v)^jGC=n2nL<>78?MLWBY)AGPZI*
zhn&B4B|6!f$AsoY&j;8?Wl--Le<|*Q>UXAJ6Z5|x+W&8_zV<)tKzvr_Z9Kw))_rFo
zv`ea}d@w6Qb(+Z=DJm*QY>J@GWbGO}`oCLweXsXF6#pE+Cfplj7?R_qcS@5SWre_Q
zM_D{Ht&919+x{pU5ZcC%pV2x~RTwz98Ltx-8~Xk!5W@<stwHe}W&HpeMT`J%qe@V-
z7V+@L*GfZPtEZ=2uIVE8H!_{Rn9nV&8{*r_>g2p_J;4r$R&!o63A-w|Qz}sRi+^>d
z4>jw>3-5UR$=iW=3EXsSDGC}EsI+gJP}fI0(DP$jWVNpr$Hxm6(Q)J03gz{+$}*dD
z_7$~i`4ZnHBF6ELIVGwJVH7dyVA@Z`eT<;?6{NU-(V5R$H}p!aIzlfh49wR<9_Z*O
zF)Y~cxSJwg1|rmFwRvBQ64Q+8*)-fOHeB%(kW*lf$D&H|qAeAc+)BvcSF&BoC;R4L
zOGDpGwQF+H&r_|^#dp>XIoctjJOdJM*Pv=$+vUT$e$aE|)7Dj+Knv{Yz8Feut?6(Z
zLbxWCyvS|IG5Nf}*Bm-*$g2yuD>co1HqX}`q8+Per-*B_dhPL@BCCScJ2cMP{zs7Y
z61;RS1=)6ImxdB$<pwNl1!H3GCMuq{Ve+E&W44);A^AAa^@uQN3dtB$>6Tm2N8<M(
z?c{nu{6VhMHUs$pM$rifIxRTdg5ZJhD<A_vrs9rO#T#mSmQ6%0nl!B1fEF+BW34>L
zt%A({Sc6UJ*f;8ZF1jI^DAMQE<ejNWY93BY?&!-jdcx21s*kZgH+&PAzsiasNoz5N
zdZo=vhl{%*6)F(s2FWHyZ{>GaM)ExLSR#Xhl6TUjraNX%4hY@Y#>)=)=fuB7Be=DE
zR%O?my3m99aE@P{3vqX^Qk$WDmShx5{5+{q=b4JfTk3x7feKWfNq@`{ZUf5E>Dq7O
z{Q%pn4n0b6*rip{4mTkbW0YCBp*?$dCS~hOgqEI}!1>_6KCG;S*|g7A6TE)^MAaM-
zWpp2E{hFm2WLsE7mB3rS=4QSB4I$a6a^ts;)FLAl72DPFuK259zIsy2*^sPhd3Pk`
zMKRR`Cw~i=w3{kI5j=vR9;5g|<D|Qn^^V+KDZ}ZkS5evA0O?34!eD1*dJTi<19NEf
zxIzFVK*$Ri1&ubsh*2w->g%P@FHEO~;ZxYvT~>PB2Z$u-ttu+1i2=El<FBC+I_H(F
z!mISt)cT}}#ogA6qLOo~PYd>^=GUBldsy9Xvgym_E!Uqhw!TdXG~Lr7dgeLNw|8t!
zwn#1T?lx^*dIRiGPhv1GwiJ=D6ZXXS$)(?;D#WK0@5YSwM>>raO>c*$XCo~^hc==<
z4XEpNo0~0&r?Aw(WuHGvm8PgvR3mFtn~T6+SBupu+O-+9YD^4Bw?ib-Tq#eiQpLFi
zCC|N`DrVl6>qSz;({Z!41~sZ94*{E859p^Zqu!xj5w{``kZthzIB-YA>PGh6QaNZ*
zGM(P68l(icQGh&}#=uB}tzO)ZzK*p$z9QV=;*i6~+?r1m26BYXeZD0V8$!Tw2br7D
z)JC!9-jVZY{%~TGedR@tU7>2*Ikj}UEdoWWr90tonV_!kNfRtcMg8qprl;bpb|dPA
zaV3XQ#Q8g6RN-y_S>-QZqcScAW$a{|dDP!qFUMo<GtE^p1*w-Ez@)8=vBcx!ZkZIM
zB$!%p^(eg$$2MLO<k5b$Wa^vnH-rc#Tq)cgdR2S48IT~FKFM=!{<-={P3{4uL;vrt
blzPRcjXSGFxtK9GrEw^0$I~T0`QG|>s}iDO

literal 75843
zcmd43bx@U2_cnZEfQo<$NQb1-jg+9$jdUD9Y3c4zl#)D1cXxM-NT<Z1yIb-|zx((+
z?{DV&@11wPZ{}kLVa_@1SbME&UF%x=Hc(Ms0_y?s0|<h!q$EY(LC{?n2)h0L9y)jh
zc56fz{6PO8BOwZYg0Hi;4c_3#eH%$ldk7-)M}4D(tsWRb5G5of`dY;$ac9=mLuKsh
z<^Wk2`Nb3e8RNG%FjF%lTwYP70@H%(psH#_e#_LVHlyX0mU+8r5zJz&#A~-Es|cZH
z*^X6Z^&EjukgmG**%YlCJwQpM+Hfs-p5p!9jL4H)adDiS$P*92!#^HYR(p+UVY+lF
zd`Qy!|CaXu%YPEti*KjejE#=YJl~uywueND**XNd-~aq#wpoiv7yEW?70ky>Hh#<J
zjeb#+$#ABWo@{5;$B!S^Wcc|}FW)-w55%SSYID2??H=i1{O>*PkP|ol_xJD|(?7TV
z^SelLdMoCCUv>>bXZ`Q5D=+?UKO6*Re1zps?v}fBP%9onoYiu*YhAnyiDcR;p!=Ab
zo0<K7?@vZ2#lKV9=5R8mE+Bsg+Q0_0)&D|z%B8%5CGc8D)2OPcZ521{Z5<AFF59**
z+tNM>loi|gzJK8c{^VpOQeo?4TyOkvwYSP~TkT|bT0JW(i<r+Y^VM0m!pD}Y(~*te
z8Dj<NCBY`;i2S@fDVZ3SF%s*>w3<0Lncf)IaSRHNR8gw5!$Z5>nt8AISDy9RvT^Bf
zI6T<oR`^A|yKwZ(T%`Sh*F#9kB*n9O&f};*b#JzzhTQwo)>U_$+{<&fYTRMYb-jx3
zv{&!?oj-+_OHPU7dXjTK_>zhH8O%=1Wg0FXN}4AXNw@i@4QE`}eRnLY@W4d}p4cRe
z0cGM~=|Zr>67MS+5*~|tTlkD>8%@Z$k$}h4q}f~X;Nx-xdLCtnLd}XcWPE)5=;&xB
z@4SaHj?l59&1KzsvT_)?5J$Xu>*u@Yzr(yn7m+c{+Sx|E(VMLp6e@$sLXO?EF&nkZ
zp}nSbP+iysJ7g$N6>*O^1zzcO<<@k4zD>+)r4!?IeL8JzeRTA0+y7j^y(o0RjCJG`
zOq#)Mj@ZbG(H#!qoy)ad?%13%FB$VeyIudC2nxT^@Fft5xjY;6o?D!lb)HYUqHNdz
zOB&%@PaLu0e3oJ{SuPf%>y~F#zezW)1ikFIB818d3S=fNrYfZ{pE7mX#3yMtx|GQa
zUpZLL){i;jK_by?z63wyi?nOx2Ze7MX*Q2iZW^P(md5qGVfO0-W6muXFnj_60r`n$
zED|15u*TOyE`Ri4Hm!H#1zpS0u}O0^nCQ%lw6wG;t!DYh#>O^LK7y+t7!l>s-rml?
zm7C%4rxjxxH|6gaKP-~$X3q<Tr{B5>GvpF@%zmeforC=p<GlJS0zaOfzg8Q`mfJqe
zaE2aWA`PIf<js*Bl&#%%$~ql3vtsg{_vez5Z$_0B?k;D9@=J#aU%O0k&UzweEt4lC
z=LF2n%};WKucVIF2V+M03y{^*RwI)pDM_afA)lGHhq{o!Nf&k4o#hb)Vc2@2eP|}a
zu|d~m@veHA(^i^4Ieh;Do|&J|0F3Jy&u-x7_mC((J)MfkV8u1r?RX<C?XCaE%fAQw
zM}3?p>%upDjA6Gay#6kpx3hYs4SHW6O@Y7THXWh_2J1Z%Br+JyQJ?_Zlta$Bmq^RV
z_@*?hMr(5<V~JQT0Uw{VKi|y3SO%W%l(Rk$d>x+o7Mo8r<@z{>6W&c&@fP;(T{>`1
zZFQJqlsx}t=7M{p$sM1K)K<(?WyF-erVna8#~Z)nIgEmWg0v_g$>xaNVn080xi}6n
z<!ssCWX>~XBS$GNOMwfQp*%?%wKnhBn*aR79I01QkdgUD?zZtP$@}^&p5HM)^ySh$
z&zp<+@hjwf$=aH+R8h-48qVhPt%8OtttNLQ!YBszbW{O&PR-HnF5$^~3YpCo`kV`|
zMyK7Wg%hXM?bR5)J;e5{fau56;-*W#0^v?xVV0(*L*+)jG*Tvsw&EQXjx=YjDKwTd
zwd@n&6^w;dZfC18j$^9on_qC{hk*U_S-sDC<2g-2LF92fCV;}}xLnX2wg6aQM`OGM
z2WA+oWNTYyJdpSz&oQLLp)kj^2+PS)Vc>8pc>kjHj7+o1&5^CRuyDtzBlG;+Ey?ER
z{dghw>ZdF^xhQvQ^TTojHg{~tSKpX02vapMFh~$qHX$)_Xm7sQBMELxU_=WDwU`ad
zI-ZZ@v=x?bo-6i1`vEe+Mjz+kcbcZ70RhWBqv?xI;p=C4j`xcXmOD*o_1r-eOk~T;
z3r@tj2o@g=3hMzxO5UqmCoj^flGd)a_&uB@!)-D^N@m~3ZpriG4z%(VKrcW3oXS$H
zLFoOCoJ2cmHu>hXe(pshEVV+7h-mX--6k#6%R`1{gXbsP-1cj-O{Y`lX0CF1y9xG)
z`Mc?X7q&=%!Q+$Wx4RS~>Ez(+Ro7FO3%)qj?xFh^^(P2zS}9JGfrrV3Hj5cyuRba}
zuLcI9tN>!Tm3W^l4j5*y<>uOI^)_UP4q%aNs?pW{kGRv;Xx`R%iQb>4#WsHo62Td}
zUS?SQVw9ynshuQS^HLC_injK2(YB_!W9wal+^j4yILgmqo+o1{<5rperefBqRjiq@
z`_>Uml+mBSThlOdwWn2Ss>Jr{d?RDT2?m{gy0F!L>-SJePOe|R1+@zO<vL(og^QgE
zg&JJ~kz+gp0t|}GS-0(?-8ln2?<+@3fMIZl!)|&L?)g)=%$elyM45r=yLaUyDS3H$
zzk$_D;P59f*VQPut-PE{unM7@%cJ_;>gnTd1uu@5$RNgI{W^50>ov-!HoECk9(L$m
zZK*r|y#^S{nCIwO(*BLWgi$Sq%=_}7weV}$t8+>E6p!-e<1E(A0fGHdIIT=2z+_nc
zTtP{5zVn=`1bnnaPZ$Lj{7V7UqYcjc`o7=F3_7<E+SYR08Ls{P{pTko-po>mf(kiF
zPFhpNSd_vx!gG!k-j`(q{M$@bm6aQRm&0(bLm_>2&qYkV@X_<{2r!S+U$4Xa--d^W
z7jD;B1a&TJ)!Ahk4<;A6?>F(jy!NHIOzj<i{^G^&M%N<;0FC(yDX&^NM1b+a0QP6|
zP>f#fIk(7|dqE<|I(Mf#A_Eu86gSWF9J4>V3!o_^@GukJfQ5~jygG`r5Zi{&HMwtR
zCs+-Sw_H0~f+PYz-fP(3ifOqtvKjdC>9*s<d;d*<o1>Xhk)stRgV-g!)^m;eg6^j~
zWQdnCLG2&vxAF^63vs#_)Gr!qC(t7mv{Hw`imtCNoG<F3Lrml{Y-DDp(0))zT~1Dp
zSlFwPrD3O>%qbber+5nNircX3Q4y>`&3VSwpQYvUaKSx+$8y*pObAdGuq{rn628^%
z%AaYeGZCxLrV>;yBU3I#mpekX4;@+SH>j}4_$z1kU6XTA;K_g3MNM1POy9hb{tfS2
zyA!(*M5!DLKoiEOUOWmWqnA3L8gE9dg&4jo(QR_LJm{2xCj+lZoVhgbi)D`&_HG_{
zb+NO+K3j@%0vy3VKF0m=S$WDi9|sco$gF;GdS74adu*inJDt}9FTU>t+Y2SJs(q~>
zbn>0X40t{NUhQ(dryO+l_2QuTz*CPv*ClPv6A4pQRo(O>u`)&OKZNRg2s0`M_+{R0
z^EYbOSYb6I0mj@}1{u#pP{u{M_mt<SAPAR}p|?1jnUV5SS=)OS_e+6AF|c&!k-pwB
z5LEZcxdEDT927#{S;m!rnbvj$Qv0!fVq#Ocxf^n?$lCj2+U<1G#BsZ*X3Ks4A{krg
zc!<o{|E#%$&wgzKP$)aLHYT&9wf@$rhKv0c?}q-sT{5SM_p?2oZCJb;0FJ-WYz9z=
zDmprHa}N33Tk>km@-3*^-zq3UfV0f;x;o!nOR!c0q-gj|0(zvh*w0MBqC*&bbDSeA
z1*cO;E=0SHZYVT<n(TS12@cpP#>;qPC~a%D0VzKy@OQ!2_aI-jz=@9pqO=F>c;Yok
zOV`)P78!U)2+8>3vKG8@@YRKBn9wN*jeBKPJd8xn5=>7=09+T8c%2l~@6~S~?^Fza
z1SFw;E#7=e@MpEfBnJuxEWMmi8*};lXA$PsR9;>_+hbNV#yzf+p>0(s_HNrET<`iY
zrcdNHRlvnTC~|pV#_M9Y9)QrQYqC|{YBYAtFq#jH+vU%KeqiE?czsAnh*q^lT;}Px
z#Nd~P{pN;#V>oN`-*j@91vJl189n&udGZN3!coAF8$9|Ws3n{>8$k%`Hx|elLL$ax
z=&U|ujmN_>tp;V^2v`x{Unuhn3A^sabDJNh++0dzNQ4czbT|;P>HB2MC*=cg+X5tU
z94wex%55b=;<%0Cx^#9;M4hClfpZ#x^t=K#9=nYrNSSwHTbFXRW5VV9DPYNK=IrX_
zPMk^deXq5f>;0Sh%lD*^!<eQ?QkG_g@g^XaLsM1eCt==~Z{aE`D&M2C>gqpSAY;lj
zWQ~lB&KGgKbBBlD!JKCu;hCsZ25h)J%wN}VG{+MoEPBW1dAb3lkI^mB5C6ICQH8|k
zao(G;YVlH^W8>lFb-r+{b_Pknyes_K>n4ZIVg1CJE7-f3aZ+;&i<zu(1)3-IASyqv
z?FAEYn(p0tyngP*R98pu>?CY8h)R;?2qvkb1bz8fwr54IkO&-G@XwD0&&ioOdz24L
z!<+xMvpSib70U`N2XlVTp(G|DnPxf|i32>|VYBg1`NM8{aa3FsqxtY4ieUu+()UjX
z2NQTp`a5u8sw&^zQuSx+9R-BEO<H#Lu?>P>o#ZLpbyQYXX4?amOZY)i&D_>-hw$Rb
zq*HcXo#y=6fb%h+cFJ&vVJZ5}!(P^$I!w{nf{U`1>*SfqD;IZjMB#5hF`4rmF)mOX
z(5(L!Bt=V0+q!1NJL?e1V>R<Uuc|cxGnhTUxEOoOyrijGhT;bx2KoJVhGedbUkN_j
zy1JfO8QlR{IO#TINkhRMnc2(Q(%4U|m*nY*Y?zN4t^f6-V(?W%Z^?9tUW<OC>F;#;
z!H~}7dO$3l&$yjBv<g6p#h816+@D{&kRWsXo{11%2B$Z_Sp}%nRO9`<K0xXn042%K
z&K8Gr0X6}%>!!8HMHfx{&t4iUE^LRh<q{kankHtw(aiiP=qa-HWGv!?^xaWRB*6^?
zE;0AV?-^VI#IHPRfs-=iIo@goIjH{FzFP{NY_jyd?^7lX$~;FYjObQ0pP4tHVEKW(
z(l=n0YE5V>et9}!;CpZyhUY8>aQAbPKLM+5VSRnQ(_jT+>wLQe$5=LVqzy-SX6<*y
z?s&1_*-E6Zt)pWVkHy5$o}<V7_|9ZS!*M(buhl4#Nn#qRE`vL)#hGmV#AM9`$CB9l
z?^wWA%0{O&UhOv?RT}pbhmi2ftLwVbBIO|>UgJJOEONn@xr6-Mg^3MF9Z<%!{smL-
z4>QeyAY3PV#k_dYTwJ^K;H;TdivRlW^0eS48e|g&g7-(u&DDOY8K3Ln3J+(klkr69
z`&R5mP~*<7o|uHNTasG~fK+wT!&q`h=Gm`hTW0NQ+4+k(q{GE-jq_%F3vgYBe(rG;
z^*~`n6(|VXmk;!Xq|A$Wtmg`8Wui?_cP1_4%a=RD=HJ(x19Azx<rLsb*I^)ia_(15
z0`xEu`X~39Vf89{H|OIGT<*@mnfZ4sM?Q0V4)U#&qS!niQs$P=j=igJ^su*rJo0Kn
ztKb`JvxarkNpw$7kHc~Zuag<|GiZawAb4#sg+h><9eBfdgcF;`UmG%yKdo@B6g&WL
z7f$D#KomfrW(IDZ(rSm*yl*~PZgjrJ+cIhF$EqL$iR>*J@Is$f#2>?tS6RJXW4y0X
z0En-y1K9CyC(QE*8CBvT21vagURWp4Rx+(UmPvM#dG&ulNg$vsjcck*`s2A#ys=^C
zk^I(3PFOLhImkju3>-kIzXc?R==}?=7O$oO;hRgR5+zU(#c`Tcp9##)fvRB6*l((z
zcfN5%Sa}#!oN0i^IB)7eXPqZk8q)hhe6z@9kky1udAN9Zwm=%&7(TITJP_y6zy0Wb
zg>nCbQ{P%pkvlF0(&uMpX3pBv%f?a~1OrjW0feQK+bjw{=N8}cLO$+&3wJ4{&H-7Q
z_TUf(9sq0Zs5Be-d|+8Kn=MLJCL=uG;_clZ$C)z%3+M%AM$S5$14U$d)dOaWDt|%3
z!X%fQ(-jl@x;BtBy@<?0NF?k7p#Ww@^|!giMQ|>Q75d6Zu-6H{aJMr-F7HxMug%?u
zEJKL7r9mwhG0HE%+gN;YdVai_f#Mn%q&6Zs<Ch0v-ieW%(P$7@U}--fOizPN`eJ`C
z(qATR&bPF5gi(|L=NCg2A&e!B=|C3Q9p(nPHRtSTeLLBG@Av1sn3aazPfoVRWH88G
zQnM9OiU9?2cI_`gvEz@RfCGH=7-XXDB<DFLOUohvD3z{9#!=tD=a!eh%McG4evLtv
z`9e9{!A$&TR|NG5kX^PTB*=eLhY6;u>v^hz%#w1}XToJU#nm6n{<g{OWH<<)(P?uK
z8+x}l18S|=NKQv#bjV@nV*bW!D7*=k)9VI3i`#H^gT8$`0k7(^Hvaic?!Lp0sw_as
zoraQl%to>|ff6tVb`jVA7xIDqcoWtY3zkPh>pAU+{UgdG*;O1IGo0oMWVMOS!h3kH
z4EmID>11Q0L(Q4BDmV5!Vn>E;nW5)*5L51Sa`DIQNhx*q+}zwpv}8%4=4c|H{<i%J
z#GTeFx$k4o^!vXm9rS;#*yT};qd}>PD24^(F<Y|R|3<`PGyXr&1-tH0Z-z@ycvf0;
z!)c2v{=1gD-{cVCF9vl1n4^R^U^$j?&HudT^Vv`bL*z9F{L*rn7Jh0Ud-vb#4$7eB
zVl3u#=mb0KY#4wHA8@*${d=pF6QdRzO7$%Ke^;CQ|4#M%KN;EbB!)|Vm<WC?F>DTx
zf2)U2<aLz{Z)Pz|&a8sJiat)y?4?m%9pe6v37{2dnO_8(PinYHfG<b-9n4SHJ3mum
zY$|-WtAyrC67J~IU(EJjlgcbt{rfACXcV+nScf~}(#vOJ_<e4FI5%SxoS8G~O05RJ
z)*jXyt?KZgEB>$gP3b?hASWg1CO$kk%Aep&A=O07Jn&~5`}=X2Vw1-39VuG)2Y3(d
z?4$E*b(*A&h4}xTwViClHpI8`$x?6nXqqotem+X2(elz-Dw5U`%d<sk_zbQlQ*Sq2
zHZNV@5@``vOZQ(tAO*r#O%To1OO=%3>X3=j6q)>a9+pV17vIM3{O2R#zNUZbxyAFi
z?bM~+G9v9gtE>W|9Xy_v{O=WG{9bU}4j=k^%91E7%ys?Y|M`yj&CuU=mc$mjh7@ki
z`u~|$)OWn7>Fsg{c*nJ&UOoDM_K$&IhyBPFKkYyQ_HthOTyZ$n(vd<cq1>kbw2|7(
zg<#<JBebfhD1+dV2AbV%ei=F;A-5psqfa^QJSQ7X+6n@}I@;3?)BDYJ67}|IB0Qt2
zDv6ZlUi4;zvN|nJigjoG5%UZmN!c7~_R1~_U2{&e`3U}8<B8~2yelkjJY=CJ%i((U
zzQJ&U(Ee(19nW*fdB_T8uQN-Mw7Y-%2Rm`2)ycyU?fSo*3Ew|<R3lsT=!z$k;g)(3
zWn`&IPpoaRz2Q{Ta_Gpp?v>NU`c-UaBqwwjW9>ybV$AVc>*@&CKi5fd((0zMN|!0b
z7Wxr*9u$<<v6bndhxE=)D&W3y@=pH5J!9}mM;w@FZK$^Pn=r1`LPv!||LLgop}^U7
z7mF^2NHjAAUwO{@#U?D2Hkpt#A0b)IsBmi~>7?mgRVqkon4Cm-XX}b%sKIsQywd-c
z&qMR)tQ0BXNZRf_f_Paq#z|3rJrmWNH23@yGmew_@@Gnk0n@Ovv*d#!n5!EWWS8hH
zvh7<f<s`;mT%SEpPTh7=+#JJvP}g~@E*QN;+YydE!9zau^(Z9skA&4Ow<3pa|0!vG
zq`4E~^6rA9r|XzmHQ%*_l;?>1>QJO^N3yb}-c8uC?tD{s%&SAajtxIcqsz4U#JMq?
z-w>sB6T6c|;LT#aL<kp+N6GwD#fq{!t9CU@Qi<b2z-={iZC_{4eKbzp!dJ##{3SS$
zYwHyC=QOU8{Iu(pJzcw>ydQ(URq}8X^&Mdd9w&@AyDqiH&0p=Xc>Y1BbO-)>Vr4oL
zwf@`9O1)-0xc?V78s0s|3#_cBx`tVE!V0>`ap!izEA?EaE@5hjY2Mz@OexHz^l1ok
z(cfLm^=-AlZhKQSbMG(Q`__`g3{v+e{T}L2Kz8pe%~owYDmaZ~W!30u!rX_aH*39Q
zZg8Z3_NNdOnEX*8Qq)IHu4XEzIqWIGC){ZEYx?8Gj5uA%{ZvK56Pc@)nMSI~;^MJc
zF()r0*j4(mE~m*I1u>1m#C48)kl`Ck*VR?=gUQA9(!w_~{v=H-llw&^FaJ#T_|;c7
zn<Oe;iCCXK=+`<jeFZ&#sdh-*Q(&xhhO6A!CqkV>9Y^LxQqys5&97VItmh3s8L8GI
z@gYS;-q*APA~?%r_nCx$hqKW^JoMm4Pkz1~?M|j4*^zcAvv$>%XH48-`|Gi=;8V{i
zE5>D3RqyJB=u`-z_AIK{*Dml@=N=VKJ3p^%af)ywCDvUmSkIQD$i5PTM0-#}MV9Iv
zXCChf{l+@skdQge{R8JEtA>T_<rS8c$aHR>H#a|WOR8ikxlPGCwBTr-r^PGA7{T>s
zxEUVpU{g%L`BU*q5dcXl^y>*fkKhY^nZaa|#IN0)%_YlkX>XivP2|-F1u67yedwOP
zV(zUNpo>8sR?S|#VJxa<KROC-D!1<Ri^pM1z8DL<B)O|!quE`cFmZ0VOj;hvCGK4%
z&MQ5oqN$E_tJfXtl2yPz4RwGKi0m!IsMKiDTuBcrRFBoj@Y_ru>|TlFt>Pgh-JStJ
z4DWnJC|G}!J*VBFJwGqZC9x2w#HeOr8^@SJXl{VG<L&J27<X61s}ynBBiXs4WuEqp
zM}=q9lO=)G)Nt?t{!#ha6!bvBQ*12E$o}HmJo96>H?2c%aeDKj9+6vJ)8`0o3;p|e
zl*Em3M{-i*)+9Hthn@Lf?rTXA$OK98ixkN)dBBRyH|c10^AMWVi*eQS%72NfcXV(?
z$UlPkE|=22Ht;yHzIYz%I`O{naygFuby!EdNs=*I_(-A3sG{zxe(8(af%1gHD6f=V
z0`6hN0+0ELOSK+_$fvT?oW<d;#AOC)caK4q{KA3@=cjrcRdx02Eo0rT&><ey93Hiq
zxj^T)x6AlbW%u1OGf%xH!@hbU%-1iZ<lxQE?{ebPNpJ0ldxvEv3B8L5G{4pL_Wm}R
zaqzjd_l)FzeOF{jVHKk<dYuX5Og370?^Z9PRaBqZq5)!ra1c4|o)TvtTv^wc_TJJ-
zZ;ZG=!k2qVt}&Ocp#&#2T%-Go`h%L}4i&`M;hZyxUUj!4I<zU_TT`@@<RM(W%g98g
ztu&W|=pP`TlJX;=fu$A;ZO5RNAiRhZs~g45Dt#JN-l4^FfBLR?hr%39NQqX?duZjQ
z{fZODToKsqV5oZrU{N>CE!H|hpZS}eDEl#>hN85_OWei!@?xvH0;akyYr@k{+Yh1P
zFm&rZ7oA}dDZPkeS1IMObHa8KIQjQuiK+ogC!p=Q{vu4m56+TcAU0=pBBZyTL>M{K
zNHupK+?|CC<zSla)`oqXa4hdw9>Zzx8sg1$#6-*QnORzG-DJ+PrY34gKPNhjly8Wq
zbJ~K#N-O5YFCLH*ev10?wlfG-*hX5-oK`XNNX1v|GQv1)!F+9AiH%j7=C1Y)7jqF@
zcGIzOMo?vW{zq%t9i(=F)BKy_Jk#6;!GyR&RhdGCKqU`tBa%cvwD6ij!>xp6^C@z!
z7JEE;6WRKe-wdxz?!3k+SNh*~0Ul5Q{r|a$bugLsaEsaOI^NVuXGh-^HuY-5!sPow
z<!mQj^zb${ED}Txt(r$YeUuD5q=0F3JY*VyGe#>VKBaHSV*iMf^+d5^oV4({;px_~
zA+#alDYoicZW%)#JQ+P%e7N$U<fYQHmI}*H5Z*1&|4{Tn_p05KK;-uKmBsFN3h+}1
zIL2;6(2Vr2AXe^Su~yROxXD;X`^6t~Z{WTfci$_AE$NDRZNH^c)7p56?ISp<!S8YN
z<s=M~q9Xb9xw%Grq&nh4jqUrKGtpg<wLk3G5FVu-F-37v<(v%7oKqD2Jke(0%7poW
zYX?>Ur8!q|#y*kjpdqJB+KYEG^D7gQ7!7^5D1~W11S<HMD_nocujh|%fEzj*+ii3U
zZgV{F>3a`a^?2duhlidXt~n%T7KgDBEJqeg(Zgc}y!Cz2gN0mzeDZiC2oCi0E(UJS
zzE}#4`Qqrz*n>GnbB(ja3Z1(@Xc~Pj?dmWYqj7JQ%BV%F%0*Q<f5C3jm>c>NR3XB*
zvaluLPxr<iS5VkCt?ebm5rCTV9;53CM_BBru|AxJ+S|(2VA(zN1AY*=vH;nb7^$k(
zJ;~DxFDmmc{%B~dF-7QZTB?+!#99NKKN2i9qj1My(Ln8^Llph^FC)K%A#`)hlEecF
ze_P1#5$fO{g{-a$(Q?`~v{e~lVeK0W%e8|3iinh(5^GtTz@ul5`1tP67xglRLO%+g
zCg`fI`6!<8n!JWqLhz}@zqe~WnXeoUO~`dU|LQAQ*R7yJdvo>S3YJ>>d*QCnt;K{1
z*-3=LMp5NVWL@fdG`RwCVE<UX^+NTHm5O84KG%Jp!g55Sb>_(D+u}F^!OFRxPeMXY
zqU#^tqC{$TkJivc%WRd+9-Pr0EOGi5X*N$ORVFS=rN|G=b91?T`Yi5C06h?~G+HG*
zJ6$uh%*+n*(?YPz`j(B^%Y6U1X=O`z*XOo4zgq*f{VYwO-)o9?a~%^Xya7Z7V}3K8
zxw{22Nm!j{G{usJrwyx&Bj)Z`_HSh3XyNZcqX;A?56&K(mK1K|<OZ&<SuN*CEV;?q
zHrNwrQcX|ygpAQ$vAkMMukd4TQ>Rh(8_qrdu+#e|2E-K2?>p3DT%na}zr!BB^3$0=
z?9}_Qhkj9*rh9u|#^j2rp)OJo1mXT$4EfEp^U0JYj!MktyUE@Anr2?Ap1V<d!}w42
zyz*8o3;HnS+n_Fvi#i_F$4DQC?b-1Z!z+EyWsVq4XoZe34&ObLRBe=+yrOxE%h_m$
zmvKw|6{0mveCl<@+UbK5#?vMIPQg8<hd#j>pt5t#E>2&<EkCW{c(C^3OAaHU!JI=x
zf&S!#^E>ah>It)_5K)cWM(%s&cIK9-stZjs(LY!Q%|eaU(Q;2m`p%_2Db2)=&_qbM
zap~~Jd5gXBG!6z$FJO-f2eehy+$y%VlMH(u`<u>jET;dk_t~I7AOtSf#mV!&CwROS
znR${dHxoB2dbh-zjpNkFpARy8ZLid;*|CM$4eN{y(hkyyf7Xwk@8zI3U*mrVL$GO&
z4cmvb;=`|i^7M`|GSAXeJ0pWxQf`D1xALol57l-T-n|eW3(Axdg@(j}u!!@&vvU!W
zzq}F)-AuQ)P@&0xU)_h!BO_bGX;&RywZ9$4as+h+_3Una3BLYSyt5f2`PVmCikre?
zd3FgkoAT(6UiDk=;f)tkRbmGd76fsJfhLWg($+5#wE!WGK;0=qo>x$K`Tc;KTT?p@
zDN(3f*9VUODI?5Xw)XVHha-yAA4Hoia0By`uRR_07r{<0Y=ma|!IQj%y>sQc=dtRr
zHMDSpU?El=w?m2V<Gh6q`1CguS8v<3Ou(HHF$|ouTaaBunUiE~HG*yWMTTrb%RWIt
z*i}sd4OC8da&r`WEoaZ`Yw_{Cn3c1`2oK^LnDFf(0nU}a{KkN|QRLIVv;L)FZJIxn
zxENB!jlGN~NbPQEXHmrR-u?mQlUGrsg%oT)#&76ciK9q~C%tQfZ&B8OTFQf2M}2g>
zWrIP6JRz1;qd)?Nju!3;f`KyZZ~1bhfx+0gQS=+$y7N{AN#gH?LX%-+9cbY~A>FOl
z){U(@vky5C`;nyDacC?RP!~Jml20do=tKENxe)xe!kjXTFVrQ70Kg!)Bt=0#KdWV~
z>CT%Gbm5=UC;#iR4jXv757G~Z0?%B^L*~#gCv<8qP5Fr?4*oO5M+>{#v<l~8(_D~U
zyL+2I&O5>5v-mQJIvHg`bWgnXJmJ(ID99mI*Vb}PJUFJ8YO~nr#$>Gc^}g`)I_+iC
zPIZTGRFkFB$w9#k-K}t|vM*O@!DsBaZROS$Co@mZ=&B;J#`pm&t~@Gf7Z#&aRY#1o
z+QiW5X=V)NKg5}5^9}j@=~m|xEGT?gP+?t$VdNCK6Z^{H$#aI_Bsj5~FTVi3NOJjU
zS7?hF`9j1(-)5ffRa+GSrviV_ElU5<Xmzhi!v6bYAM8tKZ8pNlNjLa!`|NxG2*2`@
zQT0ncK0Hw7G;XX-nnD?tRH5^AplABYu~YC(A=vS7QE}nY2dP#JKDBf2!{fbbJ9{J8
zE){QgdYYtA2YpN{`|vhqfp9~IEe#Yp7Om>lDp~V2jA&CGB;JbX<TBr142L3_Ln!kA
z;BpPa+TEBNe&;cii&U><!5>oGXHv%_G@D-;6<Xf31hgqLg<bD~YW2(CcHU-fALD~3
zKkUA5Rb;RQsnv>2+_@$%OPD7bt3e)1)^x%MabdCX3~#RU)?*QX#&#;6uC7s0^4Mfk
zGriM|t(vI;W#Uz>7fWA=cDNq;ROS~Ik}~Tp!>c0rnjE<MXA8?gcTdsVj_9tBJ7Yn9
zPn2X)kU`crM&d0m)!&Mpf}^wVcVDzBMq?p-?&+hzMCm|O$+osy?WV-xWGkfjP&A~<
z$=+^<<l<8=6Exg69`@77_3bXKI9+t&aqDyAX#PGlN(>j<8;r&J{Iop+aVCx-tkv#M
z^!wEV@^=&oQQ;gKgiq^-{`Gg8YKUVaUoRE)RZHq0K_0DJ4+6><WboZ4B=7s%QkB$5
zlRGD&`3L}c0;4B(pWd8NXqiJHjXl}(Hz2EV|6HS@(bKo8qENi9|A|x;99;$;F^D}N
z@{Bz`f??<G-e=K~%t;&th0vnPlkP3*S59#lJ|tDEQR^g=nupxw{k(<6c9FSkLVBJS
zk${GBfX)N7@_c*xg8}@j>#$LDKoC8KSVFv>J<%NzH_c5VYH+JBxk_7SJ&>4se`p0G
zR(xv_kRv8-zQV0YUD<Kz)92k5H@n_yJcxehhyq0v{mTao0HXR#OAJwBXudEGUIRE=
z=4o>(XF~>woR0wr;GCR^%G7A=1Su?i?S~A-H9VpS8(YIZt$_<F@0afQHtAi%<2?OW
z5^>pFp0+26nA;_1t!|rV1}B7CaB9clA-iSR-~C#tCuZifSP_|rtJ=JL1Ggw)g>_Ua
z?cbKl`pJ^N9doYHFAfu5L>D}V%1hE3J<d-%3mwE&-_Gu`9O6-#s~W$<%}8-3yesnb
zUtq70aPnUoj^z&zyQ}K$vnX<5Nn!6b+S8G+p}7u7m-!v$D;Mn~ry0cT{XX7vi>aeB
zwXo9<S+nBWrm!bM7je>z>;35{_7?V-1eP7AbTbr-^V=r?+^2&0jEz*s=A<Vu;8js;
zavo=^Ph;ZJjSqMH6|kcy_%Lr#T5k0)2wNN8Jmpu>9#ceOntY-%9nK01#)@KQg?a6m
z4g7>`ev!r#$EOU<$O%)+VLj-bXMKc^l2Z9Pe(k=VCezxXk^Djw_x6p^4YtCaaDpuc
zhSTuht(IZ&^fQ@(ECxH*Y2_1|k08FZOxNC<+5yGXcP%m+7x`_ZP<a3mNN)zgh4-EC
zc(mxKjbn`xl$h#7{mS?UEeWAnC3U3}PEGeRvkKLQx~%lHQ&Q)=^t@evleLe|QjlRn
zRL~Y912zupYo6mPq_9)WbK(z(S6e9T`FB{vgR+v?A!E#{j*b@4cOyjn?ax1B$FMU%
zkI1|wji(>h-8Iu;&?^5WIiQqw?*r6TeSX*@Vc5T1Y>)S9dTm~y;b0kE9ZW=k3Qq23
zEaD(Fr`X=-N=Cs~>UKNY(}PA&q1osewlXn}FzwAl6bnkE3o6zRMBk31CtHKU#Xvma
z!?SCIKI+;&$^Jp+&@J54c5*bHT;Hzx6q;;DA+A9%yFZ3P36XU~FH?jOHznV3@YxVZ
zd<`XKl@5bLT(cojSXB}YGPk8L=rGhi+JX2uB{Y{;cCkb^V2QdE7Qj^bp(U#{uaQ9A
z;bg<$bL%Y%s=5w^B%-z2g%kLfj<WmEsO1!{+b_xmcW<raJ=GTMli|ikukX7h^)4fm
zLyGwD^^#bpCS({`R&8xVU+q?2o^~o7<N6@ZgzKeBc?bKWXP3hdAim7ZTGxFWG8sJK
zRR)<%O=fv)gJe`q@?-Dl!)ZOJGmxkur$KF@MUJA0Ily!wQK4856lBQ6UwCvRz)7_N
zJq3O4r2+4$>)A>xS7lVI4Smdwp(d<i79uZ+@R~6QM5pw|Qot@`m(f8FtXEb@BJuiI
zi}D}MDinKzV@o3t;|c$gz5o@sS_nYK@^7fnd^GQthSk)k<t#<j=O&C9!`|+xt_1Bg
z`<0hJhIi0x>n6Bg{(PU<RX{d<Gm=)`jvBJUW2GyZS&X^hXXoXIeO7?DqNeC2p5sQ3
zph+>583Upw@$fpx7ucj7G(%+Zv%MChI+^XG@BXkl3UQXNoy*vqJt;01DOa1vjAGPT
zg~El}nFFnB`1C7HfAvHO5=CjY8b^1yl{5g--|!EQO@Y|4N93+t&NGb3awIx&-TgYk
zgs$R(Ej*>LuTt^sO9AOb$H$V<p_w&MnK6}}b}p7bpR@Z?@LXx-!fgVe@#Mb){=#Y>
zk*Oca&Dcv_Xmw{>v?HPEOD`qlG#K=lx+mB{qx`h!EUH&9oQ5o(l#tan2fSBq9JcbK
zW^LkMRre5=`<vJ4q}DhQWQe*v-1S&In@PtVanVq~^cX2`_ef!a8E~2jupwrHHpjsE
zOICHwM;bAt53faTY=IN5aet4&xj#;4oZ=L97fSa*ox#0=(fEdDYq}U-#4C_LzQ{QN
z;6-W}pl3Z0QmJ=4AqKf-|Hsx@rzCNB;lEM>Rja*zGp7tPSg}<_0h1DY(Rqpx%miA%
zMlFhnP6Io&-`Kn>zKzApbkJrN{%5(k9GdV%#1F4b5dM~R==*y*qd2+3bkC>I#pHN{
zoUStGQ}CWGAw5TRzH27PG&BFa?Po3v-!bkS21|yhYNJ0dr4H-$iHRm7cGugEiM5pp
z;-lnVrtrd@yza8HQ#(+980rp&)sPYu7yVY(F$!dhCb~`KhuYzTf;N~$K>Zi%fqPLn
z{Ft{=wF|l3?|$8H*=LhpA#>Tx!2MZO#qQ*Y@gOPZMR!_+TAAQmCz>bK61f(8e?+0X
zfv7=37y3))2bV)iZ;PLPRy-@KpoHo>^PdsA8|SvsusIpldX$+yBPm3?J0QvVb`^Kv
zv#7$&%8#JcK%d-yn=!DoD@B$YZSxB}CR(P)Kun<y1Vo|iR^UB@{&z8&sgvEG*w3T#
z3$6y_(ZlD7dwTsPr+78B4b}yMabI+72()T^h-0Vxfbz(_+^JJNM4z3$-N|Jj9Nn5x
z*kv=PQ)r(9$7j|g<V`QfMDre8<lUdHQtMrgnAebDvUPv^V*PXSmR{B9d;H9NY#f+6
zfJu9bfvO$4wM~N+K04wUE_rxWq5O4om*t+1RRuo_pRC4FJb+H_)nN(abMg6#VabYJ
zjf3d5=_J2f;jSGXj4I48U`_FHnVL3RdG-d3ZykSrgRL?>gy_K)H>l1RXO@&hya{f=
z=-vcEzMlC^^h;2t9E-1LBsXHiS)6|&)A&#Ich>oyo2Md+m~#r<6V?KKk6-MEklE<e
zlAno>xC6hj@kN>6XX>y=PkO7OXoWzZpm0DMz*yb<`zMf@3PPjTj&V}Wvo3<`xdV+=
zmN`hm#y?eQph<Nly&K?7O79CpvBzhuKW)6PCIn42YEMR$LOa5{a9P2!DG-|tCTCp{
zLSv)~(I?_T&Q7m5_I6t-&QrYp`VsAHVB^*9?zM2h9SP~R3WZ-!Ra1tt3kIT#J_3zO
zO5S4`tX<xjb{`t%M!ODgP|BCOH!@$(rIr8G48NC<-PYD(u=CcQAOPK9H#I5cYag3G
zjRfN3*EULs6y+45V^OL)j~LX|5aSiwmeEOWTQeHDI$IzvtQZfMfQybr?!iUJ{rtS>
zRO8%G=~J00VxrR#U9wE{NC$-iD6Pz<KQ=CH>$V9W)lQS=g*S(a*H3_xv&KbnPx1UZ
zePPeZPh0=07`Z!o(D}SsI(yKPqP5K=IjW*wv$-vJQ!#kZO8f|Q5%mW<^@&2r)qZ{7
z6IJ%JMQ<EE$ESBhh+Vp|7>#~C)FlXhBBUI3)rFE942_VOs+hC1fzeX&T%*8-dw>!_
z{&R!^)xV?-A|36ex=8>~Msd&mQar0hh00(>tNc<kK2imvFfb~+W9>dFUc;h@$cRfE
z;%KEm1THl>dp-4eBLNVcl=$zWzd_qc7e3=FrzqMUj{>2$Ms@#2+3H^z;`GYseIBuT
zmJs>Y;N(S&5*R1qGq+1fSxH0R6IveQ-Z!*2duWgU<$}&9)a@|;04fEZzsMmC_ZXBL
z?tWSMfow#=&;uFFo0OHKT&KX6G<m4_*m$b@jKU?QCQAJB(M|ZEm#85~r6)8@`<Z&D
zN<uXZSnh@Jf~s2|*~IDQ5N5OMPM&aCt8e*7<xA8FOdKto3?)SPo0~r=sqJ~fC*J9w
zPY-K{7M`L`>ACR}+O)$F01Sy(MGf1%<;JApIc`=nc5iCQ%j{PDi_1l4Od@Za@6Mvi
z($F+4^Qp$LqQa7!A0T9dXfc}CXSYC;#u>!F&s#+Nr|z-{*BPVe=bXdgD-+12k~-A7
zG{D0Q!sr;mPx*pzHJ82qnx^nzd}!x#^||*a_~!OF5#`Cm@MSUzVNpzzg~;C0&eSLY
zCLUO;fNHl-2WNiD8@}$=gx_OiDZ6SrN#EM+g&Bd3^&&|%8RA&8LMP_yWpJ4>`s1e=
zb%Zaz;kww}4R{U|kA?6k1crh6Q{X+et^7%>+pBZ{cy@SjiFs8J<2Q5vhU8H8{kbL8
zt>J728NQXW1rGvX1Z%|8%3Qv>%?R>GILW`wi31Hlod+?y%^~xPHpa9xzu5RKB_&P~
zIgdq{qUIix<S$Kg<oyR3@BG2pe~S8`7Ek=DI=}LmNZmEP<LP9+%_h@5XdQ)<R+5Bs
z-}!8ZvT(>AF^mK5oT`1PQE2in#(pA4Zycj<iKua5k<S{>?)EpipC<l2>}3XwB6J@|
z2D_-T4^TQQlxNq#w+-9*g)oVhdv|adFq~Ydd=jI>olW!0?*r;G@H|$^vT$|-rOHl^
zy7!ja2(8UJ*VOks5feAI`B=ye#0MJ`-+B2#d;A+|Ws%|AI}*X)<4;WbqEO5h-N3?D
zQKMq&{ddU<jyxl)55{F}pawCJHSHTQopg3$EBBkH_qm4>Q9`+*afE*X066UXqHhr=
zg|)(H-k+KJrw<o9Lo_}@2uQv(zhqyf4xL#d1WjBMcSur52{R-B*8j%|Y2IHwPP0?=
zr>Dv&#1bAbmYJbN8zSq7?a;T_4IdZ~ql@#Vm+<@`G-n?N*aDHc1iFFQ*9Mx2N-5sD
z0q6%A>YxK6-X**v<eYy0y^G%zF{2AFzK0EJ15l0Cw~y1q-<n&7^gjP>6k;eGRX8_(
z(a$mhR2G9izV5Op%~cMWQQ2It)PDcCZ{D7Lbn2Q=Eh^-74*I;(@=g5LpBY%Rpy}Nk
z?{L{Uf4IW9+(Hp7#O^!(NoovJ{Ok7B{G)_fkYc5?S|_G1bc_SzsapPePm{A3etIa1
z()MiHak!~HQg{uqH718`n%Ws%M*(S{<zeAtLl``byDcVNskyc`AYd}Qa5tT%gSb@F
zNy|>(aL<wGj*mME1JM|Xh>j{2d^)r7<YQIdc4>KTkAceAjtE1<IW{AbdR{9U-R4J3
zi+ZjHir~tF29fQ4KO6|W(|aU~XY<Z@cSS-`v4uUVu0mQno7OM?Su|;kKJx7#;WBU#
zE6n6Cf4()*1ES2p$a>k(J~!|gviTWcq*<P2{o#lD&lAkC&LW%t83ph#|84l1u`z$0
zzH-7Rje-~*akSElk94xnqbqmc5;wR3&Pu_Lg{Rt_6hW$$@lQEBnj?AT5x)H}!e~d~
zjcQ~CDP)IwsKVyQksNR|``sbr{LRGsM9FxMN$QpeDQ@ZyJgtWhMUoj{RUdCujQr|k
zo>+EFXxQyYHNlL5-c}a<ix*}RP^zyiW9}FTSgGCZf5Q=H84J2Z&(2ls{Mhnm2vJR_
z>UrXIU(ShAfyi857GG<H4VarOiu631s8OVqb1hf#AhCh+_hH<YH}=Evvas>_B?e5N
znb#<oEp46+CnYJ+Fj=R%5^O*BGdFM;`=(A-HKj@p%`VFb-+N#_Z$n7CBx}T087<-W
z=_kRCk$z?Zup@lwS2X+L`I)&%c?<@G^3cyF4pw#+A)1S9(loSBoCXzL=P_d_dNV9V
z$T{ELj80s)8b#;Eqq^Brt;KuP(H8nJ`_w;Ja#*<54c{I!C-;TDS@i>j@uL_2aS3;k
z+{+)D;kg{fA9D4Z<SE0()YL*jF|NkN#pLjm?&pW<zus?*j*^@QWM5+5rd+ltEi)=e
zcL{Tb83mGNuzu-q7LWy+8xXu8dfC!BbEe;i>M>GO-BZ!}7RNztG*Er_1P?`QSw;h+
z8t%KdWwPjs3-Rb-dj!S)#hTa61xyjfm-}_05UP277vepgJDnGu%vWuEHo!4B^18e1
zWLFzN%tp2TtU5JppF{FH(F@bc&L_+%_MknyX1Q0jy1zIj3C2<4I9uvO-Wz9C8`RiG
znI7DVh01q)TQe^FrFk^$e@OR(w6ZxpSqE-plq|%+%;ls^a;P}zZdQIPE!Ll1m2(3|
z)+NYDq)A4=f2?5go~i?{lNHENB37uUNHtGw=Z)j*Ly62}fc<Y+L6Ua}W6yJ}4EgO1
zqLpcIkAg)Hv>dZCl+jjNRI}QUnB&QE9<w0BoqsgFOs&9!?Ecjd<r-9vn~}{MOp;$T
z3)<iY)FU&fH6=t1V0Cnubdz8NJIH;s*h96y*UplY9y2VjhJ@_%Vd4t4M*1Y5lsJK6
z$LfV083d(wXbAku<{`iS-piz9WTeN<VL;p6b?lIYAyU)GYBp%Od>0VX{?{>rijP_M
z%5pq}HMTl>UM+Co`dF0ad<}|8Y!8T)iV@VJolLa~rJWdhBI1KmK#ZFAqx^cD6YmDH
z8OT!cofh2yEdX-TL&=Tr`eCYw@o|uYUqqS+dn8jZ7N2<B=)rp;JM|iuCKAXxZiU}f
z+j@-GaXkh=pFJ6ibucxiK)410z^cw4WD3LI;8sIZNDjTSM4z<D`}Dpo+40AaLkjDD
zMKPynR9XCsEOLnm8b*W&I@JdoJN-gX|As$j@9+@ds~&y>%)UY%Z3_7?1<`Vi`F&)(
zh^}CJY@FpywCRKRsl5s`x!DydiOjvcQ*3{w^v+mn(4o5GIR8<xhQ!82>q-t9a*3?K
zi!gZWy?@H@%m=Mdp?Vr(%{!$l4)oMTQ{ci3L(V6vo-S-jdBJU%%Fk?Bpf$fM#m<ay
zMF39nty61YQRzKpyjIY+n1+EzVogoS7N+-8vHmTp>|I2JS8}1}W_=TQVs)KEnM;#8
zu1O~c3V+Jn{fXNtxtCH&9I)n4-i}b_`{QMz9}0l$+M!B}#dDxjE}?u-4%GyZA@1$@
z8CKC9i3|dt;Hf?zShBgwOkVo^h7xB?Hdc`-Z@t=%lcdln604-CcSnfw&3TD7ub_@P
zV$2it6uuV{3M@PVJbHx(1sme&jqg{Ni{FYW>0u>4We`Sn1VNC@@>-m1Jx(i+si1u9
zFyl;tJ-9%!imF{Xo0CnIWvVmmBVMuV-QY6_I|05t@GlPF0qy5G3>SB-11k1YWhgGc
zd))j6{XjR+h1+?Rz;;_XYB4Z?=_Bz<QbPViq!J|+P~bwtRiX-uj?F>6-LXgTFyu<l
zAG9@5+$vlsjmX%qvyikj+f=9aG|NQC2yIA6oX3HpikU1W@Zn#nkEWXGXaNt*$$^G)
z7E>4Wgj<am!09%#1Bj6Sgyxf@riBPK>awGv+s##JSPXrbO-<zMK%+_(kaZ!`FrRZG
zqz#hxjaa`LeUA-I;x~qstLeS4Hr1!_-MLTPh&a+j68^wOv8w35(xl7$Z%2t(Ph1ir
zZk`J~x_#CsK*?9$(Y(VUm8qic@9nK|@!^F1D9H$IK~~jZ))F|aZ0Tr%Tr3uf-2Uh6
zf<f3+`(b@bEHzgBn9Bi(yhG%{yo~ofFE;4E|1SWxkeNQfA5S{dH-n0Nzy3#2D&|a$
zI*~(Z(suuJkSBUmoP0cp89*<-WbxD=ox}sBvc6S1*^ot!j9q3nD=?Z$+e69DB6A#-
z(1iMFnW;fS%eNKws8pzBnX0rZDqw=_{%M9!s6&7te(()u99XJ=L2dAN9_mtNl=0su
zD8^O80xUhGil3UBhY>Z9m@Sq(zEc&*X`HDqe+%dcd++x3qr4M_@=opG>qt_q`9fPF
z+Wg?1p3w;|(9_pPwtooZp%_x(26797%qXGR{>sb8BVtKOn5jO5o>VG-Uh#a>`q0kg
ze_J2*kiN*%M$~1s!e)435jRC`AFgJ{o$b!EG-FnuMoxad(qTbr&6xM;`Pt_c;8w8c
zmjef{+{+12ewNeO=A#URDiOOrU(0QWf+x`XOipueBY0cIWyQB9QHUCIqMV>coY!L%
zeQ#=oAA&FnPakx2T+h9SgFcCPj6b&E8q))xL{wwD{D+H^X>D<C$xRK&NNZ+dA1yRn
z9(JjVN98?h*)i_@vW4L%IaU2MbCLXk==ZYI`{P9EOFy<GuqXG1<`eIrh5zeSKGjHw
z=VLHvv8I`SpSV%ZGZEX3tQtdUr-PCA$#JU14M3uRf50b8%(q|#C2y_D9B2sfzcu_j
zr~cE(*4`r-=<{|Ys7>9XZZKi1&Ti>tdaVAP^w&yM?L$EDKd+^iErH-VDB=_3<KaN*
zo0RT5PM){v7(l_PmrP1Bc{4bd<S(U~bawluxyJ3bVU(wY?dut;p?k!>p$|-FJ`Ax(
zzU-FmDC`gok-{sz6B4MINQ4_1ZV9(7_X#A95<AFYXW;s#M7>8PQxTN9<Di~|L`sY`
zIp%L>)nCl<S9u5zDu=Dl)H@EUf8W|tUT<FK9rRewXwX@Emj1K-zAja|pkh~pT1-t9
zfBI);FKw>6F{7tcTQBjC52op!6NxC{iYY4Sej3*?ewKcjN5Ss^xZJ8VCBd2H*UMS(
zNd^mi%ak{wqR$B9&5Y$v-z6s!dzZ(=zE%HwMI%`J>KVhk{Ce$SOB}_V_dP%U#(fL@
z7U=vqb@tL=Y4eJO^RbdH*(Se;>pQgQJ3<*6TWk*><G+;u^W^br+yl3U0mab#{<Pk5
z?A#qEysrWLQa&<Q)j?MFaap4w--KtljScxyn|78%Fg{o}^oWX{W!=wv%KDcjg!a~<
z;m<-^`iZM3`<x=%sILJJC}g-EJzo7Ji7;G}H+kKYpn9Q!U0Cb6C9s$NNNIh;t%a5$
zgeCHOJ%b7s#!x}`qPm(lQpZb5T!oIIv9SIAMbh0Dob3AWF*$zBH=<&na2rKMA5XK{
zOx($x+d+zH`tr`x{h|=S|KWY^soK>2o|I~ftB!w!XRx7H>72_<zNVfvcS(<d<cZ0x
zpTmTrMn7{yAM*diZ#+x?oKUpKVDdU3_j#%4?Z-;LevK6DHU~{EGRV{&2A^fl5<I^l
zd4yk61fk#d3Hq~d|7G;(`hI+Juj-BlyYtlk3>{T^Bkq~0;+{_H*u@!Vk9EM7M+_M5
zkL_JnFq~j&$JVuHSGJr&UC+CYog4Ih7k8xK3e)|^U*DI`6V{uJkg)iE7aZ$blfEUt
z_aur|NWe5maFs>kEH|mDi)GN~3ZpTluIG(t`+xTQ?uYV1#q0S6^Pj|8uGzO1Wa64V
ztR`pGOJ&iOBHoGUm^|lfr4#PJwJH=>Ne=x(LKlbuLw`X)b?Dx3GmOmHvj>L}berBK
zFo3G^{lXu1O$>(8Nu}@Q+$_xwv9rASm)0UGzYt-B>_d)z9QJIcv?oITd;z(Tidh@D
zod3PvcDykE4%^Rt%wryZ+kjk2o6j);&)<}3a1<cUO3%-EVMZ?`mX~mxi+u8`!io|F
zEJF$eMMwD(&~aX6q_b<L@THg3%P61I4d{B1`7B?0i9Pfu?RZ9o!Glfa2A`#<wIor8
zix+N3OuJ8B%{3g$t7``2y4XZ=Q>EVvbfX@f|9-3dhgmEK=N?HIvXHI22HG_z(_LYD
z^w=?8dgo297ABqs2j#mUncdHX=*A5VY@#clP1s=5uR`98Dl+5hb6klbb$+mp2jt2n
zF3?g1g$EHOGN57Jb5J44Q4V0Jry1~xXqLk+aeU$z@Fx9rH~!r@cBy^-7&GbLL<gPd
z^dZ+dZ^F=QWdD5G%Gp{X*l~&p4$x7IQVKuDD_Kym8u@;oTCdWLiCJ8fZ}AQ||4hNx
zrJo68V0148#2Jd_7#|2KE_Qnh^u85M$|<$hPU8D8jqYWJTb?PUn-NYV7v|2cxj}{V
zxQ;fR{!WUaDxi(;<U_Hvf>QYUUW<x-LAkxsyC&X|$5!%@dPjw)>G<~9{SMJzz+&AO
z#~-pytn$d1aZtS#O(6f-XmnsEKqf{-<&XE0eIyzn$P4NwU$s8%JvNNT_>WOhE@sZ^
zLk<0K>4EtlF+Q$T`D>z}@?<5&S4|eDUiMwS=)q(vR$VQ!c*UUbMp6ZF{=aDY>aeK3
z@9P;tLIj5pBy~s;>276^20>C%LJ*LYZukg8gNSsEN{6&GNH<6~(jC(Mp5goc{`2v9
zxO4Bh`>eh8+WXvv^^Ax^s7F=VpV)-9=Yl=pzUuzor1&Q!Qur@!16NtScX9V4GmD>d
z<5U;(;^<v)P}aFR8iFteQ+bT+r;Z;EYsrPG6cF|CT)O(^ECQJs#&w$n2z6?~CItj(
zw9Ctg{QW5mYqIf+ziMCFW@=rdMrInAyrlz5IT55G=NVEeWfz#0AEtI#6>@S@>P}xk
zOad^IJZ$ab0+IMi(kAo@<x3NL0xmmtDSrPK=4xKDGG`yKLAy-NhV|)^dfwEC&V4w3
zIK%RgrpvcH>K}@}oB4%8mSb<cx#ZN_Hi8I*T6a!-PG;%~OTOe`-z}7_?vn)Dj}Ppb
ze~WTsQ2B|lhX*E9ZO63)xy(@CTv`*ctA+?;m})$N*?jVM$<xPF<UYTi67=0A%%1)o
zjE(x2$!c#;gX&QX<Dl;HxJG8v-##uZwr%!0oEU%0nL6wH2a2f!ZVLT@-$S)2QP~|&
zUKQiT#|s(Ly2NGjYQ%Tl{JaR(ZsyQ414&~Z+MYcJy9D~BS#wK0hQ-t>493?)d=DU^
zoF&^Sac_5GeEQE|F6N5E<QF%I{cH%*`f?eXk=`9GKHmI~u|F7E7imf9%83dhd=AC5
zz%J&@)`*#Ut+U3hpo44|lWee|acj~6sYO^1{aXCaA4^62XZ+P^4QBqf%Qqx!k6Z*f
zFJpPA1KCS2;z;snn$v$rkLt^_wk~6KH8i2=*i#Ia(6Mi%esiy>v+21C2iAWI9muY6
z5qg>97gF#w0m_LbPGz0=C{Zthtwf4cgH1M&c4(CM_>1l|YCzbbcJHbi?liuDG`w)7
z@=%2AS>qUr+--Exb=@(9Ue?l#xj$%}paC1AmuvRfeX+6K+@Fb>-$}J_l)m+k_NH9p
z#MvWR^isL99v|r1`o!tT_xhPOKhcS)frz?V=`VvNd^Hkv8GrSxf3JYb!0ADzqU%6R
zewtHusESV;NFA))$@5~<I*_lA_;RfBlq41)I~aRP|GlQpDhVi>n(cBdb~dQ|_7IuP
z=s&2VA1k9T{e;98B1j7%mU}CA2SrSui)!Mi>oRne;%2-y?S(q71?k{uh*z?SAMwdV
zBeNwfESpFmlD>Qx?3&0_f#F2s`F>%zCAsq6I}y5^&Y6m7EF(_eyuXDQ=a>;~jHqN&
z&0Y7XoB#n^&mOZxwU6id(rKC<jQ4SU-(K&J%%xV3yk&!jAb>m^t?>BmjGV?XVPc>{
z)SKxj_^HNBa?ZgtBOLWRgFfIZtAKtF&fu<2omij4eO1*3CaZ^aQTp@;jF3f$`r~rA
zGpDad{;EW<I$ltpcJQzmMU|*>rNN0gWOr4t?Y)rRMUV2e$NgyO*M_N1`xkO5Zh2N6
zmgejaf5008=heQ?hF+Z~>*>Ex_Ybq&tCI1Bv6p@!{zPc)FfT5n3Q{69O_^xz5~qw#
zJg3$Ecs^$8Nm>L*|IrIrwr%AdUsz9Z)RrkyaR!jX|1~{;7(zLR+<WUf=F<LZ6&#;T
z?N^(Q14wbwy+c%3av`<3Ip-YvL){G?kmU7ZPuB*(h&$G4{)oXMw?gp4RRP3NV71Ut
z>c@uw8suLQXsTB=z4<S*B`tp+i({&NV_{Wnhm{CM#;m-TsSf!yv0;ck|LX4QEMDUc
zQ~)<8{10lBq){SkY8RT_-5ie~jUaE)e-iikhphL=#^uC;sUlkfwT{bFS-)VIG(vUX
zuF;mYtjX*PacQ3|%Mva+XZmXJ@mf2lWPG9FyjNNpxz?-qQxdV=N?H4){ZVPo<ejp5
z?v_X8os&L4F392Mcw<isj#K8Jbs(^N6__G9i{~#&*$Yw>wgvuvWo&+QZr{K`Tj416
z2t}OrtHaiv(xU_X7|+w8VbF7WgnBXR(jIXI5;XtS*BJ%t?Xgr5=U^nn4!dZVAn&S%
zy020|p&HN*B|OLlRozXvt0;VfVbSgQ`;L8||Celhj)}1ys&5TWfF1mk@(b{;88ia;
z@&k3Os}Nas!TS527cyJtcZpAQ!pH7rsjYffic0s{)0bLqAUoS*+jik;io}ilqDrjQ
zyg&17oDO5YVO;`h<RM~sb9T7dFKNm6R~YgXa{0uo4)a<4XQVL0lj1yol-aA%etgyK
zE$K9#sI)gh*JZ{#hh}{kfRrMg1X_?EsD9a-;f(aX@eILbe_)}=I5>2DSlvI>o2G@p
zdQ|?FGjwMqNK;d>Y`0&ZHto2!h8LmUBiNMWP&P9Ax%o_qS-J*-+^C49%0Et_alIl>
zJXDdD5D!;h>4%<5{CvrxYJv5u)%NLsm1Uny<u5x!FjoeMN(k}A?MQ==|GMXJ<IHk}
z*OsW_K9USJK-UU83JEzHNvsyMepYb7ppelcs)<TsyfLmWf6B9rk(s}2xG*v?5KZHi
z(zR*LXZS|szO(Dz0tlX_Da=OZKigN3Ys!B|HE@l8Z{faHQ)iQgkTr4#TGVHH)XlcA
zRL<JJS-)|=Sp$L1fuy!I6<tp#EcP>|tXD?gKjUrAokWdTGOxK^Oh~q+=$)6<0xqe6
zHxFZwA=(;0go5*YP%h_NjO0%~{x?V7u{GMq47a?;?E2a=-?{L}=9r$RiE1S6TV2&8
zk#BOt%NfjhLWmD^kKdOlDmRG~bAY^20(vU$>$iT;Krp|5cvdA$)VSxItfH=bnbJ{7
zFjKaEBc!ATw_J=2pL^efu{ogN<d~VV0BF~8I7YEj0`Wb)nJ?e=dB|zV51d8ujP64k
zkynS7+1_*z(Y3E;j#&~ZH~%5jvk7_<Mn&3Qy2#0obqcVrXAb1gHF)gGUw3KH!dbnO
z=aq_W<?^ie^R17++mW6W;ri+pTysqBPhzjjyvBp*MzePQgfvP)GJm99JoJ@m)TIj+
zUak}W=0V-Dg*`lH_El}+;Z-dLeSs8PucSH?KOwbqVq6aMKxMh(lV*}C>gy$&*QmVB
z6~!AVZxWbl@%^>E;i7Ml^nT%cul<?Y;|^6Q>*mCn{O6ukulh?Ba>G>j7qM*R#nh4#
zppyO6edLhizGl@g=7MAie_(mhb;Y_Aln}iL^_*bV@0tg+nDa-}hCYOEu5V-@wUZOR
zh}P^3OWX1zE&3I1g(s>OS~VQBE587jKVy95p>}f5{CP;r`hIIx)0!5qhJW{oFgMlF
zC{@m7VSoifo!7KvP7Qa?Md~YWHGU)KW|WTiRGE)`Y!Ff&(D&D~C6m2HA3HRMzSFg0
z?H*~0<OYXbLA>wIm#$yqb$I!oY-^^*Xr|J$(w~QIVlgh|rvKpfcJth@4AMceL^1>_
z1Yp<tlPNcoLiyrxIs`A`S>AD^iF~NfQ$(nLL^IAf>J=6tl7+|=e3PwCeb-daar8T)
zna+l{8hm(@)O_Z=JuwztPGrwgjd^NXor3j~VQF(}3vWgo79pkn;B&F|uA<7zGEXKa
z^&ST8fSBws<hzYo$nS=m0tz%e^0ikYwB-p7Vb)uEj9MTkX;z|;BIW5UdPl=KTim_y
zI?WO6LU~;9s9OTVdN$#L{g!ic3pz9|pGN9&B)^oqMifuxzn3Frw~?gw=UIrnS8>rl
zWB=D36bvjkq?DdJYTs17*Y$_n+E%pyff~z~^7x#ZJZv8Kuy~=*anA8U7&0U=PLb9Q
z05nU>EW_!lQ)SvsCLo&XYTBsB%lE!p{?UX|K<8Z{MdfydIP;sDK5sj8uo|uNZepT}
zZ1bRY<s&|fzl)Jw{@EdSG~}10v);-#w&;@2Byg@ICD502>QllUmZTvj5J^$94+jsZ
zqqp3M5dl-)*sdQmJU6=0)%U(zrS06#@dgSyRY7CDZ)zDAyw6A%H2C_eo~4@*rs@jd
z><{idJA`NGYVL74m$V7b>a4F~aNsuNYf$pC>E?M6eRVH_HR}B2a1(F$#m<pSa5grp
zT8vI*UVBxK8nOCyc_$Q5{aBiWmCCUFiYi4lS*F?Aj}YVFv=??55Zto1`VTFxohlW3
zYH-v8Mw6NI%v`KY<V;2%S9Rl#rJ@j^fEjOt1H)>f&;A}g{@%r(jN54V<PTAf+<Z;`
zm>y1JnO$8!eL3qdXk+A5bn~p<2OANC)f%iu7l<O16C%mSos{Y(J2Fv6niIU(oj>M<
zcllRo_<g4-8|)+Lu1J{LFq78@@3={wPzi!`1-n;E;`@8pE;-1KXj*S64c9!oL``0U
zdrd!NKLmcvf8&A3o+p30K>o5^))y(Sje^_zZxWapJL`K23;d)<4cKAZwkbp6FkLxk
z=!oX&3X*TkAwJg2XB56&A4SH359y=yx&JnORkoHUg3QTESZBskH{98~AOuNVsl~XH
zCu4nAU39oc>2)%iDhL@-&XTU(-`vA-s#LoAQu+$9q_+3)-RbB(Hs)BSsDn4ImUZS!
z<Zkz*5R6jlFU@xD3~1>J#X6{qSnV?-?1H@VZTg0%(3JB}3*M|X(c^Nz$rq+f=1Go3
zzD4lMdtcsZZ{I+Fa<o_p2vpS&<;2!B+_R@fm1MHYC}etkuVHB2yichtb-ct5sa<9u
zfC>G``8{>LI&$^9_bC*T)$i#U27j-z=Ur>lS0*8J7Xj`f!~9gh7vD5sQBc};p;rM%
zlK95ul;?MvIf9f`d5_lSiLU`f9B<wjV*Xeo%lV$K4D=GCu^P9H3{v^#>Skl!>6$2~
zy3ritlv9n*EApkK*)H_^wU{QRE2MD<LdfUy5Way+BzvAVs&1b)#3{XWm=GE1$Do1%
zi5XsuPGIzrN{{@lemSip2zOX182px3y+w3<vcAEs@K{wYEa2$nlhi_I3b3<76#wbo
zF~alf%at9cDwFc7T;8ks5R4QKC#mh7A~G^KA5@iid11NB>KmOx(Qgi^P4K=H{%;ee
zD#F6qw6XP(;)jJIl0!&A>0eQ=_!HN6XCH=&Y>$QDtZrn%2=cs|S)HgC^#9EAPTH6E
z*EjW~AEQ1G4cWFlQUG!YOh9|P8dT0HJ3xnt<+Uk!i6CVfA-~FG{!?21`U&G#Ui0$9
z<lNe1P&=t>=Td&AE3TeN#(pBoeCOFn7R?GEVI}Xj##z7byu*g@-c~b%N%svuUp*Wf
z5<)ZDhx7PA*yD5~K6r}Ajdz&|e4>XIMZy`MavUKd)LR+y@>itppW#4|T(&O38aGY)
z@^FV<$&0g3xLEUG1{w`oO{PpWPpM+2S>li{1`n=Iib}d0)bqAnD6)RFE~c9EZW5NW
zXP@~LF5FjLUqovS@ucLxB3==&mi?o}y;jON-i7&YT!B1Y?92r_+q!2FC#0Y%S)G*1
z!+Y>!yxzS2U{Ig^;J)gU=>G9K=+tN_uQJX^VsM-}&8xHN*ZZYJ6?Vcf)hv6oz@z@p
zMKTf!F{yny_8$MMv8Q8DOi1im#0$iyZcOLX*9mvVw|Et?(757DZbdPjI+neb(3Aqd
zWK%)BRl_o~$NI-8x4rv<=26s{bA!#!aNpLh6k?dkn}q?69~-f!n`({*CL~k8o@*Jb
zstXd}|EVUV==p$!=<bAuW1r8AnK+!44c`-Pkte#!tuSu6sKEY7j*W9~^2AM#M@jX{
zx}zA0gg{sWsq&qWT`fA1DPND?75v%yeFwaT+egqN(Z^vimFxGQXr!oNm5S3oQgQ31
zgq6>KfXHC_wtNg-WXmA_Mki%15!(Kf{R<}oq2!u-RLDb06x#`S%@49-d6Ne>9H9N8
zE8wzWsnv<h_PiCp^l%^_p}v^<)wLUf3XdscW@49<rx{V2)Y}4qqhoQySRB4X`Nxa*
z-HP;!_*ZP5_TTphQUxPf%m!9^FFi*C?dM!;%{Agod*T^GKkr$-C7no8fIw0|-VaB1
z-A4;`zegCa`o-F7k47J7$^Enb*Yin+*?5*5du?PvE}>?G|EZmlbwAFuQarLtgRUVX
z)#V`M^ej&=@G-ok_}XR@EwxER)lQfF%VO}iZEv}-zgB~(3f+bb@9{6fC|kMyi(r<%
z?)}4=rz?scyniGS>cgZ_N}3H{n5f$N^*&PjK5z1qnibjka~}q!3L@NA6W%QujQ8ID
zy^&H^7v!fYu`7;cROx!!zYHF3^$8^mhQ99?qmXob$r@*A4s3jCr*WnC&tP7hU0_FD
z^51*-PsnQI#yv>&h0}RYdwX`AXRG*wJY@@oRT9{;6x(`=(f7-DuFQP~4z#{>kjcsd
zN0&*%9y490r~<hWou{kHx+FF);Hc@_H^8ty@=jxY=T6pJ>L|qm#ZOu0<sVb!x(Z_*
zGY^_MVCB#I_H^I8$a4vgi)WkQqZ}jBFTKD7r3(_U)Y&CrDe+;jM2~%wum#~x2$h|d
z<y8Jumzl29GmihF!;#rMw`$GjX8}QJZ+oAsSND9jHJ?6wb%Mxz>a@S!|4RXY|MUIM
z^bdQCL2@s+p47XRah=lpk`y$HglU2D3R{aoe;E#!A6(bGVBT>+n5cPn?#r3H!{6g5
zNFIeeiWB2C2xg4Y5_f6;#OUaP2P2a}YjdAkWF0tpwPQ!7%)WYxjF(&O;y0h+!9xO9
z6UxD7QZ)a}4`C#~qkFy96T9yidOa78lz-s@UVo3vLk8>eea2OaZz{Z19>2f(uKA44
z@Lz47^+*GlyS;Rq$erg+vRA1?EN%|&o`dbf9b+vF9y-_zbS`m7r2Jr1Z<3))N(Mbs
zulwQm?=6L-vSjJ2+A7;vKiO6~F|;O-NKacjCv_ESYuxjxI|Qx|j*bXPoMzYerRg=6
zc`y#OzNOio*W&KvMsMgs=k;r?Mq7$31TR?;h}HnKhM6&FBr`M2aqy#`;w%SpwKe01
zaI7u|Yb}iqFB6TKnKe%NAf^AWBEcIUrFYU=rh4bHi+g1xnIaGqmV~s_d3*lXrz3e(
zG;Ql&9`dZTk4CP07gL_`*p1h4Kx$+6D47c)49n=}z}=!+(2bV8+EoFpl4-LjPgweT
zMDwncX=)6hd)&rtVY~^Qfp6JMKel|=rKK$)3cspdanYMwjqU8mg|iaAti$`9WAN%D
zNg9c{xO13$XDP%epo<wh{?Ar0+$Xzc`%(oQ@2LeCY=670aQO)+`Dt_M4lcr9&VEc_
zW-aH53nNzX!Rsi_q4yqqtFLSS^Y3uLE|JhLP(`EkkDenwH6hi_zUq@{J?jWAC6}=9
zRS-4VYA(V&4Rp;7mldrP_8wH0*+(J?=}~hpGR3zQ*h|aI7JAwvqC=J_8j4;9LRVy-
zd(FJ-+QMJLaIOB}c6r(0=n#jLC%fH>^TAb3*9aYK+q7oE=zZgJ9gSqK(|fihs}nWs
z6N?O_uvluoKToxln1s9D$2-SU8~%}afB5-bs(Te+7D4}Lkw_M1?nYa;C=WfR_r0KK
zS<U5&%zJNNT9#>}=o&7eL(^d4^Q8)j#E0HOR{Edjv^kCW;^(?!1&)c#!eaT(n7&w#
zY7j?Lg`mD)-)~XKHT+M@DRhdr%1SX2X0Rf@st?hGjPJPpK9Pm9;@7yJXd`<IU-PQm
zs~?&?z^JuOZ@`AA?%s^_rc?_{bRv<{w@XcdMUM4>$j~94fz-T(jw+dRg#)5o9GM4y
z@KJOZRegFExhz5jixtP@X?v4)WYBH?;6Z;3hq;a2fY!!}V%iEf5lmHgR(vBnRdD?N
zp^A2CCa1y&ppO!?>Bx*qeSALf+U<wE)!c<PYZ$WYb}fb1djYK}zA+jo0^bhY=2T`O
zZtH=Rh$HCQ0^B52fSlUn8daB=`b0z4w%y(#iy~p&j-C(B>ZyT4#a?#d;7U{I&pDWU
zy$bX%p;C75=XKu%5eV!c^u9<L_UcasN*?zb(R9U!nr6WiZgkyWOh31qA$xeB)&FF#
zP%_}W8ediAr-hE^hP(_{aCS?M5mKUc9@;&f+1dM_?pFfL!~A*QxN49PvZL@0MXl(9
z{ihjDo9Et)7eRk+ChaaRvBOmP(Lmtz**we?pS<G$g#OFz{MIbwmNtQr(J{}zBcPpm
z-v$OFUp3$Bt_R;}UUurR1(t4^*#^BTZPK9t=&MBV1|BKgGnoHmpV^8qUP>pF86aK>
z==dN$bve@bBD2RCP4olJ-G%??MD-EteQIWMffBJyl64}~lUrg)E-P~Dfm+ATH1}@}
z_tWg^iAM41r_%{G6DfqWWSi;aija#?q6??nURo0M`P_E_zW<vAxavBsvP${yF`U&1
zEm054h3BT;d`Q5c6TAmL&9@&^<KEe&suX#bb9|%zjuAN`tsr`%{U9y^iR-%|_k8NW
zxFA{QzGBZs*vv_~=NtnH^$o7_t1pU?_GGxDs5HWD<sbs&Ix^ndHBysi(=q!afIz0F
zEARr&Db~dktZ~1r`h7HpKw&&j!Mx27J<1{D;xaJ`rM4=ln0Kp)4(M*17!&(^1O<Ec
zx4@CH-H$0v{IHmQY{eDdu1e55BE5Ro2D&-mun`=k%ncVSKud8;lAnX``i?TYKqW<I
z;)6h7Jd4`*R$x3U>}DuP;4<;<IXHZB5iiNE?c6S%L=BodT@zpZFfXe51}Np2thT*1
z;AaY;1V-Z1X#MZ~*8UfLI4T@+WHVIO7ohq6UDgsgwuAOP9?VixY0q<oGo_aZQy5#o
zf&+xJ?df=b-lojSI-{(%)A-=LoAx$PcvM9gOkxcKET@=-QK<qf9n7cOb33)^Mh$!P
zaEAgT2~H9i+1=Qlon{R1HIg6CSpQ)*Jc~+umd10$4Cp0{@2IaMx^5uq*YvJ}B2iV(
zQ0~SO!^O^DZEm+MM@ROhwlARlqn>r91bt8w_J?hR<6H@PTod*Jp}wY#@<V3FkY>tc
z7F_ASd*2J%E~WgeYV*&~5BNrHFzQ!&XNG?+-g}a7bfwiCq9A`_dy(V7R7o%|166w*
zAAWxZKXsZihrwbwZquHu2CaR{V=brIlHZe05<oEEd_=dKXfzECqmHaq(#qF{AmSv{
zudb?q41l2F5wv*!)+<4i%FrQa#_&N}#cz!VaFlT)I+rNN6rDd)F)aeGMaM@^rAB!v
z58191%1i<iGWLDztt;)l#jT*w)*hFf4WG#CG(N9I@AB>Am9@bUXG7!jk~}sguT$N-
z7r}!#daIA%tW5dnKz1vF<OtVdOsokigo+O0jq+2POfx=)TP7fF{4xas)Omg#l^&R!
zm*35s+hojgL%KnX6dky^sWdSL$~}tX0EVdZ=AO_BPZ;d*eH_X>nf}o^s=a=dG(+Ce
zT37-?`tEH=e@&<Q!;=+GroG6o*iG;XrYM7)-sHXuQ&mv^!GB=zNdOGA_!jS<X^4cM
z<U+pj)_qGHkEsdCBAz-=X?Qn#_)-QIjGXKZ{mX4yf5wsB%SLt@F(UTMvu`*k<rCPI
z#B76-h+&-&lB-PfurlXd1^DTIbDAUi?4|c%<?zywp7cmCl;dl&=EUu*`YiR)FQ22@
zeKc!cK%JMTKVyj(V_@oe!<*5WVU>&puE%}5%iX}#G#SLWjrwEq4>SLh%UDX3g&kEO
zGTV)o^9@f*oZdSqgo5YM&|tamCEwZ;1BEuqs!|ac**D6D$E+tc1PdZ(ZHzObgZaI~
z=UdzdpezT=j&1{Q)V{uY`RAaloJ3zO;Ci8mBO;+a8SrOIzc)42q3(UV{3P?W>EHgT
z%}l?)8SPpJaBVv@-_$+<KBKWav)Dhr#ipFDAaG@yXN^TlZ1}Ms8(Tx%ADR71=w<-u
zX+5*sQ<XKF1XaXMykifMNQb?`x%;t|dUq0teM;^Og!*H``>ZfXU`}8CPTtl?IQLSn
zx;T$`TdhaGGWGKNI_<txd3&$?xA*#ATbGU0_BCj>V-}Vy&0{zGZSrU~yAMZcdJfz2
zvL=766EY&4x!a-YZ72qcC6M1_Bk<n%H&i$n%*vWA=sHV8HyVu!FvGiO(5YHj>aatR
zDwLY({Rq0P`BPqQK49jPC`<`qrs&sjw$17aW~-sEtXxFn$=?Wr?v*y~eQVRqkV^e`
z#hy);4ZqH(hAIRVz<&J?&69`m@DH%_VnBJWvDtpu!P@_7rqr-$6rTz8uiSoZKpX?B
zlF;L&p3g(RQCo_UNpx*a{q8Xwzq{C53ZYp=@EL`XZZ&Xp*u8^}R?wUQNy`5Pcalc#
z1M3M)=*!8gtOawCy6psHwoq!cLg|IaaZT6f<N7)6hk3f&+_*4RWT0u{3ZDy?THoc$
zx4JEF@?p}(??7s^zir58t^G=0|La3@=Y1?|_1Op2x;`*NgZi4?c+GgT?JeTGWglxc
z&6mdteX1gA1KO?d5c#7FsXpe{RC%n|#wS(x0VG}BKB$n)#l4t4V)lSCdG4pKWCpR#
z3;?Z(M~3_(HX^BCKDTa+c&Hgib#-4=&f!d&5~5h^G?)VEJG{VfYXnV36zX>Prw@-m
zlcM6o;!|*)wgBsYQ~1lEmM3E%)3J4`5xk25fwybd$(suSRzCdwbm9H0vrI3=&-ccv
zyQFTL9bm<UuJH}X(v58A_)yHcGwxuP1^MQiyW_xrf`wLvtLBO4PlCXIy*NNaPazKk
zvS8m&!B#?qx8!f;qF0vlBMxAE_ic?sXit;QhY}pL^>|f(LZaHF`sl0Eqm^TD>}w`@
zUG{lHJ1EX_H?ObgoKv6>Wq}w#XL5fzpC#vnz7b9XzuIp24+K<};08CVe{cwc>5py}
z1fq9>->Ai|MgmL+e9B{sSqQz5Tv`ONxvPPO@!!iz6~ZEVKVGd-*EAUK@MbxU1tUZL
z7n!oJcQazwk3}LD%arX3=Xi_bhkALD$iyKE1p`~Bxd)Q^W?XmDiZA?41M=9w1k`5I
z`wcZ0E<4L84ELC3YM_SQ&dku1x$Vu%dF%R$1J2yvbX7<KvJzt>OWxJ@Znpab<uy*(
z9upd*Kqz=(r=IzYO8?zHBaudrBN!pb9@qFq2+HC7F!z~)+%RdL_tnDQ(WO&>h$nvY
zwZ`yw4`V$yiE~Ro%^j&B-FI!WLCGP8m76>YkT#ts^CY$g!Vt3Hs^j93IkDXUPc+W+
z-9p)O3~+w7#|7+?^3piZ-VNc|*i_`2T~Z)HXZ78MS5D=NB?81-3p;Mwi`;lHRqe9Q
z-J8TOs|U0wc=7#4pCvCnIEuKP3{XZI#uc_lb%07&PH`3t+Ulg}_Zfq>Oy=LUa;ud5
z6-qio2jiZ2Lrmcoi3&FH?PuiZML!;08;sRIrXx6)svMO_>fdK>BTpd+7)qqRuJn8d
z?o#6xY99G*9k@VpWi>A+-^V{lKI@fn7r>agtoNH;K;w#|=!o~7=e<czg$^yGh7i+Q
zCkt@+6oGh~C*;a$g<S**_6+x05ujV2u~?G6h?ncyi*-?ah7@iDWncs&C72qK^(*$S
z@wS+AkJCwX1pTW9i~QViymYJcfv=!=m-x#Kx-^bqvgIRACGVGiC6N>PZ;)@BpyuO@
zLD|MiJeyt7AM(;fqgA-3D8$wdlshb<x6AvsnlLIF!fA74`C+@q6FrWRNBP0Mdy1d=
zEfP7olydj`+)Heg8rfH{p^GRTX#!Otue0eKCw722(vKewb<fX}Y_6BaDQa0n_P{1U
zTk>qK+lLsA`qPSD^1m$Ec(aLDOo2U$tp=*17%D|h3BjOtZNqx%Dm^$RjYTHZxv^sz
z#&_8)O$bM=S-iT@^u_td&-yWArby7$j^GjY(F6dn@!JtG9P3R9OG$c4nd-j5&!%G=
zCPtU3^%b5whoN9Z5N;Xk8h0@llOsE8l^7Y`Uql?>?Je<_kG2LBgxBbR3i)FEae&lK
zoK9-A?+tI~PH50UYTf2%u``M!WOlM0dI$}Nw~eyT)}e#f1NBrc<@0(+)PsI{I4drt
z^(K3W)ERA^NVQ7EMcyL$c83cfqoTOtBq0kwJPBCf{S#L}(os0z0tG|WEq;m=Pzn?h
z`#bt$`b(=BF;c2Cyp|<)NUH(ZCxpkOEltv2?rcm-P)nb`^Yn~14auSsaY!W>@JyA6
z|Lm)bj42Qo^@dG|VX;rYT0DYVW<A%fc&5>z(**qn8tFqAXK(CkczUKHngLI+SRBZZ
z+VXfrnVU=bFXcHYNx@F(?Iq_F%eCl^D8dc4a6P1TW~L8(XpiC%h~<!{AfHXXJ(zFO
zClh?SnI0rS-TMC1JMl7)S$;GGzWIUo(E3EC(2(vdx1^byqIWoeRDH$66OQuStgxM%
z&2Hbrs??r2sVb&~seb$ggwJf6T2nPewu6~?NE%J;`=J0rdME@m21Jb;gam0=^&yge
z_1@uu43zkGpSWPEA>>1bXVNxUrzxQX@C1$>^}G9p1aOpH0Ug)EBWHw`ji-aB+|BpF
zJZ>3N6Vm|L|8%lR`iFU!VIy8|J66sOh3}ex^ex5|B^TA47D}`6dxRLF{);pqKQ&JT
zK6-Y~k9x4n4Itaw%Z-t6RfD<4WXNVfPPXUcE`Uj0H0UYI@_-jArPbK~Xmc@))ExV9
zf4*(e6`AXId;~`w<MLnS2x&W3#$e^PV=1j!DRYB}w?K25Wk=DNFP)l|-e=PXI&;Zj
zsPA?s5n|-ve{Bw#-Qo`2?XeY~%;P$6zD{NJ#)V+Kmu)llG59$j^1bFGc>4;pRR;w#
z5p9IC2r;6O2=s+JY8cYK1<yyMf14*a2jfY%6}t$_9;{*eVgCpM@wKfh#87*N=IM&^
zMa3=UCU@j7=@>{)xh)Ia2{_qab3VTzUe+dg_bf5W=~1T5P9H!gdTa*|u-wu2^Y@b4
zc%nzyyA#%O68OIgDZW4qv+sscPjqkCI7I(N_a>lr`EvqXfAxtF>JEtewR5aXN67Z-
zzMZkwtY;w(qHy>ETB>(eZLPZA2r}iaXn!B?8+NGc<($|r68ao~d2D!iyKd4RLFei?
z&%2(;I_?KtCW-}h5@uTJ|1^!^tkU|If!QysB?7Vu_U9(0_vj^m{RNw@1)Wj9d;_yn
zfiDJ|og&_yx|qa+;X}KQ_W($oU&TgZ#pH!t9PrtI`3D|;$rYNn19v-mL~xhlR9gFI
zlZrt8I)mf)`&7Q}sJFoB9_AKc&4bf~0@d<%P_<9pv}}g1-bw0vWo3Eu@u9?7sxm@a
z+Ls9D!}HntbmERU=%J;%-iT;g5dpZ;_fd~j=FdpiU-sToq6m=$MFawJ8{sBcCwTXd
zf)@FeYTec$j|L@XmUDUFto&JKi7Sz36hEDhQF)MLGa7g7sPDgP)koqly~M%06|$=s
znWfv;*6?nYoDFehgTpb<Y|>%n;d;ipuA9a|<)3`MH-oOBl9S?qG&bg=VMDj#-oFdH
z*TwuBT+BUhL^XZqCfbREjAOKXPHKrzv;eSPQK%ef@@G)78upE8gDo9~Rz-x=xI8j)
zI@O5;TkS#BkR67*;zE{h{}Lf>(pd3fX8Rh9alz-N*_a%@yy0`na1Dv6L8#k+n)`-+
z%S!owB4Q%W{OjX=G<R%R1Ue)2PXl_G>JGpreEoH9qzbmlRRwtr$FCj`K(wjRJUn7<
z2EL}lCb_7z5ij>stD63BcSSgSY!rNnaO7Ag#c_aFk8qx+!vK-_ELj<FkK53WP&Z2)
zDX@Rg0`IjZMj+G)NZWD)^7Ie5GqqznLQ?KN(1V?Q=Y~aF)wyg_QXEm>U!5=o&H81T
z^LcQ?V4rStqQer@<H`&de`20ju}xRDh%JJ~dU{0=)Mg?bOX=8`f)XZ)l&4M~5VJk~
z0QCBfdYdU$0WS3DiJNcGxKYF)k$-MO4-=b}A8Lqq&f2ZFBE)xXT4d?CW&k0%GV!pg
z-scwtrB4?4v)brLDE92&HBB=<-x>Jhj`HuT8uBYNyLCT{B>2S}@JB^*-8*r9(*~gV
z9eT)6Xq?-1T*%o_ov6AC1ESF>bwe=Ex*5ggK}CtKQZ{^PyiE+pHX2sU5YH<WU!(73
z`EhWQ_iNt)2@YqK<IAX-A~0yjx5b47!(3>d(dCEXwRJsEaMWMj^?5W)?q(;hUcxCY
z2ILePo)%l`gHhce6s`4(%R#?aSExCy_{wjzG05ykxPj+Nm|FxV3#_cw)8Y`^T~>N{
z7Y{nGbor^$JX$Xa$Dd}B{B1@Ht7FTi&-u6O<d}8cWkw4}5sni*;z-Ja`lcI$4$O|h
zR;y>Y5@P8y&SAyu)r$fN0}+q?_JIEH5G)7%_%UX5qXC^r+4EzGXa}auzK{yBTC{=z
z*cgDeahdNh|M6Gdg>VYCZHP6%y{~g?BUBJeNQ}y}4}SlhSE)Wa0OgvN#4mxKO_JDz
zehdp)iR(4NyJQd1)y=Xb!)EgyllgOQ|9jj^0b-$gcR<!JD!>eiEUtFTq1%C)6zptx
zhRGq85+}RCx8HlN2E&<FIkfGhxvRnTM2RHL&YMJba`bQCI*FLLMUIVq0z<E1aAx;T
z{etfhSjO#P-0gQx^hFJKA-V6=GwJo}6cA?UL<tJXD5WI0F2yT>)yp5M`bp@wjMg`%
zw@#?we}>GWczvY!-XF2SQ5X!U<^cY^xa@W+m)=}?WOB?yI;z_jA!!=h40}{YRsnjP
z0#C}Ddq<E+y<4`xu6}Z=^bK1T^;Tsn3)FLL<&?}X#V6;V=@|9|XE{Yj$|2MtSj8|+
z7u)!;!WScZ75#9KjpxzrOy#A(^yT*k8`2eTjn30*QZm88D9Ao<yxo1Hx5JAXs0G}-
zi}RAxvJ_SHRd7EK9OT<%-^B{s(0FSQ3Akkh8ak@*`1yF+rZ%`c(Co3KS}YkGgy<uU
z9Q;ZD$EuO$1mdPncQbmxq=f;}NOC~cO?0U{l7Ri5m*A2WNo-8u;iCCyaimUrl6d{w
z6qh(BPkWJeGDwk5(TzOM>a?+#Po-1soyHN!SID^EFbzgGv<E}@Xrk~=BO}BcWB$jX
zlM7}x<{l=5q_L{!-9FJLWcEE>oG=RTnd$}!>+YA8HAPyjtOW)Er2y?|mY{W46|AEO
zq0vJta?QI-$Me3%ZeJE*Ffvl<wDc$E^4W2k$zRqxc-|T$$;agWrdSky`8Zcm;*Id^
z;oJV@s}^B#vY++C@27$x5v2w<KE25#rKyoWzzC0#i0>RkkS=E~wgwuHYeeYl{+-Fh
zM2TY*pQy21cAM|uk#9ey;1jQz9f&1VkH`qyR|`Tt6=4;JjSkUr6mUPVWi;+AAI<PG
z9*OvvL5z1%cTv>m5614JFcu5?npoN=CluH*?fmD+i87S!(Aw#9pS%-;&{e0kKch1+
zR0g=^?kU@baNrRE1+H)}K74ovyfZwffnC#hjlgip!14yocP25fo7spl1KV=C7dE@F
zcBppv@OLZSF>mTBrGL)YKM5Lr=qug279q8S^T`#;Y|Lo*ung}YsL5+|*HZQT%zI2U
zv<9>dIDS${osOB;cavb#877vtX}Wb+AW9>+nl`qHHcLzv5AwFWHKhLaztso#1#IX-
zfC~k&&()@3v@8PzBI2^sV(WcCrT1}Adc5Mp)Z3z}i=7(#tD~_+V9G*d@Opva>eSz9
z3%cn#)SjYbATeb*N01H=;);aqz0bQzp*G;bYE=8aLQD>!xSK9KBY}~FH#U}k(0^xd
zo4;`VF&|9Nisphw?FU75R$Aoaa(UM~YEOf_R3JaQ$-na5uK9dQG`&?+IXCpA)ku7q
zT{R?F?$3tJ#|QrbIT=wzn3!r4;aaAff2<YPTQ|Q8i<CjANAWVLd~zzV$-MaFe3P*2
z`B6)IEc4Gk@Jw3(&Tse5fhUU;SoYjpwK*bSS%U*yMW3kydjM)dyGN<s=kG<Y4u@P1
zdIb&=C%9_7r9E~iy)Y7#NI}SaZni4?IXM+whyRO_4wI9#G44;14|dLHzYz8JpO~S^
z1dWBAUa!yjo}FnyVun7%*xcOp)sP*T8#&xhf$ZRLV&u5j)*CKI)v%!(w%HHyWzD3F
zbw;_G_`p!J_pC;yVwCo~c4O&b5_%wskIxIRQss?SI2*^CJUJ{MRc3&*GESP3&FzI#
zHD64#IQWe$uBuv&0*es;W8hj7_Cq0VVb)`}6?m=qJ(f}v7|++Qc~I1F?LNBM7TK@v
z;J)8Ven3+3i!rKBjeoZ73}aq1PXcEmrn|rmx3R83bPji3{yUSWm!a+7X?ci5`FWaT
zuDX;JA;!-Jqr^MuhEzpQ?%qaP+bGc5;TodiN@Mp5iX@iUUOk|pEkjJb{*?;23)Zd)
zW<`VJX<fo!;a1y^N0zDKfEc0ti=E~>Mm2k#LRi|~)XgFI2+1n5Qr%fCd={zZB+bk$
z>5AF)tLK6L8gA+Z@EZMkRQ)`F+hykFYPWWuNv5G}()^Kzat348?{l`m6#*@)P9>pa
zN63WBt1FSjG#^n+U&EbcukT&rOAB>OtEnlAoAQ*mTr7&WI8uIR&hn+a;yVFT2sn}o
zf~OIEa%*JA#cfye8@gCO`x?ggQYY!(n&Rv34O;gu5G0%a$JwgiN>W9D%}~H`SM1Z$
z)J<T5HQ)_AdQf;;?z7l?<asw$ntgSHmN(Fx&Jn#WXw>GMON}D1q`^!SGPjJO-ahl1
znzg?C@}QrU{&wkJqEINU%&h*f@#?qXHM|eeTsmj|TNAX^1{@?p;=dtdwc5Hyd9brY
zi2!DRVrJFSnW1^B?*b-s@gY}N^{btm1<A^0z?ezc;=;+rOU&b#VDcEj328A-NFtpB
zUaJ<rV>71;j>n=|{RY&DzRN#8t)Gk7<dE7a_Y>e-7jTjBtHWF3lZ|y64;scdy0PzY
z=hcp+(<u^TYFA_gb4Ng{k~6Z)q$hbJ&ebqVJM^t#CbIR^FA*6s>7i;+3k^RupQ(PJ
z0-{l={m!$dg`e!z9BzA3&JECedd70S!bii3tu?0H2}j9de=n{tChp2^D~(Z7Qo`l6
zK5IVaDSm@FU;D1FxZyMhXCPJV-DvsZbf#hM$@`V$#exbPpn9m9h~?(X{5bkK;#(40
z2(*tk*ewmu5xx>tVYep<{Fa&`pPC9{iREWGvxTZmt+P?URNJ>P2B;dNRSAhjhNV>#
z_G(DJQHLV4e|9=%=*ux!H8pLVN@o-hX8z%J`)A6g`*o7X>f(4?r`$=J!GbEr%lsNx
z_XQjeWJJe)W|zh{;^#hcwZ;57;9kGJVp;k4gsdusv6tG)<`b9GeRNBSPfES-XZ3}y
zC>PN&Gm$<~^bJ`P4TdMZ>x=!8W<c3#P?7{Wo%)b*s=u=E*kGKiRLE0Z5kT#SEk^y>
zON*9yrexHWOR6~no%C77fC1rSQ4YTC!$wS^rORrc%SF29QwG?ILTBGbXo-vvG1uu2
z`g&WD6)Je@0_y^moSp28dt~34{6zl!`bASE{{S86i5a;~pE-K3AIJL`97r!}G|tQi
zXRldP3vTh|c_7pm6;rF$SRm%-UfBFHd=Fr%e)!^2x$>xTk|~*+&W*jg*f+!9WQe9g
z1VMb!=0dK^v09U!O7Q5$llqgobRS^4^zv&FVjFYsb>5A1o>$DsHQjf9C96m|3vWgn
z$HZ&Gy5a=K)Z)q4lL?;^Z^;XfXkJ7lq{?T88akN2a8RnTU$j@7LvJwSWfjT+hqJyS
z`>etIK}vm*LjB$L3JSm8oLIGLeNzDOQNcosEZO2H6?eN@-Qjp=CiJzk5H{Ko5DEdN
zMSLs0NkPCl%(y>wtEzRT#$^$>GXEaYG7LZ39K(b}2yd`>u1V1eZ&fq)u*coE+Rv|;
z`B2^vIBYoy#{Oo13sr4E=hvwFud+vGiHvl4Rz+>fIi&wHyo|#fMW@oh7b*u0$-GrQ
z3J<H-$Jp~{@xt&Oo?Mq0@05{4cOC%YP7a${Hzf;2DZ~1CW~Asxq3d_{t64z6A_A=^
z4=e9;2n^U#sAyjYzTq|N`qCT$Y*vYYRiDV#DR6_18QC2zpz=QaMu*Kv+x4H==1fCt
z>E!Vp-#AEen0m_8I%LbZZ5MJX!&B7VS_#z~Y!ez;Kk&T4Y~*#EHGzDVReI;KKIZu&
zpsLG2=St}@yenbhS;G@}Ur2-P?vB|uf8z9L<@QA)fRjYpLtVJ=qg++u&YlO;tQ2%3
zf*}8|f!2NLh9UlaV=&MfLL?5})u)}3ZuVy23FUu%CBoCL^JSyJ`I&HKh|AZJdYXx(
zyxy1X0$NGX`MEc4^%#v_kZRrb9m~JdQjmJfqatiOdIv)zK7z(Np;X;}zxA3fOiY==
z8tyMRfwN-D2zOKOg@g{9$2JPmvBv>;-t`6AVz!>Qu>1B^?0(cd4S$KQhx9=E23xo#
zXbHR+cDlK~rfhOA#4CL;@uT_Y*3MJH|HN@)!vH(s&N=`NV4T2^G>lq^*rYA&c^tbw
zTv_wyR;wr%q!K;9Pc(3iHz5rnglo9lS;wqiPd9lIJ?7iLRDjSyImvTI8aodK7a^Cp
zzI8maVvx~Fhh7h;9=4G~^^F)L4cqRnZv)ho!^;b@7Bbwm5-dCNK>VrKbRmyk#qZ?#
zE28gTy)k=L_SlP4C9)D$gOT`w_<^SqFT{?L3+6v9C}<Wn=>WC!r|bA~Ljz^Hp?Whe
z!|QgX-hI_@(5gU&tsZ?|u|e)Is4O-7ZeWeg1zzWyh4iFJDYCsON=hfTauUA73|Tjo
z?hkx-E9?u}4uzCX9-Tf><Fgkr#`H~)jdl4Yd}Yzg4G}1_CwN5|{C~3m5zsvq$O8;P
z5w9&l$cYQ5$wZfVaA0Wx=mTeXG}}^e^)b1YGO;|e(p!E6#}CboD68f`aJ8Y&9|R6>
zd?sx=Pz?h&n9cj7u3)GBK8IK*IKrC`NC%4WjMP`Dmm2UhixT20K(O-@Om1eH^y=fH
z-#nihW!P7Ve)Be|n<g74I&rCvc-y1lT*zVWuwdy^mH(IlJNufe7!e%4s?OEM5tc4D
zu?cT(IYse|%#$R%I;{!?jQ=fh>!XH}#BArx3cXOv>a}Hv`<rhz;l}7tU_>1U%I|)1
z7<8R3t(5x{@9c~M(?2KdzR?hNEIT1JGoqK6*&B`J6%bd#gnu|iP}lMUSTRP98lD#P
z6w7yCHrB%RVNUEX37Ji^hl$@HEA$%T#-hFoLpP%La{52kM86TbbotJ2?t%Z;+fCyT
zyy2OMo<h$N+1^Ib&}a0c-5hg{i?5!D`omj=&Hhf?Ck`2s*5T|!<BMafKOUEMSbnA-
zHh*wjY^vr%evIB+J(w?bpB5(S-W#_ep=7@IoXv5h`V_mS`4>BkhRIL8ZYoIFErr52
zCf|F=;a*BHQ6tBnNKQrwn~Fp>4fuKe@E)w)he*32pqQ?8ipY97hM2-1v{fe4baFoW
z_3*{MI?aZGb4&n|MbSNHP9BnB+h<aJa>|vji_AFxp;4*gBesPm5(&`23zu(lmL%Vm
zW8}l6u$;VdKJxLutP%fF@@Gc#iSz<Jq&jO#4&q}U{|WwJ1#8z668C-TE_9l3{yoGa
zIx*v?ZBvqO54$T(>l;f1DIT_QQoj3NgC9a)ii+F47WY%hMmp1=r}xt_uNHxzQ0y%P
ziw!Z4nzgHZ@i`-|5oYAC&)gH*nftRHD3u@K6x8`7_jSm-_`<JCNA8+waK=^uv%7LH
zHRk*`t#tbz;;qVev3JWj-oI7eyT)sbgdV=g<?l$=?9+$+cKvhw1QhR;?>nL*$2D4{
z`D`U{pXPn$;nmQat)Mqt1nsycA@63{Q@%bjbl1)@lP%Qne%q=tm{Q>Bu|)>HMm;B;
z;njX%?M>Il7tF$K{^+#_ImCO76?a)Co}@M?s+z{;p;`=JKGJgGhYvQNe$Pna|5VB)
zO&Dfj+j)I$*^oV(P_!S6M3teNx5wLc;jyu**2W2v=R7+DW5?noO-BF-(u^esNJ}3l
zD_F)h^vRPIeX>_#{a~Kr^Z;UXbA1(5P_aGNAc4+JkVfF~TI_XkoWI&0Nf%kDU$eq&
z@jge=(y=6{z~nA8-|=(cKc*f$gGc4`bCM7`%su<>*IAUvVHIeNpgghB5jcXPnA*W|
z6t@?$^xi?^$MGoR0b*b02FY@5ayI?`EqMVm+=1y~sD@U&Vr-%6=4c&V6KB)v6gbAa
zW-Z4F)@7vMmSXY4z2y+NSU?57z|9Z-tGyrzgoz1#Va<*(L{drV9`LGWO7_^P3R0Tg
znQNc}PMWR2clJ{N4$<!e(P^hK{p@U9kI7sH4T#0|?h@Y_{)-(%G0){=NCS?YkS`39
z8_halbknaHEk2q6PzZ52p8jK!o{nBQjDyldWhc|#9LUB`icL$3=DrRa+{>VJ>1FkJ
z-c<OrNClxD#*nG|qI%f=`BSFLWcd$j8hRev<=Vx@*Z}<ZfQ$OVLMVrgvzg6Up}svR
zYZjYu=n&wZfjhfjk>~Q$S0nEV6}R`e9wl=>Qy)jggQU)CdFQmzHgv7~jAAIj1u+V3
z4G1r8lljNR4^ypoZ95ealJcAUSv2>fU-P1_%w-(tU92ygH#VCSr#rtGD_YLV$E)tY
zsrPhymG~Fbk<xSZUQ@2v1C_Rh)4&ED;tM=(jh4G&qu;Tq9zneEjd*==sLeA(|Gsg7
zqnJeJ5jP&js=eKnDR<iL);p3^6@eoWD$6FIf$6E%QYiH^^vCt%txaauT%1f+KPayG
zYeS$VL$V<X{ss=ZbIXLyucBRng}47P@K%jJ*xYgi?yO;xlLHMT?0k5SJm}-@_sU6R
zH!eH+R~n*4rmC!gg6n=6%pwn}tf1zW>WdiK+ywo|V5EHLoyrqdQ<-rs0R!Wba@FO%
z+XW}6Afy<02K&cnWiHPDXQwDtAeGNGM+ul$>kZiS2fjb90#47?*$GH_4RK~y35yF-
zIQ)dPWGsyqDa{ET+=|b|VHC@jtiof2#pb@gd}+q*Y&%X)-r<%Iam~233BWYKl+D?4
ze2i4Z{F9dwt5=P)S=V3Y7`YbX;$(w3S<`yd&!XpuXD0W6?8bz3S~908>z#WZ`i6?A
zbFvn#`$Yxw*@VuQXr15F*e%B`1VMsjELG4~^H~3o$6G4B0dGA~eE~R6J}et6?7h-T
z1{UyH6IS>C*VO;`E5)1s?N1>Ulj9SrTw%BhXud5^IX7^*9;{rc5-zy~CWYKr)luUb
z(LCwxGq5%G9PD&%7|e^GnXpoGi|00zAGq#wsmC;#tXCbR2oTw=<ylMfI-XEP(6b5w
z%+g#vdyXKD756r28NFxqk1Ji0(mx_7?tqI47L9owr-Rd6Z@0bGO8#c1w|jAD?336X
z(75>-nnJsFI1+X_yHgmER+%w0_PxZel}rn3o7~V7CNS$t@4P!Zvv3Bi>)U`cG&0V>
zJ?Hj`e&;vU;7FPw$E+08MX-ofA5L*vj1Tt^?vBT_XZVnnsaIAy(85%?6fls`Y`lx#
zsq<{Tq$8dEcM`zNj;uyR-(^Yu#fx7{cnMaEU+)*nn4xUv>f?nRnQR)aoFO-9bs|JD
zxwZdruEi>IlWa6&X($m`<gyFD2`QVhAK|q{MaOq8m@<WO#TXhh*)Sxkkt}d_#>WT0
zD~TUuV-k+}g^(P8g@>eP%e6qUNY~zxMA1~|ZKTf8Rqhm2Chkn`6l~<`&h;M*#~f%j
zoD5G{hAa$w^xqW){=C2Te&5~qBl3j2&Qfj#=JwEA5$Y~StuI<DSUd;j;Mf2-pIuZ3
z=c)=3>CnS-UE#v*6vr%!3Qwmw3Q29v(&Q29<<mnN{^IjAxu?nGQbl)#C19%M_t)O<
zw9ETpRokZ*mLJJHU-`CIbNR3P?G!(7MV=Qs0cNE%T0I|jspd}au-9yrsBuKH@Qw$7
zZu;wQ<T=+04-LnrEbLhv_K3_p_2H<J*Xg8JE-JkLY+0Ur!%>!hy;3zsB&Wi~8um)0
zz{MvyU3T=?bV{(|^qn8F<sEQ;G1K`4ey<qVxq2?q(>+<l56(4=5^)V$7UIB|e+e;E
z4o}0_y9+789FK9|VSt!GFX??1)cUVT8$Yl#MF0*JC%7v@c-N<wn~!tRIMPYxyw<OB
zv}L8-EI}EeeuTBA-*qXLA80P0kcP}IkvnJSed^_E$Hmn8p#NoCl{PA+m$56;u)+J+
z@>g9>pKDL+i4yFoO565SF=f1L5C9aSuAIQyBf{c~Kq3hleaFq}R*#7?R$~!V56|eX
zuL87ou&MTg9ezCkcuHSJh&WNYgs+=XG#Ia*FM!cg4t(7|E~%$3(v3VX-TpW?_quC8
z5j3wdCCeDa2tEdFf3c#o=G`Fb?Ka^#)rm%0#-;aNS>#llioE{)wH;F%7R^i<ZoJeH
zO(Eo9s>Sh%MZIeV^_Nz#btVAP_q@Gz=6Ez~We0N)25DfM*gzr)l%757)!!>o`PgIy
zI_c99&jXZs1HbwAJQH&#<O)=JzQP30<<DJrWN7&_ze7;E6w>GbgQ=!>>CDq$x&|3~
z;<2o0Mqfedqe3L`=DnbWp-5cFfa_tlTeqFgBoD;*-uioj%Gga%#B@D@g^yA-lRaOl
zXr)}eryh4F0hIES$iWyrUSe%O7c=V>ADq}w%b;9iAS#U4dx<!2cX_WE!lNavtgI3=
zUy`yfv+a40B15ZsO@d)Qg+n@kYse$MWl=Vlctx8slB{IK%PqTuuyQD|whH5-rnPoR
z-fjInTlEs5{;if{_;c>=gCx_*qsT-2cS7pjnnecTLXIm&eaS+uz&2bsxzuWmUC*(X
zFJ9D*8~B6=0vl%Ibv1881$Csu16K~d1>@@|A)}U3uR<Wc)2~a>W8J(iBrm6Ldrsl6
zar?vUW$YcM6$>UdY(Kr}Ol{yO*5R>x3~HXCcWOME2aLW-mCI`s+x>k3kpv`Rr6<90
zI$0`+@a@iYm3BGn)mS<ZqKvLD&wc^Z^X>{wl%-Z5#x8DJ(bJSAAVdH6L$g{s;8{@j
zQMIM+SWR&@1Naw+4bwca-{IKf6za3@i+@P92qDMZXvWQi9)Z4=JoS^~7fSMmCKP%c
zhPe;_A7g(RSLOG-0i*XOm6UFf5~M*Xkq|Z|3Zft-As`^#9UJ)3DJmU;BHi5^k?uws
zM7p~<Yx6z-b3V_z=dE$?wPwxCnz`m$Gc-b$NU$*o($IAxTVG#~Omf(1I9Z%1F@g{^
z4l9Q1BRRAE+l?32n=?8JE-D$5>frY!nCaDiAEAd=uTH%HwUEz`3DfU!>*QfPYwHWG
z>iTa5ifxM9Eq+}|3hM?A$>qd81RTP^S*YGOj7&;Qn&Wwru&NPGbVHzw35GN$Q1r+1
z|E*2~*A|$3j}9Srymma|C4D4NlYQU0{rftb4CaK>y3i5P6(wWNvPGPxg;rk=%Uyoy
zuee7<C$H8ZhKb=?Nn0ek7R$<jX<H&z855!(_ZOvNy@Awqmgtu9Mt^)(0@2*eoGg_G
z>p%%9cV_H;i(I@BjJS3Ab+(IS!yWql60TfTPL0CDMNn3!JvjjA0yBLSIt1jiEN(;Y
zn&wr><-^UK>kgDI(dYg&&U`*vAsxCwIzP|RS_(cSfj<8ps)Ny@6%!+??#)Mj{*pI8
zy&bdjcMa_z?!bjH*F4vdzVtzgGG51zi41<T6K`_)5uT$BKtjA5;1ZQ7rGm>-;_4EZ
zGs)_+1B}c#W?&HZ(_(jjQYb0?b@Nz(Qq{DLnVHD;3P7KqKnCD!sJ3XZ@D%2d4ewh5
zi3_9Ip8_k?#W0BD*TXkuvw7Sts0sn+m$)}AA=29Q+D$TfN@W{!_q_=Ix(5`0=ROwj
zKR&Xyt!Z}<wP*}y949-{YBQwr!;H$kLV|bDs7AMQni>yNloFM$fLiG`6YnWI1!*Rs
zDdmd{D{+$J-h-<R|Bkt9oe!(LUMK(P`6&CHni#w^j(VD|5sdHdbZu;uxcc-S#B}#F
zroqx)LVQVuaOjd2`5rofRZ}CANB-j4hQ?sSrlWc?mhqrH;(|S5s2_Ryvy@~!YfQZ}
zV36;M2mXOE_GgnV@k7Td&t^*+3aX;(MaB&zhE(}T5uhjv4slZ(Ow~xFEv1nu{4^3L
zR|Bz*`H$S$^ky`-oQbEV?Wq#Yw7gNhB1@*aYDt0kN^_6F*!N|sF+hz>FinL);dEk^
z!?Y0*5t&-FsvTd-khqWyR1GCyPP&U+Iqkr9&DQrwM657-2ycWCS{>89G(Sk7%TCH0
zGGz70ITI8JoqpOoQ2F(TjOK^K0;zVHcwaZO3hN~gTwPvW?kBc0W8FVoq3r|S@w-di
zvm}PR`Xov1!yzH;<(8D()NntysEAfBI|)e`6cbxdq5zi9!D?t3`MR7mDT`-zj58Wj
z^`#iN#v3Lq$02BAyr{jzsPCloyWEG_iPhtOn22WoM}4nZGnBv7A#p{pDey60bv%<M
z%q(=vVBxg)q*_b)<>NoxHcuwfYDR+up$H*TIKpCEuJ{J;b4}J#Cb2g~My}B_XX+O3
zOwWQq5^VwJA}uB#u74XuL{5UL;=`0!Ly;zi_WNJ?Jm3$$x;(q5YV}62QK~FV!coAS
zRk=evjJ+<5=lNW5wLvo)t?1$<+n>qF&;Z;NqgXI@J!pHT&h%ZC&y6>)#8x>pbxabV
zS$SQRc}S2vTRZ;iBP$;|(p4nLTMMd0bEWF@HB|Yr9QT?O>1lLn2Nk6BT=5`ye?1f-
z#NvbXrGNO!^r8t@RV(KkEN2KIJr=u{IrokziEKIq%;)&pQK}tX*d&DcndGm*7e^0x
ztrZ>%DEA&c>BNWsSRD&g3`yl&6P`f#rjV`pczL?FI$p#8qQMAY>qcP6Jf*n%V<GG5
zU^o*Dsy<)Oi>kA}IzQ5T>bAdBS`e4}RvfB|=t+ZmwtiJOCKS$=)X*SpV4eg>QCsJp
z6pVQ;5$xhC>P+5kG^E)N7avPl@q_MnG)QTq%jVbIxeD*kb%VQ}kE{~jb=+|@gf^e#
zRq?<0vR@G#%;C3w((vl>)XL}j@VfU}462^oDfIg9=#!f10qOp)@i%^UckCjmoyUPY
z<W2OsA7Vc&fWn*H<MmDMax0pRv4VrpIuzR72XN58g*xSCpD0w4MM|EAWtwZmxjT-^
zjq!|+V$MG2?+x}zYQM~syBtJ}FKWbtb1yATIc9|*)h(^AapI78ZtA{GM<ycGJC;`F
z=04J0^i877GsI<&(gvGOdjS%AL@GW#@YeF+)7o#x=MA0XiP=9R0Ad&=an8<DyUL^)
z`^Im5IExUK?oQja)6wZUfVz(1+5SJxMo&>JJjz#n|A^HK5(_M=9<>D@d{iyYoT)&&
zADn8V(eg2l4_}HIQ3cCK+m(b;(QF?_(SF^pyQfY^w6--X!DVRG&p#6fS7SExXlc##
z<Yvk!9JAfjEU%EbY8V@AYimbSNV3an&7CrBpp*hA#rgwElkm{VW{*}fLb;wMme9<o
z3mwwYS{ORke5BYm!fHz4!RPF}ZtpSk{#4c(3mMYqx~lVJ%zahSnmvL6BBQ|v57*0i
z%Y}ZmZ}A55R?<W%ieEE+y}^aN{Wov$x{m5RaimOlYKJ<(0D?YF^6W{k=jYEWonlY4
zr9SF|DoGe?hU!6KfQG!y#K503$c^OFg5I2Ct1z@cF#^ane>fmWX*1=|180+s1g}E=
zo30uGp(JtFhxcMXxYfCauxtL~*=;05cw9`=LHiA(e@&pOpNo6YTkQJ6bh&!os56`_
z!cQJk&j~T!%=i8jL+HceG3L9qmcMSeoCzTo+<KUE=_?y>7ri7^hopTqV}F@&`vsf(
zYsdb{SU5HDXkAj9d62X7g`3l;9lWZA6>pyV={$Z>bKERP<F4^=Oa>0meA8D1LRGJv
zQ%b}XZnZNbq9x~40;5T0WLiCDNAbG}(TGa=<$c5s^5OKc|1jy~^Q#>LC=H{yCH|%#
z;^~el;`E^a2Vvhpp~EWi;@8`vokCVky`ga?rgg)+5tR6cOP%-aLk<2%GsUq{_JWlu
zSJB_Oe&*e(pmQ2%wbT|%))8k9-=Y(DC-pelZk=uLusbx9m|=hT8>7#pkKxxJQg=$E
zwMYS86W%wQPoi1qrz%j=8&Q4CU2Z7gvGX=z7C{vTQV1%r6;f=($&xrzq;yes%(N#z
z=)<&i=Fmg@a;~TMKj2;PfZEXFp)6smSCio)9*^Q5mqjP;?oASA(r>ZOlREo+K0jlI
zOftQX)1YfGOl7{-{)(pxZ51Sc7|4{A%kXTbhxb16&&JCZTxEKRi_grs{k$iXz?AW-
zjLQQLyt^BI<M5(Cs>_;J(sCPB3Xu;z^T>@j=v`1MQPRV;e5N+6Mpjh6k3;XaM8u_2
ziMQvv>|G9uk?%bBT2bkZ9k6Vv|D`Zkz$Kw5wD_Uzvu#^*gED9ubKU~-MqF-}7ohJ_
zA`-SzCB=?{VW*Fi>z2xD2>JqtkJlsKr74TMpdn($?%6*y^*u3?yPT7KcOx%?sVA%v
zjX7)b!-k?Ki{j_~1DgN6t}-=4-&GZvBOXDg!~kfE6I~DY_>R3zWHQ(8YjrJg>tsPQ
zkJ^`7EPsy8KI*FuHS}0sWDYfg!q+%)MMmQJQyvZ#j8AXKX6l<R9?lXlu@R{Xdbmwj
zKe6P^-70)mU)S@kw8K<@2?FH0sol{cZ?YsIt93`^r}XU^vSGz$gG}Mnf;f_=&4her
z1K$J+V``C*h*JT{e*DFbZD02JyGS?jK|8yuhKq#}xX+)?{vs)m!-T5$k>gWP?@h_R
zvzgV~_x4c|?Zaa3GqrG%sk6($t>3nowh3={6eyww9xwC(GVz(13w@t>naHq_ihQex
z+F)!w0i1;?*Kl%4j)}Ts8>?hQToS^`lL$_R!$<RTYR-O7m)R#SU~%|b=Vnk>eCQ_c
zNfA4#Ufho7H{$a+w(Ln2r!i_XjujTNoIrH*Hqq)-S#z(v&Z);hwkS}ze1;k!Q}m3f
z%EK2Tt=i+JpBl>=9zB{Tb%_FSdU8Y*Il|iZ32y%5<yl+<12#8rv)?C>2wh*HA?J}9
z#sEfEfVsTOzc^h{m)+ElzuQBrXD!8dCDJTD?%agCG9^3T`4b-$Rv;5XXk>n(UHJJ)
z!W(XIMaoiDI_)U#jfiE$o<hxU%U?cjH=H(k0Vh>1ojMI3jJGnm&Ns4FCUV4m08Z&B
zRL5xr%l1v(NdRp=l2AB{dU$Lsu-|j}kpfGyHDiOvNn2Ip5%-IfCuB}e33RM~_eAtu
z7cfyMorvu`L>z)4agfk&Fqk2mT~w5^V^<|4C^#8A>dmaDg+EvN&p?%159bl)S|y&M
zh+vCwL>e2E4<b=$4%^mh{Y)Q?GBi>rwl)$*iTSP7wGdx<Zu+CGwseoOxDQS8uhJaY
z8vbV$sQTyUaWh46`i=RO4;p=R^~*lAt@VYD#Mld%%-3-G174v;!^xMV7Ue`Pl^2=X
zsIwk=%OKpe8wzgO#|g8YSWupI+ELu=MgZezl%=oKl;k%46MN5P^6V&SE!nl*1zZ~(
zrgs|`+i++*goGIs%dd*&Xw{}-xwQPQE>ebMi}V_HcUuVm`r-136jtMkh`aJu&!auP
z+-+GM?H1iO1);8Hsj;Hg`1B}C&Rj6dW`pjTnYB4}oJVG(*H~~<XwPDyB8mj1VgB?^
z0*!*$et!qoc47=9@ge-?Zo7^5OX`xF{(=v$`_PJN%F5$Oc6&e{VXwl>h9iZYdlFPg
zDy?O0TWapQuF<$`*xGV0v@6GUkh=h~3lZmO0T-WwO~(us5*xQgZL-T*y0Ce+Om}cm
zK7S9>nbwruUn`3p{XKRdU@cS0)FlI+&@Mk55f8&8x2>A<Y#1oxKH<vfOKAP0W79we
z4!qCp<<4w_-9|x`bG*OwzrS*xK3Qe7cOl&Hz3{#VKQATP`%lnLWjG=sk%F22zff$}
zVjj%%j&gT!=v!cqoUj+qTPeQn(vz)F?K$}7vvU(<xs}$DELGW#QSTURH{A!26A#3T
zRUaD(e`8@^wbm3CNvMg=aRYXvFnC8<@ceW5w&zbtv@6Fpl1k^}UJ#d<u^+zJ!QyJw
zzgi~gyu_<x68apZPE7PHTrb9%s0uGn#D!Tbw%z2*Ik^>14XA04hOxbfk3Ml)o*viB
zE7`H-ek`L@wZP8c{OgI@V%%z^qgNj0*^J$8K9Q-#)Fj^hv?E?DK4G%7@V~;U-qd|q
zU05RAl$KBwx+cy%E94^+kn$dt0vkd%ykxwHH{2@D65{@t^L1^m9}ye&Gk517h>Tu1
z%$Gko#Y;|USA?z>Hk}1s>b)^jPOd=0qnmST3N?;2Clj`;iI%b)J-L|QY*ZI%I=E{~
z@a4h<%Ay1<jQ-sG!Mv)w7m)f~;I30B;p7>?+5N*^J(6m95~q_dyQp}vRaN+&S(GKo
z!D|Kv?5T~33fR3=Mk%<l0{r_;oX6Xr4@)xNSYAg&qmhQd??s7u^itCt*fiVpMZlj=
ziWe<Dt|-66xO1hO+7K=>cap0s_mr!<zQS#J%J8?p*y-6@NCuk5%laonhY-yPvUrHl
z`SgdQqWepkY|F3$#Xb4vKOYipcxQB=aKW}rGuC1Xq<qAls|eW{MzY@qk1;v?2C+HS
z$ZUI!o-MO-lk9<B4eOIkqO(nWJY^eNtO$8PmqZDzGx}(*-+F+fTFvQF5GMcn^3O84
zh2>_mJ7t|ep$>Lq?Rp)>*27i{A|iG2z0g{w+8LFf2iBLvApq;3QQ7nQ5}cj#xysV5
zYQW<0M-`#KAoO<xquCC9d$obC*aiPuxN*>tH7lt!tBKi*OBWR}XCJ&PwGE@s0K-U7
zB&oa)ZP!g?=Far7U>xL1uPk1Wd^Ae%)d5yuOU+i-h&BJ-@!dlge2m@u2pg(?FZ9fd
zmSrN5ph%~YKI9=Yq;da1GWfpJ;m$ukgb!jEdctrUs$$|U9?g>t5@otZY<KFJCj1q2
z^{;9mQY|=*rpZ=lbg^|}*JHSfmEz?~#i@0oAW|K5%hGSst1<nM#k3<FsB+#b|JX>b
zR((Cm#@RV=Y!6%~1MdlN@XG>z#Xl{gGWe}i*3<1w@bzOg(M|`yFu{D0?RH-pc2?_e
zIF$EVG7Wn^%&pP7^Gn??PvPi6mn{Kk3aZD;!fY{JAmwX9&obR15NVYk*A@};QCd?J
zDIjWuvYOhSiQEY2D-~>ziWEHXt9JV*Y?~;0!<?K_lebX*v3P;hQ3F<u-B*R?1)C1~
zg;VnHQa3m^F*M~x`|B7TE+)f--l=gW^1nAH!P#=FQ`RE|6-OWR6A*V3jC7aT7>HCU
zX(NP|bw)atTdcn!H(*QOsfEFndAPbT{rh0c#)qcUczeh7b0<sV)s_u9<bJdspv2oy
z{=?!2j~(TjZt=?w%Rd8D2k#0kS48oG2Fdxul)_I7o-QZF*q-n9Nx8rIkdLJG<uoPK
zL!JfM(kG{oo4i@F%aIqdf#PwpdZlvcV7tR3-!&zb#Y;<I^$G5mL+utHNPh1~le*{b
z)9*CmO-WEXUWW+tre+N2d#D7TasZC0Ixgl9OaUB2%JBc=0{o&onQN$9J(=h%X&oMI
z8##Pr-<dmQQi4>1vxsz3ZgC&(AJ}M*H1$%3S<S5YsH$xMde$!B+>tX}OtcqU&ph#5
zQ_}whh=sO8ifm3IKES!6P_D58ouI%#tjlHLre{^)UnMK4@3`0!2%sZCbl?_SLj(y^
z|NSRw-;cSQ$0aEVL(XLyR`F<rGut-eiD64gLPrV|h24eIn0m-RvhF;|&iJ^WJSa-=
zSM--s*j4P}g3aHQ(PVc-fBTG^k1HTFKcz`>XaP2u!Hpi2MtpbGgmEg?jq2r4zHwZt
zz)QH=L$3Lq8BK(rM@rSGte&7`USW7+G5@zrRs4&Cv>QAqUf70yyXnTe9>k^9OEF4(
zc8hRSS%~tn**(ahJ(3QEofeyqa_mgH9W1~9+ZHiVU2<?k+An!?IdqMt_FPiF7J0!8
zDH&X*)Tijc@Lsmo`6m0sHDdR{%*4b_6ENrXepq}u`FlF{QwG-azc(y>W5?xeLrEG|
zj&{AJoH+G}vd<?Mw$9ahc=Jpmbq*@N2ZU}U$!}I;GwIuFO%mX0oNyMLBZ-khLZLdG
z;*rb4l3!2CZ-SZ|L3!vy>H4O(oY(j`9kJn|5=pa9J!O&?QbmF(W8j|PjuCIhOgw=g
z)|@FPKhCd;alNU9gS@u|UF^%wOV<}W?N=vrX-<9Jyazu!IF4zPD}Ru{9s{Xgs6Zf%
za2rJ9LsJ$TcWZM>d$uj~T^zE+*nKDxFxz753`--(I<+{axiP^WzwL@f_`2wZ57BGu
zyosi)6jBDeWcf;wBdUAe_(vU6Z=7G`W}kjz(dnLQ!JDfuG}_TpbMaZfQ{z8Q#alf+
zDkF306Qf>29U>PEgOd#A+tZ%0xiE~V)7vgQvvXUrtWyP@?Fr6T%ndzOren?M!q}A@
zOc{|65#6wS|2KSA2nS_#p{78GMm3@CH#MfvsZ3<e4c<4_?tTxLX0*F8NzicSHzg-0
zU%;q+ogd_|%4j+2;{U>ODghf!D{)Dq7q0dQE{J1C&3VT$so%2F1Ggk)q{Vw2G&^Hr
ztM#=ab54cV>r_R>Z`o86`TFgbrCsIc#Yug&5<?7v6w1IevPKx~RM_}Xd~@I#0NK(o
zq6>oBDF)88)OF@*e;qT6)OnZvfn_~v9-}>Y9*L>P#01?tw7<!|r{upC#W_j0?qzws
z5IQA!S|xQrLZmM6smP5nUy?k@WWQJC#p_k$oe%{U9hJvS8Hr>zc~hz#o<wIEs*fHX
z7c*x3O?K!L)osAY^%MjCE&k3thlrSse9Olm0NfgiG}z8Pyl+Z_ShGD}?L+6o?b9{b
zm@j{Q%8#&2A|O?+n|QQPZWxa}FD(+3^O2(;2fD$Z_gN@U-?HZd3`Q8jFoPyE*EmVr
z)q2CfEogbv7gaE^Max$;;DT5zAD$1;lU+z7T|KNTX7`((fW|?h|5B=OId;*`Qytk;
zw#>leNwR=9J>18;(?Z6c3K;W;ExO6>r&{BAIr6O=>u5ImBI-wFP&nEE_tB-iSRIJs
z;BS#<ZwWG}SDPcz^3~@Xl({badVnRbO)v65wChtFFG)3>Z9_Wl?Qp#qOe;L!mi0i>
z1R?OK1(krYd7($F!|ECqIkC#AE+J@Vp|3&aij8(kg%EY?yHSDCR9dqj*E$RfAj+Rc
zGrU(ZpA?wdmwpMzG|Wnx|4H&k{Sqdzg4Z%_naRt+AWe?)S+6v5n&!$OMvzhAoV_a<
zj|}6cArSL&DIv@G8wVcisdudVjVBXijmtK+>O!ZLM02F8=BOTP0s|3hzgHdvmp>er
zn7CsQ4Ul|igPM@wT=;MN-w%(;H$yq;L9ZM&7s~_dJ4{Uecn-{%*WaT#zbBq%h<Zyn
zhxE7bf!DH}Up%mP*ddiFkL@TZ7X9>n>_#Qp>7!(lT?s;vFuU3d5Mi#}dtH@<KUM4G
z@k((^Lj2;_M9~=c(AAA!7uXN$bgG%GkMop3Wxu>ZmIwSfJn~eJ47AKVJYnK44$ACm
zZCl+#jLBd?pfqH^t?1?o=n`T*D-tU3f84v;5dEVzUi8!Z2;H2$6KLc^%{4v9wjo!^
zOTp(4nD#B{h7L~@PUxpt+d|A5|Li|BI-K602$!0Y1QzWp1RX){q$$trVnxgU$};={
z6>z!l(@0{`SMwEK(^Batn3cd7Lg2+dM|YnvsKx`l+Jgu2==Gkpi0tHd%y%~4f(~~z
z=UFqLO<LP7q{!k4jY<X9SC7}0sw9?L22WeX2!peKmg7-5XAX-|y!tkf;V-Yw>sSTD
zwf(C!mrx@ZjR_ir$+!r=dU#qNge4rDz1=1BDf<<(d}RKrC+N8c;@_`wp7=PN0OwR@
zreE<9g~O$Eyga{6tX)SB%scb2XZT}Kt=zqOkUb63XQ}jU#+rMpvxWzEisvG%R>_+-
zK<z4z&L6A6H#Sz9$8N_^hIoklGBi6@{B+)*EG3HlMVDL0q?_EO8n$G=lT!H~i>-$1
zI2m|_bvr0t{|+qi&`7nJoV9l_;EgU<c_gQjUvD*5gw_oXj_!f`r+F*}H!P2jT={!t
z;8`l)ptDaFLzBBxJ(85I+81eva%s=MmLbL3g0E6Nr>9nq;P7Di^=l%96DQKusb|X+
z%~``WxZ6R%mtmRA%|tfN_s5-x3f%4P69TUd+Z47Ro+*}V(fD=Af?6BM28zzKTWJkQ
z`3=dR2X_doZrMbtAIAAMB7R<+<t}zgIRN*BT~s0cMyZ>g!ELPeSrv0T&K9pCoK(B_
z<;$a1J+Xh2*fhO+>pl&xKBf*peM`aW>N<n#Ty_uM)$uC}ENWcw1_hg^&XZVYht_}s
zt+#WW)0Z1BYctth%Wo+2@b`F97qwW36YVW2ZYFGt4KVNLRbyic+gfx=$D2;h(H4yB
z!T*mkYUF=qR0C5zlF=`qn3*QL_y_<Cn+q2)sHz$)+E>pwXKsw2PSM9t@xl7@Xi)t&
zw4xFCeJR~!Q{o27--LqgSvIpi`Kz+vdEtxt!l@=wuM*>Oi5@*SW{#ot(L8?BKH8py
zN7yK~OOS)})?|Q1VGY)2HkG#WkHdTp%P+WeYs-5$S#zyHMNQ)UZ~ce6+OT3IrQ{|`
zqeM2bWOTHzX&vnYwjKXg?+@TG<#N9j_;?)fbZG52Et8#~OV*apYPwtJq6X+a$Aj}b
ze8B=!&w7@%Zsx{3SRjXkoafyg$js96ce1DhC~U3{Fapqq0$k_&sZ(X9gv<SDQ64)D
zRhAa4xz1n(JkM(JTe1vNb2mGj>t-}Q%^rDROoIo8&9;O$ABn(7E_+|vo4cSRj2ugb
zs>6zv(xBUV#*Sd1g;<ILT+OKb3TBa!_HfCa$fA@V@3M?<Fc6=n_~Yl{f`i<=LTTNZ
zJz+ucj-)}vxu-_d6cl*lpE%{7l-2Dt(g19eyWcP*_njzieLLhiLs<mvx^#H2o4P<Z
zsqWR+cQ0Flf<4_)nL?YbK^95a<Gr73kF4e2>bQ!q5RH<mZoS7#3hgs8-JG|&Meig2
zi0&>CEm!AcW){=c=VrN=tgcIu%NlF`zb&?Y@lJ;`zUo8c1qdVZ%D)9|_g=D|qzlZ9
zZ&??A{sba`s>fWf`*Q$O*Yo4nSnpFi5o*WlV5bpJm6mnPGS?{@uq-msK}vCLOL|{D
zgYeW<&j&=RRv*hYGcJ;{l9#azjUxKr!P~WJ>@z6{sRWj)(`;tzsrFoHAwH|g$2)Fi
zNKo*4nwQAV08sD;uy>F_=H5F=NZ-0D)&uH6H`t!gyle0P;@+bU$;Q&GoEfGpyz|7T
zv~bG6=G%GGvlTX`T*nM^&&tnxt;?z%j7B5<{eZgti-p64Q1?pr8AZDxIbv{j^wS-k
z`B(EG1Yc>z$H#BKx;z@!$A$pPCHUQ|1pz~^cWnv8XMM-0UgHi~<+L-@x^mYXqT7-n
zD4<Pw_ZeT%P{_rX!j?cV5og{3T6F7C`L)&zMg<KL1LA`@=&Q0RD#W#V8B^Y`L}+Xq
zn*(0+l2L8Tp^+ZRj+1FTrG(j*iM?Gd<r)qNHh)g+F6Yj&LT<lB`l9hStxl)Nj?i~x
zi19{8!t8<=V7!N~Y-|h*>ugU|@ty{##*bvu`_6r(`F0m_M$?20a1gWX&9!wIs1jiA
z6>T3(o&t6%4E3W;;2SU?nwtN#icv_ZK$7rdnF-KiaX`bbkNwq-xRUR`|D+{!_(J%t
z*^Z&TCDoLJpC~zJY5Pts5Ses1S`lPJW?zu<8-KalYDH>$J`;&g6FV#KaJst?p7y6Q
z!Zg(l3*vL$oKSXnEL3_Wp<ZzZ(aJ7!RguRzZ3n4j(!=2&zMD5;ui1RLA$Iltggc{&
zOf`Y4d2rodI36WdP}TpD!@ZK^;X|$39xDuo^L)~?MwglT!=jF?h~I7vwJEq>JN4Wy
zWaa4iW11H6GD!$#J1H1WBiwiK=lp2HZgYYkLV{;S0)-A2`)J7d=6b4_+{pxJ+ItNQ
z2B1UGu{S>$E1U$zJTf{Yh+ctZoS<RsEE?a(dpVg9Y#u3HKm5l^Rw;d4B}$x*tmBuX
z#B|wHA!eeHbHEfxVLzv7$=I<iwmSO&bu&KclcmsIYQ-hzLVjYFhoFLj0?q1yGiLAU
zYP(fXp=fiuIN3Q_999;?hpTU@F-O8C0*Rg2SJ&wP6IQn+CUrX!JD`x@8ne7Ng2k|j
z))Ua2aI%iyo+#ff`2mLKVn;o2hu3AclN;L^STHl;zyeaYx3!AzWA8UuPhYZ9=`iV^
z_w^LOcq8sWeBPI?ha2OBC@LFxyut5v?ifxlPE8|h4QE>LH1#+d)nIU$0TOC(-Cyc#
zze>&yji1x2*Xg2IB+z5Z6-~k>V7S|=QO|}ERQ7^5a#3dO-ZXgnE|}@II`AOallv;X
zVal{imv>g^fIkhi36hqRqufh6(<2L+Uqr@9kHET1ZBJ%gn5mtP$tNo#oHoYXT4w;Q
z?A{6pvF*mWwaYug*p!nsQ(IqatP#$q!MJ?O>MF>T84uL~0pOGcA${SPj61Ik*`SHw
z7>Fb4pybrQwQr#EOnUvkzfKb7J;MDFl-5sgbpD=EM6ApNm83K?kh_LtFKfnL`S!3C
zGwxET@;h&F;DR#g8~BHxqHjNO2P_9`8qR(kYdHa=cIg+78zoM-f>`&xjZVjjxq><#
z*)J(PJzxD^y_ykbprw2_S0zoN8Zb?4+v!{!U3*cCz<=FwMxbO#$#?(M+Fgym5WN@|
z83ln%w4(sq77bAb^Q1-=&69dxEPd)namxVeNrq&H@FBUDhZBXEwr^rLFr{?YKdCf~
z2rRqAW|f`MT}@L|n%&PxWH!0coge+Vyd3A}Lv%EoPgX0udkKe=y};agS=HRE^Rl-$
z52u%CE%w#au|4fwdoMubCwa-TzulZy+;1yMz<HPu!yU^00f~TB|BVzgm=cQVWLaM?
z9j|ad-qiZ}Rh6O^4f!j%Y=4{%Flm<m#aBVdZYUP>bdt<h3<&NxST8>EpD<b#9ufQO
zxg5MgiGK=TcB#F!zMq5dSGVsk!jFLb$GU?@IS}g+tMt?TeVeW+JoAIr+rCAf(QpRp
zJ#pJfHpiehS>@1UG&3|?Dn!tJ#|aGZ$#iop&hIxE9lwA$!)qiDYL4FtwVaW^oG*{J
zeaWBd!cg$6f!$@7SanO)g64OQV77TP_RW%fB--R1NO7V!(+!^~BlMpYQ}Jil%6JTC
zVsRF)rq)haKImp#-j=WR*;I*-Z2s=f%&1>J=V)T^rHK1sHifW|kn_Uxu8qqi@*_#=
zPoHb;@tuMQt+nh{>c7{Rk{7_%8f#H?1Ao!>dC%rKwEJ@oltRdlTL!5mpAo}}3uurI
zgy(lqW6$1I=8F_sG=8Wb406p}QKl!zndc_Y-o`Dfk6e(JJ`oD4A}3Mposa<ic35n4
z#grc~%ck`4M1S0F(<i%Bk?IDP8sGvf?Su72Ob?TE)`Qv0-)_sNtsSBBI$wz}=PwWX
zPZs0!3sWMN3!KI@n2^F?t&?T_#t^5{DX~fVK>>822Xk~sxYHsFY@Kn@mGx&|%`mo+
z;{(kmy@x5W5YgJV(PGQ^;CF0l3cX_X^#Eu^!0Nl|>QHa$I#+)oZNlfCAmj9{Ngae^
z-6es6Z$fMOh(*QzhG=r__Wy#{WSjTN7oMq&F8&`-e@#d$2F>$|F2^U;1)g~}gth<|
zrS@i)QmnGDzwV-;#7e6O<BHmltv$2fZaDq+mM|tB)EgM__-3#Ny5s(p{aHH_%&=F-
zg9@{M-~pKSo!cDu&rs_&yOw$}zvq3GR{5GGXi<{aB6=QMf}4{SdGoX+4_=6D*A#EB
zlZ{p&o=$$XP{?j5!s9*o2yHBsTe#x&>E8MO!R_yZHVfspA2AS6*{z;?7XzrRf=j}4
zW6bIq8`-CYSq5&uDZf6zS^ks%zHMb=MuJ$d##eLf+L8oZr!V2QeyW`lF((1!ZB(q$
zPcM#%$=WNeJQr~Fk$FXplcP#G)SNa=hvSg<%;*NYe*xg}R8t`(TmCeQu^riR2MoVm
z2za_r*Cn3G5|pQbhw?i=4?R{oLhMdbR9+>@u##4}rq6sN1WCrL*Q0jZ%Y3S*e_%ty
z`0J6aY5P?GZ?RP^p{cK9MYtR^y=t#XzaxZI&y|4(fG|%vyYW)4a7unO5Ov)9%Q707
zuT|C-2Ea3&Qo+}8?i9#zXd0S-0eyzv;mx-|>#%n*?oaQ`|LrIncP&7rFy_w%CZCL0
zNEW)Pgy@+tAV`wq2C|e6sevysZAX4qQM`X<=aSE4bD`jpK|^abFm@}Gh-|zUHnPK>
z&V}#YH`i8G>zvBPD%D%uqQun0+ZlYO!<w#-ii~FK-HP)sBmJl)C1!?h8ZWkSJ+0JK
z7oqD!_e(q}3}g*-jgEvv2hda8`SuU*-bmb}J9D0K;2>qjg0lnHcKrK9L@Srx{Rpjt
zc89j&_Kgjha;Z8Mp8gGc)E#T;`QyNvPLD3>jRK(%K;7QVGYq45=0)@lE|qZh+NF?b
zQSFun3)EkqZ|HfR{fk@Coz6^*``>Vo3s&+XFZ8=>w|2RPi0vQ$&F1u*uArM8fJ?*-
zDBK)&bb0H)BC@0*q;5&M)m62rK)kiA;&7Q~OC^j`Rr%YOp?wiaO~!mfE{SJrf5G&z
zw^<&aSffl6;vVdCI-GiL#vuDM?h7Pf=L$Z4?6~ke`#BwK-dkyaP<blwwZPQOyLcmO
zIz<0hTW(CF+arL-bRH`7<2-4Cm>V{c47aM7WBFC7w?sOPS4cybltCcyZ1dZFrd+Mq
z2RC0V`c7?lBxY#CG8wpMLW5~5dt-A(($j6XrL(*Fi`Wn+nT9l(l9c;=2=N?O4#XR=
z1UB&aY*lyhi1dFbuk^4|+iP0Wm(9OROz7C)>W5D3G}cNlJyg72nV^ru0qEG7Bqi>q
zkw+_l)JV3|K+QyGk^p$y4#&xlIsRT9&ww}V(Hqp9OjQYgDU8alDGxz>w@-?>i!0JP
zk~B|SJT`L*`e3f0Yu?Rb;Dw%s4>6SfguD&I^`TwwAGm`~fF+@cF`vh(r_}7)K@CED
zqAP@se+8Ol=xodO(KASxMx_7~E|#PMCzVK?rF&qn^hW6*mFsgEN%($g?p0`$(|^8+
z*}u0z+h{!hW4BWTd!GW~u0D8<^3Qf5pk~{ix3@w~(EUFUQvM7l7gUJFlMS~aC?$oh
z1RL28n|}4v>ECZOUhwk)w2oC1lL_L^o<tqd;p3{80{<Zn>QyrJNtB*~lOz>Mf?vCb
zx}K!R2WRKybc86xnd%(WJwIo1`owWvN4mjeZnN+!K-ZpIy`CEkhudY2zxpj!iH>ZA
zDr4PMAMT)4Lr8na*#nnHh&@{Z-#ki7(0o*|741PCm^&cNr=<>gj?>^+>o{F-c{4F)
zOd58&8Xf*jQ{xb53l_fU1c~XB%KCoFt==6b@xh4SrD07ie!(4*pxcD9MW6$08fHM2
zoKkBAU1QB>*@hxtDlnA4<>7?zFl?C-aWEDbEyAI#Zw{R@0_Q14Jn91fnLYdn8!`x^
zQ}}#*SD2TIP=R;nu8y`}hZ0=vrCN#Vkc>X|_q&b_wcNexSm(D3$oL###4y`;z){qc
zDSg0&LqhcR3!1Co5xX2sxNytUd~Snl3Fs!#-Elen>ArZh`xjc&HC^!0+22)n#^D)D
zc<?B%5p8qJvn4>#c|guL6)`$ib-DDq<UC9Mm_V`yL|O8!Q^nt;n$t`_XG@ZA`hn&<
zd3FGV7)>k-pBN9CQmo=SBS!eBuHK#f%;eH=FR7+m<(8z0{Af)}B)Z8PH&!>r2+!Bk
zVk03MrEZ4vlIp%${l`3BKUMl<f(-D>DgL4YR;tNuaT}Gn#!f?rmmpHdEWU?)2-T;W
z<hmEH0?<mm>WQ%H$?w^2uMe+XuNbZ7gNxpQglm5}Ta^l1WiqxRe}I-y{BhB0Kj;#u
zmVm;@v||PtOhLP|JwuWPe;2MF9tjT-GSFLju1k%<JP--JwrGnKRH3q_t223-l;(-{
zZoMsbT@|(GUqAL%2Ost96&L7Kt<;)GTdw`d)B#=B)X{DOy&p&#@4_8_2{x8=2!f5(
zyH4ewV3mSLVjPZ(bvp#5!xvb!ACi&?1Fm1rCllMq|JEpp4`w&+DPxH78^Ipp;+ndi
zBQ6XAwO$By8od)BqhGM*LK;ZcZ2s7ydti+IbRi|!Jn?IO7-b6usD^i7M*vjf5xDrm
zvPWAet$PjxzNb(Y;y448O6?X8Onk3n#uwN)dt<4%^Qw%L^9pdtbDcxX4FAXfG`-9X
zb7B$elX1Nu!V~n+|7PCACLSZ>_U_YQ#^zE5wl~QkNT0JeP}MF$W-3K@Z0O-`dD^?!
z;JpQHFED{1*V#PmPwabr=;7Q7mKBkhsgELX%#5+)DjMlJr7tlNpd_7@WJF&KP&H+M
zl&kg*{BX6R!k}DWiz`?^5-XEc-v10pbCX&z5~RI0Q3r}8vM-mb>76Rmz<S;@4ZNw>
zT>AR%fb96&P+>3-3k((WKjP|+tSf=Uy#5jMD?5z~dV{wJ0f>`ScEA6n!O59gdiO#n
z@*BMO!JmepG0$j{ZaC-}=*UD2CS_`p0CKB1>QXn!=Ju+mtnJj`X%(DBmPVp{CaF6|
z{AOEhm!V`$jKYZ$#j4lsr=#t%KM0umYG9HyP<DJb<psyheEW&uOs6*6Fa3@>4fP7!
zy9r<;wSP*-@IU8@`#;Z%euTmbNr`6zF$ZgnL`|ot(%kg9T2W^5pFm|so;R)J{IkI3
zg^Dz%gWJYEmw`mB4Lz#xbPO-fhq_Do$CPk8-4LLgYC);x63=d^o+aJ{XkpF%1Es}@
z-w>Gt*wZD!<X&AD6BGVNyG`goo8bA4*2YtBbt@BU*bg~)<5s<I71wgUuh(XUzt=-0
z(#+nilN=EJbVE`1%iXCUypQH5YJ*~w?&&8UJ$v>~hu>O);Lf%<sevzanTw>1`s6Hb
z0}6L&kL~(?Jq9*KKZQleU>b=z;73gRq+IBP1uR?+b-q@w$Q)dMc(fFSDSst>G*127
z(0LFA{K5iWxcpTRh+!8}aopVwpaQf=b%|K;B@Us(vVfj6dXL&>+M;R)dP1xROgIlw
z(tR)y>y$ymS?qWih+iPf7B&%K&F<H9`VMqb93@$`7gm;wX{|DQ^@3jxn`VRA!;>ov
zjOc_*M$@l~*Ziz{5Eahz&mPFy{x*L6wL$o>ZL6s@`Ujbdkq&>S3fP}{mD}kq39P1v
zPCn+7Yvox=0$2rGw6_Ww?r>bY326fjkmmpD{R%KGJ{ER%D(F@nDpY%bH%z~8rEic!
zwuj{>>us+HZ}2uHUm`<^Ial{_dR)?9V-~k>@lWMHw@VmD{tYhEU?Eavixe6WPqB!U
zuA}*$K}h+4DWj_$b)8}8?1dakMV@wkePQ^8ChyznTSDNy3}gVe!6QgexQg_%Jj={;
z?C99h64A!lJTSavbL3^x@k%1Iq97ra#M@v0fO=5eMkap2m6_O;MKXgJiQYSE;={L_
zWJ9>DMxj-aC&^>(s1WWlNW{s))eg9x5gKWZ#MuBZLHD074d_{0<{gRYcf#wv8*$uv
zG=PNGtN!4t{j10*%l;Wgn9<5G0?b%iyJv1j@al{LA}j#2cKA_8CD-A~`<hHLf%LQ#
zG*IpZ7Y6Lj%zchd;n2Q}HFQ2q37l52r;+IqN9pwOiC9;c#F7HgXQUeCS1O+E<<dNd
zdwC(rRtcCX!oc%_je36%?TrmWvLrZMsJ0}fW+NPsmb5Bong%T3cAtoB@NeClB5L82
z_v1GLIqWA)OZlxy<rgu1P=}COmACn&YL4gp9z%e;TmBvAGhI?J%_zI$p3%hE+V2<4
z;jXf_d5nM})dG$nU^W)Kq(Hhhm6602$&5j+Yz^bz`)t7ei+4Q+D6>I><NJ^z{F$2c
zg`%~=)avphK;g&^?z)Ir=#wszT+_W!f$^YxHXd+Jr0yA$#*slg6QyIOT~^k`OhOh#
z0P=*7_E~uh&vS-J52c@TlamkygraFs`!|ufUoA59nh=6}@gC|7rB&2CYD>@v??iJ6
zjV~p|d6G-5lZ%S3d)R?b^v_t;HB4Z920eiB{noZM)%F{%K!o!)c>xROX|#uXTl%jJ
zrDA$ui}z8sh+ix*FNYRFp7a3}fj;ASCwjNdy|)4fvCv3Cz#}1RFW1H%f-eCmzoh0w
zC2>oMkG2EZJZM^mpI6g@Z$PMTtcD~8Xx5#Q%)ZBmhN|u<$(4XQib;)_YgnV0v}~bZ
zprlTN!P~()U!a%UwkO-z4!t>fDt%n-+Q9S#P^Ooj<;PjC`7g)tV4~8SJB3uG(RCxA
z#*+uMOw6^Sm$-x*x&DZ!1(Zx-q=>=G^sp-cp|bbLSxrQjMMP)|^ir0}f+6Z1C{<a=
za*g8WSf5W-JV>Kuk5+M2xl?(r3s|TXWtMey{F~}8B3t$<ua`yacMbY<!24YD5Nelb
z7y?SXU`jE5r+<ir4faKV+81|l-Ln)r-dx*nM+IIzCD})~O<~~goMWvB`2tlazP1c8
zP_~S6ZYQ^+bA<%s0T)U2_V<VHL+OPCmi)kIKB08)m50UeU@XW9`i9i;ciw*b?gf2!
z<m`Jq2A{oSrBp&g0OO3lknJJI|NJB+KElBGi3t&C;ok5+xjwE<95Tpj=F^AHJQ#1t
z|EZ4o%w$a2v}QPcR6zWGM0+5|A#>XsY){_sV0PMbw@>rqvdbb<_!;t3joU8IP!JJO
zvH{-szeLIFBqilX?Zi<#c%G_YajLhAD;pK^kZuGrsfK%)JbnMi<xC6o|Iy6m_8&%P
z=3&7u9*o$iJ&80;0x@Km+Q2G4hM0YCl=hf{L;a$dgZA@c(1G(mMXJ6lmt}OeWB3}*
zbc${B&DHUP<#AZ!IPl(Be(BcP1Icw=Pn2OrRZC*7?F5G4IUeKicyQEGqGed0U?7d3
zJ^{Eesezwh-yC8H9+lwluJ6n7oDSpOJZfNK%80)AqX{DUg!+i;4i^5D+_D4}=zZ0e
zy?(YvSx~bawpcdnx!U!*05mG)z($#vIhtsEWPxz#i@!4h$)snEJE&Sz0CIK1Oj64@
z_Q<;UJnJv9ga#ah;b@)%VX~#(sVSGeAE>ZPL$qCD&2@o@L{TCtJ|NgBQJ>=$XlEC0
z?Jh|uy3i*EoY*%~-&~`F$+gm~yveivrGh^6!x`2FY`apGA?B<$0_^}kSo->!JM{mS
z<E%3+#kHlo+B#h5^ZV(Kh@AvD{2?gvQCZm}CMG$|3QdR1z_`HBjt2@U*4_LqQ`7hT
z(x6{s0P+?@wBj(~2nM)UUF33$mGy3QENnM0H-k`zoffVh{yqt6rH>x#?^!o}3C_FB
zZmB~8)OTv!^p80oH;6v_HyFc(S_T11D%v1uEx=w1+tv(Yr#+Oauj5~0Bm*mnwK_S(
z^2?Zfl<e|1tw$HxN*)X*Y2{sOPEkyWf899Pyd!+?CH-Abpi%#+^}u?W&0Nj02uEjc
zz_P;q8GT|TRU-u|lnF5#*|>YRb**(tK?r_9E#u9DVznc7sQ0>K>X1o|ZwKEc0w78?
za{>D!6Arhk;M`xwj!G*F+}?EO(jb1%zMEVSLId9WPE_cJ)}>;rX%oD#u4jO{V@adW
zYkYmZnqH8pjf>*`q12@u<I~|*%fJOrgExvH=zH1R&F0D({}r6Jv_Hk&pX8sV7-hm4
zT@s0iJ`9$BKl>xSTolr4!8wX@KBc$L=R;V^i>Rf1>7tz!P?KR!i*UL|)eWiTqU^P_
zS6lny%-ns&B3V9HVU>ZtYPJ(X#tL$ECGWPV+FE1rdAERYvtOfJ&-+-3V)<S7bPBfn
zst&ZGj`I|^7$qr}j@(cA$*O|{x{Z$~HAq^vjV0ZiJP_~@1{|dY^hBBMbN;s>q1z3?
z3t+Rz*p>i2o958W&z(DOr$u+n?&AU&5%cBFJeeiusrf2)_(I9ol0Vpfnt*zs$<8+$
z>@fT9eyCPkt4gdHFfKJ;l<p3cst<d$!{;<?(FRl324?AdZbj?cbYjSzFMoD8F^rEk
zJs&A+s}YT=CnOo`vZT$_8%-kv`*;^nanY|^`LM>y)%&i81(+)AD3`??6QXN@i&BBT
zcsN4#$2T+^+P%*L_77t*D!^sPM_uCPaNLVkqS-dLwN<%#9>ar*$Z>9UFT=iuCQm_N
zYFb&qwW?K7SNCZ=P=o+~Xx77$<zXI9jgU1PFK`BLXN5M_kmMkaK(mRY9xaGIBiU30
z`P6M0yqFWXgXe9iD>)W_)4@p9NZ95&)ydz;%6aTf7;xtUCc+AGF=AyeEmh#NHh6P)
zEkT;YIQVyW;aNaW)qRKXg=Pd`48X}y)FB*hSl_N;2&vsgkx-2)sjArRirPA@2S$cU
z+2+Ff>h@IFr1w6$aNVm!f(EJWl^JOqyD_TP-v(}QoCSfP*HD7yJ5V;$P$XCV_VtrB
zX^x6Ls><G_!z`ElYO`Xmc2#{@lZ@uF2pFufnvDwK(%I8O$^|U)ISsJfTeCFLo11C-
z9>Ggyca>zlE4@iPEBylgWyls!mcsS@nv{cx=hpSOColLw&+qH@d`TAqO`44eW;32W
zl=A&|O67SzH>uEcW1YwO_KfYf;K$#G)Bh{?3lN{U%i!$78OL+G$Yv{Iy${oamdWhy
zfU@hBnfXVpw5^rTd>>;)mD>sog@iz)NOl`#Jk%REm__rf?k1N85nZgdp09@Q37I4J
zQjxXg)DZPjZE&!8OoR@2sRF1W6?w7JAX)H7$&{7m$u#9QrvSbrEtoDMmEJ~2aBk~6
zu54>G71P^X5DKD^PFG$u>&>pO;K#-dP$7-!R5ariM)fQm?ouq%8+@g!9sd7Jgsfgz
zy!c0PUh4)vm2Yo<1{@9x)!EZ`Jfa3WzdTJ(43=iQyHU10QTbTUERwU(mCq2b?o97C
zlyeO_1JjfAqHwl$+CKfSG=PBU6X9p0F!}huAWp8UGXq_2MgndPg{b+y18vFHzkp?t
z$JwSMFV<X8zO=+^;M+AKHOX6U-^P?AObabp+wTL=*tTWg7WrlIKb6a0Y{56wSpWM*
zE0uLVxrB)ER3$U`&P2<$weh76A1A;HygL<GzDrHLO}qKHwIlX8bC8x$*JX7Jfl6+u
zV<%ed`|T$NiYQyuSv67jAPnUP97%_UBe-?eLpulGQV2TBnDO2U1bfgi4D$|o+WzsB
z8-wwm3Edkryg5%4+2KBlVu#}=$2|MR%ly3Xj{0Tk|A3dtz_~S+K_TILEC)?aB5!Pj
zUokTf5y=jTb(7+s=?O9(pWcTk06s@(3j%`$Mv-oO^)kBSJSwZ-=i6mk;89YpDk>bh
zvqmcXT>EWCJRVbZa|CzC&aLyI%$_`&m0IFG)1&Zp3KXq;?DhuH4SX9uZv1u|)5P?j
z`pyzo2LARipT~6-{{w&Xf9p{ezBlSes8Dy<9aal7+fRLUVZev_kLVk;M$so9w-W!S
zHQ?pmy2W7Z;{aMGv+vRymFKr8mc(aPUaBO-!vD{L=`fG0OFm4wodi14ZB4}wR%tMw
z2i->{pjaH{-XUYLCjm@G;VfZ(y1-RtKc?EVpnDk~nB(75qDjSV3zVqs*2ys=1H21u
z!Wh;p@HC3TdnM)_6am=5h;&-hob6dj1e>5}=F((gZo={Y0HicLSun*(C!VIT9@MiJ
zR+6Cd)f9!Mgxq?A=X1xL83B69<r$BLnW;w3UI4t~Fp?&i+l}rE=(%MWNjSRWC49?{
zX$D@xm{!ki{pZUIv1E4lBpQxgj#sCqfYpdY_@5exEVaEANcgw35E*jc(Ab0L)<wzr
z2vgP@b<>>bW-th0Re>w5yQu=i!1y^~?frcY>r%qSq%L2~09)q&v~%85a-7rAkKc9h
z1i%Z@h8Ayzvzd4W3qMO@mx8Hk_lUoq(6rR|#fVUf?%IaL0uQO~hqC7H71p-pB_+GM
zh8cFkYM&%v1%QXNt|i2?o5Wo5eP<s6hEMt&CuO+}Ex%`ldX@~t2)9`QyFr~@Rb}Nb
z$=ykjPJGPCg-(#*RhV=azn39Btr2@W?~BIcBI!V{cQw4Xmyd#{5|cOOa?dU0A3bPG
zt*-an0Lhm*66NVpzVz`OzMm5tY_p}OIKh`GVwGIwSY-kr{Um?6D87}dtqM=1f0iE*
z%$`rWy4A)swn5iRq;sR$NCrX;!CM!TsbgX9CrV#$rSl9^Tj|G4<Q=!E+d?oh(7T(m
z&}wq*@~>whjj&Irfl)R01nO!E!+cy@B6YlMch}{Bn1~2<i}5I`?|8jL2%@pz*63L|
z3J1>V6D8GD4tIjReaNM`vn$3wxnTT;qW5$$9H6qnrLPR4`9&t1@%ZIAZIX@@Izf;G
zCyPQ!mW)WeowD)O#3)DfA<rG9tvQTx5MR6s8JG1=+<8ZHu4h!8jnNIJ6a_4&%cwkR
z?+o_(c9mRG613h`#RTGRa+H{}gB2P8B9Iep(LS?lyc5pGG`5WLD{7;OV5X%7o{pU5
zY`yrL1?DNhNe&aFD1eh-${3Tq4H1nlL>vA_Ty_8dKWCO>XxHdaRK3`&P%dGYb2bf7
zGSBl=AdA$L;vR`w8Ql7(S056rxbcm_Ij8?H**ji~)Lt<Aaa}Kfy6ST=P(tDm+GRAF
zcs5rWX(jr--|3zk($!qu7C56^dvfY}&D|ihB8flvZ@oO0b)Ip9GOi`*X*U1*sj|SJ
zL&H7ShNUpzCUS32K2%EB6+OT>VKP#=tAp8<wHSo)>Z0AH9&YHZ6KK2uQZ@(5+`Xa2
zQ+z!=h@t*&r!{(|yM!J5l;^E@?)*rik^g<(gvLX=9pD!rPtZM%u7`q$O075(=+|mJ
zi<0aQGH@ZI6W%MI<L#%)g{56Lrzg|v+_+lzEnJ>3GO}a5y3ZJP$B#=9dL|d#k{!<e
zq>uecBmpylnWAkAzWm<Glfr65<o$bhzTLMVCYIu35@TsFW@FUhRX@4BUM*ao@^Gq+
zEnM%vIO^IsN;a)IdHj4()M@7cl9GGTDS0R<U$w+c0U-zEeJP|A?S_9vA|HABjlUe)
zqf<Q{W^1Z-wW)MKM;MYliirB(g@7)FwyhP5u?H5^F)$Jsm~z#tMfS8*fT0G00wr+j
zq32;2-`6S=Ov@i!*C+?fi%%YS+Pr}oxIUL_JS<&n=-+tIkm6sXAJ_Un=-ZEkFRPQn
z!rm?`{a_sM6r&}CSO`J0>Ca`+Wm+>)oMPGfRIWW_$~tPYC-LB8=#SQzLi47%vKVK@
zNzRWAKhmB*(LncT*h^!rz?<)H@V`+-r2l%5sh!SxVq9wYiM;Q5h3;gnL}NZHMFLE!
z#Qskwot1cMXX5uo;kOFZUqdyx_0J_m74V_Jh*INf7UFFlO(qDzn3X?p7w;LHl6KBE
z=IGg$&tgpB*TaX33F34Ub+{}u6YZzT$C4CzTTUH>&uba|H`-Xf65fyU?ZFJJC3ziz
z6#vd!^6Qo4^NN>~iD5sWZ}ACS3v^qGUdq<OPx!3^(dc>55icyW3ku$rrZwp$`tTB8
zJ<PfbgF<mscAcGn{*cVO$@;(>clfA6+&77rne|F~DC@vg<=blfp=K^!qE)Bu=zF@C
z`k#)#w>xS!R~-!&wx|k9b}tpmg*FsnQg^{r-Ot#SzY6<bK7bI0aNnvH5ydLmMK;#n
zuWIR)Y=(KPUYr8g)`~0m`>EV9)-i|I#~v?Z)c$xkNeyW#t|(2CY8|-A9+!0^_slur
zCr2y2{%4Gc^xw=k-e0QTmYY=PJ{Z-$s$q>YmE?rj8PnBG1i1McvY1OL?7tE~U;KWw
zXV}PFZrEI}=TXe1v^YYLY#^FVQ1?iQdh;9esmKL>#ex`V#fTUQj<v3i#2qu+8$6p&
z<u8VAD(5WnCPN$3Co6qiUs_%4)AM|kF`kjadDZ!B37ho0%<BkaEr+I?n>2=|E2mGz
zvR%6dLJ;NKUxy_1CJSK+`L+)m9^47Pa)Es#d^S+h8~=k&w|%9}CMCN4|GS7J0jJsX
zc_zi)hMud8ALqx%YB|F`!44myCJDThM1=`YFhWNia^#%;Kb*aHP*mF!26zF{_XI%&
z0g+%JDLG5V2t$^fgCt=Xa?YX{K+*t`gF1j@i9-fKKyqftD0zsI2ACo28Q*WWwrc;_
zt(_|CQM}>abNh7o`s+S@A3bVRms7MJy8Yk@)ecGUXWZbYw~?{yKeZiL);7FQ<wtr&
zspGkpn4%9<He|uSJEzoDDopT3m~DN1Pt8DKQizu3VjY4?uf3u623z5lrQ_GiN28j(
zy*ipE(sXuFT|+W2KM!iiob=ce4kRoe49cb3r(kOh)GtC|#tuP3_$P@W-xf<|ma_Ge
zJn%e$3pcuOwo?2M7du~Cy8VU07L)d#^;E?}6;mX*)g^E%wGZV%N#BoaZ*O>6NhHiX
zrVd=gMesp)wY^Q))(`$I6E~@z6A;e|GVnA|R=Y|Te48%Z!=d8l(X^JB)6C>7BXw*A
zb4)<-K@t?~X`TDVXT8$#OOd5ia-bgC1#0^C^d-6{RngDm{O%XR@7`yV53H+kqlyG^
zGW~;F6&w4ts)ME#GHJ(_uw_NYn2Pn_PqzZ_-@IgLOB6bUR6n%Q+3b;1LzLW`7Wh9(
z2|D|t=tlw^t}jW_DXF0rBeyJ3Tz`Onp2Y*_AeJE#i1uaaX$~dD+b0t;C++3=Ma9=6
zqs#gIu<lyy*p!V86v~O(e529x{c`!4Pw|B7DLqX5>xKsUWg_3*(Jp=2i!<`-gT+@c
zV#6o4L9sG+Hq2*ECnI@_;lf8D7oa!S#8Z;-Unx;W!baE98IL@I|EddL{D{Jwz(4ro
z+9dXnhDzFV5alCU@5$lE6H>y7TS(J*kp>x-tf_0>s)NPsS!${Q#lGOM0~8Ur=LVx-
zGZAa5p#EC;lY;W!2rynoh00m=^3Y@INwVelp3n;HX1$<}o%1elQi0(3q$VOk$dC+b
z(XsT{zwvpyfZlA~jXQPPy0{^F5}fF2eZ$K*@z_k<p~qRZJTs;1;ZXux8fNCSdLq4Y
zqt6kRp=b2lGX&*YapGjcXP1Za0_K`@b_KR<bJr~MreWP&=F6gOffaAYS^wv(!0(P-
z%-VZp{eYqFe*ZolMeP>*ztGCBl4k?`sK+9vf3SX%2#+$^h7WFcKpFebIj5ABpqpL7
z#x%SaIepVa@0%gref$UqNWNz_Mt7%%Pjm8LPh6}OFOQnNZ3iQa9k5Mv++DXYQQwRe
z$&K1(5BNZ0u&7xeOLr=EEydk72>#Ku^0RC0@n|G7<NAB1tP9YS9?6Cmx<X4Q4cPLP
zyld?q$3nmP!7x0XgfGKTCfn-=`nS~2bn(U*7jF28o-MsJB+ttAr!qIz-Pq61;ry=Z
z;H{YZlas=UsA6UO0qziuJbi{BY}qJ>qrAQ%^50*CX|XZ$VUs8^XKt*P+1(VaO__*P
zL%-)Y)lZ~&66!~1lQ-sH4XNg>uV8~NL6llj>=Ci3k6~e#PP%oz{^DhRCLn5SKqCKM
zfI9L|<g$0oNm`$EM#Sr&E@e$9_;WMeB}95ux$sfAB8CP9l9NkpC&iLswc<*?Ii*HZ
zs^gqk+Zb;(s!fuG)M_u^!XC0S!yq`RUXG~6Wr9WJE@|*{v`6#nSHq@L@u(J4e;2*R
zaFq)=$$SA4;vhs}osawmU)s4P45&qIzS-RBQBZ?|=N<y%8;ZdlQ!Xh`)B8P5LZn2$
z7pjmcB+TFrmyvv$ju~$vWJ~;<i_3y<b$8Fw{#%q^m~S*R%P1Zoe3dUqBoH5b5PvRM
z6Ju<8gi}l$-@3De-6&GIMR-gqe@2I5TrwQ6yBXLX^5S@9Co5`+`z|EEo!K<G^jnc&
za=lyb&fqDcxa@qk=Aa3(*C{IKYbD~cYyHUg-!YzN>Wk1LBy)`8o9Xm#TQ-izqcQfA
zA5n-3Lgmx~In>(I)27heXjT4HH^x3CU*d0c%D2zMJBr|}oLxV;0$ZmB&MRG~{Q+E<
zjd`GbN`5ft>D;w?Ri@w=BukvTz27kc#;T1=r`%MHM}^-JBuIR^Pd<@hpNx$>%}%&G
zYIo)mKF;qNLkH1H#nwwOSDh6^<ub#K&jzlHZLZsrLs@Il%za*x^tT1n<>GE0ILH{E
zgSZ5NX_qV2h+RF?)b!zZllv6O%UG#sDEiYcDrPSc<+HJ^#}=Sn&A<6EcVk&aX5%nV
zNY4BcgOKsX1*I(`y7LXy#Yafm%C^C`ca!&4?rgJ5xyG|Xw4z!8Y>Y|2^JK8P41NOn
zM^KZ%e35we1l?Hn!zEIPp@!>^=iwVkDj_K~#H1J#@7>WE@n?u9zh2xrv|J6K2&K;5
z$o)kJ!yE`LUxul}d;|RaBT!wUV3>msvVjdt3yU48+<#<mc`A<}tT&h-)Oj;l4Gt_8
zmu`yR%n?&7+Hk*b&O>>FU}Rb1Y>~Gy*lkSQ1jqSuyY`<l9xM6XA&ofn($~X?YsjZL
zb2^yRZFg4SZ%+hM;_YkJwnA0NAp!UJeL3r~v0GSXq@!cha&F<_M9Nw0UW#m+<*N6^
zD)d8qWB%?-gq|Y4I8Yej_70V9>c=z`7*T}zm+*7G9T^z^JK*IlcDkW~0jI}#HyFhz
z|6C2~wULE1?(tx^;yjpUHt8I(PCYBm-R~t-FG5P)ZFWQUcnOcie(e@gvy3%=-~-=t
zdP~(lL0tG+ffL>`Lh@<j(9aaFg$f@DgP7@5uQ%w&UVjD^U7$6d9!_55i}IJS5VtAq
zrA-~Z!l0f&B2V4z;L7G-m)#KP5d=3jz4C9y&p=&B!?61#Rb`pu+RizCC{scD`{c9?
zvJK{oM!B)46;uY;W0Y%52C3QWjlV7kIlr2~kq4HcV%h2+3|iRxm3lQ!1V(xw1NpIm
z?}rMX)pf5Qub_E2f&^nd_^5~aP}Qt)`#+$}b5+<s!+PVJ_&V#I*2>9Sxe=d?ec9e(
zN#yOEM^KZa`#nP9cGi-<+EF+H2RUT!{kdtfECAUsd%7%dQap1oqgtJJqAnJSOoyNC
z&hwbvV9=DtUtc;s60kArd+{k(S||Hk(^*{j6qGrZv}TYna~nqIt@SkgIWD=ml3G7D
z@~4R>q;Xq1@s@H>3Qp5~MOAM`ko$VT6=9YwKhU4k^z8|N`GU&K8efy!@Kvz)Ds)L}
zgW8kVx(Z&9KrJ7Xom4AY1Xk>3&m4J%gA|(EOVeqgI0oU2IA57&>*B}lNbBUWzSBAg
zQhZKr3bl6AP9tw6bs(RxHo80(iL9uUjU7paGOfmHw7LIjrewYNZvFdO<=wTrz^A&{
zspTP-A_fF0EZ;t9R<nel$IpI|Yt$K+Y4&`;y@?wZ^8E4j#qpozzQ8PWH6&1XR0=L)
zSu14h?w@z1?P}vsUnNMxH#>)MsYGoVR(0GG<7_!21RxMINIb#@vpa-so;H6-pNU76
zemmxj`NKcnc>z-Dc+*j#pkV2?(dTUEo1d!j8*V^UJY%7ywOV&xC3N>zpOY9s$`65H
zo+-t#FFkG6&t6lJ<hWX}W_b^yG<slgUyxCKy!<!zbTsv9BU&Y9mwB{xwvzusE{S}H
zJum-kihW=0P9#R5{UJr;$1`FW4<Y3b{=DEg5Wv!yuwC;L?o2qCP$)~KgW}G))pAXL
z3{310yH9A&j>?(f6J5S14sl)MGZ1lP6uf;>`M5x3;KXbH#jyiU^a8XOM!b~O4m#_V
z{G_mfuz29Xp5oZff*$?WhKCSDX}S4P7CpU~#Qe=hjDI@L+m{}~KQq%RyUEB}5g4E>
zsc5fa^$yVrK>^?ZMkZG^kKu5IDd*E4%|BvdzJ12LhXlH-kCL!W!&?@1Zf9$oB}+=I
zoi;De9z|-B1z&wW@Mu`F{;q|l2it<OFeIPB^@o&8i6bN0v35G8BU#^k;Nc(YzdG_x
zp4sW?Ym5Gg+2ftgKdCRK@=EFbQYfHk(?n5tf$`Sn%67)%_D5yoG0w_?rC`&*d1)vt
zuKw=GMVaoEXi;jN$&x8NuRhe|yr}708=A;&)@j}$b$bId+S)f3eNq5rx@(Jx_l37{
zoIP9C-@WsIBclZhw)g<VGiQZ|*If6u<WQap@RIzeWjsKIJlFz0w9paz*@fYpg_9e*
z-2?wtk%WwlFq1&lB3H6t<ZoYPkpjmT-c`HbA|ua5E#BpZ<YR~;x?lYfm27c&9VA-p
zxo?tKI(*e24N}99u$7l_$+~)&evH4C^W&WR{hdVrn$=pQRAF4xTC?@tD9N6a%uhNa
z2_$pW;8f)k+mmMsI$W;b41M4{<Fm;$a|hi>1APC@g#Fs{(3>we|5<i_>}iSl{Af63
zj+@ixYwb{(3A!+nKR^h5omAfLUs}@}5g>nIz8=wKWMtao^b~06BcP=N*TE2!uP>yn
zhq{XQ&>R|YkDRes@xK{@xJ<U)|Je(0>HCLB&-RxeWngS4doP%h3wu<-lSr=G+s`mW
zz-t`(H0VAC-DBKB6pbZC0gG<U2bnL_Bu`%Wo1D3C%ig0{J)w2}`?2$HdKJkhpW0A_
zp1_lzBert!yN^jS8GO7oSK0rK-CT#;n~M$IVf|jx)EGax0A<p;JM{I3bKlwERS)#o
zo-wu|gSY}|y-8@VB|P8HcFK7ko9vfTd(-%k4t6%u(jRHOa30F~-m6&gFt=f=I?%pd
zsCFsl@VTrRNv2$p7b=<KB=hZctitsvj|Zl%KygGXUqBk#r=G*l1Yy^5@5eP@CXL-x
z*C&<-bq#iwC6uTkr3Z<QapYcm5(DKjBc9abVEp@et}Ewf*Wvy>JM7d8-1GqB5cfJ!
z#%xmKpey}6o&QoK_tajBA_miGboBzKxawB}W;wV{`VLv}=TgtjDOZo<z$$p#n@a&K
z>y|~<xt^EDD5|?JK}rKZe>7YQ?InRUj>kTe$UnPY2G`rmoytpJ>TaA%e}wuWn&uZk
zcx5K}mgXHuOk>5JWJRt<ZUlwOv5mh+#%W)F3z5jnjrOJ)6}9zXy_+i$eisv|pv=dA
z&hZC77Zw^U!rDDF=$AH3lbdA;XK!K2*dvD?vw7&|*$qyd(wATJV$aR1w)S#Fk_Hb7
zR+P9XiEMi6J4^S@4v;`(Z8X5hlz1pP-ZD=<nwc3&wc;5qNk}4?<R|c(q`n29dnE~r
z)SfiqxBX@ng&IK8au}t!#sNP?DV~qj9Ne(_M5nT4$p8hjY;W8Q{(LpLk^L&mpvUp+
z!woIAw1lvp5R;>y6p+%7E4gpl-2=>M5&-7c+-Nm{`L0atdWQgSG><oDo0#ypPg%hg
zH4Z^a=ZLn^IvtCxEH5H_=v<+rQt~~Fp8{yDwQq7}Jx`@IzNaU^ap0S!zq6ec!i`Fc
z=!g;?PjJ^nbULoQlYUj`3W0_Oip+No$<jV?Ff*0bm+RX_Zk=%j?_PUJ*Z5<<_`s;3
zu&FoLA?mQU*h<F@!Y|e`32b)UI{Y4#c@kXlP9S?R&9(|ws%=%ewahLE$q#%17ku%$
zBurTHfUUNEbm<dS)axO))T>b32Yn$4!K<fPTjP$dXK3&j6n`c3AveNEmM#J=?&#0X
z2m(Ma=E?l@ceq@Sf+>LQL^^H2Irko;xLTU8?E%cf*UZ!l(f!B}(zx2afl|ExskoZ+
z_`qc7v&&$>BQ>ylSLb&2MlCoHLU*q)M;SOj7cpfu8$}jR0n3aa#(-}`HB30WH~l-X
zr_N)|@QWLram7xoBW_;X;pJ(1J1t4(n910{UM)UZ-!ZMSW#CI!LP4J@h?$IaU9<H)
z2m>^1>FoM@mM#yFR}4NN#=FFcG4F>tk@6nX97&BiTI(|1B#`?qk?wG_bE#?B(>B|s
zdD)|WVKb=H#0Ff5F=y1%R}x+0GEX+(O$7YNNX1qT0xVF742mNqdh`$<9=Zr_Lqo?E
z3qu3nhT|LWm&T~w(ixz*V0|GUMG?<3BZBcS-I;;%Z3!iyI8VPiJF-npdergooXLw6
zUAz|<y^De%_AdozcOeaLi_9;J2t-2Qa2IwHOEaAxlGmjda5Vgw+6{tC&RH;oGfkc5
zOw`mY6HGJ3vt?r!@d!RZS8AHuxJfgwoI27>^~Gn&z4e-+m#es|o=XBLLFyocUEGxA
z7@<NXn`UQ)HypI8!<MA)LR_ltd*ZkLIT>-6>K~rUCWF{NiH$g8%xWW&c~zpi<kE6d
z!NUHAcJooJ$FJJjNd9-li5zzBR-s;LWY9`db-m10Sqx^1Jfp$3G=*2a^%H?cLYWd$
zdd#J&UePmh#QWY`I$A{N+WD9D(T&{@lod=2U%%4%IJ{SCzdYh>+se~rsAIrRq@wGH
zXp&Z<dU}<R%B0+oqud7{@B0T3tT2V_S4}rQTRJIqXIziS*FG{&A0&n1{vk>~l6(eR
zQTdpG4;dHOj2Ui$J3+w>DvF{HF=#^a3p!ne`Rsu2VaDv_5IbA_cgM>gJ$xUEUm3#=
zBmy1;A|rysf!y3;vv{hx?Ix80voM;Hn^pJEKuYYgqd4$A3zIGGxE^?@o^yn2(4I8j
z^54l1uT48o4XsQMx9LeDLTMC>)h`qgcG9S!%tHY01QrVAR=<WR9;V(6@T{fdpf~+h
zMD0O2smBtQF^;Ve2atkikYNb(LyXz!+3OOu$$1F!)i5(Lxe=kN^mx91J=6X2*z6AQ
zNSUuSh?k3)sq`~sla`iTve}hveL1?o4mR$}4LJOZpPb`LP-t4By^a{CX~zSg_nOAv
z>yvs#snJV9z~kEyJ^t53S|5)w)tz0bw&NS{Iolb{cR<kk27~<XUf=Oc8@qMlZcuiw
zdENFL#J>DZyCqBAgSq^hC9C`07d`4qP_QO|iA~Y;`iFSMD*h3D1~Z>z)HpMZM}`$2
zB;ROUieI(c62~etr{N|WM!OqVd&Aj#V6D324{wn|=QHiBMm(k^Rl_w^y==|gpr+uz
z5+Z+@b?|ym(c%FtW5_N&M28fzLOD*9(-`9|%KLg)R}iNmhs;g_L+W1w?udkNdXtz#
zR6(alODr{<IgE6>oI8Kx#b4=EA5X`u<S?H|@(Ur3TDDt_b`n8uTye8J$)v_pm#y<`
zY%OGSS8s-1&O?2a2Kd#|lV9TjET+}Jh7MFB+jQ~_Q;0NF);pk<w+f50mjEM-dLGOE
zAAU-z7aiFudP9l=OitIeK;aQFJ8OedkBJ3de#E9_$Jv_xx>sR?@Ajba(gi5X+)QVv
z51*=$eyk$05H1Wgy#zknTyeMG=E=N3KQq#*qxAZ~sSx#6udOMFo&`LEr#*2!DTK)b
z7kA%Ea`Ccd323h;t4Xrn#pb|0W8sYUx@|2uPfPNNco~ZBwyX)hldqLUju8tSyXq*s
zDvt2BSYj=-+3FwY$y&7bm#o{ke99%(IQ#PRymA}x+mQUk{R&*qKvjh(E}bPiD+qIm
z^i01u78nm3FrGIe32JH;stsC5x*uEmzjk(q+<2x8-+@$1ACWF1T(fNXe5s3He82i8
zOVnv^m6ORag5Zh-jxD<B*egaLwR(S1HK1p<xYL#xH8P3GjX=3imCSVIFCCaB!?1hu
z^Y2bODYOtRXF^C#a`KR27Y*wN_k{hL%;~8&ZqH+!t#HC*!GoH5TEeP>uif8{+t&2C
zhCfyRp+23o1^`-C?yT7gNv4LFYP$423mj|iVf7<>Gks?)b>O`Nab-j!bqaPee?I(7
z`x_fc=DT6cu)n<HZ2afRWjrh1NKd!^L^>4f9KZ+QujZU1>pNX1GWEbOYpLWJr}HT3
zY`~0I0GLK;@V>Ov>oNRtW8ztF>|)J*9Y9v~BaBEuJ}|dn*k93Q6}4Z>v**K{QOE4}
z1q{Zr87x&KoUXokvuQLL$6oXk4!ANTa3xKb=~UjyTI0|iWu6{Mf0P*BH1;|H2<mSf
zHll|)&ahg3iZ7zJqTak=a6~vAO>uYdO(W#E#d89Y-qE}y-q?`yFGm`k&&S_hGCd^F
zO&a3rOg7C_(LHjsZJmubuGf2ed|N$l!c1Mue-3&qs;h3s7P|bD(AoS;N=qDZX!IuG
z9ZU1apQa#m;Yklz&@^t?mB`B3=tiQBzX6T3l&~8)s#3-=^$eygMnl-k7h@4xsbDyb
zRdYPUti-6EF#l#vbvfHL@{6V&jv%u(tm}HEt#yOZbFY?*GX1B)L-3>^(l<rZDxbIf
zyzR7Xy0`qIPHJqw{n+Ll)Y>KE>B)vyLp+)evZ?Vr)$!sJ$rUP12PT|J9iauMe_|Pn
z58$$B6Rs6o;JX9K=K>I7{?iSsN8OhyEH~)Vhd(U+ND6kQwY6F1LXAkYDQiUj^J_uZ
z{U1Ua$&7jVId7K^sNJVk#d(#NZnHv7f8>c#U4Z&5w_gHa+)}ish)27;Zq0h#p5_q!
zW_ZTLFvcHZ=r#U+AnB19I51TAWIJAAZ<zW&>&)b;;yJNTNeOC<t_F}uus+fLJPYMY
zw263B)`Z2^`f(Kyu~pssTwxc<!Vm8AUr&!ucnv`<qyW-A($xIDJut?z)8)!g(BlUd
z*ljGzjF`M1oyDQ-^qwXho6chc;*RykRQ2M3_hYS*G3*WThW;UAwE06e{h0Y-5L_dP
zey4-9N4er4K5E?^@Au@hhwZ5_Y4F^lCjM8a6%SKCO<fvWETIf}8H&s7ND)^LYkRxy
zeOi%jTLY`P&wT#Wfo~TWG_e->hRsbhXQGz->CAOzzdy>$b;%$%2l*XsqGbB72zJYQ
zS|(p(1X8W@0RUyL-2uKFyF|;s>4SG0XQQG%4^dtuJ{M9M8_=<NAHSEUJ&97Fh`j>Q
z=HPQh&0<8vuGLn&2~gRx`faOcddE()k%k1?>0eT4=B@83L#44qJW@X8vW1aAZ^((u
z;lK#zF3o1wZH`4c%Ao}QC6SL2k`ldI(T41(QAw!buF<vVHtjG3&hVkw@ThJIwnh;X
zY08-*S=s4gRKgJ`W+VbZ=R<*rK6Pj(*>5t*^lBo!2&NWSfqaJUFZMrTXHE!H{hdp!
z>PQ7E^C+Q1%(qt$4aml3z#5`%4imtpn_;@Ns~wE3OanGS8cs=1G%5)r4mBoTtO#sE
z*1pd31H*3bu>R%UWr~js5N*=q=qfhGEhf3sV088MPdjffWL$ybxDFO$UIeKIoKO=I
z1ME=s{0i5>Ev^tBGZpaZG@2XxT4u9$-R$5u(Ig4aIqJoyE%3X~)-bGp9>@a3H60rP
z0`IUxs#qZh<6Fn&l(==f%^R}Su5qYm*vOmuF_Y^+u}Fv;5b48H&p+OK#gg&PBlQB1
zAD2RaPa4Qgk=&4m0Z=&Yz9B!Fak<e}ch7aa6KJT~SM=kSiM9x@eKC(8ie^_Ma*Ah<
z+KscwAqH7MU@*8ETh#osJw)D>ojt)pKv)O?`OzdszHhUB|0B54R)Br^akHHP46sDe
z)vQU5%5c>k*=z+lBlN8MQ0d<U%={+tI$;IvGdKP3_4xo>alH$Qc<x8w;6o+V3MouZ
zWLk`n;jjo4zI}a9duXKH=gPMCP3)>-pNvHJMM&TSF<#R$4{9ynD{SDMeGkbC`eOSZ
z<$o?okrVqBp7=yAoSMY}c+0T5jqk5Ru~ZbBTZqk&g%ImB41T)0ixLt@{d)=3Sky9S
zuZmaIUdY_`H}mTx@>i~x1O@RhVumrZQqlVqMTSSRvF%zVZ+mahLjA9R-&uZYDIW9<
zUG3=UBf@fBdpbHFM3)u{qO1o3VZOhkuVblVZT2N^K>Z2rs-1@vrJ;H=0jTaE+6{^Y
zqtXljDH`QZ%?7*;O{UHKQs9Fw%m~6tz_wP3YtjwK{E%xc=pwZ6Oqxa7|G?~N-F=rg
z=@|ld?%w5qZPt`Ffl9}~JNDQIw{-*M;q~3{+PGI}GzY?3YzNGOwye21;*QljVfyxQ
zG})PGgjSb`>*^$*w5>aV=VYM;*SuTD9D*JIrN2F_{cL|ST|Iw2!>{Uo#i(@<cp9GS
zEedJt^N<Nb&Ks9_66P;`9`E4fre1ga@zvEB?`isvB1;0IfShlk1Ev4CyvMuEEH#g)
z9pniLq)pB?gGP4-+{ldJSh9)kV|LS9=Y!KXZj8IX5Gg9mU)$dmGtlvH?4<#QV<i0@
zz!2{iPQ6G*L80T7kJ<HS(W@!w-|y)$YH~Qa=N$_)`NgI?O1E}F!8P`jxsU8DN`*en
zy*2DT@8;P@Q@E#cC4gYaEB1kT*g<%JIxgx-NaHfs9k4cH^o$mGj%w5^<zLTZOxsK;
zsSljomph_uC5P@iPuj1ot_r738MFAIpP-{u@Hk^OkUkeR_)ZW^@DJ`$p#lPWys)p`
zCp`i{Is{S55v}~1@RtWVpAFt3f{y4zmCi$918!xudXZC@W6v$FK{bY-_@-kImfWr0
zLjs(-xWm*J(hvd|RD>#P>p;va@EC`ALS0<&LUk&-7NjmMSHQlIdktRW=BQN6P;8|y
zZh+ZJ@7gk-?(EL;SphHR@N|9h%qJn>_Tc`*rTpnBy+E#ON$admHFgF<;aC!R*qEe6
z^Mjt4u`GC3Y#|0GHrqT#HgNczKW*2(7YSCa%v5?l^Os@QM$3RVzW02D!*3N<h=D6M
zt-rdRwa0xUlzwIyd(eDSrKm@ZNbnop%WI&E5LZw0Uj#t%04L(L88j`UJBZSD7|d}^
zWr55Yh&jNoDG^b|K0E)XNUJc%bD$#HmE94`S?%sx)3P3G-SHzUsc6=B_;Gj}wVB%}
zlzvJc{JSNK+Wj$ZjF@)&r5NeP9K%E$r$v6R5tBOshmt2`!68XOBWavT?jD!lw7(hE
z)q7Wbn0$|h7r9>2Y;yr>Wq+pY8Mp^8>0COQ&8R{cMXAT_qa>=&7!2^WXC~u4RFG0!
zDE+=n5jrP%v&L=uV0qt=@;vlQo=A}k*x*A@;%{RT{=G+&%iNPH!w8u}-3XVw2KXTU
z{bc1vulq*GVOXdI!{Y-P+aN{gXHz*IZ|ir%h@o*_BZ{f$<A;g{PF4xvp;?LKnc~~W
zuPoO_;keNRcDsa*2AyaS7ym&d-FGQhUe0+gUMo9P;U-sAIo0xu8o88>S2<ng$@vFj
z|9)Y|Yem3YPsEr$XtJ_^^Bfcm7#?{Np0HU7Daw6IkeT8G_veFjo|Nij|M>tAAwfln
zR^SQ5b<aY;^>ds`yJMhNHk>;T%}o0ynE~rc9Wq&(#0tfQU5d?NWz-s5PR&Xv{Oa$K
z8Zfqqd0ZoWYJ46t&jhaar<7NK{9uZfi%+R24+YIjwxrHvE->b;iLLXh@ZyFos(N&I
zbVMd&+mM}`v~|#hCn@#l&xma!avvb!b3Zzpqi|l7e<EL5>UExUzR2hZ%;+Mzyc<A;
zedueb!dONEXSBTP8LIj|qO2}AXlIr~nJ;`^w3lb-+!c;s{5hdtdMtq68+uX8aw-i*
z1Fpoc@q*JXxuZY@8T=N13Mwy1=D}U`2H~m?T8nq$ZUI#z7D#;P6*;pe=w$=D==lr@
zgz?<59=s0+Dbyd4%W-vDGP9z@%7@LDhx-VU$4ZJ#3!RwdRa^8X_9eQfBsDOlIg|#e
zoGaAIc$ZNl93?>ty}6$Li#*zEb0QnZ*<*t!ZoDZ(Tlq0zi&s$-()hvSDxaKkY2|W;
z0A*xZ<Us`5N*FYaSidCHBSE!&GU{KG46NAq{kJ+@^k*Df?}0WD3nx3>s-AlB6XE}A
zc{=4PQYW1(Tktnj<!b;pUE-Q6U9lfgo!({DLwwLl@8LwP>61%Xe34&4-xCnTM)cI>
zTJBsZ&=D7LASzqGKso1^-R`~6{(y~{vCYZdbT-Ib9~j+DC%(ErZDVil=*ix+v&iHB
zsK}ITj~RA4&Ugq|^w#yo>%!TFaH0BrRffZCl~F{ZuvpQzUD+7N?=9oKfYJTV9h=kV
z8tV0gKo@AU805EtaZk51Gv2RmJxlAGf*^CEu*<gJmF%+dDzz?Icx&vYuf%<u1W8{;
zr%}t%z<tV)59z<+3Gb(CXl2KTv>}Gg=OuqaUmW)r_++?y@NOy%Wz2Z!oB~Xgc?nQN
zKdZsKAVJ*VGs`G#A!*Ir9xwL#`R!}eAM7TE0<V^wO#rQI3a&nuidoqNudAv{{ynHA
zm5jR<yBV;z+8Wep?+R%w{LR#!=>`@{vXUL=6ldT*Nesxwp8S;F?n!Yp{MhXl20<W*
zM_X=t|53WXG@!rIUhP5aW$QHgr|C)5^zldS_0pGVcq*v>&BR1Y+}^7DTk-?j(oGb%
zu8PC^A3YCR>F@t$hH8}0UF%v5d|1Bq`M~tdvN|w*(|Nkg{%8&iIbedI4Wa?%hQ6mU
z+j_85RdiB3d2H+<5_xwly0HMTG$SL!sfAYF5B7TgxqA%bfYZd6v|RI)_I>I?5BXZ0
zZoe2~{FpYVsq165Ea8ce)dB({)^1$y*>&8k829o?924`LEozKFObmJdra||>dR(v*
zxtDIR+|vkyG~9{x1}^lZ<iUjM(CXT%kOAwP(^rb#UUXW-Dhy~BVZ7iwFU5bdDYPci
z?v%K_2M;n#+ggC2cYrRqnL|2+)FvG2rKdU{u{OH7q9raiB34Vwu7eV8Ur)LTmXNGg
zSwu#6>H;MsMVoS5vSNlPDTr{^#BAmWHci2Ia@s|=+IYvLLsXAH;2`-p`#dBs4#MHW
z$8mQbqYclXCpzlFrk7rs8=1NRNTH*rwJW&+_thBu5ovm+db6>zrr~#q3V01lm>*Tl
z)mY8#ynOmydqK#3z|i!_3Ao3(v^#Bz7T*LVIsg25?MOiaaX~;lrA02CdlDV`t}_$Z
zb~U{H=lzqylFF!Lv@9W$Z9@oai(J?&WGR~kZfk?zyav(`>E76w$*tn<aCgcE^tq<N
za~Dj$%^gr0WakSIU<}#|Sv*iyYJ6`q_$7)*Zf(1c6FdktaclDcnP3^qBHQ3Gd@kT<
zFN&)?GU1&<#d-p&NA!{hE3bYCa1O@4etC#NUoSI*@xkM+m&SLZ)qy`8*R>Ir16_P?
zVS^1jSMUQVeE9D(ozGa`QHhbq+tP9HLQoCJNpI$NzY?!D?o$VCZ&f#{@^K^QVYq~5
zYY^Dhs>jQ?D~j!&-J{Cl9~K*>{#wNiyXf%19^)2U+-V4I9a1E_Ht*{=SD@B9U7Ecl
zm|tvCTB`wqQU5jIehtb#RpJEH@j;53^J9CsNTGzFy$04muelj!b@r}x47u`UC~WL!
z0D+@A#GOgY8zW!*cPm`fyOq7FOuN)TRxbIs#+Yn4%*c&#qp|g1Hr?&7SbjD|4pH6(
zJ8jj9{}P$^kLmPLv{kH;<zkJ+j2x={;SfEa?=LSsIsqAo%O1Ym%X`q)6BO=VnD6+4
zp`Rq)Z62-mO<=ne^(?oce?5sO3j{z5V(uCrk>aH^sM?-3WY=wSmg?|+S~L0w1g($}
zpGNR>L@(#{MGoab+_U*wDmf%E<#bmmn8izyGfof8t6$n<T(oGtoe&j<Yb6E2J^0<-
z6tNy1g6v|W6mET`e^s<A;ke)?NE-X2G64nN-`HPZq=TNW1nO%VgRufUD9D*ME|uK$
z7nq=@h)tm0ll<hTDndod8^G4EaP*x>z5RHUAA`C;l`@+v_h;dPuQ3EQT_!REp07X7
zg#6BWl_SG)-A7x9U;ZiJ^dAPO3|6^2;9LLZE_*^Yo(^pI8PL|^Wpf9JhTW!81z9Au
z|0)g7Y7mGEo=pV>Ml)iq%QG=bwZ6B~ZSPPL)?N|Cr1dQozz9*bBw0?%=CT$X{~Vd!
zgJq|VW2q$L<sV&65?s#=JU%6<$FU`_CNT<AXY@Sp1l5rL)xNrFaJBxhTRVX0(ITSN
z31Vjm?dk{Z<EDa8ab;g4zr&PfD-bJ|L%~QQjudbVl+k)4U|`NMvD`A-sfYmQz}PcC
zJMwUAEYH#7npzM2zH|}Fvaz?Ezp9tnFWI<Kv$UGUO%Zn$g05SHpNC%2y$(~DXTH-u
z{PbaiB55$C4k$0jh~y>w-sree^5LLc^uW^Zx>6kZ_b+5>M0}?Fy=~RbMeolAnD5uF
z(^?3k^q@6`D3iNvQI)pQ+Gxb^_u|Lr;eMdUXvNBMzr1S!pW*%%9+4EFhn#A*f-4`H
z2;VSu>^u$=E1owzwMg1XK<P8gob`_=GnU4SL$tLuxkJ4o*fQksRc?$&j<MlN90W03
z2Hu29pD;?P*XaHey!_T{-C#mXLa9$Rx#D||q?(twnNbs{{k%wYH^><)&&#%$kGkN}
z!2#1jmUC7T-mcAe8J>>?Ad6?HHFs%4A!EQ}FXWhm3~Fiu>gW9HVL&(P;KcoVsBfNR
zfM;KdWY2b{=#~#4C&ur4Ow_V5gJ5zZM%Pv()xXwrvX`bc0=n1OzzC&&sn}kXiXfL}
zxyNrAb<OG*ypBM9BKResXMY7J*@YQTNIW-o(h?&VY?R250BFMQYmw~jxWFse3Gu>`
z&F1gMWd+@`Hzd*#%jQMoP)pM-BrxEu;Ur22mj|UJka;k0ZVV8bJfnVhLQvIjR<zXa
z>@dpr^KIu`mvz+MhsT#wo()XI#i2eHYM~1Vr_ul%1<SI@+#lqbuoSocT{?ii%hJ)j
z4`nWhXzN9}le5ACm~jzWvi)}ch~w`4BQPX8_$AT3SyB|$ta(=l>{N6P_!hdlt7{pK
zVn0a+$g(U+0SEk)zdKoUG}-W!e{jD&`AtLu<x+C^oEP7}kK{P6`MqFe=?3?pt+v{~
zs0)*PiuBZr99>OnS7<kj?)EbR)SAXsT1gV<$q#pD)-Sw50WcRJz3AM|r6qB%Rp-W@
z+kV_k@A@|o1Kw5!t)t(K0o)k?rOWo*df-Z_`;swsb)}-laa+Lf?rVUoGt=zS$cVyg
zmg7D3gEQ~mea=QbWceYMu-Bl|==*1;MNMWtC+FCW+uWz)|Lg^LK8G(198&E<hW5}x
zVX6W$hJA&K<;Q>Ii}&8B7cq%Gk2{N+noU@B!|oEf8R4G*HZPoe|7R%I)6F2XA!x4l
zOG}^hpVqQNS4t47z{afTt>8$KmM~E%$(xgUrdg#{t{C=%6BG>mbM7FK7j#Rz`fr1<
z-P$M_Uz=_Om>av_@WPDe+qDa+H=sCySlJ|dezTpeVkO257Wdl9%OD;&XA-?iW4FTx
zHl0ebECSUG+AaSA-u^oh#N}lqEYP^7C8UvR&fX@w?6VBViOU4uB%k^?8Bn3C`S3H|
z5mT96ZyA|IkNG<-ycf1qW;BA!fym5>B2)j{nX8nbH0ZRHp0L??l*oQ|icKl5E!F_4
zUXov&TdiNzqE*6q;&j2cFmyXU$LFh8wv;ieS%rUxNB;SwJ5bzbjha(}Q()AnTF@8I
z4@?-lg3qF<p6%#fdp-?&2x1}{Dn9O8DLMt!b3t`wm^Iu^fygag{cU*pQdivlU!=tk
zjV@1jiNC}CCQ}DhLA^&F`+IVIrkS;o-pXh}x5n4?pbFPYEWXGZn8z*@jq3a4oGR(e
zXl2GhncByX@_rWuWz^UWkzBjB6tvV^2AWw=YZsz^BothC2XQb2$<j?2nL>MQ%<vsy
zbiw(CSW?tEs3{W|dVfB#H09;Q&3NoO11#3Dnm^F~vw#7KeD1f%h#pJdh2Y}b0R>u2
zhlp2-fceq|YuhGt-V4Gk_LPU~0rOrC?fe%Cb|4ns_4sPp_B*%cD-?1FJ;VB6f#26B
zMkQyr+8<L22O^uAHFD2%aSJycE4T(5EYY5`67S%kSxV_%<)*T2AWF-OC#kMc9t%Oy
zqO{&GEv&HC-1odbgfmZ{b&K^);g6E6Ei{n}HveYH3U@cA#-1a|e0}ayAa=)R=1iNt
zvr{N()I^$vYn_YM4?gZU8suWoMPdSoKMk<xb9xR*DO5+33*)|d_@8R?)Ip~Om&lba
zLBR#UGf~n|%yGA^|MSY0JtGyHte!!@zDUH^jg{YP*jsd10-Y#7v*v|U@i{FSL8rlL
z4jK8?Is@K4^y>4F3e=LUtP5JJ`lat{A|D<_84nJ{+OFlfo#qcs>6^#0OMT-X1OECU
zu#T43Z@<Ghtc|BO((0uT;h^{k2hLA6E(G^yL>?C<)1zFKY=1*s)<5&$E_D}wxHiY>
z(@%hY!f2TI6-_zeaELbJ>@$<SC_|TFyR@aGV>jyd1c$qiBO%BNB(0f0c<UXWEJkjZ
z#Il=R#-7$Dv8=(TU2bIfu6<n!&|<S28iT3J$hj<OAx)JNi~6h^AdQO;(Yw}IXLpa5
zwpv#g)&#Rm+>N9$R%XcfwCBaKTuz<YL7(Xu!n6R)`|(i*o{<T7#yAl)^Ss_^wX%yI
z($Q?cnmuD3G18Vh^f3{eG042cnxbnK<Wy7&+KVl1nEker1K4k1j6ohaC17`EpWUf=
za3%NY;7ORn6llG_m+(A=voCRG(p!iweR1b{?%|R+-?;PHdT82G?Xl4VecTyK4X$pw
zy89Xw><@CrxNqd!QdF7@?!23w#z9-~w4{t8Fx+VA)Sqe)<PM92?{h1wM=5c>IX|{|
zCt1bLeyGg*)mk$s7qG4eK;~b4Ek+AU_EmZNlsaHZ-Cjw7fz9M;VYLr3vw+3SB&ARS
zsLph;PCoa2`zvzaAuJ0AT*mHB!56jKR@KITjDuJkg^ztQFwO=w4RB8r)qs{ZCL2oV
zNzSJl--m;*(E7hd=g(o(U>9JTpSw3%*H1j*>Q9n7{kS)k2GxlTf==HKNP<7T7+Sb4
zOry%nZzCyZCs=<ljoFA3;Tyr|PMJIe8I}eTs0+Kz1J{9|pUuUIJow8+Y_s2%+?3^F
z2A=Tf-^?=QqdH66U?Ry(BoZ|4;UUZ2B5L)+USDub?)@|0XUcdAs!HeG4A#0resyd2
zqn18;Y@-o3)@2}bt_cyJ9n@o<@xm(jU}yT0c!JJYE#E0F*W&Vr@a~y2MSnrSWyp6B
zWzD#|nWI>KNje?NZhTr*(P-+x@}XDlIlza8U0t(Ze`;Brcsusu_X}S&!rN_YVJXA{
zzQ7@zw5dPgUHmjA3!c+$3n*u&C{I43ZsN9acVg@F*F<?JmzIRUJmQO>iACebQoB=7
z8nOhPzuVZQkj=<(_H?DPL&ZqpT)eoouSqO(g0E&birGM!0SfD;D6@$uw6{O1P{z&$
zD_@JbtKNAs%0hqPL2Sy|#O<gVmUlStN_N%OPuyi_L4Z7oiR_nt*;{rf6&+-x$~kL1
zw%OX(b55mR;CKJ>l*1FuBMwi+T|eKPX3~smK%koT`piKP7-DLgsrc8Ra01@_Dl~p6
zvHygencOft#=JB}yL86AhaJ5?={pxZs5d_4+n}uMdqW)C0QzUS-I7{nzF~PESoNjp
ztE`7pWwKS%=6luZaBLJZ<fcRhr7*Uu3{GI3KB!6EYUwJ}y4(<;b6ilvgt`bdMT5qE
zTOA}H(mfp|j&5ILFO1%6)a*Td9v@DiTeW=<xxqNErBYAtWilb@;<r=%(iHP545Ms;
z;yfB7VFxAdZgvp0B$PMJqTII<hH2lMsl5Jv;FhM`UBOi|vIX#aodF2qRkZoVMJEBP
zS#Mc+YZQZI{Rdteud-7d7v|3?oAufR0u*a~l0hkSoLW$MiI9&^bSp%u+eH@}Fa2%^
z#T%$FUu$mUF13by#pD7p(mviXQ(b<H)KeRO3i(+Dv+cZUGAE5q4Yr4e??lF-UL9;q
zx!{MW3zYlN{j)pG$(Lfi5HoW9##7q77%8@ntXlgUt8~=IoS@(`Do}w#^&g)CHcnP^
z=-W2lf5}DZcqZ?}!VO<GmBn9N?c0&FlSBqBXcEI@|MRVwW7b7UNs*yD!pqn-r;~*A
zY;+You#_F=>Vz>8pZhc&*4{GHM#5B80ms;sIYxW!F7<pl{|4C#N``5<rfQZObFQ!v
zB%iM5#V^%WPM-qlDEpsn-{9t<+=>?Ygx)fqQt4Am9$6F3-ufzcm=-nb`V{SP0jXj2
z>?Y!Vv@)pB{3Wa{ocn*Kw;2}ftD4Bgv^25)d}Nrmu2U-c?gyPapCp;Qpr0ddz0=uj
zh+EY<-glwD8lZK}wd}?R>N;M5vTT3;9QJqNK5%i*dYc^&XPff<*OmQ$9n%A6AMe6o
zuvm7JTi8<EwwE$K4VCitR{+I+*)QnB$e0W4==FEw`KlTcL|KZUc;A9DDa0kYKT>fv
z%5(N+*l=LTJ7I3qo_cSS*cP=LW7IiCUBpY>jL5%Z5|KZzthXS10s5JBg^(i04KtIS
zZ}BaySxz`r!4VWbX6$>L(vX3Jg&My$oRd()YuoCuWd2+Up&2gh7o?bSO?Lg36!J8)
z_r^!6(7#$Lr&hHZNfXj^+B5YOHn^v^Mx8&gcN}NS!OQ_muCgV-=?m)@-xsZc#u9t(
z*dAeayRHW`L5(iQ<qBGsTAqlR?aKXwy0{HyJ><(qZ6iIoUo!rnxwPuojBQ_kYNOL?
zHdPlbSPTe}d-*dp@}IIAA(11KBhYVIx)FC+uR|E#;fRfwDVc-otrsv(5-He5J@RWl
z(~K8Dx9pG8JBUuU4c&Ir3WfZQo2BXJ?EMh+*)pbFb{_n06fUz5Pk5fKf1eB|&#2zD
zgDLEZ$>wYu@HU=I$QE0a9*l@M9J~BI{W>7vfuHI>7D{4uZ=!ceyKCp}_b0Q<cWPwG
zmf~Z@l-P2)jKyVTmOu4WadyZFDn$g%`C_Aho+SV6^O;|H@P`q1u3EO&n<AfIB%`h<
zDn8o8>m}7r=@uF^fY}8dSLHdzUePnuc!!{Sey?)9bJW-(f0kS5>{Ezxs%*DiYYPAT
zpT1hz_&SksU{cJChi375u_YgHy61zD*9;HIVC~j+%ihIyU*%dSDg{=p9vnxCbCrM6
zG_FdY;|u=e(Dmc}mlSU9c3A-e>XqqrahEtY1e4T$w8w=AgX^ymeSv!iC5UYPf(G9X
zFSj&qVtWLsQwq(U4Ko`7IegfH6kCAJKhtOpIf@D3;)-)k95)Bfc-_|oZB<T7L^P34
zMYj<3tG#Qhow4tekmc|niD#37uH9bh0jIxt17!5JZ2Ht@t6YM%grQ8Q6b^NkcrI?E
z%-ezC?Iv%tkh6NS5Bt=m_kxS}SAPly)oc#3rn)|)wxl~x5%3~aZUR+Vze8fK=zO=*
zadS!@Y3h({?KE|g5RQA>BUiP*GSn3$ct+~;=Ip&e&1n=8h4?~kdbYA>*{F3*`^0Ip
z^gN(op8Y}ya}M?{{5yKdWHcFn_E6I7fOohr#Pia~(Cj_x;&-Qyri=tN<x+wkNU}_q
zHXZ{9*Q3(PA!9J4;pHW}drsh(m_({@c|R+Hh4xwtXj;F*<UQRAJgaT6_%y!qz<9G<
zUa~OfC12}w1}E8?A9Wg2uDyL>5V7&V@SPu-yx#uE5MObEtaz4-+eky$z3I9=kpRRT
zLD<l5E*#OW$W*tblSWuDk@TKbgK5Iy<5*#IL)~3l7#XB72Ts9B@C-V3n+IYzxfB#9
z#2;@Oea#@>cu37@l<<}gryHp;_#AuKodd?Tt4`3q{;qn|N!=u{R8lR(zdGkQOfwW|
zPuXLd5apM&9#gU18r0KX4`uc*wQZ%dP{cM0*{SKkhrTw+oE)?r{2Xe;ZWc0(uZdED
zVek0xT)Sei&HB9<v-<m`)@BJC&eFFqeRnrWA%Xk<&qI=A++j;|4M%u`&3NtUS=7LM
zPQz*8)``8_c?|b;)@=bg?@3upKklcSV_FicI!Oun0cX=YR<0YNQ72fYTw`Q;3GNs3
z?r0&LSHBq?>QLZ28nnF8Ho_trEz0Uj{d@-Jwf6Wj-0r;&?FPNCBi&{$lZ5Qx{_Ad*
z-qv~^%8U}3;uAJ{%y|KklP*F7-eG<$SNLL@!Y2o+*lW3-T0S~vT2j}C>T<R#I-l*k
z25cnE9`zT0u_X5)Ck2NILV(V%IPoUYP2h6BaQSAQF}b<S`k(NW4Y$9vxZ9zhgpgf{
z4m(|n|MqI~3{`Qyq^85jbRu<gY)7-fjZ}jam!QKe^s^5WhLdCezJM;kPa(ZO?E(x1
z_D9+~@r-J+BQbj#IniJo%a-7y<+C_5npt3gRPnuirTlbg+N{Cch-By-WIhIt1!c1j
z^7VmJpwY<;5C3Xvx5&?RsZcdiaA<0XZjAq8+BqmL*^)7RG~O#v%i3aYOGwViFyN#t
zwD(^Ka@Q;8d|^Az%2r=kUoStH9JrK%61W=mvE1w36tH4tC(Lmz>dplp8Ho7NkcVT6
zcvs2BmwQqaE>W^`bGef~`mq~>8>U?Hntrz`e<0A^N{m2%zYRe@g^B0(BFmR;1>|ZD
z)`jh*zB+s*UYFv(F9b_}X`1BlUB%T3B?di3olM^HB)Z!F{q@cVAZFVUm;2+Cz~u^x
zNAG3Cc(-1zB}U}`eZ>bHIabX_!S8JIv&SC@9nh?fjhcs}bRMk}LCOEVv~Zn#hH5rC
z&cTT_r?QYL@*^#LE9Gltvt7A2UJz!%k0C@)q@xfq?g1=YDfw{H|Ne~OdFREnrpu*|
z2Bp}hr&#)8_q17e&(sH<@C;G8^Bv<27qR0FPDMpPh{TWiyWjuL^g2G9{A5{p(oOh?
zqF_I|-0**2YBNpU^z<FORB#wqQg5&Wna5U`;9iSjRr0M?{A;BDT}Ylq{}YWoOvqz>
zncxLepcA0~`+EV!zoHip`k&~-c^UuvK9s2l()Ry;4!#W<0>F=lXB*Rg1rB;97yfKX
z91JKM{dst|LfX*q6CKy*lFxB(;}Znmwf@0{l79ZY|1$XMLxIm9^UMpL&r^JOXZ|Ek
zU;dmZ?c~@C4epB25W7!waQI72uKKCTHC8{4GMiorVLuyOcY46mF3huLIkf_Fyo3>L
zEZa<$@gsxe6%77c%nBDp-QPtqTmM}Wl=+3{&tK8H#{mKye1aoOoBrxS|1&yo65?+p
zJHZQkz~}$pMf@hIf=%qcjGe8r(W9^Z(-h`wf=scI#vQUXj)HgB)%Nsp9vy#ZPmf!m
zPo^L@KdAZ@Lb21S*C6DFTep*<HUH7Jz#&l4!=^AnMQR=@Bh;Z_D~)S_Iob)(1y3)X
z!eoW#OKjPW^k0=g>-Y4GU0OxKi&Eq!JekVwgIE2q4tP?2<LdqU@aCVv3;LGVVwvov
zsLT_|P3ab`>(6H57m~%u46e*3FI3c@pxKXF=qwHBFT~d6qt94jfqAX^qaCd55?Sao
z6kFP{d(gi{8S`V4vC<`<?t6yka2_SioVLPF>%iAq@8-^I!CZZim~#3~Lm$1oMkg~x
zSJSSNg3`&Q`?$8RC0`miJHq`4^c+4x;Uxv(Wk}=U$sjZ1WIKaXz7ce)lhRHAZ+mGc
z6`C1>$`=iC>1rZ5jut<H^>Erm?^2_gx+JSPUe(o7UhdktbNxeYg6a!p;ok0>%RwWq
zJZlR<T8sYa<SL1y`9j`}jhTyJNtVJtt7#s6Tvp6W4f?zx4`o-3dlI)2g1W(AC*ptq
zzijI8(@B!1<okRbC%%LXbyp+e;$>iJ*p1ovg=`=$PHL6XVsuad^2<hOGh?+LlE#;S
z&dMv}89imAUfBq`+tI_@R;s3^>Jid54Rd@UK{wj|o$X+A0|=c0{2x9lHi>F<kOI=k
z@Pl<)>L_9BH(Q3I@MYrq{@*{r$zl^!kbR9F@&c!i6;gpyLcF6TY&PTLLSq7pPAwIi
zPatv^DP44MxXQMry0gTVQ8dv06d8+@zNcf_DA>{BCpVe0pam;hL$tH`_>W3$sV?{<
zX=0CUk$yS&v$B{4=WT*VmrrS8ofDgn3euL%M+y0s<46e^#d)NGJYcWB-C^R^HgnB>
zU3WK9YTv`x-a%@3tX0brt!bH{9)WnvNCC<8DZ08h<C;c4!`o?)Q%Tzr)dI0{KYVbn
zWfuZ6b5o-%3!Ez6)yduN*r&luCogQJc#|-jPa#HrRB4&zd}*tE6k#Gg@5n9cc{Duc
z`LzVn7`qf33P&<2?PQ<F``WLno6aWhr!$GiA8@$I_Vx|01ev&|^Kfj<3O~tM6B5+5
zd@Cxt>FF1sIy@#;FsIL-TVj-3(lR{et1Gx1`xX48Z=NeQ3FLSmxzGX&lo(+<g2ytY
zEaZv3N*<hHBM6=OZJHyM!`t<;@JbV>Y<|coxeljmjb{zoW)~(pKCuO*FFdIa+)P-7
zJNWswo5U=n!DOXurx13xw^Wz?ISI(RJoMR1wv4-hUOkj271lcKzM5%Iwkzkh&)AP%
zYR?C%=OsodyV@XGVLK(`EnBpro|zpk=*czs=eA0VYwf-njI}bNp7IfePS@OIBN?Ss
zBEa<TV|dN3-5-zKxjOIOK-1Xo@P>OMk3FS|`6j00jyUhOb5`G)CeSv#ujA)lZXA=s
zt!l@X2d*o``irc^@1l<Cw$%5d>H;T&V6J@<mQx$UV~fLMMWdL<5r~$&NDom@U;6?^
zDK(61Q5%((C5ib(Rn-sbiaYbLnY4u^Z49hNtYeGA$01o_sQ!IN^9-d~3-*fTgd<0F
z$qPb{o3zs`&Ct|>_jL*Nr9MKbYv5Ctsq6I_qB4S;O1-hI3n#~)d(vPH_K}C9p^UX<
z*>H#0eNk*L!6YJW=6`oz?;Rd<Tr`eg&Tb=Zid#x!02)j&F8TY$^eOuYv(NIt53Ao6
zPgKN*U!280A(*Ak`w*yX;Evfn1R=Nd?u-NL1%LIt;v#0%_>_ihjy97npF#f_apaU{
z`O&z<b0bdsb#K+tF^*OEVEsWYqg1^P)0+Ld!|>SlXnmU}`!Y~zdmc!|F8%%X3|oTr
zj@75e0NIZBZa*f#eOsSM(+|H0vKcsCl}JZ#<(G-_4=n_Y|9w~?*VD4=D$v0-Ij85(
zr&?1vdzMeiDI0rfmfj)KzLw038dxqD7Q@76x9r#VbX^MaOUj;Ewi_KV{vXX<YgAHc
zzxRDT)@tSCIj6=(O`RDDr%AKCqbQxqjPb%G8k2@rl=n+&XoyOVlTMmiP=U96P1D4b
z@R}fCHR2G7nF=JKsU&$p6BSZK&Zgd3=fnAM*8A=3wLk6k?C1Y~{+HkX!sdA-cPbk7
zrg?b(+Y3cl>^WkeS_LD|nk@0m&IIekpc43M%q8O6{X7YI&(y>G-5QiITGwz36UDMg
z9N#I2h6_49_VQ?I)qtP!&U*F8>o2rV_HNn+NpJt!J3A?kYvl^UB6dQ?i}e=Op<%eI
z0KFqIl4`w-BfXX<h9{pO>dK7gFF5h=1*)k2T`^8oTR6<$YXn%jtK&w@B0UwV&M{`2
zUrw(Zz*~G?@%O3h(%2&z&O9H<M)sJKHKR;#UmWTusRaNqWEq~+4dYqD69cd!IoTH1
zvxmM2)=PgxjGK#lE&X58Z_W^mh%5DisCdfv$T&$SgcBuwZ7fgTc3_vbuoK5tZxbHD
zP&L}Y;PfzsXChZFJ)tZHsTE$E!;}usTgy%16qyAw;LmVKR`gD+iyXd;gR#WAXew<n
z>w8`m2p3D!ZiC;ekcon%^OHplZ1X=?7#^z8hxCA9(J?`14R^u6NYT+;40zo?LFeFu
z(*v1Ly3$`ZA@>aFWV)7wY;_AL9~}R_zJ)Y;k9pMief@a-;;YDD97;%vvvQh!cE1EB
zh{q*)$ayJB_QQ&*+p-h1{;Bk6r^Qkebidvjb#0%dYw$$#>#6m?t_Oq|(g7sKw!D+;
zdNP8vz#bnFpF>;fjq=oc?bt{%s*frZH_Oiyg<x{NmLV;L{fFQSA_?p}-fq06+(s9W
zr~6iwWd3uwVMCJBbGNT47s@&w9Ccbr{)ZR_eV)qp&PBY}Ir2;{UaD+lnBH36OfD2?
zz6X9&DF>7tM#{XB_XIqXA|OpKXQSx4yznZr?b-}TH;89v!L5igR8ZwUA_(E9oClGI
zZ~V<A%^VO`tz<FXCG8hfAH$ppjg8N0JcD6Yq`IUzx|l{^^K*Wj$c~jQ(OHVaNs@?o
zO+nM5mEZ5lwr-}H8XCsa!i>$ICD&bPE&_3G$>bR&<E62`Ub;}=y)MfXw<5D9b=N=+
zm5`PtMupy>bO<`fVFb2v@8+y^M*77|cew;G?sy(;uevc=_1u{ORoxB2ls}?fuP6z^
z*dj5^Mm`2ng!Xpnu>9=FcWI|9Z)ZfryovE_Yv+f0zwz8uM?$?DnjZ|8Om%NdAjPI2
zx#8*(O(d~%SD*HD9?ZDRbur;Rv=j#5_{P~SJL!v*S0ZRc!rW&mZ9cc*RIRuS3~ufa
zew9fEoVfe}*A*Q>O5^~ln`xT-1%-(kdZ5<)Sj<$+*O@a5ASle-NleZu_gpeI)t9cD
z2qqk^f1?`s)Sa&0^qhNR2u}&1>pqw(5c^cHyR#-6AUv{i=3_3aFDXE|VLVyo6Q*}K
z{161@nJZcrnGw*m{9S!s-C{y^k^2`ZMWE&hdwEgdmGmegVZYTl=eTk3u(;CxJ{v5}
z<}}iW!g}e=+yf;5>Pk;xP>1BP@m{fZuYj#)AC)`Qt^ahA2z70Z2y6HXwM#P|R-;80
zXw!w!1b-qYKq+PQ5pK$iN(txf<Pr&Kf_A4U@qv=G;eloHA&9a84JTo_6+WB!?Xy#8
zD|}%l$AQWQr?7Xrq(#NXr(<#R4Rn6JKA;<gp35O)SMH7x+(=O1MESavC1ZBV<yfLq
zUz^llSunYTw_VAKCldUX39LR&rEG6ZV#>F2zG&n#oTfGiem_AafGV6P)=WTad6P>4
zJ4c-!HDZ!ZE~<S*fD21r0V8AMMOf_r(7d{@KgF^Mgo{poI{_+rl>G7@XdobE{q`Z%
zD(xtC=|-QLbs$#^BUZu&vwa2^rf=vD%ERH!_M-^KH#$39l8qehgo`*PnEMc67=Jg8
zyjLpFJMqB&Q8aN0vw<q?5EaFAN*d_PCCrO|xrRrhhY&CZ?2ML8ol0~Qi9`BvXdtp~
zH)!wofcsIIb5`~pg+XZRS<3x>ub_Yf*^WGWR@#(zj%9rV?^#w5z+tj3mDm~-5KWZ*
zVXQj|E0f_c>z?27zVeZXMt(mh>~`?fa|Qqnwm&tsfZaR|jqzT@lg>o6X%ABgb}P1T
z@j+;Z1%*vkwy1(u!ygu}aixxbL2uaGMrR?QB2#n*hc@{{qHswAvW%}>P60`VJ#hA9
zuZ9l`&+lB*PH|Vd+<04k*B`dFd%^wkU{5RCv_4$IGY#X$z*OyKJx|k;de51xPs0Ks
z!o{&_9hRq;5C@#ggo)ma347u`{2f3G<WyoQ5bae!v<EVpztS6udDy^@)0zM2l12ff
zW8><mwN}-@s~ff*F)-Mgu0JEd3RXSd50ck2{AO#}i6>TlGlbg^B+@kyE(MGTcX%PA
zp^5^F%f;OHS*3tE_T!Nd>!|<0u)f%4u4CqwKLRC<^&eX2hQ&=~-=y=KY4A=U499yl
zx(ogE0bhS#XrwH|fdRw682n%td;V>DCbdwlOQz2GSO%u}68WSv6j_*~&ic<f+wE{H
z@;VvR<;+twfK7B|GBOeRB+@#;znJu1rdI-xPFMI8uYS=;Is9IkOijx42sw}#pk#vp
zMY2<U-`dB{tEMf}6GlX}Og)&k0EtM=u=pJC7)VCG<fsxL1N*<rfq!|#)ze;Xyy~&E
z7(N~N&?;0S(N{>91(C!oR@O4yz#w`sQu2lFL5qK}cphE0fbUrC@QZTaESvlUlxv!+
zAcsJu3Z%Ou6M#DRcG>YP0HooKnVqM|l;3mfN1)TPNy<^U3bB;Al~_TRO@dH+yKHz0
zc(ebi2WQ`OkA8WF4Fx}?w22p-dg&&X5S7eww2~yVK0dn8CZ)tyrxWG7`!@Q2>p+<%
za9WR#!&gIJJejrom<Wczc(?qsD@9;PP2`tuj%4(Na>m%yD#EdsPID+`X6C!r6!u^{
zm%&gq)&8TErxJ?ov=!diswaCk%%T76)1~#`LN;kW0DJw~W-?;D8coPi7lUX4%2oJ|
zIu8lfX5`t7A*uTy&)$cS@3<L184~(V>fhdj?jVE_TS<GWX0eHN8D0ZFr7WM2R0=Y;
z=%=Q9_|4eC-TM*ukla*ZVhf4PPpf|r+TE0TJ=YNK9kikuJ(Pfo$x-JQr1=t|kw?b2
z5;u^^FEz2;f78GIxJe!L_}wS2xx&GIl+*CkUGT#?E5V-`a{8T=ENi|mO^s8*7!R}0
z_XGb=2Cj}PL3s`(kCXf*xn|)N(8j0kuD<Ku+4*UWEj{?e!Rc1kr#VKgy9$Eb1FU@i
z#WMIo1B1e)YEZ<2V$n~TfEo2}6$7Q?h)dPfO0Zip6T}OFCnDM@P{y5wu-3(nOgvpz
z3`$2N&*v9teO-3$&{KWfeBkA~8?Q}@W7NF+Qopzr&AWKkw$oC@OUv~$cbu-kerbac
zWrZw-;5@TY{Nmbti_R~W3-plo_n84ro5l%~0<G->M&SHIr=ZH~5_R#mEN{D!Uq3>Y
zuXVJ%F#6CB>Qi+X_I7Z@s;|RldY;)B8C*4@1I?Vr=0I(mH6W?$FD%rmqc)0OslZ)!
zxocxmczBg;ut9Ls>*fW-qS}I$5Hg)-;UXzwo;sxGxF?A9Z7zSyTgt>WK~}>7r&l^H
z3B0l@Gmgl6cf)*u<5tKz_IxPrkDI|!`$S#Gp8FQK%0=@Q1_o(&LLh#I23KVch1#tk
z+_9xk+sy1PXG5O5ZIcAzYC7C(*RB-FVGYO2W2E8p<Mq>r>V@&@lHScOmy*93Tt)W+
z&554bCtf^eK_BeYJf~Z%>j&lAuB_fXuX|B85TOP~5B;$Fu64*VB}x>p&N;6$gBR0q
zdp<LL1bQHszhh5eia*sUg70Svz0g;)b@OqwZq8-YnjD+cHRI>p{V*Eu2d+AMiF4~4
zF8cliB^WZ>$&5ZSuAjkRd%NxP?M*<IN1R-0chRg(Oj4M{ii33uuOPJY+~sra*Nw)8
zj<07vrF8UN{KR08Os|k+w#P@=(AA{Zs(*ku$X4LfTfkB6X@JKll_1gX5)LQQx+dyb
zHkg-Q8+t5&>hlV3i%X<B#g)`CR*nvB?}jT8Hd?kvu93V5v=xcIJ0Ua{xHmI<n594Z
zUev^qpsnOwFCPhp1bw0|;~ORD30&n?lr=@sRh{_2!GSpLiW5VdO1(DhWA`yzu`78a
zh-&e21pO|6Xb9iTE|7mC)xTq4zPk8^@$Wd^?X39P(1Vq2J!=cWg|%jDIHaBl`!^Xy
z<AaJ376oCowpMF2wi%ZdNc03leY>>b#GyE@iGGfsC8;gg|58?%X)=DM^1aWL&SrGy
z6EmFwJj;}xkoeet1dqJ`4yZu9;NIo4TVhc4p}%>zN4xR=o-{rdT*#v#lurQwguKSH
t`9bKs$r!UU)PHt(_0#|Vxz1W{z=SPv`<rY$%k^BreFBd)A36K$e*>whDgOWf

diff --git a/dev/articles/interval-stats_files/figure-html/pvalue_viz-1.png b/dev/articles/interval-stats_files/figure-html/pvalue_viz-1.png
index 5edf852c20b61cb2d62ab2d5438b516b58090e43..a90c704306acc85f0ea68528e0363c205019dbe9 100644
GIT binary patch
literal 32913
zcmeFZcT|&U*Eb3}%8ZTi5k*m890Q05j36N08OIW;f`AYKktWiV-h(>GC<uB-K)MZ3
zY0?rpC<2BSq(dNp^cs2#3E#d0JkRr;cfDt=cb)T`b^iERYh+07`>Ole`?vT0UHj2x
zt&6*N@a^E>;Mk45^rsF7$2JcRj;&@tZii2dw=|l-ukAP0Fa8O?;b-|=0Umz+bmx+x
zGY1EMAo?F?=)klk2gffQ*gt>2>Jc;E<((Vm8Y{<Iq{S>;IKS_YZ+jm-+jH%wM-O{A
z|JGWWy{2=ugpa9gFrQVaqg$CWU4KpCn(P~8r6)34@{yKS!<eIO(vNQm9RH?t_vt6y
z6DMB(`YU5@HAA*Kr#)%g_*UClFXPtYCE6mhsAMclw$(K~hsG!<cHhDt-+%m{dfN|P
z1so?RzKdP%-g<h?y+y`c9LkQL|N6;zfo3-Sy<F2+<^V_7n;=v5QDlz(VVdLJ!A0#C
zzx8e{GXApgI-j(YJ;WPhKYDPY|99fKKQH?G<sU!&Kl{L+pY|$HAnMUR5v#$P$Rgt%
z9Cm~>KTTZrtt-M>F)z^1$%v4#l$AjTZR|l@eF==D?b&G=nSrP0_F$1<ennXWV^=*%
zgCEW!O|7j-#l<SSckf2qiJlhls&<*THPY499UU7BnwY3vFcF;lfm8A<H+63C+}|+#
zfoTE0m%ib*(5Y~|yKFUuZpYkS_ikTz#|VzO-=sGucc}0zsXh0u`5+}e9_NrJ#H}=S
zc4dAnV!E%=y6U;;a$BWJ_`R)MR^MKqm!GYXCSX)ozJ*FTbmkr~Z)$EH_*k|_9XaCG
zW|lYCpiaPWE6-g%aPrzyRn~N<=gLS@V_VycwUzWWHG6yeWCat?fv`@eYVkbAWWj9x
zId03YeAh##ZvMGPX{z*yYtt3aZU!x4baY{jre|szA0}piu8?7-1vXq97tU+qaTFGy
z-8Q`l?cQhHT(CO#ZeIug&=Wb@*QWQn(ATxj#i=rG>+fG4rLJhjD#-Af`rIv;x2v8V
zdE70+L1lGhlB*?4Vz%u(&>x~W`E_QXdbUa|{cU2R@UaWQUtgRupZUb?_Zyd>&z*<6
z54VU9ZMCBi7nJAd_%+6LkKO<*vbGeuhCbJEWKFSqS&KERx+aa4a_awj-M!1zegQ{v
zFizBtkHbWsGQUuFrY~5QAp;xw?V@09XP)zHk}6YFTY3KK_T7BXnTy@31QG4JN|l9-
z@%*tgOXWrTykbGG;aBg|(<zFy>5%K*6FK}UTE@o4=!$yI4qC!$*!x*gb&Tiv+KuOb
zH^ua9%P-%jt@Mnbts<XZIHMNC+{r6Z^EqJWEM;w#k~bJ-Tb18uGqQU>A0MC7Lc8_Q
z0@cy6*>QIEFdyHH<Jy8_-b|GkHHH32B<|~Oxz4AHg+t2A5%}eZ@nXiLy$Y+{IzBdF
zCoj>{ZlEg6Fwe=-A-DJ8IH}t&@B3r1nFUfwQQ6S9_TmMHBj5BW*0%U~4wtT+GuX7^
zmC@^d%LAzktso*fttQo(meo$PwQ?d@hk^;>c;RfFv6sqOp|+^SdUS1rd?yR&#j;yz
ziHV7*e3bi%8Kl*WrI*CTx^=wQ>%J)Ho83l-V_}n3mt)&H7%W})^#Qj^+s!rDCZ|?o
z_kpy6$*P11lPKxBGsmQ@>ooNA^t`n_qtog0^YgHt^tp#F6s1`WEtTc|LJ(B(1xHq7
z>UHB~zIJ|CN2^EMUsf~c)A6;i5N#(q#pg$p)2%9k4|(?7<Ej#HXRgf4Gv^wqyN=1V
z*4ICk#4lId7w5Hgz6n){>I+p>kt|ttYR}2GEPuQo-T0PN97(e;J3%py627X!Iox48
zol2s03<fSb*^e!A__qJO_n6d;Qh!Xqm?h2x<SNCqq`15|K|O-lzF4P7KS`_%;irx+
zMakGYtxi{xcDPfW+ASjnP>Cz3^d4Pdt<F-02=S{H$y3=);XYPlqZBb?W5GFBIOfJ5
z-oF=3igh!Zw!M1p;V$wv-s?|)+9&*$NR)MTbv4Ymd0rx~A5oh5dTe<_8*jAG7Q`zl
z5wgs^HpMMJ{PIC&qn2XMaw{E<iPB;>9*<Z=7`u^el48TpaVwvO&BJ|2PR_d9S8)<Y
zJQ-o)Wh3C(|E!R;GPXP@R}$HtWliFP1G-R!zVTp>!g2Im^?Z8Jm~L8vs<!!7Qwr?d
z3&Sj{fk^8(GCUhDmX`Z#_fmzNQScQUF1kF3Hz_0I6nX}c&(USc>BadeL$olEE<cd2
ziJT?xZiYz)ldSD06~A0#omna1%~NvQ$iN^1m5hu^foeEu1*<;(Y9Djxuac9Koxkk8
z*x!P4tVR2Ma#)VIa$+s<HzIzGbx7v+RsED}&lKr}(t=B+Tt-ji@T^q~`J-8xk$6UZ
zQ`2*4ijp+U#%MZ&B0m(P5wD_LFrKN-clhvZldkr_Otqw>pV*zc82Lz9dm~}ZsHV{j
zukS0xBholHw1@@lLKV9F+<sFJ$|-i$5t5YiyvEN5sv{!iBU8mpj}^R886K;FL);X<
zwmOt@Jx>aoNp&c&gcjvjr^=)~rh2aG=~?!a-aDk|X6Luk7*EV|)3<)Ohd(OXAzxHC
zNvjsbrPJ!*@^}{IK*@)!MVj}JdkMohM0ufY7r(-35L|UQ3aGwWETa3OJ03+Qh=^b(
zixz20tfjux3Pn)rvw0L>3A$Hnft1D9r*rgfRe0xpT3Ve%!8ihs53P))OZv@^$(1Z?
z%G$NnTQL*n!w<i8o1YcctE2DpPb)g$*qM7uvUuqx^4Y)_U8>+C@=_1B?^c6`rstiO
zrh3u&IFp4UvX@pSh;iJPZHR-)bI(O}A5Rcz`y6-RLeG5v`-t~=1{MJ$l%Q8)VCpNA
zY>=*n_{_Z#w0B*FGpBy)WEu<#L@0ir)|sOq+*oKHwN+Q%To_<<ulcFWMpAev1yi4Q
z;!?z8<~rwnQTtKs<B9xn(7W%6oYiR4dvTSliIO$e@-hWav+60zOJfx_G|ztuIa|8Z
z<^5sD!i=`!p8Gq|g^*?F85j%+u1yP)JXUu~7Jh7$JCz`F-L2iyKJAU3QRVVbylJPy
zn5MD(_FV^`I@if3<ubn>3$<%LV?R<iq`R>)5wvSoAVMAAjfnF;{`{XfxsF`6>vpCn
zi-&+|*dO8WLc#U6u*Qq07|+SPp&3v-#9;;)F<xr)eX@@8V2vmdG*=BQXlAX~hYufS
za?*WMb0^2uC5xWxCF|!5H|n-7HbhZCh{uUk2m6Jw)^yWiMi<>p!NdS>GBUby<Ki!<
zh~3||6X7w*Rg8YcAd-qwm-LdIt{NEdcKf*YKRoPk2|<m}GPQ(B)nd>=`<Kh@jxN^E
zmbvhRPtQ(u`pZ6?a@}D5*z$7*<A;~F>E%quBIO>Jz>Bw2siBIKxo>I@Z_lyDQMlUn
zj^_=<y?_56+o15L4@@Z&lm&(imU<?{z3`34I2=*iZ|(pm$``z8vvK;N(vGykn~ZmF
zLPkF(`Y~4q-V(G<I5-+f*%RXOiye)ee#P!lo~z%(*mGDmrIE7BnCY32JobS9o{Yym
ziP?(7jy$bcFN!yfz+x(vd^rLJG!KqJH6MO%_*-m99`v4Km?ew_Lzm9e{j=T53ZN$4
z3`ZO9#=}XL)!{kv4)Axlq-oswpaYhG7Y%c6>zRP@I$-|XuY7bQDPCes-ZilxPFsft
zvObx20MDRy*G*Rn#)C2$oNLt92EB@oP$TBdDf7yZT0h2w!7kyB%+#T+bFLtvsB##r
zi;aeJZ(a6qclp@&#Av7HrY4I}<%LV|J-Ydz^{in@#D!nk?FhUWeDImETYEyexn0}G
zR|k2x1yu^mB9o(^ONf57IdosA%hy+uStIK<-uAtASiz~yEHG!s8@Z9u)~{)4+-^K7
z?OTlp0TUf30wnIvtZN5hs}{gRZ^PM?eAh7}I}+)DgE!4*wpO2^pKcPH?l+%|8iw{h
zyOBO(5|}OF0n~2A*-i_1k3R$CF(9J4j0GE;4?xtq_j5qG%u#{`pseNZyd^IdOV*gi
zek!FQJs`G{w7>0^X9n0v4wE-Qq#~HcL`|`@5k@aJ{tVcfx<b!cr;0<?7%aNTDaHk|
zSn3!(4J=@r1XI@ZB5i?4+E1mZuK6VQtxvRt=Jb!~!vGTtD)U!lGSR&c5aRPU$q|y9
z9|d8T({CWQn&Oq?S#wFG<DIEIMbnHQdc;xVcgQ;C8Eor7hi!T-Xs=q(;6-O}BY-yQ
z$RhDEjy`>dQysoE?niejfpb`JZK)Cy5Sah~#~TTkyGcEr<yIRd<GDN#LCC(2cW-!$
z<yX-kS;^xUWv=Qfyvez$ZQM;t9E{5@YUQHtlLmp*#o=&vs>}TZ%h=gYXNoIscVA^F
zB^1BfXU|8sR%IAYU)YJ-M3AdE6avC1ZSKlZ-`)xAvT01TZ|t*AOOEH}z@-(eA2Gn1
zQdTuDj^J0PZS3r7%tMvK@heIAsxod>6vkStE={A5gA~JEZ&1XXaHN2-&4N>e!YKCc
zSjYPkbALE%!=VHy6%IUVTtk&+E(vSLb>3_lFQCn*>GwqxtAO>%Oo@^WsKgF+zZ(k~
z^R}rSpvm<E0u;9`O!Ig$jw%wf?UMDDw{PEmY@4qF2*T#pt>L*CO+1!<A}1&3kdg<O
z><%NUm+pN{_dEP&?%V*uGPUf;wrPiP>ws||9UVP@7pJX;6vW!lB^MI%SC%<G4tT8?
zT{kw4%`mSVG+moF4N6ZoF!8hujphEREH<P(CybsU6<;spk88Owv+tTkpn@a7yk)nM
zOiTRa`=6deFo1hC;2ckHZ#Z@_#Ln5btD~didrC)hvH|H@<|}3O@ROp%%HTt~3(na5
z!4(tOC8b4x<>F&96Cl^4cM8*d)~9$BbY)HA;X{~!bQM=(Jre*(hqz=#<q>C%jE9<z
zRm2PC=H}B6Ir}P}h!x+p(H`M<q3ZJe7*U|2XP_*|K{Ro^9%KtE<bKSwz|H<{g`qag
zqX<R1(MRrn*;~GVZsFQ2o~4a^jw*=8=inQyBT<JWfY;<J3WqSL%hfWuB)I(b;^T?s
z*&+99>d+->{ST19J1d=u`(j0$Unv%ybFi};clitwYU>0?-MuX-88Ah@O55HaK@wd%
z?^f=o4#ngB3h?FdWDRuCCNA^b@B9eBM@d^|XGKLtO}wfq3XJcX!Xn@8N(vP8%PlJr
zkTlLejrw_29~{AUV-YYkVL4X%>k~9E2{Hh!0SM%MqahZ|jU>&iC_g_x*KGy0?2m|Z
zuxE5%x_8h-_Zn-_5FB3Q^X@iTk_|r%HS23E`kG0n>fP^O+$trRtJ1bDDJdpJ`CY|m
zkB=+esrIB`0p<MiX;A-yAot}90HQAM%9LvbXL7bqF}-m*e`Qw9pp{E;3#Vj#0;)fK
z7urRzGv9+G2Xp&Es+AWz380*XvEcU1EcJyBshh6oOb>21w(tM?3_zm_;qBDxH2^~j
zD1y~byKb0rOtdp&9&|zt3hsUSj|q~&ic!C(cf-2K&()tJ@Hi0Nszj44K)IF6U4QcA
zi6?7$$ax^lU@$A5Y1cl_f2WkQd^Wv=wIWMTqw!O?{8L-QTE9Ph_|ONn7uhzAGjy2w
zGWyQ}=>}QffF(L>lK%K;1&V_3E}bp2oF~487YEWThU;G)lCrpj^pi@M_S5;fYb*w7
zv;d46Zv@v8cqzu6-QRR}paK|@1Lp0Bd*|IqIY*PbuTeRP^Bjx>wbuPr&%jtui4I%s
z=xRLqevHATGIj4}?kbqU{x<W_T4VPvz13LR)2A)kGcDyu-V&;!_^HkD2KlJ`<Tn3;
zLtVgvB0wDT@rtk7!NZKy_M0KZvMhZ8kIDleaITeU#bDvHc#F>5yW%Sl4%pxNSpfxl
za6ZHI&cTnC@_bXLH@ygVm4V_m0BZY55nyX0rLDtVCq<KD5O5hpuqyNKwFgqN>TYLs
z^SgIGYt&XPYG!FV3MXmBMg>V0=ay%rd8yzSjK4Htv+FJC{0AgWuCspis;@;uDJv^0
zATSEx2O3BF=8qb!0vaA1eiJIeSY<I8LjVy@(t-h-1kzf{(}i5`&Q9@vZYd0;^@F_B
zIr_~;e_sHLK$~>h0m{<t?x8>of3bueTblmbr*+(RHw_~X+RnK*fR||W>+9q+`aof#
zGT`R&!z5P=SPfJI`>|%@MX-LWeS+4YlT%k*n{6%Jn=i(@to`-VK9zdvc{|C~LxRIj
zpq^?Z{icJ)Gpi*g7EqmuD#`t8|A@x`U>?onLjkQIYbsEFEG4UIC1@eedomJrlG`D6
zgBur=w$d;(W#qx@PTwDigzHiJ$pl<yhC2aP0jx90(>Wj3io>obE&l)=WO&(hZ44jg
z`b0p%<yIO*1P%z&NB~6DvSsM6<mAUcmKoW(XD3dA5LQhVpstUUbzKYupNNgcNpW7c
zC31W2>-Rb|WVJ4W%b<v^v0ImGs~e-KrDf2dWJS-=cANYBP#7SO6$Sjr5BcQ)e<ILe
z#bjrm;l~@lPXgFRT?*6;LMJoRp?D=Q7KXWZ%%)=ipA@Ovz5`UB1R`+6ckWvr9B}7K
ze)oRBmS3|dD$&0`*lt<#;?yBIhwF(T4PY}%y5xRE)iJvD5F=0_b-Cg6Q;ou+qN0w#
zAw=zgQ~$GzR`7W>z@4hJF%-QV5I1_B=R7pn8z@*eOHu6}F-<BM1?w}P|J~@io?aO0
zq~(Dhn`PIYdGgxFUqGRnhD#Vn!2uYD;DqNIqdT74claFYBpW@+0C0Epb*e9SY_>^=
z*-SrqVxh}tVTen0=~Lz?6=IRIpcPJXtFGShTP)~CVWsB`Sp*CeVX=6zC{oGODFj^b
z!U=mvTle6&;^I&~nG*n`=qMJhiI$TDdxb6WW1@jBjYuh>ivpe&w{2~+Za06(tl0GS
zEyHi!2r_(qFU<w?5>H7*)~#=^o0^*DoX(%Uc=8)ZDKYcUtsKUs|JW_GDla%JBUv=3
zbE=bH*(>`F8sNOK^CypcCRZTNw(hw+()M}Hn~a7)-)U?yd0AbwJQxj*oO33$TDbH*
z=zVgsIsz^{8nesm3sH0e^D@9<(6x1P8DoIysnJ4P;pM9s+x?tf-%)=XVjf2N-QejP
z#-YvL5PR`y=NxQOR85?+VxZt;oG*OJfh*euz3t{ZeVo+kq>lQfs~{q5pi{z{Pe((O
z5abC5J!c8wNcr!7ACtOO|B@zw&f(=vn1jP9m*ILJICqpvh&s|FwxM58(7D6U*?@nr
zBcB{sk8?_Hevm2TrY5xvW}hz;7L=BTzQN(<vBiY=Wf&7wypWUr1iVQGe$h=F{pMp?
z^612tcgN}KGdG+WD;SZ5o9xfWUxF4|9ipX~;WW^AvayW*S{mPv=qoP+gXt4nh`j%d
zzivUp_8k5@gnHPWy}SG$`GDzNfOf<2QmQ6KKFbDISF+Gyo1FjQzzzs9pkMrZzxJkj
z2o`H4l&4D0$4H9gC3$u?VIEW+Nfst!v4a@T49^sABqrV>J~bs>vEm2x^%H-~cu<LW
zB$_Zzt;l!~jjvOiF~ugjO11Q29k55A+S|tL)cG-(g4LPi6Ye@CjJ|W(tft3)LK-We
zM(v#pU%7-(8x{WU>TJiRX_>X$aSZ+medy{hoQ~>&B6*1xj08-)wv-aKgvZZRQOMIB
zkrXoQ_;js6XxW&&@Bq6<L+YbvN)dAXiqonyHe}*$@#MjMXbbNyhu`w3F2%@&+pUQP
zxVo8AQ@U4p?stWJ?!w5+ko^Z2Om(g)^wuJM6yfFD$PnRrQ=y|95{;Z*=y`!Qa5g~d
z!J@dSn%P4;#O~6}tL#1Q)y=BpJRz!dqtxHxu6GgZDC#lfNYevzc4lM0Mk(%cSbrfh
z;V9&3dAQ;*fz<NVSBhN5KWDGe`|wuuk>-DU^0yP@kH|#4L!Sphy`$v#o3&MBLB#8h
z2HNw>`#*W?+;iL}{ZjAXZR$-sEF(^8MK!NIPfz*u`VxNnp>P{r)Mm|kwqz^fBTE*?
zwg`EiBHzbY3%3^#rdh<dOuIv&YZX@1oPWNuvgpQ1ee_LeA`mH5CV$5qQ(vGzxA2;!
zBw+oX_K#!c?Sl>YIMT)YrlXO<n0|Yq(41nfiq7kr2!6b0>EoUdb~Z#AX8EzvYJv+1
z9`286Bos=Mzlr|!KH;`nhpT1FM-|6_40~pYOXZ8`!%si&vSd$Z%eB|9dTNn{Mcp6W
z=^9R#cYM0-iu{gU&~`G%cE3Sl+A2H_t9NXzN_lm<)ZSMAj{AlTKu%(3oR|&wr5P$F
zUZde!Cf*#mh#ZONH${AMJl9e%C0f;nh1w#Ax;tq(!IkN1QrQ*-sR=y!<~6lN&-&Z;
zgwUh=XQV3F1NZXxC*2sZqMBl>@3=b;^{4u~ck^s%ZE(G7@H|@)H+s}YzERdjF?b^6
zl$=3)f8w5ylJwwH==l8wZa#W=e?Vv=A473#SbKs|S0gTVj4!<rns`v{vDy%wC$2dr
z<6B_+ugwd0p(TWcY-ub|>xdUOPvMTpPN#o5g^t62hj5Shwdl_$Ti<@%P8W!sODE&T
zdWFfRa*D+#9lLn!yD{|18!4k0>o7ZteUj-v*MgIdV->&kJ-<Uv)Rsb0?+|NnVs^d#
zSW}jQOqjm?`3PxX%+pprpcy;q@V~$1pf&TSGvf<pRyX&3TjI|-rU(<c9vz-#UP7z$
zP`%Vp-zgCP`5!y!_5vbUTHGHuaC{wp;{4s6shel~>KaYrhN4b<|2eDxR_ZtM9ERJ?
zsZJ8<Y^uwU!Kys7(3)NN3xglIk#ZPW{XnQ33)z^d<#tE)(4^ng7a!Fr2rug+Yb1h-
zT;iRqtbDB%<7b~!dP5vKTVgj(&(~eFmN+#jg@8kaBErkpkiDWQS>C2QILGF(CMTT>
zafI>kemLM*CyyO+Hr{6fERXsj7R?7*+W0pbxKK(ZR`9g+#CD(WOVxI=oYgiM*&NBu
zM`*J2Kdx^7BRc#)+GsPHWCV@FsAb!S%3QX6czuB5<ro-ebj>cm`k@g0&9Pst^#6SD
zf3qH?dy*j00)AkTafR$yH<fK)Ip&^M3gVTrtSNP|?zBjN<fs=VzcT#BxdAI;ITY(Y
zIWa?gv7TXWJK6~$IQg~JS==}-%SzL4AuE0WLa|>_7ZeSXiifQAaH)RP)m9F}M9SFe
zuPk;K|Ei~cn!P{1Gzdx8|JvCFnHHz1Ph8gEhhULb6K`=8wgbvCiXjcfd0XlCbAI3C
z0zl*r#oZ9>q`i@eI9G~``yI=QvM?u8{uVz|vSIg60UTJw$g7f7aE7`Y`pCB-9nT!Q
z$zam)c!#3-78JqZm&yb)!6_BNf&(3iCa=z*S@-gVt=vlW(&Y}EoQ|Fnnn&yTFVE<v
zl@Y+ke85x+ABwU_!f=V?{X!;SS)y1y$xt=`@NKatb?Mu!F}v4%x9>Xsrw_OY%PXxV
zCQ5GL3}l~i{PH(x(36H=V|L;C^?#mnbGVM^MpIpJ9+MZ5&bZHZ)R36i{?X^WU)?I%
z=Da>B)hOpfn_s0O?c4XZf^O#IO$Ka*?cEe2k=SNJv@=}fA?^O5kpJ-0{))i`8*E(L
zeP?&|nF3^ji*V$H#SO#{yP)QDo;*!S`0X$$sS*W1{wj|3FMlszNOX0VYj<rm4w`8A
z<qQ@aHUqm7NIG=scFMxg#s!gJjhRb`phIt7(qL-B5f<`!<|n+C*?~Leh&91ShD=hc
zi;N9f)6O?%+mPYeiYJE+?Bq_L&OW2hx0GgFKrGK_h)%Qb%*}}YK=ry`vQQ));4g;_
z(Qc^!y}Nc^+sT2vP=j$KHZFe0P)?IBV&va(t&foZ^II(8@dO(8I-{>Q-*O@eL{vN^
z6^*a5qDz*e9X>dW{p3Myk#rQVy<>)m8(%lqpcx%oBxAVU>q)1`U|-&B0F$<(Xj1-t
zn#7k^B@kMyR-vO=m<(fuogUstd+ez;SX%5KPgi17&)}V~3|`B*c+&>fpWGqr9aa1b
zGBo|*5dDtye@ITNIu@$bFd`4>Sd=IbM7_wL!>oP7Gewk@A}>Z!D-%B!PlWT~8j6#G
zS=tV64tj@uH&&<ZXbO%b!FA-$S=P|nYCIO9;90Y1-kP0*gXFU9x5Z`yQ+9d}{mK*E
zVg&Q%Vrbpcbf0(OWZfJJ#ig6E4!0akpIMOgLuN@r6V}zkY`lbRaU^cQTYvt~;Gh~!
z6hPZ(V29YDYTuE4fT}o=t?LKEejvi5EzS<Ve?E->64GCev34vw;~kORN~Dg7Yhq0#
z+G+0tD>^$RYKL+bXKx%bN6+cm_`8t8WhdnxatqR^3EAXbG}8F9e$!~G2&VnxZu92n
z+11A1&3qA(42ime-!Nh~0;k?<`+i9AgCtQq1W=@JH@$=8JRJ)}3ONI!{a=3D^ss)B
zpMwY2E;&`ohLAGeD!;68R@>USBEaYDtceYGz2kEk@vZi;Lx<7k5aZfnSY-SM>F22f
zF)u9CkX9t7VOyVatVQGF>VoiZB`3)B$ON&a3I#+Y337qL8CLPNL^hTp9&YK;bW=BL
zaX@@d1Uz-dr5?8lJ^lt?YelsW$k@dB08+_+VYWt7*CIdb{5ZiJH*liq3Nh9yt;|)7
z8dP$F`7VTKM<jl{`gw3;XHnpb8;$t9LY!b`x4O@E_ZbUKP{OBk1tn}uyS3ssq5X}P
zo(X|!ofqwjzXe1iMT%teiMdoQo&3+UodQSL=-=%}$iZ|eu>3irDclo>w$S=pcpNV2
zhg1@R9USO{&rc{FIuRE7h@*_-+OK4;=talLP53mq4%BW0-uZeo&}D21QWTRd(^T_E
z55*g=H8>2vrE{yT1Z$f;3Rq11n0*ewbU>+_K3U$BI)2LQ<~j!aBk~i~w*|BOCn8@<
z-G{6uJYdOTmh~jpfvqnMVh(W_!xBH=<aT0NAU9?BTY%(bI;49c!|8C>2ec*{2cq!g
z2mDajHCDmn;3g}V>e!$^`WTZWWHXw;23Rk(A@^LZ1Bvc*-w9hR0xCWR!k%bkJbB6u
zGQD~8EjToo3Q41*&CSgl7K8Qus`_b{5;mYx#{xPu+A%gLft`uP&@at2+qFyW*x0~1
zLrqOh`S~VYXL`{h5HW-y_eeffd8Bc$rt{MSuAvv^A><f&XB~)PfIP~XGDi&>o3fd;
z2|QB{k*7pEpQfH5XW{P9Rxk#_%XnlLV8;L%my$4xX8o3ib<}n?-UY%cyb)Gs!01WC
zIJGE;WbLlisjflR9X$VNh&ZO>Y&-eZLC{M|v?|^&L)mktKa(Ohp$M@NiPZOE>qISo
z6*_qECy1o}hc*embfA>{Z{H0>m`V_V<x-`RUR+#Udy2@r+2&!$`ezh54OC@P7-%q7
zwzAD+vq?t?F_bR|MO;T9Hm*fMGcM)4rq?^;AV=%|oT#~ujn2l)nO6kgWS}7`ATdNj
zP&=oKm0rAZyACq7N=rQt>_ak&hBq;R3(2hP;Q+3CMPDL+_%((M^c-nWEIz~M1gk(<
zqYMTNHV)5P?gW#vTqek>|Go-QFv)X)dnTsy6_2gE?ruMVA-s-K54z}nq+B{Te(7BD
zZ|=_BtAldRHK!_F+&yvS|JaQl_R>9l5V!n_CfeYOxB2-@kL>(>1@!&F+UN*itQ2#J
zbxN&s!Z;M4qr-#stA=P{v`D;<6h(z$XW})IfFakvIwyVe%im}=pUH4sn;uy(J&N{l
zR&Kbv1b-n^Aokmvi;HfexZ3reIrdlWVn;e|1fui_z#kIW2B3cIf(&L?F(`k?7=3;D
z`vb2Jg{e2UvjZ|8&n-2^vz`N$MgeF(E)b?`vWf@uHS}Cpi~Qx$K55u}lmk$^x;*Qh
z+b|Qkj#KA6L0VA}M^I)9`ew4qSW9a4Pa-i-cORDJSu6rGBfr?`JPR4xp?-q)WQJF@
z<$9O(L#fv?eg%q=2IAAZ)AXx9=T@WnywMNIk9#N4_pt=w{h_r0ao{kGMBXI%uj94h
zS>Rz^w$qMP$Z4L2xIW6y!Xjv*1MSBdl7vGr6PFAMEPQ@Ry*RM5(6w4A^q$O1YNJ7J
z$A}*f#tA*b7&HWU7jIKqaHsdPL&}{E_8|a_k%okFH<(*;AIhaeEFkA79`1Nh#m6I~
z=w|uje}6U|Vv}Wk(N;?WPG66TFK{0@^RdkYl1{C>#3!4QN`lSgp+Z{1E65y>Kpt~}
zO29DaCHMk!h~T<u-=zZa0UhR?Cz?<osz=yfLLe<}37Kjv0#B!xXK0Si2$O-cl%MfA
zbwe6g3P&1~c&PxZ+|g_!h8*o!90{R5AuP(}+a;isTkeSx(lVHJ?!{SLC%U9IV^jW<
zvSy$E+I3j=B+3_w^Z5P<4RFGFB7<DU0b<6GBT7~W^oPW8#FVzUGk0%>Hsd7L>5Bd;
z=^)2|uC>-!0rKfEAH#eXn^T>!kYTR~73>}@gb42eD#{(A@DyxYUxU&;X21l<8%d0o
z@?Dv`YQX#Y8{|G@tYcmEQ6`iuN>_1qf~3;`&?l;=dds{sJ2S7nW?Q~CGmu=Ri0e*R
zICzaf{o>rZ-K7nW;`mop#E=af-;44ntf%!etMF{UlSA?N#(4QVfKl>Hj^=R;i>5yz
zCux%Q&SzZ{-3V-eBci&tOv#(BIGlCk(|t&w<eX6fVwex0jk>#){3r=C2{t+6#6-+S
zUuLT)O$}vN0X>pPO-f6Xa2~2d*@ao%evE<mwdMFMICcv+!Up!OM?Mw*LeI3cRm~+|
zU*8}m%20TB<qd*K)=x!2nT`?>#0t$JEknz(U{R7ps>OpgMPAmS^94am;r+qMJ%^+)
zXf_dePS0T(vWIaX$3O`X17fC`iSK+fWFLlryHN#Wk-pPYN;_U+++1Xg$`;32_h?8^
zq4ZA-86_3TI}i5%eJteG{z>5g84r~EQxhpIf^w@6i;0dLG@BLLa(&Nw$hLkc>|qw#
z$-`ZT079a9eKeIhc#ygie4*zr<ejY=i6M6<a#|fqNG*WV{rQ_9O<-y#=u-c?WxPR$
zJIb>)(lz+)0h`%7Jj+Jxtt~C#z9u%^4gYQ%RQ-H1ibgKj4!lcF79*-o-Q#w#(KP;j
z^N0ZBN}LG!E0YCJG5wTV&cPD_n+t`;^T)FrwXjH#ME-Fgs>a5l0)zg6g;Y;Lf1lu*
z2dO1jX7gkkfFU(q{mu(i8FE8{`fOObj}Ryv8`2u&b7#=M)FUK75on@Wn_YaT-*Jga
zXhUp<y`V1(x<Ed#$RTN~exMB1eJ>B1eHQA2K}8?sqM#fcEQ0FapabGnU|MlX?kJxT
zu;?r#L`jM)vq1iqBJG#_n`TiFB{+8C!S)k>bf!AZHyaE=!;>E=&@?HZXm7R|Q~9S7
zWiC~!PEPzI|DQ{M9zm**3%V=l&%cM<*&)+^ec(ipL7xBv59d1~*cng(NuHL-RMy;F
zX|NU4c@LcW=HGzlX=#;Iqs`%h;EfT-ritOvDeRN_ueSdg@VDKRe*iN|prNq{Xevv{
zXHP7orl)H|b`p4TO}Yd2`!`SPXOu#MW}#4z9ZjdmG9WXpkQC#jh9;X(D%=}E<}IK~
zcbA2QQ`Sx0OA4g>tAJyKV8Cfb-^9%u0uNa0Oz&SPe<zm?#MCO(wkE~<DZp8D`geuq
z2%J%rSc~-UG+p`wh-CF2C}`$(m%BE+uMu_ny@%bxcsr<8&3~!1v+*QQ7dO3u&XyVi
zZeu_2TQm_Lx_39*hNIj~bS6Q*VD4L)0S-qu4^kIUfyx(5yeFDRmr&j?WbH9zNFW9=
z)VI=r=<8-4fV;T4<RE_HM3@^`t>IUJ2!<f6c{{_W3^ZiW#C|b-mw$g2vgG^%-KWbI
zQIc*39%2#Y3mrMO1;roj|7iwM)zaq2oNvV)u?1i?LF$gfw1Y=a<$nV{x%Xr0cD9Xp
z=?ny3yN;GqX~3EbS-TF9ralm|`4XtX*149}Te_9|qyP>)c;F&F#k4z?Fd@`oV@$)K
zRC4aC`IZ~Wj{muh+CW6UG)UP>!QP>HFVvlsg49#+A!*@IRh9=3?g<!E)=UI0mISH7
zo8CZ!Qr36O`)8-XaY4f)Oa|{@p{%T|6>8A$xC0615Ga@ASzv<U>;!$LJ}K*tANYAw
zL;*$(B}O|`&5bnb8XNz80odfNsK*8dO1(n~3{)K%0wm!;4iyInf=+g-MuXHJFy0vX
zU&x=(v<T7DbPbb?oYb0$#>^7z+CER)A~hOLcF4JClAxB999a(=*YP;2U?b$v2;OL%
zx<noZj3^4q00SwEmjLWsyle>~fSV#?TET;~Ly5*I+B4;t*5~pI>@1JJxa*x+$~MRx
z$%|m~+%M7BqpmjsuK?*arkolH=I%{fT59S<8bW;R?_RxIYi1V15MFi=@l{3s_?a4+
zMHmnJ!@tw;7wSeZcj64>p&w5G32yPGP^#er(hYOORAhNg=USYZ2c!;G5~dV8WXRLl
zI5GJlMeG9oMoky8nr6ZHG?>998(Lt1h^d9(B?1NxC~SBdrF)V=uQtZltt<*dTEW4N
zWkX4ZtX7^(fUCnrS-PqsnYTlJs0kB&U}{Nyhq_3iq0?$R##D302MLN=tkrVTMJoR3
zT*4YHgZh2}AV(fDv*gj{WRgcP(3{^i7t>;z#d^A=#*moj{oJ+G%IwB;JmRcQv`)1A
z88`YJvxY~C2*H<}E+gJvx7hAt+tJgqvV$lk1<j4qBofqr@*s7_t9KOSG+JxW@;N&Q
zqBSe_+U7gt{$xZ9PP}PwJGik@rF(jT@N2hsQs2P9y6N2&lx7J>FK|d@bqaT-lf`h)
zzHLj{H|3BQg)AJKn2WsLz&d}(yiU>v|0~&ZBR4euvqSOn;7vx2G^GZlTF2O!CSC=+
zipzFu<JPKUGabZ$=oI@r8=(nP7?2&dASN;k4awl}Qp1~jJq5Qn_ES-hqP=%=A<a=K
zC{C9^3Rk{$X{O9=g=vpvv`ba^nrBUP2=Hxq=m~OHVNXV0T3crPd2aawvMNRXI5<(F
zo|zb1j7CwyPr2zL5ro22PwynmnD>pE+T9v6Igr#btms3{N2wc7*D^@z!w0s|W{i>k
zw!sBFCNJ?paRPqJJ2B_gc~7xm`?0kIMF_#X<Z-BDL$RwIXcQ9b<mSvEVYSfYp0{jx
zHrMmzg9)4tzT8hXLRCP$bEUmMTsPscg%+YGly{PBQ%h|XS$5emMtAEU!SqE_3&NMr
zoKq)KjnrPDJw#(!7r83egvr}1gV~v8YM5abkrgyXb#iduH$_ZWAeSV3gow%Y2n#F3
z>A={vD-8lyF09oWxH^cjvreQ_0YjZ}i|0Yz*1rcnjN6=jx|T8c6ne&bfXIDuu8zDP
zV@KmZ+jW)L(paI-1t*2c>?G8%YUbOb)Ao{U^_$5MjZ$jIOE~sNx(k`0oh~i+Iv|~T
z4J^AuOx5cR#l`EvL5>qI{7DI)um^-9I|`X)7}J_?il1>f$>A~45pjp;p90xXi0bV9
zue4;h6owp6(6~h_K20{ra#cUvBqVC=xy*~*p53_ke~F;5Q(Xt6`X#Zn=0e{qNLH5p
zSPSbH>^Wy|pB?Ha3+1pSgT9X1M?Z@1wl4_}iMYQZO#VC2tVEkuOnA7Q5aR+;B01an
z3Tt9(z7~avza*99>HWu!qfXuqmu8Z+1d=ziRL>6;+K)wip5Yo;b?HYVCi<<|5-}v^
z#f;T1_w^9)*=<q}NQ|y13lb(?-AMx}BQ#+=&yZ`eXeP<+xAoMj8KhR%>Q@_$TSW3Q
zm#w`8*0agK{C}LeUxzjS5q?0=TBbYQ%qwiZXsSe7Uh}i4{*xd6+`AR`idgZ3N!{^n
zg&)rUyd%o%ggwcq>lcST=Q|!><4Joy@slY{U)(z=>gw4Y`k8y@J08clpY6AJa8I0T
z;N#x=XSZOj2ASr{H7Sub8gY@Hd$Qt|ebUDAmQt;|#!OU&2^KT4-jnCgZ{DHXOeS5~
znCRn8l(u=>?)5q>=Gec<kl5sF{12M2A{KCR@HqmXjY)_#hZ{@APliz!{FZ>&#%;I%
z`7qu^PB^fk>J_+y)}q=j56O=9=D$rij6UsH=X5;Iybo^0!EY7@pA0#<IO=`$Hy9`X
z{nWS(QI&CHC&9PP>ifOu`W;(LIx2J{Q6PK6$?hB4AIIhYvQ$^a7JHcKhju-uIQAW3
zKg0hjjFaw(wQ3%H^f2qm3$)Sg9vr7R^jfO?c@+@J?P!a)B0g*@T-aq*YVn}?&s_9g
z>De4T(cdQ2q~7Q|+F2iCx1{@fnEuq{<qxgIRM0&yEmxZkaFn)v_{Wr+h<u)l53Ydk
zo|dJg89eJhYIC8K@#M;2tlo!`*th8+c~-)n=MmpP<F(kI+_})!>W@b4ohlYPSJw9I
zi0Y$dLCu*W>~(IKk{tC<4h~&IJ>o5oZ=pz`2zk&=?hor*UwFq#hwYf?U~8L${TJV2
zq%U}^RhLyXWt~5VN4kYPkCTnDeu^WL@WhSB(@*Yl2!A-lNmqR`!y1y#buHVbnahqP
zm1Z||O|HA(FJ9<Reo`z5SVT>SQH}mSj#Pu3K(?=Nwu^7t-?iK4#tF8EeD&<HEju_~
z&i?3;oGe1l#9S1T|LEr9j_6?})MhR-jJ9%AywTMUbE#V6ioN*T4i1-0H?BfsED<|{
z@Nf=ztY%J6T&?(oEshsgwPG}x#H(d0kq=>gPQg0b3tMb26=*)KUa*CB9;*`G&%_er
zdyX{D6ITA_>78teiL*%J5i~c|&@$6k+&z<V<4pWMj<frJoZ`Hdq|a3-jrhou193jx
zTBlUWi)xkb82O{*SgaSJ@K>@35_3&)jfUyQI-TF?{g;jQ@t-)(CNJ~xybE-^<eCU?
zn?AndE~TX*m8{<#c~kKruiB6x)=3AcL}GNk>7Oy(nhmY51vnFV*4plkl+!&qI1;1v
zw-=_X&pd0GmKI(3n`!d+tdsdp@At1Gv2`c;C9CW2kj6VP_*jb}%ud31Z2w@Q8y83E
z^P2&CI7;X0tNa(!)#l$|P2w$#chXH=3#_MJ-R2g~^A67N6&1)_DDRl29_yL7#ey@!
z!SS1Nj#Q6w;ng+6zY6+X&%QUgQn_TSHlKl2X>W7$xB5rNRt?A4nZ>h7tN2ovQ~UiW
zS^)xlpTd7XE9Od?G6_<f*Ay>wOlr%z+M30;_{pqwB?y%s4h0P{gDI703zJm8;()~o
zo^<i%(56#<Wgq+Uuq|?F{0Bei7B}wEP$e*Dt4H}bhLu>pTd!ipw$jE3g<1NPx?%1g
z%`FroM!krnVeOf#NJLWziQKZ4W>4r;tytFgE9S5t4C?rO%h?JkJ->99s-cmqOCB&Z
zj+c8AKX=>czTz5oN!>Nhy10EStyMTLDPVE(2jv7W-PqO?%8gPSCEe8ki3m*+eR11o
znxiqOd-h46`A;0WK_$^i;qRx$PVM))ar^dw+LK7^q~=T%hF4_y>`r>uPY&vtx%wp%
z<S2zS&tJ*vw)6KfYwluwB=wongG1Js_F{e0@cvu{FLVj~9~u>Txh8C-Lq=BiWQ6^|
zxfWRwc??+^ON;OSdVp52PwDyx_jl$#2HVTJ-WD_6<FPZ|=7oDwl6BG7UkVu=ni3|T
z!!BIPlqI_pVxlelg1p~-$Vu=r<L~o+$nRashd$?mp05I>^3Wv_pd%d+l7F+1U$8*S
z=i%l`t`vRZaOW}O{Ck=RIShAb?SoE{@I3xHx<metZ&{XlJ0XT|VyMXre4!%;rf8Qx
zbQAg=Nm8sS9bdyfDtjY4Qk!w7f4jRV+<q<DH1_-Nwr@tXoQy_1^s=JZp@fd4Ffk9+
z=uhH&2TL?XiFr!}9n+67YuXdcUM+IZf!(1ZdGANM*iDJIf@tcB7aAn3_#oPEf2`t7
zY9sdk#lx6g5cc$Z99A&UTp+04(Apu(9-ux9u)1G4vcC;u&=e9OoaY=o9U-#pmKD9;
zahX72v$N%6u6IweWzMy4!-l9gbkBvLOX5%bc%KyI_rk&tSrqoXh&&+7Ve%Bg?<x-O
zH<-A+2Yu$&ZcaznRPC9t4p0vq94{XJQ`@Ir|3n@3ws)BFLBHS#YpC*f_eBhM$D}9U
zb7oIu|F`aLyla8?ix64i5yzgO7VmT0Rap_lJa$y;#ez}Z4mb0Zp45DKtchWAy!y<o
z!`|#E*`$XZ9jSArrH?Z!wKur{V&|VOMPVvMmXkXeYvN>H>0GbH-V1VU`r=vhi5LAt
zqW8PBE34Q6Jb$%zVKPDV51MpGCwt%=eRFBMRC;V9WZ4Rqqx4J-2sne=ev%#Y_P;w^
zb)(eVJ(@iLjvFy1yFBDb1$)t%`MZrdxNq&7@=jREBf7F@_S^ZZqCL#Z?~7mAug427
zlO{2Aa?ippCYF_%%FljCgVR{NuoYK%w`7tBC$;)JvMAJ^;WC+rN&nlPEs`8YR^|`W
zKF1E*uIbCMSNpdvP1zo1H+I3!vlZ={L$|5s0BvljFV_^0SR<<!5gcLlIN4Wols&1J
zh*2JwWV4)NIja(zd6c}*etcs#9_O}`YI3t{i_k_&vs<gg*LxJUpC4^D$Sw#ZU(0tH
z`Sv7gBVKj2_R56AjSnw&aMFobH|@;h<oi5~Evj)A_K0bsN89?#W!cg_;KyWPL)xlx
z1%>6M$!iW?7ttO#_BV7r^sZBzd4fsKn!h85-J|ZLjyQ@$Hhw8)e}5vOS<ItAH|49c
z$Mf0HR#w4{znm*Y+J(r!W4#V{vztGglkK&QUMYRL(^r@rh>SnCxPTZmnMfn!FZv}3
zN_u=HrbvkmHi_My?sd?C_JkNy1(UE}YnW=lyPFHEn-}stNj{G~Ae>j|GAWHEI^JG?
zdOxb{-{};|k`)Pd@A~q2kwP(YSHfb5{S8xgb74*JKx)Fu8?0<dUq@|@t%-}rIR*Cl
zdG`^F3|IK*VUasb@r0F^*ah~-mpxN=dGLmhT8rHA^;8TDcoV|@_=PZNBNc-W)>=I)
zhZ4M)n00x2R|t)e!bgpv5i#}oQF6|DBfii`x>$3PcF&6Lg-G_E-Y~jtS;|OHSV>0;
z&5yJe%a9)>^o8vnS*PiKhUQsP<oSd?F+xm)1>;m&y98Mklb1h76UX{}n?eBx&|a;6
z<yMRiHb<0VEc7Rq9B-$`3om04(`Fjp6?uRZdbZ6MVM83;2<)fz>PP(-r!ne;&KDLY
zBg_Z4(=+TeoX#Q_qZ&I7<Rjw|zg|{RB2Qvvh4SRiA7rW$I-m9jC=8BbGf$GQVE3f(
zcgI@jAwh`J>3giGQzB@amya6T=hIg)rfM_A3YF;^Gp2}Adv?gf4l%NxsQy1f2k=7j
zE@I|;v}Tw*oa48`MdXiR@v%%9^E$7>qh$V^l}t>f%pC``sdv>7yf_@`nbQd|=fmOE
zL=cjo79meO5-PIXhY5Upt-V0~vF|-WwT#xu98vu$m2aPEtdnFC-|5!9qW9ZU<(0`=
zqAJ2TM!#J}4BFz^Z8<YXZI3P6BaXt$6zl;JPeY_zeI_txvG`fb!vZerTe%D>59i2z
zjI@qVA;6}5jG$VkRdC**$g;`EQV2#JsY$EN(M5Ku4RuG~EC|RrZLWnj{PJ~2&VBb2
zQL+714b!Pu8qyzW*4L8sqg&+;cS8S{T`C%rbr^=luwPLqMqZR`j;(uN<Zg!0g-2|A
z*GG0f$9o(7>dY%1F$+TfG6w%#ysXQsR>R3^#KZ6c{vb6E>t~$I3mn=2XSM+C2ePJ%
z(6YtI5*<-eezfdH>DgK@py9N5(43*8^z+1dN5_qp19AY%oG6O&to0a=y1CZP%M8WV
zx&I5th{vq^kskqw;h)}gwJ}8~A$|EJlE$RBKlw7v-kU^!@4ZdPuzp{h7c$Mgr@-y)
zF9nA-Mgi!ZBt~wvou9?B%#O55XwO_vWqI)l>K7MZUGttO$wHy?B0(v-{}D#@lGAM@
zmL%0}t3H3swG)p*9r37*&Lcr#0=qXuA1_N@xqF@AgJhwM?sOjR-31BviYD|w(A8#U
zFv*0%4|6P8?4INz)+zE30buFukF#N0dt6;ROH|3aSQDN6)~Qf!>A@ooZjS?NpI9X+
zOtMc`_9f68?qQ?V!grV@2|s$6#w0)Eq|26##)}x{hS{pbS%hLPCjO{f?WH!KsNj7q
z{?l)6Z%retYUDd(Fs2`z*&_L})+q0M*{g&VgMGQIULD`5exvr!I}=u*LHBg+44qt&
z@=6=6$IWF1;T6To<h#deNEuftAF=|S{1qEM^jOubQ^>CY^b23i^Yz=(8nLxb^@W9G
znX=Ib>x66Kt4X2)qx!{b%GeMsh-8X1(@f*~8+I9&GwvYeIbMMZligwc2?>4Ah&s0_
zV#<o1_J285M}OYG&$Wgf+Q~i(vz*z{Fo`MZD=fBsp1*fe&~5eGuHEi|ipL&s(vx+6
zNE`6I+ZsNaYCr#Um$6NB@R15x^SWMH;pLfwL)|~Ghu<|0rFOpV<xN;gcoV|cwW{OW
zjqyG-83FJRxk!}qJBLu!E6W5`^jY|>q!31g;2=>LH#tI0k!Kt69ku|RoZqWhY-ts|
z_8~nQrUx1Iqqu`&zZJc@T9Oo!w@0%1jk15*ze&*|K75oS9C<3lwtx_WQz%Y6%D>wv
z;%1nw&iE(B<J4d<v3|MOnP{^idTmeKr*y5E{8NLYY@pSAyl+$an1NPZGuXbEWBmMk
zuf_ai0)ve44hxCidyS>}zW5jO#f1^D1?LvKH6PmxghzxJy!|ocqLbQolCFmmS@TV>
z?S`HR0LbrqluS<OTZ`&{9Ly~JXn@JXkPQ<SS+Zp3-E@h(6XdNqE4e($e|10o^t0=Q
z$2YtzAEt#UTRvY_iT}h!7T3xs|4g^O1BDlKe;^LjFPI-<^g7hOSeN#9UIz8DRlyjN
z(DDN_dUsSmm#9EoOFTq>0xhcpA2BaJu6K1Nta#fa-k@-tS04u#2~J)S{bStgdR)JD
z)_mYAR9_aY>r0;B&!8$Oy9w2nVeUEQ>)Nu;uIW$LQO)U(*<(_t`;B$HpA5ud7)hSJ
z4mv;71R<-Z%T-9`%LTi-cs(!%VCdUF1Q*Btp=0;cU8m8VH={SS`R}M4oTp$sbrD_N
z?iNm8td{mnAU4k7rm3XY@$wztNy5uUNTBWyjU}2+u1JYi#{SRNI;Lx?8d9p{KpnfS
z(;APNE{^H7(@`MI@&?jFC^?biL?U43U9E(hGNWdq`a{LS=ZAgpkC~SE%ihY}Y1<Ed
zKEP&&WXFp0ZO`!vde|GMJwwl7gGY|O`j8DsbIac?y@w5ZPTYh@3Za9~3?eBLG$~@=
zwGE2!e~C=|_mPf`OE>?6AkO~_aiIUx#MS@b?}(%CAZA$;d6Llj`R;Y_|Ng=lV8FM{
z0*0ECK4L7~rYk+TF4Y!R1&81LjjvhS(v|su;G=r}7aUQ0V*Wj*nh^8sZOM}jqiMd4
z-codm{3yq(@l3k%uVn2^%byiHN3arF4b6!gD)b*yA@=%+nC(0nD{!zfXO`fT?&5P1
z5yD!DL_PyvGVk-c5;^h}`wfk9oRi+hQXwZJorM1CzQTnsJe+rt&d8f%e^GT(woIx6
z$CrSt8jnQnlwL^3ZjM)NN-ken=Z8Y<OdZ&ZTsJF3TD`IwDg3Rf&6%*8uP>>Q>AsVF
zV*PE*pf<v8PfZztOxesshdQHr$1#f`vnyTFxfdrNU?&C4?MxqYz4py;TV24&k#4bJ
z(Tf96#Hr+AO_taE=);=E<N8w}<NcU)^}TQXtiU#0{$S8_iWQ~fYq#DB$BCL9H1VPn
z<mH@|cRUPgNNZd|eq2}<U=E@f7Qd6d%KkRJJrB5Pqc3PQn$kj>c^+IjZftFpn__|9
zL+>P75#`Lb&|c*euA3xFUUFjmFyv|f-tTS5^x=p66wS=yZR}kr&7OivGHH_;MMXs@
z8*vt`(xa_3{iju3Oe9+VVzA~tZ&Jr=vv(zzGBM<RSgrUkN)T>wbq%INxMjp6`arFG
zCs9<N6|#_THK&dmzL(N)`|}uMJWE@mWOWAegnLjbkJIS;q{I^ZDAT{t-@RT8S#?fT
z5hl+PUL+@7Z7nE2=jl3ese1=%&0U4sErVM_Txo1YcLL_(iQcS5Fz8j*Nua&Sx@QY<
zI=&Jkmn1HE_#7i^i^z9Z=qM-G*;a8*4#I$tp-PXU%R}stYyDoh6RL38)Va2a!RgNF
z*qe)S)SA&iLQmf)4pg7t0~1l3X=s?f<UN1_fH-W10sU5b(HJ{6%b{>#x%W1ds_;Fm
zcqr0eE;9aRvjgfoW$k|9Z2#WmTIEulS>>^Sj7^gUsYK?O8|mXVPRGpC<Z&Y=U6lC8
z!HJxAE?wsm7T0dK#grUxW;A^(OIDkY;^Dq@c+>d1LYCUreJAeS&?j6YIk>~N&^(Z9
zK<@eIB4(MITI1^RzS!>hsf}(Di-0g^!RC8Gj#(DyRRT^dU=-M2#JTRBlC3Nf)nBO7
zni&Ndn-P2yJh2{#*%aXsD00Uxy(N}jC`Eyr_fMT?hbR=dz7UOa`k*eukxXv-Rr8>S
z{ehwam-H!PtOnPD=d`t|kMeRth9(Lo&n#MwFRBVXpo%KR^(S7bkXeWSFZ8{<y=Ma?
zeU8$7h7_}aq$Cb^`A}vBYrvGnz7nglm`Aak9jvt<&Q{q%n-+D<{8kW_5ij|~Fy>}Z
zKsTj_xJOcZZ(H~|YUu8Qi((t1{wh6P5~X1jFV{Nm@x;U3+;buBP(<aP7jQ9_;l>4=
zg4FVR6F_l~6CoVIDVRj{*I}Y{m8Qn0cXeIpoxyZFl(8L*-^9^sKq!5Sfa&V$TAoW%
zMav?HqTE=n3b=zQjg~ZUg0e?w6)h|RS7!N_hw!W+;#{H37TRFGRC!sQti5F?8b;dN
zKwO{r@GYpRKv^D&SG}`Z>*y!#=uM?cIS+mf6$O%7*G#ITuNWu*U!?zakVF++4rxYA
zD$kWteb(Utay_g+lBaik0;@vkm%(aPEfKH4IY0qIeMTCTCzzYxf43do9;gvz{^hP@
z2o^yrya3(u&>0qMv820GSmZ{(N7T1*l}}?WNgh8_rvfuHFRZIK|ByM9<M>i#GPiHE
z*r9~EaQK~L;dDhI6dZE6WlFHz#ty{SPovl2xtk;>Q*ohC!h*XA_+=N*dEbT_h3t_`
zqh-VHc|oBoSJT!m<%6$OfS|K`;{DzYc2s4wviHK-uI_HrMc2b}4oBYcN?dQNkK@~5
zV!0H~oNGoar(LNG6U+?9*tVwezl%6&*sxR~j9urixD?72jc9J22O%_Sl>zD-)PY(q
zosM56$Db}tCvW7R`00?y=6{zCbfVM{JSY`Zu?zySSWPE|!w<?Rv}Ln|H?l@9g{^QS
zxgEH72!_|#<qC-BMSgD(oB^nNLxGD3(HNAtRy>y=x!bd+<LasT^^nJ{k5INM#;wB!
zi=cc-U~}1C;4g6K%D?9Y#58s#z08QBlo4gEFEws*=<;yX@8A;fxB*N#(2~F`dKeQe
zpY^xeP)#HOEm8z;q4%KCo7v%u@&fBAwHrpmqoY+Ya)s}CXlag|+S7k;K)MtEecEe1
zBf`P&*zLP$Ke{^Mbt!s-(B=V*JqP!lnoth~9gzYJD)+Ta9*Fv5b9sS0^0rI-bihUv
z{}pmra<5Z?ji?{Z&at^Vk&5mPz<;3*hK!1=H=7v7VzD~isP^m&9S;Ooe~Fg0=X3IF
zNik$s44eCQ(Haiu$mr;8-6Y)ROHWYJvpf{pab9CChALQr6-BEyp+x}DYCkBG$_>ui
z0XIX{b$R<u9A#z8L&38wkoBW<v@imCfro%8S!qsp0=2a(1_#X95S5kT>%e@5`W41T
z?GDD9(ny6{=qR7--W_+w1c_p39UF!g@5!>N<&$!Q-t&4N9%k29M2oM<I?`g$0%a({
za=bl@`i=E2pW1~kBFEV*V<1YRg)s>jILyXrx!)fj0rD>HuL5ia7yW495d^J<hkk`v
zbiqaYmC<BehqLnLIK%?8&=M6ypn9g7WC1&O2ufWD+zomE&s~XUj$3b?r+L$j7hMN3
z&_YK4e(Io-(5cImSVhw0Se1FTv&Q}nI$fW*NukF}zv<s?=i8uC$ysKiT+#bi$}*qX
z0%_L;<r`N-6f3L3#0vPnf#-jAf6;)rBN>WJy}&FFNa7>Wli_Mia+~Nl>Z~ENkpbnW
z+dF#Wi0xL<7&4G-2>>oqO&Y1xXs9?Kg3au5qYi{ZLCxrnzCSkz_#v&0jRfG9y-i9I
z0WKu@BIr*g*ylGPcqpGR`z_S(G<=NJ*48ebPjy7=<cW{xsu0(!oGQ??@hgoOGFqAo
ziiVtl%N2EdFCKY@)`mfk6DkrIGFr27EUiESstr_^=D=+|AE^CN+zG`s-qhjif9H}}
z#NXiATo&K|Ro-<6HJyF?P=rNRS;UUOx&#mvP?6qL1P!5sg^tpsmmob9U0n-;CN$|v
zk&b{=DZv7UDkXG6loALf6zPz>`wi%>@6DUvEC0NiH^VTQ@a5**bI(2Jo^wCv6F@5<
zFt-UP>1-~?C}5yb0j20%j1{2GQu;y^e!rDc!S*ry9`5XGfC!`ETM9sTL7w_IX4v#B
zAwRGf+9lt26=*MkcGZo?jBCo^|NI_&^r$1lV(R;WXuM}ywPXg*ehrYQ9&-3DoHIDe
zXtc^~XJg63fNaafz_0q@57&l4ia&2((2DriJ9L~%ZG{xW;4K9x_fwRf<~W&GrKK{U
z3B>-2KhMoAzkW(=z;7~_L52btHUJ%59<O^7gxd}WlsOPV2@1!=J^~_?BZF$h+gN4m
z<~=y9duS*LoB%}-5EB}J9eX@J4Ye7B$&JM*f@TmF>Ly?lZHBrj00oh3(A<Hbw!*;4
zAK|1c&nyn0)>RPmAzT5!gMHU`vk7o1p8aixA2dHeC_?rYGY}6TmJO4RDcSG#v<zH|
zWpZGn39<0wDzHBW$D#*d?jb|yr)c1-p~%I55C!nAGBs`PKXf-1=gObq-Dm$wtVLxO
z$I|=8-T*Ta%(DBSPtB280H7?^nsU4OeOrR=&E|819UVm<S0O+&q7WRPxq7Q_)ZW>_
zvIt<1aXnu?e3u9?qDqae9=NtL12(5BF$s!uRUjDD$w(u<uk17c46`f(tftI}sfC3F
zM6m-$fL7gnJ#q|ip{UrnA90ijh%<M0j!qxOjDStw446%l;DB+d?I}uPrZEnp#d5m&
z7tc0oU!Dk1ztXxvpwYA$V4$&ZiOSgv5cM4#BH0CCQJIkn08;f!CIXTw<IfW-O-|m7
z3K*=p#B-v(a>_=c5rU0^-Sj)en^Oe(b;zKrvJw0%77mftl$Ol^G59h7pm!*0(M00M
z@(&IsfPU3el6LzY&DYn~3T>NXL)?}@@NI_h#bqvptSc;w%Ii}dv9|TwL0*#+q8o*%
z496grVQ+8lCo|xM-1M6c527#miBB^`?*?(Utpdgnhz;#c;b2A27IHsE8Y0bw+Gs%N
zp8yQWAdJ=>sR4VWB%|md_ZCE>L)+VX8F!qx1q6V>LP00YE|x_AVDIn2M{TVx%t{t8
zzOaEh(6!P6tk@QyCD=Z@rY5L;_-#eSVM0sU_cx)FB|tw~<yBC!1^^EZ1h=kNss|dW
z`shDx3V?!JvD6$as`9rNT%!;n+*=cS2G-?l5Ad>e%c#Kj5EUC*Wf)*dUO)%7qhDOS
zy}cpUop0a1Io*DI5BMwpWT>Acw(D=t=}owDZC5AM`x~Z0Tk-Vv?!G+@k~ek=ltb*I
zI-jAetBePjA-pu_yWl}dBah(Vl2RUzLd<B-FM?jMcFB-c!1tjWxBL*^DqJpyH$r$l
zw`|?c5#-yUo(Ww6fQ`QW*IR>xeU<lAv^?+!$;&xa#3XAph6{B3C!hr4M*#5eAo11G
znjvNs(Q;Xz8a@xs^S@*1&-y-u6F`+6XJ{ChY^>9IvCB<cD}mdfw5t+61WNLJR^gZD
zu})|L70THQFlBs<l=9rANk%FI&LLvp8pR${qY2JLci<>Y)8)C-eMi9+l%jFPm?WaE
zPtP|HLyZihW;83km8NPV#E&HexnfdE+U>rl<_-II-8<o!-?kzC(Y#bevp|5F?LbXR
z9AQZ@Mcu?06|c4IH4&-Qm8V0Ay<*fze4qaTfLq11RVRE7Wz-Oohxq`(q;q*mFKgxS
zg3}}RxXlc&jWE5s=BCeLN1|+Q{bu6j0xEWeD9k;?k~Sz5Ufn8Bcf12+)BPUKMZGU?
zY`B~tEL=KN<j=PJ34Q8g)==BGG@sx59utZ0whI+JvtbsiUu>5{&x{4@SG^3A%NHfo
zm$+?Ri@XCLeU0cg+@BKK3jrXc-raqlH|@~2b?0%f_pWz<A10vS>N2Q49~(9|$r8x4
zBJO%0Miw?2x+C{jT;xd1>6RLYP!uD+Jm&D3?2a6<z*gpXZIBU(M{K5A()`T$P|G5|
z$MHyq`hM%iQzeH`ySuSp>5L2944BE;PHH9m5`p3hU+p?*)wur6B@0FKSdrJCC2r{{
zcqh*qfm{iH)lCUPdR%z4uP~+edX^o*H{2umZMhmM%rjgk+&%C-hO67x6_O(v&su3U
zsWD#;7wHa@K+ezXU8jbPet|!B1W7fK{8M#42Z(=k%U8ynVXaJ=)Sj0RUFy@qATcMA
z?bqsy!ClBZ`MTv_75GI%oxfL~fnKa74RX3R7y9O8^n=Rc;Ed$?H0?^7pO!k2_Tqct
zT$nW29uMz^``S&fI3kpvuDu_GmorN2bALrs8jWSQ?&P3)$e2*MINrpe-a>o6HZ*8)
zvg%O4u|9B};u2agh|oU4m+$cXzKFwz-8pHb1dep9r^k$>YC1XI1wFc;SPnY-8+r`R
zlqI|yM!5XraZU*>4?7IqP(fJ)Kk<B^x;ROv-6R`e7jAx8#x`YCEzj=_ah7|tdA*Lf
z^W}HZrHTf3X>yC$jjQ67pN+UuDwom_iHE*yf;2X6<Wb*T``)ATx4?bUbnd{!t_l9{
zSb*&B|8KK{`pGu6hnAe!eLYWe?sbut$szCam|^{)M_<0*vpn5b*}VK7fK4l9@CukC
z@u?#CK}4R$d@;NxmU+7vCrA?8Ku;4+PGSSnmSP*W-@W-S4?X`2@ZYw#{@>sS{~rz^
z2_+^^phkv&99z%b)>@+S1VzJOXOs3-Lc8<70?T9!1yX|)zzm)fREUD2ST=VR?9HA3
z`WRcA`tMV5=XOGj>x5|8{vl$hHk5{H8ok>A3ohv03i-)DFr+rX&|+;1Rjy86asV|%
zOQ#=@Oh^>xv7_KyHJXPV#pDyfu{=2Ji+~##OJ+Nb$T-G0wA5MJ$ihxVa{MQ#z&LZ^
z^&K@5OE)}e=XVjlE}sOKMTx<sv5Y(T7cRZZ#oezkCv`m3F$lWq<B1!`SqXQTVr$9!
zU{6*6NtdwW@r}1}E!LpsD#xf*mu=OmzsjgU>h=UOWZP_ov&$YAFbddj5Xe#oE?3}1
zt3p&`M;`58`sK5Gz$-ogsL9m8nTUx9KfjVq)hyt9&zZLHA1=i8!b7nF0_-qYfa;-O
zkRe>HZ-Uza5Vp;&vY!H$2g=|rOYoz4E(hR}8(1p|1t3TbqEF!mtwN`fb5DyUy26I|
znWzsG-N3;x**#!*Z@RSHWjkm@rZhh_zF{a*39njP^)todEh-W|=8M2eM(?bxR6NXV
zAPXBj4=$BoI!Rc}sYAQ<6q_OBDO`d<WxHc{3OvsI%!2bAYrPRX(JaHA9+f!{@Nm`2
zF*}t!cM2fY1xdMK;D+@Q<zUT?p1A?|Byacb&l3Pfw>amYR*?R#-hfN<in2s{p7v_-
zL<ButeYOCWbrEO6_ji5yZ#W-j!#Z>UHCg65xN#35sd=w88+^Ftfxw#D&avfVxDTt6
zdo!Yeq>O9pe50h=;L=2k$r(7Zu46ASaRNs>EaS}jq+z`?Vt+TKTgb?uUP=e<YoBZW
zbcF6=v*CpZyk@5oEhLxMQUI;z=TjgV&HE-p2G!%f*QO<J^?2GmxuPk2l!HT&wQe$*
zuJl1WgFh=%s+MxU<M5o?boqV+vOE#ev<~-tSe<GgG@j+of;*-1fqGfXnN}N&;_nv*
zCEe%qV9DH7GXr(_hPfmN(NblMs<-9N-@y7*A*8z~*IxO2?z>fijlU{yPRL1z1`A%|
z27gV5HzMm#V44owOo<)>_mgvQ8L0wBu`U_3y%XkF;Z?<c?vI>#164pl*&ozZnWOKL
z!i6RruiS-3IX4L<3!#lzM3|O`+O&^7Mxp*-kT1qn=B+67_hcmiO-npspm@%?<7%DR
z(~&axrWTa}!@0!?tbO7y#F&UL=tF?Z$s%+xZ?T|`>4*p<<c&f99oz+G(7gt?$YemU
zg6%*3Bl8|ENH(ky#nZd<)M2->!Fi(@o~I&+&*tsqgb}`7$LMH%UAv1t>8N=EX4nQb
z;z3;azN05BdS|ZoY2zAwrgXCa^~)D8Dduw~gGu-umG$u6x96*1x>}BB%7eXISC)Ul
zy;(}228aZGyA<>-`&#vU<YfOK^6mD)zX4G7D$f()-KB5Cy(S&JSqvM%m4s1lpgf*#
z-;Umm^svpPQ4!T`sq32T{X*r1SHX=}&6|Q~?OD38FFH5y62`8-2T7<>!6$W7TH&jD
z>&BUt^oUw9RA9_VkysfSjo^>}u!uC+SnYJ`PF=BGvYNB1#4b+2*}Et_7{$+Z=2<h-
z2<=P)Jp!~eFX`Ww072e(v*_1A)8{eyX)B^taNuXggoj+wm^cyl%@)McEnNvKIk}JB
zXvCb{Qqlf_B7^DZuaniOD@D|#J|N8PS1T0~qBL#g7f-4@?~IC8D{DQ<KP2F2C2_^u
z2@~E$k$|tdaL)LeJPLI%F1iyv=W`NIHgQWz&{(7+X!NBSrLMv(Wzxzr@%fGWht3^I
zmfx|@r1k)}lp3e<g%`Q@=Ux;%=*;?Pd^0!qNkOc`v(%dxO&pG-NM{msZx*j)7$5#v
zayTQOWB-ZFN8yL}?&Ut>8UMxo-g8<(>s+3{Y<MwsaDAhTxV(<=8es1>uPI*2sS5PY
ze@j&k@Y{WQ-NC=GhP`#vcp9-p=Uj0&RP`g-<7wC2o$}Py9^W^as4L(28vk`lV1qj7
zIb0brwPYQ1V755p{x_T;X4CackLlxY_x!y{<)+zaJdJ?UH&i`?c70tu9dAt!a*NOX
zSYk~VR*ZHmINDpo1AUD4l1g~ZC-cWV*iBbbPkh|Rakk4CI0E{)TED}b@dA#Z96R76
zwDmeO#gr7e^+0NvN65A9hvggoemLVE7{uxb^AV{Y`f0aImL?T0EVG|$X-c?dmi~73
znqQpwr-BZYNxT*_TRumct))5Rh`18ZLEEeXj@Mi(H!Mvw7G`VdM9zV|y-)dletUiU
zHC@S46g=*I(Cvd|kjyL=dR(1!^zP={5EEuFW<4y9ZC!?${cEg#gkXp&`??BjW~URf
z+c~X41m+(su%jexa(}QDc%Q{3%uz!^@t~~F>mVLNYnX8YJFFkP|FWWMdxqO{-k#Xj
zRR6{AkA2MXTmh_Qd_9~~%;L=a?FBv0(9gYj_Xo4Hw8F%Xd{}3j<*^i)-A6h@GP)~0
z>UZ?Dq1F1gzPD%ED(Oo7Q~uw2;_WuD8Q%OI(*z#MNgGpsHpSgO{Igd{je_psE}}EK
z6DZqGSy#aszY5#_Pa<iiMV8|BeU*Km)x|^3)Y*E9hZK^7s9LdB;`UvNt#<ur3mvPX
z{AJ;>J%|&Ed}W-nr)>OruDlah^0K!0qtC4+RCb~y+~I5M+{?p@{4nK?a~5?ESC*Z!
zsclv$;+#$_w_~3d?N52+!Du_X4@&9x%2d-@pX&`*J}H}=j&&AHig0VbQ=V$S;H1i1
z&ib|fX8|f(?c&fDu2x0iTLNqduky5yp7lQ}#ivjxq34{jpxWu?uccnqhTr*>rUdZA
z-+DqH)I<rq+?}Lr$1!|no;|aj+?3%?R3BLMX)bxDqfuttEYuw9&D-}$=r<MV6xRl1
zBE3q+KCC>|h?`uLTb*BD&|B}%gL;^nq!3Rj*!-e4Z$o;B6Sm~;VVbfYz31umqCjwc
zPw)Mr;1d~`MxKzA;Ja*d`!i_P!%n2AXJz3DdakiKiLdLV^VCOb>^jil{Bdn_C`Gx4
zn=eF1U)BrZBtsm7A7|#(42Rs!Y;lZJxg4o%r~af!`m4Hyq~07@leX?0AdS$Q8?ghX
z%yU+f$D_~nF4QawH=m9^dx8>B(zd)PFFiTlQ1!6<VtcFEr}>ZWO0Rt{ly?h{R_ojj
ziQEr#BUF3?qZ&+wyGz9BDQjH~cPzEHQcG-1U*}g6e>qI{vDmXd0*Nzv*5c)$K&nQP
zWJ;Y8uX{@V^YN9UPCP>f>&=aLmQ`p~#^BE6J;(gP7pQ$OJ)_Oh?bx~Mlmb>*P(Cm$
zZzwKj+4PTG1zw|77p#4alo_jwc7t;HYhbyenY)VOqdrtxsrP=e-iH>CoAURxfIj}*
zo&~RTkqP~v2Y0-Jo*qZHgdVnY{_v#Q7W}cHS!4_oID*mdJEfIi$~-!TE!keB)6trH
z&{gV*t<W^2!K35vtMGm;LRI8PC3SLPqpsqc;slvk?Lq+`)ck7byPKDm(o&_HJj@DJ
zrmH;LD%`|TYRf`EW)yZ)W_RC<$e*TNUh!0?!b2Pt@i}@=->E0%a2-6Pb?jvJ3HiW0
z@sT~_Evrr3gVEzFa!n#di_R@mdk^?XwHRPFgBp&}@z(U-dmqE5kO=1(8)PA!AotPq
ziFkaYX&d@sm`Wq_Y{kgJDC$A48pHf^o|Lt9YkF>&ntc*6lZ%$q7)NqA$9yow<d3Wl
z`D5{mgnfJ}*A94ac#;Fg9?T#;H;kG@eAlGyydH5@9wwj0)AB;+hxp{Y#D=c-cusw)
zj_AB^q>Wsnm)E&VFez&+iX30h2uxYxCuwFym&xR&qRP9fFM+w!PU^tI_^0S1v+obr
zxA>c?|EzmsE#=eEo-)x9?e`H~7$h#>OtT{74urd}U1LZqq}#IU^peV$)MHRU10rc8
zEbCFKO0AEI2Elrab+?4EFM*Zrx;e<{l%%JOPWt@DSzy-xtU{)GQls!XKcvH=N|}eZ
z{nS@KxyvErs1-kpk%84|659MEl=kKZrlOn`ScG$pOaY`C9uywl*6ld5>Quq7KiWxj
zxr|Y3dFpb&oomBK5~k>~DH}{zt2Y8o&Vzlbug@!N1S4`Ckz3hV$IaZQ5H%KGolxM-
z;%ZQi&Wztu$=Sb{Y7}~Ec*-hjEBX&cKl{llirz#5S!~FVIcmq1vo?t=!~=)%+|<IX
zZO(2&Up!>KRb*sYsY0S{?$sO-ZZS00r0pJZZ8(*xxMnnV+FN*?m-7){Z#1Uw6kZ5t
zba%5cGf+~lQ71%3cav@UvLz3}w2-6c{37os0r;o|n_~8hrN6b*k!oS-CQ9hwExH)i
zc=;#OF`|s|pb#n^2vO&Qc2baFy2K4?6@Fxm@+eFN8STOG;m1bN83s91b@Ow5vRVDS
z;B<JC;@HwiOv=t}xmtt}p<FDyhjZ3{Ck-PuOFuVBL}(~QXAW%X2hNFWM#TRmecjt+
z*dt1szBlWeoTNj1F}KWGEU;}YlhqHV`hnu2X}ePTnuLDC>h#fy`Y@2$GzmGjjV&6_
zum0(W4u`B5vF7Dkn2179S6TDx%H?{4&Z)2NAUzmaNWku7`@q;e2XpCSxNP<$m0#jn
z2D&Xng|b|8O%DeIo^mr~S&Z@$ug6a_oQTf6PZWJGxyESq<wmiC<G-_Hokwl9z?37B
zkQ(;yGo(=*F*=sjKejV1^`KdkknY&3CShW0u&-4JC3Kvm!p9xvPZn~mgD$DBiU}rl
zdvG%%4e+M7xP4@1?e4Z-)7``)u#exWdNb2w0s@;-??^>>ioe2dk2C+snx1c*QS-$8
zQ07lsaxe#4D$D_z(%@AuPJp&n>yND-WEhR&i11eaF}I(@DYm8~4vluG7_7(>QfAY(
z)D%qFloUu^D`d_fI^O1gUGrkCe$@~7IbJtZByeI)6vn*5Q2-y4k-Sz*%i4eQ+`{k~
zeMb0q6m<C}#lxo}MGd$qo*5AXl%(ol4%v{Zb1R(~r<s?ZH@=dY2b}(7fHt;cdA#~!
zy+FM`;Mo7}f>3zc!kGrTdLg}b+s`_&DRXQrkrv(tA84QXDxR~!gH1ZCYr#Q2)19+r
zNV2Vnr6IO~4*mG_dYe>6VD3^M7<Uwwr|Dh<t7WLs1h)K9seDuBG3<+yza7sD<&izd
z$N?>wpC!>qD1GQKf4DkkP0ye~oOuY*kf?th@;~kOb8*Fp1lJTl8Lj>jn75F7+zJXi
zj(UFL)t2jWxB;)56Z;VCRX2LlIq>=Ue`-bG=KRC*)G278?vF(xEorN%(-L)}zKrNs
zc-7e~UnsuS$YaZmrL6fu2L14jOI6}1=dgShr(?W|PQ##vq|QAV=#bLpEc<KO(aeSB
zCOda;K|<-!?%|pAa@TiaUxrYz@>{#2^C2RX*EmC<k1x98&E{Rhe@Jsk<&UHoWW_VE
zLM%-p(dRUk?G?6<17jG1!@A!S+H!ol%TUVt9zGR9w?B3<5t(}1UcpVG@xZ5I9LGr=
z*-LstBP{r(fkU^e|D^E#0n+-`(_Xyj%<Kv2k@!Zz>#Mvu-T9g9kwwACV1p2Ly-i=j
z>|cdyS%HbW0^%aka`_=Ws@&u~eG|~(s<P#hS=5J5s|#_49K#;51lsR}XgNtrtg}_X
z@^oyoQnVHsyC<(VV>Lg#JoSn6MX+vGPTK8W-;b3%x5d|EkiXl~9J8rt-ni^$q0b=R
z6`!2V>y|U1+$*~7`%JT6`NPyuHO*b0mVgQy^h9U3S@U|d*sR6nu^3{%>W_Ji|0$oO
z@}g>4YohV(t8Z4tV`%XgRn?cmn?Fqkj6Z!Q+wZWL9PeI^TbZ=)y1mlL0ch7+Ld$IX
z#{r<Li`!j1t_3>xaxYj|pb#C-4?YR$*7bw}f3O7nCj#|Hi;V?}qbZ2ySVTo1j?2ai
zeGd1>rlUA=sE~*jWExNHcnP+$erQtrwN{-=N;TnD)~@W;qggFiy+gbQN<fW#PhYGl
z*;o9<;FeTJNE;(D%boTs=R}7+UZ^XyPuufQCi~;%sE#GMfp4zZ@hvDrn$yoSilJ|G
zlTF*LdH?X>h&U~s0{nskUB>L1r}D#UTQXXFJst@hnMFUE+Sp?{&Fm^LqZQjCM2Z((
ze0P<^OwzFABB(72k#3TD4lm}|-f=$eWwMy7&g1;Rm}Hi^7S+0t8Q8d@M%tY<q&~C5
zi;0@Nw$#x49BuU2HvxI82E<fJio6BPMKjDd;K_B>w9v*qE)B>eNwROVG@m#B?G}Z=
zPG(op?y1j;<eF+SCcW>sXUOEx0;3BceIV1*CyyUZx@b|fpcsvA6*^V3>dKF%zV9(@
zmLf*`WB2U$c@cz4{}(yX{~&Gp@BB+wG%6&m*2~7t1jw=1$;y)jl7~?Ei__t$^@U0}
z_}aG8gM+Z`A=@csxD(s2`9_)Zw`IQ_!CAST*LCWN&uVPF*1uH#?;jqUD8{v0`XlFu
zN?{VPJZ2a6C1wklIBS^83qDswpZn<XFuJkF#tGX9rNcg_XO&6)I5V6J=`cy3B#NuM
z^5#ZVtFW`8;6e-^{xlMIUh1neQwuYZ!&GO{wT!(-jnImnrGamMf+VE8>1JYQ>u;$I
z@>e8WAcctbr{V6i^}D~jyxH$~#DCyZfr4;^!j6@*9qUp9F6qYO&F<zN10v}W{gDw0
zl0`Fog3}E~Br{eTYgu^jW+juXa*^2f9Cu1q;MOnC?`PwJCA}<HBkmxjr_OLX9PvkZ
z4A_Z895Q2V8Ek2IVA0M@?Rq9#-f#bW`q`GI44-<2EUTWBC^TnMyzg+{ovDXy<1iun
zxAuFrGEzNJ(ZY*F*#`=Z>RH!L{u=H-_NT}D9mFb}nxT%UfcD~>N#-jm;Y{YN15ur&
zAEsVCL<0FzjY-;#H3wGqk$%ex6xUxQdk33bYS8wZH`-o=7wtQUUzXZMM`f4<ctwLW
zRh{K-rV=mN9YHzh)66Xw{`BB_Wn9_p`>}REsUns5*fv7KCS-XdbpVaSOHzmz7R^V$
zoEB(x!fwqV^+KrlY#@9%=5A)<pM3laU2OfREBe$S+lZPoqVy%8-~fH<%pn`(b<!Z~
z05(EFrij+2wwQ7ze0u=H;I<va0f_-WUymm9ER{{ycN2&zq#<WC_DD-ZNz!Ls-eii7
z@$ylFhN#y#e+T`s-IPs#(`QH4;}6$^b+r#o4?GnGWTC8y&Nep{(qpGwS@=73dGpw2
z_@`W7`cbLyR_!HMwrb3w;pmL&57RqIe!vUdoF9*pKT|Ywto8EJ5Z6?``xF6Bd)R#T
z5*Tu`Z_C1SO_E;uJ(8?nR#z5a8E8Mp3tR$oJ~(Xco5ge3SYW4Wp7lDbL{X6S+D2+`
zOLD%(_{xj+*1&vfEmhFL@Ijp#oH$xzt?Yh3D0#e@Sz(3t$IF51DN{;<Nu@G9VctUP
zuMDb0ygKI$b-wPd3Q|u9XQPD^#Adu|Q!txqmXntK7$<h2{&Z_(Wc5=q1jbO2Q6TD6
z<1Bh?y)JyhV&B}rX&dwSDT|NaBrf#-V)}l*wQoHH87!h#HSERt`o=6>;@1*z`fOFo
z?;u_|iNK`F9Uo;!0LA61aAoUxEqo%|bLM2v-M6Mol+jP@Fi#AiO&+?P(9qyLuI#5v
zF2-?XB&riz8?GrjWpoepc^q&-C1q$?JfC}YQo^u%FfsCw4lpbph8svdCW5V*EwdU~
z(Arfx3cgt&C8S<BDM@=VmMH^>zlnM6-Y((bFEjfjbVUnoZ|a~^n6$3(ctCBr6?Dni
z@(Tj-_HT~_l8$(zr6y~-HmU1=e<Ayd+x%)cX7ifxx@+3n%@TY5XH(RM(4euYKZ?^h
z8%1pSQQEfUK{`vVY`gJ_+S|7NS5+8=!1{jrQK*%)ff#OgxUWCb+23K$F!B7rbdD2M
zP?*08&~eWPVf6xePpo?fM_SyJrc|av+kX9S>VR`oVA=2i^**=YQIY6N&gt@(-g_w6
zb%KR}j6aiI{eTY_Od?i4P;fTn*?fn&;Ok#b3iXdl^_7G~a^~8>4#1OKKjo0QuvRln
zVKMqkmRZ-7Lld#W`+WqI^~s#CA_mz^WzzYu`+b<qrS+F0M`}EVkKz>0G;Vv$;}?Nr
z;U=wvtSBQfj4!aaXFu?J(bvl#$W9{KK0ceLX7^S<##pIv4uHdUpe<jD&O0LW#(u&d
z#|<ARbFqS(`obj`AzL8UoU~)*-Q}u$8{b-ACfRsO@vo&t8z0<fn5lmd<TM(GV2b{3
zyW1tg`ga~t7)Mnkf1jc%@D>R;jvUk9<4e%Hd(NiNip6J@oisL79XnB9BK*`#9W(dq
z_g^QWt)F<AYA)_Tm2+0=ihT&mQV(s@0%~#`iOvDK5^bk5>!h!JePd7C?IS;16xF}L
zM_M~g-(<n*fRRqm-VgN<U`bS8lz%84z$g2>*O`vYQk&S6nylfKO`zZh&{ARR{_{1K
zkhOsy{iEthB)&ej${33MXC*_<#BM#Y2yK7zOh&PCE$8f!8G7o3Xm$pBmUpu`>(om>
z0qP#Y%cV5juzEwu94qy+be1<Co!5<>a3B?ZZ#`*<uhajIOfmP$71AD(O7I{Keb=X3
zx9a}aU!yFp9Nk`SD`7E4C^Oz+(f0e+dx-x@(1RxMj|j<_&(^H|ul>%Nq%-LyPhvK@
ep`LLj#KrT5zD!@<fa_2g456ldG4F!qoqq!vHvz%`

literal 32819
zcmeFZ2UJv9w=Rmg4M2NDQAurEfQW#AP$Eg2HWXP&B1wso5hTaf7P?VEcS(|{h-8pd
zWD2DLi>OFW1yW>+Och0Za})f}x%Zws-c9d~@y26}Zm?>{wdR`ho8SD_{99f1I`e^(
z2bh?cm~l6Lzs1C~$Bl_;*S(+i!Y2khzZt@>y~aw{e}~`j!%!&pg<ty}Zs<BOF>wW;
z|Lq7KoH1i!`h^Mi`xQ;MsEHo;SKV6C*fm#I!X(oU+@amvJI(((_!r;5oyVNR{ll!<
z{_0GSJlEoCkjM0u9e-Sjx;JyBZ-1b8AHMoZz|CuQe?8lK&G?s#yH5S0^vcgh_w(-E
ze=yxUc<Nm~nJ0v;Wi%bpbWXgK*(T*(Kwj!yPS#UV6`Cq@Chp&OzW?L@yBwQ5KE7Yw
zbCS5eCOtMb#xgbT&h%xOPdQvYi_Y@&n2=SfrVx|W^(RJ3uaQG(nzBq*RlAPxDKDxU
zsTu3tB)1*ec*MK4Ke_Ed|FU}J$BzDvySD#-?E^n*@0$Sb*MA@3A9{yZ9UD((D%Vb)
zx9<G(<e>P2@Bb)AT@-!FE|PJhUa_-vcwgzgyGCkEcRib0TSFCCq%gQ_vd{A1YwL{B
zffGAkVCw7ZE$!@7m6Vi>)b{wPxUrVHpIv?33I`7j4H<jt<)k;VdOY@Hj|;Q)nmYxy
z;Wz8X%KSw_?*jTROwDHmH(qAxZ_mlX#LPsdd9lq8;B}9dTy9A-BFg3WdRW^P4u;As
z_B}pv{_f?fV4he3jrWuzv5UX&W#x`~a*%x}EvG>dS(y%yuPb;k(Ajd|%BtpG09PnR
zYT`qMBV#a(AII&p*k2bbFHc-wotm5frk0qOC$YX@v>sAbRmC#rw$P&ER4bHEiSe8y
zRj|rONm#d<HYeSbnl9hvH2?Mbu-`708{Xb+zEf6qb`60?1+(2|zMnHJxu_H-Tz^oc
z<V9#`=tNdE_X(_>zTC{;YNp)<4-8t}=jyTI&STBF1i~?UPs+>dVlcie-ifNwua!hf
zb88tk^#jTOOdat{_qFX984NROSYgaL4M)40cVwHn!y|qB^5w<N_-kep?O6<Xxv0mi
zau-iudzMt==4aaxS{ATIwfBvDDqM61H=DV>lzBqh#U^oqI2S!dkzX5-M=<f%gBupw
zjL4Qmcpu8=)4|F}UAX9Jix_wF#MREu&e?X8V6(~YLPiD8+6(!0M&k)F(;GCh@49k~
zj8yF6Km6Hq4bou??fFBD)h`OHDo##Ly$czxX0(Zpo?bN#4UM73*jV?uA+wq9mC-)t
zUHTy&&(m60;^hBrdZ*S51+O;rN<)>DnpxI4N!xSqnCZtydl&(}ivjwsJ<etZGr9AR
z4hRVeNexFiIaYJIJ{-v(U4(&LnUi04$|zeJQyr$G*U%v@Y4y^}=z~1#Gdwxt8O1Ih
z>u`$dv2(Y-j20dh)HbaQJj!Uv^a=5%_h5AloV9ux4X!TB7d?v7Qx9I(9GkHjg+Z>7
zW#=d5wHZbVW|m}EP*qe^+*cRcavqL0b$iX#<B%?UqO9~}fyveCUCob#+*w!uVD*Y?
zA6{FYn!3<uYi$kY(S2(o-?%ccWTuLv1MKV4yf;jG;3|t0<%Q}nqed{3QYYS6r@$)P
zJV|pNZylU0o@(fEB}dna5M|IoSG_d)uDPYfdErI=5~H-RPzsihtl^8v2#Xk!Kw=aU
zX6TXJLyhz?7u4Z3I-M#iKhkLPl}WSPXl*tu%I*8#T%USwWtP(JnAe5B+{fefVWP;o
zEu;Q~MbuZz<AupEbY6pkMx*ofmG8MdC$czwS7zM7_-kX7EJ8($Vor#go7TUU(9=p3
zZ*h}}oLk-<m)%&I-{Yc}$kSV!mp8CuDF?N-FL76J2O7ho-TR-gXS+~4UGjx=v)_Fy
zgGtlLDuw0me39s}Fos?p9;iY8LFG{x@3L=$j9w2P-!;bY+^Cvwk%HSDD<`=et))4|
zgyDUw(XgDa=H=xL!rBw@d2ZGI;a=hNr-S16KK*$?Qu2LrvOsN^NTXSpLFjcJ?+fw_
zl3Gnh>HV*7jq8c)%f!Yj`?y|lxwOCeM)Waq9}IEt`(q!1k*4NqsLHR-b9#)t>3~yj
z85zYcjJH{gHYF6U%+}70#0L*O$M$~CFIz~jdo7WwkS<GWKb;us<H2%iB<|TsiL(j;
zEcJdncA?G<+v|3kRd!z8ydesv!<{daxaN^jG?wBu7fH6!iO<Rs1)r^GZEejWx7dey
zf(>Xh^t9CtE=7VZlzd{DG--v4#pG4HtW|jVOR>w{!`WSS#Yc%&oz2a!bPU~jgXP!U
zh8m*vW@ec3?kbTL+S=NN|2iG?**3o?G=SUV%y?Vo)U?*x^LrEJf9%R>lv_4s%nlZU
zwa>m`^-fYK)w3^^z=;|E^B0TWxm*}WaCtT3nMA{qDW^tR>~(H;Q<qN5L~u1jjlOG6
z86~qd-}844*G1qhzr8nWdWYkhOvT2Ku|DS3R#u7#_(c|U{O9^veG3*NY{B6aE`EQS
zW7CnH4U;x2k$rOR@mj+H!??F=i`DYxu)=VNflCLk(@-6$KY%CZjY7ctj11w&`&b)%
zmZ@Q}D-{0d$><h*e?`FX`$)T*=46eWfgov@lh@>yCvqw?$0iDgV;J@JK6sO0S;>k3
z)<zijTRJ*nrxg4t;9Wnf`OM-`w}W#ed(#L1=8qXspF-bp82nPnu<R7+!@UYIhrV)H
zKM7@Ja_HRisl`Nb*cH54Y{~Rpr~5V*Igek8_8s-AWxgf2>ZTa7W#KTgjZa0&!rx76
zk<qb2z2b{g3UG5BuToAaM^hI0m1%vK4l`<*Pcf_ltNPHAfEY0|#jKtV&+pIgjUT?w
z`4W9<oFn*vha>b(>rAtj6fGPQ?7K3+)vyjTe%8NoVPT=L-=D+r(|&$au<qp4)LMAO
zY?w)kCwbXWj$YV!wA$d|*Q-?8F;$N#hBr7(U4o4+^4oFGf#+EBvF2o|Tn-iB0;8kR
zr`58rG+EKtFnNCEuIDd(d(MtkaoC?Dh?Go!I>aHF_RR-w$1qwS_qBCdg$R&TjTKFB
zD)=5Kc&X=l>O*dJeTOSE1vyyf!Q&V1t2fBfyT8xG2g?;*b-tugU#-!A`a?PPFvHvC
z!LTMK3T>!ve$<cq<QG30FZX&**}7(=r>7S<SHLu)OB6$bfeQnRPd6Zgsl99OJ+2)3
zTHHc4%ez(A!fbxzYji^*n1j*!QrpwzhO+r4CEY?tvtqf@g%!g~!*h-D^2HO`N{Op`
z4;_D@BwYBe+9PDG<kl$TBkgkeLCt1}dw4d(0?#{dmV;bN;up129h=+Q*vVeb!>IR1
zOd%*X7_GJ#EwuZ#8Mq3SS++0cy%oxW!DZ`GlVebhwRLFbajO*))tJsM>&t+haJu#V
zfjdB6Du56sU3ynthu|VpPP<F*aaB`LP(XrCeMesj+yy_b>N!W4Yw5T_r4zbHi^~qO
z3!fv9A>ud}pwaDU7r3N{`A#PRe5k^`zRy$%eUltZAErOoQ^k+~Om*6l51+m^zZmhR
zDOTsKtb99n`(yT`a4gv?r$DV~8G_d#&h|NtIuv&;PZnpUEtyn38_gP8S{Tm(Pl`c9
z<Q*@C4>RLxwzjsFWeL>h_EDk22A!5Y1Onll9^o83Qr+9DPqQ5dYf8YiQLSG2RE~`%
z#tM&%F1))F%r7uS-+$RT<|%QNYCpU<5ZnltcB(pI@eY;>c$fQps!`#qv@Q|2yS-@m
zNL_2tzL6<FrDC?7xpmRf*xFE`T39}TjZZm5YFYqx^tf~hIXgQ?oWJ+mF`+xJ0AvyL
z{>&ET<d(3~L>-L_J<G1A$XH#*k@DG2C&Ny&D51Q{_9sQHWk%_|co+Btos#1Qt}N0M
zA6V|qUkmYho`za-KVDW{)V_>io>fZk^$e3RhxrgGUb8EvwwlBONXeC+v=ZsgC|PLL
z<FeDsv(hS~<z<?ICp2s8=w7BON^mz`8(fjwk<{Qc11E*T^bA(ZuRX{ht}R`_Vl4n+
zRLY*hn|}Z2Z$?vC*(+ABzFkLoSU<>KT$!$T%Kob!EI5{neSR1cHJ==ViIB9t^FWOp
z>@y#)n|uG}P<>>Wc%zIsZg#d-WH>~}5ZA<5D~1>=L{K8uw?(^_3~*J_z?#YZUU{)(
zCHWlZyy$=4UweMCWw20@cum{G=R@g-tGm7=N)Ep@+_m>m(s$)cbXd5QoY>U~^C!i5
zZ$%(hl-PoQkeaI#&vEGgR2L&FO<rovcLaQROh>Q>tWs+5mBuW%%AATPZf8Zg<A{RH
zmwnfl$@~Io=Ssn;BDut$yQ)I+Qgt#L09r)7TU{&0^Qnx{$`t91RMpYp*rucD2_EAN
zZ>6E`NWuc+BjF$L<i;mCIG$1yV?0vQL>p!4`Yl7}eO4A%My|_urg+Fh+<MA>=QvDn
z!^MGT6X1qUNZQ;kPVL}(A~>NMDQTNJX|ECDBg14<W+l(g%6aj;Np(<tdzOjQ%1kwi
zrqQ*tMqgheyQ4_gcWvbvkG!0?c^!&Y*T$l!ye#}#xL)U3w+)5r*^$D^<`ZPl$RNa|
zxU27L{PjezRPZ_OfVRcmXDKeJ=H$5;`okonrKJymxw40HMP*by)~*>y#E_MS^(UPb
zV!UY`*<)JYC9<359#fwHz^J@%;Q|}|p*LLPTT@fhK=^ZCT;?l4_=mVIUBKP5PfssB
z^RY^>fQ4J;B5|=&1hxJNLYJMTjg7Lmw|6n|n7v13Pt3yw_T^ifuiEP)oROK?h=w@d
zr9|JeWf_Lv3oWIR+;{b~8$3sz!xBO#j!)pvC#abiHd`k~yVOkgS3LFJ2d-{2W4inC
z5k%~xBEQIb%#Wzj+iY!Y&Sj(+fOQuOaTKAcgs~?;d^7pbcVdlG&!0c9%mS}`TQ}3v
zmF(@Bzi^guQWtfVzk#c)t2%fB^CVMlA@}R5b!Mq{2>XCZkktE&0nhDg2)_e7nR&Eh
zpz66`*@IEV(W4KGZ=L)ptXN(vft!^{FGD2eDaXl^fjXys2SaoM1sgo9Wy%T0O1%p9
z5C1uQovmwQ3ITnK<L))~s1Q4eGdXqOn&&<p6rn&Kp@w*UKN35Vy;dzp%Q9YW)w8F%
z2*aEKSo66hBL}%st>@2??VaEl-?+k~1Ru21&NPfhQ@bv?Z4a;!%L)d91PLMqeUF6K
z1A96<U!xK1tkap*z@|Oy`s%G~g>cnE@By$!8rkeqQ&R;em**jWdAQs*z^fEW36Nj8
zr#r_1u^TZRtO+rrMrb8h?<x;Xr8v!`K=Amcf?X&$Yf0_Qs}xKFq{U8GC3gbwy6;3*
zu%BO}6N&8`xf8fGJ^_6{TMZ6+zc)3nZB}G`R;03vUp1=TY_+LTUfiOg4z5=;u?!i~
z2RENE0~b=bs7Yt^6nOuEVEMB4G5}Feuh8D#(bIDR=u5wyxg7$2a{D9jHMmb2zy%Bm
z1t73=g~99Dw`Ll}Vk|8!Nk`OVUW)iKYAc^|Xm*Z#jh`!Q^cKeTUtI@xVIxdjnN7Q$
z_4Z=$JBP|vShi=^Y4+=(!QK-lQd1>!ovRDQ5OGoGj(n<YRh3<6hCq?F=${H}u~B~A
z3(cTbAj5U;m|O1KCx4sMw}Kh_(8GDbN`{+>pwAooRPWB6S;!!zzr9zfC9c#GDJazL
zO25&yc=S7w5lIyAKd$j!Szzt!18c~M-qw4wmVO1(7Po2tfFWi2u8x17`wr<5`OOrh
z&AQ#(ePP5Evl-eX;ns1;gR@%E7}Wis+N`(4z48faDDFcM7N}zrZ_{^DdC(1W{iWZ%
zFh7PYKmUgHXvLt8k+(!Ox2Mfy+4AJ~soaDFUNpZZ@yF`7j<s)tp}t#>Z3xR##Py(}
zqM{(*$v>H6JjRl}mcGSK&WMbofE2)EH~?p1-0T3)`bAg`)@_N&$;k!mttfI8%qV!9
zCY76;OUeDFS_>&-zOEAyfE$X`*n-1^^g{8fmy*-6V8pG=>tBap7<CqMctGUE-+Wwq
z-7Qe}$dYgGB`yW2y}rk20<}SFGsTodr@OLO`rMt|q!pF<xEeI-0uS=+gg9TDk*{~6
z_t^#gm5H22^QHMwvtXW!4tMP!m;7Go2H0di?*K9MLS<z|{z1K2ZjX3i2rjIzO|2Ws
z^g6d06nCrkM>#bJ*bTgR*VXpqxuMrgWt79G{btmUk(ldT&YHqSBX3#se%Bmhlt#7X
zLIU&Nt)DP?2pk=_;LnXdv>Xfx4Rhd>%M^%;rPs8redd)|mBY{XD|pNPZTm!iVAoMB
z_@|YXVfjW?X=<}sEMWX0cH-jI8Ic*BnCa&if%W&w{dO=uviiJ0ha-)6e+njw0q`aa
zqIq!-6(WMrxV5~F{)4NkGBf{V4@sh)TxX&uX*1W2HjK)+6}-<+NGEytJ0!-k>%;3S
zvDq>40jxYRFk=}#0rYe(R`sU@itPNg04|r?#RHSH=4im;9p2cJqQ<`uK|%vKCbPN>
z{OlcJK*KEkc1^{NQ{ZGQP!KRtGS^^01BYHG;xqF!n|2^$emF$2k#$MhcXW4(G2|BY
zCGK-#u9Mv;8^kIzeR(enXZXxOwMES<0S1L%J_5qUx!WJ&E}8?-OdsJK8y}yGX!PRy
zmZ;Wf;Mx-+JyjykDz|tSjXsA?h+)tu2&9u37y}wK4ayEn4TYPaOi#B%1#=-hYz}}n
z2uzg6JS%rms({nE`6imKW`lKQ4=<oLio(0@LZ>-!aTLaI?9@!=w-65qwS|f@>}@SA
zgW!D}><aq*&lwb5m>X_vT&0s^!4JLz2jDqX>MA$=2P@??590=!*Rn`}HC-0!Y@&a`
zRa1{clGJTRR?+eGS*+j@w)QEWEVA~2#WM8rIycGQXD$+~^^BVAg67GSCuhMk%H#Rf
z8g5?a3PHh+LF)*0m=15sj{-|^``(heNUR9ZgAI_{h}m@)C`X9#qUHzC0)0&g$6NV+
zgwV-$8^ZlK1a(Z`+uV)`>xcXM`^&`~{=x<1--kRPHZJdJfBWW7`QcsOLkVGqXZ?!-
z6(6453A~^U-wu&4{I4S;ohA#1j|IywB&#j-+n|i072c0MsQ@@Z!QmKBJM^mTMqZ*o
z=HL*3%4xbeeCQet0wPBS;t}qEjxXdlCd-aB=*bc!!>gCIx?Q?#3#o*znlWjoA>}S{
z^c$NUf^L7vp?sTej``qpg+UH0e0o>u_Q!*o-H<GznI8p=y><$Kn9SPZ0HfAu4ME9<
zfBrg*vVQNCBaqWU7k^doKQuZ%ioQehxg8?vN6}1|ALtCPS$ymSaINq&uSd9#{$@(L
zxf5m0nfy-j_U+mJK(d+z#|LKGQ=y%q-_hoTlD~e`7{9Q3Q9jZq)awp_S6C%_%WlxY
z?UOAF3%ip9_F>%bD=hnC_-Xz6=%w0Kh3@2z1bfQ{q>DlV$EuamTCR8$eJ-XE-hpM0
zom~fhaIiZ>(2p-a2i6Y#qxsDL%m?;uV~Db%m^f({t`*}hMJna6i+pW*BO>o45*1~t
zim+pwi?F0UI9lf?hE_ZudLwm(u_btrq*Z)(l<5@r(y9((DLXGELlP3$oox^iLFvZW
znl)sel&F1h83~ZgwZGwLyvKSMoOxLnk`hf)U22<3`1v=+g=t4ixV(i)6{Aw!Le<qs
z_shx0?HDPb`vgQBGOwwiH;dc5->pkphUCm!EyBzA4S9*%`)+!<^AyPw?<GY-?5wB=
z1<PB_$}4rA)W@7hyWyxsVl?tg5dwZZZv0-_!fwK;$N28sjw=Cdv<`1?ypOfUPcFp=
zUGbD$%wx&i^;eWWjD1LyuOz7rk%^^zXU?xzbksmv4bwL24rWrL@9+dG>pwekES3rG
zPjo*n6GRd}{3eNO<z?Ks<X=2^GMrL^4B(sO{t|MwL@Xq8uk%VJv0HD<jD&Kzo_ZK%
z1sNbJ&5mg|b42FTKYO1go$i^pRq20ppM$ICsl<lCoaE~hYUd~Yg$%^nn3a-vsj*>S
z*IN-<qDR)|&{ym(*~4?rQbeu)yOo{^5uufu&HGy6v!bb2Z#{pF4%lU8r<Zw;=pni5
zCKbN>cq3j?4hp2j7=%&&z~o~hqVwqm)H<V(+*qN3HF7tlK=jGeLapMV_ha~yoXEL~
z+5)4EQ4jmc?O@fbTpra^6#ZAG4@p#MjFe+V;~=gqmJ)@jk8bYDdAF)~f=&*l3}U9v
z6lSVav|BZIH?!bk1mh*qOMGDda8=<WOJpvO^0Gs|xCJHx-;ghN|BNLzL@J<ZIxnZM
z^yKzS&kMSxzFRG2BUls&l16cBuS{3{yJ#woIK%`yFMEmfH!g$xu6GHc#fc58pX_rX
zoGmyhfo(x34R#GvFDMFTy;$^?>SjB8A2r$T-^<HzM%4H%g$ljBk?VNQFbWUe%eI0l
zj$aXbB6L{N;}U6+nHpVNuwIl)CKGbf*-~ygX;|Yqd+Qmy5E;#DT<F!}*ul-+t>mjV
zQdxFz)ff)VrK?t#JG<jNHQ~KKkRDjvvyrg+F~J|w-u1kqbZ{>bBTOHVX1F7xeAC`}
zJDi{!6_KZqTq9=v`mOmnGJWjaWTDc&o;~kf!*bV)p55UQvLt``cP8M*`$Q`PcaOEV
z$76*2BA;HNf)H&SeJp#+&UE(Tdb?E8moOG#oQ>4CM*n((Wdc#i(kSH9)taJNDngrO
z+xh*Lih#bCZG3Fv&z!D99PXadPqc88qyO=wNW4tp8*gJo56}4`U!i#ij;10eP1ULP
ziGS)rR%^<BBP;hr=vXiDjVe+i{-m66A$QfIh*+SvePb&qG~MNBilUsxajS@3B)!CO
zkKL<l#CJDW7PjEzLQEU{2lnIEnpM(`co|n&={j3x`aJtlekuR0+X>62YFzjg17tlh
zKo0xfAuH!S_mV-#r<DFl;co5iF@uBS<@rzGKON{jg7^BBlmyGTRQ`$If<HziRCkJi
zDaJ6o5EFzm=F`<qZrnY+zj*j{3nQG;w!BEyPj1p}uRn2@<ZCDOc4Bnw7n5IEHSb2}
z+3GK$lj!gNeWg0M*8g(3@BhtfFi(u5UQgYdKl<UVuGZFYSx*-O-l3gLnn6cP;0uVz
zisc8<-|F$Z|NjsE4~)m)34|hoYYkg@*7<CP8K<f$#!q?*0lIK26ifXG#b|7^`e(4C
z<Z^y<Kh6$!>V=T=w14bDe4VnR9YT=Xj9*>P0c8Q10Teu;t^9zSr=&2+lA}`vx7W6+
zJvia#e`w&<Ju!^mJXlOqZ*G*Z2?y0=W`0LADS)1WQ1R-3d`8^+Yu}-yZ7smke3aKL
zspCO4*RqF4WIADBbd2K_rHYyQ4SdQ86Ia}9Br*_yaE6;YAUg#9%+v{qT8Blt9Jdk6
zY}oC}7(-q|;;|$y*Y1~)aA8PeEva+gV%IL9s2%0&?$yzu@*4#SD9XD%H6ifs?44Zo
zM!tftnSET(>3OHukh+}6Mo?WeIgsk7hnI<@SmV|*OzYAfuCKq_3@~wIPbi5we%!;(
z7VO%7FM!i)`r`>1HwOeIM;a{?qeBS<nvp*W-g1ERfh^(|;8n+4q{0-Y+wxo!f1c(e
z&EW1xnoN{qhC?`GUs2M9mkeK1BABT+aV%q%8*crB!Q!BZuda=6-!7hw;t&c*U5U#E
zv~H(H3<<40o01Th0aQp}BM&w4Qt^)ZU;3!sekG+66<2Ygc0-F<?#nyxtMR(Oi!4hQ
z(Er&sKHhUP?88tIS82w}_CO_w-&gN{Ity$QqY7JgQ^pl2b^-_1syWGc`Hy|vNt2j-
zKfipZM1FVs16Rge33pd02(7Vp#Mc_PtWkP<Yib2`GJq<FnsA;p9rD2Z_OkW0<*sOJ
zV7Lfj!ad#2aV`9P)cX&SDZBeTk)PHGk=Fmh8qTGfTbBXUEI`0c78ieQke<@F3ETS-
zCw8~o&v^L>yJ1oTh49EPzjO&h?EF%8mh@dHZBB=mYEe6~KEzl3JbFI)TD?k3!UyKx
zb>tO_xKV)$Q&+}=fvTfjLPAuLe65p<WwSMc)P@klhqkLr3tF#xLXS)nTosXB_>yo+
zRC-d51#US+*t0ZUh*Zm4Ej@p$UWFR|+xhO6##IAW6qx(jw!OpQ1F2f6+IiACI&@kX
zSx--|D_XDE#WrhIeyw^vscC``<wv(I=4B)@Q;#5NU4eI)d8v;1ZnyQCxZ9OB0LtBB
z2Vf?F==?cgZK;hY?AaZ=HlJu*{P5^B;kONBN4~Y_y<&|>7f<!ZH|2FcuHn=;*(XVd
z2g>7f{}36=Yu3Ag)onEVnK?qyTm*+$XB6@U%PrjxHbL_xsQ0o5!#_t->g|>GyB$<j
z7ULz2<5bfxmnJH8O1pN9+dAX?!#Fdk@6;r$?8csB28tL`S<f~i*N1vAHWj(WkE}z!
zYmMs>7{({|vKLUCxa7Mw7dy8!o|!+s40P5Y6f$bq%ch^mFerE&B5G1)y0SP^DmN9g
z*y)q4bRg9QPZ7tpYQ_!CBD5s2C9I8Ox9)Mh&4B&EARO}ffG(7u(g!k?%PtmJ_~HR5
z@1BDC6KkNJjExeZ^u$8hew?Hs-<15V_5*KHW4)ECRtqV#b$k5l;E-HaVH1{krB0<=
z1(!SDr))Z!k*b+$o>=nA5cUKRgGOoz8rstY?A?mSAzIIcGsNO|t8KWl7KQZS&|LeG
zxA68T<SKXR7msBq>#jojn+++Yd8{{$gjQ^zDy{8qu6Mm$k4s78c8Byu5&))1%8c+*
zE5B4R#m!En6^;6S)K482u{}<SCrzLFQwVIrH?$iX1Ca-wA>C!8*SJ)0=AoSHGNd@+
z$@TvxZYp-aqtq!RJHP6Ki=7d$$(mj(DNV1C*7(UrNuev#-jSzt^W~Cm67DC({0AJg
zj^ZGmE$jhunHFc01MJe)V{gb>I927Q*6UlS*mRHmLQkk^7$#QDQ5mVgU%<FyNcA|M
zDAPen^^FC%l>YvGOskSz^p(d&Mf%##``xgO?LwUSl1~n1*?Nc)(r<1~-4_uq$Iqv<
z(uq)*PidVB{DF5iqxof`>tcTZKdv>ypzB^9_4CWqz&(X;`YfxK6qjLs<?t6kD$yE#
z$3hwpqsKHt&w!%k1qq44aiet)<lUP$r%-7}kj(67mVTgbt)04T^UZ+u(apCr04hct
z>d%Kb3#gUJTRHSnDFmb_s7Mt87u5v$yOh%qCEO%v^r6}0mp2Mdb)wa#4N+2-_wRoO
zw;Yz~O|`bPwjO^R;i|TYJmx*=-A-x`to;uP7yJU^nvn-}e;q!JI(ZBZ^c!W}zU!-6
z(F37BZzjj9z3KVAcWl&RWC|x9BzO<kN9uf)(t5Q0HYjsx?CB&NuH8w`D4t9ii8^~_
z`#vJX700Zerlwo80*Fzn);5BhnCCJvf1{2msGWAk6K+TMb-iPvcWRRoSSkgr6I&M$
z&$>V{dvbmQwj31?xyb<GWTkAIx+xFy^RcgbcA}C73Zd|vhD(B|N+fL6$dj5E<=m?4
zKJq5uQhHYU@%AlMSrP&2m6WNq$tlN~N_Ku6NNHYxPGAt_koZ(yze1~jxY?Dt#$i;#
zGUY=rb{POpdF2p~TuIw-&yh`n;Df=%$%26<^ogLP>(+%H$8vA-J;*KW2VoA9Y4e0F
zOzcOk+Rq>L0xj3U7dVho&D@8I3(C`=j8Zj^ua`)J!yM2ps8!hLTzhu>C0aFxpk#>B
zyJ)G%eKa8q!Jvdn(#?1=pej*As7~x!JG3E?OS#)u{s(AWlwlygwP|!1|6p0PH>a-a
z37Cou%r*|$v1_j><?~Aen(d}|&HvDeCcST6zy3H<ex;u^LeAUcy;^Jx6bW29Eui2p
zwa~1wA&~=_0?+zlwbOWdK5bUH)?&|wQ~ojq`WDnyaR_jT%CT~#3TR1_^5+rN&uDEm
zzZA;iD0M#z8kk{FMvdk%LTe9fP(X2Hy)rL%?X=r3F^uo*#PBPR_d1U_)l0OoRrDND
zy?6@BduL-JC9Jifpwc6a?>V%|9L13%<$Zm!WWg3#hJnr(^Q28+NPrf4qJRb~gs?XU
zS^`451yJxUu_NYN49{vW@U?n2Q=nMmYLEvXZi#9_Kz&i@=4n}84A|vtgTt2a5G;#?
z@K(A&(L7*|Rer?*F$FaVm0*7yoNQL97i0F{ADfwxk<m5Bp|i*hj)H2(1L!Dg6@*cm
zKE`^u?S%kVsgtz|Wzk&eHZUHrfz!BbzzwdtAhXH3gzq}A{dOE^9l@Z;KmkFS&+*oD
zC1e8DB(=e|I}D41x~o>@3A+=U*7#+L3o4J5G~O_M1geaDxL%L(^tvc1ahxNlh0I63
zyrEW=E{&yD(m<y(X&62_bmCvjVgC_6Q(*GkVKvNw=FA+(U{p;P1EMP^EA!*ZW<xR`
z9?u7{n6W3+mP;kcj=Gz+I`0Wej0l*Sy)5U_+@XA5kMJr5_D|+oeiMW8D$4*W`mx~w
zsJIE#Hi$mLL7+NGD%hS^r-Nn078ah|e~2m^Ad*Da3Kyq+6Gh2Q6smPY<q?f$_Nw{k
zw(Oa}ar$~t9jcT9nI)7lOhK>JLn8xt_OvwDyS6#VHm=|-pQgH5>r&-6m<2y7L<n?k
zmAg>uvE;f)`?3fOTK6<DG2v-U^4c8nyTzy!N`7r7xDYgM;!wl|*PJIUfB#FI*L*xr
zJ=`P=xN?wsWCWXcif_4ro<)=l{iY@_3odLVdqWu55FJ_QG;EIY?eZ%X@}^MdpQ_Xi
z1*fb29b~6gU7aU$EE;=V*3<UELv^9mma`BoZh*wFxQh;2JSdaM;gAqPouRMSd4yun
z<$-#OmDw<2ouMbSCGwll(`~Pd7S!-+a)rkySvVxmq1qSJiNPAm8}9=76<CZkyTQYo
za9SSB<}gff1F-GlZqt2b;XYwwz=onD!_*=P1a}FT2o8yM=@dYvP9XjHda7IHfaf&#
zgMSW3fZ_!eKVV3pAw<BLEsRCg{&3Vy4z#yVg=;{k<iUy7$n-($6W!Xbz3ri=09KzN
zumVM&T^&L*C~<pmby#!%4^szqNmfsL`)yi5Q(1xp;pmSq<bAxdN@sqv9t2tISpr%r
z(|V{H0(DgMnU_kFH4=|?L7pM#**!a0D-CY`N2o$+d=ysUP%odDkdRO<3VKUa=!M@9
z&&fgMR@*s94+_iZwdOsUnVA`kM&B4<>d)zBV~keEbWnkc@N%YM>7|W-LGFRpGK$7C
zYJnE_cu+O??^Y378^MWzY3svCqk;;k69*6WJ!Wk{l`m+)2R92@j9LGuCuq11G_e37
zBY%wBuV{uCw!jKvkuf<x;U5F`OuS)ao`x!B48pr2pxiBqith5gf&9&_bm}_!UwZh}
zUbMtj7W13d_9g5AmwL-SNdZv?`iB2Kj+<R~<B+9NP)2LNLnTw+EK8r~(<Qgviv$*H
z|80S=rNbVfL!8M`Y3sVRJyFGLOXK;Y9(pxbThV*{w`d^Q4Yji$^*2Z#pk`W#A)$2?
zkkAM(OJcDwL%eAHAbr&K@TLqJ&?V2>bO6K>Su~RciMBK~2cT3Ggv5x84~$U-94bOX
zYvrEq?+0@pZJ{a<_lkl2VsNm$A%^w7X?!hVy&+BODRQptGK8`v8X?@5MiZTC1QO>v
zy=u+2qnMCUnG7uC8;IA;Q=_`LD~~VD7Y@C)2A_t8a2%fRXd}o-1wnl>8BMa=yFEPh
zvGT<Bm`l!90drtv5kU1I6jTuj8C{7!Xf_!W7V>%%Xbovh?V<Rlh~3X;3e;vo1Ud+j
zS%zbQ1OR`-i-XtFFDbpyXYk?fm7^8~W<PKeSf6q6n>TMN7y&#!7ja^iP48T~u+KQ9
zvfB;8L7>O#n=&(5mE-uMn+bUm=8Z81I)4|!WHi4mDw>r4H(ULF&(Eg<a*MsE`#x6E
zU>V<H{B6s-HQGM*fSb+|$ZiAAU53$$KB$s0I8+cVY>nmv7LIy9&>SkVASmTq-#`+S
z!pvb*aR^#V?kRk}Jj+J{gpzWxLg@7NA_X^}-CjmPlu$t}h6G~H5O5}ZI2Nc<fjA|%
zrvPf-dF=q8$UO(edt_+aC;m?bCMXh^(lI=0vvk}LM)x(P1!Iq5el<KN{@nmC&7<`N
zg~IG?q@2x1D#Z!k$kxFQcoc7NDf3GIBhl>c9{Z1pcztp`V^wm+>lCRIW2ES45Ru2K
z=BRXOZ^b_Q#lrKXI?OPi0R6ydOVUOKWVI6n6sSOBFi<e#v+vrl?|Tp|fQ>kTB1mNL
zpCf7$59>fH8VN!uEG`=~6SSd+wZHcDcq!ml&Os6;Jo;v;`qodzo{p-B?5&?(cpmr{
z)AZkrjK>suZV~RExgARh!>y4q`}j^onBD*$X(h--)zJ$XR;=>kC$04~ck`0$6@z#>
z)jg;Ei##!fDU_9AJZD#h%r=oF4PztgU(8X;7>cZnwS9iHWDnMEakR!-V8Yo`@4)g*
zP_M(X6t1kjGW;82v%)@$@=0!~l$9J@Stx~pVYe@^)kY$bT$=G_Ns0q4ac7}2XSpcc
zb?s@p7zqLWcAI#Uq7m$Qk~?oTe}ebVdSgwPMw|P=ijL~rDJPhwUa-9E!jux6Qzjpp
z>pJ?jvAx85M{eS++Y4PGt!%=7(SkXGf>j;uMOrq~)N3Hf@c|Lp@KB_E!}rRks2i!z
zc<|*4SKBSxV2a_6sUhn#mhzofV>hZrH|Nl55fVk-rY^n!QbV;WsPuZt<Lpshn2~Ra
zoy3v1jXpqhXgA2^k=lzekr~tslqyf@gDBsbLN|aYpOM-OHOVstP~q=<QVfF#IL8~!
z)nG}IePm}pcNx8hHMW{6SuJ#`uSbU2-Lva)C`NwdEqSBB6hHYsjBKr(O<><n+2I|8
z35}P=)6ne<3k!n=Z*4yPxxbR8=DYMQu+i4~C%0OiFbWxY*6y%^#c8{Kb!|jwf@aNj
zO0$lLtIfsUQ(T*6CRLo_#862H2KCp?@4%@Pw97$GQ^Vq#@4T~j)*zJ9&P?@HaWues
zE73=7&*rRkmT*<M(AE=9N=S<r)cK$%s*5X%B(;9|@<pYw^VdG1Ml)PP$Cou{1pjT-
zhcK=LG)_ryldo2Nsiu>LEl%6T$;Sbattqib&uupc$u@0)E#<fJuF@im4o1qm0*G2U
z;L3`7+_&mWC9(ay)zP*I>d#+C-oaB0dZOfiAt{(OZ{$55fB5BFFW}aso|FRZvV`I1
z72qE;GHl}3y0)&;_NVKyD(%g3s}1{mmB?0plT?-RuEIYAb{AFKUtDWrd(`XL_CQ{{
zN$w))x$HcTL6afUknfwcS?_2U1_Yg>R;8`CUZAOO#*A~c?qzZHjiNjikndJOij_Kj
z4X&+kFe;n$<z;5z*02{ypD-F&&h=kNVcCpSqp%_B)3?-UN@>r0x|*X4X{LLt9NK(-
z$5fX;FT(`c&k-b|Hk)VD(YjX!r`Tq@!I>=ioVK@5{BV{eyG1xA-GjnhKh*UovT(er
zqbk9U+&RT>+3|%t_S3P0Q)*&&D{QBfPkj(#wk5_)=0Dncjks%tpYMDewe-E2ZO_N(
z602rWoAuz&&s3dF#yClGs@*vC`(#Zfvhp@yIc2NRb4~YSSK$r;8(;MXHCH?3eq#$2
z+4<tLq`w91D;>6LR-X^_jui`$gmH4QlyFP{zvYeD8%QL6<szxZc9Wb|H-SQ{FR?%I
zPAgxbM@1t+e}i#JI`sp)Y{G~CpaDP)<NtFXEUtGH)6YxSE*UP8Bck~F*-{@}xf%E|
zU0u)kH%SY@os(8KU$NV;<>eY$EgXH|^ddX`uY~fD&d$Kd{Dt!3tGq{F>=kqu9n-pc
zIj;W~e%JFKqyz$f{heh$CL)3!Y+*J;GG(zgZ@m{I5!>jT{*;{4y4u|+B3@BfgQa(~
z!hl}By0vlc>~_s*TYeF^l@@DmZ?Sv3Rg3~Bx2en6Rz&=`gq3+Q2UFZksE}T(e1{a|
z?O$8|LKAtvp{z{^7WbcDqmYD>tzSgD9gc_FrTu4j_)j0Qxy}VGQY)*VwT0L^2AXqO
zX#xXrsBx1^@cYl-XOPc2_j#lXoX%8E*~G~04W{hoyvHoA2>#@D4@vudFMJngFtM53
zs^3i4|F}#RKYqry?70(q8q>o+wfB|`^G9f<@}F#wG-g3R^9#EB6g`j0FEFK3rFC}`
z{CVLO2mda0Gpz$|#YkOJOJrxqPZ|}b<Ue_P|3clCx~<lo!^KL;hHV64^h~Drf2Hg$
z>A|TAbCH`eu5Er4Xm0a$`uX9ZXsr}t^t;TULUX<jA<_<ohV_O&i+9DDO<17GV|~jr
zKYCAx<TI{@8GQKqR}4AwAI8Q7xZa%AyI`{rk6GsJXqw!-XlMEfK{qu;F_Z9N;ssM>
zS-lJM{NQI5aFfcjkvP|VhiWsMb}?yuH6_Pm@V>EPM?ILBj^o64_WGXeXNZ_OjQbya
z?O=djzTMw9DgK+p>Aoj5_y57VqaWQ5gTcwsa}$btw32%EavnpjL35C2VMq7@o98!j
zG^u>n=uu3~?QhXB=&Y-eW8zaR*E5jCh4Q*zM-;58U3qmwC~q;Wd6^P^$rYK;H1?FK
z?igWvWaZat?ONUyVj6%EQ9P_3R4u|mRyE@cr7U->nGkYmi#Et0uHl9;F-xGqXlw^l
zQb6gSi5bb$g){U6exs=dJElHiVsFf@VWia@f<~7f4=1tpPu^Bl%k~Tme$Yj>VN(7_
zbFuc{;Hi|&(plUrFpOJBaPDGJw6PB|6%u5x=4gyaBlGC^8}TvRs0&9BKutBrXg|Rz
z<!q*hRV=KW%a<#Ea^)Wwz?rv<N#C-mp8jog;W`raijsvHZjLEFPjbc2=OtZ_+p+Rx
zPxx`-+d9ob3u&#s@!SV1GCS`ihwPZL#(U*HTu}~`H717r`l7q}lVQqzb3|OJx;ERk
zK+nYxA>Nps#T-N?VkuScU9Ri7p9Z^oxYIX($8qB1F~jl42}@rwnaWv3^B>u+n5|#r
z`BvY1q9nQVF>dmtnT=6kWSZ>)!CYcvRp+V+>P&O%rjYTb-Ul;#_Ol4Lgf)x$I48?V
zk}OVku`s>3Z3);ZS4VJH?~{Zj|6_*v8WS2R;~jSWA5RUtn0aJ)`G+2%F;Tw=kUcLA
zHj3)X!D?tuh1bZz4YiC7>$&x)&Wzn!y}>nrWs!=BG*uYr{KJ;<^bFJaSM+_CwVZ3{
znaR_`4i!@O%fN2hc-<}1W1?T$|6Da~XbAV|eJfAWz!_>v_ntD@S0c?<X#c8BkFl^b
zw?orS{GygJ&7_}sw0X#yi^(s`t?{#FYfbs2ui5!NZ)c=f&yA}3MI!~<=HB3cXm81a
zS4J^X@=!+Qqvk+>u*S<wB_^h-TF=i{<c^&$(#|;ZI)V~|Ax2WZV|ecO=ShDQ!X0ZF
zYva?^tCmv3xIakml_2>BiTWgBSf9-<J;O-1jn(2gb*`g+mFbJRb!%Gk!)YR9Xa0lP
zJ<ne!vFITsq9k!#Z!Bfxm|^h|8T}O3WD_r)y%jz0%2r)takJ9#GAzld8tD0PymwAO
zWmExYh&MGrrud{pNGr$a>RRK93y&^U(GN+vJeEL@8#$le{n*t#&}c>tK=e6f$7|FF
zI@H1i0Xr7$V2zVKeQflnw@NRNLQJ0dnk5@XF3D%0r(M39E7m6~MM^tt*p*K^9z1$%
z+R!M497*wgCc5_dmbd#r*9MO2OmES<aQ*=u)1jGa6!QI=_32Sn$2+5LS~;&b=%LQU
z5J9)b`o3e#&&We;UHV={E?zif{f?(kl7?8p)rtX}-F*+&jXT!niS@189L#J<E_*={
z(bzrs^p;JRgK^-hyC=TnLS;?Q>{yQ)X4Kj?a^rA8ctEq+7-dHrBqVQu7dLs_Y~?7f
ztY_jq`n4bJ!#?{3{fO^-ttxEm)m^S21IRqK^fdZioKRX{`g<O}h*-*>7+9mXkr<3C
zZ{b;z4!)b5F|=`d>(A5LZT=Xe4B3r;T7EvpjQ+uNw58@~$@8+-(7lbQ7iCfxNI&F;
z#YD7}Gm1`L+~5(^53jDS>f{#(jNaEk*7nNXFKx4!9`MzT^h8I@&oVP4^)9yZKyOMU
zo^mvAsSp!P$l5qDoOb5~QdZJ1?ws(`zxiUJ>MeKMb8QM)G1;p#CD%Q&cVoowr-kt{
z+yn2@#~qF(ZfgOYvK%)q5qHbw#;j@J3;Huj`o{Q|Uo4e=j9u)EuP;R(m+3sqocQtS
zHRsKTVY<s%BzAndw`FL9PiH!wn7(5w)CIe7>KD5ns@+{qpF~ahe}$W~drEkOTiWu|
zH@GjRu~xvRC%R+a$dh98^EO7;ParP!Nt;LQ#f-LSV<msG+H4s{M6i^mkMtNvg5QB5
z2<>=ftJAMK|3E#JV`CJ<C;2$0*RCVpcX~IBwwz5O=SkZV1FjKEiNLH&qm{Q;lwQ7t
z4IiYA1Dg&Ti;Om2AHZ~kQ~s8uZM|%X++#g+{npLbx!Y+yxHWBf0xG4TPTms>J*Vra
z96z)LUbN<dT(IZ0l%M#yR%1N*b;C{D*p_$7$H0;@dSB47QQu`!$QAE1hyq>Z_2;6K
z0k{U`Sss-s)Ppm{{Z`cFP_K(Cduggt#R781zc5%{h6^I4GO;l}akuW2KFXJ_4D7DB
z=C(T1>FdfhlsAB%cuDz!DSd9gVN!8-;21i-L$ceOj}(BPh%vo}^jHO-z!`>88u2n(
zCw=cCYI*NA7QLT92KdP!oSe}m!;oL=RvnS+$b5+5xYF!x<SBCQhU3-IJR&aJNke)Q
zf%$=hoI2Ao4%#tN)ujf{Q>0>ix0c6b`(E1iKpt`<-%61WHT`z6q34#gMe1pero-r~
zU48<~QTCnYy3NjEvStcvv?+ik_z7vN@pHYB?BlX?I4s}k_WAEgRilt(LmahJ`8ub8
zvrChuzsER@MWynCa8R4i{jFr%b6kUBcJ=OM>#8X95|^Jm%$vTm;UQz9P3JB)#=bO8
z^~bpL)t7$lEW>3e&ZdY~t$HFA)yJJ~BU6b#nO@J9A)UZ2jZb8raB3Y`z}aQCgz-yd
z{NaR>kCzQv({#Umu1g(+xo!HOPXLc&FWlm(+P9+fYD@xeZKgSebF_f@8GoRO#G20k
zB8gK~b9^v%usc$eAAKP8E3k+&g<2BT`c^cqg{Qt`QJPI}nz2Vp<VhI<+CRJUcbp<Y
zkiAIiygBqbmg1Q((1kyzn&sgRQ-#-8_gMWCGj%+kXkNEL)@W)%?DG|9;ZdHYJ&0Nk
z#qfx5W!}GWz3X)}rKV{HOc_hUA}bb18Cw^Z&5gqoK2jv3XJX`Pd|gV5D@r|uvgv8e
z^8)#V!^s(38vgWbP0Dg>?5^gCEiRiO<BHWfd{Xl9QwhZy2vOD1d9*MRGO_-iqk@jZ
zZDYgu5~)f<;t^4CQbfXl8P4$dy$N@mk5(!>ri1vzX=Ak<Z5<1Vo~j{Wb(S>|GG8Iz
z)fdaddDX+Wy2~d<ZHiCkVM(GYBdLNU3&rZ#j0K6Co)!+l-TUy}5;g5*Y}nts#%zV6
zHuJI%5kh6X1GrEOLl<#R7-mhEy_O?D`Y1p+bw5`YU-ItZ3XxBW{4rq(xm1-Y+){1c
z^#Rm@TTc;Gs%x({JIm(T)oOh;Fnw?9g@kwttKvct8&)UsnYZG?bLVHi4xbARgkEpm
z&85f7+8d!K-j-M{!x*VJ>IL3iNM<`Vtz&Hh!XQ~(jE%8;reMpu_VQF3W=dst71PM)
z{ws+UiF*BO9Cv-HlC!K}5DG53-b!uw<O9|V$CwpX`AAsnV3*ERO>)Gqnud5vNW!q|
z4aeW9Gx<0ON%I&z|A<UZrp(NNrB#7PRQ8aJyf=HCSn@OifAPd<??7#_oUJM2Xo*HW
zi^5o}MVEu?#aQKRv5J5g*#wWd^O>xPoMkNRC0LV&{yOeK(bNVh)cX96{XBil@Jx$u
zm@$z&4j}E<+f-C>1}ov*b8kIlz(2xXBRK=hCbX}hBK?3}Rg}U4zx&-+)tTcZ8(F}Y
zojZF!#V2@ZBfz=b4zxXKc;m2_ouZ>FC^EgWF8H_;j4GEMl6w<^#$9>cAB?&cq_e#i
z9aeAT>u`Ei?VD->01SND)y~7yE+O3YG8QtE9F8kl81MLJ^6{F)vt9c#Hc&+dS)Afl
zaGr2td*;Uc=yZ+UiQc#du4;E*txNU~jw~&iCHF>AUW!)PD?93qy3tQ%uD{h3Ngr4m
zT=i*te_K>WQ+x>J)|k$wh3v4`K{8QeU0Jx;U=TwoytBG+!H0Ls)`YdA;r<_^3kgf5
z&UMbF$z>%!Y_`Ua&Wxj_whWtl>Fourc-oy(`@qOpiKZpCRDHZLh<2-v12(-m>NZke
zJxS_Q`Dz$K$&0URiKgT>&7>Tzk}y%-c->EcpUR3g)l9FB5`)g`#CxS^8ol_cv)?yE
zGgImC&tbNzSz~UgO1E}bS4i<b?h=rRq4@vDv$+jZreez(tYKpnd~G!!z;9hnmlGz9
zVKN)<{&ndzusMR+)UkH(C{qV<9@YzQ+4Rn>7}~~Q+${sk37nlizs8fh)3-+xjd&gg
z$v!?ihwaa{5amgR{yDs)NPKs+sS9!%>6WXK3d1laf6A1NptNHIt*e!gZqXWj9SnnZ
zylvaFUd?mdGZl(6%(wot=;fqJmLmO+ti61UhY0<-=uizCR=P{3s^H+Qw3FP_D%<+4
z)f=as(YJaPKv}9$l(BvLOt?|Xl<ke{6`p5Eh638t++h?VukH)u*q-$phd&s`Q2xF&
zynHXPSMA0ujjc;*9#be-N%+~Qelb7o{-%>UpJG-Us$wPD54yY8c@9pUR%Yd%CVO}F
zV)+VfqK0{HrDVeOPme2Q?VB3gTc3Z56lNWKZQH{=$#s0{zn-ZX8~KsraZ9{3$vt7<
z+MY~w(wIV8VE)M(Y0p#wz3svh*GeDC<4wshum3)v8QpMn99<;x>qZ#+cD<Ykr8HqI
zLSmMAa52_y8&H$!=(ieKH$3GN23+)V-avjEH<q7qB``8^!D5=vLMb3>ov4wvvJoNy
zlyObd-WTY0=AAg?jyHWk6@6Wd=X_<V<a7sJ@k~jf+IC+*v;b^>L1{iTNs@kDhDqdS
zJjM`hjW^W%Od(BUM@#e;_!z~Qb#c;50fNcJGo-2aKSfU|IeG`$a`?QUFlf0Oq2s)B
zo?u_k7z4Ae?TKC-@EUb9?Pc=YyH%n5A0S-*Q#$1TK4<g)U*dl&1@`~Ya4tmPDQ!5(
z5blFj4}8>+BltAs+20Whe0Mk{4dbc&A#oe3d<I@j{jhK3%$_2%0A7Yq;AMi1C3U6)
zQ;Uy!`HuK}%hj9gnQEsg&Cc8@b&ne64x#XO$o<7NHjiQFAGP|n3F`Ljce{=iB!%QH
zQ6S$P=w{%`bS{<2lD=bd@O3w`J&}WonXxY@T(;qxQT)t~sgbp_BtdX+6r}+f`hdXB
z@0h~Vm96{p-`(ER9Y%Qxq&(x{Xw*URrQvtmUXpi_qr>{v?h@Q=1EzG~qU$Ejfs~y8
z)INu-q-cxW$o4%rycuAW%cV<BoalbtKY^h?n_DRrFStIrO=)nv1xn*s!zNw}_j7gQ
z=XbXa{AIzO&tdIfIECP_6)Sd^ba|Q~jcsGD@7l>OB{YE+Y^&%RN@(QW|JNa7s*YFF
z%YGr*9*G)mNmzP$smh+yQ6~TD)*wpe^e`)n`i7c5K=_d;xxd|kuV`x%E&IV&ko=F;
zNi_%ICOHP3jW*!6X46pp5ysV3D%6fsPt9EjEVuh&hg&PuCJK_~@ZqV6nr+J=Ij0`q
zn{bE?Gq01<)Iq{prLd^y(5wRGMEeVO6db>BKY6uWZ$xocM1XLA@fs4V>R6_dP}F;a
z$k}IS`8BG--Rf1FIi{nqVS|wK<AY5yK}xd$xES2**S&Rg2jps=N7$vR{|Fy2jOd$&
zzTQaJc=$#Z_x@D{i?mIhXlZGwJG6L0Thb(CX4>~LVAG{3XsPOL>_6=;A+4~XO4lA-
zjBR<;54M6^_?hii@DN&AC9iw;n0R`6Izcb6VN_{~N{Ucb658&lE<!^@m1^g@OQRgY
z<XA5d6WR~ldsqFb$(=PMX1(u)l<&=yu-2~?f=UaWY}gwdDO<LqfR??`t<gty^k1S~
zd9d9M3g|}5dAeHZUn=Fr=_dqe`COx-P3>=Zs>hWUJjV+rUnVTg9<I8ui5c$ho*SyK
z)wPHY!4$#<b+pi(TNqE>?-n@_bEub%s)aL@u4$jdB!&d(<ZYVHT{flAb0?B?K!8@I
z>d)V&;uHSe-*iD{QZPFI`Y1z$HNwdW8B7>Z%3eLtm##|cb2$*qUwH4&2lboF<oH#_
zkQMByHQ<mw5##6TwWR1gb=-ugelq7w<*|drFk|b0A8^9>v&5aPgeCx$olx!WNo!0I
z?4t)rm})*<U1>waG*{(P#*JC3<YuPQ{3g?WEIpoWTCy!fzz#NcowiSWfnmo;N#SJk
z`?o;Fd0X4=0#Oi^DI*imf&erMG|5aOkl9i1rwZ@v9a_GJFmS2>1~37<qc}$$Bo*<J
zAgyZL-B=jmlHAZ}3T+g$A*=%-i|t$|+OZ8R1h)JJksj?iNazS~O*uRr)YyAO#$F+i
zBa6B8M3?E-ppV=Kdn)XEbP(MG@AQu-+L)*f8k~4ht&M6ud*@=J9yZ}3q@1j-CEI0h
z@C(WZK_n>!0=@i$uIwOssh<%po)A+vawPFGz68j<>h0|foxf<fSwgyd2h>rubI?2B
z9ImOSC%Vyl(h2QI1kyDxv%7V55#n?4JgaA*$(SW<i4ERtfr1v`?UWi#4sU8Cx$G<a
znHjJJT;5>?-KcNxJ+61X+v6VSB5Ke!TIlv_9D=r-L$?eod2q3A$v<X5?OHUyu)vE8
zf(^GNLlT)MT)JCDablqNh;pnE*i}tlU!zBMQFd=hbAsrwKjUE>T5TPZn=0SM%9)gJ
zH+4Sb$JcYQ>t1oaMfrBJ&}B|u9r}(@nW@Q#x3nPDXg|HZW1#kJ_BM2--~Dq5=0hSk
z@!A%&;IfA%b-SE>eSLd|q05J5oFQmQ6g;hVZ$EDhRtw$Dag9@_jC2P{)62JuGXzQ2
z07oQd`;gvgf9#=VR9kN_46lZ^q1jdKyHf4jJzd79w5geTSOV<=z2eGX5mj@pH*2U3
z!hiMAuDucOZtp08hn7eu{=G%fa7{U9dK$QZGr^FqvKyeYceonWl}XKhK8=b!F*vjX
z4Z3l?tJ}dgCESB+gD1Oi8(LMtmi$}{2}E|$EvY)e7hPZ{!>$Fij*qqkqVS4XdITR4
z1-FbkOs3pVrvf+;wCx;D49Hnq!$_%|zZB7KU?65ShsIM<V@dJZ(0wM9F2%iVJtJdd
zH6Tiony^OQiFKsq&s#f$|2r@ZyD6Hw)VpIJ=a*(imot7_E;U22ftt&)*IU}Mhb5)7
z&eR^E3s1I0dv2&57VF(Vuyu)~|Ek7T!@Vh3%q75P4jWjwxQ%W5(bD<#TrFGbZDm1V
zD4{u|o+ETL8G`;*S5OUK{dkUfeGP1IkAU7Nd}!Y`7{JI&T#=ji4wv*<9XHyL0fJ-)
z`#roq5{v44b)h2*x}zLA6#9OyHKb)9bJ3OGG=}p+X!}Vi*!Z0T34v`4859iYb^$&d
z+TXJqF0(5$T`ym_n$t-cmS{HG3^Ls&UwBI!HUK6l07AF#mkWxaAJs70*bHrH2iq-d
z#a+M^7lL-oiPm8;3_YD1psMKj{cnDAcqCLtCEdw$(-q2%=+Auux*G%CjK8VigFWIA
z*s_`DT~CT}kb-cK7pv0r3t``7t_ETXCQ=A$M!ila+3i&$7?1-`?&8wxJ}lbU;XWLV
z-jr3kT60UqcnOuaUs8we8f(t6I^3S1zDF0;hkYVUn&sJMwM+cc)sPAmo%{-{;N_$B
z5QieM_NoZ<kjkH&t3d^QUtw`<tC|PEXWftM^@z{&uwj0Jr!d>QDg66I*gO9o%iK&{
z859|pvj+`TMT6+JbT5eBnqMXXia-T~0-Y~#_V!cZ!}B!S5c&^f0(y5a;^mj(-_tH0
z-X7$I`FT)S3FFk%)L;ujB-$y(eU`+3opT*+BWc33d>j2ZCML#fT#sB6CFOLd{egG4
z>Bf>7aYH*G;W4NZUAS!VJK9MAZEOHtxL%`Od_+7uY7q?T3o^ivyB~g2*)_}!9S{ql
zp^MX0DLv@oI@$=VTfY3K?Xg~lZW2-xbJ(7T-z4u%I-pn8hqfK@K``s}e|kn9`mwyW
zwog<q*XWe}hc$Ec>9M@xC-1k_i$BWGH5+8`xBqfRzFgcAuxoCKeJ@u__xbHQDb~o0
z?LI%@r59^2vF+Sod5R?rM{cdUFEePH8Ub1I?_0vWAXiY^tBx}GYE(AWjQ@4jJR6Jx
ze$ETc)9J$?(pA}LE(&2_{4bMyn+^or8^oMMEvm|2ThilP2NVTCTgC=BJR0<zF72Xd
z&mp;`ufaoT6TpxAc%t%428DG0ukOABs;RA8m!fhw2pmxX1;i3SR6ts20#-00Ac!Ck
zKm`${6Oc|ok6l0#q&KB^={*Ds7zCme=_E>tgc1lsfB?B`1D^B$_ul{Baqk%KjW^yH
z8Je-#d+oXAnrqIv*81j`IzO*x8u`h;6f;4i5dpXr3qw)bTEVk*gE7F2;WWSQ8mLNv
z{{$nRv?2*nY(hM*E4|69=AV}HqklaPoVyiN%K;;B0jdl@1?gBL4*<bmPF6Atyz7o~
ziFtm;I|^C*Tu%ZB#IH&ke7`Je6%gkLXOV!FIy3xSU0pW-`XD?eLo{JFE8m6Yq|kIJ
zPFtv$X-q}k;MaqL07A$)550460wNg!UMT^l23!bNk{nkpM1QkWBSHArSOBxsxWxGR
z(}}SRMGlzSkCgl6y}0WjTN2Ca&bRD-&nLAB?Dnh$*lQyjQuSK~h?xUpOMpm#zY}B<
zt^u}K7<ql6uRa9mKjklJgHnh7+OOT+>+Fo{@I>$TY5<PjpD-qQ9Re`01sgz&k86a4
zdO)%DB{~|6rVDeb!e(7rAMWx3rjLC-Qy?f1Kru!#%)HX=8=T@i2(b4M`RYA`rl!sE
zg<&xe#yIC8+#at89EPy=`S#!#z>y*#b}LZf;Tk^|#Ox>Wbr$-zI$C@lU)-$p@T`UC
zoFwFY5l~(XQFbi719<UCP@e$JEXdiy2)bJIh^e+3;BL23Ir&smZmxd)%fWbgds6^C
z707Nr#C79vxIC+xyZZ+;0oz*%fYnX40S>vYlXU>M|M#$7v*-b)M<1jGspyKjpRKNW
z=HLktJ3$4UpquC(6h!f}0%$MWAZ+a<z&b;&d=s#f5eisflqt#RpylP|_Wu5OFq=cw
zgFpi9WOQriCg3w8ae8_><Vx)o$&C>a{s1@zxu^gUUtWX-S@wEZ*Kr4BIeeWUKHs*L
z>fgDMfOVLn(X6y4Z!a(9oJ99u7f;*R*Z>Nj<k6hmf@X*@6mnAoD2Q;TU$eXIN*%}0
zX*0|qX5|zn9U&;yo4GL10%J&-V@EU)rc%B^33CjXdDMs)f-hT)^wRDMIAS@W6q2-g
zXy6H00&xL=9;OXA|GsI{y#SK1SdT%fH%~A-_t6ZC4-g(<0&?4``1R<kyVyZo?;9>b
zL`kU~Lexz({Awf*!24X{-70EoG$1k_KR>_5fg9gITDUh0fd5Gu^T1IL&BjNM#3R5y
z=74<TzLy6di+vhL+%?>>KYaH`_{PfQhXY{n?K&Aq&CVPHM23dm-riOeS@UAM6sTr$
zXl6(<6{mfQ(jPfe3_~Z~@PBB9Z9ym;`q1PM4WnJ8JB%mPBNQx<+S&xhg{F$`u_UW_
zZw5>#(pvk#hr2wfn_F|AXQx3X8?p>lDQOHOQuD|%NOS+^Bjd26*p=fSv?>boG|_$-
z{^xFO8)q45J?h^cv`>V?)T9Zvh_-A^@9W^Gdff3_!bt*%i;{KU0|7_sRE?J;<P!7f
zyj^~N52phxtP*!zu4pSk7#tI;5B$?z5u0GHZXM-(zo+=uB7fC+F-~Ru@CM5E6RXyY
z@ESoCk<_I_&wIgv=SlzLA96?$KhrA@^qIPX_d!1Q<b&SV*H@Y+Drozzx2!Mn$B<Sz
z;rjGg!PfPSfR49->S`zo6|WB(8zqia=n9t@X5)&&)Wk(ST+A@9n8BO+ju8ahz*-9_
zk_r8QuSYmJ3C6mb3pi13|LG3SH^MvRX^jV(P?ky?$4l2uXTBC5CDg-w5mSqX*b{1R
zd!nPM^Ik23$s^e?xg0Ut3%fHsW1@GOU=?BX<w^B|_0z-B$H5gr6e(Zb{52hnYp6nb
zts!kpokDuiaQtp1QBQG9H0LPctvY3W(bET5PLk)a3D&tRWx|s^f!h80;6xy?`!H9f
zrG*m3ZMo5BuzVk+hU4dco6zZgIl_a`x}t$QL2#E|Ac?iUO9u=5!nyD5vu>8sO15pU
zl0Z#DWK)n=%lfn{1<~lxgaN&5m;aO`AsrEQb8>e9qPW0BF3UE6_+t3m+n!%rN-?`@
z-^It?D4S0H8de{%{B97obS~T4qG{1AidwcOi23NR8-u<5QJ6dfdRyPD88%@5{G%F#
zM__i4tJrY(v99Qff7pD9iyrBNx#ozWr3sG|*18HAb~70cg%{|3MvZr+)bc%RbABBV
zNRq`$Q5Z|iv1~DxGX|?rl+O#7GPhO-VJvS)V-lueYS%tPk28Po5n1}U1B}i}bl<ER
z!hkrkkiU8wGh|V>vAnj^nW~D;_|56lt0^gkWz#=4SLIn*vEXR@sj6E4P~@Z>HXx@B
zWs@)xdp!xQKqx|(ehrIG`z=D(;~d5{+&%wScR_aXE<WN0^S<A{)GCD!t!?md`RRMG
zrgYrycfZ=*f7B<Q_6RX1rFMYOj}?tdlOk9_2clgthGEFYS=G}WGlFY53l34d2prP?
z;^_L-$Cus@vayL5Lcb9Z{Cm-6-Ns*;&;O-eN65O^{x$sX|9>ggQHCdnWdNlhx)=rV
z5a#Y!$6d7AZq$kV7kkMbSO9&vb`@K9J5%H?2b<Dn8ux!jpRG>b>xUPi#p{_&TM@`)
z3Uq#Qe1?h$<LrxF3+jr1TM7OGMcrWOPZv&r@4fdoFed*Ir0KsNhTn)WQ_d(uTM@xw
z@ZR9ls_Xz3_Y1N6uNJDF$5fuBc0jLj_zmsL!6qCVAJl$~V~9#c6dxmKU_^~Ia7PI_
zFd+%wtiXJIIozptosw?g=r{$-?UOtH21YX6L5-5h*VKx)^TjA)E~@tgo9=ke-tm%#
zK3=wj-o+Nvyrs4aW%AU``&gz_uO@+cXk_b=oE_*_PzMbp$@x*gwyK{Xrq8#>+f~5O
zu_MD}-Qa*L5q8wF=g{t(xgb6`h|`+bV-B;smIa(3<XHsjKAjS_K3unU9)rc4h#E=g
zLkUSPxnOXD^F0bdSNOnGNC^tkD+Wb7xwiirjb~<rD`G!+YnC4mK!hrw-#s9FUGYCo
zuu6SCrRR<<L+6Rr%Wzl+bI%>cCgxw(s!ya-Qpn=3LT2gwNVbmX;0pDBkHHK59xD89
zR>(h#k5$hxKa*5g;?+#N2S9T%M{FpG^rD#G(P0KlYbv|7qK*r&yLv(RJo8W{`30&5
zvuNM>D&sAGT=wU8Cf{ruF5x7zIBYVH&o8ldUGtkm1xNhmlRNzP=C%sqVPl!1FHXLp
zbBtw_A{Ia!Kc<z8_gTU<xCL0@e*o3b(v9nIVY91<qzm-deY1RfG{}Po2!=Yofi7a*
z56bEH#WRFh#E$K_f@{mOEKN3${^f@y8P`>{q2PAM$@vu2V4~fu&pMuLFH!ph+x#7-
zWLM`@6ztiZc}Hws{&0d6rnb_Q7B`~ZBwT+PlQ}U-p~ITG)C3`av=<<MlwYptz5qG1
z(y{0%m(H_FgX__*(fj7{0exyen$f%K0PTD@CzZMjdcuL*Qpu#L+PE$yY*zD3*aWu^
z^YWjyhhmLYZbOqMc)Se&*cbnfY0_^kp~q70L#kOeUL8_z6gSV2b9Gx^>EU<n2mSHK
zIOTK|UT{w>i}2hCSmyfcfpzK-_-iX7DmqLK>^l8flxgSo>|qmj;PZPN)Mzk#$BgMG
zA<WOO)N|71&Wm+0#XH10rE|X_`R-{)q!nJ_T}M&mD}qg|<Fba5YH&hx-z)~^{aj(~
zDU9TDcO5r$(*J6MrKVX%Wk}zce52KikxJO=CWOg>2e5yQ|K}m6B6l62kfIDmu?#w-
z<%dMNwzv3Kd@*nM<TGiJLwYg7x@~rdt+cCN(p>Y&9PvCoXWKl-NoCEbkrJ#b>kaJF
z-j3hdu6TkCl+i$%zm4_mQ?t^Vm*qQW6!z6bQtL1QX;z_ZpG_GzJ=keAm`PHKHCt9j
zSu7G?W4IEy<(dT({8R!~rGBZEQU85+VbAAj>puOBtwfVHUG3#BJ2A-aX|2Be+(F(;
z(lrvkhWTsG7*<ExglNP_i^VESa!ChUpeQyOInrzq=#633gw}c9W5teml`T(!g9ux>
zD~vT5+9H=FNeJ)jzA(BPz1<~t?j4L$PL5+p`nm~F<Pfu~*}bNji%pYFfSFNh0tJ=@
zT~d<1DWP>HgZ-EU<6M?BA>Da0oeD50{bkEvw+A6(V+u1CW$IvRM+i}pHm+wdB2w;a
zpRlzVr|O=MjqIW^G2b00zX~EtE{nx{54153pfNMy3&vi9(nAc155$q3{XKe8SChW4
z-Zrki6_5wLsR*HEn#(#s@V0bowKTRf>4@81`@G2(f%|-KV$wQ?Wr#t$HYjU!(ITmt
z!?tSXhSAhyNpn(xjynET`tmfZzRo|qEH8&&b*;|ZKIZziKYUFxQ*InxJoq}pp+PsR
zRGIg%l3;{I*;T!~vNCzo%Q6^~=MH+Iww;n?doSb(ieJ%7?J?z?Rc^Q;QT9D`+tzbi
zxWsPxAg{ZydMG~Knh8yPjOoB2M;db#rZIirv5;ip|JAy_rhCv^Tr_?nV(s-e(`t9w
zdZkQNu5B!Tl|fZGi5ksb5^sP^&H>Gt$961BRe1NIz;8ohKC<18=wh_;n_XQmE|Nr?
zoHe9+S+1hDCW;RA)^ig_{hTf=(B7k}to<>oa%8#U?%^~$mWV2xVlQ9Kj)5VdPg<FK
zh}q_M_2#YC>la}N>R}-tiH+~ssYvq6&6~qK{=WInfok@4;YVz`{0r#q13P-63i`L4
z@O*>jpIOD1|7?)su;gNrwodan>2+)Vp&IZ8E%HY0jf_>r%R5dSlUzZ<JyGo^0%qzN
z94hDFX<YlZIEhc9`LF&CZWr4os@6l|T!BHi@A3I~jpag)g4!&?M>VX4;ysX;pL*<a
z`*DrMg|`ZE9<QD<S=w?<ZYC99?m5WeHgJt~3*YLlKmLG=lZ$`B_4RVEk>ea2`EkQq
zcvb-@sNCqx|NP&ga&`)*_*NIL1@@YdXTgs=kKMJi85?}KmE3?=4B_FL#j&q!>ERF9
zUAf(7Aw|E+ddsn{9<7qKf{RKtG!f3+rwOO*VcAg=n>_tn|5Vr86Aga5iZhA7mUprF
z{D7^+Qw@{lggwe_{f}!R3VPvmgmm|@7`-@nA-ps~FXegBo<zNr$t99Mb_`rqCeHQV
zC8@OcOit82sXE(!#E@&6BP!F$HRD20dQ;e>-dT~h*d0=X3zzj*)U1)ILpRAKygzRy
zJVq1Cmmx{SSR;FiGMp)fStWnE``*<Vu(f>rw*X((1>oKgfCve&KgdakB5>G$jWLv_
zHiofpWd@Y@GD6{SrjP3l*@)6+SB&-nD}xdt<Bp<3Oo6V4>e^>{E4uAFMH2J&Pm@YQ
zak}BHj~6GF4p3*fy`qlG9zwr364>^9FU9%&;Nxy5k)^ah9ls*m^L#5_g(5j-Z55X@
zYDa!`celG%Kb5H?8Xs7zA|HKzx$0f^zJ76Qm<@Z<Z%*ujA&GcdQ=9X*g!XC_%SAY=
z@>JeCQgvd7>RwfcKU_nohVZs+E_<FZd-lv{5UAV}PQw;w*Zkpwj2}gN#I&2R*dFmD
zV_82W#|fUwZIv<9Wes-K7;0_#(tVS0lzpeF;~|%y$~$-0hXx1)w#MnjT{$h1L1>lu
zLmQsz!5yi|@^@_)MIlOFx7`v6BxTu_gcS_L$LPUU2Oi`hMY}mIr6T>UjHj6<LRW7C
z-548-NUCjFG!S4E?-}i|o3FeZ4>ujDa;m0%89t~U6vmJ$GK_`9F_^pAw|Xk)r<&rO
zgt8qf%W+S_wDl4<WPrC3)m|h+qhip0S2m=Wf~M)WNDN21)#)S>;m`=b9;W<Qt|RCW
zCE6dB#CFl(u?v<R=g4DelUSZ-V!hFrzT=-1F)`jPhecxZUK4L(1H-5FJXb{d&)*no
z`w6q6@*91g<~L3!#u^Rhg;sv)zUaAvtXg`HY!62oUl7U2#_FXE1hg;c`x55r8Iofd
z#OuQDk8{1Aq|_!I&`w~bO7F+2GzRj^SJkExdTTl<eOadi!N=wb>e`I1PJYBic0M#O
z&|Ao?i<Y$zYP(tR19!HG=<ZU?$~dJ_YVi-67t=Nqq9e@OZiWdg8w1_TM~_JR0z<U(
z2=qGFMC^Ki<QP;-R(s795Yv9NWLJ)BjZOT{QP}8vp_pa3XH@&;q;}?;o`^u{Y~B(l
zy#<!HfqeIC9*TmQr_JkOVli8-)>6Qd=#9HZ|N5Ph;GIYR#XHf0bBLtB-g&XOUL$qI
zTQ|&#s3Hg#0|qHkc0KAAjLAX{S4MM)r!Mb&xoT2x<S*wY*`+rSZ`xjkbS0$%+0ju_
zY)#u2SUVT5huTs!We>g7x}_6Z0{^aKqxfYOl`oMTqgNfTcj5Ls*aSi1npUiR5~O+T
zMD9`bpaR(ufy0yl_!kDG#^ewF*b{;Ais@}k;rSuU;un!N+scJ@Z3q+RjCa0&mBFFg
zayS`h=+IX#zNi_OXp;Ju4VVu_zgO2x4H&6RNN@GF`e!jZ2~uO2pb?C5-*Lnsl4EoX
zTTY6<N?)M?KV*mbF`-NkSf5!tK!0!p@lGSic7LsgT=y`<0y@DcD7H(ko@8`sWB3t*
z!TfBxyjm=+H<_=hD=x2&Hy1pl-Y+KJJd#QK5(w-akb~3s7HC@vT;5E>8*iqyQ(Cgz
zzv>M9aFkSEJLWvP6NTulN{fU)@35C;pCg=r=7D6lnVIK`d3B^-%E}z~(uQ5%u2ms)
zSE!X-Mv}W!$2G!(qI_Et32S5bZs;zgr@=3JaJzlI#`4G^U2LOYCWo5TpVIif=d^OP
z6Z>7`)opYx#8NaT(Iu<y3#FKV(`87guPKcS2_rAe|7<)KF|1(xkEVl;s{U)9G@9!H
z!MGz;fR|9H!c_x<YfndV6j4gXfkzDevDo3`iYatOWpw&>7tzl%4=ILMX{wF=*p%xz
z3L!9j2%oWSLhHB1v&JkLr8%B-W1ydk4gC-}+)x6PSG->bze0nh{b1dv-g15)inD(`
zY}jF{B_AD`4B1Q;9L4>91Y6F^D~H_bP87kf)VD4wK<kzDhV@}^gMW{fi@}2U3!@-*
zRfVMhO4>d44Zo!`fj&AD*FfQCr?4@Ug>9cuEssWTOBUZQN;+AWp7_b#gSl@o`o|*n
zMAA#`4@+{U^@q`QeS4!LE+i|aHkymLrxwP7zuqW~HEfX>r9d{6(~9I6+ZjUx_Cpw1
zraleRmevtMaYy=UUG`euXw1je*pM{VVgOQ=;eeyPq*$Y%{*RP-<XL?v&>@_KEw&7C
zuJn@UcAKC*+DE=me@?_}OD2meW?$o#Nc?o$W3!!Fg<e*!Al20tsq;@-3Xd}bTFN^N
zG}Zpl$eAK=Jh=t+mwOTK8U<FKNc^jB|0Iq~FWOjV=_hd)&S3s<fb@o%Qv6sgkFs!i
zY&i^zL@rT>tTlIB(xf4C+W;~>;ge{|hCIWf7v{B&WCgvc&v_vHd8P9CM)>c0EE3py
zw#l$n15EcL5@SF~FXGG~<G$4Y_jJ#hsM^x3p4>6=Q?pv`%WTu^5ZG?tbbCty#jKU*
z^!kWNbk?TZvkWn0uh(2$aUq{8t*PY6WxXGf;_WnhTh*eRyJ1LeDC}wlC!=&%=D7Qw
z?0<?myCT47y%azpq@B;V9*quOvdfx+0yAO0YquCWiyug$mR$1hBr&Eqzly7UD3=k`
z8Cm=c?~N(W6chyhC%yE#hMTi7r9XQ}zoXn4Z-p3;TpNHbBgdM@{ULuGZXx`{{WOn!
zN}{`(Uc8O{rS+s}Q!9^R0&d7kYd{0_%6C*C2Ca3Q`ON)75~~iR1$kzc-HzN8RMf!6
z1kJ(?K?Z%$`Ks%+(YKXh)VF&nM65?ed&}i->!#x=!pG@yo*KY2XFf1^aek`eU8TRn
zbiAA1A|oNgV0~6-dl?H1KNO@sy4y6W<jmTC<sYPJ4F3pRp$p^++2#lme_##!+9WP5
zY<R-_KAd$bOEWXOf88M)&d(3orBVcLpHb(ijDE>8VnIG@Dw&X)EkO4u)^ycLlmoSZ
zA0^0QsON(^Hq<-SylNEsc~jQ53Em0nsnKI(0kRVLlnL5edF7Q;L{9Q8PLjQsO`GHX
zg-h?N{=5qX{6mFvM$r=T9&0O-SKd}8*yn4XpTF7myxP8Bm=suJ4;XSfpd1T+XKlh(
z_I4`o4lr)Q@z~P8(#o@mpR~pV9>=o!sQ#qJF$)y;PY`1@d1^(x+9LhF9W%9ob(Hff
zGAjzv36bdT1X~p=l7&+5!vs|9T83ln9b;tk0AJ!I3Xfzd11BBmON<Q4>#8M6ly*aj
zmTw}zn1aA9-TZx#in2n&XwBAYzGU@RIIY&$9U%Q%b;xZ~KiCGz80iSVu{Pl-d%Jp5
z#t0xOG{m<J-d9aJ%7y?kA?JlULtB(g)s|&<*LF|YkWkHA7wTpv2G9qE2k%BO7X1gg
z%LzTsofU%mW!Gi2&vx}vWoN?r7mNbUPg`OqP5`OEz(7)QCM1i_4XN{rAHIo{?R3zs
z)^t7{2tp?%u(iA^yqub6J47iS4=`?4<^kZL<pjMrr!!||LlheA!D~Gztc;1LZBk#l
zCu@l}lTq9)-fNCEw7@;_j#lKUcXf!4sx1kM>DE1bNH!$*WO{WLZaZ?js99=K*~K^d
zA6#;AWe%@-jd*IGnULtdT3xPt>bDG>n(zM@h<70;nvkrkluP6$<O@;UQw&W%Cmkya
z4?dJ2A6~e_F)PyD{H?z4IBM)fVQ<E8TWXtcQ@90LW;9MLj<V9tK(?ER90cj9JY4Ui
z#HFznlBbo#2=<5L-6Tpet!m4d3ad4h7APF=Sk=h%a5a9*A@|d@E%JZ9Ec#!sr~c!E
z?TsF?Z<Klpw!1t7a@=zca|s6jr&$Pw$lMP^Cq=^$ePqE@k^P%%I17>gc9r^HEos|N
z)bU;2>*T7x#)Oj};IH7P@LJ?&_y>4-nbP5Wghm1K-K>pX7<%-1aTA*y`w)MCNF`4X
zCz2ES`-!bRwGZJf^s2PbTXy?O6xHmxRkL(zo$==Qn&64-HC_fsP4=>{!VvoWMlTZ=
z{I2=FncBNj(R5j6i>zU<>{hsPPuNafs`l%~qNZ@s8r12k%OS+$bvEy&>~kIriBcq*
z0zEEN4I-)(6(@$&+6xl44xJ+#1~X#@i6X%}75WcuuFsFB^3;aIT(7(BSyXD3q06$V
zNO;*?8t&1<3~Q;pYWZ={ZThaM&I(4*ry~44VK6D8ci*P|wjzXlv|E}FPVC0pW(n>R
z3Kqi`8rA)Nz)Cm(b>G?7+?W=6zp}(B!|%h}naW%GhgFc|K`!Lk`AGUV6T=$WOY?JA
z$sh2}h(NuTpt#CNAYabb>CzQuunjxkD=OvS6?70+rB~WynpE=UX2R|xR%9_3xp?Cs
zo|)MQdK0`e>X0rq(6doKQ(~01wcOw^!!74Se}b8)6K8=Qwa!6j$ym^bXxKc+m7tJ1
z?QBB3vTxtqlNR`9501S5!9mki3{#7tB6_~byE?wnG?SQLbJkfpilx&W-iS%T=BHzg
z%KzLtB!kyP0Cu(saVryT^*PmFDiF3Jx30d;H-j}zrY?7|BomT4YtELrsS&>AxiFvb
zma*rorFn@fq&so*)MiTDoK6|4Z`w^LBIdg%0Ml%ApmN!Qrm_o?IY=$Xn1zHjKJqEv
zvTt|D(+z8aIgB*}dV(Fxo}3#iAM}K(H&DP<z_nm3BN^_JovJVqMsKlWapFVvHd!Z5
zCU;&$fhOSvtzURwz!2>Z=eOo$s-gm1N9Ky~GQ6eVtgi{pP#Y*_oXK&Q7Rm@~@iBu7
z!&x}b$xh``$Ns%xv6)!xDo?Nw-$Do1`S#VHJd^F2Y2mJwR=@;B!VG6FU|`bCp~}re
ziu9$&+xlmx?O2{UjQ3&cAymY`EB=<Oxi5HDQTc~KSs#<)`rn+yo%%6TDR%uBr|fp2
zVlaYFDIA4B!fJ=>cO#rgcJsLhlT<QV^f0TrF>B`>;zJy-E}1jg+_-08Io<;<oN(SX
z)`JGqX5wfS#jCI8DQH1SH+^NlG?>z%l<UgPE@De3oI|{1hGHgJTN&td{80=Mt(jWT
zadnk%P?w)tE4aws)$x(*>gv-+`txy?meX&Yr+1c(A5~n7eEEP{-Cv?O43vMHW8Dqx
z8r?+~+UFe>fXn_?zM@x*-agYaGS`u9t;p6TRGe-j05@1Z=S*YAMeL~0mJ8LJ(qBN?
z+>WUEvDRzHDs8a^J?s3{(s6RM;-{q8NfP%!pPS_Zhd4ruWmL?{v12)#*tEb~4`EgZ
zV`qs8R%zv)*O$^-Y}*LO7&O9KFaAJm)23-r-*jKDi@R2772)1unzI#{C(R+-*--z+
zfW~A0ExG;7$4_(%7aygqknAE!4b(N6l4ZRXoy6!!=18Om`bA_-XfMC_%G>iIQRcoL
zzMZByD5YZ+jyi*zZqx6YXNdP6pV>%yd<cJ7Wb(q^kaO3hdu0p1l<VhNJ7{uN?q3Qx
zW3P#h5k>L4jYJl6U9O{F|CyjvglEn~sM{!|Px6tg<)>mw@jNs1h~mP7td}DE>_f5U
zrW<cCKG42(D4c^NK53&f?>Ra1sj-~hkR8`TJ@?++@TqKABpThiU==CKR3kTz%<(8p
z2nPx*2$CzZ1dU!<Yzf@&CfkKA`(#oW<lq+~M1FQ?9vAj<D`hL$EvH*ypsjglQxz2T
zD2HXxoHGdxYUk@!T{PSVQi$XC%E3^8PZ}TaPu}cO#eN}feG9(VK0ROVuE8_kNYC=;
z8xbE|rtTRmNVhoeY#YLeQ0{Y=?-FVmm7O_V_6KWxue^>5Xd@qMQ!EJ@I?v)f5lem6
zk+Gyf9>)_cT!`Mm6HO}&ehzKW(g(bVVsoIV&)%*HSl^5nd6#{~s$8~UI)7&#*m?BK
zkwP)LRi|kL);-P5p?x46c+cB`Yepa^^Ay8a#>ZN>?2`IaVomB-<`y|Ts)~ip$SioZ
zFKbBIf5)46YGAFN$+Ny_j&Kp_{>GiPXEd^gyjEQCVxXRG;mR~R$lI94J=AGWHVe@U
zX0a`>F?hdQotfYJRPn0sl?R);2#YPn9|f<!%^Ps;{>C+!S0qpErZsdL$wKoRlFwMT
zYW+^=yV&UZjD@cM=QnRYzS$u3$p15+>;e`S2UpQ?s!4DLbgY6nXK=RQ^tF5c2IGFX
A_W%F@

diff --git a/dev/pkgdown.yml b/dev/pkgdown.yml
index c8c8caf1..3c14d8d2 100644
--- a/dev/pkgdown.yml
+++ b/dev/pkgdown.yml
@@ -4,7 +4,7 @@ pkgdown_sha: ~
 articles:
   interval-stats: interval-stats.html
   valr: valr.html
-last_built: 2024-04-04T14:55Z
+last_built: 2024-04-04T17:08Z
 urls:
   reference: https://rnabioco.github.io/valr/reference
   article: https://rnabioco.github.io/valr/articles
diff --git a/dev/search.json b/dev/search.json
index 75ba8c61..d24c21a4 100644
--- a/dev/search.json
+++ b/dev/search.json
@@ -1 +1 @@
-[{"path":[]},{"path":"https://rnabioco.github.io/valr/dev/CODE_OF_CONDUCT.html","id":"our-pledge","dir":"","previous_headings":"","what":"Our Pledge","title":"Contributor Covenant Code of Conduct","text":"members, contributors, leaders pledge make participation community harassment-free experience everyone, regardless age, body size, visible invisible disability, ethnicity, sex characteristics, gender identity expression, level experience, education, socio-economic status, nationality, personal appearance, race, religion, sexual identity orientation. pledge act interact ways contribute open, welcoming, diverse, inclusive, healthy community.","code":""},{"path":"https://rnabioco.github.io/valr/dev/CODE_OF_CONDUCT.html","id":"our-standards","dir":"","previous_headings":"","what":"Our Standards","title":"Contributor Covenant Code of Conduct","text":"Examples behavior contributes positive environment community include: Demonstrating empathy kindness toward people respectful differing opinions, viewpoints, experiences Giving gracefully accepting constructive feedback Accepting responsibility apologizing affected mistakes, learning experience Focusing best just us individuals, overall community Examples unacceptable behavior include: use sexualized language imagery, sexual attention advances kind Trolling, insulting derogatory comments, personal political attacks Public private harassment Publishing others’ private information, physical email address, without explicit permission conduct reasonably considered inappropriate professional setting","code":""},{"path":"https://rnabioco.github.io/valr/dev/CODE_OF_CONDUCT.html","id":"enforcement-responsibilities","dir":"","previous_headings":"","what":"Enforcement Responsibilities","title":"Contributor Covenant Code of Conduct","text":"Community leaders responsible clarifying enforcing standards acceptable behavior take appropriate fair corrective action response behavior deem inappropriate, threatening, offensive, harmful. Community leaders right responsibility remove, edit, reject comments, commits, code, wiki edits, issues, contributions aligned Code Conduct, communicate reasons moderation decisions appropriate.","code":""},{"path":"https://rnabioco.github.io/valr/dev/CODE_OF_CONDUCT.html","id":"scope","dir":"","previous_headings":"","what":"Scope","title":"Contributor Covenant Code of Conduct","text":"Code Conduct applies within community spaces, also applies individual officially representing community public spaces. Examples representing community include using official e-mail address, posting via official social media account, acting appointed representative online offline event.","code":""},{"path":"https://rnabioco.github.io/valr/dev/CODE_OF_CONDUCT.html","id":"enforcement","dir":"","previous_headings":"","what":"Enforcement","title":"Contributor Covenant Code of Conduct","text":"Instances abusive, harassing, otherwise unacceptable behavior may reported community leaders responsible enforcement [INSERT CONTACT METHOD]. complaints reviewed investigated promptly fairly. community leaders obligated respect privacy security reporter incident.","code":""},{"path":"https://rnabioco.github.io/valr/dev/CODE_OF_CONDUCT.html","id":"enforcement-guidelines","dir":"","previous_headings":"","what":"Enforcement Guidelines","title":"Contributor Covenant Code of Conduct","text":"Community leaders follow Community Impact Guidelines determining consequences action deem violation Code Conduct:","code":""},{"path":"https://rnabioco.github.io/valr/dev/CODE_OF_CONDUCT.html","id":"id_1-correction","dir":"","previous_headings":"Enforcement Guidelines","what":"1. Correction","title":"Contributor Covenant Code of Conduct","text":"Community Impact: Use inappropriate language behavior deemed unprofessional unwelcome community. Consequence: private, written warning community leaders, providing clarity around nature violation explanation behavior inappropriate. public apology may requested.","code":""},{"path":"https://rnabioco.github.io/valr/dev/CODE_OF_CONDUCT.html","id":"id_2-warning","dir":"","previous_headings":"Enforcement Guidelines","what":"2. Warning","title":"Contributor Covenant Code of Conduct","text":"Community Impact: violation single incident series actions. Consequence: warning consequences continued behavior. interaction people involved, including unsolicited interaction enforcing Code Conduct, specified period time. includes avoiding interactions community spaces well external channels like social media. Violating terms may lead temporary permanent ban.","code":""},{"path":"https://rnabioco.github.io/valr/dev/CODE_OF_CONDUCT.html","id":"id_3-temporary-ban","dir":"","previous_headings":"Enforcement Guidelines","what":"3. Temporary Ban","title":"Contributor Covenant Code of Conduct","text":"Community Impact: serious violation community standards, including sustained inappropriate behavior. Consequence: temporary ban sort interaction public communication community specified period time. public private interaction people involved, including unsolicited interaction enforcing Code Conduct, allowed period. Violating terms may lead permanent ban.","code":""},{"path":"https://rnabioco.github.io/valr/dev/CODE_OF_CONDUCT.html","id":"id_4-permanent-ban","dir":"","previous_headings":"Enforcement Guidelines","what":"4. Permanent Ban","title":"Contributor Covenant Code of Conduct","text":"Community Impact: Demonstrating pattern violation community standards, including sustained inappropriate behavior, harassment individual, aggression toward disparagement classes individuals. Consequence: permanent ban sort public interaction within community.","code":""},{"path":"https://rnabioco.github.io/valr/dev/CODE_OF_CONDUCT.html","id":"attribution","dir":"","previous_headings":"","what":"Attribution","title":"Contributor Covenant Code of Conduct","text":"Code Conduct adapted Contributor Covenant, version 2.0, available https://www.contributor-covenant.org/version/2/0/ code_of_conduct.html. Community Impact Guidelines inspired Mozilla’s code conduct enforcement ladder. answers common questions code conduct, see FAQ https://www.contributor-covenant.org/faq. Translations available https:// www.contributor-covenant.org/translations.","code":""},{"path":"https://rnabioco.github.io/valr/dev/CONTRIBUTING.html","id":null,"dir":"","previous_headings":"","what":"Contributing to valr","title":"Contributing to valr","text":"outlines propose change valr. detailed info contributing , tidyverse packages, please see development contributing guide.","code":""},{"path":"https://rnabioco.github.io/valr/dev/CONTRIBUTING.html","id":"fixing-typos","dir":"","previous_headings":"","what":"Fixing typos","title":"Contributing to valr","text":"can fix typos, spelling mistakes, grammatical errors documentation directly using GitHub web interface, long changes made source file. generally means ’ll need edit roxygen2 comments .R, .Rd file. can find .R file generates .Rd reading comment first line.","code":""},{"path":"https://rnabioco.github.io/valr/dev/CONTRIBUTING.html","id":"bigger-changes","dir":"","previous_headings":"","what":"Bigger changes","title":"Contributing to valr","text":"want make bigger change, ’s good idea first file issue make sure someone team agrees ’s needed. ’ve found bug, please file issue illustrates bug minimal reprex (also help write unit test, needed).","code":""},{"path":"https://rnabioco.github.io/valr/dev/CONTRIBUTING.html","id":"pull-request-process","dir":"","previous_headings":"Bigger changes","what":"Pull request process","title":"Contributing to valr","text":"Fork package clone onto computer. haven’t done , recommend using usethis::create_from_github(\"rnabioco/valr\", fork = TRUE). Install development dependences devtools::install_dev_deps(), make sure package passes R CMD check running devtools::check(). R CMD check doesn’t pass cleanly, ’s good idea ask help continuing. Create Git branch pull request (PR). recommend using usethis::pr_init(\"brief-description--change\"). Make changes, commit git, create PR running usethis::pr_push(), following prompts browser. title PR briefly describe change. body PR contain Fixes #issue-number. user-facing changes, add bullet top NEWS.md (.e. just first header). Follow style described https://style.tidyverse.org/news.html.","code":""},{"path":"https://rnabioco.github.io/valr/dev/CONTRIBUTING.html","id":"code-style","dir":"","previous_headings":"Bigger changes","what":"Code style","title":"Contributing to valr","text":"New code follow tidyverse style guide. can use styler package apply styles, please don’t restyle code nothing PR. use roxygen2, Markdown syntax, documentation. use testthat unit tests. Contributions test cases included easier accept.","code":""},{"path":"https://rnabioco.github.io/valr/dev/CONTRIBUTING.html","id":"code-of-conduct","dir":"","previous_headings":"","what":"Code of Conduct","title":"Contributing to valr","text":"Please note valr project released Contributor Code Conduct. contributing project agree abide terms.","code":""},{"path":"https://rnabioco.github.io/valr/dev/LICENSE.html","id":null,"dir":"","previous_headings":"","what":"MIT License","title":"MIT License","text":"Copyright (c) 2016-2018 Jay R Hesselberth Kent Riemondy Permission hereby granted, free charge, person obtaining copy software associated documentation files (“Software”), deal Software without restriction, including without limitation rights use, copy, modify, merge, publish, distribute, sublicense, /sell copies Software, permit persons Software furnished , subject following conditions: copyright notice permission notice shall included copies substantial portions Software. SOFTWARE PROVIDED “”, WITHOUT WARRANTY KIND, EXPRESS IMPLIED, INCLUDING LIMITED WARRANTIES MERCHANTABILITY, FITNESS PARTICULAR PURPOSE NONINFRINGEMENT. EVENT SHALL AUTHORS COPYRIGHT HOLDERS LIABLE CLAIM, DAMAGES LIABILITY, WHETHER ACTION CONTRACT, TORT OTHERWISE, ARISING , CONNECTION SOFTWARE USE DEALINGS SOFTWARE.","code":""},{"path":"https://rnabioco.github.io/valr/dev/articles/interval-stats.html","id":"overview","dir":"Articles","previous_headings":"","what":"Overview","title":"Interval statistics","text":"valr includes several functions exploring statistical relationships sets intervals. Calculate significance overlaps sets intervals bed_fisher() bed_projection(). Quantify relative absolute distances sets intervals bed_reldist() bed_absdist(). Quantify extent overlap sets intervals bed_jaccard(). vignette explore relationship transcription start sites repetitive elements human genome.","code":"library(valr) library(dplyr) library(ggplot2) library(cowplot) library(tidyr)  # load repeats and genes. Data in the valr package is restricted to chr22; the entire # files can be downloaded from UCSC. rpts <- read_bed(valr_example(\"hg19.rmsk.chr22.bed.gz\")) genes <- read_bed12(valr_example(\"hg19.refGene.chr22.bed.gz\"))  # load chrom sizes genome <- read_genome(valr_example(\"hg19.chrom.sizes.gz\"))  # create 1 bp intervals representing transcription start sites tss <- create_tss(genes)  tss #> # A tibble: 1,267 × 6 #>    chrom    start      end name         score strand #>    <chr>    <dbl>    <dbl> <chr>        <chr> <chr>  #>  1 chr22 16193008 16193009 NR_122113    0     -      #>  2 chr22 16157078 16157079 NR_133911    0     +      #>  3 chr22 16162065 16162066 NR_073459    0     +      #>  4 chr22 16162065 16162066 NR_073460    0     +      #>  5 chr22 16231288 16231289 NR_132385    0     -      #>  6 chr22 16287936 16287937 NM_001136213 0     -      #>  7 chr22 16274608 16274609 NR_046571    0     +      #>  8 chr22 16449803 16449804 NM_001005239 0     -      #>  9 chr22 17073699 17073700 NM_014406    0     -      #> 10 chr22 17082800 17082801 NR_001591    0     +      #> # ℹ 1,257 more rows"},{"path":"https://rnabioco.github.io/valr/dev/articles/interval-stats.html","id":"distance-metrics","dir":"Articles","previous_headings":"","what":"Distance metrics","title":"Interval statistics","text":"First define function takes x y intervals computes distance statistics (using bed_reldist() bed_absdist()) specified groups. value statistic assigned .value column. use distance_stats() function apply bed_absdist() function group data. done set shuffled group data. bed_shuffle() used shuffle coordinates repeats within chromosome (.e., coordinates change, chromosome stays .) Now can bind observed shuffled data together, tidying put data format appropriate statistical test. involves: unnest()ing data frames creating groups repeat (name), stat (reldist absdist) type (obs shf) adding unique surrogate row numbers group using tidyr::pivot_wider() create two new obs shuf columns removing rows NA values. Now data formatted, can use non-parametric ks.test() determine whether significant differences observed shuffled data group. broom::tidy() used reformat results test tibble, results test pivoted type column test type. Histgrams different stats help visualize distribution p.values.  can also assess false discovery rates (q.values) using p.adjust(). Finally can visualize results using stat_ecdf().","code":"distance_stats <- function(x, y, genome, group_var, type = NA) {   group_by(x, !!rlang::sym(group_var)) |>     do(       reldist = bed_reldist(., y, detail = TRUE) |>         select(.value = .reldist),       absdist = bed_absdist(., y, genome) |>         select(.value = .absdist)     ) |>     tidyr::pivot_longer(       cols = -name,       names_to = \"stat\",       values_to = \"value\"     ) |>     mutate(type = type) } obs_stats <- distance_stats(rpts, tss, genome, \"name\", \"obs\") obs_stats #> # A tibble: 2,106 × 4 #>    name       stat    value             type  #>    <chr>      <chr>   <list>            <chr> #>  1 (A)n       reldist <tibble [27 × 1]> obs   #>  2 (A)n       absdist <tibble [28 × 1]> obs   #>  3 (AAAAACA)n reldist <tibble [1 × 1]>  obs   #>  4 (AAAAACA)n absdist <tibble [1 × 1]>  obs   #>  5 (AAAAC)n   reldist <tibble [6 × 1]>  obs   #>  6 (AAAAC)n   absdist <tibble [7 × 1]>  obs   #>  7 (AAAAG)n   reldist <tibble [2 × 1]>  obs   #>  8 (AAAAG)n   absdist <tibble [2 × 1]>  obs   #>  9 (AAAAT)n   reldist <tibble [3 × 1]>  obs   #> 10 (AAAAT)n   absdist <tibble [4 × 1]>  obs   #> # ℹ 2,096 more rows shfs <- bed_shuffle(rpts, genome, within = TRUE) shf_stats <- distance_stats(shfs, tss, genome, \"name\", \"shuf\") res <- bind_rows(obs_stats, shf_stats) |>   tidyr::unnest(value) |>   group_by(name, stat, type) |>   mutate(.id = row_number()) |>   tidyr::pivot_wider(     names_from = \"type\",     values_from = \".value\"   ) |>   na.omit()  res #> # A tibble: 16,894 × 5 #> # Groups:   name, stat [1,916] #>    name  stat      .id   obs  shuf #>    <chr> <chr>   <int> <dbl> <dbl> #>  1 (A)n  reldist     1 0.363 0.141 #>  2 (A)n  reldist     2 0.429 0.483 #>  3 (A)n  reldist     3 0.246 0.416 #>  4 (A)n  reldist     4 0.478 0.475 #>  5 (A)n  reldist     5 0.260 0.290 #>  6 (A)n  reldist     6 0.286 0.186 #>  7 (A)n  reldist     7 0.498 0.214 #>  8 (A)n  reldist     8 0.237 0.245 #>  9 (A)n  reldist     9 0.314 0.483 #> 10 (A)n  reldist    10 0.149 0.410 #> # ℹ 16,884 more rows library(broom)  pvals <- res |>   do(     twosided = tidy(ks.test(.$obs, .$shuf)),     less = tidy(ks.test(.$obs, .$shuf, alternative = \"less\")),     greater = tidy(ks.test(.$obs, .$shuf, alternative = \"greater\"))   ) |>   tidyr::pivot_longer(cols = -c(name, stat), names_to = \"alt\", values_to = \"type\") |>   unnest(type) |>   select(name:p.value) |>   arrange(p.value) ggplot(pvals, aes(p.value)) +   geom_histogram(binwidth = 0.05) +   facet_grid(stat ~ alt) +   theme_cowplot() pvals <-   group_by(pvals, stat, alt) |>   mutate(q.value = p.adjust(p.value)) |>   ungroup() |>   arrange(q.value) res_gather <- tidyr::pivot_longer(res,   cols = -c(name, stat, .id),   names_to = \"type\",   values_to = \"value\" )  signif <- head(pvals, 5)  res_signif <-   signif |>   left_join(res_gather, by = c(\"name\", \"stat\")) #> Warning in left_join(signif, res_gather, by = c(\"name\", \"stat\")): Detected an unexpected many-to-many relationship between `x` and `y`. #> ℹ Row 1 of `x` matches multiple rows in `y`. #> ℹ Row 29251 of `y` matches multiple rows in `x`. #> ℹ If a many-to-many relationship is expected, set `relationship = #>   \"many-to-many\"` to silence this warning.  ggplot(res_signif, aes(x = value, color = type)) +   stat_ecdf() +   facet_grid(stat ~ name) +   theme_cowplot() +   scale_x_log10() +   scale_color_brewer(palette = \"Set1\")"},{"path":"https://rnabioco.github.io/valr/dev/articles/interval-stats.html","id":"projection-test","dir":"Articles","previous_headings":"","what":"Projection test","title":"Interval statistics","text":"bed_projection() statistical approach assess relationship two intervals based binomial distribution. , examine distribution repetitive elements within promoters coding non-coding genes. First ’ll extract 5 kb regions upstream transcription start sites represent promoter regions coding non-coding genes. Next ’ll apply bed_projection() test repeat class coding non-coding regions. projection test two-tailed statistical test. significant p-value indicates either enrichment depletion query intervals compared reference interval sets. value lower_tail = TRUE column indicates query intervals depleted, whereas lower_tail = FALSE indicates query intervals enriched.","code":"# create intervals 5kb upstream of tss representing promoters promoters <-   bed_flank(genes, genome, left = 5000, strand = TRUE) |>   mutate(name = ifelse(grepl(\"NR_\", name), \"non-coding\", \"coding\")) |>   select(chrom:strand)  # select coding and non-coding promoters promoters_coding <- filter(promoters, name == \"coding\") promoters_ncoding <- filter(promoters, name == \"non-coding\")  promoters_coding #> # A tibble: 973 × 6 #>    chrom    start      end name   score strand #>    <chr>    <int>    <int> <chr>  <chr> <chr>  #>  1 chr22 16287937 16292937 coding 0     -      #>  2 chr22 16449804 16454804 coding 0     -      #>  3 chr22 17073700 17078700 coding 0     -      #>  4 chr22 17302589 17307589 coding 0     -      #>  5 chr22 17302589 17307589 coding 0     -      #>  6 chr22 17489112 17494112 coding 0     -      #>  7 chr22 17560848 17565848 coding 0     +      #>  8 chr22 17560848 17565848 coding 0     +      #>  9 chr22 17602213 17607213 coding 0     -      #> 10 chr22 17602257 17607257 coding 0     -      #> # ℹ 963 more rows  promoters_ncoding #> # A tibble: 294 × 6 #>    chrom    start      end name       score strand #>    <chr>    <int>    <int> <chr>      <chr> <chr>  #>  1 chr22 16152078 16157078 non-coding 0     +      #>  2 chr22 16157065 16162065 non-coding 0     +      #>  3 chr22 16157065 16162065 non-coding 0     +      #>  4 chr22 16193009 16198009 non-coding 0     -      #>  5 chr22 16231289 16236289 non-coding 0     -      #>  6 chr22 16269608 16274608 non-coding 0     +      #>  7 chr22 17077800 17082800 non-coding 0     +      #>  8 chr22 17156430 17161430 non-coding 0     -      #>  9 chr22 17229328 17234328 non-coding 0     -      #> 10 chr22 17303363 17308363 non-coding 0     +      #> # ℹ 284 more rows # function to apply bed_projection to groups projection_stats <- function(x, y, genome, group_var, type = NA) {   group_by(x, !!rlang::sym(group_var)) |>     do(       n_repeats = nrow(.),       projection = bed_projection(., y, genome)     ) |>     mutate(type = type) }  pvals_coding <- projection_stats(rpts, promoters_coding, genome, \"name\", \"coding\") pvals_ncoding <- projection_stats(rpts, promoters_ncoding, genome, \"name\", \"non_coding\")  pvals <-   bind_rows(pvals_ncoding, pvals_coding) |>   ungroup() |>   tidyr::unnest(cols = c(n_repeats, projection)) |>   select(-chrom)  # filter for repeat classes with at least 10 intervals pvals <- filter(   pvals,   n_repeats > 10,   obs_exp_ratio != 0 )  # adjust pvalues pvals <- mutate(pvals, q.value = p.adjust(p.value))  pvals #> # A tibble: 179 × 7 #>    name   n_repeats p.value obs_exp_ratio lower_tail type       q.value #>    <chr>      <int>   <dbl>         <dbl> <chr>      <chr>        <dbl> #>  1 (A)n          28 0.00353         4.72  FALSE      non_coding   0.558 #>  2 (AT)n         48 0.298           0.917 FALSE      non_coding   1     #>  3 (CA)n         31 0.156           1.42  FALSE      non_coding   1     #>  4 (GT)n         42 0.247           1.05  FALSE      non_coding   1     #>  5 (T)n          61 0.405           0.721 FALSE      non_coding   1     #>  6 (TG)n         40 0.0622          2.20  FALSE      non_coding   1     #>  7 A-rich        54 0.348           0.815 FALSE      non_coding   1     #>  8 Alu           15 0.0446          2.93  FALSE      non_coding   1     #>  9 AluJb        271 0.0225          1.79  FALSE      non_coding   1     #> 10 AluJo        208 0.0216          1.90  FALSE      non_coding   1     #> # ℹ 169 more rows library(DT)  # find and show top 5 most significant repeats signif_tests <-   pvals |>   arrange(q.value) |>   group_by(type) |>   top_n(-5, q.value) |>   arrange(type)  DT::datatable(signif_tests)"},{"path":"https://rnabioco.github.io/valr/dev/articles/valr.html","id":"familiar-tools-natively-in-r","dir":"Articles","previous_headings":"","what":"Familiar tools, natively in R","title":"valr overview","text":"functions valr similar names BEDtools counterparts, familiar users coming BEDtools suite. Similar pybedtools, valr terse syntax:","code":"library(valr) library(dplyr)  snps <- read_bed(valr_example(\"hg19.snps147.chr22.bed.gz\")) genes <- read_bed(valr_example(\"genes.hg19.chr22.bed.gz\"))  # find snps in intergenic regions intergenic <- bed_subtract(snps, genes) # distance from intergenic snps to nearest gene nearby <- bed_closest(intergenic, genes)  nearby |>   select(starts_with(\"name\"), .overlap, .dist) |>   filter(abs(.dist) < 1000) #> # A tibble: 285 × 4 #>    name.x      name.y            .overlap .dist #>    <chr>       <chr>                <int> <int> #>  1 rs2261631   P704P                    0  -268 #>  2 rs570770556 POTEH                    0  -913 #>  3 rs538163832 POTEH                    0  -953 #>  4 rs9606135   TPTEP1                   0  -422 #>  5 rs11912392  ANKRD62P1-PARP4P3        0   105 #>  6 rs8136454   BC038197                 0   356 #>  7 rs5992556   XKR3                     0  -456 #>  8 rs114101676 GAB4                     0   474 #>  9 rs62236167  CECR7                    0   262 #> 10 rs5747023   CECR1                    0  -387 #> # ℹ 275 more rows"},{"path":"https://rnabioco.github.io/valr/dev/articles/valr.html","id":"input-data","dir":"Articles","previous_headings":"","what":"Input data","title":"valr overview","text":"valr assigns common column names facilitate comparisons tbls. tbls chrom, start, end columns, tbls multi-column formats additional pre-determined column names. See read_bed() documentation details. valr can also operate BED-like data.frames already constructed R, provided columns named chrom, start end present. New tbls can also constructed either tibbles base R data.frames.","code":"bed_file <- valr_example(\"3fields.bed.gz\") read_bed(bed_file) # accepts filepaths or URLs #> # A tibble: 10 × 3 #>    chrom  start    end #>    <chr>  <int>  <int> #>  1 chr1   11873  14409 #>  2 chr1   14361  19759 #>  3 chr1   14406  29370 #>  4 chr1   34610  36081 #>  5 chr1   69090  70008 #>  6 chr1  134772 140566 #>  7 chr1  321083 321115 #>  8 chr1  321145 321207 #>  9 chr1  322036 326938 #> 10 chr1  327545 328439 bed <- tribble(   ~chrom, ~start,  ~end,   \"chr1\", 1657492, 2657492,   \"chr2\", 2501324, 3094650 )  bed #> # A tibble: 2 × 3 #>   chrom   start     end #>   <chr>   <dbl>   <dbl> #> 1 chr1  1657492 2657492 #> 2 chr2  2501324 3094650"},{"path":"https://rnabioco.github.io/valr/dev/articles/valr.html","id":"interval-coordinates","dir":"Articles","previous_headings":"","what":"Interval coordinates","title":"valr overview","text":"valr adheres BED format specifies start position interval zero based end position one-based. first position chromosome 0. end position chromosome one position passed last base, included interval. example:","code":"# a chromosome 100 basepairs in length chrom <- tribble(   ~chrom, ~start, ~end,   \"chr1\", 0,      100 )  chrom #> # A tibble: 1 × 3 #>   chrom start   end #>   <chr> <dbl> <dbl> #> 1 chr1      0   100  # single base-pair intervals bases <- tribble(   ~chrom, ~start, ~end,   \"chr1\", 0,      1, # first base of chromosome   \"chr1\", 1,      2, # second base of chromosome   \"chr1\", 99,     100 # last base of chromosome )  bases #> # A tibble: 3 × 3 #>   chrom start   end #>   <chr> <dbl> <dbl> #> 1 chr1      0     1 #> 2 chr1      1     2 #> 3 chr1     99   100"},{"path":"https://rnabioco.github.io/valr/dev/articles/valr.html","id":"remote-databases","dir":"Articles","previous_headings":"","what":"Remote databases","title":"valr overview","text":"Remote databases can accessed db_ucsc() (access UCSC Browser) db_ensembl() (access Ensembl databases).","code":"# access the `refGene` tbl on the `hg38` assembly. if (require(RMariaDB)) {   ucsc <- db_ucsc(\"hg38\")   tbl(ucsc, \"refGene\") }"},{"path":"https://rnabioco.github.io/valr/dev/articles/valr.html","id":"visual-documentation","dir":"Articles","previous_headings":"","what":"Visual documentation","title":"valr overview","text":"bed_glyph() tool illustrates results operations valr, similar found BEDtools documentation. glyph shows result intersecting x y intervals bed_intersect():  glyph illustrates bed_merge():","code":"x <- tribble(   ~chrom, ~start, ~end,   \"chr1\", 25,     50,   \"chr1\", 100,    125 )  y <- tribble(   ~chrom, ~start, ~end,   \"chr1\", 30,     75 )  bed_glyph(bed_intersect(x, y)) x <- tribble(   ~chrom, ~start, ~end,   \"chr1\", 1, 50,   \"chr1\", 10, 75,   \"chr1\", 100, 120 )  bed_glyph(bed_merge(x))"},{"path":"https://rnabioco.github.io/valr/dev/articles/valr.html","id":"grouping-data","dir":"Articles","previous_headings":"","what":"Grouping data","title":"valr overview","text":"group_by function dplyr can used perform functions subsets single multiple data_frames. Functions valr leverage grouping enable variety comparisons. example, intervals can grouped strand perform comparisons among intervals strand. Comparisons intervals opposite strands done using flip_strands() function: single set (e.g. bed_merge()) multi set operations respect groupings input intervals.","code":"x <- tribble(   ~chrom, ~start, ~end, ~strand,   \"chr1\", 1,      100,  \"+\",   \"chr1\", 50,     150,  \"+\",   \"chr2\", 100,    200,  \"-\" )  y <- tribble(   ~chrom, ~start, ~end, ~strand,   \"chr1\", 50,     125,  \"+\",   \"chr1\", 50,     150,  \"-\",   \"chr2\", 50,     150,  \"+\" )  # intersect tbls by strand x <- group_by(x, strand) y <- group_by(y, strand)  bed_intersect(x, y) #> # A tibble: 2 × 8 #>   chrom start.x end.x strand.x start.y end.y strand.y .overlap #>   <chr>   <dbl> <dbl> <chr>      <dbl> <dbl> <chr>       <int> #> 1 chr1        1   100 +             50   125 +              50 #> 2 chr1       50   150 +             50   125 +              75 x <- group_by(x, strand)  y <- flip_strands(y) y <- group_by(y, strand)  bed_intersect(x, y) #> # A tibble: 3 × 8 #>   chrom start.x end.x strand.x start.y end.y strand.y .overlap #>   <chr>   <dbl> <dbl> <chr>      <dbl> <dbl> <chr>       <int> #> 1 chr1        1   100 +             50   150 +              50 #> 2 chr1       50   150 +             50   150 +             100 #> 3 chr2      100   200 -             50   150 -              50"},{"path":"https://rnabioco.github.io/valr/dev/articles/valr.html","id":"column-specification","dir":"Articles","previous_headings":"","what":"Column specification","title":"valr overview","text":"Columns BEDtools referred position: valr, columns referred name can used multiple name/value expressions summaries.","code":"# calculate the mean of column 6 for intervals in `b` that overlap with `a` bedtools map -a a.bed -b b.bed -c 6 -o mean # calculate the mean and variance for a `value` column bed_map(a, b, .mean = mean(value), .var = var(value))  # report concatenated and max values for merged intervals bed_merge(a, .concat = concat(value), .max = max(value))"},{"path":[]},{"path":"https://rnabioco.github.io/valr/dev/articles/valr.html","id":"meta-analysis","dir":"Articles","previous_headings":"Getting started","what":"Meta-analysis","title":"valr overview","text":"demonstration illustrates use valr tools perform “meta-analysis” signals relative genomic features. analyze distribution histone marks surrounding transcription start sites. First load libraries relevant data. generate 1 bp intervals represent transcription start sites (TSSs). focus + strand genes, - genes easily accommodated filtering using bed_makewindows() reversed window numbers. Now use .win_id group bed_map() calculate sum mapping y signals onto intervals x. data regrouped .win_id summary mean sd values calculated. Finally, summary statistics used construct plot illustrates histone density surrounding TSSs.","code":"# `valr_example()` identifies the path of example files bedfile <- valr_example(\"genes.hg19.chr22.bed.gz\") genomefile <- valr_example(\"hg19.chrom.sizes.gz\") bgfile <- valr_example(\"hela.h3k4.chip.bg.gz\")  genes <- read_bed(bedfile) genome <- read_genome(genomefile) y <- read_bedgraph(bgfile) # generate 1 bp TSS intervals, `+` strand only tss <- genes |>   filter(strand == \"+\") |>   mutate(end = start + 1)  # 1000 bp up and downstream region_size <- 1000 # 50 bp windows win_size <- 50  # add slop to the TSS, break into windows and add a group x <- tss |>   bed_slop(genome, both = region_size) |>   bed_makewindows(win_size)  x #> # A tibble: 13,530 × 7 #>    chrom    start      end name      score strand .win_id #>    <chr>    <int>    <int> <chr>     <chr> <chr>    <int> #>  1 chr22 16161065 16161115 LINC00516 3     +            1 #>  2 chr22 16161115 16161165 LINC00516 3     +            2 #>  3 chr22 16161165 16161215 LINC00516 3     +            3 #>  4 chr22 16161215 16161265 LINC00516 3     +            4 #>  5 chr22 16161265 16161315 LINC00516 3     +            5 #>  6 chr22 16161315 16161365 LINC00516 3     +            6 #>  7 chr22 16161365 16161415 LINC00516 3     +            7 #>  8 chr22 16161415 16161465 LINC00516 3     +            8 #>  9 chr22 16161465 16161515 LINC00516 3     +            9 #> 10 chr22 16161515 16161565 LINC00516 3     +           10 #> # ℹ 13,520 more rows # map signals to TSS regions and calculate summary statistics. res <- bed_map(x, y, win_sum = sum(value, na.rm = TRUE)) |>   group_by(.win_id) |>   summarize(     win_mean = mean(win_sum, na.rm = TRUE),     win_sd = sd(win_sum, na.rm = TRUE)   )  res #> # A tibble: 41 × 3 #>    .win_id win_mean win_sd #>      <int>    <dbl>  <dbl> #>  1       1     101.   85.8 #>  2       2     111.   81.1 #>  3       3     123.   99.1 #>  4       4     116.   96.3 #>  5       5     116.  102.  #>  6       6     125.   95.1 #>  7       7     123.   94.4 #>  8       8     128.   91.5 #>  9       9     130.   95.7 #> 10      10     130.   88.8 #> # ℹ 31 more rows x_labels <- seq(   -region_size,   region_size,   by = win_size * 5 )  x_breaks <- seq(1, 41, by = 5)  sd_limits <- aes(   ymax = win_mean + win_sd,   ymin = win_mean - win_sd )  ggplot(   res,   aes(     x = .win_id,     y = win_mean   ) ) +   geom_point() +   geom_pointrange(sd_limits) +   scale_x_continuous(     labels = x_labels,     breaks = x_breaks   ) +   labs(     x = \"Position (bp from TSS)\",     y = \"Signal\",     title = \"Human H3K4me3 signal near transcription start sites\"   ) +   theme_classic()"},{"path":"https://rnabioco.github.io/valr/dev/articles/valr.html","id":"related-work","dir":"Articles","previous_headings":"","what":"Related work","title":"valr overview","text":"Command-line tools BEDtools bedops. Python library pybedtools wraps BEDtools. R packages GenomicRanges, bedr, IRanges GenometriCorr provide similar capability different philosophy.","code":""},{"path":"https://rnabioco.github.io/valr/dev/authors.html","id":null,"dir":"","previous_headings":"","what":"Authors","title":"Authors and Citation","text":"Jay Hesselberth. Author. Kent Riemondy. Author, maintainer. . Funder, copyright holder.","code":""},{"path":"https://rnabioco.github.io/valr/dev/authors.html","id":"citation","dir":"","previous_headings":"","what":"Citation","title":"Authors and Citation","text":"Riemondy KA, Sheridan RM, Gillen , Yu Y, Bennett CG, Hesselberth JR (2017). “valr: Reproducible Genome Interval Arithmetic R.” F1000Research. doi:10.12688/f1000research.11997.1.","code":"@Article{,   title = {valr: Reproducible Genome Interval Arithmetic in R},   year = {2017},   author = {Kent A. Riemondy and Ryan M. Sheridan and Austin Gillen and Yinni Yu and Christopher G. Bennett and Jay R. Hesselberth},   journal = {F1000Research},   doi = {10.12688/f1000research.11997.1}, }"},{"path":"https://rnabioco.github.io/valr/dev/index.html","id":"valr-","dir":"","previous_headings":"","what":"Genome Interval Arithmetic","title":"Genome Interval Arithmetic","text":"valr provides tools read manipulate genome intervals signals, similar BEDtools suite.","code":""},{"path":"https://rnabioco.github.io/valr/dev/index.html","id":"installation","dir":"","previous_headings":"","what":"Installation","title":"Genome Interval Arithmetic","text":"latest stable version can installed CRAN: latest development version can installed github:","code":"install.packages('valr') # install.packages(\"devtools\") devtools::install_github('rnabioco/valr')"},{"path":"https://rnabioco.github.io/valr/dev/index.html","id":"valr-example","dir":"","previous_headings":"","what":"valr Example","title":"Genome Interval Arithmetic","text":"Functions valr similar names BEDtools counterparts, familiar users coming BEDtools suite. Unlike tools wrap BEDtools write temporary files disk, valr tools run natively memory. Similar pybedtools, valr terse syntax:","code":"library(valr) library(dplyr)  snps <- read_bed(valr_example(\"hg19.snps147.chr22.bed.gz\")) genes <- read_bed(valr_example(\"genes.hg19.chr22.bed.gz\"))  # find snps in intergenic regions intergenic <- bed_subtract(snps, genes) # find distance from intergenic snps to nearest gene nearby <- bed_closest(intergenic, genes)  nearby |>   select(starts_with(\"name\"), .overlap, .dist) |>   filter(abs(.dist) < 5000) #> # A tibble: 1,047 × 4 #>    name.x      name.y   .overlap .dist #>    <chr>       <chr>       <int> <int> #>  1 rs530458610 P704P           0  2579 #>  2 rs2261631   P704P           0  -268 #>  3 rs570770556 POTEH           0  -913 #>  4 rs538163832 POTEH           0  -953 #>  5 rs190224195 POTEH           0 -1399 #>  6 rs2379966   DQ571479        0  4750 #>  7 rs142687051 DQ571479        0  3558 #>  8 rs528403095 DQ571479        0  3309 #>  9 rs555126291 DQ571479        0  2745 #> 10 rs5747567   DQ571479        0 -1778 #> # ℹ 1,037 more rows"},{"path":"https://rnabioco.github.io/valr/dev/reference/bed12_to_exons.html","id":null,"dir":"Reference","previous_headings":"","what":"Convert BED12 to individual exons in BED6. — bed12_to_exons","title":"Convert BED12 to individual exons in BED6. — bed12_to_exons","text":"conversion BED6 format, score column contains exon number, respect strand (.e., first exon - strand genes larger start end coordinates).","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/bed12_to_exons.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Convert BED12 to individual exons in BED6. — bed12_to_exons","text":"","code":"bed12_to_exons(x)"},{"path":"https://rnabioco.github.io/valr/dev/reference/bed12_to_exons.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Convert BED12 to individual exons in BED6. — bed12_to_exons","text":"x ivl_df","code":""},{"path":[]},{"path":"https://rnabioco.github.io/valr/dev/reference/bed12_to_exons.html","id":"ref-examples","dir":"Reference","previous_headings":"","what":"Examples","title":"Convert BED12 to individual exons in BED6. — bed12_to_exons","text":"","code":"x <- read_bed12(valr_example(\"mm9.refGene.bed.gz\"))  bed12_to_exons(x) #> # A tibble: 1,683 × 6 #>    chrom   start     end name         score strand #>    <chr>   <int>   <int> <chr>        <int> <chr>  #>  1 chr1  3204562 3207049 NM_001011874     3 -      #>  2 chr1  3411782 3411982 NM_001011874     2 -      #>  3 chr1  3660632 3661579 NM_001011874     1 -      #>  4 chr1  4280926 4283093 NM_001195662     4 -      #>  5 chr1  4341990 4342162 NM_001195662     3 -      #>  6 chr1  4342282 4342918 NM_001195662     2 -      #>  7 chr1  4399250 4399322 NM_001195662     1 -      #>  8 chr1  4847774 4848057 NM_001159750     1 +      #>  9 chr1  4847774 4848057 NM_011541        1 +      #> 10 chr1  4848408 4848584 NM_001159751     1 +      #> # ℹ 1,673 more rows"},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_absdist.html","id":null,"dir":"Reference","previous_headings":"","what":"Compute absolute distances between intervals. — bed_absdist","title":"Compute absolute distances between intervals. — bed_absdist","text":"Computes absolute distance midpoint x interval midpoints closest y interval.","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_absdist.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Compute absolute distances between intervals. — bed_absdist","text":"","code":"bed_absdist(x, y, genome)"},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_absdist.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Compute absolute distances between intervals. — bed_absdist","text":"x ivl_df y ivl_df genome genome_df","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_absdist.html","id":"value","dir":"Reference","previous_headings":"","what":"Value","title":"Compute absolute distances between intervals. — bed_absdist","text":"ivl_df .absdist .absdist_scaled columns.","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_absdist.html","id":"details","dir":"Reference","previous_headings":"","what":"Details","title":"Compute absolute distances between intervals. — bed_absdist","text":"Absolute distances scaled inter-reference gap chromosome follows. Q query points R reference points chromosome, scale distance query point closest reference point inter-reference gap chromosome. x interval matching y chromosome, .absdist NA. $$d_i(x,y) = min_k(|q_i - r_k|)\\frac{R}{Length\\ \\ chromosome}$$ absolute scaled distances reported .absdist .absdist_scaled. Interval statistics can used combination dplyr::group_by() dplyr::() calculate statistics subsets data. See vignette('interval-stats') examples.","code":""},{"path":[]},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_absdist.html","id":"ref-examples","dir":"Reference","previous_headings":"","what":"Examples","title":"Compute absolute distances between intervals. — bed_absdist","text":"","code":"genome <- read_genome(valr_example(\"hg19.chrom.sizes.gz\"))  x <- bed_random(genome, seed = 1010486) y <- bed_random(genome, seed = 9203911)  bed_absdist(x, y, genome) #> # A tibble: 1,000,000 × 5 #>    chrom start   end .absdist .absdist_scaled #>    <chr> <int> <int>    <dbl>           <dbl> #>  1 chr1   5184  6184     1392           0.448 #>  2 chr1   7663  8663     1087           0.350 #>  3 chr1   9858 10858     1526           0.491 #>  4 chr1  13805 14805     2421           0.779 #>  5 chr1  14081 15081     2697           0.868 #>  6 chr1  16398 17398     1700           0.547 #>  7 chr1  17486 18486      612           0.197 #>  8 chr1  22063 23063      466           0.150 #>  9 chr1  22494 23494      897           0.289 #> 10 chr1  29351 30351     1143           0.368 #> # ℹ 999,990 more rows"},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_closest.html","id":null,"dir":"Reference","previous_headings":"","what":"Identify closest intervals. — bed_closest","title":"Identify closest intervals. — bed_closest","text":"Identify closest intervals.","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_closest.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Identify closest intervals. — bed_closest","text":"","code":"bed_closest(x, y, overlap = TRUE, suffix = c(\".x\", \".y\"))"},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_closest.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Identify closest intervals. — bed_closest","text":"x ivl_df y ivl_df overlap report overlapping intervals suffix colname suffixes output","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_closest.html","id":"value","dir":"Reference","previous_headings":"","what":"Value","title":"Identify closest intervals. — bed_closest","text":"ivl_df additional columns: .overlap amount overlap overlapping interval. Non-overlapping adjacent intervals overlap 0. .overlap included output overlap = FALSE. .dist distance closest interval. Negative distances denote upstream intervals. Book-ended intervals distance 1.","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_closest.html","id":"details","dir":"Reference","previous_headings":"","what":"Details","title":"Identify closest intervals. — bed_closest","text":"input tbls grouped chrom default, additional groups can added using dplyr::group_by(). example, grouping strand constrain analyses strand. compare opposing strands across two tbls, strands y tbl can first inverted using flip_strands().","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_closest.html","id":"note","dir":"Reference","previous_headings":"","what":"Note","title":"Identify closest intervals. — bed_closest","text":"interval x bed_closest() returns overlapping intervals y closest non-intersecting y interval. Setting overlap = FALSE report closest non-intersecting y intervals, ignoring overlapping y intervals.","code":""},{"path":[]},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_closest.html","id":"ref-examples","dir":"Reference","previous_headings":"","what":"Examples","title":"Identify closest intervals. — bed_closest","text":"","code":"x <- tibble::tribble(   ~chrom, ~start, ~end,   \"chr1\", 100,    125 )  y <- tibble::tribble(   ~chrom, ~start, ~end,   \"chr1\", 25,     50,   \"chr1\", 140,    175 )  bed_glyph(bed_closest(x, y))   x <- tibble::tribble(   ~chrom, ~start, ~end,   \"chr1\", 500,    600,   \"chr2\", 5000,   6000 )  y <- tibble::tribble(   ~chrom, ~start, ~end,   \"chr1\", 100,    200,   \"chr1\", 150,    200,   \"chr1\", 550,    580,   \"chr2\", 7000,   8500 )  bed_closest(x, y) #> # A tibble: 4 × 7 #>   chrom start.x end.x start.y end.y .overlap .dist #>   <chr>   <dbl> <dbl>   <dbl> <dbl>    <int> <int> #> 1 chr1      500   600     550   580       30     0 #> 2 chr1      500   600     100   200        0  -301 #> 3 chr1      500   600     150   200        0  -301 #> 4 chr2     5000  6000    7000  8500        0  1001  bed_closest(x, y, overlap = FALSE) #> # A tibble: 3 × 6 #>   chrom start.x end.x start.y end.y .dist #>   <chr>   <dbl> <dbl>   <dbl> <dbl> <int> #> 1 chr1      500   600     100   200  -301 #> 2 chr1      500   600     150   200  -301 #> 3 chr2     5000  6000    7000  8500  1001  # Report distance based on strand x <- tibble::tribble(   ~chrom, ~start, ~end, ~name, ~score, ~strand,   \"chr1\", 10, 20, \"a\", 1, \"-\" )  y <- tibble::tribble(   ~chrom, ~start, ~end, ~name, ~score, ~strand,   \"chr1\", 8, 9, \"b\", 1, \"+\",   \"chr1\", 21, 22, \"b\", 1, \"-\" )  res <- bed_closest(x, y)  # convert distance based on strand res$.dist_strand <- ifelse(res$strand.x == \"+\", res$.dist, -(res$.dist)) res #> # A tibble: 2 × 14 #>   chrom start.x end.x name.x score.x strand.x start.y end.y name.y score.y #>   <chr>   <dbl> <dbl> <chr>    <dbl> <chr>      <dbl> <dbl> <chr>    <dbl> #> 1 chr1       10    20 a            1 -             21    22 b            1 #> 2 chr1       10    20 a            1 -              8     9 b            1 #> # ℹ 4 more variables: strand.y <chr>, .overlap <int>, .dist <int>, #> #   .dist_strand <int>  # report absolute distances res$.abs_dist <- abs(res$.dist) res #> # A tibble: 2 × 15 #>   chrom start.x end.x name.x score.x strand.x start.y end.y name.y score.y #>   <chr>   <dbl> <dbl> <chr>    <dbl> <chr>      <dbl> <dbl> <chr>    <dbl> #> 1 chr1       10    20 a            1 -             21    22 b            1 #> 2 chr1       10    20 a            1 -              8     9 b            1 #> # ℹ 5 more variables: strand.y <chr>, .overlap <int>, .dist <int>, #> #   .dist_strand <int>, .abs_dist <int>"},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_cluster.html","id":null,"dir":"Reference","previous_headings":"","what":"Cluster neighboring intervals. — bed_cluster","title":"Cluster neighboring intervals. — bed_cluster","text":"output .id column can used downstream grouping operations. Default max_dist = 0 means overlapping book-ended intervals clustered.","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_cluster.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Cluster neighboring intervals. — bed_cluster","text":"","code":"bed_cluster(x, max_dist = 0)"},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_cluster.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Cluster neighboring intervals. — bed_cluster","text":"x ivl_df max_dist maximum distance clustered intervals.","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_cluster.html","id":"value","dir":"Reference","previous_headings":"","what":"Value","title":"Cluster neighboring intervals. — bed_cluster","text":"ivl_df .id column specifying sets clustered intervals.","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_cluster.html","id":"details","dir":"Reference","previous_headings":"","what":"Details","title":"Cluster neighboring intervals. — bed_cluster","text":"input tbls grouped chrom default, additional groups can added using dplyr::group_by(). example, grouping strand constrain analyses strand. compare opposing strands across two tbls, strands y tbl can first inverted using flip_strands().","code":""},{"path":[]},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_cluster.html","id":"ref-examples","dir":"Reference","previous_headings":"","what":"Examples","title":"Cluster neighboring intervals. — bed_cluster","text":"","code":"x <- tibble::tribble(   ~chrom, ~start, ~end,   \"chr1\", 100,    200,   \"chr1\", 180,    250,   \"chr1\", 250,    500,   \"chr1\", 501,    1000,   \"chr2\", 1,      100,   \"chr2\", 150,    200 )  bed_cluster(x) #> # A tibble: 6 × 4 #>   chrom start   end   .id #>   <chr> <dbl> <dbl> <int> #> 1 chr1    100   200     1 #> 2 chr1    180   250     1 #> 3 chr1    250   500     1 #> 4 chr1    501  1000     2 #> 5 chr2      1   100     3 #> 6 chr2    150   200     4  # glyph illustrating clustering of overlapping and book-ended intervals x <- tibble::tribble(   ~chrom, ~start, ~end,   \"chr1\", 1,      10,   \"chr1\", 5,      20,   \"chr1\", 30,     40,   \"chr1\", 40,     50,   \"chr1\", 80,     90 )  bed_glyph(bed_cluster(x), label = \".id\")"},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_complement.html","id":null,"dir":"Reference","previous_headings":"","what":"Identify intervals in a genome not covered by a query. — bed_complement","title":"Identify intervals in a genome not covered by a query. — bed_complement","text":"Identify intervals genome covered query.","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_complement.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Identify intervals in a genome not covered by a query. — bed_complement","text":"","code":"bed_complement(x, genome)"},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_complement.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Identify intervals in a genome not covered by a query. — bed_complement","text":"x ivl_df genome ivl_df","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_complement.html","id":"value","dir":"Reference","previous_headings":"","what":"Value","title":"Identify intervals in a genome not covered by a query. — bed_complement","text":"ivl_df","code":""},{"path":[]},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_complement.html","id":"ref-examples","dir":"Reference","previous_headings":"","what":"Examples","title":"Identify intervals in a genome not covered by a query. — bed_complement","text":"","code":"x <- tibble::tribble(   ~chrom, ~start, ~end,   \"chr1\", 0,      10,   \"chr1\", 75,     100 )  genome <- tibble::tribble(   ~chrom, ~size,   \"chr1\", 200 )  bed_glyph(bed_complement(x, genome))   genome <- tibble::tribble(   ~chrom,  ~size,   \"chr1\",  500,   \"chr2\",  600,   \"chr3\",  800 )  x <- tibble::tribble(   ~chrom, ~start, ~end,   \"chr1\", 100,    300,   \"chr1\", 200,    400,   \"chr2\", 0,      100,   \"chr2\", 200,    400,   \"chr3\", 500,    600 )  # intervals not covered by x bed_complement(x, genome) #> # A tibble: 6 × 3 #>   chrom start   end #>   <chr> <dbl> <dbl> #> 1 chr1      0   100 #> 2 chr1    400   500 #> 3 chr2    100   200 #> 4 chr2    400   600 #> 5 chr3      0   500 #> 6 chr3    600   800"},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_coverage.html","id":null,"dir":"Reference","previous_headings":"","what":"Compute coverage of intervals. — bed_coverage","title":"Compute coverage of intervals. — bed_coverage","text":"Compute coverage intervals.","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_coverage.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Compute coverage of intervals. — bed_coverage","text":"","code":"bed_coverage(x, y, ...)"},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_coverage.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Compute coverage of intervals. — bed_coverage","text":"x ivl_df y ivl_df ... extra arguments (used)","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_coverage.html","id":"value","dir":"Reference","previous_headings":"","what":"Value","title":"Compute coverage of intervals. — bed_coverage","text":"ivl_df following additional columns: .ints number x intersections .cov per-base coverage x intervals .len total length y intervals covered x intervals .frac .len scaled number y intervals","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_coverage.html","id":"details","dir":"Reference","previous_headings":"","what":"Details","title":"Compute coverage of intervals. — bed_coverage","text":"input tbls grouped chrom default, additional groups can added using dplyr::group_by(). example, grouping strand constrain analyses strand. compare opposing strands across two tbls, strands y tbl can first inverted using flip_strands().","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_coverage.html","id":"note","dir":"Reference","previous_headings":"","what":"Note","title":"Compute coverage of intervals. — bed_coverage","text":"Book-ended intervals included coverage calculations.","code":""},{"path":[]},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_coverage.html","id":"ref-examples","dir":"Reference","previous_headings":"","what":"Examples","title":"Compute coverage of intervals. — bed_coverage","text":"","code":"x <- tibble::tribble(   ~chrom, ~start, ~end, ~strand,   \"chr1\", 100,    500,  \"+\",   \"chr2\", 200,    400,  \"+\",   \"chr2\", 300,    500,  \"-\",   \"chr2\", 800,    900,  \"-\" )  y <- tibble::tribble(   ~chrom, ~start, ~end, ~value, ~strand,   \"chr1\", 150,    400,  100,    \"+\",   \"chr1\", 500,    550,  100,    \"+\",   \"chr2\", 230,    430,  200,    \"-\",   \"chr2\", 350,    430,  300,    \"-\" )  bed_coverage(x, y) #> # A tibble: 4 × 8 #>   chrom start   end strand .ints  .cov  .len .frac #>   <chr> <dbl> <dbl> <chr>  <int> <int> <dbl> <dbl> #> 1 chr1    100   500 +          2   250   400 0.625 #> 2 chr2    200   400 +          2   170   200 0.85  #> 3 chr2    300   500 -          2   130   200 0.65  #> 4 chr2    800   900 -          0     0   100 0"},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_fisher.html","id":null,"dir":"Reference","previous_headings":"","what":"Fisher's test to measure overlap between two sets of intervals. — bed_fisher","title":"Fisher's test to measure overlap between two sets of intervals. — bed_fisher","text":"Calculate Fisher's test number intervals shared unique two sets x y intervals.","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_fisher.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Fisher's test to measure overlap between two sets of intervals. — bed_fisher","text":"","code":"bed_fisher(x, y, genome)"},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_fisher.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Fisher's test to measure overlap between two sets of intervals. — bed_fisher","text":"x ivl_df y ivl_df genome genome_df","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_fisher.html","id":"value","dir":"Reference","previous_headings":"","what":"Value","title":"Fisher's test to measure overlap between two sets of intervals. — bed_fisher","text":"ivl_df","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_fisher.html","id":"details","dir":"Reference","previous_headings":"","what":"Details","title":"Fisher's test to measure overlap between two sets of intervals. — bed_fisher","text":"Interval statistics can used combination dplyr::group_by() dplyr::() calculate statistics subsets data. See vignette('interval-stats') examples.","code":""},{"path":[]},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_fisher.html","id":"ref-examples","dir":"Reference","previous_headings":"","what":"Examples","title":"Fisher's test to measure overlap between two sets of intervals. — bed_fisher","text":"","code":"genome <- read_genome(valr_example(\"hg19.chrom.sizes.gz\"))  x <- bed_random(genome, n = 1e4, seed = 1010486) y <- bed_random(genome, n = 1e4, seed = 9203911)  bed_fisher(x, y, genome) #> # A tibble: 1 × 6 #>   estimate p.value conf.low conf.high method                   alternative #>      <dbl>   <dbl>    <dbl>     <dbl> <chr>                    <chr>       #> 1    0.945   0.707    0.722      1.22 Fisher's Exact Test for… two.sided"},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_flank.html","id":null,"dir":"Reference","previous_headings":"","what":"Create flanking intervals from input intervals. — bed_flank","title":"Create flanking intervals from input intervals. — bed_flank","text":"Create flanking intervals input intervals.","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_flank.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Create flanking intervals from input intervals. — bed_flank","text":"","code":"bed_flank(   x,   genome,   both = 0,   left = 0,   right = 0,   fraction = FALSE,   strand = FALSE,   trim = FALSE,   ... )"},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_flank.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Create flanking intervals from input intervals. — bed_flank","text":"x ivl_df genome genome_df number bases sizes left number bases left side right number bases right side fraction define flanks based fraction interval length strand define left right based strand trim adjust coordinates --bounds intervals ... extra arguments (used)","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_flank.html","id":"value","dir":"Reference","previous_headings":"","what":"Value","title":"Create flanking intervals from input intervals. — bed_flank","text":"ivl_df","code":""},{"path":[]},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_flank.html","id":"ref-examples","dir":"Reference","previous_headings":"","what":"Examples","title":"Create flanking intervals from input intervals. — bed_flank","text":"","code":"x <- tibble::tribble(   ~chrom, ~start, ~end,   \"chr1\", 25, 50,   \"chr1\", 100, 125 )  genome <- tibble::tribble(   ~chrom, ~size,   \"chr1\", 130 )  bed_glyph(bed_flank(x, genome, both = 20))   x <- tibble::tribble(   ~chrom, ~start, ~end, ~name, ~score, ~strand,   \"chr1\", 500,    1000, \".\",   \".\",    \"+\",   \"chr1\", 1000,   1500, \".\",   \".\",    \"-\" )  genome <- tibble::tribble(   ~chrom, ~size,   \"chr1\", 5000 )  bed_flank(x, genome, left = 100) #> # A tibble: 2 × 6 #>   chrom start   end name  score strand #>   <chr> <int> <int> <chr> <chr> <chr>  #> 1 chr1    400   500 .     .     +      #> 2 chr1    900  1000 .     .     -       bed_flank(x, genome, right = 100) #> # A tibble: 2 × 6 #>   chrom start   end name  score strand #>   <chr> <int> <int> <chr> <chr> <chr>  #> 1 chr1   1000  1100 .     .     +      #> 2 chr1   1500  1600 .     .     -       bed_flank(x, genome, both = 100) #> # A tibble: 4 × 6 #>   chrom start   end name  score strand #>   <chr> <int> <int> <chr> <chr> <chr>  #> 1 chr1    400   500 .     .     +      #> 2 chr1    900  1000 .     .     -      #> 3 chr1   1000  1100 .     .     +      #> 4 chr1   1500  1600 .     .     -       bed_flank(x, genome, both = 0.5, fraction = TRUE) #> # A tibble: 4 × 6 #>   chrom start   end name  score strand #>   <chr> <int> <int> <chr> <chr> <chr>  #> 1 chr1    250   500 .     .     +      #> 2 chr1    750  1000 .     .     -      #> 3 chr1   1000  1250 .     .     +      #> 4 chr1   1500  1750 .     .     -"},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_genomecov.html","id":null,"dir":"Reference","previous_headings":"","what":"Calculate coverage across a genome — bed_genomecov","title":"Calculate coverage across a genome — bed_genomecov","text":"function useful calculating interval coverage across entire genome.","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_genomecov.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Calculate coverage across a genome — bed_genomecov","text":"","code":"bed_genomecov(x, genome, zero_depth = FALSE)"},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_genomecov.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Calculate coverage across a genome — bed_genomecov","text":"x ivl_df genome genome_df zero_depth TRUE, report intervals zero depth. Zero depth intervals reported respect groups.","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_genomecov.html","id":"value","dir":"Reference","previous_headings":"","what":"Value","title":"Calculate coverage across a genome — bed_genomecov","text":"ivl_df additional column: .depth depth interval coverage","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_genomecov.html","id":"details","dir":"Reference","previous_headings":"","what":"Details","title":"Calculate coverage across a genome — bed_genomecov","text":"input tbls grouped chrom default, additional groups can added using dplyr::group_by(). example, grouping strand constrain analyses strand. compare opposing strands across two tbls, strands y tbl can first inverted using flip_strands().","code":""},{"path":[]},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_genomecov.html","id":"ref-examples","dir":"Reference","previous_headings":"","what":"Examples","title":"Calculate coverage across a genome — bed_genomecov","text":"","code":"x <- tibble::tribble(   ~chrom, ~start, ~end, ~strand,   \"chr1\", 20, 70, \"+\",   \"chr1\", 50, 100, \"-\",   \"chr1\", 200, 250, \"+\",   \"chr1\", 220, 250, \"+\" )  genome <- tibble::tribble(   ~chrom, ~size,   \"chr1\", 500,   \"chr2\", 1000 )  bed_genomecov(x, genome) #> # A tibble: 5 × 4 #>   chrom start   end .depth #>   <chr> <int> <int>  <int> #> 1 chr1     20    50      1 #> 2 chr1     50    70      2 #> 3 chr1     70   100      1 #> 4 chr1    200   220      1 #> 5 chr1    220   250      2  bed_genomecov(dplyr::group_by(x, strand), genome) #> # A tibble: 4 × 5 #>   chrom start   end strand .depth #>   <chr> <int> <int> <chr>   <int> #> 1 chr1     20    70 +           1 #> 2 chr1    200   220 +           1 #> 3 chr1    220   250 +           2 #> 4 chr1     50   100 -           1  bed_genomecov(dplyr::group_by(x, strand), genome, zero_depth = TRUE) #> # A tibble: 11 × 5 #>    chrom start   end strand .depth #>    <chr> <int> <dbl> <chr>   <int> #>  1 chr1      0    20 +           0 #>  2 chr1      0    50 -           0 #>  3 chr1     20    70 +           1 #>  4 chr1     50   100 -           1 #>  5 chr1     70   200 +           0 #>  6 chr1    100   500 -           0 #>  7 chr1    200   220 +           1 #>  8 chr1    220   250 +           2 #>  9 chr1    250   500 +           0 #> 10 chr2      0  1000 +           0 #> 11 chr2      0  1000 -           0"},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_glyph.html","id":null,"dir":"Reference","previous_headings":"","what":"Create example glyphs for valr functions. — bed_glyph","title":"Create example glyphs for valr functions. — bed_glyph","text":"Used illustrate output valr functions small examples.","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_glyph.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Create example glyphs for valr functions. — bed_glyph","text":"","code":"bed_glyph(expr, label = NULL)"},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_glyph.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Create example glyphs for valr functions. — bed_glyph","text":"expr expression evaluate label column name use label values. present result call.","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_glyph.html","id":"value","dir":"Reference","previous_headings":"","what":"Value","title":"Create example glyphs for valr functions. — bed_glyph","text":"ggplot2::ggplot()","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_glyph.html","id":"ref-examples","dir":"Reference","previous_headings":"","what":"Examples","title":"Create example glyphs for valr functions. — bed_glyph","text":"","code":"x <- tibble::tribble(   ~chrom, ~start, ~end,   \"chr1\", 25,     50,   \"chr1\", 100,    125 )  y <- tibble::tribble(   ~chrom, ~start, ~end, ~value,   \"chr1\", 30, 75, 50 )  bed_glyph(bed_intersect(x, y))   x <- tibble::tribble(   ~chrom, ~start, ~end,   \"chr1\", 30,     75,   \"chr1\", 50,     90,   \"chr1\", 91,     120 )  bed_glyph(bed_merge(x))   bed_glyph(bed_cluster(x), label = \".id\")"},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_intersect.html","id":null,"dir":"Reference","previous_headings":"","what":"Identify intersecting intervals. — bed_intersect","title":"Identify intersecting intervals. — bed_intersect","text":"Report intersecting intervals x y tbls. Book-ended intervals .overlap values 0 output.","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_intersect.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Identify intersecting intervals. — bed_intersect","text":"","code":"bed_intersect(x, ..., invert = FALSE, suffix = c(\".x\", \".y\"))"},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_intersect.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Identify intersecting intervals. — bed_intersect","text":"x ivl_df ... one (e.g. list ) y ivl_df()s invert report x intervals y suffix colname suffixes output","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_intersect.html","id":"value","dir":"Reference","previous_headings":"","what":"Value","title":"Identify intersecting intervals. — bed_intersect","text":"ivl_df original columns x y suffixed .x .y, new .overlap column extent overlap intersecting intervals.  multiple y tbls supplied, .source contains variable names associated interval. original columns y suffixed .y output. ... contains named inputs (.e = y, b = z list(= y, b =  z)), .source contain supplied names (see examples).","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_intersect.html","id":"details","dir":"Reference","previous_headings":"","what":"Details","title":"Identify intersecting intervals. — bed_intersect","text":"input tbls grouped chrom default, additional groups can added using dplyr::group_by(). example, grouping strand constrain analyses strand. compare opposing strands across two tbls, strands y tbl can first inverted using flip_strands().","code":""},{"path":[]},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_intersect.html","id":"ref-examples","dir":"Reference","previous_headings":"","what":"Examples","title":"Identify intersecting intervals. — bed_intersect","text":"","code":"x <- tibble::tribble(   ~chrom, ~start, ~end,   \"chr1\", 25, 50,   \"chr1\", 100, 125 )  y <- tibble::tribble(   ~chrom, ~start, ~end,   \"chr1\", 30,     75 )  bed_glyph(bed_intersect(x, y))   bed_glyph(bed_intersect(x, y, invert = TRUE))   x <- tibble::tribble(   ~chrom, ~start, ~end,   \"chr1\", 100,    500,   \"chr2\", 200,    400,   \"chr2\", 300,    500,   \"chr2\", 800,    900 )  y <- tibble::tribble(   ~chrom, ~start, ~end, ~value,   \"chr1\", 150,    400,  100,   \"chr1\", 500,    550,  100,   \"chr2\", 230,    430,  200,   \"chr2\", 350,    430,  300 )  bed_intersect(x, y) #> # A tibble: 6 × 7 #>   chrom start.x end.x start.y end.y value.y .overlap #>   <chr>   <dbl> <dbl>   <dbl> <dbl>   <dbl>    <int> #> 1 chr1      100   500     150   400     100      250 #> 2 chr1      100   500     500   550     100        0 #> 3 chr2      200   400     230   430     200      170 #> 4 chr2      200   400     350   430     300       50 #> 5 chr2      300   500     230   430     200      130 #> 6 chr2      300   500     350   430     300       80  bed_intersect(x, y, invert = TRUE) #> # A tibble: 1 × 3 #>   chrom start   end #>   <chr> <dbl> <dbl> #> 1 chr2    800   900  # start and end of each overlapping interval res <- bed_intersect(x, y) dplyr::mutate(res,   start = pmax(start.x, start.y),   end = pmin(end.x, end.y) ) #> # A tibble: 6 × 9 #>   chrom start.x end.x start.y end.y value.y .overlap start   end #>   <chr>   <dbl> <dbl>   <dbl> <dbl>   <dbl>    <int> <dbl> <dbl> #> 1 chr1      100   500     150   400     100      250   150   400 #> 2 chr1      100   500     500   550     100        0   500   500 #> 3 chr2      200   400     230   430     200      170   230   400 #> 4 chr2      200   400     350   430     300       50   350   400 #> 5 chr2      300   500     230   430     200      130   300   430 #> 6 chr2      300   500     350   430     300       80   350   430  z <- tibble::tribble(   ~chrom, ~start, ~end, ~value,   \"chr1\", 150,    400,  100,   \"chr1\", 500,    550,  100,   \"chr2\", 230,    430,  200,   \"chr2\", 750,    900,  400 )  bed_intersect(x, y, z) #> # A tibble: 11 × 8 #>    chrom start.x end.x start.y end.y value.y .source .overlap #>    <chr>   <dbl> <dbl>   <dbl> <dbl>   <dbl> <chr>      <int> #>  1 chr1      100   500     150   400     100 y            250 #>  2 chr1      100   500     150   400     100 z            250 #>  3 chr1      100   500     500   550     100 y              0 #>  4 chr1      100   500     500   550     100 z              0 #>  5 chr2      200   400     230   430     200 y            170 #>  6 chr2      200   400     230   430     200 z            170 #>  7 chr2      200   400     350   430     300 y             50 #>  8 chr2      300   500     230   430     200 y            130 #>  9 chr2      300   500     230   430     200 z            130 #> 10 chr2      300   500     350   430     300 y             80 #> 11 chr2      800   900     750   900     400 z            100  bed_intersect(x, exons = y, introns = z) #> # A tibble: 11 × 8 #>    chrom start.x end.x start.y end.y value.y .source .overlap #>    <chr>   <dbl> <dbl>   <dbl> <dbl>   <dbl> <chr>      <int> #>  1 chr1      100   500     150   400     100 exons        250 #>  2 chr1      100   500     150   400     100 introns      250 #>  3 chr1      100   500     500   550     100 exons          0 #>  4 chr1      100   500     500   550     100 introns        0 #>  5 chr2      200   400     230   430     200 exons        170 #>  6 chr2      200   400     230   430     200 introns      170 #>  7 chr2      200   400     350   430     300 exons         50 #>  8 chr2      300   500     230   430     200 exons        130 #>  9 chr2      300   500     230   430     200 introns      130 #> 10 chr2      300   500     350   430     300 exons         80 #> 11 chr2      800   900     750   900     400 introns      100  # a list of tbl_intervals can also be passed bed_intersect(x, list(exons = y, introns = z)) #> # A tibble: 11 × 8 #>    chrom start.x end.x start.y end.y value.y .source .overlap #>    <chr>   <dbl> <dbl>   <dbl> <dbl>   <dbl> <chr>      <int> #>  1 chr1      100   500     150   400     100 exons        250 #>  2 chr1      100   500     150   400     100 introns      250 #>  3 chr1      100   500     500   550     100 exons          0 #>  4 chr1      100   500     500   550     100 introns        0 #>  5 chr2      200   400     230   430     200 exons        170 #>  6 chr2      200   400     230   430     200 introns      170 #>  7 chr2      200   400     350   430     300 exons         50 #>  8 chr2      300   500     230   430     200 exons        130 #>  9 chr2      300   500     230   430     200 introns      130 #> 10 chr2      300   500     350   430     300 exons         80 #> 11 chr2      800   900     750   900     400 introns      100"},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_jaccard.html","id":null,"dir":"Reference","previous_headings":"","what":"Calculate the Jaccard statistic for two sets of intervals. — bed_jaccard","title":"Calculate the Jaccard statistic for two sets of intervals. — bed_jaccard","text":"Quantifies extent overlap sets intervals terms base-pairs. Groups shared input used calculate statistic subsets data.","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_jaccard.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Calculate the Jaccard statistic for two sets of intervals. — bed_jaccard","text":"","code":"bed_jaccard(x, y)"},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_jaccard.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Calculate the Jaccard statistic for two sets of intervals. — bed_jaccard","text":"x ivl_df y ivl_df","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_jaccard.html","id":"value","dir":"Reference","previous_headings":"","what":"Value","title":"Calculate the Jaccard statistic for two sets of intervals. — bed_jaccard","text":"tibble following columns: len_i length intersection base-pairs len_u length union base-pairs jaccard value jaccard statistic n_int number intersecting intervals x y inputs grouped, return value contain one set values per group.","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_jaccard.html","id":"details","dir":"Reference","previous_headings":"","what":"Details","title":"Calculate the Jaccard statistic for two sets of intervals. — bed_jaccard","text":"Jaccard statistic takes values [0,1] measured : $$ J(x,y) = \\frac{\\mid x \\bigcap y \\mid}                      {\\mid x \\bigcup y \\mid} =                 \\frac{\\mid x \\bigcap y \\mid}                      {\\mid x \\mid + \\mid y \\mid -                       \\mid x \\bigcap y \\mid} $$ Interval statistics can used combination dplyr::group_by() dplyr::() calculate statistics subsets data. See vignette('interval-stats') examples.","code":""},{"path":[]},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_jaccard.html","id":"ref-examples","dir":"Reference","previous_headings":"","what":"Examples","title":"Calculate the Jaccard statistic for two sets of intervals. — bed_jaccard","text":"","code":"genome <- read_genome(valr_example(\"hg19.chrom.sizes.gz\"))  x <- bed_random(genome, seed = 1010486) y <- bed_random(genome, seed = 9203911)  bed_jaccard(x, y) #> # A tibble: 1 × 4 #>       len_i      len_u jaccard      n #>       <dbl>      <dbl>   <dbl>  <dbl> #> 1 236184699 1708774142   0.160 399981  # calculate jaccard per chromosome bed_jaccard(   dplyr::group_by(x, chrom),   dplyr::group_by(y, chrom) ) #> # A tibble: 25 × 5 #>    chrom    len_i     len_u jaccard     n #>    <chr>    <dbl>     <dbl>   <dbl> <dbl> #>  1 chr1  18939046 137345996   0.160 32156 #>  2 chr10 10524360  75209830   0.163 17830 #>  3 chr11 10378246  74655177   0.161 17497 #>  4 chr12 10146255  73725046   0.160 17163 #>  5 chr13  8867024  63737541   0.162 14992 #>  6 chr14  8047103  59033144   0.158 13647 #>  7 chr15  7794057  56514322   0.160 13236 #>  8 chr16  6907575  49874077   0.161 11650 #>  9 chr17  6186446  44917522   0.160 10487 #> 10 chr18  6044900  43248877   0.162 10129 #> # ℹ 15 more rows"},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_makewindows.html","id":null,"dir":"Reference","previous_headings":"","what":"Divide intervals into new sub-intervals (","title":"Divide intervals into new sub-intervals (","text":"Divide intervals new sub-intervals (\"windows\").","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_makewindows.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Divide intervals into new sub-intervals (","text":"","code":"bed_makewindows(x, win_size = 0, step_size = 0, num_win = 0, reverse = FALSE)"},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_makewindows.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Divide intervals into new sub-intervals (","text":"x ivl_df win_size divide intervals fixed-size windows step_size size step next window num_win divide intervals fixed number windows reverse reverse window numbers","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_makewindows.html","id":"value","dir":"Reference","previous_headings":"","what":"Value","title":"Divide intervals into new sub-intervals (","text":"ivl_df .win_id column contains numeric identifier window.","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_makewindows.html","id":"note","dir":"Reference","previous_headings":"","what":"Note","title":"Divide intervals into new sub-intervals (","text":"name .win_id columns can used create new interval names (see 'namenum' example ) subsequent group_by operations (see vignette).","code":""},{"path":[]},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_makewindows.html","id":"ref-examples","dir":"Reference","previous_headings":"","what":"Examples","title":"Divide intervals into new sub-intervals (","text":"","code":"x <- tibble::tribble(   ~chrom, ~start, ~end, ~name, ~score, ~strand,   \"chr1\", 100,    200,  \"A\",   \".\",    \"+\" )  bed_glyph(bed_makewindows(x, num_win = 10), label = \".win_id\")   # Fixed number of windows bed_makewindows(x, num_win = 10) #> # A tibble: 10 × 7 #>    chrom start   end name  score strand .win_id #>    <chr> <int> <int> <chr> <chr> <chr>    <int> #>  1 chr1    100   110 A     .     +            1 #>  2 chr1    110   120 A     .     +            2 #>  3 chr1    120   130 A     .     +            3 #>  4 chr1    130   140 A     .     +            4 #>  5 chr1    140   150 A     .     +            5 #>  6 chr1    150   160 A     .     +            6 #>  7 chr1    160   170 A     .     +            7 #>  8 chr1    170   180 A     .     +            8 #>  9 chr1    180   190 A     .     +            9 #> 10 chr1    190   200 A     .     +           10  # Fixed window size bed_makewindows(x, win_size = 10) #> # A tibble: 10 × 7 #>    chrom start   end name  score strand .win_id #>    <chr> <int> <int> <chr> <chr> <chr>    <int> #>  1 chr1    100   110 A     .     +            1 #>  2 chr1    110   120 A     .     +            2 #>  3 chr1    120   130 A     .     +            3 #>  4 chr1    130   140 A     .     +            4 #>  5 chr1    140   150 A     .     +            5 #>  6 chr1    150   160 A     .     +            6 #>  7 chr1    160   170 A     .     +            7 #>  8 chr1    170   180 A     .     +            8 #>  9 chr1    180   190 A     .     +            9 #> 10 chr1    190   200 A     .     +           10  # Fixed window size with overlaps bed_makewindows(x, win_size = 10, step_size = 5) #> # A tibble: 20 × 7 #>    chrom start   end name  score strand .win_id #>    <chr> <int> <int> <chr> <chr> <chr>    <int> #>  1 chr1    100   110 A     .     +            1 #>  2 chr1    105   115 A     .     +            2 #>  3 chr1    110   120 A     .     +            3 #>  4 chr1    115   125 A     .     +            4 #>  5 chr1    120   130 A     .     +            5 #>  6 chr1    125   135 A     .     +            6 #>  7 chr1    130   140 A     .     +            7 #>  8 chr1    135   145 A     .     +            8 #>  9 chr1    140   150 A     .     +            9 #> 10 chr1    145   155 A     .     +           10 #> 11 chr1    150   160 A     .     +           11 #> 12 chr1    155   165 A     .     +           12 #> 13 chr1    160   170 A     .     +           13 #> 14 chr1    165   175 A     .     +           14 #> 15 chr1    170   180 A     .     +           15 #> 16 chr1    175   185 A     .     +           16 #> 17 chr1    180   190 A     .     +           17 #> 18 chr1    185   195 A     .     +           18 #> 19 chr1    190   200 A     .     +           19 #> 20 chr1    195   200 A     .     +           20  # reverse win_id bed_makewindows(x, win_size = 10, reverse = TRUE) #> # A tibble: 10 × 7 #>    chrom start   end name  score strand .win_id #>    <chr> <int> <int> <chr> <chr> <chr>    <int> #>  1 chr1    100   110 A     .     +           10 #>  2 chr1    110   120 A     .     +            9 #>  3 chr1    120   130 A     .     +            8 #>  4 chr1    130   140 A     .     +            7 #>  5 chr1    140   150 A     .     +            6 #>  6 chr1    150   160 A     .     +            5 #>  7 chr1    160   170 A     .     +            4 #>  8 chr1    170   180 A     .     +            3 #>  9 chr1    180   190 A     .     +            2 #> 10 chr1    190   200 A     .     +            1  # bedtools 'namenum' wins <- bed_makewindows(x, win_size = 10) dplyr::mutate(wins, namenum = stringr::str_c(name, \"_\", .win_id)) #> # A tibble: 10 × 8 #>    chrom start   end name  score strand .win_id namenum #>    <chr> <int> <int> <chr> <chr> <chr>    <int> <chr>   #>  1 chr1    100   110 A     .     +            1 A_1     #>  2 chr1    110   120 A     .     +            2 A_2     #>  3 chr1    120   130 A     .     +            3 A_3     #>  4 chr1    130   140 A     .     +            4 A_4     #>  5 chr1    140   150 A     .     +            5 A_5     #>  6 chr1    150   160 A     .     +            6 A_6     #>  7 chr1    160   170 A     .     +            7 A_7     #>  8 chr1    170   180 A     .     +            8 A_8     #>  9 chr1    180   190 A     .     +            9 A_9     #> 10 chr1    190   200 A     .     +           10 A_10"},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_map.html","id":null,"dir":"Reference","previous_headings":"","what":"Calculate summaries from overlapping intervals. — bed_map","title":"Calculate summaries from overlapping intervals. — bed_map","text":"Apply functions like min() count() intersecting intervals. bed_map() uses bed_intersect() identify intersecting intervals, output columns suffixed .x .y. Expressions refer input columns x y columns must take suffixes account.","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_map.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Calculate summaries from overlapping intervals. — bed_map","text":"","code":"bed_map(x, y, ..., min_overlap = 1)  concat(.data, sep = \",\")  values_unique(.data, sep = \",\")  values(.data, sep = \",\")"},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_map.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Calculate summaries from overlapping intervals. — bed_map","text":"x ivl_df y ivl_df ... name-value pairs specifying column names expressions apply min_overlap minimum overlap intervals. .data data sep separator character","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_map.html","id":"value","dir":"Reference","previous_headings":"","what":"Value","title":"Calculate summaries from overlapping intervals. — bed_map","text":"ivl_df","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_map.html","id":"details","dir":"Reference","previous_headings":"","what":"Details","title":"Calculate summaries from overlapping intervals. — bed_map","text":"Book-ended intervals can included setting min_overlap = 0. Non-intersecting intervals x included result NA values. input tbls grouped chrom default, additional groups can added using dplyr::group_by(). example, grouping strand constrain analyses strand. compare opposing strands across two tbls, strands y tbl can first inverted using flip_strands().","code":""},{"path":[]},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_map.html","id":"ref-examples","dir":"Reference","previous_headings":"","what":"Examples","title":"Calculate summaries from overlapping intervals. — bed_map","text":"","code":"x <- tibble::tribble(  ~chrom, ~start, ~end,  'chr1', 100,    250,  'chr2', 250,    500 )  y <- tibble::tribble(  ~chrom, ~start, ~end, ~value,  'chr1', 100,    250,  10,  'chr1', 150,    250,  20,  'chr2', 250,    500,  500 )  bed_glyph(bed_map(x, y, value = sum(value)), label = 'value')   # summary examples bed_map(x, y, .sum = sum(value)) #> # A tibble: 2 × 4 #>   chrom start   end  .sum #>   <chr> <dbl> <dbl> <dbl> #> 1 chr1    100   250    30 #> 2 chr2    250   500   500  bed_map(x, y, .min = min(value), .max = max(value)) #> # A tibble: 2 × 5 #>   chrom start   end  .min  .max #>   <chr> <dbl> <dbl> <dbl> <dbl> #> 1 chr1    100   250    10    20 #> 2 chr2    250   500   500   500  # identify non-intersecting intervals to include in the result res <- bed_map(x, y, .sum = sum(value)) x_not <- bed_intersect(x, y, invert = TRUE) dplyr::bind_rows(res, x_not) #> # A tibble: 2 × 4 #>   chrom start   end  .sum #>   <chr> <dbl> <dbl> <dbl> #> 1 chr1    100   250    30 #> 2 chr2    250   500   500  # create a list-column bed_map(x, y, .values = list(value)) #> # A tibble: 2 × 4 #>   chrom start   end .values   #>   <chr> <dbl> <dbl> <list>    #> 1 chr1    100   250 <dbl [2]> #> 2 chr2    250   500 <dbl [1]>  # use `nth` family from dplyr bed_map(x, y, .first = dplyr::first(value)) #> # A tibble: 2 × 4 #>   chrom start   end .first #>   <chr> <dbl> <dbl>  <dbl> #> 1 chr1    100   250     10 #> 2 chr2    250   500    500  bed_map(x, y, .absmax = abs(max(value))) #> # A tibble: 2 × 4 #>   chrom start   end .absmax #>   <chr> <dbl> <dbl>   <dbl> #> 1 chr1    100   250      20 #> 2 chr2    250   500     500  bed_map(x, y, .count = length(value)) #> # A tibble: 2 × 4 #>   chrom start   end .count #>   <chr> <dbl> <dbl>  <int> #> 1 chr1    100   250      2 #> 2 chr2    250   500      1  bed_map(x, y, .vals = values(value)) #> # A tibble: 2 × 4 #>   chrom start   end .vals #>   <chr> <dbl> <dbl> <chr> #> 1 chr1    100   250 10,20 #> 2 chr2    250   500 500    # count defaults are NA not 0; differs from bedtools2 ... bed_map(x, y, .counts = dplyr::n()) #> # A tibble: 2 × 4 #>   chrom start   end .counts #>   <chr> <dbl> <dbl>   <int> #> 1 chr1    100   250       2 #> 2 chr2    250   500       1  # ... but NA counts can be coverted to 0's dplyr::mutate(bed_map(x, y, .counts = dplyr::n()), .counts = ifelse(is.na(.counts), 0, .counts)) #> # A tibble: 2 × 4 #>   chrom start   end .counts #>   <chr> <dbl> <dbl>   <int> #> 1 chr1    100   250       2 #> 2 chr2    250   500       1"},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_merge.html","id":null,"dir":"Reference","previous_headings":"","what":"Merge overlapping intervals. — bed_merge","title":"Merge overlapping intervals. — bed_merge","text":"Operations can performed merged intervals specifying name-value pairs. Default max_dist 0 means book-ended intervals merged.","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_merge.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Merge overlapping intervals. — bed_merge","text":"","code":"bed_merge(x, max_dist = 0, ...)"},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_merge.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Merge overlapping intervals. — bed_merge","text":"x ivl_df max_dist maximum distance intervals merge ... name-value pairs specify operations merged intervals","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_merge.html","id":"value","dir":"Reference","previous_headings":"","what":"Value","title":"Merge overlapping intervals. — bed_merge","text":"ivl_df","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_merge.html","id":"details","dir":"Reference","previous_headings":"","what":"Details","title":"Merge overlapping intervals. — bed_merge","text":"input tbls grouped chrom default, additional groups can added using dplyr::group_by(). example, grouping strand constrain analyses strand. compare opposing strands across two tbls, strands y tbl can first inverted using flip_strands().","code":""},{"path":[]},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_merge.html","id":"ref-examples","dir":"Reference","previous_headings":"","what":"Examples","title":"Merge overlapping intervals. — bed_merge","text":"","code":"x <- tibble::tribble(   ~chrom, ~start, ~end,   \"chr1\", 1, 50,   \"chr1\", 10, 75,   \"chr1\", 100, 120 )  bed_glyph(bed_merge(x))   x <- tibble::tribble(   ~chrom, ~start, ~end, ~value, ~strand,   \"chr1\", 1,      50,   1,      \"+\",   \"chr1\", 100,    200,  2,      \"+\",   \"chr1\", 150,    250,  3,      \"-\",   \"chr2\", 1,      25,   4,      \"+\",   \"chr2\", 200,    400,  5,      \"-\",   \"chr2\", 400,    500,  6,      \"+\",   \"chr2\", 450,    550,  7,      \"+\" )  bed_merge(x) #> # A tibble: 4 × 3 #>   chrom start   end #>   <chr> <int> <int> #> 1 chr1      1    50 #> 2 chr1    100   250 #> 3 chr2      1    25 #> 4 chr2    200   550  bed_merge(x, max_dist = 100) #> # A tibble: 3 × 3 #>   chrom start   end #>   <chr> <int> <int> #> 1 chr1      1   250 #> 2 chr2      1    25 #> 3 chr2    200   550  # merge intervals on same strand bed_merge(dplyr::group_by(x, strand)) #> # A tibble: 6 × 4 #> # Groups:   strand [2] #>   chrom start   end strand #>   <chr> <int> <int> <chr>  #> 1 chr1      1    50 +      #> 2 chr1    100   200 +      #> 3 chr1    150   250 -      #> 4 chr2      1    25 +      #> 5 chr2    400   550 +      #> 6 chr2    200   400 -       bed_merge(x, .value = sum(value)) #> # A tibble: 4 × 4 #>   chrom start   end .value #>   <chr> <dbl> <dbl>  <dbl> #> 1 chr1      1    50      1 #> 2 chr1    100   250      5 #> 3 chr2      1    25      4 #> 4 chr2    200   550     18"},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_partition.html","id":null,"dir":"Reference","previous_headings":"","what":"Partition intervals into elemental intervals — bed_partition","title":"Partition intervals into elemental intervals — bed_partition","text":"Convert set intervals elemental intervals contain start end position set.","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_partition.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Partition intervals into elemental intervals — bed_partition","text":"","code":"bed_partition(x, ...)"},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_partition.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Partition intervals into elemental intervals — bed_partition","text":"x ivl_df ... name-value pairs specifying column names expressions apply","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_partition.html","id":"value","dir":"Reference","previous_headings":"","what":"Value","title":"Partition intervals into elemental intervals — bed_partition","text":"ivl_df()","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_partition.html","id":"details","dir":"Reference","previous_headings":"","what":"Details","title":"Partition intervals into elemental intervals — bed_partition","text":"Summary operations, min() count() can performed elemental intervals specifying name-value pairs. function useful calculating summaries across overlapping intervals without merging intervals. input tbls grouped chrom default, additional groups can added using dplyr::group_by(). example, grouping strand constrain analyses strand. compare opposing strands across two tbls, strands y tbl can first inverted using flip_strands().","code":""},{"path":[]},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_partition.html","id":"ref-examples","dir":"Reference","previous_headings":"","what":"Examples","title":"Partition intervals into elemental intervals — bed_partition","text":"","code":"x <- tibble::tribble(   ~chrom, ~start, ~end, ~value, ~strand,   \"chr1\", 100, 500, 10, \"+\",   \"chr1\", 200, 400, 20, \"-\",   \"chr1\", 300, 550, 30, \"+\",   \"chr1\", 550, 575, 2, \"+\",   \"chr1\", 800, 900, 5, \"+\" )   bed_glyph(bed_partition(x))  bed_glyph(bed_partition(x, value = sum(value)), label = \"value\")   bed_partition(x) #> # A tibble: 7 × 3 #>   chrom start   end #>   <chr> <int> <int> #> 1 chr1    100   200 #> 2 chr1    200   300 #> 3 chr1    300   400 #> 4 chr1    400   500 #> 5 chr1    500   550 #> 6 chr1    550   575 #> 7 chr1    800   900  # compute summary over each elemental interval bed_partition(x, value = sum(value)) #> # A tibble: 7 × 4 #>   chrom start   end value #>   <chr> <int> <int> <dbl> #> 1 chr1    100   200    10 #> 2 chr1    200   300    30 #> 3 chr1    300   400    60 #> 4 chr1    400   500    40 #> 5 chr1    500   550    30 #> 6 chr1    550   575     2 #> 7 chr1    800   900     5  # partition and compute summaries based on group x <- dplyr::group_by(x, strand) bed_partition(x, value = sum(value)) #> # A tibble: 6 × 5 #>   chrom start   end strand value #>   <chr> <int> <int> <chr>  <dbl> #> 1 chr1    100   300 +         10 #> 2 chr1    200   400 -         20 #> 3 chr1    300   500 +         40 #> 4 chr1    500   550 +         30 #> 5 chr1    550   575 +          2 #> 6 chr1    800   900 +          5  # combine values across multiple tibbles y <- tibble::tribble(   ~chrom, ~start, ~end, ~value, ~strand,   \"chr1\", 10, 500, 100, \"+\",   \"chr1\", 250, 420, 200, \"-\",   \"chr1\", 350, 550, 300, \"+\",   \"chr1\", 550, 555, 20, \"+\",   \"chr1\", 800, 900, 50, \"+\" )  x <- dplyr::bind_rows(x, y) bed_partition(x, value = sum(value)) #> # A tibble: 11 × 5 #>    chrom start   end strand value #>    <chr> <int> <int> <chr>  <dbl> #>  1 chr1     10   100 +        100 #>  2 chr1    100   300 +        110 #>  3 chr1    200   250 -         20 #>  4 chr1    250   400 -        220 #>  5 chr1    300   350 +        140 #>  6 chr1    350   500 +        440 #>  7 chr1    400   420 -        200 #>  8 chr1    500   550 +        330 #>  9 chr1    550   555 +         22 #> 10 chr1    555   575 +          2 #> 11 chr1    800   900 +         55"},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_projection.html","id":null,"dir":"Reference","previous_headings":"","what":"Projection test for query interval overlap. — bed_projection","title":"Projection test for query interval overlap. — bed_projection","text":"Projection test query interval overlap.","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_projection.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Projection test for query interval overlap. — bed_projection","text":"","code":"bed_projection(x, y, genome, by_chrom = FALSE)"},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_projection.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Projection test for query interval overlap. — bed_projection","text":"x ivl_df y ivl_df genome genome_df by_chrom compute test per chromosome","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_projection.html","id":"value","dir":"Reference","previous_headings":"","what":"Value","title":"Projection test for query interval overlap. — bed_projection","text":"ivl_df following columns: chrom name chromosome tested by_chrom = TRUE, otherwise value whole_genome p.value p-value binomial test. p-values > 0.5 converted 1 - p-value lower_tail FALSE obs_exp_ratio ratio observed expected overlap frequency lower_tail TRUE indicates observed overlaps lower tail distribution (e.g., less overlap expected). FALSE indicates observed overlaps upper tail distribution (e.g., overlap expected)","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_projection.html","id":"details","dir":"Reference","previous_headings":"","what":"Details","title":"Projection test for query interval overlap. — bed_projection","text":"Interval statistics can used combination dplyr::group_by() dplyr::() calculate statistics subsets data. See vignette('interval-stats') examples.","code":""},{"path":[]},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_projection.html","id":"ref-examples","dir":"Reference","previous_headings":"","what":"Examples","title":"Projection test for query interval overlap. — bed_projection","text":"","code":"genome <- read_genome(valr_example(\"hg19.chrom.sizes.gz\"))  x <- bed_random(genome, seed = 1010486) y <- bed_random(genome, seed = 9203911)  bed_projection(x, y, genome) #> # A tibble: 1 × 4 #>   chrom         p.value obs_exp_ratio lower_tail #>   <chr>           <dbl>         <dbl> <chr>      #> 1 whole_genome 0.000850          1.01 FALSE       bed_projection(x, y, genome, by_chrom = TRUE) #> # A tibble: 25 × 4 #>    chrom p.value obs_exp_ratio lower_tail #>    <chr>   <dbl>         <dbl> <chr>      #>  1 chr1   0.176          1.01  FALSE      #>  2 chr10  0.0209         1.02  FALSE      #>  3 chr11  0.118          1.01  FALSE      #>  4 chr12  0.479          1.00  FALSE      #>  5 chr13  0.245          1.01  FALSE      #>  6 chr14  0.120          0.990 TRUE       #>  7 chr15  0.333          1.00  FALSE      #>  8 chr16  0.213          1.01  FALSE      #>  9 chr17  0.181          0.991 TRUE       #> 10 chr18  0.0306         1.02  FALSE      #> # ℹ 15 more rows"},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_random.html","id":null,"dir":"Reference","previous_headings":"","what":"Generate randomly placed intervals on a genome. — bed_random","title":"Generate randomly placed intervals on a genome. — bed_random","text":"Generate randomly placed intervals genome.","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_random.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Generate randomly placed intervals on a genome. — bed_random","text":"","code":"bed_random(genome, length = 1000, n = 1e+06, seed = 0, sorted = TRUE)"},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_random.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Generate randomly placed intervals on a genome. — bed_random","text":"genome genome_df length length intervals n number intervals generate seed seed RNG reproducible intervals sorted return sorted output","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_random.html","id":"value","dir":"Reference","previous_headings":"","what":"Value","title":"Generate randomly placed intervals on a genome. — bed_random","text":"ivl_df","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_random.html","id":"details","dir":"Reference","previous_headings":"","what":"Details","title":"Generate randomly placed intervals on a genome. — bed_random","text":"Sorting can suppressed sorted = FALSE.","code":""},{"path":[]},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_random.html","id":"ref-examples","dir":"Reference","previous_headings":"","what":"Examples","title":"Generate randomly placed intervals on a genome. — bed_random","text":"","code":"genome <- tibble::tribble(   ~chrom,  ~size,   \"chr1\",  10000000,   \"chr2\",  50000000,   \"chr3\",  60000000,   \"chrX\",  5000000 )  bed_random(genome, seed = 10104) #> # A tibble: 1,000,000 × 3 #>    chrom start   end #>    <chr> <int> <int> #>  1 chr1    265  1265 #>  2 chr1    315  1315 #>  3 chr1    335  1335 #>  4 chr1    513  1513 #>  5 chr1    625  1625 #>  6 chr1    635  1635 #>  7 chr1    653  1653 #>  8 chr1    731  1731 #>  9 chr1    859  1859 #> 10 chr1   1024  2024 #> # ℹ 999,990 more rows  # sorting can be suppressed bed_random(genome, sorted = FALSE, seed = 10104) #> # A tibble: 1,000,000 × 3 #>    chrom    start      end #>    <chr>    <int>    <int> #>  1 chr3   2681468  2682468 #>  2 chr3  25364020 25365020 #>  3 chr2  43134407 43135407 #>  4 chr2  36344257 36345257 #>  5 chr3  39019690 39020690 #>  6 chr3  59869387 59870387 #>  7 chr3  56220373 56221373 #>  8 chr3  57965913 57966913 #>  9 chr2  25303342 25304342 #> 10 chr3  16018594 16019594 #> # ℹ 999,990 more rows  # 500 random intervals of length 500 bed_random(genome, length = 500, n = 500, seed = 10104) #> # A tibble: 500 × 3 #>    chrom   start     end #>    <chr>   <int>   <int> #>  1 chr1   379360  379860 #>  2 chr1   394770  395270 #>  3 chr1  1215880 1216380 #>  4 chr1  1339287 1339787 #>  5 chr1  2046513 2047013 #>  6 chr1  2156755 2157255 #>  7 chr1  2189109 2189609 #>  8 chr1  2221665 2222165 #>  9 chr1  2223456 2223956 #> 10 chr1  2253135 2253635 #> # ℹ 490 more rows"},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_reldist.html","id":null,"dir":"Reference","previous_headings":"","what":"Compute relative distances between intervals. — bed_reldist","title":"Compute relative distances between intervals. — bed_reldist","text":"Compute relative distances intervals.","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_reldist.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Compute relative distances between intervals. — bed_reldist","text":"","code":"bed_reldist(x, y, detail = FALSE)"},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_reldist.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Compute relative distances between intervals. — bed_reldist","text":"x ivl_df y ivl_df detail report relative distances x interval.","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_reldist.html","id":"value","dir":"Reference","previous_headings":"","what":"Value","title":"Compute relative distances between intervals. — bed_reldist","text":"detail = FALSE, ivl_df summarizes calculated .reldist values following columns: .reldist relative distance metric .counts number metric observations .total total observations .freq frequency observation detail = TRUE, .reldist column reports relative distance input x interval.","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_reldist.html","id":"details","dir":"Reference","previous_headings":"","what":"Details","title":"Compute relative distances between intervals. — bed_reldist","text":"Interval statistics can used combination dplyr::group_by() dplyr::() calculate statistics subsets data. See vignette('interval-stats') examples.","code":""},{"path":[]},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_reldist.html","id":"ref-examples","dir":"Reference","previous_headings":"","what":"Examples","title":"Compute relative distances between intervals. — bed_reldist","text":"","code":"genome <- read_genome(valr_example(\"hg19.chrom.sizes.gz\"))  x <- bed_random(genome, seed = 1010486) y <- bed_random(genome, seed = 9203911)  bed_reldist(x, y) #> # A tibble: 51 × 4 #>    .reldist .counts .total  .freq #>       <dbl>   <int>  <int>  <dbl> #>  1     0      20202 999938 0.0202 #>  2     0.01   20031 999938 0.0200 #>  3     0.02   19977 999938 0.0200 #>  4     0.03   19871 999938 0.0199 #>  5     0.04   20129 999938 0.0201 #>  6     0.05   20197 999938 0.0202 #>  7     0.06   20020 999938 0.0200 #>  8     0.07   20063 999938 0.0201 #>  9     0.08   20053 999938 0.0201 #> 10     0.09   20021 999938 0.0200 #> # ℹ 41 more rows  bed_reldist(x, y, detail = TRUE) #> # A tibble: 999,938 × 4 #>    chrom start   end .reldist #>    <chr> <int> <int>    <dbl> #>  1 chr1   5184  6184   0.270  #>  2 chr1   7663  8663   0.226  #>  3 chr1   9858 10858   0.317  #>  4 chr1  13805 14805   0.361  #>  5 chr1  14081 15081   0.402  #>  6 chr1  16398 17398   0.253  #>  7 chr1  17486 18486   0.0912 #>  8 chr1  22063 23063   0.107  #>  9 chr1  22494 23494   0.207  #> 10 chr1  29351 30351   0.400  #> # ℹ 999,928 more rows"},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_shift.html","id":null,"dir":"Reference","previous_headings":"","what":"Adjust intervals by a fixed size. — bed_shift","title":"Adjust intervals by a fixed size. — bed_shift","text":"--bounds intervals removed default.","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_shift.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Adjust intervals by a fixed size. — bed_shift","text":"","code":"bed_shift(x, genome, size = 0, fraction = 0, trim = FALSE)"},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_shift.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Adjust intervals by a fixed size. — bed_shift","text":"x ivl_df genome ivl_df size number bases shift. positive numbers shift right, negative shift left. fraction define size fraction interval trim adjust coordinates --bounds intervals","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_shift.html","id":"value","dir":"Reference","previous_headings":"","what":"Value","title":"Adjust intervals by a fixed size. — bed_shift","text":"ivl_df","code":""},{"path":[]},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_shift.html","id":"ref-examples","dir":"Reference","previous_headings":"","what":"Examples","title":"Adjust intervals by a fixed size. — bed_shift","text":"","code":"x <- tibble::tribble(   ~chrom, ~start, ~end,   \"chr1\", 25, 50,   \"chr1\", 100, 125 )  genome <- tibble::tribble(   ~chrom, ~size,   \"chr1\", 125 )  bed_glyph(bed_shift(x, genome, size = -20))   x <- tibble::tribble(   ~chrom, ~start, ~end, ~strand,   \"chr1\", 100,    150,  \"+\",   \"chr1\", 200,    250,  \"+\",   \"chr2\", 300,    350,  \"+\",   \"chr2\", 400,    450,  \"-\",   \"chr3\", 500,    550,  \"-\",   \"chr3\", 600,    650,  \"-\" )  genome <- tibble::tribble(   ~chrom, ~size,   \"chr1\", 1000,   \"chr2\", 2000,   \"chr3\", 3000 )  bed_shift(x, genome, 100) #> # A tibble: 6 × 4 #>   chrom start   end strand #>   <chr> <dbl> <dbl> <chr>  #> 1 chr1    200   250 +      #> 2 chr1    300   350 +      #> 3 chr2    400   450 +      #> 4 chr2    500   550 -      #> 5 chr3    600   650 -      #> 6 chr3    700   750 -       bed_shift(x, genome, fraction = 0.5) #> # A tibble: 6 × 4 #>   chrom start   end strand #>   <chr> <dbl> <dbl> <chr>  #> 1 chr1    125   175 +      #> 2 chr1    225   275 +      #> 3 chr2    325   375 +      #> 4 chr2    425   475 -      #> 5 chr3    525   575 -      #> 6 chr3    625   675 -       # shift with respect to strand stranded <- dplyr::group_by(x, strand) bed_shift(stranded, genome, 100) #> # A tibble: 6 × 4 #>   chrom start   end strand #>   <chr> <dbl> <dbl> <chr>  #> 1 chr1    200   250 +      #> 2 chr1    300   350 +      #> 3 chr2    400   450 +      #> 4 chr2    300   350 -      #> 5 chr3    400   450 -      #> 6 chr3    500   550 -"},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_shuffle.html","id":null,"dir":"Reference","previous_headings":"","what":"Shuffle input intervals. — bed_shuffle","title":"Shuffle input intervals. — bed_shuffle","text":"Shuffle input intervals.","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_shuffle.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Shuffle input intervals. — bed_shuffle","text":"","code":"bed_shuffle(   x,   genome,   incl = NULL,   excl = NULL,   max_tries = 1000,   within = FALSE,   seed = 0 )"},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_shuffle.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Shuffle input intervals. — bed_shuffle","text":"x ivl_df genome genome_df incl ivl_df included intervals excl ivl_df excluded intervals max_tries maximum tries identify bounded interval within shuffle within chromosomes seed seed reproducible intervals","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_shuffle.html","id":"value","dir":"Reference","previous_headings":"","what":"Value","title":"Shuffle input intervals. — bed_shuffle","text":"ivl_df","code":""},{"path":[]},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_shuffle.html","id":"ref-examples","dir":"Reference","previous_headings":"","what":"Examples","title":"Shuffle input intervals. — bed_shuffle","text":"","code":"genome <- tibble::tribble(   ~chrom, ~size,   \"chr1\", 1e6,   \"chr2\", 2e6,   \"chr3\", 4e6 )  x <- bed_random(genome, seed = 1010486)  bed_shuffle(x, genome, seed = 9830491) #> # A tibble: 1,000,000 × 3 #>    chrom   start     end #>    <chr>   <int>   <int> #>  1 chr2  1463822 1464822 #>  2 chr2   619967  620967 #>  3 chr2  1769865 1770865 #>  4 chr2   203953  204953 #>  5 chr3  2119387 2120387 #>  6 chr2  1216667 1217667 #>  7 chr3  2109652 2110652 #>  8 chr2   213473  214473 #>  9 chr1   154156  155156 #> 10 chr3  2201278 2202278 #> # ℹ 999,990 more rows"},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_slop.html","id":null,"dir":"Reference","previous_headings":"","what":"Increase the size of input intervals. — bed_slop","title":"Increase the size of input intervals. — bed_slop","text":"Increase size input intervals.","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_slop.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Increase the size of input intervals. — bed_slop","text":"","code":"bed_slop(   x,   genome,   both = 0,   left = 0,   right = 0,   fraction = FALSE,   strand = FALSE,   trim = FALSE,   ... )"},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_slop.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Increase the size of input intervals. — bed_slop","text":"x ivl_df genome genome_df number bases sizes left number bases left side right number bases right side fraction define flanks based fraction interval length strand define left right based strand trim adjust coordinates --bounds intervals ... extra arguments (used)","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_slop.html","id":"value","dir":"Reference","previous_headings":"","what":"Value","title":"Increase the size of input intervals. — bed_slop","text":"ivl_df","code":""},{"path":[]},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_slop.html","id":"ref-examples","dir":"Reference","previous_headings":"","what":"Examples","title":"Increase the size of input intervals. — bed_slop","text":"","code":"x <- tibble::tribble(   ~chrom, ~start, ~end,   \"chr1\", 110,    120,   \"chr1\", 225,    235 )  genome <- tibble::tribble(   ~chrom, ~size,   \"chr1\", 400 )  bed_glyph(bed_slop(x, genome, both = 20, trim = TRUE))   genome <- tibble::tribble(   ~chrom, ~size,   \"chr1\", 5000 )  x <- tibble::tribble(   ~chrom, ~start, ~end, ~name, ~score, ~strand,   \"chr1\", 500, 1000, \".\", \".\", \"+\",   \"chr1\", 1000, 1500, \".\", \".\", \"-\" )  bed_slop(x, genome, left = 100) #> # A tibble: 2 × 6 #>   chrom start   end name  score strand #>   <chr> <dbl> <dbl> <chr> <chr> <chr>  #> 1 chr1    400  1000 .     .     +      #> 2 chr1    900  1500 .     .     -       bed_slop(x, genome, right = 100) #> # A tibble: 2 × 6 #>   chrom start   end name  score strand #>   <chr> <dbl> <dbl> <chr> <chr> <chr>  #> 1 chr1    500  1100 .     .     +      #> 2 chr1   1000  1600 .     .     -       bed_slop(x, genome, both = 100) #> # A tibble: 2 × 6 #>   chrom start   end name  score strand #>   <chr> <dbl> <dbl> <chr> <chr> <chr>  #> 1 chr1    400  1100 .     .     +      #> 2 chr1    900  1600 .     .     -       bed_slop(x, genome, both = 0.5, fraction = TRUE) #> # A tibble: 2 × 6 #>   chrom start   end name  score strand #>   <chr> <dbl> <dbl> <chr> <chr> <chr>  #> 1 chr1    250  1250 .     .     +      #> 2 chr1    750  1750 .     .     -"},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_sort.html","id":null,"dir":"Reference","previous_headings":"","what":"Sort a set of intervals. — bed_sort","title":"Sort a set of intervals. — bed_sort","text":"Sort set intervals.","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_sort.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Sort a set of intervals. — bed_sort","text":"","code":"bed_sort(x, by_size = FALSE, by_chrom = FALSE, reverse = FALSE)"},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_sort.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Sort a set of intervals. — bed_sort","text":"x ivl_df by_size sort interval size by_chrom sort within chromosome reverse reverse sort order","code":""},{"path":[]},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_sort.html","id":"ref-examples","dir":"Reference","previous_headings":"","what":"Examples","title":"Sort a set of intervals. — bed_sort","text":"","code":"x <- tibble::tribble(   ~chrom, ~start, ~end,   \"chr8\", 500,    1000,   \"chr8\", 1000,   5000,   \"chr8\", 100,    200,   \"chr1\", 100,    300,   \"chr1\", 100,    200 )  # sort by chrom and start bed_sort(x) #> # A tibble: 5 × 3 #>   chrom start   end #>   <chr> <dbl> <dbl> #> 1 chr1    100   200 #> 2 chr1    100   300 #> 3 chr8    100   200 #> 4 chr8    500  1000 #> 5 chr8   1000  5000  # reverse sort order bed_sort(x, reverse = TRUE) #> # A tibble: 5 × 3 #>   chrom start   end #>   <chr> <dbl> <dbl> #> 1 chr1    100   300 #> 2 chr1    100   200 #> 3 chr8   1000  5000 #> 4 chr8    500  1000 #> 5 chr8    100   200  # sort by interval size bed_sort(x, by_size = TRUE) #> # A tibble: 5 × 3 #>   chrom start   end #>   <chr> <dbl> <dbl> #> 1 chr8    100   200 #> 2 chr1    100   200 #> 3 chr1    100   300 #> 4 chr8    500  1000 #> 5 chr8   1000  5000  # sort by decreasing interval size bed_sort(x, by_size = TRUE, reverse = TRUE) #> # A tibble: 5 × 3 #>   chrom start   end #>   <chr> <dbl> <dbl> #> 1 chr8   1000  5000 #> 2 chr8    500  1000 #> 3 chr1    100   300 #> 4 chr8    100   200 #> 5 chr1    100   200  # sort by interval size within chrom bed_sort(x, by_size = TRUE, by_chrom = TRUE) #> # A tibble: 5 × 3 #>   chrom start   end #>   <chr> <dbl> <dbl> #> 1 chr1    100   200 #> 2 chr1    100   300 #> 3 chr8    100   200 #> 4 chr8    500  1000 #> 5 chr8   1000  5000"},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_subtract.html","id":null,"dir":"Reference","previous_headings":"","what":"Subtract two sets of intervals. — bed_subtract","title":"Subtract two sets of intervals. — bed_subtract","text":"Subtract y intervals x intervals.","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_subtract.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Subtract two sets of intervals. — bed_subtract","text":"","code":"bed_subtract(x, y, any = FALSE)"},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_subtract.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Subtract two sets of intervals. — bed_subtract","text":"x ivl_df y ivl_df remove x intervals overlap y","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_subtract.html","id":"details","dir":"Reference","previous_headings":"","what":"Details","title":"Subtract two sets of intervals. — bed_subtract","text":"input tbls grouped chrom default, additional groups can added using dplyr::group_by(). example, grouping strand constrain analyses strand. compare opposing strands across two tbls, strands y tbl can first inverted using flip_strands().","code":""},{"path":[]},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_subtract.html","id":"ref-examples","dir":"Reference","previous_headings":"","what":"Examples","title":"Subtract two sets of intervals. — bed_subtract","text":"","code":"x <- tibble::tribble(   ~chrom, ~start, ~end,   \"chr1\", 1,      100 )  y <- tibble::tribble(   ~chrom, ~start, ~end,   \"chr1\", 50,     75 )  bed_glyph(bed_subtract(x, y))   x <- tibble::tribble(   ~chrom, ~start, ~end,   \"chr1\", 100,    200,   \"chr1\", 250,    400,   \"chr1\", 500,    600,   \"chr1\", 1000,   1200,   \"chr1\", 1300,   1500 )  y <- tibble::tribble(   ~chrom, ~start, ~end,   \"chr1\", 150,    175,   \"chr1\", 510,    525,   \"chr1\", 550,    575,   \"chr1\", 900,    1050,   \"chr1\", 1150,   1250,   \"chr1\", 1299,   1501 )  bed_subtract(x, y) #> # A tibble: 7 × 3 #>   chrom start   end #>   <chr> <dbl> <dbl> #> 1 chr1    100   150 #> 2 chr1    175   200 #> 3 chr1    250   400 #> 4 chr1    500   510 #> 5 chr1    525   550 #> 6 chr1    575   600 #> 7 chr1   1050  1150  bed_subtract(x, y, any = TRUE) #> # A tibble: 1 × 3 #>   chrom start   end #>   <chr> <dbl> <dbl> #> 1 chr1    250   400"},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_window.html","id":null,"dir":"Reference","previous_headings":"","what":"Identify intervals within a specified distance. — bed_window","title":"Identify intervals within a specified distance. — bed_window","text":"Identify intervals within specified distance.","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_window.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Identify intervals within a specified distance. — bed_window","text":"","code":"bed_window(x, y, genome, ...)"},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_window.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Identify intervals within a specified distance. — bed_window","text":"x ivl_df y ivl_df genome genome_df ... params bed_slop bed_intersect","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_window.html","id":"details","dir":"Reference","previous_headings":"","what":"Details","title":"Identify intervals within a specified distance. — bed_window","text":"input tbls grouped chrom default, additional groups can added using dplyr::group_by(). example, grouping strand constrain analyses strand. compare opposing strands across two tbls, strands y tbl can first inverted using flip_strands().","code":""},{"path":[]},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_window.html","id":"ref-examples","dir":"Reference","previous_headings":"","what":"Examples","title":"Identify intervals within a specified distance. — bed_window","text":"","code":"x <- tibble::tribble(   ~chrom, ~start, ~end,   \"chr1\", 25,     50,   \"chr1\", 100,    125 )  y <- tibble::tribble(   ~chrom, ~start, ~end,   \"chr1\", 60,     75 )  genome <- tibble::tribble(   ~chrom, ~size,   \"chr1\", 125 )  bed_glyph(bed_window(x, y, genome, both = 15))   x <- tibble::tribble(   ~chrom, ~start, ~end,   \"chr1\", 10, 100,   \"chr2\", 200, 400,   \"chr2\", 300, 500,   \"chr2\", 800, 900 )  y <- tibble::tribble(   ~chrom, ~start, ~end,   \"chr1\", 150,    400,   \"chr2\", 230,    430,   \"chr2\", 350,    430 )  genome <- tibble::tribble(   ~chrom, ~size,   \"chr1\", 500,   \"chr2\", 1000 )  bed_window(x, y, genome, both = 100) #> # A tibble: 4 × 7 #>   chrom start.x end.x start.y end.y .source .overlap #>   <chr>   <dbl> <dbl>   <dbl> <dbl> <chr>      <int> #> 1 chr2      200   400     230   430 1            200 #> 2 chr2      200   400     350   430 1             80 #> 3 chr2      300   500     230   430 1            200 #> 4 chr2      300   500     350   430 1             80"},{"path":"https://rnabioco.github.io/valr/dev/reference/bound_intervals.html","id":null,"dir":"Reference","previous_headings":"","what":"Select intervals bounded by a genome. — bound_intervals","title":"Select intervals bounded by a genome. — bound_intervals","text":"Used remove --bounds intervals, trim interval coordinates using genome.","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/bound_intervals.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Select intervals bounded by a genome. — bound_intervals","text":"","code":"bound_intervals(x, genome, trim = FALSE)"},{"path":"https://rnabioco.github.io/valr/dev/reference/bound_intervals.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Select intervals bounded by a genome. — bound_intervals","text":"x ivl_df genome genome_df trim adjust coordinates --bounds intervals","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/bound_intervals.html","id":"value","dir":"Reference","previous_headings":"","what":"Value","title":"Select intervals bounded by a genome. — bound_intervals","text":"ivl_df","code":""},{"path":[]},{"path":"https://rnabioco.github.io/valr/dev/reference/bound_intervals.html","id":"ref-examples","dir":"Reference","previous_headings":"","what":"Examples","title":"Select intervals bounded by a genome. — bound_intervals","text":"","code":"x <- tibble::tribble(   ~chrom, ~start, ~end,   \"chr1\", -100,   500,   \"chr1\", 100,    1e9,   \"chr1\", 500,    1000 )  genome <- read_genome(valr_example(\"hg19.chrom.sizes.gz\"))  # out-of-bounds are removed by default ... bound_intervals(x, genome) #> # A tibble: 1 × 3 #>   chrom start   end #>   <chr> <dbl> <dbl> #> 1 chr1    500  1000  # ... or can be trimmed within the bounds of a genome bound_intervals(x, genome, trim = TRUE) #> # A tibble: 3 × 3 #>   chrom start       end #>   <chr> <dbl>     <dbl> #> 1 chr1      0       500 #> 2 chr1    100 249250621 #> 3 chr1    500      1000"},{"path":"https://rnabioco.github.io/valr/dev/reference/create_introns.html","id":null,"dir":"Reference","previous_headings":"","what":"Create intron features. — create_introns","title":"Create intron features. — create_introns","text":"Numbers score column intron numbers 5' 3' independent strand. .e., first introns + - strand genes score values 1.","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/create_introns.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Create intron features. — create_introns","text":"","code":"create_introns(x)"},{"path":"https://rnabioco.github.io/valr/dev/reference/create_introns.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Create intron features. — create_introns","text":"x ivl_df BED12 format","code":""},{"path":[]},{"path":"https://rnabioco.github.io/valr/dev/reference/create_introns.html","id":"ref-examples","dir":"Reference","previous_headings":"","what":"Examples","title":"Create intron features. — create_introns","text":"","code":"x <- read_bed12(valr_example(\"mm9.refGene.bed.gz\"))  create_introns(x) #> # A tibble: 1,583 × 6 #>    chrom   start     end name         score strand #>    <chr>   <int>   <int> <chr>        <dbl> <chr>  #>  1 chr1  3207049 3411782 NM_001011874     2 -      #>  2 chr1  3411982 3660632 NM_001011874     1 -      #>  3 chr1  4283093 4341990 NM_001195662     3 -      #>  4 chr1  4342162 4342282 NM_001195662     2 -      #>  5 chr1  4342918 4399250 NM_001195662     1 -      #>  6 chr1  4848057 4857550 NM_001159750     1 +      #>  7 chr1  4848057 4857550 NM_011541        1 +      #>  8 chr1  4848584 4857550 NM_001159751     1 +      #>  9 chr1  4857613 4868107 NM_001159750     2 +      #> 10 chr1  4857613 4868107 NM_011541        2 +      #> # ℹ 1,573 more rows"},{"path":"https://rnabioco.github.io/valr/dev/reference/create_tss.html","id":null,"dir":"Reference","previous_headings":"","what":"Create transcription start site features. — create_tss","title":"Create transcription start site features. — create_tss","text":"Create transcription start site features.","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/create_tss.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Create transcription start site features. — create_tss","text":"","code":"create_tss(x)"},{"path":"https://rnabioco.github.io/valr/dev/reference/create_tss.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Create transcription start site features. — create_tss","text":"x ivl_df BED format","code":""},{"path":[]},{"path":"https://rnabioco.github.io/valr/dev/reference/create_tss.html","id":"ref-examples","dir":"Reference","previous_headings":"","what":"Examples","title":"Create transcription start site features. — create_tss","text":"","code":"x <- read_bed12(valr_example(\"mm9.refGene.bed.gz\"))  create_tss(x) #> # A tibble: 100 × 6 #>    chrom   start     end name         score strand #>    <chr>   <dbl>   <dbl> <chr>        <chr> <chr>  #>  1 chr1  3661578 3661579 NM_001011874 0     -      #>  2 chr1  4399321 4399322 NM_001195662 0     -      #>  3 chr1  4847774 4847775 NM_001159750 0     +      #>  4 chr1  4847774 4847775 NM_011541    0     +      #>  5 chr1  4848408 4848409 NM_001159751 0     +      #>  6 chr1  5008814 5008815 NM_001290372 0     -      #>  7 chr1  5009619 5009620 NM_021374    0     -      #>  8 chr1  5060365 5060366 NM_001177795 0     -      #>  9 chr1  5073166 5073167 NM_001310442 0     +      #> 10 chr1  5073166 5073167 NM_133826    0     +      #> # ℹ 90 more rows"},{"path":"https://rnabioco.github.io/valr/dev/reference/create_utrs3.html","id":null,"dir":"Reference","previous_headings":"","what":"Create 3' UTR features. — create_utrs3","title":"Create 3' UTR features. — create_utrs3","text":"Create 3' UTR features.","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/create_utrs3.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Create 3' UTR features. — create_utrs3","text":"","code":"create_utrs3(x)"},{"path":"https://rnabioco.github.io/valr/dev/reference/create_utrs3.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Create 3' UTR features. — create_utrs3","text":"x ivl_df BED12 format","code":""},{"path":[]},{"path":"https://rnabioco.github.io/valr/dev/reference/create_utrs3.html","id":"ref-examples","dir":"Reference","previous_headings":"","what":"Examples","title":"Create 3' UTR features. — create_utrs3","text":"","code":"x <- read_bed12(valr_example(\"mm9.refGene.bed.gz\"))  create_utrs3(x) #> # A tibble: 99 × 6 #>    chrom   start     end name         score strand #>    <chr>   <int>   <int> <chr>        <chr> <chr>  #>  1 chr1  3204562 3206102 NM_001011874 0     -      #>  2 chr1  4280926 4283061 NM_001195662 0     -      #>  3 chr1  4886445 4887990 NM_001159750 0     +      #>  4 chr1  4886445 4887990 NM_011541    0     +      #>  5 chr1  4886445 4887990 NM_001159751 0     +      #>  6 chr1  4899656 4900554 NM_001290372 0     -      #>  7 chr1  4899656 4900554 NM_021374    0     -      #>  8 chr1  4899656 4900554 NM_001177795 0     -      #>  9 chr1  5152246 5152630 NM_001310442 0     +      #> 10 chr1  5152246 5152630 NM_133826    0     +      #> # ℹ 89 more rows"},{"path":"https://rnabioco.github.io/valr/dev/reference/create_utrs5.html","id":null,"dir":"Reference","previous_headings":"","what":"Create 5' UTR features. — create_utrs5","title":"Create 5' UTR features. — create_utrs5","text":"Create 5' UTR features.","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/create_utrs5.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Create 5' UTR features. — create_utrs5","text":"","code":"create_utrs5(x)"},{"path":"https://rnabioco.github.io/valr/dev/reference/create_utrs5.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Create 5' UTR features. — create_utrs5","text":"x ivl_df BED12 format","code":""},{"path":[]},{"path":"https://rnabioco.github.io/valr/dev/reference/create_utrs5.html","id":"ref-examples","dir":"Reference","previous_headings":"","what":"Examples","title":"Create 5' UTR features. — create_utrs5","text":"","code":"x <- read_bed12(valr_example(\"mm9.refGene.bed.gz\"))  create_utrs5(x) #> # A tibble: 97 × 6 #>    chrom   start     end name         score strand #>    <chr>   <int>   <int> <chr>        <chr> <chr>  #>  1 chr1  3661429 3661579 NM_001011874 0     -      #>  2 chr1  4399268 4399322 NM_001195662 0     -      #>  3 chr1  4847774 4847994 NM_001159750 0     +      #>  4 chr1  4847774 4847994 NM_011541    0     +      #>  5 chr1  4848408 4848488 NM_001159751 0     +      #>  6 chr1  4914046 5008815 NM_001290372 0     -      #>  7 chr1  5009460 5009620 NM_021374    0     -      #>  8 chr1  5060258 5060366 NM_001177795 0     -      #>  9 chr1  5073166 5074531 NM_001310442 0     +      #> 10 chr1  5073166 5074531 NM_133826    0     +      #> # ℹ 87 more rows"},{"path":"https://rnabioco.github.io/valr/dev/reference/db.html","id":null,"dir":"Reference","previous_headings":"","what":"Fetch data from remote databases. — db","title":"Fetch data from remote databases. — db","text":"Currently db_ucsc db_ensembl available connections.","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/db.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Fetch data from remote databases. — db","text":"","code":"db_ucsc(   dbname,   host = \"genome-mysql.cse.ucsc.edu\",   user = \"genomep\",   password = \"password\",   port = 3306,   ... )  db_ensembl(   dbname,   host = \"ensembldb.ensembl.org\",   user = \"anonymous\",   password = \"\",   port = 3306,   ... )"},{"path":"https://rnabioco.github.io/valr/dev/reference/db.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Fetch data from remote databases. — db","text":"dbname name database host hostname user username password password port MySQL connection port ... params connection","code":""},{"path":[]},{"path":"https://rnabioco.github.io/valr/dev/reference/db.html","id":"ref-examples","dir":"Reference","previous_headings":"","what":"Examples","title":"Fetch data from remote databases. — db","text":"","code":"if (FALSE) { if (require(RMariaDB)) {   library(dplyr)   ucsc <- db_ucsc(\"hg38\")    # fetch the `refGene` tbl   tbl(ucsc, \"refGene\")    # the `chromInfo` tbls have size information   tbl(ucsc, \"chromInfo\") } } if (FALSE) { if (require(RMariaDB)) {   library(dplyr)   # squirrel genome   ensembl <- db_ensembl(\"spermophilus_tridecemlineatus_core_67_2\")    tbl(ensembl, \"gene\") } }"},{"path":"https://rnabioco.github.io/valr/dev/reference/flip_strands.html","id":null,"dir":"Reference","previous_headings":"","what":"Flip strands in intervals. — flip_strands","title":"Flip strands in intervals. — flip_strands","text":"Flips positive (+) stranded intervals negative (-) strands, vice-versa. Facilitates comparisons among intervals opposing strands.","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/flip_strands.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Flip strands in intervals. — flip_strands","text":"","code":"flip_strands(x)"},{"path":"https://rnabioco.github.io/valr/dev/reference/flip_strands.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Flip strands in intervals. — flip_strands","text":"x ivl_df","code":""},{"path":[]},{"path":"https://rnabioco.github.io/valr/dev/reference/flip_strands.html","id":"ref-examples","dir":"Reference","previous_headings":"","what":"Examples","title":"Flip strands in intervals. — flip_strands","text":"","code":"x <- tibble::tribble(   ~chrom, ~start, ~end, ~strand,   \"chr1\", 1,      100,  \"+\",   \"chr2\", 1,      100,  \"-\" )  flip_strands(x) #> # A tibble: 2 × 4 #>   chrom start   end strand #>   <chr> <dbl> <dbl> <chr>  #> 1 chr1      1   100 -      #> 2 chr2      1   100 +"},{"path":"https://rnabioco.github.io/valr/dev/reference/gr_to_bed.html","id":null,"dir":"Reference","previous_headings":"","what":"Convert Granges to bed tibble — gr_to_bed","title":"Convert Granges to bed tibble — gr_to_bed","text":"Convert Granges bed tibble","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/gr_to_bed.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Convert Granges to bed tibble — gr_to_bed","text":"","code":"gr_to_bed(x)"},{"path":"https://rnabioco.github.io/valr/dev/reference/gr_to_bed.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Convert Granges to bed tibble — gr_to_bed","text":"x GRanges object convert bed tibble.","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/gr_to_bed.html","id":"value","dir":"Reference","previous_headings":"","what":"Value","title":"Convert Granges to bed tibble — gr_to_bed","text":"tibble::tibble()","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/gr_to_bed.html","id":"ref-examples","dir":"Reference","previous_headings":"","what":"Examples","title":"Convert Granges to bed tibble — gr_to_bed","text":"","code":"if (FALSE) { gr <- GenomicRanges::GRanges(   seqnames = S4Vectors::Rle(     c(\"chr1\", \"chr2\", \"chr1\", \"chr3\"),     c(1, 1, 1, 1)   ),   ranges = IRanges::IRanges(     start = c(1, 10, 50, 100),     end = c(100, 500, 1000, 2000),     names = head(letters, 4)   ),   strand = S4Vectors::Rle(     c(\"-\", \"+\"), c(2, 2)   ) )  gr_to_bed(gr)  # There are two ways to convert a bed-like data.frame to GRanges:  gr <- GenomicRanges::GRanges(   seqnames = S4Vectors::Rle(x$chrom),   ranges = IRanges::IRanges(     start = x$start + 1,     end = x$end,     names = x$name   ),   strand = S4Vectors::Rle(x$strand) ) # or:  gr <- GenomicRanges::makeGRangesFromDataFrame(dplyr::mutate(x, start = start + 1)) }"},{"path":"https://rnabioco.github.io/valr/dev/reference/id.html","id":null,"dir":"Reference","previous_headings":"","what":"Plyr function id packaged due to plyr being retired\nCompute a unique numeric id for each unique row in a data frame. — id","title":"Plyr function id packaged due to plyr being retired\nCompute a unique numeric id for each unique row in a data frame. — id","text":"Properties: order(id) equivalent .call(order, df) rows containing data value drop = FALSE room possibilites","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/id.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Plyr function id packaged due to plyr being retired\nCompute a unique numeric id for each unique row in a data frame. — id","text":"","code":"id(.variables, drop = FALSE)"},{"path":"https://rnabioco.github.io/valr/dev/reference/id.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Plyr function id packaged due to plyr being retired\nCompute a unique numeric id for each unique row in a data frame. — id","text":".variables list variables drop drop unusued factor levels?","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/id.html","id":"value","dir":"Reference","previous_headings":"","what":"Value","title":"Plyr function id packaged due to plyr being retired\nCompute a unique numeric id for each unique row in a data frame. — id","text":"numeric vector attribute n, giving total number possibilities","code":""},{"path":[]},{"path":"https://rnabioco.github.io/valr/dev/reference/id_var.html","id":null,"dir":"Reference","previous_headings":"","what":"Plyr function id_var packaged due to plyr being retired\nNumeric id for a vector. — id_var","title":"Plyr function id_var packaged due to plyr being retired\nNumeric id for a vector. — id_var","text":"Plyr function id_var packaged due plyr retired Numeric id vector.","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/id_var.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Plyr function id_var packaged due to plyr being retired\nNumeric id for a vector. — id_var","text":"","code":"id_var(x, drop = FALSE)"},{"path":"https://rnabioco.github.io/valr/dev/reference/interval_spacing.html","id":null,"dir":"Reference","previous_headings":"","what":"Calculate interval spacing. — interval_spacing","title":"Calculate interval spacing. — interval_spacing","text":"Spacing first interval chromosome undefined (NA). leading interval overlapping interval pair negative value.","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/interval_spacing.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Calculate interval spacing. — interval_spacing","text":"","code":"interval_spacing(x)"},{"path":"https://rnabioco.github.io/valr/dev/reference/interval_spacing.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Calculate interval spacing. — interval_spacing","text":"x ivl_df","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/interval_spacing.html","id":"value","dir":"Reference","previous_headings":"","what":"Value","title":"Calculate interval spacing. — interval_spacing","text":"ivl_df .spacing column.","code":""},{"path":[]},{"path":"https://rnabioco.github.io/valr/dev/reference/interval_spacing.html","id":"ref-examples","dir":"Reference","previous_headings":"","what":"Examples","title":"Calculate interval spacing. — interval_spacing","text":"","code":"x <- tibble::tribble(   ~chrom, ~start, ~end,   \"chr1\", 1,      100,   \"chr1\", 150,    200,   \"chr2\", 200,    300 )  interval_spacing(x) #> # A tibble: 3 × 4 #>   chrom start   end .spacing #>   <chr> <dbl> <dbl>    <dbl> #> 1 chr1      1   100       NA #> 2 chr1    150   200       50 #> 3 chr2    200   300       NA"},{"path":"https://rnabioco.github.io/valr/dev/reference/ivl_df.html","id":null,"dir":"Reference","previous_headings":"","what":"Bed-like data.frame requirements for valr functions — ivl_df","title":"Bed-like data.frame requirements for valr functions — ivl_df","text":"Required column names interval dataframes chrom, start end. Internally interval dataframes validated using check_interval() Required column names genome dataframes chrom size. Internally genome dataframes validated using check_genome().","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/ivl_df.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Bed-like data.frame requirements for valr functions — ivl_df","text":"","code":"check_interval(x)  check_genome(x)"},{"path":"https://rnabioco.github.io/valr/dev/reference/ivl_df.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Bed-like data.frame requirements for valr functions — ivl_df","text":"x data.frame tibble::tibble","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/ivl_df.html","id":"ref-examples","dir":"Reference","previous_headings":"","what":"Examples","title":"Bed-like data.frame requirements for valr functions — ivl_df","text":"","code":"# using tibble x <- tibble::tribble(   ~chrom, ~start, ~end,   \"chr1\", 1, 50,   \"chr1\", 10, 75,   \"chr1\", 100, 120 )  check_interval(x) #> # A tibble: 3 × 3 #>   chrom start   end #>   <chr> <dbl> <dbl> #> 1 chr1      1    50 #> 2 chr1     10    75 #> 3 chr1    100   120  # using base R data.frame x <- data.frame(   chrom = \"chr1\",   start = 0,   end = 100,   stringsAsFactors = FALSE )  check_interval(x) #> # A tibble: 1 × 3 #>   chrom start   end #>   <chr> <dbl> <dbl> #> 1 chr1      0   100  # example genome input  x <- tibble::tribble(   ~chrom, ~size,   \"chr1\", 1e6 )  check_genome(x) #> # A tibble: 1 × 2 #>   chrom    size #>   <chr>   <dbl> #> 1 chr1  1000000"},{"path":"https://rnabioco.github.io/valr/dev/reference/read_bed.html","id":null,"dir":"Reference","previous_headings":"","what":"Read BED and related files. — read_bed","title":"Read BED and related files. — read_bed","text":"read functions BED related formats. Filenames can local file URLs. read functions load data tbls consistent chrom, start end colnames.","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/read_bed.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Read BED and related files. — read_bed","text":"","code":"read_bed(   filename,   col_types = bed12_coltypes,   sort = TRUE,   ...,   n_fields = NULL )  read_bed12(filename, ...)  read_bedgraph(filename, ...)  read_narrowpeak(filename, ...)  read_broadpeak(filename, ...)"},{"path":"https://rnabioco.github.io/valr/dev/reference/read_bed.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Read BED and related files. — read_bed","text":"filename file URL col_types column type spec readr::read_tsv() sort sort tbl chrom start ... options pass readr::read_tsv() n_fields","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/read_bed.html","id":"value","dir":"Reference","previous_headings":"","what":"Value","title":"Read BED and related files. — read_bed","text":"ivl_df","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/read_bed.html","id":"details","dir":"Reference","previous_headings":"","what":"Details","title":"Read BED and related files. — read_bed","text":"https://genome.ucsc.edu/FAQ/FAQformat.html#format1 https://genome.ucsc.edu/FAQ/FAQformat.html#format1 https://genome.ucsc.edu/goldenPath/help/bedgraph.html https://genome.ucsc.edu/FAQ/FAQformat.html#format12 https://genome.ucsc.edu/FAQ/FAQformat.html#format13","code":""},{"path":[]},{"path":"https://rnabioco.github.io/valr/dev/reference/read_bed.html","id":"ref-examples","dir":"Reference","previous_headings":"","what":"Examples","title":"Read BED and related files. — read_bed","text":"","code":"# read_bed assumes 3 field BED format. read_bed(valr_example(\"3fields.bed.gz\")) #> # A tibble: 10 × 3 #>    chrom  start    end #>    <chr>  <int>  <int> #>  1 chr1   11873  14409 #>  2 chr1   14361  19759 #>  3 chr1   14406  29370 #>  4 chr1   34610  36081 #>  5 chr1   69090  70008 #>  6 chr1  134772 140566 #>  7 chr1  321083 321115 #>  8 chr1  321145 321207 #>  9 chr1  322036 326938 #> 10 chr1  327545 328439  # result is sorted by chrom and start unless `sort = FALSE` read_bed(valr_example(\"3fields.bed.gz\"), sort = FALSE) #> # A tibble: 10 × 3 #>    chrom  start    end #>    <chr>  <int>  <int> #>  1 chr1   11873  14409 #>  2 chr1   14361  19759 #>  3 chr1   14406  29370 #>  4 chr1   34610  36081 #>  5 chr1   69090  70008 #>  6 chr1  134772 140566 #>  7 chr1  321083 321115 #>  8 chr1  321145 321207 #>  9 chr1  322036 326938 #> 10 chr1  327545 328439   read_bed12(valr_example(\"mm9.refGene.bed.gz\")) #> # A tibble: 100 × 12 #>    chrom   start     end name      score strand cds_start cds_end item_rgb #>    <chr>   <int>   <int> <chr>     <chr> <chr>      <int>   <int> <chr>    #>  1 chr1  3204562 3661579 NM_00101… 0     -        3206102 3661429 0        #>  2 chr1  4280926 4399322 NM_00119… 0     -        4283061 4399268 0        #>  3 chr1  4847774 4887990 NM_00115… 0     +        4847994 4886445 0        #>  4 chr1  4847774 4887990 NM_011541 0     +        4847994 4886445 0        #>  5 chr1  4848408 4887990 NM_00115… 0     +        4848488 4886445 0        #>  6 chr1  4899656 5008815 NM_00129… 0     -        4900554 4914046 0        #>  7 chr1  4899656 5009620 NM_021374 0     -        4900554 5009460 0        #>  8 chr1  4899656 5060366 NM_00117… 0     -        4900554 5060258 0        #>  9 chr1  5073166 5152630 NM_00131… 0     +        5074531 5152246 0        #> 10 chr1  5073166 5152630 NM_133826 0     +        5074531 5152246 0        #> # ℹ 90 more rows #> # ℹ 3 more variables: exon_count <int>, exon_sizes <chr>, #> #   exon_starts <chr>   read_bedgraph(valr_example(\"test.bg.gz\")) #> # A tibble: 4 × 4 #>   chrom    start      end value #>   <chr>    <int>    <int> <dbl> #> 1 chr19 49302000 49302300 -1    #> 2 chr19 49302300 49302600 -0.75 #> 3 chr19 49302600 49302900 -0.5  #> 4 chr19 49302900 49303200 -0.25   read_narrowpeak(valr_example(\"sample.narrowPeak.gz\")) #> # A tibble: 570 × 10 #>    chrom    start      end name  score strand signal pvalue qvalue  peak #>    <chr>    <int>    <int> <chr> <int> <chr>   <dbl>  <dbl>  <dbl> <int> #>  1 chr22 17372940 17373090 .         0 .           4   4.63     -1    -1 #>  2 chr22 17392200 17392350 .         0 .           5   4.67     -1    -1 #>  3 chr22 17398400 17398550 .         0 .          10  11.6      -1    -1 #>  4 chr22 17539180 17539330 .         0 .          21  30.9      -1    -1 #>  5 chr22 17652440 17652590 .         0 .           6   5.35     -1    -1 #>  6 chr22 17652780 17652930 .         0 .          12  12.5      -1    -1 #>  7 chr22 17980800 17980950 .         0 .          12  12.6      -1    -1 #>  8 chr22 18038260 18038410 .         0 .          29  36.0      -1    -1 #>  9 chr22 18225280 18225430 .         0 .          21  25.0      -1    -1 #> 10 chr22 18268020 18268170 .         0 .          14  13.0      -1    -1 #> # ℹ 560 more rows   read_broadpeak(valr_example(\"sample.broadPeak.gz\")) #> # A tibble: 1,181 × 9 #>    chrom    start      end name  score strand signal pvalue qvalue #>    <chr>    <int>    <int> <chr> <int> <chr>   <dbl>  <dbl>  <dbl> #>  1 chr22 16847903 16848440 .       503 .       10.5     2.5     -1 #>  2 chr22 16849452 16851326 .       483 .        9.81   15.7     -1 #>  3 chr22 16849955 16850086 .      1000 .       32.4     4.2     -1 #>  4 chr22 16850694 16850924 .       831 .       22.5     4.9     -1 #>  5 chr22 16852964 16853782 .       499 .       10.4     6.2     -1 #>  6 chr22 16855065 16855803 .       477 .        9.58    3.9     -1 #>  7 chr22 16855944 16856974 .       491 .       10.1     8.5     -1 #>  8 chr22 16857425 16857958 .       505 .       10.6     2.5     -1 #>  9 chr22 16858284 16858824 .       549 .       12.2     4.5     -1 #> 10 chr22 16859972 16862024 .       404 .        6.89    9.3     -1 #> # ℹ 1,171 more rows"},{"path":"https://rnabioco.github.io/valr/dev/reference/read_bigwig.html","id":null,"dir":"Reference","previous_headings":"","what":"Import and convert a bigwig file into a valr compatible tbl — read_bigwig","title":"Import and convert a bigwig file into a valr compatible tbl — read_bigwig","text":"function output 5 column tibble zero-based chrom, start, end, score, strand columns.","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/read_bigwig.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Import and convert a bigwig file into a valr compatible tbl — read_bigwig","text":"","code":"read_bigwig(path, set_strand = \"+\")"},{"path":"https://rnabioco.github.io/valr/dev/reference/read_bigwig.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Import and convert a bigwig file into a valr compatible tbl — read_bigwig","text":"path path bigWig file set_strand strand add output (defaults \"+\")","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/read_bigwig.html","id":"note","dir":"Reference","previous_headings":"","what":"Note","title":"Import and convert a bigwig file into a valr compatible tbl — read_bigwig","text":"functions uses rtracklayer import bigwigs unstable support windows platform therefore may error windows users (particularly 32 bit window users).","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/read_bigwig.html","id":"ref-examples","dir":"Reference","previous_headings":"","what":"Examples","title":"Import and convert a bigwig file into a valr compatible tbl — read_bigwig","text":"","code":"if (FALSE) { if (.Platform$OS.type != \"windows\") {   bw <- read_bigwig(valr_example(\"hg19.dnase1.bw\"))   head(bw) } }"},{"path":"https://rnabioco.github.io/valr/dev/reference/read_genome.html","id":null,"dir":"Reference","previous_headings":"","what":"Read genome files. — read_genome","title":"Read genome files. — read_genome","text":"Genome files (UCSC \"chromSize\" files) contain chromosome name size information. sizes used downstream functions identify computed intervals coordinates outside genome bounds.","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/read_genome.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Read genome files. — read_genome","text":"","code":"read_genome(path)"},{"path":"https://rnabioco.github.io/valr/dev/reference/read_genome.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Read genome files. — read_genome","text":"path containing chrom/contig names sizes, one-pair-per-line, tab-delimited","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/read_genome.html","id":"value","dir":"Reference","previous_headings":"","what":"Value","title":"Read genome files. — read_genome","text":"genome_df, sorted size","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/read_genome.html","id":"note","dir":"Reference","previous_headings":"","what":"Note","title":"Read genome files. — read_genome","text":"URLs genome files can also used.","code":""},{"path":[]},{"path":"https://rnabioco.github.io/valr/dev/reference/read_genome.html","id":"ref-examples","dir":"Reference","previous_headings":"","what":"Examples","title":"Read genome files. — read_genome","text":"","code":"read_genome(valr_example(\"hg19.chrom.sizes.gz\")) #> # A tibble: 25 × 2 #>    chrom      size #>    <chr>     <dbl> #>  1 chr1  249250621 #>  2 chr2  243199373 #>  3 chr3  198022430 #>  4 chr4  191154276 #>  5 chr5  180915260 #>  6 chr6  171115067 #>  7 chr7  159138663 #>  8 chrX  155270560 #>  9 chr8  146364022 #> 10 chr9  141213431 #> # ℹ 15 more rows  if (FALSE) { # `read_genome` accepts a URL read_genome(\"https://genome.ucsc.edu/goldenpath/help/hg19.chrom.sizes\") }"},{"path":"https://rnabioco.github.io/valr/dev/reference/read_gtf.html","id":null,"dir":"Reference","previous_headings":"","what":"Import and convert a GTF/GFF file into a valr compatible bed tbl format — read_gtf","title":"Import and convert a GTF/GFF file into a valr compatible bed tbl format — read_gtf","text":"function output tibble required chrom, start, end columns, well columns depending content GTF/GFF file.","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/read_gtf.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Import and convert a GTF/GFF file into a valr compatible bed tbl format — read_gtf","text":"","code":"read_gtf(path, zero_based = TRUE)"},{"path":"https://rnabioco.github.io/valr/dev/reference/read_gtf.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Import and convert a GTF/GFF file into a valr compatible bed tbl format — read_gtf","text":"path path gtf gff file zero_based TRUE, convert zero based","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/read_gtf.html","id":"ref-examples","dir":"Reference","previous_headings":"","what":"Examples","title":"Import and convert a GTF/GFF file into a valr compatible bed tbl format — read_gtf","text":"","code":"gtf <- read_gtf(valr_example(\"hg19.gencode.gtf.gz\")) head(gtf) #> # A tibble: 6 × 26 #>   chrom    start      end width strand source type     score phase gene_id #>   <chr>    <int>    <int> <int> <chr>  <chr>  <chr>    <dbl> <int> <chr>   #> 1 chr2  43449540 43453748  4208 -      HAVANA gene        NA    NA ENSG00… #> 2 chr2  43449540 43453748  4208 -      HAVANA transcr…    NA    NA ENSG00… #> 3 chr2  43453403 43453748   345 -      HAVANA exon        NA    NA ENSG00… #> 4 chr2  43453403 43453454    51 -      HAVANA CDS         NA     0 ENSG00… #> 5 chr2  43453451 43453454     3 -      HAVANA start_c…    NA     0 ENSG00… #> 6 chr2  43449540 43452891  3351 -      HAVANA exon        NA    NA ENSG00… #> # ℹ 16 more variables: transcript_id <chr>, gene_type <chr>, #> #   gene_status <chr>, gene_name <chr>, transcript_type <chr>, #> #   transcript_status <chr>, transcript_name <chr>, level <chr>, #> #   havana_gene <chr>, protein_id <chr>, tag <chr>, ccdsid <chr>, #> #   havana_transcript <chr>, exon_number <chr>, exon_id <chr>, ont <chr>"},{"path":"https://rnabioco.github.io/valr/dev/reference/read_vcf.html","id":null,"dir":"Reference","previous_headings":"","what":"Read a VCF file. — read_vcf","title":"Read a VCF file. — read_vcf","text":"Read VCF file.","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/read_vcf.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Read a VCF file. — read_vcf","text":"","code":"read_vcf(vcf)"},{"path":"https://rnabioco.github.io/valr/dev/reference/read_vcf.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Read a VCF file. — read_vcf","text":"vcf vcf filename","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/read_vcf.html","id":"value","dir":"Reference","previous_headings":"","what":"Value","title":"Read a VCF file. — read_vcf","text":"data_frame","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/read_vcf.html","id":"note","dir":"Reference","previous_headings":"","what":"Note","title":"Read a VCF file. — read_vcf","text":"return value chrom, start end columns. Interval lengths size 'REF' field.","code":""},{"path":[]},{"path":"https://rnabioco.github.io/valr/dev/reference/read_vcf.html","id":"ref-examples","dir":"Reference","previous_headings":"","what":"Examples","title":"Read a VCF file. — read_vcf","text":"","code":"vcf_file <- valr_example(\"test.vcf.gz\") read_vcf(vcf_file) #> # A tibble: 11 × 18 #>    CHROM   POS ID      REF   ALT    QUAL FILTER INFO    FORMAT X1    X2    #>    <chr> <dbl> <chr>   <chr> <chr> <dbl> <chr>  <chr>   <chr>  <chr> <chr> #>  1 1        10 1:10    A     T       100 PASS   NS=5;A… GT     0/0   ./.   #>  2 1        20 1:20    G     C       100 PASS   NS=0;A… GT     ./.   ./.   #>  3 1        30 1:30    C     A       100 PASS   NS=6;A… GT     0/0   0/0   #>  4 1        40 1:40    A     C       100 PASS   NS=6;A… GT     0/0   0/0   #>  5 1     10000 1:10000 G     C       100 PASS   NS=6;A… GT     0/0   0/0   #>  6 1     20000 1:20000 T     A       100 PASS   NS=6;A… GT     1/1   1/1   #>  7 4      5000 4:5000  A     T       100 PASS   NS=6;A… GT     1/1   1/1   #>  8 4      6000 4:6000  C     T       100 PASS   NS=6;A… GT     1/1   1/1   #>  9 X       800 X:800   A     C       100 PASS   NS=6;A… GT     1/1   1/1   #> 10 X       900 X:900   A     T       100 PASS   NS=6;A… GT     1/1   1/1   #> 11 X      1000 X:1000  T     G       100 PASS   NS=5;A… GT     1/1   1/1   #> # ℹ 7 more variables: X3 <chr>, X4 <chr>, X5 <chr>, X6 <chr>, #> #   chrom <chr>, start <dbl>, end <dbl>"},{"path":"https://rnabioco.github.io/valr/dev/reference/valr.html","id":null,"dir":"Reference","previous_headings":"","what":"valr: genome interval arithmetic in R — valr","title":"valr: genome interval arithmetic in R — valr","text":"valr provides tools read manipulate intervals signals genome reference. valr developed facilitate interactive analysis genome-scale data sets, leveraging power dplyr piping.","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/valr.html","id":"details","dir":"Reference","previous_headings":"","what":"Details","title":"valr: genome interval arithmetic in R — valr","text":"learn valr, start vignette: browseVignettes(package = \"valr\")","code":""},{"path":[]},{"path":"https://rnabioco.github.io/valr/dev/reference/valr.html","id":"author","dir":"Reference","previous_headings":"","what":"Author","title":"valr: genome interval arithmetic in R — valr","text":"Jay Hesselberth jay.hesselberth@gmail.com Kent Riemondy kent.riemondy@gmail.com","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/valr_example.html","id":null,"dir":"Reference","previous_headings":"","what":"Provide working directory for valr example files. — valr_example","title":"Provide working directory for valr example files. — valr_example","text":"Provide working directory valr example files.","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/valr_example.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Provide working directory for valr example files. — valr_example","text":"","code":"valr_example(path)"},{"path":"https://rnabioco.github.io/valr/dev/reference/valr_example.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Provide working directory for valr example files. — valr_example","text":"path path file","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/valr_example.html","id":"ref-examples","dir":"Reference","previous_headings":"","what":"Examples","title":"Provide working directory for valr example files. — valr_example","text":"","code":"valr_example(\"hg19.chrom.sizes.gz\") #> [1] \"/home/runner/work/_temp/Library/valr/extdata/hg19.chrom.sizes.gz\""},{"path":"https://rnabioco.github.io/valr/dev/news/index.html","id":"valr-080","dir":"Changelog","previous_headings":"","what":"valr 0.8.0","title":"valr 0.8.0","text":"Added bed_genomecov() compute interval coverage across genome.","code":""},{"path":"https://rnabioco.github.io/valr/dev/news/index.html","id":"valr-070","dir":"Changelog","previous_headings":"","what":"valr 0.7.0","title":"valr 0.7.0","text":"CRAN release: 2023-09-18 read_bed related functions now automatically calculate fields. Use n_fields deprecated.","code":""},{"path":"https://rnabioco.github.io/valr/dev/news/index.html","id":"valr-068","dir":"Changelog","previous_headings":"","what":"valr 0.6.8","title":"valr 0.6.8","text":"CRAN release: 2023-05-16 bed_closest() now reports x intervals, even closest y intervals (e.g. matching chromosome y intervals). intervals returned populated NA .overlap, .dist y interval locations. Reimplemented bed_closest() use binary search rather interval tree search. closest y interval can missed previous search strategy high depth interval trees. Fix one error using max_dist argument bed_cluster() (#401).","code":""},{"path":"https://rnabioco.github.io/valr/dev/news/index.html","id":"valr-067","dir":"Changelog","previous_headings":"","what":"valr 0.6.7","title":"valr 0.6.7","text":"CRAN release: 2023-02-18 Removed SystemRequirements DESCRIPTION eliminate NOTE CRAN. bed_coverage() now reports intervals x matching group y (#395).","code":""},{"path":"https://rnabioco.github.io/valr/dev/news/index.html","id":"valr-066","dir":"Changelog","previous_headings":"","what":"valr 0.6.6","title":"valr 0.6.6","text":"CRAN release: 2022-10-11 Updated intervalTree header commit f0c4046 valr now uses cli consistent errors messages interactive use. deprecated genome argument bed_makewindows() removed.","code":""},{"path":"https://rnabioco.github.io/valr/dev/news/index.html","id":"valr-065","dir":"Changelog","previous_headings":"","what":"valr 0.6.5","title":"valr 0.6.5","text":"CRAN release: 2022-08-19 Handle max_dist first intervals bed_cluster() (#388)","code":""},{"path":"https://rnabioco.github.io/valr/dev/news/index.html","id":"valr-064","dir":"Changelog","previous_headings":"","what":"valr 0.6.4","title":"valr 0.6.4","text":"CRAN release: 2021-12-08 Fixed intron score numbering error create_introns (#377 @sheridar) Fixed bug handling list inputs bed_intersect()(#380 @sheridar) Added read_bigwig read_gtf functions import data valr compatible tibbles (#379) Kent Riemondy now maintainer.","code":""},{"path":"https://rnabioco.github.io/valr/dev/news/index.html","id":"valr-063","dir":"Changelog","previous_headings":"","what":"valr 0.6.3","title":"valr 0.6.3","text":"CRAN release: 2021-05-15 Update prepare readr 2.0.0","code":""},{"path":"https://rnabioco.github.io/valr/dev/news/index.html","id":"valr-062","dir":"Changelog","previous_headings":"","what":"valr 0.6.2","title":"valr 0.6.2","text":"CRAN release: 2020-10-07","code":""},{"path":"https://rnabioco.github.io/valr/dev/news/index.html","id":"minor-changes-0-6-2","dir":"Changelog","previous_headings":"","what":"Minor changes","title":"valr 0.6.2","text":"RMariaDB replaced deprecated RMySQL package database backend. valr now imports Rcpp, always case, masked Import readr, recently dropped use Rcpp.","code":""},{"path":"https://rnabioco.github.io/valr/dev/news/index.html","id":"valr-061","dir":"Changelog","previous_headings":"","what":"valr 0.6.1","title":"valr 0.6.1","text":"CRAN release: 2020-05-08","code":""},{"path":"https://rnabioco.github.io/valr/dev/news/index.html","id":"bug-fixes-0-6-1","dir":"Changelog","previous_headings":"","what":"Bug Fixes","title":"valr 0.6.1","text":"Fixed rchk unprotect error (#365)","code":""},{"path":"https://rnabioco.github.io/valr/dev/news/index.html","id":"valr-060","dir":"Changelog","previous_headings":"","what":"valr 0.6.0","title":"valr 0.6.0","text":"CRAN release: 2020-05-04","code":""},{"path":"https://rnabioco.github.io/valr/dev/news/index.html","id":"major-changes-0-6-0","dir":"Changelog","previous_headings":"","what":"Major changes","title":"valr 0.6.0","text":"trbl_interval() trbl_genome() custom tibble subclasses deemed unnecessary removed package. coercing GRanges valr compatible data.frame now uses gr_to_bed() function rather .trbl_interal() methods.","code":""},{"path":"https://rnabioco.github.io/valr/dev/news/index.html","id":"minor-changes-0-6-0","dir":"Changelog","previous_headings":"","what":"Minor changes","title":"valr 0.6.0","text":"dplyr version < 0.8.0 longer supported due unnecessary code bloat challenges handling multiple grouping structures (#359). sort_by argument bed_random() changed sorted, now default use bed_sort() sort output, rather rely naming sorting columns. Sorting can suppressed using sorted = FALSE. bed_sort() now uses base R sorting radix method increased speed. (#353) tbls processed bed_merge()bed_sort() longer store either merged sorted attributes, due attributes rarely checked codebase potential sources unexpected behavior.","code":""},{"path":"https://rnabioco.github.io/valr/dev/news/index.html","id":"bug-fixes-0-6-0","dir":"Changelog","previous_headings":"","what":"Bug fixes","title":"valr 0.6.0","text":"Fixed bed_closest() prevent erroneous intervals reported adjacent closest intervals present y table. (#348) Factor columns used grouping returned factors rather inappropriately coerced integer vectors (#360)","code":""},{"path":"https://rnabioco.github.io/valr/dev/news/index.html","id":"valr-050","dir":"Changelog","previous_headings":"","what":"valr 0.5.0","title":"valr 0.5.0","text":"CRAN release: 2019-01-03","code":""},{"path":"https://rnabioco.github.io/valr/dev/news/index.html","id":"major-changes-0-5-0","dir":"Changelog","previous_headings":"","what":"Major changes","title":"valr 0.5.0","text":"Internal Rcpp functions reorganized remove dependencies dplyr C++ functions.","code":""},{"path":"https://rnabioco.github.io/valr/dev/news/index.html","id":"minor-changes-0-5-0","dir":"Changelog","previous_headings":"","what":"Minor changes","title":"valr 0.5.0","text":"Due internal refactoring Rcpp functions, data.frames containing Numeric, Logical, Integer, Character, List column types supported. Columns containing Raw, Complex, R classes supported issue error. Factors now disallowed grouping variables multiset operations avoid sort order discrepancies, compatibility factor handling dplyr v.0.8.0. Factors now internally type-converted character warning issued.","code":""},{"path":"https://rnabioco.github.io/valr/dev/news/index.html","id":"valr-042","dir":"Changelog","previous_headings":"","what":"valr 0.4.2","title":"valr 0.4.2","text":"CRAN release: 2018-11-17","code":""},{"path":"https://rnabioco.github.io/valr/dev/news/index.html","id":"bug-fixes-0-4-2","dir":"Changelog","previous_headings":"","what":"Bug fixes","title":"valr 0.4.2","text":"Changed behavior .tbl_interval() call as_tibble() non-tibble input, prevents groups stripped tibble() input (#338).","code":""},{"path":"https://rnabioco.github.io/valr/dev/news/index.html","id":"valr-041","dir":"Changelog","previous_headings":"","what":"valr 0.4.1","title":"valr 0.4.1","text":"CRAN release: 2018-06-08 Added new function, bed_partition(), similar bed_merge() collapses intervals elemental intervals rather maximal overlapping region. bed_partition() also can compute summaries data overlapping intervals. See examples bed_partition() timings vignette('benchmarks') @kriemo. Several explicit comparisons Bioconductor GenomicRanges library included users considering using valr. See examples .tbl_interval() timings vignette('benchmarks').","code":""},{"path":"https://rnabioco.github.io/valr/dev/news/index.html","id":"valr-040","dir":"Changelog","previous_headings":"","what":"valr 0.4.0","title":"valr 0.4.0","text":"CRAN release: 2018-01-25","code":""},{"path":"https://rnabioco.github.io/valr/dev/news/index.html","id":"minor-changes-0-4-0","dir":"Changelog","previous_headings":"","what":"Minor changes","title":"valr 0.4.0","text":"relevant tests bedtool2 ported valr. Bugs identified corner cases new tests fixed (#328 @raysinesis) bed_jaccard() now works grouped inputs (#216) Update dplyr header files v0.7 bed_intersect() internal intersect_impl refactored enable return non-intersecting intervals. genome argument bed_makewindows() deprecated produce warning used. Also error handling added check warn intervals smaller requested window size makewindows_impl() (#312 @kriemo)","code":""},{"path":"https://rnabioco.github.io/valr/dev/news/index.html","id":"bug-fixes-0-4-0","dir":"Changelog","previous_headings":"","what":"Bug fixes","title":"valr 0.4.0","text":"Fixed one error reported distances bed_closest(). Distances reported now bedtools closest behavior (#311). bed_glyph() accepts trbl_intervals named x y (#318). bed_makewindows() now returns number windows specified num_win input intervals evenly divisble num_win, consistent bedtools behavior. output findOverlaps() now sorted subtract_impl() prevent reporting intervals dropped calling bed_subtract() (#316 @kriemo)","code":""},{"path":"https://rnabioco.github.io/valr/dev/news/index.html","id":"valr-031","dir":"Changelog","previous_headings":"","what":"valr 0.3.1","title":"valr 0.3.1","text":"CRAN release: 2017-07-22","code":""},{"path":"https://rnabioco.github.io/valr/dev/news/index.html","id":"enhancements-0-3-1","dir":"Changelog","previous_headings":"","what":"Enhancements","title":"valr 0.3.1","text":"manuscript describing valr published F1000Research. New S3 generic .tbl_interval() converts GenomicRanges::GRanges objects tbl_interval. New create_tss() creating transcription start sites. Improve documentation interval statistics complex examples.","code":""},{"path":"https://rnabioco.github.io/valr/dev/news/index.html","id":"minor-changes-0-3-1","dir":"Changelog","previous_headings":"","what":"Minor changes","title":"valr 0.3.1","text":"bed_sort() de-deprecated reduce arrange calls library code.","code":""},{"path":"https://rnabioco.github.io/valr/dev/news/index.html","id":"bug-fixes-0-3-1","dir":"Changelog","previous_headings":"","what":"Bug fixes","title":"valr 0.3.1","text":"bed_merge() now reports start/end columns spec provided (#288)","code":""},{"path":"https://rnabioco.github.io/valr/dev/news/index.html","id":"valr-030","dir":"Changelog","previous_headings":"","what":"valr 0.3.0","title":"valr 0.3.0","text":"CRAN release: 2017-06-15","code":""},{"path":"https://rnabioco.github.io/valr/dev/news/index.html","id":"enhancements-0-3-0","dir":"Changelog","previous_headings":"","what":"Enhancements","title":"valr 0.3.0","text":"New create_introns(), create_utrs5() create_utrs3() functions generating features BED12 files. Speed-ups bed_makewindows() (~50x), bed_merge() (~4x), bed_flank() (~4x) (thanks @kriemo @sheridar). Thanks sponsors Biofrontiers Hackathon caffeine underlying improvements.","code":""},{"path":"https://rnabioco.github.io/valr/dev/news/index.html","id":"bug-fixes-0-3-0","dir":"Changelog","previous_headings":"","what":"Bug fixes","title":"valr 0.3.0","text":"intervals bed_random() now sorted properly.","code":""},{"path":"https://rnabioco.github.io/valr/dev/news/index.html","id":"valr-020","dir":"Changelog","previous_headings":"","what":"valr 0.2.0","title":"valr 0.2.0","text":"CRAN release: 2017-05-05","code":""},{"path":"https://rnabioco.github.io/valr/dev/news/index.html","id":"major-changes-0-2-0","dir":"Changelog","previous_headings":"","what":"Major changes","title":"valr 0.2.0","text":"Package dplyr v0.5.0 headers valr remove dplyr LinkingTo dependency. bed_intersect() now accepts multiple tbls intersection (#220 @kriemo). new tbl_interval() tbl_genome() wrap tibbles enforce strict column naming. trbl_interval() trbl_genome() constructors take tibble::tribble() formatting .tbl_interval() .tbl_genome() used check valid classes.","code":""},{"path":"https://rnabioco.github.io/valr/dev/news/index.html","id":"minor-changes-0-2-0","dir":"Changelog","previous_headings":"","what":"Minor changes","title":"valr 0.2.0","text":"intervals returned bed_random() sorted chrom start default.","code":""},{"path":"https://rnabioco.github.io/valr/dev/news/index.html","id":"bug-fixes-0-2-0","dir":"Changelog","previous_headings":"","what":"Bug fixes","title":"valr 0.2.0","text":"Merge intervals bed_jaccard() use numeric values calculation (fixes #204).","code":""},{"path":"https://rnabioco.github.io/valr/dev/news/index.html","id":"valr-012","dir":"Changelog","previous_headings":"","what":"valr 0.1.2","title":"valr 0.1.2","text":"CRAN release: 2017-03-16","code":""},{"path":"https://rnabioco.github.io/valr/dev/news/index.html","id":"major-changes-0-1-2","dir":"Changelog","previous_headings":"","what":"Major changes","title":"valr 0.1.2","text":"Deprecate bed_sort() favor using dplyr::arrange() explicitly (fixes #134).","code":""},{"path":"https://rnabioco.github.io/valr/dev/news/index.html","id":"minor-changes-0-1-2","dir":"Changelog","previous_headings":"","what":"Minor changes","title":"valr 0.1.2","text":"add src/init.c calls R_registerRoutines R_useDynamicSymbols address NOTE r-devel Deprecate dist parameter bed_closest() favor using user supplied functions (#182 @kriemo) Make .id values sequential across chroms bed_cluster() output (#171) Transfer repository http://github.com/rnabioco/valr, update links docs. Move shiny app new repo (http://github.com/rnabioco/valrdata). Add Kent Riemondy LICENSE file.","code":""},{"path":"https://rnabioco.github.io/valr/dev/news/index.html","id":"bug-fixes-0-1-2","dir":"Changelog","previous_headings":"","what":"Bug fixes","title":"valr 0.1.2","text":"bed_merge() now merges contained intervals (#177)","code":""},{"path":"https://rnabioco.github.io/valr/dev/news/index.html","id":"valr-011","dir":"Changelog","previous_headings":"","what":"valr 0.1.1","title":"valr 0.1.1","text":"CRAN release: 2016-12-01","code":""},{"path":"https://rnabioco.github.io/valr/dev/news/index.html","id":"minor-changes-0-1-1","dir":"Changelog","previous_headings":"","what":"Minor changes","title":"valr 0.1.1","text":"test / vignette guards Suggested RMySQL fixed memory leak absdist.cpp fixed vignette entry names","code":""},{"path":"https://rnabioco.github.io/valr/dev/news/index.html","id":"valr-010","dir":"Changelog","previous_headings":"","what":"valr 0.1.0","title":"valr 0.1.0","text":"CRAN release: 2016-11-21","code":""},{"path":"https://rnabioco.github.io/valr/dev/news/index.html","id":"major-changes-0-1-0","dir":"Changelog","previous_headings":"","what":"Major changes","title":"valr 0.1.0","text":"initial release CRAN","code":""}]
+[{"path":[]},{"path":"https://rnabioco.github.io/valr/dev/CODE_OF_CONDUCT.html","id":"our-pledge","dir":"","previous_headings":"","what":"Our Pledge","title":"Contributor Covenant Code of Conduct","text":"members, contributors, leaders pledge make participation community harassment-free experience everyone, regardless age, body size, visible invisible disability, ethnicity, sex characteristics, gender identity expression, level experience, education, socio-economic status, nationality, personal appearance, race, religion, sexual identity orientation. pledge act interact ways contribute open, welcoming, diverse, inclusive, healthy community.","code":""},{"path":"https://rnabioco.github.io/valr/dev/CODE_OF_CONDUCT.html","id":"our-standards","dir":"","previous_headings":"","what":"Our Standards","title":"Contributor Covenant Code of Conduct","text":"Examples behavior contributes positive environment community include: Demonstrating empathy kindness toward people respectful differing opinions, viewpoints, experiences Giving gracefully accepting constructive feedback Accepting responsibility apologizing affected mistakes, learning experience Focusing best just us individuals, overall community Examples unacceptable behavior include: use sexualized language imagery, sexual attention advances kind Trolling, insulting derogatory comments, personal political attacks Public private harassment Publishing others’ private information, physical email address, without explicit permission conduct reasonably considered inappropriate professional setting","code":""},{"path":"https://rnabioco.github.io/valr/dev/CODE_OF_CONDUCT.html","id":"enforcement-responsibilities","dir":"","previous_headings":"","what":"Enforcement Responsibilities","title":"Contributor Covenant Code of Conduct","text":"Community leaders responsible clarifying enforcing standards acceptable behavior take appropriate fair corrective action response behavior deem inappropriate, threatening, offensive, harmful. Community leaders right responsibility remove, edit, reject comments, commits, code, wiki edits, issues, contributions aligned Code Conduct, communicate reasons moderation decisions appropriate.","code":""},{"path":"https://rnabioco.github.io/valr/dev/CODE_OF_CONDUCT.html","id":"scope","dir":"","previous_headings":"","what":"Scope","title":"Contributor Covenant Code of Conduct","text":"Code Conduct applies within community spaces, also applies individual officially representing community public spaces. Examples representing community include using official e-mail address, posting via official social media account, acting appointed representative online offline event.","code":""},{"path":"https://rnabioco.github.io/valr/dev/CODE_OF_CONDUCT.html","id":"enforcement","dir":"","previous_headings":"","what":"Enforcement","title":"Contributor Covenant Code of Conduct","text":"Instances abusive, harassing, otherwise unacceptable behavior may reported community leaders responsible enforcement [INSERT CONTACT METHOD]. complaints reviewed investigated promptly fairly. community leaders obligated respect privacy security reporter incident.","code":""},{"path":"https://rnabioco.github.io/valr/dev/CODE_OF_CONDUCT.html","id":"enforcement-guidelines","dir":"","previous_headings":"","what":"Enforcement Guidelines","title":"Contributor Covenant Code of Conduct","text":"Community leaders follow Community Impact Guidelines determining consequences action deem violation Code Conduct:","code":""},{"path":"https://rnabioco.github.io/valr/dev/CODE_OF_CONDUCT.html","id":"id_1-correction","dir":"","previous_headings":"Enforcement Guidelines","what":"1. Correction","title":"Contributor Covenant Code of Conduct","text":"Community Impact: Use inappropriate language behavior deemed unprofessional unwelcome community. Consequence: private, written warning community leaders, providing clarity around nature violation explanation behavior inappropriate. public apology may requested.","code":""},{"path":"https://rnabioco.github.io/valr/dev/CODE_OF_CONDUCT.html","id":"id_2-warning","dir":"","previous_headings":"Enforcement Guidelines","what":"2. Warning","title":"Contributor Covenant Code of Conduct","text":"Community Impact: violation single incident series actions. Consequence: warning consequences continued behavior. interaction people involved, including unsolicited interaction enforcing Code Conduct, specified period time. includes avoiding interactions community spaces well external channels like social media. Violating terms may lead temporary permanent ban.","code":""},{"path":"https://rnabioco.github.io/valr/dev/CODE_OF_CONDUCT.html","id":"id_3-temporary-ban","dir":"","previous_headings":"Enforcement Guidelines","what":"3. Temporary Ban","title":"Contributor Covenant Code of Conduct","text":"Community Impact: serious violation community standards, including sustained inappropriate behavior. Consequence: temporary ban sort interaction public communication community specified period time. public private interaction people involved, including unsolicited interaction enforcing Code Conduct, allowed period. Violating terms may lead permanent ban.","code":""},{"path":"https://rnabioco.github.io/valr/dev/CODE_OF_CONDUCT.html","id":"id_4-permanent-ban","dir":"","previous_headings":"Enforcement Guidelines","what":"4. Permanent Ban","title":"Contributor Covenant Code of Conduct","text":"Community Impact: Demonstrating pattern violation community standards, including sustained inappropriate behavior, harassment individual, aggression toward disparagement classes individuals. Consequence: permanent ban sort public interaction within community.","code":""},{"path":"https://rnabioco.github.io/valr/dev/CODE_OF_CONDUCT.html","id":"attribution","dir":"","previous_headings":"","what":"Attribution","title":"Contributor Covenant Code of Conduct","text":"Code Conduct adapted Contributor Covenant, version 2.0, available https://www.contributor-covenant.org/version/2/0/ code_of_conduct.html. Community Impact Guidelines inspired Mozilla’s code conduct enforcement ladder. answers common questions code conduct, see FAQ https://www.contributor-covenant.org/faq. Translations available https:// www.contributor-covenant.org/translations.","code":""},{"path":"https://rnabioco.github.io/valr/dev/CONTRIBUTING.html","id":null,"dir":"","previous_headings":"","what":"Contributing to valr","title":"Contributing to valr","text":"outlines propose change valr. detailed info contributing , tidyverse packages, please see development contributing guide.","code":""},{"path":"https://rnabioco.github.io/valr/dev/CONTRIBUTING.html","id":"fixing-typos","dir":"","previous_headings":"","what":"Fixing typos","title":"Contributing to valr","text":"can fix typos, spelling mistakes, grammatical errors documentation directly using GitHub web interface, long changes made source file. generally means ’ll need edit roxygen2 comments .R, .Rd file. can find .R file generates .Rd reading comment first line.","code":""},{"path":"https://rnabioco.github.io/valr/dev/CONTRIBUTING.html","id":"bigger-changes","dir":"","previous_headings":"","what":"Bigger changes","title":"Contributing to valr","text":"want make bigger change, ’s good idea first file issue make sure someone team agrees ’s needed. ’ve found bug, please file issue illustrates bug minimal reprex (also help write unit test, needed).","code":""},{"path":"https://rnabioco.github.io/valr/dev/CONTRIBUTING.html","id":"pull-request-process","dir":"","previous_headings":"Bigger changes","what":"Pull request process","title":"Contributing to valr","text":"Fork package clone onto computer. haven’t done , recommend using usethis::create_from_github(\"rnabioco/valr\", fork = TRUE). Install development dependences devtools::install_dev_deps(), make sure package passes R CMD check running devtools::check(). R CMD check doesn’t pass cleanly, ’s good idea ask help continuing. Create Git branch pull request (PR). recommend using usethis::pr_init(\"brief-description--change\"). Make changes, commit git, create PR running usethis::pr_push(), following prompts browser. title PR briefly describe change. body PR contain Fixes #issue-number. user-facing changes, add bullet top NEWS.md (.e. just first header). Follow style described https://style.tidyverse.org/news.html.","code":""},{"path":"https://rnabioco.github.io/valr/dev/CONTRIBUTING.html","id":"code-style","dir":"","previous_headings":"Bigger changes","what":"Code style","title":"Contributing to valr","text":"New code follow tidyverse style guide. can use styler package apply styles, please don’t restyle code nothing PR. use roxygen2, Markdown syntax, documentation. use testthat unit tests. Contributions test cases included easier accept.","code":""},{"path":"https://rnabioco.github.io/valr/dev/CONTRIBUTING.html","id":"code-of-conduct","dir":"","previous_headings":"","what":"Code of Conduct","title":"Contributing to valr","text":"Please note valr project released Contributor Code Conduct. contributing project agree abide terms.","code":""},{"path":"https://rnabioco.github.io/valr/dev/LICENSE.html","id":null,"dir":"","previous_headings":"","what":"MIT License","title":"MIT License","text":"Copyright (c) 2016-2018 Jay R Hesselberth Kent Riemondy Permission hereby granted, free charge, person obtaining copy software associated documentation files (“Software”), deal Software without restriction, including without limitation rights use, copy, modify, merge, publish, distribute, sublicense, /sell copies Software, permit persons Software furnished , subject following conditions: copyright notice permission notice shall included copies substantial portions Software. SOFTWARE PROVIDED “”, WITHOUT WARRANTY KIND, EXPRESS IMPLIED, INCLUDING LIMITED WARRANTIES MERCHANTABILITY, FITNESS PARTICULAR PURPOSE NONINFRINGEMENT. EVENT SHALL AUTHORS COPYRIGHT HOLDERS LIABLE CLAIM, DAMAGES LIABILITY, WHETHER ACTION CONTRACT, TORT OTHERWISE, ARISING , CONNECTION SOFTWARE USE DEALINGS SOFTWARE.","code":""},{"path":"https://rnabioco.github.io/valr/dev/articles/interval-stats.html","id":"overview","dir":"Articles","previous_headings":"","what":"Overview","title":"Interval statistics","text":"valr includes several functions exploring statistical relationships sets intervals. Calculate significance overlaps sets intervals bed_fisher() bed_projection(). Quantify relative absolute distances sets intervals bed_reldist() bed_absdist(). Quantify extent overlap sets intervals bed_jaccard(). vignette explore relationship transcription start sites repetitive elements human genome.","code":"library(valr) library(dplyr) library(ggplot2) library(cowplot) library(tidyr)  # load repeats and genes. Data in the valr package is restricted to chr22; the entire # files can be downloaded from UCSC. rpts <- read_bed(valr_example(\"hg19.rmsk.chr22.bed.gz\")) genes <- read_bed12(valr_example(\"hg19.refGene.chr22.bed.gz\"))  # load chrom sizes genome <- read_genome(valr_example(\"hg19.chrom.sizes.gz\"))  # create 1 bp intervals representing transcription start sites tss <- create_tss(genes)  tss #> # A tibble: 1,267 × 6 #>    chrom    start      end name         score strand #>    <chr>    <dbl>    <dbl> <chr>        <chr> <chr>  #>  1 chr22 16193008 16193009 NR_122113    0     -      #>  2 chr22 16157078 16157079 NR_133911    0     +      #>  3 chr22 16162065 16162066 NR_073459    0     +      #>  4 chr22 16162065 16162066 NR_073460    0     +      #>  5 chr22 16231288 16231289 NR_132385    0     -      #>  6 chr22 16287936 16287937 NM_001136213 0     -      #>  7 chr22 16274608 16274609 NR_046571    0     +      #>  8 chr22 16449803 16449804 NM_001005239 0     -      #>  9 chr22 17073699 17073700 NM_014406    0     -      #> 10 chr22 17082800 17082801 NR_001591    0     +      #> # ℹ 1,257 more rows"},{"path":"https://rnabioco.github.io/valr/dev/articles/interval-stats.html","id":"distance-metrics","dir":"Articles","previous_headings":"","what":"Distance metrics","title":"Interval statistics","text":"First define function takes x y intervals computes distance statistics (using bed_reldist() bed_absdist()) specified groups. value statistic assigned .value column. use distance_stats() function apply bed_absdist() function group data. done set shuffled group data. bed_shuffle() used shuffle coordinates repeats within chromosome (.e., coordinates change, chromosome stays .) Now can bind observed shuffled data together, tidying put data format appropriate statistical test. involves: unnest()ing data frames creating groups repeat (name), stat (reldist absdist) type (obs shf) adding unique surrogate row numbers group using tidyr::pivot_wider() create two new obs shuf columns removing rows NA values. Now data formatted, can use non-parametric ks.test() determine whether significant differences observed shuffled data group. broom::tidy() used reformat results test tibble, results test pivoted type column test type. Histgrams different stats help visualize distribution p.values.  can also assess false discovery rates (q.values) using p.adjust(). Finally can visualize results using stat_ecdf().","code":"distance_stats <- function(x, y, genome, group_var, type = NA) {   group_by(x, !!rlang::sym(group_var)) |>     do(       reldist = bed_reldist(., y, detail = TRUE) |>         select(.value = .reldist),       absdist = bed_absdist(., y, genome) |>         select(.value = .absdist)     ) |>     tidyr::pivot_longer(       cols = -name,       names_to = \"stat\",       values_to = \"value\"     ) |>     mutate(type = type) } obs_stats <- distance_stats(rpts, tss, genome, \"name\", \"obs\") obs_stats #> # A tibble: 2,106 × 4 #>    name       stat    value             type  #>    <chr>      <chr>   <list>            <chr> #>  1 (A)n       reldist <tibble [27 × 1]> obs   #>  2 (A)n       absdist <tibble [28 × 1]> obs   #>  3 (AAAAACA)n reldist <tibble [1 × 1]>  obs   #>  4 (AAAAACA)n absdist <tibble [1 × 1]>  obs   #>  5 (AAAAC)n   reldist <tibble [6 × 1]>  obs   #>  6 (AAAAC)n   absdist <tibble [7 × 1]>  obs   #>  7 (AAAAG)n   reldist <tibble [2 × 1]>  obs   #>  8 (AAAAG)n   absdist <tibble [2 × 1]>  obs   #>  9 (AAAAT)n   reldist <tibble [3 × 1]>  obs   #> 10 (AAAAT)n   absdist <tibble [4 × 1]>  obs   #> # ℹ 2,096 more rows shfs <- bed_shuffle(rpts, genome, within = TRUE) shf_stats <- distance_stats(shfs, tss, genome, \"name\", \"shuf\") res <- bind_rows(obs_stats, shf_stats) |>   tidyr::unnest(value) |>   group_by(name, stat, type) |>   mutate(.id = row_number()) |>   tidyr::pivot_wider(     names_from = \"type\",     values_from = \".value\"   ) |>   na.omit()  res #> # A tibble: 16,712 × 5 #> # Groups:   name, stat [1,908] #>    name  stat      .id   obs   shuf #>    <chr> <chr>   <int> <dbl>  <dbl> #>  1 (A)n  reldist     1 0.363 0.275  #>  2 (A)n  reldist     2 0.429 0.0395 #>  3 (A)n  reldist     3 0.246 0.151  #>  4 (A)n  reldist     4 0.478 0.292  #>  5 (A)n  reldist     5 0.260 0.431  #>  6 (A)n  reldist     6 0.286 0.257  #>  7 (A)n  reldist     7 0.498 0.310  #>  8 (A)n  reldist     8 0.237 0.213  #>  9 (A)n  reldist     9 0.314 0.104  #> 10 (A)n  reldist    10 0.149 0.433  #> # ℹ 16,702 more rows library(broom)  pvals <- res |>   do(     twosided = tidy(ks.test(.$obs, .$shuf)),     less = tidy(ks.test(.$obs, .$shuf, alternative = \"less\")),     greater = tidy(ks.test(.$obs, .$shuf, alternative = \"greater\"))   ) |>   tidyr::pivot_longer(cols = -c(name, stat), names_to = \"alt\", values_to = \"type\") |>   unnest(type) |>   select(name:p.value) |>   arrange(p.value) ggplot(pvals, aes(p.value)) +   geom_histogram(binwidth = 0.05) +   facet_grid(stat ~ alt) +   theme_cowplot() pvals <-   group_by(pvals, stat, alt) |>   mutate(q.value = p.adjust(p.value)) |>   ungroup() |>   arrange(q.value) res_gather <- tidyr::pivot_longer(res,   cols = -c(name, stat, .id),   names_to = \"type\",   values_to = \"value\" )  signif <- head(pvals, 5)  res_signif <-   signif |>   left_join(res_gather, by = c(\"name\", \"stat\")) #> Warning in left_join(signif, res_gather, by = c(\"name\", \"stat\")): Detected an unexpected many-to-many relationship between `x` and `y`. #> ℹ Row 1 of `x` matches multiple rows in `y`. #> ℹ Row 28931 of `y` matches multiple rows in `x`. #> ℹ If a many-to-many relationship is expected, set `relationship = #>   \"many-to-many\"` to silence this warning.  ggplot(res_signif, aes(x = value, color = type)) +   stat_ecdf() +   facet_grid(stat ~ name) +   theme_cowplot() +   scale_x_log10() +   scale_color_brewer(palette = \"Set1\")"},{"path":"https://rnabioco.github.io/valr/dev/articles/interval-stats.html","id":"projection-test","dir":"Articles","previous_headings":"","what":"Projection test","title":"Interval statistics","text":"bed_projection() statistical approach assess relationship two intervals based binomial distribution. , examine distribution repetitive elements within promoters coding non-coding genes. First ’ll extract 5 kb regions upstream transcription start sites represent promoter regions coding non-coding genes. Next ’ll apply bed_projection() test repeat class coding non-coding regions. projection test two-tailed statistical test. significant p-value indicates either enrichment depletion query intervals compared reference interval sets. value lower_tail = TRUE column indicates query intervals depleted, whereas lower_tail = FALSE indicates query intervals enriched.","code":"# create intervals 5kb upstream of tss representing promoters promoters <-   bed_flank(genes, genome, left = 5000, strand = TRUE) |>   mutate(name = ifelse(grepl(\"NR_\", name), \"non-coding\", \"coding\")) |>   select(chrom:strand)  # select coding and non-coding promoters promoters_coding <- filter(promoters, name == \"coding\") promoters_ncoding <- filter(promoters, name == \"non-coding\")  promoters_coding #> # A tibble: 973 × 6 #>    chrom    start      end name   score strand #>    <chr>    <int>    <int> <chr>  <chr> <chr>  #>  1 chr22 16287937 16292937 coding 0     -      #>  2 chr22 16449804 16454804 coding 0     -      #>  3 chr22 17073700 17078700 coding 0     -      #>  4 chr22 17302589 17307589 coding 0     -      #>  5 chr22 17302589 17307589 coding 0     -      #>  6 chr22 17489112 17494112 coding 0     -      #>  7 chr22 17560848 17565848 coding 0     +      #>  8 chr22 17560848 17565848 coding 0     +      #>  9 chr22 17602213 17607213 coding 0     -      #> 10 chr22 17602257 17607257 coding 0     -      #> # ℹ 963 more rows  promoters_ncoding #> # A tibble: 294 × 6 #>    chrom    start      end name       score strand #>    <chr>    <int>    <int> <chr>      <chr> <chr>  #>  1 chr22 16152078 16157078 non-coding 0     +      #>  2 chr22 16157065 16162065 non-coding 0     +      #>  3 chr22 16157065 16162065 non-coding 0     +      #>  4 chr22 16193009 16198009 non-coding 0     -      #>  5 chr22 16231289 16236289 non-coding 0     -      #>  6 chr22 16269608 16274608 non-coding 0     +      #>  7 chr22 17077800 17082800 non-coding 0     +      #>  8 chr22 17156430 17161430 non-coding 0     -      #>  9 chr22 17229328 17234328 non-coding 0     -      #> 10 chr22 17303363 17308363 non-coding 0     +      #> # ℹ 284 more rows # function to apply bed_projection to groups projection_stats <- function(x, y, genome, group_var, type = NA) {   group_by(x, !!rlang::sym(group_var)) |>     do(       n_repeats = nrow(.),       projection = bed_projection(., y, genome)     ) |>     mutate(type = type) }  pvals_coding <- projection_stats(rpts, promoters_coding, genome, \"name\", \"coding\") pvals_ncoding <- projection_stats(rpts, promoters_ncoding, genome, \"name\", \"non_coding\")  pvals <-   bind_rows(pvals_ncoding, pvals_coding) |>   ungroup() |>   tidyr::unnest(cols = c(n_repeats, projection)) |>   select(-chrom)  # filter for repeat classes with at least 10 intervals pvals <- filter(   pvals,   n_repeats > 10,   obs_exp_ratio != 0 )  # adjust pvalues pvals <- mutate(pvals, q.value = p.adjust(p.value))  pvals #> # A tibble: 179 × 7 #>    name   n_repeats p.value obs_exp_ratio lower_tail type       q.value #>    <chr>      <int>   <dbl>         <dbl> <chr>      <chr>        <dbl> #>  1 (A)n          28 0.00353         4.72  FALSE      non_coding   0.558 #>  2 (AT)n         48 0.298           0.917 FALSE      non_coding   1     #>  3 (CA)n         31 0.156           1.42  FALSE      non_coding   1     #>  4 (GT)n         42 0.247           1.05  FALSE      non_coding   1     #>  5 (T)n          61 0.405           0.721 FALSE      non_coding   1     #>  6 (TG)n         40 0.0622          2.20  FALSE      non_coding   1     #>  7 A-rich        54 0.348           0.815 FALSE      non_coding   1     #>  8 Alu           15 0.0446          2.93  FALSE      non_coding   1     #>  9 AluJb        271 0.0225          1.79  FALSE      non_coding   1     #> 10 AluJo        208 0.0216          1.90  FALSE      non_coding   1     #> # ℹ 169 more rows library(DT)  # find and show top 5 most significant repeats signif_tests <-   pvals |>   arrange(q.value) |>   group_by(type) |>   top_n(-5, q.value) |>   arrange(type)  DT::datatable(signif_tests)"},{"path":"https://rnabioco.github.io/valr/dev/articles/valr.html","id":"familiar-tools-natively-in-r","dir":"Articles","previous_headings":"","what":"Familiar tools, natively in R","title":"valr overview","text":"functions valr similar names BEDtools counterparts, familiar users coming BEDtools suite. Similar pybedtools, valr terse syntax:","code":"library(valr) library(dplyr)  snps <- read_bed(valr_example(\"hg19.snps147.chr22.bed.gz\")) genes <- read_bed(valr_example(\"genes.hg19.chr22.bed.gz\"))  # find snps in intergenic regions intergenic <- bed_subtract(snps, genes) # distance from intergenic snps to nearest gene nearby <- bed_closest(intergenic, genes)  nearby |>   select(starts_with(\"name\"), .overlap, .dist) |>   filter(abs(.dist) < 1000) #> # A tibble: 285 × 4 #>    name.x      name.y            .overlap .dist #>    <chr>       <chr>                <int> <int> #>  1 rs2261631   P704P                    0  -268 #>  2 rs570770556 POTEH                    0  -913 #>  3 rs538163832 POTEH                    0  -953 #>  4 rs9606135   TPTEP1                   0  -422 #>  5 rs11912392  ANKRD62P1-PARP4P3        0   105 #>  6 rs8136454   BC038197                 0   356 #>  7 rs5992556   XKR3                     0  -456 #>  8 rs114101676 GAB4                     0   474 #>  9 rs62236167  CECR7                    0   262 #> 10 rs5747023   CECR1                    0  -387 #> # ℹ 275 more rows"},{"path":"https://rnabioco.github.io/valr/dev/articles/valr.html","id":"input-data","dir":"Articles","previous_headings":"","what":"Input data","title":"valr overview","text":"valr assigns common column names facilitate comparisons tbls. tbls chrom, start, end columns, tbls multi-column formats additional pre-determined column names. See read_bed() documentation details. valr can also operate BED-like data.frames already constructed R, provided columns named chrom, start end present. New tbls can also constructed either tibbles base R data.frames.","code":"bed_file <- valr_example(\"3fields.bed.gz\") read_bed(bed_file) # accepts filepaths or URLs #> # A tibble: 10 × 3 #>    chrom  start    end #>    <chr>  <int>  <int> #>  1 chr1   11873  14409 #>  2 chr1   14361  19759 #>  3 chr1   14406  29370 #>  4 chr1   34610  36081 #>  5 chr1   69090  70008 #>  6 chr1  134772 140566 #>  7 chr1  321083 321115 #>  8 chr1  321145 321207 #>  9 chr1  322036 326938 #> 10 chr1  327545 328439 bed <- tribble(   ~chrom, ~start,  ~end,   \"chr1\", 1657492, 2657492,   \"chr2\", 2501324, 3094650 )  bed #> # A tibble: 2 × 3 #>   chrom   start     end #>   <chr>   <dbl>   <dbl> #> 1 chr1  1657492 2657492 #> 2 chr2  2501324 3094650"},{"path":"https://rnabioco.github.io/valr/dev/articles/valr.html","id":"interval-coordinates","dir":"Articles","previous_headings":"","what":"Interval coordinates","title":"valr overview","text":"valr adheres BED format specifies start position interval zero based end position one-based. first position chromosome 0. end position chromosome one position passed last base, included interval. example:","code":"# a chromosome 100 basepairs in length chrom <- tribble(   ~chrom, ~start, ~end,   \"chr1\", 0,      100 )  chrom #> # A tibble: 1 × 3 #>   chrom start   end #>   <chr> <dbl> <dbl> #> 1 chr1      0   100  # single base-pair intervals bases <- tribble(   ~chrom, ~start, ~end,   \"chr1\", 0,      1, # first base of chromosome   \"chr1\", 1,      2, # second base of chromosome   \"chr1\", 99,     100 # last base of chromosome )  bases #> # A tibble: 3 × 3 #>   chrom start   end #>   <chr> <dbl> <dbl> #> 1 chr1      0     1 #> 2 chr1      1     2 #> 3 chr1     99   100"},{"path":"https://rnabioco.github.io/valr/dev/articles/valr.html","id":"remote-databases","dir":"Articles","previous_headings":"","what":"Remote databases","title":"valr overview","text":"Remote databases can accessed db_ucsc() (access UCSC Browser) db_ensembl() (access Ensembl databases).","code":"# access the `refGene` tbl on the `hg38` assembly. if (require(RMariaDB)) {   ucsc <- db_ucsc(\"hg38\")   tbl(ucsc, \"refGene\") }"},{"path":"https://rnabioco.github.io/valr/dev/articles/valr.html","id":"visual-documentation","dir":"Articles","previous_headings":"","what":"Visual documentation","title":"valr overview","text":"bed_glyph() tool illustrates results operations valr, similar found BEDtools documentation. glyph shows result intersecting x y intervals bed_intersect():  glyph illustrates bed_merge():","code":"x <- tribble(   ~chrom, ~start, ~end,   \"chr1\", 25,     50,   \"chr1\", 100,    125 )  y <- tribble(   ~chrom, ~start, ~end,   \"chr1\", 30,     75 )  bed_glyph(bed_intersect(x, y)) x <- tribble(   ~chrom, ~start, ~end,   \"chr1\", 1, 50,   \"chr1\", 10, 75,   \"chr1\", 100, 120 )  bed_glyph(bed_merge(x))"},{"path":"https://rnabioco.github.io/valr/dev/articles/valr.html","id":"grouping-data","dir":"Articles","previous_headings":"","what":"Grouping data","title":"valr overview","text":"group_by function dplyr can used perform functions subsets single multiple data_frames. Functions valr leverage grouping enable variety comparisons. example, intervals can grouped strand perform comparisons among intervals strand. Comparisons intervals opposite strands done using flip_strands() function: single set (e.g. bed_merge()) multi set operations respect groupings input intervals.","code":"x <- tribble(   ~chrom, ~start, ~end, ~strand,   \"chr1\", 1,      100,  \"+\",   \"chr1\", 50,     150,  \"+\",   \"chr2\", 100,    200,  \"-\" )  y <- tribble(   ~chrom, ~start, ~end, ~strand,   \"chr1\", 50,     125,  \"+\",   \"chr1\", 50,     150,  \"-\",   \"chr2\", 50,     150,  \"+\" )  # intersect tbls by strand x <- group_by(x, strand) y <- group_by(y, strand)  bed_intersect(x, y) #> # A tibble: 2 × 8 #>   chrom start.x end.x strand.x start.y end.y strand.y .overlap #>   <chr>   <dbl> <dbl> <chr>      <dbl> <dbl> <chr>       <int> #> 1 chr1        1   100 +             50   125 +              50 #> 2 chr1       50   150 +             50   125 +              75 x <- group_by(x, strand)  y <- flip_strands(y) y <- group_by(y, strand)  bed_intersect(x, y) #> # A tibble: 3 × 8 #>   chrom start.x end.x strand.x start.y end.y strand.y .overlap #>   <chr>   <dbl> <dbl> <chr>      <dbl> <dbl> <chr>       <int> #> 1 chr1        1   100 +             50   150 +              50 #> 2 chr1       50   150 +             50   150 +             100 #> 3 chr2      100   200 -             50   150 -              50"},{"path":"https://rnabioco.github.io/valr/dev/articles/valr.html","id":"column-specification","dir":"Articles","previous_headings":"","what":"Column specification","title":"valr overview","text":"Columns BEDtools referred position: valr, columns referred name can used multiple name/value expressions summaries.","code":"# calculate the mean of column 6 for intervals in `b` that overlap with `a` bedtools map -a a.bed -b b.bed -c 6 -o mean # calculate the mean and variance for a `value` column bed_map(a, b, .mean = mean(value), .var = var(value))  # report concatenated and max values for merged intervals bed_merge(a, .concat = concat(value), .max = max(value))"},{"path":[]},{"path":"https://rnabioco.github.io/valr/dev/articles/valr.html","id":"meta-analysis","dir":"Articles","previous_headings":"Getting started","what":"Meta-analysis","title":"valr overview","text":"demonstration illustrates use valr tools perform “meta-analysis” signals relative genomic features. analyze distribution histone marks surrounding transcription start sites. First load libraries relevant data. generate 1 bp intervals represent transcription start sites (TSSs). focus + strand genes, - genes easily accommodated filtering using bed_makewindows() reversed window numbers. Now use .win_id group bed_map() calculate sum mapping y signals onto intervals x. data regrouped .win_id summary mean sd values calculated. Finally, summary statistics used construct plot illustrates histone density surrounding TSSs.","code":"# `valr_example()` identifies the path of example files bedfile <- valr_example(\"genes.hg19.chr22.bed.gz\") genomefile <- valr_example(\"hg19.chrom.sizes.gz\") bgfile <- valr_example(\"hela.h3k4.chip.bg.gz\")  genes <- read_bed(bedfile) genome <- read_genome(genomefile) y <- read_bedgraph(bgfile) # generate 1 bp TSS intervals, `+` strand only tss <- genes |>   filter(strand == \"+\") |>   mutate(end = start + 1)  # 1000 bp up and downstream region_size <- 1000 # 50 bp windows win_size <- 50  # add slop to the TSS, break into windows and add a group x <- tss |>   bed_slop(genome, both = region_size) |>   bed_makewindows(win_size)  x #> # A tibble: 13,530 × 7 #>    chrom    start      end name      score strand .win_id #>    <chr>    <int>    <int> <chr>     <chr> <chr>    <int> #>  1 chr22 16161065 16161115 LINC00516 3     +            1 #>  2 chr22 16161115 16161165 LINC00516 3     +            2 #>  3 chr22 16161165 16161215 LINC00516 3     +            3 #>  4 chr22 16161215 16161265 LINC00516 3     +            4 #>  5 chr22 16161265 16161315 LINC00516 3     +            5 #>  6 chr22 16161315 16161365 LINC00516 3     +            6 #>  7 chr22 16161365 16161415 LINC00516 3     +            7 #>  8 chr22 16161415 16161465 LINC00516 3     +            8 #>  9 chr22 16161465 16161515 LINC00516 3     +            9 #> 10 chr22 16161515 16161565 LINC00516 3     +           10 #> # ℹ 13,520 more rows # map signals to TSS regions and calculate summary statistics. res <- bed_map(x, y, win_sum = sum(value, na.rm = TRUE)) |>   group_by(.win_id) |>   summarize(     win_mean = mean(win_sum, na.rm = TRUE),     win_sd = sd(win_sum, na.rm = TRUE)   )  res #> # A tibble: 41 × 3 #>    .win_id win_mean win_sd #>      <int>    <dbl>  <dbl> #>  1       1     101.   85.8 #>  2       2     111.   81.1 #>  3       3     123.   99.1 #>  4       4     116.   96.3 #>  5       5     116.  102.  #>  6       6     125.   95.1 #>  7       7     123.   94.4 #>  8       8     128.   91.5 #>  9       9     130.   95.7 #> 10      10     130.   88.8 #> # ℹ 31 more rows x_labels <- seq(   -region_size,   region_size,   by = win_size * 5 )  x_breaks <- seq(1, 41, by = 5)  sd_limits <- aes(   ymax = win_mean + win_sd,   ymin = win_mean - win_sd )  ggplot(   res,   aes(     x = .win_id,     y = win_mean   ) ) +   geom_point() +   geom_pointrange(sd_limits) +   scale_x_continuous(     labels = x_labels,     breaks = x_breaks   ) +   labs(     x = \"Position (bp from TSS)\",     y = \"Signal\",     title = \"Human H3K4me3 signal near transcription start sites\"   ) +   theme_classic()"},{"path":"https://rnabioco.github.io/valr/dev/articles/valr.html","id":"related-work","dir":"Articles","previous_headings":"","what":"Related work","title":"valr overview","text":"Command-line tools BEDtools bedops. Python library pybedtools wraps BEDtools. R packages GenomicRanges, bedr, IRanges GenometriCorr provide similar capability different philosophy.","code":""},{"path":"https://rnabioco.github.io/valr/dev/authors.html","id":null,"dir":"","previous_headings":"","what":"Authors","title":"Authors and Citation","text":"Jay Hesselberth. Author. Kent Riemondy. Author, maintainer. . Funder, copyright holder.","code":""},{"path":"https://rnabioco.github.io/valr/dev/authors.html","id":"citation","dir":"","previous_headings":"","what":"Citation","title":"Authors and Citation","text":"Riemondy KA, Sheridan RM, Gillen , Yu Y, Bennett CG, Hesselberth JR (2017). “valr: Reproducible Genome Interval Arithmetic R.” F1000Research. doi:10.12688/f1000research.11997.1.","code":"@Article{,   title = {valr: Reproducible Genome Interval Arithmetic in R},   year = {2017},   author = {Kent A. Riemondy and Ryan M. Sheridan and Austin Gillen and Yinni Yu and Christopher G. Bennett and Jay R. Hesselberth},   journal = {F1000Research},   doi = {10.12688/f1000research.11997.1}, }"},{"path":"https://rnabioco.github.io/valr/dev/index.html","id":"valr-","dir":"","previous_headings":"","what":"Genome Interval Arithmetic","title":"Genome Interval Arithmetic","text":"valr provides tools read manipulate genome intervals signals, similar BEDtools suite.","code":""},{"path":"https://rnabioco.github.io/valr/dev/index.html","id":"installation","dir":"","previous_headings":"","what":"Installation","title":"Genome Interval Arithmetic","text":"latest stable version can installed CRAN: latest development version can installed github:","code":"install.packages('valr') # install.packages(\"devtools\") devtools::install_github('rnabioco/valr')"},{"path":"https://rnabioco.github.io/valr/dev/index.html","id":"valr-example","dir":"","previous_headings":"","what":"valr Example","title":"Genome Interval Arithmetic","text":"Functions valr similar names BEDtools counterparts, familiar users coming BEDtools suite. Unlike tools wrap BEDtools write temporary files disk, valr tools run natively memory. Similar pybedtools, valr terse syntax:","code":"library(valr) library(dplyr)  snps <- read_bed(valr_example(\"hg19.snps147.chr22.bed.gz\")) genes <- read_bed(valr_example(\"genes.hg19.chr22.bed.gz\"))  # find snps in intergenic regions intergenic <- bed_subtract(snps, genes) # find distance from intergenic snps to nearest gene nearby <- bed_closest(intergenic, genes)  nearby |>   select(starts_with(\"name\"), .overlap, .dist) |>   filter(abs(.dist) < 5000) #> # A tibble: 1,047 × 4 #>    name.x      name.y   .overlap .dist #>    <chr>       <chr>       <int> <int> #>  1 rs530458610 P704P           0  2579 #>  2 rs2261631   P704P           0  -268 #>  3 rs570770556 POTEH           0  -913 #>  4 rs538163832 POTEH           0  -953 #>  5 rs190224195 POTEH           0 -1399 #>  6 rs2379966   DQ571479        0  4750 #>  7 rs142687051 DQ571479        0  3558 #>  8 rs528403095 DQ571479        0  3309 #>  9 rs555126291 DQ571479        0  2745 #> 10 rs5747567   DQ571479        0 -1778 #> # ℹ 1,037 more rows"},{"path":"https://rnabioco.github.io/valr/dev/reference/bed12_to_exons.html","id":null,"dir":"Reference","previous_headings":"","what":"Convert BED12 to individual exons in BED6. — bed12_to_exons","title":"Convert BED12 to individual exons in BED6. — bed12_to_exons","text":"conversion BED6 format, score column contains exon number, respect strand (.e., first exon - strand genes larger start end coordinates).","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/bed12_to_exons.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Convert BED12 to individual exons in BED6. — bed12_to_exons","text":"","code":"bed12_to_exons(x)"},{"path":"https://rnabioco.github.io/valr/dev/reference/bed12_to_exons.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Convert BED12 to individual exons in BED6. — bed12_to_exons","text":"x ivl_df","code":""},{"path":[]},{"path":"https://rnabioco.github.io/valr/dev/reference/bed12_to_exons.html","id":"ref-examples","dir":"Reference","previous_headings":"","what":"Examples","title":"Convert BED12 to individual exons in BED6. — bed12_to_exons","text":"","code":"x <- read_bed12(valr_example(\"mm9.refGene.bed.gz\"))  bed12_to_exons(x) #> # A tibble: 1,683 × 6 #>    chrom   start     end name         score strand #>    <chr>   <int>   <int> <chr>        <int> <chr>  #>  1 chr1  3204562 3207049 NM_001011874     3 -      #>  2 chr1  3411782 3411982 NM_001011874     2 -      #>  3 chr1  3660632 3661579 NM_001011874     1 -      #>  4 chr1  4280926 4283093 NM_001195662     4 -      #>  5 chr1  4341990 4342162 NM_001195662     3 -      #>  6 chr1  4342282 4342918 NM_001195662     2 -      #>  7 chr1  4399250 4399322 NM_001195662     1 -      #>  8 chr1  4847774 4848057 NM_001159750     1 +      #>  9 chr1  4847774 4848057 NM_011541        1 +      #> 10 chr1  4848408 4848584 NM_001159751     1 +      #> # ℹ 1,673 more rows"},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_absdist.html","id":null,"dir":"Reference","previous_headings":"","what":"Compute absolute distances between intervals. — bed_absdist","title":"Compute absolute distances between intervals. — bed_absdist","text":"Computes absolute distance midpoint x interval midpoints closest y interval.","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_absdist.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Compute absolute distances between intervals. — bed_absdist","text":"","code":"bed_absdist(x, y, genome)"},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_absdist.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Compute absolute distances between intervals. — bed_absdist","text":"x ivl_df y ivl_df genome genome_df","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_absdist.html","id":"value","dir":"Reference","previous_headings":"","what":"Value","title":"Compute absolute distances between intervals. — bed_absdist","text":"ivl_df .absdist .absdist_scaled columns.","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_absdist.html","id":"details","dir":"Reference","previous_headings":"","what":"Details","title":"Compute absolute distances between intervals. — bed_absdist","text":"Absolute distances scaled inter-reference gap chromosome follows. Q query points R reference points chromosome, scale distance query point closest reference point inter-reference gap chromosome. x interval matching y chromosome, .absdist NA. $$d_i(x,y) = min_k(|q_i - r_k|)\\frac{R}{Length\\ \\ chromosome}$$ absolute scaled distances reported .absdist .absdist_scaled. Interval statistics can used combination dplyr::group_by() dplyr::() calculate statistics subsets data. See vignette('interval-stats') examples.","code":""},{"path":[]},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_absdist.html","id":"ref-examples","dir":"Reference","previous_headings":"","what":"Examples","title":"Compute absolute distances between intervals. — bed_absdist","text":"","code":"genome <- read_genome(valr_example(\"hg19.chrom.sizes.gz\"))  x <- bed_random(genome, seed = 1010486) y <- bed_random(genome, seed = 9203911)  bed_absdist(x, y, genome) #> # A tibble: 1,000,000 × 5 #>    chrom start   end .absdist .absdist_scaled #>    <chr> <int> <int>    <dbl>           <dbl> #>  1 chr1   5184  6184     1392           0.448 #>  2 chr1   7663  8663     1087           0.350 #>  3 chr1   9858 10858     1526           0.491 #>  4 chr1  13805 14805     2421           0.779 #>  5 chr1  14081 15081     2697           0.868 #>  6 chr1  16398 17398     1700           0.547 #>  7 chr1  17486 18486      612           0.197 #>  8 chr1  22063 23063      466           0.150 #>  9 chr1  22494 23494      897           0.289 #> 10 chr1  29351 30351     1143           0.368 #> # ℹ 999,990 more rows"},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_closest.html","id":null,"dir":"Reference","previous_headings":"","what":"Identify closest intervals. — bed_closest","title":"Identify closest intervals. — bed_closest","text":"Identify closest intervals.","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_closest.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Identify closest intervals. — bed_closest","text":"","code":"bed_closest(x, y, overlap = TRUE, suffix = c(\".x\", \".y\"))"},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_closest.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Identify closest intervals. — bed_closest","text":"x ivl_df y ivl_df overlap report overlapping intervals suffix colname suffixes output","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_closest.html","id":"value","dir":"Reference","previous_headings":"","what":"Value","title":"Identify closest intervals. — bed_closest","text":"ivl_df additional columns: .overlap amount overlap overlapping interval. Non-overlapping adjacent intervals overlap 0. .overlap included output overlap = FALSE. .dist distance closest interval. Negative distances denote upstream intervals. Book-ended intervals distance 1.","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_closest.html","id":"details","dir":"Reference","previous_headings":"","what":"Details","title":"Identify closest intervals. — bed_closest","text":"input tbls grouped chrom default, additional groups can added using dplyr::group_by(). example, grouping strand constrain analyses strand. compare opposing strands across two tbls, strands y tbl can first inverted using flip_strands().","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_closest.html","id":"note","dir":"Reference","previous_headings":"","what":"Note","title":"Identify closest intervals. — bed_closest","text":"interval x bed_closest() returns overlapping intervals y closest non-intersecting y interval. Setting overlap = FALSE report closest non-intersecting y intervals, ignoring overlapping y intervals.","code":""},{"path":[]},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_closest.html","id":"ref-examples","dir":"Reference","previous_headings":"","what":"Examples","title":"Identify closest intervals. — bed_closest","text":"","code":"x <- tibble::tribble(   ~chrom, ~start, ~end,   \"chr1\", 100,    125 )  y <- tibble::tribble(   ~chrom, ~start, ~end,   \"chr1\", 25,     50,   \"chr1\", 140,    175 )  bed_glyph(bed_closest(x, y))   x <- tibble::tribble(   ~chrom, ~start, ~end,   \"chr1\", 500,    600,   \"chr2\", 5000,   6000 )  y <- tibble::tribble(   ~chrom, ~start, ~end,   \"chr1\", 100,    200,   \"chr1\", 150,    200,   \"chr1\", 550,    580,   \"chr2\", 7000,   8500 )  bed_closest(x, y) #> # A tibble: 4 × 7 #>   chrom start.x end.x start.y end.y .overlap .dist #>   <chr>   <dbl> <dbl>   <dbl> <dbl>    <int> <int> #> 1 chr1      500   600     550   580       30     0 #> 2 chr1      500   600     100   200        0  -301 #> 3 chr1      500   600     150   200        0  -301 #> 4 chr2     5000  6000    7000  8500        0  1001  bed_closest(x, y, overlap = FALSE) #> # A tibble: 3 × 6 #>   chrom start.x end.x start.y end.y .dist #>   <chr>   <dbl> <dbl>   <dbl> <dbl> <int> #> 1 chr1      500   600     100   200  -301 #> 2 chr1      500   600     150   200  -301 #> 3 chr2     5000  6000    7000  8500  1001  # Report distance based on strand x <- tibble::tribble(   ~chrom, ~start, ~end, ~name, ~score, ~strand,   \"chr1\", 10, 20, \"a\", 1, \"-\" )  y <- tibble::tribble(   ~chrom, ~start, ~end, ~name, ~score, ~strand,   \"chr1\", 8, 9, \"b\", 1, \"+\",   \"chr1\", 21, 22, \"b\", 1, \"-\" )  res <- bed_closest(x, y)  # convert distance based on strand res$.dist_strand <- ifelse(res$strand.x == \"+\", res$.dist, -(res$.dist)) res #> # A tibble: 2 × 14 #>   chrom start.x end.x name.x score.x strand.x start.y end.y name.y score.y #>   <chr>   <dbl> <dbl> <chr>    <dbl> <chr>      <dbl> <dbl> <chr>    <dbl> #> 1 chr1       10    20 a            1 -             21    22 b            1 #> 2 chr1       10    20 a            1 -              8     9 b            1 #> # ℹ 4 more variables: strand.y <chr>, .overlap <int>, .dist <int>, #> #   .dist_strand <int>  # report absolute distances res$.abs_dist <- abs(res$.dist) res #> # A tibble: 2 × 15 #>   chrom start.x end.x name.x score.x strand.x start.y end.y name.y score.y #>   <chr>   <dbl> <dbl> <chr>    <dbl> <chr>      <dbl> <dbl> <chr>    <dbl> #> 1 chr1       10    20 a            1 -             21    22 b            1 #> 2 chr1       10    20 a            1 -              8     9 b            1 #> # ℹ 5 more variables: strand.y <chr>, .overlap <int>, .dist <int>, #> #   .dist_strand <int>, .abs_dist <int>"},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_cluster.html","id":null,"dir":"Reference","previous_headings":"","what":"Cluster neighboring intervals. — bed_cluster","title":"Cluster neighboring intervals. — bed_cluster","text":"output .id column can used downstream grouping operations. Default max_dist = 0 means overlapping book-ended intervals clustered.","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_cluster.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Cluster neighboring intervals. — bed_cluster","text":"","code":"bed_cluster(x, max_dist = 0)"},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_cluster.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Cluster neighboring intervals. — bed_cluster","text":"x ivl_df max_dist maximum distance clustered intervals.","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_cluster.html","id":"value","dir":"Reference","previous_headings":"","what":"Value","title":"Cluster neighboring intervals. — bed_cluster","text":"ivl_df .id column specifying sets clustered intervals.","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_cluster.html","id":"details","dir":"Reference","previous_headings":"","what":"Details","title":"Cluster neighboring intervals. — bed_cluster","text":"input tbls grouped chrom default, additional groups can added using dplyr::group_by(). example, grouping strand constrain analyses strand. compare opposing strands across two tbls, strands y tbl can first inverted using flip_strands().","code":""},{"path":[]},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_cluster.html","id":"ref-examples","dir":"Reference","previous_headings":"","what":"Examples","title":"Cluster neighboring intervals. — bed_cluster","text":"","code":"x <- tibble::tribble(   ~chrom, ~start, ~end,   \"chr1\", 100,    200,   \"chr1\", 180,    250,   \"chr1\", 250,    500,   \"chr1\", 501,    1000,   \"chr2\", 1,      100,   \"chr2\", 150,    200 )  bed_cluster(x) #> # A tibble: 6 × 4 #>   chrom start   end   .id #>   <chr> <dbl> <dbl> <int> #> 1 chr1    100   200     1 #> 2 chr1    180   250     1 #> 3 chr1    250   500     1 #> 4 chr1    501  1000     2 #> 5 chr2      1   100     3 #> 6 chr2    150   200     4  # glyph illustrating clustering of overlapping and book-ended intervals x <- tibble::tribble(   ~chrom, ~start, ~end,   \"chr1\", 1,      10,   \"chr1\", 5,      20,   \"chr1\", 30,     40,   \"chr1\", 40,     50,   \"chr1\", 80,     90 )  bed_glyph(bed_cluster(x), label = \".id\")"},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_complement.html","id":null,"dir":"Reference","previous_headings":"","what":"Identify intervals in a genome not covered by a query. — bed_complement","title":"Identify intervals in a genome not covered by a query. — bed_complement","text":"Identify intervals genome covered query.","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_complement.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Identify intervals in a genome not covered by a query. — bed_complement","text":"","code":"bed_complement(x, genome)"},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_complement.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Identify intervals in a genome not covered by a query. — bed_complement","text":"x ivl_df genome ivl_df","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_complement.html","id":"value","dir":"Reference","previous_headings":"","what":"Value","title":"Identify intervals in a genome not covered by a query. — bed_complement","text":"ivl_df","code":""},{"path":[]},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_complement.html","id":"ref-examples","dir":"Reference","previous_headings":"","what":"Examples","title":"Identify intervals in a genome not covered by a query. — bed_complement","text":"","code":"x <- tibble::tribble(   ~chrom, ~start, ~end,   \"chr1\", 0,      10,   \"chr1\", 75,     100 )  genome <- tibble::tribble(   ~chrom, ~size,   \"chr1\", 200 )  bed_glyph(bed_complement(x, genome))   genome <- tibble::tribble(   ~chrom,  ~size,   \"chr1\",  500,   \"chr2\",  600,   \"chr3\",  800 )  x <- tibble::tribble(   ~chrom, ~start, ~end,   \"chr1\", 100,    300,   \"chr1\", 200,    400,   \"chr2\", 0,      100,   \"chr2\", 200,    400,   \"chr3\", 500,    600 )  # intervals not covered by x bed_complement(x, genome) #> # A tibble: 6 × 3 #>   chrom start   end #>   <chr> <dbl> <dbl> #> 1 chr1      0   100 #> 2 chr1    400   500 #> 3 chr2    100   200 #> 4 chr2    400   600 #> 5 chr3      0   500 #> 6 chr3    600   800"},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_coverage.html","id":null,"dir":"Reference","previous_headings":"","what":"Compute coverage of intervals. — bed_coverage","title":"Compute coverage of intervals. — bed_coverage","text":"Compute coverage intervals.","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_coverage.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Compute coverage of intervals. — bed_coverage","text":"","code":"bed_coverage(x, y, ...)"},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_coverage.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Compute coverage of intervals. — bed_coverage","text":"x ivl_df y ivl_df ... extra arguments (used)","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_coverage.html","id":"value","dir":"Reference","previous_headings":"","what":"Value","title":"Compute coverage of intervals. — bed_coverage","text":"ivl_df following additional columns: .ints number x intersections .cov per-base coverage x intervals .len total length y intervals covered x intervals .frac .len scaled number y intervals","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_coverage.html","id":"details","dir":"Reference","previous_headings":"","what":"Details","title":"Compute coverage of intervals. — bed_coverage","text":"input tbls grouped chrom default, additional groups can added using dplyr::group_by(). example, grouping strand constrain analyses strand. compare opposing strands across two tbls, strands y tbl can first inverted using flip_strands().","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_coverage.html","id":"note","dir":"Reference","previous_headings":"","what":"Note","title":"Compute coverage of intervals. — bed_coverage","text":"Book-ended intervals included coverage calculations.","code":""},{"path":[]},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_coverage.html","id":"ref-examples","dir":"Reference","previous_headings":"","what":"Examples","title":"Compute coverage of intervals. — bed_coverage","text":"","code":"x <- tibble::tribble(   ~chrom, ~start, ~end, ~strand,   \"chr1\", 100,    500,  \"+\",   \"chr2\", 200,    400,  \"+\",   \"chr2\", 300,    500,  \"-\",   \"chr2\", 800,    900,  \"-\" )  y <- tibble::tribble(   ~chrom, ~start, ~end, ~value, ~strand,   \"chr1\", 150,    400,  100,    \"+\",   \"chr1\", 500,    550,  100,    \"+\",   \"chr2\", 230,    430,  200,    \"-\",   \"chr2\", 350,    430,  300,    \"-\" )  bed_coverage(x, y) #> # A tibble: 4 × 8 #>   chrom start   end strand .ints  .cov  .len .frac #>   <chr> <dbl> <dbl> <chr>  <int> <int> <dbl> <dbl> #> 1 chr1    100   500 +          2   250   400 0.625 #> 2 chr2    200   400 +          2   170   200 0.85  #> 3 chr2    300   500 -          2   130   200 0.65  #> 4 chr2    800   900 -          0     0   100 0"},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_fisher.html","id":null,"dir":"Reference","previous_headings":"","what":"Fisher's test to measure overlap between two sets of intervals. — bed_fisher","title":"Fisher's test to measure overlap between two sets of intervals. — bed_fisher","text":"Calculate Fisher's test number intervals shared unique two sets x y intervals.","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_fisher.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Fisher's test to measure overlap between two sets of intervals. — bed_fisher","text":"","code":"bed_fisher(x, y, genome)"},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_fisher.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Fisher's test to measure overlap between two sets of intervals. — bed_fisher","text":"x ivl_df y ivl_df genome genome_df","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_fisher.html","id":"value","dir":"Reference","previous_headings":"","what":"Value","title":"Fisher's test to measure overlap between two sets of intervals. — bed_fisher","text":"ivl_df","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_fisher.html","id":"details","dir":"Reference","previous_headings":"","what":"Details","title":"Fisher's test to measure overlap between two sets of intervals. — bed_fisher","text":"Interval statistics can used combination dplyr::group_by() dplyr::() calculate statistics subsets data. See vignette('interval-stats') examples.","code":""},{"path":[]},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_fisher.html","id":"ref-examples","dir":"Reference","previous_headings":"","what":"Examples","title":"Fisher's test to measure overlap between two sets of intervals. — bed_fisher","text":"","code":"genome <- read_genome(valr_example(\"hg19.chrom.sizes.gz\"))  x <- bed_random(genome, n = 1e4, seed = 1010486) y <- bed_random(genome, n = 1e4, seed = 9203911)  bed_fisher(x, y, genome) #> # A tibble: 1 × 6 #>   estimate p.value conf.low conf.high method                   alternative #>      <dbl>   <dbl>    <dbl>     <dbl> <chr>                    <chr>       #> 1    0.945   0.707    0.722      1.22 Fisher's Exact Test for… two.sided"},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_flank.html","id":null,"dir":"Reference","previous_headings":"","what":"Create flanking intervals from input intervals. — bed_flank","title":"Create flanking intervals from input intervals. — bed_flank","text":"Create flanking intervals input intervals.","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_flank.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Create flanking intervals from input intervals. — bed_flank","text":"","code":"bed_flank(   x,   genome,   both = 0,   left = 0,   right = 0,   fraction = FALSE,   strand = FALSE,   trim = FALSE,   ... )"},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_flank.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Create flanking intervals from input intervals. — bed_flank","text":"x ivl_df genome genome_df number bases sizes left number bases left side right number bases right side fraction define flanks based fraction interval length strand define left right based strand trim adjust coordinates --bounds intervals ... extra arguments (used)","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_flank.html","id":"value","dir":"Reference","previous_headings":"","what":"Value","title":"Create flanking intervals from input intervals. — bed_flank","text":"ivl_df","code":""},{"path":[]},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_flank.html","id":"ref-examples","dir":"Reference","previous_headings":"","what":"Examples","title":"Create flanking intervals from input intervals. — bed_flank","text":"","code":"x <- tibble::tribble(   ~chrom, ~start, ~end,   \"chr1\", 25, 50,   \"chr1\", 100, 125 )  genome <- tibble::tribble(   ~chrom, ~size,   \"chr1\", 130 )  bed_glyph(bed_flank(x, genome, both = 20))   x <- tibble::tribble(   ~chrom, ~start, ~end, ~name, ~score, ~strand,   \"chr1\", 500,    1000, \".\",   \".\",    \"+\",   \"chr1\", 1000,   1500, \".\",   \".\",    \"-\" )  genome <- tibble::tribble(   ~chrom, ~size,   \"chr1\", 5000 )  bed_flank(x, genome, left = 100) #> # A tibble: 2 × 6 #>   chrom start   end name  score strand #>   <chr> <int> <int> <chr> <chr> <chr>  #> 1 chr1    400   500 .     .     +      #> 2 chr1    900  1000 .     .     -       bed_flank(x, genome, right = 100) #> # A tibble: 2 × 6 #>   chrom start   end name  score strand #>   <chr> <int> <int> <chr> <chr> <chr>  #> 1 chr1   1000  1100 .     .     +      #> 2 chr1   1500  1600 .     .     -       bed_flank(x, genome, both = 100) #> # A tibble: 4 × 6 #>   chrom start   end name  score strand #>   <chr> <int> <int> <chr> <chr> <chr>  #> 1 chr1    400   500 .     .     +      #> 2 chr1    900  1000 .     .     -      #> 3 chr1   1000  1100 .     .     +      #> 4 chr1   1500  1600 .     .     -       bed_flank(x, genome, both = 0.5, fraction = TRUE) #> # A tibble: 4 × 6 #>   chrom start   end name  score strand #>   <chr> <int> <int> <chr> <chr> <chr>  #> 1 chr1    250   500 .     .     +      #> 2 chr1    750  1000 .     .     -      #> 3 chr1   1000  1250 .     .     +      #> 4 chr1   1500  1750 .     .     -"},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_genomecov.html","id":null,"dir":"Reference","previous_headings":"","what":"Calculate coverage across a genome — bed_genomecov","title":"Calculate coverage across a genome — bed_genomecov","text":"function useful calculating interval coverage across entire genome.","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_genomecov.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Calculate coverage across a genome — bed_genomecov","text":"","code":"bed_genomecov(x, genome, zero_depth = FALSE)"},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_genomecov.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Calculate coverage across a genome — bed_genomecov","text":"x ivl_df genome genome_df zero_depth TRUE, report intervals zero depth. Zero depth intervals reported respect groups.","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_genomecov.html","id":"value","dir":"Reference","previous_headings":"","what":"Value","title":"Calculate coverage across a genome — bed_genomecov","text":"ivl_df additional column: .depth depth interval coverage","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_genomecov.html","id":"details","dir":"Reference","previous_headings":"","what":"Details","title":"Calculate coverage across a genome — bed_genomecov","text":"input tbls grouped chrom default, additional groups can added using dplyr::group_by(). example, grouping strand constrain analyses strand. compare opposing strands across two tbls, strands y tbl can first inverted using flip_strands().","code":""},{"path":[]},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_genomecov.html","id":"ref-examples","dir":"Reference","previous_headings":"","what":"Examples","title":"Calculate coverage across a genome — bed_genomecov","text":"","code":"x <- tibble::tribble(   ~chrom, ~start, ~end, ~strand,   \"chr1\", 20, 70, \"+\",   \"chr1\", 50, 100, \"-\",   \"chr1\", 200, 250, \"+\",   \"chr1\", 220, 250, \"+\" )  genome <- tibble::tribble(   ~chrom, ~size,   \"chr1\", 500,   \"chr2\", 1000 )  bed_genomecov(x, genome) #> # A tibble: 5 × 4 #>   chrom start   end .depth #>   <chr> <int> <int>  <int> #> 1 chr1     20    50      1 #> 2 chr1     50    70      2 #> 3 chr1     70   100      1 #> 4 chr1    200   220      1 #> 5 chr1    220   250      2  bed_genomecov(dplyr::group_by(x, strand), genome) #> # A tibble: 4 × 5 #>   chrom start   end strand .depth #>   <chr> <int> <int> <chr>   <int> #> 1 chr1     20    70 +           1 #> 2 chr1    200   220 +           1 #> 3 chr1    220   250 +           2 #> 4 chr1     50   100 -           1  bed_genomecov(dplyr::group_by(x, strand), genome, zero_depth = TRUE) #> # A tibble: 11 × 5 #>    chrom start   end strand .depth #>    <chr> <int> <dbl> <chr>   <int> #>  1 chr1      0    20 +           0 #>  2 chr1      0    50 -           0 #>  3 chr1     20    70 +           1 #>  4 chr1     50   100 -           1 #>  5 chr1     70   200 +           0 #>  6 chr1    100   500 -           0 #>  7 chr1    200   220 +           1 #>  8 chr1    220   250 +           2 #>  9 chr1    250   500 +           0 #> 10 chr2      0  1000 +           0 #> 11 chr2      0  1000 -           0"},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_glyph.html","id":null,"dir":"Reference","previous_headings":"","what":"Create example glyphs for valr functions. — bed_glyph","title":"Create example glyphs for valr functions. — bed_glyph","text":"Used illustrate output valr functions small examples.","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_glyph.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Create example glyphs for valr functions. — bed_glyph","text":"","code":"bed_glyph(expr, label = NULL)"},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_glyph.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Create example glyphs for valr functions. — bed_glyph","text":"expr expression evaluate label column name use label values. present result call.","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_glyph.html","id":"value","dir":"Reference","previous_headings":"","what":"Value","title":"Create example glyphs for valr functions. — bed_glyph","text":"ggplot2::ggplot()","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_glyph.html","id":"ref-examples","dir":"Reference","previous_headings":"","what":"Examples","title":"Create example glyphs for valr functions. — bed_glyph","text":"","code":"x <- tibble::tribble(   ~chrom, ~start, ~end,   \"chr1\", 25,     50,   \"chr1\", 100,    125 )  y <- tibble::tribble(   ~chrom, ~start, ~end, ~value,   \"chr1\", 30, 75, 50 )  bed_glyph(bed_intersect(x, y))   x <- tibble::tribble(   ~chrom, ~start, ~end,   \"chr1\", 30,     75,   \"chr1\", 50,     90,   \"chr1\", 91,     120 )  bed_glyph(bed_merge(x))   bed_glyph(bed_cluster(x), label = \".id\")"},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_intersect.html","id":null,"dir":"Reference","previous_headings":"","what":"Identify intersecting intervals. — bed_intersect","title":"Identify intersecting intervals. — bed_intersect","text":"Report intersecting intervals x y tbls. Book-ended intervals .overlap values 0 output.","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_intersect.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Identify intersecting intervals. — bed_intersect","text":"","code":"bed_intersect(x, ..., invert = FALSE, suffix = c(\".x\", \".y\"))"},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_intersect.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Identify intersecting intervals. — bed_intersect","text":"x ivl_df ... one (e.g. list ) y ivl_df()s invert report x intervals y suffix colname suffixes output","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_intersect.html","id":"value","dir":"Reference","previous_headings":"","what":"Value","title":"Identify intersecting intervals. — bed_intersect","text":"ivl_df original columns x y suffixed .x .y, new .overlap column extent overlap intersecting intervals.  multiple y tbls supplied, .source contains variable names associated interval. original columns y suffixed .y output. ... contains named inputs (.e = y, b = z list(= y, b =  z)), .source contain supplied names (see examples).","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_intersect.html","id":"details","dir":"Reference","previous_headings":"","what":"Details","title":"Identify intersecting intervals. — bed_intersect","text":"input tbls grouped chrom default, additional groups can added using dplyr::group_by(). example, grouping strand constrain analyses strand. compare opposing strands across two tbls, strands y tbl can first inverted using flip_strands().","code":""},{"path":[]},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_intersect.html","id":"ref-examples","dir":"Reference","previous_headings":"","what":"Examples","title":"Identify intersecting intervals. — bed_intersect","text":"","code":"x <- tibble::tribble(   ~chrom, ~start, ~end,   \"chr1\", 25, 50,   \"chr1\", 100, 125 )  y <- tibble::tribble(   ~chrom, ~start, ~end,   \"chr1\", 30,     75 )  bed_glyph(bed_intersect(x, y))   bed_glyph(bed_intersect(x, y, invert = TRUE))   x <- tibble::tribble(   ~chrom, ~start, ~end,   \"chr1\", 100,    500,   \"chr2\", 200,    400,   \"chr2\", 300,    500,   \"chr2\", 800,    900 )  y <- tibble::tribble(   ~chrom, ~start, ~end, ~value,   \"chr1\", 150,    400,  100,   \"chr1\", 500,    550,  100,   \"chr2\", 230,    430,  200,   \"chr2\", 350,    430,  300 )  bed_intersect(x, y) #> # A tibble: 6 × 7 #>   chrom start.x end.x start.y end.y value.y .overlap #>   <chr>   <dbl> <dbl>   <dbl> <dbl>   <dbl>    <int> #> 1 chr1      100   500     150   400     100      250 #> 2 chr1      100   500     500   550     100        0 #> 3 chr2      200   400     230   430     200      170 #> 4 chr2      200   400     350   430     300       50 #> 5 chr2      300   500     230   430     200      130 #> 6 chr2      300   500     350   430     300       80  bed_intersect(x, y, invert = TRUE) #> # A tibble: 1 × 3 #>   chrom start   end #>   <chr> <dbl> <dbl> #> 1 chr2    800   900  # start and end of each overlapping interval res <- bed_intersect(x, y) dplyr::mutate(res,   start = pmax(start.x, start.y),   end = pmin(end.x, end.y) ) #> # A tibble: 6 × 9 #>   chrom start.x end.x start.y end.y value.y .overlap start   end #>   <chr>   <dbl> <dbl>   <dbl> <dbl>   <dbl>    <int> <dbl> <dbl> #> 1 chr1      100   500     150   400     100      250   150   400 #> 2 chr1      100   500     500   550     100        0   500   500 #> 3 chr2      200   400     230   430     200      170   230   400 #> 4 chr2      200   400     350   430     300       50   350   400 #> 5 chr2      300   500     230   430     200      130   300   430 #> 6 chr2      300   500     350   430     300       80   350   430  z <- tibble::tribble(   ~chrom, ~start, ~end, ~value,   \"chr1\", 150,    400,  100,   \"chr1\", 500,    550,  100,   \"chr2\", 230,    430,  200,   \"chr2\", 750,    900,  400 )  bed_intersect(x, y, z) #> # A tibble: 11 × 8 #>    chrom start.x end.x start.y end.y value.y .source .overlap #>    <chr>   <dbl> <dbl>   <dbl> <dbl>   <dbl> <chr>      <int> #>  1 chr1      100   500     150   400     100 y            250 #>  2 chr1      100   500     150   400     100 z            250 #>  3 chr1      100   500     500   550     100 y              0 #>  4 chr1      100   500     500   550     100 z              0 #>  5 chr2      200   400     230   430     200 y            170 #>  6 chr2      200   400     230   430     200 z            170 #>  7 chr2      200   400     350   430     300 y             50 #>  8 chr2      300   500     230   430     200 y            130 #>  9 chr2      300   500     230   430     200 z            130 #> 10 chr2      300   500     350   430     300 y             80 #> 11 chr2      800   900     750   900     400 z            100  bed_intersect(x, exons = y, introns = z) #> # A tibble: 11 × 8 #>    chrom start.x end.x start.y end.y value.y .source .overlap #>    <chr>   <dbl> <dbl>   <dbl> <dbl>   <dbl> <chr>      <int> #>  1 chr1      100   500     150   400     100 exons        250 #>  2 chr1      100   500     150   400     100 introns      250 #>  3 chr1      100   500     500   550     100 exons          0 #>  4 chr1      100   500     500   550     100 introns        0 #>  5 chr2      200   400     230   430     200 exons        170 #>  6 chr2      200   400     230   430     200 introns      170 #>  7 chr2      200   400     350   430     300 exons         50 #>  8 chr2      300   500     230   430     200 exons        130 #>  9 chr2      300   500     230   430     200 introns      130 #> 10 chr2      300   500     350   430     300 exons         80 #> 11 chr2      800   900     750   900     400 introns      100  # a list of tbl_intervals can also be passed bed_intersect(x, list(exons = y, introns = z)) #> # A tibble: 11 × 8 #>    chrom start.x end.x start.y end.y value.y .source .overlap #>    <chr>   <dbl> <dbl>   <dbl> <dbl>   <dbl> <chr>      <int> #>  1 chr1      100   500     150   400     100 exons        250 #>  2 chr1      100   500     150   400     100 introns      250 #>  3 chr1      100   500     500   550     100 exons          0 #>  4 chr1      100   500     500   550     100 introns        0 #>  5 chr2      200   400     230   430     200 exons        170 #>  6 chr2      200   400     230   430     200 introns      170 #>  7 chr2      200   400     350   430     300 exons         50 #>  8 chr2      300   500     230   430     200 exons        130 #>  9 chr2      300   500     230   430     200 introns      130 #> 10 chr2      300   500     350   430     300 exons         80 #> 11 chr2      800   900     750   900     400 introns      100"},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_jaccard.html","id":null,"dir":"Reference","previous_headings":"","what":"Calculate the Jaccard statistic for two sets of intervals. — bed_jaccard","title":"Calculate the Jaccard statistic for two sets of intervals. — bed_jaccard","text":"Quantifies extent overlap sets intervals terms base-pairs. Groups shared input used calculate statistic subsets data.","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_jaccard.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Calculate the Jaccard statistic for two sets of intervals. — bed_jaccard","text":"","code":"bed_jaccard(x, y)"},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_jaccard.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Calculate the Jaccard statistic for two sets of intervals. — bed_jaccard","text":"x ivl_df y ivl_df","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_jaccard.html","id":"value","dir":"Reference","previous_headings":"","what":"Value","title":"Calculate the Jaccard statistic for two sets of intervals. — bed_jaccard","text":"tibble following columns: len_i length intersection base-pairs len_u length union base-pairs jaccard value jaccard statistic n_int number intersecting intervals x y inputs grouped, return value contain one set values per group.","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_jaccard.html","id":"details","dir":"Reference","previous_headings":"","what":"Details","title":"Calculate the Jaccard statistic for two sets of intervals. — bed_jaccard","text":"Jaccard statistic takes values [0,1] measured : $$ J(x,y) = \\frac{\\mid x \\bigcap y \\mid}                      {\\mid x \\bigcup y \\mid} =                 \\frac{\\mid x \\bigcap y \\mid}                      {\\mid x \\mid + \\mid y \\mid -                       \\mid x \\bigcap y \\mid} $$ Interval statistics can used combination dplyr::group_by() dplyr::() calculate statistics subsets data. See vignette('interval-stats') examples.","code":""},{"path":[]},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_jaccard.html","id":"ref-examples","dir":"Reference","previous_headings":"","what":"Examples","title":"Calculate the Jaccard statistic for two sets of intervals. — bed_jaccard","text":"","code":"genome <- read_genome(valr_example(\"hg19.chrom.sizes.gz\"))  x <- bed_random(genome, seed = 1010486) y <- bed_random(genome, seed = 9203911)  bed_jaccard(x, y) #> # A tibble: 1 × 4 #>       len_i      len_u jaccard      n #>       <dbl>      <dbl>   <dbl>  <dbl> #> 1 236184699 1708774142   0.160 399981  # calculate jaccard per chromosome bed_jaccard(   dplyr::group_by(x, chrom),   dplyr::group_by(y, chrom) ) #> # A tibble: 25 × 5 #>    chrom    len_i     len_u jaccard     n #>    <chr>    <dbl>     <dbl>   <dbl> <dbl> #>  1 chr1  18939046 137345996   0.160 32156 #>  2 chr10 10524360  75209830   0.163 17830 #>  3 chr11 10378246  74655177   0.161 17497 #>  4 chr12 10146255  73725046   0.160 17163 #>  5 chr13  8867024  63737541   0.162 14992 #>  6 chr14  8047103  59033144   0.158 13647 #>  7 chr15  7794057  56514322   0.160 13236 #>  8 chr16  6907575  49874077   0.161 11650 #>  9 chr17  6186446  44917522   0.160 10487 #> 10 chr18  6044900  43248877   0.162 10129 #> # ℹ 15 more rows"},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_makewindows.html","id":null,"dir":"Reference","previous_headings":"","what":"Divide intervals into new sub-intervals (","title":"Divide intervals into new sub-intervals (","text":"Divide intervals new sub-intervals (\"windows\").","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_makewindows.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Divide intervals into new sub-intervals (","text":"","code":"bed_makewindows(x, win_size = 0, step_size = 0, num_win = 0, reverse = FALSE)"},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_makewindows.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Divide intervals into new sub-intervals (","text":"x ivl_df win_size divide intervals fixed-size windows step_size size step next window num_win divide intervals fixed number windows reverse reverse window numbers","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_makewindows.html","id":"value","dir":"Reference","previous_headings":"","what":"Value","title":"Divide intervals into new sub-intervals (","text":"ivl_df .win_id column contains numeric identifier window.","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_makewindows.html","id":"note","dir":"Reference","previous_headings":"","what":"Note","title":"Divide intervals into new sub-intervals (","text":"name .win_id columns can used create new interval names (see 'namenum' example ) subsequent group_by operations (see vignette).","code":""},{"path":[]},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_makewindows.html","id":"ref-examples","dir":"Reference","previous_headings":"","what":"Examples","title":"Divide intervals into new sub-intervals (","text":"","code":"x <- tibble::tribble(   ~chrom, ~start, ~end, ~name, ~score, ~strand,   \"chr1\", 100,    200,  \"A\",   \".\",    \"+\" )  bed_glyph(bed_makewindows(x, num_win = 10), label = \".win_id\")   # Fixed number of windows bed_makewindows(x, num_win = 10) #> # A tibble: 10 × 7 #>    chrom start   end name  score strand .win_id #>    <chr> <int> <int> <chr> <chr> <chr>    <int> #>  1 chr1    100   110 A     .     +            1 #>  2 chr1    110   120 A     .     +            2 #>  3 chr1    120   130 A     .     +            3 #>  4 chr1    130   140 A     .     +            4 #>  5 chr1    140   150 A     .     +            5 #>  6 chr1    150   160 A     .     +            6 #>  7 chr1    160   170 A     .     +            7 #>  8 chr1    170   180 A     .     +            8 #>  9 chr1    180   190 A     .     +            9 #> 10 chr1    190   200 A     .     +           10  # Fixed window size bed_makewindows(x, win_size = 10) #> # A tibble: 10 × 7 #>    chrom start   end name  score strand .win_id #>    <chr> <int> <int> <chr> <chr> <chr>    <int> #>  1 chr1    100   110 A     .     +            1 #>  2 chr1    110   120 A     .     +            2 #>  3 chr1    120   130 A     .     +            3 #>  4 chr1    130   140 A     .     +            4 #>  5 chr1    140   150 A     .     +            5 #>  6 chr1    150   160 A     .     +            6 #>  7 chr1    160   170 A     .     +            7 #>  8 chr1    170   180 A     .     +            8 #>  9 chr1    180   190 A     .     +            9 #> 10 chr1    190   200 A     .     +           10  # Fixed window size with overlaps bed_makewindows(x, win_size = 10, step_size = 5) #> # A tibble: 20 × 7 #>    chrom start   end name  score strand .win_id #>    <chr> <int> <int> <chr> <chr> <chr>    <int> #>  1 chr1    100   110 A     .     +            1 #>  2 chr1    105   115 A     .     +            2 #>  3 chr1    110   120 A     .     +            3 #>  4 chr1    115   125 A     .     +            4 #>  5 chr1    120   130 A     .     +            5 #>  6 chr1    125   135 A     .     +            6 #>  7 chr1    130   140 A     .     +            7 #>  8 chr1    135   145 A     .     +            8 #>  9 chr1    140   150 A     .     +            9 #> 10 chr1    145   155 A     .     +           10 #> 11 chr1    150   160 A     .     +           11 #> 12 chr1    155   165 A     .     +           12 #> 13 chr1    160   170 A     .     +           13 #> 14 chr1    165   175 A     .     +           14 #> 15 chr1    170   180 A     .     +           15 #> 16 chr1    175   185 A     .     +           16 #> 17 chr1    180   190 A     .     +           17 #> 18 chr1    185   195 A     .     +           18 #> 19 chr1    190   200 A     .     +           19 #> 20 chr1    195   200 A     .     +           20  # reverse win_id bed_makewindows(x, win_size = 10, reverse = TRUE) #> # A tibble: 10 × 7 #>    chrom start   end name  score strand .win_id #>    <chr> <int> <int> <chr> <chr> <chr>    <int> #>  1 chr1    100   110 A     .     +           10 #>  2 chr1    110   120 A     .     +            9 #>  3 chr1    120   130 A     .     +            8 #>  4 chr1    130   140 A     .     +            7 #>  5 chr1    140   150 A     .     +            6 #>  6 chr1    150   160 A     .     +            5 #>  7 chr1    160   170 A     .     +            4 #>  8 chr1    170   180 A     .     +            3 #>  9 chr1    180   190 A     .     +            2 #> 10 chr1    190   200 A     .     +            1  # bedtools 'namenum' wins <- bed_makewindows(x, win_size = 10) dplyr::mutate(wins, namenum = stringr::str_c(name, \"_\", .win_id)) #> # A tibble: 10 × 8 #>    chrom start   end name  score strand .win_id namenum #>    <chr> <int> <int> <chr> <chr> <chr>    <int> <chr>   #>  1 chr1    100   110 A     .     +            1 A_1     #>  2 chr1    110   120 A     .     +            2 A_2     #>  3 chr1    120   130 A     .     +            3 A_3     #>  4 chr1    130   140 A     .     +            4 A_4     #>  5 chr1    140   150 A     .     +            5 A_5     #>  6 chr1    150   160 A     .     +            6 A_6     #>  7 chr1    160   170 A     .     +            7 A_7     #>  8 chr1    170   180 A     .     +            8 A_8     #>  9 chr1    180   190 A     .     +            9 A_9     #> 10 chr1    190   200 A     .     +           10 A_10"},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_map.html","id":null,"dir":"Reference","previous_headings":"","what":"Calculate summaries from overlapping intervals. — bed_map","title":"Calculate summaries from overlapping intervals. — bed_map","text":"Apply functions like min() count() intersecting intervals. bed_map() uses bed_intersect() identify intersecting intervals, output columns suffixed .x .y. Expressions refer input columns x y columns must take suffixes account.","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_map.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Calculate summaries from overlapping intervals. — bed_map","text":"","code":"bed_map(x, y, ..., min_overlap = 1)  concat(.data, sep = \",\")  values_unique(.data, sep = \",\")  values(.data, sep = \",\")"},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_map.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Calculate summaries from overlapping intervals. — bed_map","text":"x ivl_df y ivl_df ... name-value pairs specifying column names expressions apply min_overlap minimum overlap intervals. .data data sep separator character","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_map.html","id":"value","dir":"Reference","previous_headings":"","what":"Value","title":"Calculate summaries from overlapping intervals. — bed_map","text":"ivl_df","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_map.html","id":"details","dir":"Reference","previous_headings":"","what":"Details","title":"Calculate summaries from overlapping intervals. — bed_map","text":"Book-ended intervals can included setting min_overlap = 0. Non-intersecting intervals x included result NA values. input tbls grouped chrom default, additional groups can added using dplyr::group_by(). example, grouping strand constrain analyses strand. compare opposing strands across two tbls, strands y tbl can first inverted using flip_strands().","code":""},{"path":[]},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_map.html","id":"ref-examples","dir":"Reference","previous_headings":"","what":"Examples","title":"Calculate summaries from overlapping intervals. — bed_map","text":"","code":"x <- tibble::tribble(  ~chrom, ~start, ~end,  'chr1', 100,    250,  'chr2', 250,    500 )  y <- tibble::tribble(  ~chrom, ~start, ~end, ~value,  'chr1', 100,    250,  10,  'chr1', 150,    250,  20,  'chr2', 250,    500,  500 )  bed_glyph(bed_map(x, y, value = sum(value)), label = 'value')   # summary examples bed_map(x, y, .sum = sum(value)) #> # A tibble: 2 × 4 #>   chrom start   end  .sum #>   <chr> <dbl> <dbl> <dbl> #> 1 chr1    100   250    30 #> 2 chr2    250   500   500  bed_map(x, y, .min = min(value), .max = max(value)) #> # A tibble: 2 × 5 #>   chrom start   end  .min  .max #>   <chr> <dbl> <dbl> <dbl> <dbl> #> 1 chr1    100   250    10    20 #> 2 chr2    250   500   500   500  # identify non-intersecting intervals to include in the result res <- bed_map(x, y, .sum = sum(value)) x_not <- bed_intersect(x, y, invert = TRUE) dplyr::bind_rows(res, x_not) #> # A tibble: 2 × 4 #>   chrom start   end  .sum #>   <chr> <dbl> <dbl> <dbl> #> 1 chr1    100   250    30 #> 2 chr2    250   500   500  # create a list-column bed_map(x, y, .values = list(value)) #> # A tibble: 2 × 4 #>   chrom start   end .values   #>   <chr> <dbl> <dbl> <list>    #> 1 chr1    100   250 <dbl [2]> #> 2 chr2    250   500 <dbl [1]>  # use `nth` family from dplyr bed_map(x, y, .first = dplyr::first(value)) #> # A tibble: 2 × 4 #>   chrom start   end .first #>   <chr> <dbl> <dbl>  <dbl> #> 1 chr1    100   250     10 #> 2 chr2    250   500    500  bed_map(x, y, .absmax = abs(max(value))) #> # A tibble: 2 × 4 #>   chrom start   end .absmax #>   <chr> <dbl> <dbl>   <dbl> #> 1 chr1    100   250      20 #> 2 chr2    250   500     500  bed_map(x, y, .count = length(value)) #> # A tibble: 2 × 4 #>   chrom start   end .count #>   <chr> <dbl> <dbl>  <int> #> 1 chr1    100   250      2 #> 2 chr2    250   500      1  bed_map(x, y, .vals = values(value)) #> # A tibble: 2 × 4 #>   chrom start   end .vals #>   <chr> <dbl> <dbl> <chr> #> 1 chr1    100   250 10,20 #> 2 chr2    250   500 500    # count defaults are NA not 0; differs from bedtools2 ... bed_map(x, y, .counts = dplyr::n()) #> # A tibble: 2 × 4 #>   chrom start   end .counts #>   <chr> <dbl> <dbl>   <int> #> 1 chr1    100   250       2 #> 2 chr2    250   500       1  # ... but NA counts can be coverted to 0's dplyr::mutate(bed_map(x, y, .counts = dplyr::n()), .counts = ifelse(is.na(.counts), 0, .counts)) #> # A tibble: 2 × 4 #>   chrom start   end .counts #>   <chr> <dbl> <dbl>   <int> #> 1 chr1    100   250       2 #> 2 chr2    250   500       1"},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_merge.html","id":null,"dir":"Reference","previous_headings":"","what":"Merge overlapping intervals. — bed_merge","title":"Merge overlapping intervals. — bed_merge","text":"Operations can performed merged intervals specifying name-value pairs. Default max_dist 0 means book-ended intervals merged.","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_merge.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Merge overlapping intervals. — bed_merge","text":"","code":"bed_merge(x, max_dist = 0, ...)"},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_merge.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Merge overlapping intervals. — bed_merge","text":"x ivl_df max_dist maximum distance intervals merge ... name-value pairs specify operations merged intervals","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_merge.html","id":"value","dir":"Reference","previous_headings":"","what":"Value","title":"Merge overlapping intervals. — bed_merge","text":"ivl_df","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_merge.html","id":"details","dir":"Reference","previous_headings":"","what":"Details","title":"Merge overlapping intervals. — bed_merge","text":"input tbls grouped chrom default, additional groups can added using dplyr::group_by(). example, grouping strand constrain analyses strand. compare opposing strands across two tbls, strands y tbl can first inverted using flip_strands().","code":""},{"path":[]},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_merge.html","id":"ref-examples","dir":"Reference","previous_headings":"","what":"Examples","title":"Merge overlapping intervals. — bed_merge","text":"","code":"x <- tibble::tribble(   ~chrom, ~start, ~end,   \"chr1\", 1, 50,   \"chr1\", 10, 75,   \"chr1\", 100, 120 )  bed_glyph(bed_merge(x))   x <- tibble::tribble(   ~chrom, ~start, ~end, ~value, ~strand,   \"chr1\", 1,      50,   1,      \"+\",   \"chr1\", 100,    200,  2,      \"+\",   \"chr1\", 150,    250,  3,      \"-\",   \"chr2\", 1,      25,   4,      \"+\",   \"chr2\", 200,    400,  5,      \"-\",   \"chr2\", 400,    500,  6,      \"+\",   \"chr2\", 450,    550,  7,      \"+\" )  bed_merge(x) #> # A tibble: 4 × 3 #>   chrom start   end #>   <chr> <int> <int> #> 1 chr1      1    50 #> 2 chr1    100   250 #> 3 chr2      1    25 #> 4 chr2    200   550  bed_merge(x, max_dist = 100) #> # A tibble: 3 × 3 #>   chrom start   end #>   <chr> <int> <int> #> 1 chr1      1   250 #> 2 chr2      1    25 #> 3 chr2    200   550  # merge intervals on same strand bed_merge(dplyr::group_by(x, strand)) #> # A tibble: 6 × 4 #> # Groups:   strand [2] #>   chrom start   end strand #>   <chr> <int> <int> <chr>  #> 1 chr1      1    50 +      #> 2 chr1    100   200 +      #> 3 chr1    150   250 -      #> 4 chr2      1    25 +      #> 5 chr2    400   550 +      #> 6 chr2    200   400 -       bed_merge(x, .value = sum(value)) #> # A tibble: 4 × 4 #>   chrom start   end .value #>   <chr> <dbl> <dbl>  <dbl> #> 1 chr1      1    50      1 #> 2 chr1    100   250      5 #> 3 chr2      1    25      4 #> 4 chr2    200   550     18"},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_partition.html","id":null,"dir":"Reference","previous_headings":"","what":"Partition intervals into elemental intervals — bed_partition","title":"Partition intervals into elemental intervals — bed_partition","text":"Convert set intervals elemental intervals contain start end position set.","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_partition.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Partition intervals into elemental intervals — bed_partition","text":"","code":"bed_partition(x, ...)"},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_partition.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Partition intervals into elemental intervals — bed_partition","text":"x ivl_df ... name-value pairs specifying column names expressions apply","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_partition.html","id":"value","dir":"Reference","previous_headings":"","what":"Value","title":"Partition intervals into elemental intervals — bed_partition","text":"ivl_df()","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_partition.html","id":"details","dir":"Reference","previous_headings":"","what":"Details","title":"Partition intervals into elemental intervals — bed_partition","text":"Summary operations, min() count() can performed elemental intervals specifying name-value pairs. function useful calculating summaries across overlapping intervals without merging intervals. input tbls grouped chrom default, additional groups can added using dplyr::group_by(). example, grouping strand constrain analyses strand. compare opposing strands across two tbls, strands y tbl can first inverted using flip_strands().","code":""},{"path":[]},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_partition.html","id":"ref-examples","dir":"Reference","previous_headings":"","what":"Examples","title":"Partition intervals into elemental intervals — bed_partition","text":"","code":"x <- tibble::tribble(   ~chrom, ~start, ~end, ~value, ~strand,   \"chr1\", 100, 500, 10, \"+\",   \"chr1\", 200, 400, 20, \"-\",   \"chr1\", 300, 550, 30, \"+\",   \"chr1\", 550, 575, 2, \"+\",   \"chr1\", 800, 900, 5, \"+\" )   bed_glyph(bed_partition(x))  bed_glyph(bed_partition(x, value = sum(value)), label = \"value\")   bed_partition(x) #> # A tibble: 7 × 3 #>   chrom start   end #>   <chr> <int> <int> #> 1 chr1    100   200 #> 2 chr1    200   300 #> 3 chr1    300   400 #> 4 chr1    400   500 #> 5 chr1    500   550 #> 6 chr1    550   575 #> 7 chr1    800   900  # compute summary over each elemental interval bed_partition(x, value = sum(value)) #> # A tibble: 7 × 4 #>   chrom start   end value #>   <chr> <int> <int> <dbl> #> 1 chr1    100   200    10 #> 2 chr1    200   300    30 #> 3 chr1    300   400    60 #> 4 chr1    400   500    40 #> 5 chr1    500   550    30 #> 6 chr1    550   575     2 #> 7 chr1    800   900     5  # partition and compute summaries based on group x <- dplyr::group_by(x, strand) bed_partition(x, value = sum(value)) #> # A tibble: 6 × 5 #>   chrom start   end strand value #>   <chr> <int> <int> <chr>  <dbl> #> 1 chr1    100   300 +         10 #> 2 chr1    200   400 -         20 #> 3 chr1    300   500 +         40 #> 4 chr1    500   550 +         30 #> 5 chr1    550   575 +          2 #> 6 chr1    800   900 +          5  # combine values across multiple tibbles y <- tibble::tribble(   ~chrom, ~start, ~end, ~value, ~strand,   \"chr1\", 10, 500, 100, \"+\",   \"chr1\", 250, 420, 200, \"-\",   \"chr1\", 350, 550, 300, \"+\",   \"chr1\", 550, 555, 20, \"+\",   \"chr1\", 800, 900, 50, \"+\" )  x <- dplyr::bind_rows(x, y) bed_partition(x, value = sum(value)) #> # A tibble: 11 × 5 #>    chrom start   end strand value #>    <chr> <int> <int> <chr>  <dbl> #>  1 chr1     10   100 +        100 #>  2 chr1    100   300 +        110 #>  3 chr1    200   250 -         20 #>  4 chr1    250   400 -        220 #>  5 chr1    300   350 +        140 #>  6 chr1    350   500 +        440 #>  7 chr1    400   420 -        200 #>  8 chr1    500   550 +        330 #>  9 chr1    550   555 +         22 #> 10 chr1    555   575 +          2 #> 11 chr1    800   900 +         55"},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_projection.html","id":null,"dir":"Reference","previous_headings":"","what":"Projection test for query interval overlap. — bed_projection","title":"Projection test for query interval overlap. — bed_projection","text":"Projection test query interval overlap.","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_projection.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Projection test for query interval overlap. — bed_projection","text":"","code":"bed_projection(x, y, genome, by_chrom = FALSE)"},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_projection.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Projection test for query interval overlap. — bed_projection","text":"x ivl_df y ivl_df genome genome_df by_chrom compute test per chromosome","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_projection.html","id":"value","dir":"Reference","previous_headings":"","what":"Value","title":"Projection test for query interval overlap. — bed_projection","text":"ivl_df following columns: chrom name chromosome tested by_chrom = TRUE, otherwise value whole_genome p.value p-value binomial test. p-values > 0.5 converted 1 - p-value lower_tail FALSE obs_exp_ratio ratio observed expected overlap frequency lower_tail TRUE indicates observed overlaps lower tail distribution (e.g., less overlap expected). FALSE indicates observed overlaps upper tail distribution (e.g., overlap expected)","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_projection.html","id":"details","dir":"Reference","previous_headings":"","what":"Details","title":"Projection test for query interval overlap. — bed_projection","text":"Interval statistics can used combination dplyr::group_by() dplyr::() calculate statistics subsets data. See vignette('interval-stats') examples.","code":""},{"path":[]},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_projection.html","id":"ref-examples","dir":"Reference","previous_headings":"","what":"Examples","title":"Projection test for query interval overlap. — bed_projection","text":"","code":"genome <- read_genome(valr_example(\"hg19.chrom.sizes.gz\"))  x <- bed_random(genome, seed = 1010486) y <- bed_random(genome, seed = 9203911)  bed_projection(x, y, genome) #> # A tibble: 1 × 4 #>   chrom         p.value obs_exp_ratio lower_tail #>   <chr>           <dbl>         <dbl> <chr>      #> 1 whole_genome 0.000850          1.01 FALSE       bed_projection(x, y, genome, by_chrom = TRUE) #> # A tibble: 25 × 4 #>    chrom p.value obs_exp_ratio lower_tail #>    <chr>   <dbl>         <dbl> <chr>      #>  1 chr1   0.176          1.01  FALSE      #>  2 chr10  0.0209         1.02  FALSE      #>  3 chr11  0.118          1.01  FALSE      #>  4 chr12  0.479          1.00  FALSE      #>  5 chr13  0.245          1.01  FALSE      #>  6 chr14  0.120          0.990 TRUE       #>  7 chr15  0.333          1.00  FALSE      #>  8 chr16  0.213          1.01  FALSE      #>  9 chr17  0.181          0.991 TRUE       #> 10 chr18  0.0306         1.02  FALSE      #> # ℹ 15 more rows"},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_random.html","id":null,"dir":"Reference","previous_headings":"","what":"Generate randomly placed intervals on a genome. — bed_random","title":"Generate randomly placed intervals on a genome. — bed_random","text":"Generate randomly placed intervals genome.","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_random.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Generate randomly placed intervals on a genome. — bed_random","text":"","code":"bed_random(genome, length = 1000, n = 1e+06, seed = 0, sorted = TRUE)"},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_random.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Generate randomly placed intervals on a genome. — bed_random","text":"genome genome_df length length intervals n number intervals generate seed seed RNG reproducible intervals sorted return sorted output","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_random.html","id":"value","dir":"Reference","previous_headings":"","what":"Value","title":"Generate randomly placed intervals on a genome. — bed_random","text":"ivl_df","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_random.html","id":"details","dir":"Reference","previous_headings":"","what":"Details","title":"Generate randomly placed intervals on a genome. — bed_random","text":"Sorting can suppressed sorted = FALSE.","code":""},{"path":[]},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_random.html","id":"ref-examples","dir":"Reference","previous_headings":"","what":"Examples","title":"Generate randomly placed intervals on a genome. — bed_random","text":"","code":"genome <- tibble::tribble(   ~chrom,  ~size,   \"chr1\",  10000000,   \"chr2\",  50000000,   \"chr3\",  60000000,   \"chrX\",  5000000 )  bed_random(genome, seed = 10104) #> # A tibble: 1,000,000 × 3 #>    chrom start   end #>    <chr> <int> <int> #>  1 chr1    265  1265 #>  2 chr1    315  1315 #>  3 chr1    335  1335 #>  4 chr1    513  1513 #>  5 chr1    625  1625 #>  6 chr1    635  1635 #>  7 chr1    653  1653 #>  8 chr1    731  1731 #>  9 chr1    859  1859 #> 10 chr1   1024  2024 #> # ℹ 999,990 more rows  # sorting can be suppressed bed_random(genome, sorted = FALSE, seed = 10104) #> # A tibble: 1,000,000 × 3 #>    chrom    start      end #>    <chr>    <int>    <int> #>  1 chr3   2681468  2682468 #>  2 chr3  25364020 25365020 #>  3 chr2  43134407 43135407 #>  4 chr2  36344257 36345257 #>  5 chr3  39019690 39020690 #>  6 chr3  59869387 59870387 #>  7 chr3  56220373 56221373 #>  8 chr3  57965913 57966913 #>  9 chr2  25303342 25304342 #> 10 chr3  16018594 16019594 #> # ℹ 999,990 more rows  # 500 random intervals of length 500 bed_random(genome, length = 500, n = 500, seed = 10104) #> # A tibble: 500 × 3 #>    chrom   start     end #>    <chr>   <int>   <int> #>  1 chr1   379360  379860 #>  2 chr1   394770  395270 #>  3 chr1  1215880 1216380 #>  4 chr1  1339287 1339787 #>  5 chr1  2046513 2047013 #>  6 chr1  2156755 2157255 #>  7 chr1  2189109 2189609 #>  8 chr1  2221665 2222165 #>  9 chr1  2223456 2223956 #> 10 chr1  2253135 2253635 #> # ℹ 490 more rows"},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_reldist.html","id":null,"dir":"Reference","previous_headings":"","what":"Compute relative distances between intervals. — bed_reldist","title":"Compute relative distances between intervals. — bed_reldist","text":"Compute relative distances intervals.","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_reldist.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Compute relative distances between intervals. — bed_reldist","text":"","code":"bed_reldist(x, y, detail = FALSE)"},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_reldist.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Compute relative distances between intervals. — bed_reldist","text":"x ivl_df y ivl_df detail report relative distances x interval.","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_reldist.html","id":"value","dir":"Reference","previous_headings":"","what":"Value","title":"Compute relative distances between intervals. — bed_reldist","text":"detail = FALSE, ivl_df summarizes calculated .reldist values following columns: .reldist relative distance metric .counts number metric observations .total total observations .freq frequency observation detail = TRUE, .reldist column reports relative distance input x interval.","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_reldist.html","id":"details","dir":"Reference","previous_headings":"","what":"Details","title":"Compute relative distances between intervals. — bed_reldist","text":"Interval statistics can used combination dplyr::group_by() dplyr::() calculate statistics subsets data. See vignette('interval-stats') examples.","code":""},{"path":[]},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_reldist.html","id":"ref-examples","dir":"Reference","previous_headings":"","what":"Examples","title":"Compute relative distances between intervals. — bed_reldist","text":"","code":"genome <- read_genome(valr_example(\"hg19.chrom.sizes.gz\"))  x <- bed_random(genome, seed = 1010486) y <- bed_random(genome, seed = 9203911)  bed_reldist(x, y) #> # A tibble: 51 × 4 #>    .reldist .counts .total  .freq #>       <dbl>   <int>  <int>  <dbl> #>  1     0      20202 999938 0.0202 #>  2     0.01   20031 999938 0.0200 #>  3     0.02   19977 999938 0.0200 #>  4     0.03   19871 999938 0.0199 #>  5     0.04   20129 999938 0.0201 #>  6     0.05   20197 999938 0.0202 #>  7     0.06   20020 999938 0.0200 #>  8     0.07   20063 999938 0.0201 #>  9     0.08   20053 999938 0.0201 #> 10     0.09   20021 999938 0.0200 #> # ℹ 41 more rows  bed_reldist(x, y, detail = TRUE) #> # A tibble: 999,938 × 4 #>    chrom start   end .reldist #>    <chr> <int> <int>    <dbl> #>  1 chr1   5184  6184   0.270  #>  2 chr1   7663  8663   0.226  #>  3 chr1   9858 10858   0.317  #>  4 chr1  13805 14805   0.361  #>  5 chr1  14081 15081   0.402  #>  6 chr1  16398 17398   0.253  #>  7 chr1  17486 18486   0.0912 #>  8 chr1  22063 23063   0.107  #>  9 chr1  22494 23494   0.207  #> 10 chr1  29351 30351   0.400  #> # ℹ 999,928 more rows"},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_shift.html","id":null,"dir":"Reference","previous_headings":"","what":"Adjust intervals by a fixed size. — bed_shift","title":"Adjust intervals by a fixed size. — bed_shift","text":"--bounds intervals removed default.","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_shift.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Adjust intervals by a fixed size. — bed_shift","text":"","code":"bed_shift(x, genome, size = 0, fraction = 0, trim = FALSE)"},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_shift.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Adjust intervals by a fixed size. — bed_shift","text":"x ivl_df genome ivl_df size number bases shift. positive numbers shift right, negative shift left. fraction define size fraction interval trim adjust coordinates --bounds intervals","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_shift.html","id":"value","dir":"Reference","previous_headings":"","what":"Value","title":"Adjust intervals by a fixed size. — bed_shift","text":"ivl_df","code":""},{"path":[]},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_shift.html","id":"ref-examples","dir":"Reference","previous_headings":"","what":"Examples","title":"Adjust intervals by a fixed size. — bed_shift","text":"","code":"x <- tibble::tribble(   ~chrom, ~start, ~end,   \"chr1\", 25, 50,   \"chr1\", 100, 125 )  genome <- tibble::tribble(   ~chrom, ~size,   \"chr1\", 125 )  bed_glyph(bed_shift(x, genome, size = -20))   x <- tibble::tribble(   ~chrom, ~start, ~end, ~strand,   \"chr1\", 100,    150,  \"+\",   \"chr1\", 200,    250,  \"+\",   \"chr2\", 300,    350,  \"+\",   \"chr2\", 400,    450,  \"-\",   \"chr3\", 500,    550,  \"-\",   \"chr3\", 600,    650,  \"-\" )  genome <- tibble::tribble(   ~chrom, ~size,   \"chr1\", 1000,   \"chr2\", 2000,   \"chr3\", 3000 )  bed_shift(x, genome, 100) #> # A tibble: 6 × 4 #>   chrom start   end strand #>   <chr> <dbl> <dbl> <chr>  #> 1 chr1    200   250 +      #> 2 chr1    300   350 +      #> 3 chr2    400   450 +      #> 4 chr2    500   550 -      #> 5 chr3    600   650 -      #> 6 chr3    700   750 -       bed_shift(x, genome, fraction = 0.5) #> # A tibble: 6 × 4 #>   chrom start   end strand #>   <chr> <dbl> <dbl> <chr>  #> 1 chr1    125   175 +      #> 2 chr1    225   275 +      #> 3 chr2    325   375 +      #> 4 chr2    425   475 -      #> 5 chr3    525   575 -      #> 6 chr3    625   675 -       # shift with respect to strand stranded <- dplyr::group_by(x, strand) bed_shift(stranded, genome, 100) #> # A tibble: 6 × 4 #>   chrom start   end strand #>   <chr> <dbl> <dbl> <chr>  #> 1 chr1    200   250 +      #> 2 chr1    300   350 +      #> 3 chr2    400   450 +      #> 4 chr2    300   350 -      #> 5 chr3    400   450 -      #> 6 chr3    500   550 -"},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_shuffle.html","id":null,"dir":"Reference","previous_headings":"","what":"Shuffle input intervals. — bed_shuffle","title":"Shuffle input intervals. — bed_shuffle","text":"Shuffle input intervals.","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_shuffle.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Shuffle input intervals. — bed_shuffle","text":"","code":"bed_shuffle(   x,   genome,   incl = NULL,   excl = NULL,   max_tries = 1000,   within = FALSE,   seed = 0 )"},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_shuffle.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Shuffle input intervals. — bed_shuffle","text":"x ivl_df genome genome_df incl ivl_df included intervals excl ivl_df excluded intervals max_tries maximum tries identify bounded interval within shuffle within chromosomes seed seed reproducible intervals","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_shuffle.html","id":"value","dir":"Reference","previous_headings":"","what":"Value","title":"Shuffle input intervals. — bed_shuffle","text":"ivl_df","code":""},{"path":[]},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_shuffle.html","id":"ref-examples","dir":"Reference","previous_headings":"","what":"Examples","title":"Shuffle input intervals. — bed_shuffle","text":"","code":"genome <- tibble::tribble(   ~chrom, ~size,   \"chr1\", 1e6,   \"chr2\", 2e6,   \"chr3\", 4e6 )  x <- bed_random(genome, seed = 1010486)  bed_shuffle(x, genome, seed = 9830491) #> # A tibble: 1,000,000 × 3 #>    chrom   start     end #>    <chr>   <int>   <int> #>  1 chr2  1463822 1464822 #>  2 chr2   619967  620967 #>  3 chr2  1769865 1770865 #>  4 chr2   203953  204953 #>  5 chr3  2119387 2120387 #>  6 chr2  1216667 1217667 #>  7 chr3  2109652 2110652 #>  8 chr2   213473  214473 #>  9 chr1   154156  155156 #> 10 chr3  2201278 2202278 #> # ℹ 999,990 more rows"},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_slop.html","id":null,"dir":"Reference","previous_headings":"","what":"Increase the size of input intervals. — bed_slop","title":"Increase the size of input intervals. — bed_slop","text":"Increase size input intervals.","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_slop.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Increase the size of input intervals. — bed_slop","text":"","code":"bed_slop(   x,   genome,   both = 0,   left = 0,   right = 0,   fraction = FALSE,   strand = FALSE,   trim = FALSE,   ... )"},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_slop.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Increase the size of input intervals. — bed_slop","text":"x ivl_df genome genome_df number bases sizes left number bases left side right number bases right side fraction define flanks based fraction interval length strand define left right based strand trim adjust coordinates --bounds intervals ... extra arguments (used)","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_slop.html","id":"value","dir":"Reference","previous_headings":"","what":"Value","title":"Increase the size of input intervals. — bed_slop","text":"ivl_df","code":""},{"path":[]},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_slop.html","id":"ref-examples","dir":"Reference","previous_headings":"","what":"Examples","title":"Increase the size of input intervals. — bed_slop","text":"","code":"x <- tibble::tribble(   ~chrom, ~start, ~end,   \"chr1\", 110,    120,   \"chr1\", 225,    235 )  genome <- tibble::tribble(   ~chrom, ~size,   \"chr1\", 400 )  bed_glyph(bed_slop(x, genome, both = 20, trim = TRUE))   genome <- tibble::tribble(   ~chrom, ~size,   \"chr1\", 5000 )  x <- tibble::tribble(   ~chrom, ~start, ~end, ~name, ~score, ~strand,   \"chr1\", 500, 1000, \".\", \".\", \"+\",   \"chr1\", 1000, 1500, \".\", \".\", \"-\" )  bed_slop(x, genome, left = 100) #> # A tibble: 2 × 6 #>   chrom start   end name  score strand #>   <chr> <dbl> <dbl> <chr> <chr> <chr>  #> 1 chr1    400  1000 .     .     +      #> 2 chr1    900  1500 .     .     -       bed_slop(x, genome, right = 100) #> # A tibble: 2 × 6 #>   chrom start   end name  score strand #>   <chr> <dbl> <dbl> <chr> <chr> <chr>  #> 1 chr1    500  1100 .     .     +      #> 2 chr1   1000  1600 .     .     -       bed_slop(x, genome, both = 100) #> # A tibble: 2 × 6 #>   chrom start   end name  score strand #>   <chr> <dbl> <dbl> <chr> <chr> <chr>  #> 1 chr1    400  1100 .     .     +      #> 2 chr1    900  1600 .     .     -       bed_slop(x, genome, both = 0.5, fraction = TRUE) #> # A tibble: 2 × 6 #>   chrom start   end name  score strand #>   <chr> <dbl> <dbl> <chr> <chr> <chr>  #> 1 chr1    250  1250 .     .     +      #> 2 chr1    750  1750 .     .     -"},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_sort.html","id":null,"dir":"Reference","previous_headings":"","what":"Sort a set of intervals. — bed_sort","title":"Sort a set of intervals. — bed_sort","text":"Sort set intervals.","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_sort.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Sort a set of intervals. — bed_sort","text":"","code":"bed_sort(x, by_size = FALSE, by_chrom = FALSE, reverse = FALSE)"},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_sort.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Sort a set of intervals. — bed_sort","text":"x ivl_df by_size sort interval size by_chrom sort within chromosome reverse reverse sort order","code":""},{"path":[]},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_sort.html","id":"ref-examples","dir":"Reference","previous_headings":"","what":"Examples","title":"Sort a set of intervals. — bed_sort","text":"","code":"x <- tibble::tribble(   ~chrom, ~start, ~end,   \"chr8\", 500,    1000,   \"chr8\", 1000,   5000,   \"chr8\", 100,    200,   \"chr1\", 100,    300,   \"chr1\", 100,    200 )  # sort by chrom and start bed_sort(x) #> # A tibble: 5 × 3 #>   chrom start   end #>   <chr> <dbl> <dbl> #> 1 chr1    100   200 #> 2 chr1    100   300 #> 3 chr8    100   200 #> 4 chr8    500  1000 #> 5 chr8   1000  5000  # reverse sort order bed_sort(x, reverse = TRUE) #> # A tibble: 5 × 3 #>   chrom start   end #>   <chr> <dbl> <dbl> #> 1 chr1    100   300 #> 2 chr1    100   200 #> 3 chr8   1000  5000 #> 4 chr8    500  1000 #> 5 chr8    100   200  # sort by interval size bed_sort(x, by_size = TRUE) #> # A tibble: 5 × 3 #>   chrom start   end #>   <chr> <dbl> <dbl> #> 1 chr8    100   200 #> 2 chr1    100   200 #> 3 chr1    100   300 #> 4 chr8    500  1000 #> 5 chr8   1000  5000  # sort by decreasing interval size bed_sort(x, by_size = TRUE, reverse = TRUE) #> # A tibble: 5 × 3 #>   chrom start   end #>   <chr> <dbl> <dbl> #> 1 chr8   1000  5000 #> 2 chr8    500  1000 #> 3 chr1    100   300 #> 4 chr8    100   200 #> 5 chr1    100   200  # sort by interval size within chrom bed_sort(x, by_size = TRUE, by_chrom = TRUE) #> # A tibble: 5 × 3 #>   chrom start   end #>   <chr> <dbl> <dbl> #> 1 chr1    100   200 #> 2 chr1    100   300 #> 3 chr8    100   200 #> 4 chr8    500  1000 #> 5 chr8   1000  5000"},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_subtract.html","id":null,"dir":"Reference","previous_headings":"","what":"Subtract two sets of intervals. — bed_subtract","title":"Subtract two sets of intervals. — bed_subtract","text":"Subtract y intervals x intervals.","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_subtract.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Subtract two sets of intervals. — bed_subtract","text":"","code":"bed_subtract(x, y, any = FALSE)"},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_subtract.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Subtract two sets of intervals. — bed_subtract","text":"x ivl_df y ivl_df remove x intervals overlap y","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_subtract.html","id":"details","dir":"Reference","previous_headings":"","what":"Details","title":"Subtract two sets of intervals. — bed_subtract","text":"input tbls grouped chrom default, additional groups can added using dplyr::group_by(). example, grouping strand constrain analyses strand. compare opposing strands across two tbls, strands y tbl can first inverted using flip_strands().","code":""},{"path":[]},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_subtract.html","id":"ref-examples","dir":"Reference","previous_headings":"","what":"Examples","title":"Subtract two sets of intervals. — bed_subtract","text":"","code":"x <- tibble::tribble(   ~chrom, ~start, ~end,   \"chr1\", 1,      100 )  y <- tibble::tribble(   ~chrom, ~start, ~end,   \"chr1\", 50,     75 )  bed_glyph(bed_subtract(x, y))   x <- tibble::tribble(   ~chrom, ~start, ~end,   \"chr1\", 100,    200,   \"chr1\", 250,    400,   \"chr1\", 500,    600,   \"chr1\", 1000,   1200,   \"chr1\", 1300,   1500 )  y <- tibble::tribble(   ~chrom, ~start, ~end,   \"chr1\", 150,    175,   \"chr1\", 510,    525,   \"chr1\", 550,    575,   \"chr1\", 900,    1050,   \"chr1\", 1150,   1250,   \"chr1\", 1299,   1501 )  bed_subtract(x, y) #> # A tibble: 7 × 3 #>   chrom start   end #>   <chr> <dbl> <dbl> #> 1 chr1    100   150 #> 2 chr1    175   200 #> 3 chr1    250   400 #> 4 chr1    500   510 #> 5 chr1    525   550 #> 6 chr1    575   600 #> 7 chr1   1050  1150  bed_subtract(x, y, any = TRUE) #> # A tibble: 1 × 3 #>   chrom start   end #>   <chr> <dbl> <dbl> #> 1 chr1    250   400"},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_window.html","id":null,"dir":"Reference","previous_headings":"","what":"Identify intervals within a specified distance. — bed_window","title":"Identify intervals within a specified distance. — bed_window","text":"Identify intervals within specified distance.","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_window.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Identify intervals within a specified distance. — bed_window","text":"","code":"bed_window(x, y, genome, ...)"},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_window.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Identify intervals within a specified distance. — bed_window","text":"x ivl_df y ivl_df genome genome_df ... params bed_slop bed_intersect","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_window.html","id":"details","dir":"Reference","previous_headings":"","what":"Details","title":"Identify intervals within a specified distance. — bed_window","text":"input tbls grouped chrom default, additional groups can added using dplyr::group_by(). example, grouping strand constrain analyses strand. compare opposing strands across two tbls, strands y tbl can first inverted using flip_strands().","code":""},{"path":[]},{"path":"https://rnabioco.github.io/valr/dev/reference/bed_window.html","id":"ref-examples","dir":"Reference","previous_headings":"","what":"Examples","title":"Identify intervals within a specified distance. — bed_window","text":"","code":"x <- tibble::tribble(   ~chrom, ~start, ~end,   \"chr1\", 25,     50,   \"chr1\", 100,    125 )  y <- tibble::tribble(   ~chrom, ~start, ~end,   \"chr1\", 60,     75 )  genome <- tibble::tribble(   ~chrom, ~size,   \"chr1\", 125 )  bed_glyph(bed_window(x, y, genome, both = 15))   x <- tibble::tribble(   ~chrom, ~start, ~end,   \"chr1\", 10, 100,   \"chr2\", 200, 400,   \"chr2\", 300, 500,   \"chr2\", 800, 900 )  y <- tibble::tribble(   ~chrom, ~start, ~end,   \"chr1\", 150,    400,   \"chr2\", 230,    430,   \"chr2\", 350,    430 )  genome <- tibble::tribble(   ~chrom, ~size,   \"chr1\", 500,   \"chr2\", 1000 )  bed_window(x, y, genome, both = 100) #> # A tibble: 4 × 7 #>   chrom start.x end.x start.y end.y .source .overlap #>   <chr>   <dbl> <dbl>   <dbl> <dbl> <chr>      <int> #> 1 chr2      200   400     230   430 1            200 #> 2 chr2      200   400     350   430 1             80 #> 3 chr2      300   500     230   430 1            200 #> 4 chr2      300   500     350   430 1             80"},{"path":"https://rnabioco.github.io/valr/dev/reference/bound_intervals.html","id":null,"dir":"Reference","previous_headings":"","what":"Select intervals bounded by a genome. — bound_intervals","title":"Select intervals bounded by a genome. — bound_intervals","text":"Used remove --bounds intervals, trim interval coordinates using genome.","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/bound_intervals.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Select intervals bounded by a genome. — bound_intervals","text":"","code":"bound_intervals(x, genome, trim = FALSE)"},{"path":"https://rnabioco.github.io/valr/dev/reference/bound_intervals.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Select intervals bounded by a genome. — bound_intervals","text":"x ivl_df genome genome_df trim adjust coordinates --bounds intervals","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/bound_intervals.html","id":"value","dir":"Reference","previous_headings":"","what":"Value","title":"Select intervals bounded by a genome. — bound_intervals","text":"ivl_df","code":""},{"path":[]},{"path":"https://rnabioco.github.io/valr/dev/reference/bound_intervals.html","id":"ref-examples","dir":"Reference","previous_headings":"","what":"Examples","title":"Select intervals bounded by a genome. — bound_intervals","text":"","code":"x <- tibble::tribble(   ~chrom, ~start, ~end,   \"chr1\", -100,   500,   \"chr1\", 100,    1e9,   \"chr1\", 500,    1000 )  genome <- read_genome(valr_example(\"hg19.chrom.sizes.gz\"))  # out-of-bounds are removed by default ... bound_intervals(x, genome) #> # A tibble: 1 × 3 #>   chrom start   end #>   <chr> <dbl> <dbl> #> 1 chr1    500  1000  # ... or can be trimmed within the bounds of a genome bound_intervals(x, genome, trim = TRUE) #> # A tibble: 3 × 3 #>   chrom start       end #>   <chr> <dbl>     <dbl> #> 1 chr1      0       500 #> 2 chr1    100 249250621 #> 3 chr1    500      1000"},{"path":"https://rnabioco.github.io/valr/dev/reference/create_introns.html","id":null,"dir":"Reference","previous_headings":"","what":"Create intron features. — create_introns","title":"Create intron features. — create_introns","text":"Numbers score column intron numbers 5' 3' independent strand. .e., first introns + - strand genes score values 1.","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/create_introns.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Create intron features. — create_introns","text":"","code":"create_introns(x)"},{"path":"https://rnabioco.github.io/valr/dev/reference/create_introns.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Create intron features. — create_introns","text":"x ivl_df BED12 format","code":""},{"path":[]},{"path":"https://rnabioco.github.io/valr/dev/reference/create_introns.html","id":"ref-examples","dir":"Reference","previous_headings":"","what":"Examples","title":"Create intron features. — create_introns","text":"","code":"x <- read_bed12(valr_example(\"mm9.refGene.bed.gz\"))  create_introns(x) #> # A tibble: 1,583 × 6 #>    chrom   start     end name         score strand #>    <chr>   <int>   <int> <chr>        <dbl> <chr>  #>  1 chr1  3207049 3411782 NM_001011874     2 -      #>  2 chr1  3411982 3660632 NM_001011874     1 -      #>  3 chr1  4283093 4341990 NM_001195662     3 -      #>  4 chr1  4342162 4342282 NM_001195662     2 -      #>  5 chr1  4342918 4399250 NM_001195662     1 -      #>  6 chr1  4848057 4857550 NM_001159750     1 +      #>  7 chr1  4848057 4857550 NM_011541        1 +      #>  8 chr1  4848584 4857550 NM_001159751     1 +      #>  9 chr1  4857613 4868107 NM_001159750     2 +      #> 10 chr1  4857613 4868107 NM_011541        2 +      #> # ℹ 1,573 more rows"},{"path":"https://rnabioco.github.io/valr/dev/reference/create_tss.html","id":null,"dir":"Reference","previous_headings":"","what":"Create transcription start site features. — create_tss","title":"Create transcription start site features. — create_tss","text":"Create transcription start site features.","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/create_tss.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Create transcription start site features. — create_tss","text":"","code":"create_tss(x)"},{"path":"https://rnabioco.github.io/valr/dev/reference/create_tss.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Create transcription start site features. — create_tss","text":"x ivl_df BED format","code":""},{"path":[]},{"path":"https://rnabioco.github.io/valr/dev/reference/create_tss.html","id":"ref-examples","dir":"Reference","previous_headings":"","what":"Examples","title":"Create transcription start site features. — create_tss","text":"","code":"x <- read_bed12(valr_example(\"mm9.refGene.bed.gz\"))  create_tss(x) #> # A tibble: 100 × 6 #>    chrom   start     end name         score strand #>    <chr>   <dbl>   <dbl> <chr>        <chr> <chr>  #>  1 chr1  3661578 3661579 NM_001011874 0     -      #>  2 chr1  4399321 4399322 NM_001195662 0     -      #>  3 chr1  4847774 4847775 NM_001159750 0     +      #>  4 chr1  4847774 4847775 NM_011541    0     +      #>  5 chr1  4848408 4848409 NM_001159751 0     +      #>  6 chr1  5008814 5008815 NM_001290372 0     -      #>  7 chr1  5009619 5009620 NM_021374    0     -      #>  8 chr1  5060365 5060366 NM_001177795 0     -      #>  9 chr1  5073166 5073167 NM_001310442 0     +      #> 10 chr1  5073166 5073167 NM_133826    0     +      #> # ℹ 90 more rows"},{"path":"https://rnabioco.github.io/valr/dev/reference/create_utrs3.html","id":null,"dir":"Reference","previous_headings":"","what":"Create 3' UTR features. — create_utrs3","title":"Create 3' UTR features. — create_utrs3","text":"Create 3' UTR features.","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/create_utrs3.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Create 3' UTR features. — create_utrs3","text":"","code":"create_utrs3(x)"},{"path":"https://rnabioco.github.io/valr/dev/reference/create_utrs3.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Create 3' UTR features. — create_utrs3","text":"x ivl_df BED12 format","code":""},{"path":[]},{"path":"https://rnabioco.github.io/valr/dev/reference/create_utrs3.html","id":"ref-examples","dir":"Reference","previous_headings":"","what":"Examples","title":"Create 3' UTR features. — create_utrs3","text":"","code":"x <- read_bed12(valr_example(\"mm9.refGene.bed.gz\"))  create_utrs3(x) #> # A tibble: 99 × 6 #>    chrom   start     end name         score strand #>    <chr>   <int>   <int> <chr>        <chr> <chr>  #>  1 chr1  3204562 3206102 NM_001011874 0     -      #>  2 chr1  4280926 4283061 NM_001195662 0     -      #>  3 chr1  4886445 4887990 NM_001159750 0     +      #>  4 chr1  4886445 4887990 NM_011541    0     +      #>  5 chr1  4886445 4887990 NM_001159751 0     +      #>  6 chr1  4899656 4900554 NM_001290372 0     -      #>  7 chr1  4899656 4900554 NM_021374    0     -      #>  8 chr1  4899656 4900554 NM_001177795 0     -      #>  9 chr1  5152246 5152630 NM_001310442 0     +      #> 10 chr1  5152246 5152630 NM_133826    0     +      #> # ℹ 89 more rows"},{"path":"https://rnabioco.github.io/valr/dev/reference/create_utrs5.html","id":null,"dir":"Reference","previous_headings":"","what":"Create 5' UTR features. — create_utrs5","title":"Create 5' UTR features. — create_utrs5","text":"Create 5' UTR features.","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/create_utrs5.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Create 5' UTR features. — create_utrs5","text":"","code":"create_utrs5(x)"},{"path":"https://rnabioco.github.io/valr/dev/reference/create_utrs5.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Create 5' UTR features. — create_utrs5","text":"x ivl_df BED12 format","code":""},{"path":[]},{"path":"https://rnabioco.github.io/valr/dev/reference/create_utrs5.html","id":"ref-examples","dir":"Reference","previous_headings":"","what":"Examples","title":"Create 5' UTR features. — create_utrs5","text":"","code":"x <- read_bed12(valr_example(\"mm9.refGene.bed.gz\"))  create_utrs5(x) #> # A tibble: 97 × 6 #>    chrom   start     end name         score strand #>    <chr>   <int>   <int> <chr>        <chr> <chr>  #>  1 chr1  3661429 3661579 NM_001011874 0     -      #>  2 chr1  4399268 4399322 NM_001195662 0     -      #>  3 chr1  4847774 4847994 NM_001159750 0     +      #>  4 chr1  4847774 4847994 NM_011541    0     +      #>  5 chr1  4848408 4848488 NM_001159751 0     +      #>  6 chr1  4914046 5008815 NM_001290372 0     -      #>  7 chr1  5009460 5009620 NM_021374    0     -      #>  8 chr1  5060258 5060366 NM_001177795 0     -      #>  9 chr1  5073166 5074531 NM_001310442 0     +      #> 10 chr1  5073166 5074531 NM_133826    0     +      #> # ℹ 87 more rows"},{"path":"https://rnabioco.github.io/valr/dev/reference/db.html","id":null,"dir":"Reference","previous_headings":"","what":"Fetch data from remote databases. — db","title":"Fetch data from remote databases. — db","text":"Currently db_ucsc db_ensembl available connections.","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/db.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Fetch data from remote databases. — db","text":"","code":"db_ucsc(   dbname,   host = \"genome-mysql.cse.ucsc.edu\",   user = \"genomep\",   password = \"password\",   port = 3306,   ... )  db_ensembl(   dbname,   host = \"ensembldb.ensembl.org\",   user = \"anonymous\",   password = \"\",   port = 3306,   ... )"},{"path":"https://rnabioco.github.io/valr/dev/reference/db.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Fetch data from remote databases. — db","text":"dbname name database host hostname user username password password port MySQL connection port ... params connection","code":""},{"path":[]},{"path":"https://rnabioco.github.io/valr/dev/reference/db.html","id":"ref-examples","dir":"Reference","previous_headings":"","what":"Examples","title":"Fetch data from remote databases. — db","text":"","code":"if (FALSE) { if (require(RMariaDB)) {   library(dplyr)   ucsc <- db_ucsc(\"hg38\")    # fetch the `refGene` tbl   tbl(ucsc, \"refGene\")    # the `chromInfo` tbls have size information   tbl(ucsc, \"chromInfo\") } } if (FALSE) { if (require(RMariaDB)) {   library(dplyr)   # squirrel genome   ensembl <- db_ensembl(\"spermophilus_tridecemlineatus_core_67_2\")    tbl(ensembl, \"gene\") } }"},{"path":"https://rnabioco.github.io/valr/dev/reference/flip_strands.html","id":null,"dir":"Reference","previous_headings":"","what":"Flip strands in intervals. — flip_strands","title":"Flip strands in intervals. — flip_strands","text":"Flips positive (+) stranded intervals negative (-) strands, vice-versa. Facilitates comparisons among intervals opposing strands.","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/flip_strands.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Flip strands in intervals. — flip_strands","text":"","code":"flip_strands(x)"},{"path":"https://rnabioco.github.io/valr/dev/reference/flip_strands.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Flip strands in intervals. — flip_strands","text":"x ivl_df","code":""},{"path":[]},{"path":"https://rnabioco.github.io/valr/dev/reference/flip_strands.html","id":"ref-examples","dir":"Reference","previous_headings":"","what":"Examples","title":"Flip strands in intervals. — flip_strands","text":"","code":"x <- tibble::tribble(   ~chrom, ~start, ~end, ~strand,   \"chr1\", 1,      100,  \"+\",   \"chr2\", 1,      100,  \"-\" )  flip_strands(x) #> # A tibble: 2 × 4 #>   chrom start   end strand #>   <chr> <dbl> <dbl> <chr>  #> 1 chr1      1   100 -      #> 2 chr2      1   100 +"},{"path":"https://rnabioco.github.io/valr/dev/reference/gr_to_bed.html","id":null,"dir":"Reference","previous_headings":"","what":"Convert Granges to bed tibble — gr_to_bed","title":"Convert Granges to bed tibble — gr_to_bed","text":"Convert Granges bed tibble","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/gr_to_bed.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Convert Granges to bed tibble — gr_to_bed","text":"","code":"gr_to_bed(x)"},{"path":"https://rnabioco.github.io/valr/dev/reference/gr_to_bed.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Convert Granges to bed tibble — gr_to_bed","text":"x GRanges object convert bed tibble.","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/gr_to_bed.html","id":"value","dir":"Reference","previous_headings":"","what":"Value","title":"Convert Granges to bed tibble — gr_to_bed","text":"tibble::tibble()","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/gr_to_bed.html","id":"ref-examples","dir":"Reference","previous_headings":"","what":"Examples","title":"Convert Granges to bed tibble — gr_to_bed","text":"","code":"if (FALSE) { gr <- GenomicRanges::GRanges(   seqnames = S4Vectors::Rle(     c(\"chr1\", \"chr2\", \"chr1\", \"chr3\"),     c(1, 1, 1, 1)   ),   ranges = IRanges::IRanges(     start = c(1, 10, 50, 100),     end = c(100, 500, 1000, 2000),     names = head(letters, 4)   ),   strand = S4Vectors::Rle(     c(\"-\", \"+\"), c(2, 2)   ) )  gr_to_bed(gr)  # There are two ways to convert a bed-like data.frame to GRanges:  gr <- GenomicRanges::GRanges(   seqnames = S4Vectors::Rle(x$chrom),   ranges = IRanges::IRanges(     start = x$start + 1,     end = x$end,     names = x$name   ),   strand = S4Vectors::Rle(x$strand) ) # or:  gr <- GenomicRanges::makeGRangesFromDataFrame(dplyr::mutate(x, start = start + 1)) }"},{"path":"https://rnabioco.github.io/valr/dev/reference/id.html","id":null,"dir":"Reference","previous_headings":"","what":"Plyr function id packaged due to plyr being retired\nCompute a unique numeric id for each unique row in a data frame. — id","title":"Plyr function id packaged due to plyr being retired\nCompute a unique numeric id for each unique row in a data frame. — id","text":"Properties: order(id) equivalent .call(order, df) rows containing data value drop = FALSE room possibilites","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/id.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Plyr function id packaged due to plyr being retired\nCompute a unique numeric id for each unique row in a data frame. — id","text":"","code":"id(.variables, drop = FALSE)"},{"path":"https://rnabioco.github.io/valr/dev/reference/id.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Plyr function id packaged due to plyr being retired\nCompute a unique numeric id for each unique row in a data frame. — id","text":".variables list variables drop drop unusued factor levels?","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/id.html","id":"value","dir":"Reference","previous_headings":"","what":"Value","title":"Plyr function id packaged due to plyr being retired\nCompute a unique numeric id for each unique row in a data frame. — id","text":"numeric vector attribute n, giving total number possibilities","code":""},{"path":[]},{"path":"https://rnabioco.github.io/valr/dev/reference/id_var.html","id":null,"dir":"Reference","previous_headings":"","what":"Plyr function id_var packaged due to plyr being retired\nNumeric id for a vector. — id_var","title":"Plyr function id_var packaged due to plyr being retired\nNumeric id for a vector. — id_var","text":"Plyr function id_var packaged due plyr retired Numeric id vector.","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/id_var.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Plyr function id_var packaged due to plyr being retired\nNumeric id for a vector. — id_var","text":"","code":"id_var(x, drop = FALSE)"},{"path":"https://rnabioco.github.io/valr/dev/reference/interval_spacing.html","id":null,"dir":"Reference","previous_headings":"","what":"Calculate interval spacing. — interval_spacing","title":"Calculate interval spacing. — interval_spacing","text":"Spacing first interval chromosome undefined (NA). leading interval overlapping interval pair negative value.","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/interval_spacing.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Calculate interval spacing. — interval_spacing","text":"","code":"interval_spacing(x)"},{"path":"https://rnabioco.github.io/valr/dev/reference/interval_spacing.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Calculate interval spacing. — interval_spacing","text":"x ivl_df","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/interval_spacing.html","id":"value","dir":"Reference","previous_headings":"","what":"Value","title":"Calculate interval spacing. — interval_spacing","text":"ivl_df .spacing column.","code":""},{"path":[]},{"path":"https://rnabioco.github.io/valr/dev/reference/interval_spacing.html","id":"ref-examples","dir":"Reference","previous_headings":"","what":"Examples","title":"Calculate interval spacing. — interval_spacing","text":"","code":"x <- tibble::tribble(   ~chrom, ~start, ~end,   \"chr1\", 1,      100,   \"chr1\", 150,    200,   \"chr2\", 200,    300 )  interval_spacing(x) #> # A tibble: 3 × 4 #>   chrom start   end .spacing #>   <chr> <dbl> <dbl>    <dbl> #> 1 chr1      1   100       NA #> 2 chr1    150   200       50 #> 3 chr2    200   300       NA"},{"path":"https://rnabioco.github.io/valr/dev/reference/ivl_df.html","id":null,"dir":"Reference","previous_headings":"","what":"Bed-like data.frame requirements for valr functions — ivl_df","title":"Bed-like data.frame requirements for valr functions — ivl_df","text":"Required column names interval dataframes chrom, start end. Internally interval dataframes validated using check_interval() Required column names genome dataframes chrom size. Internally genome dataframes validated using check_genome().","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/ivl_df.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Bed-like data.frame requirements for valr functions — ivl_df","text":"","code":"check_interval(x)  check_genome(x)"},{"path":"https://rnabioco.github.io/valr/dev/reference/ivl_df.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Bed-like data.frame requirements for valr functions — ivl_df","text":"x data.frame tibble::tibble","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/ivl_df.html","id":"ref-examples","dir":"Reference","previous_headings":"","what":"Examples","title":"Bed-like data.frame requirements for valr functions — ivl_df","text":"","code":"# using tibble x <- tibble::tribble(   ~chrom, ~start, ~end,   \"chr1\", 1, 50,   \"chr1\", 10, 75,   \"chr1\", 100, 120 )  check_interval(x) #> # A tibble: 3 × 3 #>   chrom start   end #>   <chr> <dbl> <dbl> #> 1 chr1      1    50 #> 2 chr1     10    75 #> 3 chr1    100   120  # using base R data.frame x <- data.frame(   chrom = \"chr1\",   start = 0,   end = 100,   stringsAsFactors = FALSE )  check_interval(x) #> # A tibble: 1 × 3 #>   chrom start   end #>   <chr> <dbl> <dbl> #> 1 chr1      0   100  # example genome input  x <- tibble::tribble(   ~chrom, ~size,   \"chr1\", 1e6 )  check_genome(x) #> # A tibble: 1 × 2 #>   chrom    size #>   <chr>   <dbl> #> 1 chr1  1000000"},{"path":"https://rnabioco.github.io/valr/dev/reference/read_bed.html","id":null,"dir":"Reference","previous_headings":"","what":"Read BED and related files. — read_bed","title":"Read BED and related files. — read_bed","text":"read functions BED related formats. Filenames can local file URLs. read functions load data tbls consistent chrom, start end colnames.","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/read_bed.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Read BED and related files. — read_bed","text":"","code":"read_bed(   filename,   col_types = bed12_coltypes,   sort = TRUE,   ...,   n_fields = NULL )  read_bed12(filename, ...)  read_bedgraph(filename, ...)  read_narrowpeak(filename, ...)  read_broadpeak(filename, ...)"},{"path":"https://rnabioco.github.io/valr/dev/reference/read_bed.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Read BED and related files. — read_bed","text":"filename file URL col_types column type spec readr::read_tsv() sort sort tbl chrom start ... options pass readr::read_tsv() n_fields","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/read_bed.html","id":"value","dir":"Reference","previous_headings":"","what":"Value","title":"Read BED and related files. — read_bed","text":"ivl_df","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/read_bed.html","id":"details","dir":"Reference","previous_headings":"","what":"Details","title":"Read BED and related files. — read_bed","text":"https://genome.ucsc.edu/FAQ/FAQformat.html#format1 https://genome.ucsc.edu/FAQ/FAQformat.html#format1 https://genome.ucsc.edu/goldenPath/help/bedgraph.html https://genome.ucsc.edu/FAQ/FAQformat.html#format12 https://genome.ucsc.edu/FAQ/FAQformat.html#format13","code":""},{"path":[]},{"path":"https://rnabioco.github.io/valr/dev/reference/read_bed.html","id":"ref-examples","dir":"Reference","previous_headings":"","what":"Examples","title":"Read BED and related files. — read_bed","text":"","code":"# read_bed assumes 3 field BED format. read_bed(valr_example(\"3fields.bed.gz\")) #> # A tibble: 10 × 3 #>    chrom  start    end #>    <chr>  <int>  <int> #>  1 chr1   11873  14409 #>  2 chr1   14361  19759 #>  3 chr1   14406  29370 #>  4 chr1   34610  36081 #>  5 chr1   69090  70008 #>  6 chr1  134772 140566 #>  7 chr1  321083 321115 #>  8 chr1  321145 321207 #>  9 chr1  322036 326938 #> 10 chr1  327545 328439  # result is sorted by chrom and start unless `sort = FALSE` read_bed(valr_example(\"3fields.bed.gz\"), sort = FALSE) #> # A tibble: 10 × 3 #>    chrom  start    end #>    <chr>  <int>  <int> #>  1 chr1   11873  14409 #>  2 chr1   14361  19759 #>  3 chr1   14406  29370 #>  4 chr1   34610  36081 #>  5 chr1   69090  70008 #>  6 chr1  134772 140566 #>  7 chr1  321083 321115 #>  8 chr1  321145 321207 #>  9 chr1  322036 326938 #> 10 chr1  327545 328439   read_bed12(valr_example(\"mm9.refGene.bed.gz\")) #> # A tibble: 100 × 12 #>    chrom   start     end name      score strand cds_start cds_end item_rgb #>    <chr>   <int>   <int> <chr>     <chr> <chr>      <int>   <int> <chr>    #>  1 chr1  3204562 3661579 NM_00101… 0     -        3206102 3661429 0        #>  2 chr1  4280926 4399322 NM_00119… 0     -        4283061 4399268 0        #>  3 chr1  4847774 4887990 NM_00115… 0     +        4847994 4886445 0        #>  4 chr1  4847774 4887990 NM_011541 0     +        4847994 4886445 0        #>  5 chr1  4848408 4887990 NM_00115… 0     +        4848488 4886445 0        #>  6 chr1  4899656 5008815 NM_00129… 0     -        4900554 4914046 0        #>  7 chr1  4899656 5009620 NM_021374 0     -        4900554 5009460 0        #>  8 chr1  4899656 5060366 NM_00117… 0     -        4900554 5060258 0        #>  9 chr1  5073166 5152630 NM_00131… 0     +        5074531 5152246 0        #> 10 chr1  5073166 5152630 NM_133826 0     +        5074531 5152246 0        #> # ℹ 90 more rows #> # ℹ 3 more variables: exon_count <int>, exon_sizes <chr>, #> #   exon_starts <chr>   read_bedgraph(valr_example(\"test.bg.gz\")) #> # A tibble: 4 × 4 #>   chrom    start      end value #>   <chr>    <int>    <int> <dbl> #> 1 chr19 49302000 49302300 -1    #> 2 chr19 49302300 49302600 -0.75 #> 3 chr19 49302600 49302900 -0.5  #> 4 chr19 49302900 49303200 -0.25   read_narrowpeak(valr_example(\"sample.narrowPeak.gz\")) #> # A tibble: 570 × 10 #>    chrom    start      end name  score strand signal pvalue qvalue  peak #>    <chr>    <int>    <int> <chr> <int> <chr>   <dbl>  <dbl>  <dbl> <int> #>  1 chr22 17372940 17373090 .         0 .           4   4.63     -1    -1 #>  2 chr22 17392200 17392350 .         0 .           5   4.67     -1    -1 #>  3 chr22 17398400 17398550 .         0 .          10  11.6      -1    -1 #>  4 chr22 17539180 17539330 .         0 .          21  30.9      -1    -1 #>  5 chr22 17652440 17652590 .         0 .           6   5.35     -1    -1 #>  6 chr22 17652780 17652930 .         0 .          12  12.5      -1    -1 #>  7 chr22 17980800 17980950 .         0 .          12  12.6      -1    -1 #>  8 chr22 18038260 18038410 .         0 .          29  36.0      -1    -1 #>  9 chr22 18225280 18225430 .         0 .          21  25.0      -1    -1 #> 10 chr22 18268020 18268170 .         0 .          14  13.0      -1    -1 #> # ℹ 560 more rows   read_broadpeak(valr_example(\"sample.broadPeak.gz\")) #> # A tibble: 1,181 × 9 #>    chrom    start      end name  score strand signal pvalue qvalue #>    <chr>    <int>    <int> <chr> <int> <chr>   <dbl>  <dbl>  <dbl> #>  1 chr22 16847903 16848440 .       503 .       10.5     2.5     -1 #>  2 chr22 16849452 16851326 .       483 .        9.81   15.7     -1 #>  3 chr22 16849955 16850086 .      1000 .       32.4     4.2     -1 #>  4 chr22 16850694 16850924 .       831 .       22.5     4.9     -1 #>  5 chr22 16852964 16853782 .       499 .       10.4     6.2     -1 #>  6 chr22 16855065 16855803 .       477 .        9.58    3.9     -1 #>  7 chr22 16855944 16856974 .       491 .       10.1     8.5     -1 #>  8 chr22 16857425 16857958 .       505 .       10.6     2.5     -1 #>  9 chr22 16858284 16858824 .       549 .       12.2     4.5     -1 #> 10 chr22 16859972 16862024 .       404 .        6.89    9.3     -1 #> # ℹ 1,171 more rows"},{"path":"https://rnabioco.github.io/valr/dev/reference/read_bigwig.html","id":null,"dir":"Reference","previous_headings":"","what":"Import and convert a bigwig file into a valr compatible tbl — read_bigwig","title":"Import and convert a bigwig file into a valr compatible tbl — read_bigwig","text":"function output 5 column tibble zero-based chrom, start, end, score, strand columns.","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/read_bigwig.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Import and convert a bigwig file into a valr compatible tbl — read_bigwig","text":"","code":"read_bigwig(path, set_strand = \"+\")"},{"path":"https://rnabioco.github.io/valr/dev/reference/read_bigwig.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Import and convert a bigwig file into a valr compatible tbl — read_bigwig","text":"path path bigWig file set_strand strand add output (defaults \"+\")","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/read_bigwig.html","id":"note","dir":"Reference","previous_headings":"","what":"Note","title":"Import and convert a bigwig file into a valr compatible tbl — read_bigwig","text":"functions uses rtracklayer import bigwigs unstable support windows platform therefore may error windows users (particularly 32 bit window users).","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/read_bigwig.html","id":"ref-examples","dir":"Reference","previous_headings":"","what":"Examples","title":"Import and convert a bigwig file into a valr compatible tbl — read_bigwig","text":"","code":"if (FALSE) { if (.Platform$OS.type != \"windows\") {   bw <- read_bigwig(valr_example(\"hg19.dnase1.bw\"))   head(bw) } }"},{"path":"https://rnabioco.github.io/valr/dev/reference/read_genome.html","id":null,"dir":"Reference","previous_headings":"","what":"Read genome files. — read_genome","title":"Read genome files. — read_genome","text":"Genome files (UCSC \"chromSize\" files) contain chromosome name size information. sizes used downstream functions identify computed intervals coordinates outside genome bounds.","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/read_genome.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Read genome files. — read_genome","text":"","code":"read_genome(path)"},{"path":"https://rnabioco.github.io/valr/dev/reference/read_genome.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Read genome files. — read_genome","text":"path containing chrom/contig names sizes, one-pair-per-line, tab-delimited","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/read_genome.html","id":"value","dir":"Reference","previous_headings":"","what":"Value","title":"Read genome files. — read_genome","text":"genome_df, sorted size","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/read_genome.html","id":"note","dir":"Reference","previous_headings":"","what":"Note","title":"Read genome files. — read_genome","text":"URLs genome files can also used.","code":""},{"path":[]},{"path":"https://rnabioco.github.io/valr/dev/reference/read_genome.html","id":"ref-examples","dir":"Reference","previous_headings":"","what":"Examples","title":"Read genome files. — read_genome","text":"","code":"read_genome(valr_example(\"hg19.chrom.sizes.gz\")) #> # A tibble: 25 × 2 #>    chrom      size #>    <chr>     <dbl> #>  1 chr1  249250621 #>  2 chr2  243199373 #>  3 chr3  198022430 #>  4 chr4  191154276 #>  5 chr5  180915260 #>  6 chr6  171115067 #>  7 chr7  159138663 #>  8 chrX  155270560 #>  9 chr8  146364022 #> 10 chr9  141213431 #> # ℹ 15 more rows  if (FALSE) { # `read_genome` accepts a URL read_genome(\"https://genome.ucsc.edu/goldenpath/help/hg19.chrom.sizes\") }"},{"path":"https://rnabioco.github.io/valr/dev/reference/read_gtf.html","id":null,"dir":"Reference","previous_headings":"","what":"Import and convert a GTF/GFF file into a valr compatible bed tbl format — read_gtf","title":"Import and convert a GTF/GFF file into a valr compatible bed tbl format — read_gtf","text":"function output tibble required chrom, start, end columns, well columns depending content GTF/GFF file.","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/read_gtf.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Import and convert a GTF/GFF file into a valr compatible bed tbl format — read_gtf","text":"","code":"read_gtf(path, zero_based = TRUE)"},{"path":"https://rnabioco.github.io/valr/dev/reference/read_gtf.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Import and convert a GTF/GFF file into a valr compatible bed tbl format — read_gtf","text":"path path gtf gff file zero_based TRUE, convert zero based","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/read_gtf.html","id":"ref-examples","dir":"Reference","previous_headings":"","what":"Examples","title":"Import and convert a GTF/GFF file into a valr compatible bed tbl format — read_gtf","text":"","code":"gtf <- read_gtf(valr_example(\"hg19.gencode.gtf.gz\")) head(gtf) #> # A tibble: 6 × 26 #>   chrom    start      end width strand source type     score phase gene_id #>   <chr>    <int>    <int> <int> <chr>  <chr>  <chr>    <dbl> <int> <chr>   #> 1 chr2  43449540 43453748  4208 -      HAVANA gene        NA    NA ENSG00… #> 2 chr2  43449540 43453748  4208 -      HAVANA transcr…    NA    NA ENSG00… #> 3 chr2  43453403 43453748   345 -      HAVANA exon        NA    NA ENSG00… #> 4 chr2  43453403 43453454    51 -      HAVANA CDS         NA     0 ENSG00… #> 5 chr2  43453451 43453454     3 -      HAVANA start_c…    NA     0 ENSG00… #> 6 chr2  43449540 43452891  3351 -      HAVANA exon        NA    NA ENSG00… #> # ℹ 16 more variables: transcript_id <chr>, gene_type <chr>, #> #   gene_status <chr>, gene_name <chr>, transcript_type <chr>, #> #   transcript_status <chr>, transcript_name <chr>, level <chr>, #> #   havana_gene <chr>, protein_id <chr>, tag <chr>, ccdsid <chr>, #> #   havana_transcript <chr>, exon_number <chr>, exon_id <chr>, ont <chr>"},{"path":"https://rnabioco.github.io/valr/dev/reference/read_vcf.html","id":null,"dir":"Reference","previous_headings":"","what":"Read a VCF file. — read_vcf","title":"Read a VCF file. — read_vcf","text":"Read VCF file.","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/read_vcf.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Read a VCF file. — read_vcf","text":"","code":"read_vcf(vcf)"},{"path":"https://rnabioco.github.io/valr/dev/reference/read_vcf.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Read a VCF file. — read_vcf","text":"vcf vcf filename","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/read_vcf.html","id":"value","dir":"Reference","previous_headings":"","what":"Value","title":"Read a VCF file. — read_vcf","text":"data_frame","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/read_vcf.html","id":"note","dir":"Reference","previous_headings":"","what":"Note","title":"Read a VCF file. — read_vcf","text":"return value chrom, start end columns. Interval lengths size 'REF' field.","code":""},{"path":[]},{"path":"https://rnabioco.github.io/valr/dev/reference/read_vcf.html","id":"ref-examples","dir":"Reference","previous_headings":"","what":"Examples","title":"Read a VCF file. — read_vcf","text":"","code":"vcf_file <- valr_example(\"test.vcf.gz\") read_vcf(vcf_file) #> # A tibble: 11 × 18 #>    CHROM   POS ID      REF   ALT    QUAL FILTER INFO    FORMAT X1    X2    #>    <chr> <dbl> <chr>   <chr> <chr> <dbl> <chr>  <chr>   <chr>  <chr> <chr> #>  1 1        10 1:10    A     T       100 PASS   NS=5;A… GT     0/0   ./.   #>  2 1        20 1:20    G     C       100 PASS   NS=0;A… GT     ./.   ./.   #>  3 1        30 1:30    C     A       100 PASS   NS=6;A… GT     0/0   0/0   #>  4 1        40 1:40    A     C       100 PASS   NS=6;A… GT     0/0   0/0   #>  5 1     10000 1:10000 G     C       100 PASS   NS=6;A… GT     0/0   0/0   #>  6 1     20000 1:20000 T     A       100 PASS   NS=6;A… GT     1/1   1/1   #>  7 4      5000 4:5000  A     T       100 PASS   NS=6;A… GT     1/1   1/1   #>  8 4      6000 4:6000  C     T       100 PASS   NS=6;A… GT     1/1   1/1   #>  9 X       800 X:800   A     C       100 PASS   NS=6;A… GT     1/1   1/1   #> 10 X       900 X:900   A     T       100 PASS   NS=6;A… GT     1/1   1/1   #> 11 X      1000 X:1000  T     G       100 PASS   NS=5;A… GT     1/1   1/1   #> # ℹ 7 more variables: X3 <chr>, X4 <chr>, X5 <chr>, X6 <chr>, #> #   chrom <chr>, start <dbl>, end <dbl>"},{"path":"https://rnabioco.github.io/valr/dev/reference/valr.html","id":null,"dir":"Reference","previous_headings":"","what":"valr: genome interval arithmetic in R — valr","title":"valr: genome interval arithmetic in R — valr","text":"valr provides tools read manipulate intervals signals genome reference. valr developed facilitate interactive analysis genome-scale data sets, leveraging power dplyr piping.","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/valr.html","id":"details","dir":"Reference","previous_headings":"","what":"Details","title":"valr: genome interval arithmetic in R — valr","text":"learn valr, start vignette: browseVignettes(package = \"valr\")","code":""},{"path":[]},{"path":"https://rnabioco.github.io/valr/dev/reference/valr.html","id":"author","dir":"Reference","previous_headings":"","what":"Author","title":"valr: genome interval arithmetic in R — valr","text":"Jay Hesselberth jay.hesselberth@gmail.com Kent Riemondy kent.riemondy@gmail.com","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/valr_example.html","id":null,"dir":"Reference","previous_headings":"","what":"Provide working directory for valr example files. — valr_example","title":"Provide working directory for valr example files. — valr_example","text":"Provide working directory valr example files.","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/valr_example.html","id":"ref-usage","dir":"Reference","previous_headings":"","what":"Usage","title":"Provide working directory for valr example files. — valr_example","text":"","code":"valr_example(path)"},{"path":"https://rnabioco.github.io/valr/dev/reference/valr_example.html","id":"arguments","dir":"Reference","previous_headings":"","what":"Arguments","title":"Provide working directory for valr example files. — valr_example","text":"path path file","code":""},{"path":"https://rnabioco.github.io/valr/dev/reference/valr_example.html","id":"ref-examples","dir":"Reference","previous_headings":"","what":"Examples","title":"Provide working directory for valr example files. — valr_example","text":"","code":"valr_example(\"hg19.chrom.sizes.gz\") #> [1] \"/home/runner/work/_temp/Library/valr/extdata/hg19.chrom.sizes.gz\""},{"path":"https://rnabioco.github.io/valr/dev/news/index.html","id":"valr-080","dir":"Changelog","previous_headings":"","what":"valr 0.8.0","title":"valr 0.8.0","text":"Added bed_genomecov() compute interval coverage across genome.","code":""},{"path":"https://rnabioco.github.io/valr/dev/news/index.html","id":"valr-070","dir":"Changelog","previous_headings":"","what":"valr 0.7.0","title":"valr 0.7.0","text":"CRAN release: 2023-09-18 read_bed related functions now automatically calculate fields. Use n_fields deprecated.","code":""},{"path":"https://rnabioco.github.io/valr/dev/news/index.html","id":"valr-068","dir":"Changelog","previous_headings":"","what":"valr 0.6.8","title":"valr 0.6.8","text":"CRAN release: 2023-05-16 bed_closest() now reports x intervals, even closest y intervals (e.g. matching chromosome y intervals). intervals returned populated NA .overlap, .dist y interval locations. Reimplemented bed_closest() use binary search rather interval tree search. closest y interval can missed previous search strategy high depth interval trees. Fix one error using max_dist argument bed_cluster() (#401).","code":""},{"path":"https://rnabioco.github.io/valr/dev/news/index.html","id":"valr-067","dir":"Changelog","previous_headings":"","what":"valr 0.6.7","title":"valr 0.6.7","text":"CRAN release: 2023-02-18 Removed SystemRequirements DESCRIPTION eliminate NOTE CRAN. bed_coverage() now reports intervals x matching group y (#395).","code":""},{"path":"https://rnabioco.github.io/valr/dev/news/index.html","id":"valr-066","dir":"Changelog","previous_headings":"","what":"valr 0.6.6","title":"valr 0.6.6","text":"CRAN release: 2022-10-11 Updated intervalTree header commit f0c4046 valr now uses cli consistent errors messages interactive use. deprecated genome argument bed_makewindows() removed.","code":""},{"path":"https://rnabioco.github.io/valr/dev/news/index.html","id":"valr-065","dir":"Changelog","previous_headings":"","what":"valr 0.6.5","title":"valr 0.6.5","text":"CRAN release: 2022-08-19 Handle max_dist first intervals bed_cluster() (#388)","code":""},{"path":"https://rnabioco.github.io/valr/dev/news/index.html","id":"valr-064","dir":"Changelog","previous_headings":"","what":"valr 0.6.4","title":"valr 0.6.4","text":"CRAN release: 2021-12-08 Fixed intron score numbering error create_introns (#377 @sheridar) Fixed bug handling list inputs bed_intersect()(#380 @sheridar) Added read_bigwig read_gtf functions import data valr compatible tibbles (#379) Kent Riemondy now maintainer.","code":""},{"path":"https://rnabioco.github.io/valr/dev/news/index.html","id":"valr-063","dir":"Changelog","previous_headings":"","what":"valr 0.6.3","title":"valr 0.6.3","text":"CRAN release: 2021-05-15 Update prepare readr 2.0.0","code":""},{"path":"https://rnabioco.github.io/valr/dev/news/index.html","id":"valr-062","dir":"Changelog","previous_headings":"","what":"valr 0.6.2","title":"valr 0.6.2","text":"CRAN release: 2020-10-07","code":""},{"path":"https://rnabioco.github.io/valr/dev/news/index.html","id":"minor-changes-0-6-2","dir":"Changelog","previous_headings":"","what":"Minor changes","title":"valr 0.6.2","text":"RMariaDB replaced deprecated RMySQL package database backend. valr now imports Rcpp, always case, masked Import readr, recently dropped use Rcpp.","code":""},{"path":"https://rnabioco.github.io/valr/dev/news/index.html","id":"valr-061","dir":"Changelog","previous_headings":"","what":"valr 0.6.1","title":"valr 0.6.1","text":"CRAN release: 2020-05-08","code":""},{"path":"https://rnabioco.github.io/valr/dev/news/index.html","id":"bug-fixes-0-6-1","dir":"Changelog","previous_headings":"","what":"Bug Fixes","title":"valr 0.6.1","text":"Fixed rchk unprotect error (#365)","code":""},{"path":"https://rnabioco.github.io/valr/dev/news/index.html","id":"valr-060","dir":"Changelog","previous_headings":"","what":"valr 0.6.0","title":"valr 0.6.0","text":"CRAN release: 2020-05-04","code":""},{"path":"https://rnabioco.github.io/valr/dev/news/index.html","id":"major-changes-0-6-0","dir":"Changelog","previous_headings":"","what":"Major changes","title":"valr 0.6.0","text":"trbl_interval() trbl_genome() custom tibble subclasses deemed unnecessary removed package. coercing GRanges valr compatible data.frame now uses gr_to_bed() function rather .trbl_interal() methods.","code":""},{"path":"https://rnabioco.github.io/valr/dev/news/index.html","id":"minor-changes-0-6-0","dir":"Changelog","previous_headings":"","what":"Minor changes","title":"valr 0.6.0","text":"dplyr version < 0.8.0 longer supported due unnecessary code bloat challenges handling multiple grouping structures (#359). sort_by argument bed_random() changed sorted, now default use bed_sort() sort output, rather rely naming sorting columns. Sorting can suppressed using sorted = FALSE. bed_sort() now uses base R sorting radix method increased speed. (#353) tbls processed bed_merge()bed_sort() longer store either merged sorted attributes, due attributes rarely checked codebase potential sources unexpected behavior.","code":""},{"path":"https://rnabioco.github.io/valr/dev/news/index.html","id":"bug-fixes-0-6-0","dir":"Changelog","previous_headings":"","what":"Bug fixes","title":"valr 0.6.0","text":"Fixed bed_closest() prevent erroneous intervals reported adjacent closest intervals present y table. (#348) Factor columns used grouping returned factors rather inappropriately coerced integer vectors (#360)","code":""},{"path":"https://rnabioco.github.io/valr/dev/news/index.html","id":"valr-050","dir":"Changelog","previous_headings":"","what":"valr 0.5.0","title":"valr 0.5.0","text":"CRAN release: 2019-01-03","code":""},{"path":"https://rnabioco.github.io/valr/dev/news/index.html","id":"major-changes-0-5-0","dir":"Changelog","previous_headings":"","what":"Major changes","title":"valr 0.5.0","text":"Internal Rcpp functions reorganized remove dependencies dplyr C++ functions.","code":""},{"path":"https://rnabioco.github.io/valr/dev/news/index.html","id":"minor-changes-0-5-0","dir":"Changelog","previous_headings":"","what":"Minor changes","title":"valr 0.5.0","text":"Due internal refactoring Rcpp functions, data.frames containing Numeric, Logical, Integer, Character, List column types supported. Columns containing Raw, Complex, R classes supported issue error. Factors now disallowed grouping variables multiset operations avoid sort order discrepancies, compatibility factor handling dplyr v.0.8.0. Factors now internally type-converted character warning issued.","code":""},{"path":"https://rnabioco.github.io/valr/dev/news/index.html","id":"valr-042","dir":"Changelog","previous_headings":"","what":"valr 0.4.2","title":"valr 0.4.2","text":"CRAN release: 2018-11-17","code":""},{"path":"https://rnabioco.github.io/valr/dev/news/index.html","id":"bug-fixes-0-4-2","dir":"Changelog","previous_headings":"","what":"Bug fixes","title":"valr 0.4.2","text":"Changed behavior .tbl_interval() call as_tibble() non-tibble input, prevents groups stripped tibble() input (#338).","code":""},{"path":"https://rnabioco.github.io/valr/dev/news/index.html","id":"valr-041","dir":"Changelog","previous_headings":"","what":"valr 0.4.1","title":"valr 0.4.1","text":"CRAN release: 2018-06-08 Added new function, bed_partition(), similar bed_merge() collapses intervals elemental intervals rather maximal overlapping region. bed_partition() also can compute summaries data overlapping intervals. See examples bed_partition() timings vignette('benchmarks') @kriemo. Several explicit comparisons Bioconductor GenomicRanges library included users considering using valr. See examples .tbl_interval() timings vignette('benchmarks').","code":""},{"path":"https://rnabioco.github.io/valr/dev/news/index.html","id":"valr-040","dir":"Changelog","previous_headings":"","what":"valr 0.4.0","title":"valr 0.4.0","text":"CRAN release: 2018-01-25","code":""},{"path":"https://rnabioco.github.io/valr/dev/news/index.html","id":"minor-changes-0-4-0","dir":"Changelog","previous_headings":"","what":"Minor changes","title":"valr 0.4.0","text":"relevant tests bedtool2 ported valr. Bugs identified corner cases new tests fixed (#328 @raysinesis) bed_jaccard() now works grouped inputs (#216) Update dplyr header files v0.7 bed_intersect() internal intersect_impl refactored enable return non-intersecting intervals. genome argument bed_makewindows() deprecated produce warning used. Also error handling added check warn intervals smaller requested window size makewindows_impl() (#312 @kriemo)","code":""},{"path":"https://rnabioco.github.io/valr/dev/news/index.html","id":"bug-fixes-0-4-0","dir":"Changelog","previous_headings":"","what":"Bug fixes","title":"valr 0.4.0","text":"Fixed one error reported distances bed_closest(). Distances reported now bedtools closest behavior (#311). bed_glyph() accepts trbl_intervals named x y (#318). bed_makewindows() now returns number windows specified num_win input intervals evenly divisble num_win, consistent bedtools behavior. output findOverlaps() now sorted subtract_impl() prevent reporting intervals dropped calling bed_subtract() (#316 @kriemo)","code":""},{"path":"https://rnabioco.github.io/valr/dev/news/index.html","id":"valr-031","dir":"Changelog","previous_headings":"","what":"valr 0.3.1","title":"valr 0.3.1","text":"CRAN release: 2017-07-22","code":""},{"path":"https://rnabioco.github.io/valr/dev/news/index.html","id":"enhancements-0-3-1","dir":"Changelog","previous_headings":"","what":"Enhancements","title":"valr 0.3.1","text":"manuscript describing valr published F1000Research. New S3 generic .tbl_interval() converts GenomicRanges::GRanges objects tbl_interval. New create_tss() creating transcription start sites. Improve documentation interval statistics complex examples.","code":""},{"path":"https://rnabioco.github.io/valr/dev/news/index.html","id":"minor-changes-0-3-1","dir":"Changelog","previous_headings":"","what":"Minor changes","title":"valr 0.3.1","text":"bed_sort() de-deprecated reduce arrange calls library code.","code":""},{"path":"https://rnabioco.github.io/valr/dev/news/index.html","id":"bug-fixes-0-3-1","dir":"Changelog","previous_headings":"","what":"Bug fixes","title":"valr 0.3.1","text":"bed_merge() now reports start/end columns spec provided (#288)","code":""},{"path":"https://rnabioco.github.io/valr/dev/news/index.html","id":"valr-030","dir":"Changelog","previous_headings":"","what":"valr 0.3.0","title":"valr 0.3.0","text":"CRAN release: 2017-06-15","code":""},{"path":"https://rnabioco.github.io/valr/dev/news/index.html","id":"enhancements-0-3-0","dir":"Changelog","previous_headings":"","what":"Enhancements","title":"valr 0.3.0","text":"New create_introns(), create_utrs5() create_utrs3() functions generating features BED12 files. Speed-ups bed_makewindows() (~50x), bed_merge() (~4x), bed_flank() (~4x) (thanks @kriemo @sheridar). Thanks sponsors Biofrontiers Hackathon caffeine underlying improvements.","code":""},{"path":"https://rnabioco.github.io/valr/dev/news/index.html","id":"bug-fixes-0-3-0","dir":"Changelog","previous_headings":"","what":"Bug fixes","title":"valr 0.3.0","text":"intervals bed_random() now sorted properly.","code":""},{"path":"https://rnabioco.github.io/valr/dev/news/index.html","id":"valr-020","dir":"Changelog","previous_headings":"","what":"valr 0.2.0","title":"valr 0.2.0","text":"CRAN release: 2017-05-05","code":""},{"path":"https://rnabioco.github.io/valr/dev/news/index.html","id":"major-changes-0-2-0","dir":"Changelog","previous_headings":"","what":"Major changes","title":"valr 0.2.0","text":"Package dplyr v0.5.0 headers valr remove dplyr LinkingTo dependency. bed_intersect() now accepts multiple tbls intersection (#220 @kriemo). new tbl_interval() tbl_genome() wrap tibbles enforce strict column naming. trbl_interval() trbl_genome() constructors take tibble::tribble() formatting .tbl_interval() .tbl_genome() used check valid classes.","code":""},{"path":"https://rnabioco.github.io/valr/dev/news/index.html","id":"minor-changes-0-2-0","dir":"Changelog","previous_headings":"","what":"Minor changes","title":"valr 0.2.0","text":"intervals returned bed_random() sorted chrom start default.","code":""},{"path":"https://rnabioco.github.io/valr/dev/news/index.html","id":"bug-fixes-0-2-0","dir":"Changelog","previous_headings":"","what":"Bug fixes","title":"valr 0.2.0","text":"Merge intervals bed_jaccard() use numeric values calculation (fixes #204).","code":""},{"path":"https://rnabioco.github.io/valr/dev/news/index.html","id":"valr-012","dir":"Changelog","previous_headings":"","what":"valr 0.1.2","title":"valr 0.1.2","text":"CRAN release: 2017-03-16","code":""},{"path":"https://rnabioco.github.io/valr/dev/news/index.html","id":"major-changes-0-1-2","dir":"Changelog","previous_headings":"","what":"Major changes","title":"valr 0.1.2","text":"Deprecate bed_sort() favor using dplyr::arrange() explicitly (fixes #134).","code":""},{"path":"https://rnabioco.github.io/valr/dev/news/index.html","id":"minor-changes-0-1-2","dir":"Changelog","previous_headings":"","what":"Minor changes","title":"valr 0.1.2","text":"add src/init.c calls R_registerRoutines R_useDynamicSymbols address NOTE r-devel Deprecate dist parameter bed_closest() favor using user supplied functions (#182 @kriemo) Make .id values sequential across chroms bed_cluster() output (#171) Transfer repository http://github.com/rnabioco/valr, update links docs. Move shiny app new repo (http://github.com/rnabioco/valrdata). Add Kent Riemondy LICENSE file.","code":""},{"path":"https://rnabioco.github.io/valr/dev/news/index.html","id":"bug-fixes-0-1-2","dir":"Changelog","previous_headings":"","what":"Bug fixes","title":"valr 0.1.2","text":"bed_merge() now merges contained intervals (#177)","code":""},{"path":"https://rnabioco.github.io/valr/dev/news/index.html","id":"valr-011","dir":"Changelog","previous_headings":"","what":"valr 0.1.1","title":"valr 0.1.1","text":"CRAN release: 2016-12-01","code":""},{"path":"https://rnabioco.github.io/valr/dev/news/index.html","id":"minor-changes-0-1-1","dir":"Changelog","previous_headings":"","what":"Minor changes","title":"valr 0.1.1","text":"test / vignette guards Suggested RMySQL fixed memory leak absdist.cpp fixed vignette entry names","code":""},{"path":"https://rnabioco.github.io/valr/dev/news/index.html","id":"valr-010","dir":"Changelog","previous_headings":"","what":"valr 0.1.0","title":"valr 0.1.0","text":"CRAN release: 2016-11-21","code":""},{"path":"https://rnabioco.github.io/valr/dev/news/index.html","id":"major-changes-0-1-0","dir":"Changelog","previous_headings":"","what":"Major changes","title":"valr 0.1.0","text":"initial release CRAN","code":""}]