From db14781593a75e96745b97953aab1672061b70ca Mon Sep 17 00:00:00 2001 From: "Matthijs S. Berends" Date: Sun, 16 Sep 2018 22:11:17 +0200 Subject: [PATCH] add labels_rsi_count --- DESCRIPTION | 4 +- NAMESPACE | 1 + NEWS.md | 2 + R/ab_property.R | 2 +- R/count.R | 6 ++- R/ggplot_rsi.R | 72 ++++++++++++++++++++++++++++------ R/globals.R | 4 +- R/mo_property.R | 2 +- R/portion.R | 6 ++- README.md | 6 ++- man/figures/rsi_example2.png | Bin 8358 -> 27922 bytes man/figures/rsi_example3.png | Bin 29836 -> 29021 bytes man/figures/rsi_example4.png | Bin 22755 -> 21029 bytes man/ggplot_rsi.Rd | 28 +++++++++---- tests/testthat/test-count.R | 2 + tests/testthat/test-portion.R | 4 +- 16 files changed, 110 insertions(+), 29 deletions(-) diff --git a/DESCRIPTION b/DESCRIPTION index 4e33e1ee..72867c1a 100755 --- a/DESCRIPTION +++ b/DESCRIPTION @@ -1,6 +1,6 @@ Package: AMR -Version: 0.3.0.9007 -Date: 2018-09-08 +Version: 0.3.0.9008 +Date: 2018-09-16 Title: Antimicrobial Resistance Analysis Authors@R: c( person( diff --git a/NAMESPACE b/NAMESPACE index 5eb6c006..ec2413be 100755 --- a/NAMESPACE +++ b/NAMESPACE @@ -87,6 +87,7 @@ export(is.rsi.eligible) export(key_antibiotics) export(key_antibiotics_equal) export(kurtosis) +export(labels_rsi_count) export(left_join_microorganisms) export(like) export(mo_aerobic) diff --git a/NEWS.md b/NEWS.md index 6341d900..d2107421 100755 --- a/NEWS.md +++ b/NEWS.md @@ -25,6 +25,7 @@ * Column names inputs of `EUCAST_rules`, `first_isolate` and `key_antibiotics` * Column names of datasets `microorganisms` and `septic_patients` * All old syntaxes will still work with this version, but will throw warnings +* Function `labels_rsi_count` to print datalabels on a RSI `ggplot2` model * Functions `as.atc` and `is.atc` to transform/look up antibiotic ATC codes as defined by the WHO. The existing function `guess_atc` is now an alias of `as.atc`. * Aliases for existing function `mo_property`: `mo_family`, `mo_genus`, `mo_species`, `mo_subspecies`, `mo_fullname`, `mo_shortname`, `mo_aerobic`, `mo_type` and `mo_gramstain`. They also come with support for German, Dutch, French, Italian, Spanish and Portuguese, and it defaults to the systems locale: ```r @@ -70,6 +71,7 @@ ``` * Edited `ggplot_rsi` and `geom_rsi` so they can cope with `count_df`. The new `fun` parameter has value `portion_df` at default, but can be set to `count_df`. * Fix for `ggplot_rsi` when the `ggplot2` package was not loaded +* Added datalabels function `labels_rsi_count` to `ggplot_rsi` * Added possibility to set any parameter to `geom_rsi` (and `ggplot_rsi`) so you can set your own preferences * Fix for joins, where predefined suffices would not be honoured * Added parameter `quote` to the `freq` function diff --git a/R/ab_property.R b/R/ab_property.R index 19c056fd..b8befa3e 100644 --- a/R/ab_property.R +++ b/R/ab_property.R @@ -36,7 +36,7 @@ #' ab_umcg("amcl") # AMCL ab_property <- function(x, property = 'official') { property <- property[1] - if (!property %in% colnames(antibiotics)) { + if (!property %in% colnames(AMR::antibiotics)) { stop("invalid property: ", property, " - use a column name of the `antibiotics` data set") } if (!is.atc(x)) { diff --git a/R/count.R b/R/count.R index 50c39b3d..10594fd0 100644 --- a/R/count.R +++ b/R/count.R @@ -146,6 +146,10 @@ count_S <- function(...) { count_df <- function(data, translate_ab = getOption("get_antibiotic_names", "official")) { + if (!"data.frame" %in% class(data)) { + stop("`count_df` must be called on a data.frame") + } + if (data %>% select_if(is.rsi) %>% ncol() == 0) { stop("No columns with class 'rsi' found. See ?as.rsi.") } @@ -177,7 +181,7 @@ count_df <- function(data, res <- bind_rows(resS, resI, resR) %>% mutate(Interpretation = factor(Interpretation, levels = c("R", "I", "S"), ordered = TRUE)) %>% - tidyr::gather(Antibiotic, Count, -Interpretation, -data.groups) + tidyr::gather(Antibiotic, Value, -Interpretation, -data.groups) if (!translate_ab == FALSE) { if (!tolower(translate_ab) %in% tolower(colnames(AMR::antibiotics))) { diff --git a/R/ggplot_rsi.R b/R/ggplot_rsi.R index 335a4099..7f3f520b 100644 --- a/R/ggplot_rsi.R +++ b/R/ggplot_rsi.R @@ -20,13 +20,16 @@ #' #' Use these functions to create bar plots for antimicrobial resistance analysis. All functions rely on internal \code{\link[ggplot2]{ggplot}} functions. #' @param data a \code{data.frame} with column(s) of class \code{"rsi"} (see \code{\link{as.rsi}}) -#' @param position position adjustment of bars, either \code{"fill"}, \code{"stack"} (default when \code{fun} is \code{\link{portion_df}}) or \code{"dodge"} (default when \code{fun} is \code{\link{count_df}}) +#' @param position position adjustment of bars, either \code{"fill"} (default when \code{fun} is \code{\link{count_df}}), \code{"stack"} (default when \code{fun} is \code{\link{portion_df}}) or \code{"dodge"} #' @param x variable to show on x axis, either \code{"Antibiotic"} (default) or \code{"Interpretation"} or a grouping variable #' @param fill variable to categorise using the plots legend, either \code{"Antibiotic"} (default) or \code{"Interpretation"} or a grouping variable #' @param facet variable to split plots by, either \code{"Interpretation"} (default) or \code{"Antibiotic"} or a grouping variable #' @param translate_ab a column name of the \code{\link{antibiotics}} data set to translate the antibiotic abbreviations into, using \code{\link{abname}}. Default behaviour is to translate to official names according to the WHO. Use \code{translate_ab = FALSE} to disable translation. -#' @param fun function to transform \code{data}, either \code{\link{portion_df}} (default) or \code{\link{count_df}} +#' @param fun function to transform \code{data}, either \code{\link{count_df}} (default) or \code{\link{portion_df}} #' @param nrow (when using \code{facet}) number of rows +#' @param datalabels show datalabels using \code{labels_rsi_count}, will at default only be shown when \code{fun = count_df} +#' @param datalabels.size size of the datalabels +#' @param datalabels.colour colour of the datalabels #' @param ... other parameters passed on to \code{geom_rsi} #' @details At default, the names of antibiotics will be shown on the plots using \code{\link{abname}}. This can be set with the option \code{get_antibiotic_names} (a logical value), so change it e.g. to \code{FALSE} with \code{options(get_antibiotic_names = FALSE)}. #' @@ -35,12 +38,14 @@ #' #' \code{facet_rsi} creates 2d plots (at default based on S/I/R) using \code{\link[ggplot2]{facet_wrap}}. #' -#' \code{scale_y_percent} transforms the y axis to a 0 to 100\% range. +#' \code{scale_y_percent} transforms the y axis to a 0 to 100\% range using \code{\link[ggplot2]{scale_y_continuous}}. #' -#' \code{scale_rsi_colours} sets colours to the bars: green for S, yellow for I and red for R. +#' \code{scale_rsi_colours} sets colours to the bars: green for S, yellow for I and red for R, using \code{\link[ggplot2]{scale_fill_brewer}}. #' #' \code{theme_rsi} is a \code{\link[ggplot2]{theme}} with minimal distraction. #' +#' \code{labels_rsi_count} print datalabels on the bars with percentage and amount of isolates using \code{\link[ggplot2]{geom_text}} +#' #' \code{ggplot_rsi} is a wrapper around all above functions that uses data as first input. This makes it possible to use this function after a pipe (\code{\%>\%}). See Examples. #' @rdname ggplot_rsi #' @export @@ -58,6 +63,7 @@ #' geom_rsi() + #' scale_y_percent() + #' scale_rsi_colours() + +#' labels_rsi_count() + #' theme_rsi() #' #' # or better yet, simplify this using the wrapper function - a single command: @@ -131,8 +137,11 @@ ggplot_rsi <- function(data, # params = list(), facet = NULL, translate_ab = "official", - fun = portion_df, + fun = count_df, nrow = NULL, + datalabels = TRUE, + datalabels.size = 3, + datalabels.colour = "grey15", ...) { if (!"ggplot2" %in% rownames(installed.packages())) { @@ -174,11 +183,22 @@ ggplot_rsi <- function(data, # set RSI colours p <- p + scale_rsi_colours() } - if (fun_name == "portion_df") { + if (is.null(position)) { + position <- "fill" + } + if (fun_name == "portion_df" + | (fun_name == "count_df" & position == "fill")) { # portions, so use y scale with percentage p <- p + scale_y_percent() } + if (fun_name == "count_df" & datalabels == TRUE) { + p <- p + labels_rsi_count(position = position, + x = x, + datalabels.size = datalabels.size, + datalabels.colour = datalabels.colour) + } + if (!is.null(facet)) { p <- p + facet_rsi(facet = facet, nrow = nrow) } @@ -192,20 +212,19 @@ geom_rsi <- function(position = NULL, x = c("Antibiotic", "Interpretation"), fill = "Interpretation", translate_ab = "official", - fun = portion_df, + fun = count_df, ...) { fun_name <- deparse(substitute(fun)) if (!fun_name %in% c("portion_df", "count_df", "fun")) { stop("`fun` must be portion_df or count_df") } + y <- "Value" if (identical(fun, count_df)) { - y <- "Count" if (missing(position) | is.null(position)) { - position <- "dodge" + position <- "fill" } } else { - y <- "Percentage" if (missing(position) | is.null(position)) { position <- "stack" } @@ -264,7 +283,6 @@ facet_rsi <- function(facet = c("Interpretation", "Antibiotic"), nrow = NULL) { #' @export scale_y_percent <- function() { ggplot2::scale_y_continuous(breaks = seq(0, 1, 0.1), - limits = c(0, 1), labels = percent(seq(0, 1, 0.1))) } @@ -282,3 +300,35 @@ theme_rsi <- function() { panel.grid.minor = ggplot2::element_blank(), panel.grid.major.y = ggplot2::element_line(colour = "grey75")) } + +#' @rdname ggplot_rsi +#' @export +labels_rsi_count <- function(position = NULL, + x = "Antibiotic", + datalabels.size = 3, + datalabels.colour = "grey15") { + if (is.null(position)) { + position <- "fill" + } + if (position == "fill") { + position <- ggplot2::position_fill(vjust = 0.5) + } + ggplot2::geom_text(mapping = ggplot2::aes_string(label = "lbl", + x = x, + y = "Value"), + position = position, + data = getlbls, + inherit.aes = FALSE, + size = datalabels.size, + colour = datalabels.colour) +} + +#' @importFrom dplyr %>% group_by mutate +getlbls <- function(data) { + data %>% + count_df() %>% + group_by(Antibiotic) %>% + mutate(lbl = paste0(percent(Value / sum(Value, na.rm = TRUE), force_zero = TRUE), + " (n=", Value, ")")) %>% + mutate(lbl = ifelse(lbl == "0.0% (n=0)", "", lbl)) +} diff --git a/R/globals.R b/R/globals.R index da66cc39..80ae961a 100755 --- a/R/globals.R +++ b/R/globals.R @@ -22,7 +22,6 @@ globalVariables(c(".", "antibiotics", "cnt", "count", - "Count", "cum_count", "cum_percent", "date_lab", @@ -37,6 +36,7 @@ globalVariables(c(".", "key_ab", "key_ab_lag", "key_ab_other", + "lbl", "median", "mic", "microorganisms", @@ -46,7 +46,6 @@ globalVariables(c(".", "other_pat_or_mo", "Pasted", "patient_id", - "Percentage", "prevalence", "R", "real_first_isolate", @@ -54,4 +53,5 @@ globalVariables(c(".", "septic_patients", "species", "value", + "Value", "y")) diff --git a/R/mo_property.R b/R/mo_property.R index c712d69f..ef77e293 100644 --- a/R/mo_property.R +++ b/R/mo_property.R @@ -187,7 +187,7 @@ mo_aerobic <- function(x) { #' @export mo_property <- function(x, property = 'fullname', Becker = FALSE, Lancefield = FALSE, language = NULL) { property <- tolower(property[1]) - if (!property %in% colnames(microorganisms)) { + if (!property %in% colnames(AMR::microorganisms)) { stop("invalid property: ", property, " - use a column name of the `microorganisms` data set") } result1 <- as.mo(x = x, Becker = Becker, Lancefield = Lancefield) # this will give a warning if x cannot be coerced diff --git a/R/portion.R b/R/portion.R index f8ff7d8e..7bcc229e 100755 --- a/R/portion.R +++ b/R/portion.R @@ -203,6 +203,10 @@ portion_df <- function(data, minimum = 30, as_percent = FALSE) { + if (!"data.frame" %in% class(data)) { + stop("`portion_df` must be called on a data.frame") + } + if (data %>% select_if(is.rsi) %>% ncol() == 0) { stop("No columns with class 'rsi' found. See ?as.rsi.") } @@ -240,7 +244,7 @@ portion_df <- function(data, res <- bind_rows(resS, resI, resR) %>% mutate(Interpretation = factor(Interpretation, levels = c("R", "I", "S"), ordered = TRUE)) %>% - tidyr::gather(Antibiotic, Percentage, -Interpretation, -data.groups) + tidyr::gather(Antibiotic, Value, -Interpretation, -data.groups) if (!translate_ab == FALSE) { if (!tolower(translate_ab) %in% tolower(colnames(AMR::antibiotics))) { diff --git a/README.md b/README.md index e6cb07c7..3bd4f304 100755 --- a/README.md +++ b/README.md @@ -161,7 +161,8 @@ Adjust it with any parameter you know from the `ggplot2` package: ```r septic_patients %>% select(amox, nitr, fosf, trim, cipr) %>% - ggplot_rsi(width = 0.5, colour = "black", size = 1, linetype = 2, alpha = 0.25) + ggplot_rsi(datalabels = FALSE, + width = 0.5, colour = "black", size = 1, linetype = 2, alpha = 0.25) ``` ![example_3_rsi](man/figures/rsi_example3.png) @@ -174,7 +175,8 @@ septic_patients %>% group_by(hospital_id) %>% ggplot_rsi(x = "hospital_id", facet = "Antibiotic", - nrow = 1) + + nrow = 1, + datalabels = FALSE) + labs(title = "AMR of Anti-UTI Drugs Per Hospital", x = "Hospital") ``` diff --git a/man/figures/rsi_example2.png b/man/figures/rsi_example2.png index 87f4d8b55e44e751a8cbabba5893c1f2873ccaec..399a8b48b0e66510d9efbc16db98a1269c07d5d5 100644 GIT binary patch literal 27922 zcmd43by$>N*DsE(q#%uelysN0!bl59cM8%ybScu^-QCh%A|l=09YZ%moy|9%_kH61 zUBC0sIcF}sX7HXn_ugx*Pb~aoq(o2<@evUa5KzQKA+iVv_jeHx?)`XrAN-HN#qXXYJMH#xI}juZMpRqj!F$n3$`r@bZ;% zk>ZGI5fbciVY=OU(UhtY;po_yqI*kq@KV0&lj5pl{aF*qpqIm$` z@sab8!J8pdCd=K%*8dwDRmr2!pFS-A+#kJ-==CEvH#d&;b6+ACD-De}73P={E-^7N z#@)+$`4`G=Wo>Qk<>`)z-z#ui3lsxac|DyGlmges!|CayVx61AIjpR#WPiNChyFw^ zIV~Lrhx5bL?ihMCY&<+M2wk_Zh)DBMA5Sk4Ik@MBm*>51!Z~X-{0S$`5}0u z*-UI~EBp&@QQ`%nHphw*aULtr zn>Q1alk9Z(4Mqw~h6AtO`waTf$PD>>Gnao>SE{l=IBVPGvlLKKu`eG4&n1g0Ei3El z>$8JGDbf=YUz(V};D{7p0A^-pBqb$(w6%G9diqhZu&{s;+UikNRYf6WNY7U9r1k7q zVq+Tc$(NbAJ2c8)hZgrCtssSF2D!Pp`JfVF_(4d+HWpevZ*Fc*u&nb73K%u&$f--g ztFlr-DDiF@T8)Gm1QYSq<>ngRTwTz0J2^Xt;Irp92};@89-kj9<9U;$4-5>Pz{YI| zjGtnGUD&$IKYM8srU%KX@jOInxfC6=zeq(>NUK46Hk*rYt5@E_Q@0t3`rh!pats)& z|0m}CUu$i-+74kq{DtpNveS8PfnHBvwAq+O7isEdU_QGz5!vV(y~XwQj=5N zab607lzOx5Lh39Mk6<9ped za!j?0$MUc-i8tw64N?8nM}(4n0^zdfnd#Bfd=Z*1OPYhb%)50iMc->g7CFmeP%Kwa z6`r-HHRp&lY>svRGVJJ`iNYb$k5;sBhOv_(@<(B_7Cq@6lJ=_&heJnwCmz@zW(e08 z;6|CMsm*OsDU>-&=48H-F1|V0E+fnHYSZXlOKe!*)6H+wi=SdlwaZ6)PZ|!-(Q;hW zK|*;y+4AYh`Yv;lqDEKjx)D!<=jLk95V({aO8X9(hq*|cv8j)sY{Mz*Mr4z-?mV~4 zZl~E!F0M^u{$GNZXXq(>4rz?xla)th>`TnYRrUG?M(pTW0!3~zvb`7*kd8fURG4;l ze+;W`NG3M2CEJ=?zWpr5t(xk`g@ci>ON*VxC`wM6$*PsAKJ@bKHG)av2VLIJbp|H^4sGPU7?R0OtnH*dDR&y;AlEJ3Q1owUYsl41qU*?cH;bAA7$z~S@lVRJW6_o{;-O(ieuz; zI+3Dxhb$7My~+GJ(HF&ZxJ+c|)o{rn)F>^DiXe6-?YyoC9o_NfI3!m8EC@=8{N4kH zBGe7LAJ4f-X`QQ?zlerh)u;3%~V5%bXSpy5mTa zIdE7d+8B6s{jPs>#Hp3Fh*1|>a|}jo2isSZr)!RR-w%uRtuyzFL0p#djgeO?E3%;= zjdrVxbGB5+F(03VaAtikyMRAX4H`;QK1*@?o?#V$`d+0>D9pFGf2)#*dN095#kr#n zJj4+%`Ntz2T^`NnP#!%EesuZ`JlHs`A}QE03%r(~N-RpK)!H1xo}S$T%|e z%+vQyH?=0?!8|!vb=Qw-*N;4ZlRzXvzinXj7S|tvQC5UTPF1ze_43sH=0ZeG&AG+n z9;-pmz}OfzqF25BUT{DF87VPw3P_tr7gr!}6sc8Xe3X%qN#S?(rQ+n|eEr&BYb4Lu z_l4?|BpPh5n9pt9vMf~pa=H?UU>gF72!2i3cOvN`t0|*0?Y{n@I2$#@FJ(5t7u;vx zj#)Po1XAFlft}JQ4c?Pr$yEVft!?2>0s@}|=%uo-#40PNI#jBl(OEWV$$iJ)qZ{^H zhw~Y*A3uzjZj~V?opg6Hj!UDG*ddFe6-L`V6@=HQOvrnJctd@RixnHxBkSq$^UZA0yO?+?d?xub9N_(tOMMp=6uDe*X zk(-9bUw`uV@84WDYa5%J)MoGBrw9G^k6d=GkZv8U8uJ0uCfRx4c2%2;mNQ{IKLAgN zCl=L~NinNzi9fSyJjg7<0IE0r(m&H^Z=*_VQ|6muX0S?JW@aWD|9MMGi-+%Psl*!F z%^|-Rl*v5y3~X$Xw8(!K6tB{^w@tkrqqUO++~=mJ)!q@wX=rFDD2%3R%e%swr~Cr~ zuwI&(xV~wbbGY5P!uawV5|h(lrx*1U;uuw#@9sdgD`f0EJHcV3$XV5!CK`VlY@Pt} z8#Npb?>(1zLzNvYpRLyse0jEq_Vj6PQPK5I_59({kspZTw6@mWMJZEbC>j4U15w0snyDR($nB6h#BI#_BK78bsD?;f~H2sw5D z1(tF&mLCMNvbtKS*MVAW2^%Ylc>TdYBqYSwS6jud_3NXVt++Z)AAiN{9joK>x9qWI^*=AMyg?KqoTTU9dT zuOtZb0)vD5%JjR>UHH+#?M_ZjVT46RDcIRn6%^2-gZZPZ*8Kek0|`lMZ*T9vb`jV27Wu&Kn>MzX57*5rOe5egq60Wz~!F>6iIA73;7^ChZ`^GPWFZQ;>)P(*6 z{v!uINOpU3*UKRSib_g2I5>M#l_n#(A0aF2>-HN1Bw?cD7=EZkyc>IajCoob8m^l| z6k>isK`1fTpeR8Q{n%016NtykVK&8PGDgSBT0WQ|f`-rL>nj{Wq#-ZQ=6>T6t>4(# zSbOFDf{>8U?aIMh$CrwY&Gs68GUJUe_y`=NHysSUM!g-aVqqxF%7FtYtdseit4yz3 zTHbb6#l(z9)2pd+@Pls-D4%yvfcO79W&e2*A%Y>%oJeaCAplG*tg%sdKn2BH1rK3B zJC^JrLeIYfm5Q$w6^WXS*kkn63=FsZ?&*(F;6LYYhoLak(UGUiOXfkirPe=vqe@G~ z)RO`OuX+=tfAcMNMvO}*)urje=(=wXCDh-x#LUe}VAD^@YHHF?!|%4H1Y2~m-$(Fp zdKGmKT9BWAaXbu`B0ChR?Z>IzhPLZkPrhD<;>M=Y-o!zNKbG^&-tF4;{B181(zFDC z6Xw&W&N2f}Ctr+>JaxaI*zM)yQ$Sug-aKFKD7n5m3XhE~v9&!<;7kcMy9V3Nb^?m> z&^fN1?jfYU*O_F@#p*88(Q*FVg9{%NnTAE*UZ2gDG{x(D$`pavtRbTzUq$;44cp*( z>!?Kg1{2nExHwq2x)M&>2#aVDz4=ZXlJg$2yGt_f#`Af;Y2wF^vd!V^oDWA4Ma>pk z+u;;@vGMpAgI!T_W#s_|eOH?KC!wKX4<6h41vl~P`&%5H-S;qnbCxUx1mJl^RsO1L zSbgyF$s1g)eum2}aRbfwML}VG>z;{DDg~7u#Y`kZnbRoHS?vgz7aqT6-~^bBXk@()l#8znA`Ix1NhuahoKa-DHlI zhNj+za=EY5st+Z*Yd3rg2tfkD=CaUvmy7%zqeEmr%^hwU7m40p$6=~#u_#7^lM^|XyP^*wkQs7K7F z;dZmQ**UvaK!;gAJ?9kU`&BxtT@uz>b}Xm6TXrwFtZ3vPgVB#@$&BAOl-w}FOA_InL@c<1>ToCa4X!H)>W^)%>?tpQH7aisCswiK2CyL`1M^ zs25VytE&#zR~NjMk+_>0vSxS$1iWtQ-=QYC!NI4=e9S4XRccjGQfsSHaj8DjU4F3Q zBpL~wRR|Qv{7oRbcf}Om=Kdj#Ntf|^kZ-)XRS{`$6h^ZJiVSdd{V39x?U8(-OvCHl zDl3-cmD(N|%rV-wphWH+K)tkB$59xQg6UvQ%!-?9t7Ng;?W{;n`m5L-1#MgS)U7Fu z9G9D{>zhCz7WHbojZq!rx(z$igksdOGexd)myc8v;$`F1s?E)&t9Ae;=iuOIZEXed z4C{ZVV%hS0p(^j?jhl!a+vwt?$g|2q2M3G6H}G5OZA z)^<~Byf_#edq=TwqU}S^H?N&WOP$6{L38ucT1TEvh8SPb%xv>8M6y>4-Dm+8~4F{I6Uu_Al{e!i0n6H08cQbrzVYGmn zoBK+q&B^`hpvGiewh6xV3Y}i`!XWVp&UnRgo5ay?D1x+w!xz{{jWj6f}ZpP2B%^L+! zJkJ2Lf`*2Mgruipcd|A5@#DuoxS9SqRuR5;f)WWV?Ml|ozh?QqNwCPu64~!=e|Nhk zAtc;c?Vc|xE}pG9*yxF~upG_LH8xFrIyBJd zzj2tUGHV9MRhI~utc0o0Hzlo9-JDy!>j(7x*S*S4Mea zt}lu3$B%6P_N5dz?s~lrV&}78H^;-er13oVM_x#~|ws_mopQLXbd~ z9;_|*%v@>t5->OzlfvuRwbOKwyNV}E&1#8Vzo?S`UaMa^*8q2)U#6w8;57)d@7EMgT>6d5OUqkoP^pZ9ni3m zz@~E9C`*p@dxgFU2(k3NQUf1rO?I<7l67Z5~vDDL-+s_ky%8N$bGfq7DzX zZ{VQZ?79)W)RovBB2llrrM6*G(h%C<;z7pT6Jv$PJe)kw()R~gyqWxzdi~==E)R+I z>)aoYd8`QboF`G|?E|KR`>A2t`8l`EF?;_Fe?BPwDX7Jh(;$3mY7J^c*^0`_i>s<| z*QVo_hapc>J65<@=My0XPCFZD$9YyUW8GRek%5$?i9CZ%maf zoS3b`KIp!gnre_1NTNDXt2Biv6_cY87jHe7D+8P(y9-q|meL3AcnpDhPINK8fJNQI ztK|5Rv>w@a-FzH^ko#c{KX25+=d1LEqMUwE)JqPeb_hq>=`9OqY!6v!v7AuOg+1QG;Y8%}}l8}Fe%JM>ly(i`3j|h8LKj)Q|v-ot_tJt32 z%#|kf9-jk}!+9FlYIU86pK$x!w2ZR8(7;)D7bJ1yO2=>uChW=a#B)8#u7pvJ4-K+o08a! zWL;cbAdrXMWk}d`3yS?C`uh5##Tq=up$}ITQbEa$7&0#}_c9;v&G+sm*HQ|KsMoI_ z_d@%^!@C+9ay%bH6*Mb}y5Qe+gi6J!G|?|}^A&r{B=`bKoh2#7*z<(qvPS98CVscB zT#-?GNz-V?;uR6lfbm#7g#9c=aWaKCa&j26DJqSN(_hauxuV;PCeaSu!cCTW_K;(_ zp}u)}i^Ur2Af18ozoTrB!}U>JxVgL|mD`!OiSkSaAj^sk;03NpeukALNB&45KP*1k zvyE#l!zBL#^^t0Ef1`Ll_QtMp{e#I%NX3@B2$u#OGEwwMLf7x4sJKO)>$!swnzWjn zN)k??wldq@*5Np!{u?fglt>);vD5hr(~6D#*z?IoV&0-H-Lx$<6fEy0q~ip8I6kJV z98E-Ybd~LrFtEGDFP|Jg@uJ><>dej`%zI+c1%sxnO}eV_7G4J;5+;K`wI)& zr2c_{f&TvC+(pUB$zP|Xt^ML{2}=-JSwFywA9?Fw)8pG58Pv^iCHxYTl#Hp*m4k|3 z%ABPAE<4tr$=Kv8j81fZ3n}Z@6*cbS8?g=vvi*Z8WWDXVh6_@}QL5v^Cqx0sXksFl z_mAi@bNzu-^}F`SKw3&?P}L^w0G55mmQbmhvuE3K{Rq7k`{?r6t+=IQ;7k{!;(MR% zg0{$VYeZdGpiXi2IuWmHh9`AnY|U@5^7f$BPJ8ViyO@qYFC5Vw6$P(ZK-prPMn^mJ z+tfe6cycg%;d$rzABU^2?KTD$XKHQO+1WwK@Fb?`{NjR;+x8AZLef2-pusOMC1{kC zl(gz>#bkB$^z=*uMq^S%*ZWX=V>_OQl~|nB(K4$k*&2WOf+~IJIWY;5K2-^Xqk{LQd`lWEdO$}sV^?(C<_<>DfEPWYnO=hWPWEF&&{nHWK2~# zGG3?S{G6PG8Js3#+JPq%1nUZ8(N9%Rar!a7P?eO~rFvdfKQP2*@9m;fudzH@>wSVo zWNT%mQelXW9`tXrfw(LeH@DN(`N52M|KFm))-$Zgsl=LsN}&OS04Efq=%X3he19qG z8T41z+P)*@xF>{5%p-y!LBDVO={V&lDb=Tb=#iBhphRfEi*B$s)XC*?%yaWGj<;56 z;?lx~eqwFl`{)?z5ZAjO(L5fHu;UC!knY0iQe%D`zcCqqrQ~Bs)|4*HH79b3`EoY# zjf7d4Ve$J$JF4Q;C7G*LyPJFoJg7u);NGFVR4q6?Mp=lFC4&G%Z$U2Jy7}hWQS*!* z8I1Asn5*eeSdKeG??&gW^Hv>&W_aGnY_x>zJM-LOsmx!JM@(ajt4d={t{Z);czgxl zmRjpA=3-~nqPmrMG5vh06r+xEJF+C~Z?0Gm0vO{je0p%Sww;%QG(V`+zGs89GGEEd zdm##;tD+ELJun=8ZEwP;qWFUX#X6;Zfruc?*;jR~6n*kam_t7N?3;uq5y2pxnav~a z774UGWDoDKOS;Er6TUM-Bf23$xq_$9VjlBxq^nG=A=-Mx5ScT5d0EpsV%rP#6f*<& z#&@=`+0{ya^8vSj!2o$jJAcVqqPMPf#2e+KWnmFYd(|_}*eMovzSf5bW-o~d?jfK6 zx);HBi8NjiCY=kR|2i^v>MgQFC|I9`$zFt7`Wbf{RH1kbxad)g^5k^NZt#<~uFjX;;1J+45@}gBdfz z*4BrBR(l7@kxuFB=>buZJROCABazGI^{ZE}0E0zG7pOluTA(EI{(UJO0U(S%_q{xM z_zWBaU*tm`a!3amX|(>?&h*)!2r>F#t8n>Bz91I=$vlAI zytlJcl#`=0Z`7^}(xSNxxuhJ!auf+BBGBA|aw^c6F%`a~P0(T5lX<7p;B#YER)E*{ zZ$ckNBD*X>fO0FF0o z>*aK?ogF^o5vtC#jg5_i4CDXe)V2y zt}ApN0#S-TnR-My%YQvG$ZS&sv`onv&^dh##m7%U30~YB?nqxC>C@4$s0-H-@DU)! zGy&AoXgs)}0lL_zuw_Z713%~Y^&K_0%#}Wwyk4jRT>`*H?ct=jRMpqvyQ=~j4f1Wb-(RawJ?a%YO!t+Q%vFH(!5(a%6If8nSouTDS1Gsbry)?TQ!_t>slmg4)r^9N8fi|1}+ z&Z=m%UqWY{dG^HK)1#k!XW@-jeN(G;xdsDX3=fWbd4VrSNjVB6_vgb1p$0AIHum^ z0+g*%R7Rkk-qQ;3P5fXhhe(^yoCBthDuFB>S0VCwfL1l@*y@YHul#mo?zI$P&`eD- zBR-N^Ru5372ZnFeojHNLwxgS8kyg@pD0p~yFZd^u)-U~^k}#6IP&G}x;@hi~mbaH) z2{QJA4IA(EQ0Jl%+vG!tInF0B2QM|N+RkQK2G*{bdZJ3&pAQBlvWVyrl9mmO_feM^ zMfZUfW+)fh^_#gaqFvfg+Tf&OOxI9ab`DmxQ&+_qN<)%9@`J`6>AG|mTkW><;#czn zbTf$_!lU>{_Te;X=eDYY##%sO9hFQ`-t?;e8$g|`dXwG#iFg|$*3xNs!@5x;b_}A_G+B2oStJTeB05KIi>xM-V|l8p>CXa>!HjDEy!Qgkto1q+XepC} zvaAIS84s--twGigrqSj8{qJsj4#rV3Gs9C%rr#r~u#b$k$!=33=#VRNpcegnL?;VI z3OGof2D`8CW{`)Dem0_}`5#7*Z|nakGo-o-IC}q<@MKOx`i}Ugauzn$eya4Mk4Tt* zEFtu#t;kE8FrX&#|2CM5-=2Xk^bzY1=L&D&Z2aTDYETIMl(^s9NF|j5Cn8{?2-N*K3PXS z(f{_E2$^et9uBC)HGl|7J;i@m4m@B3xIW=XM3GP35+-)4{bs=@)EvwazIe=)&TAa@ zt;*6QIz>%~8lzZPwoWma+t1PeaCO)?P5w@<68=e46Cp5DdC#Z=09QQ9UH-h>BF68F z#RivqE91Uw+x?U|nVC$;88v;&9U&$rCZjJxw&=%-+L$E8#l-`>zui3*{AEMq*89?G zd`;0rS|(p&b_PcTC%FN!=|Xnt*>nntys3b{6JwX4LnmxjdsFBc$FJ4*c_3`$>%HJ# zyxzWGt)I^i`QH!837&B`*(+**lWrPj3-lj3Dv}f6Y6TorS=g_%e}b(pY-~6H7gp7n z?kqP*nCzUK7K5Rdp3e{#qJCXc)mSn1a5ZEucU|zh5|UaMV6GsmkvQkS5Gg@*8E-Xj z&1G+@2IyJ{V&WF7G&IY#+ML6GX&OE=Ja=w6{Y~Y8?<$X98!>84zl}oHW?3ZwwZEA?`JrX&1~W(rRwXN@ytrhCDWJ<*Ogp_+g@S z3h&4 z_UwUQuDylQm(*zAnOULC8#!hs9Grrcm7Z*M3z#nM+SX{ni`SA&oSgPhD4*p5f|4ji zqs}&L#)sSSa0OPzc)vSgChdr=jR{JkzPN#I5;=}oC`&I zYHBLKEByIKb8~Y^$)1rsxzXp82raaRHcQ378bd9*ih1g1hbBXP5s4HH6U0(zV0P3d zBoonf&E`65y*aDG?9Qwq+v-kw`#q?TiO#|^IRlU zWSQpz)%2W9X>Sw5qQ*A@G)7EBmo+B>`OgG?SB}=lea*!M ziswEE=8G4sz<;;beA^_Q!Vh%fcqW}6;5UBL2_{lR6qF)X8h zt*f5iGAP$sqv!v*?gH8v&*;|16MOHVz4gA(6-4yf>b`uC8uzaS?nI1rd?k6>e)_VDRY^ z`JEMFu_uldXz*a`KU*O{{l{g)MEn$CV9oZl(qAB&-E`3eg6Ym%5FzbMO5-5ky80Y) zyx^2(Q-Y(ohxlm8SqbS%klVW6zz$xPQ)$UY)my+}&lWmu_%oAMmZGdPXr@K{D8H9* zg)QfuL2vxY>9oa*LC$%Xa$rp8>5t7~H5;sWD@ zEa}o~(XnEU%U=W*&%

0IpdBd$;wbisn=E6XaxPuLUqR?Vp{U?eD(=>Z2QcGY9_l zv&v})u{*ErMrd=h0J_;+1DMa908TAWDL5JV=aEHmLAOQHna+^GHNN4h|)KB1(^4SN^njP9Trt! z-;V%HS{-!JhYCdQ{ArNRs_+} z(blwAKrb;FFOJ#{e#r$amj2U3ybhML@edyJ!i0fWCpdJ+dmNw5AvF{f%GqXyA z!vR>8oMuy)#KgDY=Bb|E0O1S}lGm4K>vq5bq9rRUDr z%>~taEA?ba#9$I~$SS>zmlPw`rOFpJ;?!l!PxqP|48&&L=ZpEW*C_LQl^ODriH+}v z#1@4sCAWB0l5-sQ*%rOCYIPI#=6HbmW&Ch}U%(K#FyJt>Ln6dy;Hp&op7-zUsOswK zmro2u;_ z1tx0n5If_E%!P)Eha}`Af&1g_tKZ$-msdyqm6es!$-K2j!`T2B2ekL&_?FVqV)*%j z%_beegzAf9MQW5E;=!XNMn`Wg+y43psb-WF3KUcxE-rSu_~ry#`jV&Zjqx&>Rd3m1 z55xS@a_?u&`VQtI_Bx61IK;kA>cxsgf(FI!ybzaRD5NU3+BTZnU}ZZl7e1BKLaBqo zs_b^ANQAsC>(PjKsTdh!)Q-BMXvsu^$dMntqhzd-~Aza}Ik`1y$e7cytS3p_k(_R9B=U%!6+ZQvE^OsERFUNA|B zyjf_Ik@q_6M++3jG92TH*U8<3bj(y(uWJVN^JcEh(H8KKj66lTsZwsUSNfTs12gg)q*D)0GlM2;b4lwHa4C<{0d08(9q}R=EDA8%dP0+nONB$GDS17t3iex6~fsC8#4N))~vJ2V!&c)nWI@h&*sVhX~x9AN32w zT;@YzW4#HSB{enYv-a~v^{=vv;eCqL?En$eY1AE0TQu*?H{UWgUzJ%d{zwz@;dj_i zH7D$RHeRSAr>54;7tRZ^1DJN4N|d~6+SBRACMJM9aJ)FwPm=)_G%ovHbuhqTq7`8I z1K~74U&X>=@6Ma&z*~F+0;CTzp00(3G$g#E9AsZ!KE4E^Ktr-*m}2nRApau~PRc%6 zHS&0qKdM=6s(ir%8S+5kQ7WRK4Iu?8R}mBc$jC?rjk?^$46URQX4;IRB0@||@=A}G zj^$q95dyHj>;(AUDW(CrpjKsSbnqM$vTs=zr`_%fTCAz5DUf=*U`CjKbPJRqa&lIK zl{glh9``qK)*Og3z)gAuy>nrI&#iob;8BHkS62QPC-5(Q2XvRfvt$?$f1b1;-b{Cy z^##~}{+*D^=8d`lo+{vingt62WK7_)i=tKXhmf*E?s&Y^$Z+}B+}!Y9&UwtI4{g?Z zsA*|gSy7hIilT zq7u^w;g(77S7055EBv^#x7VyQ6l_Sg5!0=;MvS*RNlvxSmeh zgA!!7elMT$4cN!<z-@&& z(}yo5zX5h}z$&HdE-QTd>KqO$@%;K#l_&8RctA`iGSZe{kAZYsTidUmo^o=)Q6KtC z&f1fji%X>p_@bc8zk+}eqvdvy<&|;Q>cS3kP#zHBcc}2C#c0S*W}rYi+u7M!?@h=V zL`wzddaD7d7>k|f_$93-`rA7@fE80E#RR*`paJ>Vo|Bfgppw*xo1&bBnwlDF9}o}# zMh&*TJrhoHclEjAVl=~95;%DnpFe-TLIF4r!H_I6lZCFELxL5g_Ijrinrgsd<$|!1 zCQ}1yo|>9Bq=yFwar~~_DgD4rI9~^)MSt|@(aGkpkFT|jjh?PSkr@+JTQ1ZEw7d~wYk9^!a<_k%`y1KGxzCHyuKCl;{)v~j**ZY!? zP*B*Jm|mp=m#D9=uZIT$DQLGa!1d<21&kc9_njOc%Ub|;5J8jrP%dt*uH+{$yxG~= z0UK#?QW7u%j-2jH$Iz*Sr=;uwAE$z)rRDGbe#*O^i2Z#_^Nh^Qm7D8J|7Lek-&dyv z6g#t@(r8kHfb5TYH1a2j`Y){?U{K6VP2(r1_A*>Q@V3zkUd(HUhbJfV+ina1btU%( zLqekau1uWWLr|^@2L}g@f(`T%P7g_X(LEo_gmpQxHz!sU~ye`8x2#Y9CdZERSXnV$h$2`cLA zbl~pI&85m?1z8WgIH_7dGM`f6=@D)MoRvNE9qlkUmy|IOl3W1s@dD z3nF%jdhHPKMuXtbnTryw4+8qp#vmDBUC;LyLFI-XmXb0L0{$HlOU@0VesgnkrW+J` z0%|033SeQXs;WY1U;rcPKtUB3b#XTD-h6v=3HAifw6LsfXny_{fUcX3jF7%$z5*u# zz>fph6PVitxw-p?hltOfk)(r3goB0E3q;aC^1{aqVX-X{5s?sLfn?_a>c32&!g|GM zcN520Tow;J`0#KH(!=B9z@VU$v$MUK+9Oah;7}HlXm8EdpHZf`90CyIEIfG_b+xCTznvjmH#&b~e(X5DXKeL8&wK@CAh5=1+a z=TF5YB#;mhK`y_zdVGs6es?+1spL_eotwno+^GgJ-vSH+u&@E!%2;sjpRI=t)&?Mu8V;m_(jhPq8APbi(9pZBBk^58_%$5L z6q~7%p#lnjJOF$EtAZf=O^^h=y`#hD+uduX#>%rGIw7InVxAxR7~IwVkc6mcEW1gx zpPyfG@$TmoR|7M%*(r4PWVmcxet!Ok1deA9@0*_iz#bPD7xu>sd;shNNjk`60Maw6 zRnf7qgah;jg1OszlKlua;GqeuV7N0SxIQ!0mf4*TjxD?m762MJgORs&Q{}X z9b(dsQ>w+T^bI+0_?k4FjK&|3;-4o61mxhMNAc!KHHMDcr$?9yofTs;K?t8H=MyD- zSG+n({}y+%F;QHW*uc55bV&bZ?%R zh^PsmbATA7W0@A~_nOMf%8YkX@x?ym_2kLrfSZ1dMnos34?rQ|%a=7~PoDSy{CP)b zprE0xa{%HFgau;I#<)-c5&=M#DE^twdOzG(XBr&KsTtkfn>nk)pgH6hE=1_pc*$!x zOKTfCaHgh>e%}hC1ScCT-Rdm0I$U_4m45qie~F48WqE{KKjD#)5-A+2Q6`az(=Ges zps};pMK96W(M<9i~V@&~bbVSK|eI_D@OF^!A?*rsB=WOGPqs&Vt zg1m(s^KGbZZxX6&kHeJzYxaZ*pO$x=97wi$!|WAkW@cv74hE?O1(yc^G+!Nb;Njtc zsgMG?PeCZ2ntI0`&TY;#+w3mD!C?ocEEEaoo}Uu_yPP;ts^8z96VjfZyNy#z!4da`- znOnV2O4C;iewGZ@WS0+T;41sjRpgPC30_JxIpF}3bYC&0T}_%dWh|TP?a#zMZ}pn@ z5*}X$mMh7Gzf3rTJ3MI$#?}&nojePsE_EzxH95fbA$r|e>iA)s7{Nnv1k|e)6>Ox| z*4A*q!GY$N{9_8UXl?_2bKup8kLT9;@zC79Cze^@YTxspx*|mB--!QDNmWfng`I5& zE6L=_tAX3;bUSZh!wV8674F15pXQU7R*Q;$;Z^hAJsI<8p3OVWPfI|cHmYC|JQH5w zDL>=(+vGlK#zMTR+~Es)BghKQP-%We)xx{>)VRZ2zw+HkyAx-(+`7WkBn3X}y=X!$ zXnn_1wOYo~9n->^%!aqx1{N)52~%59t4J%4Ep`kdtx1}}m_LdssX-H4HFs%GBS?5( z-jJbXCGL~{3y)bBqO3fz)|=3-YXyOPD=D!s5gBpV64n0&q zvSPm_U@c>(wj}K8&sEUFKIGW_P-RAcFIh*5HT3ntgGg_U&&B%}#iskOtKb)C-2@{f z19h2W7QMInEjt1>V8Im8ah#h;G=Z9qgM${G`>)ug6l*&%g{? zaBG1Qo3k1k_`vT+{IuBgZr4uc8I^)w!oQ^$Sj)%9$6Qb4-Y_=0tc3T~c{ga@v%8Gpy(N@U z3lUf%v!^E#f=qU1{Tiza7mDLdQMF@YV;badrZBtXWNmev>m)K`G6fye-p(u6_vLAx zQ^`_Tg^l*ft{a(0WtEelN3AFlRF6jyG<@;1bJPh6w|S>VTImM68U0$1bJXEFm{d{( zb%R|uqZuGOS@A{7yb8WJa4UKXfvi_&R?fhS%3NB1o)FE1lBHMB9zG}_2vHM2QcyIx zM`d7WSOZ84fMp$Xd7>7xKl%Fp7bu3_|1VJdQOVhB6XB+z!W8`dB_MB1DXgjGW-m-2_EB480nM2f0Vwqqo_h`W2qoHC~O zPMNF@yu~&Xc=a&NSc95L_*1VpKON=cVdw70+Xg`AQr;yw_cK zc;3_e*;?04lHhu?{6x(QFRGK-QBR4#S!~1_R=svLQr-Q$V7JZeIPjcPdiAGiEhE8% zhY^G9!EDix#yh|4kO=_X($Mf>W`ujc*D}ij9X#LrR)q zHTDMr;l^BfS+!?fRSot*(?PMe`a|PIecLERZWj8ET%)1S5Oya@h$LZsKvWP2nZtf8a_pNALi zwwaQ1nv=fP2wNehFLg6nf+y!Rf52<5^U>sS>+<4NJG0|Rni6~Tnlm}QN4#+Ce&}18 z2lzchlLJF4vq9Wv9CDh^rf~C4)Eb2+H6}0jTPQi(NypOa4?JlF_v|m{gRDPW+WeU=)r&a>F7a-SqSpPntLhWUyYRZ&Eqg93d%c9MHV!0}_iElH6re;V zLM6(^YG?mytrJl7byO8W_O9`s4XqPigl+bypb{Zdy9gQKZTZJGIQ`wteEt6{bfd31 z0%dw`_U*^wj&(`#7mZKfX*oAxlX1Zb7Km z@k&oG5=t_Dj`nWn!|Hiya0 z0ePq)A8&v=$0O#EITL%&;KCL_QV05!yUcT$(^ zXlHkr)yHnEMn2mja-ALX_2qSki}aLT{;G=^^HtJx5WVXY_Rs&;=@r#IyXsy#3jPkj zK@vShef#K-M!ne=De^t=6LW2Q+FHgi;{abLWjxU3oH$d|I0FZ$hA~TtA!^YTb0#t- z0L`sO?M*^Xi4deg{L98hP8p?StX8?ncr8k)*yWi!##!@^yY8vx)yD2>V%M9Ce$Wi8 z%5L^MlqftVGf`s`en6Mp_y~P4I@E9Rb`fvG3H@2H*FHa@ojqEZF)2GVz*bG`Nj*P< z=rdG{rAGi*8b*VYPXaS3HRF0h8LZE|+LnVn{i_ewltI5VRUx|8%tecRaX~b;++^)( z-nUQv5r9e`X;P zEfHFnVrRxTT^#B1NF>Ld*}$5Zr~jOV{#~{M@@J@70b9w`%)7qMJK9%QR3HC81aFA# zd3mOz03a|IiEaI7odoP)uB=a7Z*Nx_o^_P-c5pKxqlamUb_^59`Tb`6S+r|J|F`nh z*Y(@1;7xtkQ2Td0Mv(YYcZ6t$nf_Tc`m}1yX5}iK7c+8AP}SEcndE#D%~zzR6>toD zU+mhu+5YprIfk5;+Mkk9t^>*4G6X+j*t3Du(lf8nr$ z&MXZyU&94w28LtUZE9yxMX1V7y9OFDCEu!%N$qLn ze)7`K;jwT;Nsi=8cPtj<;XwizlGfuIV1Y&Gnr&9KJk!0YVXTuzJ6kd`xprmp^fkY| zSeb~aru8?@q?zYBTQQOv9oci1zHT}jPR!?FmhQ6ji2wA{T!OQF811UnW@x8e&4JP)T(@A&>y zb&#v}^7@>FU7CucLCulmql_L_>*?<3LQ);4;0FvfGs8| zIWxR;jzRhaE=DAvUCb7y(8X$l8GL*_o}cmN~!OnRQfu zVSgjAZ~y8Qr|-*q4@eCgTWB2?^0A03N3jN%igT%`qT0R|LD5R=rbkQAcB%vluynJY zibEA5Px3uf-`@*Sd}m6V`%*RUp5IsXuBe{9kWwQ=l80Zug^eGT#Pz$ZvF{O%(H3w?mSAv#2CcLDT`Dlk+-q3vPYR| z`r7o%B&5!q<yTcE6dLG*HsM6@$ZBL-%;=XaaItKz1plrz)7#JuhvTACS>9Ai6 z0^TGVh;hryFR-vq03>EbE(h!epwhi{faW~sxK6lp=N&FGG7eRW8oeyU%kN*mj#ah3 zDfp@a^R60GVX$bLvdD~Da*GczEWy#95zc@i@Q{ zp_2&%#t>*>;14^Ias#dG)2B>7zh~%=9zKMKh+LkZKM#YDE*>~+WBmqTmywYX^zM&& z(=#%bf=E=J=_IAXz~LL_x_42qHm6q6CpBNrD7z$x#dll0Fn9OA;g_Q8Flk+T>%@s&yLO?|*S5O{j#Q|qmMg2ZjW_8qUYFS;*t8Iya)+V9 zx1l0(DeR)O^pwp`cJ9fFyKiZ#HHxBC)^2-*X@?h$xhpt5DDoc~xzVv~n!^(T1=rKk zRNS9NE=KMxvZ__vG&|=lgf2@f#Vm4GEMKr}&VBV)nf%hT=W|(U<`x}!L5lK5O6|v| zze+x{%ng)aBKL%TNQnG&EI>+q{g#g#do=08XO#}IXV%_tqQ&*6l_Ys`oR>ats_+Z@ z)=4}SGLtu6WHsX=l3i@OWuNxn94!UZ> z!st9a)*%D>`qj+K02q2_iD@wEcb>6s>!YQ?t=Sz-{N8B%X$MIuBsa3=bNFM@IB9$3 zdMM{SKlH=!Aj_!6XyWgo^6KgMouyU1QC`}8ja=(I#jz=pqb1gyRMEXrV{Ek9t+MP} z=53q~*mr-73iL9kQ&%k$TgvV6So?6}vE-<*qFjqT&F-ihRf_vr;!>*R&SiF(CQD^-r9Y>x3@hq;g80ilZn5_64_MEWDP zZ^HI}Ny=edkrxRGOiRdgV%ODGXgz!9Z9n-syT;b4SE7afsw$jmey?;JGj9D<+sxb| zdmMc?ig5$lLwaS-WivI57Xz4B*+fM}eWYQnAtwzFi-m;+Qi-vtX-QGhbuBGf85sx$ z_Xla7gsDsGg*-x^g8KEcqKqfEM*X6eShIiCFY2jU3kbAlWx$1uJuSoRv_P|s#oy|e zUQnyJyz-aVp6PBhm3yHs6c9EPJF8dQ{lq!0Byo7(E;a_S>ZuQHPfK^1s6H>6{cGOa ztWH0Qr-rsziCSJ~g3YnMG+UAVRxo4u3{9)-?W|*CUuT@CA1o`Wsc$7fi0zHoW= zXUEvt6{AJen=3LidHDHNo7whlXJS%weY$aObB^rN&(s=K?ODT(6%qwQW2Ba`CkhUH zFE8vpp?XV-yw-1EJ?23Beyc}Jd5M`tVWdOnJ->5{d<(s*@{D(^$&$Kz@1{-k)*VQj z$O{r?+p5>U=u29AzH#_l+E%I{odz9Ioe81LK+|Sl=b3)G}k*V!p94!zILQI2D=-?K0*kIQG|q5Xcbz?a_WndVjr1ygapZ(MEcA-lUCOD!Y$>;79(2UKh9U z69dXN-f!F*F7L>{+r52Gp4pW>n*B#_@wFW<-fnKnxIFzi372|GcJGn9Ym>evdmhwv zEx2^Nm}5+_RUn6I6?nb=W=a%Ju3(XhuN9+jV}eZAheJHwLZr%HGR>{T zr`rdVr-vFtDvYlc`c1j57=~v=(o;T>a6VF*M6kV8@LS>H@|m^i;h2c;4vaQYwTCEL?IcMel*P5s9XW^z@ zUHk>)qd~&g%I#T`eq4|@u!);#d%dBp!Tbn;VC6hxVtejG=-DfF%p13r3iIjJYm6vU zf4_UF@05SFa15>PiEFF;Y2!M6+(c%hjG@WrQCEx>A3E56$amtpzh~&qQ^NU&c%#be zoF;^Om(05_g|cjEl_kWs4(ZVo95>+QJ>T2v6b|Cd?nH{6<83-Q3Pmw^I+%i9R2ty# zu<@(H3FCMi7fflY?~yuA=?pP>UHxzT!(ZKJ>(Dbr@`JGN%fti|kfQ@TBO@ZSG3M%hS^nnkVpV?Cf6N7ye)^KFN7`bE``~!4I`5QXBy*xw{LwfY6knONXWl8jAsR zykBZhRUC~6((>gCMUO-aY`_;`(}$Cb%L0Vdt@d;(-)hij@>j2-Q658kAFF5rPfLwD zeTte0XaR#NFREtrgt}76P+6iYgifFI0W|nwF)%zVCB5J0;fG;f$YH=10f+$wkm0|I z-=Cc&a+f}Qk(8W#se|=43$gR~-!+P!0`@vc^XMr+2Q2gUJbyQ*2>>>YEIkEjVv!gx zFS=kp(nmw&9$jGVk^JA~c|RRhRdkiR5BhgqDf41U@=s@b%wV=sC(R&uPr!a>X@Y2G zS;ej0fBmIGGV^~v6~Y=1PsYwp&AodA;U>xUw3hrtVRzL>V?H=DNTc6xX(TUCY4)Ob zZfh%0bsC7sL?1ut;f1((mKJ6EhN(SeelI+^g|#0rSzK`2v%|b?cT4B-9|2Q^LP|1C ztlS}ds0r79{HR$(Ow7&Y?=dtrlI!ojCs<_hb7%LFWcbqqa9T`r-05diQ1)7NGS%T@n!%cE;|zn#?*_RWvST ze9s>S$U8N{m^+qdywY$v!_qN zyVVZQc*B&E2u^I`KJ6bXBpZ5e?R)BbT>`z=@;a+cY;D+5 zUDX`M47)m=8o2icdo1w=npJL&Y}hIP)xd7Nq$Nf%R6NVlmdTLUZt0%Bwb~EI(hYiU zBEeAN+_T=1=x1?oc*<#cM_(wlf!)k`YP%gNK-QaL0E z9;;J>xciWzb9hgo_^KY))o6#fI;TP!rNE2Q&1<34H^tWmD%`sl-4~Qnj-6ueR5Fz- zqg~+V8~*9?O<~WJgyWOw7vf4^4ZV%W!C;K;O>Il`6Jd4v&?o;~ zXKl26U~6EzmZo3SC-Jo(S&@&aRVsosuGp75)?AQXJr@-7BQ)yOLBpN&Ug7({)byXL za(1m~C%x6o7WvOTiw|e_Ix*LgZI6N(|Ldf!PFQ9&M#L?<_6MdM8>`?7%ePKWe2_io zt}u2Cp*6PT{PBbfst?4B8q1JAv3&A!>=}y+&a*Tx@I9JU?4WP-KyR5uNd(<DJzODKvgNehf-DXt7u zNJ_Im-zuoYAi^q$!Q8i7j-KY1m-Aka%++Hh?@Vl`dk)rG_SI<>>}wv@x3F3c&nf9G zS$H|{v7hun;B)QIEU|?>jFp)S_5w+?%V)yXLOx#?4Nu-JMOF_N+C;r4w@!TRcCd{; zOQ1D-=<9X&RIapK+SKj%qhh+ zJ;N3Fx7+H_*RBgJf!-fQEzgtMMRA`;lX^eYRL_}TPD_-pP2-E$e6#&k2l@Bn-rqly zbZWNuaVI@2q*8e_QsnPz&M^W`Fg9{1JJ-@V;MCpc-$fn{&y!D1;@Fr3G@k0TNt>zO494|WPM80DCx{uvx{ORpNbt@Su zHwD#Dmc;U;l!AE4pCY(h_oS3bU-t)IG#Wb_LTfwO8{e|}J^N==@!UR~ZSj2<6Wh9^ zm=uMI%yZHeDrG%WNGX*Hg@2HW|E5gZeZu7X_&6MQY0?xF6hJ^-0T`HLd>P3_Rh60w zl=q`Qhi-*?^rVKC*7Csm+O=DfD0dOwn56_$Xm?;)q}o~b&(aHb=)zCNf*zkGRALPFxtKA#X()zM&pj~Q)@sW5M4m#M{a6@GXM^3WAQUo0Zh z4I;z)=zeHIjiAG9X=#CXAaDUK#sXk&;4a3irte@^mnk(UHu75auz&PM^NGTR(WZCr z-qqEm``-7wnWskD4FKx8uNoKZohEWXdCMhAA3!6XhNhZFO+$m0me%Xx!({pbyfvJm z-QqO!vs@Z&v5~in43hdQFG%VFgW&ytQsboROdxX8pWG-H{(OX3WEgHh7cMUgEQ?cI z{DqaDkI&5FVk1180|IW+v9qzgYi-T#I^6K*m=u``JnJG#>lk?2gmmEF+e=pe2uTLf zE&a{R9iu7RMPBC8%LBxFGH&I#M?Vt-BV*bUc}w)TOmnOo zu#u0JggHyW2kKRzIV+S=L~ z)z}Ec?f}iL`?%@B*Yx1*+}vlEj#9(`YFDpv1Q7v(j)r@qXXV?sk{1mSZ_d9- z%5^a@=Ia8f4!Y6B%K(!WopX%OE(NGiV)#ttAo20J#CuNkc9x;vKgi~#nO2bnb;b_Awp(b1C=6H%d| z*K~EQAhPp0lD70{ju=_&1J3~@-1-}bC|IXOg-_>kEIczb{R^hw2UK;(OicfBvd>$GqY~6dNI<=%kbmegCtT|o= zTbiSZrTOjp_2H$6;1HP<^Z+mC(J!wnDh1!W{@#Zgo~^3Z#+x+669gm{g9pM$r=t3F z$)99X`4T=gCg!`9Y^uJJB;nQFU8JU>0++RzlX|6&aDl~oz;gYj&3DjznL0&$hYt^e zQEOYK&s=Mjs&X8pxpy^*8G@amsVQqiLq0SFuz~FE)~aUb;CKaV2$r+N_xSN7ZI)`ti{J7Kv$MsJ15kZ#Ys04gLu>1^yH4Y+uNp@_J?ql&Gq;+P*N!-Wl4Po}GX98@S*XLRMPPNrC4EW8c+KzaM6gg&0(TNFibf)N*=|+ve(Q zMz^AjU{-&n$(j8g)`gvwS zsCRgJO2T9enpqz}M%?=4tEhD%$9XKb#su#TijIa9$C4#b7_J=iheEk=4YZ|4hKAm< z6i2?!&Q3{AR!%38XWQD^mY1E$;{E;o*c(GURa;-LF3=DutaNx^viyxJ45Lm621jK5 z0Ks2URMap|sgH7~djCRs7TVK-=ZU;VH51^uVF_YopHLi;USQ82NXN@2A+e5FbuCMe zng6CACgH)KLg1)Ti$=mqoo>&(o0Z?E{=zc79Rrc7#6aU4oKOB-JFs;zkYM5(tpA?& z0I8nB^rO*Zji0KhurPV)uu00&T+?Y5$1Q^e`U-*q0y>b#0;}>KH;mIDAi7NJ_q?C`H|wgcGu|vOeym%68I7iaIaYHnN1GQF>MuauEs2KE)XE z`UP|Tu|EFn3>EjKG>r_3S31aY1i9ZJB@4P@v?QLv5(nsYIJ^dgh;a`KFerp>Q2n3W+Y?o#&Hr4oV@II$j0ahG-F=9;-KQ) zor`aV*aEE#h-8hTb&MIMs55U*%PT52JU--}{7e0g6=DlH^ZGUh?cNMKQa^ z3QJ00A+N;~igWY$J>Nl!)T(_NQJ1_lckjgm#u)Lwx0pCUFB3HLb91S;Z^pz|t+awfe5_Yl z8N%N<)DY!x8;4|1^XUGil@;Of)~2R?badzzOF$(p)bo}yADqzZrx(FXKUYKw}zO6Jd*9vMij6?ArOx;;qF07 zU}j;->}|RE{Qmv>Aj8XvWI5cP=bKW+y0ofTev{pKqNo`dB7mwR>|^=5Fsh?bd&u+t zzb`~bCgYV2BGCvDsF2w*Z!v?*pkehB8koDa+Z`rI|C+luFo+tjS)@FB2?8vHZ?TdO zY?*fvDh~~&?*6K2Z@&N|C_CmYd8}xPva^pq*egyaXc3%gw83#h3`^yOf7N(v{6*&} z3oNyNe*Rx;zI$AL3~mVgz%MAM?p~O}0P*21BcmfFb;C0tgfZ|Y+sofZPc~&XcTH2HK9-um9FXyDEQHwM*L~SE@vI6X7dcnBQNO1_`qM zvp;@7nw6Q5FucCDSRu6X(-F%=;;8Q%YIRw=!yyRl@5@VXzT@ey?FAd`xUibA~? z%0wt{i&9hNvVA@bV~Uecc`W%t#+#Nlj?w(}&BYCS>G>Y&DzAk$K|3L8{Ba-T9Is!W zuD<(%hM9qZK_gS=+u&dm%xGcE9~&1ZS#L%xT9sH|YD9v|$jCsOO;<-Jy*ik1Ug_c0 zt@qOQFrB&aM@*Xs0Rn>2AqjUKr*UX>4{~b-2LXAk*2aDk{8)u8JN* z1cFB;fw1ipc@}XDTtjwkR@p)~rM#)_V}@%nk)y_SEHUDNuJTDtNGcT~k*~*b?yCw4 z-r@2|Uk`^O`q$%!u07c0Q)J{tI%J$?Z-4(9Ruh)P(EhDLN3RC`o)r%v*0f5Uo}gHa z{0YHgO#rhtp824udB)(~L(uQ2L6MOG-v@O|=y_GJ z=E8$`x;{f0aZN)5(O8pw2I<}jt5AGi*Jl*hk;dA4drN<3?IoO7b>tHwa4?HG{_Ty9 zZZIPhA`DDSbvy`;74Kgoe@VmpA=b=*&da@oUpBj`t?ebz!QQ%{ynO8n69Zw8jNwjL z{79aKtdUzQ@6sJNb)L|Y;^Lh7`YVO5OME4NLo`|9U_;(@7CVxPb(hr-rNGsoB`{?UiwEnBx@jikaA z0>x`;*CN6SRww}h0VIEH(Rl>~kU#?c{B+7)i)KSdXBlAwVvd3V0AK^R_eI+zJD z1b$e7^!fQIeHOG61_yrxdaPEpx3|~VXXNUgA>7+3QgUS*K~DoLx-zGwg~e6tlU!W! z15*pf5*djh*Q%Erf=KLdLGp z*oMhE#xiz;nKAb}s9*2zeeQkkz3=_wz3=OJ=6QTS=X}n7KA&^WC*-oB4)^wh+c`Km zxOFdTU*+J~Naf(zP_dO0SP4G=@d&Umec9mJdEj%yh7B7xZsg?T+`M`7mMvSjxVW}% z-MVetw(Z-u@7S?p=gytn+}yi%?c(9#*}Z%Bo;`c^?%m7F%e!yizWw|6A2@J;kB^U^ zpI<;g;NZc7f`WoVLPEmA!XhFfqN1W=Vq)Ur;t~=Pl9G~#4jnpt_^_0el(e+;kt0Wr z9zA;O*fALynd8Tg%gV~i$;rvf%bz%LLP0?R1Oh24Dk>={DJv_3!C(~?6;)MLH8nML zb#)C54NXl=EiJ9nr%#_bbLQ;Xv**s8)7I8LfBw9#uCAV*p1!`mfq}uLOP34{4ULS9 zu3Wit_3Bk)W8-Vru9=van3|fJnVFfJn_E~|SXx?ISy@?ITie*!*xK6K+1Xvce*MOc z8}|104h{~Ej*d=FP7nyh+1dH#&6_SRF1K#oa&>jRefzeXo1444I}{4_@bK{T^n}4+ za5&t{%gfu_+sDTTfk62B`XZ4?KR-WzfB%4hfWW{&G#Y*9&Yhs3pu2bP-n)12{{8z8 z9z1yX@L_Op@S{hMLPA3R_~Vbqj~|DIhCX@nBrGf}JUl!iBH}6V*L*!PGBPSEDmps) z*|TRcF)^{Rv2k&67!2n5^XKvL@d*hDiHV6xNlD4c$uC~Kc=__>t5>g5Qc_Y=Q(wP+ zotBoCo}T{Z&6|vjjJI#!W@ct)Wo2b&XXoVPBeM3V-V`F1eQ&V$u^VhFmzkU1G($dn}+S=CE_Wk>J0)f!p-rmvC z(b?JA)z#JA-AyDCdwP0$dwWSF(vKfM`uh6%`}+q51_lQQhlYlRhlj~z^2o>tg+dt} z9UU7R8y_E^n3$kasgskFQ&UsZ)6+9EGqba^b8~a^^YaS}3p5&SadB~JX=!(v#3?`Ggva-Trm9tnZhF;MRAn3PwT(p35aO|pN|2E*EZyY%|gspV7&s_6Om`Dup z-#4F#Pj@a%7kh;>#TD7h;Ced=uC9~I9_?Iyh_pT7TO`iDdKHs&;qk>CBEFZaOixd? zy|vCREHbrvHgn|I#c6TP4VG1D`_AtXKYQr@>9ZS)J6BdpFaZfY<4u7G=V5vevx&^S zg#cqPBorDn>CP89UeA2ZD8b(y|?6=WrL5#^`2hTfnp=)QyIkxW0CB~wQd&_K8Gt-?3`Exd{ zg5A$AF$m|Zn|bbVOxFd>?l7dvT0QCXb6U=!U8W~!7V@MV?xdkvWKcwkoFRpn>)R98ZqI(&&jbU@ggq@?G~B`TErcAr8EV_(*YCrF34 zzBa3-L`qGGf;^Md4P$Ku()AAx8hTNld6uM}p=$r@E*wpyuPhD3vuG!fZc5BT9OJP5m&1r{Jd1R`fLu`-U_Z^LX9tHP=9~ zLzl_X(s`@<^`Ez35zQj>iD#Z!jj5)9bGB$fBueJ$PT91GAzrPzlN%=ePqA?65_yIE zb&%%ew{3n{t{OWMIHQXc)Q?%XL!WMueKe_Cb-Fs{3cC zRYxLFV*fRg_~1(2es0-Z)1fYdgezjS(^679#c9LNT$b`Vb%1l$sh_1rnTeWvBLUZh z&9PlmUs4f%_NILn$RW}EuB7;u32t$kEN}r?Wy0Ljrcxp-<3rd2W-b?E8fcT9C|V)l zroA>udB%}c)82sufw8K$fkPUgw0f_wY=F@!HQz~*z4wW^$TzGYiV0Sk*Lh!!MnuTA zb2S0@wudfiY|^Y1V= ze5yuf+o2{AZeJmW7;I7j%!4u+Zc+ge*x-F z2)q&;@VF4eFa3~sZX=LS{~xUSk9wNVEr%Z=lqS^ITaUb5`0NzNdPX+vKu`}?3crt? z_3ffw<=UORT>v=$1RnGfSwgB+UJSDBGDp9$c%{W=Aj%UDBQobd_N9}c#|0f?(9{ki z4M#MzM+;nNVH7x=s=pj*ms)&i!LQG?GT1*)X{p1otbAzDICs2xXS5E5I3Ob(URuWG z3i31z^@b$K8STZQ1E+_FQ+T9oGuwrVZ#vYYL_mb};j#`$!0@z_Xi3+hvKn_65U#Sx za(?{0WMnRN0i7OZJzG`d(isE;PVKIvi5lSJ6~Lju``Ck8EZBO(Y^;j@U1b5Rljx9z zY$|$IeO%;#k^j@47D&l~mEJgVmKSyUWo9U{s#9L+vfOKUa!F?#r`6-^M#Zg7$IRvT zk*g#U=og}nv~QbFHKk88Ku_jF3$p9ua0F@C!i(MXhTO|B7OIY7*n6(^r3AI=_YhLUPGno0$+>~oaIINAa(!}AQZc@G zqL{8R@J^W*P?Q0YN~Gh|8Y4j>y(y5AG z-+6qyrozlY;7)X~gOw5IVv#5!+RV9K1D?mG6+w5B7J)W!I^!naWAd(1d6GO^oB}9! zjja-JfdR`AS91NGwEOdLdAUQ;#(U9wERNBdMrpbqjJ(sYc1)9E*cU(EXq zaZ0SOvf?QCrU|!X<+1S5T>sO9wytZ`&4j?|h2BkhJR0b(2bx>7sfAJlUeA)l!uRd? zv4Wy`r>uOk>AO_1-0%`_^mw&4HoikbxzkvJY8=j)FYfsq>r4LAc+4up5 zhG_Ta_LPr8*EpChQ5G-eapVwL)BR+_z@qsEGY0n~qU)t<$}ufr(W3`GJ)?UzV|EbY zhDcN3-|2IhQ7c82cH}DMa?k%2V5c@l8*Az~*-D05uIX22Bwf1n#vu$jNm|Ldd&mY5 zB(S4mano2F7xNdt#PQ*jP!%t-^s$RA59sm|sM1hmF`ndGgBx~C$eC%abuWU0do)S6 ztd@94nx9E`YH);K04)!u%Kk$Xi9~u|k+RJ6bXaoo$e&6&f<>Jy2q@beFh>yJ;R9$b5Dl4r!i17GI7glSeOK=YF<5lM~230%WeM`7wFKLTvdD5 zqNL6Uuk*)dkD=b>B{k&(%PFHopi5L+s|o9Qdx@>+>7?@dL4>Mny@K#O4H3zyGVZVh_~c0iDV3NdX! zJ()B$Z0qPIRWRH#y#uvYeX=D5{v$uQ3e>B}ig+~wWai`LRRVE&!1y-E)gsw~*_{#%E`f z3_d-e#vckvb_n@V@V0HoYoMN=scO#Co}y8I`-)JTKbryc6YA6O<4?V)8nWnsia3o8 zJJ-^Bbwdl*NX==wt2u1@_4SiRIxy^TWK%$ugoCmPJ1t%>vuL({OMgXV0r5>X(if=MhPan9u8hq9=r6lvWFUcy!8i z&k-!m)&#m9#8G?kN%YqwkwanEq7A6!F0QTxru&x_jTym4U04S8US1#@o@b2O|F z^PU~e(We%!w;ru*?l~`%xpj~o#-;-4^}Jg6y`OU*U6GFlnzPlfGyj?C_Y4~1)?%F@ zq`wJk{P$ZTx2&(So8&cIm!Hl9+T}Hu{vRSqO%ZqGNbf&l!8f)Vv%0*#)L%_I&|%rE zcK;D--&VW$e`H}Rw%l*&L#<$~{?k7P0cWYPh1JPWDf#o&$eB}X%(h~okA(gDX6*H! zPV_|TEJ_ajPbxl`0`Oh}_eXt2!_ac_Ygy;dFEx!P%Ksgs= z)eo_|_fqaR7J6h6sNeJy6IAoNFctBbqL^yR#Ng|iUyV6;V1xF*!K~ufAm%Jpo`wJ5 zvVN_wM+Ks{JNy^RGX5MUkm8&T$oK7CK@%vA@F}CD^+}Um+u?`03(PrFREI+pF=hyz6~s?_C$R5`znQ}AL+9-jgi+fHF&sy}EbKm;cBY9vGSKnca3o6dWvW3?f||FR z6vtb>HJmrLHCW?z$i^3b+ZcEQj%)J&`|*mn|Cs7 zzvi+TA2QrBB;WmgrC2ykVgF5$0_f-tAeF)SL_u z)7e^Zjf+Jq1^sHMcc_X2CKOFusn9`ZcGF?kUL9BbQLHXy`7)jQYDJs6@Dg5=GoCbb za16IAVc?3lli8E~Nkpi>|H8m~4H>ixczAedp-~3D9Xbc{P}t7RU!iZ!%zoUuXE=;H z^p=5aL%Ho7P&`=?iDE4#k!+kv?LFY>B$S*0{RPGL#7mbO#TH=6GDM3lo#EXmthMx- z2nKl@*($jpk&vX*H}sT>smJJam0m*a6SHhZcLcU>@PQHcEfI{z z%2j;SiYlm^g{+DjOUfV`v)tiEGmQrJ2as^RUD)A@Hm|EGrO7&&YCxkqA)Kx7kpz{% zW%sCSa&9ix2^jAM1M;}t>vw}IMD^BgkFS~nMmUq=<3$wpf**v+U?{G(3TnP&XQbBd zu!5U@!iR^$?QV|?*Y|%kpV9Q};-V(Gkz{WfWkjY7`{r8jB|!wOsjz3>yTa4Bxw{dK zUb^`O0iJ0pUpwru>Agf|eH)5a@)@p&1}P=ZjpUH8q$yzNuNJC;C@RD$FMsA-^qBZ; zHL~*?$XV5yb?m`m+LGY`qYmkTiy!46{oZML^>G0M6MWUfOVuh5$ldb1JxDAqhKY`k zRn4VxhR>q3fx1yLe)BbCO` zlK7H*EV=P0v$4&qC8d36+$2l^gEE`>)UdxG_eV$c*yW}X3@EVx{jB0Cie*l>&Ptdl zQE$SI-g?jS=w#ru#T_PMSKM@9aIh1(?0QB(!E1%21{_XY;k2a*xCYhA-8@-X9zT$y zh;aV8D0-mDM?YV3WvUh<=Yl5lsXxTE}6`h zpsW^re_sJGi2Oh2SG>b%aoyZty%##aotxC^H9Kk!#5F-_B79m58 zE_0CC%P?a=hAI1d$y^rTQ>4yvesj(C)Z{y;7!2qMG3xkYAzW<<(HZqk16`p_Z&u+U z-7b+Mx}bZIJxj6fHEy`b0)n!)!K_9wuMX=rBYL5Vw_Ax9C>|`4snu{Z z@ACbe!j_=-8-ia{B)xp7b^v0V08T#~Wl1;$ew`L25-|J)kiiCggw)fDw{c)yQJUXG zENDn@8I-&5EOD~dt)*E^@$I-lEC)8&Xq+dizol7R@$INVthNi)WInf9%lq>MO8RaQ z6Yn(rSBeOZ?SJ>G)g#@V?Z8t~-s{<+nc?O}nY~pwtiq$1E0n>5@I zQZ$#+*&+{3a0CyGR!g#*;vtum8lDj{r4NJ?^0D~wVo~#KGPf2p(4q5C zZ^LnV6lN% z@j{<2p6`jQ*D`L;%QTfw0F-$@kFgxptT-*!12r^Gh zJ)K@~W2BJy6H1v7NUaB1*ucLgr8?{2b0i4V5D1+e$% Op?ls?JLl~6yZ-^N6zKf` diff --git a/man/figures/rsi_example3.png b/man/figures/rsi_example3.png index b2136dfa800663465789df06613e05a829f143e6..2ec9c87cdb44c4c2bb3125fe5a54dcdc5a1312d5 100644 GIT binary patch literal 29021 zcmc$Gby$>ZyYE;Slz;+~3WzjFH-aM|ASK;Mx6+MDBOwivk^%xsHwe-t-6bjA9p@g` z{?6WK$GNWa*O}{EA8P@_yz{)zbKk$Z$6r=j4D%MzEd&CA`CJ?+k3d{rM<6cM-?$9l z5jq-s0bg#u7FV@FAg~%x|6FRe`l63O+($e|3M)9quTD5=D9oQ<-`uFfz*za#N^ylQ zhR<^NMTe9e+ub`3;nu>Jo>r;Ejxt-RndU{(ehm9;qWWC_j~#8kB$J8q54RwkNJSru z;p>JAr{~<0gvjmldD~OzB$t%EG&$s+|<;>q+SxJ8*`Ul30{B|BRoEy-(`Q*h-^D6GBR?YzrSBg z&&tZm($aE{QBhG5z9&lLhorcE-M4AI6w4p^%FN8nmGbfr7O6LHwq{p4J391PW48{X zqM`~Et=t$G7|hMh1Fh1&d}(pK0>3ILDLHH5n5mRQPe&KX{_Xqs@87<$^d@IyWPJVF zai|5)jg9>-Y)XllI7j?4UH*?PFC``k2?>%S zbSvn_%jeJim2xw0^8M@L7+J&)Zr`uC}PE7Wp1Ba=RE-br+$?W=J+$$FWYr&cUc zyRg)g+SAjsx5_a_QH`6TfdfIrS^xkJ?>5IeN`>QBH`9a`{9Q} zX}>mV;7TbXtEk9f+W!TfA#fh1!6ftI1;_dRO+4y&Ub{ANPk+2e1$*Cdtjos_^ON>g zhPq=OHynx{?lqHpc=`Ac2_53$;);lf1hRA6uMYQTy$sq|YKx>_Utbp``l?lZT-Ys` zv!Q5awqjL#w%|YAucYi<1xxFO&2NXxLJ3IztEL%(kCNy&xFNsb6UV< zpKwZiW3sxiurP=nR-^fc=k=gdsykmFJoVA2b)OLT^z-wJq*o>~kyTS$URg17W!84v zQ+)mUTPT`XFp1M_5Z9#BVuHhz+t6V~;sau0;#ox^{-@nF5q~DDT@pAX(&d?=3)`*B zHL?^2OIdk&c{w?wG-b0CZh2Gi^N+XGZ13#A%b#=ziMZKsOr9N*%V6in7r!(ha*AF) zC!LKOFfnEACVf1aQNWV_4(*x5nW%!jMG)6QPp*0?#^7UQT5g`{H}d|6-c7^`bBmm1 zI8961bx4JHceb5zoCglGd770(48PGYDn2=N4d2W@RgWefmy=$89u%G$iuO?TkEmAe zmoLM`X3Cz6oQK;J4pRfl&9`w<`#2mK6z3L+tdf=PvX|jl*i~m1s|@97o-7Jon4HQ` zySGYUM!({?o8B~~617w3coCsY$d}$pS7!5YC;mI{Mj;2i9WVSfH!is0Xr=pK4-XF= zU0iHRDwWnpqFF<7&Q_9i3HM!7e?*?2pO2MV87Wg!QAx$JK73k|Hcq39wRYd`|XRP(jDWzh3Ch@sW}G@*aLrjop<+El=OD#6q#$u z+}+(p)WBD$g#DDry)wP7HIgV}C zs<}Lh`?|WMFRCe#v0RvW>wT$lTkX8nr$mQ7jQL;8H)-5?z0)mJ*#7wMLr_ooO`2f z!D9a^)&Z6QKm3j7#*MvR*#gP1RW;q#)vV-2C?L(&c=;t4xm`J%W<{r!HR^BO(6EG#Y^sgQuq_ zIy!o4N(!OR%^Noe1)Oc&=v7-=Tk)u+bT)=Vf`hdR4KXY0gcXb}yM-=Xb#)(v+l`4( z%%|g&Hoax8B0U9AG{< zIkB3kD2^4meDL$t_taF%mxkRAw-E^A2UlImV>d~J+^aG&e60Hpu~2P1Bss$5Dl;=P z#VaaIejZfAi5I5rOChV9^zU)^ijL&GXl)Y+DhHuS~pJ?ZZ&N3cD2_ zc{Bt4eGt4#{0^x|nro{KW^W>kHI1IkhX<)R?>=9opUK0EPpV9QS(zCZp=&0X4IzQPM z@mKa3t9}ua9{Ah6sbu20{zh-DhsP|Q?atC-l1EnYI31&LWG_a)8WD>EWDz)y_e|Im90etJ~<#eeJuO1fL zMvR2VmLvb(X9R+v;}8qc-Md|yik_Fq$iU#bH=umf1^21$+P`6$*Y9p7=Y2(g*u2=OXZU=gQH#xRMY}75( za*k9%dFqUd4J3BGo)w)Cgn7a@+}{3SgMoV0^O}|Wx9J!0_ph>G0aW65={{I~b6!XG z?gER6jtU{RA$zi9_T1#AXuWwJi zNsbhOC50AI`FiH^`5iRld(ha2v&4&dNhR)0qr<9fZg0OL6qVww@q|UGqogq)nt`T` z^kPGy&iZ!`wo%{q`W#^*S94@?5y3T;$nRt=A#rO;6@F0mRzBldx$}y2?>p`Au&{!{ z!hc&Vrgapg8Y!_DYy3d)5VsZTgJDO^gHUmHqRy@aKAA-R=SWX9%uj-D6)FtU&!0aR z7r&pfxw+|nc8nuuX}SJguQ}sIToWAf!QUZ5a*+{g#U_<+W<_C_Jb8Jo=J35J!`|lR zG~W$&0w#&r;b9dks}1N63DVK=@l_5Rlda*8$a!sPC@Cog1rz-S^R+z=H)oQQlZS_g z0cbqND16lz@bf3qM>i}y94btwusEXH%6&8`JTszIANGgZTTi~yTdqZ-#uV`PbCmO$ zRKC@Xj(+l^mPxE~-1?3B`vT7Fyu6<@@BIt;Adw>@BNU;2x`Y(G?x&7Vp1f6{%e89% z2kMcydX08SO7cw3hUetv84|R$wFLwO9AfHueLVT-H{1}SOZa1dMn>q&cDbKc&YRBk zxW7wq?I`#qbFM6(tjx6U?@{I&UdPir&(q?#tkx&1`KI1r(9qNC5oG7&NM0L{9VZV^ zQc@CicluG-_>8s>7I35Hgo%dcOGd^*(#2_}d=?c&x;$-k`v{tKdA#O5Qc_Z4;&!Gl z3UuBgIAmm&`t43mPOx$o=Q5i@`swx6nCWF@F`D8sGPSNpthKsLq$^`P~AFUR`v*TJ?V1j@aHjMy~DW&!6Ta z1rMpIn+69tX=qwtz5Hw|F0j~}Spt=E9#VLCT&#_i7SaQz%aDo<3k$;~AZTXkfMYdW zX=G~S;NW0uJ2y?)Zy3cmPHVbX-Sb^f%)`S2UhKh~AQi=T6)EJx!ovHt22P97Z|K%C zPMOjPa64qBKQ9}q@#0jUZnwW*YoZhjh85x>SUenPhl3m=MXg7`>#)wyVX2TaQ0;Pn zKk%i};SWQ{)6jIYvDjGwH8nNss^-DK5Asd*^{-mP9K}Ff=kcIXt{A zCoLTu7pJ~fnwF7qe02Y&pfSa=*$e+dAEo-9Y@sVT$>+DQQ>~SATWg6bN;O~LQM^Q`)$!_cb1($l497h z|KcfnA@(03MGhQQb#?SYVzEHN$FF|gn87BY!`0vTQCQ#DFwEz$K3-rT30qZ8t_RS! zfb*^~1re*hxV(IrQqF*BF|_!b7#RJf`PtdLZpTILL6wz!>-<)aVH?ZCBTviYn94$ne>? z^D7W~ZcO4c=%i{z;w`gbP8H>%QgO(VVCI@biYe9Qfl7ys-plEQsev2!_dW^guI}E{ zd-MKw9XE85%~iYowQmNU)=>8a-A~ItwhJR1MQ9A(z61t|gM*`>bmvz-Hk9GyEa?Q^ zy+L&=IXlIr!{lp)nLDJ{)o3GF>uAZzlK|!ameGA1C7dpwo|bmI=i?=hSw8e4EhzN5 zb1k9R4*v5t7L#EUzzc*iHEQAJlbU!>u5t75kP5oS zY%sw0HR`Tq;HMWzXr|FUNFfTmehq=hy&`e%Z3UW_RC_z~Hyhg;+dsH}uMl6ft9O)} zmxpJI^y(*cXgxn%a)boj)~B8|HtumO(KwK^*~$Wpa>MK&80gcBN=r}A%E?(V>#IGn zdD$F7%4rTiVwx&D>uD+*E8XZ<^;i@x5zQ&4rC~jOfcT{O%pkI&LQP*?-^l0@{%rH! zOSN(u(dkqU5xg0fD~_A_eT%S1xq6e!Sf<)ryTq^LDn;8)E6=*<(kXbXtQn;V=dpTh z%%tvBtEsA*xSsH<)wmu3@ezM{w%5eLe9QWqaFD3Fnif+5V?j|-QAx=HUvSp($@Lsu zk3)Yy&=S~m>JT-vh#Pm{t$BL?JX{&cZj(Hkr^qkaFj!9|NzhH=)(&P(+Q6S% z+dKX(qrDWrx`%Y)4yHV6L7zafGagTPXjg1IdS=tvJ@*gro9il=B*h^2h4ZX0Q))}Z zE}z*q;H0Q}xYR#A%Y5lA8EWO3YgfBkTN#=29li;xtE*#UJ5Z{BD+r^zLttY~X3D-d zIla2N+Fz3E8ybW`wEH`Oj~33O-JnbiOKNiR?L}O*s;^%e(&bI6f<$vVTU#F=hN3rG1z}M5;;4?kc2Io{Hzv)!o(D+S4<$g*Gt2arf?Bq=H6ge<@B=pQgUab7XKZ zR>-5QFJEMHa{Rw&R@%#)mzT{gF8XGPzjc5{zx;`dxvHp0iY^khGl#++N=7lnj_t0k zPF=Y5afK!2JG#!Vj_ly!)jpsY-$B>8S|dR8S+6guZW4`mX==s3)3QU`+dpXRRHU*uLnT=NJGIXEz;Al@KjIng;C(n@S6z4 z>q`JhS@r9td@v4)(L66B-VRe4X z`~IVj5vT$GF;;e7*4EaR91R9PH5wyAEWM-HY^Vl0nJ+eZMP;QJ5^1|K_#(Aub-a8B z=nRtG_*e3uzRVAezat_dyu7Yb+``7*7|JKdnO|5S_!ai#ePtB~zqK)f~bPL*$JYs;>xs)9q3mi7|`3WCW5h)790gE7hfGY})~ zIQe(|sneAG)2C0)&AA>6yH5jGt}_r&i`MPjU#^tS8MswNY{xrePbopNYBgoFg|ksuBZj`{id6#jI0MD~Yma5u4FG#HRe zP~l>jx7-Wn<)x-JoT>L--G()hK>nlPn9W)9@Zm|=+S;0%GgKzaXWhB=%(3kI78!u% zk>`75a*B%2kQfc)RZiiB34+%YGXj7;SGb?`cn#A=^}f`E+Tlx zUp!|3g~xDKKMxn@SPkXXG&V+rhrgU+kUm8*@{6;n3!I+aH>m_2xJwBL^G-EI#XVqY z)+I0h!C77QLv3#q+E$0Z>;3-e4-)3d{@Pf%&7v5&n}SOTj*sqe67B!2tbBLq?q2{I z5kN_&*nJ8RBPrkvUluaT+gtkS;N`5SEcD602~>)26EUHo=>w*uq!!oC!&~^9;eBD= z-u^6p5qqk^z)7(Bxuw_G{3uv9e|%iS9T|^S^p}X| zl9K9Gj^CxIiD73dDBQvMuZU_tD=Vv}riL|^fs>Pyg5tg3@7Y<9E>_Hy=pu>APj@@q zPPdvt9!mMG!L*W@dEeT0j!&d|SMyP*_|>tX1|RRaIex(ZjrD?T4G}ksuIzca(%{PZ zVv$Nn1dJ8Efu%kquTOZ|Ft{%lYXAblrX@QYo6Vj5OE+bLQspyXuZx9{VcxpMYdv>E zy$0hRD-|uRfAwJeVH=dNkU0yy%Q4&xmiwJcFPJBxZBlH_05UylqvbO zlV_b=LQ6w&pxtswe>d!Q*E>57S*~*U@&4NJioaU!dP``;nXjBJz|rzU1vll=+QxNg(D(IeoLw!_?Q1x&D_g%;jo6WLLTS9tM*q%P$F*a z#n}e(4he~diVES~yNxVTPoC6)g1HwI9v=QkDyA-q8KhlMfpiJV{7rjreNb$Cn4UtE zRaxn>*7k(Ex36#HT0(HoANFEx`J9}+_O`J19R=gO8v^?$M>)}f1ECxop8^6dCI_R{ zQ@$34wgqILoygpiQF-~Yi3wUgp%sW7B6V`Kl+o=&x$4R;LH{TzDk{UXK~JAP-D`*4 z2UOl--<7d(^w46ZlnS>8uKK;FC$V|Azz7SG+Nh}vEk7c zlGPCdpU(xo1-zK%Yvv>*7bl`-V-=0@;>csh+i+xZzkWGEdKP{Nk1URija^D8oph_m z2JpgPpZcnfmW_?gURQppOr}O<;L8Cu>FCJMYRTNRA=boQ9JF$aXzFz=1cLkRU*V;| zv$BM>OUp6s%Qb+FI?i--bp56rsdV3qzenj1G9gkgU$45qz1-w*%UJaA!Hsxe=wqRj zViA$|*2(fPOMRRfw5noArM62a#(Xd_rul*|c{gVFn{gp63P7}sW-3#-j_5>jeF^Gt z5X~71SMjHWlbtjx-mFBL*!a=F>w(m{!JQ$I)xpfjNLgStR>ByqXM8CJ|E~^Ftl#SE z?>}|BCzj1+(5C@iA> zW}Pbz4hMg`0#>5)Lg37!S@04-lgl(B7OD+KBgP=*Wv8b0@zc<7HIrGa&vrEbhWNa- zxf#Q5f{TWA%^jMY7bx{v1Ey_~8)H`-J{IeXVUa2;XHBeGdV6_oCS3cZto2-2F7*2) z55??)V;@EHjoHrNA2He*#;%kH>+|E4MvkoF^r~?;4a$)U3JRx=w5g9eOuk=2X*ZN! zUS2eJZuzTxt#OG3Q7AC#)J;_@PyWz`MY!*II)1U(i?1&<)0J{^z(|2@fWi5#(1ZQ# zqeboy;uRX^{9mR;xaj_oku!XnU%!&)M)M2{X|*XRDST)9HkcTC1+n}D6sz2R;CM~a zL;{v=gyjxn8RkYVy#z0?ZRXEMnw6OX)s7qT^s_lis1W>EsMhT zo*%Ka2i>)-tSl%_(p2pVo6V)SA5oouj?B^;n+pRCg_o~O+yj8!8iq}#8=p5eJRC^G z5diOo0cDvzk;Lb{m{|Tq1O+>SmGLfsxBdoSY>%V)XbQW$4I9#9Y}Z7%`Eg!YCyl{8pmx#?Agt88*3%Zj=!P}bZUg-8plb57(+Mxt%sZ z<-5X6f3UR!kZn^VGwa_;3sQY_@(k78S8)+_(9Kem1TV z4|3~$<6u^oP)f@LOO$k)37nPCr^D6H2t}acAvyz6Ij>#X>~I#DEy!$r&3P zYiMZ5%HIBO9lg$FTiyg|X#a=IxltsIKDT^+zKNWc3kbF+Amf3f+ zkj-xNg8GiN%&o$M<=fWR)l^i#$_ZEHxmm@=v+)!v?znNsJ?V`|o;Sa}l9G}>d_c#c zjg%xe36}?pLPrZ z^JH>zl4PT3;CEg`k7=>c`QhxNB-eU()f4ku4J_t78yg$7ZYTEk1|lN$5wtHsCjnkZ z=o8CjMdorKWg#ss{pzs;`2!xFqw}*9-0zMi9dYq%MRL1%#g5L-_RCb`v|bS$@5!|H zeld&f?A!uYCU}0RS5rusk^ge6$YgeYz7YhW^?90+YuB$|Ckc>Q8yv85pR{@Fmm!@% zH%C_T4uS#yWC1LTTG$r(M6Qf$xbaM;R#yu&yO?*D{BExg5CMF_=^{NdwY?s`d}=B+JL+RT0%^Wicwq%>M^dFJP`e&tLw7c=|J0ZfD z8H=%!d04rM0^Ax(!iGeAPBu0?bMnz)eqKEAy_q{wd$jhK7R!Qyf^;h1fTMveNv@*$ zyjg~{@3onrikjf@yFb5wgJMNRA*$Zt;DzRQb=>8b?YL$uu-W+9+S>E>|KbZhIYVhy zaLWes-$1hhMVKM;x%!F6#uAx^5g|1SZpuODHA$wL+U8 zG6ml2fEJt_GLY)<@%J5PfBlj@E2yo#00}-$fE+lR?0<0v0{6j_VH_#haR2(3rh(cb zk8(05s$Cq`MvLb;8qb+`WA6kA>m>C8CloqfqNH9a$qnLw&01Jcw7V4*KK!24^%5fa z2y`oH0oTKi32`YIqMq^#Ss?AfgUz7cZIrF9)?xII_A{*sl%B;%j%qND5~Y?Cqu=$e zN6yvmiqy)z^8~9W7sLwGk4#KVpiMud$dv{or)D>%W}k){!R?Us(UY#X}>cmX(%?{T4u_)1*0Hg4#62|9q3V)buSra!`H zNCFT|x|7mSds%e3>HAWs$oZ}3=I#~P#dBF{0T%gNXrDcM7Hd#?D18a>!W$fgql0w% zo0Z{yP|X1Rz+$4IESuzqD=R~}qE!34yK^YvABAv!g`I8fSOyLb7ob*hWOVfSw;jV0A8F!sw6iGWdiYC2vxd)JU`jRlUbP@o)wkr9 z*2(#QgheHb*-wX4SY(AP;ndXBuhMAV9)mOJ1)PEwg>t04( z@LbIy$j6gYRlNrin-@9&kl$mIF2i+*FyQTdKL6VJw2C7o`z4afHSG@g2uJ7tQv;QG z1qZRQvC(2&10_|mkE8Y|M0AY)t~c>*)}RE>KhfIm;DY|OwlbRA+uQ$|POB(q>+%!W z<#gz`$hEb#|keO z?O63LH+PM1qv|O#vpdsL`gCCn?V`q3F|!Yp2f;s!IDr8C?bb#kbqOggSlQSn#>YVg zH_A%X4=Eml;|C(8{h!|SBMQ{L)U0xR0}Pf(vvcXA^0`%`NX=|a_W!84CXbNv+izgz*#pbXaRa5rye|A6=cm6uKZQRE zJqZnq#1RN(GwQy;UBi*Hv)g-r4V@nz0s>RcE4j-T3Uz2gYN@Z~+E_4bmVSK(=Mxn; zfU1g8>(Y9Raq;ks{t0A(Cl@686#3u9u`IDfE+d}kX;#=iPnXXc;An~~cdo3kv*$WY zD#%!}U#PZOB&tzc?&)cm#*cT6XKS}+o;Y6VO2DAB%C}tV58Y%``8K^bq%CB(+z;;& znueB^R@a~rm(`>`0fLAK6v6|%HZ;y$Ifn`}6 z{yq!OFJ5UG?ZmLm-6x}`rw4saOICIh;wq#()@fi=^kuwAy-)}`R&a*@5P+Oe>6H6P zC)X4S_v>j-Y(bXo9-;v@4Go>+vxBJ+GJy)~c?n6$cJP59d&J4lk6PV(_wIp~hb#h1 z6hQy=Yu6h8`+%7_mWZG~kjer)f=!f!c}S}#At|A`Du9C0niuc7KQu0I;$G+C;sWHb zu(((X@1cw_4yYr@>sgY`iEb6dBYxv!HuAZa#Brbjf2aE+vkc{9m?JQMP%dO{KHmV88$fS{O$Ghcl(Xds0 zu*s#7;L^Zpp{Cfs+M2DH1Ja==k|@X!vUe+kxq98nOL6z6h;k|_oR7BWp>(c(C87vj z%E_i>?!>3YO<)m{@H@W#$6`X>0sUf9)E#>F z(vmUMWeP}Q1Obe^b&Dcpb=5pn{AZMPa|k*1jT;{&(n-8rasS#J52nm+cK6P=oLLTm79ySdqP9yWtTFzPal5VYZbw%`x))Q=va=v$J< zxf3|$&@(A1DE!2;6x!ykOWtWPDbqzF@BBwQ_s5{;UMr*rlXhpr-2A^2?|CQB)x683 zxb_=h#i|Hcd;>YkN0@r!0=d7E9O^y~BT2z4&s7*18=H|ePm$jtsi9ZN($T0mXhS?t#Srt>Z-X=>IA(ytI21@#bgK1jc=mdEl2ng>m!LR2a}eLjj&UCZNa z52AIOwxIjwsd@IC*&~<2eAO}u_x`G0`NpIRH*Ux^X zsX^0?HxMs`QZxBY_vyv?S?$I73H*6%P^kn2s_lu-(3JBuRA0Vq5S(X+QV%Iz{v7Gs zZ#KWUy?D_H^&c8gYLD^p{u-ZA7YXdMT%{AZgBQROFdD92y(*O?2q+}p;sQuA78(C= zUthQ%FgjdZTt6CC)&i@knoiQa=QoZ@rW(mT{-r`NqZkM`TD*WuRP{E;(cV^)tM1{6 z*nKaLq-50A-1Kc}M=1(ks9kx-o$FRDHqQ=K_=6Y{rmi+|sxU~z@N#W_ii`90Mm+>3 z1=-mZYFB|*LJ>C%xuLPOyQ=~4$HY#!yG8&^#CqT#rAFOk*?9r#dm*)ZoUiu@5y^XX zKd;r%LPQ2k_8S*g-0#|3TEw3}e~=R9y#8l);=9l}$$vB+uOLFisc^NmwQFAT>jCnX z8cy3h!u?+UBO0vMMTgDHlJ727y`9*Rp>J z@d3BbOy<)U2JsazsfN=ak9 z&b8K+$9b1Vy?J#q`mpz-v+t1kFEci3ODUDUpDdaAr~8L(Y_&;oMC>1Q3EyF-(Z5Dd zjXM8EAB%E{DLaIjWfFKB1sU$$!z;0!uY~YMM{~K+3%mc2e*|F++#%3>s9xC;L2O=j zy43o^w)MqgCz7JT;m`1QN)+7BlSvZvZoJmT6nqkVQTM-*Juo}bYgoAFW%>w_*Ps=F z;Ls+aS1NsFQ!=xUyMqcbr;)?u3bqR53U}#vf)o^eqt$VqH$ovgt5Fi*r zCg40gHl|(eya(v$muWEx6{H>CX1-?H+upq<2^L?Q!|h;p**2<2k3t9^i{vUn7pyEQ z>K`23huF4y@huN2c*2eT@q;K2$U%baxoal_6QE`r1J_R#qzJu4FF6a z|NY|`JG@2Xs^4Mq6u7I7^W7R(4%*T(Ga)pdy8j9A3osE*BdQtag9(QZA3i*LC;>v| zj#}ZLr*@H}6L|tt!pp_RJt@%q78J)vbn*%yD|WJ9l>5nQKWPG{?=YLLFWW)j7#^ zyEW~3c-hVCLB*Wz>do&cUESQ&yMtB`G8TXaH{5o+P8}AvNw3y@gB+G?(bk9eDGSx} z=@36)V(PNZXX*(Lq-V1QM)B0w`Zh}5Re>T2PUgVCfNFWU`jG1|N#$*SiU^PYGG;HX?PzQJP5-=)n&LGBxHn|Fr~?}Dm#nPM;~iL9)+mB{d_YcXYFF&5xeh!AQf-o{50qeb~ zHyE-scR=(^%~l&3o3g4)CVQ0@BZI+ZR23PW1Mcnnguu0vjoOf)pob|FC%E3KZ5p-K zHlr~tC>=fE!-rXj?u=HLoM2am`7d?EvRy&@YrFvs)F{xuiSw+<>t;!Wlb$Q`->Y(a zANP?_+fM4Ep@VF3WM9)Y#+Wmqa2=tc&lA2I9RyBxX6Lr=b;=^LY&8G82|8n=XJgxe z&2IbV&F722Rutt83=D*LDuo)nk(mZx&-d?N>FGr?syDH800aj5d(Y>&v~;3?i+$?; zHN++rT&AMILqkJ~2QuC_lIa*gtl^as+^Hoky@^N z*7!Hw2Jjw$?nAV5ZF>6kKU~N@G5Oc8U*JI{C*P-N>*~VyN3QONkPDIBzI{KkWYQzC z>C?{W&lyiNztN%`fh#l!!hSeS&^9&*uD}c=nBhtj}V*}+KKej*sKiHUB%sG3WMl+Z17kKsm9h#dRKu3~9;x6y zGGRZHk&yv;IK%wM&`>D^W_|!LHLR}+36R9>{-Mx3QRx6q%BRG{^EsU$&wzByOH zY#&4c-i-JjTlHq5u3A_3F{laX1WfG1+tAboFA^=hiD(SKdI*903>{)Xi$}lZqv#qX z%zeRaf1;f3|LiRvJ8p5iqqKK{D_)* zaHIeN01zcft!MW}Qaqr*2|afWWAU%z-6H*bDb}FEhj^>GV?5pu3>aQJTw@ttZtidB zOiUJDPVAFbJ4;^!fj{U}hMvv->=>6qy*183&eiwP(a|iGavqT9MTJ7dDR6Kgvah@U z83$4x7T{_iou`)*uAS0mC?E}fQdm1;4mcz zi%X;28kBSE@>3Y`a-H!e@I#da;K;B(R4JfpT}4A%9#d9SOb~SYB;fQE3GFIoFRKxB zWf%cd5mtHln#RwU7?S3H0C$xf<-d~8*9Y^A3ph?66yLa6mF=DRT ztcPhon76xp0{)Sy!7kSz!@>FPytll)ZSCQ40q~mQ)_=7X_Wy0%q&@my zfmfNGqbE9W6xf`$^(j7`9v{k}jNkt5@$u7kW}!ts@0-TS5h#w9rGV@Q8UzD0@SZ^X zoF6Z@37UAJqocF7!-UlTHz&d{`6I@E7(w}7382WhSpFrm$KF8RkX9TIB=KqrUw?*% z1o#nRsn!k-8<3}j@Rc@DJva!J6|bcApqsq=B;azME~$L5cEUkP>AAt60T-eQ_>4Zk z${PGI(853uvRxk^>FwQyc-}lU34&1Hz+ir9>5E3lynzcO(kwHH0eiiu+VXZWYgtrlhIA&x~;9Pjp)`~ zYw78cn|?ZXca9(`ILRkBU!4Hz>`=@B|%*OpMU2qWM)ha#B6tM|MDh^M@R_AO;?}&M8v1 zS?u}m-manN+8D2iW3sL}|NVg(t`oBKi1#IKC;Q{QE>UHymvw$a)rDI>31%nE2e6y= z(};;RZ_PH##IhQ|c7OGlsRMnq)a4+5Doh*+iX1A5q9HEsSC=37gx&!#Ttq})p`mx1 z{=Tab4m+Et8K2#95zH_^NRN$@ayB(Y5aI%mE20$O=LcTzvO4_OJ`AuA|m+tO@e7My&3^P4i>o+w? z5kD$GuB)qSf256zJ}wEFo9?$W@(a*Ch0b>SP|w<)dk!}Y!1DP{(uM1Mr1B;W9($+? zgT1XSL-aI0CwN<&uykP6ad2^w^H|TVPgFu>vM@L24n~2+&dkQZ5V5^TRuD2_$m%^z zYBig{_mllci{3bG-Y|NOdvB;hJTefnOk1 z6u|@5z~;^AJ5{|U*UVjt2PEUt66A;;QJFH}3N zeZi}n_G4={GegFsvrVE5FPM`HA}np&rHhQQ1Wenj=4NInKk9QFhZ#N}+y3j%U4fXJ zR8UuQzm6YC|9Awy91y8s`YvbEXq;zI?57!I~@}n`#il@E>-jl zCett)2u&a{K)|TBJL5}k9reN(RYwswdgj}sW#YMebP6GRS9UnO>7bocsAV~puKMaG zHY!g85fKOpO6H(D@2@@P)xY|e$b!S=v6|LH(5?M=vSWPQysPRSbOKcDHtXxxuK=oX zd*+6kQ-MRXh){(7q_&)fLhaZa`yJ&FQ;nC$?$3k`0OMWcyCL>k2`ESMGu7MWbIXk@ zV&_LE5GgwBsz=R}*|k=WLON6|77y6u0EBdO8+@{g=dprWL8_-N4s$L&z>Rwj5e$^F z6R$}!Vi_TEjrUj;K-Z%epA@oa*G8+^V2ogXLb}WN8Q2-HU8Qy1AE3e$HJ-1L`lmR| zjwGl-%#UVOZ~v7AfcT}8-7EwjyAlQXAh-Tc-}zf!^}IZGJPbz|LH~U+?FLP%1uHa~ zZuPJ!}R zxyR|D`}|t&fFHt$D=014Wc-_ZdqIJLb9_C0vqcf*9vA13ix@Tt5)F@u;YQ8lvl)T; zY06GSApz$MKyzSV6%4M8F>rA?z?iCr54%b0^^gwD0)AH3?Y2lXvdJrNcXxNq?s=Ri zI)B`_kKl*cLIQ^wi0p+$MXncT2cX#Wd#M!<|aUrL@;Cv@E@k#$3{mj$4YW}_Ukc&QN#yOe{;~u2KziJCyI$# z{5MO1g^3CCHZ+xje0+RdT+!8@i~ppS-&apz!q$leDHI%7r$2o3N*f3m3bf`X_q~)8p~gJuo`{pJvAm zcL1(fTYutl(d2xFjZ)O<>6i>rp%`YE(t>OWYFN;_w-?u2@D$5h-KV)Nj-%_ z^j6T7`d844W;b$YN5`^?3QhxbkP1+KUc}!0lY8FBzM6 zwu@CT>6^D7jc1vCf1>aCK!yf6_dlX+E#OYv;^>_)a+D1fn<(3U z$GDe^2gY2z6A~sM<_fX#rM0!{H?vJJxv`zF^am^=n7}`SSTn#T{aO+>!w$#tyUghK)GO)EDhuk)aqh@1U&@Cs`teb zb!V(8UdE@B{>4H1Zx?NzDZd z8yjfrNg*NKA0Ir00XCpZR6x0|L3pl>Ve7sVm zL+Kr;%FP74>|gpa^}p-OO2H@rBu4PMn5vR!aA6@Es^Rpw6YHLz9)$x_$3J622~W>D z9bHCazJ2_7y9NkqPs%fB>jG6;+zx8VY*Sjb)@JZSXxdhzMgB0{%Anh4UqWm(etXH4 zw)Xs(-i5|eg?8LyiK|Hr1M+L&2tWzz@;MC2^sOCqMvG~*4GVg`^y`7Q$OD`Y{)0P^ z8SP2(&}cz5xyuPzp?+|xVO-tsONM9zwBLXa0WzdQ|CZ4BaI?}z@`t_NmPeE7ZOHx; z?aO}6#$CsoHF6hHeyQ0YXz(gP{@l%El<I$zw;M%O$a`jhHg=mEn4C4xrM@t8zhBBle* zzTq%}nex-C8V7IR=c7>*+U;PJ0hMr%I2|LV==|)8tETh!?zSRnRIUYaH51UD3@cTI zIF%_tV6!~Ezp0nE2p~v()wRBQj_={_L&Or*u)w-I*<0Z<{q?h3sd)>=ei3SyHFPdZ z1BOP;cgYQ{C;Zi)7%z39I^e&5>Iy*&(F}a5#pXP#AvM5AciG(H=28_a*H%g z3xbNF?ep2D2G_N%P)2cY6OZwDj?$}2LAPTd;a+>oW7Sn($0f`k4Y%4>*soO>b`mKT z7nIhLLj&S4U8Tp@Ut6Fa-!L|&z-eG{HDY-z<@4mx(;mF-+fIPuNm+Cds5t8BBkixh z`GOzUlkf1M(#$wS_csM$C_>-2Me+q-qXWL)-&TWjhze@{lGp>x_9Wfbww{3;k%0*} zW83L>o>kaExc4sTzAk^#qanz2-x#c2g7ZID5yrPAVw-^E)D3By=M~CpY9>TQH8Dy4 zTzKGlzJEvzA%hXr5Ry~F;MyXyW^P~dmojcXzBtYO*Y+gC?R9^C!Eo@O=mr8eS$Q?3 z%pc^7FAKJ}{rwVh@SzYlqGrp1B@J!Qw=;vkmKHQDHJ6;j@=c4uvM&R(@^m0ipp<-$ zaHOTd*XdKrc=M2pqvKMv!^VVmR$iVJI$(It0ynrN_*Wpl3~jN`k@P8&h;*ltVqKygj97Lojh=v>L=Tom<8 zVFaM;Fq-5YzHGt7uKJ&>@C(eqD*x>%I-drW9-Qpuq5P>Y!g#gEuLw{8Yj*r474FgTF^JKq@kO{g7TvPCs}K-} z+C9t@Q*-7-47SYlA5`ca!We?Chq9d!sI+0?J4k?hXVd$eJiH1w-h8quR!W!G1vbK< zXR7=Hv?Pc*w03vHz;ZmB5q!pl+y8S`7%qpAWMaP(k~JW^uK^ziD;~|oa`u1cNFYiA zNe#%UP^W-wjq1iQoQ%qs{QNt81&9NtuSh^>2FjQHJ1ihT0yUEMM6#|&H5L>Xt!igb z(n7`c;d6(O0A7NEg8{oxr~GGa5u@RD4^Y!9moKOFI{S9gFfepVg;8ugz?S8D-+Z>z?L1D{ExyZ->^E`iXeE(#&- z*jU=1SLCx?cY{sLjKD*`k@b;mL1TE6(~4VRiWU_9&{5O52w)L=ffFNcHU@_8^d z1;}2_2IQk-V>Tts)4L^8X=!NyGGUIx0<3}6sizD+x<#-gFm4PMbAo2<$B&yAYZERS zclOSOHoGgvkvf-z@yoqF1Q2TJJZ|hwrH+byJ9_Ev)rXhviWeO_t^Ce9G|be_xMucI z_fsOqj*N4GPzue)9ljy3yKUh!M)s9QN2TJ10r+L`1^ znsD2R9f^gR?Q)Go;9GJE*4C_U`+*O@s=|*uISwn0LyL6^(OjIfy-0csZC)~6-rn=E z#0BZ<^nD_p-opuY)kj6&?t9(v7O`CTc$-zf<+k&W22cu26qE*g(P7vm{za-R4VBjo zMz8UX2M>P!5JoZ|9v!`53xbBW`#!u7&!~^)_Kh14z-EG9*p27uiZn4b1xq8Drfqc8 z892i()f^ncJGZV)B!fiL+1a^C3o~9Y2SyQ!`T&Rr4<0}aUeE>Q{M3EqF*HEKB%*>? zx%CkUG2krn!Z5r@%kG~(Y!dFxHv0VABGxuGMjbJqt@7owZlR-tNczY3)%TdZtj{mI zpLJ|+?b#RLqtuTz6-V>FvHYTv?D5rd7tbx2q1@bjZD7_Ivz0m$+*me4`A}W(*f+e` zao0Flv<01+0Sh~xWw2GPW8}j+h&S`~-srmmF~h-)X}kZcweJqcy8qw4lrj?TlA;j0 zBe}D(XP4D5LK$U6ld3e_rE!o#**};(S9msPBd@kJl<~S1;VI3Urm`)iRGQ%*_E7xLIWd zCmet@sQUESwt#a0@qzBlCNfG}X~$3dF>NQ`Sozk8I7wxY&i=CEX`?Wqk;irQ5cWT6 zwcP<~Z|hbqHRZbcMf=@2?Y7-igeXAGf-iS)$ga@(ROQe8o0!xsW1Iw*|LGIkVL56bw3_j_ z?4)~j;YDatV7)QnGB-M!+ukKP(KhoKaVVebmMa1pD&(FZ4#^WhN@Ff{v+nYFZb>FVy=*77^P z_!J$xbjC8jpukf_h18X&l8f}2J~-a7_ko1&I)l543W>ornIu0K7QTFIlkAx{qVu z>b8=yoTR)YJ%_Qq?6+Wl)5%q}%9wX>*kt?-Kn_ck3U}jn{-#-w zxFuR?(rP0_esmY*r=`8^>XQHS&#Kne{L)fy&=^o`@C9ha$w^8{eXOh`?~4G5Y%>|p zIL2-ayx>U*=)@XB_ zcIt+PSB)MeMQ%pM{r6z=X9M#~O!Q-Y5E7CHj0s|)+SB4>dUZWI7VcPO-!hJ?v{P^p z3^}-~SIPXES!^c(kS?roud5LZuYvs*#w)R`zaZ&uIbI9s_5OngWQ(_d0Z+i76QmCT zLW$?!w{m?^CtiVL)22$7QyHkWK7BeN@rpJYo-qNeH;)+_MmwgnBx#?m@}iH+Xm*qH z-~TA@+kJ}W8oP1Xsc%g%8NkG_PJZG=on8&%PWH(ccUhBLM-Yt@E{*OX-_Xwl)bnUN zv@uB0NoKdPvhv(`E`}g?H zmjZ(xYwQkMH}VGEqiyMMA8Jer4~M8OU+nX}JkT%Ufg%f&qL(ja$Tu+cb50h#nFGGv z2)4v)&EYD#7HjyccZwdh@((s&z_&t z)2NtH9D)rPz#66XFf`OU{_OnNU|ws2!|H8Tad^S(ixA&2+q{_2{Y3w!8ehXhaRgN= z!!P$C#acu&-_?^V-?#Iyk`14nsQRiO_@zww%6OIt^CmK!c`EA(s0X}fKh}YM#jpuu ztxG?iI7Um|QR9OE#whB`bBpU_AXpLc@vwDEYCAW=5DDOe2XF8JFd+~BFz?IZhmRW@ zXISvF-|Fe`+QTGyRtC7&EZ#Vb-4th6`*mF#a^bHI)Z`q=*yhGHo0_6xn50_LJ?$D|57mI>IJ{0GfRVIZjaER$=Zphsn9)5<9JFQp z;WA|WcOLBeZ+Y;?+jbii(`i3mzxgM=et-R8Bdjh1?ssXwEZmNV->8pJW0ESYBg1L( zg+xRm-k+ZRbnfl?b#=iP0w*vj@tZwb<7cuA>g>P8Yq3Lv!-;LfYJ7LgOcK9+|9p+J`0f{JN8W%7 zpYB-6(}se30CY!-KKORj>g&56g_Kj3U-!3&vR!_MN_uO=yDt|w83Os9ZlsIE)%jJ+ z$k{QFn!5IxzsfjUEN1C~&ZckY2%m^op~6dTaCFfewo6Iw4Wfr`g%J7nOV9 zS5sC&vm0;gBPfK#I{(H}{Hl-EQ1`6%CcF^$(ms9qk?FoO^6cCvS6gECTDJ?E6^Biz zXnlHhF+Vr=N2s-Jobt&^q!u%g(gQ42plChg+HlW1Z|aEL9T1N3#xKwT;9qXDJVO$H z6gFqX$Ip*?u#=hg(gvNy34@%Kg|72KjP$&44GB4%>JUURs-DvAeWLF+Kje-g1F9>& zfQ%Duc;HP7o&|E>M8WG&U1=S0B&W$v>&Ovnd<86{hLemf+AF+-cXQ1TMW$)vdQztz~Y zw!$7c$zO?PUAr1mP#?3FC>Dow@1IPBJ!N|w1PM;gVi{p2`^(J#tgSn8J^qrIq_L8_ z6}$gQ08{lfplt&WU#85=%*4jVrlOez`3%5mX=xlQUqmfj-|z=?V-;!G%r3N-uh5Ykx_%o;|ha zQP2SBH8L?8aXOmxNgi@UFEcRqO*I|7F*k`j7$OmKkNm=Ymaml0w8~6%mNR%t;a(5b zC1K)7D2cq<8+$}J>%iO}0EK|+21xcyg11J*9-;7az!Op1hu3~Z5DvJH*iJ;Qp&{6r zih3BEo9kFebj3ysKdyUK{r#E!)_j!pC}>gZ^9Iyiar!j6@euZ1K&{=QQ-U*1pasN4 zM+2gny^?=z!Z^}J;SQ~8^R{5Mfr$ynp}3io*>N*RR+ZIK1P{YMg#16Hw?UL)%yAIu z#`tEttZup(@0HTQ{CXFZ6_;Ljb`o=u@%5D3|9mHYko}lF>M2|RD?-Dq0)5+m=vg7G zWFWK{!Z5vf7#23SumA&A3|t`dA>Yv2UHkrZ<9V9CkfIAe`DV+n(IgsVn;F?6VbL+~ z00|VH!?I}c13@LYzhI5MuQj**yT7{g+*|rld>O8-MsdnMJo52F#>;e<1T;+2pLSugdGxl-N(}L7y5}m4DensBOU10l&)KCoZj=; z&{Nf$pI0rV871pINvU4@4Ch^8eiJGev{IUzRP$0(ucN=sE>Krb&%>im{C`rJUTd1G zn;TlX;lB`U6BD8#;nb#ZX$oj|et$w##w;wUTG9&hgQ37K?6+nhPLjC&d3=}h%F24% z>aYJRHBf-+GVpw-At?X8ea|h3_5Dv2ugFFU!Yzv^U9H_KokvvE)OG(3?s)Bg7WZD> zV%SK2n#@KoHj^SqKlAZhN~xna|E{zg=&bZnC1O7HtibAb?QYd=O?f5#YWmsl8tXpM z!Rx#ceoxO65 z`PZhjo*)@qzPt#&A)MpX>7(R4&p9|`gF9=wud$(FcK~RYv~+Zv$=ISufO!{wS``iq zM${-je*EKOcb+4+(v_D7cUhs$EnXO#_R_vwPc+z~6f9-2D|8h=xYaZ8P`j8fW6_ zZRSO&N3Wn7LsME^=or#$M~K9c`elktby%vdElv?&&1Cx4^)PJ@3d-lAr?P*vwSlZM zC@hQ(l_vQhMj5uYL!grB((4Jbt$DpHuNtRtQGC~~H}Ho)CV)6rP|)TeHs&EmK3J00 zQ`)2f$+4oJBCx#84^_+~7zj&@rqCnC!tx!r*vaKzuyQcU| zdVR?+iPos{TM^641ymyr&Wsbs50n{1&Hh?F|7yx~PB?J=b>(<%)1?QQPuSF5rGh}W zG&kPC-q_?|(c4hbm&bJF^Vy5&QOAfg0yZ*_%P$ROtx}p)1b0jxsWKU|l*;a1s`uwl zD}3B`t|2Xi^}))=#RP}iQ)m08BdePSRO{m2{AKJ~_A(&pfZAZ}YUj*ucLAFC&|%$e zDR``_>-XbYn>Uzrxj!q6sT+J;P-|d*==5;uzJ7WU%P?(uaAd0;7UJoakYVh{tD&~MC3-}dO!q^Kv;PApF~=80~-KC z;3(b`Cybm*Gh6k~=SWMu(Ce{3`Y@ zkh7k%w~y+2{$fO~UghMiheZeMRWGN6AfTY;(SYQuhZjD z|Fv{!si~d|MwYkmW#lAFZgryk**Vne4S{H6>p>QQq0+g<#m_HYDZ{%(L~^BjFHqXs zBZ}w>(SUxXuqYqPj1)Qnwz`glsN3Mdp@EjqpUe0DI17sfFk(U0hG*ALKN{1ea1D^| z4;^|BD-w>hFnV6}N_8C29gI@BxVCM3*L}#-vmjFku|UeH`)tGc=fHD1XVzWKsoPHt z#LN>%PMqLFH37cabh9Q8NL||H1;EO4a=t^kY+mSKVr9k0I|yI?`uC@z=>Ycn`P?WF z_x(Q=6D9do@J_-wEnpE!=O5oZn#Ge*-Z8*R}=k|NrsERz;w0D2|-V=7;!y$O;Q* zw`wzOFhw_3h}j3KX%z5O1Ss&ZA619^_+0Lb`cv^oHQPP`DV#C!+QM_WXyMhgxkG9D zMcshw*SVB^Ojkwu_{imDC1%rJ%sg*GvYjx^=XPHB<0S@8%#PfLGVV=IyY2F9>Jsi? z_B(@|`>M1QckB`z0gz`jJ0vJuTPThLHvmtS!KoB{S|&zDeW7qX!pjR|xiDqFv~3=| zbFc5+^BGsKuvTxrj4nOsvXyT`7r2GfFcln z1Pre71O51+471hE9$cFGbfp^sI2#;0Mg?XCZQl&a;(LYPK!evT3Fe1g3=ao~tX&JL zw!JJY_b~MBf$bhu<`?Qm&69_{Dwf|U#rnj&0K*k*TW(0YDVMw}%zQOxHJGDj8#=R< zG6a&8ez6>{%=&OZ7y6t)bS3DFwBr>n)`acBn7KKZWy6L=uz-km3FB{Yk>O|$7uXvs zxnJR%Ob8@RP2ss)3$Pu>HYk$cVGahlrRU9Lgc?YQQEIJFFn_ebZ-S`xUCQM+a0C9o3 zo*7GSTAD4i>1Z)Zye2Mrh!m%X9Zn4m-R!*;m24uTR)P|Td&iEtl2;qK6)u3iOEt2l;q>iX4$qmR zMruA+eQ=k(>hqq;kBSbwt~Z@WD!^UGo|Tr(j+t3IkDC9<{h^#l)?@zkiMYPEpbO^Iv`)XjGVD;yn$< zGc`xHvZ^XICr4-XXnN}wHnxnma}+7KEbxe0s=#2%&Mwmj4xx{Xg{7h^=sd+55fiuo zVFLq%$5nEpe!A>8ORFiSx@gJTV-I(0MLxwG6uhbPGJ0{mS!o)-FvWw5QFBX+8!jAY z!5EvE{1kKEz%DEU6LwYAweI;&cN7hDrR6%#rir(PE4qnh4K_w}pGwWl^FZXoC|m@F z3p}fH)zEO=_L}Qz?AHpc4#to|yKmMm-hRnl9VYmsdOSRsSa3p-`~#1K5o<%MT(IRF!KAzoe* z6qTS0W~KE=-Y;KXfB=9>fg^#>&#JA|YF9dP($NGSGJV_`)j)>R75Bg0Q(8Fq#84NW z8Q@o8`kvb55$*1@`y(4Aq8vd0dy)$bLRdHEmd>0=p9mfaaj>(K#m_G?H8(assQYP3 z%o+F%c34Awy^Yhyo;*#KeCFRvV)p)aCb1-MjNjfE$$Qjx&fU!ogj2zrk25pHJ|&_4 z$@J!^*Gf;|X8NhZ<7X0;Q|vMF0C4RJ7s?kA^H&}HFBh)?Mu1HShS-vv^@wi3JQ#S{ z)Ez&UDay(M)&GfzBjKP7)g`1nHXs%pBrs!t4pkzVY)W3=9lH z;iF(x!Lk6{3F=otW*((+KsVusjk1kh=O#~GCnq_VZ8wBrs@&hd#_AsXCC9+vZXCa8wDlEs03jwGP2`TXfv%+#;uFyV1R=vVsU9C z6$dlnhrx&B8Z|gJrltkS4Z)vCq#`E^v-eIAylA9YC}x^gKm6M7489*!|GqBXM~^l^ zZpPH^5e;wumw*h@Q&SQ7l{%7|U)wU4&IT=(OzK!!Spl!m(yBv38V+^0V_9LKZWE_W zj?gRzC7u*`xJJPZw0w*@9W-go9sm=Jj+TQa0i)oZvgdM>aPH^S|G$ljnmSUcH{wbY#-nfyBLmiHYEf68Q+?QeT)r#T9O) zr^OmezB2uRuYf?D=ev8~>s}J64wG%t70=~`Y2<%(4UNE{AV>`!<>l#>AKJ-^0}je3 zD>tB-hvx-MP569!89QK~WGAJ)YO2~qUL++Vh=p2k(i3_PaY|2@3;I(|z#R zIKTS2p7+f$f`o!T8^LxJduwcTlwH_(@|}eYslwtYsX|pQuA#9}1pcGusE`K1@}{0- z;3duU_}HNqmaY zNq2X5hr3jY(F(o|XV^fLHr``OQdtcI*kN7_#R}$@2^R)}5h)*rhojhsyrA!u6RMuN2*M--O!05^XPHj*(H|H}jV+ur50VihJN*Ofj5oY+!;4^FhNL zQ@abz3jQij5ssiOM)h(t8S}D@+dYQ0ce3KNHQTQ>@WYM5{sVUzRu5SilB8VfCy_Ls zdOc(&DP&{piB1ncmJ&`(HhkkJjxg!Glf3fMs)`X)YdSi*(cJW9IERm8sCC}e6%rqu z9>En4zb5E?C-A}FzsEm(nC3ib>CC2H@ZtrqqKh3*PyL;n%3Qw$a%@^dTISdnLWk#H jA<+GAipc+KPqoa`J}wz#Hu&Wv(PAA^*HOzMTVDMy+j{a{ literal 29836 zcmc$`cRbdA|2KRzRknl(IWjUrX4&eHP4*_)JA02pNJv(;h)BrZJ7kl+$=-Xf>veQ~ z&)@mG?(28mkH`JjeLOn9I>T{%#{2zxJ=g0K@LWa|`v&O^1OkCAE{2jvATF*U5EtsM zU4(xTJRFgRFV|m*so5eBIQ8iNU1+jO*GC}kBE(U`icWDWW6qk2vu79^>saip-|MS> zdEJ-`&QJ}A!88qg6XPn+K=RyQ*VL5TN_8#TAkR#9Q$;NAy>(xu^7( z;OkYaR4n*H!Wzy7UtZKaZ$W?a!v7!NGz*hYD=XuQ}6f3HZx++ zo;{P2!os&0E!kY?PVw;YP*-^-A|mqa85>rDqo|WMrO_mEQZHp!W85d#f+$>0*wT*xA`{-n=M=JG>N#&+N7(fsF1bDiW$G{XE7+VTV%7H zYvVNQH}1c~>%hdv7ss!C>EgxYl$6txlY(sOvaV}t5~U5}EXsNJ z?%mebmh$-4`j8+=n@nCbB-Ke9tG9^}vMhn<6is(WACr}f#?TwKc59#kC8#R{Gsqy%5R zCmK9jY?Zhcw6i`T$jB%u>Rsi2Od;T=+9dm=mXy=9H;9bej^o<(>uQxQg~3--Q&STX z63X_s`c!ldkB^s)KYaRhaI~BQOYUIIaiXs>Ls{R_GP_*DTeuP_PBOJcEFRhMt;}5g$I8y&nqIGwFj<$JJC?tS-a1Bs1lJC6nvEi z_qSbzx}03DQ71*^JlDY%oCl|J6CS>T%GZ6>Z@)Ub$CA|5k{s_X#XOTW%SGR}b=V{pHBEVByX z%uCA4ZHvlrvUeq;oBGaoJ6W+@tK^m?tgP1Kc^&f@_4M?N+CGJbhZB;Mx3jjL9ByM^ zllH!7z2TdzK)2>G@nfD<1ljFXb$%TEyE8M#$VjVcxyO^PFcg^q7(biVU{p{oY zRRztoWfhh4s><_XeBW1|Gvd@CIFEVBmOI{6pN^D1dc-F#n7%}MI`$O%=rjJMN|%A9 z3W?nU6&)597AnV-l$7Z&;$d8#6*8i+UypbD#%|3P+Lwh$Az|^`bg8xMtRFYk#HzpB z{hhZZ*t3=|=Z8&}=E~xxn-eciLy)6AM(Nr2b5QmC!eSq9vDm<;NZ2QV5;O$*pIj8?rrcqo6O74pN1Fi>HN2%Fk8gv~ve@C(Km-{e^^ zJwFK>Ux#nKoo|a~=e8Vu@h-3F7{}4x;SVoPLB!Z~j1KJ*6cLwX6muVMCQ``HSN>|v zhTHk+{>snH^Re=$pHiikPT!NePB*uBY)sac(Jjn%pPe3?+5Fb0r9IPowiPc@uG6XW z{&-3h8N+UbBXQfSF)93lSHI)AaQ|DDDrEAHAFQ>JY*61D8X7uq_RhqsH{!1#VsKNj zUNP|V^V8D4mDs9GT;sJL#dK@B;6>!T*+4v$A*N5;2rDEQ6Mk%|)*FM2%lvL~&0-F` zH>;g|2BAVIV*PmwNA2F~NMK-~2#xc4RffUReYnVz6cW+2gC*8_rl#K%k-}(jau*M- z@-2nvfS}QLKcC5Ggs(Hf4{G9VlOxo7T12L<40PNgBC6W?E$Ll$Vzu%n<9fx4&=T#q!VE(U6W<$f$Eg$6-{A4tW%;6d%3c}aB z<`oH|0|PN9gp;yf$+e(FL`uucn|}W6?dzkVrasx}k?r{^EBHU*G&woB(9lq<`tRz6 z49v{Ix}SV}e4MxEtnmnhrei5RJ389KT4(PYAckMpmltEY6+APhVwQ+D8_0g3S<={UH=LfR*D6=-?nYMMO>QcKLIF0t}NKGiT2^I63<^ zTQSv%iBqMZq*ooU@d^r74-XG}o*z#*J3FJoqoTe(zdv~OhVL7#+fZ|F-D+UIAJNj= z+dDb=f?T7cy}iA>y5XuW8|n z;|+ksf~Pw-@%aaGqI~4G$wdRnJjb<;MdH+%$RED+dBK7wDk?e%NqG zM@I)27Z>`n|5U4sPgd?BgEG3kw>QWA9_Pv0Q{+c6YIO0Y9u%;9_38yNVfH)dgxh4# zGFP6=wuf^dNzvy}{_x>LxeP^~p^=8~8qJPGt1~u_%ezuUadjQ^0H2(nor)Cpxx4J) z&3*p$ZMoNbnm^{#r&kqC!S4g*8wUrS4!34ka{OTVK<9ahXAo?z@SXi}8mSn1YtwYKj zrTQm#F;AsFl)j-MZJVVVR8t+dO_3?wI}8N+>%wMJe{@&I${npnin4&0q^B<|=TuV& zdhp=~k#aH!2xvna?pty{-a9-xG96Y?Qi>OFSI=)88oKS6P)r7FLmXZMmR|(%b~tIF zMiOeqMMML_fx^PX)FWwZYVymnQoVltx?epyx zf2T@D-Eh`qQ=x16pw{!N&TygYvzw8LBCH@u%&isk8E6B&EA%&wWTX9W`XI_aqZ{Tx zeg1OMF5{Im-h-b3H=i(LT$sEL-;jCy__42#&vUiV&ZG;_p1dM??3a3Z*DIcKDqRRW zCF+Q6cf7NZ1gG&85MGhhM6jUmg<*_T`RMR)6e{H{U#lb0LJ7K6wz5>8Y)m~(S+e;L z7@6Ge6r}ri`DZq4ybAT-7*NV^L`34VA?L%v;b97Xmw) zX|EDkU7Vgjf3Ao9&CJwLlu1@xJR>{9gijoDP9~eA-F*TB$D>k z38~*J;&hm8mU~q%$@!k~OwZMSEKm>44tlh}Gi9!?|HYBmjsE`q64!lZd?jV2O*Crq ztbSx@h==d%>nkEE3Kg~d!lkR>gmY%@;#w*y9};CzhO~`U+6n3-73XKi?ngUR$!b&U zXC8-3)7Y?cB_+a9Uw(w`uYWszG+OD(?OK+4yb-m$v_x7FqjIp&J2}mA!RxBT?aA8L zmt6DnZChH&$j!R|MKm<1H4#Zk8)Rfe<>ga;Qw$oPG&eFD$p{M!4#J`o*y)J>0t&{} zWnkJ0&!79-USA#e#=r$sVOK1d(Kj?Sq^|QVJKK;r&vtt)&1h**OitWHk4%^3tyW2F zLPmLnY2uBD_=v@Z{z@;uBA7t$|r%{tGc8 zI5<2#UYVFgOVQ55+RU15jbhO`Gi)v1-tL?zcDr|Ym=Tf_$89C7Im(UlarL-hS5qu{ z({8!{0Vk&tL#X0JWt}6D@zeF{>QDau1t;;?tId%QG`?j9f?!i$?~Nu9?SArC5j^R* zf+s&pN(P69@Kdq8gwa^Of@8~BgUl>+G*=}@``<`2+QFdrgOMnZM z_Vj2M_W2gTE$E3qRqjXER6sG*F5LV_Z^bBE8k>n^gT zx%sij$-#HE{F3JD7OQo>m@5a%uU}uVww6P$eZ9u_54pL&emr5mp;DEPKy18Ek)P|4 z6~w-N-Fa`w$n$u$7!(yx5O_p`?==7VclE3nSI3PZPr=E>lya96kyQ9fvE@@tOk`A) zilSn8csTr>pgUKusjj|$D0k|=WGMgpAjnV?)jIa7k#A zD=PSWpVVf{ftDk6AGjvK(3Lmx8B)^H*f{;1<4={9iFh+8xM36f`|Ey+<+idZ>M?w7 z$Z#0kl@6Co+CNK?;mUYWLxUS#m#FsetG)Z5@wYyUp-c;7{1q7@Uf?!pSMs^;ZZR>Z zt*opx8e0DuD7BqG+YIr<>t0c5WWgd_h)0;Wt1Bt(j#yP&7byT2addR-a2TkyR%}@r zE;L)}%>ayrflC3EV_%fgUD2}$|E=y|B0aP@&`R}H0FrckdU%hXo}Py%M)%X<_I$o$ zXYc&Nf-%67cG0^?P$ZEA0jP_DM%fOF9gaTF`g-|d0vdn+mj5yKDRfgPOL=5a_1Xzt zs9X{K1pW>l9KWZu2XiRN^}Xl%8Hz-1qQ;6cGC1WgEG!-jS`r4JQ2H-lZUL6JEmGJ! zy7bCBMV^+1#$YJVz^2sg&(8p0^Qf7Hg-;O?vr|*TC@4cRGBUd(pkVwDn9A&jTC`N! z^p-*%U|R(UX(+Z5g!`Dowae!{n6RRYH)E?2%C!X z9jdp`Y~bU^mlznXwG{6>@z?H<5)p;8Fu}fi?UQ`_L9i$MCb zny7+*uQ=TsLCvhM>wqjmMAXRoJ|v_Qm=|ZzO#*^6spz^$mVfIaB>|>gHv%IXXi}5a zqoH@4wg^4?{rmTzZy8Towv5twDs-848*Oo6Lp2%ieTwthy2947rC-D9N+J#Cmdma5 z&1OGBTi$(3^b|GGJ$RfplB%n#$M;6{I-BuB#i+k|=1H3}+1ohux|!%@&b}`z z^(`G8ey3$f!oc{ztgEK(_vrAPrxi!Ov1(fY>dVkY{0zmVmUnMuIR=MDVq&7-H6%Bz zR~-9L0(x=s5pD2Nc$xc2>l4vNOBzc*$71ECs6+9qbvA{e-S>3vKEk@)`M%|#Am9KF zM0oA3Y$U9{k0+y`H*EsIMUnudZfVK%nc7QTOWFojO$5&&j%8qE{$Y0zg_a;@{zy# zh$gDF>HY06HHX0UyIn=h=hn-qxSX^cE8%{ zD)DitdUb(XC>6_veaY`)H5y~?E)Qg8X3}$8ywDjH?oXhhcr2%-v}*2b23jP@IYki~ z^3N5&nAPZ{=6%oAy;bg1lCQ@)M@+ml{;Se;Xn)Nl5$m_&8fz+(pFdn%N)`hSpT`fl zyo8d%P2Pxy(Wa)QNzi;;DpvtP!ov7)B((Igb6ukMb#)n9_H04Zm+pN^eSLkLFLMX$ zeruXtlFStC!By)etH^!5wRNLV;sGZ}nx@q~4ZSPfE~SNi)2UJhBDZ)inVsH#j7Yiw zShh&*3I2M3<|$ z#?EO%!$gZMhgsS#c{O@nxCD+4dE82v!cJS;6~vRb@@ZOfC6DMe<5)=u5eU0Ga0d`c z{F0C2ehrSZa&uF1Ti*GHXutwvdQn^cFNG8^I3pmY3_n~-ibt=K(s`P;GqSz?`0E|- zJiSFhAz=LnMY}H02<%4)z(E->d1K@I_|l#hY!cCi%iSrWAr$;Re9Y0EHD48E&P8W_ zx3@?fD}X7Nbp@?62`EIj)oW4NY)_(5(8G-m=$&VLO4HEBf$LCvYqQ&*n_jv)Ag)UhC>gkyh(~+ou{YYM;^h>m8o|_ zt1nV|@3&{YhK<-r$*hI6n% z!92Vtcz$B5rWS1?y%^W*5w}_(zO}tQVtBCH&28x5um=L)A&7G|xDD)do|2{ZD(Xh)4F>3sYZgI$T{{*GEgk zv~H7;@dAqc^5qMFrnkCtor#^}{0fO#Sy`yMF;Ouwu@cYoDn+Ck{w9$TuLVIn>OppP z_EcSy8E;BW`C!-f7C0hYzfXdD*9lta=IXO4i2&&MU!F(=ee}DfY!r0aR zLaV)XUKDC+jC1$jSpa|;gf`ry^Q4>P!nkyzvcdbt1_lkA6ufL}OJ3+})YqqETllNH z`ynG^E6^5yxGrQTwV`owD~pTtQLQP-$xog<@xKq`mzg=cmg@m%+e{_pLYefjD=U|e z4l*+qQw~3yTUhYgFa5M4Azx~dfUAw^s;1xx0}q3f{KRT1F&;FHMO19hcfyr4 ztGdH!s_5ocfp&-b{=rohib_iMM>{6%q((+Y#KgoMHlzjE=c<}f9^Seno}QlQYBL4` zN&d;|uRcbuEwE$MeNyt-uA{U83&Kt(uk5`z}PP%#whKR5_VAmXY| ziu^Nbg4My?lrz$M_fnGnzM9A|E?+i|tgNgowwf59JA_&pe?uo%ohHAaxL7CO5F1_8 zUlc$MGVc6;S^|^3u!ybTolb^KDf~>O8F4iQsYxB2n4(eH*exP zUJ-vkR7(tu5S*3C-g-aWp;CHNGbPaS+rhI3jhg=ET2F$&`03vw56I&#qU#J)351s+ zIC%XaAEr~EAI@J5+9vP#M<+rEu|wfAAN=v!|3A)v5OdVX;GkFovdUX%WT~&%FDx)6 z>z3sfB7uIC*BN_3k15jnG0}amTC`^X+!6It|D@It&sbyPWQPWyp2-C+Gf$asYdsM& zZvE$LNn~@Y;DRA8z0C&^u5Rk*Po2&WzU^Ss9`7#yEwzjc3@uFM4URVu#`I`kVLd9R zaV>}rDJUq2wpF_D|An~BlT_B#Lx1-5MF0>|hQf^ya&>Sx*M8qWScO){)KpcSTwMox zmEbTp;~TulAHAA{sE6W5!S%k3v9gkFatwr*EZ83k+S=O0EZRRSBOmN|p6`1CDMN7_ zIaBIJvPD^qs+Y~({1|{-B;tK ziy>k&BfaW<(TMUwYB?YJ>$2nS?bi0*!FZe|=F~xg&*vb7%4&hwE(< zNE?5xr|)Qk>!J|YVDq;K1*)nllK+fXx}ti^Gm~WjAg*iuc=0+b%R*SrdQec{_wZd7 zK|yZrDF3(n>$Cc1r%snJF#{U{iEnlxo-J7AHWM4QCMM>%9$#%~Z_moY^fg?`^@ufSjT{;tE;6A; z!!jW6fb9w7ggx+Kqhs%Gtdv=tN{qf9$Df&>SLy9tu(YjCKk<+&?T`Alvf5(t{j9=P zV?8+A@Rpg@x;zy@seKDX5EPbP+Ij5_LHt`0wo1dSp=D*f`U6xtUz+0u)0SO0Q^z}1tB9$ zVrDyQYioOZ_xX57)3a}0g&qa8Q_11FBy+z)??F9Jgb>lu?lNqAe+WQ<4%7|@3b`!! zCA7~3md^i~%DUro8R3;y=609|>80%KzOlCMvF;4N{QmPT(?Cn3ab8dD^FH|~OJ?=r z7t6X)YLT{w{fQu8EI7FaRVj$p6~CIQ8_;%Lg~bBr7{~AG;OzWZBXO+4IZW#j=v`nX zL8FsN6j)tehF;bS7;CQ*%0Elh!5=7ALoAS;5I8%S)+%=(7jP@_AXlr7?$7F*&@(WY z9n96kym143w{oC(3H+`dF`R*C-$*$#IF!GuT7%GL1;r%Rs_L=bLKg<5Theq2XNFNp zNzD!j@erjl-(Bj1{t9(y!sFNi+)#)#u(7eha_~2vZVUqazPr602rTIRdwmkazHdr! zov`Yusj1syxkJ1^$o`p)(lMlC{)^w6*=fTg!-q9WH_%nMwmuwloLV zZDkNtMLfJ8=0j}Am$Dx~Q8WZO9|e*NV6fxOCdz!H=N#>JRzXS%3i&p(5;{6M4$9b} zVmpwO;v`DY{bVsx)X>y)d~`(64IZ~qM_j4p7>`4>i(rhUW;h%0Asj5Mg4|pxbh2QN zYwQ07y%vS@{@a?JzB?0kaI)PQAogot{Yj>i=Pm(KUiFnD8M&9Tf{}C_k6H2uToFgd z{SO~LSm(bj*1uO->Ecmlp@kXtK5^&IfjA4--nS3O8_oRtqqZw=pzZfx1r=8--!N#d zHA=_hG5E_`9$@k>7xxl6K%Z7&hyXkr92|@tvp7g9$s8q$LdC(}%I_4Al#uuxcj5OE zXtbc{g1By2eTUEKhkQm`XQxq9+Q4zQU5`!+H7zY{EzSoI9`N&@g5|Kexd~=AWD#Yn zLO}L|t>XsDD-8_|D8882uT%XaJ90h0Pl$GZ3IDs}t5`%~E(Lzz@fXUd?-F)n=`5FN z_6zxL(c=x|=ok^hA_JfRz;bLY!}qM>5>5lr5~zeGslQuV2>f1RMvxk81CU%h{sE*Z zX2LqFp|@Aj@lu3D-{cIqcel#B2H8=dqqt8`x7(RZ>%pcr>P(1#Y&#eC*cL1YH#axZ z*2aX-U86nq%*K0}`zecQU&F=4#6EFZ41ap42g%7|<8CDM2N01ZsXrb?mF$4W01ox( zyx=)~gaj@*&(4rhVwQR#{Ig7tmo7=6x-{zlE>;4!O0SKCBI4b50dJCRzB?9hJ1G{xINDi+v_cGQ*F2rH)KpF`{6%O?Iv$4xNVvb@;OBs3#$KfS z{P_>p{k6EbJ9~bQT|2Gx;^N~0M+2Weuft@)>jq5~?rq^(@$H>(Hn_83eS;KCn=BGY zWWPEL*exqlIm=X@UeC(veAp}}IyUxZcVXqdGtfIReND13zm2)xzvWU~pjIV@uJA1`X5D^ylgP0xV=yZKmCQZi zW?TE_3dE?4NDSdGR+YPvbJWt9i}VH{I)Xv0;MopIkr*DsKmPdlJPxM(RJ5H%n20DJ zz4BW1mrHpD)q+JW&&MC$y=ffdC$#4OF1u{|I}W|6VHYHh%@h96IBQf(*N1n`)t{l9~M*vHg@i@2l81u(1uSRCU)IrNzWl z^9`kKY_`JIQ;Lcl2C}uFxIy6H5(bXjbPzYVZa^p@EOQE~{X;B>w6VMHnYW*ELw{I> z77FR#fcv1xb8$ubL#G6YHh6+N?Be4#vYuBM%VimOFBxjd(eW`lonbrQk*iXbR?X$y zLp)sVdHKn~{`DJ&&-Jf+`d75&X}F1Y$sYJ6ZsBG=+wTjHu zOr(XYU%MYd5(?coAxR)7t+W&4DKMhbI;4m23Vzy&=ZrQVaPB;ESos9vt|l|2-}bpJ zhB@GmWu5Tx^x9e#z>|Fe_3zWU;$7$zHJtY1aL~tRYm3ukoB7oNW5@m|WcvqA#NEsC z8NEF{Ve5ohQs?!9e`PNh4h%U&QbyVpmJbpIA@3nF)6>+@FTYnjWHz+fFf@z4#Jvrz zvDL#pgN@NV&r-j+XPebyv}{Av zqNSIgeud1iyu1zL+7Rz>X-QEB2^B&*^=o)3;AW8g>+9;C1>d133Pc-rpFW{GE`3DH zuV23)3|;=TeRpAXH9j(u_Ew+`bNnBm0aWW>-_Fm?G|z7RdC9+hx`l>5=H&VNFGjah zNXfMoa#ZG}#t6!*e061XPS>XyJ5Ovp(sb_DvtFbWQ<;qP$vV)Ly@(I};Mpf{?F1hC zckZfe97yAaCC9_ylz2a_>fsp3%Y{Hw0evyHOQFTb&o4)_RDRnr0&-PZS*z#>3nUfF z%gaI41TBEugy52Qnj!sZgY`h3feYHEX)= zEYyO?=;rPYDLq>T`3G4(yxHQ4qjX%2%urO_Fz|^$Qw!p~X_dqUXmHuvTgs(q>uXpn>FApRb= zb5C%LI#o-NJ|HaQG+X)1B(n!K>ANVT2f>?Yw97?^2$GPJ;&a`ZJb9cmJfvDYrVXJ<$oOIJFA;DmxAgY+ zo6 zkV9{OK@=P4(WgEuS7_n!4B8Smsxy*rcVUVVtMMktld&Jnt-) z5?2O$>3#^=GQB}0lUg2-a$qnJ8B}I}PQiIvGyzK=w18kO2qL-}8>dU84#VEesXmiH z0h3CE(t$#XOGvy63ZhAd`y=dq6<f5)@Z2^c>JX(t-rqhDZ6%z?%{6n7o$d5s}-eCf5XZ@#jnOEXlp&bna$%8v*4B5 zhxgzCKG=($-!y8EbtwnlH3tN-Sv&n@)6D-kPWFF^DRY{Dcr2S-QlhG+j3f&5;k$+O z$}8Yl9L6Tc{+Kg?70o%;rr4-P{ki*`)uDC&vvTJ4))soy3b@Pu@&F4T-{|o05wvR1 zGgkP7FI>3L-Q5ky3l$y_k$Ssr?jK)At?6{$7uVKKc(S<=eAD+yXcX{a^l_PNZ*05*bQBXqdgsn} zy;ev&YL43h)RjhIJp`#?%KWSJ?3%HPp@r=^9NGT*c6_RwL}-##gi59&>Wgyb-*kGi zmZc?g`Nmy#g-@b-z;nw#L`BgJS}H7 z*5Tf9F|ZcSD8FRTx`4Pz7ELZLf~uTe91Uj1oV%hXbUsjBz~#1ptqMMzMuBmtuWtj8 zRvLn45Oy|Zj(-#vPn1~SE9Zj-e+82WPfklKKJ7w1>q;l#|9xO-sN86Yor|leU}mjt zLnll&;IhDCfq%V#Ny0FXu49te&$GnVluU7SkGldnU)GRkV3^P;q@uGca@)8M+61VP z_nK2EyCI)gxALr=KU_Wo^<(T;2Rk)UVCl-!c5ajWfCiXJnTBnyUEw5W)e79w#G}(e z2)YfRJ%4|HfSxzIfpWslM%x9D&*IDocixy3M$1xF?g3&95qak|pkhGS9Rvkbczpco z%ucZeaadRw3~xYo27-2CV%P8+U^z52a1Q2y!3BUVjLw8ALs0^SM7AGN>w?-j&-;cV z+5k5{`ydxO3HM#%b{zOxSqVcyh`XAdeA{hgR&7;wi{I7^U*;ZU6~8G7 zphov{XgFFWuRfpge}Oe@vJ^H5^NZBf`T!-NUx04$`Sa)hDT=fDe?)O&3Ka0tK3KWy%6|d2eF;s%m%+E{<`B|EDEc|JdegwZ|{LOir=;u$jU7#gf&~uI`8v!}*fV$N>esBs9*2Tr8 z$ejVv1yWIOV`EydoMh@zH6)XR6&Vb0MWUtrJKs5~Li822L)~dpjEfxeo;1+cmx^W+ zVUD7sr6mZ>&(HVvu7^F(YbcCPHA2v)MVf3-r7J}k)A`2|n&3Vall8RNg5VBR?DDpq z?`1spbb(*N1b~dD7F(<3Ci!PMr3j@`-0iq_K2U=$^HOF3TdVQ=#rTVbiG|UTYkQ?P zBkThP<}Gx-?)E-=yc9nOm9ep86KXM^ANPEyzF6cnWqH(88q>rpnho0I_N+e!^c8L?ds}+p#(4oNN?W;r0#HbatH%k zqdt(FSoj3$U}G@3hL#p^`9y%M^b^*XrDf^2*UHx=s6WCyO>WNsP($#Y=1=!2Dap~Z zQ|i(l9s<06o8A~hZbtY#{HgC%nVcp#SsyaysD*;4ga{#Gz^f7oZqEDUWqh! zB`d+b3@x)9n=HCIHfoTLU{mlpp)*d9mG#>@pEupIm((jq!%bMH0E=LF*%{Vw#JArM zSwdpAmM&LK8}D!WX|%on4gy&evlbdExt;D3L#M>KcI^-EHPM|;5#Z(}P?aICu(PuR zAnhlNS3i3O_sAMg#u!Y7(7ywk&sz$t%3to!{R{4Zoyn{fJv2x5?<~N(kPy0Lwbwna zdsDnYT+xea4`UtCNiq`13Gr@DC-7tTO3I3%bp2I9}llj4kiS zkHHG(d=&C<(i^v=83WPvY;S#{Q$~|@Z&nUWNn=G1kJ|Io32}042>)`r?q#N>)y2Om z$XaxMLk}(p68We4{B#{X=70jq3UzZC6zUTHtJ1|b-6wC%=3$xWxGd73dA!z(7n2(K z6KX{W&rh#)A$iHkX-}Kyu~HrUq*E;#E*|L6y*lj1T}g3qaYgShw;M5pMYrffP#ir6 zAr$E3;sP^A0^*XfIOps-@GJi=-Z4;jC&kTS!En(K1sbpo0qq8d(A=JllM@D0W_Vc= zcj6+{N^NFAo(Dee?(QD206&9{l$Sd^pc{f!$dk>ek{!qAEN_($v}@s0`lO?d#Sd-W zZn+L#Ag~a;0v+rJ$jQ)&TW7cSCpC>cWr+x0)R_>$l(qSZmrT?Q?~n=kVmsX>Sl8jErU!)o7Gj0rW; z*>SbnbP<@kf$b@y>p_KYAJ>D2%*tm1VSJbJ{6O^8D^`58=pMJ$+ASY}=kpu2?qsXy8@G}?JpOTTq0^!G?JDv$wfP)j6 z920v)I3mA&53Pf$gFzT5<^USvM>J0t9sQDT?$@s%{V zKLYL)?JK|GVjx>OJLj1p;)f_mg-^#J<6;7HhM#||r-z+`BYYjz{wVI$*SGFbb7Ny?V6S zKFbKsY>sx{_67ywOKPfC=fP^!Og)SDO=j+g51oN(#>d4S$n?66^4BV= zsU3oYqNJjduR{R=1JG2#e1zA%d(*IFP=vQ`?T)*yKhUY-gNa;!lDBAghR>PJhzfh` zU(t+^prA_6a{(AO_UQnWW@!NlzGg=}#3~pB2lgxD@7}c(4IaRI(MiYHP1Zo-(gqA2 z7z!7=(wXNFNj44E7dk=PrL{#FNvYfPm&d zkb_{+j!Q^5gKG{ue;ojmWgxk=kSl#puY^c3T%#~L*=)7#;wB|fFqhV4vXpOz78mbB z+aHR6xeag`#DEY72OE+YLbC>&!L&iK1{0KSSSXq4jm@bd6EmPK62P+qpdY}naBO+` zF*q3L9Drl;T#ul&a4Y(03*eamBrvFsW7VyLZ{Hy&&(F(4KPuopXg9UkqRq|CAbZ=C z^1%oP`UwGGPyhMzhtzziyF1s{z>1yqwmf=h(frKiMHS?`Afm}pty|!7wD=V^HN%N0 zcQanXcpDS@6l}YNdga%a=8vcLsrI#97E^(N0D*)^A&ftTK#ztU($rv44c^S71L9m& zH(((k3jfRB$%GuTdZpEbfWw@{|L|}C$nC;dL+jw+U~6k8IOpKZ8mzCeK8NAN?v{y( zYH*5~nBMD>P*Ns>Xkexdk%>=i2JghEk;xky8xUH~$8-~cD6O$kTYEdFqa6uPwq!K0 z&3w%N=678GkKYlW@(R}C+s@%zlm<`e4QRfdH$0=zx$U|+rWj5t zV>B*+fj^iEgkFDK#_xDmAY@ckX}#P3{kkyN*U;StO#f$Mp_JqDv0*$_yhx4W2>ycRA4B)n`>D zno+t&5bvvs(jwhke&W%bdN}uAexSmt`tn|ic+W{%M~tec!NgbBtiv7eVB36lh~TD% z<);*@P_jkpuE`=Q(Q+PI8T{>5TW$p?DoG9kPv#;cpV;X-4=cBl+X|*}=mH@U9dONs zAGu&p)%hO#?wv&Uz1zI(ToSigjlD6BorVS51sHoCqEl=Lyf{ep@HKx}K!&D6eIzdp zrb5TV5ErQy_T4YvvHX6GU+V| zU?B;M4hwr#o$}cig;l>1Ut7a^`(iwn$kSg>XV77tUmvJY9H)iNu~n)N@7D4WoO49S zj_)l{Z3sZpLD%n>q|D<6;53)VgM6OiA3&%MR{ZYzM72<~kzSyh00N5)orcaY;h&&B zk!s9?k^=eIZ3wdA6~K7awR5|Rhy`EyG!q;!(szjyxmDG)6hJwtW0s_O7WP)~_<#%~ z`jJvwBZtGVRbCd&s{SO1aaqIiDPMVM#J*zk;OkRp8Jw-Pl7jc?VbEf7#rF$F=^^T8 zhZ0=ot~H3Ny+KEEA)f@5t+)Fbl1Obp$ykjg^wFb7KU#HGha7qNHJYAL2(&5Pn&qn+ zZ)gz7uh{>Z$e3wHI#LI06m5YalE#D}UkEq4Ppb(p^jq*D4d?#mE{!trjE$|s;ds5< z7#V$fdVd*y_o5C*E6)-Mvaa$7K3^C;AOJqcl7*frgXBRcH)`i}&2x2pv(oT1Rnk-7 zFc>89a*tLCqy(h#eTl1pZakf7mraU2+~>F-FB ztxiA{%=O^DyAfDeRBAsRERp(AL!;DQnZwCsp(kZ*>G8d#!4;cU{h z1c4Lkk7TXbi#y&m1-`F7;G3#C5*W+OjY^>GTX;rDbTLa07OXlsEi-)i8>>XTrGt6@ zFJGv?BI~=Gg$)_tsUdcn(82(96#q%6Ooj(mSw>cV&+_HHwsKzVxNa>SXEITf^GojX#cOYF5PB08I(c<56qWr^*2uhQN{oB= z{;lV)Bg$5nGca5yGc1dh8Bw1JGyAd{^3+FeEGZv<^Ur#-ch~fmBW1VO+wF%`e$Hnk zvABKIUSftG60Jt!C}21#Bz&( zpl;mTWWAOtTknFGpPzi%O?ZBT2NaE4JwNU5A~vpRRyc)LvU3f*MhHbEg)jPm?-`0` zX@m<4$n{f3I5hR4Ts=_(gVg-|ZK&2TU&uk)4yKuG0-rbvGXBtSiwX*uAi3JsMh(Jj zNm9~XB+SsGlVlKtXunB^KAOO2nd32d!W9f(?X8WW9l8z+fE(~wh-Q7ZXepRDj!cB< zUH}u&Fwp@bDcXAww1=T{ct(p}!rfXd4pPw1rL`>FZEZ0Ja)G1BzDQGxhR*{$ovz3b zDyEN)%fs`MwB+SK#>bQ6!?VcJzJC2*t$lekmV4OsQwo&`osu%7q9Ps{GnXeiGNeJ~ znKFe;$=qNlRHqCPN+E<$gb<=KhRm~M$Sfh_yKnWK_x;}Wy=#5zTc1CUwd8U5J@uI() z?+pfeXw=GV$kZUKjDRC3!Vc9A!)FY7BzBcJY9C@8a+L7wzw2*lHQrGjn{nEHcpC@J zvt#z-K?pLdXcPYKD8W@{;j~z}n^8ohOHwH9#f!igi?<#NqEG~Ve%B_i@kTQ}ZJ7|0)1}^x0u@N=d4%~y! z2yIh#Y(uOCIEvBQ74^*LEtPH~;z8O~{21-RWrf&k+ua4+Sc4P_E5)q$Rgvjr9ZpbE zQf9|)r=Culd#Dhi^obuaXPxotD}MbK=mSn9*S_3@rP-pg$;pcRp>wYzK8#=F;;I`0 z`~L)qPAxO*&80^PbPkz-lZHm4?D8bT%)*x2Ml2~BCn={B9Z@Pra0OI?`T(v2{Vhay zKRoe+&IP@%%Md3k5x(fO64;Nad59AfTbD%Dz= z+Dssl*Au@l6*ZmVc51h)Q$j(vrYxO{kPee=@#^JEPOeQSHxX~aF1FHxU96)^_xR>A zqR|u=Z#`u8v@Ez!Vq1x?41dd9txmNlJJwIa$BtgHH`07}|7nzs)D^edC2YE*Wxb;F zX_%YRSweDuZBB0>?V21a8jCV)>i`v#Ve*0g=CPiyU+=@M(9`pz!O{g&VF`mQnT{DN zG{k|a&M?&i218^mb!Ebkt8PU~a`$c@=^kH)#lqCUgeALFd2-Urmv+TBHc+-QiVR#I zP1N->*%*VQhEpS4*m2Gj)X#d)#O2^bntP!&@{5c1Kw8Wvq&vHEo zE%9dsv@vi6w0))W?z}MBTY5_(C;zGRYK`f(EF^tC=>f&kVvH)u+qtK@If^qx33tNU zy)|}hv^esk+0pJVlqn3(?RSRKAHw-((Uk zy>7qRyBG7b<11l>i|Yrp*OJ~ny+)V;>H=H&$2`yl8F3uT+q z<+9PqpPJfsWtt50P#}SQ0wJh9TkxslRl#{WPqy4H1?JTKVBCxtJ;=QL2V?v)erc62 zo}I2(e0b9TV(G2FhK7c8{q~&I5iKv6;|uc#ao8;BIZ;(3yYlGnT{+4IUK3ZH@*7L8 z1-a)A-8+F=krTW=cRhLm7#nY(M{oUd3~?1kllTr zzLzwYWi?IPnH>5LFLlJeNklo{T_SUEaHN_D-mH;VZ;5^Drr2XNFg!Ro`2Bmileq5@ zNy(g-IVTI0!ryl`X)p=fyl9Rc zYrKQ;?r#7ui}hfrM(9f7^37pQ9EUe;p&@8p67mqhEtA%o$5Sa2S_3pi1Se%@yP%;Z zBqS(2ZNUQg(|w)*VtB&Z5@Re9H$e|j5F)gF>sAT{WeQ3O11wowdvAkptSZVrYifokIA`;BG@J=7xARpOHCCmIcb>KV9CYhi^5!$ zRqyxN(x}RbcJz7Ol!Oo8v-IJ+C5me;MkIa=d`6MR2wo{U`npoRd~R;;g?@g7zoUd6 zC?TO5DS67qo5fJS**Lw2mSI4B+x}j2%;^YhljHe z4RT(EuH@ypYiAF33Wq0S|-4jp=?av&2 zb*B2!VvljHfU#9JL5#tZL0q7}N~N65mNOF*UA?bgP*U26YLE1q0*oudiB<+mf$aSQ z6;9&R?YReJAGm2+kK!#RLm-%1B6w>+e)4_o{V;(g?ks0Wz*wcOkcoRqSNE;`*RpLY zC7Jc|{rt4wP?Qd5nYZc8xLm%BiN9N7+u%0ygJvLH?O=}p#b#@3>s$pD7%&rsYj-Rd zD+s`|MiD3nD!0_w9#@pRyAtZs*gU_oL1lu!}J#8 zPwmFgE3xgVXny|jjwF~b_M2Tj=?7iqz4fZ@V^_TXjG`a1HnFm7kGsKZ#~#z zi4_!y4;4+sZdKCYxdH^moZ;E%wO_mjc=z+Z{_qee{!SxI5sIf~KV%UcxiZlWMLz1< z`4^f+WM$Y6V1bw({jDbBWeOlJAq&_KMy~BRw%)tb1TsXaLLpI-)rM@_Qc>#%VLfucB%92f%~6WwUZTS=4)uZf`>t>$W5Fo_txqt@NfeSPIPA)0^&Qe z{byCj%h!~wK^@CV3u^w9e&=Ix`K@s=n;s!WMVgS)-}d&8FP#Cc9_=xs6_WMolU5}P zB)G(M`Fr_hd{U1JoU^Q14;^xy*BV7Jr7zuGa0iWE-Izx)MVn{akLjwldM@MaUq0JQ z6Ekj&d%H3@0+?3tx$YwU1|@B zdG(J|<2kg3l-mYvTwhSr{B(M^#1_&Z(}TlNcUP4-ZI2Umv!?bDQ%dU8%# zMRsvz2s{Ywf9Zb2IsK`!@SrRHYATSgcxn*r@4x@xL0ofdbbd66g(((dDQBEYC1?q- zhoMUCPK5KAwIJ?A=huC#l3PIrz6n15PNri1k;+&2JqXx_e0vPmwidk$?3JH3LJ@WFry27f>hrOc#85MG&IY3v=v6FkEU?XuyBisxnQ&3 zzkvy_U-voy;&F}t!I3?*UB;>U9M}KyTex0CM>hC z7{lk7h4=aQfCcYNi*r*&2QO>o9x18C?xO1>mrYIkcw*d(Lk}p$U54NiGMWPi4+7Ec ziG_h0d+GkZKFCWR4o(1gj)-JdCDvvXV+`bT3!-V-&EkZYfC%BbI&r2SE5P*I@+d?l2!ZDQ~zHzV!Xv)~6dow8v`AXW_mKHZ}PvXTBH?>xH zhiiWABMdp9)U(b<)ZYHL%F{WlBSJ#g-q=7*=0&>%CgFBUanvRKi-9YZxbES4?AASr zh?TQ;k`M<22CuTVoQC4>)^SQ<`aT$vl$uyzAS=1}j9&Z;{NWHB)#~ebBGhg{D4 z3+BHkuX0F*Q~Z%-9A1m}hBfIVJs02L>aTwqA7{H9j+(M@!lSITbRUEV!*Y-Fx)*fs z#9FI2G&C}UtmsE+Oir_Xo}9v?0M=-2yhd`%ljinzw2`%qbuUcopVwX_O5%6R;f54T z42!FU56J&&B3wY{8#?SSJO4A@?zk+!lD&j|2v(t=QyM5Bg^e-K!ak59Sww5a9C36%1Y^xd6S zUCWWpt%o={y@xf|Su4y5e1=Ca%e&F zNY6HP=};u0rkZSFSvELdR_`f}yYif-rnph@I<8y(5kHD%&H}jItg$dP+V2c$kC0oy z+uq>>Fnn916Yi0>`dDGy^432nCG|EVwOD=R-70<|!fL`=fi+hWm`RWI#7DE4q0YH| z`=oc@4h$hUAU85^{RWthAmt6!IKhfTF)-8s(7@R+(-~?o1z^$nRN-8Yq&4loCs$eC z(IG7(!~TDqoy8^JJ*&OwJl^R+D9R&*Elwj3BQDMimnU?EjDX{yBN^3E*s(~05c%V| zN5!W-^J1qiHL&Hyqf*@}HBK#IOsXieLSK$u=4H0qM)=k@o=aClre@|6VjS5% z#|+!iArs@j&e}8m=#{xnXY|jUbNG<@sivl;vojjswqHO%7J1YmQ(5CLckfwTdV?|1 zfIqZ-sLgaWZnK7%?8GBO5ORk{4xpJJsso|?va&J$7_5m10P`x=hsp|AJ@obWS3eZ; zOXgh9IMAEi|5b%*>2@5&=VNS$Saxy@z}_ga^n1~hu`QIW^LGdq4o9O4^fA- zv>vy3Hy+{?8smkXANy(OhHbi4f6wD2As8Ngd7`kxg!ZN?^R9Mq# z1Cd&}mRP#!DATI~E6vMen~ds}g~gYaTIOzgiDZQsv2^yIiaVXYX_LH(ig26TeqPRt zuL7tSX4&0;G^_~LzAKKc5iq-;LX+wI%{Og^Lp19gLQX`3C=cdm79_JwBQJLUZ0_E3 zlSbKvNyw!or`VWzbMYSY#hOqt6_?)eBhgDY1fM^7;uB*5p2&1NrjQHPA`zedN)F}D zXR?ir+4w8!z|le?IckQ;UYzkv@&)DMQqUoFbeh1(zl-|L9lQxpQZ| zwB0fOFqdaqCT7V)bo<9dv)lewd06Mj^YdGLnNSJ2f7dOhfOUQvRlb?0<40#1e2rd# zZT>s14$Ucp7p{YWsz@U7FFLxKtZZz|?0DIuLo=;GXGJ6s|ol=H(zMn^vc z3H{9X@%Lrm@I*=@^JZZGR%GPfV_Eb?Xq+HyHArLC*3pR^^N|N?Jd@nO%^JAtNSz}! z#yej+i-B@s>|jMY0u-JKHvSFKD~waEOT2caRaGkdVUg^|DO(Y2JMS2ik#V@*!qo5n zP(Bo8y`T%I#lR%wPnPWjaE^EDE-wq(3Aep`T;18@!$U(Ym#Epj7VYaxzd<%4F%>K- z&Wl*vBd$|@m1kRF-$qgy;x4&HI=(FcMpQLXU$?e@`oDtyNU2VpbLh_MHrc zT#UK)1Bch6C>u+578J#+yQ|9=e-pY^MBskp?_qL@dzH}rcbL4q6{7@cf)yA-JB6?* z5*Y%k7y?WTu91;=kTb9cLML2AdA8!}eC*gUQ2IPi2xiCDUV~^|7}+>#_7EJ;Am^Xf z|1aLg7gswQKL6*0^1EpN+2{PB&i=o>&{5UO$_g?bxbc5|bfe$A*~aC5zQBmmxj2*%1CaIoavyZSI=PM(O$&m)H36G9Z;o0}Wb;auvF+HdGwam(7qq*O#n#Kx zF)%cxja#4Zh$^9(+?z~1QQ$+Q=ekSHFMA3^@9h1eICs_cABn+Bp}I7jWHb(-M+n0Z z(`9F8cjbn3bvnfq9?UOE!E`6V;J6$6iXq@(aQCxna zbWMrPaXlt3Sby{3tG$8kx$2`U{gpeG=CQ*8d+Uyo2@YUT^e)Ga6%+A@wuf-c9G-JV zcoGfdWQ54-^Jh5<7<_0Vn|Amnrltnpxs#Tf8sEip3>mjj&E!MNj@(5;*WOi_ez%p~ zf(WiiI+u(LMk2)JQpM2(y#jYv7+dE3mY0`Dwx?y?gJqbLo4Y^cy#4_Jfu=Mm?Cnkp zxAKmk)03=WVQ zsn|@JzsL``_ZEx9#YOk57EE_&aXX5>*)?! zm$m7BA+}$6EN=W9g9e9}5U*;I7$0wr>ICVecA@7I3VO@TYwMh+#WlK1q>*$+@RBmkgX*Y7Or4=i#5>F*2bl0N%p~Fb6+e(2*W#F$Tirj*B~_k z4(fmI-~YK_DK;RbY<+PjWI7^qQvrj($3$XCCrrSxv0Rq-#Y{#&&7FWYSH^9Ik5NQa z6mm=vJj=<>b-1f=1w!U#ub|l+TZ)tAh_t^)Zc$NLuE3wuRC_7#t01JTtPVv_3ReS; zu?Bl&45QXx7nqVYlCi+~Cn6#jNzaF;s4qO6n;tZj`b&RJgaCsC#RIe#9G-eLyj2xF$>v5qAbgJ%!7q^ z{p=Z~5CT|a+?E)w<@i!0Web)S))RtzbDw)Db8@u*kzauHm$FwD^?_zXu%yF@Iu0q- zn523KMI$Jv4{KuGJm-|0oL`8{!PA$XVc^*ELljm7bUJVv4=*()re7EtqNdqdp=mCW zp~!9?;_3BiHbq!8)DzMz1ezhmApd8h4xSi7ZtmG6@K%lje-F3J2`z3JX$cmFX%fKr zQ*_muD9Ksq3gI*10+$V&1fGCol&!7ZS@8_3P1uoRY23C1P$Z&)^)6Xh?B+r+E?K#) zOgjZ`P`96;JH$aD?1yZMm66Pv<~v^(5PUiKL!M$C z-DVjn$E@7<3mp%E$PmftLvsaxOS33WB_=>5ezd~iwPgbw5y87)w)%Jvu>&a`Gp6o) z(LM=ZDH887I*&Zd-}0lsyPFJ76#n4)DhbJ%W+UgW`pxvB8j6QatnWxw9^6sRvV-F! z#%@W;HZ0JM!oiJPXTvI*wJofu^3}qS5f}U58cZPSXdly4Q+0*%&rT1ayN^kZEpsNG zh0aPpNZ~1-YctZqOzbS^N)V7DA}Cn<>C+Hekwu&5^k6N@gfUA$NTjs{0>4Jy7FhItRQ2e{bikhr&f#A8>r3_qOabP&c42+ zb%o($PC6fa1aES3uw!3RvSbwCXr>3S;0GmeAh*0<5I`&m-Pix^W@{EOQE=y zo8M$n}L+dI3C#MTeNgp5TbM|OuP-%0MnCcX7kR~d}l=O>T^ zP=v>OC3=a2-vAR0;m$)(4P9M?Rl5(xg+VF!#ZtuW$SqW_+`K%n#E6h!le%(>KWw;7 zKqrfcB1Xk)#c$TNJR|mG(T!Zx(cuC0l!3?326zQJ-G8Xyfeg3-7Fu6rWhp2sLe*4* zB$Qd3!{P5}oX9l@+0sOfGgz5#f?fa@zI9hY)KyA#keNl}3oU4`i3S39Pu;zlc;HLy zI}u@#X<)fNLQF@e4LcsGH!@_h9X3QZO|K&3Q1=N_+p}llM~+B0KPf6Qr^}o5TganT z1@VU1Gt_;|NG28*Oe>p~y-%Q-W{*{k(%d-l@usgYyM&|v@czg0Ow7!1NI{TP zjX{<&H|^ckql-Mp7>(p5I7N^^ja5D|kS?wg#I0ilV1&M^9EnD7! zLzwNZr_%g`oNn01vlH0q=>LSII1Q1K1+D-GXyxW`h8bBFaiA~E?wxQX(Bk=2mb`0{ zZI937J8?UcycMYsOzsWkRZVquDr!Z6q#?`KZ{N;oYnSt<>F4K;>a}ouxpZCiCpGD_ z%7lqEY0V~DS{AH>09QnzruSMJHWbjayD9em((=dt_+XM>dn*Es}YuIL|_f z2@qgRp-?n6o1wwQ1o1PH!ljOT{I)>BU~ezXx_~pA=9e_y?NJCc+}_I0G~XX-s}RW2 z)88L@_wM7un#_WufNx4lv^4I;fwXyW0w@vaZadDbCFL^$ zKR%hql~QUviR32~Qe<(SH}Gh1#!pegdx%8_w^}r`0v%tzyjRWFEpY!;bR-=7HXe&H zit=4mQGw*>Q4bvh*u-H$9Va?Tv@~Jyfkpi&rR-`O;I=Y%8+-}yc7jxays2Grxp)m} z*?SFX4R&R~33!~y$kf+6vN9%RbW0jstpy&Ec`r`wf38wh#6O5bD^RB33Nb%VhM794~{WUY&+>QFdenr zT|faMfCM$*J1`rz0fdGYLJZis3yLrvG_OB@zRB4wl5Dg#k8Dx*3~N!u<}VSxGGSri zKn~ex4?@C}o10r+u5^6~`HEQZ4dB68MjSGe@0o#i9qjA|7l)}xgZtZe?3B9;w5Ujd zT+4>|-8m6RqBqu-JudIqmY@c0Tt-G+8lDH>DJ!H<__+2WolMk{O%@!J@*}LI?jGiLBo(EQ^1WBTlQk~>gJoM=@OEX*-;-SCnn&llm!Y{m_Q!`A^_b< zy?`%6Jb?Z*Qu5C~Oei`48`8RGVPx~s+Cl2UEnNxZfr|XX0O@3KkaxKbumP|1_nY_T zAcf4u(Q%jX#Zzq|c#2bcRu;nXabLr-Ve3{ab??M0JnpBjuP-o=&esTVrA_orni#UF zaLM8Qk^+MPWqVq|d{Sg&Bq+tFS9_2TY3CeDPm+3p>@YPowIGFh=WifZ2WK-q600`k z*l_UcWL4r0udTiJ>#Ic}V2=mZ#=3fX;M8$hdek6~2Dc8DlK9b77(S;rvyTKBu>>h( z8kP9Mjtl`M++UC`1*YW%;uj`gh0k|2RR-cm-O7UmMFEWyDV<{e4`O Kl6uVW+J68PK*o^( diff --git a/man/figures/rsi_example4.png b/man/figures/rsi_example4.png index 739b1240844a6be6927e934e945c63d7a2050b9b..fe28be02713724cabba22d168322ab91c486b164 100644 GIT binary patch literal 21029 zcmcJ%2V9T;{yv@=NlBs|p)IMDHc65OX=|dPy_2SoCXuwXkxJT2dnlw`lJ=5Hnxduk zzus}i=X=KYoZs*NyC08p-sk9k-|u_8p3moXUC--z`(02tyOV^Lgoub}=Q$ZEB_g7Y zlSD)tDzU?Ym5hch5fND>;XfOyET3N^BHB-MPU@8Mji~V+r<2Mf!RG**4pl?{yuBn{CtO8@A@V&V65>KgP$WYA`^e)OBg@WmK4l|N9`B zL#{u6I1SztG%+>x5|gT3@-lGRnNziC1Cg+&>si+Q&&<1CQd~4Qp9s@+V-Ks9CpPOX zUc?~@u~FyRwthqGO+{p!KKML$zUf z7GzzUVs%_ySDNF_h8?-=F!u3CCEo=7W?e=iA_30{uA17~iSh9S#n{R5ar%AxjB>(! zB~PDTnjK4Q8{4@wdvm4y)~3^^Pw!0p^tn1nzM<~vnY%w{$Jz>i_h!R$7s!ZW`3&oBjAvGrE)GZbxv%vYmw!mQq!=r%t*L3! z?)2kJGbO7+&h*c!eCt7eTKQx?J3G4^(Z?N^jD;K>9YsVUoo#5m!$lm^6eehx^o9r7ut{QWn^4k9EttD(tVF& z(^k?97az}|OM2A9ul*?R?ma>)dLyH#XzBUIIJboXV%u-#a}LDb`nb<-)BUF^W7byZ z%iNc``nr31EPD#iuvAC(YGm1tG!Qf1ciOH)u# zm~2f}J9+Y?q-4e7_mQ0~g9&f!oRpQ7pCu&BO?0(&bO`O=uU8YyUbgzv^zsZb(U+6a z&w>kXeEan3HZiM0l(CV~J~}#6BO{|9^B%rh+S-)6cfYjg>1=O*H~VGwC+^nUswzQe z!O3V5M>0my6Yi_a)j_P0bU|TZg4f?a%gD$eEJrRbGo0)4ku>5E9b{M_}rEk zaLD-cVZtX)_%n!v_Qki2Ro$a={PyWhN4C*Xt^ACHgyE#bm@Aj(IIqsm&KejPRAb>; zTXS=BYZ;w6^JZnfPghMXEHLnxQA1Q#R@S?B@0i?|Gws78uj&t}pE&3zB`J0Ft^eY; zDy9%w15M4&q)UmDWoxVF!?A4M^6TxW$eh%uf)Uc#VWtvlE5JDasziTwSkG~ z@ooDbB3c#i>gof#@onsOg}yVF*Pl$PJPx7cZU7%}BdN^>RnB%R`cW5)u^+I*JQ<{Kr}y05v^ z`iwnyHaKziK0QK;SME3m$BQRVUTMupTQf5=@8wc2&z-&LDk-^9BF1?sy|_54>$0|X z^rJ`WDk=sC#16)t4H#x>$TBlAF}ZnDxXfvwVhcGrdDr8)A~FyhK<~Kw#_Et+@Q~u_z(ig!FVvWR;-!x^tT(R(@Qvu&}sr z;ewKqQqcD90^6#L3_Xpxx^OjMU=dqIY!H zOY^b5va(VBh|6xdxw$^%OsZ^qyc_qR=Ijb<$Q1W+@akC zTB}$=$crtnUgG9jQZykG`602XSrD+{tPExL!mx)&j zH9%P3zJ1$EcuVEN5kb9jqSAWW;;xFUlx8tDv)bOf*WAH|>Pkv8^JQzUGoP#5(sh{xExO;wpC=}xH$ITxoNe~`)0?}O5*3br z<##z+Z8LmC$aDQl^X*M@3K3`GX|FTKJ9ACbOXfOnZ6fC2t<4DIZC=b6sGHchxAn@SCQMwPha0{l?t_j z5!4MY($kMt@_5Jca2!1Ryd| zrH6UJ8Sj?ynq!XATCJu(4#l7d9G5^AED47Xx!XNn-`Gz$Qgv~S`ttQ%)fT!rOUCHE@sj*Fcjo%k}Js1 z_w@2|ovCJZQFL&adwlBl0-ekj(JecyHBY?n>2dwi^u)4k<)u#gh=^rhY00(fhZp0d zb9rPqGq{Sbytz~9Lyl72Rly@7B2wwBCb2ZmS32?O6Yq`b{-`K=@&32>=oU-V(shu# zQq$55sSV3LHk=RTDzF)nMJ`LGyzlGV-#a)cfK+GI=Qs)EKkzRriq zt-YzKTrA_|%ej*IUgs}Qd?G}5x$mW-qFP&-au4Iu;I;d5VX~zYk9OCzKM_%i+z(40 z2CcOucYTQq5dTEmowwpP-{Uw{wpKdCNxU|-wj$vr85kJYjLO0w;y~>h*7)%7 zc@$<{9UWBOJ9q9hLcL;5>y0{-nafn}{+LV&mE()~Vv}4gIffAJr+Q zrlho;{n`rr6%rQK_~=+%>xRf{>v=vcSO}mE3kp|3M@#$CtmA33am4cVZIwdr2i8lWI^JAiWA9esZpmKC~cYE)o3yq94&A(gMC);u7 z63@Nxz`%iti5}!;L-HySz&8L1KmnjLQLFxw@k&m(43@JmhhFOH0yVs9BmyP4u{ha;1c~ zsZ}nV*8o|1d04Q|rKQY$ElsuRLA6g05m6ymb06m>ZFw7;nF_BR1w{sgrJb%-pcJoU zZ>PjSMBoI(@ua?WDH_?RajO7ZVPRqOV{MA5s)^5@*kI$Q7u_#jzTA~(*~fk4;(=59S!&L9eYf8mKEG(LfUvAyHMF72Kz74>kSKpFa zd`B3^y3CvdjHRn|_#>R+!ey2Xl<#(skVJ?&*%%ue%gU1EEsmv^(UKW2YUNg?+*t|d zjaEF>A5RqFnau0{A~|_!uFDdKsQxxs1v1j+;;yIHPt4@P9<8fb_5cHBf zX7{BD_iL)JEH=QB`*5XW#OiFiyBHD^VOIovr#V^Y*Xe;uMbU4Y%V;PlUbPS}A9`)?6PL@9bno{}1TdvCDvrBx@&>G7LCzMQ(fm2kLN*EyPb z^;*SS>cbr}L6nkGxVy9hX6?8|1Q5mh=$!4~5w2M^9Vf4~DSIWQ_dswWujER9yg%R3 z(IIHr%Rl~E;gwZuu8S+}>Sci_lF0#iZW$AkG|d^gaOV{BPpr3ABZ>=V9cI6(6ljU# zvap6s_-QSQo6o;WjCK17luizCS|4%z+N$oYp|+^K!<$~-_gd>HadyOWsLjG}j01Pr z+aGUZ0=YtUk3nMDzrP6=z z0d!-kWS+6CI%2WSQEjZHyE0PiK}vXm$y|8WwEE@pMpmEL&2#D1k(Vu#l9E7lLKG4? zxwzzHWO)251wWV^ugwCt%9u8(6PS-^scqYFR~rEKj3F|lnFPKfk%(1uUbB?V39xK!Cr+TopcGOna}%l zUB2N_%uqzQl9;*2$W!tO9vB@RFT6lk-RzuVb!wy;yPemghSnY{`3V-qpiXWcuf zrnajDlZeAOYAA9-LtPzG0&7{@t5>)5 zshP9#@>rSE%wIP&++WHeqv$Dhjr8T#Elq)9QN=GHAbV(cnzoKkLxAOW)VU&&`1|{V zs!2#l7V587-AA|!gOc12mO11dWZNhY4vVGzp_;OORXUHB0i#o@5RxVWp=u3fXX{ss!yk>@Ua*5?>)>xN{tnt;AB_s?Dk)j5HHSnRC7b?l6t3SsgA|mia>mmiG3Pxi1 zZVI)Ry5jlwWf|<4m(G2{GSZ^FBeCT1<9@`h8+4d_5uyCBmkNt}9!2K)Fy3V2;j#Ld zqTxfvU{Zaf7Em?Me(WP883F?M;Ad!q8?Jvd0;jlrFj+QY;3>+9fF!>N>X@joEOjewgi$R{b& z($glOyxLUZB(R%`${r}# zdho6Fn*Ibo-{|o0Twd8qeU1d4;D_fIy~XMqx(L+j{rRI}SW&&by$KtzI)<&zTK4d@ zZs*d-`Yf@w*ob8AINqLV+{|3s_v74v#v{%h=|W9H{gv%{Dhu1ZrOEAE9Czv(!p=+zw%EZl4+PyLRuQPkWhFZB*D7s>Tq%3@zEAr z8yj3ny?tnCXu|r&DDLve*$m1JPQUZuIUMoJX3wJrpz4dArs*mwD&NGg=4kIpr>Z8m zn%tAlcAmGejphj9IC${tt3S4wuZGi-no1CATx7RbaXvK@{1Q=k%a$e5M!wM%Gj0IREY2v9D$*f9|U;KA&5z z<05_ZspAw#5MRW@EJ?MR3$Qfj?DM~G~Q z?3?3&Ga!%27udMylfm#H#cGKx7loKBu1=q}-5g+;?MD$fI=0UzRz*L+IQ!B8vnx_| zs8bPS`L-iup{AFg3JD8GOhRT=PfH~;cm)QLsnxZ+zNe>TqWQ5G?yB7A?9I~ptQ4gC zHuj+EkExfd>+?@HAP7b0URtGpNSFN;^)a%!;AB}zfJTiiaw#u_+ z3#qBAlS|Y0QpWl}snwYr+>v>exGz-Z5adGdKK`p|K?lQX7hlS;T+TL>7dcGmLR|5& zT-t)q|7W}a$Nm@5@}Dq~In@(Lrh*^Sw4Fb{qaY^s0m`-N%(+fRMt1KW{$SBv<}N{T zMp~NX@ZpZGt}r}MBO}T{$tT;$$yuL*SU-LG6pTdufFjOg7lWx*$i*aOJRXzWn{Vz= zIXE}~AZ($a+Ox-)pEg$$(RQ4+ezK>iAdrTJX2)Kx3(2igud~eD+}vDTim4tF9>cLL zY4-2He$e0@$3E7#w0!R{itWj>WTK$jySHY@<`)1g&?2C$ogYndp;BX zot^!cqu^meBIv_vyn6L2$U32rLBwNzk&+TD8{bU?_3R%bM5@$o^u5=PefbWayOKhK zgSRo(8&V!*K6*4ArIBvJKx3|Gs&r7Ws6u&LBsGPXk56Q1|42i0i%G6l(Oo&OjOL9S zH%dxM`pDY*$AF*!-l@*zD-J!>0V+yIDcC(Qh?`WoVXP#6~o?cx0S^VwNh>Y?(AiX)RT z$371Xpi2Fydh5PfCRh7u2O>BvEv=qjq5WXzIN?kKOI#_}vcL+y8M*HZCpi^|3S4iO zF2(%H#@v;SnfVI!TRV@iu(sHAa_wszo9_(|3>-Ll!kET1nD_qu`*=?MI46TH13ap+cB)$HXhz`5LqCd~1jph*xlg zz6|}-a&n{;sAo`HM(u>76~ZDT=@=O51JYAdkFc{3I4>_R=YJ)}GAj2yo>n6Vwlh={ z0v#1ikh5A^-Ie4La#DYeajV&#tP&Cu2M*jS8ctH?;N#;f@TO8CgsgR@G4HIUc|Gx zc(FN{{ZdL0E6&dMZb({<3q%75HNEItUb*t=4i%^G^T&@*#x*~0H9<~jHU_1am-?s0 zH&5Xq4zgcZwUA@*(=37_3dE@0vvSUYxYXlNL&_=xSp2P<>(12e^LD~0{dW&+2UZBS?&9rJijvT2nwif!I; zMpDr$ir>CV23vLm8no+A#Zd}14 zErnWbME%yd9P5OZmNx%oeHuxmyuYuOmKN9Yw~hK5Nx^`94V>x46}f=fr+=p(tpH_? z)RdG%%<+hsq9DZBaW0Y%u!%@L$gPDMTNjBkGCN^mM@}rwsvY<2F=0 z5gC3I7q4A=cAee!+ov;=2H|EmRN9d*_Uzuhd(WOjQZmLdA+q7<)=EHBLK@O_TO1;w zZKn|i0*f}#P)%&12tWUfh zr8wvbh!J?R3=#6n3*bkAR!2(-Y2~uhiKkZ+w=5{Ft!-J>$-i)jre{u%|Eb~T?JoDF zq@dm;Y?=ga#dSysm^rMU=G>fou?~b{nug-XXZP3?kkHDvzkc_FgqdP?v;{@_bHL6> zZ7Km|yxX@=cg3CBf&0G*S~A=iI|beM!zD$u$0-5<>r|76R+EC)0R-*+qnw;OcJ7@0 z@k2RDnVp?o>X~XXAfXOC7W=LTvM>cJixZ>lvTR=1W3B>IMH8ipC zbB}~bE2+sc8YCW&Z9i<5V|W^nX~z85nW%?{SS(Fonc(?>gh5=*pE=CIfi8t20g@C# z*ZuOv*v-n^-2B|R?R|qIBO_B&meHc?5F^D-#c*!CBUv>So$j4vWNr{aeA&3U(_Xyb zICA8kL5Hue@1sZ5ZdRzEXx+{CrYa@X)zy8b{dkTFfg|-=Hr`*ELmO02KR}9^pol3b z2rzK{4Wtx}5EC`UsIIV;uc-gdKf+8dT}KI_`v{?n+_T^67IFEuf0r-*VyF;*wV5c| z=Xb*U2)9KFF%$C^idQyUcI_y}-~KlX#y`dU{}#n8M;#)vV_euNsL{(e~SMBQZ_eM$jM8AV1)GsV`55#S!d*L|M3$!M^DNU#3CwQ~% z?{!CEKh@gXgSi8om4b^z<$sE_K5aCF#T#^S;s*AgF$Uow{Qhp{=8KQiuK(&1mQmyZWw? zuuTOlENzxiVhP$#z;JwEPn8?`R@mApwve8Yl5+OC!(w+ueheaYx=zV@+SaGcu6T{k z&7CU+on}{tJv}|AC%Ch;Qm4O?OuW7st0!#zNlH&||C+_`^w9|nQd(N-eY>`%2L2Z@ zF)B_`1}_(sQ*3&fBUEY z{KXDOJAyHcL6KK5KJF5a1KPbCHf_z|GS#mGeRgqmWuT`|2~|0N-}nUDUjPSl(85=g zDpUxbtjw>i$!(~I<`cf&SCP8=vW*%Y7xx4y42`l3>=OUQF!n>llLZ}bUk zW`2IV=BH=Aef!pZb$+62emK$+qOtSp@*>pzb~KRSJa9t?0INYIS(Q+Eb|PZ5gPQ&C zF91w(sb}<~9k_Gn&eJ|*u3*i0O8#%BEqPko+8Uvk!HbiZo$Wl=VT87;Hl!olL5CUHUb%8bR#p~C%g*ixU!y2)0^?++ zZ2SyFX+;2kfswlKY?s9u6zeJI3j-Bi%Lhn(j?>gn`=YZRApY|Up`{F@FXlY=W2(;` zDegzv(>slK@~j3bKtjx67(urhfXW5B_mQYh?RwJnEbm(m+YpP~qmxnuAvMn;S~~7n zVVFbp!^0qLBwl~`LiTb%ip32P`}rkK>QGqiNMo#`RH8yO^HV(C`>@#fLXSyQj4gFp zw3$>Qk*KrbS3vQD6YObRoDV6Dq!ekT%g@oo;fF>VXdSd7^MII3<(Ra-I2Xin^`0~C?(9Tuh*v^-Ns(JS8P}<&OBM{`!ZJ-yjIg}@4^Z6YTl4)C7?(_$)%JpSOVP$Qd zDf&1wGcf()3FsACmEA_ZYJv_e7r}oW1Q{Ff<*?0Qui2-xSJOLJ z^Xp?G3_j*_pjid;$jzHSfq{AX_@=rGPD_DGW9h*1fezYD1qCukaTFnF{Mg_O8D_kE z@nWVy?Osko_1JF$paAqbz7_>L0v1JeAXalfZJ*mxYEe;9Y^*Nl(-pL*z|FbX*)@u9 ze1qc2<-T?gi2?4hC#QY#>#-Q|+*7LuU;Y7V3C|(Q54T3vHRJ|R@<>5TmZyLGvGJaC z96|lcm5xI*Mvx*&`2~DOTXyUPEN8x=As`_UTeN`=;V1{~Sv|RRck}Y%cPbJrT9C1)r%KTN&TbX z#zk>GSJPWR|5I9i{t0I03RHEHbI3Zr4d~%QRc-+x(AE}%`wO`iLAC@D4GEhdY|~j5 zH-C7Vz@mMB(oea$hYTpcd~Z zbXkG*6@?D7u)y-8{`{OCmoCNb*XRxGV`9?1aKQ?w11d5e-VG-wkP~$JgE=puyrG@F z2!BXOXeg8_X51`D6uK4`+-gJN-_ekq+0y?!Yy4&6&xz?hui^+i{`15H16(mVVFn#| zjNc-w3U^Fv?>Oxi%VNf+AGaMM#65bU_c@!_0CKst3t#7&JE&}ne3U^+M@`+1Dj!z@ z>b!i|R6n5IKGYPzf7HDufJtI?B=zyjLJk5EBH6xuI|+%2^T}7apR0CBRne*$ATS7E z;w_!!i4!Nr(c}P!zPs<}$FbREqEG{SVFn5`ktR)@eBsm*Id&{FCx@St6JY4aj~~<1 zR&noukvp5$<;&0|i&GXYzd!&90R-4tJbCg2OZ5C%qXRt9)BFMg5NRvtkCuFBZ$II( zU^Ph>2rm5M#f$gv->Zk-0|W5$8>j+pAc&N0q9L+}=g%ucnmwW#DG=zdw@YZ@1Cjv~H$Ki2XhCAIZoa!+ z*KH#H_4@laxnW?v8F2a8l9lXbM(*$~6*qsH-w^!Iz6R6MU_`$n)EC&E-~)0)-iJFQ zXle8;egr<=I`cAk=FkzMNB0h16majc$;r|yZ%CY-mk2%%;YFYu{_SPYiJ}Z;!vVZa zk#9IvQ}#bazlTt+TVJSPeM%Et-V8hXdfN5^=3^rWXj2gE2u82~(HWVutgW*3#jos8 z-O+WUnS)@VrmUP}B#ZNCnnZYFgQfJ_r@KcRB914=wOlX3?*X?EY>D1t@P3Z=mAN}7 z5SWbWCzx!|0Y!;)v|~Hg%`EqJs@RVT%4aVT5wR#7MA+fEJC{RjmNG%h4!dV z=ZmMfFJ{NfnVF53q3e%=nFd!0bWWJN*8o~zTe6J)O!z`H4{4>~eZ+TWbJvzp$V0hCs@S9HK8pNK!80rR<3*)vEU=_Ngb`CBK;Qh!^;#i9 z_Fsbsh5=8)xV3Kr8@*h=(L_gD<=FY)QjCiMopOX(XCj0QUn%b~P6(#>8YEjAdPL;L z^!~Q{etzfV<;~3q65t@@S3fphUS4+g>fYW`BpftkefN-@xpCtJg^IHB9x5vNaNaWy z_=(JW|WgNkuC(3Fz|?40t*^IzP(DZ|wUmNy|&&%z7b7 zLnT(>XuWJ%@+NB>o=5Qi^$t)hgjsEd9XP?l`w8c1TINIiyIWgnqZQONG#23_)GfYY zjWP%m6Drxiu2Bnr)1#RC2&;CYORLDJmXbF;D@$qG7>Wf25|Y!68|u{i_iWfi5_wtV z@JB?ApVSrperVVgZnm4;U#CiH4ThV2Zwv%)0v2f2!D*ekCvHbaPfN zfkw2#St+m_M3|NlAP%5202+kp+AP=+x_kJ%pDA5Gd9s{|&Y;85nLB~eZ9#v4P+$#9 z>%;XQNsynl8!w~t6n^UQ#Pc2t>h3kos$CZm!SK}Jz; z*TqLWyF<)OOiZb&bh~#;O8w@N#jT9$V{uNtBy`Ogz!Jie@TK- z#K8=Wo`cfgu@Mw1VjODHwjpcdKg)Rg*&GU zcR*46i#q@6Z|Z#a!~l-)_^$Er&IH(|;BlF1&%6pRZ66F)gl0T!w0HtzhX_BUr@^OY z06>TaeE?cY^(aHHh?(F_iVX^Cf!QZDh#q_85Tp9XF;(qNM`0igUKAG>mzKupKY{^? zpmL*YW4_i&pxH#H_*b^J!0PeFy)h2qnwZGiRyq>ne4z?|^O!I$45pEAD^5?J0@s4k z1b8wfil9H8+;LpHCJGLyg9iuU=2R44e1@F}SOO*-h3^Tp*vF0*af~z!3bYFAe0sBS zuhU30LKEVALtmde+!m1Gy8{SgPDFP3hT{Hc31ct;_ya9**g$eMCnyy~DX6K9*9#31 zm+9z~c57>E4>B#NB1jCLa-w!CH;tY?4{wo_O7?YnJ}aCmpj+e z20wbiOd}liI8l_yvgG737^G)W(Ijv~fjv|k$Z@>QZQ-@kt!92`syJ%lf-S-}?u`}7Tfou5CkCbKnDU&is7 zh;h17M;d5^$j<&~QFNbvMXaT$um40T$`hr;l30v)kf*>FrUxN z?B>bp$HWpNC1tjLdxYvZjW{ zIVqSI;+3rLfqp>i;Mha5Lx1+B*nC6q1v3Fnk;4fsqbXJ=^f%r4B=pI|`XCHLhC%z* z|IjujKcB^Q_gC8MqE4+IGPzV!Q}fcYZ*p|>oD^JGKkptbZEvQ@jR76Tu~F_FLHE3) zy%qUtv%33~fr2f1m~=;j{%1$y=8YTq7q1~pU`tEo+_S$G1e@esNTfZ)pI>4qCl6d1~ZsLfKfEC1guG6Y}%(K|uh-LJeSaLA_njMtK33>^3)+jfe0NWNN4U z0*8r~gY_IB)&>d~JU8&5pM|vcg>cQC@paI1^1c7onfRN1;$Fx@p!qMfF*iQ>5fDEh z{>>6`PR=n5QjOxv|77_{K!D zS0tF1`CxeD`(}2WQ2Vamy@-!aX*Ji*h~$dB+hI=L+@QLW|77Bn&M&ru-8TL?S$xE} zA?Vo`Ii38nAeV~gC4`nNA<_JKjP%bk=zs4CpSFD{A5LTUEQ>Si8$6X|d zLz;2TC))<*-1GlaG+8M)(obPNE42H>v8Rx8B0~GY zu4_TN@J;4R2aI$6+9*v;6$7e>?b6og@YG2|!^pwm?OG}Xq!UOl%M|7gutx0t)hInF zWxN4Bl1PjQw5sW*Y8TDH?+fp(i$rafaP)oOYrKT9jr<14hcFSLcBG_mg&MT9v=kH> zk)p}c(z_aP>4bxd2Pt~moGv-M1CrZaBLE*liMKgRMY`ViL=zdBf*djGLQ!F%%>*|u zRfV*ztu0^ASbsmD^VbV-PRYUZyBQO%w|^N*B7A&&eybud$(kY}fPT^PgNYT6R}qTE zg$1;HFeu54_T&8Q>~R+v^rDQ7pC=|J%Em)#KERx-866aKbx%i6PqcH<9bXw=6-;yO zzri0(6xezAm@T#UVlB~z0ORDwKq|u!Uoc5*YlIuwyh_O#C$9UUA;mcHC9%_!i39kW z@WDT4jDI_B{(qY%erqfpmq&Pz0ic&oK<(eVXU{Wb4s_}MPx_t^{wy$i2B5ByZD`(} zp$}^+NCNYJBo#}Di}$XJuO8GIgD>PT`iz7G%eU_r% zx{>kzYaXf!@0r=z5Sc^Lo8WVV1Nz8^0hvRW4(Ra%Q=&-5m0r3cf<^&TgR<&8vXLCA!5#nvKG|8FoOL(R1koj{>+b}hK z16_!9i4_$ZvVApwOMHA96NSwc>xwOPtVPhSF(Ov zDO6<$a@*@SwDENqK19PS;D2$0Y5fd*Sxt@iphWaFf-f1oY>UxNe7=*oYzH~Yz;U!}~Eb`hh)bK@Fb zlKKb6Q6Dg}yQS_sxZ_J2f{WnC4^lERfzH~j@yx4Ln?>pUP}z4LhxmwAY}^KPH%lER zBL1S4fy-~)wCUd5$F?@SpF*j;GLSk!vi-toZ&JKE!MGeYK%^M2zod+*sj0!igM^d; zj}1G_QF;H1HDTQWjRBN~-c|R+ru`>XCw3FerI>vEd#C0o(^h8ulX{xDpCM!>m22Mm z>orxBt4%=K)TTgEWHdtwZ%;Uz-0JP=xeE=2g7ozCf!@EP1tAX~N=ljJ3bV3SvH8Ly z9Tv8)jeGf`N6JF-*}pV7-ddf6GnKQBg94}>n>7Jns6J9BCMM=;Q}xMu4D#SYu(aB< z?Cm`56LRm*y$k8HXTKLgFh4IVyTAzdq`UhXnJl4Pn`!!Jhx}{Xg7#C$itF-D+`7dw z(x6qz5JM?0mze_(v9i*+wU8?QwJSkux~|MHdoB@7fd9(p`0w87^8Ztj{ZFEF>AtYl ze^YfCLRfK8?O9|+9G5U?(QN#I;D!8X%n#cQ3p3=Jz`#tsR~vIR<)yf4het->3i_FYsfw7PVVnf~s_>V!55L{=fpQ!3tI*rAbyw&gW>Bs9)11LS3B-4(ZUh0aO4@Nl z76&^!g*c%H_;;;L3G%;|L}Se4BphCVxO-H)@JE&Ox;+`=sdJ+(ur6t9_keG&c2AOA zI`G5hp1(i;N}My^urq0(v9RuKrab~S%f=?-;oG#)Kf~U!RvuIaDsXqLE7BN-eW9K2 zB)+yjjX)U9K^@|%O-M|%b!?*Hg-uQ!RL72w?#SYhzDqa`cweb%^V4BvJA|6zB?J6{2Mt_!do&U}v zq=KnOilo-B7~GHB4|1f=Iq|Bit0?Z$7f<|#{Mzo*ba*aYZF5bZ-ED}>F8P!M?W3Z? zBs#$@D6EaaFFQN_GE8#3eD=(9>Kmk_`T42G{LrDw6YSgRb!RA(&lM z#4IH&IzX}xmp}P4t*vzxl|4xK$wSs(#%HamFcNEUnIlQV{F-EFu5`TN^`gwjTzv9z zJB|k@o!TlZ*dw)h$V+)&=(Xkx2Q`i#N`F6`!%lnZ@?+`4w@yTk#aeu9aJIfV|8q4{ zP;}&(k(-3tNYwpCx22gwgZKCQqV`j!`F^{$N2b#~{ z?l41nwNp@NzzAu_hYpNWWPihI2Vn)n%}Npw5P+A)I=f@srT|$LvN$>#wO&}f_KuEd z>IV4xXJ~Y#_j9O3wCD-Rh3vhNVcgcylqPzrsN#>y9Du{!MX7dEe-B%A6QtE)$;QxmH3}laSr&g5T z&0DtArw3OJRyQ;lzGS~sXfs3->2)t4z{krgGl?gxsi}#aNqqWZ$K6Wh?TN2u!Z;{2 zGmO=a=5Q)DrDafa;ViH5hRd-`xjzK7#(OOq(=nxq!gSEnWo@-bj|YoNx6tl-?+%P+ zllh!x2|8B97%+mdZV=-Q8#a7Tt9}#}MM_R?r15#=gj|RfE#bVMY`N<&EBWihZ%y^- z*%bBcy$ioiwH^;OsrUQ$NQ zZQK}`nR|QQy^|@>vdC0dx^!veV*TJZdeIvXI@B|-oKaDsip))gYK_+)LCM8yZ{Qm| za%2L1yYFdlx%?MviE&q9UNXpj89OMTQgJ<_J3-cyo~twDmc!8YPO81z?<9rwx3JGbj z1X1nVSER)~d~G;};yb@M=H$%Oxk3@^)0kT6@5f6->fCl6BPzGNeQ|4fRV!X8bnh); z^Z=oTNfLA<4|>9ac+J4T9DV`9t6!MJA$LLFtXl-(ME@9fO*$^~t>;1=%s>;frtxmArdCGQ& z{Y#IPa5VgG_%*>xPxA8AQdRlN6pKfeOZO1zZLc&kAljT>QsN3@Xm&t~c2Q^tH60x+ zQbC%jh7J(^T1IoaCcyt;Pz;uiLnj`an8UcbgM+~L+=KU|E2D}{+qe^3gv7-eX=oOw z_Cb#pj!uII4@C__b#ZaGs~oox@d$S7ZQNB1XwJGEJs(>fcJ7h3;UHRpd(OZk31f?9 za;qlSUW}x7--wVuwEGxq<7^=`N>;@f{66w4%-bW&t{aG!N&I<xr_}UB&$HvBXAkxt^+qNy=VL}rvQkaV2P&vH~eo5GO)_N>= z6NR3jCGzxNUJQ9!K&GImIA$m8h4sn?Azq7npDp3_XNXmBE#xT}0U%@m4SGJnWGweRu>5Vud$+c4e{#LBpg@S5TY))nyd!%AK6Es^QM_!AY$x(yUD!%Vw5*ri zq0B+$#!BRo(VxwWc-yas(CjA$Sa)|xq9fA#R{3k7m*`@fGs2<}xP Z+bt$pyJi&j;$Ml*ol%fVlhpg;{{u(st=|9u literal 22755 zcmch<2|QM7+diz3lBh%yB@HSOipo@Xg-T?esm${{PYoo=6hcC#BvWQGR;G*@GfQPA zGS9x_uJ*I{exCjR-uL~z|L8X;YhBlMp2v9{$9cJ57Zaw~yn8bV2?@nzk&BWf zBx}EukgRz}wiZ7ToNvE|FPlt66wFCTw!SC+TT^EIQiFtKAIas5=cR3)jda>8Q%|o5 zj@Pc;zdu!^+>&X1C3#nmwxr%&D~=*jN$D*+6b7p7@SNCQp5l?^ zwMHxY$(MtZj1TtZ79D-abI!`z$yv18nldoID)oKMgxyMyx|LNISGeuy>%7olmG#t@ zw&7w(oKgoz))2pW?IybsUu?D{Zo!xFU5a%0@|h!@6JLtdbu{tic3Hx!fY#SH@15H> zP#0A;+McDvcaVx~{o3=kwzk8sCML`l6trsQC;K<7#@o++KY#xGaC4$meA7s2rv0pu zv-4^gzkO=ghA6W2cPIO6vu0WI@4e|CYsT+68QO-6M_qDtM?{t2tX<0nu0zJIT|Wnj4bqz;wexog+1+1b6Z+Lx4+v@yvoPLhSXaCxRZ zUAIACY5al}-P3hkd5g1S;b$%NriYrWzjxGiNezGOaU&(Uy&)pOl@RedB_$Z=zjyC~ zw6wH`_9mt~ckbZ*Kk1xon>@9<`uX{LYuByIh&pZkT{+|ft6D*x^XkgTePOaQmP7tW za-Ul-_t%7~Gj#;7C z7|CGc9cTNjSx42Mm-Ix0NRY21u{b-NQ{*2K5?`m&R~<6@%};z~szIE`xXU1=Xrwib zT{-)@q+}%jWMiC^c5T?H@ujlp%YH|X9aHfB*wv*vyVlP7t%;bJ7&kY~?3c~!@201x zfByWrR$wt9t*kyXPAZoB)Ts}>6E%z?q_3;gNl2c*SE%LfoEdG;&(AM=M8~CB;g3h; zJlkn~oF<6R)+|{yzhJ(Pel%Dq(_pYQt^eBxKZ;ft$+(eE$>Clb3h;PwdewY8R~HwD z#nG%PhlSDych->(6ol`DJ`HaKdIA)T8fx&)eWsvX|>#_|{^=i@Hg3(dx7)~;Qvxb($gI5Eo!&$u;B+j_Y9 zn(_R~^5S9fuszh&>3U7Cuz0RLJMC+GC8|#J>B+&0fMZy+&Unf0-MhmaXA~-47jjyy zt}K5o^DZkZ6TWn5dZ6xJn1YH5KW^;Bix)9h1M!(r(8-}A+Z3nO;F*{iIE`oLo0xc< zN#mW%Cj8J}vBO@b8D!HYs=g7`rHJv}dhDoC~jDM=? z-8%xITwHLu@k`f+g`4`Ss;XH=oqEPw?vYZert55*G^vZcbir+_AqUA0YolXhZI)_ z28mBYLP3F!>03$}qrRSAWVoS@4%ybNG#(|1>WyJZadDfrZhi7Wql(6Pb=g`;NvSWQ zOMNFvQKbCkV_Xh%CcYxY9pC0Y91f=B&hC4-b8FlG*Q_4Mwai58v4Qh&;DX$H1VG@wR*Jc=zgxTyAuJ zx6E-yy|D)~TQeEg@g!E^@qO#>kL7P%UFsJc9hLK#K6&a?YfH=0@@#iin&8SDbDD#c zlwWvwcUrB0lC*U3fnEsXg0@83r~mB$Y0U@dCRh|Ky% zse30W=Mcy~)Yg6q%W+(sS+j0qx>rj6`{b0AA1x{Bw^HO60|>{~ku2S!*jrj)(zDjF zCS0JmW)2Bqa8~DjVj@<~h<3Q6)#A)3X6z_l)0JmyWo77g;zkk4s2he^Hcomhe^xbw z{8M8i72)FkZCt_!wo6dQTxVHYUgp)KP5)$^jR?cp;NRRt^Dt7e;~s&|>UinJKz21J zEUk?Gfr53H?WN6fl%wkA=H^bAr^k+tj^Z(PV^o5fvP^`|^I^#PjH8tZ#>nuco z3~TFXH#btI=vS{E244_wn8aPRI3_=}8op8+;cS|@@~)_GbtU(bUtJH&!?rwIa~++R zGoqb5PjzC4dU}|s$kGLGMqg)1r=6LeUS684?KPW6;9#`*d}n-o9ML zGc(nDyV-7PU>l;*&G#F%#AIcgKfk>fOfSM~LTiywR&)@-{XPZ#%=g?ey_37O`Z{y1 ziBZ*RM1GyzyS0}j^gku>TaC0V%}-jgYN@M7IgSl|Qgf~rogJuCNA_rKZLQjDZe|vw zt*@`o&&M}3JiKA;+oC(`a1sS6sVM2A3Y4c$p7bv$6&A$G9s885cIC?E;hmW;7R&2W zge{IuV%?qO;c0O7^z_tkPOu$GDQoMXN~3LRYI0tl{)BkxMnNy+tho3w;sQgqFbTb$-3L| z)0bQaSv*492@O}mwmo~4<>irXE=`QhzY=g}13h(XxPi$78+n4FgF5hMTELx*1ELtqj1C{d)G#w+~}T{E+?nwgxuDkAcHbx**|S^(e+_qUi@ zS~~W)(hjJ-$0V4-P>0$r{V2mcB`&4@Fnh7ZjW?q<)?)k#($fBJZf@6Eo}IW!Ff~o_ z@}n9y7uVU<)m0_82GB(u5qt{3^ID;ytJ?R@+)sEW z=KVE;1&O;ziiUoysL~DSX;nYXu$|QE>%rfiyis&JskzKYcCXbsl7Unk=j1IGr+)nS zfoVzOm^DItOQX)SanfzA_lDLJYXcn}&D+|lc7rkZ@86&8c2OWN(AAkKaB7j(!FkV3PCn4dx|KBK2{_%xc z%ZZ|>4&GA=@?n{7RZH{s_U?+c5S72v5GyXYx-_|NS?!wuUrIVhKxmV)L>lPWqSvPyHuW3Pn> z?JcTe!pMx!R9cjaS>E8xBhT@8y&~I(pn?+SV_lT6aYuGtioV$8%Y!YkbG=xfrlzLs z1#@2jqYU552v4 zO!)gAD9$$9(mJWCGCGp9x3$&p=ysUA=AkLtdgQ$t>-!&U-`EJ}B&4;y-{u|I{s9ws zcC>vKlcB7**d)&q_wnl0(a}xuzE7TTYn1!gPWIJN0zK#5e1Csr#9)VhSc4h~-@c?pS#{M$Wio-*s{JI*WicQB1>)mzHXD+J@}P+Cm~Ylj8% z*-ikC1z?*_Ll7d{TFNn&LV&FAUtHy@F2TpWoKCWSq&pW@n8_`*-^F3Fnui&|1nDYJ z&FOOb7eixP20_~7{F&X8f_>T9*~mUh`gugiiadqNI77RBF~-qhx6=XrLVBJ43xQd- z1CKM;p8VFUpZr8E$fSJryR<#2wxJ;rzaRs?xE3O-pm3SJ`%Cq=O7=pBp}5$Ml#ELy zv}!&x&Keel`gErm2iE(`v}YNs-MY2^l0=qq_xJ8XXT%Er?)LUYx4ljXD|fT9W^sM3 z9UTq>A0rAJ7bU4PZoIvF$%E$9&m(_jVK_N&V)G@5-JXYz92tyHE_mqSvG}8GZ*ahM z>Ql}uOH)%88H$ddi|$~y>Yv=*cO-wu@TcThmWQn;3)in-kA#;MmYjbNpxpOLjAD*i zFQ9o)@L1lY7#?fL8L7m(oa4PVxOxE6M!jjkBh(rLrv@B#ZJrj+uC}FWUbVkD15Aj# z41ne3>8Ys~XC)b9v7$^(P5tp$4nolN>(?(_xF=IOJUo0=qVeI*W6cQ)@A;zJ=I2ih zi5Mm4RbL3yJA5vmJ={z2YUwvo^>+~~*0F88r~Mv3c3S!&oS~?4{W=u`Lt;Lo7U7Ve z1hwVNhyugdq-b{2J^on>u+(0>uQ^F@5 zCrzCG`S!Ev);=pe?8lEYoHp6V<>!@^|4eDU=I6?YI-QzO-Yi63%&$;|dtHI|W9PFN z4egJ_L`NSuaA2gnP%Tkb|I-jzVScy=R@3w6&jAJuy9@YFoeD^;w;Ak?v$V7X29Q1) z@J5L)%In)qMLVBGoYmUK#fia}85)U7bXuet*01vKnSXqKzA9wt_L_C+pWch2Fc!9d z;kCswk2sM&hn-Tpp{J*}Fy9}J09gC#=P@-kg;~s1YlT{H9~Bh=6%`rNlm$6AH}_Pm z85t7@hJ!BBGBUa+caLh~0#L^BCtha>>ZR!U_D!RMP2n*rcicQDCGnh?NTj50%~#vn z+VtFJiq=u4%b(-bX0XWHqpPb6I1(2X_4S=Ad2sJ^!O6UuLjJZRjx(*=Kts7!qgO;k zPH5QHuhhEc=P#qS1D?ddmK~9LK^5U)8u4`iN7CGD$oS^ug|!C8 z9!nJA&1aSBSKh|S#(OjHVqjzx6cps;TlzL5G`DtTwpCpp%YEYYgJd=#CjcCQ8l%(P z%|5CvED%u^}f7)-lk2PKnTdhHzkJa{m>UT4gz8Z#^+_axG1|zD8wyk>(PLRot4@pLf(u( zqiXR@L(iT)%j$MgT8x{SX!MQnvOfM=UUvF>!#m&sa34i{)b1BoR#uP^)4sm~8qA7_ zxY_tpB1+iX$iTn>{LLmNJV;7`xf?b%bFXCLvB1*>SKfdr@H;HNmEr7^Cr_8pm6)nk zsl>4Ga5dl~pmTiC(9_d1GOi58CuhpPh>O!Lez1*5qG4Gp@-=DIB+|{9u_|YuID6La zOR+nm6gVA~Hx@?*udrXUzj^4u0lxWfe&9BAeykYXm^<#`>dJ7&Oat}S)av;}-Y!sz z1xpi^iT!S_uAUffd#|n&-8Nr6<&B&Y1v;A_j8e zJvz*rX*mtkdPFc^U>H-pk&>|bzU8CB_!^Pn9W*qVfJ8n%J~fPFw-r9Cc*KsJwFeiv z?r6YJvHK2CgKyuy4dtgHxxIR`nl|XUdB(~YvCqj^01r#PfXevVCG`51&8II%ly4B( zU&i+e|KDSse+Efu>72M)z_+Rk0apT0FMz4cG4I#X){d8cHKX;!-~Yft;=#ac^(ZMZ zDXHs?W&D|qx~F`&1ONCK-_=xSHQE;N6&l){jn~&)zZfJ+t`?(dg&vXcv%kf&6_tL z*zO(`#msa7;f9Ngi<2|8I@pCON12U^jOF2e7wVlmUGLvNd-`;GR^ppCZ&2J>&auhw z2Ja~@UdtW+g>w{XO0Cc-U){QTZ4MH0Zf@2*b)fFCfC_pZBa4wFh36eG}1s#jMh{`~2iHw(>)NxKcH$Kz*Mn~El zgYljb5qD^HLnd}_BcM=jS0d51mfk7#@+&Q4pl)}rb@H+3YgzjYzeu#vtnB7+1-V&D zvsRy>yCVHXolcPM!^lQGOM9++_wMl+wq2~Ps;GGA?tbLRkq=c>(JV(Xcn1zdmpnx> z!?B5JsQVFP6SFtpyGS3Eohs#aK0+L7ZTo#6IMJq!r(d)6d~_WDclvp}7$K{Fp}qTY zX5r7{2=CqW!QlJR3{=FU$WEAb>D2y&`i(nGe{4ErZEc;SEGB-8dNU=Z_ly>&*Iq%! zUAtJQH^)fE$+L=yiu!-h*t4Z+^FBj1rr#f*x3MV(zkdB1q-2I-qHH|qsQ2&Rw})KT zH!xsjW7F!hv9q(YwKY8Vj+YD0KAQ|(@KY##((=MkQ=&ZSA)5xj$W`?o z;=`v?dbcLJ`XD~Mx1k;} zJRW&^9%o^BPWz;?7po2m6akqXOe#3?)4QUZ&b28Met#4(D=Xg^`jp&_8Xoj`NJxnF zXj_c*(M?QOVk8f2uOokOalhS*i~9jWr!Inp*VV-YY)w*hle}45dDl2;@Zr>&$ zJRn4X@cYPi#%ams#*OFKS^TfWfP`_O3Ko458rpfQ8gDSw6Upr)JyoY=@H@PD;&HeV zn3iRAelIZmUqzXCh_-HvzP3dS5Qi9gxiy7-xH(Q6%Kbc=d2jV3Z@U@59rVD%UK8wB zbFx}@ON-6dQco07NB8f)OSPSb24fj38{ed7X=G$%V{*1IkKEHwJO2lQBt1NB}j1P@=ws98xcMIDKhp39S8{bLYr>MGg!O z4oml(+D{I%arzf&*Zk4HXO(50PW#u!JQe{@ZdiqzmD*i#Q zODo>~rl;KrY{l)ezpwPKUozERb7tzghw`t-Z=F9U{FAtvEw}N}6Vr)f>Q`yD>@~iB z2jS>BxR1{}JFF=`u4Owxq(QuU61K=6UaH+m^4#Mb7?F=>KANnvAp4Ci{+S~&THG+~ zGWG)u&VG~M?1{GKZQi+oBl5@gw3CFAY5!7n|9;KC&sADySV-hCf#6Un@bUBS*s+6@ zVt2G;90uzrLr2GBgh2*HsRGn4D@((4k(I{H#f6ISDn6c^oE(x@N%iT(b@hGQe}8N& z_&ktMbvWFC6A=tit+co}0op88Dkexp#g$;uLw+A1Jc6YVCd0x;)KN**a2Gwq>~ftt zAUs?U`mNEw!IBNaiK5<&{NFLbFv(CW5k)8}Nz{Mz^uq(hV;4QW()H`-*pCEO#>dAW z`8$+oD=jSrJV5xoSK`yM^J(fCD;eT{?PrrDWVEjQPT8l+fpX|%T+^@7X`nDA{$>$x zD3W`ME5;G)PRy3M_r=2_Q1Ub+$VW^p?i@LFYC7YSYE-P?{I?y12fu*B9$%4YVgTFj ze(`8P{SGj9F)=aFH_G%tK!ZakV|s9aa`F!^fV$`2day$B)T!~2t$JxI(HU-@ivrl+E2z*P*4Eb z`R7Z2)_F$}%sNx5ukDl?7$Y9W#MczqO}`>U?0Z(|Yvy1;x_O}8HkCs5sWAMTF@_P!s=esK5ub6nq1>B8sTe^E#a6rJ$9Xq5XB_9U|UzU&tS?;(~ zHUz>bon`8oz2XNyR|vja#%|mx3E&! z{iCCRc>VMt+(CDv$VHu3muEqp4i6120JW;Vv2dsQ^8GtoVCA6p&dnQ^c^{iD&HX4U zIu~)BCE!ZQEmIIHjyp3q@bcy|^4opX7Vs=d`siPs5?dAd zYp?hN3O+gX^&1~C)WovK>^+fc#5a6&$3|TR)}r3%}n|zfnNNP;FZ>u zJ-*J){;cF>#?dNEEty7hnQ90|pE)`L*OL?-raSDpV$pTC=WF!|Dw3;r(*EWZ`Nybo zUmVeF={@)Hlr%RI5+THz4vv`%(R1sMjBoHVye;NJE{gO2%Wv|}=lCBp!SBQU)|1S+ zr8w_={F(B?T6vOZzo_M}2uJWAWb9o*k$*Jc=;6ctkeFP2Ouv?vl$1arf^@5)skx0% ze9Kfsgp4T~mB;JXCZMA_9yOf(Yw{uYQVfP#SHA-ws=d%zkVymK2qFh(@FS{Jl#!4Y zE(r-;iK*ADd?G=eajWDZDAtFO6O)rWwr|g-`#bib-IKwYnVIQA^)NEisPpNQCqhIN z1-9SI%ge>5rKP2+s;azPgz!L_jh2jPT8B^shS{^*eYJg?l?Tqb!Wy}S*1czBTKzsBF85Hnun zH~C!T!*pRF{9ugak?rmS^T6(L(%T6r`J|7=9ES9E_3G7Uy9%9G!K#gHe4q4M zid);*xHdBLeS;CGDs6THPsT04MXJo1_ZolDB;2EG;ARXg<5mfv>*{QIS7y|G$mL@p zwWlV38TVmanV+9uU4Y6;i?VpH8pox=#xzr_A)=|>E4v>}i z9w5frc_U*BilF9B^>LliJ)gIghJ3D(# zsV>7`i>0-~v_UKn7og*Z+kZc!B?g<4ii(Pv8RsR5h=_=7+qP9n{b$8xgo-PH)lj`K ziYWhdx=N4T@T`&7Ap5S5B7o+i*pI&e?b0vQ#fjm9&Q2h>sV@!6_d$YTWMl+n{AwV5-$25i z?#?+AkRxy*1R0B*CMr)wa>zf()K4-mjcU@ctBwo}=`}L}jlm=*)E{ikW_ zg0G04?rcw?QBe^H74gus0ZGdsCA)0Z%HW`MXy~;gbTpStERks0O-S`gxj#K zv9C?h;0MfjSD&z+G5vDU+88)=Nv3eg3uKe(zJY?Lyl@mKg#N|(}za~MlhoMZ#CAn45fRZ-(d4hd34CmbyAEyQ(PJ8Rr!~CXJ?7 zGO+F(aCs^H3im>!tfu0qwKzKUqdE(no#!Wdu|Qz`Ip_i*8MSI^{#z;P3|uQ}!trqv zf{2h1WN9whWYufNa$`w@FIE$(klCXmBcaS7nmT~%6{SYLk+ZGKY!|1*U;g*qc#BP0e|aHv0Scm@Lj1 z9zGn4aG#`@@vsEu5t7>(fGz{7=VBy@Ou=2}KZdcfroJrC{%^9J!TRQqW> zE)WQ0Oep+aU0tVoc}}eVGY<4cLFoVy=($%g%*h5L!)yILJ?9&&F(AG#lFfs_hKi0N zL?K}msS9s{(_rDc_`G+c9NrZY8yoBA*Wk-690nqtfLJJO2Sa9`mBL4J*}jS1O4J*5 zVYp#Q6&1rqZYQw*ckkW}I3|aor~~s+`Q-RNF&~5n(nmo>4?aG4RfCg`$tCjT(vri% zMuQVnf4OpB@YNs)2<6DNCAWS+-w_WNK#uIg#rO5~Why*=`c(1y_1D_9i~wr>{ujeT zbkCQy4IH1rvPE41+7bj}XPP#pque!cHy#poFfv|c&p!zmxQ=uypnP?>;3`6bmRNm| zNUcKfopq!bV~e@*o~maawCuYVLmi=P1oIfHB2jN*LY-@ISo-?)eZC@l7#KD&rNDz4 z9PI1s`=@OzloHjz=r33H(NxRK|i3wD_a_yQ-oHWW4(E7ibe|SVc_w=Ng z^t^+BkX!u<>~GgYMYQDoNq+ad=d$Id+dD+L>qn>T~(^^xMUJOg>gS7`44LO#8{O<3>i zu2uzFL8P>`J;UUZ{kmhDI(bgQt<5lSGTIF={roK+|D{VCh`6UX9i-B_-^38=P!vv_ zAcjm07JnY}KRF=fY)~X*!|EZU-_8G3G^s2V!cS1-5SCLy8WQY=IDq2GxuyzL5aLCH zQbO!>xB$X9j^x;rCZd8x|u||U<_S`uVCYL=tdKX=&-X(pEu1;Zy27c-}*msr4-b`IC7aW%V{vgFw zS(d{!-)@?d$T$J;wY9cxdpDgDI#}QN^3{=~LouU(wKnea^;YKQQHA@f-gtw$(jorf zdqZrk;H*vR*-V8of!uJi<`8pJj)F~VGpC%Bt6VniI3yZ$qk|Ls4eH>t`~eXZy%eNC1&I01WG?^>*XJeABN&j*iPPr{3Q}Mkyhqu>xV;RG7)}&u@C|qN_Z_|~ zZ`9T-TB|_kelZo|TA$U_$B)&+mX|wHlYykZ3 z)RVM3bRaeoO}R`O2yU3t2=efcXzketUsKd0KQ%g~)Ejd)TwB)Lh}Rkx0@|>%u{DQD zDJw61zDK#8P!ld_tgqi5E54V@Yb(xt?l8Z$Cefb;)#p=FQ{8L~Ee%b<>dGQfrN{Vj zU`3uW?`vsqH|G>1=1%SbUCl7tJ|Y-OkWaY~b2S0Iv9OPMi$ENbeKSTnk z)#4QE_k~Yd!F%^`kS?qF5{V;R6Bi}O9Ar!T`3cPhabuj9#9}}HY{j0l7B7)A*B%EM zgV@-sWkUSbn?YSoRr}ElqTlk2S#d+d`u{LZW#0{ypiIT_)ekw~3Xaz2hUt zxb^mgAcS40uu!Harl$5lO(hWC!K{kNF@)xa>d!dUS(lXVa_wogG6-xqgo)}mipE7; z1kuh@!$^JAPB9qM6bzRi@;NXdz>N-|A>u`WW+jc$MpB$cs~(!zYKWiTWc^ikz>K6c z;o`?(_L@STyJ5ctVmwSmRj|Ypfz9cMc{_{>w9D{WLR4&AO%b9a64Gk4QXvleF zu7ri2b(DN2V2J^NL!58mJ#JV*bc77{ZLH~Feb8UN#C~0o?G+R7X*+#UP%Re2nDfW%gfB zukX2JT>4(cNw*YZaByw<$*Ac}xpw1qBvF{D7+cI`W25`T0_p}UrdZw#{wQzaAt7Sd zDLrZMqCxZ7qqO)f>zy#!KG;4Fx}>ipotRYHG$1Y1{;0|Ly`u zU=hhUi`G<4>Pw08Df@YOLx{*~$;HKGE8T@pcmBj9ci5-WIbD3PsI)aSlnWekA|t;5 zfgr@9W(ZD9OzdgD9^Z5&W+KX4;0>w*R9gqPyCa>QKY!=qep3sJ11`mYcUoFPLPFaK z-^|WT<~#fg`-~>eV-6v^9dyawE%4O&NWc{u*O6BPgywq|CME+=vF;%KEn=a8;^lHW zykacOn)C3;2)IC`#-G0f*h?tvyVK=sC=^x`?4EwDW!u%HTbmge7y!t0Zy@cVgyUW& z4OSR?a8QoJ6>%l{9;d5eo9vEHA1`4D!T-QG$Zh(i7&o7ue)1QXM^??Btl_2} z!^LM5&I6;Pp`oEjH>ICc?XSg2Kg4WY<12EpaOOYwhz&y*@QJ%SuZJr84LJWG}{L zOC5BNQ9pDRaMx?n1p=b)szAQXQBJzf(lYiyvrtI%=DBmX!^6YtN{SvLx?pS(5wNNc zx*$AFkGAtLGphsg31x6X$$5sGwU+u47*c|WiOD#C&_FP77zYOj zv`he3>PzrOeU!VI;eK&H=oSLmnJ~>c8yy%2ZbI4}3MXXV(^&Zu$W#@W86LiOnQf+D zO)aJUC%D^B^8~84;Ie>Dr!M_;mTq;R)wy%$FafU-g{j(;2S!osZP>UmwQC!>vnN@6 zdb@Q|`os?gj*W~T{iack_g4i+@gIh=4y5za5Y{K6lV-{Sff5S-CMI+`TYT!ICYq)6VTgcov}^+F9Oft;AX01D24Zj}0gxbi zxcmCFM$c?^y}RPK2R|kWg%^UE#sj`Xcw;QFT2ZM$0boCPFs3B1k9d6+H2kzds%STa zrhp~h)}}~!aGk|rx=D^`)%}^1NuIlf$wG(H>Url1YaHZbV0e2JHb^!>p2=4PVpORY1C)=7DxMkk zD@YNyd#}eyhw{5@jfxGhMd7fC38axOM|dQQxhEOUR&>KokuIGT-`)5CAaQ}L6-5&& z5-{SJzQ|KVcIIW1-c})EpXl>IjIf~KDm+$@2VvODc3jLv4UVBkiBj?tM37h@bF(UC zvO*3kTwNXmj=e%Q2nQ>O73BV$UBpy&Tfpvn04AiFhoBVIuL`|}iTLQ4G#s=kZ||LY z7C?8}SjDF=jn{DC6#J4Ap=ufCZU8!9aB%!1PSw)QOFU8|8tYfJOyn1CGc=fE_ z0U9w>&gJFhXksaN{(RrjqgPm{iCrf|G=uspn~pf3w~g#-DyRskMNZs&w|?vI#Jb%5 z(}8{?rOil_m<=k9B|o?riQIu_q7o-<#z%Z+Bp1>%=Qpt~~yEpnwo!msL^8w;XQX+G;0v@6ROob^_po z*a|sTu=pKp7`n>B0|KTeYX!UWY#WM?pE`LmK`9HpV(w1a|9v5K2T$jQKRh}x>m0KJ zl7YVx6>8c0_v)xr&2sVp)>PXQMUgSFD){+r#%~bHK?jMpZn-2O88?;FAEw?1(=Jl% z*`Eg{F%3Mtlf7oPmX@cMwOKv>aCfvRjpBu1>OjQM(OkGCr&H0_A`^PXytIY6N|cyx zCiX*HLnM9lic_i$Eu{>g3`%@^r7cWj=onN$h&)48jD>+m!g zKp&tJOGQFr+pb+f{{D@v%(s$9Wrd>Z0PGtYs$7nMUH$s)+eviEX#Hv8iZm{R_D|1k zP+n01BH@=D3ukR(ilV1blw{n1-?P%+*BK{$RDIP+8!~_Kd9)fuz4AfLQxI*)RFnRM$Oogcz18ERS&BL}RB zU9{IiR_3pSCnO|*V#PG5suFz|2}+efASfoZqFJJ|Gn6Wl?S!2)Y^Lge7@4Awc|qpm zAe6Ho_GD;8VQcWKu!Wri$9@qdkNNr;`2BwTVEXkv?rwVepn-MqJ2mEaM@PjtZoYHD zXcO@wvANOAtPM1tw)ca4E5S!9s;W*aYA!zD{3aD2wUq*gvngkf1NkFzE1(%Pj4vl4 zp$gZQV}xEW#i@J$pitaA&;F;XX*dn`mm7`1VBFs1V-7a;%Fp{^iS;Q1D<@ei#YY5gG!5Vu8S- zqM`unnP4VDM`^>3KE}s8FZ}65YL12}h*&hBKN$^acm9c6m!xf7VSSZS`w1se^Y4_zOCJXQwAuU=(r+q zQ^V+|=JCJiw)sZ^CM9X5|A1k`c3%6RiAGh z1t|oqjMI-2TH!~#BL0_t6V+h!92)dh5!=l%lWWi_Dn!=$M@i!MK?5Q!xOQe2kr*^g z{in~3=kGqZxw}!aLaa32yHCA}i@Us!>hzg2+X$%DAv^%}Jb8J&VO^bwZXiWn#u|H z2Zx;qBFYU35joFOcKY8ycqWhz{-QdGBJLklr*iC1r^nZ?lOHco(y1bZf}S{f^eD_( zs?npv!}Pm$>HHLhEe0jg6n}*Goku$SY&a;A5sI;#uCq{&SQn?NF~2ymZ(k9h-@vUK zt_|%@z#&8e(vzOY3A+(MP7N0S?>IuB7>9;3Fnz04j3S+c?w-aH9bazB9iq-JA}lN% zb*$QF1||LtV`K5t;vpeNUw}Ce6Owz%M3j^lRx_GIxtE0Kcb(jXHH_hngw} zu5d+<_Vk?hcIotzpVKdO&)b!3E@-3XYkuMRI#h;!20Ts@L>X(z19sKS8 z3A(?_{QT|PH#GW=j#l529@%`Ybx-b56d<&;%qwa)3exSThf0W^JoL?;B(k9(Agx`~ zJ?(ON)Zo8+eJt8g`k4ApC*0XyPk-Epk4nha5tF)#DNro{qd0PM<`GUJYrEiG|96uJ zyl{V*L{PPTx$&%d&7ZvCI&TxxJD7cFhXfxvjXG<3b{4Xx0Mmh^M_@`7JkE8ceuQnwk!xJrX-rmOfCh+KT!JJ8KLkeNH$YVa%vRx+^o#Z_x>lQwypnWY9pgfd?XpShvU{obV8xn z40Bo-1Q;TSpfSn7AOZO*DoPyyADbNHzgA{TPD*;g@{meWTAF(I?xD}0KXyGG>&Rga ztn4*A<00|8=KN+h4@*7;(L9RIvA#=fhqk5`6m$`7qK@dtP4bxm@B7nR3Zww=1(Z&& z3MVI+r`99J(H+tpuAtd&68&wacRqA?J7XUT7b;I7zmO1Kt*TvrnB3O>pPU`1K)@o@ zZX-PKsEfj;1N({A+*RsShG=xSdU!;XfNFuVhh^X*Z`XDxU&sYDA^1L`E;9q{_?L(^ z42^-vt-yWuRUyl$?r?Mr%#3FeM(>JU=*c0}k z`vX{%jOoAa0r3?xQ*=Qe68)+EEbyVXlAh)1o%k->+Ta zHNM}Fo<2%^O9=Dm?c2A(20cw>76}Q{6=}n|CEv0|BcB;||7|Y$}(FsTl5Twm_Kis0grs5X~SHe}P&*^)Qh4scC6S3Gi>5$wD@DcoY#6yN8!I^%mu_2p}#wAg)Uw^QQ6<$ zkFeg*KYwuhWjnjG{BPf0PbB#h7j0zhi3}hT+F>?d+-bPb5Bc@yp~SwIp1x8PY10`% zppPNk^8BBetcW?Aok*|#zi(Fbf5|-d&)(X9+#c!oJDPr~!2TE|Wo2BHGDl_52u19+ zsR>1=exhU?854Ld7-n%`Lm4y~{_M9oru}!EVRI)+Rtsnr8$<}Hs4#G8|6wPCM^;8w z_IrDlH`V@tD^MoiXnfcnEGk46!E#hk&>0*^$Ci4%f3v31!AJLgJj68&x-Tp&fN@WePf&*jnSsUE=_3|;wnQPoJ;dD767l3z zUWKSG)HQ6tvFnu6#z5VWx!tIf(c-p?2uOBrzGP^aDDhQ$oMjX$sg1ooJ@Lo!uU^5R zpw&1>$9JV2O(P8r4dX|-VpJ3q;v8R;vEYYbw@`+3?k_(wJR*w4z9he#@N*CUpU;@mFIEzw9$K5apL~Pp4onPN_b>Gv&2?^7e8R z>A6+6_btCW5}qbqsJF7Vj$QS;`O7x1((q*KW!&aHwu^0VEJfO2dBw3_cesH`*WTW~ zA@<8@C+1$2wj0@E`t)G1{!$iEP*Q4#>HXPHQ$NO8wEHhhtg=y8Tk}6Xq+w{~_%{!! zMf2YmXJxVOu}L&!b2Pw@h;p*6TfPY09GWlChg3NCg`91pw&foj9eQu%1&F@T|4p<0 zKb8;wwh7sPwXTa+jmK8hU%gsA?d8nI@+F^^eSc5>8rSEWDm(Tczj1J1%n!&?tk6 z_tU{(i*K-Gs3OzTiEWoHAl+sbE0_ z12R;KN=RF~ALQSvrf*mnV@UNO7pfjc9=z-4OA*#G&O7beqf2fnH?gA);l5O8{UWNC**1@lTwX-qEPhQ`Z_|e5jDA=~T5-;Uy6py;L^kLFi8wC| zNU$J%{c`!mfl=5k;7!>aF-C_}K2tSq$w-%!e6vFQ3iz&<$mp@=P z6uAkq3Di^IPP`{x?dj#UP=B8q18JAvb>qZb>O22vM_7|mQh-!^?!LY8ad>*=`xmhu z3^0;settey888wpJH%|~i8R5bak!@Le$Y62{J0}TN>?f%B$R#GH@8injn(3>)W1^C zy=#lW%AULncwBhrGUu;jRMCksM=tZSvR0L?hOFTkZ@1Uvpv$(LB}b?bHY-P1EJwkhs66cu;Mef!PgEK%PD>kYzBN(zN7`j?tw zy%_nQ`uc8TU^wm)G#8`>;9zE!s-{RmLY%D4+leRP;GZ}22Uju9P)HOYMIK3jwf+C_ zv%&pB`fSfVTZKX4OG?%&8Rz$ET^19o0Yq_yjk>s`WG5{xCUmY;OKWQm2=kC?n%%o` z7b)270!*BeEI+nM8M+CC4J%sHdr46|3O&u?k(7m zW2B%!zLsf)@72ux}eWdA{xGkAr&W z+ZZ3S7`8^yL{k`V7-9KpavJk099_KVFh9l3ZKo)3@+2I;FxQRLyao93=9?%l{tgco zJVc{|bgope#sP0nMSdI;QQ{I1Ixf<_gY(64-Nw7=J@;-qCRYL3Ks}25G)%N;0#TaS z*tFa@(UDrwYu5Yi+spQ|q2J*+HR)Fdp#Tsx9jC&C72neX+TCqzSjRj4)K?XpEPuax z+hd%aUVyAcqLfJYHMNu;DqV`f?avCO(I~>-#7UxxKHeuQ&Tv z?u)((9M~~ZK2g?N7JIMNz`OysY{wbmPJ8g6?8pVHgD!jom>&tcOf_Nrx!Ar(JbuXw zmu`wa2#!0;Nf=yKteQ+Hh8XfYx-03(F;Rfn~hm-Tm%4W3hHZ@^elWcPn2%wO| z;Sg#c1;LAZfhce`v}U=Xb#w-n1n@fuO*PA}bnpJ_4OH4De!l^|sBF9?EOR?@F`u;3 za$;f*^7AiuldG_OBJL4n)M5Ea1wxTYzXdkyBX(y)-JAK|iJd&qQQe%RGOQIpG}x#n z@fxuyJNq;bc`Rjp^P^9g*E7#9>Q*vl>@%Db!fqdh=yWF;m%PzM>|M7e6GH3yK92wD z^Esolp-K7qouQ<$-&kRILUAw~d5|Rg8d76N8=gf|aGojfNTSJZqLQ7c#W58l3xMh+HcdKUi4j%ER)a3=c53Hv`SOR{u>yPeT(QRR zYEjiI%N0OG+?OPkDHmW8=j<`9JVHyMVWv&qoJ)$&V;$21CQX_ zx93BN0laa;VQ%cRgeE*}Gk3+(6^<9QDopo(DCTI3A^E(u)LxThu&KEjn!=dp1fepLyrpn4m(1C zH7^Wr)Zj!jOyj3dW1YEK85z^K)2tsm*A`Wq-rMBUh1HllzIu)ClxgtAP8lA62Mmsa zLMtrgPtiD9U;j8L=w+A9Q&tuh5&k)?{!U14M2qW*6R+WDATqQSYP2NT_aruwX=tUj z>YNNaV=mOmk8KR)<%3!c829WUmQb+5VYeEjF^~a7kLYwzX{nH96le@k{ndTW%2*hc zz**Sq)dqT5T54*x3`LPz_S^OAIYY(dq@~lLu3_^Bc?o}z9Y(FGmtq^>T^j8!6l7u1 zf!hm)Pgt+)(4EmlRONhpsB$}1(c>sD|57z1cm(7D^s7yjl;NlJo3S;Ke|Y#R_Ug&Q zraA;NB$T~-lczn_o484ll#4FSGGF4c2Z5Fl9bJqrKh`JMzN2;2YWfGBx)CmvxRuAF zN6Kkh*H9QKDTPpdnfvh-s>L(-cqJt2(B(rxPP20-CNOfCu!Mg_MFo1nc6pW(orj\%}). See Examples. } \examples{ @@ -77,6 +90,7 @@ ggplot(df) + geom_rsi() + scale_y_percent() + scale_rsi_colours() + + labels_rsi_count() + theme_rsi() # or better yet, simplify this using the wrapper function - a single command: diff --git a/tests/testthat/test-count.R b/tests/testthat/test-count.R index 92d39945..2d685cbb 100644 --- a/tests/testthat/test-count.R +++ b/tests/testthat/test-count.R @@ -41,4 +41,6 @@ test_that("counts work", { expect_error(count_S("test", minimum = "test")) expect_error(count_S("test", as_percent = "test")) + expect_error(count_df(c("A", "B", "C"))) + }) diff --git a/tests/testthat/test-portion.R b/tests/testthat/test-portion.R index b39481bd..8e80cceb 100755 --- a/tests/testthat/test-portion.R +++ b/tests/testthat/test-portion.R @@ -112,7 +112,7 @@ test_that("old rsi works", { # portion_df expect_equal( - septic_patients %>% select(amox) %>% portion_df() %>% pull(Percentage), + septic_patients %>% select(amox) %>% portion_df() %>% pull(Value), c(septic_patients$amox %>% portion_S(), septic_patients$amox %>% portion_I(), septic_patients$amox %>% portion_R()) @@ -165,4 +165,6 @@ test_that("prediction of rsi works", { col_ab = "mero", col_date = "date", info = TRUE)) + + expect_error(portion_df(c("A", "B", "C"))) })