From 4e0374af29b0b3c4edde0b951723747d3f1cb401 Mon Sep 17 00:00:00 2001 From: "Matthijs S. Berends" Date: Tue, 29 Sep 2020 23:35:46 +0200 Subject: [PATCH] (v1.3.0.9035) mdro() for EUCAST 3.2, examples cleanup --- .github/workflows/codecovr.yaml | 2 +- DESCRIPTION | 2 +- NAMESPACE | 6 - NEWS.md | 7 +- R/ab_class_selectors.R | 7 +- R/age.R | 2 +- R/atc_online.R | 7 +- R/availability.R | 17 +- R/bug_drug_combinations.R | 28 +- R/deprecated.R | 42 +-- R/disk.R | 7 +- R/eucast_rules.R | 19 +- R/filter_ab_class.R | 69 +++-- R/first_isolate.R | 90 +++--- R/ggplot_pca.R | 3 +- R/ggplot_rsi.R | 7 +- R/join_microorganisms.R | 29 +- R/key_antibiotics.R | 38 +-- R/like.R | 9 +- R/mdro.R | 284 ++++++++++++++---- R/mo.R | 61 +--- R/mo_matching_score.R | 17 +- R/p_symbol.R | 1 + R/pca.R | 34 ++- R/proportion.R | 9 - R/resistance_predict.R | 6 +- R/rsi.R | 104 +++---- R/rsi_calc.R | 4 +- R/sysdata.rda | Bin 316116 -> 316116 bytes R/zzz.R | 51 +++- _pkgdown.yml | 14 +- data-raw/translations.tsv | 4 +- docs/404.html | 2 +- docs/LICENSE-text.html | 2 +- docs/articles/index.html | 2 +- docs/authors.html | 2 +- docs/index.html | 2 +- docs/news/index.html | 43 +-- docs/pkgdown.yml | 2 +- docs/reference/age_groups.html | 6 +- .../reference/antibiotic_class_selectors.html | 14 +- docs/reference/as.disk.html | 11 +- docs/reference/as.mo.html | 40 +-- docs/reference/as.rsi.html | 91 +++--- docs/reference/atc_online.html | 11 +- docs/reference/availability.html | 19 +- docs/reference/bug_drug_combinations.html | 16 +- docs/reference/eucast_rules.html | 21 +- docs/reference/figures/mo_matching_score.png | Bin 0 -> 21043 bytes docs/reference/filter_ab_class.html | 70 +++-- docs/reference/first_isolate.html | 90 +++--- docs/reference/ggplot_pca.html | 10 +- docs/reference/ggplot_rsi.html | 11 +- docs/reference/index.html | 21 +- docs/reference/join.html | 31 +- docs/reference/key_antibiotics.html | 43 +-- docs/reference/like.html | 11 +- docs/reference/mdro.html | 35 ++- docs/reference/mo_matching_score.html | 19 +- docs/reference/mo_property.html | 16 +- docs/reference/p_symbol.html | 7 +- docs/reference/pca.html | 41 +-- docs/reference/proportion.html | 11 +- docs/reference/resistance_predict.html | 6 +- docs/sitemap.xml | 3 - docs/survey.html | 2 +- man/AMR-deprecated.Rd | 39 --- man/age_groups.Rd | 2 +- man/antibiotic_class_selectors.Rd | 7 +- man/as.disk.Rd | 7 +- man/as.mo.Rd | 41 +-- man/as.rsi.Rd | 89 +++--- man/atc_online.Rd | 7 +- man/availability.Rd | 17 +- man/bug_drug_combinations.Rd | 14 +- man/eucast_rules.Rd | 19 +- man/figures/mo_matching_score.png | Bin 0 -> 21043 bytes man/filter_ab_class.Rd | 63 ++-- man/first_isolate.Rd | 88 +++--- man/ggplot_pca.Rd | 3 +- man/ggplot_rsi.Rd | 7 +- man/join.Rd | 29 +- man/key_antibiotics.Rd | 36 +-- man/like.Rd | 9 +- man/mdro.Rd | 33 +- man/mo_matching_score.Rd | 17 +- man/mo_property.Rd | 14 +- man/p_symbol.Rd | 3 + man/pca.Rd | 34 ++- man/proportion.Rd | 9 - man/resistance_predict.Rd | 4 +- tests/testthat/test-data.R | 2 + tests/testthat/test-mdro.R | 6 +- tests/testthat/test-rsi.R | 18 +- 94 files changed, 1143 insertions(+), 1165 deletions(-) create mode 100644 docs/reference/figures/mo_matching_score.png delete mode 100644 man/AMR-deprecated.Rd create mode 100644 man/figures/mo_matching_score.png diff --git a/.github/workflows/codecovr.yaml b/.github/workflows/codecovr.yaml index d6552648..aee14073 100644 --- a/.github/workflows/codecovr.yaml +++ b/.github/workflows/codecovr.yaml @@ -63,5 +63,5 @@ jobs: shell: Rscript {0} - name: Test coverage - run: covr::codecov(line_exclusions = list("R/atc_online.R", "R/mo_source.R", "R/resistance_predict.R", "R/aa_helper_pm_functions.R", "R/zzz.R"), quiet = FALSE) + run: covr::codecov(line_exclusions = list("R/atc_online.R", "R/mo_source.R", "R/resistance_predict.R", "R/aa_helper_functions.R", "R/aa_helper_pm_functions.R", "R/zzz.R"), quiet = FALSE) shell: Rscript {0} diff --git a/DESCRIPTION b/DESCRIPTION index 320a78ed..a472cb25 100644 --- a/DESCRIPTION +++ b/DESCRIPTION @@ -1,5 +1,5 @@ Package: AMR -Version: 1.3.0.9034 +Version: 1.3.0.9035 Date: 2020-09-29 Title: Antimicrobial Resistance Analysis Authors@R: c( diff --git a/NAMESPACE b/NAMESPACE index bce8ff8e..92eff153 100755 --- a/NAMESPACE +++ b/NAMESPACE @@ -193,12 +193,6 @@ export(n_rsi) export(p_symbol) export(pca) export(penicillins) -export(portion_I) -export(portion_IR) -export(portion_R) -export(portion_S) -export(portion_SI) -export(portion_df) export(proportion_I) export(proportion_IR) export(proportion_R) diff --git a/NEWS.md b/NEWS.md index 62306a9e..b9d8f2be 100755 --- a/NEWS.md +++ b/NEWS.md @@ -1,10 +1,13 @@ -# AMR 1.3.0.9034 +# AMR 1.3.0.9035 ## Last updated: 29 September 2020 Note: some changes in this version were suggested by anonymous reviewers from the journal we submitted our manuscipt to. We are those reviewers very grateful for going through our code so thoroughly! +### Breaking +* Removed functions `portion_R()`, `portion_S()` and `portion_I()` that were deprecated since version 0.9.0 (November 2019) and were replaced with `proportion_R()`, `proportion_S()` and `proportion_I()`. + ### New -* Support for 'EUCAST Expert Rules' / 'EUCAST Intrinsic Resistance and Unusual Phenotypes' version 3.2 of May 2020. With this addition to the previously implemented version 3.1 of 2016, the `eucast_rules()` function can now correct for more than 180 different antibiotics. All previously implemented versions of the EUCAST rules are now maintained and kept available in this package. The `eucast_rules()` function consequently gained the parameters `version_breakpoints` (at the moment defaults to v10.0, 2020) and `version_expertrules` (at the moment defaults to v3.2, 2020). The `example_isolates` data set now also reflects the change from v3.1 to v3.2. +* Support for 'EUCAST Expert Rules' / 'EUCAST Intrinsic Resistance and Unusual Phenotypes' version 3.2 of May 2020. With this addition to the previously implemented version 3.1 of 2016, the `eucast_rules()` function can now correct for more than 180 different antibiotics and the `mdro()` function can determine multidrug resistance based on more than 150 different antibiotics. All previously implemented versions of the EUCAST rules are now maintained and kept available in this package. The `eucast_rules()` function consequently gained the parameters `version_breakpoints` (at the moment defaults to v10.0, 2020) and `version_expertrules` (at the moment defaults to v3.2, 2020). The `example_isolates` data set now also reflects the change from v3.1 to v3.2. The `mdro()` function now accepts `guideline == "EUCAST3.1"` and `guideline == "EUCAST3.2"`. * A new vignette and website page with info about all our public and freely available data sets, that can be downloaded as flat files or in formats for use in R, SPSS, SAS, Stata and Excel: https://msberends.github.io/AMR/articles/datasets.html * Data set `intrinsic_resistant`. This data set contains all bug-drug combinations where the 'bug' is intrinsic resistant to the 'drug' according to the latest EUCAST insights. It contains just two columns: `microorganism` and `antibiotic`. diff --git a/R/ab_class_selectors.R b/R/ab_class_selectors.R index 1a950358..18230306 100644 --- a/R/ab_class_selectors.R +++ b/R/ab_class_selectors.R @@ -33,8 +33,7 @@ #' @inheritSection AMR Reference data publicly available #' @inheritSection AMR Read more on our website! #' @examples -#' \dontrun{ -#' library(dplyr) +#' if (require("dplyr")) { #' #' # this will select columns 'IPM' (imipenem) and 'MEM' (meropenem): #' example_isolates %>% @@ -57,9 +56,9 @@ #' format() #' #' -#' data.frame(irrelevant = "value", +#' data.frame(some_column = "some_value", #' J01CA01 = "S") %>% # ATC code of ampicillin -#' select(penicillins()) # the 'J01CA01' column will be selected +#' select(penicillins()) # only the 'J01CA01' column will be selected #' #' } ab_class <- function(ab_class) { diff --git a/R/age.R b/R/age.R index 9ec75281..aa905fa6 100755 --- a/R/age.R +++ b/R/age.R @@ -127,7 +127,7 @@ age <- function(x, reference = Sys.Date(), exact = FALSE, na.rm = FALSE) { #' # same: #' age_groups(ages, c(1, 2, 4, 6, 13, 17)) #' -#' \dontrun{ +#' \donttest{ #' # resistance of ciprofloxacine per age group #' library(dplyr) #' example_isolates %>% diff --git a/R/atc_online.R b/R/atc_online.R index 52e59520..e80f5446 100644 --- a/R/atc_online.R +++ b/R/atc_online.R @@ -60,17 +60,14 @@ #' @inheritSection AMR Read more on our website! #' @source #' @examples -#' \dontrun{ +#' \donttest{ #' # oral DDD (Defined Daily Dose) of amoxicillin #' atc_online_property("J01CA04", "DDD", "O") +#' #' # parenteral DDD (Defined Daily Dose) of amoxicillin #' atc_online_property("J01CA04", "DDD", "P") #' #' atc_online_property("J01CA04", property = "groups") # search hierarchical groups of amoxicillin -#' # [1] "ANTIINFECTIVES FOR SYSTEMIC USE" -#' # [2] "ANTIBACTERIALS FOR SYSTEMIC USE" -#' # [3] "BETA-LACTAM ANTIBACTERIALS, PENICILLINS" -#' # [4] "Penicillins with extended spectrum" #' } atc_online_property <- function(atc_code, property, diff --git a/R/availability.R b/R/availability.R index 2baed04b..46d14616 100644 --- a/R/availability.R +++ b/R/availability.R @@ -32,18 +32,11 @@ #' @examples #' availability(example_isolates) #' -#' \dontrun{ -#' library(dplyr) -#' example_isolates %>% availability() -#' -#' example_isolates %>% -#' select_if(is.rsi) %>% -#' availability() -#' -#' example_isolates %>% -#' filter(mo == as.mo("E. coli")) %>% -#' select_if(is.rsi) %>% -#' availability() +#' if (require("dplyr")) { +#' example_isolates %>% +#' filter(mo == as.mo("E. coli")) %>% +#' select_if(is.rsi) %>% +#' availability() #' } availability <- function(tbl, width = NULL) { stop_ifnot(is.data.frame(tbl), "`tbl` must be a data.frame") diff --git a/R/bug_drug_combinations.R b/R/bug_drug_combinations.R index 72faa7ef..3f0e9cde 100644 --- a/R/bug_drug_combinations.R +++ b/R/bug_drug_combinations.R @@ -26,7 +26,7 @@ #' @inheritParams eucast_rules #' @param combine_IR logical to indicate whether values R and I should be summed #' @param add_ab_group logical to indicate where the group of the antimicrobials must be included as a first column -#' @param remove_intrinsic_resistant logical to indicate that rows with 100% resistance for all tested antimicrobials must be removed from the table +#' @param remove_intrinsic_resistant logical to indicate that rows and columns with 100% resistance for all tested antimicrobials must be removed from the table #' @param FUN the function to call on the `mo` column to transform the microorganism IDs, defaults to [mo_shortname()] #' @param translate_ab a character of length 1 containing column names of the [antibiotics] data set #' @param ... arguments passed on to `FUN` @@ -45,13 +45,13 @@ #' format(x, translate_ab = "name (atc)") #' #' # Use FUN to change to transformation of microorganism codes -#' x <- bug_drug_combinations(example_isolates, -#' FUN = mo_gramstain) +#' bug_drug_combinations(example_isolates, +#' FUN = mo_gramstain) #' -#' x <- bug_drug_combinations(example_isolates, -#' FUN = function(x) ifelse(x == as.mo("E. coli"), -#' "E. coli", -#' "Others")) +#' bug_drug_combinations(example_isolates, +#' FUN = function(x) ifelse(x == as.mo("E. coli"), +#' "E. coli", +#' "Others")) #' } bug_drug_combinations <- function(x, col_mo = NULL, @@ -183,13 +183,12 @@ format.bug_drug_combinations <- function(x, y <- y %pm>% pm_left_join(mo_group, by = "ab") } - y <<- y y <- y %pm>% pm_distinct(ab, .keep_all = TRUE) %pm>% pm_select(-mo, -txt) %pm>% # replace tidyr::pivot_wider() until here remove_NAs() - + select_ab_vars <- function(.data) { .data[, c("ab_group", "ab_txt", colnames(.data)[!colnames(.data) %in% c("ab_group", "ab_txt", "ab")])] } @@ -205,12 +204,19 @@ format.bug_drug_combinations <- function(x, y <- y %pm>% pm_select(-ab_group) %pm>% pm_rename("Drug" = ab_txt) - colnames(y)[1] <- translate_AMR(colnames(y)[1], language = get_locale(), only_unknown = FALSE) + colnames(y)[1] <- translate_AMR(colnames(y)[1], language, only_unknown = FALSE) } else { y <- y %pm>% pm_rename("Group" = ab_group, "Drug" = ab_txt) - colnames(y)[1:2] <- translate_AMR(colnames(y)[1:2], language = get_locale(), only_unknown = FALSE) + } + + if (!is.null(language)) { + colnames(y) <- translate_AMR(colnames(y), language, only_unknown = FALSE) + } + + if (remove_intrinsic_resistant == TRUE) { + y <- y[, !sapply(y, function(col) all(col %like% "100", na.rm = TRUE) & !any(is.na(col))), drop = FALSE] } rownames(y) <- NULL diff --git a/R/deprecated.R b/R/deprecated.R index d169a00e..62812c78 100755 --- a/R/deprecated.R +++ b/R/deprecated.R @@ -24,46 +24,6 @@ #' These functions are so-called '[Deprecated]'. They will be removed in a future release. Using the functions will give a warning with the name of the function it has been replaced by (if there is one). #' @inheritSection lifecycle Retired lifecycle #' @inheritSection AMR Read more on our website! -#' @export #' @keywords internal #' @name AMR-deprecated -#' @export -portion_R <- function(...) { - .Deprecated("resistance()", package = "AMR") - proportion_R(...) -} - -#' @rdname AMR-deprecated -#' @export -portion_IR <- function(...) { - .Deprecated("proportion_IR()", package = "AMR") - proportion_IR(...) -} - -#' @rdname AMR-deprecated -#' @export -portion_I <- function(...) { - .Deprecated("proportion_I()", package = "AMR") - proportion_I(...) -} - -#' @rdname AMR-deprecated -#' @export -portion_SI <- function(...) { - .Deprecated("susceptibility()", package = "AMR") - proportion_SI(...) -} - -#' @rdname AMR-deprecated -#' @export -portion_S <- function(...) { - .Deprecated("proportion_S()", package = "AMR") - proportion_S(...) -} - -#' @rdname AMR-deprecated -#' @export -portion_df <- function(...) { - .Deprecated("proportion_df()", package = "AMR") - proportion_df(...) -} +# @export diff --git a/R/disk.R b/R/disk.R index 007fac85..8267144e 100644 --- a/R/disk.R +++ b/R/disk.R @@ -33,7 +33,7 @@ #' @seealso [as.rsi()] #' @inheritSection AMR Read more on our website! #' @examples -#' \dontrun{ +#' \donttest{ #' # transform existing disk zones to the `disk` class #' library(dplyr) #' df <- data.frame(microorganism = "E. coli", @@ -41,8 +41,9 @@ #' CIP = 14, #' GEN = 18, #' TOB = 16) -#' df <- df %>% mutate_at(vars(AMP:TOB), as.disk) -#' df +#' df[, 2:5] <- lapply(df[, 2:5], as.disk) +#' # same with dplyr: +#' # df %>% mutate(across(AMP:TOB, as.disk)) #' #' # interpret disk values, see ?as.rsi #' as.rsi(x = as.disk(18), diff --git a/R/eucast_rules.R b/R/eucast_rules.R index 280ff1bc..0b326400 100755 --- a/R/eucast_rules.R +++ b/R/eucast_rules.R @@ -67,23 +67,18 @@ EUCAST_VERSION_EXPERT_RULES <- list("3.1" = list(version_txt = "v3.1", #' #' The following antibiotics are used for the functions [eucast_rules()] and [mdro()]. These are shown below in the format 'name (`antimicrobial ID`, [ATC code](https://www.whocc.no/atc/structure_and_principles/))', sorted alphabetically: #' -#' `r create_ab_documentation(c("AMC", "AMK", "AMP", "AMX", "ATM", "AVO", "AZL", "AZM", "BAM", "BPR", "CAC", "CAP", "CAT", "CAZ", "CCV", "CDR", "CDZ", "CEC", "CED", "CEI", "CEP", "CFM", "CFM1", "CFP", "CFR", "CFS", "CHL", "CID", "CIP", "CLI", "CLR", "CMX", "CMZ", "CND", "COL", "CPD", "CPM", "CPO", "CPR", "CPT", "CRB", "CRD", "CRN", "CRO", "CSL", "CTB", "CTF", "CTL", "CTT", "CTX", "CTZ", "CXM", "CYC", "CZD", "CZO", "CZX", "DAL", "DAP", "DIR", "DIT", "DIZ", "DKB", "DOR", "DOX", "ENX", "EPC", "ERY", "ETH", "ETP", "FEP", "FLC", "FLE", "FLR1", "FOS", "FOX", "FOX1", "FUS", "GAT", "GEH", "GEM", "GEN", "GRX", "HAP", "HET", "INH", "IPM", "ISE", "JOS", "KAN", "LEX", "LIN", "LNZ", "LOM", "LOR", "LTM", "LVX", "MAN", "MCM", "MEC", "MEM", "MEV", "MEZ", "MFX", "MID", "MNO", "MTM", "NAL", "NEO", "NET", "NIT", "NOR", "NOV", "NVA", "OFX", "OLE", "ORI", "OXA", "PAZ", "PEF", "PEN", "PHN", "PIP", "PLB", "PME", "PRI", "PRL", "PRU", "PVM", "PZA", "QDA", "RAM", "RFL", "RFP", "RIB", "RID", "RIF", "ROK", "RST", "RXT", "SAM", "SBC", "SDI", "SDM", "SIS", "SLF", "SLF1", "SLF10", "SLF11", "SLF12", "SLF13", "SLF2", "SLF3", "SLF4", "SLF5", "SLF6", "SLF7", "SLF8", "SLF9", "SLT1", "SLT2", "SLT3", "SLT4", "SLT5", "SMX", "SPI", "SPX", "STH", "STR", "STR1", "SUD", "SUT", "SXT", "SZO", "TAL", "TCC", "TCM", "TCY", "TEC", "TEM", "TGC", "THA", "TIC", "TLT", "TLV", "TMP", "TMX", "TOB", "TRL", "TVA", "TZD", "TZP", "VAN"))` +#' `r create_ab_documentation(c("AMC", "AMK", "AMP", "AMX", "ATM", "AVO", "AZL", "AZM", "BAM", "BPR", "CAC", "CAP", "CAT", "CAZ", "CCV", "CDR", "CDZ", "CEC", "CED", "CEI", "CEP", "CFM", "CFM1", "CFP", "CFR", "CFS", "CHL", "CID", "CIP", "CLI", "CLR", "CMX", "CMZ", "CND", "COL", "CPD", "CPM", "CPO", "CPR", "CPT", "CRB", "CRD", "CRN", "CRO", "CSL", "CTB", "CTF", "CTL", "CTT", "CTX", "CTZ", "CXM", "CYC", "CZD", "CZO", "CZX", "DAL", "DAP", "DIR", "DIT", "DIZ", "DKB", "DOR", "DOX", "ENX", "EPC", "ERV", "ERY", "ETH", "ETP", "FDX", "FEP", "FLC", "FLE", "FLR1", "FOS", "FOX", "FOX1", "FUS", "GAT", "GEH", "GEM", "GEN", "GRX", "HAP", "HET", "INH", "IPM", "ISE", "JOS", "KAN", "LEX", "LIN", "LNZ", "LOM", "LOR", "LTM", "LVX", "MAN", "MCM", "MEC", "MEM", "MEV", "MEZ", "MFX", "MID", "MNO", "MTM", "MTR", "NAL", "NEO", "NET", "NIT", "NOR", "NOV", "NVA", "OFX", "OLE", "OMC", "ORI", "OXA", "PAZ", "PEF", "PEN", "PHN", "PIP", "PLB", "PME", "PRI", "PRL", "PRU", "PVM", "PZA", "QDA", "RAM", "RFL", "RFP", "RIB", "RID", "RIF", "ROK", "RST", "RXT", "SAM", "SBC", "SDI", "SDM", "SIS", "SLF", "SLF1", "SLF10", "SLF11", "SLF12", "SLF13", "SLF2", "SLF3", "SLF4", "SLF5", "SLF6", "SLF7", "SLF8", "SLF9", "SLT1", "SLT2", "SLT3", "SLT4", "SLT5", "SMX", "SPI", "SPT", "SPX", "STH", "STR", "STR1", "SUD", "SUT", "SXT", "SZO", "TAL", "TCC", "TCM", "TCY", "TEC", "TEM", "TGC", "THA", "TIC", "TLT", "TLV", "TMP", "TMX", "TOB", "TRL", "TVA", "TZD", "TZP", "VAN"))` #' @aliases EUCAST #' @rdname eucast_rules #' @export #' @return The input of `x`, possibly with edited values of antibiotics. Or, if `verbose = TRUE`, a [data.frame] with all original and new values of the affected bug-drug combinations. #' @source -#' - EUCAST Expert Rules. Version 2.0, 2012. \cr -#' Leclercq et al. **EUCAST expert rules in antimicrobial susceptibility testing.** *Clin Microbiol Infect.* 2013;19(2):141-60. \cr -#' -#' - EUCAST Expert Rules, Intrinsic Resistance and Exceptional Phenotypes Tables. Version 3.1, 2016. \cr -#' -#' - EUCAST Intrinsic Resistance and Unusual Phenotypes. Version 3.2, 2020. \cr -#' -#' - EUCAST Breakpoint tables for interpretation of MICs and zone diameters. Version 9.0, 2019. \cr -#' -#' - EUCAST Breakpoint tables for interpretation of MICs and zone diameters. Version 10.0, 2020. \cr -#' +#' - EUCAST Expert Rules. Version 2.0, 2012.\cr +#' Leclercq et al. **EUCAST expert rules in antimicrobial susceptibility testing.** *Clin Microbiol Infect.* 2013;19(2):141-60. [(link)](https://doi.org/10.1111/j.1469-0691.2011.03703.x) +#' - EUCAST Expert Rules, Intrinsic Resistance and Exceptional Phenotypes Tables. Version 3.1, 2016. [(link)](https://www.eucast.org/fileadmin/src/media/PDFs/EUCAST_files/Expert_Rules/Expert_rules_intrinsic_exceptional_V3.1.pdf) +#' - EUCAST Intrinsic Resistance and Unusual Phenotypes. Version 3.2, 2020. [(link)](https://www.eucast.org/fileadmin/src/media/PDFs/EUCAST_files/Expert_Rules/2020/Intrinsic_Resistance_and_Unusual_Phenotypes_Tables_v3.2_20200225.pdf) +#' - EUCAST Breakpoint tables for interpretation of MICs and zone diameters. Version 9.0, 2019. [(link)](https://www.eucast.org/fileadmin/src/media/PDFs/EUCAST_files/Breakpoint_tables/v_9.0_Breakpoint_Tables.xlsx) +#' - EUCAST Breakpoint tables for interpretation of MICs and zone diameters. Version 10.0, 2020. [(link)](https://www.eucast.org/fileadmin/src/media/PDFs/EUCAST_files/Breakpoint_tables/v_10.0_Breakpoint_Tables.xlsx) #' @inheritSection AMR Reference data publicly available #' @inheritSection AMR Read more on our website! #' @examples diff --git a/R/filter_ab_class.R b/R/filter_ab_class.R index 3770960b..18adbdcc 100644 --- a/R/filter_ab_class.R +++ b/R/filter_ab_class.R @@ -33,40 +33,43 @@ #' @seealso [antibiotic_class_selectors()] for the `select()` equivalent. #' @export #' @examples -#' \dontrun{ -#' library(dplyr) -#' -#' # filter on isolates that have any result for any aminoglycoside -#' example_isolates %>% filter_ab_class("aminoglycoside") -#' example_isolates %>% filter_aminoglycosides() -#' -#' # this is essentially the same as (but without determination of column names): -#' example_isolates %>% -#' filter_at(.vars = vars(c("GEN", "TOB", "AMK", "KAN")), -#' .vars_predicate = any_vars(. %in% c("S", "I", "R"))) -#' -#' -#' # filter on isolates that show resistance to ANY aminoglycoside -#' example_isolates %>% filter_aminoglycosides("R", "any") -#' -#' # filter on isolates that show resistance to ALL aminoglycosides -#' example_isolates %>% filter_aminoglycosides("R", "all") -#' -#' # filter on isolates that show resistance to -#' # any aminoglycoside and any fluoroquinolone -#' example_isolates %>% -#' filter_aminoglycosides("R") %>% -#' filter_fluoroquinolones("R") -#' -#' # filter on isolates that show resistance to -#' # all aminoglycosides and all fluoroquinolones -#' example_isolates %>% -#' filter_aminoglycosides("R", "all") %>% -#' filter_fluoroquinolones("R", "all") +#' filter_aminoglycosides(example_isolates) #' -#' # with dplyr 1.0.0 and higher (that adds 'across()'), this is equal: -#' example_isolates %>% filter_carbapenems("R", "all") -#' example_isolates %>% filter(across(carbapenems(), ~. == "R")) +#' \donttest{ +#' if (require("dplyr")) { +#' +#' # filter on isolates that have any result for any aminoglycoside +#' example_isolates %>% filter_aminoglycosides() +#' example_isolates %>% filter_ab_class("aminoglycoside") +#' +#' # this is essentially the same as (but without determination of column names): +#' example_isolates %>% +#' filter_at(.vars = vars(c("GEN", "TOB", "AMK", "KAN")), +#' .vars_predicate = any_vars(. %in% c("S", "I", "R"))) +#' +#' +#' # filter on isolates that show resistance to ANY aminoglycoside +#' example_isolates %>% filter_aminoglycosides("R", "any") +#' +#' # filter on isolates that show resistance to ALL aminoglycosides +#' example_isolates %>% filter_aminoglycosides("R", "all") +#' +#' # filter on isolates that show resistance to +#' # any aminoglycoside and any fluoroquinolone +#' example_isolates %>% +#' filter_aminoglycosides("R") %>% +#' filter_fluoroquinolones("R") +#' +#' # filter on isolates that show resistance to +#' # all aminoglycosides and all fluoroquinolones +#' example_isolates %>% +#' filter_aminoglycosides("R", "all") %>% +#' filter_fluoroquinolones("R", "all") +#' +#' # with dplyr 1.0.0 and higher (that adds 'across()'), this is equal: +#' example_isolates %>% filter_carbapenems("R", "all") +#' example_isolates %>% filter(across(carbapenems(), ~. == "R")) +#' } #' } filter_ab_class <- function(x, ab_class, diff --git a/R/first_isolate.R b/R/first_isolate.R index ae1ff596..cae8b509 100755 --- a/R/first_isolate.R +++ b/R/first_isolate.R @@ -46,18 +46,19 @@ #' #' All isolates with a microbial ID of `NA` will be excluded as first isolate. #' -#' The functions [filter_first_isolate()] and [filter_first_weighted_isolate()] are helper functions to quickly filter on first isolates. The function [filter_first_isolate()] is essentially equal to one of: +#' The functions [filter_first_isolate()] and [filter_first_weighted_isolate()] are helper functions to quickly filter on first isolates. The function [filter_first_isolate()] is essentially equal to either: #' ``` -#' x %>% filter(first_isolate(., ...)) +#' x[first_isolate(x, ...), ] +#' x %>% filter(first_isolate(x, ...)) #' ``` #' The function [filter_first_weighted_isolate()] is essentially equal to: #' ``` -#' x %>% -#' mutate(keyab = key_antibiotics(.)) %>% -#' mutate(only_weighted_firsts = first_isolate(x, -#' col_keyantibiotics = "keyab", ...)) %>% -#' filter(only_weighted_firsts == TRUE) %>% -#' select(-only_weighted_firsts, -keyab) +#' x %>% +#' mutate(keyab = key_antibiotics(.)) %>% +#' mutate(only_weighted_firsts = first_isolate(x, +#' col_keyantibiotics = "keyab", ...)) %>% +#' filter(only_weighted_firsts == TRUE) %>% +#' select(-only_weighted_firsts, -keyab) #' ``` #' @section Key antibiotics: #' There are two ways to determine whether isolates can be included as first *weighted* isolates which will give generally the same results: @@ -80,50 +81,41 @@ #' @examples #' # `example_isolates` is a dataset available in the AMR package. #' # See ?example_isolates. -#' -#' \dontrun{ -#' library(dplyr) -#' # Filter on first isolates: -#' example_isolates %>% -#' mutate(first_isolate = first_isolate(.)) %>% -#' filter(first_isolate == TRUE) #' -#' # Now let's see if first isolates matter: -#' A <- example_isolates %>% -#' group_by(hospital_id) %>% -#' summarise(count = n_rsi(GEN), # gentamicin availability -#' resistance = resistance(GEN)) # gentamicin resistance -#' -#' B <- example_isolates %>% -#' filter_first_weighted_isolate() %>% # the 1st isolate filter -#' group_by(hospital_id) %>% -#' summarise(count = n_rsi(GEN), # gentamicin availability -#' resistance = resistance(GEN)) # gentamicin resistance -#' -#' # Have a look at A and B. -#' # B is more reliable because every isolate is counted only once. -#' # Gentamicin resistance in hospital D appears to be 3.7% higher than -#' # when you (erroneously) would have used all isolates for analysis. -#' -#' -#' ## OTHER EXAMPLES: +#' # basic filtering on first isolates +#' example_isolates[first_isolate(example_isolates), ] #' -#' # Short-hand versions: -#' example_isolates %>% -#' filter_first_isolate() +#' \donttest{ +#' if (require("dplyr")) { +#' # Filter on first isolates: +#' example_isolates %>% +#' mutate(first_isolate = first_isolate(.)) %>% +#' filter(first_isolate == TRUE) +#' +#' # Short-hand versions: +#' example_isolates %>% +#' filter_first_isolate() +#' +#' example_isolates %>% +#' filter_first_weighted_isolate() #' -#' example_isolates %>% -#' filter_first_weighted_isolate() -#' -#' -#' # set key antibiotics to a new variable -#' x$keyab <- key_antibiotics(x) -#' -#' x$first_isolate <- first_isolate(x) -#' -#' x$first_isolate_weighed <- first_isolate(x, col_keyantibiotics = 'keyab') -#' -#' x$first_blood_isolate <- first_isolate(x, specimen_group = "Blood") +#' # Now let's see if first isolates matter: +#' A <- example_isolates %>% +#' group_by(hospital_id) %>% +#' summarise(count = n_rsi(GEN), # gentamicin availability +#' resistance = resistance(GEN)) # gentamicin resistance +#' +#' B <- example_isolates %>% +#' filter_first_weighted_isolate() %>% # the 1st isolate filter +#' group_by(hospital_id) %>% +#' summarise(count = n_rsi(GEN), # gentamicin availability +#' resistance = resistance(GEN)) # gentamicin resistance +#' +#' # Have a look at A and B. +#' # B is more reliable because every isolate is counted only once. +#' # Gentamicin resistance in hospital D appears to be 3.7% higher than +#' # when you (erroneously) would have used all isolates for analysis. +#' } #' } first_isolate <- function(x, col_date = NULL, diff --git a/R/ggplot_pca.R b/R/ggplot_pca.R index e81f18e8..ad4a6f82 100755 --- a/R/ggplot_pca.R +++ b/R/ggplot_pca.R @@ -60,8 +60,7 @@ #' # See ?example_isolates. #' #' # See ?pca for more info about Principal Component Analysis (PCA). -#' \dontrun{ -#' library(dplyr) +#' if (require("dplyr")) { #' pca_model <- example_isolates %>% #' filter(mo_genus(mo) == "Staphylococcus") %>% #' group_by(species = mo_shortname(mo)) %>% diff --git a/R/ggplot_rsi.R b/R/ggplot_rsi.R index 044c23c9..b43a5169 100755 --- a/R/ggplot_rsi.R +++ b/R/ggplot_rsi.R @@ -102,14 +102,14 @@ #' #' } #' -#' \dontrun{ +#' \donttest{ #' #' # resistance of ciprofloxacine per age group #' example_isolates %>% #' mutate(first_isolate = first_isolate(.)) %>% #' filter(first_isolate == TRUE, #' mo == as.mo("E. coli")) %>% -#' # `age_group` is also a function of this package: +#' # `age_groups` is also a function of this AMR package: #' group_by(age_group = age_groups(age)) %>% #' select(age_group, #' CIP) %>% @@ -118,7 +118,8 @@ #' # for colourblind mode, use divergent colours from the viridis package: #' example_isolates %>% #' select(AMX, NIT, FOS, TMP, CIP) %>% -#' ggplot_rsi() + scale_fill_viridis_d() +#' ggplot_rsi() + +#' scale_fill_viridis_d() #' # a shorter version which also adjusts data label colours: #' example_isolates %>% #' select(AMX, NIT, FOS, TMP, CIP) %>% diff --git a/R/join_microorganisms.R b/R/join_microorganisms.R index e5b85bdd..6af73977 100755 --- a/R/join_microorganisms.R +++ b/R/join_microorganisms.R @@ -39,19 +39,22 @@ #' left_join_microorganisms(as.mo("K. pneumoniae")) #' left_join_microorganisms("B_KLBSL_PNE") #' -#' \dontrun{ -#' library(dplyr) -#' example_isolates %>% left_join_microorganisms() -#' -#' df <- data.frame(date = seq(from = as.Date("2018-01-01"), -#' to = as.Date("2018-01-07"), -#' by = 1), -#' bacteria = as.mo(c("S. aureus", "MRSA", "MSSA", "STAAUR", -#' "E. coli", "E. coli", "E. coli")), -#' stringsAsFactors = FALSE) -#' colnames(df) -#' df_joined <- left_join_microorganisms(df, "bacteria") -#' colnames(df_joined) +#' \donttest{ +#' if (require("dplyr")) { +#' example_isolates %>% +#' left_join_microorganisms() %>% +#' colnames() +#' +#' df <- data.frame(date = seq(from = as.Date("2018-01-01"), +#' to = as.Date("2018-01-07"), +#' by = 1), +#' bacteria = as.mo(c("S. aureus", "MRSA", "MSSA", "STAAUR", +#' "E. coli", "E. coli", "E. coli")), +#' stringsAsFactors = FALSE) +#' colnames(df) +#' df_joined <- left_join_microorganisms(df, "bacteria") +#' colnames(df_joined) +#' } #' } inner_join_microorganisms <- function(x, by = NULL, suffix = c("2", ""), ...) { check_dataset_integrity() diff --git a/R/key_antibiotics.R b/R/key_antibiotics.R index 22d08f6c..41aecd1c 100755 --- a/R/key_antibiotics.R +++ b/R/key_antibiotics.R @@ -72,33 +72,35 @@ #' @examples #' # `example_isolates` is a dataset available in the AMR package. #' # See ?example_isolates. -#' -#' \dontrun{ -#' library(dplyr) -#' # set key antibiotics to a new variable -#' my_patients <- example_isolates %>% -#' mutate(keyab = key_antibiotics(.)) %>% -#' mutate( -#' # now calculate first isolates -#' first_regular = first_isolate(., col_keyantibiotics = FALSE), -#' # and first WEIGHTED isolates -#' first_weighted = first_isolate(., col_keyantibiotics = "keyab") -#' ) -#' -#' # Check the difference, in this data set it results in 7% more isolates: -#' sum(my_patients$first_regular, na.rm = TRUE) -#' sum(my_patients$first_weighted, na.rm = TRUE) -#' } -#' +#' #' # output of the `key_antibiotics` function could be like this: #' strainA <- "SSSRR.S.R..S" #' strainB <- "SSSIRSSSRSSS" #' +#' # can those strings can be compared with: #' key_antibiotics_equal(strainA, strainB) #' # TRUE, because I is ignored (as well as missing values) #' #' key_antibiotics_equal(strainA, strainB, ignore_I = FALSE) #' # FALSE, because I is not ignored and so the 4th value differs +#' +#' \donttest{ +#' if (require("dplyr")) { +#' # set key antibiotics to a new variable +#' my_patients <- example_isolates %>% +#' mutate(keyab = key_antibiotics(.)) %>% +#' mutate( +#' # now calculate first isolates +#' first_regular = first_isolate(., col_keyantibiotics = FALSE), +#' # and first WEIGHTED isolates +#' first_weighted = first_isolate(., col_keyantibiotics = "keyab") +#' ) +#' +#' # Check the difference, in this data set it results in 7% more isolates: +#' sum(my_patients$first_regular, na.rm = TRUE) +#' sum(my_patients$first_weighted, na.rm = TRUE) +#' } +#' } key_antibiotics <- function(x, col_mo = NULL, universal_1 = guess_ab_col(x, "amoxicillin"), diff --git a/R/like.R b/R/like.R index fd52ec78..c557fb59 100755 --- a/R/like.R +++ b/R/like.R @@ -57,10 +57,11 @@ #' #> TRUE TRUE TRUE #' #' # get isolates whose name start with 'Ent' or 'ent' -#' \dontrun{ -#' library(dplyr) -#' example_isolates %>% -#' filter(mo_name(mo) %like% "^ent") +#' \donttest{ +#' if (require("dplyr")) { +#' example_isolates %>% +#' filter(mo_name(mo) %like% "^ent") +#' } #' } like <- function(x, pattern, ignore.case = TRUE) { # set to fixed if no regex found diff --git a/R/mdro.R b/R/mdro.R index a390e03f..d342c2fe 100755 --- a/R/mdro.R +++ b/R/mdro.R @@ -27,7 +27,7 @@ #' @param info a logical to indicate whether progress should be printed to the console #' @inheritParams eucast_rules #' @param pct_required_classes minimal required percentage of antimicrobial classes that must be available per isolate, rounded down. For example, with the default guideline, 17 antimicrobial classes must be available for *S. aureus*. Setting this `pct_required_classes` argument to `0.5` (default) means that for every *S. aureus* isolate at least 8 different classes must be available. Any lower number of available classes will return `NA` for that isolate. -#' @param combine_SI a logical to indicate whether all values of S and I must be merged into one, so resistance is only considered when isolates are R, not I. As this is the default behaviour of the [mdro()] function, it follows the redefinition by EUCAST about the interpretion of I (increased exposure) in 2019, see section 'Interpretation of S, I and R' below. When using `combine_SI = FALSE`, resistance is considered when isolates are R or I. +#' @param combine_SI a [logical] to indicate whether all values of S and I must be merged into one, so resistance is only considered when isolates are R, not I. As this is the default behaviour of the [mdro()] function, it follows the redefinition by EUCAST about the interpretation of I (increased exposure) in 2019, see section 'Interpretation of S, I and R' below. When using `combine_SI = FALSE`, resistance is considered when isolates are R or I. #' @param verbose a logical to turn Verbose mode on and off (default is off). In Verbose mode, the function does not return the MDRO results, but instead returns a data set in logbook form with extensive info about which isolates would be MDRO-positive, or why they are not. #' @inheritSection eucast_rules Antibiotics #' @details @@ -37,8 +37,10 @@ #' #' - `guideline = "CMI2012"`\cr #' Magiorakos AP, Srinivasan A *et al.* "Multidrug-resistant, extensively drug-resistant and pandrug-resistant bacteria: an international expert proposal for interim standard definitions for acquired resistance." Clinical Microbiology and Infection (2012) ([link](https://www.clinicalmicrobiologyandinfection.com/article/S1198-743X(14)61632-3/fulltext)) -#' - `guideline = "EUCAST"`\cr -#' The European international guideline - EUCAST Expert Rules Version 3.1 "Intrinsic Resistance and Exceptional Phenotypes Tables" ([link](http://www.eucast.org/fileadmin/src/media/PDFs/EUCAST_files/Expert_Rules/Expert_rules_intrinsic_exceptional_V3.1.pdf)) +#' - `guideline = "EUCAST3.2"` (or simply `guideline = "EUCAST"`)\cr +#' The European international guideline - EUCAST Expert Rules Version 3.2 "Intrinsic Resistance and Unusual Phenotypes" ([link](https://www.eucast.org/fileadmin/src/media/PDFs/EUCAST_files/Expert_Rules/2020/Intrinsic_Resistance_and_Unusual_Phenotypes_Tables_v3.2_20200225.pdf)) +#' - `guideline = "EUCAST3.1"`\cr +#' The European international guideline - EUCAST Expert Rules Version 3.1 "Intrinsic Resistance and Exceptional Phenotypes Tables" ([link](https://www.eucast.org/fileadmin/src/media/PDFs/EUCAST_files/Expert_Rules/Expert_rules_intrinsic_exceptional_V3.1.pdf)) #' - `guideline = "TB"`\cr #' The international guideline for multi-drug resistant tuberculosis - World Health Organization "Companion handbook to the WHO guidelines for the programmatic management of drug-resistant tuberculosis" ([link](https://www.who.int/tb/publications/pmdt_companionhandbook/en/)) #' - `guideline = "MRGN"`\cr @@ -48,7 +50,7 @@ #' #' Please suggest your own (country-specific) guidelines by letting us know: . #' -#' **Note:** Every test that involves the Enterobacteriaceae family, will internally be performed using its newly named order Enterobacterales, since the Enterobacteriaceae family has been taxonomically reclassified by Adeolu *et al.* in 2016. Before that, Enterobacteriaceae was the only family under the Enterobacteriales (with an i) order. All species under the old Enterobacteriaceae family are still under the new Enterobacterales (without an i) order, but divided into multiple families. The way tests are performed now by this [mdro()] function makes sure that results from before 2016 and after 2016 are identical. +#' **Note:** Every test that involves the Enterobacteriaceae family, will internally be performed using its newly named *order* Enterobacterales, since the Enterobacteriaceae family has been taxonomically reclassified by Adeolu *et al.* in 2016. Before that, Enterobacteriaceae was the only family under the Enterobacteriales (with an i) order. All species under the old Enterobacteriaceae family are still under the new Enterobacterales (without an i) order, but divided into multiple families. The way tests are performed now by this [mdro()] function makes sure that results from before 2016 and after 2016 are identical. #' @inheritSection as.rsi Interpretation of R and S/I #' @return #' - CMI 2012 paper - function [mdr_cmi2012()] or [mdro()]:\cr @@ -66,18 +68,19 @@ #' @source #' Please see *Details* for the list of publications used for this function. #' @examples -#' \dontrun{ -#' library(dplyr) -#' library(cleaner) +#' mdro(example_isolates, guideline = "EUCAST") #' -#' example_isolates %>% -#' mdro() %>% -#' freq() +#' \donttest{ +#' if (require("dplyr")) { +#' example_isolates %>% +#' mdro() %>% +#' table() #' -#' example_isolates %>% -#' mutate(EUCAST = eucast_exceptional_phenotypes(.), -#' BRMO = brmo(.), -#' MRGN = mrgn(.)) +#' example_isolates %>% +#' mutate(EUCAST = eucast_exceptional_phenotypes(.), +#' BRMO = brmo(.), +#' MRGN = mrgn(.)) +#' } #' } mdro <- function(x, guideline = "CMI2012", @@ -90,12 +93,12 @@ mdro <- function(x, check_dataset_integrity() - if (verbose == TRUE & interactive()) { + if (interactive() & verbose == TRUE & info == TRUE) { txt <- paste0("WARNING: In Verbose mode, the mdro() function does not return the MDRO results, but instead returns a data set in logbook form with extensive info about which isolates would be MDRO-positive, or why they are not.", "\n\nThis may overwrite your existing data if you use e.g.:", "\ndata <- mdro(data, verbose = TRUE)\n\nDo you want to continue?") - if ("rstudioapi" %in% rownames(utils::installed.packages())) { - showQuestion <- import_fn("showQuestion", "rstudioapi") + showQuestion <- import_fn("showQuestion", "rstudioapi", error_on_fail = FALSE) + if (!is.null(showQuestion)) { q_continue <- showQuestion("Using verbose = TRUE with mdro()", txt) } else { q_continue <- utils::menu(choices = c("OK", "Cancel"), graphics = FALSE, title = txt) @@ -124,19 +127,25 @@ mdro <- function(x, } stop_ifnot(length(guideline) == 1, "`guideline` must be of length 1") + guideline.bak <- guideline + guideline <- tolower(gsub("[^a-zA-Z0-9.]+", "", guideline)) if (is.null(guideline)) { # default to the paper by Magiorakos et al. (2012) guideline <- "cmi2012" } - if (tolower(guideline) == "nl") { - guideline <- "BRMO" + if (guideline == "eucast") { + # turn into latest EUCAST guideline + guideline <- "eucast3.2" } - if (tolower(guideline) == "de") { - guideline <- "MRGN" + if (guideline == "nl") { + guideline <- "brmo" } - stop_ifnot(tolower(guideline) %in% c("brmo", "mrgn", "eucast", "tb", "cmi2012"), - "invalid guideline: ", guideline) - guideline <- list(code = tolower(guideline)) + if (guideline == "de") { + guideline <- "mrgn" + } + stop_ifnot(guideline %in% c("brmo", "mrgn", "eucast3.1", "eucast3.2", "tb", "cmi2012"), + "invalid guideline: ", guideline.bak) + guideline <- list(code = guideline) # try to find columns based on type # -- mo @@ -158,16 +167,22 @@ mdro <- function(x, guideline$version <- "N/A" guideline$source <- "Clinical Microbiology and Infection 18:3, 2012. DOI: 10.1111/j.1469-0691.2011.03570.x" - } else if (guideline$code == "eucast") { + } else if (guideline$code == "eucast3.2") { + guideline$name <- "EUCAST Expert Rules, \"Intrinsic Resistance and Unusual Phenotypes\"" + guideline$author <- "EUCAST (European Committee on Antimicrobial Susceptibility Testing)" + guideline$version <- "3.2, 2020" + guideline$source <- "https://www.eucast.org/fileadmin/src/media/PDFs/EUCAST_files/Expert_Rules/2020/Intrinsic_Resistance_and_Unusual_Phenotypes_Tables_v3.2_20200225.pdf" + + } else if (guideline$code == "eucast3.1") { guideline$name <- "EUCAST Expert Rules, \"Intrinsic Resistance and Exceptional Phenotypes Tables\"" guideline$author <- "EUCAST (European Committee on Antimicrobial Susceptibility Testing)" - guideline$version <- "3.1" - guideline$source <- "http://www.eucast.org/fileadmin/src/media/PDFs/EUCAST_files/Expert_Rules/Expert_rules_intrinsic_exceptional_V3.1.pdf" + guideline$version <- "3.1, 2016" + guideline$source <- "https://www.eucast.org/fileadmin/src/media/PDFs/EUCAST_files/Expert_Rules/Expert_rules_intrinsic_exceptional_V3.1.pdf" } else if (guideline$code == "tb") { guideline$name <- "Companion handbook to the WHO guidelines for the programmatic management of drug-resistant tuberculosis" guideline$author <- "WHO (World Health Organization)" - guideline$version <- "WHO/HTM/TB/2014.11" + guideline$version <- "WHO/HTM/TB/2014.11, 2014" guideline$source <- "https://www.who.int/tb/publications/pmdt_companionhandbook/en/" # support per country: @@ -306,6 +321,33 @@ mdro <- function(x, verbose = verbose, info = info, ...) + } else if (guideline$code == "eucast3.2") { + cols_ab <- get_column_abx(x = x, + soft_dependencies = c("AMP", + "AMX", + "CIP", + "DAL", + "DAP", + "ERV", + "FDX", + "GEN", + "LNZ", + "MEM", + "MTR", + "OMC", + "ORI", + "PEN", + "QDA", + "RIF", + "TEC", + "TGC", + "TLV", + "TOB", + "TZD", + "VAN"), + info = info, + verbose = verbose, + ...) } else if (guideline$code == "tb") { cols_ab <- get_column_abx(x = x, soft_dependencies = c("CAP", @@ -344,41 +386,88 @@ mdro <- function(x, ATM <- cols_ab["ATM"] AZL <- cols_ab["AZL"] AZM <- cols_ab["AZM"] + BPR <- cols_ab["BPR"] + CAC <- cols_ab["CAC"] + CAT <- cols_ab["CAT"] CAZ <- cols_ab["CAZ"] + CCV <- cols_ab["CCV"] + CDR <- cols_ab["CDR"] + CDZ <- cols_ab["CDZ"] + CEC <- cols_ab["CEC"] CED <- cols_ab["CED"] + CEI <- cols_ab["CEI"] + CEP <- cols_ab["CEP"] + CFM <- cols_ab["CFM"] + CFM1 <- cols_ab["CFM1"] + CFP <- cols_ab["CFP"] + CFR <- cols_ab["CFR"] + CFS <- cols_ab["CFS"] CHL <- cols_ab["CHL"] + CID <- cols_ab["CID"] CIP <- cols_ab["CIP"] CLI <- cols_ab["CLI"] CLR <- cols_ab["CLR"] + CMX <- cols_ab["CMX"] + CMZ <- cols_ab["CMZ"] + CND <- cols_ab["CND"] COL <- cols_ab["COL"] + CPD <- cols_ab["CPD"] + CPM <- cols_ab["CPM"] + CPO <- cols_ab["CPO"] + CPR <- cols_ab["CPR"] CPT <- cols_ab["CPT"] + CRD <- cols_ab["CRD"] CRO <- cols_ab["CRO"] + CSL <- cols_ab["CSL"] + CTB <- cols_ab["CTB"] + CTF <- cols_ab["CTF"] + CTL <- cols_ab["CTL"] CTT <- cols_ab["CTT"] CTX <- cols_ab["CTX"] + CTZ <- cols_ab["CTZ"] CXM <- cols_ab["CXM"] + CZD <- cols_ab["CZD"] CZO <- cols_ab["CZO"] + CZX <- cols_ab["CZX"] + DAL <- cols_ab["DAL"] DAP <- cols_ab["DAP"] + DIT <- cols_ab["DIT"] + DIZ <- cols_ab["DIZ"] DOR <- cols_ab["DOR"] DOX <- cols_ab["DOX"] + ENX <- cols_ab["ENX"] + ERV <- cols_ab["ERV"] ERY <- cols_ab["ERY"] ETP <- cols_ab["ETP"] + FDX <- cols_ab["FDX"] FEP <- cols_ab["FEP"] FLC <- cols_ab["FLC"] + FLE <- cols_ab["FLE"] FOS <- cols_ab["FOS"] FOX <- cols_ab["FOX"] FUS <- cols_ab["FUS"] + GAT <- cols_ab["GAT"] GEH <- cols_ab["GEH"] + GEM <- cols_ab["GEM"] GEN <- cols_ab["GEN"] + GRX <- cols_ab["GRX"] + HAP <- cols_ab["HAP"] IPM <- cols_ab["IPM"] KAN <- cols_ab["KAN"] + LEX <- cols_ab["LEX"] LIN <- cols_ab["LIN"] LNZ <- cols_ab["LNZ"] + LOM <- cols_ab["LOM"] + LOR <- cols_ab["LOR"] + LTM <- cols_ab["LTM"] LVX <- cols_ab["LVX"] + MAN <- cols_ab["MAN"] MEM <- cols_ab["MEM"] + MEV <- cols_ab["MEV"] MEZ <- cols_ab["MEZ"] - MTR <- cols_ab["MTR"] MFX <- cols_ab["MFX"] MNO <- cols_ab["MNO"] + MTR <- cols_ab["MTR"] NAL <- cols_ab["NAL"] NEO <- cols_ab["NEO"] NET <- cols_ab["NET"] @@ -386,17 +475,25 @@ mdro <- function(x, NOR <- cols_ab["NOR"] NOV <- cols_ab["NOV"] OFX <- cols_ab["OFX"] + OMC <- cols_ab["OMC"] + ORI <- cols_ab["ORI"] OXA <- cols_ab["OXA"] + PAZ <- cols_ab["PAZ"] + PEF <- cols_ab["PEF"] PEN <- cols_ab["PEN"] PIP <- cols_ab["PIP"] PLB <- cols_ab["PLB"] PRI <- cols_ab["PRI"] + PRU <- cols_ab["PRU"] QDA <- cols_ab["QDA"] + RFL <- cols_ab["RFL"] RID <- cols_ab["RID"] RIF <- cols_ab["RIF"] RXT <- cols_ab["RXT"] SAM <- cols_ab["SAM"] SIS <- cols_ab["SIS"] + SPT <- cols_ab["SPT"] + SPX <- cols_ab["SPX"] STH <- cols_ab["STH"] SXT <- cols_ab["SXT"] TCC <- cols_ab["TCC"] @@ -406,7 +503,10 @@ mdro <- function(x, TIC <- cols_ab["TIC"] TLV <- cols_ab["TLV"] TMP <- cols_ab["TMP"] + TMX <- cols_ab["TMX"] TOB <- cols_ab["TOB"] + TVA <- cols_ab["TVA"] + TZD <- cols_ab["TZD"] TZP <- cols_ab["TZP"] VAN <- cols_ab["VAN"] # additional for TB @@ -453,10 +553,12 @@ mdro <- function(x, # antibiotic classes aminoglycosides <- c(TOB, GEN) - cephalosporins <- c(FEP, CTX, FOX, CED, CAZ, CRO, CXM, CZO) - cephalosporins_3rd <- c(CTX, CRO, CAZ) - carbapenems <- c(ETP, IPM, MEM) - fluoroquinolones <- c(OFX, CIP, LVX, MFX) + cephalosporins <- c(CDZ, CAC, CEC, CFR, RID, MAN, CTZ, CZD, CZO, CDR, DIT, FEP, CAT, CFM, CMX, CMZ, DIZ, CID, CFP, CSL, CND, CTX, CTT, CTF, FOX, CPM, CPO, CPD, CPR, CRD, CFS, CPT, CAZ, CCV, CTL, CTB, CZX, BPR, CFM1, CEI, CRO, CXM, LEX, CEP, HAP, CED, LTM, LOR) + cephalosporins_1st <- c(CAC, CFR, RID, CTZ, CZD, CZO, CRD, CTL, LEX, CEP, HAP, CED) + cephalosporins_2nd <- c(CEC, MAN, CMZ, CID, CND, CTT, CTF, FOX, CPR, CXM, LOR) + cephalosporins_3rd <- c(CDZ, CDR, DIT, CAT, CFM, CMX, DIZ, CFP, CSL, CTX, CPM, CPD, CFS, CAZ, CCV, CTB, CZX, CRO, LTM) + carbapenems <- c(DOR, ETP, IPM, MEM, MEV) + fluoroquinolones <- c(CIP, ENX, FLE, GAT, GEM, GRX, LVX, LOM, MFX, NOR, OFX, PAZ, PEF, PRU, RFL, SPX, TMX, TVA) # helper function for editing the table trans_tbl <- function(to, rows, cols, any_all) { @@ -749,33 +851,33 @@ mdro <- function(x, } - if (guideline$code == "eucast") { - # EUCAST ------------------------------------------------------------------ + if (guideline$code == "eucast3.1") { + # EUCAST 3.1 -------------------------------------------------------------- # Table 5 trans_tbl(3, which(x$order == "Enterobacterales" - | x$fullname %like% "^Pseudomonas aeruginosa" + | (x$genus == "Pseudomonas" & x$species == "aeruginosa") | x$genus == "Acinetobacter"), COL, "all") trans_tbl(3, - which(x$fullname %like% "^Salmonella Typhi"), + which(x$genus == "Salmonella" & x$species == "Typhi"), c(carbapenems, fluoroquinolones), "any") trans_tbl(3, - which(x$fullname %like% "^Haemophilus influenzae"), + which(x$genus == "Haemophilus" & x$species == "influenzae"), c(cephalosporins_3rd, carbapenems, fluoroquinolones), "any") trans_tbl(3, - which(x$fullname %like% "^Moraxella catarrhalis"), + which(x$genus == "Moraxella" & x$species == "catarrhalis"), c(cephalosporins_3rd, fluoroquinolones), "any") trans_tbl(3, - which(x$fullname %like% "^Neisseria meningitidis"), + which(x$genus == "Neisseria" & x$species == "meningitidis"), c(cephalosporins_3rd, fluoroquinolones), "any") trans_tbl(3, - which(x$fullname %like% "^Neisseria gonorrhoeae"), + which(x$genus == "Neisseria" & x$species == "gonorrhoeae"), AZM, "any") # Table 6 @@ -788,7 +890,7 @@ mdro <- function(x, c(VAN, TEC, DAP, LNZ, QDA, TGC), "any") trans_tbl(3, - which(x$fullname %like% "^Streptococcus pneumoniae"), + which(x$genus == "Streptococcus" & x$species == "pneumoniae"), c(carbapenems, VAN, TEC, DAP, LNZ, QDA, TGC, RIF), "any") trans_tbl(3, # Sr. groups A/B/C/G @@ -800,7 +902,7 @@ mdro <- function(x, c(DAP, LNZ, TGC, TEC), "any") trans_tbl(3, - which(x$fullname %like% "^Enterococcus faecalis"), + which(x$genus == "Enterococcus" & x$species == "faecalis"), c(AMP, AMX), "any") # Table 7 @@ -809,11 +911,84 @@ mdro <- function(x, MTR, "any") trans_tbl(3, - which(x$fullname %like% "^Clostridium difficile"), + which(x$genus == "Clostridium" & x$species == "difficile"), c(MTR, VAN), "any") } + if (guideline$code == "eucast3.2") { + # EUCAST 3.2 -------------------------------------------------------------- + # Table 6 + trans_tbl(3, + which((x$order == "Enterobacterales" & + !x$family == "Morganellaceae" & + !(x$genus == "Serratia" & x$species == "marcescens")) + | (x$genus == "Pseudomonas" & x$species == "aeruginosa") + | x$genus == "Acinetobacter"), + COL, + "all") + trans_tbl(3, + which(x$genus == "Salmonella" & x$species == "Typhi"), + c(carbapenems), + "any") + trans_tbl(3, + which(x$genus == "Haemophilus" & x$species == "influenzae"), + c(cephalosporins_3rd, carbapenems, fluoroquinolones), + "any") + trans_tbl(3, + which(x$genus == "Moraxella" & x$species == "catarrhalis"), + c(cephalosporins_3rd, fluoroquinolones), + "any") + trans_tbl(3, + which(x$genus == "Neisseria" & x$species == "meningitidis"), + c(cephalosporins_3rd, fluoroquinolones), + "any") + trans_tbl(3, + which(x$genus == "Neisseria" & x$species == "gonorrhoeae"), + SPT, + "any") + # Table 7 + trans_tbl(3, + which(x$genus == "Staphylococcus" & x$species == "aureus"), + c(VAN, TEC, TLV, DAL, ORI, DAP, LNZ, TZD, QDA, TGC, ERV, OMC), + "any") + trans_tbl(3, + which(x$mo %in% MO_CONS), # coagulase-negative Staphylococcus + c( VAN, TLV, DAL, ORI, DAP, LNZ, TZD, QDA, TGC, ERV, OMC), + "any") + trans_tbl(3, + which(x$genus == "Corynebacterium"), + c(VAN, TEC, TLV, DAL, ORI, DAP, LNZ, TZD, QDA, TGC), + "any") + trans_tbl(3, + which(x$genus == "Streptococcus" & x$species == "pneumoniae"), + c(carbapenems, VAN, TEC, TLV, DAL, ORI, DAP, LNZ, TZD, QDA, TGC, ERV, OMC, RIF), + "any") + streps <- MO_lookup[which(MO_lookup$genus == "Streptococcus"), "mo", drop = TRUE] + streps_ABCG <- streps[as.mo(streps, Lancefield = TRUE) %in% c("B_STRPT_GRPA", "B_STRPT_GRPB", "B_STRPT_GRPC", "B_STRPT_GRPG")] + trans_tbl(3, # Sr. groups A/B/C/G + which(x$mo %in% streps_ABCG), + c(PEN, cephalosporins, VAN, TEC, TLV, DAL, ORI, DAP, LNZ, TZD, QDA, TGC, ERV, OMC), + "any") + trans_tbl(3, + which(x$genus == "Enterococcus"), + c(DAP, LNZ, TGC, ERV, OMC, TEC), + "any") + trans_tbl(3, + which(x$genus == "Enterococcus" & x$species == "faecalis"), + c(AMP, AMX), + "any") + # Table 8 + trans_tbl(3, + which(x$genus == "Bacteroides"), + MTR, + "any") + trans_tbl(3, + which(x$genus == "Clostridium" & x$species == "difficile"), + c(MTR, VAN, FDX), + "any") + } + if (guideline$code == "mrgn") { # Germany ----------------------------------------------------------------- CTX_or_CAZ <- CTX %or% CAZ @@ -828,7 +1003,7 @@ mdro <- function(x, # Table 1 x[which((x$order == "Enterobacterales" | # following in fact the old Enterobacteriaceae classification - x$fullname %like% "^Acinetobacter baumannii") & + (x$genus == "Acinetobacter" & x$species == "baumannii")) & x[, PIP] == "R" & x[, CTX_or_CAZ] == "R" & x[, IPM_or_MEM] == "S" & @@ -836,7 +1011,7 @@ mdro <- function(x, "MDRO"] <- 2 # 2 = 3MRGN x[which((x$order == "Enterobacterales" | # following in fact the old Enterobacteriaceae classification - x$fullname %like% "^Acinetobacter baumannii") & + (x$genus == "Acinetobacter" & x$species == "baumannii")) & x[, PIP] == "R" & x[, CTX_or_CAZ] == "R" & x[, IPM_or_MEM] == "R" & @@ -844,18 +1019,18 @@ mdro <- function(x, "MDRO"] <- 3 # 3 = 4MRGN, overwrites 3MRGN if applicable x[which((x$order == "Enterobacterales" | # following in fact the old Enterobacteriaceae classification - x$fullname %like% "^Acinetobacter baumannii") & + (x$genus == "Acinetobacter" & x$species == "baumannii")) & x[, IPM] == "R" | x[, MEM] == "R"), "MDRO"] <- 3 # 3 = 4MRGN, always when imipenem or meropenem is R - x[which(x$fullname %like% "^Pseudomonas aeruginosa" & + x[which(x$genus == "Pseudomonas" & x$species == "aeruginosa" & (x[, PIP] == "S") + (x[, CTX_or_CAZ] == "S") + (x[, IPM_or_MEM] == "S") + (x[, CIP] == "S") == 1), "MDRO"] <- 2 # 2 = 3MRGN, if only 1 group is S - x[which((x$fullname %like% "^Pseudomonas aeruginosa") & + x[which((x$genus == "Pseudomonas" & x$species == "aeruginosa") & x[, PIP] == "R" & x[, CTX_or_CAZ] == "R" & x[, IPM_or_MEM] == "R" & @@ -903,7 +1078,7 @@ mdro <- function(x, "all") trans_tbl(3, - which(x$fullname %like% "^Stenotrophomonas maltophilia"), + which(x$genus == "Stenotrophomonas" & x$species == "maltophilia"), SXT, "all") @@ -922,20 +1097,20 @@ mdro <- function(x, x$psae <- 0 } x[which( - x$fullname %like% "Pseudomonas aeruginosa" + x$genus == "Pseudomonas" & x$species == "aeruginosa" & x$psae >= 3), "MDRO"] <- 3 # Table 3 trans_tbl(3, - which(x$fullname %like% "Streptococcus pneumoniae"), + which(x$genus == "Streptococcus" & x$species == "pneumoniae"), PEN, "all") trans_tbl(3, - which(x$fullname %like% "Streptococcus pneumoniae"), + which(x$genus == "Streptococcus" & x$species == "pneumoniae"), VAN, "all") trans_tbl(3, - which(x$fullname %like% "Enterococcus faecium"), + which(x$genus == "Enterococcus" & x$species == "faecium"), c(PEN, VAN), "all") } @@ -1086,7 +1261,6 @@ mdr_cmi2012 <- function(x, guideline = "CMI2012", ...) { mdro(x = x, guideline = "CMI2012", ...) } - #' @rdname mdro #' @export eucast_exceptional_phenotypes <- function(x, guideline = "EUCAST", ...) { diff --git a/R/mo.R b/R/mo.R index cda2f305..9892369a 100755 --- a/R/mo.R +++ b/R/mo.R @@ -93,14 +93,7 @@ #' #' ## Microbial prevalence of pathogens in humans #' -#' The intelligent rules consider the prevalence of microorganisms in humans grouped into three groups, which is available as the `prevalence` columns in the [microorganisms] and [microorganisms.old] data sets. The grouping into prevalence groups is based on experience from several microbiological laboratories in the Netherlands in conjunction with international reports on pathogen prevalence. -#' -#' Group 1 (most prevalent microorganisms) consists of all microorganisms where the taxonomic class is Gammaproteobacteria or where the taxonomic genus is *Enterococcus*, *Staphylococcus* or *Streptococcus*. This group consequently contains all common Gram-negative bacteria, such as *Klebsiella*, *Pseudomonas* and *Legionella*. -#' -#' Group 2 consists of all microorganisms where the taxonomic phylum is Proteobacteria, Firmicutes, Actinobacteria or Sarcomastigophora, or where the taxonomic genus is *Aspergillus*, *Bacteroides*, *Candida*, *Capnocytophaga*, *Chryseobacterium*, *Cryptococcus*, *Elisabethkingia*, *Flavobacterium*, *Fusobacterium*, *Giardia*, *Leptotrichia*, *Mycoplasma*, *Prevotella*, *Rhodotorula*, *Treponema*, *Trichophyton* or *Ureaplasma*. This group consequently contains all less common and rare human pathogens. -#' -#' Group 3 (least prevalent microorganisms) consists of all other microorganisms. This group contains microorganisms most probably not found in humans. -#' +#' The intelligent rules consider the prevalence of microorganisms in humans grouped into three groups, which is available as the `prevalence` columns in the [microorganisms] and [microorganisms.old] data sets. The grouping into human pathogenic prevalence is explained in the section *Matching score for microorganisms* below. #' @inheritSection mo_matching_score Matching score for microorganisms #' @inheritSection catalogue_of_life Catalogue of Life # (source as a section here, so it can be inherited by other man pages:) @@ -152,25 +145,6 @@ #' # All mo_* functions use as.mo() internally too (see ?mo_property): #' mo_genus("E. coli") # returns "Escherichia" #' mo_gramstain("E. coli") # returns "Gram negative" -#' -#' } -#' \dontrun{ -#' df$mo <- as.mo(df$microorganism_name) -#' -#' # the select function of the Tidyverse is also supported: -#' library(dplyr) -#' df$mo <- df %>% -#' select(microorganism_name) %>% -#' as.mo() -#' -#' # and can even contain 2 columns, which is convenient -#' # for genus/species combinations: -#' df$mo <- df %>% -#' select(genus, species) %>% -#' as.mo() -#' # although this works easier and does the same: -#' df <- df %>% -#' mutate(mo = as.mo(paste(genus, species))) #' } as.mo <- function(x, Becker = FALSE, @@ -1439,45 +1413,26 @@ exec_as.mo <- function(x, # Becker ---- if (Becker == TRUE | Becker == "all") { - # See Source. It's this figure: - # https://www.ncbi.nlm.nih.gov/pmc/articles/PMC4187637/figure/F3/ - MOs_staph <- MO_lookup[which(MO_lookup$genus == "Staphylococcus"), ] - CoNS <- MOs_staph[which(MOs_staph$species %in% c("arlettae", "auricularis", "capitis", - "caprae", "carnosus", "chromogenes", "cohnii", "condimenti", - "devriesei", "epidermidis", "equorum", "felis", - "fleurettii", "gallinarum", "haemolyticus", - "hominis", "jettensis", "kloosii", "lentus", - "lugdunensis", "massiliensis", "microti", - "muscae", "nepalensis", "pasteuri", "petrasii", - "pettenkoferi", "piscifermentans", "rostri", - "saccharolyticus", "saprophyticus", "sciuri", - "stepanovicii", "simulans", "succinus", - "vitulinus", "warneri", "xylosus") - | (MOs_staph$species == "schleiferi" & MOs_staph$subspecies %in% c("schleiferi", ""))), - property] - CoPS <- MOs_staph[which(MOs_staph$species %in% c("simiae", "agnetis", - "delphini", "lutrae", - "hyicus", "intermedius", - "pseudintermedius", "pseudointermedius", - "schweitzeri", "argenteus") - | (MOs_staph$species == "schleiferi" & MOs_staph$subspecies == "coagulans")), - property] - # warn when species found that are not in Becker (2014, PMID 25278577) and Becker (2019, PMID 30872103) post_Becker <- c("argensis", "caeli", "cornubiensis", "edaphicus") - if (any(x %in% MOs_staph[which(MOs_staph$species %in% post_Becker), property])) { + if (any(x %in% MO_lookup[which(MO_lookup$species %in% post_Becker), property])) { warning("Becker ", font_italic("et al."), " (2014, 2019) does not contain these species named after their publication: ", font_italic(paste("S.", - sort(mo_species(unique(x[x %in% MOs_staph[which(MOs_staph$species %in% post_Becker), property]]))), + sort(mo_species(unique(x[x %in% MO_lookup[which(MO_lookup$species %in% post_Becker), property]]))), collapse = ", ")), ".", call. = FALSE, immediate. = TRUE) } + # 'MO_CONS' and 'MO_COPS' are vectors created in R/zzz.R + CoNS <- MO_lookup[which(MO_lookup$mo %in% MO_CONS), property, drop = TRUE] x[x %in% CoNS] <- lookup(mo == "B_STPHY_CONS", uncertainty = -1) + + CoPS <- MO_lookup[which(MO_lookup$mo %in% MO_COPS), property, drop = TRUE] x[x %in% CoPS] <- lookup(mo == "B_STPHY_COPS", uncertainty = -1) + if (Becker == "all") { x[x %in% lookup(fullname %like_case% "^Staphylococcus aureus", n = Inf)] <- lookup(mo == "B_STPHY_COPS", uncertainty = -1) } diff --git a/R/mo_matching_score.R b/R/mo_matching_score.R index a4fd1f83..386d88f7 100755 --- a/R/mo_matching_score.R +++ b/R/mo_matching_score.R @@ -32,21 +32,22 @@ #' where: #' #' * \eqn{x} is the user input; -#' * \eqn{n} is a taxonomic name (genus, species and subspecies) as found in [`microorganisms$fullname`][microorganisms]; -#' * \eqn{l_{n}}{l_n} is the length of \eqn{n}; -#' * \eqn{\operatorname{lev}}{lev} is the [Levenshtein distance function](https://en.wikipedia.org/wiki/Levenshtein_distance); -#' * \eqn{p_{n}}{p_n} is the human pathogenic prevalence of \eqn{n}, categorised into group \eqn{1}, \eqn{2} and \eqn{3} (see *Details* in `?as.mo`), meaning that \eqn{p = \{1, 2 , 3\}}{p = {1, 2, 3}}; -#' * \eqn{k_{n}}{k_n} is the kingdom index of \eqn{n}, set as follows: Bacteria = \eqn{1}, Fungi = \eqn{2}, Protozoa = \eqn{3}, Archaea = \eqn{4}, and all others = \eqn{5}, meaning that \eqn{k = \{1, 2 , 3, 4, 5\}}{k = {1, 2, 3, 4, 5}}. +#' * \eqn{n} is a taxonomic name (genus, species, and subspecies); +#' * \eqn{l_n}{l_n} is the length of \eqn{n}; +#' * lev is the [Levenshtein distance function](https://en.wikipedia.org/wiki/Levenshtein_distance), which counts any insertion, deletion and substitution as 1 that is needed to change \eqn{x} into \eqn{n}; +#' * \eqn{p_n}{p_n} is the human pathogenic prevalence group of \eqn{n}, as described below; +#' * \eqn{k_n}{p_n} is the taxonomic kingdom of \eqn{n}, set as Bacteria = 1, Fungi = 2, Protozoa = 3, Archaea = 4, others = 5. #' -#' This means that the user input `x = "E. coli"` gets for *Escherichia coli* a matching score of `r percentage(mo_matching_score("E. coli", "Escherichia coli"), 1)` and for *Entamoeba coli* a matching score of `r percentage(mo_matching_score("E. coli", "Entamoeba coli"), 1)`. +#' The grouping into human pathogenic prevalence (\eqn{p}) is based on experience from several microbiological laboratories in the Netherlands in conjunction with international reports on pathogen prevalence. **Group 1** (most prevalent microorganisms) consists of all microorganisms where the taxonomic class is Gammaproteobacteria or where the taxonomic genus is *Enterococcus*, *Staphylococcus* or *Streptococcus*. This group consequently contains all common Gram-negative bacteria, such as *Pseudomonas* and *Legionella* and all species within the order Enterobacterales. **Group 2** consists of all microorganisms where the taxonomic phylum is Proteobacteria, Firmicutes, Actinobacteria or Sarcomastigophora, or where the taxonomic genus is *Absidia*, *Acremonium*, *Actinotignum*, *Alternaria*, *Anaerosalibacter*, *Apophysomyces*, *Arachnia*, *Aspergillus*, *Aureobacterium*, *Aureobasidium*, *Bacteroides*, *Basidiobolus*, *Beauveria*, *Blastocystis*, *Branhamella*, *Calymmatobacterium*, *Candida*, *Capnocytophaga*, *Catabacter*, *Chaetomium*, *Chryseobacterium*, *Chryseomonas*, *Chrysonilia*, *Cladophialophora*, *Cladosporium*, *Conidiobolus*, *Cryptococcus*, *Curvularia*, *Exophiala*, *Exserohilum*, *Flavobacterium*, *Fonsecaea*, *Fusarium*, *Fusobacterium*, *Hendersonula*, *Hypomyces*, *Koserella*, *Lelliottia*, *Leptosphaeria*, *Leptotrichia*, *Malassezia*, *Malbranchea*, *Mortierella*, *Mucor*, *Mycocentrospora*, *Mycoplasma*, *Nectria*, *Ochroconis*, *Oidiodendron*, *Phoma*, *Piedraia*, *Pithomyces*, *Pityrosporum*, *Prevotella*,\\*Pseudallescheria*, *Rhizomucor*, *Rhizopus*, *Rhodotorula*, *Scolecobasidium*, *Scopulariopsis*, *Scytalidium*,*Sporobolomyces*, *Stachybotrys*, *Stomatococcus*, *Treponema*, *Trichoderma*, *Trichophyton*, *Trichosporon*, *Tritirachium* or *Ureaplasma*. **Group 3** consists of all other microorganisms. #' -#' All matches are sorted descending on their matching score and for all user input values, the top match will be returned. +#' All matches are sorted descending on their matching score and for all user input values, the top match will be returned. This will lead to the effect that e.g., `"E. coli"` will return the microbial ID of *Escherichia coli* (\eqn{m = `r round(mo_matching_score("E. coli", "Escherichia coli"), 3)`}, a highly prevalent microorganism found in humans) and not *Entamoeba coli* (\eqn{m = `r round(mo_matching_score("E. coli", "Entamoeba coli"), 3)`}, a less prevalent microorganism in humans), although the latter would alphabetically come first. #' @export #' @examples #' as.mo("E. coli") #' mo_uncertainties() #' -#' mo_matching_score("E. coli", "Escherichia coli") +#' mo_matching_score(x = "E. coli", +#' n = c("Escherichia coli", "Entamoeba coli")) mo_matching_score <- function(x, n) { # n is always a taxonomically valid full name levenshtein <- double(length = length(x)) diff --git a/R/p_symbol.R b/R/p_symbol.R index be4054d7..7c7d51bc 100755 --- a/R/p_symbol.R +++ b/R/p_symbol.R @@ -25,6 +25,7 @@ #' @inheritSection lifecycle Questioning lifecycle #' @param p p value #' @param emptychar text to show when `p > 0.1` +#' @details **NOTE**: this function will be moved to the `cleaner` package when a new version is being published on CRAN. #' @return Text #' @inheritSection AMR Read more on our website! #' @export diff --git a/R/pca.R b/R/pca.R index 79ad9453..9d319e3f 100755 --- a/R/pca.R +++ b/R/pca.R @@ -36,22 +36,24 @@ #' # `example_isolates` is a dataset available in the AMR package. #' # See ?example_isolates. #' -#' \dontrun{ -#' # calculate the resistance per group first -#' library(dplyr) -#' resistance_data <- example_isolates %>% -#' group_by(order = mo_order(mo), # group on anything, like order -#' genus = mo_genus(mo)) %>% # and genus as we do here -#' summarise_if(is.rsi, resistance) # then get resistance of all drugs -#' -#' # now conduct PCA for certain antimicrobial agents -#' pca_result <- resistance_data %>% -#' pca(AMC, CXM, CTX, CAZ, GEN, TOB, TMP, SXT) -#' -#' pca_result -#' summary(pca_result) -#' biplot(pca_result) -#' ggplot_pca(pca_result) # a new and convenient plot function +#' \donttest{ +#' +#' if (require("dplyr")) { +#' # calculate the resistance per group first +#' resistance_data <- example_isolates %>% +#' group_by(order = mo_order(mo), # group on anything, like order +#' genus = mo_genus(mo)) %>% # and genus as we do here +#' summarise_if(is.rsi, resistance) # then get resistance of all drugs +#' +#' # now conduct PCA for certain antimicrobial agents +#' pca_result <- resistance_data %>% +#' pca(AMC, CXM, CTX, CAZ, GEN, TOB, TMP, SXT) +#' +#' pca_result +#' summary(pca_result) +#' biplot(pca_result) +#' ggplot_pca(pca_result) # a new and convenient plot function +#' } #' } pca <- function(x, ..., diff --git a/R/proportion.R b/R/proportion.R index b794013d..b13947f7 100755 --- a/R/proportion.R +++ b/R/proportion.R @@ -157,15 +157,6 @@ #' group_by(hospital_id) %>% #' proportion_df(translate = FALSE) #' } -#' -#' \dontrun{ -#' # calculate current empiric combination therapy of Helicobacter gastritis: -#' my_table %>% -#' filter(first_isolate == TRUE, -#' genus == "Helicobacter") %>% -#' summarise(p = susceptibility(AMX, MTR), # amoxicillin with metronidazole -#' n = count_all(AMX, MTR)) -#' } resistance <- function(..., minimum = 30, as_percent = FALSE, diff --git a/R/resistance_predict.R b/R/resistance_predict.R index 3607f76d..ea0a76cc 100755 --- a/R/resistance_predict.R +++ b/R/resistance_predict.R @@ -84,10 +84,8 @@ #' } #' #' # create nice plots with ggplot2 yourself -#' \dontrun{ -#' library(dplyr) -#' library(ggplot2) -#' +#' if (require("dplyr") & require("ggplot2")) { +#' #' data <- example_isolates %>% #' filter(mo == as.mo("E. coli")) %>% #' resistance_predict(col_ab = "AMX", diff --git a/R/rsi.R b/R/rsi.R index 5f8cfb64..8ac2bea2 100755 --- a/R/rsi.R +++ b/R/rsi.R @@ -106,34 +106,6 @@ #' NIT = as.mic(32)) #' as.rsi(df) #' -#' \dontrun{ -#' -#' # the dplyr way -#' library(dplyr) -#' df %>% mutate_if(is.mic, as.rsi) -#' df %>% mutate_if(function(x) is.mic(x) | is.disk(x), as.rsi) -#' df %>% mutate(across(where(is.mic), as.rsi)) -#' df %>% mutate_at(vars(AMP:TOB), as.rsi) -#' df %>% mutate(across(AMP:TOB), as.rsi) -#' -#' df %>% -#' mutate_at(vars(AMP:TOB), as.rsi, mo = "E. coli") -#' -#' # to include information about urinary tract infections (UTI) -#' data.frame(mo = "E. coli", -#' NIT = c("<= 2", 32), -#' from_the_bladder = c(TRUE, FALSE)) %>% -#' as.rsi(uti = "from_the_bladder") -#' -#' data.frame(mo = "E. coli", -#' NIT = c("<= 2", 32), -#' specimen = c("urine", "blood")) %>% -#' as.rsi() # automatically determines urine isolates -#' -#' df %>% -#' mutate_at(vars(AMP:NIT), as.rsi, mo = "E. coli", uti = TRUE) -#' } -#' #' # for single values #' as.rsi(x = as.mic(2), #' mo = as.mo("S. pneumoniae"), @@ -145,6 +117,32 @@ #' ab = "ampicillin", # and `ab` with as.ab() #' guideline = "EUCAST") #' +#' \donttest{ +#' # the dplyr way +#' if (require("dplyr")) { +#' df %>% mutate_if(is.mic, as.rsi) +#' df %>% mutate_if(function(x) is.mic(x) | is.disk(x), as.rsi) +#' df %>% mutate(across(where(is.mic), as.rsi)) +#' df %>% mutate_at(vars(AMP:TOB), as.rsi) +#' df %>% mutate(across(AMP:TOB), as.rsi) +#' +#' df %>% +#' mutate_at(vars(AMP:TOB), as.rsi, mo = "E. coli") +#' +#' # to include information about urinary tract infections (UTI) +#' data.frame(mo = "E. coli", +#' NIT = c("<= 2", 32), +#' from_the_bladder = c(TRUE, FALSE)) %>% +#' as.rsi(uti = "from_the_bladder") +#' +#' data.frame(mo = "E. coli", +#' NIT = c("<= 2", 32), +#' specimen = c("urine", "blood")) %>% +#' as.rsi() # automatically determines urine isolates +#' +#' df %>% +#' mutate_at(vars(AMP:NIT), as.rsi, mo = "E. coli", uti = TRUE) +#' } #' #' # For CLEANING existing R/SI values ------------------------------------ #' @@ -156,25 +154,22 @@ #' plot(rsi_data) # for percentages #' barplot(rsi_data) # for frequencies #' -#' \dontrun{ -#' library(dplyr) -#' example_isolates %>% -#' mutate_at(vars(PEN:RIF), as.rsi) -#' # same: -#' example_isolates %>% -#' as.rsi(PEN:RIF) -#' -#' # fastest way to transform all columns with already valid AMR results to class `rsi`: -#' example_isolates %>% -#' mutate_if(is.rsi.eligible, as.rsi) -#' -#' # note: from dplyr 1.0.0 on, this will be: -#' # example_isolates %>% -#' # mutate(across(is.rsi.eligible, as.rsi)) -#' -#' # default threshold of `is.rsi.eligible` is 5%. -#' is.rsi.eligible(WHONET$`First name`) # fails, >80% is invalid -#' is.rsi.eligible(WHONET$`First name`, threshold = 0.99) # succeeds +#' # the dplyr way +#' if (require("dplyr")) { +#' example_isolates %>% +#' mutate_at(vars(PEN:RIF), as.rsi) +#' # same: +#' example_isolates %>% +#' as.rsi(PEN:RIF) +#' +#' # fastest way to transform all columns with already valid AMR results to class `rsi`: +#' example_isolates %>% +#' mutate_if(is.rsi.eligible, as.rsi) +#' +#' # note: from dplyr 1.0.0 on, this will be: +#' # example_isolates %>% +#' # mutate(across(is.rsi.eligible, as.rsi)) +#' } #' } as.rsi <- function(x, ...) { UseMethod("as.rsi") @@ -430,13 +425,6 @@ as.rsi.data.frame <- function(x, conserve_capped_values = FALSE, add_intrinsic_resistance = FALSE) { - # try to find columns based on type - # -- mo - if (is.null(col_mo)) { - col_mo <- search_type_in_df(x = x, type = "mo") - stop_if(is.null(col_mo), "`col_mo` must be set") - } - # -- UTIs col_uti <- uti if (is.null(col_uti)) { @@ -517,6 +505,14 @@ as.rsi.data.frame <- function(x, types[types == "" & sapply(x[, ab_cols], all_valid_disks)] <- "disk" types[types == "" & !sapply(x[, ab_cols], is.rsi)] <- "rsi" + if (any(types %in% c("mic", "disk"), na.rm = TRUE)) { + # now we need an mo column - try to find columns based on type + if (is.null(col_mo)) { + col_mo <- search_type_in_df(x = x, type = "mo") + stop_if(is.null(col_mo), "`col_mo` must be set") + } + } + for (i in seq_len(length(ab_cols))) { if (types[i] == "mic") { x[, ab_cols[i]] <- as.rsi.mic(x = x %pm>% pm_pull(ab_cols[i]), diff --git a/R/rsi_calc.R b/R/rsi_calc.R index 0e49b9ee..f53eb9d0 100755 --- a/R/rsi_calc.R +++ b/R/rsi_calc.R @@ -188,9 +188,9 @@ rsi_calc_df <- function(type, # "proportion", "count" or "both" translate_ab <- get_translate_ab(translate_ab) # select only groups and antibiotics - if (pm_has_groups(data)) { + if (inherits(data, "grouped_df")) { data_has_groups <- TRUE - groups <- setdiff(names(pm_get_group_details(data)), ".rows") + groups <- setdiff(names(attributes(data)$groups), ".rows") data <- data[, c(groups, colnames(data)[sapply(data, is.rsi)]), drop = FALSE] } else { data_has_groups <- FALSE diff --git a/R/sysdata.rda b/R/sysdata.rda index 7422746d67bab2931abb839d7dcaabe61217c26c..00d266a66b48c3bc734a82b7b7e4d32fe90fb1e2 100644 GIT binary patch delta 313532 zcmV(lK=i-Vr4!Vp6Ob7K4VJMRo)dr0%bIORfylOn?NKQ5B4$=%)sU338B1mvDwa={ z{pUla9x(Ze5?~LMa=IQUm(juz9pC_@Fba87`V^_rVnBg`6+Xj$|A8ulT5y6&wf@=MU>*j^xti6(6yXcq?z-&L0`CV!SyZ#$`QF8N)%m}r0{yfwA2$_Fkk*Qm^ z9?PkZWh_!y2p3Tg@&%5~4{J&DS!`xoSX?$$IwO-vzgK3`kgO@}-da(!z|$T$ zyXap2A+MD&G6<3ZX(*@yk9U8jMNI7B>LK7~)!%V=wpm_?@2Lr-e}w4v;rERP$Sd`T zvuKD}!8-5YdMb`~r1I3WB4)vaP9NVJ6ZwzRHY?2a{VNsReb0VI0XUKq2*VVZIb-h6 zW8-0%I^D~sz0-()CwJ_h>Z(6eR8|#^mgBoSupqj#!*?^z*#pF4pId($$H0)o`&_o| z!X(Ul5Og2d!#<-%n2}+n>3D{rGW;?1`8!#R<;OKhAMXbTG|OzB|9r1PGkMN!mIcxv z2QcHoD>WKlO?U$TcJ@w-d*6`a6`Bw3?M141Yp zH(>4$I2mb|a|w1vi2Q$Wvs~Nx=G!>O^1L^%!(1oSk3yvC68SRr%o{G5rlrbi&Z6{1 ziDyuD3KGwu7}g`b4vm3X@mX@W)+=ol%sE_ zS5eSrQ6cLThbu+-4V||1ce_ za!S*_Lx;~N7U?FLoUZ0!lOfdxsVjyo8+B!10x&G~AL4(s=vlRiw%|JtKeGWIn~Ju= zyXYPRP@$_Y@y|-@u~`f!>9GHd%4*dj5bl4cK(KkHe*8kPo*Ex`ty<&2c5&GRdwVDZ z1t>8np*`@n`I!KsD9CV-9~3($1gUU`q5Dp{d%E@$j<|N&gIxb2+iBy9R%keG?%YM+mwhTmnB=^_UDnHzNwz z4JtCJ_?k#!EEjNIeqC6h9quR=Ma|ja#76_WuWAd_+4%#m z;|_oGE|m$et}#a}>FV57W90Q#ci14>QhAGn;S*3K1w~WkKsA?ByZnyfZuYTwImzW) zvHNkl@Vs@2;L6+*!zQIDM?z<}MhU0hh0c`}Pz#=x+MmQI6v9vkSoyD$mmFY+nPkh~ zX9a9B(131`1#v_o3kA-w;~89!*tFf*7N>ukn1srTEQDHqZnRV}Gtg{y^z@G`3zq}= z=|TQ>wG-VzsQw;sb%{(X^sA7dAW3RI4j5946TzPd_V-8c+Ta3W3xDFO!n$PZEIh9_sA`&gp}DxVjaOVM|*Z@u!%`i z_ojWX(A*u}KUS?=r!S6JegYb37A$`q!!5zKtn3`L+=!g8Yx(Yla{jGtz{jHGqI_In zm6{IhEUnMb?F2<*4#<$E;VOFCC5F384Iuf1b$-5)^qbDfgXYgPzyE+28q1y_yT1a!*Ao@eMw>?o z+d(3YxqWY;ANBwp)C;)NO67kYuzJbrC8Z9%oc`tQ?R+E+`TR+-BNx8DF2|mv z2B|~yFq8^hssosQ458=|D z;M4R`&z?imp@;0NfefG9Mo$6TZr3$SzkQ#sA^Z~+c%T5r@Uy92alsW0O5`j6g4pn8 z(_4}bL8nC`b6ed8G<|y>q`mQi4kDP!`|<)A6OXk7a9@Y`1CF#OmUzvHoTwETJt3D6 zvx`kIha_9?@&-???Y|TM*_@1548!)sm*$ubJ>0p-Ayv|JMa& z=(PJ-d=y@`W=LcBA7Ix4nJ>*I$ZvF=W%T$wKzuFDaSjmPgSrP^ETrVPO04}8U0@TM znrnPyIrJV|uKA;T^B1qxh2(mv^fAD**;-pYU#vKv?}@!U1Q!e8u5rK10*YpIOCZpl(shk;F#a#H=Yqr zH7}&acL@MHB?*7wcP7fH#`V=`o6Jhn%N)VhMB~;5f-|bP;3CH1r#M2&KySn7?yy)l z=MX+Gw2Yg_3H&5|VBYyw8Tx$Ms4sVDUr4U@ROhR&6gh~Imx;2^cR`m?9_YGcX2x)} zRHQPz`$1$Uur1hy1A6p~z1p+@e=Dd{^~^AXy@NS1rXhbW4fae=7!qzFM)SWVWq!<$ z{_7R7jhC&Ij;18(JEp_6ROJ@I4%pe|t&K>@H2tNV%uwv39|m$J)^V>thX6nLelz9` z`-IVKE#7{Qi7kCTkTF7+6OIq$hSqki5qj)n*m;i9PH7r9V4z-wzzd5N5VWgU zT9E2TQE)5EL6Fh6t%>0k@*V^o)9!*Ra<6O>y61ll6CK$_F?BIZ-;Fv=brCre=^CgI zL>s14APF9(e)INO%WMS8c2WoDI_d|H<{gs_NifxdX(N3I-k_2V|;5nNj` zOdE^L%UQ=yBf9VSs00U#Sm@xYJsQ2d1m1DFTg!_gnKx4xO@;#b`VU|!Ydt+l&)tdp z(zJg8#Az9Az27Q@!ed_VVyEBq*SRL)r+@JxZ&<>3$*Z976?xl4y;^w7-5fzO`*acQ zqG|fb6?FNptjS=?Ivd}e7RK6IGHtsRjq_1fu17c1V#;tG={Ghmx}U+SOQSyYIv_4Y z2gtYQ0P8|ue<>vf%|U7{KJ#y!;hA#kNOOPliTbm0472lkAEmI9HK>rPtFKfM-ftC@ z!vksR@76Emf~grNlWW_AUpS{5$N?Wx2}Kkt;sC&6RZ%NjfAmNsqP32ns&b(jQwsMk%2tUuIH9|}9pOQm_ z6YWxitLDWTI~|sf1skVZf=S@b(^bI(Qp^lFAHV-yIHK8Wt}V&hPR3B}=g`4RTk@$R z7@M>E@CASBuf7)%q%_jn3~d$b_YH<$`?a1Pu=#&XcuSh7(svjgjQFj z_~Cr|g%H!4AJ2vfUv6Y>WMjNjen4=u;AE7>WpswpVmmP&gb=mJ+HKYzlguJ_5kets zAV}Q!_|tSkly2UGZ)^Eb@Oa67fQj3f+P!_rZcu~ z`(3Pv!*_Ho6(lz2#B;{cT^pa$#0ikSlbm3~l?PcXcB;L+lkm@e{&07_Y=~mVJvs9n%LWi#~ zn2wb`#4*|>JfKCt#gn9=m^oYHWvt6M$}MIGICSFaJy~yG9V1ClS+swY+WvS`ir%bg z#G}ts+}m&@P_5ZcA*SmKZq5$3m45x>noE`!cQO3(m|6R!(5TmqiJ}*-1o(*HyQOK4 zQ!wfx477A!_XKWIe`*zIjU)||3j8^bw3rh!47(Zca5e7&ETMKMF2l|DSAe0dUssI7 z!;6T%$B*5z-SgitNQi&VO+`Q1h0z}6T=m_;!B*+_nCnTO-%PN`&{MW#nJ-87|50~z zy73$GbVaD{L6`-=7rie~8DCJNZBFdYdV>sPm`#O)Lfju}tCI>a44;aY2@~V-=;?Zw z!)&38a>iNUlfhX< z%wcVm0WQ;1)W8(v<7NGN1r`Z&WB4d1VaEt`&07jIe3PwIo_BXoM>~I4BzWUN&^5Z; z+z1qrya=9AjP8F&r&v=JcIfV->6f8HT^vI38HT^?+JS>_J9~dN>mFDT z-Vw84Tem76#D(3bG&8%WD=*eAyETy}f~`s)!yIIuWeDX)xOs*%xwFyoSG5^%wBxpG zxPlPvi4&65g<#ksr1ecCceI7=kliAt;P0nVWp+Z9BzbU+hkMnwf5n(A!yYZNd)DC` zX&42=#Akn)Rx;TAX0l}x4`CGHOxsvQAvL`3;25p1r^#PX{p3Zv?IUq+CAHw zo=T(eO0cLHr&J{~tuirL(-TU@UeampG&uqEQYJqX1e5&U`$Fxt;3c$#h^Prjjmuew z&-;u6?kFaqv@9<33wgMejmp=+Yx8BIV1P-!2om*O7IIaL+rV|h9GMvm@0p4wA%yY{WHY${o)+n^(g_6OpDBKFL3{P0EXP*B3-`X{YkPrKGxmG}H1NWPUzYf zI~e-!n5SP84V08#-%oPuSNoEaM)Yl>HrF0kJA?Gghuic|r{E9x(*|mM4kX>Xv09`L zY@;dcoBT~Q)_wXFV}!tIxhb7JDy4r=RcyrXv}~7NC`%6goT^z%FL>?^+hledjVIn5 zp2a$>sfGS|Qi}DEselgmn<@(FxDyg)mL4nz_>xgemM z_etXYfuX&*@f^@5;Z;+5aSE#EKIC1%A zic?C$;<2wGFL%O6r=nY!Rr!C-GUF_f4;CB85R{1amm|r&4>P(h{ub;Pv5ICWIzTkW zya$gCY)%)8Dv9}-ZkCn{Pk@a)4U`)rna{HHgU$;28gzA%B#B~MZ$@ z^KcFj}`MG$6Q`TuuGpi zO;J<<`?_DQu@Y{u0>M$vOqv;KFEKE-0vMHDVl@xAwCI(STYl%uu23hea8nC+l}ZlI zKlh6@WZW}9km~lp=NAej1k(ra=coE4w9$J4^uJ?J^5hC>I}B#~(LNY}D^GrH={K;A2kBTIOpgw2{_yiUZ0wWQn5uoc8$XF!h3jxo%;i+!ZWPG=uNW4<6JK>Z=p8J~`b%k_5uX?dePmbw z!+PF)X4?gKsPca&AC>1M^ZwMrW{)FUCe;x|8KOmA4ELK3qyX}i2R_>y=wRu)m-ptB zr($%Coy)UwTpm;3qw#hW$$gSqG{}}__ywp?#z>O%XCA8w1C3T^%J2&>;Vc zC;JWHgAY$2h82Id3{Pd#&pp=+3Y&1;01xD`vH^BipIv`DDv_Wz!k2l{?_PMCu8D+^ zy=)$dCR=gDe7oX^#|fldS%O<+;mNNhoY31^cfy~D_o1wfK9%UW!4^9k#jdN>>PNi+ z7I_3~qdV5~8Ok1M{KNE@0@q$yXhC^*b|i+l60u|$a-j86hXF=|5W*}+UmN2+VN^9H z9rgv-L`Q$9(HumRSOEMv0sYhZ3{0{&xq#xDkx8r)f@9OlLLSsGHV|xupuU^ZV{tn($Jj$Qwqu)&D2~zq^emZ@>^eTXx{OgjH_{`_FpS_& zK`ZZ-ujXFK$;K

S*Y(Swk&DpfoCTt}3Pa*&cu2eTIlc66%U{AOAL=lkr`#^3~C% z+3X)CdIN)ARfAiE0HkcPthx;Y+xidvxaFF ztYQZ!A;}DP9OJF-VFo#i?~G&=*gVV|@GTjo@QX~NSJIaITe1@HBur5Obu$B7;}GFCk4g@ z_2E*r&7hyWeG9KNXfR&kbh_OQ-iqu`x((nDokQOkJi5~jj^SS}xDiCt2+)#`79xL9 z46|tGsVdE1ZmnafqNl1Np&$WwcF7K41+ATKCV zRiiD?U)RoA4%T6^#RC^d6>Up#^mDXu$5%a=(Fp$e>AKc>fzG**V9>AR3nb zYr-(NeM(47YA_?8{oIU_>H-rjx8P>GAi0R6s$W$M6=6A!kLy|{%taQd#{o3qY+C

B=$SBDk#?Nw);(T(nC2{JY=T-i+$@T>K!YA^DWYxur%5#}E%m07(&R}^a`=(2l zkIQ$vRqA*}(cqvWPv!34e^&Fm{E=F&QsQk=uXvf_DYDJ;s;wcsseR|&fkI`>;Qh(y ziY0m4*oXWsVfa99jQ&qYZCh1O5L$GT%szyt*PZ=I z4ZA&`^#D2hDoxaNpjaG+1<&aNI&}VGAY`U)gcAPur)3ghRI(gtF}@VE7RgT=gmK-A z)iyRN?j>iugo1&n_W?1g>QS<@uUUiBRHWQQM6LMl5LY3NfE0g7H}z{*HfeHg9iNI# z3-!bxUdOZ9RnjJp)%*p04k;7Cw}cu+DLdop2#=+OKM>~%4v@z$uwe^E)A%+3MpL>gT9}?Cu9EaY_!cOH z)S3M?j_sVk5w zVW1*^x_29h9^cRwFxvj+E~gGvIEe@HE#SKr*1 ztM5J$o5Rsdg98!hn{R+bsrNX|bNljHbow$=1t~)l@-lx}@=meI&m2Z$^k~z?!BDZQ z!T?Xozc>x%^~w>;$Naj%f!n{ZNQzjr;4!ps*1{sxP7x&*HP4j{&pCV)qeO0HzKbkZ=D$#udH z4fDp(Khb~Z>!@i`+_sL&TO3gt+O1}VcZ$7*%l>SeWJcWSe%EQgBoH|il0#Kfuh|rd zT&8UDp_aW=i#?(7o6oRAhJh@Ue_9y!?hcust$2Of^pi5$#I0)Sc(5do4~NEGEk|Wj zoDE>nffOaY(}_);xXr8FL~aeRSnr+_t`x55Sap9f{AbEwdtcuJ-j^2FZU#o{LkgTn zJzd-nnxXPq8ft0&EyJZs0v|cWAoBO^5rH*u)eS_GvPZ)Pt5Aj3mS3W-qsv$}r0&8v z?RB1OVqi!IR_mm`yqQ^?@Nj2;N> zf>eK(o-{F@js@FI`Qw_!F+OX;Y?z828}y6Sv}0lH)zq;fRz9enaO-j2breHDcx1M& zg9!VJc|qpxTYL-}56nddaA(e^tw=({kyB)9 zznhnPCI1d_WX-xN;K@j*OT-IK_>vbA@Q;6@*NLz0DiBA+6f_Kak8u~6>%`O#>X)$B ziz1yxotERNzBS*$^eQ_KmeIqh?UKS!(l}0(N-Q05m$D*jl^+9kn$Q~~<6m3r_ybG3u#R>@m18nq?$mXX8%6SA<0hXMC z_l6cgX>2<5pkcUL@}wN-M6_BjDE)Zv%U9|0l&OqwQhx``POlj4;vLEZuI2Y_&@kc% zHc{K=R%4`*BEtyq6-?B_Wq7y?yjrR*0)E683@`7A;x%E+q51cbpA#l`=L1@t=BUwk zi0*a8#qB;`|5!jx_Kjs+D8GMOvd^`Z@MoXiPtvonsTh{UX7N-IixqmfXv$$F{Q+*J zY^HLVDByYZNn7eQ6nT@M9f z1M)N{Tm}BrTKxxt6 zrrK&??Ztm?<3W*{+%Z}ls0velZHC7!}kY+1e z*TYChk`z6bDW4`Z{>+|`6U$6 zA>L)BWfFf<00_4%@r6d#FUHts{0rlTU?8bMCE&{Gc1oLCbR$?!LRW$so9}mDZ;V*5 znUjszA*SXk}hB3;W&tT?VbbH{t7S!uo$NaU#!PCZ8uZtyedm5s)Y(cO9Ngb{wvUt0=i@*5&rWBr1tHyMpM(-`t(e}DQ z7hiwpBNO~pBMIc84qiaT1VXb34^VS3zo>m(1`nZ@)d zea&x6HA01w><`)mlJXrwzZqUij~Ln`>hpr^u*^kDD))cNfLA2@ebXif;En~MOY*T`XVMTGG*>`P zCugGSq(eSrvo6f$&(xW%Rh8)n9w{zCdRg)}KS-9h#S|G`rd?vvFHhm~ak4XQhf_;( zV$6fsmPD_E&MR-o$>?X!VRtb1!Ye#|{6*j+-qL?qijom8R>GWMgq7FW0xK3>80UXa zFh=*avq70&Fy0}}^Z9E!oqM89>gx3Z>1F96T$|uiuf~h@Ip)DW{#rpIv)BFWPhf2p zUDc?zhDY?;wvs{f7k}b1M+B+Ug-P=Blwe%f9yBJ zdT?gidkeiAmU-httrlfNn#7l~Q#XIFGd)PVJQKDZbq0@iOpPnDo9RVAUIT@d4Lisv zL@UL6ps@zT;1E6$!WHjsm%7B~pj$K;$Br@%_Z!G2#>P$5Hrz8A|DgP>^!@`aT1C;+H4=QOpo`gz})m*k?-y zzWMrbxWNAFI6A$oy$?!-W8eA9zA1e6Ilh(hWA}TTxm7NT>p$l185@s}u)RUBMmWFy%e`{%mCft4~Q~@L7B8al_?XAIo=(@5^ z3HW5blre5lE8%5I>G?>s{ztU9oe~c$)Z^AdZt+R)7#OkaV-;ph7T5bLt%35*v%8*EP^ zIb?TA&>u1|*gUY{3s=;xw`j6MU|WD|?VNY~?s9$jwKMiT@aXKwh(k1{2_4jHKs7mc z7zlNoPu52AvVYD*NzQ+ zPnh<3^8r|y+K5$24`WbtJ*!kF*px(Rs_XX?^b`gXElxnJI&^;toi0D-$;acRsMBhj z6sEh_BaT<>UK!xX^MandqTsDqnf%s^(`GB4GkV|ZSrKaqn=IQ+@6Jft%j*c z$ygsg=(oz{zBPZyk5 za4?5+hOlZ#AjU;hMBOJHf7r>$C(#Mi;s%Bw_p2 z+h#E_Ql)Gjg!&}-yz9bzqM1Nun;_u02B--f?*qmf8z+CJyIIr|7LCy)c{N-==zC-P zV`O6(DvFX}?JKc4Y@9?OYcHGyN9kh=ZDaI0n6S|?3{dCf+cpI} zxzc}Z`HnSvJtC!O#u}q8{%a9Cx5x35Cugr%FV5V-%b3^wNg(4Zer<+UUni#qn-mgOGbK4XSM?v zO|L@QWKFks6|84ap3jYI9R~nUTz3L3hWt8Ws4VLd`LlPghJA(qR<`RmNdFFrO9fX& zbGM4rjjQQfs^mu;YfX4q;b0CtJMw>8F05SCjga1D{I_T@)c`qHXTLu)~?3*dEJq7Ua2H`sq&XB1F- zsj{pz0ChXJUI=M(scti`2~Oq=)Zn!8e9B4?g#2&KOeZ9=1Tg*fLo)E}8994h*?pU6 z7J6;>Zc@hux025F@nMAU0<~iZDfEsO!Lyn1*A5LuM{=@ zF9$0O-ss+H5_Cs))?Q*K)VzOG&hlB5XSV&clC&I2q@MM=Ld|+_V`^yrS061XXiE@2 zZ?)42!Rjrr^{sv5AXj1gNQ^bjbEqp%`ASFCaTS$8-liQ1N|V#Mbxc6&rfR6jT;9oj zSv|6Oa{B@2!M3tgnFgEQkEs8d?64BBBk6u2Jg1lxF>k^)-t|wUaV! zve&2-XP9aOCc!&>s+&6Xn+_`TCP{l+@%uVv1gs@q_UoRXBdm&`>TdB9cyPwAgHs^T zMik+u4VZ~7@fd%D?HS=*eLM5wB)D9r5+}c5*rEOQ3I-pSy0C8UYq(^=A{32-bZ#bF zPtIA915mlc><53C9p*BEw#g(geTLIl5jCno-k}wyEWz4RrpsKxT{BDScz(dNobZw# zMEW&82lkCam(=)9^K!=6RqdRuX>HS3(|cWaVe8-^V*`J}CS8f;ng@teQ6wpkN%Dnu zZdL!|AkR_Qn9MVlRs`o5`pP0UY`OxYsTNY)rkd!wHfrUo zKWKJYQ*3dG7AjlB~w~_ z0bQ@lG3nyEQFmv(r8ucgOuv8Q))_fA#(II8I)AaA`76YIR4>NjDCaaa@zSUj+L}xaJq66pSq3|$LBa#h8L>|PGTZ5mCxhsrC$3f|2r8SF(@C@67X)B3`#}>{bU4@8=zg?bP14=_?WB5_YdhC~#>l;{%gN+;7JnK%;e)%Yk(gNY;NX zT-zg$D70N6l--T7@l>61y=<0?BmJxV&B4m-9E&gCNJnE;=Cw>-%!5Ev#Qr=QmUOls zJuYy=EF9k6VhkP#+mp564~`2WkqU=)T6(~TwBE)n-VNDO5Qs^StkRQFbpBq&1i0Tp z!(^8Dv9|wF>W^FSw*%rDoV4_~x66O!&!@7BNSoBnHXY$|1f2!%Q6MKEQqwXb7Vv5( zM)C7-m49C-TY{@5>01VA;dDBVHU@y%~@5AoJI0x43l zfn*Rh7H^tW7$mMoIwMz^GBdSb`je4_C)lba>VtHcJM!958itb_jK1Vn>Wz+I4gpE338yYU%~jMB(OkUOK;ZQYqmFj3V&YHr3w+ibQmSI3rbXly~vT`O-Rgh9`dwG9DvXzWN7K z_c97QyeF;ehSuB;pI>(U21u@E?f1=GbNd}LF9Bo&idg)b7o_n9rCujo`P=%}F6!by zn)WfRT-KdH!g|-T{*`!~hS~zdC)nCpY+hZnkk}vVwW1=05}jThkbuD5)+5g-%2_U9 zFN=0p^N>o}`NDq*4M+d%7$zXhFUTmMt&hB0CN%l?aFdxxFx#oNl&R&v z^*6f&ou7n+XpA`o3EM`Jj^6nIJBn45c_3@%pDTC_xL~GXEJlA!gsC_4=8HAY7R3O! z2-52qNQdz1X-lsuBQs;hJmyWqUy3EhNO9`GV{IC*se^ChrBC7L;yL9FOs~IFck5?_ zAL=&!!-66m^IW+gYvY)xg0!fYN822;2HSkM@4PKm7%a0|D1bHQk{g^&`$b+nDIFI^ z(@MnSm2|NyP6mG|_G%Ty58+t9(V~)m0j+5`o*h2qd-khj;#!m*3Z`3%6(}ZpXjI?3 zS!D2g%j3o(_!ug%eK<|xd8Nzr(cEK09w}Z-8f*X;F{^1#bvs~_jWq@hY^A!?!khBg zrp3%qHdwO5d2VZX2^t^r0CU$dNm1U8aSCq{)3<+l91G318Nv?9sJ&E@L#=5F z0Ob9`s;Na#|3@32QlYU5PYf`AB3+$HB72v!0>DOV7wMJrX(CRxPC3eE4WR(k*xcrz zT$J+XL&F2Oa^}d9NT~pZ@7fYs@-=xWy7Htn?jk1Vuo0YBy9C+UuT=a9cm$7kUS6vO zCw&Ntcb@e}w)Q(Po*Tr{jOM-;tpu9)3c>Gzf7GbR0DM{NVb02A_gN- zV7X{+!`!TP{EE5fR0)6^F&o^QHzIs zf7fe{`Uh#KHp4rkA5bWY`Y!n}JhD>`n*-P97-QrwGOaw!8Z%@6n)wXOA6w)pNP)Px z$k@ObBNLLa$ViwV6F_8Ys8E^1%KNE|)SZjUw==Q5Wskd_W>y6NS-cXf6wSz{@^;}; zLz#bjW&nrw`>2aExA>09Y~X)TM~GQ+!-Wv#xA@ThRITaKRarrTQyBZ44%zdmtM4p$ zy_c>}15^1ie#Wr(%OlgeCzneXCJ z-jyQopdKJrShIlOW&4`zEYaN%IA19oqsSoNO!e2sEvXo{Z-&FYsfMR*dS498%S1@F zD`#}+nM_(xygLtFkuT`fB*o@&BV1P0VL+(1hjhJ(-6q?<`2pe{?yP;l#NsPa`5JS(#&pIVYN`?7YpSY z#K|4UmX-WS`4IF+V$sh>z3&);0`-4u?bp357)2!aym~~gZwYI1NL0R>6ivFb$GkM)rdge8R zc?{PGj!BlfB~%|L>I3JWkLE6SyBUNO4B2QBdqV|h3M$`(t=h?xB|-@v7gv8fM>^*C zEV<`TXRg#Us3zVo>=A)hFz$q8+8zktuK)2C`IP-SjgsD;A-M}UKFjjqT?^N8jCdF} zb88(HyMMNNW3i5)-kO%0eF_G^duoyUf7rdW@T7z)yt{HHjPG;oq`I7?n+u=-5+Ii! zCtP!XGTKsHxFoKhGDR_lVFZ7?R!5gNm%4%Lu*wpIX;8D4{F`a2h`_$;ckK251USY_ zlf^CTuRT>9}((8uQu3YM|AA$ud1}3kW8=Lu&Pqk3uFwu zX>(1r%`xQb7lZbv z5KQLL2E075x5|<$ zbyzb-cb)o%w7aRjIf99(vMIc@7XD_fp?Ztwf~t2f>85*sCh6!~Uhf`u%P+n3!fuYX zvl_1X5puOI`lwA~Q}@i!bX@Rd^KYALm44j0@c8AeXSE2M+hBj9Oor*UF5YX}^u~J? z!sl_dDw$G(TjhWF(Z_G$P38)tA#vL${@!+fs0CXHPiUqw^|k@pOrx=hy`ex0K8BNR zlB2h23s~KzP;GtB@L+}`Ec{Sj%iUH#X@9f{c`)ipBmMwKcQ}+n2d3*YhORL(L4n7# zbYy+4MjKtFdAwn}0dHBeuus(ZMNl+~bcwOyc_n^UUY36@)Gw5}#`gs7UK^9aHPsJ~ zojG?{iMbMb;`CzCu3i@*Z(ZH((3oV#HQ**P%D;LeV?4zhv%gzQ5vQ1IHnSkS+; z2)8pGoiQ>anZkfkiS$ddp1V8=n0Sr-;`H|rA`d(4qMWeUF;`wAFI%}h4=gpsaF~;I zwQ?p%LLz?vB6(G!f~EzxQ-`UlFU-9!UO>qVf{I~Rjh#S zgd!eoV}~wjytwZMU2BIPjO$@haInPVS{7JS03lVkc6vfaw)~P$X8-~t=%my7L44@7ZxBZnZfoF zIN8M>`g2|fPMIuzbiz8$q>2FGYrJh!xmgP?VE-;D*C6)I_|6|wt4)4Yx*OQyP9s!z zE&gGQu%{#Ae$?{jZR<*;bers*uV1VnC*z_-AnWHph3>ok;Q2pJY)VE8KDn?TP7)gCIYFa_}Jy}yF}Xq^DP7tNmedn@2Y59 z0`Hgw)6_(AejJ9i!vrm6Fs#87Ao@wCvtc^$7B)qMeV;zAscS~FF2=)D8C@{Ul z9{L%05>S6=U|}2b2JcL|+03iMFoJ?h@qsn^}qg%qgY5NRIdtTgR5!7u)h@MAkJy}6FiV+gC7aV4OJ zu-D&b8cL*OBMZQq*=d5h|v9dBY%4i~kuC!Os&j-vgFg(qe8*@gU5#W}-s2oXNt+&%TVe znU*gEzmM3NKO{E?1WYpo6d7+Q%Tg$w)tW}sK`4LepM^n zlKy7UqhQg_SexHX;3#yXEBtGJok*s1-SWq&!-M(XKLxfyQ*~Y=rsVB#$1d##i5H5h zRuv;zS~hZif<5Z55d0)67&h{YP-w=Ae4<=LpIH6*gVC(MTlzy8X=YyOqYV^Ek$P>q zzG%hsM44N0JbtSjhTit&O(&5v>`LbFX~27vn_O0^3ZL<4<=2UZfm2X_2sJE}fw5+{ zYlzk+lpqOZ&UqX1w;%o+ZO>}MxfalWv=9c~U?AV|@|0FzMkKmFA-4GaaR1y-omw7B0q(qGBR=fR z&Z6#U#iNmw*nZZSUgW#A`%!R~7w)zS_eORC)3zsl7D)yV4e6KM6aUIYif_lLH)-f!E7O>ma0+i1DJm4#iSvgFkOt#i|SbL5Y=@XZ-C}_ z-?@5+_ua;y>G^AnBkm8dz?gdkx|U6JC;+GJy^w`n<{|)yF4`a?dVel+0aIR;t_B!d zn`EB+q)Q>D=0Wi9O2&4o@$8SAo2Q8d7E;Og-?#ZK*(;08YcZ2 z`F5Av;YbpEFoHscXViv!UHxc=fYJfGeC{-_zsr_%Vpu?nI?I&R9K9Wt>HHa zOTI)K3piI`FsDF1Pn&@C+x?8iqNF84=Rkz$-TJ9}2gV7O&O;HJfT4c0OdAV}Cf;Wg z@`R|jJLYO7ucrg{FeY!H&v0zp5Y?8S&8L5inNebY>}!!q&XIM>Yigk;Fk2c-l1`?- z+2^^+4Av}DiAOywZ9jz6K8$(xi~OcKAC#pGXj}0pp-rZ&AofNsO8l&(=Pl;U zm%^BTPV&kdA$1(La7F$t=fJi2cuBO1lz5ap-0{V;!d}<@JD0>~8(s#fDUt? zQ2-EKbsomDB)q&E2ObKB_ZGcZm*4Ieq=mg9-CjgQx z#Pnbk*8(KdNxLQjy;7%^m~S`fpS7bH^wfVN&iL#ylj9B~Z$)N+)~+e&9uv?n)J|=~ zfU3XdL4S?d+)>7Wv+0c@_4E>E98GY4zSetyv$#B;H;;FX_x{enASIR|dkoxdzTH8W z91t-nbv)w8C!aDtN2q`aSk}FjOGF-&*6`Jh&JZRNK6+lus8MF>`ab*X7eK7EY!F-B zr}#-f_ots8$drPn3t~$O}_!iJ|2d^vA| z1j8}=;FwYFY)fe7l2*MR#x%fD@cWg!7nl)JCvEF47timRc!@-mGmG6!GMOVQuy`2; zB8_S`!-U{^Rbns!ZCJ0i({o9oAQ=<|WsSJ&Gwq?v!!y9BM!ceg=NRR&5LLXO1B zMRB@)56bB<3F@LEKXK5e|;ve1c+ib+jY!4iNZaF<}Z;^WG z{07(;#*mq$GPGY&m(d+1=#Y|DqFVuJaz*Hf2i~)G|K(@l6Rr}ky#PCg+f5{pK{>&7e%^&ev)hq`i~6}Q_%|?fP+SczzhZ-u_iyAC3DJ6 z@@8q8|2ax5HeBNj@&#>wI=jRUIr-MB!qHBWIcxT>v4Zxr*xcWMa`ce00-LH>6gDRI zB%S#I*=fW#$686pa;zQ|v5#siN55$TnEb)g>OWXLr<%PNuD;4bf%V4tsL})?Ra|FZ zv5~u76vA$jF-mpf1F4M$vsnZbRw+}uITMQ3-YBefoJ%7}fT~}ADuMGd;>2rlo(*Ep zw#fHfCFCW%Y2+!ddn>pV3iMm~7erf?r*$(u=c<%4;W>ad!9?`*-lDqCg)i*3M=ED^ z(*J%&luh;EVO{JX7tAIdOh@|4Lfv57E&HlL#TnqYoH`^R9Wa*Tsh6b+5_+v$C@@}?_p6s$Uk*3zY=#++=rtNTT4UR13JKkE!JH{ImjNL_ zht*--7^+I7-TDKI8fH(8R@u0E_-{7Vp&=QxZ3ta0YY`ypiENaaGo8Pt{9$*x#Pd8_ zO=csG;1(RSh*J8kT7keO$H3#G(*V2ZZ>+xf-?bO-dwhp~&)p6OfWXw9MLD6T^j#V$O`|>S)1N7wtz{< zXWwg)GI+a{#TSoWf7x%qeH_u+n=736ETf0z>FZ6xNYaJ_@)KKJAjy|@@kJ{D!p*vp zTP;o0_u8y~6UU9JMTyYwA#Fac9<4xiU@qSgxJ$*ePcftUxNyjvY-55{<9*wY zVW&0dh`|Pe?B6Vy;Aqb`*odPQ<8Z2UI~#8gz6#4mGuu5^!*AVQe&s(LT-k<(Qox~0 z@0Y{UsMK7p-)PKis&IF2N;?k*w9eQY{?Ba*T5W58jX`+Cq|s}&J#t^}1UU5^`GIY2 z)-54xX{8+Mg!yrP^tkp&dEq7BERf-2tE|St;T1HwprIRb5mGwP9T$bKK2UeGsU2{I z)Am&wSj(Ec!7oaG>gl!X9G^39Y>k*xjg7VkmjH5gw#E@;S@Vqb&#Bf_W|Xi1R4%mi zjvDEI|4$r))cSIp#ew?%izLeV1K-_9M#x$AIdk$j`?bm0Y_D#y1QW#rU582u!9mT^ z!0o7GByhtn;5fmk8YO1>{T=~LULVPCVtkTeOh33=(S0WcF(FFU76Xa<2n{iA9m~|{ z5aLzLd_-m*s_|&~c#zGP&8MlUUr5Bo>VTsBBrx0Mhd+MP(i+}g$@Qe;i9g&+{5s4Qvns6FhH zq9Y)|5_nGRKndw_v`Zmh;=*!avIS~?Yf2hWrzrkc(985n$Py(_TA>w^C@;0{BOkeQ z;hRRcSO1wBu$x42x-1>~X@_6Bt4Lo6rSnwMUhL2g`+d;ofT}gshTxv83=+Y+`!}Da zC@BhTg&Tzg9yP|ORA&f#HQOUJ9a?VAnF){fWJPeBEqL00<@X)w|C}aUe8Nim}%HyM!p zKKVzwrS+zTwe^zi;f3x?pehh68p^(68Q!=&csfe(Oc*#tIS%V8r}6@pIcTkH5c_(T zQKsL>ase?X$d%E3WRwi)e%^Y2N8CMropsd}p+)2%#ZKLbGb`5lG#^&^DNlFfFoxpC zZN&S}87Nv|uaF@@J!|AyQYQo007N>`J&O5KVw7LKuYryM`F$FAVS#+~pz;Cc_lF(SoZHSb2m z#|Jf^jJLpO`UPQIhl$sl)WP!r83hI!*|)u4a57#C^#CNG$**-0NQPDQH`v0~U=4I} z#etj;b?J6g7x!9TE=HbzMAC{}$@!Jmbrm{|gXHNQ@_D4})sr8ca~@Rz+J}8G7FzhX z%9gW#1z&dP9Nhhu5}ia#@_A_VZQ4}SidK?4dq4IKGUXUIM3Ijxxq~m80=YQ+YMG=6 z{Yx7tc7Wh0L4`R=bz$R)WwMj@douw>c_A1s`Y%?iwHvY^MfrVy?P<$Gg27K=AT4gr zVnp>TZSq+4(6A!8rnoFBkW#9p*4|joa!KY!H2d|5?BIlg7({9cBRjn+fs8?Mg`j5C zQ)jc6SngqzrEA<5)=1rkx8K`C1tx{KX{6QK6%>`{dfjxtEaR_z7`BQG7OB6(zasbE zsDTuGHNtD>g`?4bTrM*ZZN=W4N=`1{;;;ts@gt=OpE*lq?8bkICq>D) zQ%xiI&WGaRI|EJj(^5X<={HC@duj{>Ol#phBv_Qx0y^dTd*q*`FvK7bManj!9~lgy zBspPu6JVa}mQ8TdPgcygFX@8zciqY%1JZ+nIZ9Cqmts?Yc;Vd=H0Dp|#ntF^vId@h z=mk9O8a4!$h4F(zviMCTaq6=*TfM*~E9L0y@=Weo-*#Z2%|~;fxNZ>~cEHi-cu7{= z&O$G27%|Ypgv0OA%(J#8)UtE}ty{KX%tM{(Cl#!iOF3K$vVz;|`WfFzb+LG!K)6g0lxL9?6ieIU`?-1YK z0gv_Ll8XpaZd6|VW2oBU^8or%jTW7>*pgI@ePAlopk z^w^2G2yj;q<H@=6UtT*^kBEz$XWBo%l;E-D#`Pi=Zs1Wx9 z*>fXu;OUt1>lQRHIupaFi~U`;xF>Pzk3~ZCBdw(?I`&fVZ}mf6*p!Yx1baSv6*ZJ* zea_*3AMmxOX!0w8N&kPYa@oKzC&s=|kTXo2rnf0QyT1Gc8JIX!TsEh(z63&vh;J=p zB!$CEnoeLl@79smJ}uJmW9#jU_I$4lQAV~oS|@lh-D;hX2-BK@|f86k^DPaxAs&zjzE@L5oxg;uf8V>>w0AcdcwRMYg3zd{{R9UHX z9SWRE=_=BWBoRw=Lg=~+F(3o-ps-1y2k!Q|6kp*~R*3D7`MYd%C!p^4Nr95N9A&?6 zZt%Kk#;YssSz(q>FxNhx#&;bGyY8r?sEx2BNu10W?$juHu#im+hyEf=DV%~7aaItS+yr?uY={)e;^*PgLn5O@w`G}b&*EMwtMfziDXG^$v4cO zl)iVv*D`YcK60`y-)-OV05jsnd!Z`RWJ6}O_i1;b6=X#Ww|ghRUBS`%4zku+&9P4py)7@Q>}IB%f;@*rSqg3Lj^@*OwW7r44! zTKH&VJK4msS(k4sI(?Ruf8ZPsMOwC$(I7qzHg@QNaFD%hwIuMG3Y`UN%!ru3r0LAx z)26s*YcW4uHe8P~1ZP;K1?Ve(gSR_t>Ek?&z15d!m;pd1=GXrC*>WiPO7P5bXy#m7 zB&bpVi5S1Dt$?tD@d&H(92z<24{r0mAHG3!rzqeH7%{)M#HXDGM#!)2^T2E*n*xs1 z>voCG3)I*neSq?WF@E);o!>lYm*05NxO0>cJvfvX#6qRn$+;7e0GXkGkx{sZRIp*2 z9UdryU?7q|K#FrbVUtqFQZ_C*87>fY0yi1Sbi^eX4>dvHoH*;FOFcfq3cauv0sluA z&W9TnZ}h&7#B=3drXjQojnd@M1ybtf3HIIFa3Ki!I2G0fNSdU^JDO6pDoCt<%0HXXNv#@RjK<_PLWE}X;yTl+bG&RJ^5;svE^lpZ^- z7zqu*7M{4m8+#e(6=L)B+@L_!=TJQt)b`u9^iV?yz4|Kt9P`vzbrqGO7lEvdY)`HO zB7vM9Qj0Rn7Me8s-S3~^&b)*?-Y~GlN=o;9vg44;Eex&lj%DAJsMAa{mVA7obAPE` zR@Y{0{B4p+^RZ>K)Yqlp+TsL@AI3hcQyi}21FFD?_|&7)sN zx`Z&!nxrI1n?P}p$<>+9X=_cF6#MaSuqp%N3%x&}bJ>{tuV)ou8n3hS#C5kSw5qxY zTqY`bwZqs-%AA=;b~bIK#$2x;7N-cuC7yR&>Jbk;Jr*Z_5YydxS5>-+Pj~zW>YXd( z(nRK@?U|siL#h%78?EdNk=+J~_`-hzmLzQw$7Aa-vV%x&1+tUyLAL?uMX?qysm--B zOwjs5C^V(0^sI z->na`2Cxl(@`e0{7uk$mj?G({QpY6gNO@}lWio9cDSR0GVQ3uxx+u2K1hKWBxO@`Z z28?>Uee|HX9Az3z581?g?GAVeYY;KQmpvR0tAQZLWmb6x_=JujM?&|h5sK?mNkG(o z?IbC+?g12`Spm{B6-O0kqbxeSO!go5EK>tG7YXXdKfuGM`*0^sv?yI-59$02$c(gY#rh@$_0Iqqw>C;#zi%q8{u9-r(}~(>@b63!afM` zEYxp@c{{^SJHw6N-9$cDzZTNgkrTk7o=56mcqb#t{e`G>XmX83Ot8P@X{2r8l zqwe#T+(0m4i~#FcP(AymM^~E|}U zAlZ1>_Irs?J%r^J@OVfM%?L|1O=-w~u(b_m&JziI8H2~K$annnj(SLHIKl?vmQ?9U z6|Ewh+61M&q843nk}pZsy=s7E7gNV`>5+)dkX;!{zKpit!$6O#LXPa=O9 zPa#Lz$qMV85}Q2x$9i?{;18A&h*?9Z`MKkRWntdv%db{oSR1kyavRyHiI1 z$%4dwI(8}F!oIWX_fvkftQw7G?wOeJd z(`l3Rdr_HHkl?dd0qW!IyC)bLzIhs&eZ}j@Dhn7-0W8YpW)y=@g{b;|l^~ z>~%c3*6+1D!{WOkatlU(6)dZbeA$pb%qzRI;OqD92LdT!+HAJLXzqcJ#js5Y79`op;gDhyD*zMTDGn(kPvA1E1 zzgV3XB~jLMQ+adI)LDEwFtH2Jacr6kaJL*7Hh4}`*R0@)_JCagmzL0qr9+X6$%0Mq znPuFq)2(HTt@ho2Y8Te0b)o~%t7=)S)ZWikhJmdcfk5!NCH>dIUc56p)anI~@{)H@S@yQQoTswu9B{@t)2fzEQkF=IllK{+ zY0fMsG>$V-j>B6+>jhX)mmRyJ|ISVYp=+HUsWL@>>)J8zEG~QJIvXVigCw+ctKkKLth=q1^Aajr?CsrpM=l-=u_yc-*0~q?{*M zSVo1YZ!52lZRPwvH*D2_1egr!MzT!=;Bxy4Wl%4Xh3Ef zvUZNN??V1CJPu7X9A*|3E7g7a$Vc{n{-TM0EFmV@-nTHjfWzf{G_$n}6)vBUQlU|x zdtwf;;-P1KG|tUjNd62%3IU4Gj(^n1iK?J7RBWN}+O31Qu0p*fq8%KGODRb%sWMQU zT9WAg>YSjG?5GI`w%kg`QuYw97ZsG|_DY!=mV%m0M+oey3YBGBbYQf}pNXM=#`0}{ z|8}f;OnKs9#q7F{&A5?L7tzwULe|0#uG%;)*^g+~mIRKw40S*43;I&9ylqatd4(Zu z6c6wZ!ou^J3coEO$19CWVYOcG>zzqsEg+#2JNXC(gSI?Se1C}5SR>~|$7b2hmNjMH zaJj2LQ)UfWYgMAn*XM{jn_6U?)KR^EG~*a`cX@7MExS`TV8Y;IVMZ6TxoJsX569pR4|y_6i!TjTgdywJ zH8^$gxIo&0b3!%ddmg2$FTq_7Zpme7@|LN~Us<_2ITJKbtCuKJPl>2x#3Fcqh{>HA zmX*uconUXjByoK{z^I)8V+&MDvFFHwiD2E({v|WJj~PVipE%)j^?U-ngv+;)wB zEE>yWh!IWujdYe(1hf{2^3= z`r}CDk0neT3OcAI{D`rCC4(=N9iXv;lT*|zq2w3YCBm=G|2KSjuLefAKCzth5#(3v zpJ%41p)&3)u}G3u#nd>vxq5udRS?gzz2_(HaeU>)a(XG4$fBv3KaL_|59Y1l&5w)Z z|1G({l&kJ<2b|VFtK=b3{moK82h+p|*>3$UE$ITEqy`sl8|B7-nEw6-Xh$_tjITG# zQZ*X}Q+T43%{*~-l(QhJUKqHXL>8SzaD80&d?<0adLeo^nSmHsRuE;YhF=Ng5d;mb zXXy->Xtnjjj54{xZ8iU?$pOP480znV_CEdB7H7H6Y<5LIk*UhTNtWL_g_{b@4S0(K ztRsih#NHnmZxgD2yRm9myHxVIOQFpmJ3T1Pk`2OWPh3#kQZCyI6r=+Qudf%gA-~T7 zS7R4e=?5HJ4p~ zrCgLz`09`y)W?1TD+^0F8rx!7FPWzmN10fE-qFf7;ILH4L!Om`UqSS9_tGtMxJ*bFEi4NF}m zQN+rY&mvEIq79<=I=-H@LG%onJ3QLsvS!z7&}`^eWlmwgF6E$sb51-28dK%*Z{QwO zwoi>$y>fVez-sm8yQ{vD+z48qESWz74Yx}A)%$UP(#^vn&;OUz4m>wu=;D6KtLE_N z-|`|-D>FIx&CFtQfV>#b3PdExuHSclUWGI&ju@1%lLN^5m`XB(U5Di@GUTq#tw~js zbL~FM_px86jO<#)dN$+tMLc)JGFJLFsDY9`cv0AYZc9oCX~;4f9SRjmjMLnc?NUMM zp7t-q@!HJ6cE{_UFN#5!L^!-omq=>Ap$x|As8R8)!awo`KS%k*Ipy-l4ATJ6a76Jj_k@ORkcv=L?`*ey-(?6j zHg?rxLY{Jt_l6iN&5Mj7ObY??la8G;oCm!D$_TiDlE3Zth53d8L#r+)Z8dz2Qq|}- zxif!x!r@38@f$7{?T9#`B+Li0q3e1{t)ohR*KF9F7#M>qH^XdG=53oEsVL;PgwQ{P zmmxj%$U@v43xc+?^00?1z$1;WTJ#1`4eezrI;&<2bY~Ba^tRc^@}>NCUmzh)mp}t7 zJS%afsCn&v1VSBF57s2ZQ>vn3%UoC%BK}|3fUf5Mbn)a)(DzGmx6l2(Vu&BFU3?{f zoUwL$tg<70h~3snr>aI+jiVk(&6RclsF_ULI5?)E_)g^h}kw3H(P_?C2y z*Rvg#uLC5?X+Bw)EDW`{pSc^3%b{R@SWmkfgW^m=H81(3IhSK|!o}DTicm&?w=2~T zdcCgLc<=|E>C*A{Xi#g1VgkSs)ojSL$gsf&WPcPLjsUA|W*HTf_Dhdj@j)Yy)Jz-; zTS836y|BBe+3e>kQb(KfXUaNsBDxIb?r}?+=++a~?)tFd+dsvTz7g{-o_Wa;vH0x(UugAgH2KJu5-v)Z#g8pfRE8tA{t3S%=Nl29-y#JnvIPH1t3xN% zXb$VYSH8HXLA^HSBE^OE6n+JNp}BT~*zp`hE}pV2DL8MHmgve0fSJg!&ou>*7 z>p#I4fe*nTK-#25uU!4{DQKarGnRU&Eqrft@3&ERdzQm`?B+SFHE3}xD~#wuNgKw= zfDiiau#CBg1WwuH^>64`izs-1tj@Y0<=?+zyy%}1`diXU zxceH1JbOjlVPJR}WU1v0oX=yl*E^xASHn=BN;vgPV^!ir!laW0EqTr_5r3r?+Q!n` z>ktF^xSc&$%z_p)=cO=DVjibXrnIM!YV23KxCgK8kT|-eBfI$)_h7OIg@-GC!Dbk4 z83>OAtxFt#4AEp-Q~<)fTV61ypOc@qG6gSFo^d3SjWg+pIP(aKjj7t!Zw6Xg?Fx8@WL|`ze`qaT)5N7sJA@c@i=BhA z=@r{sy)8e5U`wv*y-Ju7X(}w-kCryqr39OtfANZQ)IBJd12Mh=DD^vvh1~Id_uA5} zeeBR?QhF6CtPmGkN26w^u-8$owO+3)%Y;6Ea{uVRMiTxhQUsfOA!PM|zI(5G_Fmgk zN#4#~rs-WT5A2WUOVJ21y2bNOXdmPL1H+QQ6ucu(u*UsiugGLOfk6nCW-$Ur16qdR_ODrgp>Mv{x08AKE=@I3%7Ipp;nO$$+mH_wyexZ= z$S=yA9b%V!7cIqwUX7_@!zVp>jnxQ$q+raTR`uaPv%L}g*j7RGL#MGq{gPBAu5)$a zfo^6^M5_i~w;DXzUW+QjWY$hyVG#~@4HjKA${J#LYMINa>Bs^Gmx`G3(}0~?geUyx ztqkB|04_>|M?_N)ps-RZuzHu9(|yS&4@1&zS7IRf1TcSab0kweRW z=3@YHX7B!E0IZp3T$!qxQUVUp4zGszCT?}hO+(_wrZ!AndlCA%f-bP8)9ji)K2 zGjJq~b_SlpKc-52#Edo`2{IbGwZsr{O35MVPufO;%6%wA%wgC<0jA>X=N@!}qRnhs zNB_!%2|q!g7AjUJ!y;*Ej{G@)t4@EPzpOEwvcT@1rza0b6B@i-U6NCr7;!EOel|gv zA@}XDe2-ESzHcZwqKJWD(RuXEhP+7wjQ@=uYCY$AYRUum9~?Y7xADu^VIv7&hkBHc zPUPw+W~blDa6b`1dC5h1>G_SbNw@++ww%;FdoaULgzmD}gq?x;m4l3biA4r zD4NVTokDM4WS=czN_Wx_a9aYp?~l1sGl#W#hE*u3g^OcNE!p&(q|H4O-?kR1YpZPyOG z2=hUJ;2!=4e}W)f*L2c<9_@eZk4#AX09KL8D$J*JI1=s(Lh##9?CRw-@67+;=vS4z zI;kdYdZW%sE|a{KL{6=>w|QW$?`pV$hTQ<@l=LlA$RLnZ0Vq48b)TFlej{-;(a%86l{Q_&)NLIxjPebz~YRB3E33hRUyq zVZL!vYclP}+8_dd7yy(T6zl)}c?iJ8Y=(7k(TCc0EN&-`68GdknZ|MnD^;q2%z^8P za=5}h)SJ*sAFRdCDU;{zJpb9K)givd#;IS&q{Hv;PxZtlI+w%#*YatZ>bVh0y(AV1 zE75+lTYu-1pnjnWXcJFZj*2z zCV0rStowgtdbjTfi&^xxupb2NPcx$M9}ZwHqs=z<8P?`y6*v1(oE!#}h*)rndt4{O zH9GnPEj|E?yIe|PLK;*g!`!`?I3q^6>&*rIJX&!Ld?0=>1>CHKB4F`_+ktno_T&0z zg5oqi%fo4ZxI*x11?p?T2lI?>GInHJRpgt|H5o2Ne@PB>Mj1WY2v5+y9@VNd9Bebx zPJTrV{^UR=aI1o)zYY12U+>ru9s+Ai{UM4!Xq>zU>HR{i92MpZ^+$gWeAL22bX@5R z=7TeE_4x4O1&!_Oa|&US&xidOam`Cr=fUa(gPZ1ushuEPYs* zXIe9}IX0s`jAh!qKMtAaUK5K|QCGZy-;DpOq8zExYq`Adg`u|D+&WO`6acD5$hw2r zEJK{3t9nmgz>AID{YIN*&(G@}jH;fRJ<7C(LaTv=gheuE4#7>ZB%r9)Fej_e5;o7D zxNcT|1>b`uO&Uw+cco8?&uST=BV4S@4Im3G@IAp zV=99=1OR+tSZUEX7!xZSZD~2eeakULo$cn%-*3ZV9y+ekXfCoaROf@OBCOuugPtZ# z=?Z)KNd`PpP^%1s&psFya%`#B1?yD)a|8>2KZ@rr#eKAZTziU#;!mt?=4^D4m`^ZYVT#mDHLFKrm>Yy zYW={S2urv!#ie~IQQz8OWb-aZnD^l7uh`bg&hk3z;$z^kZg?bjucc7+R_q^heluBr zXMfrhH;CFF%D*(@X+wO3i`sFm_fFO;nX3ZX%#jpW*YTY zxOxc5bJsEotIhQM70>JwdVZ-1Qqh!+s_6d{D4R5?woF}PcZh+_I$1- zpo?=ll|_rn#e9V!#oP9RdhbwPidnBMtIWrBN4ZgXvliq4Zj z%K$NCO0Y)dpHOIH9iV>1ca*#z$WhBu&g(3( zq{5NR;7+M?EI{RIBf2i~t+G5)B)MjT&HD)cl^EI6I36rEu0O zg*rDl5tVPk0wZOcc4s+qjzZEu8h`e~C^PIp4){q`*-D1j=?#T{+}z&gH%}_xQ4(HW ze3_~A5NEkRqYfegPj%0h5%8dOvf5a_0@UNeB8?VFa=<rzXJOKGoCX9P{a zh6sUhUV$$kYHD$xxR4+nN!gQZmfUG1fKhS+15Llqsv|VTd``QnIC}uUbg|;5qR9F6 zS$%mZ{~p`TJ!+_bx`-t=VBq_9tWc!$gjT_-Lz34YCsVB*h<=L42X8=*TdKB zD;|-C;a59<*amhl{`4BduJ1oeHZ+usI={Sg9DOOtPAM*`(=w?^?AVla_a|lSp7fA% zynMVaSq8g3?;S8Jz1n#!<3FcZ3qXz`MN!I;WTaMpO>F8xP$Q3+kNAeXVa9?Nyvo-- z@qAU4heKwc+3UgJNoNlgv83O3&Dw%N-qXiv@t{P1_Bo+{9-Jq=ldP`>S1mz>j*j2v z9yf`X-g1#bz(X8H)8o~RX87=?rPHP~3f^-eZOivvwDXN3$Uk2JnRSaOmcQv4gv^~p zug7^biMLmZ7N!#}R6oB-vMMkC3-FhkuJ=IDpx3f$Us;KZr2ISS;B|O*{9>r}9gpDHr(rn(hP>IyLbt57*Pcl}9`rHbKpOl_n$pwWr%tbPjnt~7uA`D2siCl&R5>nuMMrKT3-EA%QOyoute2TW?}M>Hsn%bRBy?f+&%q&l>Qal9!W3gD$-omcBoiF`FNpZdfE9)-Dwi7 zSMqg+gA38?Inc`3Dj)`)RUUf_4-L||H>F5fJ$4~I-5&4_wyHzz6jVKzIp+M1?}cw`ATdCkr4t#S93t1K7;~U3#Nl|ii7L$9 zoN;NK8zKs}@5RGl8r!6j&Lm_3l}sx&R+LNn?C?FUpLsJhlpfFRhG$Ga#aO;2<8QM~ zG5Bdoei45X9Np1wG`&Q|(ZUqsXricla~X1uRc(Cr!~6RT<5c8&c-f?X%Py{+o$-ko zPVPg8E#suw;$v&Yi}w%4gR2D2xVQAi;#`9ddo*h)6ovcP2D)ccd@_q6RI5yXVV zC7EfA5SBuhdz3#)R4?u!08t#49bCma_1_19*HJw;PmecI4$&57T_((`_fm6K3(bcE z?^5oqXqdrwWGukx0$K3V5wD>|aw;u7d}afPJ?X$_xT{IoK`sG-rvK{>WvLb|k!j zos23)7s9={V0RrmvEJq!4~Gekcr79C*s~#lrriZm@4s5Kr&)KmgEPn1Vi)1&k!CS<`~$L!y2KhR&n@I1yA8kH`QwK*+zL(|oHCaTga~4T)qMN`HZ? zu%GT>lo%ej`Vus@<@*S2VW_|xo*85gqTGlQRM70=b;+19ZLY>ro7aBkt zIm(U8Dqbu)Nfo>Zf9u~z&gA(rHNx^MJS<*>{UN`=*F$;hju)e;#?ay4Kw^SsVMoFv zV_q%cx1fio#3hExCCv1ac1Dv9r2ypsCN80AwWIaqwJl&$Lu%p~r=k1*CeR9dYnFmf z^GczlEeQJkY2&2glF3DJGM8U~f9>ks<4^Ndt;=y-aNl8%e*t5GZRGweRG^|hS( zr8gCOx8cSSKb1i)_9x(>G5bgHS+JE>^ya9eLKoHIGTCnn~(;q`8Ud@-R5$~@*5s}XTAy*H?B8diSSgG6!; zU~TG}Qup2F1NmW6mm7N!2fP%ul8YvUJ1VrZX9Mez2(0hmw=7^4}==IO~ym>?%FyoJ0ZxM=9^e&RJzsuNy0E}OsJmDKr z*!s2#>wKq(7jKB5mb%oqA&6aQJ9@#C8sU-8cx<*I@xnXqv-0n_0me_+?jAIYV!OYkMd!_;+_V0TZr)>7oQ4=Xk`iwlou z+jBF!oGJH);r`VlYHFXY>?nhO{_EZHI;@k2f2Y*&LbtcjIEof_Fp)5Dn8Mv)>1qdf zjc{MdwSQ(Ut$*@f=?~dK4F&LpU;$g>LKv|LEtuKD=Ie%X?c#3B>AY4E?XQ&-gGp9W zl$kGW$P5!1k(Vc+kS|N^nR8tl-B1&VG_a!}WN?(cbha^h9BI>dI!pXmV3;pUnP8Me~lNDT_$EaV%ZuV1qx!`(p@VbywoeinW@CiPHf$y$csGWxCle7WM_LaWMGP!&lZ^`^p@8@*n~D=|XD8 zrZ1FlhsiY7hg@HUs|xCal0SqIf6+n>EKo`RSyB`tKN zQ`NMmb?`-{i1PVook7yCenU~IB3V~U!AS2EFv7+|Xdy%%Ln&PRNyB=to4~!-63;nR zMTtTTQHuL*EYq;qb<9cFe-TiHB`rZ_y$oR0g>AF!wrR0q$}43>k%`=JW+dfrDiwZ0 zHF}$jCz}OD3F5*aG|jy}?GeP}-6rawJz~Ee@5xQq;=JhaHQfJjMVB;bZ*nMP)Akx5 zSZT9i-TNW#^M?iB7WBsq}PlXu|_1su{FCrjj4^+R$4Bmdr z{@lEK)R);O^OTORC_`g~ek_cnn}7CgjYQWM1Fsu{=24qTN8XNcH26^0A3@e!&Y&=F>}w8SpKV=P ziskVF&dNi&Ggx`M9CK5@&fyp4f!5)FGeQH}nL8RDzum|bpvTV?AZ8_8aK~M4@=GCv zP5rkP!e_d*H*OM}8Hy~;nn0{jdN(W5tAAfPx1$IJBF@)mfBtsRaY|gVggGO4KOv%6 z;|gh~heP_IBz6=EERAP%tew#I$nt{1O(aAwhPTXJ(3P)Td{8^`Z)Spm`4Xi9kfmNp znl0Hn`S6CroK4E@b!~$s9Gd~Y7y*sE9DNe_q9^M+MIEfA)Fk`oISN;xQtvV{q%=WE zTfU(89DFumf3my!YK%#VZFlGgypX-LDQINT@~k_}H6Gs)e~skdqo0Itskcw7VjN~P z%!U*a;yxl}peGPZ9y&McB6##Iv}_0+lzdDaYu)RK(CbgSs{=OUn5(MK%xTt?2?PXV z;(~YU@?;;yBt@XvO~B;mYAqd-nM>(20AI*pxv|2mvZmk&F1{e5j7lJg|`qVLP|>X~Y(WJGh_> zf1e^~#@#WqTB~H`64DJ)oJw$_qfn(3&*~^7SX23CpkIHRBw{8S+=%CQ%tHPGO-;;4 zxCFa(Twj2@VR~I{tONO2o~SA^@h8$_l0>)i?zDhp1De-~#)mkI7RvP2YNK>G1A?My zG+^MmypD<6sT+i!KHM5Fdl zkblYgi@XOAsJA+_aG|{=qlfTVp}e7Tx#?;g#^wasL;lS^%m`^DsaqHR*3F855iD%$ z4N#2PhrcA$+4irVK&ui$ru3XMMvow=k~E6JvmvaOF09{^?OxVNCDK;+iY-IGp(nsr0i_*19I;T59YEx0 zi{AZ7Wb`#4+|p_0xOT=8`pGiY*LU=MP%yCIh@U>jHr8$LR=3!@vU4>v_477UsW`?< z((iS0#fUd~uDL}qLp$tzf1uwtn>GEt#(OR<9&{5faQlF3*ag*xNB-`j!a3It3YXbB z5xy>vzSvoC9R}}89?K0y`hy?j6;USPF3k1cH!D7LeXqr<(I!9{9O}@;NV&pKr+>2k zRK~eL>BzQ*sZKVC^hi$u5fw>ye201UwI}e?pg{7DOax`?Z^XcafBxRLbO0+8Pk(@x z9FlFZC%euz`uAP84kU3lUM+q)5}WVZ$1o3l!P3OMK$v5&maB=>J@0tsD8Li;QhP-?haD1(0I>?3h! zD)tc0L%qpQrqQ~Ce{*K(VFTYe?$`-&7k<#|Yeh~TvlhI7?H*&rDOVqP$d9>pPxj-@ z^x2AiY$1W)kPuWM=K|^s3;!8Hc6QdeEdQbRs|ZRcYD;KZ-W+`f4Rd;Nf&nrBxy~`B zHKfZcH6C~KjRv`*0h^OwJGVSrPB(&|Grf(zeHY}nS;M1Jf9^S%%0Pq5g+=7%rZkl4 z*|u<;#+q{d3ReUyHSNgm&IrX+Qq-BvJ0%zFh^>!3Wz7$~igYopP@$-*1ioRzr$}Cg zpTNvoa*xI$rz|t+KtokIwc5$`DdsCM=~o_(srCe>C9H0ja%*u-H)ThSz&K$Fdn038 zuxK0YOg8dSe<)YU>+%8NgioOW&hr z)cQ&%z%&aS&6|i=1J_&N(9}OGPMVKmmDt$VL8;q#UlKQ%-o`ujZ0lr5AarKpMU#sU zu23~qXtZ~avUrUZA|T`&hyK?^=^NIR4w*xaz-9T%e}k%LQ`l}h%dsTcqh0S?%OFwV zG|_+$nW9@|b34>Wp~5Cyl<07#dZnT#y7}{%j+>F};Kyi;4^;u_+=)7AY_N`VI|5z$ zQ&S6Q_D%${t<&H-j4Aajb?^np#bbr12W|L)I)Mn(gpw$5#IEJUs8DZ#1BF?8QLd9F zm-(7%e_MEz*rTAH_-5fLj8Qt

q1uKfr`grt3CH%WJf5=sJ|3bRK>_x;o$_$_u^N zsG^v*m)dDnisAW*#-A2u4a}_%#>P;&6{+3F6xr*ik zf6Li1rQ{$rH^jvG(?|K}Al(v^5Rzhw@>IO-FcThfJp>FkjV;1UKU6lcYu`;gOPrb! z)Nd?2D%zlxR$Y+Eb@=#kkkuphUH#r#2iZFBdnPG;Vr($MZnn4qe+4~F?pco0&cZ$E za3U&aObQ;btr;LrOZwwDUC6%%lNlf4e<)yG77YgrYn|xq`Hsy}yC$Qrg`%g=N4t>r zPuyB>)u~Ok+Kxv}*B9CHeXYj$%@qyf>GBBif7|M8-%j;}Z#%IEp0IQ8Cn?dJ5&LD} z@)9gg*uyOEVr~#6B+ZSH)6i8mySV@(=j#{Bv_WW?OBs7-KiReL)I&fNb7Qdyf56_O z?TX|aIN@uWt{RYvf9880n$lKprIhF$dThV(Wio>k+oia7^q5aTmG3{DxjEPSvSX`` z7QO}Bw0G(3M?%D5sX8=vo7SKA1whshk6EN3`Fn4QoQ>^cc7fAT*TL{RX`?JjQV*RR zanHPpLz*_6x;h4!iWHq7(is;de<3`84&Mv{B8n340M}gZswy-Ag}GLNYhnnN$^ijzF@sd!w1yD<)vK%a7p2}CG%TxGA0{D zPiLCkSryQ&wqlZBpdP$jnC5^+p`Q38A5>ARK3eRU;!5@;T_T-f;p|GSe;xbG9S1Pc zmU0fVnTxj4k5n^TI1iTX*<>eoKZVjXYvh@9qg!zo4K68zVZ7Mn7&sHD%`+DH@!zy#_aSDw#)s6 zhfCzR(*kI)CSLvs6sho?^-_JJp)f8N~#$4aDe8QC6q zQt^wcL%HH=|Gc#d+zl$qhb(8Xy?v26#z`;IOTf9k0a!$^6Q(knF-o>EvH-~Npxiw8 z3StICT38DUX$R0xUQW&U+x@yPdior7Owa$-c)bbzye!Qf7uA4N(ud}l+%lXX-cT(n zfmU7>R)6Bs=M_(!f5VBk>qOXSZyAM+*wOFy*DVk-TV5eEp{v1V8ph}G{m-tD9gEZp zSSlb^wJNe?y?&&p1@54US#S|^JUWa4+FsVu@jIg2vn~|Uwaa@WsOn0@6MQ5b&YJgw zYg*ch z2j>X4RV`I}-kdmpFOO6UH{G^m?v~l+v32m=|4534S}p8$UqbCw7=J+lrNdkThfz^q zoaW9i2^AJY$ttvi@p*W(AMEoVEL*OE?12QK-ers1e<@WjKX(Dy_q0b!jeu?hPh`(6 zy46Nj{?2zWYOH!r9{-K+{&1OPg+hxYhzSxzu|eJ83aT6dg*nqs<<(DKhoj;4-+LGt z3u%j&*!p;(Zak%l2FSi2pG6F%VE34{a);$7k{su>pfk)ArS$gwuM`HO@h>=23f`9! z4afdOf8IiRCAqbQzh7BY+GAaajPm`>=cG=rSqmBE>?z{J24vof{wmOPyInJH%;sOBQ=t!o97}9Z2o7D|vBFz!Gq155}Cx3Pu z)Mt_}T{YXxIqD;&B2|2FHctz|u1)deXzJFBI3cWn^ui)5ix!&aza<+?T>m3l)8TRS ze}VL_5{{{R19oD`wX*Z=x=Nl$tk#{;uINqILRLpJlKpd;bNEsP66fkUi3O%mh$!fx zzkH!6|0LrA)4%m`Vf@V-mFpHMijYYcZ@`r1<2Cwt9MC$QpuJP>-Tiy3s}C)DXw0MC zc$&d0xAK+tWKQ+WPlJ={%nd@1ihmi3f2B*KW9Yv66j1ZR_RB_g<`P7Lrfhw;myj|~ z*Zj5-C3i!EEYsaosCnq9Y*;!furWE084gvfb5o5Sc$MLR%Kr^F7%-NO;qz%0CPn!1 z^kPm=Br?lmfj^>SU^87`=Q5ngRS2l=JNNB&zFL?BS*k$OZ}~|77=$vdN4+UDf2VGW zDu>ht$~Nd>khb%N1|cJ1mzKz|V)Yi_H297OSXr0MS+9*_R#OAjuD)E$id;w0GZu6D z0WcF+(sq%{UNqI$JmUamjO!pl8Kj$W8DkP)d=CZlN&&U%QO6M7DYnRb1QA-%P^RW) z|D?23BGD(~qL_9Roj`iL)d(2Uf5eE7us+n>M(qBTu^|!4`v-Y}9I>S3PF>Ial%^XQ zG=Y&>cx$t7#gXv7N4(I?5#8Lo^1zd%CXAzCdwTj0&)WyB4Rawt*rwU7rIpyGpvJs< z&$bWz;1P|ESN1;S>WbdXAgNQ)AL{WU<)x44fhm0ZH(fI$##BFJXzzU2e>*v8$p6-R zn?TeHE&d&!95GTRir4eFgX08jVPMb5&l7>}I;%NTo=1JSda&&{rS!_IQX9v@nl*+= zgceqIo^c@5hGK%rCT;06WNqg(O%nB3*yT#}_#+9QjXG{e&5lWTV8#XA8Lo@AZZk=F zlnSYzwT+wyip)&3C&#X^e|F_px(5dIsMyssUF=&qo0QggtAvfkf&h@S1~7Tc910SF zl5)f3WooDH0`B&^Rf7olV0#J0-z}Q+EMwEne}I!mO9HdyKeT>p*Li%`5OmOhWPqm9OD2-*>!qjKO~?aBgMm90B*cir zIqIaTpRhOrlpyW`&5gx5fSssa=~v4vujyj#EPMMvmrz_Nt$jiS%fJq^k@q4j$E6(? z!fv;8LaR<|qYq?>e{2D9XM~I;l#>dWkfo?Eu7l)1O%|vL_vBFYA-02ilg7Z^Y<(ef zRAOb(`3aj*R<2^wj>kEGmndfUV@;j6N1{Q^+B>J7eC?8U?{ts9&|OM;24EVQKuc=y zolWmNoT!$aI#GB#9mTg_pOBbr5V+8b$%K5ibjyAkrSl9%e_K|I!-w(|{))eA2QnY^ z-mdMd#KO^6Rlef+`0})P4`>n6__&KP!bTxhxL7>Jf?V7yOEmT!cg795c>2ZdvY6Cm zj1-4DZp_pSMW+Z>4}A)%o87BqsUO?~UvmWAZbE)VYG$&xUG)8od!W@OMRY|k!;vnJ z$6h9`Li-9De*qUJMd4hl8zR2!;a_@@#ZG)6S*OAnh^S_fnKPo$4NA$F&-;7JaPC_P zfM5N-OVPyhukVQILd3_Rr5nzirfQ6&F;iFE)#1?3Ei=I>C6U^F;6MR3TdH1#bBbj# zOGmYfI*!7U^MU^XlR+*?Ohf0QEt|{COe+pgDxG8ne{`PmiMC&tGgr&1Z^!*Y6rqba zS0IrxNPCb#@a%8wor|6;!tUJ^e{4|;qfxFGkta-_Sd8?H>vUU;%M#V`s2%$4SnpE9 zKPp##eMMpcAdZ02q^P_nqXQ(Ou!X=9^Gez1ulEOrV9cY?{I@+ZzVri%9ax;yR&N-+N`2z_uoOe`bDFxe?B{Z5FP9c?3O+r#y z;ke4=XAv}eWQV#kyn9}r(p?-^nC_o1ksInAzjPgJ{MWFa=Mm##@=kBGPF{wpLRqNd zO^Dqs6FYm^SeDbHr0#+$PgT&!mS>Gd~yy zjp4;XuE(pCd(#Zwb_iXg9;q9{yW)KIR=fN`N2`jtC*-P1rg?swKJP)=vy>U|YM3G# zpXD$D*Gp>ZeC~Y-VwDrP?dK!h-zXK0e}W5~2%m5Gt+XOD0M0~h&EzB7v-Cg_Ych%) zs7x)BE?MQeYmSC+jH_xO*f1Ala@z%8*ZAB2xc$CBU^cXIwX|9u1_l`56TGDhpv#Ej ztuciE${s1IU|~m&LIO$iFjJ-dTMKOqw8u7to5F&-4oUB_s-kwNzb%rv8bD=lf1n!s z@VR>aSDr<1_LKdswne7{M=LV`ST=H#EP?uFPpwJ&_QLaI+w-5%CP&_Gunqy>f&a}o z&N&7@6@tJuL^viR2SrEA~gyigT_e*bVnm&WM+Y5{Tr?)!akUb>oDv%)4? zQTA@G9zSzgx2TdIM?bd_B&S~if5=8yDumF2_5k_Hkhav&Jc0DsiE}$!*X@_*Nv7xr z?mF)~K<8EYD@d#C5cD;I^ZEk=;}$S!o`OTwlq3QwWk1sp9wcPopaS>+cHMTs{;CVU z+?LCD9DrjDu~{r}CHbC-gB_vYZ)m+iI)x)6te~2#_V}zirfHIU69QLne;+l_3du0( zAC7V%CKfBxw0&b-@OIg$yY$W(pPvxoUdhOBe%W$Aa2&X{9zHKfDF@(~e)_5k=9h$b z^Jdt%KL>A3@c@8WXy=TbPTfitoo@6SE%v}Sfq&^e&V#zzpK3t1aQwBo?x4Yp+~s58ZM ztXo_JmYL2EWwsw9{Q1484_-}u-eM_MHTv)bDb)RqroakQ1$p&+B2)QmDsmYZvwPAC zcj2cKXVtLa>V(A?fAJD$i)Q*oayV3iFWUN-{~R%(V_k2TrskVF1{0|uD-nu6jT^4I zEB$XKg-*j{zw=TBg(`|+kQ*%2aoMV%4l?!=k0DG(Yl5?Ax!hn`+Oy=2d;@EzSR99N zgTYoy{s2_u>fEA`+>Ev1?Hs>T(~oiWf49B$u4G8-r`^aye{siB`sLPBmnL@=gd*UQZ;sP>u$lvXU_iEP3tEjB~apee5(*H zb+bJ%Y$GoY4%+v!J5oB?@GetLk~(JOP-&-4f{FYN8QpPMBLYWM)@dCMK=>T@E9w@T zE`YY|&^Q}Le@QM>bWJE4fR%LLbn#NT`D=*+K_nrpsg{RLJHoL^R7g(2>2byvKgMkN zysvY%Z~+Me%w}El0%-BBG;#FqqiN#Au9? zt)fwaiA@*&U(E|fd!0@e`TgR-E0^qQjX$VSQ}6D*L+|d zX@OZ(+Knm_bw%EK7}-o(_sXMhNQnG0vry|zaJ~|Rg}BbtZ89c;oGCAXfoeNe)bfz-qyKGWS2?==1;D?xe^XNxt}l{sE@53$g3pqTtTC_;w1Ik6qg;9{kZxz90Fl}|-VMp8BGp$>BBx%|!A`=+=;o%H9UjXIZZgle`e6^xm( z+|#X}9@PLsbu8v@&R4-E`p7LL1P58_o(J_U_vXN*FhY12co1s~QN$DcZ%BBe{6eGY zfBejVL1#apurBndv>k8K2XKm024@YL)4XK0w2@7JAoL~0b>qy=ZyK_nVRtr;bxXG( z&LxJ7aycJll3gqvNO&JoOh?@Ko$sV^jvJM-x5{Nh9taE>$9RIslP5K?BESOGaVj76yN#b{kRQFV^1F3H<7G|(rX#0K`F)MXN_X5GI=Bx4RqOHu`qakprVyEZSoV)hqf2G z!2CD&86)4%(RF>Z0cEUQQ!qSyIUilm>F%RC@cuj>^N1>Ka9pB-4@}$H+Kk3cfAw!L z)c_22}uQTn>1v%v*YwFeG-&3)z1YF@_8@OXsz!mRrb0KZDa=1$i;-u6G9+2^hnNkvL>S!Fe-Xl7HE*(A z6)d3+F$M~%H{^)5ou)|Cx)CQ~f)RQ(4WY|F!1r5;vJC-+y>zj+YRPyi%0nmxUwjEm z4REQF`r;)6H-V@+qYi%lPrrD_p9Q!xF?@KC>e}v4fWkSRfJ<7eIR}tsu~$k1d7V2`Snx?D+Fy&%a`1Wdit20*1uz7#QP;~!_i}@iCcd?}^s5{o z?cPg#`Ij%;SV4Ja?)V3;({n3l@e%oZh~60qpcQ5UfwYy>ku?MMfA@d4`81y(XLoVX zsku31vD=&4--OT^>=&)H)yg{1wdp(9#gt+sccqGjU{OVbGQ-t;Xv!tlev2sP#8j0m z)osixwen~4CitXvtfinoa*rgL8q!O;#Sq>+$sK+c&6j~R67z|OSTFumg+XpCG)#b1 zGG5_nUpe!b0k2H2f6oimaTy1Vo3p3vIswu51Pi#A_Nf3G)s+}f1DkBno!=-nDx zdcm2}4Wwy|Fmg6>z4x%-ii}f)%2sWT48b6pO;Q|L|Fn4cnV>W6;=Gh4K{i;5^F0#@ zUmeIVj1JGA(WjE3RFSE(g7kP$`VpHdwM{FKQ=@E9kD|^!wmJ@vhX33Bve>c-55Ny0 z>8{9r=cAABe^4`6V#2y;-ewDjR9&d1vJ#%s8?1|^;18NG{d;UedOrlg40c8ahRRPT z6{LzDIGb;Zv{xh(cCwmjd$7%7w7FmzL{OZ$%-{Y4Z`{dLrp;g1i?Z8y%g!OJ>}gm* zT!TH&qqM=GMB=2MTB2ue^XlC9#$M<4@c@!(BN@#`Idrc ziGY2=I80%f4ox?AqQCNl{8fIC45Ns3w8dVEGwxbi#$M=!w~#8>t{-FkfRHN$Z;U=f z&Qm-r@YtJjPAhxCCjYRQ!&hoI@;m{*rMHHTxWB%2+Brlx)HqEfxS7hBtO}jlRVbWi z6$E8ee?%9pd(KJ&XZu(P`LyLoN;rN zRDUB6ZUQqTdD*j*Pe>!33M{rH>t?zT(%#Erf6y1(Opl`1JuZF;m~FRQ{y8eK0#jZ@ zDyn!vd8{tVO&XuK>|`g<#y7o?Z_%orAO9ce{wA(X*R|NpBe`Cm0(*P02{et`Ozc;zAOMU`ghZ9T#p#04<BAJ zbn##*8NG?HzT5Wei)^79@!e!Ze}@x8zd;9_%LBI_NC8985cwPe{R+B@>STva=>%yY^egPFFT@HvEXeLITTHyUmJdqiAI6igZiA#dDA%lcAeWdtM05`Fs7#XEaJ1@5GXbn z;`4HN$3C#~$>LAU0VbYIGhiFVRewd4-UqB6m6WN@fcnV<6Pk#T6`db~6=z14J)hq0-|z zr39J=-#b6@h0#2tT>7X6HLP&Iaff{OgNohME-pH#iymeJrhdBG#f;hmf(NdUiQj+w zu=mHaYK>m-NwiCXe*-8Varut6xnykJzhDRP$E)w-@`1=LJR6}E%dK^vhaWZ)Z#=sZ zO#cKn^Tpc#+lOw~Crp<=ECK{Y@YPj(KY z78Kc<1Xq`opy&0@pFJOdvt)Ls>RokydgktiAfpB7-UIvAf1_=%kuFg08T*#P`zGY0 zOXz^pPTT;^B{@v<2*I9Ejgbr6<8VQK|Kl$ zl?G7I4$TB^fAyaM>HU*gV?#YHfWtzSSDvRN8^{SVz7F={+}F^jr*W4lW5-&>QlIOpswfzMFgj(`BuesRL1$>%E)wEOPC`tO*p(;?Aorf5>Zf9e^(QSs)Wj#Ozec~otZ%Yvx;vP zES=G`iu>v{Ro~Ad72rW8g#HBZ%C8=+F;6n6 zbL_9qRn6jh!ROR%A~@?kRJiVaO@lzwcoTuy?FopY5GyRo3%bUknrZd)xmh_pC8hHI zCvDpXf3VAn8?!xqIl=q#45wu2Ts+{Y8D6I;Z#? z*h%STvmbmnqRgHRKGG`zF*0jf#Ibvyub}xOe>9SS^Api|j(SVvx8pR% z&A07^T$6bY!=K~!e=|5ng{_0^xTwA-ZyMz626P4;@XGwXj%gLiwB$FzNBWY2}D3&2bPzPuarZSl1SuPk5go6zLFPzPyr(L(m>gzP4njsdWVOT&oq*DK% zpK~qXX?kPCh(Xy0c>60+};A3^NRf^dm-6B|CRXtNKH= zaLyws!9i%!HiRL|wd(vOZ08s7XiMtY(87Bg7YOuZc&_QHldn;il2$TAVZU7)rB0~N zWNU_9d_&&S9y91MkMp91Xry?9bkJYZxGBJoNJV%$ z`>vNG4*E%VCU9OmN|Ng;aThOPf09a5`%n@Ef4cH1Lr#hFl- zLJFgwF}$Lgya(gTY-YP5`j6@tpFxPKF1EG8mi?3GMDDMX1qr}I%LFWif693uXu!>exF3&BLPc2@dPRTPq$qT_0l0=mMjh_F#Y6mvK|d3qt)ZG?88! zZeF{6QvTX0ktGVP2K|kW=`JMLm!w2(Ya2Z@#HHRVr=L{3ow}D2jmPn_1hK}9|Bwcy zR}Jxn#uYeMT#s?WBmTM9Wy@x{kmf5nMNuF~bt+o^;I zJODZ+^@dP0RiTPCMbty!4w?p(D~pWY-)96#m7_|q1~RCfUn@+lyqFW6#bm%BK|kNl zZJ&s?l7dql1wZ!`vFU|l(C7QHcIyLs%}{Pdf?_FGmWaU#qz>i$0cWOfKcHnShau- zgeEzRr_@mWV9YOCnz@hL1B@*tQ5?le;g*3b*a|GK{FMuv;VEmKw=sG|y$k;CWC&v% zu9JZA05=lLNniQkeic-ucamlzV-~^CP~q;wEwT z%NeIdrPeC#4Yo>PYZd?Bh=^xtj!U?h0Sl9L?Ghcqvd^dEa44ZM%xl&ggEIP?OcIc% zIV(@>TJ zbOJ63f2gH)5mlWNI`^`2WWXjpiAO2>jB=5m7VjZ&22$L@ve@O2^xtD&b1vPCPz@*3 z*4}tFWiMlr>so4goFNoz%g`4^nI>`H!3!d6qm3-~(x)If_OS9e>JKfe%M0SYS+ha? zdhWM$a#F(`H;hXdYq&(Mk>GTMwb3fb?_rNve~8_^MZO6w%6Lds#kdV`rJqAAsmRaD zA+B2`w#_>}OC11z7m&>o5)L2^gnOUT$CVkHBV8SrR+(N<{${08j~v)Fn0&CU((YV@ zI;-H2(wd7gcYIW+41)JVv@(qOQRaKF`8V2%NaQcmnYfRcC+1{dx{5PM)H?GzJVBPk zfBrJaN1A^OU%4&CWUSYV?t-jD=40ln`9>~ggJNSV*Vb5#s6Z@giT53g?o@#7kxIi2p| zZC=DzXZE3i*#4fg6*O(SHZ2%#&OeGHf3;ofcjz$~|F9iZ@H}W*5};G{)x~n{zMp%> z;fb3q${=)i`=o>@%@~Hwd5#$rs`cegWQovcXU!nP({BJN##%xbhxsXL$qcE=%{g6S ztZzpUp-#U;Y^h@u;;&J`(EZ$)M6^3tb83-NXUnYu;{k6sO)q@Bikl*X4Y-T*e_d~>Q0KvM z&FCuQG(q6H6U?PAp;)yMh(y?se_bZp2jlqEA@rda~@oYu7ly02+dd5lQjv&A#O}mnipx1MfR<` zYBlXtP9)5RrExQv9%ac~ae4GOlf4+Z5A_Sp6 zT8Fbs&bX|O^dT_n-rpNO{`kPnCB}98$g!aWfiFXRJ6{MNfx5{Z<0Y~%;Haof1F2Bu zWL5gji{0Hq+J(-5vSS_s*@Kc~mIiVG59o0(vML`vrvg0vn?*x!zR55`|6m6z8+f7H zSD1nlP3t$vIul24TMlrAf3z8Z?BGAk9f^qjr6P0K*qI zioD$Tg>!(9U5yEDLmC2Y0V_-bjvVo`sRVedtK9d7C(=~u&Bh8pv4(-4owo0|ck(ZX zpYg1Z`Wds{dgT+fZXe}4`Tol$ncCUi-SYhpVy3Tw?;ksyYz>ATe>WtCHLA=!rnv}2 z)AO3Jq_)3gvGd{I=SFic-fy*vf~X^TCfn++V!VQu-I(ze+seF79T)$p2S4P(2XC;Q^9_ zgj3n<>gg$<0nfz8e{#KMHk$0~@K71!k7?j2I`1Z{~V9R<`S*j$Xp#vHUSuEx0-{>F%Rwx;z z@8Nkv@P}@$5AH|phz#5oc^_yQHCeC`B`dS|wud)AK}n zw1ITm)OdIf9uyDv-@!#~ySeT9Kmaq3R}#RRU~B9HbbgE=@b=-|+2`xZ=g^rLFX+k? zW~+c2_%t3pqf%hMPCnHVRsJXKF8{vjJ3hygivpGhf6Qpt`UYi`Z%}}4#FaS$EqrV9 zgt$N5uGEMCmZED5v-(=B=LRmo8Lje~S)?xWR4ZG{!3Z74O*}q9x+UX3{1=&53YBqV z=ul@{vojzCegZAnw(16PPYLnSjhvl9n*<{ew!|!;-zO3c40RK=ODs*MT>%F%%4YXi%*}c<Hp&Z^T_fYzC}%X&HK#H{?NZD1+JYnN{08RQ7s>tO&9pDSf9(y4t>uxT`p*&P&?6Q6%jRNdEBblW-}s?w!1fKZOa2te~3g< z`0v*B;$C2UG?k0N?K@Z8hI;H7$2}UM(X|Z+uMBHqq-*mv?umw`AtT?Mh3EF9TY-!X zQ%oKS>)$Ul6&kis-{WJkd@1!~6p}+n!}t^E~8DIWxDq}Pr z`Cs1>%m&Sp$AME!ZPv}P6eofaf6nnHb_aLra_9-02jO$cbCek|bO2`ZL5nNe9yOw} zsd-a1oE~^@z?S?>o&xEsS-&6fQ49-xd#R3=QB3Y{1MJ&9{#q9NFOW&}W2nctlQq<`L=uiaU}`ad=6Ub08r~%SgPhN=`d5AGf5oB@c0>(E7@iU_K-RxlynXlY z{xiLiTd0JMGR;ys_}=1XfEc`VBY%8-+S6PK-~qJ4{`d)ZL(a+t#}YqrVpRpMs9k;P z(}O_-Sl8Jyewy1aU770l;e|I3Ax`_S0#)S2f0ECg|37xD=RghPZf}8-9=`hY0QZU* z1A^=Y=fP&eAmCm*5Ppt1zEPOmwR;N~vL2!V5v8*Ehe8b6tM%YU@6<5{P=6!;sD*(9 zW-E|`zE&*DAV?0r!?Gal8_m8>rxhVfTt00J`|;Wo`M32c=oetrLjhRZVp9g}Y_7d7 zC?TMf?&ybDa6@-2h8;oKQG&1A@}G$DtPP$m`A?pZ*%6}BtNsZ}IVKM(Y74e9SbQ8b zWiOB6Ak^CMOTHMjwE|ZuLx1i#rMV+S&QvK&`#>{B;vKtk+XFRP^)?+t?XYvTGC`37 zva=b_pI>+i`B^+whR)PyDns52K=89MB$QoRY16l;3;ixb%=0U zBIcINHvN^RroF%%H0g}94DJ9Gvx4opQ<$9SS*2g}T&y~lr->10qkrHt-+r|e;3yKp z_dN0bGV{BuLj5`3X4LyrO1!ln<+H!z1%p8sK@pTvksd4tHI3fb4K)*xNOk0Uq^dU> zBrxWndP0`}LcMIKWHXiyux`)pnjbvArp@kClMp~vnoZ(K*=ctFh@ZuLmZs_Kd;x}|E8)gPn}0;1F?#r|z^Ayg2|7}` z;xYpbxSJm*q_)vmV4WJPnMY`p;TD1_PPBG{RVJ&Utc_Tb;9(|Vc#J(rKfjsH!IUU| zmGtwIJ_Yoh9eLYcI9mT6@t zY^`r`$?wVmO@D9={>7(MK^t{niZ~*|QTMifIUg*Dp}>0fwHSu7L*an{#W7i%4t^JR zTw_mW1fL*0>_m?r5N&gj(jAB|V0?Q%1b~i5ZMAdH72JWYD?^`Y((%`)`E=r~%Q8rk zndr=RDi#QQql@7xQ5P<^y7UD?MoN=^kUii(Xa$5)aeuHV7_h^6*z@nGZ?Jh%TXo%c z!dD?pT30_6b9x`>-@BusAij=B^zdNbw%v2HGi*w_{DIjd=9%NZg*ij0sSr{3SJTLH zZ+?O6mzx>=AI%3&kQc|iNxKGz74=|>gEi8l-0#*EC^ik~5HjvSgDPJ+_M9|qsCY@g zJ!#s@CVx==G*Ed+pS3}{%6ezRDkjRKZ~qR0(iqqR@31~J+p0F5QJ4$IR%r|4N~O&q zN~5P|fiwG6_I8eC@#gqKpz&B{6iIuj@~@Cud*wN)9xi7&iB{Sur)8iX6*9=nrc+~) zRz2@^l+2AHFW&s*l|FjxW(`N+bs>N~H^)l;M}LA`7p2Cxe@rd`b_8^PyH68C>P~pQ z+l8yaQDJ|XbK`)S#bDvW5u4?L{mMwn?uyUXth3qqV0r6;OPUY-EhG8c6R3%ETI zCF;WRxsYk&_exr|7#r(*xCG!rl}m*#u~{_rb$6DkfGF+8krA)7*fKf#75JH%)z>m5 z`F}4tv2=#9${*O2M7Y{ip>u9^h^8WCD$=cDoyz%^!aHpaga;8)yT!x@#Y*R|v*amz zRCn;xNXesK3gNE{XB6oh8%=G!vQ@rI@umOJo~cS11%Efkf@pG1v)hHtr~r;d5ED&% zNaCL1K6w5uYqmYk^z%8PmH{zH7LU8Z^M6gfZL?Cu3q|4hIh5)?u5OBmZaC2aoWaYM3mqxX)}hd ztN}VC&>|g@_WGewjK= zTg4uRlv6Y4>aQvN9ku$D@vi`oZuwGRVHu>m=J7S3%u77WlawDv4^`-BUQS>WBLr5& zPu^chZa9H)(yKKcnsZaaNS92$xTAl%zs)QEsXN!HthJ19g5zIIJ@l-vBB(v ziLy{X%=6w5w`WQDgQBVFyX}Qv5Pcdh)_8u@3VMrge<>biocy*Aa9t5VkG^r1Zm?k> z_nZ=jVX43yb}5D;oHf^+chMztpRZU{t+^%`pc_W`ubFGJf?cz9zZ4GV!he+R{aedP z4bHEPU(02L{|y`#-37vweN|Dg=iz%VP4LkH+erjzP{RAd$V16%E^8VWK{^`X27B#Y#4}2XQzBJ*NWg_yw?$Yu(~d!f7IedV5wH2C<<-*auz~t}=dugLbvGoK*;TTtf-WAN=FHifka3df z(|+Jp3{Ydzn<*u2>!Tan9>6)&_bB{xR{*YI@5`h!J)LzdkziBV_gjE3KZGB7Rb-i> z@ywnmjw3^n8{;IP z%Wg88tH8O@Ma$o)tc5B+92YF&!h1(-x3ziCcM*5Hhj0FS>VFg)zhAg$_tpNR+G#k7 zDK`PQST!_eGQ$x0W@$*RFDsrKDyD7^C}j}FdY~km9qU6#>W-SoiYsV34DL-S@;e@% z?zGekh(fOU3Q_|1yeQES4A6*;0QOpB>y7X-{QH1cfb#C0-H3bzj=KY;L83E7tmBx! zL8B*0ALciu@qhN4CB>?Qio&!Ur1KNML61G&lP{%nRjRF8SFIX>t?|pG8q1TP%LrDU z{+yIy5fayjER!L5 z<1~Jy{dAEE8`CHIjB4|excxA<9nsJus=`99I?Y=HY=79@jKP)a1*OwliMo$TJKqwh z<8QHmB`EygizmDHf}ezCqx!;i%OGY*v}2pS3C1#x+vDlBA;TiTjcwn8fQM|-e%EwL za~K=#eD)XkZv39Fu)=p;M*}TC*zz)8D1sA||8j%jD-cx`_lX~pXEv8T;%~jS6cLv2nE})=uaxvxZ5{>jdx&~DP!l^F!q41|PpqUCH`^oV@}K>&R^DvtZEVG{f%t7NG%uud|4a;eTfmW$?*{%HqN$^4r$OD)jVbIr8n( zT5LU`Cwc0iX_ooaOGY~%hWWUYm{UORVl$=elLZ3ub!BPxEEtXjsJjGdgL(meD{HObn9TZ$6^1$TiaAn`A4$G@?-#SfWtLg_G+N zz<+V;w@j2<%Fdfl6N!BVUdjYHgzHIfJ7&HRSagu?4>s=$b4?fO9@K?2K<5LMvcdri zp5Rz@Jlr7SXx?qKf6*XNcB}~s{uOGQinYp=L_^Hf3u}1c7h+AMhk9=?bkPme#zgX( z02K5f>>fE0@N-Hrsu<5gmAHPuIB|`*PJdZWaL{T z*6%~vZ2J-+>|zY~l?lg5xw=vvBg-HXGN|3>L-S%cl0569^+qBj9awd!Ec;;3CAmeU zE+RjgUAQh)X_dVPXNX7AfR}T+qlMuB<9>QDPn(if$Z>t%n0FAOZr5aM=YvJhCV$nC z4_WCyrpylQdhLm^R*#BG`911Vet(eX;hb&algn5YIn$km&1*l`rin*Cn#}NImd_qm zcK@?vC->i39xzs=%AycaQHgyvvXn5Q}ScvCq`;v+^8 zTVYxJ)c8<-45IEKX`#0jIwHCIC4V4MxwYTa*nihkzk4s!TZRmJfl-1wv}F6km0~Pm z%xw)w=ccHRPM*QZLj{kXVX^>9pL^d%n zvu1}z&bP|I*(>{Ds!wlzZZZs4TV~LLb|6wHVc344N<^4Y%IWBFu>dDgH=~^DkzpxH zG*f{Zs7>+MG)LS?+L*jK%%%3V)R3>OSwnJG&w^hP5OtF9^Fx}-pbPOE_KF1Ouorha zSTN2c9fcP1F}PZCq9>lQi+^RPVo<&-boh4Zw0%JbPUl8KD+-;4D&Epp#b!7N9*UqTZ^v=9ygfvbPS0a&uvVPHRg>mP7(|1t=UlFTkbj9-9ZkA9B&byL z6TVFWYfBZ(KGss=&~D1?$-4W|a$E<@4R8*j#aD2*sLX@IZk)U~!TN8S5+j1P zO}HmiIfGp+uoCnv_E%hnJjC{iij%Th=%269Q*7U6@P0VsT63da3lp1t)|XZ2@tJhB z^@#Q-I7KIpr!pl%^MBCN%5N@$!K3#V9)0UEhzjm%Ql`2lGNf2qY>@yaDf4ttGh8Xq}9M8YrP&!ls?B2-o?T?Bc=6zD#dz2j)d?buJd z^|%E4lDhlKTPHhs7*5!tOwI4uv)z1rY?sOdcmu)&d8SwxMt^e8Q_I1$s4v71zu%9+ z0wCT-?m?A2!(|$mqBPqU=5@;=Jut5vXVzIMXW@gEP@AAX_`jt2L{p0}-jUg~R*|jq ze|V&Q@ZC7`?6~Z_3q@fw=I8GnBOHD~`>-YPrsI*2YCrZ=MS1@sPOp;v3*?*C8=UX% z$0DJoXtjp=-+xq6SOwOPRqV4ObeFp0GGJrDNrKo!sLXkG+zV7_$Z0!KbR z7eooQNT6E`g`EfX?Dg*AgN+t1^P-A%ymn$IrFNtT8Yy1JfdT;3Nb|8gaZLF`hiiqe z`4E()3XX7|QvO&`ApEqe<{eMr{KY2V3~$|l2S35SPD__Asw zd8zmB#+Ke}pb-Ilq9^NgZMU6>)x{F)(WbvijkAwoRdN2{Xe$0+3wi(ox!JQTfYKR{ z`XIBMTe7SET?GSm0qw_FL*|3kpZxD)#cF?m*&Es>vjmE=sEI zId9%{9$}WL0~gmlb|v6qQ>&<=6EN%ve83bKo9f>Mk<-Oc?oS>`cGxyU0{&;~eNnCZ zIxv*dG#Z|oKcVQ)QjX>Ol88OG3u`T#g|L#So`+%Ob;4>2!RjdQ?=-l0{W*lpgh* z$pLTLs4%Yo7(xTz{f)8-mnHfiw_QY7Nwjl&5b4|31iW)n>I4Z;Xq+MWl(qg%t)XsX zDt~o_Ee{rar3{2Zx&=(Z8GS86f`0Uu*uReef%!4OEn3-@g51hsmq{%rsGIOCJiPPY zWXKnJ>aK7oJYo<9N#L&02%nXU2m?K}rdaD0665U3;Q&rcSQ-z`tO@i49?3DPVajQk zQ7e=*no@*1kk%MDiC@AAY|}%?iuuYbRex5L8d)|NKEGxX8ke5C7ml-l(NdtkINy3z zV@V7+M6u-Kr|8>|e11s06!OBu6j&C$fEsja*Bk(x$eUX6ocbJxqd_G+{zcI#jL8Gptm zL4a>Sw#MTbJ^fCc)Ie@cr}7cR~7ieEu*^QR8cxl)JR?3v!YbX_T4h1eIrE0Qi}bWM6Cia;Ng-Xky#+@S$%#V$hlY=yJ4zZ%{cM3-4u8M?Y#>TJ z@IjO=VNVt_atuk&tn6yi=$8oU($477?$*I&w66x6m&V9K0>OYggcoeB6QBeI6YE^Ib^%N_lL z{LOPsSn43$y$yxyqO~ey!GG(nL#2f1_mqw``V4d!j~|p0&v^!TzT?_LUQYG_zC6l! zV(}O?J+f3$$87KIsdWrN4Zc-U&Bgb{D=$Fwfi{Im%`@ z7jZvkDcYRAu~|08KnmN27G!#CO13$(D8}!!d^rVJk!tgnOX9K^rG4{^1EtPTT0D$s zu|+EAg_zy6vj<^N?=x*YSpo`1x0`ycT)N4M%h)Ke`L zYwr`2d6t$2tCO_sfVC2ur^`Di(^AW@Q-j-O98_bqV1<*4vYD|uu;M?RdR4mBzbt#Ytpn;AaC zhEu`UXg)<8<9}l8&-4jnKnQQdiS^9&HbHKl={0p2e<-2{f7iBCp)aGs!g|X$=sV)_ zofnHS!x`XvvXS^}g_qyKw6$u?%JgeSr zrXC@9V#SfEHV`*!Mu8+nFva+1Pzp)bmLwE8Jp%8z9oKuA!4-7Ui~ml&z;0ZT0*6#S zR5G)Hxs`T*!8_}=Z?b&LP?QgK2dgBH3KUGejo{8O!i(`+3KC7*JXv>5b|kamS<~so zr++1P4*^E!zw(G0o`xj5jzRz^|yO{n%!QJmQy&sOAl%Atskf7v{2Q3L;Wa zy@j+8mkv4m2K)D*PToK|u8@Iu&Nw2LwNdZnClh=?m~M0?wvH4OaEc(x;}~iZEh7~} z?L+le!U6__%#f@MXh_YfezLC5&)z@+&wMk|W-&rM9lf5lA zy?dh4>cnl#kyV2|r)k~9Cf%rt^z!tNO|!VnXMc4x zrPT@dRWOn`IPLHRYs9EWDKS~I+NO39Zzi+ZeB%xp!VuAH(@t-3t#^-fs(r1M!S*bQ z<5|0Yi!i_F5qKar#40LoB>`t7b89o7qrLhA@RSa3jLX<1vx>pw8J<8rsD8YgnAJZc z{ffjfqvukFkQSM2k)r@C2=@2^V}B(C#>2j2Oz%1B+c_%hYHhQ#a9zDezCUfhAY=1bSWS;R) z2m)qNuPKvl?UmvSyku;m%o}R|R5MsO3V_TzD_zmVFOXV5+UeYg63M z*)Kmu6b~56C(mjvP;>PlP@7fYuvWqCru9hosLYaMsOJoH{Wg{}FTj}aKrpn%tIyaO($sELg*Gk!{TcGOrW{|XfBcjX-`hW430^@s2Fa?B$ zbk~wP+7nO{v(BzT4&x{_o_CMKTD6%q`Mr(^U>ar;`NE}R>Fizvb>Dk1ElHq z7ovfYyk;gD$z+xc8A##W!VR3!{@MB7e|FO>{hWJK9_gGdiL<8v-j1w1&65f!t#l+%A{ru6K){piK;TKuWD< zlo#Hs64Dl4!R^PtJztTMO+__>$dB-MwuNhVx;i~YTLhRGy%&-#i|7+}@L+PD44U4d zJTEJ-GTg+vCe~+08TO`AX!o6>`*x{{0UX=%3D_}l@_&0=Du=?59A|uGT|YLrD#VfS zzs(1)Cl~dn-M-2=L>7l8B=7zJrDOuU4=Fv-)_B>~3S9eew%D;BOS<>Yz(VfpZ$~veH-X`+ z1(|_Rkbe(}nZfZap{gXtP%Hv`E}*pw+ph2^g$e^1CPCyHbtCc>mpa^Uz1X9azWBd& zL41l&yr&nrh0!&Mfh;HJ93~fqrLpr#V9%ZWi1~&4B%k~zAL6$*qYv{)^N-_B3&08I z&Ajoszv?$zLyVG43=q~NCPxHoKxZCG4;!drM%Kkab}`1usHXYJK(&cjFZn$G0_|8$%&DALpJN=9cUsUk zvnj?~(w~ibwZ!(hkiDEOczow)Ki}>DDsB=ojU*qKJ6+CN`vr24Fq`IpH`M3+b9K`V zDSsn+Wo9+Be%?8f%FKBt!QkJ1$cW@<= zXU@Wn!}2|1qhQtZmMFfn8Va{Gz}u&$+kfWlRDP3F%8L`bxY(eG%>y-KV9;O>tel}I zpGB>_t0%TlhpHgyo_lsP1xWT_k2eB`8xj6Wdkg%y9!Me|I$diH=}9LzQBS_r^{!PA zxq@dL%fu<4iYDoG0LM4-X37kR-B*K57}Cm6)e0V6Q7*#cvYqy>?C_rItzJvwSAS*j zo>WlAIrPQBUGio5iB!3Bx*Vi4&>(9OtE^n1NL;^%g1O;e^LRRT6*Iq`H}Ab zcTUpsY<8HReWIT$NIX9WcVUjn=?ihA>ceD!Q)swH-GFq#T+>r za1cm?y4g~h#skKJ3n)Dn;Tf$M1CK25C%7mq$mg~Cm4%`U8$*XrUV|)Ko%Jx&Hz4cW z3PF1bKoDGW2wdH(-Q%6;e%7mI4fTS4dw<$S$$3!qcy8Nh3&5jh*P3+~f5chAf^BOlPvDmMI-ZdQ zB^a3-=cKghAVK66XSEYp$f~IKrucKA5YGOk{K_0SDQY+Bm>>|dt2B;!8$W-KcTeC# z3JR4xRfiWwU`Fvn&?JJsly+I|N3BY)R%{bxj3j_W1<=Q- za~1g^3lX&ZxR)Bqu^5X->j&yHw&<9onmO}%3<&+DOi0W-Zf`ZJEoSVVz7tZ7dK>j~ z>Rmn>0C<2Dbor?>Z_q`Qs@!V6W(r+_w*rYOrvYVmzJGX0Iu| zglJ_L$Y)=q?yV8845L3*_Ydxlwm7%;v1KO+k}E;u^cWfIOjpcmf?Z;i_+~{-;b^lX z5IbGP)+3HQh0RJC_5yOWt#+Pa@DTS~TGD>Z$1CMu!}v=MM*?+& zIQLk!f*Lyc@_$HM>SHvD2Ec?OwbLtZNw4qOJD)BZK7Ik9%|J`bxF4?Nr1T35&_r;1 zSecFcqXp=rK*JVxCZR7oR#!y|PfIsLJoG?og?UUa2VxP>2SSa3%z4;y{H#@9^Arhn z(_!vq>yxoH4$;6rcfhxzp-TH<*9?e3qlX0qXD=I%Y=6p6O3Qff&l=FDte&(~$jC>O z@g4kfTk?f4+>3WxGNyLRs=y1Vs~0cQ_~{z>{f?b7NepGasrGJPJn%2{{9r-mOXb>7 zjX3Eypu^mzRDQd@&4~Syw#W*YwL6w3lPx1u4(3V2$&#w2(;~ z=6x3oU`IWG$ub~Q>cuiN31O|5gvBQ7r!=GKbFu999Ye+m{P+BSvIamn@`D7Og|2*& zkFR2Zz;E1f&l?3P2YGjM6zRkQIX3x)yLh_q3b^>fzYawF(b?dxs3v<|AzWz)hxwb7;-;)32{tVD zUnlsFla>xC81ysk7*3LU29l_R9F(_(8kt!E#WwywM!QQXgBQ!DuJ-%5km99=pQ{E0 z>3=V-&dy$=UI9jytQcaQ7dNQh^%4N%h$85$^j8ogExMr(Kn!nfe)Qzam>z}aqK@Z` zq3sD`FGKJ9<+2sBJpImQC5ia|KH*4Vi&V_81ahx$h*hArhsc@z@O->8YT;;$iNIxr zodgN*C_r0kfYK07xeP-(#>*3N-zFRyvVRn9+`X)S`4o~r-GwP;1^zm5w}eop>7R9~ ze7_B|1w+;J;7(-dhP`@z$W!xeTMt#XC}2UdXyc7 z?Ll@D;g(~bD-cX)Tk6^d{fOT+mt;P=(G|r zbffKg5zZ7Y`(jhN?OqirM@L0DC8ejLa$RjfN(h{6}gtI7J>VMxwhZFSbch5Sg zAye=Bv1x!V|1}7mai*R1RP3+n1X-2peVahCO8XS+5r=rENb9oW@daDM9!ZrpuUW=6 zS2b{Zq4W}IW&QZXkp1Jy3MLh_a;{z4&S=YL_RW%9?SFH#FD|fewS|v^e4XM)f`SFN zjeRMlMDra=1rKrWq<;dO=0YAp#!b6I>j+Nt?~#pbM7q_WI(qQHagRBG_j)jNZ*V&D z*c-TewHj;;X0DTp`LAv3MdnWTnaF7^8sy<^G`l^*@-=C@U-`9@(DCylcVin;K7xJ? zXB%0+57eK^V9>UyLpR&sXX~N` zTnAaC{oo~dz|s8}VSIqV^B zqXKANZly6%vh4I3`oTbU(W-Hl9jbco$8h$DTh0yYCNQUu>mocMi}A2w-OINOwqs`; z-}2o|V-g`cwG9>FC=0KQFSrWX_96C!i6SUL5t)sVWk1Q7`#f?dG|QBH_`ng~)KGZP ze_l_EFn=N3e+_s;k$h11+k(M=5&~n$BNqGZ9FMHJj&U;mp4YC|=_S61+<(JX!ijsN zggXxPKuu3Nd01QkeT8B(2d5y964)!|+p3kc!5N5o$*~U$z-lxv60`G?><~0@E`n&- zCoAe_{{j@nfS0U(Cw)xzWY|MC z(a}<})!C;`jyC*yo}mESB~*kHPAsw1TO8bk7a|lcntS?{+x@mqKj#KNuH67Y9KWI_#m%?In>I@s zvU%}FZl}1W-;pKR%JT51k+p8vj*(CK|+3W7oTX&etC{o=~55 z2pIv6%u1HQ5u+=;w^Q!T@RE29_-RlqSr6Mznq`h=VWqwD*^A{39SkjH(h!l8Tz_?w zh+>)8EQRyaP7R2^IbAsBiOaTELkfqH`#9bO2VeN zX9Sqc{gbKVTGIi#3x5pec?MV4Fc-f0Uys@gr$B{?-QO?ROK>|AA01WGaXZdmKq zQcSp9S-)*Ik9dJe%tP3sGRmt8ihsW@ml2$ND;Y}DG}|=cBOKY;oB22r&+%2h3xM)< zYIJiA0Xq8k1hoj7D=iI3;_m*0v*>RPGI1{mb_S(qb9#d&;!&5Z!Ib1-cIg35udn~D zGN$Jy@AyKZ&Nx%{^n*0ltUBALDtfO{tbnL9jDEr^!RSI69!mjq5?Z!4MSK58X2>W!k$L`8z8^9Oa3a%+0$ZuYAS&h)b=Mr+5@|nuyf;{tVOc~Kg*F{vr2yLO}i!);iE6|F+oq}*=ol3s-W zynIG)NkMa#JB))dB<5(;?0+|C3(mpDTM6yq0yK!v_S_VURt|GF-!(_xC&_>Ya^@|M z-GC7LyWX&6Ky~OfoY14vSjD$%d^)XxKtwdf$ZSrR1A{xV9D5d36-NQ4%h7c6eC88| zr!^&SYFJRB4~~xOq^q-~DgOFZEZu_c|9rd*Iv0Dsfph+?uLfV2A* z-m($xA#}008i=Pk%9C;Ro&A>7q`2c1U#ebyVh_p6V~FI8Y1UHs0cfOf~63DNLBt zuKw%9XUhAg?aCjw1^2Ed_rJHSmCD7LZekxD64^Y?xP5hs_+c(xZI0yIXZHglus~X$ z4<8;ti9Pb^KEaTC+*=DO)vaVJwiGDVcm2C1w6T^t_7BX|DSto}a^$+Mlgc7ItOK(w za(I80EK_8whSYXKL--d;H1R0$p1Xjn7(1a^y@vu>*{5u(vBK7wI32Au zbTowe9A!fH!QN|svwODLpL;mhaLXQUtIJc-(Y?7w?qk$|oywm-<8*iQAZwVD@Ps0& zNJw2V*1wW5LF>ik=pAR)4ruHbSTQ42F>u@a7$`Z)Z-4kpu9{d4)-(PNEYoKr!66+AKZj3s9L{QRjVY6ZPe)KoU)8?JG?I*C}Tl+WQL8~ zyTur6SYG(xfKfZl)0QR=6p%GJo?UW^l@E@LM^V&rrtTaTsbmr7m}l zhV2a_l>w}fv(B~I2YW)k&%+aD2K)$SG0XcxvvWjVD#O9$G_7wJ2Zb1r$a1G4?`uH8%(b1w zo>fQPa!?PD&Tjtuz0f@zez+QEpHEr^Onx@gdJKcSFo)u=<51&L2P9FS3*WfEs1&hsR2+<8%0;l2Uy<+QxGAx3K492M}d4- zZw(rDfm&thpQ}kL&XUvOXFvxjCW(#0n(NA|!iiPJS8cFs(=*~3;El>AuDm9ZwtxPT z_Y-4bk&Y;#K<;rr#l@+ylmxD1mO$z7A^7R60?Wqkp4&Q97(FMWNstZ=sL=XtU)t-_ zsx?(EFZzNgLtu`evluCLCr+yY;b}wQDU;iL@bHjMXRD)PI9~e;9}wK%3E)}TWo}uW z@moQ$hx~KMggby12dWWoo7L6+6Ms=KTns0U3V?8J1NPMcPcj*Uzc<_O`;&c9&(Nt| z69Ivt5IPX>TO@Oqqi@fAlC4tGwzc|xy-Ti6)`8FY&Xxh#_4Cq%SZ2C@YW$ zV8_1^CnmhqBr?QRG;QI+tpnACy3Wy@0N104ptE5X&QRmx!qYmq^ir)?g>&dpL24xZ zhlj|_l){f z@#^yZXiz;I#qAdAg);vv96#oOsGr(;WvWiP&HR45U@ak@ zTChv1F436xZ@n{63c-mxN;d5;9e(b^yyf5$<=hp90GYg*^wofP9#3yY;$M_pDVZLS>UL?&tT@F|#ZsdvBY*Cs9b|*tJ|lBZqZHwVd+!Ii zJ_MBPHNVc+PV1^y&^-asi&MgpTJu`&!$W`p4}ei%aKd(n+1-ePi_bser0>=Vpz%CZHAHUhn0qHB}U z;GTc38GnhFwnKjX?#Q}z@V7LH0NmsonG2SBatYGXi`)k}l-M4XKp8qF`{=c!=K&U^ z6?6~v8jn2p=(Fql6m`bRCx!OYm5OomBhjgrU%e+2_R*x1Z*ORzqqQgWglS!43Bv@w z(CY{IOp0a*Dn2ap zkPQQ$K2K69{+SWk715ACEhoVaaKm5ES8Ro+eH(`CEct3N6p^NDtEB>F2STz|fC|az zr(KU2<%qKfgV65prME}9){6*sfMb2xc+0jEn#lm_1Dt`T zUlnIdNh8Y8;GzK@g(Ax$G-%17k`%qU2YsCkv2LUbgW5~;%JeB-1@GSrI=2ddwW#BR!(MrKR zC9{HBw!}ox-G{`ZIDf2xlb{&`xa`ga*IP9s&`cL@hk~%=wGw2;yGZ^t^d7!g>YoK< z76^Hderh7zsWF`84>zGIfyl4hMVxNfwAp;myl^J{L1Am=yH>UDV>nDr#lQX}HQ=g~ zV5q{PzHp(oD)**kq`ozj1V%35B+V$Y5_psa?ltPH<$Z~lMSsMK?Qn1_?Y`;i7`{jJ z@HU&jtfsr*-Fw94CM`^Np2ZwoM1CurfUS|Omd3_^`RZ@ptVUNIuGmZ*n2rBc936@Z z2G12|TLg#gH>AZ^i5au;{uR5qNns{G3nJ24czBC~zCBf-NM~lYIMT$~Q``#NuQtAR z0p?ZDeCEI5%zv!vdgz5;&9gUobYMfjqwbOr8O)rKn6_n+&%_Z3xJ`=HQ5yJTUoy1X z8sK+%Zp}hMqDQyZ<_V`__htkx()B1h-lufKj%I0pZ0DN-8S^)p9pmt}uHhY!R~1^8 zscC!%i0?^?OWL4?-zKm!)%Q7pG8-5~P;$Jks~ z*qHT|8GmRlyy|o0y0mLTEuuNv$BW>A<~(ZxZS=?1bk=8TgxL5hFN#jEf;ca*iWEq( z%Ts>sr!j6GMF+Ym0oiyP? zX4s?;v@;MHb7n>qfMt6(pwggZ7KLL7V@Vxs2Y=u2loC*Vac~^a#y!c>hrVPSu8oKQ z9EzIFnrx^rh2tDOv^Tv1nuP@JcMQxEU~_Wp{>bWcqHcvr*9_f)1#-6Qv3nSlMrIvy zxq(9G5oS?F3Gr%0SX_6)oT?YG37HA1QZ zzUwa~B+Z*dTRU^RME)}DBRyi}_n~vy(@MFKDQ&n?a~$zilK4 zf#SLE7`9cdYDvAe%3KszurvgCneRu%1AhxH(IWi%o)sfDGMLc`06jp$zmYK5*1--0 zCU)Za&cAK#;c}wH#Mg`*^0RgLDoI<+p%%>RZ z9^`)$6Md$YFL40{Lg$`P-#sZlNIQH)g|Vyt@ZyZIq&3X$<-G@4nLxz#ENT_8_@epy z$v*`Etv~c1HTmC2OY{EG6)y=$P-K`%*^T9c5*gr~CwieJ8)p8%zRk9$`tKw>`@J!Z zzK;`=q?^}}dZaIquoUwdlsxUcuZpr4*${tp?-CtK!0md&gz*A(9*|@3gIqSG@j{>1szUQ_k0L zJfRivFcW-?{AAkxf`eUkC_B_9H#vVHV7%M8l`tfr5MD@YV`tjl4oJQ~CrPo?P*|vg zhAUll<@?k&IbT0)5 zQ?H-lL4}nhHHIy552gnb|XLr?ewBuW6jtc z-06yR-NGCC?wNZh&j6i5D5k6zhb{hUqZ^TL_xMO`%G85XAI_qTl;;+eYJd3Y^goIo zot@R|H2ObU{t6t;yeB)0)zN<_U@bt?^V*A6t+{Bj!t;2C?X;NSPQFE*bMFAMfL&{s zqRBe#6-n@|gKCq7iuSH3?QI!F*w0duPZ|acTcK)!88K71{#pIXm}FAgqyOp1-r?-_ zD_P?-N=6%wCkfMuiR8CDbya5jKHuuiUX;wU1ZN!g35tur=Z)S4#(ZaX@@&Cl>=|?I z%5yWW~K-&J#pETZ9g6h2H>FHLiCG|O1 z^s~FQXoKx%lAp#z;$+mHj19j5s_W)6aRR;U+p_OnSv=F)W%Z`n;L$IP_Uq~!w}#SJ z4j9y+o{@T1=^qX{Q8oExUiK7&Z7b3tNzLOF#BBqDm>Uo*CKG=v0R3iZ6QRI&s>P-j zj%Q$Vo0#xw=-AkF&}`Mv*EY=dHW&J|7se$8g(=~-S@7o}mzlOk+Cu#2v)u`HYt3yp zd1!Yupj=?$?!|^fRg-b;ktfne5Tfo_$R&n#c-qo`EZw;9ZB^+ zOf{f!CF>cVRg>*$yWU?e7rqtUQ0&Gqkgd3}=pW+Dyrj<|s^1tnjcc z-4c#1HHlG|(wdu(7o$C&o(z9#_}m&dk7f{fHlf_Q)?CnKMEcfDU*C($C>Pg$)b|LmJWb^(9aeU36^g68C`#(oI zxsZR8Jg0LdUmUyYgK-OdD*K@3@?F2vPnzJVVXu~O^>$}2b$HOdi!aj|iAt-IOX}8V zxtfZiUdx{yIh`wlyxv+~X&@c9I1PZ0Q93Vx%xD81!0I!(UWVSlM!7qQY-pw%4*Y@J7+eU6lRz0`8LpJVY|mb1cH`eyITeFIwGZiwT`7FnId zEhs{vk10;VCglzSzjkIM5kcMt zFW^*WbU3Lt%X{WFLs;7CR_T%5J2-RUUNM+NIRINOlI6g6wiwdW5f!!Tov2|s(Zuu7 zlmUYtSX8!M-jx5ipqO8)OvU}6XeidXwN72LA{fVSe42l=@dr#Jq?HZ-+CZi6Bo9j75Tozx^*fS_Jm+r z0hG=io?1@L`VZ*Hosyb5*WDZ-A`WYU(nhvO97yW`uU$|V>%#EjIeu#wi%{VwI7aj1gE*t_ADG+`sVJZjA>fEu~*klBPP5eI4Ri92G z{WPq}g?NT`w3XteYs!MWTGH||MvPKUHl>tB{k9rLdf zFLN$I;;_bKfW_MfuC_(7XbV8&9Vr%^5Ej7a9CCrIvYh87?ogOBaK2=sCrZ5lg)#fr zvBBJ1whKlX;ZW3X)rlj)ufERUpH5J}Wv2#P2OvrZ19=`ff?9tVjUSKFE~9&_{+L~w zNJq>mhcaPl+{-~ejuGJ&usn4<7+QVmk>sW2ALQ~y$4f zbV60UtxpBeWldh>uC{4HqtNM@52ZYt@5WyzZ`_N?1{it4*eepq_5x4 zADp#Wthh1o25f)NWn9H(psZN`ZMDR&ux;*Rw&#Qi#_J>W)kQq~4YWEXMGPwkMaoRM zIgsfanR-2^WFLQ3RJLjw>fFrdHsOImn~%s+u}XQ_S{s174C?-{z z)vaqMdd6ve%UTJnRsEcTs3rhwJ8UknB3Mz#s`cbOL{WblvxQwG$~1vgVIr7rKca;K z;ih0Z9sFH3tz!L=t3YE=t`DDNFcd0fO>pdq1FVbYXHXK-iXiPKV%svXn4ek#Hv zTKD(iJF;LZq&PZ&O$)vLdXlx;ObiSYHPVGGo~Ui5Ami^ZB18}3+goTu$fVzEhy}(C z;i{<6hA=y@;pAc$&qtFBlR(bc-s zDa%!R_XWV7+OF;kR^U&FWUJC{s9jkM{YN{?YXXA%3b-XbD~$L(Jb?Y6`v`nGh|3%r z3U+_zD-~dUEnyc&RyMI3I;k>kt!gRq$pFc~;^JBZ%O8sV`Mq}Vi9=2+t$bfJXQzY3 zygF4t9)ZN4+4Wy;9%`KoyHFP_(M|}XPub23aXE1S^?4a!W|@thjv#R6G_8Gf`t@`+ zb0=S$&WytQ?|ABY-v4NDdljF7a2xatK3;zc91!Mx7fdU(;5<&}a2E|bCa#BijjR{$SsMfWdgj5*V5RMJFBW_+*?oX;|IeEVkaSsUD)~KIP z1nN&=F*vycqPRy+6vRsh#a$Y#vHE?ybIKvo%2+K+I1$O z!f+JmxyVMcFpor@ipxa5T})?&OkQl%Oi9r}caf*Xkh3y_l_s>^G zkvE_b=tIoq+I&tx{8{z1(Eod`Xw{o+XhMBJ(ZD24Nm(tK*ZO+?_te=firjzKwr>SY zE}>63XI_-@AV~?C0tL<9Fp_eW6)T?%@MAmE~_sTC%Bv^I-0`H~_BgCYq=eD97Bk(z~j91y3$7#;fQXH(j z4_QpGPNmY^hFMZk!;G{8IU#?9=|Uq<1_s6bF#@S{wO~XFcB=cW5{C^R$i)MgL)Zp7 zF2MMi8Dw)pmQ?Q7wdMcd6@&X3%_)kJsc98T5Jr1mMgCArL){=3A! zOo4XlozoqzW3Nd^@y5Jr#P(3sn@D|$BZ`>cg-cD%w1kT$T-65kO@&(?xuvZ(-;*^j z5b;fBxXlz$)>5|vxO#tWc|9jv?}sNfFIEN^E)_gJ>9H}mGJ$uS;ux=Ln}hp{)n!k{+3Fi$0_d@ ze&dKO=aZ66te`upEZ>Oq&E#iNG8wGW(ts)Ro6D9zL|6z1Uip64qMD z)V0ac4cZ)js@nD%3~VHffKGk7{CUyicgv>1c6ekN4x{+o=bA4e<-Kx|Bs$*{g*kAf z3~i%BA9IJ&Mr#WyGRGQ4=}=!1>2BGzDXN819*e>=hzZbbQ3fjB`{jO-K_B$(Q5*+2_YooesHsxWd@iJWVzu)A3qrMv?=-{Z2f-3F96bxJ7lF#K&@aBCElkN@DFC+)_c^9) z7gur99a~A5cEJb$yzb~wq{F)YJ4=^dRm36?0F$u#6WT<)*=E2|NH8L_+d_->irlpo zQ=@;Bdf>Fgd&@R1$p#zY_m=~We=HZ(Ea^aA3=`HS>+(swWoc@3UP0WR*}cyL8jcTX zM@1dB28x+gZJZBkx^XIKVo?egGx~iYOssd+{V3l-#u6_|q^p#pEX)Cyd17AxzM6mg+qwn#@+Pr56|y&a{gJSGV0PdO8+PShHA^H(j z7@3i_PXg8C6Fb@Cp?BhojaU-hyoM4KyGPK^ELw62YF;lw`-hXUD1(aKQoW)J2T4gi zOajD1-Sc7$9o;2;OZK&pVP|dzKfcpC! z?cnXpVt;TgjZte<uumyZkq{H}Qr&Jt6Q7At_mEn;t8`mm*r6PrhkW&q!n z>s9m5<#v5`mwlXQk=%cMKH4fOVb@rd>^2l_z#jAJq^Qy?Z>qexp< z9Kat)15IR*GL9^b2bAbCEH$z?PYEp|$UEAFG4ooAd10BWX{}~p^+!A3vs@Ft1Zdyv z;w5B=5mEl>(mYMGk54DN>bQSbJyCY6*qztdT;}?O_7U6+v+xeIQg^X0F;09`^bCWM z)xsomk$0CNh`U#=RkP>mD;c3u=HJQw$!JHz9}*XA$Ob>69^|nyE_G`PikNx`b>TND zkuT&rhU>ps*mQmnnU>Qz3q1f9E6&wB9CH=UK7{YXL>7aLS|v)FBoBYN{eG`#@|)>k zp1}UnBl{%|*9G*CP-^zM$vHl~LGyG8PuzCZsIk?mWL2Y~R{E86n#!tcTWmlQ!vraD z*3fKg#>e=lu-4|-c8POaF@Dewh zP9{5A4>|6JbJF(8-(i1&!FhKQaRX%_HOgMrVsj(7zy$7f$gRi1D?z4*zM=D%DU>3y zYryIk!Zof}-}|=eBps2>cfg3asjwjzW_)XU*q+;H3m|^vs63aMtM0~Sfg4g=W$xH?r}L7?f(|iLrgMf&7F94l`>l0p{ z;wM!U0-RbDP1bdQzDUz9-t7_Cc&I??--Dt zV%O^ce$L1&g09m+N9j~j8ngKf8j5N_#LbU6(Y1IfjRq8-n3Q``1_vi0>6>p zQ|&Kwe92xl7lzOO0P*94;w0$}8XwZs>EVBmWG1k6IT_QKr|HbX#|}uN^*)_srz?~9 zi7#2N54~lNtG&|W7b4Dxw(sh%ZQ6YM;i3b?YITIv%WTC*rnB(GxL zp`Oh@_SZ2-0c6Qmtylol99P$uLRbqLQHt7w3PByEgn557H#@DOD_++t)J{|AH|O=XJ(M z9(1#n@I|&82jBcj#Lg%__fAS#GYAhFx$J&T>2I;stNmA8?=sV7G2rxn9hQo;7?Bs* zuxOXLY>JVDNYBaBRj!hlYq!vWkBNUXDD+DAu(rr4M7Oj=gCD*jNod9VMLPuyEROjg zXsuq^Kx2yrBmK(?>G4IJ^9}od!)GWFmH4^Mep8$2+ad-n34Q*8o_UkqyG11emW|9` z16ldLA09DHCLX>t{2EyI2~Y5(^^2O_Reo0?v{{?K%p!JAfIW81z!=7&;n{z!@2LvA z_vm4bhZ?nBc<2JL#<;Fm=pvO&Otg^6?4VYm~Db8S@I282ZpaQWH@zX zx5Is7V}H_66pJ>}$%(yex`O^<4s#d=`xevd$tK@x=xso?H9`MfO0uhBg+e{Hr1lc8jsP+AKjg8 zGKqt5Z_nx&tF8vgiNpw#`l*|j-)H^OMEi3q8Pe^QTg4Mj^Hu~{WdaO7@+>^uPq)+< zgny~R=2$4qjgXX8&QO2Edw58~{5V`GP2)=}11k9^oE*9^qtRVT9gBgtMkdiU&kv3p zGXRQ|>;;Hg%y8s3)-XJSZP*FU4fHwlKUL={D>Tr(r1eQ>@`pR08}^-f+1$m(Uch}Q zx3li05qhGD8R+lKP6MR`w2%*wHYK2j_!7w(1QqsuEg4C zL$B;dRD`f5LVzLn1e(;+eEqZy|NoB(xWjOx1G2+^I9c@+b(Nftbg{@Q0P?0hY6TkY z21zNBz$`{9dp>{Vc7ild1)y&XqwbwbGm;g4ceboyX@q2C>URw3g$GQ zc&6B2LqSv5ro(||gU-bdFaej|5%j**27D>zs--fAGV>of4F^G^cV6$Mf!k&oEA$?v zYXWz6OVpAOOAi17gW9&cZVF<^NF{scUbxmRA&wx#<9M95DeTR;e9-LDYowLHj3{?zX|@43~Ttz$vGLFS<;K{Yr~Wy=JeYyZ`~e};yVjor;TT_ z5^qxZbU?s_D;P)q+wF)Bj$8jfhTeZiHiUx{^&}LMuO{p9@q?&OCsS?<^TPzGUdeO;@o z>DR7HCCtyPFRTRK%1HfHneT|RWn88ICiGl+ZJnT{Gf=xtBH+#}46>ZpWg4C}V%0Vl zBLE?iA7V+>)Wdx>f4grKv|V8G76}+2`|Q2(Q1i-;TCdtaN|1}npo_?p>)cC}2*1NZ zG$eoY0uH4~*5vY4k2y3j!Xo3-7>y%ZeJ6C)>|fv8&f9_#(>#V_2LSwX1U`kJw@@7Q zKAgk^2La<#xfqo+3X!zC;CX9ax4g6cf}r;Ucia2cIpE(z#~Dqbutyc$=v(Si$o)56 zV<#IvJL9`2Z(P*2ML>aD&=b8w8-3`+J7RyUStWCrBdfiLnq$Ad_Gr4|kx(3iqsSP< z%Xfep!mTE_^!XP9-;0#BA#Z)F>ex4DH9c?D!~Vm8f|Z_tlNKhoZQ5l2Pg3##%fMVZ zNMFR{?JEHSU&tjprR2-rS!?nNw-x^F8ckVpnfQ5k^%de<$@eRzLlma`~Aba!r6Iz%lt{+n)e#?H$zk#R={!5Z_b1$?*8n*xpI^_9ocZ5 z#0|PEhN1u8DGd!rMgt--B9m(V-vQgmS=ou_d<{wLq+B7jvDi;f{Z%BR;1gVHq`}zO z!2MmyQxMN{=~-2pwm_*Hz69@|hgm3PATHJQkZClEaq16l3Z=%^tImIZg1ks~0uFt} z{s66hX565_?af$q;&@dCz+X<7ka#9MCprE`!Hl=aM&P{&Sk=Qo3>u~AP-qranc4w{ zcotK)K(FuvPa>s?@^jp8u(|V&zmk^ZR;q<;?_l*sJ`4=`{?MRO(^K^?c$yjtR{}Cn zbk+(-3=D~T1VO_E6jpzAyIkWrA(*^(y&CKDYAFOGDefCiGW6{HSfp zzkayJQ=pCs$wJ-8`GGx9Y|)-MzqFQ)(gjnn!FEcFjI@O+e4>9ZM%IncXdH-$Jq3fg zGp6m&5%+?!stdB#2tA@-z?H#2P91^SdKB60S6rodEsE^C!GUGubr0Rzl$N#vch7CB z%C-!~8on&3A8^*4tp0G+*9iFwTOw7h+uX*zE zFjA=HmiZmGe=^UJSR+4mS5U*?uTfC)uuqfSbqp)Vhfl6pVof}qA){DA2i%t?He#hJAorN=QB&HnODk?&3QP1SvGE; z&H}aeLVMy2XNu5xh9KLM;|m29HIGw83~5#FoBC862Mn{CB9cKyvrIn7r96{MDw1 z5(1v#Laxx_zt~=(N8^p`PVWZB^`L=88Q?~q@P{DaqYL4uI_gAELl1xlZv?z5wmXp3 z^=w_SI%J+lC*{lJ#5e33M$j-OBCU`(C+B|{xV>Kwv!LJv1oXE*5_)gkw>UDHkUoEb z4Ja`c{N?V8DP6FKLL@so>9({}8fO;t_cJ_kQMEwo-O_X}(n}*U`ZVngpEFZlc?GZe z5QwdJf+k)Q@)eVLeqr^z%K}}WR2T(ULXZYV3AU{W0Cg^sK%zYeJFg1@zMb%9K;?hz zJ~1x-09SQ^qh=l}sLGq*T`_pAaUa)Fq(WP_mKGWNjMturXevwvji9aVm<;A{lNz?C zdP4eo*6{f6HHzH^rtV<&l4jI2GEK@S0m97vbZ&sk?Cn1!3}=T0aQ%!?DSoq1Ea)Ar zn9P*LXsQ*!Yqk|~h>lxH$g0L$y5)bS)njw?o<(GfiDQ;s)0dWNEoR5eW;~^kST)QP z8=zz0%UBq~a~f53{G!WG;v-hD`5x^*xT&rwKTn0HL9tpcfZ40jJD`S#@)Tpr$!kjeA&D30^ywZ=6O@0%HkW=0q zS}M!bxYVUb-k!9f6}f8#UVz;+X`xzW2z(JL)T39N&NmynxMSVPbbnMX`}o{XX44J@ z?O#<3aXud5t`iJHJp@hPKbC(5GCN*MUu=~C=l+?N zQ~4>blllLHS*v8fv_S{tvH$GU^j#kzSW}o?Qsc9{^D)1aIXQ;wuquSibOpr0s(fM$ zD1tTh*3d#Y7;Ekit@!4R@{IEQbV-1xzZm9RnLj-C@{-(o%;e;R>S2EZdEKDUJPG#@ z4@!!EtbJ$I6bPsX5<^I(9`hzzk7pbB{E5nuldhvW(EbDaUJfaM>+_SpKH?O?Bl51i zApkGQL>J3Gffw#ah@|smpv88&#D=~4VF8WWH)V&5C5CeTJsnK0kYd202U=wZo(z%S zUDs5QYx#D+0sw?^3z~li8}gzIBdT~Mf4Nig&CL+LLN~9Dl4aTku9k>dy(TI=X0L|U zY_We3`agZ}Bf}P9<7x@_IaLDW*+HtzanpX2K8%sGxfbh0N2@k-}IJDPdT`4!P1)CW0wxv z{11!V7Dm1%Fk*ksX5Y>s6xOnjIschOI~Mt@gXa*+UEJOj`OwHU-P>F0Om zqxa`=D=PBOoES(A&cmc!v>+HIZHp#`gw$kg~~z4yL8A<6!))XBt{P? z0&}O+9}jk{7DmHb2w*;Eok%dA1paQv`uS%N5u*O91o8Yw~r1Mb-1PMB_k`-&hl zWLq_hN!7ory`Iw9gk1I*M`>oAg2}dcPX}BzqiS(w1alm{Y4qVMv|25gc~&Qbr4mpr z&hQJXubR14T?hCz6FdI863DA~llrTcwA(Jp?qh#dl^y&9;?z?tFqKW(UOYp8AvOx4$73YM#X13eQv4@wA9_Oj|LL4Gw9uZU5*yNCB-;EB zM_INwn2ps?V_)Bq?vT$PqEIggn2;7fG?0J4`=p3i>>*9h;re;v4XNJ3a3bPx!)?TZg8poD;HtCMvlp1Tmd7{q3LJ_4_zBP_(|mtp zB1V#blwhf1lx%8pf>T6bNGbm%cj~{6p=vsG%?Ag3l$O+hul3lKm%3 zmVb*Uk}7nZDfNS3g*C%?C!0{NV%Y>-&d&tsq0#pgZt6d*x#sI#KNBF{|A4vz0|(> z+6uzlncD^@#^$Q~xlti-jWAUc4Vo+j1A>bih1{UZpyIYbRK0{>B~K3yl>Wyl#8~0Q zqPf*%)`JU=;Seb~#V0)k02L%Iw6-oT?S6$-ypUyQ=j&teDp#We^gNM8GRfH7)~<$J zyw8QJ8+Lx~OWofrKQ8>}E)jpz=07V&g#qh4%ZE)u)%Jp0LU0Q#MP9@0@B~R!XQkx9A#}TshM$;)Hp}o^3hyVH_;v+ue z1Nn?Zyk_iL{4tYwj0f$`6KEc`8MXmom0~UYAf}0@O;QrOVu5j|Is|{Z>=&tij&n$n z$5QWQys~D$w@hpl^7U7ywax~Ayw;`ROn}p9Nvz_6jDH<^Eqe9CP}vAjXqRle>(z(Z zsr@c#pV)!u`3AX-53*;>#6r(JpT;7xQeaq{kYk9P?H2qsN$De=S%Heyav4OsOdK!F zAg8lNk9sR{(xb_}hL?Z3j~|0Hx_agR>4-hOpsgRsirFSZpzdWMO+dyYPwOOXb_z|u z-rw`c&)GHyz$QE_i2wZc2aoS(qDrUp#r)vv;|DybW;ma6jI_sxWGJg*CjQX?j)0jb zGR!SZMqywc6v~sNI9k~hcPnt^UjFw-wRnQHO~cs~Zz!=ip(1}umDa=m*qoqc(eyV+ z-Os6W`K^(V@o4!d5)n1gJ#FWu`EUb{++edR@Ot6c&0?^nFj3gXYk422y}woc#S36d za!ve|Eh-D^;*u|&=<&~fVjz&z-U?F2WD-?An$}%47vvfz^HA%fGBDKNa+r$qMY|>_ zGUG?;uZ`do44!|9`V-(3-IZyD?vC0WvZ%VLgnfZb5&&RzaZH_gj zSHX;&z<;;?AR*LRJ^yT6!>YMQ87Wvl0_JDY727%6nv4>j5QCxbYrC>1+ycFCx`9|$CiBGwXM_{NG zP&QJjahAM)r8Kv&BkFcZ-F2s#^7E0VEa7rzQCEMN5&v&My|;IaE%a@TL@;u%t5^Xl zWNuNGjr;R0eymz>l&J}nw)w}xj3SrM>6;H18gF;_Z+vy6F&W34}%7G)D-p(DY^#lwlVnhwVS3Sd&VW0wS0?HgbAA;irmOgOfIHuM~H;NnhiV z?QDNBev4#gi~~0333zBGptv4C7N&th+;kL`Zd$8=BX%aCH-~?DX&C2tHX;fXo(UbF%jsCgIU1pZktX>qPgckS()1dtpx%yd&d;_ z_$VvFL;I>^$N6Y^c;p+f(=oXM{@X=dEDwM5L~91EZC8BxPYRg}Vx#RL$Q?|EVTILh z>EQsRQ69W7?da}cc5VMbx0Nj_wbZ|@>)kZ_XC3AIpwSc1ztqOvar;=&K)<}R18Tdy zZyy!EA^W+p+UMU}Eb4ovY6BT+4lld-UUi=jXTadz{OzVv z->1Ws&ZEwV8MM0W&kYxQc0NxZP{@Bp3q192>bnxXiV!O#DV>q_7@1QzeKz#1&x{xJ zPj!5?Mc0NGv1VqBvI4OCC+opcBV{EW$J-Q7i%*J{w`OKO z=Jbs4gzo_h9~?BQ7LSA$`?(MEmhc?z^&_~&z;7A&Ii9cs5~8>b*uod8^HqP>dHO+Z zi|S6sd9^Jpq>*r6A{f{~D};X0DJbxkBAMqA^h&ViHiPGmP zgA0nQtbP$e_XghC7Q0dH>EFVp>V%$f8k-GWDk)a=8fRIKq_ zVVo?gT{lk|K$t7@QgeW`>}7xS*o^tKUzc-j&@Ukzqf-ZN11lMZFKv2N2pC~)Rqn3; zxV3BWLEhCk#15h^PNd(ap?Erfd=`ZB@>+~+Qks36MW}N9f^2wL%GOsZ4!~EYU@awO zy;X4nuPA~A#rElyJkeiF*y)hnTIh>-najD-mZ@2m2p-gWqUw1<|6G5!J-K!{6-Tr1 zck>FGEf& zScyw*8}a`iHe=+70lK24@d(VQ-ze4uPm?hnCCYt%-Ech;;oA`!if@XV@!S{Ta%hSe z)Tf&w20O`S4lIc2gob}WAeA=DkO^adg{Xc{w(?5ayRy zRPn%u1xN{LL}%yu`XO>QaVW~5t>;GX+5y>{{i?8%C&7QL^wj!QHqmvPjO^*!dD)Hn zr}`dOy zlfrYBqo+u~=x&opQMHQ}N8wcfV~!QbsA}^;#+8BFs8)|1%V0WGI0~z$E}q~;o*|(z z*Mm13_f>x(ieVdsnw7Vt&;mU#38zprCb)c?HVGTU92Yvj@(2BW{XAe9faBAEa8eOx zDZtFs&>PD3ZFxojafdtiTc)g{c2rgolsh0wWx1J7{Pp33tP zZV|=(XyhgWV4AH7+CL-?HIKY3rsh$DP8}v_(H8<`Xb5AY*NzhBnW;>e>kGCwNOqI* zdu9VE(V`DW7ca7uHupLWarmyia-C6|882q$)^pn+*b5isv9{ZD>%c=8IqOuP0r zi)eqdGoLs}$a4uXjFIIDlW@5y+lDV>$%8D*d(NJS&Br>1OD#ji6G3*5{XjpGlYhZO zsV@KL3<;a|(;(&f(4#-p?nzTnXGdK6vwQFRQ{@ryXI{3PQ3!G^P9f15uzbolWRBqmps7iP#=1)G%`V zgsz&Kkhj|Ni401`Xeg$5iryWYa5yvi@ZD0gDdYC>7a>fRAz|3XMvwl;K=VeMM z!P!(s@vd6*Nj5HLfL?ufYDv5J(C=VdDUj(MbIzKVB-secE~c(zs=j%PSw!{tC<%Y$ zJvh)`fj2OyVemYY;0!&lL@eJg^44q_o3!2Xfo_Ql2dX~W--`e+Xj!4@ zru2?e9x$R()zXD^a{TAvQp)n(@CJY2lyC6)m(@_ph_|WuL%l52*9!E&D7~ZF6-RG$ z{zhF{VS+zD128VlZZTo08Qo@I4$WaR~R<^*^LCu*J%y{O3%g>q@V4kit@WHB6{^o)*KmM=3#GpdxG`VN19n4Omh zZ7SmaY^i29q}Lf_g+yqpLww2gU8`T{4B<)>m}DH-!172wIc=Q$%27>ArSME=_2_U$T1gKpGpzug)sFzGc{fo zo?(4X@SE4D9-|f;wOSrmEd&C;*a)B{=sz$7+?-yzg*GiL5Cml0WIBH_d6+%@9@LE{ z0iJwYv*O(f_nLXam>GHJA2?|=E=;)WdKZilMZ`mCJm6Q5X#Vw@1j)nf6Oe#wVVt88 z%+ zYq@w(F^otj+!pX>N?(867B`pEE}1!ca>Bs(LR&6*oh)(h^tr7VQ4wVUW=O!lao6dr z^XH$eSSHWMLbz!TpCZg%kP9|0vddB! z%^+|!QVbc#-Q8n_!~5~=X%T3l#v7Vi={I;c>H9krrs?@9siek=Ril>>AgL9Ozi;Zy z$lp{2!A=Ve;;(opmuNH_zb8Mmf@@Y zggqG9`;FS#MB_rX3;a{~7m}HaUr8;~i5z32_$=ODtNG#H=^&~g{Z(e~;Is4vE$y|N zoj~;Noh|@EK)t`sb1lx8yVn^&or-WpTVD!5- zPEFIf1a3m=>x>xkr~2x*f?GBMW~JHsIOPS~>!%<8M8!ORilMr|o^N8d)34SHg>P;E zaKcXO*0rl_>n+^^ugkm6@^2+ahA~BAbf+IhO`|I^hkNm(xdL5mY3tf>NSvdYUzRD z5Nf&6)qWvqH24(MGo^W{jRqx!eYCNTe%ziy#zlaTD?98Dyv;x$3xhAT@F*`8rqV!! z-1Qz;hkSP=E%dtNrtIUnc0({bkVeImFDK`0Xb@df z=;5{rIIz8aT4CYn#;Li8Er%4G`&q04r7ZfwI68#G)ZJPO3oIKZ9n0sitzHYiJ*yRB zqzD&^qw^&{YHU$xjZT;csem3E`8yrwaE)2f!tCwu&rup|yYiBL9nI&yE1ZL50!{55 zzp$Er3c#4;)#=4bW+e(vKGKLot*!cXYmAZWOt17w$j_n`&hF4{^kTVv@#Vdvc8^-& zfg=;9ZL$(=e{kQazm1_Ls{@;w*3m+^$ZQVWw?GFfRQkd@yIm1Nhb4Rl`)a^!Qr;4m zEYAn4Zxa4F{?fa!)HQzFr{{qdZ<#7_{<405M$6rwZUYE80D4R&waIS=O3~#MWKF%N zqBgK0;FBjd7+K<@QI$z?J)GQ0EdTec|JJUI6$Vx-AQ5)8I`^oYHV1isbz~&D zltYM(85bdjhyNBH*(cXZ793U{E-)=^4}%fD_5;2N63l{^Yk)5_nSZFx#g~qcSC=xW zPZmFyO9jD*TxmMe@bnk_W*al&H1{_B@?W4#=%Mm{&Bd1;~!>5vonjoe9e`e5xA%oN2mkZ#W$O=)gO4W|yBVeH9g6#4OJZV#l=H9gpw@lL! zEa|`A27_Y`TCIp!Hh~JCW0G)%f{B7~H6F3H>X^3~H43=)!B!#)xdfSihWg46Nb9cy zGjZ#1HTi;5j$v#KMP>U|YCf5KgGMNx<4Dzp=`&}*% zX0}8OpQ=a&YWC3X8~JCPB^ULH=DgNeP5Lmc!AqvE0|v@<1j758YTc#b9ex}}<+aF) zNenHgx>Wu%MYQ8a(Y@uk9PfvzN`~AqZ@>iOyqrEzeI2-R#-);fx@haIgC7FV2?HC1 z(O^ky4G7{%_N^d#Sy~QKO=`0$hwJ>?`=@5QtN{BkfQtWiklR(10tBHtE~P z#Ie=}25F8KT^OQ&#pOpPXodRQ;Lczca23(rUpXO!*H4yd)GA2OOnim)65*25N+&O)=cW00qK%9}GG@qKlhEmVAvXMQD7O+VF*_;-k& zLlg9GiwkS#GC?~vMe<7~t9~+(*JDOMq^)AmbUl2a^rWJ&?<}+0y&GM$82)Pjx@9X&7gKGlt&~>=P{aCba%J2A&X!@^DI9UycB@Jb+Sx zhp?q%nYP#w!r%!tT75JX0Z^=KwjxG3Ap2q+e?GQ4EKozDGPf{qK%Y66V9IRAd7+boBut6b5J7S!20CmxCXRPw_ zJWnitgJRuzb2n?IE^>aPdWUcEK>BBMabpBw{@$wx$>w0}@)Q)1^u ztdZNF2!4c4Q@!=-KP=xt)?_c1O=R1``5PnfG*aydPA>eCw8$d|e`p(ZW@pj!Sci|sP+g#wa&WhN%$O%OV z6TjICJp|ydIz**S9}K*Evy-9#s>@IFI_JWfA0!{gB*`<`<3}jDZC&Q_CkWrIY$n-% zV#5^i%Opn30o`e>x*$hBr}u$5B#$u5$}J4EDuiUGcC9IaU*8I-Q(sK4D>tuq0k-bb zrs@70&+fykGJlucb5|*VZK#sT1R7qQFl1Aqb(PMC&(Hcn3HHg7+-_NGmWbM*2l9^| z4%adY`CkGUPlfnL4lt$iRRg5utO0$0#bLg^fqzG)g*xKbjj_$kKN)rz)5=?{O};u! za;d!&MSRde`5?rcy*xcNz437}9%700^ueD1`bUV+qnLDd(3+W`23hIVGWN#hyD9sq zb(!YsxsAXy2T2ZN>M@{`$O4M0zz_ zyE=ZSrRwV|BoGHTwkAS+s~e`V{Z1Rn_O-x{ZF70jCf3W}cM?nC5Od|7Tgwxb5%S3Y z7jOi=Gx?(ZQI_e7Nj)l&qFPJA022whwn6qPrQ;1Q!8~oGvoS>=mL@@>cF&d;mf}7Z zTFBx4D{Mfx-E#keG4*))pDVL}zz=ZEM*FbqwSEoTVdISUobKk*ihJu1N#cS=p4xl@ zk><}wtpA89PFE#+ywlIy7jPT&&ewb(^!lV-nw4X~Q`}GKxkb7;arTJrl{Bw1W7uZ* z@Zb~oW4oTTIbG5MK9u9n!LE)oZy6E5n@{(Rk0#h|ag+uVvB&0*D8OQWo0FIcA+Lg* zrfnwHLC-nOSkQ20rSGkwDd=j9hUMjT9bX5rcOLNoM>NS7+uU!@|k zv4{UQ-b+lPTcm0^(dDKXt;K+~VKyK%q~7E2q2cY&OGx>Q#tg`7x`rcwb$; z(wN;yAj}n!LDA^`=#16XAiy_Q-fzm0j#j$%l9#6x6Wv~ahUmXsoET3v$~QlRQL*a+ zFUN_48#)Tg!pC_sU<8tN<{Zu9gz)M0ui2%zuWwFR(ERr?3V|V5R0h{Ial;qjpf+h; zSueBDbws{BvPj+(yYqP5+jS^qA1ckVGVl9#4pG4w1(~E&Q`&>}1I@PsA6Lj3MfoN$ zpqyxrSna2OeISsOXl)S|jn zK&8s58};9&$Y?UTx)lq`5AYH9e^VNhrZY%Xqf9Zxw_F#Efw|fqy46zkg<~w-<7X8M z_@%wFWI3849#90=tro@OI!OtlUHYCm@PI7&nMBfm-eo1)HJg0PH2yHw6pf~Fy{%+h z)*EF1wAwSvcGc_}%?!DPPLa~!O@Vt-6%zAAG_ufxh{=j%OWQwQ2lK-AZph4%Ia zIY8HcvzqlOY_8r;OZbbZ6R^S26Qb7~U9P|jte8m4Xx_0}X+7kbmL8HHJfeMbu?kf! zR#Jn7zV%4VMC}Oca0Qm-=-)25O7`UBUS48AQ`RbCn?)LcfL*ZSJf_T?ow8oR=Q;1< zZPO+Mg*2j3^bZ{DiLzc~NbjqZ>o5?Tr?Cxxa=jNzOEg1&Hx~+>7<0w)rpNct=CazQ zzp{J1zI()MGANygD1cJr-i>4NMus!0ce*njZCmIX7Z>+pr;n(mt>5IDcKMQRef=R5fdfN7dh+Tz?&?&o3XLhVuK|O~EZ8?gIquHw&JD~&VgHP=AEH;%O z&Eot!C2<~$#_Ej(@EQIKElkAUmU>`+>@RMkn+>OjCS9$+!=^4ERHz9GW{8L={(_Qe zWmxo5fGgcfJ1Ac?Ud%-j=pSDK96pr?T1Tg=X=I&)r9sg&JU8Fx@6cVP>AK_NXoS0A zc3vV6MeCw>`o;(g%KIt}dd_yo8T-dE!Hz4k@=C4}ZItFnUtx>hh`yObrhz7ZFINf8 zR_v7CSzAqn)>Z5TOL+5f?jS~~AnQ>*8+fdX(bCYiBx=)-#T)|jH0r;hj;Ff=z-)4k zq%5s%#3m{~k2Wgy=#IJ^dWYiu7dzt6*z7K5p~TZ^6# z^VS{iKq#bQl{|N5n7eY$u&M;?V#g`R4se`>2;d~t<>b59I1KJw`KLLZSYOCMTn$fl zWOi{D4yVxY+gDqg`U}c`#Wf7ud5nwcmxrtr(h^Z3E)$P@7x(AULzAN>J~v1_5e`m+ z>N@0>m5-{(2dL{%Mwl^1oVxwWqXHo#EOnZe{(ahwi^2#$GMq?K;9P;**~AcxCN&6p zxQVhxlnV}XTJ~)P7=UoNccc_z!u|PA3elikaRk^Qo-Jcpiei0#P9fZSMHtkfc~O`~ z6X%x)l=`}WGxE@7(|LJ={if{tL96sVlYGw#PdDEb5y`!hh3v?W!lXvt#I$ZTzP?>3 zwH&UfCuvMh{#*UnC>P6H!p$5nQZB5DPrfzvsle5$#2*09Mi%A$7l#p)jGLxJ7Y?}l zTdYK!wujTPF;7x|wW^Rfe{1H8-t4q?VDmp9PbQx)q1T}`!G%fZaT7JX>|@F+vjJ_g zfe1HI9k4J4$bi|FukenD`u9gQ(6h6ZI6TYF?L7!TpUQU05wp})O2AL_t?$>BbB7;I zsqOJs%-)2+vnWJ28%hy*6&v$e5gACTd;3?#E#u*=Mh=F53=zJTkz6e-ij9H|s9`~D z8-Z!3H&c2jIRX_j!W6RAcWm2I%j+EyzfG|%_mf714Q8aB9EYy(MTo^Uk5SQ?|86%^ z;M5`#_7T{J^T%FzG`W76+rw9p56lk&^z0C z`JN;#yP`;cdURYKuICGhoy~Irgzd0;^+MNv%gbQT0>Ah8=WQD01>dQhu1cZmykf1$ zX#$EMMB{n4!}(XZdX<+Z2L_q4&N$un&Z2upM9?ie1txpU^7Ok2g|1Dc0}~3PsJPc7 zYfX^(bI}*67j0L`j{es8xsIDWqTb+@S}Y9fu2_+OPd_ur!TsxbKZE> zoY*K;5P)DSqJyWcRdd`Z%uogDvM%2`i+52==WXwwLRjK){_}{pNLch#J7!Mli;sj* z`Ahrc*PJN^o`v9H{0H@PT2dx3+e&UTDpQF&-X3f__D}Grx-btD@k-BSq5?vPky6oL z=LS)KWlX7))c0rl0_y@eYY)g@#dPYI>Lz>-AwO&NphQxaK&uY8vo8hRsHNC10e(oSsarYstI)9cI{Kf=yX1Mgq$@ zfZF&)K|LIzc**cD{9oG&)c#vDj5$UoK za=ZfbEg6|I+y7bPo!pjvbZMYdhSWx=MxW`yfREry`z8mi)OW)FeH`&MmLfA%NJ>EW zpx8kdD9Cb3^ZWQg2>%fHui$d*4fc z!RbAk5FG5ou%&WK!^(AU{(49#(Sh7&af8K5E+m#|ldsEXnVa>>vu_qrJKA`2%zN4L zP3Epi3VG-J26Pgliuq~zr>o{V{_Xdb!4jU|Mv*F}o(irSktlBxN+H=o0k9%tKgvO!8=#z#Y#11g&|5cdA#rFC>-kIo5hv5y9x=Qq!HOJG>%(s2#5AB zw|S+y89-e1^3Ou@0}E7T^Mz%Gh|Yr6e8V|*d1tJC9W7s~sRyF2$Rl9C*m#(KG}dFV z4LkW2So9Emk!;t)66Ujv3qkgOP2m%)E&Lv#CgGA4Q(LaVlR^Jjct5J^9B_v;5|!Q3 zL$6lbm~QSOuAd$l38GZQ=6?Ei1BYhC;20@#@{^%{Fg%nS!98_wF(`mUXtJ0kMe-ahR_Qzl`4R)Us)>nz-S3J08bglB3_Peiq_lZM4x6A!{}=)wEt7{tM14F@ zE1*T$7#kEP{3{lkwxof3=K+p4+JZzAj!?NQ>h@@N`94}(htiwoF+spWdIc*&f`>gy z$R4-9mwd%{h0Fs5aVwT zJqGLc6#)E8M7$D#2oz=q1R3!>nn&(h26-iIVw`Go7w!kHw4lZ_SWRiltapoiOK37A zyQhec_0N6f5P#R2M~|j|uSl{#_%NA8Jaz*u_=w5=vSjev7q)BBw^rLb`%tw1G8-R7 zk2zSV{TPWj1+pP^i)E^n=;oSOk(sV6N4)9ZPhBAVdtvgjC-3QmpDmX@>tnML7p%%Z zdzo)|+H0-8cCeP6O76B zF>&fEhY3-$>7%Qo-<&H7yZ|KaW+(&Ae*#BU`ntkP8+gTvnORqwiBny>zA2#!PW7gJ z;lZ*Kr9BkqjUmtYKmfjJ@V2QAJQ2RAebeIT#K5-t@NY#%7+7hdi21@as9wGul-8Mhp*+$9)j>+GlZyAQ>QtTa^%GvW!v`t$3 zenLskB)e>XkQ;*Up_uk^*hD=aB?<~AK=@&_ad0M#&e()URS}Fu_{K)|+U=zAfl@8) zobT63SO789C$UwEDGN~RnoAx(X(}0w0H-;{Y$-}kfTq$)zZyi$eW)hO9sZ8X_^XGd zf+0T^uvRD&^noM|Zh^kWt>yz;QbC1^5oeR$uh{y3S^H~d-#8ebCT1Tk8Zf@TI3UqY zH-(h=pojXt0Wvhi^NtqdrZjzu@J7ZpmBqSc^#_Giyn{Ybsx2l{vf3->Uo0KbFmSHc zk;AWW+M^IT&}dWPap>nT`Uxu}6g^A4OzyJZ>rsen_@u|;ZjA=Uon*>Pczpv#BZsX; z=3*{?k@_eW93;F_N9gJ*DBlROVNsu}(VK9{mwwr3AWNzH`!z53T-%fQT`Avh9u@d~ zM3Yz3U>2Xt%toz%rDzhYpw4v%3D_~oKo*9zt+czKdYYj8m#rXe8-LH0W?prUP6fVv z*nuxX`^*dkmpwTeby=rnQr8Mf63uCXo@I=Gz}%BrrlbG@nj&W7l{$(z0P0Q1{+EUk z^~#9v5qB^y+Tn=b{!Edf2KYs%OXIT*9BDp^@E%SI$E!^3K~QJ20xfFo;|87Ls<-}c zC0JULsan&E6ja=tk4o5y1PzRc8+(`TgMrR!(NIuR!l<$`(uuiZkTXcOubDYzDhs`T zsIUNyDRV$7b`fc=uGkYxUV7TGxzKH~zQvh>xZ+)hpG@i^s&(KZR80_#75S+oBrB8p zvSS=(y6VSkay5+8`6-vp+!xg5gdsM{Sd6Q-t3M6iUo3|FDTWGGHq{31n+TDMM7Sg_ z%byAFcGJ!NV;Xk4ggj;Rh*zX^uE}bDh)b3BI!o$!?Rf@H=%%U@n^j(qIMBVdd394+ zBoF6$>HTj@eb5AxWWULVYW!7l3gvRxv#nUtYM@dN6h(Y~=jQq(xoG80|30&tx|-6N zwpIG#gRc(J>5^t{l;*QlEkr<3!)*ADL3>w)97-j$4Z4j7&q|3s_#sp2k_8NZ4ka=} z5^q`lLo0gDBpeuhR5=vjyb|Lz`hSQZJ;qLv5TWF_w?y6%)?EKN^=PL{k?E^wsfx(V z+3~Qbx2?%rTZ6d;!ddSW7@QH$Wy|iNhk(sc4-Dcw9KlGPiVie%FK8Z3;5M>zB(gF_m!T#|k3u;cW{0J3zfX{rsDk z1A;;CE4K@f>SBeGGBMAv_73>d4fh^Aj>H^5o{Mp{O??3 z6egnvnLJVg%KGVlhPy)M#j02bIPEl33D=uvWP}3@fH#QB73y2ZErW4@x7AO{QIf(Z z&i-@%uZ1Mu7wojQQvK(YOgatd>SjzGGJy=Z#YdC_|@wCs30xE(6c)@=E9 zcNYO0o+;5u{b}t>!l7e<1G9Rcu=Kr{LLzypw^u&nq8f#N8A+0xXNKV#-PtDAwP-H@ z6Rg7DxF!zX6)OLCW|XM#2bs+GuKv4h2Z@4k%@CK$4nOPm;z59T%O|HWg)%{2m(69$ zjS52>3ar1MZTiU!JY4*A2=0`?Ey`_5l~U^jn0R4pe%h@;2&;~R1-qK_4PKKZsB*Rn zl|q`fYqffRhH-Z1y>Z`^os9^Jaxi3w0Qw5 z&$%-SPlrs0;*2+P6v7pRczK& z8-KWW`o0;eUC^NL*534u2@m{dto4J`w+S4*aM~37HflsPGQpYMM)?3}dcuU56;-jVVUrH|Na&+X!~^8`CwBU5IPP z_T)pgk}J4EXgQqKrnk?cWtoUFD4J(oo2yDnvTA=80&BhH+yduM3lZsh`h z|3=bnb*t7p?$rbLo%wwOZ@%&^Dm**q>B35L=m7o^36^=mn$cs1Y@DTZWcTQz7FKtT zy0+1HL+7tXXc_0W3LTg~hb*>j3M`Di@7}j=-Yzsv()%jfd%@6N-TJGHto%OBFMP|l z{&^mG3r@NYe_|4k!;uL~iuBYm`M-vLNl^kRYnb=bYJav^n7qDX9q!Ls28waPz#6ixr` zKchrE(i2IWLd=4z*SRdEX2rZGq{w^NlyD^~Nh@*UK^W%9Hu=ak(WAKx+7Od7{3_2d zWEdOMMf`j|AeoNnstg*ddSKl0Xs+aY^6XpH=ZBmmnue*~RnkB#? zq)B&iVVFS2yf;}$NON+4xa@od6Um~P%NU(+z2RddY8EMxBya(p(JiBs4B;{Td)U``z6wd{*FpW00ky1$h*? zNMRn`e%{}oYm;7oN=!)xde%vb#lLJXr#OFHSA$YDW4YMr?i9Yu$bcqyJbs5fr=$d% zW_9$s?zg04&uP{^%I6|a6vSXbEkxMHy?P%m8zq|U4*~~3kS3H8+1q=sn4l>iLe%p0 z!Q4M?uEeY6@Vvw>u6v$;EmS=Y9C_|fF9L!;+=Id`Cj?_cRTA284lUw0o(q7tPodwd z0p~vjU1?>2oo*?dKha~}kZV9u+$;pi)z%T#)$fn}^V9`1(Ta)ByiN`J+5Q*AQh$Zm zeDA6?lRgMZ#ZF&&r@CxIX>Y_U8^fS-ClYgTppD1-usn)S^R<6}Ttp4^AG+3&Ug2g! z@4vt7y<=zYf^@E|+&ELMn$Cz)M9p`x2019611gA0Fgp87y`3T+F3jxFK$=RpBV%37ZTh4n6)|#jYhmMr35bBXyzq zz50L8+B>ntKOsh4YO1erX+t}-6j;DYMZO|cm`n61BsWvd0RO7oX!sWK@LID(U>*E) zM%_dV9+MQ?IhZf2=~I{=jD12QB2-IH77b`pj(BjRG#&SUNGW8RFINMl(D>n8Aj-#c z%Ce%RaI0z2RMzW4t3c7?=-3EgRRS&br#KDd=jfL(5q0%!{A0EEub~3-QZ5RaRz1#1 zL@0CDieBV$1Cf_Q;Hj28I){{78ip37o;1i^Lmfy+k8m@7cHo&Orw4ipS2e#QkejNd zL6AZT{@&q#kUEe0%Ran!smbQ6My|=ZHU+#1mtZk8_}bpc3-^9ffUB=D|98tvXj4#i zh|a1daruB0A%(#L(VZMAe6j=pbMlY)PA!0Ed@yO8${@(&Cyvv5C0KYu-Tm%gd>)jk z#xqXBB+Z`N%{~Y%#yVtaLM%VWXyDSWA1lLRf@*$$HNFY1n^V0y-dNh!_h~h@E>VU~`r4rJG11g!)GE}uWwE62tZ&RSPh`Zw1ZDku-0RS@xJXg(W054!5V;hcFtd;Aq3B=k{L7O z2{{C+M$AOJ!j3N*?emg5-0H*6a@6ObNV+LIyP%gXLZ`CIJ&}1DD;W$q7g~b&d{kl> z$*=$Q8fI8!+#PLuc}#~jfrrsd`EsYY3YtrQwg)-b1%R2c<&h4-&m{v$b;138puK#Ubv5WOV}MaZ0^fA9<;5PsM#dJVvx~ zDO3oO*8t2b*JpFyUBBx*?q=ZH-)*6|I{10)Txg~aKbJtfxDLF+Wh4^UCcd&B`d{oEG580nYn@bo3IdVu z^WbkqD(IMqtass5sv(g2#MCzL`*98{ULw|N{(t6#U`^1p6ykq}Cr7!E zYa%&N7p&In z91&v`2~Hde;#_%C4nVKAffvedtI_;D6t2}q0PAIM%*@A#;6*#1@)T_Gln~lio2FXC zdw#t;b?$GV&rEw=S$zJCWy%^56zg{A%RTxrL-ZlS`k6@v!MJJ1YKlpMOV%N}d$O>Y z-Nm(ga4J#VrAt9Lg1usYngA)S*STDkY1PmtGjjZ=oa=y;tF<8~?QOOwZGj2XU8HuL z56@ie?SI9G7ownP04`D0RS$0j%aV{uoLNbxNv3MiqeYOjXl>ZpgOPYdZBP#hW;u6o zdVHL>rmt7m8PlK$I5x{u=Xs94U0=AtuBSvYY7tu}DV$bXITKxf`5Ru{C~^2SaFJBm z0lzU4UM&_}%nMfD^OAp_=Rza~rNSo|L{WO_9Tr}@eRT+`3J)E6U|756m$Y$z&&(u8 zq4uHhc9sstlDU^HxAxmxPar%t=IRNDqBVWSMq5+1k*_|b{;%f0iB9i9ywQ)&Dw8uMW2;E_Q!7k)Uru`^-OKml%v5}HdG3}pfG!QN z;=ex4(3ubrFvdQk{aG|@Hm8+bq@hKaTwS$^x+|LfhjWW-vz_Mg;vLWTy zD>HV2SPYThILX53l(n?nAi21<_%nB|sm064IoZM!h*M|M??NwE2#8@RcfQjt`CY?N z{=nALk0kT-QvqUr3REP5%;(of1Q6WQ&k;5_eAqdEV$-{+oFsbf-sIWh1Nvdo!ISh4 z`&X{0!-^~o#LBTmQvc*m6Oad+m={29XmLxPnBM@wNoFqZU?tn{Y`Q+#_tpBpc}!zV z&diTbnLKFZ-cg20x@DxRi4Wnw14q$!g`^J;fe?v-T$IWHo0JUDb3nDA@I+((Cej{c z-X!mTwvL2&_f%QnH>e`?ROgCjExfEDql}>h z3Jq&$&8jV0nPF3EEf30{sdY6}$d=vHpqSO8`LZZi<%^`KButKI?mQlIqJ5|Y*a$cs zB8_HzO3-ja5XX7IE09nY3u2FN;nF1@fX-`wm{-h@2@pgXL~Z0wuB&P{i)N@rwtve~ z(+n52V<7WBSqj_K1l^Z#83}&jL3Su;JEn_B@#u<4a^>* zf@KgEaO8Y05?D+bWS~`FD6Y3XgCd^L0+(0WtyrAI7&*)SM!&S0rc)J3YY?nD54-Gt z6HJxu4u12f4&47ib%@$@9C$6uFz}U1L66>d&aDCQ`8O|>fKQP}tE}F*Cm`Hu2lX5N(2*Co*F@IUUB7>xq><=?7 z`9p)aBHKbw6#?Mz7e~7 z=19z{ua(W|z{w<-2d@R_*&h>fktmKwD+Qkn)Ft7CwyMkNKtD`nco9XB?1%Wf)%KQ^ zGdViIY&`D|ZoYbGO_FzGEhldVIihsqzQSXDQ+q6=GK(PvZIc1an#(9;0h4xq$ zZ{ChJ5dp6%*Zbfemgu}O78Rw}u>lS$ob>b5ep zAH26y%HC~uTJZh)Zxy#PelmuCT+FQRvlWs7PDcLXlnS_7^PYfL8x2cNE}M1?-c#B# z@$kg5@0w5#lJ%eFRR*|?4Y+z7jk@yq>eTK6<>Q?$ftATuH+m05gw&TTv44ui1*Kmv zXNE3g|?pokhJa@T&y=U4+EmqZx zn8)F09vVW_hL{*G9$&8A5W^1&E^(DX6SS!#oUO=(W85 z2J0YzSkb1h7i3!AhF6lx3NDH9yhK$1-SA+`E$#+DfwC#Kjk~}(dg*US0hGraM zkF+qNror1x2JfunkJw3tvlv3HcJWLMA-XIJTaRD^W@Xj|7qh%~uiLsuA-HNP*ZG}y9 zRRO}@tX!kks$|=9E>>xsvP^JLc&j6P-MTqjLjBnkt#HZq-I3;*tWg8E4db5&Vq^bG0xOY{e08OR_!9fP zKj*ed0gqg1GMLJ4-TqC2bxWsmU^M<|^rLq-gKG0=duiBz%KVtu3atgkCG3MLPil9j zcsjVW*L#Jio4W%H2zSy>?Uz{=`FlR%(i6!ma=dV6|3)N=3V8NvpwTBgWU-16L8m0- zG)D}o+7zV}DQMnb6Q%W|Xui#T&AG#5oW@icnqcgiYz#v{Jmt|X-Zd_ht^nkq8tq_H zjnCLUzgshZn2UMni3P`d+(*-eE)M|0EdFKDcgZaLaq2d=qpLP%{w41h?`u3x%_a-? zCDNT4=rVtWk4z0=+>VdmU2VPIJN|P<`;q1X0iFjc^1VM*o5vh0f!_;(RJhKKpqnJS z0pI)lIQH=12E>JT;bTdR$q;UUc(6hqTG40bem5U~UpVF1YkBIdH!Zj#LgErVgaJHo zxm5{_}3#0(c9hfS*)x8-|ig!*KJ^yX(CVw*0N`W|r9A z9acliMT)WNP^d#NOVBqtks%XeiyFb~q#ikcAFgNaLnK698L{ytzgMHl1QnOa-_TKP>bDYo;E3R@l;6&LN-3k2j)~nBd zK~G@`$dR-M6hR`pgmhzkXW(Qf=y>CPvuHx&KtFo)wjsUnK|jWXbdM_&6e~vaL>vi4 zJX3ts9P=`$pWMtYf!e0V<9w2boL%bW6iv*GXC#EQXw@L-wIYtu(R_zVI_X_!`FS=B?d^uEaC-nzQSFEO!_?30S?owQsoVhNL}Cp_Sg3K)@4Nt>W9} z;a*wsN^X@wBiYU)!-%SNXu<#JDFDqau#HFoOyyYeD?WYFKNxV;%)!T9b|f;yBstLU z5Kxo)6jKOSY+y~Qv`%>L+$yurQaY($W2Vb_;;sFcqWYESorn0-pbjB|!!UV&RE_0G z6mZxA(vs+H2qHd>m$|gdpx6M{Jda zEYRWkSD*i!+v6Ka!+N=T(JeVwAY|!{l%cjV&kG3r9X=3e`DFY=;aU9OuW^uX7b7@)id(J=hO_7WAEIeLN1Lo!tIeBMbPAM|_L%0+kD}L&66p%c>B6 zOT~Zx9YfXU4*0bE^?qV34n+XYRKM}|_q_?id4{*j z_onbZ1N*m>S~UEh(32FBwf>2kx=(nDt91^sRr$y-qZ{(JO6ytuv zx+o|^Whc2m=mtN=^11$h@W3(Kp!_;!PNe4%Qhrg15=CF+`DpLVrLD@9ea;&2J6r@g4>iwDLH^qR<`Zp9;?FVaQ!3+F!EdcI52TN7F;W>w2x(4tE;##tUM!)IvuxdU;N@x9*Aa|# zD1&Z)%b9GZ${d`DDEgcn!*D10`RR=&6VpX-G3@I6LAdO%ld|JPti)#D&rt{d`!iBh zrIZnw#tue30Z+~RhS&X%XG9Tb;`zzsXm@!-sRFU+zTaPi4(Rcg3BAkna5w7B6!%*L zCbkP823?|m>%K_LI|R_+S$BpTEgx!hCcEj+M3`-0NMousj9+HC-A3A}D4d+=49acp zS-J)9+9koxA7NI$MKG~9^2Mk4%nom=Z7+ZiXmREbI%n3H2(YkuZcx)fhI@v?fCUW~ zi#>{mTO#xD%dBBW9LIL60NSrK7BTf2=E)mZR1ZaeNn{Qn_Es?rG^69)cXYUuRTg^~ zLg1KX%(Kf|<9J|=Foo-reCe&J_LT;C(K|7uA=Li3z&_Jz=2FE*LG&j-Z3OGSzOvFh zxvDEP1w%e_I#KpU|Ne19r;Pdwr7sIA3N!QE82>ZrQKH7*QW*|gDLiyn&q`!{h<3h0 zozv@oT3|Std60H7*>1^0nXXAA$c>tG+N#5~g(*X%+WW-UE&dx zE`)3pif(gUlBn&Kj5ca2zPz8krgL(GDtaWn2%n0Pg5tHxe|u|*s-4?$r>szX>ssgE zWd!f5C12|hfl8ePY6qC`QR12Obr-SRC^jjHx-MXEXnbd@%Lu+CD7`qJx<#)d0U7O&fXQV`@AM@+E%;pkN% z&h_VIGp-cIDMLk(X*DQF`xPvSMeIndRjCsdZ};EZ8Bs9wakx7hk7V9301Zsf)}ee2 zkXt}5V&*hgQU3vRa4)Ru3`#GiUCaEG)P$!5&@!7@tKNPV`NZcqGmr1%KQp|4N6mq$ zlUQ9XmTnB`iG1Z|?%`tR44!u4(PfQB7b9>)o>xl8?ug?fZ(l>9#EX?6+etW|mc@F= z(lKU2BY5ay{GWE%g`ew!vC?rdvDw-Be97r=R}acq#twl1gr(J(?OE{h&Avf08V34sSY^Bu4Z#Nsl=?m7)_@!0L56rS2i7{7f(TB8gaejkmiHc zA&2eFstU_fh1$i|nYw7;J`=$iS?4Yk^Zi&P<4Hp%~? z>Ly$r$ZEz}pR)~jGp*%}{_1aGw^15MJ(65r3#A8uQsh!OO+Q%>?4;i*`K z+-8W$eLmRgzKbh+9d%(j9DTNK-vmMiHDs#qRzV?_^*;iK#21nzyk9PC!}$gAE9g=% zup-HtSS4*YLR5r2Lkw))f9m2AL4dd0WHC#65RWw|$jA)^zk-s?l&8GOhvby+ zdSWJ~B+uw4IVoRi8<>^`(LFy&G%jVGk$--w=D4+k@0_sG$Izy!!!V~#;m*O-Ef!vx zPXkb$nQpp+drayPxPm>p>aNb$dc^>w|7fy{bN!F*NZMFuw#>_&f8z>i?Wc5hiNCJW zupi6g1lNCB8`w1e`RJRYy&;rKTh4*hO=8==?wYSOzU=dZ)1B)nRl@EPRAKrQu8!v zD^njl7BVb&0q)mFKG0OP4YGs~-@1w}Lo7iUW7*kKl_qA_FvTWfTmqSS5fBkCi*zpo zgPU?mRuQ9Oa@pjclwmb{3B?Dc=O`pBV@C@|3F}btjrx{# zTc8vX77eBK35b!QUTMyZ>t`(I$g6Hcg5agK{50y?(FO&+a5&`|bWM5+b+ihGT$(KnG1Fgw!55UdQ05jB28b^m= zW7IeY+YCObe+m@0b|LmIn;p>SJ}%QbLV8~1DVRWb3<5dXU6(T)fOYbE)#L+f9?B_sGje8&5}NHxAp1YvOXxb zvhZ~0e8qN9xu$V8h-Z~LX~t7_n(*`tV*RLj;mzMIOhho-+@4XWwUN`#|d?P4)6>MKE8R2IT+f0W}NuJt?<6#?E%~mcEC*R z-&$*yf7noOw-@&0EII{pM9)50Df_ic1)s(O^)X<~Y~C)02YdXBerpe=WXg@2WBMo5 z>%@g$vBN&NLG~Z*)@eUk04qs`32vXF$krE#wtKjG8y-9&EG>KF_yjIHVVeOKXQr$* zu(DQ1c4|HsyVVC(Y#8PYA7ADlRS2j(G=gqYjfXPiN`!I%Y|Zq5!C+&)x!B(G?`* zZEqe|N%OtsT3L7?^GJLTfvx!B-RccVB5sh@|1b*x#M3<1%n+RPsFp>={|u#7e+gWj z5y6eKa)MPrE;wBUFJ_aoTyvW>*@3K(!^miOj#Z{MRt%S+OXFX1ESt18t?q+pXjp|a zZ!`crQj;xyDJ-HA+w^*N0j5~Q%|am0K!3JpylEXGY{z%ZS?N+}E;p*16u*=Hoi71F z6omw&9biLwe|8}YwTh!%bHHf$zm_Kill-i2o`uo`(?~tcv596DF$IYC>s8epQ>VMn2~n(q z0Nr%_ixdeoGdquHe`<|{0Zqj@_M=#p6alYb9V>P-7>m>kIDm{{UgW;*uiO{wz-U%D z-t!jLjW+W5Wh2qQGV6Hzf06Hd-bo4*>S)iRNT0vjDT9k+*{3q1fQ&7a&S3>KLKt9!JlQok#1{j3#V!lcM}>cZBye z`hW4tAzNN=xYpxo=s2RuY=f?8R5_Zs*2=l2^(UKj>^=+;77UR5e+U546Y`1$((61% zS12}EK^c+bXBghGQl(wk8MDhQHUeVcz@(iV7JTMvS4r5c7fJagQ!*PgAMyF;pPNk!_?Km>b)_ShnI z-p`(7>nk=Ay?p{+e;bNfe%DOp$?U7>Ei|Ll>aq2P<;1qwnWwsAh)Wr-&%9jifi@g_ zC3Q#|S|KqXhyO6|GVN$>1E98xi9k0Zfy8m2hKm5jVhDHokF&%3C=;=3L^!(Y!Xds1!53?=wec?~g&tT~0LD)%>lC+;)Erv# zsno=vm)MEle`e2_Pdz`%i?@frHas|}!0MHLD-Mi%`K&Z#BdcJ>c@P%-dlkBU9>5q; z?ct{#-nQO{b#hicG4DIAg*Gk`D(;He_aZttV;Y|~E(fH$>D@N$jy3j(10_kmQ>$Dq zZ!;ukday~YAD1ih`ns6zbedc2L|8sbAgY_E2sgPue{-=whvoNX-g*F3@lwc-U7NPo zSqIyk-^3Ub_kQDx)j~LPC~a3JqD{FC+>P2qA3q4AOEZ}+rTr)Rv}eI%$J6WIGYHz1 zAl&|_5er`na%KVgEq4xkq8882MO~=#(wxU}3pb(%CUA?;{CL?*-pOw^imKP{sjioc zhs(hh)@UMEVW)-dlghUCz2PzPeMZ>_K z`%cD_X>r?Zy@kuOC_SwMeKi=vSE)3$d#xw-JoxcytD8C^gPT50tzWeFTQ#&4hSF)wVMj` zt3@Np*TH=Uf$Qe1X}5s&;B4V?p~bC8z?}%S!@z)_jniXI!vA&$D*~KsyZ9sYEo#(< zf0ZL3$#tZ@H^T)2 z_q^hTt+von1pr0_o84Sr-K(K^=yUbd3~#*nC}Bm?pzxtasli(M2R=p%@=jYv*|_eu z=)#_5y-)969L`U~EcB}xcC@l?zC|pofB4PhbJnt(O)PM$!>AV(Z2ALdQG4zPJ{sN! zXCOlpqpfUxFg0~g47U3UHlP9NEYx1aGE!#MJ9&#sEg{TCY}3626ZEQ&bN)x zH@-QCjI{bzZ{8L>34F}9Ew)_~(Gq<5q!l9fEIUoSo%QDJmDF5&S6Y~jZ~-nNjP%^c zDc2p`$(viKc>y5Q7g3!gwDLlTe;3MyldG!nF*s4Td!6Rt40GLKC}gltv!wuahhqwPN!3hPw?_w4#6;49>^ho(=5%7@%JuN4 zMXC`?#V_hW2X|ta^egB~BXed0dc{}cd!FxCU?}@Q{&cg*Yt(AfvB8QYe?RqEFkPUI zdN@oHm4>+c1ojWE$GM_~{|y^Pj8?xZaNo`;V^H75%i#EWqi&9ZUrnF{{v7>xa96i{ zyl5P`3wL-;|DsShIbpchC*i2PAvpVHsKeV}fC9wZDrAV`8XXISn)hiL_oW^4A-6Cz zcL+KC2I6s3mT&8t*+qM;e;CNq9n27X!&orB-ttUl;6WLl)m};RsLlhyAt$dbG;AD9 zSwqrV5C3PoI%JZaN;{qLk zsPJBf^@C6On<~-R-lI6k9zDzpc6yz!%%QGOsHwcpNc|gLwCP!;Q$q;b^pJyV{C5VK&;Ck=jM@4uKB5gsluzG9F8^X@mi@8ILlxK z`iw%OXun2>$r_3ae`a+UZ1+~njYz`%2E+j@lp}2oJNFkiKdPMNJJ`)!V>h5Y0o50xaXmRae{i%GK-`=A_1@f!Myr~R z_bN&t)X-6-%unJ5o3-=O=U;AUubS{#h2V@es%?7aytZfwDD!|y zW{sjI$#f0@BU944&4bG@n6D*z@4}pNPAI1(f#+Hoksq6cUPm6d%4j_2*dzTEA!m8H zA_kc0T~0x8f0mb~*3#&!u&Z(F2Q(8OPpw~emN}&%X`jry)S4~)2%?;!*Gf%@W8BQu zSECubmSIiJ}u9Q)Bm2eI#s?ly>`9wrB;3=0p}Y+tizf zEl6VvCx(3S4oLvMFm*E@}7)A9|;ufwu%Mz0k ze_qZmZJs`@vNv{#xg5LqH{)bK*R*Oz=s+kGqvCKKp>%nw#FSeN{{~0M`SyuURPy_Z z$ag(~2}Z})#yT#llq-%&0@AWuGkM+ubJcDkT7ukuGKg*zcP*Eu!o#!``Rto(VR&jU zJ5*J8LIVB#f84P&cgoCqZ+t@KW4b98e>i8vEA!ZwdL`?K_Pg{ojWlqmF^dHZ5Q8SJ zQ9Xe1Epk^~$4Yt#1QNQ~pqh1p0uPp@gr|>k8J@~FbKzNrm`FktF=*{ zbEJEZ-$A?5?W-YVkWb#1_AYF zwEA27cKfg|aXf+Ff+5$GMEgL06Ul65IT+uF%IWujC};K@q+7W+*}MzQc1J$LMl39^ zl;jNB2fAj=ovk(Ht`Nb3e72{lMS);=tL@>>rz2UNK z-iGZj699R;m6St-Q|>Bs1Jd&PL8Yn@{878`}cql5=BaNf;u=fphvk zJhbcDon9G-xFdcDxG=sg^FG*VfENSTS4Tv5YOpLSHBa+n{gO3zZ$?~;vYmXfc`?dz z2*{Y*E;y@7Zov^K#R8F4f6Gtt?@TVD)h6#NL_s`|oU{n3Q%^QDg+>$S0%(Z|R1|r2 z0x_L|PGHKpC}uiW0wtgR#4}@w`ydI;*5k6w*WAf0tb}XruJbeH&<`OR>_3WaL1Z}e zx^a;kGlB43tmM%m%dXKVFOrV2kyz%EYGL=uPse9501^OsV64)>e~Zm(5F$@xob$Lb zajUHofAU8-k5X9!6(uj_F}mVgXS498phKIXXNj&wBnY~Wdfd}8(sURab|5gcT=p$8 z+0dX+$@$X6p;^v$aex(Ny9ku@Om4_Qg&0dNwbb>{BEf!Csut|HMGL&(S>}1$njQzX zX&4o55^g{x&>nRNe>~5OD*SJvmU@}yNVo3{jOmW?SoFr=uV|Z4nL0IV%Y2{&fFyw{ zm{+7y2tGQf@Tp??;zJIjTbl{R4|Q(bCq0x5%Apoe*(|6G1;wf2FD4W0ARN2OX+;7J)ZY z1se|9#GYHl%Ix`y?|eJx=0c)E4nGk$}*$uvy|W8NH*hD2_CcN1!_xtxray{tfucKr*z1;FK!9_R65s!d%fEF zq+3O9XCv<2f1?6UJ1L(I6a@eb7WGSP_fx!ZmW7q)(U)dbyb$~a)0yG~COmsH$%fdg zq#H2bzVj;wkI6YOjwifVRj_FgN=Tz6=h7pIW;(~g3Z&P9k5eT{PI}?EW&y_y&0;gRZ4s-2A6xm4IKeQMQO=nJHf7z=RFJtI466KCr#9;Cf ztX~bkGlCu}u9WU}E&%h8N|y{BJ-ev6Xzmd166X zz^u`=e~Hg&;4BBwKrWaMEnuHv4(!j$3_0sC*(I&0a&ds3myNo-YV?TtcQ$>_G3A(Y zz#fmzjenuKR*;V&wPB82piX|hZ8oOcUX-R8n+yIg(ipXjVav8&Z7UhH5TAP@v;q6I z9~@KrMOk$fJB!OI$|FxcX100X0b0s>q)*0%e`)nJr7z#+Zo!`V9#<6_E+f^_I8iv ze-X#lQ7ZY{-NK zd&r}XvdI0?2lZ#M;<7m;rSysVIfDP4qVd*=K4MA$y6hl zUYg+2)>`o}@Exf4FY$zM*FH;~?Wtg%5lYkJFcfr6qRmBnyc9BJp1*tF4+o19e_hQS zFF9FEo5$mfg-LcPa}oQbArK-in^W!C(?v^#+iKQ2nrYQ_a5{wC`m$D{i!7i?;)LTWH}seOPo2W8W#}0w$7Z-4{QFtl z7*&9iHyYEVIK2fdtOjRod(g&*Z}>+k%X8_17J{XK>Za0_n?raKUQ4p(eq%JqK*^`8 zL??urP_6CCYOJmh{T2{1OI%U46T7mi{L8TI`r-Jc-)N%)LI!96SW>?gf0m|c{PXA! zT!Wet^q%u)`HmznQMA6i#8OjseUQvbG8l$hy2LVv)AcRwQlAeKRuEr^xbnAu6rmc| zT}#r1#g4ot;zM7gl&PJ6k5ziV$2YpLXDp|98)#tc6}}nrjU~(Wada|7(FlMWe#!%a z4j(wD|1bY~yOwE>h^9dve{Gl0QHt5+iaKC8ejJkxn?tq1CfV-&E~T#ECfI=$>qrb1;U`5ug3EDT-2rCVm+#1Bs z)wX3dswZ%f8LTbE$rFin?4dB&a363QsFAvC2c)4aDmnaArj=U`@69C?gj*H zvGOAj9AaWRZa9{N?f3E>AxhaA{w|jxQ||yPZ!#iL@Rf$Yt#8ayH=tGIJ62{y8fQPs z3j6Z~d(8y1Thu(bj12LjsLSU4@6~MjGU#TbBX^7UAQ8-1e{cE6q0du179Kl}018|& z#gu(@_&E0*o>zi1nT@nA)a@(afYF)Y)#0f{1$?XI@U2FRMZ93|L_Z!Uh0{H_(%L_0>23Y5c;vc^j=upZZJx?GI6SRLEJFQ~-Jww)4 zvZAy$WP$wFe~B6ss__Tz0Vq2S>dy{B%Np6^$1yyvI{L~CexDV~{|hl`_qpQrQo;ut zk_!HGS}ccTv0lxY%c`p?L&N&LV{zZ&iM-cHnDMx~G2@yh$-jo|hj4W{?2Hn#!{~7l zXl@7oWk%YE``VQYAV=|2M*$Ee>~0xf_&QGQqsO{>f22b=Bcp=Pw^S9I%f_-EE$Oyf z=nSO3(soLw1k9s!-5Gs-{a9HdL#s-te^4a@cx}>j+|BD}$lL^Ki6SU$<#idz$mIs+0L2YI4zKf)hXYAyvn$wyHRK%LG;dT3ZwpvNutnr4D`2zz;S9eEqUF}0&%G+cI5-zJA=F?_w5 ze=^z79nW5kjQXWHeobYN+YKR{)u*#}^k6)EA;KdgTSFxlGt=o&v*MsooNyJ@b?kr- z>vrb+G6Z1a6sUkH*?rUG@vu2Up1cym&Y3H28$5K#?Faq_svF~uw=n$?CQ^-1~aE_|_k*Rr`e-wi{j*}X)n>@L#3EAKN?v^vIlvgwR-cvOn zucC%sdC-`mWw0C}&*1~kQV92=Vim@=kG)3eC_k?wfAnAlX?38(FBU7$_@AHf2C;*7 z*hVB{tQw?%*~T2EGe{QYS~KmWIQ!E4vrsdpm$NU1vWeCueRr5Pod~Y}xpYg?e^bCa zxxx(gzsf;WPpsQ)bg|?O5|{7qy*I0~Lm*bXP`aIXYHOiQF;vS+i zKy2m$f=0e5VgWuEHuUEkJXzdFe?VpKm!}Jy%CVPGXZGY%`_#JNFhBYKC!BU=D1Cym z)3Bd*58JG7+Yo{}V$E0pr5<|`?hV&PAl1$)05vf$M&T}^khL?AAJjV9kP;n2@HF~H zpp12^wkyYc@Z2iSLml}-jz}jLd0X(=Es-$nDFlY)(`+?+D;G_3GYQ3gf6~yf+=#mg z6w@lz=I=XTui)a>`d^$Nw6TQVr~l6QkSfvC+q4PbBS>Z8|1CMmFl*}bdk^WRi#0@3 zszdNcq({%G0N;ssY0jAn4b3R0nae2z`O;?AN6UAMdo?+xQs%+v|1wAa9)`{0yh~n8 z`9CVgc1GQi+evH0-y?;Gf9!el#ZRVU8T0o3eWc3ZJ<*IL<_dIy4SR=!99djd28$#N zSGy~xge_Iv1f<>VeY~b&6mrI5M<4z=CYXR3z_VkG6Lz(5&3nByZFuzq`?DdBI+#ur zfQLR*_-%b{ULWQLK$If2XVxEKK44q`3Vwr2$f_4y?qGE;kBmc{fA8MJHTCF+meiIh zg7(;-YL%uM+&8PDldZlpy^JnpV()Y49$vcW#=x>Q2ogi?DFmy2r&X7cFg_%BHDksQAr^6 zSZ{O+lw39s?DUE}bhy~Zb&-Op*2{A?f>c6$pFB;K@2#-xe+YJdzO{M74D>D4(C{G; zrAj!Uqi(?L0GTI5$59P?nYkQgUsJhxqywBX!4hds%x9rvi;4oz~8*o zx+4=>Tw~J(${%Eo3MvUFoz1wT+GaE1?i9K%Ek{H`c0tB5zsLd{K5kq?#B!picyLYV zg7HVRqaI1@erH0gt0GDgE$5h zqVfF$PuepiFb-vYsZj~-vZom=l@Ga$dHGexzI*3>=57**J{fAn((_f-Ga6T+{^r`3 zX;-BYd`-y3Th9c7Jz1L5o^>Q;af20Y2ZJN04aw9*_K6Y^A+=~z9oL0@&>yEd|=&NB-uHcb}NxSQcH1C0f%bq(F zP0jB)odH%x3n#Dv@?e}4l$fi1pO>Ut3R zyY>OB57@eXS1~>M&dDw4@nR=z%>Au7nE~Y&tz)Z)G8K)*s99h>>*a?KtqyX}<=${X zf4j2b7tLcLMY%8}ONPhXwAvCx%ZD0uo4vD-au|ryNFmEUhpsCG_(3*<>I0e0uy)Rn z)p?EUpV>fi&pSJUoxBZve95;J&F@dB&fRAU0?h_VsP9;Y1Awqf#FmH$Q+XDr31FDv zFgu@`GBoR^x&JgL6lLo@896Mzi&_K?Cd<_g5wdH+!3#-3QV zzH0W%{{)=v_XeU%P3daB5+MvK_7yf>p1ye-cI4sI>!gc6Me5C=3C!nFDXTn}2uy_eFy_bWlSiGO2O*f8BCf5uCG zz(QpZ?T})5<7v;45tgahpD}Vn5{E!l2Ug)LB)D(wb_pzsgRnS!#EXiHEe)9s`Uit3 zZ`NTd*rm{=8|&hjDlRB@?*l$BQ+da}(qaWfllSWD1#uRvCpqt@W;V(nR5 za4CXW~ct-CDhipUYX#Qwg^gV5mN~_8wlA0D;A~W zQ4uvxUM^?@7IA^GHv)5S3*8|ST0oPn^6q8zQsBD_b;-t#N z6_U17NVn%wRxj#ff8yFuYDtPImvG-Vj-(A+@>g|?Ip{@(e@aHvGsLn8+x1R?fIIpY zzss0i^Ej?YLKi>PriV4RFTcTWgI3cBOEV#NKTa5FO1|xNmt0he2><9dfEZW>Kv|mn z;>%0cl}u^$?KX%2JOQ#=17G+AA|U#M4~ME%HQVou_Y)_Ae=|(gEMMe;y1Wj-XWW)3 zBhytCVDa=#>v?;TR|0icQX1s9}^Axxts+@w6oY`hM9i|P-yNxKu z-J<&tH@sR@&hYn-mHX6AKx)6;ZspQGfHib-9nldF@}^)NdW87XYo9_KYU|AgKP4js z(?HkongR|h5~C5nR0F#Qd%m)qwC~?{i1V{ILuyVwf5AUnu|Vs=_&sX4 zd|vi>B>~lX+gsv~Yz!CisqLULN>)F7$BI82!i$pd@fU8v?#I|14!py>HuW8%+RW5C zU_miAj)6ML)JZEY9M=U1w0k6@jFFj>Ad}gxG{hu})jr@Fud72K;O2w@d;jfcSW zLnHm7il|w-Ws_jQ%tro;Ho|db7(#tZR_NYVs+YKmOatRfuWeGj{7j!_c_>2$|HMyru!Vzjk~Vpv zAO7d&n<4Y%titL;C1F*Nx&V*v^1Z?x2co%q#a*Rbl0$AiBen!=BQ##V3FzAm)xA-B zf1kgs{@4U^@|B`;?T617z9>GG%^@J&j>2GH1^Rjx-oHYbhMdb{>ZbQoSLG8P{|md= z+q7d%$N)hwWCaXdYEHMbRZPZ(ktwR!dpHmiP8V@vUs}$U&82?MSz*jYT zuby-BJFX<~T^#g3Csdj_WwF7?-j3iIJ+>j_cgy${!ZGlMKe_sAsS=pw&j2K%A4hmH zrA0jQU!c9^oVo<3J48XBIe+_)`^VI*+7Y>&)vks2q<^?d#9)|fo>WW|kvs0he=FXn zJ}KH9jaZXZQ0M<$d(2x_uI(3kRhbhqkL*G*O+}N?v7~i!rf>(DRtWG7nWP@_IWQ0R zLdnctZ2JoG8NOV`?(N^Nyv(BR72ZckInzy?{PEObV!N#SAqi>R3Sv>IxLL)#Z4rwQ zmKuykVE-KYcj&-j)}bkL@7`ENe@9t|fYgs95HURn7TDym&bbuxtCsy-@oo7Wfbuy% zXe{KS!4~{wNurd~xl3!&w!{7}B&{7lEP9ZwQWw|D&iEyF_%5h@;)S%w_2VR|aG}Uz zdLym$IRI_Eh_G20))i9ppJ9i>9{-aEcQ1uodwdquLb$YzaKOV^ z)4%nk8zgn2K7qSlq>NWjf5fHl099!L5KFcG88rKMRjgsXyeSHBkNf(gr7UJKb0|HM z=^A%kE`aiqmRf~+5rFNrG52|N!yo((Yq-LC;e9Ngg2mVMKiuh4bxA#F%Vx22KGfN2 ze)RtdEf#^})K!LL9@KfLH_`vB81k;)8?u^$x2YfI9;4~Z1%1oZf3$~e&INA1$?Xa- z-zeDb_*=(7HK9RACeQcPh&plKA@@>dD*=bDsl|8L7hxWTd+urEd8_=9@~8i^>=MPK z)m{^|NX7SPelYWd4sIKEed6cgvoze=x|CLzrk|UxyGq&1b-h4x&P4UaqjA!tE5&Mn z#8{^r3ss?a9OQ`&e5lKm~&8>wOx79e!&`-lU zlk@#seT1@{88}ygn^?oENeCAzHo#an5H4cA?4-okG4IyOf6Ul5YoD4+9|+udLFXH+ zf1A^>GF+5Kz0KQkEuUv-h9tWgQL$N|pm6M~k=N_@;#$bUdlJ~bTkg(MyctJE>J9bm zwFdyoX6~+$V+o|MrWaJ&!GSE}(%yCN8t6<*=&VSj3X!lXwAaI8(#5x9g!y7@$lToTSkEQWW>Lqe)vqNv;rr{R{Ws2Q6#kfX_d#p%SU1X zX3pwa16Q0`WtIY>3?keGo=Othjuczn2cSx2@~pk$GX3dC@FM%6p`s+`L(;Zm;n+yL+9Red-bQWy@EKXi z34RZ;5HoG3xH;$d`s+?9s9L!7x%HdoNgn#B($hY^kIn3cQ5??R>HIDA&jq=*?Hl2G zMDOc$$(ku3N6t_4SbUcf<~Jkhj2qSBaB;G3{KpUeW4nbeTKf9pgko%GML=eRe@+4K-BJD*+@N%IPT=PPX(M3&Pi^6*YsgFd;_0Ggu@7NFF;-w0{$af*N;rnp)PqGe=+(q+d)A@?mQ16Ujm$?e+l ze+Arb*>G3=tJ`cwBq}OtL+chHwEvz$yy>$UC&Fooh52K2R&XjT}HLtjdTA*9LEg z+>+?}k5yksUAHn&s>B^Kk+RWEHWdmBf88U{=2aag7`9)yiN+0H)%j+czSz}Nbes|a zv`O;drXWrALzToiTgPmVq%APq3?Z-RFVW|qayX;C4)+(WHxqb%bw`#*{{Wk*P0Y7# zmylcH6&hGKREko1fZ{~9!9LPBSt3-+e~yQ0gO}ACtPs3v)&d$FN2QkWY(Z6|f9O1J z^zpMmssh%iq-XAnxTZa#vqcHxkHnB#sw;YWw2h}Zc2&VP^bR}y+&zZr$B6JGW-|2U znu0lKw^Z**$0DL8%jNp1s)HMt0_dlj1XOd2z_smW?<8VoouY@2%`_#)rf018(9l%VPLlwWN0!W^ZOcc7Vx-JlJ^vsphNpuBo z5We7AjsSq~)x_zLCyGF_XIfsL2hqfsg+i zJDkVewH85PDKi4mwle1$f4jOE(B`YLKfq(}!7LQlq&+nRh6eiiMIOhqqri(yKch$8 z>b>1o!=zV3_LVbLLd(4Vw3i=bs~GN zG<5=OlvCd`U1$dkap9L|;JkRb2>xC~1HO2Dv&tb9%Hrg}gqUs302LM82RfE~T=3du zB9$zUaYb(@rDOS>)N^euT;>3IAs*$^Q;7p($(8MQZ#dOw%|-gt4Fb~e$tFIGq@Ix^ zKuQARfZsl(Xv!(ve?TKIGWlT%%erEcRr-R#l)5#|WqVl8?z{lqwJAiCF4Dn#|G||Q zLF3P-H=Ul%WyOi4ILwL3a`xwuCYGI{*w9tSohibb-WWAjRb~arcDBnD*7i5^JcMlT zm!HXa#st3j&o3E?nPqcxK_`0XjTCgc$Qh>B_$sCm{bJZ{f3ziiIdy0yc=lSy8@?Xw zI@dFRODa)%gi{&Wpz)86tc0X0{uBwr|=?%r4~0QSak}p_j*)sr_XA3GavMgA!1p`h~}`^4FnT=TLha6X)L*`B`t+n#@T@ zHc!)d>ZxQ5>RNUC`!Ez^D?+F6P1>Dl>>G22OOH>9f2(w!K??tB_B>PPc0M#C3=HNa zdUCf}O#$5E>ArdvqviPA2VkhgG5$&h-`JSmu=4rjo!*6c+G2AQ-H8K`^?&k7dIi%Cj0@kyKd$!x+B z13nd@f17RW<$addX8emA{PiowWX&~WB(=w~WN@0tyq~&XD$&~TrLbsdIM_?B4CGEw zL>m@W*KwN4nt-ZF*;Hy7w&uLOGMJs=Hi$8M$nmv}&T=s-YzohX=D1F}TO{1_A^$|( zzEvXf5lqRrwnDKGw`wH~6NS8dBdUrrjW>i2e;i76b^r+ampKT?FkhHppHqNQ#!IHd zwF0Bjz&>k002LfK51W+oOO#nH4|DU}_U>EGn8n}%xkqHH;C9l1S=BpWXR*h@@6^wM zW@;qM^j15m$H8J8ATsGVzPFV7JnIRMQuxXGE<#MGde7R-@lJGo*0aU`#SI%w){rXiaK8zt#^=U^FG@{2+jqzQT6SUut~5bBhF1U|~=Df1^lL zVjN5+=#<3voNKW@s7_{UrHeBpgY(vGppDPU=q$F4UPYi&opRn3D(_2$V}ABTHF0R_ z*RlU+L6AI%_Z#V|s~$Mw)an_ww5Xm(mcdC4{hWF9ECsJVwt{s1CIzI`{azn$05gF5 zyRhwO9{s&Zcs1NKu%&OxlVaT5e{?$QBHf0MOXIxBxDrh;*9)_$KN~RG)PH@AEWDs? z_GFj~_Rg=IiQo{sO4-vU{yAQyL6OGIYqaWNl+Syx*8@{QsH|!!tH8TBk>|hGstN!! zGd9##^@@cZJ+l4fj2}ef@@)P#X;bLDodmU%WR9k&E%aOE3FMxruze&bf5ia#Zjau2 zmpMj0_DvguJ|Oj2oxKL+(Xm;k5@KTyZN)OnI%@xTQFtB?NOO%?WX6!6COzQX$BVAb zPz7YQ?VIfwnG9~GllD+_D@ADG@aLW%j1oAX$Z&?FH0|~|lZpx{Cl*1OMKc$aBol;*eKf%Q!*=ZAE`tEB!!qP| z8#uc+mO<2=JBJO~@o(88YiOEm!Py&QM|^Q!SWltI4>ePRy>~_Jn10)eKO_iL;}eHl zJiDX>U&P{l#Z_Qk^opJ0C+K3kQ+0(9Shf6dve5Jup2(o_j_}H7e*{l&;a>d`HK0z! zT;QWaAR1^UDv~z<+XapF3Ywz zhLFaErI=$nwqmVToMWUptlZC98FJ2)~*K&eW(>w|Zx&%;D&dH}tVmw=1=lRG*Tu7L9f*DV|$bqbwe` z7c727p_740fHAt|L?5hHtaP^VI_P9pk>Q~y(}0KHu}(8Y6*n|U9@^v*ihdjadmTGj zYIUgse4hgKo#Qz}U#6Yij2jXi*hV3>K5Kxu&@>25|asB`O0 z@1Mj&IR?dwa+-A(NKvlcNHxnk{i38Y3;1QFVN10E60u~~qI^INXO{DS4Abx~Pmyv1 zbZrcnsWuDnLFNxKB1AE{v>!Z%KT>n1LLaH&pJy)x zcis^=tGfBBOE#J-w!FCe`5eB(%S41oa=Ffe z0Jrdvk)ceq5TcBW{usC1T~sp5BQ zo!7W+c#S)y+hrs$&23|13*BIIG{~|Je$CUwC4-^7hEclb1L-YF7mEO$jiZ)uHGwM*1KC8 zQjF^-ai$jMascDw5%pZWYk!GrZ`+MZLf3rd=iM=55=0H^)%rX|r|uTx z$bXg1L#|!8RpInVuB-O*?9|cqozTPQ7~STh%=>sH@ZJ`G)tj|- zvTHbLY8r((C#`C8(nwdOYQ-lEo$)>KCF>aO3u3O^IP3`;G*%Syn;w#%rO4TCeW}pOPt!Be+Xi)LX zITd|;t2l-ON89P(q^`sux(&|=Pd@J08jmlyG=lYFL#TpIOp6>@;aT(#1--$Lx*$rJVvfpnr*5PlQv&FK1&%gL;4vhBfj1{kz=;;CY{-OzMA1 zn!D9z{wN%#6OkJ3zR=L5ZH(Z;!c{@>t(^3hbZC*h<;TeMQ)R0(g-9k{>2p0UoLxdz z9J9$loXnwiLlq_V#h<9dLVEWoVcBb_)N(k?cQmcoU z-_IAep)tSe7>CVDo#!!+JLddBIf`eCLAA}mm%K1i6AYkmAi{aiVlJ z-X>>Y_*jx7_LAgUp-1dXV}JWU5`C9Lz?WJK4osoG4azaN!A=cWvtZ|$Yx|55^jWi} z@>rA@=xNn@Iy4J5!Yc|Br}0I7Ago_=gG>l@fI+m6ha>r;lKJ5eH#d)v)$* z2CLA7309gWICXHY4FD#PPR6xGXXt^kEihRNyv2{o9|JD3c?uYC4u4R7s$#asya`x` zxXfQGFC-lSiwc7F!the3SOG^f4YmFo8K=S$D{vC#sN4tdlFkVO8?zv3QQ?B4(< zL@3S9IH2u)lv6`CjoEd4-qUaxzg7U}P(sauOWO|r+C}9^jDy1X8LoXpIq&eH#qd{u z5gdGLZ6Cx>T_J!*n>U=8iB4=4KBaD~MFzW9XfRl#+d5%uJPy{ikr!01oss9m&>ZT^^3i?uCfOMuWFTV!c7?|gA zKew^HtKa5ud5oI}RkHPDqf)i9pO^*jh9b&{%bmL1gtxP2Kr&Ci%IZN8xa60Mj2!`r z%&v(RcRl9auzwAvu;>iD9>fvxA^?FTkMRPvjN(*i9WryRn=>r6+*W?`8=d;M zqP|g>6tO3lTo&SN61)+cx^4-(sn=x?iL+n4EmqEi%%enAbsJ97s{@1YJao1D#sFte zYWw<&^7-;Xb)>pa#!~UgvBbiJb^6*E@lnLTu<2qONPlh4T1@Tzmd4}^BdL3W(Y#e+@M8pOK=6sSs*pT&l?DViA&HtJaKv1S>UCn zJ-c|W&$-9)hMB;(2%)OQdRJ5^zv6FZhE9$z@b&0u1yAP7^!*?I{|y+(2wZ#xnA7q? zkWKzi%zwuAxlf*oV+ibYf$hY~u~rK?p273s3vK?6VcL<-pfiLi7!NC(9BDdHTFsXR zi^WYKxy}EHDXgQ@7lT&AGyMXME?;{!xD%Xy3d6(;f5y?=yoDS6GS+0k!b}m$va~E> z2M-!7`ap9(qh~_#3vJWnHo2jVWJWO~hN0-jCVv(RC@i^tO-e`HxVvS4;>rt?VLo$bIl_hYUXJ00GgMhJ_->S!-QVnyc-QMlqg8+f{zR zJ|y@y9KV6U6;SKr-exTxyhwkBQV+Dj9GeRGcpqCcoD#F_2d3|Dkms)i2BHpkX>^x# zGJnp-pJL?ckUN2L0tT?}4>Xwoi9L7pm*Wg?q5>4GT)Ab>NDC#CR(Eo1ro~EFN$yAZ z(;JPOUzPs;2!{#RptIz1P=rEM#2TIf6wSN)u9`e2EB`Lh{piQ0vO1LBK<4EzXp@FR zhUAwWdfi03CUxo_IjwPZns*PF(l&bw0ZTnNjLM@NWoqGhX9(UkC@?;Y2Mc8>U*$+mxcxzwgGB zOR^h|%mfAc7r*z{#8La^?gLhGPBNX7H(HE8p8?cOKG=qp{HT^&bi--`9Tj*cNC zQ7Ll{T?L2w!v9n5`I4|yFDIJDL&cp;-!dowwAF?KiAYqW-VdF^M8OOuSm*h zA;>~`GU+Ksmbrx@{HfBD*4hY|_8}}BeY72kB~3udOR=ygVb9a*z?p3L)9Wajg*<4FWA*Ats{yz_Kig?wc z&8vTpLc4)0*He8?)a~1wnScFpwlM>OPlb}-jp4Jh7w5_c^lv*RAAP-G zLq@$mhESvp^Y`562tG4&GmHkXY#6Xd({Q)@kR>f6gy~QUFMmd0B_c2>b)B*`Smb6) zmaZWS1bg^@ik=C{;PP)Q1~COl7X&WsXl=hZO4=KFvJ#Mp5%+UF(1!HLIH5jfCaWBzD zJU4`f`c4!xRF@ zdnv9M(sv2wO6#TO&DY<9HIPY@^uY&c9+Q(h}^-R=T zB0=|hUmAL*{{?zTkv&_<+>hRgUt0(2Xwo_g&ZI4N@Dnswl7Er{Nh1GSTM3Pmc_NjW z4~7H!lyg9r>YFFL>!<|H{kpgmR z)RM}nLJG5fkXJ=Wh0-z1LcMi~#-ThhPuk;WG*pcqHQ0+;7kB7T2?#pS#jRVM`WKvC z&NEHyWG3WJMrZ|78KYx*YU^70cBHPxGcJ89GOX}o8Dt%y&$m0(9%2?2J?xvp`;VT+W1pXd1r6`NuTK8>T6b!&^VG^xV8L;^80G=wlrz^B!{-g`) zo91!#2hiJk=N$}TMIT+KcjJGekl&B+&hRY~Hdan{{|Krr$>3_7&Qwf>LAW%dtG|HS(`-*zt<-X%u zlyg!2$gV);d%g;Rtux_2E9S?!!RO44(F)#E%I#zVrjVn#{^Y7;UG8Ue7@z4vlhP~D z-XgH6cC}&0cDiTH@t$-fD_G`}U4M?oDFX}7$Jq|{He?=#WP71LO_ zP=EbJS>sI5fW2|+S+tcbeMUTn*%x|NRA~UmyBQtQ;T|&qtqsNt;lFOg=5WW9CZz>x zcuhK-N%S?wZ|4ZCj0yD&Yz+(|ybDzj&!G?!l=eQ!=6xE%OV|@@J-ijNEa}Vm@^Ils zDRf5tF>@CEo&zdK#Q?#xu`FAV{so83y?^O)tenkhBD~$9pvkPbe}ve9&CQN0!E&La zlwRCQySl%m4W3XcFmvBbp4pg*BM>Dt`HTxBf?_%b8B0AM(Qn5oP8|0&4faiDLllYh zwq9rmPFII8C}$*b%(OQ-Asaeyva}i?%;MxTc`!Yc5m&K}m0u2eQzSdZ`19!jSbu1) zj%`B6^UBKtkP_u;xNL}%c1>LigmX8{geQ{0yMYb}0u}2VQ#z|x1~sZqklrpt zf~s{5{x%-fZv;k!P%OA6CA>5lm1pA`Xkf#rQVT{=?bR+wBhIy4MAUBd5evCpY3@cU zusw>bVx55{8^EMKeS7Oi5aw)CJAeQGpqdEYumFb0MeqIq+99g3%F9~dJQ(&?L=b;b zmI8It1K6U4`hFiXmuk;(sJbb?i*xS#^Q#OIjQY=Ya6s#+n@&w|dXhnR`XZb9TIBDq z$!w`}7>oAy0rr+?uGB&Cmg29uOY&7BOSNMs#9ix}jjUfwYinT?cCFd@M}HzNcu|+Y zHIbVN`aQW&@>>A;MKA^GoQH;PCF7;;iz=!&5|6~w4~=m6;&AW!I-k3)8rzJer6+w% zw<H&wEYs{y@3rc#VMl5Em+2w2bL?4xcS?LTIx9jd|3vGKz@6x4`Hdt%AN)}dR` zPKo$(Anau%nNQsp<*BR_w|~g7J&`GD`XtW5gV0(mP_2UXu^GvPPQj)ijmD4L(bt5i z8TG*yLaFu2YD*OtP9e*_uHTN@Gm zG9zvIipzY8_eUvDL!+8`=g{);_uY#iaIB`R-ipcKELJL-1u-CYqeR#?1QVf;r0_x!)Sg zVy1e~GCd>WgqnKxCh$3>07>N_A!yvPh<>QZ3=zthU zCr~oaoUM~7$JUe~!GDXQ^MNAx_Jg43qBxsdV;+)NerGZ2S|9F;pDkbP4LD^yR2!JB zC=EtDLFmrNtNbas0-M^=q?olk49sf>0vnLnJ(Z7{J&7;ayeGei_55fIoUUJux(N}( z0|lj3<$u2Qf}9jzI#O&%iGLD! zeH)1tPG3_~sdh)OFh5>~oa=P-88xg(j2@a0YCzE_%iLXhDas31PtOduyH8-gUWmu9|HKMOW`i-e3`T)3G7F0?oAu&VXv=bjB?{Ac zUGvc*xx5+qCVwi%KOubkFwshd$XL&7yP_DY?=7R2skvmC=jNx1tGD>aQz{}ov68ow z-x_zvx>L6eBi#9#9oYaq%(Af%?DCdO`R%bnGG4VCW?%obEDvb;^n16CNd3VElhj^v zI;_pZAm9NgYFo6S*$5>~qq^*<(ktfS#ptI1Wi^eHqkjM;B@ZkFDV!;x{~OxbF(jr- zy75_*eC=}+@Z45>KPd%By$52u4j`1bzjnBr1&CV5-dda(DLgOYzAs&0uQ6}r^D;sI z0{^i~iOp$oej~rbk_WTmSZA@+DYQ;Q{kX*n=JW-;y!fJQTt5#73y}g|%SD1r-b3De zX*xyEkbljW>oQPK3)Fcty7*=6z;Pwe+1)8K4dz03nSUy&JrOSE!uQ`&a(R^EpL#M0 zJt6L+1CDyk2=GXSKCDMKiN{XRfl|Ig^+nEDWf5`IXcN%0k~nX{%_xu0-IOlZ+SzB6 zPCltMzjcf=-d-9ty^uJ~N~U5k7^osS>}E}wK!07{yzc>3>QEUp^7d~V$uh3xgnHia z4t9^hRUaQ*_ra`D35!BfIMO?cj-R7tFZtOBP}LP-^XJIwbcC^|RHTJ%xo2WR-haV3 z4AU@R2$hPOa8o$jp}m~q>^kfZ_PqQqG036tG~nDGilq z4#OKt19M9U-j|Yw^j&231P~e1Zjxsr!_Y^@?r|w(*{7!X$lM zP^E}uxq%oQ>T={KRKyeG(av;_`n|M%>IWuVqhBgyLhFBxc^diPmn>}fjek#+IIg5X zA}K(iE_fkuFLIU-P`~@bgBpU3pp~AFU^67>C%}in%(jL^XFn3{H)K5 z=jG|Pkv?`dN0q#mE$`Bd!CF22X3n+6UU8&JU!NW_$JIio%xwu!F%tz>>ma7<)Yhn_ zFwM$rXso3-K)k#BPqQ|0YJb`y_}V*tyQ)A)jb)Z3VmPGT^lCZQB6B$-^}#DUlD)Gyw1@u76J0B^Z&zM$p0a zwM*O3!99)MFT^4|$=j-em7mB27{guaB(6govB$_x>?z?Hn=!r!p(`b@FTndgz&v>g zXW({5%#~nD0Dv%{4g}auq`)>!g-A#JAHT0RE~ES7ELcP&%&g8cj49hGv01*kK=zm_ zH4R;NPdEbSw`!rrZ-1Uy3~C8^3ySQM7xZdfT1EJcb7bH=;xZ#Br$K}loK#PiPqj6Z zGzBJQBdNJNiXvcsCARslryR(;Nxc#N2>fyqipL=qTM}V1Zq25l@!L9!RXO)47&PEk z5BQf;RiS?Y-XgY&uvrnO56dqHrq3Ta7=8ivA72BeQwX9_R;KoS+kn(aA z<&7V@r)xq@#tAq9l{}i;FjX=t0$smxl64Q(F>KYHy(czq0m7H9ln}P1OGZftRya8i z(Y?4F^FFRWvVR^v3O0jevx?{cYGoZ=Ds1B8D_CRE07e>^W8Thn$Q{$vc4YD7tKr~%x1*cu}A3qM&x_^DFnT*BdBp2s9zP=Z##kUc_ z;j{}DKS!LOL&b1fH=J5czZA8X)$}PCK-MJ7mEZ~z(G-a@(a#NWb-FeJAJ(Ah$zlA- zC{OWfyW2q5=L)#oBYz!SWf0v&sX-&~GU74bo=?>mC(5uFs`N`Ub_U8~9LT9v z#D54tt(r6a6da*F0PR)->Y=w=Y2sbhZ7)a}K{Ox=nqJP9<$($S*&@VX!5xe@Soke8 zPfF4py8rf9G>v!@4(3v(zU&n^UB}jv&JJ?Qbb^FU3ldxV8|~Cg2U442+HwB8MKff> z6qr@xW2O#d28#Z6@5wkL@w@CuA68G|lYd`Xod`?LAFKrO@g-%Z;j=Emz%RPrY{{GW z#J=qS2)`p91*N*pw}dA4`?Flfxxa+(OBR+=RBH{E$i_zN!9Zt`T$4dE}o`5IeyxAms{?Zh~!<-esPjxhi`nZsYbx|dl-uwyp zNEBo*3c0oh_j5UXt?kGmm z%7qz{=IQ=OqT|#11~f0X;++W(M}KaZ6rvU3fXvU!umqVwD0_JqH3bG`!Z^rub=I#} zG)UHa7K4@+Mn>%#<-e{E5a?;r8NuYR(%lRywYnfJV&udShf!0a+ZJHQo#HIX0e{(>@Kpva zOuQ7*F^I$wndsp)!4z->$L3hrBFlt{dA_nI1q1ZaD*n-EpxG=i9O_p$_#MbtTF-a; zXf{#WXd>Uq1nlBqKfv0~3JlT-4wg>Ri}@Wpm0UeTIt@i-sKnK_J3N zP>6lEg5y%n{|vt#A;EkBcYg@7x8vP8e>Vv)Nwufg_;T?{){m(gIh?gKKGuo)GRx9Z ziG#p`_C=2-G}XPAZpz(KFw6>lF1w#7K{;BRd^i(jS{RZ^^-0EBN5AX*!(zUksjeb| z%;I0f|Ebp*O1GzOomk8z3R*4j%>cg{&%v%W!AgIDr{jaqngW`76}RR8|{4gc6m zL0m7VAYX9#sW&_CtY>aG5|d$tw8v0Zx>A=F7*z~V-c1rJ=c&$VUg|G+esxng#AuX4jGh+CmY=u|colX3tRi=QfX!zkI z$LY;sxhzcRdd+q@$DK$U3swv=%Na#K`Xtz>K^;|Y34 zjwcT$=X!eXC4Zr(-fCnZcy@tUE&~CBOyh3MX4tTr(fAF_`~FcNvvj*(TR+zr43%Xv z0i^YVnm6uXuH!Ds(VVCl6($1EQSucR7OJ4^A`i7GA%{{27oZV!(>CC7g@8}~qXA-W zX;<5!qN&THo}aR|A1OjVdK}s1kMj&%N{s36404)JNPoA@L`(oyOF9N&McQQTee;^g zxrM9BQ%6e0`IJ<%J8J1LRrWcJ$e`}#i^ur0hpLkQ|euuGOx2Bo{TScOKg zRJNj4Gk>oGFbdQFNM2i87zxowv6-gTolXfOCCp6e39Z3Sp_DN+BvO%X`#?NXbp!wh{)fn6B+Edw0GHF>qHw1b*5ESGyEjY5&W`z^2hoOywedp~-8enl&ef%M^x{PL4p z2!Dcx8})zPk2&!?F3^jKNBMrvNn_ZX%XUva*=cTeJQaqVmRAYF6T1Y+|1frPjk+4SbxOizY8`-jqFpg0ZovD%&ree zW7v=&ugP>9Up;x!eqFx4?9@U*}LSpO&30PQGd4% z=i5>qW?fm`>jDIXFFeXs;+JsKUa@p^ug(ufZKbp(pp~@1y+*xmqNBgOE z?FMN2J|MTIC4=5PVs;bO0GB1(&3}YtCLkLnubcZ&L@Wq~N1*2ToJlGo%k;a8FT!xd zs(48V?~gBdXrkcd84&WUt;1=}Z&$z}T)B)JEnckMwSI|rQcYmqn{s+Eq@bU06YCuc z_mo3T02&mMxVCi4z7$_=6pLXVHYcMX;D#(ygntAAc&6A=L2F~pi%j}wtqa*Z<4psI^AKOKCWcX?-2 zUjg7wx^Sl|>Q}^;_|w;Vw+^|QZs)s6?d=nTRSFEJ@w0CKtMK2a*X}b$kj7in{PjP> zhn>kcX4&lI6Fy3r|7z|!QWVC8-sS&C`wPUqB^K+q+eDGjUs->`{(m^>xpaLint9Wv z7+YqEyjGStNM$-=nB*`7j4MV0!y`%!XOBacO}mtyld(p~#aJa@_;;5~%(V7&Vs~Ty z&1?)0PQWpQ#V4MTVTpZm`pdMDY#89}e5YNr_lLFbH7}sO=0~BPC$M#B4{2qH^3Zs9 zA_?@B?e!qdmB&Zw)_)fRhlIpoP`!7!=T_6{9TMzx%!wt)J`C*}GhhKISgFjT2UkoU z>;|(FiyiTJeDLgHzhz7aUbZO9VX#@!(KR6K#JEQ$28PU`j6jx*2RXVPV84o>S+G}c zNV7>3pML47E*_8sUEQfV>E6-XLOOo2#d6*__I=D!owB@@;D5sUFQ=|dE^WRlH#G~} z;O>DGR4~7RjJt|tLTCR0z|ZDqYP%&^Z2OK!!%32}9qq6tGO6!0e8P;fkJVW^8lPTa z(713(sf`P|It9H#MlN6BtjoreInYk5GCclG%wG~sMA_x7x)0ERq=h-wkhqxQt^e|m zX=m9RYsH+;5Pt!hC#pk5H)W+pR$4Nk>&@66!`^;`eicnRg2kWxyizI1#vscDZKbNQy(QSR1jl>sVxLYo#IY#up5b1t`6U*#v z$U9fjM<71Jvr3dQ(JmxkP+>R5DtjX!@E>p_JQzEL6CmlbSemQ=p~EI#ZsCJ#GGwqr zkrj!;U3X@Bk)lQ#*QH5Pk$^5et~xbqTPud;g`MF2iL}dk=wCztM~X)3Pg%yE5)qL% ztMx83zJJN974X;N3w0q0VelV-`J1P3OOUjzHZ7)kO1XBY(1$vE0LONg=1s~B5q{uR zu$z@(HH&<6iNJPAltcoh5EU-LP3V(Y5pR)W?q`~)if4F3mp7a;Hvh96>;I5!`hD9c z+xXJo%hoqY>A{&Y!wCQFE(R(AfXsOO#XOgj z$gJ2aiJ*ct362ag`nQdd`_$-<@L2`~hX6Z6gYc`<&@F-6mP``%7Ch4plV7ado`DIk z6Mw>Snr;giX;U4 z&Lq)>yWaB56^q^S$xFjXjV-0;6SxS|G}+ZI**cbpwYv9`mOF=IP0(Opj!8LkS)|Yw zQCtz*4oV|H_j7W{_E!H+R0M0oHX{05Q-2#(MAHjant=bPc1>_rlR7YVY_u4~qn*yZ z&x{pJ9IpY+|E?TeyLZw*B%SztyMVnkvOU1&fh5`hpLlR#>aPE?Dt{GY zD^{=Wi+;bJK+Majbq4oFjf?S6HJ+5D7n@m-8;%5`M#XZ`^Npw`)1HbBbD^qjX5ZaT4I1?Q?PI zCEvn|d)V!fBjEN&I7KM^x-wFrJ%69*$&Bl#eC=xI_aVf^0Ee)JDG+qMdm9YWgIDN} zc=(QYvv|iEn0tgSeIoDe$*2q5{FMP%U-3ki``Q_m+P5efz&frw=QQu28Ub+G#K9Nud-h zLfBU~-DLzT?!e%_y@~|0ZGX_=(aFUmexRQf@LXz1v-pqTRGQ~(N)-Ej+ZrHSY)d9C zZh{bs3xSlLG|;ZuCYqx`nmF_Vne*4>K1z|!e~}JR5PfTMx0u^txh{g9k^30XZYz$g&4F25PY21b@OBp-Z7>Bm=bk zxS;$egfe|QldgGu@%qHk-!vUW*hKs8V_r}X)ed_bt(bY~duE{=o$J{&<3(fb}iS$(nY zT6fW&zP=!4uQ27R+FCjtR0a6@_v|Edw1{l;A!elRes`r$cV>j8!0KVi07i51d(^C5 z=s_w!ioEv05{Vnhw0G+6pC$jKcg>*_zT;C{-nd{bp=ZDxEwVJ z?ph|CV z@^Gccn@P_~UgVE95~l7l=)lRZ*V!ri&%)QKMtRG9Eq4a=;znf!){drw43NO;4|Q7; zZW{c@%dwwku#(q0e2IKVuf`U-dkuZFHEkY_-S%_@xqnVZ1j(hUM$msy8W&-c}%hFb}}&Orjbk+k$oWiv%WwbFOHGQJ`bR40H}fp*{8 zd=4k`&zg8W;+;aj6l7oYc#a*Do$MJFG6N2!=&_VEzKB0x3=DAeW381`{eW{|Xyu;9 z?h|h5IDbOY1=(@JbveDs<}SFcVwp=(nm7zpYQ`PZuO=-L08^9)LPGlHGQm>f_@L7> zO5~%_Ed0mdM`Wz`Jd-B==|dBk3ZK`_y{Og?S$C&_>9sU~=xSaHk^=+#Fy)XZH-iT# z4_|I>-WVlpJ(UMU0ZlnuX>>xxTL*jdJ+Z9buuWt4xhE>&^00drk%LFIJGOjDTf3R1^L-=GL~&Y6hSxW z^5cxpdMnUdllSyC%`fLsUkw*Oz?|fcMEaz!bg3NiK|x?G^=n3u4O7Qf@<0i9L3t|K zD$$A%*GEL=k#g>8yR4&1tJX1d9o37#Dt|Qf$pO&O3MB9Q8|}tzWV}a{XUP{8LsThP z+v1h-*4;#VavGM^v`$TvSU1z{!5uTb3@6B+(}9In9t$7BbM8 zF#*dgNmjv*4qe`U@Y+e2m9za2{wi%ew?8z>LQwsRFTdBv5~5i-{S{Z>IZBz$A%FEy zhUA~3G*^#q@rnJG3mOA(P7;8I;$(!+qwAKl2bcqRWND;IRnA^D(6J>93wEpT5df;P zELU#2?A|7G>vvkShoer+|> z@L3=t!fI&0kY}N33;;1!q@Wuq&Qr0vV5mE+l?y2od z`#m!FJfxBo$d=jJ!j^sI!P0(k2z7Q$twTSdBu_)Kg(EPS<*D>MuUi9kyvM#42Q%@t_czV`&r19-Yq*cX78mVe>oH)X`! z_7v^J%!}Eu$o-}5)5l-VSQHtO%ZFJ4K~(DwS9DY0c2*7ux8)HI^_)UKdkbIf&DrFs zjJh<&`s}sH#JR8h91Q8~^gBd;GxB78zmZFSj+C8($TpgwIS+mb`{ERtK$<1W{c~mG z0sMFybDRkjQX+tpluZ`~K!0Gl)(l7J?MpRq3$(d#*h;@6GqKM$D~~TOUS0|MpW0GA z2YOrz0nSLsn-|{cM$#f7$$t6W_p33IFn{zi{%Otqzn9;h zOPbwU1>CT0s4&dS|JvG{HGib#W@wA3^9q^*3-4EOkwbk+tHhQ%yzGr|(x#SAQNuGG zZmULaq}KzcshTAE{8+9|mxCTCOIdSNd2$Wg0ZodgB<-Oh=jdJ+kfj2xA$V?+K+eo? zlKjd;-1;yG!h`f%q<nom-^S`7A65<9}Hr z!Dd9zo=5c{=gk5GG;0_&LgxS|rK~$EgUepBRESkQzinzDz^TM@mH(moYnY^oE2=rLG`QF;<^NHlC zWId!biY7n(6b>^?o-U5)x_r=jmmF#B5B>EF?MywLi|$+sD64_>0*98sn}byIw9Od$OPWV`Rv*ly##JH>XxY-pR_pQ3x>1Xj(^xyWRUFo9b3=-vI|hX`*HnJ zSOKY!Fx=&cxbCJYjc?-75cPcI7{vuY$&q$p~Yxcey!3^T94KXo1$f-_SryQlf+#?+i(pTM3( z9$g!9Jb$QB2-dy0eub0knNIQ=0NnT+tS>t7rq}yowun#Qrgkr6J&+Z@9~NVCZ}Mj0 zZAsilX%}wDjFfi;<<7A84a4yLB>V@dQ#x_F^5HVYFge3($t0#HVq}tY@Rv`gL?#rM z-c$KcSNW@!=!gyvo}X1h_y!`-zLI&-h8;H1jeku26$6&*l!ekxHx0Cv+L~x@jsM6f znFx07jG~mizfm`9IU5%E`$a7oJ&GHx14Zd_j~?zcHvI8{A3Hz*WRXCJA}mNWv#Z5C z(3UCisb@fiz|TOw6^0i@JMuWVcGd|YIKYmaW%qSOk)84>H1CuEwPD_QYF-@A2)?7b zP=9Xn{zB?NCrmc=ieFstHqD*ix)M(aRU?BqcoYVUo6?)V?G^9w<<;LPT>wo{3%Fe? zh3-iaZ-d7VGFDhgZO&Ox0G|L)(q2fl{BH-7U@%U7`P zo;ir~Ga_$Otw44Z_X82-6577^hR>mbFMq@&KAAL(o$6NZAQK3`{dvq@&>g?BuZMJ% zRm2~{+1G}v{fp5g7(VIF?A=#&g0wm}Q)#vdRi($598z8D8;o;0YAT)UTW(mIdaN@c zAn=44J(=0;0}gG9Y}vCkhY#&~-IxbcDH;C&a~U1;z~Dp7x4OCaB)NM=2%Udu3g~RWP)DdlSaR5) zDS3ci;Ax?<02p$tu46GfnqcqKCx1Qa30>dC`+vKGzCaa)jS59uR}~GeDC41G%k<%Z zakDy+hiEdm&iAgOdzywg)_V0;xJWgtff{M-eTZ~j_sUajbbxAzp?An?jUMQ;RQPAo zXK0OzDkdhbZS2388@I5&+&Ye_*Phe+-vc)`kHbSCnYowgcY$Y#Bl5%U#((HQDgd|3 zisJUOZo*g8m!}CRFcS-ZvQrpo#zkiAZ5AA3xI&BTHQLFcKl$U}d@I=tRVv3*mhTZ8 zh6jm$?YrKiGbHH=jqCtr~%zuZVd1W-9=3;%LhyB8_%Oqy*3e(b^5J0irK<<1jrXi?H zFrzo#yrqFmn?sYsm#lH`@7GWB?_u*(CYC-fgg+)(L+RdZ0dd-UgH{6{OrKK7*%IM8 zyNhgJ>$hRWvB>ZV_V0j@)pJuf+q17gf9xpcbfOLiOcu&vIXp@F6@UJn(v9WMlo|V@ zor|?{MJ_4R5Adg41-Uo(2+YTz9&k-a_A=VTa9Be4;Z9qAv3UI^;NeT9KRy$I3j=KS z?9wPZ;m}HrT#4;Z6EYV4IRtP*5{7gNj%?%lxl2fD(HhKv4SXEcUD|=Ju6dq?#6^OW zqxqJ7Fl#QrhR!}Dt1%Dwi=b;h!ru_t)1m#gj z9!^CSgvtbR1mOhwPitBZh}M%GcI)ePA|r%_cHx5Cu}kJUV`HQ zAQLA0IhUK~1noSUG*sB2GJaB47Bu5Gp_S@XTKTz=DO~2683iM|ccntyVXUsBrhqtP zn<6`jd--SoS$`W}7%BIG;d90psSKW&G=hD&uRfOX!TAAm ze*#5p-Ei0&r_)#lZZzi+su$avoJWe-YyuA1SeJfs)_>_rGU#E?WY`2v+fM%CHFpaU z?sR54H8Kk7e}w}3*}u$|nM(QkbD@YVw0Il86hmIXDb=JyW)KrqVTka{)Ap6K@L5K5~>=-cQ7hOKR5^Fo{bC#3GqEVJh zO@z|Vt$zh@_2u@fe={51RKE@~lz*vd(6KNK<(Q=n^IGPsb&jppCoQEGS$7b1|8b&r zeP^Xo(8tLj0MA}{6!Bk&mu8$aG6ctu@FS@RTC3X!QN7iy7kJ2nDKMZgW zme55e@j%puvmIn-f(MN>5EHloEkTl0>w2e)*f!$n@2UmgIj+S@^rL4Q{ z6@Rrii>9g!;#e?H9?lub7K4A#qmD^tE{k1V_YzwE(YHjod}%Q`{dA-$x}+oLG~fF6 zzxmR!&E?JpL)b2}(fX9qsZMc_+?Iu(w2c`pUvX2R&-hY~bfK*I`D(<4Et_vp2_oM+ zd^<-)({&StT9=&~DPVY^unuF!w0Px_-+$i=kk8&saB{VgJjIIL9N`Gwrj2$V^gimW z9tg7mtz(vCLbn9u*#k+k39W`suFdeev;+X>zK}}G0a{^yl8bI_0`kgIJ%s)TvT1Tv zG^Mu2pvnjoeDeC`wK^>Vu59vK_d6wlv*m{z)=pU4CRHs)5j+#T}_}Dw^QrEV#8gl9+5kNlSY_;UPzA0=GD~n zCU=M^gY(sE*JYpulD^TPWgrclVj;|TJm(#k=-y++-ZoXi=9!~UWNM45LM*|CDNNfRzjLOfv6QD2^Jhk@5Xt6($sRXQ)q{aW|Q=3Ts*jXg+1h+{pp?W z#tz>8+bc#U)q|zI>-v!I+(Y4OafXgCB%ECC-I~v-MN_b!N!o3?AsLKWKHn}iN>&a+ zsrLhfLMrU*X9WZP#B#mZHGk9Q3!hRac@rW#egq$fK;SsxSe&!#V^}>?ybfWY&4G49 z@nOHSm-ze3c`JoJADt5cNK{z!J-*7Zz44E7zl4u!#Vdfy%_wt~S&y%(rG`4JfrotT zy0xs$JWs*7PvV# zbxF%&pJRkQQIdRtX+ZGpu(E;BmC=91ru&n`5EPp09Poa4!&@FU`%1RvZ!0|Ond~tl zpqTxv-LO&qxU{@@fq$yJm5@$M=5m%Uo5;zc5IKjF4-DmDw|rKpNb?OdD$RU&sC%qM z0@B>^x+J)FBF;t7Nv7px%1!Bae>1p{fF4ppX?!|pHa<*ogoZGTP9?|Ip{&7<2u$dt^b z>=)g0N2fg;zN|X*+=xAb^Bsa2gX^0T>tCbsN=TzyqPCRM)itdFncw<3bI~BHcHdco zjJbIOAZ@1YQNI$VHWBqZuT|gVH~){8+prR*JC(7c2-Gd_Yu+}x7B3~EKMph4)jD`O z&io90R%CMUZ@Zq`mp zTw>3DmLbw&XvJb3zGBh&E7|^3@Fwb;5s(JH!VzBCBxE^Sj!f} ztd*|!S`iE<);*mL4uncbMOJq3;i4em%Wg$jjv2cYkcD_#n~h zxg^G#kAHJ!6r#$!rhp+xzyLKs%D)Z1HD+L1BroQjG8J=08|3qU{irrRK_hWJOCGZ% zS}vbywI2uCAe;<~@ht!?9klz@nx=N@kW}FYi~X|OezR*He5BUWlShxDFq{4^k)DV<^IhW=>t|cZx}A!y|q7eG_G?Qqik%!KtO{-?k12^>=}h3D({{b|RYRy1k6!=BM9snHguP z6bcriq!qB;CmbYzZ{@3suo8Nluyp zaD>e-n@~+V;4NrjKpSMBja7EB%WIo1ra{=ktCrGmfXg69n?QW3#h`jo7@EbIJBt95 zJ3xKJx_hghin!nu-&kc1*)g2wG|`z}lw%jh~Kh0|RHoZRu zhlK|}E8amMK+6ts9n195PEpMdgdkAl-Y>^m&zJK$Ur&njSr%*6xD6UvcWKrGp5poOjpT@GbM z^r8(j;~`J9t?>=Kn{mcL(rZh2aoQ>ENF#QvzBemAftrFzz#Y3=P^OZ@CS$@lpt!Bjj< z&7R7&5Z4^dS~V!LWIYbFkB~PJ?p%L%XTgtjj6PgY%G8@hS%puiQDN+31Xbu4dzAKO zJpuTTZrmr$NG9Z{$*xE0lHhD0Z+lM9AL)p+jrl3K95R_I)S2evF1_n+KfF2IFo>Ad z%7$A$)b<}*<}w<9w$wU&k8UV;8$DRAv3FgmRj_CZIEpN|%}$rORlO;96o7vde)N%m zeq@l=?M#g{zj=4Mwkz+0x1)aE2CaNjf>A|`FMF1=){W$?e*j)q&1|5MffVttfQ1rA zcEAI=@ZqckQlqj4Vp`Uo#j@9ODhZ@MO){pT^@htL4JAHvh4E->ZF6NTiezbU)-PCe zQJ*|rmfJv6kV^c59Nwf53mSjv6j`S@u~+k0^Wzu1$Fp(T9FxkfAjme$IJ3&cOO8Rl zFZ;`S8pq;K+uo!%9~r}0Bb3A9>`|M|43T3Hfdwxs0B4d&`BgOND#>oF9AESu zQ1g>Ju?oBFBoT`lq+QAa%pJU4m^e}I3i+v5noE6n)L35l1-GffL#LJ#_S>un`Zkq0fpv2E1VXR6pQ>goqx$;IW2A5jwjzI2_O$m*I?WKlUIfcZ%vpmj zYm+qGQG*+Cf7q;O*wcTy>pKa8La#lv`GRk(Gj>2t6q5A)mEiNH+5m#`Fiv3O{ntSpwQ7))ynthjP z|1lo1V;z{0EvX?d>h5>$ql>0|v8yVYM*r>u+-=yrr0bg_@_~Q+s|88T(|k8|2$l!k z8bFa& z(}asttyFf>jKxr!W3ejLTWb{VIpxwYpdf!kcu+&sunvV+XeC@ghcgz31yYs20Ho(6 zx@mfr*zd1r6uoq{fPSKK)0{|7!*e7fJIah*n|y6|KRV-g3Xi(1AnnbtFc3w+(KomK)cV7Ce`%k87r>*C|B9Nof*&vKt2K!IeJB$Hl3 z+>X!KrO&@!k8RMEV1r0nWt@l5O=}2G7=TPlqu7Uv^mP*iLPB3pYv7!FQffd!j5g4& z8v4;B2;_fI)1THUz=5GCdMl#NFl-^5f)~9zm`*$Rn2>wknfpWeg$RWz-JBQ;!5@)w z+QSotTdlJOp`ewq502tJ>1+Qt(2gsM3uq#eNNHXp2{al92vRtk`fk~OpcMxLe&++d z$Bhs`%QX6W&Y?tw+NSZ=B|f4~Mt@8BTxyWIZ~|UjQ{$uwH?bDN^T@Bb>5( z&TyA}AXHTFx`@!_bT!{v+5yLH-3G4p5xinZ~+IN024wC4DSQ3S}AuSJ^^b4XcZ);uJgLeea5Db)!P;K zjBJt#NFW0EfVydc!tY>Xr+d|jxs*Kg8XWqO<4WSlzmIMxx359mM2@7!T`BG7oS1f_22l6KP? z^6V&B;w#oRA>^jFl41hc8@rU{YR!C{-k|E0r`WTygLI>E26iuP+E8ot9gIGs6y1LU zVGzBo{x46qWu>pDoKlU#mAx=da0B&6iqu4_WvXBx47_K`xzEN4af!*4`%4oY&Lo9e z6@k;>@*0U}V@f<>K55$2i4A;FJO|s7ft{^^(p4CJ2kgtBpca~{y%*J2DIyZiq!+e% zyTxQC0dIJ~q9FXeRbRAsEkzYaO(lO^IQ%}b3z(FsB2iNzVA%-hx-75_ugZ&gEbmU| zE*C+hSlq`l^bn^bb_F^SMKSmxG_BKS5NdCn=#Hf?#C6z1+xgt?LuoM*u*lEEqz%Hk zB#ng&p)FvEH3YPHujwTw+u$`!Y%moo;W%Hr3 zd*UF9=l{QMktZ{=qnw-K{=Eay%&%6Z_8SOx=lV*1cGN5P& z_^rotJ*npsWYu#z~Q;GcijXqZ^&b|ADSN?u0Ng< zEzNl{9=@Ebl^tDzI3>&?K~%!KjO6qdvAxkW>a6-VRa8U=A0i7CQ?ZI=2Uj<3Xi2|! z+sz=cVoT~f5-S9S$tBvg?`1Jz?6&ID=u-4t zv zH*F4-8i>5c(}2RW(1l0x?jP4(VCg=V=5ek!Ek@w{w3Oe{z0VUY zXI!W>!>8aSJU1{}1-lCfU0PX&6#l3#m_>UDQsk4C=#YPX$$no~{+^;fyN1X)&NjjP z?TTCX(=v%|uLekjp+SNi96hUNOpUbiGvhbKB-8|^Y^Kw2NHL?^I0Tu^?WHgT*Ie2~ zQqzfk#xq$3JIE^@JfS~u(I>-4IFRZ#C6}^P-p{!B5_Kn<~tHbVmKx7PfnMQ zXKHH^{=I(?4o1!GDI8|clePWraM=gcX4vy*=TO%$mUn!P>(nudAER2ERTj%u>$|F3 z7yy@(kzFszVgi+${d(jc_V#L(kZj)@An|;DB2J~MIeX|f3dE6#Ew4o_ ztneK5GUFiv?|j;3W2BrdsJNXu9aF|Y`uvvfIthP@+IO0^%Iq=5e42Q?B8j8sJs+_` zp!330L|B5yWs<{Ldpger^ykHI=S&6Dz=oAw12fFOJ$C>!Yow<>!ujZ$knHK>%4!~3 z@yHAd3J25|Wc)M3JGLMCO(nML>_-rn1(!h#LM-uyg@QjTq#lt>P%J+}6efwMRU6#) zBo==fl|nKtPI~7}WgCclpNf8y(;i)ePVp^#foGi&LrsmXyN)lnk=ESQPexV4qzWl` zlXcs#Z>#gJuC4&RWd>u&glv{5dQVoIg-f@ zX&rnXPHyX78%{T6?)f&Z?L+V}M^EUn`8lT0+VoY>RR$J?h< z`9I&G;x&D|CPU7z8df)Z5o6Dmm~?gU(%dog#2eo8ZTD7qXx|@`|8aq$QREy8m7Gew zmC;y@Lz4*I1y6BhK8OljpV@0%)xV~0qcTM2b1mB-d%E{$7L{!KwRKn(ha>0Yo8o^x z?J)8m#2YQBC`0fs0d3R7!XU#Q7chjEuj@!$3qzFx{_1G!INW$FnFvOuOw_L6{Oi4Y zOIT+A382q5X-jSpF zp-IX{+XSs~yA?Ct{>q%P#+3w_dgo}%6@Ns4Bn$>UsIlNGBMYnGrCwf`l1P7FcPzj3 zi{7CB2X0?Cbb^Ay9k#m?Ior;G6SxJchu#E zrlFre9Ya>V9rd&Wd1sE2bWSoOPz_`D#XFf~+bcBKrrPqApC~aI_G^Bc40@W~)wN0~ z0+nQpEUM%3pvBH=xhtiN+n-314Hp-b_LBs>4U)JNb0WnJok1CMY{P$Y=j6pbHiUep zki%t)3?p!6+c=5Sj|_DDfrvR!J3LOT=1WOGYlF1waDy@X^cXZt`yBND6k4>kMxSr# z*w(${Dkq)rF~w^M!U>zAty^B$`TG2!k&eEOnZH~7&OzY;vu=IAf}F*pbxsU5Y|jf= z)4BT@^C;}Zr>`T|;c$O#rEYoNrtmgBFN(C9?qQbkb7%_WkNaQIxd6?1o z_)OoVeaN3SDHE*N9&hSw!z>fm>MT6zz@S4^;m>LoU^pwAAZ34Y%(ovL;YJz=A4AR+ zSH{uS-oLv<_~np^txm>+R|tMU!*U)o+997L`)r>jIznwXuE%(Q5M%%9MYePV3i}aBMa;e90B_9FY(g z+X_4;9+jjB{p5Ebcttx`CK$sX@Zk_daw6ms_LNJYxc5Y4BJU6yE&wLX6-f?N15p{N zL_SDK{5HTQ%q-16+|5_YMn@`0I=>F2Pak_T1u?&?HFQ>?jMz8O&JheON-7h9ut!=3 z?IwObA#Hz3fk+iF)`dvhA7koWg{r8A)ln5SX+U6?J$CLkLw)XcJ0BNWPj#ARrm)`FWflZqSwC2PNUT^E*8W=LJ%8k){K{_v^&^h{ywb z0{?#25Xg@gfbgU>{sZP`My-iLg_Reqba$k-244y=p2yyw2$(%pd86KO`E-|-q~U%U zKyZJ=4v)x%k4{}ryF(M(Fb5L~GyKvk)U?R`qU?e`(2@G#&izNcGvGInQeUjsjm{dA zTga^U0(uy^#_Ui<;eD%l5zrFDgFTr+0;P$#>q}xB(b@M_$jY-(z1)w5LEh$+Ccmv! z^vsHVjEw^&4YtLCBG7c+SYxig#I) zKlJAuS0la_)ft;>PIGc04mwwf9qNjlXwT`EpLm+VZP^&*=;$n=?Av$dik6fnQPH5_ z1&M|Oz?m>RDDS7fqCtwj(zorAH1blh%1Hh5kg$Hx7#mesP<-oggPH`ql3s4nBPDkD> zmzE<{@qjoSMzNIrpmCQhs!(tMdg)Stve;B9Uxm2`FkHg;R<&LL)H3)3QF+~daIjyk z&A>N$)LpHS3wMKebhwvp8_(M32uL7>?jnD zChxQl(y(;1kY@EVZKFlQo?ihiA6=3ko_cg|lQNNcpawRm+9B?|mOW_Q%Go^a7w38K z5jqJKO?FsRhD|ua!}k`@4UJP6^XliI-AEV|w4sYaI$*xxkJ`hh zGe>Ab^Q8)f7zL*fA=#si5oLeJ=tpi#w@U_Iq^D^ATb&WS8rl~m=!X#d?ZI=mqwB_gKSY5=^rM^_%isb=%3J<-Z5I7m6rUl1Xss5n zTHmKpU&N_;iPp3B1MHnZM#gPo;sR=QUX@X;!jJf4NJs#=mN)cA2&Ii_1vkYgN z?#Ue++Abo?1{*|Y5CAfLfs=zKCZG|AFJ}|3bHGr#59$~~I=L-AT<3>0q`u|@z0fIH zxe>1fN2^0a@GFin28UTy3xAR1W$7#HTZ|jZ2@ik7+WZtZB^lZWA)J;q z%NHt~gqMP3*T-DW(PXEsn>@|q|x z=%tH1m3J}I*&U3)ZarO0v#}>xvFl;76LUF{yI0c65xjrAS$ZU?esC!oEAl;d-#E|W z`zAx7R_uIU9X`8*j}6t)`+XZD4v7u__Ho}6Hd%Q{>1Frg%r>6>$4qfQqR0zhh#ta& zwB1w$RN=&i*N9@~LN%gFzOYgqk|wd*(N_Zf4N*Dg}OO(H}Kku?#i?x^awqolc+F;l$T zTlz4!`?{e4$BjvxL4iU<#v56Qs|t2ioiu+IbA|eYrm9B5t`;G$X*#e*9_ajZVTMR{ zv6*g4l84`l8u&pbE%1)Iv}q39gI7JP`f|t#P~Sx6s}JVChy>*~FHaPAJN__2jJiB9fLM4GPF$vdDCIQFWR0Gg{lDjNZ`^sF(1 z^w2u^9n&^iI85#bWQ`D%Kn;DEvn_tncg_z~%95%pS3dDv7gPnY7i{sfL$0%zG8WBl zE$+1izb~##DME=L_GktL9WJb7p0q6O4G*NT)j4s8@ivJP7JsX6tvgJge_zHM5_ zxD7QZLmau&B&#Z!qXPIOj=a>%rHkJV9G9t2b3DziYuxa?eW92u{}#@;!29Z6!iiEE zSIX60o7Nmm`MG@tha`5yt7=e!Tv?FH3BuMVxMCOx*u!VPakd2r+&=y5km_(f&3ZAG(CmizPqJX6F)WjN!#OYN?-1Z2Fp;qhvbq#G-c`~JbvC)=)sXuU3ST<_B z^e-TuILQzRfT7<(+=j-r!NR~s&r7mu$fcC!PXuwsBqwspNz38?gnNEk=TKc9e?(~? z8(Q(0R#Q(?MtE@p_(^^VBi^f^!qLuN-I?7LPIQU+m?Rk%shc0M1jsq>Op=kSroubuAZzx-u6tWDYGj}{N& zIw*Jn6Rc62=#TMvKvbiK_m(eCCNwc_3h^+C!O3LesR@7BbeE;KftXOhPE3ggIRq}4 z^JvU#oOE%S?xe)|nsJ!{{eIYaAno5&N&+hORTyJ_Iv0O8q>?pwaY6m1SFBGo&|_gf z;I;4E^nSf3vL)PA)$A-(P0%4e@9I_?ctW`&WpMc#O*CjdYC0G7Ic zg`!2~uet2=wKW^-d2EaZSkS0iN;Dm-T-t)&(aC>!QWS*j8l+$vR1fa#>+$0(H-mdv ztH;c@QuCD^lX0h!^s z>!bS0m?wK1lj=EcbEo2GZ&+g&J(K+ynDq5IzV7&rc~p8{?D>e&1te=Mx$jI>RY227 zit~S=ZvR6XB~JDt{7K<>^z6qXe|?e{+^|+!QQ?g$?+Isxj2$1wW}4YvIfML-#E_R~Ve#34O{ssxKUvHxq*8>HQ!|R&?WqW(1N?Zg5KWT> zi&3tY%{KYiF;!PCZ37^K4U_juI{jX;RH-T5DNu0!7F7LQ7UMm1YYM7-Ip~{Oi>mr# zE>_!nBCdcHKda3a>ok8nqWh}~bfi_374u$~>Z11C9@e16?6TC?99gK_fQ0E;@y>t0 zc7|WPJ!h1=e#c<bHK153!OCD_sp z#hasDl|({TS!l8)7&ES{UkpV5X3l?ngVYlZF5kWzKU?(GET@H!b3(Ac$_qXZ)6Nlq z>Z|p6ld-i}NYr#I@Q)nf#SSnm{9Jm*##md^{syUYr+a4<3?_~FQ8;sgeZf~xY?2cQ zFc3Z^UYRUT9^pzRS4$FZ12!+4*IvU^Q7~lEsFOmT`*^`m##@P)rG5OTWC4GmNG62- zWO&u~ci&b1!;|n>SQtMck9oN3z2>z3PONw6%Ku*x_CSBETU-||`YX=OLky$AWX?6@ znf=+$Zsk{MD$cesQte9^4VXG^w@;6If;0v>;TeE-pl(UWTC)JXt^J5pDV1xBTcL_WTx3f zFd2)jNFxl(xAK=P#o=DD4>ZY*`$I;wXW*E3avNfvF~~jFl}IbLzA}1R20m?GP!Ft2 zm*rPTXuhiEX*tg8R!oVm&bsenm}xEEV%7lV-*R@t&gd?v3g2xH6X}1#aXc~}kz0*T zEjFe!dDXVcX+Ky!bU4R{!H8#)P-L)g%ALr}t2${iA$4YIN%Tfllvirzkb>Fkw$iYH zF*0mZMFY#wg?c@gjOIGRJ#k(3Q;O%=u(O80*O;a)&CkG_rh^!Nu@%mKxR)7u8yDZ+ zdSViDF}>wFHVSdUI9q>3alu)WsK4*gX)i%AWwBf+2#7X)7;D`LH_Hq+L-7Vql1%b` zoU;KHk<84s{;lrLN8zwt878q72Ch7i%kyUs%zkBd&PDUqXRO0&o^wVB)*F{j10|}F zcRBqQp!Rs~Qv(>&1osMU=V9uV%CgqFsO>~aN1nSEIZMMp0p@?kF6GR%bEZq@HcGC6 z^$thClh-{hoO7I?%cf4c(PY1GFhQPiox&hhFB#A7TbM>4_ikJ61QPX3mDE5m z@_%2jilW)Dh=&We(>IYD_+!EcRwzS?Gy^|tQ}$TTEH@JZt# zpE4G`zt6#M>Jfk7EzEQ0v3;~}o6G9X**3;SHjP~x+`sXpS^TQx1||^}K!{ao0vzmJ zApM~l7hLdC@7;x6l7IpK(l5a55&-j(PWL?uT5ZhwDU+DKcir(#O4&0=^Y6u_UOdZ8 zRB7d$1;ouU3nX#zdxR979aSD#pq+pGZ;uF38s zk6Fle2wpgoX1434{XwAU(!{s|o+9Xc@|0J84X1wsyuaJLI5#$gY|o(+W&Tj!R6Q4$ zPsqQLfp*v&2yBRj$7wXmUh-DIRGTYPz0tEBS9N!<|G~((zQkv0tG?ay$R^~SWy-m& zb#JrwxK%BlS7U?bQb>I1P{?(GGEX*J)PP_&SDGo-dss zr?P)Y{EX}JHkX%Tk0kdX$rR@}TDi_WNvAw;P#r^Vb&+a0>T$Zw$Fnt`eXV!vUa-&s zM6aYZSqN6FF|spmYKu8opF$v^F1|T(+P15CC4`(hUc?~<_6?Vx?=*$?c;ZB9S90S| zxw2MNx=KAdDCTX)HI`FB;_T4xC*hi!o!5WDTx@!~q)@Ck><^Rl=F`Za$*0wg9*9U^ zn3hKoOQ#&BL$l<;_`KsbElH>nM%Nib^lz zr>_&7klpbq^kn4=DDX5*3ZFRS^n9QomU2MHYuIZ#rqNe7$ zIKe2gG9~M)vqgi*Qw#XNuvj9Uwk=5H2`|WoMB-k)ri+q zRs>^d=$MCpm=}(UgYYPx>l^VUx54-IyRK5MW*!0nrkc57mhAo++nWqp_@ZfTsO<)g z?y;VqheV=@z9Og7YM|v;azq7@Cpz?_KKTrzg$ILB`CtlHVRy`+Fn$hX11Y$zCrC2(DVWof6qUD%OT=>Q^ z+J^jC>@em30($lTXNtEHJiw*6r|cR{g@ff-fLh)s`KoxJ!hsjkL-@W_i)Z)({tABD zXq5H93!#R5ZtB=mqG0cymn*gReao+Aa2k^5uQ@PNv(l+~56QlhcGd;GP9bURqb5_g zf3tJ7-h-cHAF#-|7}S3%U1rfbaAV#)bH!uvyb9Ehs~KXXl_r zZ&r1`LLZseIMt{a-pulcL}D1qAWw_$&>nho{m-6AqTxV4E5TEx&UMI7CLlF?Yuam8#$vs7AU9e(oS^?neXjE4TXX8rt}iHsg)6 znhyO=FB;|%YNL>bo}Dp++vdrQjzmFBu?x&9Jvz?@_`V0$wZZ*TS{tw$Gr{aM3QGQj zq*p&tlNdwZ{!f42#aEco=@;cpp3h;qWlMB?Wb)iLk*V2z9x?|`klZh$fnNbw#~YMj9vCdFkQ;K=WIwo{sYUa!DBqEH={f#TFcf3ZCDD?xSdOBMNiD zAY(OGjM0DmGZNIpeY<~^5ji7OSOR=LQZhZtEgOrXhi!7}Hys3WLlWn^6$FJQ&mleT z48Qt*AD+8c2U1c3Fr>?;a&tmxk9vb`p{F6MN5o-?L|0Q|7K+)*`L=4eph4=t5J348 zBOJO{rFB*lD-j@jBn~<$H^U8F-g2Ji=YW?2UQmBRcBDLVlvDRF0-AHB8FpV9iJmNd zc?|HAX;CDf7!dzr17kxRRy)#WtQUr)f3{2sC(P|$w)h)V$z2gJX^z2#Ez+6G103WR ztzfTV%XK-Me)C7QWS|0oSV4z&KBQ(Wu{QYVy_30Xv9sSiS{YSl3v&%+! z=EZ*`qUZNa=Z`p_P7lDP5aDC3)RZBn@_oy&PhLY0T|=Yw;OEwbXDY8-a&zNl5@n|J z9uGoXXPzOr$N7YtPosD1e@wSWKRZS9dZ4I++k3wrBQJy~4BpwO8V(!UiUDOa$rw=N ztZ&0+Gl~;vf&esK-9A&#VFUOzw+6(VbU}aiE-2qyN|yDpzZ4|`!uuwTTb@V;)2(i7 zfcwY;iIC92H2NOxd9_FE&gOLTRJ(Sd9N1*E4Mm6?cBNI^jr-xiL7wzBq+fv1 zyf))I)0m0mzk9#A5q(GFX1fR<5W?eD6IOuSZn-HQD7~J_jn}G$)ojcf*vjO`k+zP_ zI>tupmL66UE!S$*o?lRoH*lh`=e(PURv9u@b|@R6=H1dyc*uJ+#a=lcR~H1w{|ux% z7m}40)dOPB#x6K`qqlTdJRT(n){LiLk%1EOm5$R; zO76|BoHv#dVLRd(F;6@yjg(IRH-Cru7Yh<9kf%sE%o1JYiX#p<1+Iijs<@i<%8yR7iheyF0yb{fB?= zUTekQ;r7`WKaV-6Pd3fQkrPA+%!|Fjx@V6~6EN2t28ilD#D}oCL0HCt(?~Mp^4k>pk90NmOC%39|vj;zTpm{3EG≪ z8s}vDfPAmFGFMBBTdIHm|89ZF5#==Lu0{3;tBY@*E3bPyUJ(K6UuFP3VbI(kLJ_W+?$99*KsZ2-;v4Wp=irdfvBB0N z-r5Azp&R;L7KSe{-Pr1~;!~PfF{V3u=K0VWtq}5e6)pA_4CXLy zIzywC5e?CLAnB5{?abZ50rSL$)S=`u-oj3gr%JNrURZX7cjuvgDZJiGLPF%?fz=MT zJvkr3iKU)uS|DGapcU79gKmam_kj?QURrv?ex;&KW|s)Aor^5<`!!c!=q!Hy79{jZ zrY*~&b+CUfVr9rNNiFSnWT^I;*1*wPL%M#~k9Eedye>LtD6RWF#cAlGK(9o5rd6%) z1`J<+^cg2-xvKUoQD8WLu&*-97Z)txYnBtFci}0pg1ac(yrv^wi< zWh(d|&6!!O=xE21u3)Sks)@A~wrPEuL|U)x!Ijl{-SL=64un!sk*?{&&KB8#!jmBc z3$jSwid+8xK&u5)HE|nlQE%*mY>ChWqML&lp(Y`XUNvzm!-65Di!)IE2l;}HfKK;G z#CU&={8gkReJ_Y~ZqBg9)#+km{udI%c)}P{JT81AnoZfY6%|j~u*U(0qb24WHG=&w z-+YmzCdjYlrpFJX?RJ%XkR4$@W$k3Q)?ZQvb|~{PlwNIQSz= zSHyscxQ(t=d_?(@ zR;63x+;z@$=@ux|S|#x3dL0FY_a5^9Uze{)Uz&78pF&|Bj>?K|g2^N&y;RFFd%=H+ z$SJ8FU&_mlC~su_1#^i*dg?sQM$EI*3AdpJ-Xw1p{3+Xb@T!_v{b$JvZ4W$2KRJp& zbZ7Rs?Rv;x#Fijbnr8Zm)knGGryvKK`I6;1tpUp`+f?z2oZ22j8u=alq_~ zm&zx=6^6}@P*o+}zU^m^T{jTO_?vABruvE&nW3L{L$|NP?T@+%e4N^bdCrd}&OlUO z5v6&K>zlt15FF-RY+$!I${CxJcUHsvOF=A-T)rGcjoP%*Tenc(Nctv*zQBL9+O()% zHL;3=x-4*@)WBvT(|SO)1>odU9!fjE4obd#iNMtx$~dM`&A<;X+Nn zb8pdH;w3srgl;=^zkzAGdcd0zDQ5Iy0^tTZ&05WguQEro$czJ^_=YGfOwNTfhGj}mlKQ;b0OnoM+iA;#k;(x zg(Bbz$8^L+iMjWS{;OO%y+AEVZ>BDIiu&5YC-1RP)fF+1R$qS12?KT4;Y%!e7dd+pZR#xGxA<`Xc#cTISm{NAEl-rkgdVM3p$9JDPi? z$sbQVqx@4p4i0!q)TA7p5JNruq3JQG`*inDaT)XWqVMI3?KfxRHtPob3q~e_6=q6> zy)drGQ#oI6QnpW27>>h5A+b(PG=iW9)y*g}J@FZP92-gv8A# zRC~36$`frTf#Ht1OL~E~^q@nJ16Q*EvLLSm0#I8p1N@vmh!U3$;9wTh!I1>{fCxHL zfv6gcDZjN*O5~bjTAZihN<8XxxKe@Tahvw|@_SCJhcYN+RilwaCog%o3ibC?P`QFI zjS>A^qo3LXQo(ItoQ*yc;kTy=T?JWqS@H4 z4pssNv5*Yk54Y+0fQvBCkjF$^_|Jta6N%fU2-}hrpdhi(f%+P>v;wzsvmcl$SVqhS z!D+`bdB!1AdVxSJcs9G_d}&~20Qam{ALiPiWA7}=a@2o(!gO{{wm}7DHn0tVv75@0 zgT8XwRcNMjs6Xa&l(*Z8(<)>;vdTkG*qoR+fe8-lcgdmO8jk^JfkA; zf`95M#!vL*==jPc^OGzos&6sNlFYd;f9b4XFP3oIN%W(xhYZSnjWyknc1mqV%ud7ix+cs z``bS)xi@#j$gYw3K?$;2L>iZYU5$ZZ?~r~-G?vlK21heoDU(YJY)^LF_c6;PC9%3R zs>j{v=~2}Rt3Y&l1B?za9{`(+MPN@KZR&*X#;Jd3ak(+oHqNJoPpWcFlxO0R`T~r>3VlH~0VqtXgVr=1$Nc66M?3Y(Q7~xOU*=d!lmn z;s$>ddf?*m5bn_I7 z~nnz8{FH>qf8u4diQ zAU30lv3nK$sPpSUX~z6x`oj^bDARb7?GArc<>2UFc&77~I~sY;=JxHN@I959u|Ka z9KkLkQJj&_H>xv(AOxD%khTA?5ll zfo?p;F_hncF=0Y<-$L3z>1A$OyP{Z?BQG+7*vICLsSpjk=Bh)&lVGB@-N=6f1Dbh5 z8)*bz;r`dRJPHa{^;etP($=!sE`x(-HKRD2#A6A+OuB~Y@GzW;nE>ey89D=n&F69m z31s`oiG9Jw%K3-C;D70@smHN&LQ1`p@gs93Dh;H3KLI=RDwbDb=a@PGzRr+-BwJn0 z_H{mUC%Vhe7yX6u6*mBLpfZ1{6A;nP4vSp*mc{d;i;;ivXHh$Rj_>Ot^9eh(_4VIC zBQc?f)F(dw9(C-1EfgZAfxBORf%C3HVU%jZGY@w(R5<^APnJ#*W!oJ#2#^g3Y3BWx zrVq6JO;VBr2bVu)Vu)xKD6q{=BhBkSAQ}9H62JHP3LK$&21QH8$^m~z`wU-Q*8Oc| z@+6WMohcD2P`r|j!`QRFHx|r{KP*hY#Z$hox=`Y!xF#SQ61Pa&X?I$6CaTrmsSx)y z9ntG>gYU&Gmp$U2jd5W$$T8^ZSN_8oXu7c?k#@pz#1O+mwB%0o8De5W#4^n>J#nx& zuc%As_OA_%mnHOPxoUqE88psNXA8Wds%4$~VG$iWz7@}XURP2^EeP(TFBW)N?!3iA3@nfiIT1MO%{MUSC>jk*n?BKclb z>X$8bR6-=JB)23a!g`4T%7u$U!<)(0{)V8C0uvuq_v*xP%6Y2NB&pnUB($!6*?Fpi zsrgdWon+=c`uyhJJ#9tve>kNQk&@RcQb?olhu~?qXYaWTNK~g z42N%Nv6t7 z%1`!2bbTUxKziekY?kDJi2v3JvXRl(*)|Zi0enn#a#?+x{4_TtQ2tC^EC%>j(Szt+ zSY5?pOeT7%>fCvM5`Ys;Zc4*!bIIEV0;?%Cr}`>c>4RqAbBUL1#-w5?N4u)wm>zR( zXm?zDk0>~5rfe$$C0PdwL^!Tr@wD!zm;9s5M~t`dKuRr5RggqpeG}#pPL*6wJl(R` zn@2n*P(=y!Td3;76M@IY6F7<4+ z{1_HE`Gu0u2`tCBI0(TjBPA8WM{ zKX5(w2VnDm>G(*~h8$N8NnOER3ZuuKIh0YmO2fyXukn=2>33<*3{@~3Zk+3j@ z|JccFMgF&)ZXk3y@iG}`zS3zO+|BL?@riw}ha|v%|6S`Mpr3v@yIDrVWUc12Cd&_A z9{uC2BevUMtY7Q*sWne-#His8(M;(9_G;%Y*IPDA{w2NNX7U?Po=MI<)j7tn8PzD? z5rJE2t|)&U`jt<`3kud7RvwV<1L}OsueX&Z*1~#Co#sfG!~ee_Ih<`Y?c^*pt-QX9w#M`gGii!tf5PB?UFf04QgJe}Ma759gX|KH zv=NPPQatxc6pY{BY$4^2G$6bhZZ2rZjK28S=)3&a}S&9bJnf z=>(O3ypFDRPaw1^OC-oFNp4Nwu!?d}7 zP!H<>7M6a{Hrm75$zg0kZU;}_whgzwcaQRH1IVj1T$O`7L7K>jB|w+; zl2SOp;u40};9zPBGqMa^=FLyQ)Fr#!h9d)WxDf9`#|QySNCxNc^3gT>hDyoT#uJsa zH|@2UF2URW4VO^gWf*Ap_S~I+(|Fv7DgIPlWp;UX21)nErbMuXv@wFCEi#EJT^o_~EwNx~cf$Ku~vY2rxh?V(w9kL(CJ- zo!B~gnF?{HM0Ef59U6o41w1pfv(p!_(A8yCAc`?w0J1eHrc&&u<1F6w)@cshV1CQ6b`@Xrq`^UIst6Wf-#mV6m(2)i*t%uS zy08t+gQ=5302mJQTj_Q)Bo@?_*-*J$)m|_mtuy5|RnE%Y$)7|GfszEJ{u#x*7*tiV z1bb@+8}_Y_V2x71o1NGrg(Ql%6uT2-B>(zLzSN`#Jhw%E%*t4Gt0gc$(o&j)9dzol z&Y8D*@J_fe7P8=_#1tHCf3kxNV>Os zC>C(gT@c!7qY(m*p~5GlSnEjo+btyVNa`3$N^luk5q6|;ub-)v zjTiUxz`;jWPb&B;$CcUrS>z9d>_6B%%&2^SEc5^+K_`U6T@j5-3+nT)J4M&+)yycvkhs>38@b zKboEuqw3r4YCG@`ZG+^cp=ZMuGCA9|2>0&;lcFcJMCYktx0b)tc=IqPKnC@XtOYe& zlCAl795i@PIiDy3!0@4^C*5#!!;$xn(Mdd%(aQDlz-wt>TEvT4kVks^iXb86zj>h2jo(Vgk*vQu+lK}bVTBV#ImA*O*1aO=aLxK2j%lRh`4|@hk0TDum-7J* zT%VK%r_0DuAPok-^Xw!R?+?ckxa;~_S}mKpSJ}vG?85Vse^*|9N_^YKF9rk4a_|P5 zgUW>B|5CO@dA#17d&8m>zT3sI_9-at1;9stz20KRf+`aoD&}_Zg}F|~R3{Ikb)-&d z?s;&dCKY~VY>>1i#bsBL-q!L@QHdDa*UbLabmYMOYlXsg+!cQEag_OI84{78iq8(VSgLlV1|sKV8M zK}+_JZQ&Hli<>AEE`oH}wD%Nh`I*>LqlYv&BRXbPJ;wNT{XUm3Gr^qCNoIUo7jTg# zNloOJd`JU>!3lp07Kd$w6oW66>{l6*>r0kMz|zE;kfH-STb<1_3YZcPgc*lBpO#2l zQ7In01FFV{GGo387MU84Z5|8K=ODL#{cChQwS0IJk5EM~!9gCk%7xsrja(Ua{lrO+ zK*coG4diHNEaC+4+3)%4bjl}} zLR!^QO!?Jv5KI$*424VOLtKIx@JQ=Ml70H6A!^Fg!D&@mqpZc%O>Yc`1)y53wg_5tO z9vKzG9cFBR;>_NX*yRuyf_;P>P26TkWirWk@W>q#W;Doson5(Nt1RL@ECMc-&CYq~ z$Lb~kZcWnD1D@34*5k&OuK@FPED8WxkV`Aba`i<72(3jHt`I@i7tb|+?AfT81uGYl zsG?2vvM9R>YaYNEiYdtG_fY7EFQu}*Lv6_ufLNZG!MA=D4wyxj>56{Q&5@^Wmh&H9 zjSzpoWSjvqi2BRgHid)wI86Fc?t>H@=phRVXtg;CN&G8w>3Kmh6H7oeHu5g{u*~Xp zU~oqjE|oL_*1Fjz*S2GSu@ve`8(f0LY@#Boc@S54?02B$@`Pqvbid=QB`ZEOs-Po)n_ZFE8p}|{Y z=tEH{U~DJHQitlcb8d~hww>AxNGbbe(7N>ZTjY-3Xr-L&Z}@P3J(tC;ND#>Y*O26i zMo}(uzn-z`B)5eu9gb#goGy{8+iJV3Q~tRz?z)+EgALMs88O{CB#3(;#Fudva7Bt^ z`lTG!wb0WkAv47cuQ&BHDCQoMe`y5Y!eOQc0ja5Z3jxXI(?AURo@GA4QLp*KMb!-3VLmgtvdWVJ+ z$R}mT7@_%qfrA(S!>Od!nSQO*Dus9UU}gaRQsR(MvO?$r%)h<5C1qvoK1fiMJk|EPhiBlG(Lw4XlFo zbPmz)O`jBh2+6s5hG4T_gx!xWbww3Zs|7V9fs44bm-LY*3YuCHF(|bGJi*(~`DBws z!Cz1%zXCbl^Fzx9pnskS5vd-i?fJ%zLGAgtc&%2s@PAV@u#s3C_2Q{pmiiqPkE!JnALKn+tMO}-NF`z?#DnGZ~)Dr1G5vi{Inhkd=fn(tD z^Ta=$GQ22`E*w&WR>5^W(ILPOU=$W!ZMLiN--Q+ z7Lfwl4g%A=!mglf@hI^?50_m3 zN5RTvG9^$Wz6d54$@nKux`_--=*w9Lo=%Q`P@e_EbgO;zMP_Y%rhy-1aYpCzZ$Bdj zlHiuYr3ej;P!=tvcLFkeEQVl%o0mZ#Z*TEz+nE@xKPyK$|mhS4a*{{7jf=d zlRYXfFzL!?mgxNdsj7uJEa~oka+O)F%uivreM7V^rU@iV+yT;VU4$S~zV)+4GpwqA z(0gB90$7Ac2v8!~x-tduP!F}W+Wjb@{L;!&D`~3)P<3;2@M0m=(Zw^w56xLlb99oq z#p$L>hipL!tJ6ENR{7V0^9x5~9*LDYw;8TwAVZz@X+KzX^XwpkX%XGKH*q;%Gb8ii zT{*%~z1bWeuh58Ca2tot;&HAS_&*}p1MP($8{U!K-5i0|Beg<*qG z4ijagr@wc}^jZ+Z&60`pg)s`oB3J&ST>b8?33}g4wwdVZ+C`8eeK$%3iy}e0q-OMV z&-tnSp%1Re!(8b^@yl>d_b^S!2Sej53KCcbBzw}fzg^vl3Bqu(Yax1bWz%PW3*eqf zm-Cl=?^0Z3+e0T39k9O7=w7!<`Cj{7LAi?4a`*K^2z7_Z5T}%F*jT2GDd%K`(Zbst z=~YOlyyD)07U-j)UeKJP*cVI(jTdr9<|SU1wYAIbTbF<@#C`-b6tY|#kFslX)xXfM z7&AF*i<6i-H1bjZ5~Q0UJ@I*epVEqFUD8qPtp8;ujN30S#8dmi-05LX=LB+IRn+)aXaAc_BzoBeo~NP`@vrf zdVe^^gyY)VeVk>(FFSWTBHKT)D3(%)g7_C_L;htgXw6mb;l~(CZZ8qs)ep5+x+PAX z&N({rnP)R6UD?j9p_I*jUlGWyyP_HXY8m#dQ18HgC zN8)A0g~QUWIacp~+5?|GNmiOWQxINO?ryK6++KwnB&6mGS*FEIQ9c)f8WHpIt`zAX zDOqlI|t~Tw4QR^yAS6JyuwYA-jO?nRsQysCdLkzpHZU@qL$U zuvJB;8X%_%-DuWStC9IPVY`%n(JlGRMpBX(Mh6Vu!4#Vs5#ZC~gLB=a#y~J8>(j#8 zZjfT;&OknY+6Br&BbVc}CD%hOP)7Mt+mn%lc+9G_`qk?#MG`H+REElW1Yb>shE~OO z`dytWM={S9VQB+5cvn&e)WA1Iy#8ba5Xi$ImP z8xtg{IM5oR4o7xM@jqI1qNP(A3hZXi)J4DIXBM-QZFQq7ELR^aQ3)Z~uI)AxJg~jp zABt~(;kOAaDlh!2QneG%3^B@EF-r2Qvr+OzsTB26dBV#q2V&Ee{<7C}Ps@{K*3+lR zCL5)!m0R14H4VyoTl>nw!hsp!|FTv1kaQl_YKfE$)lX4@-|G=f>7vfWhHw z#_FJqkzxIYO)Su;FQepiM=Z@1eUU$S(?11&%iYUX5I0Te1*LiC&rWxFF@3*nOnet| z&j)_leXel?^HP1#{%Q0Hk4*)UId_P;K){(}>tKN~vmH0b&>4s>r|Pbex5GGT5gGd` zG#o%_+{DoI{8LGNGjnodncc2~!A(NooSZR^8ekBY!>HqCD6apaLU3aUm&Q^Da0tDB z!tPB_kD6fSY=!on$OTFR94nV|bz&nJU9&@+-AT#Vozv6DDbs;#sa;9WvZi~Yq z$X)l{wLWzOI?VAaA5*hn3W)zDK?sT5DdhWFS3}51wB1Xq3F&JeIV7xUn3iS@UA*a* zPA7IKhce&j5I_?E&5?9~0=6nZP<`X~FGkBk<(K1nmjo?RjM)NEX|}-!F&$PCDoe&t!>6?LWnlyFwJQ?W~-^>C*t2 zdNvn_@j2fTw=PiabCc3?QGOV^^dzm}sc8!VyuTr%uuk*IJ{{F(%$d!I{i9CbCN52K zf2z2z*T%o%UVeEqV2RR&-fB00nc=1L5f=}BC^&vgRCXE=^c4j_1BdEUGchOcK4e*^ z`-`b+)~WSGmq760uyY{V-qMC>uHu5s!{zW$@x${wgJFeGL{J=z^wn##p18yM0i9Zh z4`h!rkW&bc%n^u(^oNL!^&ef4rvD`H{0013rG)E*k&9o8J924B^O>!Gt#~5mt8R#y zqesz?l0M)X95tGUT`M`pOx0GL)Ydjv1bN1xf#z6SBK#ApW3c&6%-^akk6CycH{IX% zPpw`@C}q8m{85~uuA-12(dYMRWz#rq1CIzu*4@4w7*M!ChT8I!XkJ{B$ROZ|H5b&Y zi}1p^^)hUEB+{1nSje(}8x6vn=r3qh^H}soclV!*gYVxalXd z<-6tI|I5`TO}1!Oc*v%%c$-Jt41AJm0G|1N2r>@(dAFHHuMdiT?APM& zbt1JDWo_6ryoMJ_ng2La=jb?4qUJXk8fAXtV?;dl9)U1xuTlbk>2>2^z<&emf0wTu zM02UQohoRB>Hg?7HTCm2{XU&)(gm)`^ieW1Mk>SAMbW+U7k|0~Blqa-A?%A!!?#%I zZ>&ny!E$>e(6V55%S1W}WgBMxp+aLDr)2zz24>&?n7?;ER{{n5^q9=ueUXT3)1!R+ zxZu6t267g$37__V4tdR{Il9ofkSKTe9{SA3o(RjI*u;Zp59us{{h|GN1kxCnN&IH= z>AD`$ch}vp<{k>tH@-a7b}%msrvMvx z`JU@FsDu^|LX#FC=vpTQ7GHf6k4%h0=l&xdxiZ<8q!+7yCq-&*XUG795UrcaKRt@I z+m+i)vYJrNixcGuC!M-RQ1@1W;-PWhJc9sesb_wPNb!xk=1ei@xZ-wTn1!mG1Ky7%xr+gm7$CGoftH z1aF9lb#(@CgP z7Wln?m%Hc0);h@zw+Qy~kicX-=uRfkO-}uHgm8srEWdS|Es*8wj4l|kaCJljjhs3I zDda;lK0vk>v2Om}z_vcr0qAHLcvPPcHpC9LE?fRfAA2WB!bWH7euw-lil>nfZr1c| zyX~7+-|5Tdh4mUjaZlg)xDA}1JCxHO`?k4%Z3Cqhi9f4ZA$7~&(wF>_P5BcP!T@@} zS~3nL{}SvO)xJoqUY&{zG|$K6&$>k*xO$EgggC|%=u1->p{$E!ggsP;nG7&sJ0?_QWhj(%<4!#MN5vppah+52}*!m|)jfEHnn#**je+oos91@}zg|G3{uf zPB{lnCQ+G5EYbj84jAF7GXX&!bwQMxX|sJ)QIX)byDH6(vn(t>nl(33fqiFR9QL>u zzVkXO|ERN`R~wEUxr^&k3eyTVX(y0>r@}+OF&pMAnw+s&0F4SFnwrdWss1CF)mU+Z zoi7rws!*`9h|HfRLuJ15T>FBRnKTS_$ZWDTo4lR5Ik~&XzF9)=C1{9$Z6(rR(-Sf0 zgZWfEI}e_1i=bGD*H$v4HhB2;SO)pj7L~l!2wB}mWnT^gxBXdbY#nbjr86OaOoz_@ zG!|^OkEU{Mo<@|P2oFmiUbX+HSO%Q$jADK(rKIlvng@)iVzep>T(<{7S{=oZOZ1bq z6qW&D%B}lI2Cf3`V%zXtc)ta(_yL%Xt*W^OtfW<&I-$tA*JUR8D0wvOnps%OIO8WI4I2= zNW~0)dc_3ibtPnnE6QBw;$-+N$)LfL5$H1afnKXHC1;_J}z9BlDBV zcC2VsCfS^Nr{b9FrUmKFnDJs^f{=NK+|b86s6B=pePn=vS75%;EPdUm>{Mcy)tMlX zgzk5Z;%Fd9LP7e$-L0acHyyVpft*PHxDFxdfhyqeh+q9xaP(-=MxZ4`T(5o~y={j3 zmL0c4JE$L%57VT7icl+mv>=d+rs`tlGAu+IW`^G(9X$%|zLS9A%3qpYcYs>n#z%tr9-Il8G6Am76v)d8bFp6I1>A&+lmR zwT8e1Q4HN6GEnt6JuM|ddop}{ReauE!Sk>#oFFWY!~4^X!GQ5mm8m z90{xDYv<3F{H`W>QCWYr1%9cE;M?4q%y2O=%UhI}ol5mwFX$^ZUK5hAKe?J%Ir0rT zm!8TWbbCsFigMT_AE=O=;tkd)aLjON2}9pBgy+dAyElvkV%0B$JI8_HYE~-*&uTSe z;_1)<+j!6`HCl<8^2s`Oit-nZHe$SKGuM*aO;N&#_R;;TcxVuMZD)bci1Dm7^{{qD zGcJ4AR2#M;u@Tl*icawO$wcO8P<1PqHHYY*Zuua8_sHkVzZyazEYr#_7AAMxZ^Tjw zplJ!$)JrSU&AY@Gs0A5W5zWNhDK^RNerUAUbHUPB=sF3`&N1(-N(6v9%6wUrgWpgN z1MXC&Qi8l)i>x>9<@l^PQJ9K3tt&Z9r6z_a*RME=QnT~8TbR(vSi;B6>2O|a zu5ZYH%eZ4~@u1Lx-2F-;Eu)*~>R&hH)qDI;X+XPVoF7*=J*vpR=VbO+8Qwtw1hA&i zhb@nlJgA8Vck%N|Fc%)6sSCZBL|2ekEUXx z0PpZ6*%KgHJ{HE38ST$cCJ5xJuE7lx$Gu{7(hhn6WdsG;_M$lR( zm71(@(V8u}7hZWQrDM0as(^&$+7y@*u?QoDI)6DV!ZJ#PYk#NWMH z|AZeKVF?3Ew31pio}94KFAG4xxk|wFmm2%wlEP~B5UJbh8HzQTTffTz+&mh||I6@b z@SRnUC}tPJdrvCE@5G-h;FJ6JoxIW7~*7kDt#n7J>T-oC; zxn>qa-bWA))cDk#ioI07(Y7r!?CNUnLH*s$-ueA<+B!$V#KE$YLGRAJ?oL8&OI(h4 z0g$6LFzDn@Tf8mZz|3~3I(xhZv=4bOw3z!PoeE{pCd)LSpQ^@)x)cC^jW3<6VJiT0 zX1vcZ%mfb4HCB-xHX9O;!dAy%n7z(nV*m)?FgmzjQf(?7K)r-lP0P!A&3p{@`N)~A zgmW;7Pqcz51B?vnp30ZBX1)n5O=3X-5kwvoW4;G=& zLs$1~AH~cdjFqr)v3G2Lf&*{lwfH!Wb2+7MlwRzrhI4p2D{!jKGng0}UY88Q7Zo1o z1tS@SfFPm9;Gtsep3;g0cy!svDz$KE!RM4c6!XyTPrgc2=F}>cV1r3;?3`;3r=*>P zNw#ft?zPG+PO3Qx{Z0^$MkUty2MWB!yP8uhm~pZ4CbYl>d6tiVkzsW1%>0iMh;Eaw zc}|qP*sWEhx#5ikT00XQe4wR(K!Q5p_LH%-)Ve24>x?bqw2oOZn2!O1Rt36%5=3D{ zTIyANW6;-GLzsad_Oaj8rZQi$MV(g$^-6Mn+G?4KC*#pf^z)$;^C1+Ud`2+c!m9y-f#vN*Gt{%9H9n(CbvO^9U2(i@y=* zSn3kU&_!k8KCm>`TK0|7Xt1gy{QC@$3({3^ruyi!zHGFD}sY3V}!K_scISTI1_|x z^^JJLhV?E~4NzTHuW32aVg@1pg8 z(VO%fAv#FZL#?ujNfhBP+a$)s1x84M%tm_LVYvw^IfjlYK7eNDy z;N3{g;=C2GP{+_HRnqZ${N7YkYA5xw_#7AQ$fm9G_%M$I*=6{{CW0W}jN2AnMUjCe z`0HmTn`F-Z1+eL=)`}KNqm#k^ydE2Wpce&2@_QVdA{f8O<|VzTb5$p9dn zTifhN;ZJrG|Gx^rg0GsExgEInn&y;gZ%>CNo)ztA$S_~uLbI4{_G3v$$DN;{xdkmo z(}t6J29`J@FjI0;XjS1V(IS3eS`Ge@co3-M8v_R9=L^jIL&Ft&BhtpeRBYAePcy`&A${WJ zhzKx7{2Xb(-$@O&vy)xV^Eq#sl`ig-;xmv^H~|O)FjD8|5e;8 zwxYtCU9QYEieI+h(^-(y!On(%;u+z7>uhdh4v8AoTSQPcpUV`|5`Eh&K8lQvPz}Ox zu`k{_gW@~1>J^++l!svdXMY3D3GaXcqCt^-1t(r+-|Y>jzR0ob!5R~%sL6<= zX?Ob!AR56sy?*ic{i_}Q8dd}QUNVe=bvlWKHP#Ec+;TQDy(iuDs(F8ZlwiqaMe$Ta zLWMOVyTvHYLF^9C=#0CVL^*vr!IH|LzgLNkBgP^N_(e1AIS!I!N&~2w3*YRQLCr8s z($>2r-y}8KNTh5H3XQ>`-~o+Z4`z@yV_DHUDGU-V8bJf7Ly~N`|09V_p@KEwXL4f~ zUIRa(Br{ono8WjQ#FF%X=ij)ew?Subhl?KD@#hag841C$LmYHB4NMn?(y@O)&)C3G zfS$nW4JXO+-Ef0gCM3g^lp&IdNp~6}(diQDIw1pa(tEP6@a-fUHj)Py2>3r@B-AG` z0|xR6+^pBU#tYK7x!$10T&>l$bUkI&YjqYMN#ZZo_B;wS2<51Mn;tFiziK!d{^)^0 zZ%Y%3yEs-x&E}gbO3~+3U)ew@y7zwitR|8K&dqrIw1p+hvad$s9=;DPGOJc)%G}DS zjeScm4HspK(2o<|GEGsSMf8v4l>9BHnbP3{&R+$MYOGDX-1zLJ6GClGzM$DRY1 zze8D@;Bysd=h{kE4jw(ER zOG3O8Vfr-mxH3$KgyeS-Q*zDRGz9xI^kg7`AEVzr{|y{}9(2qQfY|$HvxqM|lqWCD zvypQ0dCfzxryTr5sA5wEky!eFo&ETK(v?bT0a8H$CoG#U6h86`^E52OD6sEG-wR5f zq%D-&KCkEV--z|Gwt=oxFv}D+D4t%TnAd0cbl?ETS#8a4jLWa;D`ylJ&*Qab%pJ~W#%wTJCi82e&Q3KbgW1{mL9woaJ z58(I|M-Wh;RgE>7EcYLr`vO0{S%v(b-O4|hw6M&1l^q?O-1^ghHljBqffd5TA3gCl z^J6&NPWgPtZe;kp(&VWc;~Ue+T{=s>xR4_Tecmj^@tMp4)xV7Wg+Pu=FIM!&P;vjz z1x@UKrW#(Cf&2gP8*aif9Xa7{=gk^vEz<= znOHe2*n9p5_iV`YLpPkX$TRz4w$Na}w({ia#xZdIYra5Gcm|CbB^P{!<}I-rg#Fos zc%{3V5@_q596BY>$QNW!%u`G8}8$ns{cc?FJ8vMSkOR`Oa;7|PCQEC|X;MZ8ti z3}2;ru5Tt|bskNiaLzOQwoDD5{zrBF#l4jyw9r)BF+CSY&x2!jv!HG)gBR8UUu#J z1j*((Lxdqpzb-wpPa|jZS^w8d<@h)VvA}{_wqbRf1d{i^&s+Hl1y@ zgETr`b~%w%96{3qPsa_JPECzs3R7~Jn>#~SXDZpupf;~alzp{7p(w3??brU32twIw zORm_?2xU(ao-d1zEw^@#+|uAuPnZIdIy5R4gr!S@6U3VMxEun?Ll39ofy!80gj<$- z5;tPYiT7lVWqrTppn-!Ef^BF1Iq_d1G#DDSr-^fy*(TYrTNPpcRG;pL4fL(5cNm;6 z#+5^8de3>J06uKUZC*0&QA}pY6;asVPOtbd0@c`LjLIg|Q!Q3q;Xc2^y>x<{> z{j4An#X?%uqROB=D>b&H9c=dYt7;zo)n>1JgKhsoh(tnd?exsBT7CX=Yl}6z9;cIg zlSA|@{RgDx7>RHmPB{Fwta5%{TV>%zGJszP0^Qe<0?SWl8HZJWsceUtZID)>*ejS1 z!&p0BwZ@x3_!$!j{KE@kU!xQXM+Odc+tMolLE2#xgUxsXfV`Y9^vnEzmuB3Xgx)wY z|3w~>A$m8e!@AY*+swF=k`3dnA%~o~iXgPiPaD4lVQSB&M??}Z*-m=n3-iZ;c4~i? zIG1o0BZ#xU+BVjI<;(t4=%~p2xP6ze$%l9kj8}%ZLIKR( zN+E>E$=rZY6p@vrhUzUjIM;A+4VhDG!)&VB#aCo)6Ot_6JX46eqSKnps`O2rWw;TBMjdq&p=4~1L4W@yNB(a$E2 zXo(?!Ab|UZNapjTNHhdJ)Wzj4KM!r^o6}GL4 z*My$R@%^2DC8b+ZyeX8l0x5@$TWm=)-d}&RY%+7nA_Jk+R$L-fE`OCFWJxhMh!0V+ zwrK4Vs(vkzI?VSo3v0QZ9;p)%Q|=q7c4v_3Asud^o)*iUD2J5e6wXRZu1lnDq!Kd)d8RIA*C_W7h;I9a^`%q&Dqg4mnflf zO=EV<@n0w!3yWC^GeJ(*g|}H z6+`0oEJh4|7(HEfFQe|%=RTY}>NKXj**Y43l#r?JA(eWx(*qVPukE{1wHop&@oz=* zTdV3G^cGdbFj?x2RFGkd1q0bNCiYYr$%h#f*pjQ6&pM40vkF>&CheIMN!8K}7 zslYIg8tS2=@B+9Y1bw2aYb+%o2cludw^$sIr=|pRL6QHyR59N@Bru4**+Y+EYLJV6 z7Zv8?feGjxKgWwoAC6}G!$RzOY#@Wza{Ph>muayi&Ri}gq&6G?Xx_EWoHJW$Ab5z9ITVPr`8gP_BveBA*}4o-h%Mun_}9MWN$NH%q+IN1SVCeA@3 zerB8RB#xREMS1Nvsl2i@lrO7mN8jnen~2-%oW`1t;jbjPP3EOwxb%Zbv~oQ>X3jqo z5~w@(#xXc$xzRUe2G2{PN1OY9?a7~S*!RsqyM9VIG3bf~X&K+S>Y5cB>aC*{7-p&z zJJ*>Yuy=o0MGU>Z8Wx;M9yRq5urY(2xoPFjU`9{nymV| z4QiSf4hnPaZ(2MMARIf0*6*^1FV)W8cHYQWr-VtvF2(uQTiHPv1x9ZruEM;|k-cKq z)|J)NGsLxv^2EK_sb?kL@Kcp^?vqXk*bHLZFz*!7H{XZA2C$UX=CjV!@2HofKy<0% zIZ9zD`gA8L^8e2W=u)eH^<>%5S$>*-4d+p5w!i7l$CAN^4gm%Dr$C7_+m=|{WO$sy zJ47@{%bN{8h6Ta;8YEYcqC9GqUpIwsI2>@0!x^Xhf|A-Q`VwY>K9;cEanBY$7QmyW z8!xh+1a(ycrdo)}+=zwACZ#PYK)t=w$JjVG8zLRD5f74QtJ^+*&%({(FuUZZLwF7% zI?=pZT?vm+a$6O-4Ag)a#-i&Ro8i{A(YURuXe33xKCEf1az!^RHg#LP;X_lVKo1rT zrA7s?UdJOy*&aL~|7FtEiCT^TU8; zwNc}tHfSVIr`Omg3$p4m@?9BaE6ov~61czAIAyXP^~2|g`H5+`XQK{>B<_oCo{_Dh}IL*(cjue1t`)0qaoOf zR32NzQNQ4PA9(GL<3hU-7_iLnAYYXQR;i$okCxzh4YYIFrvZvBr>da&doatPx}$md zz!hqWEpFz5hdJ5XhW|Em{`C|#NG*UipQ``2=y0=t(13|H6c(IN3af`MkZSt}-PH^` zDeO3|0prf-_cU>9V_!=Xso2Q)(df2cArPhnLmb*)?ivWQGogPVG8>(_kKSSHh|An&h}Ca-n5ao)1jZ)XAu9sBn`E(;2vG8r3BoR$F56z# z+DYr&7#W=FL%zp~&F)gI=_RT}zzPFAizqCAi#*FYdt+aL|J`rc{|$^<9YWbV59_2X zc>;f&>Xr?2%%In=Q=vx_QP2yjI>S#1fEE*Xes#V^WUF0QZHO})O8<)-HTu0oj@C$Z zNCcnSJPu9z*v4c~a{qM)&csSp490=QSmFMr_D2*YSD>3L->nv6bmMzTj<8d%q&}^G z8)<=Z?6Rt~ZC=nGW*!Lx{c0 z4@^D`-Is()O{nWeV4+|!z9;{OJToq zeT_GEK~@6t+J*eIM$DnhKivmd_3M~jRak}wRy_pZ#Q6Pxk&zquRji_M!YmO{kHkw) zL$Flwn$Xp~us4QR7`QfGeS7L3tQ+*gbBi!b7YlFyX!zlvv9ZzdZ2&_+yuY;#H9B5z ze~4t~md)Xw-~i@EGCS7Z2V=1F&gY6?H*M%X?J<+mi3}h)iIC}My+*R<+{p5n{58INc75MLQpd@=1gO`z*oFv zEiK5u4SvU`dIgBMAJ-2yRds_C6ARoTf0KmR43k5zZL`dra~cq0-(Ev z4p}uJGnU}X=nVi@Ae-w&1zfYBe^!K^@=vrIblPi!LZt=d)caIOgWh1DnOh3DTKCQ# zp4HlT{G67D;ja0~xI@>lUX@sZ>?m?(`a5p|d|6;+M7!D8{S?Z7#42g^Hm~lAe_9HC zoSv}QC&Q3q1v?9mmDuf@A;$?7_QhXH^Bd{u{R)Z~Ot9i|v{%(#inhK$oZ=LMMCqWX z>rKZU5;9$P#QSyKdsODxhcm@6Rz_p7&cBiyDnl=wYyD0U0A50pX)>&5lPTx))|v`O z+V_1jao5Aod$;_G|IrkH2Ve`Ye*!ne6b1+T-Tx8BO9KQOHCSPF4_{GEw*6gP<>=jd z`SWcBgNJGbTVm6WuSqwBs+7j>Tt}^S7pQ*R03j@^Y$kLE-|PN1=X&Q0?ae2;t}y+` zuk{VFtFOS=i%p-gJ0vh!Af3yptTHaoZ zLVo60g#%oO@Lpi(rQgIL-6`p%?-5!Wa`2d};oz&XyiQ8d|1b8$&-4TgXfU=A2BCYz z5`=yy+?wXvX-oR?wURZzjqUt!C~!bl$ZXRz!<4nq*v&jD+PLMuQ&_mm`_|WQEF{VV zIFGaBi*Yes@ePsHUzK`Lf9b@Q;#DO6i2EirFe_!g2y{6Bh=8t{PaljjD6*;XrjoMJ z0>^UGCRNsMn5;l*q`yjo&|;bkibblTR|Ry@#@o`#g_XRlO>Pq(yMRmnLr(5d0B!Oh z%0-QET)}W1T0l|Ro||2FpJEzs$M}iJME2;?chEI98&KbHolSV%e~JEJx@DEqt#7C` z0`QWI{=hnT6>~rI%+jdXrfT4@D@#sJa)Nl!{eRCu!JCIouSszQEJvU$=@BU`E+}B! zPKON&o(k29KjM-rhSy(kAC+1H0Oz9y8Y?bJCp+iO%cK5gIj z+?*CZ4T#UaPL62$#G7OY?CW)|1ad)aHf@|Y8-}}A3QBz*39Hkqp!E%kQpuS&PA+R8 zh8>7c&v9)FEt;0hb!nfFYki`@c+u${t^&WhmmX#g*GFctf8s1GCumYfC&I?wIvWtU z3V-JL)~ktCCq>5lz@67u4=0kGi!1IEo*mYl3El*^m2v($dA6rPLW|e7j&6QbpxY7s zU#haEK9wcMdYW=wjK;gPzu(bN%+5z+(A76|jO49uAz~ZYvx2y!%)w)Irg3St z+zGl{h)ttGf5^F<4t+MfCis^AN+s_g&IF7<$x;Ah8}3h3PTE#PzRy6rAbfcx;^f6- zA3VHTTSVs!vnn~&p9v&5cAirCTiMxYvS5jgO>uszx5d9HrcBm{r8b5X+~5n&M&c_w zUIalC{pSGS0`hBQ8}Vn#xHe|YUpkPsos><*=7>C>fAH#ZdPYs5KI(kDaKWKch7U*$ zr2!-O*vnzrz0$GsNb4AxyA5nLka9&1kfTFIPxSwpr^Ju(*Adj_?*#&KEh?~ZWk0n= zUL&Y<)jE;whWlzld{#4%Tw3bD4> zN>bLB7HGSidkQSjL^ZVN3ag91X|(cA5b)1xZt_f=CynBbNjei#ZbrxBfv!7;Z^3|n zGwScjbXuZ=P@+>2)h7-!lML%w=j|#?9gNJ_e-fOeT27fs1&G4rrG#9T+M*)M+$(#_ z^F?;>-XPfrPl+HXROE4WALN9K$PyjyxE{*r@AF>Xrs6rm%L6u@F3=Q*h~qw=aqRW2 zSq+BxS$0ZDLrJfZh_~56Z2mYG;EIlp_LM%rl2L{uRmz4njl}5H6e^@TQv;-ebPvZh zf9v|j$_GR_sGp;h=wQWjL0`sPqOaXSW3j51aOGs+^7@9Cld_!r6uuOvxPOWKW;#x8 z>-4;Ss9hQF$jMVoJW9<{IOK7OBZ+f!wtl(S1so(C{6wkDKAYxAp*}F`673HWFJ|lg zU&&OZixMb#rbM9nxR(5_PkC8qJf_L@f4Unu)kE4|)bjctWY@LXg|3$p$IWw9hjuMg zZJ8xx6e{7g*FA}?)RX;4JAb@_CaN26{{pgz(7?Vl6aC}Hu~u_Bo{qeucwAkp<=zU5 zTnUADXBKtr3pMWXb!8FL^8Sz$^xCb2J(_&pIpG|LbS@vJpXNXKy7!xH(>ps04&B*Cr) z{S@$7uFpGILWiVU!Tfrizju~!)7mRy`XFKjB65j>mn>y-K(+8y1gTpLQ5WCn2Um+9Nbx^EktGsT_oTdqu%CavJ)BdA;MtUb98 zE+$m?g9$Li&+bcTU<`UXeLg)f^V{0CThPsgN_%H%j*IvO*v+-mi&+LYw+a|A%_|V} z>cLA%t-WK@QpDrN2kh;LfBi$>Zaw<@N#!-4R$ccD^7SF7QdsQwBy$dN8-V#ElxKHM z!{n5AC&7Cqhmf{t+sAjxnXMygC$N(8t@Q%9LFn;w!!iJHWhtwtf9f9UzzDR}LT*e<2= z!$p0c4;MJ=-bF&|J$dzi5)t&VWbie@DlD$1G+IeuH7IDQ@1b|ko$LI(XO(f1j&(py zZ0Q5bc4|AdDK5yf%CQe8oW@280h8W|^dlBR7N%lIuzpRMFWR%eqU*akh7rCrUe|#s>M_Q-dZ^`Arh)86=xVfscm_MHJ4$;%ogw(P?b;!U6#QM+i z*zPM`bUGaf1Bg4s3TDAFaCe94A=-?{%xn&^>%8V9i>VQ?Y)b1#s$L%D$yO2d1y*kl ztw`E$UPTQ}%I)ELvpkuP0rAJy$i3Uj@>CSsd_~b%o`REBe~e@(G5n-qVFtJ@XmVwK zQOgm3w^&@MrGvYohguRQXStZ6H7VL^Dph)e$*KpO;D9tC3as|@gVAjgm0DvmXu2ZP z4aOV*`wJ2jKGM5G0yj8-iJTwqy{%vN%k)IuB_LJ<$FIFlSp3x;?hy|eai!V_S*7q5 z$ASm)vnobse?jR94Fz5N?^B5X&uwlLN;D8j7#BMo7kv(5J2Em9&U%GvdAMXl;<&3S zeCnXfx(aV9!}UobPY0@ivM6&djXMT_H@tZ4VmGd3PC<2IK3^ZczhP5n_Mbs`&H8 z1GoXdXCR~}h@pk^mgO6-w&=dOV_g6_-;Ee>H06D4l1`=lyW;BT~RFzvb&(Gc8ob zI3r0>d+2dp%}}7ziYlZ0gc8x)zTKV%Cg~d2(Z}2Hvcd_)J4or>sWZhcJg~{F5)r&K zYB|ALF$P^2Mjlz(Q4MmiNpFQ{L){=V)oy%f>SX&Joz9bS|Ht3nneZrX=JekCIEmg9 zf9_xVA{{;sG__;QsvHS;7Fm%HPx(FVoUf38MXHkHP`fsqW-F$w6^wx|Qw}eMuGw%~ zZY%r3-7EeKjdtt9pnU1d6}PEFMJP!543pudv@AE0fUvS2Q#S5((ZbJT!j(3R0MKF-?Pw8ul#V&L_Mfh^vzPr|xnQ+eYyh>(g*L&yV+e`Ei_ zw5e*UaAixXfUJU>#vg`?OFY5cq^BK?zs#K3!4Nn*cy^_fDaKXi68~0H-59mvw~x7IIpFM-}4 z{laAQU)qQYyYbffz}EbSB80N+`Oy3vjS^J+_j%g;TeO&%^`61rf7vx`AHq!!`8IvB z%w97G4)?uhjdh^wcrb-i5kmXFdJ>P5jm>$`{VOUTZ5LofCK~Udp_m;1x8>_rrQt^B zUCSs}1Q|OgO8&@_0&0~9L6^w|AlD`E2LoR6+FGLiTN*gaM~UUn0n)j5zOfy!AkG9+ zEqRX7W{E?bz)9iMf6`Te7^z<%)m#ty#4&?*P?mc1i0xw@wS3GOay;dL$)1qh!b2tf z-e5IS?_?%O!9)$h7_rX%3jQ{k2@@Kc1onf6aDGOBYycDRq1;F-`|+ z?YHD1>nhXOiWR`!d*~2oMe((mO^Xv1L?P8H|8XwlXV>;-qiu0Gc7iDq1;r>&2ZK_@ zCoN_;=!Src?G+)0rWoaQ>6c1RbJA5#D_!WePLu%ndlr>0yhY{zX~dG$Df8402KG%r z5+PH3HL+G!f3^G1-P}A0jNN~kBo115HF7cSj=+v;02K~ko{53}aKwxYit9V$i&AVT z&TfniWem|CNv(_TA2t>oa}UqwZ@8qB@)af=wscpdiEVEF9ltYu4)X{zJv{n77q}Jl z#E8BbcFPu#n3S1Qx|PB#0bHi?==%PQ82MJdCWxG}e@dCi2S3_bxj1&p*F&Umn!+7^ z(}$nqt8^iSqx0WAT7+lPt#|L!Kv@%bebHdYY_reliM?3EtWV_3re4u&xGHO@^ap~} zDXXJ$esgO(rjm90;<#rZib=9ySVoFw94m_m4z4(Q?&GCeM89FA3nMe*y4rwmr&&Ic zc-5hWe`ijU^REfiQ{APF;LgfFH?;q22Ns9uVDdp(OSW1r2sOVj1B43t(mqTJ9{GHZ zC9cWZvZef4aGARSostBicJ!`)ky809+pwRY0t*iiUAZ{5;{#)r=oZb*s){6ue#F30 z;3j4eJ;4M@H6GH|fiTXheGENatrz^Wj(EB}e;n$y@a%%eQIFIpq#96F=fA9BuvcT` zM2P#eRby9w9&M0D_Z|}wGp9=@B|79&(Rgu}gm=sat{GGSfcAF|z+pInmoL3`VU>4j z7Gd!MiLM6diE4BjXUrYO1VVzUW|WE=u<%4(+r}a&0OEZ-Se~yDnggtQB#8&bl$9^+ ze^|}$b`MdIg;LecRL#O$t5TFtz6Z+m!?ZkD=SV;w0ao>O`_gaxZ+5FVn;=#)=|dVI zMH(lxoDMy{i#9iV4GAtGdjD;Zo2?|adO8y-?Z%iHIok+#LdFOmFR2Tay~Y*3dm8)v zw13W?kQ3M@SpH}nxoI^FNs%mgvmg8Oe{@nBmc=L~uXSPRjj%e|8%x$45(t!)KAsly zT3|tk8icg2KS=Uu+2>uJR7E;k0Ua;9%GA`R#i*G3D84;rb%5l%JLW8wh(jWN;uUkK zyrp!nJ4IJ>$PxGH#aNj`U$!V=X{(h!3B#{iHTYlm4LoU{OHvf^yej7z-S+?2e}mLW zTiYK85)wCiAog*vVFxGY7Mi$p=FZf|TJh+Am68EgxKcorNY%k=1$i~U2hPaD+}qnV)=}xJh)Ue{B0344-EaSEpDSRtHD9Ey<+GgT7LqS(C$`f;1~2 zx$@$+a;B0)k-r$`NE@lYPwT1>i(RI}@M%8_%3l$(pi2Fo1=h zeKzARWXNRhCnw$@+fh)*Fs)xJz0DU4V1Fg#01W2>xuGZNwNGdx>q#M_lQ`VR{xZp#ps4s9z|s7HWq#~nWv z`veA&!nh2>kug9a7!c)hspfNRf}(iUaVnA|H{&2txO;_EGx9~Ol;CpP<()ta>;b)Q z^mwl!Clk7|mfqU4S=y`-f8oOYNZ#&bSf?0IkNbxA@ki)dv1j+wXq411UAWAo(xxz- zsXe!CUhl)Ys2x>(#o4N~^`~oqqh5dI5*Y2b#hKGaxh+dyMO42`nIKel`rHQDtP-%A z4n)mZ5Pw?QkaALwUfP4bk;|+AU`e70VsUo89|p|8_}(a^@rH@Oe^)tK__=|E1--Go zy(hQDy2?j%w;kkj>t_D=e|sdNc;}tDlkV-v!M~YyR49TUw#1WS^$3JC`4GQ}7!!Qa zVAMP~YVBPAo;JH5CZh#oz@UAs$S{XRZfyjfr>jRpCQ$#~wHOXA*%KoZeLs?)>c9Fx zDVovlz$RkH3yltnvverM8H4~vpKm+L7e*1e?8h~@RyVB(y2A_wcW5(naO0_>&Xyr@*P>0$x9{vGU<8{iD z=$Uy+UXlHTA`M8`oBq^PF88g;bKe!8zpzbv>-84W(2U@_C_*d`KA|>e$XAE*Pf!Y8 zzX75ArXtLtf5L-GYZD7dslKJ+o4{j?9bK}Ppne?`H84!Ea>|v>;5yy{l|sZ3zLVhw z@SP#xWnY+L5>EYiqH{mPJ)ExO!TcrEvK2(Gs^q(K2yyDtf!`I|juJ7>vRs9YE+CDW z6v(d;D0oih3S%)%Bk{f25gGA7PAdi9Yx?KKIDRd2*oX z$mo#!4Ctv$uywuA0w&2~Bl{3myYiYW5#02o>#j9OTjCA5C5+&0+0B4&+2cM5PLVH^_Dl|)`k8n@YaSSos z%+(I6e*xSH{CJhL1kUeysA~PyRNVYR2iXU)`}ouPEtW z;IwSO>L87k-6L+R^vaDyU2-$}PWh|xS8*BC-61BY4>H%zN_p=8lj+Ef0R4|>5_HDJ znX+EdgPv(R85m@$B_4$5^>6hLTm4|UB37U&e9sYigOJ_AXkK@ui@ zD3{zB+IfHal+a=d+M6;0#P&6#Rm#z7eI~p)UsG{?xB1_mY2(0)c$n?aB1Liz1u75V zy_7nvhQUVSX4k_0DtZ_jPdkQcayJt7Gme%-S^{|Rgwo^n?