From df375841899a6bd4d99dd7ee7d40ae4eef1ee732 Mon Sep 17 00:00:00 2001 From: "Matthijs S. Berends" Date: Thu, 24 Dec 2020 23:29:10 +0100 Subject: [PATCH] (v1.4.0.9044) mo tibble printing, mo_shortname() fix --- DESCRIPTION | 4 +- NEWS.md | 8 +- R/aa_helper_functions.R | 27 +- R/count.R | 10 +- R/eucast_rules.R | 25 +- R/mdro.R | 18 +- R/mo.R | 29 +- R/mo_property.R | 198 ++++-- R/mo_source.R | 8 +- R/rsi.R | 15 +- R/rsi_calc.R | 7 +- R/zzz.R | 7 + _pkgdown.yml | 3 +- data-raw/eucast_rules.tsv | 2 +- docs/404.html | 39 +- docs/LICENSE-text.html | 39 +- docs/articles/AMR.html | 601 +++++++++--------- .../AMR_files/figure-html/plot 1-1.png | Bin 39171 -> 39117 bytes .../AMR_files/figure-html/plot 3-1.png | Bin 27037 -> 27032 bytes .../AMR_files/figure-html/plot 4-1.png | Bin 69526 -> 69535 bytes .../AMR_files/figure-html/plot 5-1.png | Bin 46143 -> 46143 bytes docs/articles/EUCAST.html | 27 +- docs/articles/MDR.html | 126 ++-- docs/articles/PCA.html | 27 +- docs/articles/SPSS.html | 29 +- docs/articles/WHONET.html | 27 +- docs/articles/benchmarks.html | 99 ++- .../figure-html/unnamed-chunk-4-1.png | Bin 70924 -> 69636 bytes docs/articles/datasets.html | 27 +- docs/articles/index.html | 39 +- docs/articles/resistance_predict.html | 33 +- docs/articles/welcome_to_AMR.html | 27 +- docs/authors.html | 39 +- docs/index.html | 27 +- docs/news/index.html | 91 +-- docs/pkgdown.css | 45 +- docs/pkgdown.yml | 2 +- docs/reference/AMR-deprecated.html | 39 +- docs/reference/AMR.html | 39 +- docs/reference/WHOCC.html | 39 +- docs/reference/WHONET.html | 39 +- docs/reference/ab_from_text.html | 39 +- docs/reference/ab_property.html | 39 +- docs/reference/age.html | 39 +- docs/reference/age_groups.html | 39 +- .../reference/antibiotic_class_selectors.html | 39 +- docs/reference/antibiotics.html | 39 +- docs/reference/as.ab.html | 39 +- docs/reference/as.disk.html | 39 +- docs/reference/as.mic.html | 39 +- docs/reference/as.mo.html | 39 +- docs/reference/as.rsi.html | 39 +- docs/reference/atc_online.html | 39 +- docs/reference/availability.html | 39 +- docs/reference/bug_drug_combinations.html | 39 +- docs/reference/catalogue_of_life.html | 39 +- docs/reference/catalogue_of_life_version.html | 39 +- docs/reference/count.html | 39 +- docs/reference/eucast_rules.html | 41 +- docs/reference/example_isolates.html | 39 +- docs/reference/example_isolates_unclean.html | 39 +- docs/reference/filter_ab_class.html | 39 +- docs/reference/first_isolate.html | 39 +- docs/reference/g.test.html | 39 +- docs/reference/ggplot_pca.html | 39 +- docs/reference/ggplot_rsi.html | 39 +- docs/reference/guess_ab_col.html | 39 +- docs/reference/index.html | 39 +- docs/reference/intrinsic_resistant.html | 39 +- docs/reference/is_new_episode.html | 39 +- docs/reference/join.html | 39 +- docs/reference/key_antibiotics.html | 39 +- docs/reference/kurtosis.html | 39 +- docs/reference/lifecycle.html | 39 +- docs/reference/like.html | 39 +- docs/reference/mdro.html | 41 +- docs/reference/microorganisms.codes.html | 39 +- docs/reference/microorganisms.html | 39 +- docs/reference/microorganisms.old.html | 39 +- docs/reference/mo_matching_score.html | 39 +- docs/reference/mo_property.html | 43 +- docs/reference/mo_source.html | 51 +- docs/reference/pca.html | 39 +- docs/reference/plot.html | 39 +- docs/reference/proportion.html | 39 +- docs/reference/random.html | 39 +- docs/reference/resistance_predict.html | 39 +- docs/reference/rsi_translation.html | 39 +- docs/reference/skewness.html | 39 +- docs/reference/translate.html | 39 +- docs/survey.html | 39 +- man/eucast_rules.Rd | 2 +- man/mdro.Rd | 2 +- man/mo_property.Rd | 4 +- man/mo_source.Rd | 8 +- vignettes/MDR.Rmd | 39 +- 96 files changed, 1039 insertions(+), 2847 deletions(-) diff --git a/DESCRIPTION b/DESCRIPTION index cc5665274..7116d453f 100644 --- a/DESCRIPTION +++ b/DESCRIPTION @@ -1,6 +1,6 @@ Package: AMR -Version: 1.4.0.9043 -Date: 2020-12-22 +Version: 1.4.0.9044 +Date: 2020-12-24 Title: Antimicrobial Resistance Analysis Authors@R: c( person(role = c("aut", "cre"), diff --git a/NEWS.md b/NEWS.md index 97237e8cb..673ccb696 100755 --- a/NEWS.md +++ b/NEWS.md @@ -1,5 +1,5 @@ -# AMR 1.4.0.9043 -## Last updated: 22 December 2020 +# AMR 1.4.0.9044 +## Last updated: 24 December 2020 ### New * Function `is_new_episode()` to determine patient episodes which are not necessarily based on microorganisms. It also supports grouped variables with e.g. `mutate()`, `filter()` and `summarise()` of the `dplyr` package: @@ -45,12 +45,14 @@ * Fix for plotting MIC values with `plot()` * Added `plot()` generic to class `` * LA-MRSA and CA-MRSA are now recognised as an abbreviation for *Staphylococcus aureus*, meaning that e.g. `mo_genus("LA-MRSA")` will return `"Staphylococcus"` and `mo_is_gram_positive("LA-MRSA")` will return `TRUE`. +* Fix for printing class in tibbles when all values are `NA` +* Fix for `mo_shortname()` when the input contains `NA` +* If `as.mo()` takes more than 30 seconds, some suggestions will be done to improve speed ### Other * All messages and warnings thrown by this package now break sentences on whole words * More extensive unit tests * Internal calls to `options()` were all removed in favour of a new internal environment `mo_env` -* Our website now also has a dark theme, that switches on automatically based on system settings (such as Night Mode in macOS) # AMR 1.4.0 diff --git a/R/aa_helper_functions.R b/R/aa_helper_functions.R index e13659270..77b48c1d9 100755 --- a/R/aa_helper_functions.R +++ b/R/aa_helper_functions.R @@ -187,13 +187,16 @@ search_type_in_df <- function(x, type, info = TRUE) { } } } - + if (!is.null(found) & info == TRUE) { - msg <- paste0("Using column '", font_bold(found), "' as input for `col_", type, "`.") - if (type %in% c("keyantibiotics", "specimen")) { - msg <- paste(msg, "Use", font_bold(paste0("col_", type), "= FALSE"), "to prevent this.") + if (message_not_thrown_before(fn = paste0("search_", type))) { + msg <- paste0("Using column '", font_bold(found), "' as input for `col_", type, "`.") + if (type %in% c("keyantibiotics", "specimen")) { + msg <- paste(msg, "Use", font_bold(paste0("col_", type), "= FALSE"), "to prevent this.") + } + message_(msg) + remember_thrown_message(fn = paste0("search_", type)) } - message_(msg) } found } @@ -534,6 +537,20 @@ get_current_data <- function(arg_name, call) { call = call - 4)) } +get_root_env_address <- function() { + sub('', '\\1', utils::capture.output(sys.frames()[[1]])) +} + +remember_thrown_message <- function(fn) { + assign(x = paste0("address_", fn), + value = get_root_env_address(), + envir = mo_env) +} + +message_not_thrown_before <- function(fn) { + is.null(mo_env[[paste0("address_", fn)]]) || !identical(mo_env[[paste0("address_", fn)]], get_root_env_address()) +} + has_colour <- function() { # this is a base R version of crayon::has_color enabled <- getOption("crayon.enabled") diff --git a/R/count.R b/R/count.R index 43fbd5cb8..7ebb17da7 100755 --- a/R/count.R +++ b/R/count.R @@ -134,7 +134,10 @@ count_R <- function(..., only_all_tested = FALSE) { #' @rdname count #' @export count_IR <- function(..., only_all_tested = FALSE) { - warning_("Using 'count_IR' is discouraged; use 'count_resistant()' instead to not consider \"I\" being resistant.", call = FALSE) + if (message_not_thrown_before("count_IR")) { + warning_("Using count_IR() is discouraged; use count_resistant() instead to not consider \"I\" being resistant.", call = FALSE) + remember_thrown_message("count_IR") + } rsi_calc(..., ab_result = c("I", "R"), only_all_tested = only_all_tested, @@ -162,7 +165,10 @@ count_SI <- function(..., only_all_tested = FALSE) { #' @rdname count #' @export count_S <- function(..., only_all_tested = FALSE) { - warning_("Using 'count_S' is discouraged; use 'count_susceptible()' instead to also consider \"I\" being susceptible.", call = FALSE) + if (message_not_thrown_before("count_S")) { + warning_("Using count_S() is discouraged; use count_susceptible() instead to also consider \"I\" being susceptible.", call = FALSE) + remember_thrown_message("count_S") + } rsi_calc(..., ab_result = "S", only_all_tested = only_all_tested, diff --git a/R/eucast_rules.R b/R/eucast_rules.R index fc9cd5266..25bdb160d 100755 --- a/R/eucast_rules.R +++ b/R/eucast_rules.R @@ -87,7 +87,7 @@ format_eucast_version_nr <- function(version, markdown = TRUE) { #' #' 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", "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"))` +#' `r create_ab_documentation(c("AMC", "AMK", "AMP", "AMX", "ATM", "AVO", "AZL", "AZM", "BAM", "BPR", "CAC", "CAT", "CAZ", "CCP", "CCV", "CCX", "CDC", "CDR", "CDZ", "CEC", "CED", "CEI", "CEM", "CEP", "CFM", "CFM1", "CFP", "CFR", "CFS", "CFZ", "CHE", "CHL", "CID", "CIP", "CLI", "CLR", "CMX", "CMZ", "CND", "COL", "CPD", "CPI", "CPL", "CPM", "CPO", "CPR", "CPT", "CPX", "CRB", "CRD", "CRN", "CRO", "CSL", "CTB", "CTC", "CTF", "CTL", "CTS", "CTT", "CTX", "CTZ", "CXM", "CYC", "CZA", "CZD", "CZO", "CZP", "CZX", "DAL", "DAP", "DIR", "DIT", "DIX", "DIZ", "DKB", "DOR", "DOX", "ENX", "EPC", "ERY", "ETP", "FEP", "FLC", "FLE", "FLR1", "FOS", "FOV", "FOX", "FOX1", "FUS", "GAT", "GEM", "GEN", "GRX", "HAP", "HET", "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", "QDA", "RAM", "RFL", "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", "STR", "STR1", "SUD", "SUT", "SXT", "SZO", "TAL", "TCC", "TCM", "TCY", "TEC", "TEM", "TGC", "THA", "TIC", "TIO", "TLT", "TLV", "TMP", "TMX", "TOB", "TRL", "TVA", "TZD", "TZP", "VAN"))` #' @aliases EUCAST #' @rdname eucast_rules #' @export @@ -278,53 +278,66 @@ eucast_rules <- function(x, CAC <- cols_ab["CAC"] CAT <- cols_ab["CAT"] CAZ <- cols_ab["CAZ"] + CCP <- cols_ab["CCP"] CCV <- cols_ab["CCV"] + CCX <- cols_ab["CCX"] + CDC <- cols_ab["CDC"] CDR <- cols_ab["CDR"] CDZ <- cols_ab["CDZ"] CEC <- cols_ab["CEC"] CED <- cols_ab["CED"] CEI <- cols_ab["CEI"] + CEM <- cols_ab["CEM"] CEP <- cols_ab["CEP"] CFM <- cols_ab["CFM"] CFM1 <- cols_ab["CFM1"] CFP <- cols_ab["CFP"] CFR <- cols_ab["CFR"] CFS <- cols_ab["CFS"] + CFZ <- cols_ab["CFZ"] + CHE <- cols_ab["CHE"] CHL <- cols_ab["CHL"] CID <- cols_ab["CID"] CIP <- cols_ab["CIP"] CLI <- cols_ab["CLI"] - 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"] + CPI <- cols_ab["CPI"] + CPL <- cols_ab["CPL"] CPM <- cols_ab["CPM"] CPO <- cols_ab["CPO"] CPR <- cols_ab["CPR"] CPT <- cols_ab["CPT"] + CPX <- cols_ab["CPX"] CRB <- cols_ab["CRB"] CRD <- cols_ab["CRD"] CRN <- cols_ab["CRN"] CRO <- cols_ab["CRO"] CSL <- cols_ab["CSL"] CTB <- cols_ab["CTB"] + CTC <- cols_ab["CTC"] CTF <- cols_ab["CTF"] CTL <- cols_ab["CTL"] + CTS <- cols_ab["CTS"] CTT <- cols_ab["CTT"] CTX <- cols_ab["CTX"] CTZ <- cols_ab["CTZ"] CXM <- cols_ab["CXM"] CYC <- cols_ab["CYC"] + CZA <- cols_ab["CZA"] CZD <- cols_ab["CZD"] CZO <- cols_ab["CZO"] + CZP <- cols_ab["CZP"] CZX <- cols_ab["CZX"] DAL <- cols_ab["DAL"] DAP <- cols_ab["DAP"] DIR <- cols_ab["DIR"] DIT <- cols_ab["DIT"] + DIX <- cols_ab["DIX"] DIZ <- cols_ab["DIZ"] DKB <- cols_ab["DKB"] DOR <- cols_ab["DOR"] @@ -338,6 +351,7 @@ eucast_rules <- function(x, FLE <- cols_ab["FLE"] FLR1 <- cols_ab["FLR1"] FOS <- cols_ab["FOS"] + FOV <- cols_ab["FOV"] FOX <- cols_ab["FOX"] FOX1 <- cols_ab["FOX1"] FUS <- cols_ab["FUS"] @@ -391,7 +405,6 @@ eucast_rules <- function(x, PRU <- cols_ab["PRU"] PVM <- cols_ab["PVM"] QDA <- cols_ab["QDA"] - QDA <- cols_ab["QDA"] RAM <- cols_ab["RAM"] RFL <- cols_ab["RFL"] RID <- cols_ab["RID"] @@ -441,6 +454,7 @@ eucast_rules <- function(x, TGC <- cols_ab["TGC"] THA <- cols_ab["THA"] TIC <- cols_ab["TIC"] + TIO <- cols_ab["TIO"] TLT <- cols_ab["TLT"] TLV <- cols_ab["TLV"] TMP <- cols_ab["TMP"] @@ -474,9 +488,10 @@ eucast_rules <- function(x, aminoglycosides <- c(AMK, DKB, GEN, ISE, KAN, NEO, NET, RST, SIS, STR, STR1, TOB) aminopenicillins <- c(AMP, AMX) carbapenems <- c(DOR, ETP, IPM, MEM, MEV) - 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 <- c(CDZ, CCP, 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, CCP, CCX, CDR, DIT, DIX, CAT, CPI, CFM, CMX, DIZ, CFP, CSL, CTX, CTC, CTS, CHE, FOV, CFZ, CPM, CPD, CPX, CDC, CFS, CAZ, CZA, CCV, CEM, CPL, CTB, TIO, CZX, CZP, CRO, LTM) cephalosporins_except_CAZ <- cephalosporins[cephalosporins != ifelse(is.null(CAZ), "", CAZ)] fluoroquinolones <- c(CIP, ENX, FLE, GAT, GEM, GRX, LVX, LOM, MFX, NOR, OFX, PAZ, PEF, PRU, RFL, SPX, TMX, TVA) glycopeptides <- c(AVO, NVA, RAM, TEC, TCM, VAN) # dalba/orita/tela are in lipoglycopeptides @@ -796,7 +811,7 @@ eucast_rules <- function(x, word_wrap( expertrules_info$title, " (", font_red(paste0(expertrules_info$version_txt, ", ", expertrules_info$year)), ")\n")), - "")))) + ""))), "\n") } # Print rule ------------------------------------------------------------- if (rule_current != rule_previous) { diff --git a/R/mdro.R b/R/mdro.R index 3cb7eee3a..f4af4642d 100755 --- a/R/mdro.R +++ b/R/mdro.R @@ -192,7 +192,7 @@ mdro <- function(x, if (guideline$code == "cmi2012") { guideline$name <- "Multidrug-resistant, extensively drug-resistant and pandrug-resistant bacteria: an international expert proposal for interim standard definitions for acquired resistance." guideline$author <- "Magiorakos AP, Srinivasan A, Carey RB, ..., Vatopoulos A, Weber JT, Monnet DL" - guideline$version <- "N/A" + guideline$version <- NA guideline$source <- "Clinical Microbiology and Infection 18:3, 2012. DOI: 10.1111/j.1469-0691.2011.03570.x" guideline$type <- "MDRs/XDRs/PDRs" @@ -221,7 +221,7 @@ mdro <- function(x, } else if (guideline$code == "mrgn") { guideline$name <- "Cross-border comparison of the Dutch and German guidelines on multidrug-resistant Gram-negative microorganisms" guideline$author <- "M\u00fcller J, Voss A, K\u00f6ck R, ..., Kern WV, Wendt C, Friedrich AW" - guideline$version <- "N/A" + guideline$version <- NA guideline$source <- "Antimicrobial Resistance and Infection Control 4:7, 2015. DOI: 10.1186/s13756-015-0047-6" guideline$type <- "MRGNs" @@ -568,11 +568,13 @@ mdro <- function(x, } else { cat(font_red("\nResults with 'R' or 'I' are considered as resistance. Use `combine_SI = TRUE` to only consider 'R' as resistance.\n")) } - cat("\nDetermining multidrug-resistant organisms (MDRO), according to:\n", - font_bold("Guideline: "), font_italic(guideline$name), "\n", - font_bold("Version: "), guideline$version, "\n", - font_bold("Author: "), guideline$author, "\n", - font_bold("Source: "), guideline$source, "\n", + cat("\n", word_wrap("Determining multidrug-resistant organisms (MDRO), according to:"), "\n", + word_wrap(paste0(font_bold("Guideline: "), font_italic(guideline$name)), extra_indent = 11, as_note = FALSE), "\n", + word_wrap(paste0(font_bold("Author(s): "), guideline$author), extra_indent = 11, as_note = FALSE), "\n", + ifelse(!is.na(guideline$version), + paste0(word_wrap(paste0(font_bold("Version: "), guideline$version), extra_indent = 11, as_note = FALSE), "\n"), + ""), + word_wrap(paste0(font_bold("Source: "), guideline$source), extra_indent = 11, as_note = FALSE), "\n", "\n", sep = "") } @@ -1237,7 +1239,7 @@ mdro <- function(x, if (guideline$code == "cmi2012") { if (any(x$MDRO == -1, na.rm = TRUE)) { warning_("NA introduced for isolates where the available percentage of antimicrobial classes was below ", - percentage(pct_required_classes), " (set with `pct_required_classes`)") + percentage(pct_required_classes), " (set with `pct_required_classes`)", call = FALSE) # set these -1s to NA x[which(x$MDRO == -1), "MDRO"] <- NA_integer_ } diff --git a/R/mo.R b/R/mo.R index 950532997..6a4e84751 100755 --- a/R/mo.R +++ b/R/mo.R @@ -276,7 +276,7 @@ exec_as.mo <- function(x, meet_criteria(language, has_length = 1, is_in = c(LANGUAGES_SUPPORTED, ""), allow_NULL = TRUE, allow_NA = TRUE) check_dataset_integrity() - + lookup <- function(needle, column = property, haystack = reference_data_to_use, @@ -358,6 +358,9 @@ exec_as.mo <- function(x, x[trimws2(x) %like% paste0("^(", translate_AMR("no|not", language = language), ") [a-z]+")] <- "UNKNOWN" if (initial_search == TRUE) { + # keep track of time - give some hints to improve speed if it takes a long time + start_time <- Sys.time() + mo_env$mo_failures <- NULL mo_env$mo_uncertainties <- NULL mo_env$mo_renamed <- NULL @@ -1524,8 +1527,24 @@ exec_as.mo <- function(x, } # this will save the uncertain items as attribute, so they can be bound to `uncertainties` in the uncertain_fn() function x <- structure(x, uncertainties = uncertainties) + } else { + # keep track of time - give some hints to improve speed if it takes a long time + end_time <- Sys.time() + delta_time <- difftime(end_time, start_time, units = "secs") + if (delta_time >= 30) { + message_("Using `as.mo()` took ", delta_time, " seconds, which is a long time. Some suggestions to improve speed include:") + message_(word_wrap("- Try to use as many valid taxonomic names as possible for your input.", + extra_indent = 2), + as_note = FALSE) + message_(word_wrap("- Save the output and use it as input for future calculations, e.g. create a new variable to your data using `as.mo()`. All functions in this package that rely on microorganism codes will automatically use that new column where possible. All `mo_*()` functions also do not require you to set their `x` argument as long as you have the dplyr package installed and you have a column of class .", + extra_indent = 2), + as_note = FALSE) + message_(word_wrap("- Use `set_mo_source()` to continually transform your organisation codes to microorganisms codes used by this package, please see `?mo_source`.", + extra_indent = 2), + as_note = FALSE) + } } - + x } @@ -1585,9 +1604,13 @@ pillar_shaft.mo <- function(x, ...) { out[x == "UNKNOWN"] <- font_na(" UNKNOWN") # make it always fit exactly + max_char <- max(nchar(x)) + if (is.na(max_char)) { + max_char <- 7 + } create_pillar_column(out, align = "left", - width = max(nchar(x)) + ifelse(any(x %in% c(NA, "UNKNOWN")), 2, 0)) + width = max_char + ifelse(any(x %in% c(NA, "UNKNOWN")), 2, 0)) } # will be exported using s3_register() in R/zzz.R diff --git a/R/mo_property.R b/R/mo_property.R index 8ac4c1031..41806f1e2 100755 --- a/R/mo_property.R +++ b/R/mo_property.R @@ -27,12 +27,12 @@ #' #' Use these functions to return a specific property of a microorganism based on the latest accepted taxonomy. All input values will be evaluated internally with [as.mo()], which makes it possible to use microbial abbreviations, codes and names as input. Please see *Examples*. #' @inheritSection lifecycle Stable lifecycle -#' @param x any character (vector) that can be coerced to a valid microorganism code with [as.mo()]. Can be omitted for auto-guessing in `mo_is_*()` functions when used inside `dplyr` verbs, such as [`filter()`][dplyr::filter()], [`mutate()`][dplyr::mutate()] and [`summarise()`][dplyr::summarise()], please see *Examples*. +#' @param x any character (vector) that can be coerced to a valid microorganism code with [as.mo()]. Can be omitted for auto-guessing the column containing microorganism codes when used inside `dplyr` verbs, such as [`filter()`][dplyr::filter()], [`mutate()`][dplyr::mutate()] and [`summarise()`][dplyr::summarise()], please see *Examples*. #' @param property one of the column names of the [microorganisms] data set: `r paste0('"``', colnames(microorganisms), '\``"', collapse = ", ")`, or must be `"shortname"` #' @param language language of the returned text, defaults to system language (see [get_locale()]) and can be overwritten by setting the option `AMR_locale`, e.g. `options(AMR_locale = "de")`, see [translate]. Also used to translate text like "no growth". Use `language = NULL` or `language = ""` to prevent translation. #' @param ... other arguments passed on to [as.mo()], such as 'allow_uncertain' and 'ignore_pattern' #' @param ab any (vector of) text that can be coerced to a valid antibiotic code with [as.ab()] -#' @param open browse the URL using [utils::browseURL()] +#' @param open browse the URL using [`browseURL()`][utils::browseURL()] #' @details All functions will return the most recently known taxonomic property according to the Catalogue of Life, except for [mo_ref()], [mo_authors()] and [mo_year()]. Please refer to this example, knowing that *Escherichia blattae* was renamed to *Shimwellia blattae* in 2010: #' - `mo_name("Escherichia blattae")` will return `"Shimwellia blattae"` (with a message about the renaming) #' - `mo_ref("Escherichia blattae")` will return `"Burgess et al., 1973"` (with a message about the renaming) @@ -161,9 +161,13 @@ #' mo_info("E. coli") #' } mo_name <- function(x, language = get_locale(), ...) { + if (missing(x)) { + # this supports using in dplyr verbs: ... %>% filter(mo_is_intrinsic_resistant(ab = "amox")) + x <- find_mo_col("mo_is_intrinsic_resistant") + } meet_criteria(x, allow_NA = TRUE) meet_criteria(language, has_length = 1, is_in = c(LANGUAGES_SUPPORTED, ""), allow_NULL = TRUE, allow_NA = TRUE) - + translate_AMR(mo_validate(x = x, property = "fullname", language = language, ...), language = language, only_unknown = FALSE) } @@ -174,22 +178,26 @@ mo_fullname <- mo_name #' @rdname mo_property #' @export mo_shortname <- function(x, language = get_locale(), ...) { + if (missing(x)) { + # this supports using in dplyr verbs: ... %>% filter(mo_is_intrinsic_resistant(ab = "amox")) + x <- find_mo_col("mo_is_intrinsic_resistant") + } meet_criteria(x, allow_NA = TRUE) meet_criteria(language, has_length = 1, is_in = c(LANGUAGES_SUPPORTED, ""), allow_NULL = TRUE, allow_NA = TRUE) - + x.mo <- as.mo(x, language = language, ...) - + metadata <- get_mo_failures_uncertainties_renamed() - + replace_empty <- function(x) { x[x == ""] <- "spp." x } - + # get first char of genus and complete species in English genera <- mo_genus(x.mo, language = NULL) shortnames <- paste0(substr(genera, 1, 1), ". ", replace_empty(mo_species(x.mo, language = NULL))) - + # exceptions for where no species is known shortnames[shortnames %like% ".[.] spp[.]"] <- genera[shortnames %like% ".[.] spp[.]"] # exceptions for staphylococci @@ -199,7 +207,8 @@ mo_shortname <- function(x, language = get_locale(), ...) { shortnames[shortnames %like% "S. group [ABCDFGHK]"] <- paste0("G", gsub("S. group ([ABCDFGHK])", "\\1", shortnames[shortnames %like% "S. group [ABCDFGHK]"]), "S") # unknown species etc. shortnames[shortnames %like% "unknown"] <- paste0("(", trimws(gsub("[^a-zA-Z -]", "", shortnames[shortnames %like% "unknown"])), ")") - + + shortnames[is.na(x.mo)] <- NA_character_ load_mo_failures_uncertainties_renamed(metadata) translate_AMR(shortnames, language = language, only_unknown = FALSE) } @@ -207,72 +216,104 @@ mo_shortname <- function(x, language = get_locale(), ...) { #' @rdname mo_property #' @export mo_subspecies <- function(x, language = get_locale(), ...) { + if (missing(x)) { + # this supports using in dplyr verbs: ... %>% filter(mo_is_intrinsic_resistant(ab = "amox")) + x <- find_mo_col("mo_is_intrinsic_resistant") + } meet_criteria(x, allow_NA = TRUE) meet_criteria(language, has_length = 1, is_in = c(LANGUAGES_SUPPORTED, ""), allow_NULL = TRUE, allow_NA = TRUE) - + translate_AMR(mo_validate(x = x, property = "subspecies", language = language, ...), language = language, only_unknown = TRUE) } #' @rdname mo_property #' @export mo_species <- function(x, language = get_locale(), ...) { + if (missing(x)) { + # this supports using in dplyr verbs: ... %>% filter(mo_is_intrinsic_resistant(ab = "amox")) + x <- find_mo_col("mo_is_intrinsic_resistant") + } meet_criteria(x, allow_NA = TRUE) meet_criteria(language, has_length = 1, is_in = c(LANGUAGES_SUPPORTED, ""), allow_NULL = TRUE, allow_NA = TRUE) - + translate_AMR(mo_validate(x = x, property = "species", language = language, ...), language = language, only_unknown = TRUE) } #' @rdname mo_property #' @export mo_genus <- function(x, language = get_locale(), ...) { + if (missing(x)) { + # this supports using in dplyr verbs: ... %>% filter(mo_is_intrinsic_resistant(ab = "amox")) + x <- find_mo_col("mo_is_intrinsic_resistant") + } meet_criteria(x, allow_NA = TRUE) meet_criteria(language, has_length = 1, is_in = c(LANGUAGES_SUPPORTED, ""), allow_NULL = TRUE, allow_NA = TRUE) - + translate_AMR(mo_validate(x = x, property = "genus", language = language, ...), language = language, only_unknown = TRUE) } #' @rdname mo_property #' @export mo_family <- function(x, language = get_locale(), ...) { + if (missing(x)) { + # this supports using in dplyr verbs: ... %>% filter(mo_is_intrinsic_resistant(ab = "amox")) + x <- find_mo_col("mo_is_intrinsic_resistant") + } meet_criteria(x, allow_NA = TRUE) meet_criteria(language, has_length = 1, is_in = c(LANGUAGES_SUPPORTED, ""), allow_NULL = TRUE, allow_NA = TRUE) - + translate_AMR(mo_validate(x = x, property = "family", language = language, ...), language = language, only_unknown = TRUE) } #' @rdname mo_property #' @export mo_order <- function(x, language = get_locale(), ...) { + if (missing(x)) { + # this supports using in dplyr verbs: ... %>% filter(mo_is_intrinsic_resistant(ab = "amox")) + x <- find_mo_col("mo_is_intrinsic_resistant") + } meet_criteria(x, allow_NA = TRUE) meet_criteria(language, has_length = 1, is_in = c(LANGUAGES_SUPPORTED, ""), allow_NULL = TRUE, allow_NA = TRUE) - + translate_AMR(mo_validate(x = x, property = "order", language = language, ...), language = language, only_unknown = TRUE) } #' @rdname mo_property #' @export mo_class <- function(x, language = get_locale(), ...) { + if (missing(x)) { + # this supports using in dplyr verbs: ... %>% filter(mo_is_intrinsic_resistant(ab = "amox")) + x <- find_mo_col("mo_is_intrinsic_resistant") + } meet_criteria(x, allow_NA = TRUE) meet_criteria(language, has_length = 1, is_in = c(LANGUAGES_SUPPORTED, ""), allow_NULL = TRUE, allow_NA = TRUE) - + translate_AMR(mo_validate(x = x, property = "class", language = language, ...), language = language, only_unknown = TRUE) } #' @rdname mo_property #' @export mo_phylum <- function(x, language = get_locale(), ...) { + if (missing(x)) { + # this supports using in dplyr verbs: ... %>% filter(mo_is_intrinsic_resistant(ab = "amox")) + x <- find_mo_col("mo_is_intrinsic_resistant") + } meet_criteria(x, allow_NA = TRUE) meet_criteria(language, has_length = 1, is_in = c(LANGUAGES_SUPPORTED, ""), allow_NULL = TRUE, allow_NA = TRUE) - + translate_AMR(mo_validate(x = x, property = "phylum", language = language, ...), language = language, only_unknown = TRUE) } #' @rdname mo_property #' @export mo_kingdom <- function(x, language = get_locale(), ...) { + if (missing(x)) { + # this supports using in dplyr verbs: ... %>% filter(mo_is_intrinsic_resistant(ab = "amox")) + x <- find_mo_col("mo_is_intrinsic_resistant") + } meet_criteria(x, allow_NA = TRUE) meet_criteria(language, has_length = 1, is_in = c(LANGUAGES_SUPPORTED, ""), allow_NULL = TRUE, allow_NA = TRUE) - + translate_AMR(mo_validate(x = x, property = "kingdom", language = language, ...), language = language, only_unknown = TRUE) } @@ -283,21 +324,29 @@ mo_domain <- mo_kingdom #' @rdname mo_property #' @export mo_type <- function(x, language = get_locale(), ...) { + if (missing(x)) { + # this supports using in dplyr verbs: ... %>% filter(mo_is_intrinsic_resistant(ab = "amox")) + x <- find_mo_col("mo_is_intrinsic_resistant") + } meet_criteria(x, allow_NA = TRUE) meet_criteria(language, has_length = 1, is_in = c(LANGUAGES_SUPPORTED, ""), allow_NULL = TRUE, allow_NA = TRUE) - + translate_AMR(mo_validate(x = x, property = "kingdom", language = language, ...), language = language, only_unknown = FALSE) } #' @rdname mo_property #' @export mo_gramstain <- function(x, language = get_locale(), ...) { + if (missing(x)) { + # this supports using in dplyr verbs: ... %>% filter(mo_is_intrinsic_resistant(ab = "amox")) + x <- find_mo_col("mo_is_intrinsic_resistant") + } meet_criteria(x, allow_NA = TRUE) meet_criteria(language, has_length = 1, is_in = c(LANGUAGES_SUPPORTED, ""), allow_NULL = TRUE, allow_NA = TRUE) - + x.mo <- as.mo(x, language = language, ...) metadata <- get_mo_failures_uncertainties_renamed() - + x.phylum <- mo_phylum(x.mo) # DETERMINE GRAM STAIN FOR BACTERIA # Source: https://itis.gov/servlet/SingleRpt/SingleRpt?search_topic=TSN&search_value=956097 @@ -318,7 +367,7 @@ mo_gramstain <- function(x, language = get_locale(), ...) { "Firmicutes", "Tenericutes") | x.mo == "B_GRAMP"] <- "Gram-positive" - + load_mo_failures_uncertainties_renamed(metadata) translate_AMR(x, language = language, only_unknown = FALSE) } @@ -327,12 +376,12 @@ mo_gramstain <- function(x, language = get_locale(), ...) { #' @export mo_is_gram_negative <- function(x, language = get_locale(), ...) { if (missing(x)) { - # this supports using in dplyr verbs: ... %>% filter(mo_is_gram_negative()) - x <- find_mo_col("mo_is_gram_negative") + # this supports using in dplyr verbs: ... %>% filter(mo_is_intrinsic_resistant(ab = "amox")) + x <- find_mo_col("mo_is_intrinsic_resistant") } meet_criteria(x, allow_NA = TRUE) meet_criteria(language, has_length = 1, is_in = c(LANGUAGES_SUPPORTED, ""), allow_NULL = TRUE, allow_NA = TRUE) - + x.mo <- as.mo(x, language = language, ...) metadata <- get_mo_failures_uncertainties_renamed() grams <- mo_gramstain(x.mo, language = NULL) @@ -346,12 +395,12 @@ mo_is_gram_negative <- function(x, language = get_locale(), ...) { #' @export mo_is_gram_positive <- function(x, language = get_locale(), ...) { if (missing(x)) { - # this supports using in dplyr verbs: ... %>% filter(mo_is_gram_positive()) - x <- find_mo_col("mo_is_gram_positive") + # this supports using in dplyr verbs: ... %>% filter(mo_is_intrinsic_resistant(ab = "amox")) + x <- find_mo_col("mo_is_intrinsic_resistant") } meet_criteria(x, allow_NA = TRUE) meet_criteria(language, has_length = 1, is_in = c(LANGUAGES_SUPPORTED, ""), allow_NULL = TRUE, allow_NA = TRUE) - + x.mo <- as.mo(x, language = language, ...) metadata <- get_mo_failures_uncertainties_renamed() grams <- mo_gramstain(x.mo, language = NULL) @@ -399,27 +448,39 @@ mo_is_intrinsic_resistant <- function(x, ab, language = get_locale(), ...) { #' @rdname mo_property #' @export mo_snomed <- function(x, language = get_locale(), ...) { + if (missing(x)) { + # this supports using in dplyr verbs: ... %>% filter(mo_is_intrinsic_resistant(ab = "amox")) + x <- find_mo_col("mo_is_intrinsic_resistant") + } meet_criteria(x, allow_NA = TRUE) meet_criteria(language, has_length = 1, is_in = c(LANGUAGES_SUPPORTED, ""), allow_NULL = TRUE, allow_NA = TRUE) - + mo_validate(x = x, property = "snomed", language = language, ...) } #' @rdname mo_property #' @export mo_ref <- function(x, language = get_locale(), ...) { + if (missing(x)) { + # this supports using in dplyr verbs: ... %>% filter(mo_is_intrinsic_resistant(ab = "amox")) + x <- find_mo_col("mo_is_intrinsic_resistant") + } meet_criteria(x, allow_NA = TRUE) meet_criteria(language, has_length = 1, is_in = c(LANGUAGES_SUPPORTED, ""), allow_NULL = TRUE, allow_NA = TRUE) - + mo_validate(x = x, property = "ref", language = language, ...) } #' @rdname mo_property #' @export mo_authors <- function(x, language = get_locale(), ...) { + if (missing(x)) { + # this supports using in dplyr verbs: ... %>% filter(mo_is_intrinsic_resistant(ab = "amox")) + x <- find_mo_col("mo_is_intrinsic_resistant") + } meet_criteria(x, allow_NA = TRUE) meet_criteria(language, has_length = 1, is_in = c(LANGUAGES_SUPPORTED, ""), allow_NULL = TRUE, allow_NA = TRUE) - + x <- mo_validate(x = x, property = "ref", language = language, ...) # remove last 4 digits and presumably the comma and space that preceed them x[!is.na(x)] <- gsub(",? ?[0-9]{4}", "", x[!is.na(x)]) @@ -429,9 +490,13 @@ mo_authors <- function(x, language = get_locale(), ...) { #' @rdname mo_property #' @export mo_year <- function(x, language = get_locale(), ...) { + if (missing(x)) { + # this supports using in dplyr verbs: ... %>% filter(mo_is_intrinsic_resistant(ab = "amox")) + x <- find_mo_col("mo_is_intrinsic_resistant") + } meet_criteria(x, allow_NA = TRUE) meet_criteria(language, has_length = 1, is_in = c(LANGUAGES_SUPPORTED, ""), allow_NULL = TRUE, allow_NA = TRUE) - + x <- mo_validate(x = x, property = "ref", language = language, ...) # get last 4 digits x[!is.na(x)] <- gsub(".*([0-9]{4})$", "\\1", x[!is.na(x)]) @@ -441,21 +506,29 @@ mo_year <- function(x, language = get_locale(), ...) { #' @rdname mo_property #' @export mo_rank <- function(x, language = get_locale(), ...) { + if (missing(x)) { + # this supports using in dplyr verbs: ... %>% filter(mo_is_intrinsic_resistant(ab = "amox")) + x <- find_mo_col("mo_is_intrinsic_resistant") + } meet_criteria(x, allow_NA = TRUE) meet_criteria(language, has_length = 1, is_in = c(LANGUAGES_SUPPORTED, ""), allow_NULL = TRUE, allow_NA = TRUE) - + mo_validate(x = x, property = "rank", language = language, ...) } #' @rdname mo_property #' @export mo_taxonomy <- function(x, language = get_locale(), ...) { + if (missing(x)) { + # this supports using in dplyr verbs: ... %>% filter(mo_is_intrinsic_resistant(ab = "amox")) + x <- find_mo_col("mo_is_intrinsic_resistant") + } meet_criteria(x, allow_NA = TRUE) meet_criteria(language, has_length = 1, is_in = c(LANGUAGES_SUPPORTED, ""), allow_NULL = TRUE, allow_NA = TRUE) - + x <- as.mo(x, language = language, ...) metadata <- get_mo_failures_uncertainties_renamed() - + result <- list(kingdom = mo_kingdom(x, language = language), phylum = mo_phylum(x, language = language), class = mo_class(x, language = language), @@ -464,7 +537,7 @@ mo_taxonomy <- function(x, language = get_locale(), ...) { genus = mo_genus(x, language = language), species = mo_species(x, language = language), subspecies = mo_subspecies(x, language = language)) - + load_mo_failures_uncertainties_renamed(metadata) result } @@ -472,12 +545,16 @@ mo_taxonomy <- function(x, language = get_locale(), ...) { #' @rdname mo_property #' @export mo_synonyms <- function(x, language = get_locale(), ...) { + if (missing(x)) { + # this supports using in dplyr verbs: ... %>% filter(mo_is_intrinsic_resistant(ab = "amox")) + x <- find_mo_col("mo_is_intrinsic_resistant") + } meet_criteria(x, allow_NA = TRUE) meet_criteria(language, has_length = 1, is_in = c(LANGUAGES_SUPPORTED, ""), allow_NULL = TRUE, allow_NA = TRUE) - + x <- as.mo(x, language = language, ...) metadata <- get_mo_failures_uncertainties_renamed() - + IDs <- mo_name(x = x, language = NULL) syns <- lapply(IDs, function(newname) { res <- sort(microorganisms.old[which(microorganisms.old$fullname_new == newname), "fullname"]) @@ -493,7 +570,7 @@ mo_synonyms <- function(x, language = get_locale(), ...) { } else { result <- unlist(syns) } - + load_mo_failures_uncertainties_renamed(metadata) result } @@ -501,12 +578,16 @@ mo_synonyms <- function(x, language = get_locale(), ...) { #' @rdname mo_property #' @export mo_info <- function(x, language = get_locale(), ...) { + if (missing(x)) { + # this supports using in dplyr verbs: ... %>% filter(mo_is_intrinsic_resistant(ab = "amox")) + x <- find_mo_col("mo_is_intrinsic_resistant") + } meet_criteria(x, allow_NA = TRUE) meet_criteria(language, has_length = 1, is_in = c(LANGUAGES_SUPPORTED, ""), allow_NULL = TRUE, allow_NA = TRUE) - + x <- as.mo(x, language = language, ...) metadata <- get_mo_failures_uncertainties_renamed() - + info <- lapply(x, function(y) c(mo_taxonomy(y, language = language), list(synonyms = mo_synonyms(y), @@ -519,7 +600,7 @@ mo_info <- function(x, language = get_locale(), ...) { } else { result <- info[[1L]] } - + load_mo_failures_uncertainties_renamed(metadata) result } @@ -527,14 +608,18 @@ mo_info <- function(x, language = get_locale(), ...) { #' @rdname mo_property #' @export mo_url <- function(x, open = FALSE, language = get_locale(), ...) { + if (missing(x)) { + # this supports using in dplyr verbs: ... %>% filter(mo_is_intrinsic_resistant(ab = "amox")) + x <- find_mo_col("mo_is_intrinsic_resistant") + } meet_criteria(x, allow_NA = TRUE) meet_criteria(open, allow_class = "logical", has_length = 1) meet_criteria(language, has_length = 1, is_in = c(LANGUAGES_SUPPORTED, ""), allow_NULL = TRUE, allow_NA = TRUE) - + mo <- as.mo(x = x, language = language, ... = ...) mo_names <- mo_name(mo) metadata <- get_mo_failures_uncertainties_renamed() - + df <- data.frame(mo, stringsAsFactors = FALSE) %pm>% pm_left_join(pm_select(microorganisms, mo, source, species_id), by = "mo") df$url <- ifelse(df$source == "CoL", @@ -544,14 +629,14 @@ mo_url <- function(x, open = FALSE, language = get_locale(), ...) { NA_character_)) u <- df$url names(u) <- mo_names - + if (open == TRUE) { if (length(u) > 1) { warning_("Only the first URL will be opened, as `browseURL()` only suports one string.") } utils::browseURL(u[1L]) } - + load_mo_failures_uncertainties_renamed(metadata) u } @@ -560,21 +645,25 @@ mo_url <- function(x, open = FALSE, language = get_locale(), ...) { #' @rdname mo_property #' @export mo_property <- function(x, property = "fullname", language = get_locale(), ...) { + if (missing(x)) { + # this supports using in dplyr verbs: ... %>% filter(mo_is_intrinsic_resistant(ab = "amox")) + x <- find_mo_col("mo_is_intrinsic_resistant") + } meet_criteria(x, allow_NA = TRUE) meet_criteria(property, allow_class = "character", has_length = 1, is_in = colnames(microorganisms)) meet_criteria(language, has_length = 1, is_in = c(LANGUAGES_SUPPORTED, ""), allow_NULL = TRUE, allow_NA = TRUE) - + translate_AMR(mo_validate(x = x, property = property, language = language, ...), language = language, only_unknown = TRUE) } mo_validate <- function(x, property, language, ...) { check_dataset_integrity() - + if (tryCatch(all(x[!is.na(x)] %in% MO_lookup$mo) & length(list(...)) == 0, error = function(e) FALSE)) { # special case for mo_* functions where class is already return(MO_lookup[match(x, MO_lookup$mo), property, drop = TRUE]) } - + dots <- list(...) Becker <- dots$Becker if (is.null(Becker)) { @@ -584,12 +673,12 @@ mo_validate <- function(x, property, language, ...) { if (is.null(Lancefield)) { Lancefield <- FALSE } - + # try to catch an error when inputting an invalid argument # so the 'call.' can be set to FALSE tryCatch(x[1L] %in% MO_lookup[1, property, drop = TRUE], error = function(e) stop(e$message, call. = FALSE)) - + if (is.mo(x) & !Becker %in% c(TRUE, "all") & !Lancefield %in% c(TRUE, "all")) { @@ -601,7 +690,7 @@ mo_validate <- function(x, property, language, ...) { | Lancefield %in% c(TRUE, "all")) { x <- exec_as.mo(x, property = property, language = language, ...) } - + if (property == "mo") { return(set_clean_class(x, new_class = c("mo", "character"))) } else if (property == "snomed") { @@ -614,13 +703,16 @@ mo_validate <- function(x, property, language, ...) { find_mo_col <- function(fn) { # this function tries to find an mo column using dplyr::cur_data_all() for mo_is_*() functions, # which is useful when functions are used within dplyr verbs - df <- get_current_data("x", call = -3) # will return an error if not found + df <- get_current_data(arg_name = "x", call = -3) # will return an error if not found mo <- NULL try({ mo <- suppressMessages(search_type_in_df(df, "mo")) }, silent = TRUE) if (!is.null(df) && !is.null(mo) && is.data.frame(df)) { - message_("Using column '", font_bold(mo), "' as input for ", fn, "()") + if (message_not_thrown_before(fn = fn)) { + message_("Using column '", font_bold(mo), "' as input for ", fn, "()") + remember_thrown_message(fn = fn) + } return(df[, mo, drop = TRUE]) } else { stop_("argument `x` is missing and no column with info about microorganisms could be found.", call = -2) diff --git a/R/mo_source.R b/R/mo_source.R index 13f5c9667..97060b021 100644 --- a/R/mo_source.R +++ b/R/mo_source.R @@ -25,9 +25,9 @@ #' User-defined reference data set for microorganisms #' -#' @description These functions can be used to predefine your own reference to be used in [as.mo()] and consequently all `mo_*` functions like [mo_genus()] and [mo_gramstain()]. +#' @description These functions can be used to predefine your own reference to be used in [as.mo()] and consequently all [`mo_*`][mo_property()] functions (such as [mo_genus()] and [mo_gramstain()]). #' -#' This is **the fastest way** to have your organisation (or analysis) specific codes picked up and translated by this package. +#' This is **the fastest way** to have your organisation (or analysis) specific codes picked up and translated by this package, since you don't have to bother about it again after setting it up once. #' @inheritSection lifecycle Stable lifecycle #' @param path location of your reference file, see Details. Can be `""`, `NULL` or `FALSE` to delete the reference file. #' @param destination destination of the compressed data file, default to the user's home directory. @@ -103,7 +103,7 @@ #' ``` #' as.mo("lab_mo_ecoli") #' #> NOTE: Updated mo_source file '/Users/me/mo_source.rds' (0.3 kB) from -#' #> '/Users/me/Documents/ourcodes.xlsx' (9 kB), columns +#' #> '/Users/me/Documents/ourcodes.xlsx' (9 kB), columns #' #> "Organisation XYZ" and "mo" #' #> Class #' #> [1] B_ESCHR_COLI @@ -119,7 +119,7 @@ #' #> Removed mo_source file '/Users/me/mo_source.rds' #' ``` #' -#' If the original Excel file is moved or deleted, the mo_source file will be removed upon the next use of [as.mo()]. +#' If the original file (in the previous case an Excel file) is moved or deleted, the `mo_source.rds` file will be removed upon the next use of [as.mo()] or any [`mo_*`][mo_property()] function. #' @export #' @inheritSection AMR Read more on our website! set_mo_source <- function(path, destination = getOption("AMR_mo_source", "~/mo_source.rds")) { diff --git a/R/rsi.R b/R/rsi.R index 528280881..e8ba24e43 100755 --- a/R/rsi.R +++ b/R/rsi.R @@ -709,7 +709,10 @@ exec_as.rsi <- function(method, guideline_coerced <- get_guideline(guideline, reference_data) if (guideline_coerced != guideline) { - message_("Using guideline ", font_bold(guideline_coerced), " as input for `guideline`.") + if (message_not_thrown_before("as.rsi")) { + message_("Using guideline ", font_bold(guideline_coerced), " as input for `guideline`.") + remember_thrown_message("as.rsi") + } } new_rsi <- rep(NA_character_, length(x)) @@ -745,7 +748,10 @@ exec_as.rsi <- function(method, if (isTRUE(add_intrinsic_resistance) & is_intrinsic_r) { if (!guideline_coerced %like% "EUCAST") { - warning_("Using 'add_intrinsic_resistance' is only useful when using EUCAST guidelines, since the rules for intrinsic resistance are based on EUCAST.", call = FALSE) + if (message_not_thrown_before("as.rsi2")) { + warning_("Using 'add_intrinsic_resistance' is only useful when using EUCAST guidelines, since the rules for intrinsic resistance are based on EUCAST.", call = FALSE) + remember_thrown_message("as.rsi2") + } } else { new_rsi[i] <- "R" next @@ -811,7 +817,10 @@ exec_as.rsi <- function(method, if (any_is_intrinsic_resistant & guideline_coerced %like% "EUCAST" & !isTRUE(add_intrinsic_resistance)) { # found some intrinsic resistance, but was not applied message_("WARNING.", add_fn = list(font_yellow, font_bold), as_note = FALSE) - warning_("Found intrinsic resistance in some bug/drug combinations, although it was not applied.\nUse `as.rsi(..., add_intrinsic_resistance = TRUE)` to apply it.", call = FALSE) + if (message_not_thrown_before("as.rsi3")) { + warning_("Found intrinsic resistance in some bug/drug combinations, although it was not applied.\nUse `as.rsi(..., add_intrinsic_resistance = TRUE)` to apply it.", call = FALSE) + remember_thrown_message("as.rsi3") + } warned <- TRUE } diff --git a/R/rsi_calc.R b/R/rsi_calc.R index 768095250..3294ac935 100755 --- a/R/rsi_calc.R +++ b/R/rsi_calc.R @@ -147,8 +147,11 @@ rsi_calc <- function(..., } if (print_warning == TRUE) { - warning_("Increase speed by transforming to class on beforehand: your_data %pm>% mutate_if(is.rsi.eligible, as.rsi)", - call = FALSE) + if (message_not_thrown_before("rsi_calc")) { + warning_("Increase speed by transforming to class on beforehand: your_data %pm>% mutate_if(is.rsi.eligible, as.rsi)", + call = FALSE) + remember_thrown_message("rsi_calc") + } } if (only_count == TRUE) { diff --git a/R/zzz.R b/R/zzz.R index e5171e8cd..ed1bf02f8 100755 --- a/R/zzz.R +++ b/R/zzz.R @@ -75,6 +75,13 @@ s3_register("skimr::get_skimmers", "rsi") s3_register("skimr::get_skimmers", "mic") s3_register("skimr::get_skimmers", "disk") + + # if mo source exists, fire it up (see mo_source()) + try({ + if (file.exists(getOption("AMR_mo_source", "~/mo_source.rds"))) { + invisible(get_mo_source()) + } + }, silent = TRUE) } .onAttach <- function(...) { diff --git a/_pkgdown.yml b/_pkgdown.yml index d0bb5f754..d4c12e3cc 100644 --- a/_pkgdown.yml +++ b/_pkgdown.yml @@ -213,7 +213,8 @@ authors: template: # this requires the 'preferably' package, https://github.com/amirmasoudabdol/preferably/ - package: preferably + # package: preferably assets: "pkgdown/logos" # use logos in this folder params: noindex: false + template: "flatly" diff --git a/data-raw/eucast_rules.tsv b/data-raw/eucast_rules.tsv index 9ab899f1b..4ffbb0cfb 100644 --- a/data-raw/eucast_rules.tsv +++ b/data-raw/eucast_rules.tsv @@ -1,6 +1,6 @@ # ------------------------------------------------------------------------------------------------------------------------------- # For editing this EUCAST reference file, these values can all be used for targeting antibiotics: -# 'all_betalactams', 'aminoglycosides', 'aminopenicillins', 'carbapenems', 'cephalosporins', 'cephalosporins_1st', 'cephalosporins_2nd', 'cephalosporins_except_CAZ', +# 'all_betalactams', 'aminoglycosides', 'aminopenicillins', 'carbapenems', 'cephalosporins', 'cephalosporins_1st', 'cephalosporins_2nd', 'cephalosporins_3rd', 'cephalosporins_except_CAZ', # 'fluoroquinolones', 'glycopeptides', 'lincosamides', 'lipoglycopeptides', 'macrolides', 'oxazolidinones', 'polymyxins', 'streptogramins', 'tetracyclines', 'ureidopenicillins', # and all separate EARS-Net letter codes like 'AMC'. They can be separated by comma: 'AMC, fluoroquinolones'. # The 'if_mo_property' column can be any column name from the AMR::microorganisms data set, or "genus_species" or "gramstain". diff --git a/docs/404.html b/docs/404.html index a5772c5d9..d82222547 100644 --- a/docs/404.html +++ b/docs/404.html @@ -6,22 +6,6 @@ - - - - Page not found (404) • AMR (for R) @@ -36,21 +20,10 @@ + + - - - - - - - - - - - - - @@ -85,9 +58,6 @@ - - - - - - License • AMR (for R) @@ -36,21 +20,10 @@ + + - - - - - - - - - - - - - @@ -85,9 +58,6 @@ - - - -How to conduct AMR analysis • AMR (for R) +How to conduct AMR analysis • AMR (for R) - - - - - - + + @@ -56,7 +39,7 @@ AMR (for R) - 1.4.0.9042 + 1.4.0.9044 @@ -210,7 +193,7 @@

How to conduct AMR analysis

Matthijs S. Berends

-

21 December 2020

+

24 December 2020

Source: vignettes/AMR.Rmd @@ -219,7 +202,7 @@ -

Note: values on this page will change with every website update since they are based on randomly created values and the page was written in R Markdown. However, the methodology remains unchanged. This page was generated on 21 December 2020.

+

Note: values on this page will change with every website update since they are based on randomly created values and the page was written in R Markdown. However, the methodology remains unchanged. This page was generated on 24 December 2020.

Introduction

@@ -250,21 +233,21 @@ -2020-12-21 +2020-12-24 abcd Escherichia coli S S -2020-12-21 +2020-12-24 abcd Escherichia coli S R -2020-12-21 +2020-12-24 efgh Escherichia coli R @@ -369,71 +352,71 @@ -2013-07-24 -S10 +2012-10-07 +D7 +Hospital B +Escherichia coli +R +S +R +S +M + + +2016-11-19 +V9 +Hospital A +Klebsiella pneumoniae +R +S +S +S +F + + +2015-03-30 +D9 Hospital D Staphylococcus aureus R S S S -F +M -2011-06-06 -X7 +2012-06-28 +Z4 Hospital B -Streptococcus pneumoniae -R +Staphylococcus aureus +S S S S F -2010-08-03 -E6 -Hospital B -Escherichia coli -R -I +2014-03-04 +M4 +Hospital C +Staphylococcus aureus +S +S S S M -2014-03-25 -S8 +2014-08-18 +D2 Hospital B Escherichia coli -S R -S -S -F - - -2010-09-19 -J1 -Hospital D -Klebsiella pneumoniae -I R S S M - -2017-05-11 -T3 -Hospital A -Escherichia coli -S -S -S -S -F -

Now, let’s start the cleaning and the analysis!

@@ -466,16 +449,16 @@ Longest: 1

1 M -10,348 -51.74% -10,348 -51.74% +10,392 +51.96% +10,392 +51.96% 2 F -9,652 -48.26% +9,608 +48.04% 20,000 100.00% @@ -532,7 +515,7 @@ Longest: 1

First weighted isolates

-

We made a slight twist to the CLSI algorithm, to take into account the antimicrobial susceptibility profile. Have a look at all isolates of patient R5, sorted on date:

+

We made a slight twist to the CLSI algorithm, to take into account the antimicrobial susceptibility profile. Have a look at all isolates of patient M9, sorted on date:

@@ -548,8 +531,8 @@ Longest: 1

- - + + @@ -559,19 +542,19 @@ Longest: 1

- - + + - + - - + + @@ -581,30 +564,30 @@ Longest: 1

- - + + + - - - + + - - + + - - + + @@ -614,60 +597,56 @@ Longest: 1

- - + + + + + + + + + + + + + - - - - - - - - - - - - - + + - + - - + + + + - - - +
isolate
12010-02-05R52010-01-25M9 B_ESCHR_COLI S S
22010-04-22R52010-02-01M9 B_ESCHR_COLI S SRS S FALSE
32010-05-16R52010-02-22M9 B_ESCHR_COLI S S
42010-05-29R52010-08-12M9 B_ESCHR_COLII S SR S FALSE
52010-06-16R52010-08-17M9 B_ESCHR_COLI RSSRR S FALSE
62010-10-06R52010-09-18M9 B_ESCHR_COLI S S
72010-12-22R52011-07-05M9 B_ESCHR_COLI R SRSTRUE
82011-07-19M9B_ESCHR_COLIRR S S FALSE
82011-04-14R5B_ESCHR_COLISSSSTRUE
92011-11-27R52011-07-20M9 B_ESCHR_COLI S S SRS FALSE
102012-11-12R52011-09-04M9 B_ESCHR_COLIRI S SSSTRUEFALSE
-

Only 3 isolates are marked as ‘first’ according to CLSI guideline. But when reviewing the antibiogram, it is obvious that some isolates are absolutely different strains and should be included too. This is why we weigh isolates, based on their antibiogram. The key_antibiotics() function adds a vector with 18 key antibiotics: 6 broad spectrum ones, 6 small spectrum for Gram negatives and 6 small spectrum for Gram positives. These can be defined by the user.

+

Only 2 isolates are marked as ‘first’ according to CLSI guideline. But when reviewing the antibiogram, it is obvious that some isolates are absolutely different strains and should be included too. This is why we weigh isolates, based on their antibiogram. The key_antibiotics() function adds a vector with 18 key antibiotics: 6 broad spectrum ones, 6 small spectrum for Gram negatives and 6 small spectrum for Gram positives. These can be defined by the user.

If a column exists with a name like ‘key(…)ab’ the first_isolate() function will automatically use it and determine the first weighted isolates. Mind the NOTEs in below output:

 data <- data %>% 
   mutate(keyab = key_antibiotics(.)) %>% 
   mutate(first_weighted = first_isolate(.))
-# NOTE: Using column 'bacteria' as input for `col_mo`.
-# NOTE: Using column 'bacteria' as input for `col_mo`.
-# NOTE: Using column 'date' as input for `col_date`.
-# NOTE: Using column 'patient_id' as input for `col_patient_id`.
 # NOTE: Using column 'keyab' as input for `col_keyantibiotics`. Use
 #       col_keyantibiotics = FALSE to prevent this.
@@ -686,8 +665,8 @@ Longest: 1

- - + + @@ -698,20 +677,8 @@ Longest: 1

- - - - - - - - - - - - - - + + @@ -720,34 +687,46 @@ Longest: 1

+ + + + + + + + + + + + - - + + + - - + - - + + - - + + - - + + @@ -758,60 +737,60 @@ Longest: 1

- - + + + + + + + + + + + + + + - - - - - - - - - - - - - - + + - + - - + + + + - - - +
12010-02-05R52010-01-25M9 B_ESCHR_COLI S S
22010-04-22R5B_ESCHR_COLISSRSFALSEFALSE
32010-05-16R52010-02-01M9 B_ESCHR_COLI S S FALSE TRUE
32010-02-22M9B_ESCHR_COLISSSSFALSEFALSE
42010-05-29R52010-08-12M9 B_ESCHR_COLII S SR S FALSETRUEFALSE
52010-06-16R52010-08-17M9 B_ESCHR_COLI RSSRR S FALSE TRUE
62010-10-06R52010-09-18M9 B_ESCHR_COLI S S
72010-12-22R52011-07-05M9 B_ESCHR_COLI R SRSTRUETRUE
82011-07-19M9B_ESCHR_COLIRR S S FALSE TRUE
82011-04-14R5B_ESCHR_COLISSSSTRUETRUE
92011-11-27R52011-07-20M9 B_ESCHR_COLI S S SRS FALSE TRUE
102012-11-12R52011-09-04M9 B_ESCHR_COLIRI S SSSTRUEFALSE TRUE
-

Instead of 3, now 9 isolates are flagged. In total, 78.4% of all isolates are marked ‘first weighted’ - 50.1% more than when using the CLSI guideline. In real life, this novel algorithm will yield 5-10% more isolates than the classic CLSI guideline.

+

Instead of 2, now 8 isolates are flagged. In total, 78.4% of all isolates are marked ‘first weighted’ - 50.0% more than when using the CLSI guideline. In real life, this novel algorithm will yield 5-10% more isolates than the classic CLSI guideline.

As with filter_first_isolate(), there’s a shortcut for this new algorithm too:

 data_1st <- data %>% 
   filter_first_weighted_isolate()
-

So we end up with 15,689 isolates for analysis.

+

So we end up with 15,683 isolates for analysis.

We can remove unneeded columns:

 data_1st <- data_1st %>% 
@@ -821,6 +800,7 @@ Longest: 1

head(data_1st)
+@@ -836,6 +816,7 @@ Longest: 1

+ @@ -852,27 +833,77 @@ Longest: 1

- - + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + - + - - - + + + + + + + + + + + + + + + + + + + + - - + + @@ -881,62 +912,18 @@ Longest: 1

- - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - + + + - + + - - - - - - - - - - - - - - - - @@ -962,8 +949,8 @@ Longest: 1

data_1st %>% freq(genus, species)

Frequency table

Class: character
-Length: 15,689
-Available: 15,689 (100%, NA: 0 = 0%)
+Length: 15,683
+Available: 15,683 (100%, NA: 0 = 0%)
Unique: 4

Shortest: 16
Longest: 24

@@ -980,33 +967,33 @@ Longest: 24

- - - - + + + + - - - - + + + + - - - - + + + + - - - + + + @@ -1020,7 +1007,6 @@ Longest: 24

data_1st %>% bug_drug_combinations() %>% head() # show first 6 rows -
# NOTE: Using column 'bacteria' as input for `col_mo`.
date patient_id hospital
2013-07-24S1012012-10-07D7Hospital BB_ESCHR_COLIRSRSMGram-negativeEscherichiacoliTRUE
22016-11-19V9Hospital AB_KLBSL_PNMNRSSSFGram-negativeKlebsiellapneumoniaeTRUE
32015-03-30D9 Hospital D B_STPHY_AURS R S S SFM Gram-positive Staphylococcus aureus TRUE
2011-06-06X7Hospital B52014-03-04M4Hospital CB_STPHY_AURSSSSSMGram-positiveStaphylococcusaureusTRUE
72011-02-08S3Hospital D B_STRPT_PNMNRRSS S R F pneumoniae TRUE
2010-08-03E6Hospital BB_ESCHR_COLIRISSMGram-negativeEscherichiacoliTRUE
2014-03-25S8Hospital BB_ESCHR_COLIRRSSFGram-negativeEscherichiacoliTRUE
2010-09-19J182015-12-31I5 Hospital DB_KLBSL_PNMNB_ESCHR_COLIR R RS S M Gram-negativeKlebsiellapneumoniaeTRUE
2017-05-11T3Hospital AB_ESCHR_COLISSSSFGram-negative Escherichia coli TRUE
1 Escherichia coli7,85950.09%7,85950.09%7,81549.83%7,81549.83%
2 Staphylococcus aureus3,81924.34%11,67874.43%4,00125.51%11,81675.34%
3 Streptococcus pneumoniae2,39115.24%14,06989.67%2,33014.86%14,14690.20%
4 Klebsiella pneumoniae1,62010.33%15,6891,5379.80%15,683 100.00%
@@ -1034,60 +1020,59 @@ Longest: 24

- - - - + + + + - - - - + + + + - + - - + + - + - - + + - - + + - - - - + + + +
mo
E. coli AMX378425638197859374425738147815
E. coli AMC619030813617859618529413367815
E. coli CIP59485934 01911785918817815
E. coli GEN71107005 074978598107815
K. pneumoniae AMX 0 01620162015371537
K. pneumoniae AMC12705429616201225452671537

Using Tidyverse selections, you can also select columns based on the antibiotic class they are in:

-
+
 data_1st %>% 
   select(bacteria, fluoroquinolones()) %>% 
   bug_drug_combinations()
-
# Selecting fluoroquinolones: 'CIP' (ciprofloxacin)
-# NOTE: Using column 'bacteria' as input for `col_mo`.
+
# Selecting fluoroquinolones: 'CIP' (ciprofloxacin)
@@ -1101,34 +1086,34 @@ Longest: 24

- + - - + + - + - - + + - + - - + + - + - - + +
mo
E. coli CIP59485934 01911785918817815
K. pneumoniae CIP12321189 038816203481537
S. aureus CIP29433064 087638199374001
S. pneumoniae CIP17971780 059423915502330
@@ -1139,11 +1124,11 @@ Longest: 24

Resistance percentages

The functions resistance() and susceptibility() can be used to calculate antimicrobial resistance or susceptibility. For more specific analyses, the functions proportion_S(), proportion_SI(), proportion_I(), proportion_IR() and proportion_R() can be used to determine the proportion of a specific antimicrobial outcome.

As per the EUCAST guideline of 2019, we calculate resistance as the proportion of R (proportion_R(), equal to resistance()) and susceptibility as the proportion of S and I (proportion_SI(), equal to susceptibility()). These functions can be used on their own:

-
+
 data_1st %>% resistance(AMX)
-# [1] 0.5359806
+# [1] 0.5342728

Or can be used in conjuction with group_by() and summarise(), both from the dplyr package:

-
+
 data_1st %>% 
   group_by(hospital) %>% 
   summarise(amoxicillin = resistance(AMX))
@@ -1156,24 +1141,24 @@ Longest: 24

Hospital A -0.5285074 +0.5253802 Hospital B -0.5438369 +0.5367779 Hospital C -0.5389447 +0.5470814 Hospital D -0.5314924 +0.5334627

Of course it would be very convenient to know the number of isolates responsible for the percentages. For that purpose the n_rsi() can be used, which works exactly like n_distinct() from the dplyr package. It counts all isolates available for every group (i.e. values S, I or R):

-
+
 data_1st %>% 
   group_by(hospital) %>% 
   summarise(amoxicillin = resistance(AMX),
@@ -1188,28 +1173,28 @@ Longest: 24

Hospital A -0.5285074 -4683 +0.5253802 +4669 Hospital B -0.5438369 -5395 +0.5367779 +5574 Hospital C -0.5389447 -2388 +0.5470814 +2347 Hospital D -0.5314924 -3223 +0.5334627 +3093

These functions can also be used to get the proportion of multiple antibiotics, to calculate empiric susceptibility of combination therapies very easily:

-
+
 data_1st %>% 
   group_by(genus) %>% 
   summarise(amoxiclav = susceptibility(AMC),
@@ -1226,32 +1211,32 @@ Longest: 24

Escherichia -0.8268228 -0.9046953 -0.9846036 +0.8290467 +0.8963532 +0.9843890 Klebsiella -0.8172840 -0.8950617 -0.9827160 +0.8262850 +0.9095641 +0.9837345 Staphylococcus -0.8292747 -0.9193506 -0.9832417 +0.8307923 +0.9122719 +0.9872532 Streptococcus -0.5411962 +0.5351931 0.0000000 -0.5411962 +0.5351931

To make a transition to the next part, let’s see how this difference could be plotted:

-
+
 data_1st %>% 
   group_by(genus) %>% 
   summarise("1. Amoxi/clav" = susceptibility(AMC),
@@ -1270,7 +1255,7 @@ Longest: 24

Plots

To show results in plots, most R users would nowadays use the ggplot2 package. This package lets you create plots in layers. You can read more about it on their website. A quick example would look like these syntaxes:

-
+
 ggplot(data = a_data_set,
        mapping = aes(x = year,
                      y = value)) +
@@ -1284,13 +1269,13 @@ Longest: 24

ggplot(a_data_set) + geom_bar(aes(year))

The AMR package contains functions to extend this ggplot2 package, for example geom_rsi(). It automatically transforms data with count_df() or proportion_df() and show results in stacked bars. Its simplest and shortest example:

-
+
 ggplot(data_1st) +
   geom_rsi(translate_ab = FALSE)

Omit the translate_ab = FALSE to have the antibiotic codes (AMX, AMC, CIP, GEN) translated to official WHO names (amoxicillin, amoxicillin/clavulanic acid, ciprofloxacin, gentamicin).

If we group on e.g. the genus column and add some additional functions from our package, we can create this:

-
+
 # group the data on `genus`
 ggplot(data_1st %>% group_by(genus)) + 
   # create bars with genus on x axis
@@ -1313,7 +1298,7 @@ Longest: 24

theme(axis.text.y = element_text(face = "italic"))

To simplify this, we also created the ggplot_rsi() function, which combines almost all above functions:

-
+
 data_1st %>% 
   group_by(genus) %>%
   ggplot_rsi(x = "genus",
@@ -1328,7 +1313,7 @@ Longest: 24

Independence test

The next example uses the example_isolates data set. This is a data set included with this package and contains 2,000 microbial isolates with their full antibiograms. It reflects reality and can be used to practice AMR analysis.

We will compare the resistance to fosfomycin (column FOS) in hospital A and D. The input for the fisher.test() can be retrieved with a transformation like this:

-
+
 # use package 'tidyr' to pivot data:
 library(tidyr)
 
@@ -1347,7 +1332,7 @@ Longest: 24

# [1,] 25 77 # [2,] 24 33

We can apply the test now with:

-
+
 # do Fisher's Exact Test
 fisher.test(check_FOS)                            
 # 
@@ -1381,7 +1366,7 @@ Longest: 24

-

Made with pkgdown 1.6.1, using preferably template.

+

Site built with pkgdown 1.6.1.

diff --git a/docs/articles/AMR_files/figure-html/plot 1-1.png b/docs/articles/AMR_files/figure-html/plot 1-1.png index 8612585d2220b839739434962184e845d60b06ac..e63aea5e6474a5a8328bd4893c83f72efa977b95 100644 GIT binary patch literal 39117 zcmeFZ2UJwsnl4)AZQf=@g{>B%prRrw*{lT;BuXq50VQY2;8rn%7CEDUBmo7UltplQ#7Gaw%#TG&2et()1XlP zqR>tqm$mTithIdNCwFuDdrw!>&TU&)$L>CG@9+7y?>(QGf8^d$7OC}5=UkQgbK%0L z9~Ue*{$}BO$`a|1+cnoN%lqcAXSLzRh15U79CSn0T=iOg{Q1iR51+XV8r$1nO(`hx zGd-~)v2;>UPBx@FwZ^2rCh>$YpKYCJlzilZnUkxCbF^AH^PR&@ngh82O5h)JSjbn0 z?enjZuapOW2F@X0cb)j(e!=tbx_N;;YF2F_Rx58VKc=p(?(O5_Le<*8#Hq9KfJCmpFYet!OviVFFbRdZC`Gerah1maBFO8A}c zEr0j*wR(rpe9DwFW%<1G@k#}~-?Ln(_T$y{^RKm@_4f8IDJfx4uj}cp3w*|QU01g= zL&Rf`;`U=FMM}-=6A}}b7E@l`d_8{=xk$?CKZ<9*uHANQ9{EPixoSe+~?FxPQ_{Lg;WFpH`=+>>z?)Dd-T&dCD zn8P|b76DC-biuB{k*mF90dT&ZF=+Tr8 ze`{c8YEQ;>ef`3}7c4dIPHt&_dX_ck(Iy__pWpAscr?t6-@@l};uj7kW=?i>W=>Cy z_IqUdo@KSX>Q`jalRlz3H8E;gKVIiCZ>8Y=a&2BWQT82Yo$`-l^gWj4bgQvwc#KoX zvEo}n4t41-7O6Q_w#lQ-m_v)U7{2AKjwsiDao&qTwfu3Pqax2}<_+h4aadB!;csz8 zv(VSei$|;Z(`EyeP?Iw4_GuEB#Php*z2K%L!hw%n_D1^&a zv?YCfxPgPlvU#&il)QC~R$RehF^1qsjY-T{lAEe!lUs6wlYmvtuzO+}JAJZUf!Vuw zVpN2KW*Su_Xf@cXHnQok?nTDS-X~dRLi!pe&G|V7nA)s~yho0N zCMPE|)h}y2e*72*csa7)f%VX#LofdfzB!dOxp-0`M7rdCt+W>?t5^?TdZSQmz6YR7x8+Hr=eIIQ)aD<(~vtWd1F6#JL< zZ6zU!NrspG&dxUtm*uP#xn5OQmr)h4>&`y+?ekkj=C`^n+sc0^CzjVwfS=#W_shhO zhuk}9hwE(y6l`m94_93aQcH}Fk2foN;u>0eC{nYT0mD_IH1uI2qHatEe5!=b3 zzJ9Ng?62`Ws9hFD&0(;M3Euv5?5Su-$>d)nD3j&FKewhl+A5HMd;D#B+1TAb%?qT} zDt+n(U#J*;T$kLP(qYV0y`k~_{hi9ocelne)vPtfyApebY&xvAkg<7tj3-d**vdni z$4WP79y>X$vGC9!{ns}g@0VS3m{Kn;Lg{yy>ee~3qWejISGxEI3gxSmGj_vOWyUpiUK{*NJvYY`)qOMxu^_N^%tGtGa7Nk)do zmRVEdi+WgQy|I`h=&W<}$e&|dnYX9j-*~MRy>#+s&*dVO4Jn6sc}Im`oe}fc7d7%H z<)RZMeNG!%^N)`YJA{_Cy3}PxZccyE&?;GzIk=&_$UpgP+sc{%Art!*`sj%$7-Bzq zP7R7%TU$G>*s9cXnbK=NzjgV!vuDq$p(RQl{_Q6CU1_% zX>}L9(`%x1jZ-L_*X#VgTmMW5=f7cze39)zCtN1KBf~@~{jSuJrI}*|Rx9x%i{+kk zet|#DV{vMp?`A;r%lzNddH+0?OAZ5T2opG#{*RabH(bF#C06}s9*0vh>5E=v>{UtH zf279nBwA$jo{O*ks@6}{dm-WH?Pp%K+f7vCaW=PV${_&DV*&L&V;wQ{?`b3T_V$H> z1Nmwr0Y{Cl>`VIgw{QR(>4BF{@&?Ww^yM=#9{h4PR6f!ya~M#%>DgV@+{PRild-nY z(ATex9=Cw!w3dzoyTz=I53p?ZDrc={n#^Eq-PVQY9lBdvKhrq;T$Q5SZ>`|pHQt?S z0EQHI>D}MH*4@dLjZe=WRR8p7i`~!fkwTJSI{98a3aLf*6WR8S5s}fk1Xar=OnzT! ze@&3k6n1?WN+0uEG|A$Z)3t3OtLe< ziMZ~TVNfLn`#$hzW|xGB4HOvI@hI!QK0RD#-6NO4)Q(U4`Qu@wc4Sn=s1O-1%EAY8 zRt4(BD`^(_`%%62Uq0bHe%@b@FDG(o@dj1X3&1_DG7@|t*_#TZqM~Sw0=$`D{mgq` z3f%ao&M|Jaw4=0=uU|d2q^v78qbjL9y8ndvfxQ)-FL z+m}bk8D6FpFJ@X}J5oEEBWYLCkZ>ctL$%T%bF#u}BIb@lV(hSE!88SDpeUCfeSh4= zEqR|%WVV@+ee6MI2)c~w{A*)B%7w=lI}GU@o8KD!wHjpZldX?;#ng`Jp6MwAf4i}^ z&bT7s$jJadK9goD&Ai@r1Qcq{CSGk>#?`tsOM;V4Fh)(c*GPQMoF2~%4GGbRnuWcu zwr%=zPKr+DW6Oc&p%h8xSUzT@V#mPrw?!i77&iSb0V-W~pn}%qsB&ucS6#%7Kdd?% z93Rh{SZ`;opE)^9-dxDPVNJl#Q+2}$i9<0x^37A7ib5IOv)_63G`c-i>c)wX#*H33!=5 zSs7<#L!bSQr{3e8-Y7*ivfPG^a%oj0QPK>ICvW||9W`Vccvy*oYyzTDGUdsC>RokI*8e{8?n%70@GspTWwcL}E{_m2S9b^9^sc9SFql4I! zBQ|_`tlZ$@es{%IZ@q-do%WL*bdx&E7D6Iww~b+>b3#1SyusV4KDx2Ax<02HFB?MV zlehb7xa=Nppo_-JRsnEilNzJ!CQS6gj~nP|?}t~~|IDg1W2!1xK!MW0+z@A+4-gh= z$abb*9>>D-rbcdI`nX66^POe0HSJCtD6Fw;@r%@D<2SvQG2quTm~@7hya_1FrMaez zv^H^r+;s{nPdlPh_swV@&_TAEf8A!?6|ay`Z#T~B+~&Qz*5xjn-BDV9LSlN9WRJ*| z5BKst5A4XCXyP{Mh)Qfml@JS&&IzWu9Ms5lJ@0jpy}bRBUCp25efE1U3#0f^i39=a z(ud( zW|XIsH`G1THSZ94H)G|?3(CsM>31n_jX_z?Lj+F0TO8zMwKC9YtfPmPp1dzIg30@< zl?^5BBegzdFyHJMmT8~urN{jI3kL#TQ6`;1nXVfc6s1`XvelNRuZg*1m2qU*!dVvnWGQzVkxz?!*(dolgtRBpZ0RcK+o}V6_8p*7m^s4K1Jkl5!FsX|M zuPpmaEt>SsUNFIG=>h|Tq4FT4w+9QGa(^?nnR!J z_ps@ENY6*_N_;;ID9(ZACP|n8(U7z5u9Rc|f|# zX8K#Thx^)3jq*)T446QhZqDZ^Qqh>u;U59S^H^!udkgl2>h~eY)0)lsUIc{cr*CG+$6{FM9Nk1N>!38KltA7fEWYFfqr6)YImsV(p zlQqq5>9J`MAo?pHQR$a2PXY8AJ=L9P4AKA-YmD=>i-vBlwD}A2psL+q5Ss=DjffBc z@H_x?)SOaDk@OR-Q_V**y}(F%>_$>)j4wfi--Mul!za)g;v)#3z%O@YeIiblR91Qc z6*h6vM@1PLPbbNRMw$rszMWTzR$dC(HEX4aV3EkQ%}D%cX~2{#5Eu7Ab3xwpxcxNu zO5va1tR_`5r-owUaLF&CqW0cpwYsKe@%>KsU6wk)cj7L@*bPN)G5)+wXUOZ){#7&X zRC_1zvm|2+C=%cI+iQs91K-He(eb?J{%spn43F217T(xNi%xF#F89~LiCW?=lRK>m z=r0-~O@kP}g0JxjIRK3zwlDdrTLUD2m*DKma$8=&$%#H^`~0$S8JGYv;j#xY=?IwT z1B7&;hWZ+dHW&I;hYrLiCbp=vjbCIm-rM2ynZTV#Y$6%sRp)(=9$>1Nh_5*M&4HSe zEj;`h?pBOPQF&dRztHg49kl*%Nn1{lu`kXC^=p#A%ODRmWwA{e>L-17q~??>(EVEc zt@Wb{SKhiavoNK!M5afJT=qPCnOr#?)BHxM_xuK}NEGd;l&)s2f*h{N?lpcEyCk0lyn{ z$?JEhOnHO_8EfydvNwTF1 z9L1_Oq3wl_`Lq>=*_Q1RTUR_&EnUAF=FI?BqzKIzKNxPa*`Q`|nW4esbEM9qL2YC+ zkLLMLk2iZzX9y4TdvwJ}=JX_$;IfpW^jH9_EjGRHXj4d-Jy!!ctv`#rs8P@(?%tFxnp!(WIl~nMu>IU*L3JzYbGrQWaw0NX!v< zC*(O`hGA*KCym*n;Z5AWOsKLcW)+WL{9I3N5U^Jd&89N?6rvQ>j0tC5-m`Sx)7g1{7PF$qWsgsCb#=*FKR-WP7$=cK z+N=^k>!&B{)AfA>Zs^Zw3YC};nBwYAd^>6Vx7a2Et;L)D1t)s5YBTHb?r`$-L=>3T zbkL>rj1lOrq~yJckDsCakpo$mW<|BKFBQrLe$?dYsd4M&ep-HJ^2Cxc-J+iDBp$nG zZIPeA4ZlL8`~%s8V-D{KbDLl3znVQGC!~zRzC`nRFOUntXothJ! z+Uy_7*k9kAG!K3K9xF_xMW8y}4t$kq%E z;oJ<>gL&9hs`dA~GrwjdVQci!Tm=TzL&cbO<}r&K%64;evo37b z8fs3F{nSABz(~15=2*F}(Wgx`hK!^TFL>Q~lztp^1|x)uOkO8v0PcARsOe%%Ku4pC zWFgVxt}5PU1qbDH6Lnm+iLt}!=ysYhY2&?FE9sF%^Kae%Rg{5{B)#g_#qNeo!lo^Y*4DrZ;Tu`3#`<vW5H|FNKR*9p8l^(m}Z0 zU!=X8WGz23n3B%*!8|IYhOP&Q$k*g5W1PD?^d)mZ0zEJ^z|KlSWO8uGsxHIx&~<5| zpsEg5WWLe8JI1m(fJ~@x(2t6O}NXAvvU) z8f2o|##;3KD9Iu>;?ffVfJ_2YqT~l4y;N8q?I?$Q>I=M08fAJnnMF3kaRI6wCPm)7 zT)^uhQ+>|#fPyWIMZWq*;SEDU&}_3rNloA^yztwiiGu`?&~GJ^r= zXvUZ&jh}ZotMv59aHE7@*U=F}X>_h`DfIKfJa2*SqugPF3oiHHEFb!HSu245c4dQf zvl}+72d|!kM4ystx8uyCbKo#UuLn|$E;A$--x`XPQ2$VjeY(I3kKV89&SVwL1SlFG z@f7YFRvUT+|C@kUh)-Qc<1ZEC7}OpjiRWED?nSAssBkCZKP@(!)wwUgw-DO(uT6XaC+(DuU=L2fZ2zdhqN3`&tWQcT| zQ9W>vuf>o1qa_|0u7!mXIyvMjm(3mT$+TBeQi=r_YsRwV8dK})>Pl{X{;&kzW374h zUJhTw6Aa=Bv=4bk^ST*;OaO7VV38NCSJr*X1j6P+qfh0ykTF;yMqn(DdFNN%gi6iP zio}faj)6jw(((mu@xn62TahL-@iSXQ;_TV%CF4SUAJ#;wMvj>TjH?{3yy~*fz4T%& zOEHFoq+yKF4qwK0L5|P!fX+saN=mUX;B9lZ$dpl4b+vW+VXpBm1ACt}5=XZY^`2bK zK%qbjW~`dV^EPsVa45R%mt9oET}G}4FOW~(shjj*ek)MUL7MTq1seug{1wbmU8sta zk7r_RIvxJj-84+549I(MTn;Q^voT~eLTr|RV%kTBq9xzUg+NO_068+pn?_p#NayM& z*pv|2of5vDggXQ07?ZG*uX)vV%aPRj^jxc)IL(6GB%_9d=!Rr5D!#dPfl#f+z*{SF z;f}Zw;!-;<;eBX#_7;=#=;QrfMK+pu27m*0cpXqbgYFS~LP`xoHBx(n&S>1hHu`x< zOg&0=rD>@+kyx7mM+-=N3N^Zk99E!yv{3kTtNkR?zMvWrkr^WhpfwH?uI5I)Ey-^U zj4?BX$@z|CkPF89TB+V0d$)*L8)oJZ`6pZ0fPcS(Sn%#g; zz3ax+WLiyrmbB}4flYzWA1f0DW}5%>pyaeGwerfty`)=^NeWx!tG2TckQ5IRDR7`T zu!b$a-`PNtRDy%WC&`Qj;wt zi?IZCU`|%e@N^K_E@1_Qv~HFT!dOWNCQ_(pVsyX+Gv(@F>z7f2qOlr6@ty?vw1o!v zFIc+1@gaTU%E**~ZHF=sydrXcx#o{FWqVCbj@-Zb?3_clQogO8X@RR9NJquUY`w`I z8(TBjaRs{gXw39j3}Ktf`pFt2WlRzD#5u87dL%8q$Aq2hfM=s)rbI82y#LvBitj)X8 zxVzP{F!a;4B$6L~?H1HZiU=Oi+8FoY>ZJ z@L9oGm}FVoq2|#MlPOHIQsoTFgDB%qP40caG!BI%1Z#+d@XkE?oWl{|dsVTfyQH|d zSjb7BC(XpoNDbGwN!Z3>r=)*PXwfG}j8YxKhm46yv9B9cr`!AdN76z+JR!4dYMa`vnarSC6p_McvG5(DddD`y zRVA|lOpYsGUafMt+8{GmNAWK@EZhO$Cqw~|DV&hp0HGA{;GqWhGgJW+FydVH0e z0HPWk9=@CC1&l_=&H5K3%NG&hf?OSZRg)1NtQ0sWI68sT1Ibo#hTq@Mc$>IuCZG@+ zEq*uDE+;!T>BX1J*NQ#dGyUpQbj$mwv}WGT8QbTKfeu|tz}=m3z%+gIjHf3@Mvwul zNj4d{!)>#T{5gEfoih~wl^WJ~sP*F(Qj-zR<(e2F9DqjDf*~s>w6T$tC~lqo+;Gro zMXyuD0A(3_l-^u((<8yaC?ct%ZxEUcx@uAa>BR1?#9nFSK-o2ncHRB2KAW61x^+}|b0GN{dbGcIO zYeAy0g4RuS7-PB(jmb>JnA^5TC)MzFBykWAkkPo;z%q}sn$SxKbvqT;+mMnrJep3N ze3V85H}-=m?=2O!&=mmUZGkCC z?LB{u#){5)_E$0IsRw^vc>0kdt?d4{?)G)_xz3#W)99Vwy@k{(+}EGD-bp@54j2S1hLsq zTwttSw=QI>fO#0^oTl3h)TcQ3+{^l24E(v1mizhhldSK(KSTAZ6BxmJl@mOr&tAP6 zOl?D2)D^$5$cIiPNi)v-^x(mRvQSAj+Q-XL&d$zgtcrd|jh>%is>N%&QImxm+<5hB zQ_9t+JD`E*XvcHz-1#EE4>s*-T8Y1q^&#WNbMd;B($AhfJGd+;KOs%r`_P4StD!fS z-p#G-GKcgm%NQK5pUyZDu$1><_||lgx*-6#lV_c_d_irC{`&Ref&~k5m`nu-sKwC# z2O+AV^4pcf*iY*4h|MG=C~w8D7WoV1=Hy%mmGD!!8OhEdS=J@v}GXZ5s3-5X^dYA=Y*8W45{Z}h>4|i23 zO2%mw$wLxS!&YhwRB$LCTbX)@_kMGvslWv`86LfwSUuF0 zSg#E(%V->nRsGJc z9)5JtEP9U}LNu;!ZgTCsNAzo2QxZ5195~>8SkL<)4^MfDna=3XpP#S14#Onm+_R?) zJpM&*Z|^}7=KDKK*=c=!ef6+p5)A{4q-&DN;L*(pfL6jW5;`X@R1B?&i&#O->!US>JWysPT^^wi{ohYwu>0s?U1 z5o8=UZQ9gc{Os21HEYV>T$fp}Xc5<6f4%LRKyy0Bz@(*X`m8O}9n6@WVh&8V4V;@D zFFec0mhOvadBDm=!xaC5q`RnYM|Gk>xVkCErOX!6*gms*%#P^O57(>82ziWuyR~u< zsMJ-l=Y_aWZn~3f+G?w&TsI9?nTnQlge^pcGL0HO@mmdE3vUnxKDV0a%jS~h(B3CA z_gZ8*r%!>oc#B%W^o+qy&Lx6dX$FRo@6TV(UDArEeq>nK=LX@sSo0+XvOqJwNPTLWn+sWw;$7nDX6BeA1ypRVWL+Vdzz1rPrEiH-fFlr9P2M<|Dz?& z1K^1rLrglinfvi}u z!@|y?(>_Ig#{D>S=`Ce+baXcd$5~RN#Kq-|jbqO^v#LJpb7B?ZeE9KsQ=W%{MY*vC zbLOP*KVC2A#HEIq`>wJz89$VCs}sa4D=Wu*tQSzOEr&e| z)HY1uCMQ%9*QZaPH5d3;N6qX)!kL7%oxlF>wGK0Swa^nW^~7qk=KM{z$aaZJNVroU zZ#?iLBBsUg=o^E2VVbn5>6>hII2%EzDCCIR)d_lD4NXl=GzJSIU`@OeV7~k}x_z^4 z5BqdQXrCzW9f~^aryH@Z`Qug-=^;;(BF_y)o*oe&ZLB|~S$s;9O>aNcqA(?|Z5FY- ze85hY>P(@?Zk3r5U$th<4$Q;ymUz8tdBCsq_5qXxcG~)fr{yEd8xAbreAt!hCukX4 z(-#{T$4)zb{CL%?%eN|CDh9oIbErIqPJjLSb$fZF2il2v_;-Nq3KW@Uqk7VY3Iaqj zYsS*QYwB~ZUcbJ%Yjp&B^GCnL=G!f66t1WV4tz@MwfP~M|4>UXKrSZ5ZiB6@ZKR&w zk;rxnk!#kADdl4E*WRsKzy3u_fV~>#eHQQJVA&|Q2P&Af^Ws1Lcruu2n7jvToe>O4 zRqX!#`=q2VS+c~{-TlR#r5m(+zr73R@Tx5lrYSCy1 z@A`)!HR@ce4MRgi#TZsY?IAbkElRO_?&Ibb0xG9n9wGO@*_lbUGoX?vXfKaaPQ(gK z7wm?`*E8McQlov(`iElMzz=$enJkBmLIkTx_okvyEgO2o`hl)r->I4TnAlJM(0Z$% zNG~<0_I}tBm-4z&H@asT1sfA&3*9#;Dk_GsHgtAuS+(jyw*^2!|Hiq@ zaGA3ZPcNvc`5)H(8i>0RWNlTAQ+3!N$F%;T z7gCg0Fm69TeMt5D=m$3oVWELfBX=1wZyf{g=&@Uf3$jzsaZtS#v(1VMwLDC zE^7s+BND|Z6dBov>$foTlKbRkO=pl*s2d@Sp@POpd0EfmDSJPAM~4u8s86)3H(L3w&H&xL~Wt`}_N$aO}j5 z5krUCW#WrQyqs0=V!RGh9u;9(mZ1Pielmgux|6b8XSV<0?teRDc=FA+C&AIGskuc( zl30o5-n=?0di$|!EGWl?LyQ5|-Eu%GLnTTn-V}O88~B5_kaYsaRrT3V)Z%!cvyc}r zB2W*t>od}K|DIQGAAd`cKPEtrP}ur&e4K0Bw&QC!BxKRV@FCin2~VgTb7pn*mKApw zF5CDQ&0EAi12vh8=FM*wfj13}$(&N6+fT+<$78mI0M9G0f7q1rkFvA5+-yOy!opW| z6~VMMzKgG%T>rRtNvl*9D5{l!7@;X<9Vzh%Ni0C5EWFyT1Q>O{cD#HI{fu=) zanE|Qt|~dzRCC_=-}Nl%0!nq&cf(fPD5+DYZetW1x{NW-Gat;HH{_SsYE#UV5_G*V zVshPmaPk7j8+0AMSy^8)QtX-5f3UbcY!aT43B1hak5E^O7`#b(>~0`vrsio^D(sz z9fEt+uIb^#Ot-;IyCOzoLqiZjIxB?+pI`~L&W7XgwnzSuncF%&(IUbKhISJ2VHj&e zl;O06?}vFIAsIdeFVLoZF3gBjczxgluhqxsDW)_=P1W^NXU~d_(T~|C6PJn+jO+6L z*Dp-GUV4UM3V~*IbyijuI}Llw9#`{aWPI!jW5&=8eqVS}j>gritr&_6xa}uSoLIYR z)idypc8E=-_S55Z0}q9+D7ADY`A9h~`Io)z8^aV)g#6O|$%%V>W!<=O7oc;LO0x8w zJ9pTJn;IL>F))39qliH7oZQ?JEbj6QTk8c27e)XQks=9Co^yzQ#odzzX?>2E;xiZn zOtJzH-_6S_oXki``!N>+)GlW^CTqyc6==qx4M)&icB(~Xtx2uj=TopVwYIzbfK(jN z%t|(46~>|KB~)?G{l~+@!x;~hjhA7mGY*-x%Q81a0Us0z4m_f^0q*byQD^VE><-{e zIm}5&AJHgDT-@A}cUQ8>pE&V1+UHB)CWTxxT#e&OwrG$I2|GJG@cXA|a2ko#_%s{t zR3wA*<;$0`4*GP&oOuf^Y;Oh^Xu1?=4rnj;AMC1Dz%|ZWxa{}986-EYPY3O01Y`O{ zppQn|772~`QriF*<^A~0%7V_W#6Y$oEaFNPf)c6eIukFYIB5SsS!@6LItUC5nb?q} z8}@zHPwarcX9d-qon~ZYghpRuM%O{PBWH^U&rKC|M~OhUxQJ?2!@!;Y&c+PY3a?QW3o>vi5Y|NYi2N zTeogq8vwhd$`m!2lHOGzd~IFXbZvLKS~_V&2wck||)j(7G*KUV3_N zWM^l$eEH6Da;SqD`RbJvR&&Zwg|ZnOj%#CsZP6yAvO}cYb?~4xT4ot?RjvU6^mYsX zu_FP3meMXe#ihx?SXd%hg{*dgWkrSD4?PfV?k^Sh)0^)n7E2^zRLm~sdNnY2A^0Im zuP)sL|C$a1=Vjs1eAJ!Pu!1LV7Fr+UeWhQ^j}-rFb)jy1Y@8T^#3Z-*h<+K|O3MOf zWwJ@=K9!_EBI}ZRohLMf+PN!!@)NdIl7*z9shN_1N+%AuSBfnE85Xb5|APg*g*n_+&8v~S zcB_z;?5b6(^qG>9k_sOCRNvT+n=><@__ROd&M4*xuz8O6Y{x8&wuR;%OYlFMTyA!D zwq6?7_>mZTrkaq|pkZ}_-K14If;LqE^ES4&Vp|)uTNd*^yv`NKt+mmyIswi0B$7|1 zOuBs(miroPt@!iAx{=>m0J1b|sJ?smu^hT4)ofH){+6kY>BkUVnZgwj82EObF!n%P zL=?_6ei`lDIVpL0cT5_o_NB}0;a0RE(Ew4xN1qGL^04)*9f9m@dl#kT+O;~~vs4`V?TFxXv z@ys&1Rq&bS0d|LB^C0tIWr$9+Q`8wSdBJXbq_e4QDRkKpuqZK3{l(ToSV8Kz=bY^9 zrva(tj~#P})cA~q&>{Vrqo}y9Rh;huRFo6-ECQ3`QcyLotIuuI->Ylq5b z%cj2z@#mtPcJ)ztqld8fUR3(d+-oi4bqp7mawuD)V`Jb(gk$D;aC=a()Z7FL%L~_NuRwbP zJOB*}{}A)5;!-qTS9e(rl`9M(86O5_#oT%fTZ&FF*0Qj)_o2(gmx*9^ceFa)x{H?< zvgk+Qx(d>{vL`W)xbS25^&Bs^!t8n)yqd`=4r+*7ddQ;pQlc&3FhjO|Nhj7ws?w#S zeARcBp(g;de-LiT9V`u%^iY&R4O+iXWfzU*s9|9BRB^EsA5@o>b8}@j4cuiwvw;Pn|0MimZg1jMmvZ;S2kV6mxx2(sBW2f)KuQ2V#Bg^YnOLN#|1B(XO`=_;=;s-q9qD+ z+YspdXCbOsL316fpPphq5}So2feZPqhhHvS&Jqm#rwv_#R8wgg897{G2WzVB_%I_F zGIdhdKwlqNv*CCtE_-!$Q%g(gRK}}U#Y0!#=1m{H^`)~@*V#-ZIf9uZCdW$XycBvl3rSO>a_H}qYvmW2xzxTO>o6~(;gRmmB(P?}55dqoSj5Zq*36L!@xtvO>+yldIj$5X20BQ}jh<*XE`@gJ zUP{TvAt|P9+i8RwqIEq-UjmId2ZnNK@$7D{x8jY64HP4fd-mg}Pwfy3y$`56q9bt) zv8)vAbqM}ZUn~M`GdX)2_`tYY9usABd|ZqHSwJCtNcHgsy3GZ~8?7SN$6NTMAtTFP zyB3C(cKrBF1?>lq9=TG9I9%@7XpC9NfOK&F{CPPKN9_-9C}YOB?U1udk&_F0`EpN4 zaBvuKHzSx`%)J$1Wm%w!Lx8yvyJjEoK~a07k+&X`N)kw+D#Z( zu?U#IgwD{Q)MefG<21R~*pPR7`;HxEfL1Cu(hCo-1^173D}YEF{m~cCD2V1dS5#P7 z0opcnS7hRNMn(pRo=4XAq;8hzGoWMC@EbjKRhjmgn2IRy8I!}x%L%?zvHw^Qo;&Ya z=%Yu=$hqK9`giJ%l8vxL*@}S#7cYHu`}Pwvbqt2FXNTb3tnXEJ8Uf9*^A|1ZfJ8G^ z9%C1R<+pq1&NFl7%mL?eyu6D_Jw^HnFR9Z^dT zK_P^+po6y0K6aW;L~CAyI+epd;?ODDE8{|`*8%t$!C0e^zjB~h0ZN94`j)Pz>I*&_Cm}h^sTMrH2!J~(Sh^I-<`aliOy?971RMz z1LbrhP#s;d18kA;fUOSGNkM~ecHxFyK?RP^Osv#xno9OHsVXs z=mortn3xzeQQj*b{s2Ca08n4Dc<}|4aUrKwn>R<|ow$UB)qtlVF3I3BhXB{x5Q&H5 z{-s><%x?K;l{TfmPTyPqc|A9}V(9nQRui-zeL1!A3gg4qdx<;6SQ#BKitaBf3l7fe1M)L|igI?7A-Yr->- zT9p4e2L8cqMu*-l)Xk-n=IQAvt;1#TNXL((Y}t$X#f8PAaMH`*I*N4;jEpGQ*rc)A z4qiZ;|L`bpRvv+3I|nTnH9u+c!6_8wA%xJw@I0K@i+eOx*3aH0iqvDzs=tGvSXv>f z156kS0KmgN`&cB1kD6e2TKS&OK)U3#2h4u`(XoOnq7)&$szW@Ezh7DQmvG&_U%#dp zs&AhOHj;mP{!RIeZ`>ozuoNIl2XrC6B9dmG~Tl`k*kzo0g-WmaQDFqXJAq>>%P%ei#PDxQ<2W4Ow@%yA}&WNv?`_<(8v? z`T6G;%%8stbU7wtECN>dYtha1)iBk#?q*$RpCWaO0XC{4$Np?JpS_{3+K~qBM;odkyOVu?4#zsEJ2Y4i0axRd%0apljkv5D% zjWmexC)DQ%phJSRK>GqAju0?K=82l!sD@eR*Dq1@elRxT%9C1-jB$$L_rDQed5Jwh zVJK(B<>>ediq#54_M|}5q@&W;+dHDM@hSk9#~-eF?Q_xrwrM5MHWaRmlbfAsXItPe zq|71VDBcYr9q38{SD8m?pbSlcwPal#$ed^RME-oh6CXAca5__Sj?+rCw-nLzlULZ#@Qs*zV7 zA_x&f7omORy3WN?%)!AC3C|Not+C!XiWZsw%!`G+Rf-*$f^QJ=JD6Pnj0XLFEh}p@ zoc9O_H+UNY9uY)yb#Vz20Zor?P>$CQ2@L#etFTSdsc&|cekIf0rR6F9!Z|<{rQhD& zYU=5U0Zt*h4;JSbf;CZPWwOj0t;PsO5P2RBc)Ug571cD03phTk^&9Eu21P-ZJlk_EiTD#}wkw0g$Llivy2el01 zGuSwS0a3Sa&nJ8b^};ITQ2^w4C@9i^ImFuz{vlU^@pPx!LJHFGr>C0h{Sp-c4#C8u zs{qx>8J<3KhA{0YWd%}oscwG+hMxC=pa$KX)u#72vn5I<)CoJu=9zU=h-0#r0=f6_ zXKTl|_t;OTQm?;tm=jy6D=I2l0@06P$yz*-Yu(rchJ^@*WV7Dt>HzC*KHA4;29OC6 zUEs>vFB_vKL@F^uRL|`@$zIS(2yo7$Pf5f4n+2~Z`K<6Q9O8nXucqU#GIK0#qbZk4_zlt zODOc1!~_;bBZ@XKV+0;ifpGz5C%-4z2mC2kXOffIl)S@0j7Msf^|$5oi)TApZv>aZ zy+Y3eCm|w;hdk<9R!_F}te#Vca!I8@2hc>aR>&c0vzB%EA9rJ`m3AvZ)J;`o~XEx&yaG(bf>XpBM6?o5S~QX-xpr>ITocE z5{x^-L*V$ViIXG&gqvHNkclT%Fdo<+`<4SCkv*s32J-DWXm`6_7wlig9Ky~%F4^(; znp+Xg%2V5Bhr@x-#>S>`CcZ*!Wp)mZ4&-j-67_3c{r#iyjFt|TX*`I-ok~&@>H-gqQS4SEk}N8DN&*xuQ3l8WN=VcaXF2bh8Wp|z3{}*n;<|Ke zHxzF+yPxkGUK1fCetk|+(GAu5(G#D!tko3mK$bwFO8@$IB9g_B^(?Ys{rYxn26Clh zSzD_3bxyqdg!gVthclUEZB zDl&Tj+1>4tC28v1?aYneDo^cfKwzJ911ecA+h@ho7om5DFz}sJm8K zx^D|$fV;Ig2XYvMHam+mRnsDTf{ z76S86WhY9GYxyB|CMPTF8YwPnxqbU~(Hb$NV`xP2X)+H0f1@{FM4|E+%yjDtQSC8C z*Nx8P-m}MaC?I3Pndg*w;YgF{__n`8|4QA%G+r6OGH3Qlbd-p7TFUo2RNsw4aV{Sk z@jr1Q6b3kvRU0-cZ2m(nXVX3bg{{`cm>jecTXZB1 z4UOb@EyIN^g@zMK=?JikLW#xsVgq0xW;^LGV1s~k=fhk0I*c+Jdt1K*5eET}sg(Xc zx^LI6T}Is820TVhw)fhF>+(SIB6g<4}8fYI6r7R0_^@j~+de&U%OHBFf0#@KMeYIFMF? zwCrv$@jg!yikeAfczjipl?@iQ9XrRlLdVv|W)O_G9s8@+r3}OIr{)Z8ig|e*Xp(iD zPCPdVAV|JwI87s{FUkO-3wpZaYy|X<{`c>s__|9-xSq@yeO)A$)kqIeAS*HE8bXI2`GH}{>AdNovg=LU+ z(q)Te{;R3IwDpDSJ~I2~W}zpO*au(%f=yx7Q)Dr#v$de<(->UGGE1-qxFgFWV9C(U z#Mc=KjRbP8`qexGb5ET<-3Aar>_DOw5X0kr8CZw7@6ij;our_am|-i6>VTQ=qyY%H z5{!bWTsR$OLvy2bX*3!m7|%D7thb-GyniD}q z#!Si*n!dn|ZqxKPF^9B@{L8_#@!GJ1I_UJ$g$T zuELKLcITF(naT*a&14NCbKr4=A)HUZtkl)3SHoKrTzOQAK7ZczI%3ocD`DF&UVO}L z3=tm)J1^j@?uPUPkqhk+J`QoyNUZ^=bi0_`VR%%9+buPgt;Y?)7Ztq?xl3Qe7gpU? zhx!*i;9_Zx-SD81Y9wS?9xlT%>khnnwI59)5`Y4{)M#su;n5ikR}wHip>^l>ZLFOw zevwLSmW``W5!|c_9&bL965T}uUm^AiZdkm2trAWNEC9~YLn4f$;lNf%%P)#I{Cr~uE`p^%{!Y=ISs!La9s01*T5zu~tWxH$dUUBeDtUYpUSds(+IZwLo z*s&uXnGf2>;~CJJX01p>zoH0L>gkK`9U78@`2^(N2wVuLnKGQ9vyJ@zI4~7ij{dW7|)RqjKC&rD?~CyAC*SPaXkjT1@^?>>>aYg z>`lSs&6}9u(JCy%^a@Q%ItmiQ#mOm(Y|j@Iow9v1gbSfZSkpvI$L=L| z82Vv2lIZ#KvY2(G-8wi>5(j3mBJi%Qm!5RQ-+&V&4ng2McvnA01+~u2(=!ahda8W3 z0R3C*+W$z9a~l)NSkI*pZ8{m)*uUYLT8~iJ62~l`ju<03UxQOoPABT@Dy!Ko#JhR8 zEoxYYVv;zcgROE}U*$Fo=h%;QXG*2DMcLI^I$8?X_Sy8?Sp9gc<=RrZwTPoAl!GL^ z-e{F=_T}0h^23AS7GG7g*+Mw7#Xi(Z;ByKK*bO6?Lu7fMG5flax}JwR=Fzze^cNzC zQ-Uy-tgNi5xa|uA&HUeLm+N*IU_|;qe}38b0p3fWehVFCDAnv)``=v6S>ag#4%t0iH1s4Y%XC0CB-2d!D-n5j_Kg20R87S>u zkhqEA0Kb`p4`H3bGcE-o$FR0`t=8Ei|Es)FlG^Uvy-Ub3fv|~U$mPaW6Mak?p z@B7zcSMQMduMp>v)DgRYj{iwXTlWhdt3gHjL4GUyk4u4mx2~A?9_9y@Wt!^3=x;qe zJ+q0t|2Q$|c-i&mc)RT82> zuDNMpDRpZMxNOz7N4#-r|DasI&RS_^cX8r^1D%Az|#^+FWt>oS|o5lFw(K!G88}=UvqW@RESR#q`_dl`#|B+Puf91&h zhr;>)KN|nbp2Pp^(7k6?FOW?DH?>7Lsw!6Fp|P=X85HuN&Po{oJI3XW3cMBIP;ab; zv|-lDAuIypRu&YPm@6=!om&Wdw3-}ZifxS}dLO#FT>0;iJ@1$0>y9B%tb+|x#z(hA z>!q4^l|Wl4dm+A=1jPVu*0FE_>mVt*=RgG*ZSXoS`D-5^tRvd?VJv84XTzP2Ux#qm zT)uqOF@Y^B$X+AHTEr^)JRwn?i?~R!{n>k&CJnIdl}#k$pDk%=f;4Fu;d$x5v#d3( z`uA9i(cKx;haVvhwD)-ej*2oQ`~?-eEes&8dX0N<)A!NHgR4Y!VKTcDIpR8ifD*!? zkP(Ss2#o+)XSF5EmhCa=gxwHz@%8(L3^<~o<8A3;JP&!gW5sU^EhAtfew=#e<0|-d} zu6xwI&pJQ$_x(EStaJ8SxWbyu4Db6s&vV!7zAhwxbP(FpLZhP<*fb7+bwtl&Gg}|n z3=Eed^)}js4lt>heE#K^1H&2!zL8>&{ie8ibH?tBOMP(HfY5u4&c%FFENd9FZQ>XB z{$fSLz{&Bqzoi#cPKtgw?wx!I(E0YDKGPM9Cl&NqT28K$l})a*42Agbva^Jc#Q;cqq!fgVqGKr3gn3SfopH#y1GJC%(V)_Z1r)frMN; z0TS80$QJJ;O(h@rDR0T2aecmric(*3Hx=ehU8?xE!O3^CKIT9H~= zd(blQ*@brRncJv$if4KboUlLj%g@Dss{u+H4GAD^qL~huSXj0BXh2)wqV&BOF`%nk zqxt=x;Sb+NtO4QAE_@U#|8Ma1nLDkkfV04);dufwVdQBevumnp2Wqw@<$ttA!>7 zC;led3uqhgyr?+>P6Dcpu%;qlJCyxrzHib#1ausXfEca_{C(@-Yur2Gb;q0I-!-~j zmDLV1e4F-$YufA!BMx`E=mL>H4A?|Ky&BKziTBNg1QAH1s-qWk{8 zy*Xe${m!Z7SxIRVi{?5${`k?JgY^bQCl6NC*Iz5LkLwoHe!D^?%TqJV;XErb%z-Zw z{Tdc7*e9=e?56{k-)2?l9I*UErIK^Jqc%oxG$3GM#XzT2WXpmq`=h^_Ze3VpS$%(9 zTE9=KX-v*|(d5ue0NDa|zC{geJol#Q_@5Wvvhw`rdC>m;zi&J2u1<4hxEzrQDJWPh zcdz<}Mvq`y&yCS-Jq_Cw@e?JSOsnE1R&igPZhsM}*vcQOSDn#hm}o9|rE~)^!AkY- zjvA}QCrzcf?vNw^w6WTCj)!G070w+jFcbFJ?zov7zx_p$(;mOf zjbo-3#^#EB!Fv*`#b2kVVkQ$(hf*+e^vnj#JQ+#mojBZ=RR|WW{eX}b7OZ5Je%0S03F&5vdpZR-hJAb zYu3Hq*7r!24iiI8$dC9+9qe`^M4l<~*akvWlLwdAL=cA%#sbPgREzc^cRhND-v7(T z`uP!zDblM0(n8Fub!FEwHrQK04vX0QSK@XN=x-t_!oL3gC2jw@zPu;z*PtPCif8l3 zPoGwHH#9cdp@jf`mT=|73>R;k)#A(Idkgn4EEGaV(Oz56ZnQi#m?R`(EVhKyoWfwP zM&_G|ZsA$cGwE|uDB<&NBqXc{$FpImDPT&$Oz?%C{Hm?*mg*D4e_S9WlB-s0e*fKE zf5}{O!}#M#3`*8C==Sm>L%Sn`t9l}hdx{Ktio6th3SoNjGwR*s*@4`{wJrAxL!TLL zMb!4ZY9D&k&ndZ7Pud7J8$*^ZPjA)ObAWfZ&C=5KAJB##E3<-I)<)+>u%N{BEIzS;* z$nKtCSw;eFq}?TG$3r}3T0i|H#@l;ELDb0F4kT0h<4DM1YS+w(r+cemK zjD33+TBO6byujQaZ?ZGe!B>G{kq%DM5tR`Dt%!Kp;>p*s>_mfdznbEB0?s3 z89&cWz3eQ`Fz#l$<}Z%*0h`UMz6Mz$;qbsL0Fic<&2&7%e0E+i6Mw=vE8Wez>t9>2 zKtCT&%6pwgIXb1`=&~3^sW~@iKq|)L`k#5`3O%4w+RrlwtEj2g_K&yOy5_7_!b^DJIEg z1Ptx@|H|FQ*&C}ddQHa0#)yQ7cLRgVft-bMC%}*xrs`t$88#&NRnJbHb4@~6qaP#k z$jAR@WE&<9EM6uIA%ZaCh2nLAh3@1sz^fEoKdljyyc2aSbKA3@))6f>y=sG&4rvGR zm_)xt9K+&QF=E(4>|jh%21+X$DaWgf8i@-}#XCFpleaaEXH{&AK6%Y>|n^@sbpEx;8Y=dx#-DS%@*+>-s`sW|esy15qB#YH4C(W=CPGJ7_YA zBbE!+p0=E*MlS;wgYDgyHI{o>r5BAHP$(S8{L-^x%QjG}k9LClnE2F)W=epCO^z@& zwAWm2F)g=*Upn;x;{=<+aj%4-sUPl`D?qO3D`EnUTZ1)jZ#yBp?e&Mh>1_&?VX@?^ z&Y&Obfil?!Hke=CY~amOEBbHwIypPb%|zE7&N)2zYoXBZ;$>sFGh*Qd!e@Tx<4&xE zn1vfu$&WDv2~isDGT;s+&B)>`TI2OC5c$_=mNTklfEnd!Q850ZiZ7b7h#cx*F=Ex< zJ7Kh+Se4;(5&5@)IP?TiZ+Z6yLPd`;226D88`wlGX@hZ=foBr(S~PnT5%$H_qjv+6`inqvkdKQW z0Vj?f%8f0cN6#WDDvtA+e6&O_&}4xLnZfT ze;7?nW2CVgcV7uiLr)PF(G+!DB^dsXSF0X8bW&!mZ}0V)>iL;NyslgEm&@UC+PYn` z1$+rKihm&m2HM1RV0ak-f9tm1*t1ICJ-uru%oVZf%v|JLIHBjlIVUk55ms}eW0Il`g*XFtm- z;WJwW|#9tC?q~44=>FC~`%UZqNT1uy22Go34mMHx8H;5BY zWC9cJihGcr^>H3b(Or$T>8Rh;|Dx2ibnI6dd{lnD;xo!NO1DyU->>)+=@YwY^ zMy%6EvBwryf-{r+E}_GX5};DcSqa8B*W$_U8ITFMsY-MLB@ssA3oY3Ihbz$^P=Mh& z&-w{Zy>Q!$8^I$Gs4z^>0{16{f}`Ip*xWt2bz1EjfDr9D4${$6Ho$3C;9 zO9GdE-nX8@i@@@~+!QK=w4Py)8@Qn>FZh^xnUC%%k?Cx7ig!2#Ft4LRL2ukau!1SQ z1nqhyii^=Pvjg@N0Y~Jxv17hM$gfN6;>31nxUg5!>hu;Ib>hmGT+PDp`(q;3lnfuo z#E+PD7xzL$u{VHFT~g`RpLKidcr9NP;lEe@(#3WVSvsdo3nn#pw|RNZ=8m_dvpF%c zE~zg|+pT!d`ghGP*dZx%|1WWHhvvq{#%amPvQ14*dE8mJj_dRa#kcuD;66c(G8&s} z5_*3!O$`kpL11P-&yUgYcCQ9Vl)JZgETn~z--zXXeWMqmNdn*#8>l_IRh2r%{K zFgwX9L~1L36I6b!CP63eI*GY_Sv6Hvh5F0j9=mlUNFbQSBu5tA0t;@s9GRC{KHP@* zK2Yx9;&h0=6!@Rc?igudE-8SCUm-$Y55$K-(6#WW1YYOl?S8d}yEIG?maClO1;PTu z@o5~zY)!wZS9CA*fJn*O!@|O1^6tXra@C-d%+%w&T-V?jujO6xbc=CBLO0(J>nKt@ z{f{N$KLfzv>EyFVd_S&-aNmTbs%d;Ju=6+lQaSAW7iij%G8w6baj`&K0hBHuc|-LH z_;)o4KtMYiDR4?=xy&RuN+WFMj4zID;)R1kRg1m*8v{wuD8>*A@JghA$W9#{9Y^x3 z{S*LDtwiFcZ)H_dGeWWo81KDGeC-GnbOaVyjWXQtB=S#I7}glLzZScmSTt=We_!r@ z1rd>;bggO>SFS;f5q^e4i1sQlI$np!hdDndP-BBO`lel5ALbrK{gX>t!SW@s>bZQ_ z{8xUU@`VNu>WbI7WZHQ)*a+#qk)&G3GnhSp3`Rl^&8(!fyx1xYzN0DxQhr&jMggBr z7MHd=-er3G`1g392jX98_DP&NW*KR`pna9iIwTO8uxk{|SW zZDZ+S*x?|*0c)|kBRmHPmK)hh^S-Y!jT=H-+(e~Ie5;~MY8@ueTylF_)nOsbQm;BH z>N^Ry+8{hR$b+iinkDk{-4SjS+F|N#U-Er7xz~}?^*31!&i;u8N#_QFG)MO1k#@B- zxBTmo3V*)UxnACH+^O2r)}imz;kQrJ{^K{XpUY@qHi=qLTq_nXrw|z7XC>HkV=$AX ze5%&u@oR2!T7hH4_^8zUu$1A=i5HJIl-;u)Q&Cp#qWN=P*AlDOI~&HrS-+xdnbT5K zI`*Mc-O7iV>M)m8B=ZLwTZEATE+jUHAYWm4O0H9nHQ7aKOBi%GB$v*(up|2Mli-_nT%uT~aO4 zwC=W<+jHrqJsQtV%=8sPN$m!6fUc$|d;y%q>OAb?=_oiHi7=UqguFw@T8`ChpYbTr zm_67xk3c!;0aqnotJ=!Zk@pLZO`Pcd(JItc=y&6%T!qWw99Bbpy$!yz5)Ad>xI0ZE zm_E07g-4^Qy(lHCsvNXc{iPidZJsXKuj&}Ic=MEU@w3dcs}21_daxv@R&~wc65S+hz?ZZE z3k8D`hEjdY83oadRjo&#-u;2H*b#xE-zJ6k1i0YQkw4$fWmI+{^f)jVRC07b`r$ zPMiVpZw19^n7_865@np#`)wQ@WalAkLj&~=g-=|utef8dsf)#zDtQCbRX)YRM21a5 zBFWZq%hzZqgXpdt_Ff4dN?)msvA%=u*rprX$yUDJ4c5b%qT&32%iF2`gx zX}FLmZb*-bPWasITZxOTRj}O;@ltXc&DgDT&I7;reLh^|j|3q}&#l_;7ycK9C8-WC zJq7Ff3VWx%J;SIO`(?pWo$CfNwzPJ7+Xt^@RcXi)5k)YQ__BGER#69e5FvJ}d|;@m2_@}2vAH|D&56-gP$M+Z{=Q8qKo zl{B|!$6Sia4-#-KjX85?m$OWqgPH~TLA9B1{3?TfX#WPsMtdGd;q8oQzbKDEW?NTKtf; zf${EHg};w$8f(NA2c|6_Tg0$9#8|2m3xYjU2rH36u!oLNNctCip=bs)P!%6YnqLu% z*U0vhm1py|R;jN8`Ptrbkq3UFA(Cf~$uu?(cbRH2=;&)&L9UEsw?fu_j^mM!49F8D zO{P9x+U1uv|NZEUl|l5PpM&pUSaC82ute zi#ep{#>HP-q4tB)62*E|bflROG%D5~YkMEyt>l!Z4yWft?n$+X1DEQXntFbgO?w16 zkYLml@?PKjJ=d{s@O0@H#$A{=t0J4z{13HoWvw2ZuWV`}czj8+6QmJ>jCMQKMU0?Y zW!EqF0_n`e?Hj^$bS2o`^Jh(u1T`S=A?1Snr#~(UU#eJtcw$SEY@C1S?o-jSI!8Ji zT8+K@ZfP@m%^o0#QASoQZ8n54#q`sq!*ErVl+s4}bZ`wriGf(wtwxUrx7$TY`ckzg zSI8*K+ICX=hq{2+?gP za2m<*IV10;$hRiV={dw`DpZ=xgCkrE9IpGJgG2g^0~xm~E<){ziSI;N0@38eXX%B| zitfs|zf6cRu4Ml`{s_D(ArMvXe8z>Vdh!9QwP0qIQ_58mO@{Y2$r7P9^e07_RJ@i5 z@A#C~BgtR#rdD-GZoQAwplkuFUW(x*zW}L2>7_)YN~}f<0vs8_+mXx_1zE^mNr6M( z*f^;P;}*z3MUDztwh^?9CP{u=#Eu3nubsB-Oj+_#-k)%i%=EZKN&%l|19O@M7V`5Q_{silKvS>-jg!7{U8KhbHOv<6DTWTi+E59_AE=Q0v7`InppGK0%qSSQr zLy2&feO2VEq4w=%GfyXR7AoC<=uB!eIWs#(o!|tk68{hfkV`(IPcg$bAKQshL^JPp zSfWiBZA21K8{|MHE4TT0AQd(G3bam*R{*0)>MVv)P(7+?Ay^xKF?ie^q)&s5aFhZ) zDE?5)j0Wy0R0OOR$8eNT0dUT)-AmDI7H05!Fo1@J&o0QEl9A~~X{O?BE4~|bA2;{y zr19bp0BSd)^m4F#$PWGnh0S0lm5WG@-K+Wb22#(XIykOP8h35eflLU0oAN>`Es_qC zJ&IW^sMn3+sGsaD#`ER#*VZt0VKd1a=F%T-x-vMP58ank!lylT*WUo@4613jQ=Y#K>$D z+-K53H@D@zc%pwJy_et$sSEL_d{nj;!`z9$3{{TN?r4M}@qOdCK8;}U_4%M`$_&%i ze1M9lsdpGW#8#@^1-5;UKGRk(wKGXbI{ZA;H)TSggcFK4H@<=}$+zAdlC5p{a~oS+ zH7P@nnkqdKZI6veJ&!ke-?_fNUOB=FpS!ns1CtGaLff%va0;DRj>B6sIQw#b4!W3# zpAH4Bl|OUZ;V);BO*dbgr3Cw#2iObKUPTsTZIcu{Yra{O^V{5ycQX3>`#I)msVvy7 z4QvdhhvFclx4f=lixV1D-AR`D;vl$%Vzq!c+L71T-25wOWTn}(fJUJfC_r!`ec*qk z*(_Ana#tM>Js=?S$mXHyrwAkh`n_frCG35dy~e5J1Q75cULjNbj|=*4nKl2i0j_f7yupTlW;R)pd7qLEIVccXdbr47T_dq(ZV58mqgSDh3= zO#y;OE+#N#?&M)qj|a+z=@y(gD))c9Qi%y26hqL|TAH+>YuI`KEnF|BCF4fWe>vgZ z(&+mh;lM^FP>s%=x>*J=e0oxwSw^Vmz6jK314k))6N_+mjcpd0SG#w$beOiDSH8JroHjLo9k< zC`aU}rzht9i6E%neJSTa>ZPSx=*+0Ppr>Nl0!2(}+t{O;!|o1>n8heTUh*Y8gEfR% z^*RN;AvIowRLLa8nhmz37;6qIBk%g0fGj*p3@`)X;GU1hR?6)Ms}fUFE0K9Wxoo89 z{QGbsb?=gdr0+!#mj*5^EmF4R`%ctu4=GVpzedl+n0!)u2MI6fs1LFW?IfOf6lLuva9uwJAh1dmL-mXBoLvq?Fh<7sCq|c4FXMV=pz{W*T9D;TQ zi|s*GwGcz27d5#6VaQ$5&(HY=?zZ5nM}8z?NHutAMGr(_H;Ri{V1TtI13{|OT-X#@ ztur{plB>q!%1{iU-dhFA^nEP4VGz{V17Ng7HwGKocVft*GFz@ z8HHF@>$d$BDFTt0B=uuB{)cTyI7ukd;Ihv*5X~|z9?wZPw8$$XVJ6~rNge+X%!s{m z*pNr_haqrfOEo_1d?mOpiO>jWjZwf3x)BlD8|4RNQ?H?4rh4&9kNqSq2X5!Q4Am-Z z917eioF^GX!q~8;TdM849$h8d4uOmB1N=lbhTQ?%!6rP#uIb%nA zXMk{A8i8186W5tnH?=DXUVxBN7I_IE47k>#=TR`k=_!Oa!WSd5e|)^U8-v7#57;d1 zhV5Bgd`0#S@wuQb2oFHbE!2Sq7jq;sBep%M^RWC7@Y($*8Z?6vlV zr|?mWN#gw^#?p;KNo;i#{?P`}LR7sBzT9jb`P`LMj3xawI%#3*?#E%6qA}U74FnQ( zKr`6kKxnlP0Ra^O$!0B4L84?)5Xnf+7}~6$rGS!EBnJh_Nkv6+ zrX-7GiXfrL;l2xX-JRH*>-*lcs&C7mI?B3u<6;&T7FO!9 zLkcV`^MY7d=DuAxA3w?dt04@3%|9o5^br2W*Vw@{H~h88;+UEh3(KaP;Ehxm@f&Oy38*{&IaIDeF}%_!VfOOgI*J4}teX8c$ZciN9P-`v z1DDCYummlfvyuFLdCTt?$=@t@{`iMqa4~A+_l^uPtF{WK#U?BpH*PGesCY~en;g+M^oXay?_Z^f`j8+k{|NfPd8yTC)yYC=p*_SU*+S=MER9V@( zEUYfa4jw#6XQt@ouAH-R{7DfbK05m3<@uLc?{V#&y~+R1yZ;Z5->pxMazVjqeVG!C zV?}nB*{q_$>d`UG{w3=K3Zj!5d?tF+1edJc@!4IX_sODF+w_v^ZDn67sP*N{KFA^N zDUp44*48aG#<3XR3Gq!bPQ%^oZj=3Z{#vn8;~g&?hDwhLnbjqq@Y%z|%F4>OV2`NNYT7J>J*&1|h*>Och#kD)m zJdhPgp?Jtl+lQR=^?KnU?U=#7fDC8}Co@twNHG2Tdv@pV@5b^}Gif=TZqEKW4qvY< z*zGnw>HKvr=jUfPIed%~e2%}QJv(@_jjeI?2(RaHv$USX9cpoU|Kvz48JTsLayC(E z2bYQId74%l2{-3>$k8OHhRPYOKd(Iu*Iq6sBUK(MS3J~NZdGfV6kWbPL7iX7py&kc z9*0zFt;?tTY~FewAEd|p94XZ)Bi4>qWnNDkakKt!AE~q(H*P3JR+^1e8%0LbDCF`P z(q{UKAt!Qsk{TO&68-HO#MWtAyxS-}hb^r&YvS61+O(ffBw^*pZc@3wyKTzs=uz226&mBr;Q zO9l;(O0U|#z_{$oXi|AnOipx^dh~_wU*FZ6vF)`uOP_e#Wj+0}dSu>sKD)tFxR4ut3->i{*%upZHFnQou#K54Co3yU(;NNX6g!dZ>2I0GBi8y@F|}UApvaG- z&;7O_mC z_u|D1JCwqeQm2zv$Pg6 z{`wlYg9`;u9^xeW1y6SUZB`t+-1{lOsrP9}NJyOxT`Ogi2Lf zpmO_H^dxgmbsV)SqjKA@(df+Nh7Lo+4?znt`YFt7*u6AT^ zLn_CQCDk~@kO-P!v)fnB)_eIzX8xv<61$YS8^;Cg_Qea-&0#IEJ2UrRl7nS(<)3qgBS%(ub+u}l#g43IVL6*&xnR%inmD|$WcKgXoA=En z-^l;P!b<+$x8k?|>yW+u!ITO{fAF-pBccyl3sd5I#DMhR9;oE&(bL) z6xa9m$oozI=62ol|i0*3F0ju$sp-XEE<)yx`N6I0xqa-?&KW?;RQOWBv? z?u}uUMw!c_P9Hsb6u0}6Y6<;muQ{l=($e|?D+BRZ)qbD}r@>bxa!&F&Hx-v70z+BB(NAzZ1-ezNSP ztkvhuH;2Zj%u-st)_ij5cy`mW!J(a*Jo9ANdCRd@?-565a^%ab%2|s`;th(6fDZ!I zqpO%Tz_va|IbHTNf4ZL^Onp>VQu6B4rJCAWC#LJklP4n&^|S{#nI+_m*qZz}fL7L` zl7ByHPG|<~JP|1Ek}xqjku~EKlQliAY2S1`(qtl=bNT^bsdDeVS$g*6%aE^d5U2gu zD+PfvGMuAt7g*vhLe!%}z?V8oo{fDH&3uTeQEQgQFYC3#L91`DK&ZH7oDo}m`sgN4 zjD@XdkDL@!DY4c}qJIOq*e@MSUlx~~O?DJ&5<^rqvhp6Mj5Kv%s9Y{~&!!{vat9oJDrB&Ydc=dHzDJr2)V&Qt zm>VNxiyS|~RuB?nksdi*U(+wvnYHu!{_OLU|8t;nSuv_o5 zxW~y2bLS8F1~x~j7Uf6yJrWJDYLIGw=~R@@mOs`TFjywluHT$E(3s)OdFD}T;F5X! zrkH@l_Wj=|R8T!|$)pLBgh~}EZJoBgu75*wwLxGZE+-BU>q5)thxNTeAR(08ukWr| z6-$k@6iM_I#1~8Z@+Z~p2Dd1dp6GsbQncPWp-)IZ@A2elj!ds@tyAMf!wG+J8~-+) z8ivLfz3jw~Yc)V=U1)=G5sv<==-hl(+Nr7@gWtyW^owLi{MLyJi-?R%zd90Y*Ljkq zD%N#Hki?9ITD{vXlepY%)akXi=|`ef@;|QA@uQ4Qw#zg&y9#DaTGCqHFA>yi;*P;( zn8c*C`Di-zB&3XfyUSlX%kWHAj~~9=doKgj&A2Y<^`#z}ftl&PnKp8dR~B$2*GN1u zC=T$a;NLEmnDBb&XjB@Iek-tY9+*skqMVfQ%&_^47bvn>&KIy9K+ZJlw4NSwHz#!s z4Z7p>KYlW$i{F zU#o&$Il(Vqa*fnk$@QkR2e4y)*SlXLT=P}-GKOufpO{ru=dxbW_ZOG}`!+Ev8y`6` z#?tTEA8ar6u3)5*0ml_pHc$NgZYajJmZkx-x zT#$nrhS=;fGYK0%dAR}ewH)#ZI0K(ugM$HGfgKzv*D%!Iiy}5X+N>C^uF zU5}HKU1mL+Wxr6Dwv>JEPH#<1>M8NgU`>Zs&lGS})i2Yf9w9-+%}iH2wEL$?g@oQ*yDj&;hm;q^ zp za$OVjh!jb&uCN!D6{n9zUus0D>?{u*NuFwXBv+Kn9hk1t*H}{WKx(8;$O$u1ebX=Q zg{nLININwC>vXYy9P<31Bg{V9{{oHj|L-HYks&q5F*ZD$2g*+P$ez@MHw~-8UNmLj zr2l&w9H2%x*ytH|mW(-_9UY&IV>49x46TjNPjC5Ete3j}8^v0r-nyKUKYgmAtW2SO zLn%EWDainZ3lxcE#^C(4Q}O)JjEs!p>71&6)&xw_-LAyY?LIPd^T4?xb4GrCH|SEG zyr_ibm2Uj}|1ACeFGu8&3D%uuC`tG;IpCe8sawlA{rzSP=?e^-?y|12hF7nDuoxDW zjtMm4N0bD0)9ZBO1a*2MQ)-y)SwJ5v+uR?#TEFJ--B;-b}~*QOmzZuvr;l3w@fp2Xjk^MgF>`#-L;!hZ%M^>%VrR#qZt z%;_^zeZ^w!evb?S971xMy#%y~UW-5Nfo_0^B?p(cemU<^sG?!&2_)g%agZ~wB3w~b z?asG4tKyRh>V>GNeiXC~)znWu(EoXxXUJ{$7+f?o%*887h2A47YT#>{m`h$78tCeH z-%6+c%iVQ?MbPWK91Fp2z=gP;P*O@v0U=|J`SJ?=Rx1bf`>;rp28;( zhq~%HH9N{~WBED*t%7c1qPXkDwS8zhbx`2M`qBq?qrEQWklafxYiMY&>CQXP W` zWU7xIWhXt7QmhZTRx7s9N0`rB%T`Swtvk-ob-a_jQ|0N5&nMUK?-mR;EqB|CXUvx_ z?J_RjW;LK$E z1_-(%-19^%duLsmuy~!xZ|k)B$DZF6$OG>wFD-otpQIo_N`l+Z;s8yr=8YlII#ngA zZb}b5BjV!NyXCGAfWBY8c(GO1TcGfbVL6RLaPHz~z+%OxfJ2kArg|v3Yc)(B0?Omh zrRGo3mF;`KUY?6v50L0f7s4{9LdR$;^!1K)WkyoH4iDoj=Fy*=N1JZO!Rvcx2trECMWZNvu+vk50W(C!<`*luRg`(U^OiQ^Q~YCHKB)Lvqb)uN`VM!q$#*IOvhGqQvXDM_9P^)>ik=uX8wjDJfkMkt$*_ z&z^0jre>t2CPB1+A~W6Z@pPx|0dNN#`NpzMK6eE(_i_i=pQGu4u{@QqGmHIXY;2s* zE!}^clDjL1{ZXIW%)|y^BPDvu2B8Zl%+mWmu>)^YX>!irRsj=h2nI&N(892o(^|>{ zr>$MTU*psRBnwyKH8e3PI4UzOJ@DIpd#1d_&_eTwQ5dr zjjj`1YKfwTp2Ta*rT6B>+4!vESAQd*s1=P`p!ea{ih46&Ne4@MtT_m- z_I*2$I_r;JxR2yo7u-}#^0zyb{3?gckp?IFxlfU9eINx~)R^>vJhKsU@ANV@nVGR- zdj7-#x2>}RUxiwG*&q3_y6JH_98OWH=Uv)_0y{6&dTE$dGZ`?7hFq^^yqTGv7)dt$ z{9yCg*99_9C@GyGzK+5Tk9ibnJJRAE@N=nNQRmU`_t?dDQwN$kXOff3wW5JF)2Ou9 z=W}fDXT$*yvb&BpQKyFw{(koGk0;IvyJ-L>R;!%bxFUyR$Fn+%Y*w+B2M2d!5ovFd zF{%jTNaD|0`mu{+TXGC4L}pD7L76mtW4>4_<}>&njRKS4>&B5l+#Ib%HEXkpY;N9=X2stLt7y!|V*%Swp|qm9 zCHGN$_A-eUALAG*rqOV%d6uSi>ERT}6a$#iFR^lFCW~k4B42A4AN*ZbgYXEwx0i*v z!;41!D3wMw_b0N3YmBKhR9YLq`o=d&Np@3?YLwvD)=Fx+6)12w@1Yn9jE!h z$4Nm2OwG9KF!pDyD!*2$b;4`=swg#TS@Xe_-bs^t1v7@qHjd1I^!ZXEwT`AGdAaqe zYCE+4)9Wr>j#>MID5E)yB>(kEXJ(u(YN^i9JNax>X1ZC1M&X989l1Vz>_=UD z(Ks_bLiMUosVy&C4bd~hbzu{O>Bw$Ir{4L54_iP z5flziBFLN6jiSL~8JW9l`FX`XR%|^&QCoYby~sc9)OkOP_lu;Y&whuH0w-~kgh-zw zJq;6_loGw_gL7iBtjtCT?77Vy@Ptwg@I&Z~>GdAQcnVC~WD0rUF&V=(c$HuI}tOX3Ed8EBprm1YXM+Kk@1{F_>6bx-Oz6=8{!M$yHX> z^3=_~@lqi?7$8%k`_(~W^iB?i$`lgjMsWaZ+Ot^ms=C?q}D} z`|196SFp(3b9?4-ISTsZ7U88bQ!4^?Q`jKvI2J`RxGiAccW0n zG{Z(TN>IliOx6+RsC1uwjzsD(o3!&NZ|!pQ*aAPXc;i6Qa(7P;*sbQyg+N!E&;v?t zr|sDJ@w5 z0-H#u0IIQ?ZOJcBq{a)7g;9(eC&{c(6l?lx)j(BJrtsYPOJ@TGLPdMG#$PDRLja(W zA(5(kzT!;ZB2pS3bVFF3ojr988_r446?!8HL_FcQch@TJQ<|~O?i+-*J=%6M5AtXg zBRON2ZTA;V*Rj?Vh%1fXM{cnC|9#~7Uz#-eS6LjPH@Jz*_bUOH7*f}5h@c5S`tAI; zzs#qmWyJQpEFO6(;7lLSP)(V+pGF@K3)>(6ahu?u3ez~IOW}oe{)&A(6_xK}{k8gd zOm?11Gd)C1uyq_eLmL#~#ajKFCf>)n)>xlH#gdQQrs!^k$U}HfjWo(Yr7)nAW+Da5 zEFd*&bBI_HC<-8hKiYT%j&cSWspvB(xPy-ZCxdfllMq-;gT_+B=#u2;FJNUePdvP@ zbUyc8AOP%%Cp$M|9&}v_MEfnLdR^}zsD>+)Sd05OZ7P*jTkq;jo+B9$teohPesGlO zR-I|C=x6{M4f70P0ETWyw?Ib}#$%{|pd_jF(ssRdnCU_gp*qz)v?422Bt)W4y_N_f zr!>i$8rJG}zzPHwdCxmxif4o#T=>_bRhCfYynTpy&Elej&`{@DFPByuS zJ7Ce@$u!UzK<(wm8IR6i&Y{^C{^}vm${>tk;Dv^Chp~!KX-^dPtr#I2EZd|Bkv)4_ zAd(mJg!<9k-Ip2XlJlATzD#=bE1^cv#0qhxT06Nnp+?$di;@CS9ko zd6&O2ZzD<%FlWBLx0V+MZX2mmR#j>SHuZ-%*(epU&8Ea@3`p#P<*&KxWc*gt(*vd_AW|+-7DklxXpWW@bgbX?+3ECM`YLPG;c| zhN?%~PVGFak2!<93|^q!>i4RN7sEB0&AE*#kTp5Lkv*8V?UdgWJ?1)TGBQ!o6Mb1S zfCjUnqF=a?wnQNL&jj`8+VkRcr2r`>Tj|kv%iD;i7o`?IfU13Ape1(}or1}3JOAlk zF3>57+sp=?2*Vx8=yQpT@|MK!2u^*(EmuU=8W>aSx~$Q|%h0h*V4jRIbY^N2`o6qA zZ}ol=cW^?2aNtB;yUO}@I7P+aRJ$#{zFl*5psVUKA%2f2oD*MiRP3j4-$lU8Pcgmr z6wAywlVw8!UN<+{o&j$e8R9+Q#?WZYOKV`pXjQPh z;#-fpcRTh7x{b+7;~wnpS8j-vXdh2&oD#qasW-~;mvM6?^MpU~%a)lznVCn4iHW#u zJ+SkqdkhuGfaA^iS`%5#oBBS(_aVMm)E{-;fd&Ifjojlmx6Dbk+BK3;>JT~v0GF8g zv(i=7y6w*rfMEWFpz{KZKzvVPt!+l*tl~aPB%LN7Y(8iSuB8Vl2Hb9gn5ABkI3tRZ zZx)t5J-b}MKpZ2)}vrAIku)dSVQtc(mPqMV;XYHN))z~;*5s(q)XdIehD}lFhJIw4z7?Up9 z3(;P=%>i{@A2?=%sF`N0G#lHEEpr_EGDc1fBnj%8TTfRsPxZOE-R2>!_0@{5r9p6< zh9M|G7&=MQ1X7FCG9Q)I8CTfI#-?g-iaAE5v0wVIB67!?U5IN@a!I+>Q#+H<=3`6? zX7sj_FkZ|{Lsji82iS52aI>C(kZ_SXe@e3d0}3MH`a0R6)4uQ;LooM<1w%K^FYbJB zaG6@`69frER3fAQ_>eZ3Ig%lW{9oWyw}EQ42(ttLI*m-&#H(@a|Q!eYhos4GNU(0 zIa=eHs3vPT=mSp;^2XZC@5IwG^ECB;m}Vt*zexB&jt6IBGq5S(9*qLm=sRyMnbLSN zb@t8oXFH`$vMm7d zsi>amJ@0^&qZYkvOTJ9h>%kNYzF3FC8?nbOLsOLT+hkX_OHO)B&lWD)EWe3q6+-uQ z?v&NZ!&>$^DN=oCmUNxXc!GjS-&jmq26D8jqm87*Q*z!z#G~D1d_#jWg0D=9(%6MBiepGoen?U%si^uN?(?w`I%c7=48fnLEFC z5EM@e@r|V$Xln5n^hxLy)Li=emF1)gQwKa|Mm@BaWZJoI?!!=-q;`gIg&;A7c+o66 zr^nXT)IbwWeLo|vWmPCFHO)6oPm{JW(CkfTBuk(dQfZU*jZ^i!wS-{86yjD}>x`#i zJ~EyW2$WUeD{Ah^wOc&f!GK*y6|6tWDwoTf$T=x+tq0L-NPmASYOd`L0>Rvq zwOTh{o>JBbH4|2T8KEvEoAB(wNW}dbn~S9aiCs!J%{_4Q^@-{Y-j@R+_Ct zx0_3A-Ws)NmBWV*dx}rz3uf)0iraq=I^xbA4pEVhLOFCp_i>F^64+^kVyOFCLG2xB z^)bqkF!CW6HF`2^n%d489qoJY;EySk9(wL0ZssR8^X=l|>Q}B@8DKJ%(OdRhC|D0$ zQ+2#EG|(DlXA>w@JRN*6AKh+B7jU92hfbhrK;ieZtTSV+a`3`d&;!}25E z0$Ky3@-jFn$}nn}ZoHzVrXTImBjIx&7P4*8sLpsVK0aG5OMqxcK;!;arkij|3@_1 zbMi7KQ~!?HcMjo znrD^*7I5V3=Udlga9EPaT@7W?rX^K^!DcFv{0lRZ-5}Pa%-|x&uiwnkEF2Z+S z%*yJSm6erh*B7&fPo?ASmAQwzG&7x3hI?v5x1IFq0EQIYeF_TH9^39S)jhVDZ*M*@ zxG0nkG{WsnW^sU&2E^d#bLY;r^!3Hwy0!5B2B9O|asd@URVr=9nxWc}FK zSUAK4A7NuJ1x3Zm7%d6R)kyqg@#4h_`}SR~9m6PiQW7xXDnxjaQ%Wah^-mTSZB>;p zll4bZ#yMo?MF!+MMNwEc>^=ljkS8wMyfKr@y)?m?zH-C{5b%QwJdh-qLXKL@)ku9G z;MYukRpFRqTC37#6MWUP#F!q#&wNs*-3NrG{B4YtO#~G`^f>znAV?W9D9SP7mj-up zT~1Vw#*C-i^d?OHNakaz%iEM*osF^L`?HG`RrU#LB%Z)sag2zuFKcaW?L^3be0riU z!F9?J{|rCnFRq?q`Eo-mStsNx{q19xRLPTh{sRL8LwF&dh=>YyO~_+~n|0Kvsi}>_ z_IP8}eoFtsg$Vt8udeF&P}GG#vv=l672(E0MH}p2e3)W(RhFka44#Poxdd6vE@-7jJl#7G}~dTOFFLYXfE?IG^Wj@FF~ zTryY8H!r1cnRlZ8$>Ej<`G0cX6#3=L89XB$RTlriz*vkED(^)U7r?R0larH=pFRyw zPTtGK#l^F0*Xb8WJp}0Xp{M+5AJ3KIA?IZnr93zOapRbeYMu@Yb>-zBPz({nqT5XO z)~9(seE5tgx0t~XqEsTWq>dfC1x@Jih8xdFmrJ#5J)ZJO0#(OH#MJR5zYuTgY~T#X zOn$2Tlto-nP)=e0Obg>R2Ao=kxm!O>3i;8avNU&28SS<+%WfVF4-Yr0c@s`I`rDOg zc^bZZ?L1~lRmgGQ6g#GQGy7Tg&E>MREnBxrag<|pNW}w2Qe{*{%We|n<~~ZRKmj=( ziw@{ol48{^*(`nR;I|DU2Cb11frsyYRM0n0(^CF8axKxDMLyxl%6&%|pGeWV?=luC6W@$ErX6__Nck$FHA8pO4^eVa)M2Ul+2nRzgM@0u#=okJQLo-uSTg?#qJn`9iM8kKdt$tHx?? z+-nhZ;NU?nYG-GsdV-N>RkTJZrsNbe*3Cvr^7V70WB|~X=H?V(yF-Wmij+F0tf=pE z+iAbDi(Gnii^HO@3h{`Q<}NDa=0-vd8b;GC+@A04l`Bq`;nPu0J<6IbpI}r;Su?rX zv{Iu!Z%VDQrL{G;v9YlhyW*y06o0$ezWCd~_mL61sq^0)#Wb{oLqomo?+prmBv&J* z9jl#D5veMe)FW(MRe`+b<42EP@M|Pq%=hB&YRq!GUR4sUA!@^@Ds0ZgMyU>jJ@u>l zSl=}WyuBOI<@C*zt2n=BV!8GI;tKCBC{Yei{H-of`LxCN9@lkq_f_g1XVI#b3i6v- zpIca{?CP4Cqx`u@eo~!d#~GS-hNB@)P8#*E37_O1DVW*Tvy$cQ>ZA{HUTQnm(&tWN zvVHA;lHoLRoaQ5H?wSqnfEhtaQMa;x@oR;Jb(vk9Hmh5e|WgHrR5?ZMubYV52l`K*WQ$rl#P=1uOKf!`|#n=h8s<`1$mx)TvWj8 zSe_rx|8lMD{d%c%tph3gM@$E77qOUa5na6xEF>ERca8F0ik4kaeTtOvmFLBImeIKD58G_K6EW&(MbtzWD09o_q&CA`nR4db2jZY;? zUO|CoR23DDyYNx?Rk`aHpXi*^!#X`Zedq4oawx-(A3O;9>#x7IOmI4OY_>s^{<8>5 z0>J$-8sxR$ngnB68gM`eI+fwXa8FI9OImFLIW@9wInl*~%!;4$nk6ZMZE=v5r6q5K z`{L5D(_7(hDMhNrRu%b6czSxiwC$-0N54vi`zjUiC@`=uk$>;rGg$EBZNBDjE;S$7 zB;}}dLpKau;*Pt!inaBdC>7)Dm47?>a~%C{EKAJd0|yT5F{;>3z)`_@*6b2oqEv7E znH^nqDe>ZVy(UJpk}KY45joIrJLfv`XjFVP2>coY`8g3MmS4nOqN1I_5-7XAWL>(} ztd@y)eVzYw?LG==+4AkJrVY6 z`p8$GSQIn^EunagG=Pt~hvdMmX#^s=0I(ki1_lCN^H7h=%9f|vFsuQI`FK2Nl2(7KZl_q$A#K+ir0D#Dgpr zcXx7Ko`!?OPbKp79TW4qo(pDHCc+W&~2 zUU2Ztyo&2n-_~V4px_$w?$Lf;42x$0nm<+!Ef~_%nre=>1*8lJwAo)ZuP!M}h-yn=$UpEC;zPEcvtO*>yueq4>xE>u(>G?SV{(@3n` zNHXQ_->(G49qiqUa?)3%khwp< zxR?&s$xVfoe)Dh7UHLO46QxKM{=z4_4lY>6E`REj`zgP@&ww>>R(afb>;uML_GPS` z(wc}UTm=+)W8JBsucrrkkPn9N?c-hbEY}P)bf$OK8Sqkhgd`FSSQafijk#C&$@UL~MV zIaXT>=h?Ya9y>=%(Z0E;oN!`UwYX(ubbzEEQn1)_na;cAe*5jWH}?JKsAUlJ+xwsR z`LW|9ay>N(iU4nf2LVeQ!;v{W?1m*8vfQ%3P?%8uQi^(jR&9Ih)LKSCW7N?OyeZfX zD;K984IFFm@I1tIHy$8fAQ@F0>-qENsJvfa&u?dnnm0tHr%M8AG7xmAfK2oZ>6PT7 z6pN;-5KzOuf48WN)zQHMS28m*yWQ;2)#yCjtw!b*IT%nQbg5^p`QB*>d;0f$N+?=o zCXjhy*)%l2PHgD4oOpfRTgO$6)F9CJC`4o$jT+KZKHb~!0(VI-u>A2XF>0uIG{ST| zCIaohEt*37suZAuiQCW_u_2rYYqt|~>SZsS$K4)o$Qa3*Wc4?D$V31&qMliq)@C>* z+4eO=11=jiX1b&zjda(qx!cYe^!KFS-qUHeJ(fMS;K?Fpbzx+MZrk?B#<}TjqCKBG zUB^ueyM+ZU?@KuiUj(=E5x0o|jd+OykfJ5S#dR22|1y{fniCg_1EL{vA0TZGK-C5{ zl%5G;@-XDir!*Q3u&7x?yMG!_&s+u5w=U7NAzjTpz5m8=U!$OoPUFg)QhCzHu$s;FVjz!lJOnNNgWtY=dmIoDgN5Wd%92flsZ{5&I7k*+x(wvzDOAW!7Mt+c zB~|~>Ofu5~e=@C4Ri-@#BOo;h>*40IO$s3NK*qa;gqT>Hyh1{XZj;TNQrd3Nw82}I z0Tc1-qClD0&!3O=G-m05qAP-eKlbtA#TtYe9Zr3;jfgq8Wu3OVNtAV5ChCXX^?a05 zWqOR3&G)bS(Wc*M4r(@#(Rj>KQ+vPWM{$?8ae*LixtAR$!-gE}Qt%39bCrkn<-#2v z#MOO&6eQf!%PRyoZ45*y(I$ z(BbTzt5>WbE8`dq>ckt9>fP6G-pt>*6jWLxHe=X_;>mZ}R=STLWDM2hAx;KLg$eWK zLg7ZL0zkvlW=)1PO7I#5glQEYhP&sjWcg>WrY_V$9j7`O{k+xle*b-S^@a5}IGn%lr}A1x)83dj zYNLyw(%aU02LuRExnkaO$hf9Q&b#p_Uh6Z|8~xX3?sQwloRD#wb`BSAZErWurE$@M zugqPL+OvGoqKDZ{7A{+ZpvlXHIRdY_K)r!Dbqb9~5yL5b{?k&Mu8Q2AYdc6yUfh4=AWfGd68DS{b_7EP{3Xk zn~svrq@DttMX1HMv3k@enrcwX&_SV)Ej-_Wt^EceP zpr>aa^$taV>jFftNwtY&bUqgGJxN+W6oaS>g+7L31Fb`*KNdss zNi0%wtxZi$MAd+auaAz~fsE{954n$rRET-XMMVwZqxWMj<>uxdPF$mX-889I>PA&j zEYu}?_M|PpRbcg~Ub=MY&aGP|=+ibs9j9N0hVn^CX~E{?VQR+zrfFdB|MaQa=H?Z9 z8huFr%QZ@ffNrCnW*d$68jPBWCVGk%jQb>N1mvT#p#9h0*!5|9mHa@sbw{?HcoHNt z*|Z!$x(ZsNuvOa$^uUY*vHjn(m&@{wE}Ft#IxmMwWDDhzOvyZf3P$M!nu;kIkNNob zW#A4#CGBt?Nl8uG8)LeFDjV&6jAqJ~$jXSYu&_J^6or*DvfIq5{Uyx() z9DN{7&CAU#CE(R#0;PqUO6X_K6sPm|E6`2gBROAN<8&dZR?Gi)zh~yUfo{_&Jam59 zvuA@M3v(MXoa%>h>*^xDh0SvpUz!L54t)i+8agbQc*jqkBmopGL6oc$h`U;O{$c{W z)rb#rQQf8(I($*}N2r7jp?39rd3_Mwt`dFd&X7$}QBf5Lh;o*zi&loCGE&2Vwd>16 zPClaC-z1^JCSqa{J)D8+PdYC?8e}_0Z#jYltaOIS!G}IRUFy}{XjSS3W9UCASBLK1 zTly~~TrqZcwwNY$3Waiv_OB_yd}eZ<9Q!0-4j2Kd5I-=F`Qh}B(pEPKh@!=J-MBJ> zE3#7k8~u@-bfh)WzH&{UprAiD$+&7F5*ABzaL8snfBw1ehAz0qyafv)b+TOV z+`CtSg0jbT(mrX|`|NB;lp@r5`y+o;SPV1v7e?bSJq;OY$Fe#Y1bc%q=3R(~n4p7F z@|eP}7I%oYnvIQ5Mn(qm7DiDDZf{MRT`ajJfFCUP4u~b`P2zccyu8PO0#w!2ebf_8 zc%b%zwWHio9UL6S0Yy$~G`ag8d^x|Qy*QALHB<>iNO}MixGF@Cxz^OB1G9(y4c6qA zm6vN}B~_c~yRK=gvyF~)-nwNASuVI<4Xip+jaqQYsAc!p?>gWsVyXbBe)Zb5%1jq0 zkMoC)9%W394T2vigWmvbSESk)XUt4bh`UXvL%Xx+d35?J7G|6j<*;R!)qDgEa8kDG9Q^&~U@ z2G#ztke4^&LrvbsX2{Hb4GFomTr8J)&ivTE zjvxNBCxOA=GF8eOzn+;%+UxxfS>++IspIl{`{eTdB zdv@_}KR)CGi8r2w|Lrff(6|NTsnW=^(n#6JC?Y98oG{Culv?}SF0l79;Ck1>^XAZl zRU(!1y#=!#uDs;C<>$rkdr4F?a^qH;)r47FJ=|;dAL5!&UmD^-Un{svQ6T_D9lP2K30+f*9l!82-H&wdljx@0MIZr;yH!CMJ0z^1KW12J&mt11E=0arlN zCAu0k7KjRw2V$Q-cgxKinb-nG zv0d=9BYDuFOfF8dGltY z+Qewgl`SA9L{BqH=tAW-!--oi!lQ@Q;!g$?0*`U&^TTGbI^&HKZ`@{F(UuvAFIoE2 z;|=5h6yiVk%gIc=fyfWb8)mXzf_f!>lXNM6g2R69uLaJlY-Sb%i33Jut#tNI3Kcdh znqcGu#uWBCJg7ILL(l>Q-(%e&Pc1|4Px)N!VgtF>$B$Q&K10rctq%+QCG1WCCaJ*G zv4$B7U?Vr!UQ8$6EapiD!fIf+85&tFm{vSnwj97~s}KgqhB7XK5uhua1`uE(yqM;0 zS{3yapzKdbFjetlJUmqBo>1=uS8n&Nn(GLvOA9uuPhC@;2_1~M8DMXf$kPyy2^5xC z+UU=&$}xY8gLbH*N3F&(LqQ~}dQH562ccXDF}^rmm1_7f4sAX(0`Q}&2S)|O?xf&fsV>Uaj^l*@ZjGG%l0U_R~X==5faRa z^~PB4HhK+`5(bDTN!(P#_f(*CG?ZNi680AUNsz{%9Ulf2=d*Nf8hNM4=Wgt8 zLQ$~|SpgdRHL~GsOH)5Q^l)Gh)4Jr+1YQwnK$z^0lwQ#i)91LHJNJB}h)Ec%TzVq5 zK4f*3zPM?;!@#~LiiwPxIyQlXH-mm$93Sdjykto^gsjK#q%p5Cn8aAjD=4Ty>hdVP zA9O(;^#I!4X^MrQX6R7XNT+)JvA`Cf8$y`z{ORtSB=Gi7gf)ONXUKRngp|JE!Ye_A zz>*EC4x?Rekh@D!7kFwItA!?OsjOIfM znMB~A8cAk0Jy}&FZ`ppel&`{|C#VLfM361zk)>#G9y|%H@x_5p#d&#Ukcz?qg@g^u z4k^6jWndfAF&aYmFBFPnPrtZP6{|z!24FZ0kg6#RFkrN&0EPPNZxF?FHluOp_mWvJ zI~uT?s7?$fK#(FlASGD61Y{ziWEW!v@D6Dti%NqOiG>mJ*I&P*oT?KXhdhHu3>`vw zEH+GbJv9j6iJQ8O(+Z71Wy2|$nU5&5&>33}v9|Tr-vERY zHm%u1o!6B3$iu@U(!HlPDXnr0Y8?-hKr}dBx^d*OqOnmVo?rNWuOuO8?y>9&7>Wy>Ff3^P0s%vyMi-VTAKu1`!J5k8l33~jU-|YcLX%t9- z-Zkd-Fqsgb;g9P9ZhK6D-dkttX$u@hp#u7PEBz5AKw!0Ir1ugyvY1rfl%#3oSnO1= zPHg(W9VY1*qC7)xgm0z#DRMdx4HptIA4Io=Xp56bL0C(0qjxX6`Qq50y;KwogoyUo ze?Ob#0*Rbf*QjA2OFkiFP4zUk)@cBNJK{4UTALM99_ph(LY3VHd_J3qnP3w(3Wn8` zYKo0obgnhd*WNw?YdB8JDIS0~vigrdhZzpbd40{RZ~o}-EN$QW z`=NS}+6*)1@slTEBp!neQl}wvq3oDnoFwWVZ3w$t*Hkw^zd=3dg3?+BPu~VnYX`|0 zM0#y&+m;5SI(8)%Z?Kf8HQYPVcjV|%?=K3$xCvS?EWgwq*%K#}?Cq1K$68iV%b@VL zt=05u11UO#*PGiRoqJaR-#Ybq+$ zDWalu8<+OEo9~XK$1L5jVFPXP`#ReDK1?A#9-drgJJ`(>ST`;B?c04Gk&pZvzl@@D z)eU>T$xDL-PHTDXZD$zMDivlD^%GiMrh^WJK|Uk^2Qd^16_P_M>wO5D-@5vpk!$^I zl(2Tpa{e`N;QhDH|2}`dS8}YR)Ds~gAufkyk^Wd&lr@HFUst1ng8<9&K6%m6(Xl(W zv&CXB@sT6Dv+sWMXkUNh8GPnb z3hxds@V9~7sIy|liWm_d{cyNB4@b&C@n}QH)1_n-Bd;!K69w^~I-^moUB+CTUsz}} zB`qjeTYmiVw7W$OK^f)v+U18))2O(|R`sarqMlGVozPTSvba5O$j{Gjr3dxYDS?6Z_oiwn!|cnB-qwNaY{AxdL`L-#eS$-2+b`s< znuixIhc)DakL`iL%Hc7V zBQw33+JzAN!ybUZuJTZi;H$5yP>o>er6Uig7-Jl(k#vft8T;D)B)H_jmzicY1cp^HE2R zv+Gg6VY>37uH)%g)&g=iI(0Won$_*4TF&eE=z>iG7}XjijD+b*9HImN?D1kMNqv7i zHxHr@+U;X6ueQaCotzLvtN>0IPk9}0JP4FsK}lNFEI(nRmyIs0w-lK9YDgLsk#Xt&L#ap4cNkxS+_6faK5>tY zkCPxEBC_;2{d~>HX8+|D)#Pu^C<{aoenyS{W}ztXocQoJS2JVp&paH%RJ1Se{=Uz&KF(ALU@~*#d1dD}+aar(fXc(johJ|g%VDZ3QMAD=j>NWJpzMhrl>i_r4YnOo0 zfEx=t4CtAATgvMGQb+!ylG)$a*P0kTKLtHAyS^EL{QrlN_Dds6r|jMPh5R;rVUYP2 zXwf-04>OeSe>~U!Z)6RvvUlE@OyRA(5i#b9h=jQ}K1Tg7mho-hfXboyn|n8vt}$Qt z^)NyWLq85xq+#`b>h`xM>x$EN3DyN}cX#N&HxWOeTv_})HrCuTy2n;|O``{&s@aId zdX|W_zjgQ?gII$MV!GCiqm}7em)9v*j(n&+9^f4@cJguF*XZKKBiwhIr-usI0@wA* zt5j+2Z z%ec~Cb>UYQ;QuwT_8++Z|8vd%^B2N*rtO?H{Cs?}B>aL564CVt!h!Wh7^~j;Pr~=1 z&T&QSWNCvtD1cG}y%Brs50f~8xtw6GQv~ag{iEz!^`r%C$wzDP1bB+5K>NzWI$O>p$i2iAZP8i z4al{41_tVUOMcn&GlqFtBbR^GKKSy+z+hlO8+Ys7B1#Y}LTmuw6%aT@?Aa41DiB1- zX9v{pgooe>QvrG=$sI#()=IHFtmE8&9UDzVs^& znncqGSuphPOx`~|Pn1z4dzA4ZuoYQuZg95{HUSJfi9nq^(y0_fWPi=tIV5aP!1d#D z{+a!>s7=%VtpmX6i>m+(wDydMS%sMUeP=`HFbAVjMxCg z726&AtMDhKYCKY7IXJ4PcP3bUnF=--Od zYj=IYhT~FbIg-7RXkgeZqkUm2OcNevgTS-n=d|l~aeI1*jod@$bO_fhNcy=4Ao94C zc5=ou4-dJY(SHPAfj3xKuGg)c^Cmvl>dculw{!N+C|KY4KnD*X|FeinK7#u1+h|5uAM*cHf=a5x89G$s(cW1Ss#lZC-kq-$k8&FhVFVJu#{ z^xy96MJ)0TX17^tHVmup@Y?OcWM*V~`(c9?Nk4)kDgZ8#Ep5qKf*@!# zGWA&5_sWCZ(1M4CtVt9XkW~@ePNuPMkazp`j?}K7OXsrhNB$N2Bx=omB z!|tf49VFka<2IE5j{^HNV_~zb9^17u6!4Ek|IKRQ8;9dVSBTA{k!Vs1rR}(8ZXM2z z4_pM$npqj{$N|JB}i2St6a@2+X;QDe$cj98Ak zVnR)nA}C;DEGwd7khT;(u=Emvh0r~T#zY0<;%?QP^3tY%Cc06 zG^PKZch&svKX>MyJ9B65+C2%Q;kvQmaH;$RW*m-21eZ=* zj|*!J-Ismu!S@1k*Ec&Ld>7$|im`FWK&&Z)F(_I8MmKIWOSSuLjJpgTU7wp{xHD+= zd);4erp8w)aPbHkT(s=dKfa&&0Qrv~4>snXXI)s-(#-|f64Dxof|O-RpRg-nW^VAS zIRr`A?7yD=&%+|uM~vo2Uz?{j|LyCDHy8)v*lUmFS*cSwiwY5T*T4Q8IPcLd&L~ju zet}^Uc-#e+*8>VIYW&l|h#oS&j;|B3YJ8@p$LlWc>-_O=3Xh$7?CF-}Uay)ThMrAy z`^Hn_dhlp3U%vrFilgW(rRLQ*OxsFs$uTcSS}e=K+jDO2drR{$f5WOJB)aRHSNr*O z4&7~nifd~2Q+Gbfr_wr_Qmj$a zIfO((?S~t$`aw`{uLm%Wys$V)Fz?l8=<(SX-#*EtVmeG96=9I^VQl48e+0UO>wt%^ zZF$+g`;W8~*-rF(P>tjKc_s@6baz@~e}gCVPp9oH|qQ3U(dW=R8+J! z;@x-OwLp;stgy-`pqK$x;~!Z@Wf|($Ub#{uy*@ZG^Yu1(Yv!9XG+3wr0=760xbsj~ z*7rwT@zgu=uy2K4g-bEwLzp$-h|G|MuNL9@lGcref7QSbEqIL+{%_?WH)lNtt8b6Q z4bJ?lWN`1;j`#kaHD+eE!|Y(lp#vr--!VN=&DxK}hw4_X()dy3-0#d-Nkl}aUSRZH!|1)v)pwae#TjaX&3(@k^ppLb2FXJr z7Nc!{-m9lQ@v61pKQFwjvHxd16#o7H-sAAY)5JDLj6DWcYEgu%_I~Fyfvhfi7fgKZ z<9zoSB>CAV4j)V$uFXmq>`f5hPgEnnIw;NDrgP9P&C6fpk!l8X%SCU_u@m!B1nYEk zbcplHMemZZpxS%ehF+m@bahvecD=Ry%dqUt^3;Or&04+Dcl5RD(`up`4`trTnA&o` zQm8hwwYS$|>~HUM+q`v8dJbTZ3+OWw+s+6lxB+h(m|0H8`sa1kNPAZ{M`iqyld)v9 z;&Gh|H}PokmHkUE8>N4hyfRa*-Zjm<5obE(F@umByIuf$~R?mJf2 zn5|hS^VP@y=fwZ^Pta}{6wbHf4cDIct9_O*{ObG3LM`P*=JF!{q746PrB&aq>#^~= zUGwI#^}`>0p|DkdTl2DLlk(mx?DIb_C<5XCtjEi4uK%Zw!~NnM<$LYK#(|oHJ~8-` z#24}85CfOdc*Xu-%~iSOdCfU5b1rH664hhjm?H24ZD6Xcrsc2H?Ll;Z*$`^z1l_6` ziU)sdvk1vkWG{z<@@_5s&CJ0e8AEO@p9rM-n2RJ`JR)U9=l@>PBm=G9CL;J)@IU-o z{;jv}q0?YD;Qb^tIO?BV73>;3)*pK??L2zwyU;bdAJzc!rB7R_&rs z=Zuj40+T3$qJxkz-z7#YCQ&OMX>qT43AL&ZTKvE$u+@|!12yGc#n9y;0TBuE)b*$A z8ob0V%8IwMcuVbflX=GIeP^;z@52LFb7Rr3W6T-?ADmLQXw3aK^gd!hgqz!2gq{_7 z$xL5~ji>QSpPR?#B(@#btO#P|4U%4OzA!|UVi@a>IQ#Ge21qcB<~KwnKxZxIp2jf0ZExxXOMjkBu0 z0KxLBj}zup|2W}v6d#v()V^-RX?z@+&vg6KuRm@)h;fan_9eqkQxL7*9ah9_E6fiq zmllY|JZ}$OX_OfE^{e>n%ZgV$#eZ3rGl4Gohh>+H;twX1Rloe-f3ddd{g7dk_XYDp z1qOLu=AV# zYw#V=$TY}YPG^b z==sD%aN|P%HEjjclWiqX`RM(y;N#Kxb|&QdX6rXF)Ex>mg3e`Rf+~6F+Y%yS=-qhM zaLkJ5gw8FzxnYaqfLvQ^wdRd(=6I{zNWdfpr|2M}d;>xvK;r9ynK?C2_CS-ufF6^z z{q4hTgWxXeL7{*Mgh&%*FZ?U-?c#GK#680zLQ)ln4)>bBj$lk+s;|WMY5&e#fu%#3 z4g!0jfe$(?L5f_r_K}aow)*qAE6+0}P_)Z#u<_6s&TB4cuXXiyU2J6qphHzlKLnMO zVe|<2`<_0wlkS6R`cd>*AilB?2?3H_eC*9ic$(D{T6fw&0#%{`~(rxKH_U60gpeR4YO)Ryq9LN&o zT~&xWT)Sv}A$VJ6_sB74x9&NM>;$Xs-Q)JW{EPYm^5?lyza`N=?d7cq>O4oh+4QP*&`_s>`k9B^cMBS10u-;J zQy!F!t5`fyUb8BCaX5ID;ks!1*NT(us($Qslf>|L<&xj*damA}J6iHyJL{mffbT(+N z@eYh*4S!``|0|D|Q~R+%`Vq4J^cny2z%V(`-6S7n;F+u;egaBAw_#lyKlOnu2a8qo zY?$8~#%QGEjttY8R%tTh>7M=k9(0ZR6T2%2mQzdzU{jPgf?>M|(1=&_K9lBjUExZ< zki@wK8AP8(Y@ktwV-FQttVB7N5HT|zg!Mg$(Zr^zbm6+BlNn(#bES^cZ!okkhq&l5 z3=UdO-?Y~hdRDa$_*M>%$#KGl^V;DBvx- z#FoW6+S-2)-|v>$d?nzno$SW;Nm#{ku+zrDN=BUPp`9Q+kT~{x8Z#Xf)V%0XJgrWj z2bEVQ3B?d!UzBG6FG`|mH|fuj`b}%HEPYlp4y>4?t(FRgfK-w>YCEIpg2982jKin) zG}8LY-}FFCi{`N!G3VMV~+S79!=-u z3g6uTuOB)!HMH)s5k_*n`f3mONi*FZ{E8@!HkT5^94Y2y){>h;W3Plbs?ncx^v;rT zP$XM6Rns-WwER|M5Pz!niMyKVPWVEisOywkMmadQL5Z2)iMHbH#M4YdOJtXFYO0-j zlGeahxe(dt3XH}pLNhNSl?4mdUc>+-#*oU+kD0WGvg|tW&avs3;Ndt};R;d;vkPcS zZQ`;gJ^OzMQy&;!+I^AIV!gc)r~U7 zA3N}U2E_NT7gMyMWan>&7}P#CkW~K=^48QqGvO+Hk7;v$Zp}|1V$>wDD{s&W3+Idg z!u=V3tREJ^WMMM#4JUv}`}E!rs8kK%+B#u(i7&slBw}_)SN>Sj!}lj$tA-+tFLjmP zMg-@xv0*wpbk#*}b744pqQCKqxQ5@*@SOKli}h^u!VDwjL;jKV_tDXo0nLX-P`3B= z_SzKBEYfRLymEHsmONWaOG|H8*N9B3Zyc0{9D9KgALX?X(MNk1Z9D(u){-8yON5MJt9WEgQy1- zuQ*K93Mv73Y&~-8c%_aW607wY9ae7wx_96-XV=w2U!2`E2utu_2oofg2y|u0mxj>) zrFd`uy)XWW<(&;B!E>QzIEFVy5t z9#*lu=sDxN;hD2WP6<0=j3#w5@~_t1Y^V$L8&DIR&Rje?mysx4cJJzW@Uq0BFp&Sk zHwZ=o%;Yb%) zybt$nUPJB$x$Qw!em0~{x*#0CkN392N_#8RFEBS2xqLnDF|KI@d@7{8kf&Ce(|}59k<>&>MD4P#Bmr}%ooF~c$^l8VC~t3zyNQMu zsQ-yVnh5{tSMYs_2^k+=NQRdLF$9Ie4>`I;mU3=koL8Gx0A{((pXG+0^%*GIsdK>+_?_mHkt@U+30W=sFDE5?j&+c#V-_Cz|kdGypgUjCg3 zFovYUQbt;OWce@#Vlp)75FG7<0L?91gbIkojii!mFta}AK5OT_y}FicpF&qeDK-#Y zlPU^D1Ywy3{ftk#tZYkY3Fe>ONeZ-&$Gqxdaa`*dQb|2{E|MNxnE@LdE zM5Szn-(L8hV&;O3lMd6pmihozh}Kx);@}9f>RLRd;-g^b$hTToZ~sd}oJ%?K#{?$H zn=G}S0cbG}OQIoCs67Ivm< ziCIZx++=@ajJz_t?)l?W8H#&TL-z*bM~%HoZYyy+^~WAM`jMCaUfH{xuoR-b#VnND z(8a9MXTuf_VWSoUa*`<#?i)lt&f8Ij(tTzP5n(ecaO1{>eLCTvQul0hkV)^NhAZo$ zI4oTFXza5KT8V@3=EQR?NA=FOchov75xOcQNcaHB{S+p4YM|#(YzxXGlNEzvGqy*X zBr8U_>~JWEnpGdz_^tlrqR7OgN@Lc-n#1ph0U~90igE#*$gwPU2{$1zM^c`FX~~q) zU0Gjew_NJ$<%xjs&}F@bY9uJFPWB#2Yryib4>8G5t%;Tl2J(vfFiyS-OR=ymjV}^f z5az@e`)I%OFCt!1`s<(?;h>71e?}39XsjtyRKw?_4c=K|x4L&R!yuWlJf;>=D{$+d zE2VcZFq;G_eM1(H&?L-BhbpAmW}n82|BSyQ*on+txG%FI$LWz$l1AFDe~Q~nO_Zy- zzh`M*255zRiO8n2%SUjYyGR~vy}-6ssGIdzA9@pNhIu!J_?ewVaEo(ut}mld6EX3N zgIwGQw3d<-Kiq(ImC@gW2E2Sr!clKAi<_ zSBFc3y$5o#);+)9Ea#dmjbPc-xE?7c>m=xee~w?n9l)& z;<_avKweM#1!)o=CX2i(KsAF{CScc&xHB~|>fK)C_Y(YTS<=?;VWlmCJ+z}rtdB=+ zj_D%xTNV%D+h)Z5F3?m+z`+9Yt5NHClK++1fd`__C*%-VzEDQdsOQ!;*i4knPL>EC zD3{5n9+nwdaA$Z=*X_vVvg%rgd@e=m?gPta8>U~U_Cv4r$PG}Yw)vadu8_m&HKLKJU7bJDaP5p$`4n+bE zoHNuDyjGZaA6aZTasWwn4(>xrN zb^omBXT*<)BKYuo>&KEj`^29iKvTJ}AE2F1qiysr6DGgeq!Yrpu@+28hG@|b0rZ9p z@vQpMHZ+cK;E$^Dr4Mko_5lP;lT*CS>Vsd*I?D;N*PH2gK;EGuwG0We4QVU8lJUcY z-Eyy>jNDyeO8;$kz5r`e4xpGWG6|4i4B)NIuZKgRX&g|CxC*jP%KBAF!9$(|n^t!>lH zg(I%Y#^Iqdr7Y};9JppV2@TfO)j1({^Ljdc`xMA6ROsSGGl^kX)o=~FHpV6xkjW5` zat=;}6D=S}Vo$rrD8_r7xtjQSj)u|e3%O$b<~z*e0Zy5k1& zSp-z$$lVe!?+y(`f_8fI=TjnMohfQmsB2Lob#NV*%auGnrKZSDfQ?k$`1+c7dB_$A zYFbXIsj}y_&v|dp z9&UK(D2DnS<&Ko8s@z^6ZVWrqd+JI@>V1X74HS>Pat?yeQmjA0oR4o>Od-Ccn#0kp z1Gx`|B7H*FQAAPCLArahQaLx8z-P*-Nw+w3z{9~KdkUH+wf(2rF%7f>In@SgmlFeQ zsy9D5qcV)abG!NPG+$g7l^RD8EV&snStK&d??Ek>a@+ zE1)J2qe)Y+mr~$8RnCHyD9WVD9WUWVP|+m_X{GPI&*yRwTvw3_ny#Jlu9aMK%8yCT z`CJ$#CpLjC+PN^2V}x(dtRTe@W)t#mL2w(8XLWeCZ$RzK9#tDc=on5Bw#uXj0-beZ z_nT#n0Eb9Zgpjy6^@!i!-_;3+TLa~-Yvm(j*Uy^SnT-}Q>B{_igYE9{(ysc=$98DA z?G?Kdl4A=Y9w1+#7~4A!k*7`Qm8>B(P9!Rx$o5PdNKHB$0i~R90f(6(0fqhq<-7|9 z02M72wgsFJ2P4wa_)4EV?}&(?q82Wl7P5jsqv6;Z^EXEFdU0)9@eT5V&G}=TaIQwUWVl)kgo{urjII`AF_!2W&Ro-8eWLn zNfrt;{Edo80E|KkQ2-$IuG!Vut-G3YDDbyfi1E`(xYl@>w$HGvfn*6mOE$Y3QTZ@r z<(Q;lK`LR+vyc8n-K_?JnE;SyYOP5Y(f|a~$>e*my*?X}g^moq6ij;8pgRQ%k>3_o z2new$pv7w#!1OO*pW)lLnDikvuY%yqPqZYYXa%~{;jFV^>ZDjn>RZA`Y!8KpfAC=D)sLSyu@%2s9Z`d+8OD4mLe^ox^Y?ksmvp zlX!52Ya_yY`coLqKr0pvbf1?YWwL#2zS^bgD?W_F;~c6ymGFgGu-;fVdF;^zq z0uD>+U)(|$)~}@NRt}J?DPwyG;BqfV`h^&_UhCJ}=`fDZYK1;pkoXW(Acv1q8$k>k zLC9XXYN(h!S^+KgkF;G6xaffx)anPpdx{x~1M?hT5|{it$opTg_`g>>k@Csk5OAg2 z?0RY8vQPg(N0E*w&;jyuC==}k^nij;f^$9)m!A;jX(=3`eaHX_mXlVBH$YMX19}aB zfQmdr5X!R@nxGC44kBxPIRddb;C{a*j(~&7J<|q<>t5Jx_dKusR$mj2#GUY3iccws zB*}J?pdcAfP0+RhLb#Or73xU$9_<0d(b^P=)ml!F)V|G+jthtB=LsMq-^6o*$;YkO zA1xyZJ_0;~aBR}OUHFGADiB8UNOtM;-eiayQn#Sf=YNJG2Jgbuy;r>#6$~i>r#n`e z3zi0F{1%HxA@KH-?}`eZn(DQkCy_T+_KUJy#F%PqFYzIKkPWwu>Swo(&nNA7VKpAM z+cg;5C_RC5mivJbfVc5jqp)D0ARB?RP{^N_o}PZZriw)Bb(@@`w}Ml$3CQy>+6#ZZ zal;4@O%T=B0YtlCLz+T|tA>eivyh}{bcjaWj|5{7XYvC`S)RoMT%oL(tFaz=_2Q`R=Lrc8xP zB&S)ik#GY4xS@j~9fU@haVPP7D_M%?Q%3cG_x5ea72G( z%u6v^;J*WT4&d#{qYGx&j(X0l3M*>!;~)I{8m7twrGMtfo!H()5lxk*-Zy{#v8Sd7 zk@Mx=jRdsk^l7y&D9p&nXp-6VZC^ccfain~AITNRomrg7qzLLOO#y9qUQ0OIB${a` z(BBO^PfZFuC# zKkkFe&YpU(*}Mz@iZz!FEX;M_h`PAzi#|#*A!Z{SX-@*2L5i*}hWNm5H^S0alQKMHZ=!*? zNk$n7>h@G;qmo0*z1|%fTa8AEK7|`gg)4+&B7;m=(jElTr*C`EjpCPRZ9P8^DuFKV zE6!*5Y{!L zWFx4sJn$~N2XbtvA$`n>LtzjX$oab`1oxBP4%H@{pFcyQX)$vHMOn=dM>@Daf(@p7 z2wf~OSO;eq9#cCzI|54lkyPV0p%uHT{M@=6)ZF9<6np}d5p_~EN#OL`ft3`Gf>zEV z))=!Ap`^{m+K>qIBa30zUf!P^U>Jo$A+(bvU2%$IhRQI{35HM7eetv}W$Sde>bW%t zc9|8_hJznJ^u-Vp7FLQpCmXmJE-jRTt`_tP2bu$L2RLS``P%c=Ft#Zj)D-yP40Ms; z5uq`4D8wV!uErF&Z=KmL83+(WBU7UEbhgvO(>p=BahGauXyO-6c7sBfLJ1HmXl?|P zr-W)}9A$;8n886vrv53`5TG)PU_(7`M^x9S3Lwk~fl-%(W3>k6(n7!e1mY$Rb@9NB z?4-bl^moJ$l~;hi^b)4>k1Z+1VL6XI(kE;hAyT}ZH>d+X+7jSNz8XDIAA=aRfh8;zV7l>Vw4ew~@X^Erm!p(j>C|FpwG4%q>Am0d;R)p$gPsfAr5|+FBU5xzz>(xBDjv6 zo!Ekmb@6bE+csf>bekaX=A60cYhS(`BHkzI*1Ng7?#@1JD}$1yI&u!~U+rh8XS(Pr zVasM~-dn-A>H7%LRs}^|k2liK5$_M;mXz;oFoC3@GUm%VMx>woz_`@+oX3*S9_bN+7a SP%I#WwPW9x8DAX!_P+q)fF08S diff --git a/docs/articles/AMR_files/figure-html/plot 3-1.png b/docs/articles/AMR_files/figure-html/plot 3-1.png index 6327eadd5c4b3c09934915f85d1e18b87e6aef55..39bcc14717729518b9ad4c0085c380d583ab7a5c 100644 GIT binary patch literal 27032 zcmeIb2UwKX+AchZiUx(Ki6{z09V8Y+KtMW1jgAV~B1$!apdh`M0n{k5fes4NQBg#s zSm;$z5h;TpP0A>3=)Dc~zt@oLz5nyI|6FJ9^Zn;K@k%ZT8Qyoj>s{-4?&rSmXL;qI z)}F=R2!BJNP!`kn?mA4N%!{N@cykxb$4~NpYj}(=^H1&HvkPDGhqE)o3ttx6>^)&m zp@{g9e|h{``cG3RKTv49b{usH?W(8Wu5>&>XLRLEJpuRmUXW%4wUy_x8%C z6fQS^b0Q!_!Z{~i*Xo#Pxl%@D@YUJ?1(C|Qz5Ko6-#MP>K54!sW=Y7kh4oi<$NXUD zFR-;pKS#YapDM#EyR|p%a)1B!{Bj3+PeavP#|BMp^-T3U=1IDXx#Jspo~|p%{m%P5 z&6_*}C2|3eF!}1ecJ3MSm2&mlNFMU_$DjU}KXCtEC2!FPf*pIJ)u9BH?X6UP+@EG7VLQUM3}-o*EyP6J3(Pm(i1M5$8i0 zTFN6_y^Bt#UtYW_fO;asDQ@P$!h|D^j*cSsuhJbmi{|wy4R@rS#ILo^aS3~Jbfbv< zj{Wn7Y^e?=^na9JFed#mP6ZZ9vRV@K}R$sU&7y6*8#Q!dE1v45Y{{9K z>b1{XtYA{{m2Z9(_ zQ)CH=si_DVdDw2ev(L0R_>N;|tn_5^N)H@PqNh`u;w;7*E{OqDoL8`$H!t%q}u$-FzKp(7S>~5x`R)= zW*gPI^N&kccOmwXs#UUPC82fBEc#hXOU*J*vq84nXd1PEY=nIe%QpS7=68_*8#nyJ zKE?JZf5uDJt<3&4=M#>_9h1c(rxv_CTP}aXofBjhUf{|Ot7>=kQ=c9Sb#8DCyWDK4 z8n2wL`}u+Tilndabp?5P=_*_;@Fpq87iz~(b>l?UDT!=$tUcr!CRXbrloOe z3*~bVzxNxFQVmw({B7K4-o2od`}Mmu8r%5S!iz;-C>bnQI`Ks$N;G1E(!`TwGi7wy@ z->Oz-L*MR+Kd@djGwS{&*N7DUGK*S^p8#b+{qEKft7?F3q*qofT5=R2x@LKNhEZhq_Y9;S7M-d4i=*JU5{^ zvFM{@+!Em~r<^{Yjg~ZIcf=-?;Bo8QlP?OYrItHJ^Q0SpdVHuwYTzf%eoAe$HZUFw z!JIY|#xH-a`e5f8O4b>TxotN(m8{P;t|oX`eNSUJ0DF*lqp4RM1xmyG;jp4aXXtE?|fUZMSV)-g}a) zK}PeNW!gnpxU#3-{7xi9f#G_ zxVzItXoY!FlZUl?ZEbRD@8={7d(;^0Cb1cpK#L#i?FuDnj64D5r?tl1i&Y=OCZQKe z=aZC=5K}-Ot*?6aUH(8z;b0n*zJ+EtQe!sSMtdTaJ$9-x-hixC%WHyS2R;Y#xEAU) zFaizTHW*EOu6m9#(D&P^51SI2YgyAyBnI4Cx2N^yPJx!|uW=#FNwN;0YGR`^a z>ugDHyB`Wf@7ni@Z}7`SL91kX-(LvAy?oDNh&&5jpkHqc?NQ+i};+9d6JTnNuqN~ugz@}c@Jje z`Kh;8bp?5=cMQLsl)gXqy?1wu^THpbg(%(QgZf*+{cv{{DQ0xz#w~u#l?PoycBg0V zEDaKdT8E#&F8ukwylTyL(#`QCbX?h|Pq%%%7;sb)T2%^nrAy2$v*D48tX_*0+DItPH@P zr$#y1?>T(;%OYwjON<645+B(9`>^=m45z#bNPs0lLw0x;>R5TA#v&n0=3I5+YWmQ} zAbHErriF?gEt`zUK-7j~w8d$L0E@o%lKQEM<+g+-2hieF=c@%MWcS}#spjEA04tF4 zi>7-nVInX3Gf9+ZnDjTkb;W%m2+akcLSqn!Dl#Fbpa3{52ZpPtKq4aaYo3pppX$i_ zG{tz%fXtGen`Q8>`UfiNYxJ*#bZ5&oT|KZ9O3o#_^%Y4M!N7O51@qyb&b z(6ak;QdKG9}ybn(@p>KhN9!P5I8}YF*;MRzG9OGFAMqER!(BJcvxh z0nAtF+iS+BwFXZPs?XSONoytwgs733dxN&N+KWP|92Fr$m#?M~Z*fr>aLpd=`;9)V zGz+~&a;Zq~0|_>(ETTf&bHIPKbDiy3E31a);Xg^^pRcdD1)#0&BjQwTns3#KNB*Ni zqkn08;8!BzTz9M2gRSh!X$dUH`Wf!5G8-Rir!jz=&n?}RGxk>Mk#1ZoYr31opg#Ed z#=az7%_QC89eg4$3(|BF48x{IYNfQ*I3^@>Z`M!U3S@TH!lJP3;r_vUg7iNr{ef#n zllKdy)xZO~0`6v2j1KrZXRgbcsP7%fdP9diQ{e>Xcf=)mbiyezHE@F-YCZ zvt)bI^{$uYTBw80o;z2RuRh&RwgZh}P4CnT5z#R+ilBznYfhR+M|ip&i`NfQ$ZFT* zaF|}a2DvrpVO-?!K@r9ME=;|nj1fhy9$O~;B6YG0zbQu@>`QIEb?M3O)) zgsP8eN*2G_s|)iKr^lMgtE=zsd&oHS;OCZ3qZv0+KvD~$vEjgN+l9ox$m%t-h^QeY zBvrBV=?lA8^Mp*Q6Mw~EV`5_qtDhO$4_D~06Q(;77}S&ow@%Z1XErlRc9s0O_X{OL zZ&EqU66!%Slgyc-yVAx=@mT<~t(AJ##i$SbsS=?!KcSc@ZBI)cp7>NXE5Wt#icRGE?vTsF=}2f-xcAw`6pcwRl2j zD6z`u4xpxWC)X;~M}HcPNm%IEGCC z?lugDk5b!};+@Q<*wh-7qA96UpwIU+CdcyCd-@&S2B#eMV7qNf$YijldYoOmp5>#m zNHG~`E)a44bu_>{DLBoZy`HvSD>SuYO5(uXn^B$2L^1-oPeUCfr}Qa(tgb%ZoViNu z=xBMww8OPRQz{K~BEzJ;>|vNy@42*VCD(=J%&*msezr)!v`i00bDx_Tuo-1OV%Z63 z9UpDOb-+?|4Gmi+S=FZ_){E1o8>OaC#ZLH%D9h8TdgK1_vE9aV(|gRVta`@MGG4um z_2G4@dgs&U_%N1_?YPG%GeXLXQ;0CPUuk-RPp$9#YWpH-*G@fF@YEnLk~4@;tE(lX#oLU# zftyb-sEW-uce;7>l=YIWCDPBC9Aq-VB{a0xzex~ym-V&cBj=KkVRgqe1P~X-Ioq%f zk@Ip~vH2w5NR`)A6^*e+jQ)}tpOz#p)q_Mt^%B+7zU`@w@ZrpOslM5^<5P^mmec)Z z`=y3E99Ibo4_sErTtgc`(l}?!LY62BQIMjIR<-mb%KYis2T^~m*VNPuQnYV%x^de0WKR)^g~%&1G`kNQqKC%nvN)bf6Gfi=*NmuVb6%vz z`m9b)N^%mJ> z9&1RVW2hi9ht#)clE)ygC(y{#mC;Q0P&Pn@8H8fm=cXwVt~}ayihV$GJ`6(v>gaRB zp;KXhK3BMVPmmbKxl+MOpE06rVzg?PAO=bn#!erBVuF;ei>fLiW8fbWN=SwSqObE9 zEOup0G^ErU;~_!@8m~#UqPW)FxpQZ}BM?omIPH;UNC1F^^&lr@l=~h~bPonGJ=W6( z;;iYL*8O~a@5941$hr*!0VyVxPfuV4yUPHjPz#P|tKPv)e1FVN8niApLut+hb_{*H z0&xP|5SuzWI-Y|kXy#KN+d)u7bhz6_B(?f?+KDrdkGiKHTqySf?2WGAz5QaMgEQu{ zJn+|$w+YgJFUMQN4m6FnUQt4}m7dA2TbE?45D{Kxv`;v_CBMJb)>&gjjC`yfelzVZrap(I-W zU4eNU_yx=%ry{}g4kEni^dyIqCpLZa&L*AKdp@H37yt81!&47|s26wXeS|+b6&snz!1~a|?anUK3и~Gyf}aHhu;=1 zldrXAhdFB@Gmzg_?n!;{$%cE;HsjrM9PncS^~pYJfjgEYFqJG&W(h_R2s&DGg#PuC z&;Uj%N3-jQi3Z=7_U7i_es>6O$Da%v{9p;T;tNRV(T8Ik(yd`lP@CZ}*$B(p#M^;& zzH}#7h>G<4eqkx@G|Hd?1Ud$Oy+iVmIH%f0r{v$Z_qAd$5hUD*>o^=hWz zW@!w(v&?_IIf8?mN6|awheoa~cN#(d&wxISL<|cmlTNjZZ?f8ZW^rn&}RheMKiZkAlHB?3|*rPuF z@$aKg;~hsHFNB$80C=fI(%N;uRW_$}wNv%4F|oCo&I!k#tqs(-qs0TK1C8wBiV!D# zWY3OCn5+I~m0@3z0%65)&(*nY*rtZ`f1juQHq-*#DcCH6F5gS3fmVRg2+bfoDY96C06@PZfqL+7FC1`I!MKyAFo1LXG`Y z<+(&$jTeJP{$iNEg5o*qtMBX_)atTG71*pvUZSmcZ@Jh*pn zO$4XNOvbU}Q=MC990@0JK6A-%HKZQ9dN;HY0OwByU{o+y;jR#h+s>SYrFoYZ?`MF< zjDEL{ODm;!B87U9WZ8;MRzxUcta|o3G0xr|Xcrjvy~3vHez6&8lJiyFoy2?tvX7Z8 zZnJ#WUziGpSJ;nx*XrQpO$*Vv++8be|S>yZ5A-#b=Lq+&3mO>OK7!WCwv9$TS0pZCjPQUmnR%zI^#I(RWBa z@d7hZ2MCacn$R8$f0fOfPy23B=x>(niGn96KR;`#+nPyso@I6qDo%S)(bh|I*#A~( zvkL13ORWiNDzG-=b7jaMBWMHtY>eW>4pg<}(g>qYWZ4qjJYn?B4unr*$4ZjuA zYuTapT3fQm8n-h}B^ew*A69ei=+psB3Fby%LM? z?w_iv*d@xnT_XmCS*l!ZuZuGq`6gwV2kU9O~_BJ`WhlgWK#`?adK|(nK{m!EDDXPkN zJ+>ZR?+D9lMpQEBt-v!IpVEoY>}rNCU>jd4jMq zqaWnVnBig6AQjgE(^`;AGMF1!H$?UBVU6WSqLHwMG@& zA}`7~_te4tww+KKDK6Qqt*z982KU~2w()TwK46#fmQ-wP1qb&7l!Qu&PUb{leQB@j z@_Dn~Eypd1`gy)hK&2m^pDwf;ELLEnnkg>VRu2Quwp~zt(k5SxTETe;O6 zl3p6{xPh_CQrnOT9-^mT+M+66vrNraUQW(2ooVRaeTV9bEu8F@{Y&gIaoS}8kzkm& zen40=3P5>*=%xytf_X(EJhi5=BTMdbXF`rzO1+a_bZtYwud~VLmuK}v)HTe01~!-! zw$zI_bzZph8tBj&_&UnG*cTA!bOq0gRwEXH7hpGo9U!GyfTUgk$D)U%u?SQh+p+CFyt%SW*0%8t z;Z9WD8iaZCyiZ(M*WO?xa`sI1xZeMSsF>jUEAU$(f%omngeN(X<2iMVDLCmhYdj8{ z>93NLU6dEL;9k(Z!x?8Bi>OO9{okJZWuvBzUa6LI0K2R4M2Cr!v2KHD!b+`^Sx*KV~b9-c7vOnkP;InN{2^j&__>XMJ06It0+ z6G|V<5NrgFtYMox`>KlY2QU@wY=@w3u zMZ$C%AMK66`zNZF>PU(EhnnbPiH-@)ZnfzxZz0e+xs_C&FdAS4c8$0#lh7){#5uco zfR7Z}A+kkH3aP<53G_s2(5$Vb98$^PqN3(x{xpc+WA423U_qn@Ic!u5#zyGUIcwKdM zb$3oW%#z}?e6=EoljZiwRNO3m^HVvTvXVsJNW&8KnMrB^iqFhKNjEWA zZJ(ZaLCVh_PtRMQqbc?Eq}W9XcrGELs=7M0n|JzHf?<8T;{JfmGzReu7>M=F)Q+#) zsF%|EIG^hRI4C6%=5UxOzeHVCM2R;D&hM0-Y;1)&@gHS#imhA0y=XG(Z1NVLJ=1n* z17j*Ge^Mu*!d$WGy6gZ^C-*a1>EFM@V4Sumlc@s%0f@6w(XM$*!V7R~M6M*b&1wAn z@9-;{ab2*xO}XhL{OREsZn2`J)E>3jC|d=^issDp6yjo8Y3a>-JAFuPQS;nyCdk*#mc0 zgLUMR*9TDPAlP*e>0){bN1hUvBPH8)Bh0e<;7DE+dZ`6Qn%~X>W~q zs}-1XQ%}b%#!$w2Of)g)RnBSSjO6Q<{(?I5@#q5gr{L~sGOlg&9K%hR^+_X@)B=F- z4wZ#c^LO`ndjef1zhzftk0fzJnbGt>AZL0sC&F`TyakZdh|!ECS6G*3|Ke=*}&3yGP_Bn_dQnM0CB8L zO^j+YUZ$k5!S)qIP!a9o&i&J^O1=0qeLKiQKA%E=ssKjmA(L4 zg{4@VvD)tanp)NAt2&u$X#{Zh_JuM%T4if8UF|`x#xI=(nu!r8lt>_8h$NS9NB!?V zX&pIj@5Kr93ZfDZ&y`zbb5N?8$nOvQ)Rbt?G2z{!VyN*M&4kz%V4gMasP-L4vXzvc zg|rhVZc(xv6WDrIX{R&t`LIS|>LDUM0zyqsH8@oU6^i1U**dJtZ1csJ4ptMGT!gY`Kw^?JRc$;J~ z8iQD+qWrZs%Kh<_hmI6ni-6aM&<#%2Rh+Av;@{Ucj3g7}e*!)cU!{)6qd6%&l%*3CCz>T6Lw z^){hl(epwCk4HfLs-5Pb8Z1PV3O>)v*Gi08o)fjK02dnf25xuZ6KyRDBC*c1@1j`q z(-$TC80Q)?6(c6<*aKuq0pFSsqc+hB-xPB9L@6(p9<8jdE|g?x=vZ1PZzI4*Hs7%J zFlIDA%NH%=up_vt9cWKtn)+N@yZ;8aVAl}&j=$8)>PzlefCz!CtLgxvB3qa31;ph_;7p7o7; z{}kLY{2GMa2ZRYOPZy$K9bdJA;_yILfNqerhvL-aYu2fX60Gmkb0gj%kc=S&GlPY9 z#fwN$9tlXv6c?MQ&L3fO+Xg7#9aYibR#k8T#b=FtCR9|di2K`3hPS}E%MdhbpUcB{ zTa;^f@t%6T*SkSDjNk({=A*XfI1 z81XH$*OkI`y$1XvHrt+NR!a`|y&U9naMS`goJOF9 zDrx6US03%NtbQ991=9mS5HhXormx_9N$>FZ{zjOApoAp28{{Q*_iBA6v7ntU-Xk-R*St~IyLpF{;e`SkYf~zKR ze1zJ(UI^^(?ifexEJ$`7=*a=lAWYxe2m7+ z0!Pfb1h{v@W9@luzHUUF1b)PnoFuQ|E&fLma|3Vw}AZj^h?Fk)dTx=Z&n z4nUssF-APAz2A>nORu$<8VJlez#!~sn5g>HP`SUuZyoCB&n3+W&_Uh&X1gESV#nVs zUyZ_CP<7}aqZz_y_fROAcOur{YcMG!Gcp?pxlDzj=FJvnCo5;hX(k)A0kvSsp4HFx z*gKmNXES^}{lr>DBdPw^jQlD%wW%w&ojFLV57ONMO#Y$JaO63uHwhhtyzT7TJ&%8R zGbE;C(fPhm)?k9SC9F^DOwS3y%Ul_jL2C)^%s?$VgA~vmo;RG*LxaPwomAJ26=#tu! z$dq>tpe^ddYd?KTO3Acq`2g?FI%3=M-QM`S$HcmvD-aiMV9b~#;5@-cu+CDT)`gFh!Il7&LC|}#am)r2%lX4}A(sojk z!U)e=4uuVvgHj)*J-00`q}94ERhrOa%J)*N{GLUNeR~}150nAde#dCe94sls`gR`s z@+wOjJB<){ekucd0~5Fav{Y~C3Z)*5KivJBiGl4oh`h|9hf?)lLt&bu(n#H?n%+tX z7Z1?vg%+^wdrUTo^#=52LPQZSNRFFrFc^Oh>|Sb+Y;{%|#gd4xCDbge?|qiexlPtFvXuO_WU2EGW&kA z${MaDUJxi;g{0!Sld^!^q%?NuisW_%i3r4XLIj~YhjPs{I2DqWJ<&hYLi}gR?oW@! zo`zS6rj%T_9p1n4hK6v62jVnBKpJGXhQRqrUUlvC6r|T;G$wO}Ai}~qZ_fdf33%V; z;Ac*5>7D(EIk%0v^1mX3N-C8frod-ArR6te#APg4J|M+Oj0B5wmNZNdNdRsOQUnvR z8|J(yXx7(yxp6abJHwax$e4QNbaTOH$ zj))rG*^?{6cmI#d=06{6|Nj!~{`HvLmHIC@x#Yj&b2B39qF`sxF|IM=rIZYK*Q$y5<%s_~hv+%2ErS(pRW)RGlSZWNByRc%fQJN9eqU zXhayf|FOm~OPB{Q$`exKJp1;GVn`3p&tmG;j-(tpk5|F)U@|5CI}wCL6={=uSD zM9&$5B|{edd7sRaEd3-6(zlUwZ$9o33yV$2RszD`olp@bOCEqSWJ)*X_k}u7TIx`* zkOoUx;0l=gSp~$2PMkV9u)oNn{qTNOM+sL8q_}0E77;^h=2L?VdD6!~cv#5qpxqXU zC~YImI?RCCgJHcUC^z25|Lt}JW-y7pl~@r(e2Ibm^=}Jj9kbO*>Grc4NJBg@7l11{ z-iKyK9OP~#WcVhd{VB138^rhpwSF8UqF{A^0X>=+$ja>nl)DnC1?ZJH(yUuAmq(N# zv=nRkWx;&Ogf%SNphPfHcIV|qgcT74(jx)qUUd9CKsy5V9uu(VzEKcTM>L!0rCg$I zZB1w z8NL~Q&e1VvtE|(wgLix2UYqmFKhzQzlPHwE;~BSE3-({tkIgW3LGwcx z5q!#x2{dULzNZWq$7%Fd(v*6-SmQI2eU0FVQ@i)b)PDXv@S0!hlk3_@QDI?WJJ8V7 z_S9A63>(Mr1&@6oEke^=-#+HvKFCxzVqaQ>et%p~3r}4jjzO#z9rJ(`m3BdI=;h&%IV1F%wj& zOOY~Mym)c#bd4@0x52!6YJ;kgv2jzf;Fum-^>dZ^F1zH!d;4`LV(C& zRN|Up5Z|ft>RN)?C3T6li=43YkLv@V4k#+xD97_e;>jJPOCD=Ds>!O^&vWPjjRB3s zG9^pH*(g@ojC=96?u}qHkM*ueFC_FlWX`N|W6~W@itxPYWcZl07{tw5@QP2YuEnCe zb8zHMN%Dwy&nMI%mSS6<+cy0ywsnrwVF=!e#JcR@@dKJqEW#w_bliLP%(m7?gLs`_ zaO2K1{76KOq~-H5;tevAOP2MY+KM)6vMT(^s@1z8EVq%kK8SuyT5aHQh6(rp>DwU2 zc5n=x1|RBem_;s~a?l2fMq=v~I#H`Y=Z$cEj;nPGy$F>Smfwo_%vK|#`cM%=tq#g^Mg z>~IVicW1$#okk3HGzMhHW}HeEGq{T~v_AO@cdh+ToJIG?qVx`b03Dp$PhbMFiMWe9 z$lXaTCFOBrKNG!LQLM>lJ+B>KPf!RY3vG47A8-6G~Z7`)o zhe3<=k(7X34$P6;G6C~%V!ngkuAnRvnM0XPlR6Wr@N$-xU<6&7_74e_!Y1W(99DIlG|SFyVzg5eeZ_ zbMeV19VV#vn~BSXc+NBN##l|G^Si>b3_j4bJDP?0`-2scXp*B!~8hRJ?WO@7kwRd9g>AfBvEs zH?=()myr|p20$7q;f z1tm69vK7g>6g@){fuNx(TC7Dar)1v|r=3N7+M~kWh29OtqF5e9#JZ91mzVPLB{?$i zM3Q-hRfK|7T`HlDIX%ufwe1GQdUW*hXfra0jrd+z{Js5%EDb6UWo635lGq zf?ZB5OgPH{XL7(TO8i?5*_tN>9ZsvlHt+-CaYDfGh||=dH(EJoffk!ASD%8B7w&|< zrm@6`F298G#fz1vlkQ``z&P#S}~Cq1Ru1#KMV11K#nOAhN7>8}fRGYkOZdjK?a-U`<(p;F~{bpMh#3LSY8bI>^yimI=fP%Fgzl?iml`Z|W=FvzKhvwe%(=;V`@G=IuvLUr?+9Euq+!%PVnUzMjB`a^4$tq} zqx!XT2%eQd-MHlLJu~O+h#o;zMB_)NO2G*H6#hC{9lvn5I)s-B_tlgUSsr1xXNyp{WnZ)FvkB&1M z0|QPe&$@rUXAoYe^|TZ#M>*6c*l}kAb8x0gMxh0&8e+wuF{C`c^4H6+qGaWjD4geY z%OpF8MtuL>YDwehAT5C3Nfw^uOmte+cN>im?=gV~MDQ5EvUjg-B5|7GE0)Fzg32U8 z!#=BS8RhB9=s7Mpa$2(O0BBq?QE>7~&_FXL>M;36>Ziw*rb?W%?S1m6Jrb&Lu+a7+ z(OQy9yf-J2Ef17&dO0YTa42Z+P#S4dN5D+XYpPGO9we&=KWAgHa|IAcF3-qQd@L9}#wBShLOQ$36Wo#Ulm|W0$Cv{?9twlnL`d;hFw&8enfy3Q_!=f^GFv>{E`SoKVSZt2bX4Cg)mObXn8 z(UFl~uFp-2YF0ApEq}K3D2|wFhT3O}ymLd;`^OkZ^Z@W2G%%?DGSy1;uZq*Fin7*_ zYejFj0Q9RybSD3bZSJ}0C&rc~p5NTwau_{YS3EVRhr+H7cc|+lj^9FY@%Dy-`KKRI z5tcwXYybFw@2kySw2%^jc=Oh+C4*_m36~j+rPEO2>|5^W$lJ>^bnnYmU2Kh?XBHbD zkF#qPDOfB%;I*H5&3MXN)x9SjPd2M*lJ?mR(STfg#zh|r%-!nEu;sH)d%QYH&htXxRDs{72vM53KZg;;U+ATYjG+Y^=?2aVf2iO#)-Yi}*UzBo6Oh9eu6dm~~0_Riqw(Kn9|J@|3M2HNAS zs4-o8)iXW1Hpv$*%z5(U$qE&ht#CLJy=u-E*dN7x1jVclZ>AMHW6bq$f1L74Z4I`d zxB#dvGZ(wEt3+=gtwA!S?k7CMhRvI=2P|Yz>CZT{L+J~4uU&%8#h;5_hgDavU0XFt zvOA?Z$wH^@ZkV$3dS&GhgoSUf>~fhJuHs3BT(FAXgH|G5t?s8!pFA;tX}Nv1DNx>T zd0*Sa-Y|3@C2=P=x;D*TLR?(j#Kfcz>6Bsv=(g3V>o^5+>e;oo_WH9o#QW^aLIMDKc9p6 zcVEnD-K_<9t*zMS#&EA=B6m5f>@`m_dCFI8z)u+%99($mCl54sshd?fn452WVaA-l z`R$r8?QHG+f!t<;m)5NC9EjOK(su?1?0&j;aL5x6c>45dXqdOq7?R2tAW;a!jrb}ga$8Px?y#@A@cg;V zhYueX%)f}SCB2e2;(X9qvF*&a*cnYQX+MgL^w#*{=0Oiyanr<0hqDFm-=9QYBKs7* zAU9E;Z>#PB0Bb~7Pz%nYBJWkY3AuR7Jjr^# zl>xeL`b(43r~Ba&@Q;XK;v#Kj5BXzaV#t*dw2-Fszxn2yGkEkmknW7~FsM&2iS)Kl?3%@p|sdKYqSp!-4;eKQ0r}|M9!ED;6zX zG=IZ}4Oa|V8P3*2Zdh2cZ&k&%nBcGx8e?fy>ra9j_^v?b$Pr!*>e4HQ*LJP_*crES z)FbUCojk+7>&lVH=3DGw2wcBnQ5hmPzv}H{!@I*^GiEq!u;s(!mF+pC|gLp6L75DTjA z%$dHRgFo)tx`Mi5k=>VE9tu|FT@_auWGkwytUu)bi?3h5w%>OM9p8Q@x4!=rbA)HR zUGv^;1ds@KJ&1~;wvKJuvjn~?n+C5P0AQxB~JMfmO?SRa`#5bL->0Gz9WA} zz-Wp!s{~<*ENE;(1O-uVo9(OVBVEVMBy@}o5>ieVE+;MN5X-N$CDA8F4jnwGv111h zO1inOuCCJgqMMMovkMh+IGP(bZDOVx>gyk{wUw@^sR8M8iJVvICiT(vZRZ5)r$&GS zrFF-4@16&z?bvOy{Ty64=p`oGq5#+Ugvg`4N&Tf8Bf#o3^>|vN{vj&D-ug9^m z>sAZc_kGy`)54rw5a+}!U$h-Kmk-Y*gEJK)@87?Wp04!My>HQCH}@n8Gc#&hgj>f3 zq)$X46$%)GwM(xcSEa&aAH2;6&4(n&!j};fAO8re2mu{px5JmC7gVLB5@^yh@Uz&U zbK~%d69q7&j^Qwu`#FK&e~69UW^&9HK9z)inCp`|G8EhP)QMO@eGwP2)Mb3~J0JPgpZ}wz>|Opx{~#w24jlwM zVHDSVxd=p$yaI_%7$+=5TV482!bC2pap=$zRF^ry-x=ZA z4mWZGO;Rb2>NtPoO676XEIgr4mWdRO^*6OwB^X^CMH$Q=`lMX{(4miY_ujp9=|80e zEdC{{uCA`FlN^My@U1(r*!_Zz$;rw2wR7k2pdoKg=##<8cdM+o{rcv{C>>KzA%|sb zt0qS_eJopr@Mv+zlWg~}LK5^2^H&7=Y|rxTuR&S7M4<#P>{LSrT4Wz2#Ky*k$mh-_ zX8^Qj35Y1!AeQnbg5UV9QPMDT#rC8ZX*jz7B!~9H6dazk z>;^sg)2E}^@P^Epnc%xXc4DO&_l15Bu%s2PQUE6Fz=;zpckkYPeU*Z5V`F0~6You~ zHLJYv;2R}}1aUh%JK?Mu9OJ;h{TDsO@V(U6X#U$nA=@am+ebj;n_O~GORD9vLlFn# z{Zg6iUm<+~NfI-ckZ8sf#RhkU&eQnrY{8lf1%pU3F>xIP!F5Dz73H%{SAdUx$nybt$GeH)YgfDeOvXTn87E# z8IK?TXv!iHUq6k3j0Heg88t?pX6ft#nuk6abCP3Dtye~$vo=;x*}Kv-d$TV`?~j2O zExsy^lJ_p(qLN@aes4AUxJ}ayh4tTABM#)o?BoGyS#~l6AyAY)bcljr^qx?&vONmU zhQLKzDR`Zk_zN@^C&!2#*|+Z-(qs4f8QC*(Hx{138(I!V*ps4h`m{LtIC@bODbPyD zA|qOi3QUCnB@4a1rUxS=KgZPFBpodus}vO#qaHo_*?F_Xll1gpbjgOJF8En+K-so& zE?C0I#KdpCNe%6B@D#!fWFQ_2w8nJ`3JSqre0QzI@jen@j)Gy^!=K|&onnh)p%gT? zw$9mlwv3A6P0P_y&gMzwFt!2q@qEgqOP2tosDA|0Kc)^Q|9mh*JTCojg$hba)_=R; zWpg(lNGPV!?zxZlkPCHnopb7K&`hza*L6hW zeDNs&zT6n9!_Pm@N5mW&av;%`0#0-x8pA$CDROsRutro;$`|ZrgA1^Rk=cQCxaQjh zHXxX!O^a6apeFd7Y`LGhbd8jhA6oe@<3fh?;a|v!6a1=Ova6Myt`qKxyxFe$j6g`o z!Cs8_I1$v@(k#JB(PEsgdoiG19j-~MhrL2KOq e_&@f?{YGm#5y==)5ikLg z3XF(^LXcPll~CjoC_)kc+=bouzW@IH$!wu^Jl-e>Q%=9+V^?fD%B zx}rbL`-wuKh|;!h+C`xV$51Fj*^?&XPu`rZeSqI49@5j@gx~Rtw=vxhzfC^5)!2zb zkqjXJ3IsNG9idPbP-vUh|LPvmUgLGO=E%XZE@q|aj2ZdC%LLAT)IYrGfy#nelXeAs z5#D%r!p`d-x3XsKSh3*|8zxpttT}3pC}WT z3d|#){1;6)#{ZKGKgS4=56d?Alc7;!CjFPc@cTIvG5=0ehPOw2K(@7xnVDHwSQwoe zA0L1G`0r z)_bMAzrT8H{CsJBP9XCxEy(f1!hpNG9&!gA_>(1+>n~blYipa@nbuZZRh6cnqhOY{ zw&cFPUXn?NyY1*OFI3ylcj@+Oo? z=4Q4x(L7V1ecaZzz=Itbav~{gw}I-C-S@ZC4j(>T_SiTmPa#WV%IuXN@Uk5TTVne^ z{&u-SdAx5t-qq4+#-RkGeul}JN?pp<%AL+GGxn=s~Pb> zF8!;}3DIVwN58IMIagyG5!8o?iH3Nf*rE2PIZ`ybRkV+5dZ1U5dgsfKj|l&eAB))`!(@bv}`HUODQu*Vdnz=;C1` zm!z3)5g(wVaAIg|%$QcZFYi=QTx;!)QG1JHX62(pQDm5%)Op^;J_O3qTNlW zPd!v_}6E-LGWxlx+{#k5qsCm@wFsO=vzs8kbl2CnC_J-{6krih|#0-iV_noY*tz+HRDwrm(q&;ItdD-Ej>s;F_E=j5< zm)PcoC@{~7&QIeRP}Ut8rOa>=C@S1fLGXyN-*>uxPitG7y438K-n?#uevjd8p%9*I=uepq^$@ zbw_(n($^;@VgeNxf<*&oWu5!GiSk)3ZWFiq@cYl6lXMh33bfCjtT+3Zm|Sk|)i~Ie z$h1wVxgjF$y~?^gp1t!D?}e z&qn{+Q)}0)J38?FYm(HK*s7@b-bw!Pb2UAkyR2_ci5XKAr<_lv94i-hdX;<(@TB)= ze{-r1M+f2exobz2iP)Xp8?7}d2jT_~jjj^c8MBh-2cLwjb?1_klYPB}q>7vbxzp~( z$IAhd#PzOHYYfqA9{YFSo_OFu*UuYB;P@YhN&dBu|0;w{(A|LpDz4QmK!XFacJ7R_ z#bia9TUQH+k`Fr50e;D^&6A4wzt38zBSb#zI7|7DeqrrrPx6yfHFBy!)j_OPi8?rK!TfJ`o!={^eJmNg##d z9zSP?fM-kbz0h^GCdj`z);(+{bC}noc<}Yv{m!2@1D@5jdSFYZyJWt9|GwaMpCVJ^ z`MdgbFFP_sf5{sE$wjD7R5=+vNa{`>m&aOuyuSRnjZJ=-lC>kRF~sWCY2nb-hqoAL zk8tIpVjn(S?gkJyyFaz-{d`5Iru_Y$E%(B0hYIX{g9Zl&3py|H1Fn1g+*Q^(%y4Ce zIHSbEuL06gL55nYK;#d9T`^b7+g<+Um(v(}wL^}iaf)4ys~I~aYxu~~!iZ2q?{70J z0YH>ljANf}x2JO$-xSHCeh*VVAjoa6d>(YSq&GY~ENqR#x3|>XZ|^Rq@aDCZCo;ve z2Hs_~=-Yo3(H?kJkZcrJx)O+Ls570j&Vs)Z4#dp)Ss=|M{^-}&ztQLp_3vHMm}e)? zq}y2dGg=?Tb$`34&@{zjU_-2%in6k@46U!)iD}E=4<}n^^@1{gUra|373lx?i4(2P z(VBe~i)r2M&zW{5N;g&-(^H+;O_>}Yd)LY%AqM@%nVv3m%jTk6sbix+hff<)6vpI-{2*BH!Qmwa!oVN zcwi0E=%^s%cgGqO{62j#of@|{{$qSfZCH9|nk+%JjIj}p6-E#lbq9-RW5BcyXI9Mm zGwUX^D4GZVEwG*XJ0;Vh^75Xzy)LQD_r0OIfl@W~Jr-UaNi_OQ1C@gpha@q9s+}+E z*LnFge7MGIkkJlpYHF(X8yg|ht?1F+V8C=JRAo0rI2E=yv$`Aeo*#O5LF$TBjG0Bg z^hl4wcY(wPx5*??b`19HUv)J9CctR(l93*c3AgCWt203_5`}B3s;XMF=7;1ow+IP_ z$eG@Vjq+T91!ceGibSeeef6AJaXFJ0W^8_ttC)_bHnXs(>$>`?F)zd|jR{~HMXkgm zc{z7tZ7ii3Xz?04<{V5%*)BuNDdraz6roB?Elusligou5`RMmAuPS}| zYtnrR@d6zfDU9BD)9U`l5R1aeG7(n;{f6t!5^gz{=qoRwP173qVi(ANhy%Jx*d*6< zr9!dU^FtM7`fI)Hb9PCPBH~XZ@5!Z>{vx}#fm}>Jz5Us{0I{VVdHxx^0{g-#3K>@u zeLAd-(_L+KfA?*<7t-Bf@25`6)eqMeJAFANVppF&f$YZ$hpE2@{Jb<5uaJZZHugcG zau%<^yC=M^+Hz=hjzrL%D{3c#%KyGBSc9@gKUtgC5JY=c>0qWhHr%6VTlGTYd$y1V zuDy<><^KK4erzDbElwv(kbk3tqBkj#RJ?qngsjoQYFC!6$M;tv1fxhe7p+$v9jJH8 z77%gv+-@W$x1An6(r!hgr(|~6)})OVs&gXdDjsdf(H?bZ$`1`9FAxRuP)CZzQiF(_ z=V!{?fB5hr+kPs!(E*WPAG#(TSUqB3B(|?zOiQCr`ows$84WkBJFb4Y>g2vIYYNNi z$eYFQ62JBf0_=S27jzQf`u&@dg+xAnz$wc5ujitFU4guszap#uYbO7bGr4JFyogRe z$j5uPUP;e=Vhc|5qlM*0o*so2YX}~q4wVFLEOH7qI!R88l$=C%Sy)7uXLhzQPB* zcxHm6a!()C5Wh4}>CreXnkn>fZ`|m-pPm#THe+|jNP|%&Welp5!P5ah^CQN80`mR; zv^btbmL*z5gY#Rfq||sTK1H1N@g zLC5X9TX#oqqd(sF^mhGzu#)Z05+G?q)!pp0`kn?hirTwxBsA#q-S->%SoR$EW#(2n zHX5AWhMK`t;|zC)THMD9nbi21C5_&I?4+OL3+j$gv*3aqUr&~?M0H#VM#-_v*s9Se zYp~SS%*w0Q&`|q1Ad7rStRWK<7>4zE1Te#+JiRv9j~C*XtKi4Wv(@r5stYjkMDlYQ z=`CmbaJ($Y(|{IapOGFuV3*ljCLhvQ5yjaZzfXv-J$Sx)zhJO6$xoRvij1^6dXyXM z#IjAXeKrDwT=+&zI|86z1q015y0tNg=mz1N%Muc2~z(@6%H`j3GxPW_#E6WZ&o$?J#){PN^MR5T^fP44N1G;Nd~+(BsduKFA{YJkllhrIzM zx;x#nyy7^Gk{owk-~RNv#?c`TbFjCK{1gE{fGY-c?-o6akG~l0e_BvpS=L`t!)({p z9^9E@K*gsQW}J$2XyF`#dm3uwZY+3t0<47TQ1GHCL-m&0Ne~ji~@7ur%JN;jh`G? ze+7IjsGAC-=>H+J-Bma8zhO4 za*f{4yPwzj4!NXtKvwA(@W3+BWEj{pq7#O3tL?>7r_!ITKB?Vb?WC#JeK;CA(<%mLm@2J8kh1b(dE!y?)21p zw#7?oOG8;g`NgtJKQdmL9kA#qi5_*X{eDi_rZ+4$+SfCLb#9tu*y1ZHi)fAj@Vx_S znLOXLXAYH@3d{D@Hd|>A83z_tN*bAa909i;Zqc7s?vh&9{OQi~Jo$7g%`Ua^hC%=G zUY}Omams^x>gnMe*VK++JyqurGrk+ahtY`zmj)gJ8%^zx3Z_13Q08Nas&lho*zHDo5`!~Il^+9FiV?OO?b%#fad9!7 zYMkbLJeH+y+Id^?&X&tn-}=U@=2-2KhdJdf1^v<%0ZU@twFuM5v;bYXmzOTS48& z$28tFMIM2IM$a0!m{rj_TL1pCUU9FN?B5SNO6y5NdRTb4x^Ji5s*cvL{xwNm3%$)+ zT3>n8d=lrd^DIUkL3rbf$g&KvmhVq?X)Cksl5au*Or=f3 z@{o#7=MIsrrR%N5j&O3!T@vE#soW)d#=+kGh_mk~kDZb>b~sS;2Gw+btf%e)QN9LU zacZR0Vq_1!0To-zb89=>+>78l)N`YA%4XiHW4bYVBB>o>dJ$Sao*{b17|E1O&zf`R z&Si}DCK}Q;hQGfttxicwQbM%WD;{x49g-cFuw5x;n%g^xR!AQn?ayLf_(e8NgMlv| z&bgwGt#PyBC<{w6T{rCR=ZZ#;%H3@ch85(=U>fUH7vOOAqa{d-?So zH5bfONl{UcZc*?1p~_;bzVn9On8G*H#zr|~S|Gs;ibub^-F$I&qy1=;efMt)-V3oG zw$U-Ais3aa8Dtm`{MLo+cLY=+5rZ+@s9;qPrbMf%ACVsY9^l=)QTk(sN6#)JqY&&B zyWWVA$Unvfk}FCY&pB7ym*{bp7LuF9uqsI=2hmcX%;>s&NlH@AjTJ9dGX=yLii`t;h+`c58>5l-XC*J3k=QN2)qCQE5@$-MOFPS=iJSAL(bU zHB`xLlC|J%qc;G1hpD8jY=yc%b#$<;=fmPaOT0!8wt8JCAtPfW9Jc}8#M)~0C;E-F0T5`>syG|$ zjvf0z#?0{>8{%b+4P_BwTNRH*R;A0zTc4uqn0O0hhd01&K$5Vn5lcdx-c zfL!)taq`OjM#`toTe}P_Y3?f#>1tVy>~V|w!7%HDT)@w6vdI?fUdbm^$-~{TO(PsX zKh##99VSUchnWENa#E2FP(#OrV+*Fow4@q|G+$e+Tjsv0ebUNTe7@%&v)-g=BY~O1 z^#fpWbC@p zz8AnRuXLnW%!?6MFpoeYXiUi(u?-m_Yjaz%)a^h-clsOtqs55*VtV>;*SB|s0aO3h z1Dt|hBC?ei0*_tz5n#7 zLy%82B7`@dRG%K7S&(IJR(Ncp#INz{Yj00wM}cgP>@>v=XZnry zs3I;G10u|~dwJ{aRsPR4AKom;9be`^fuD}J`z9%Pf1N_3V}IS4GlTyfpT}GM8GyEQ zDu_($l)$-4Cw`?jU`@#W-OV-e)}^GMcNw&Vn0r1<3Eb$Pcp zUqtfBxM!L}0y&NDmf2>u)^?LP zPiWnr0)1cn?dd!HwUEdaeTN6g#_<647BSyGV>RUQldY}mI5mJX`M-&q-;7ISsBJtq zbvj?ZsQ9{l?&x_Fv0E%Vi;)f!u~X$&VE{--kk=mk6!;8`A)CBZB2HlQHWqCZ(?_jN zZ&)nN+d2wBCzCbOVXuBA9X#uEK-l0v=jp=?3ECQD020zXFye43@N?ecK#k(3KG=kk zT^=E3uDOI2eKSq{@#m9&yn;^u+G8lgQo*eDv{{U)rBplW5wb2v%4;RiYhHLQ_r8S7 z=bbzP4+(4%72W*DN^A>iO(#zbaF~a=D;E#pPkoH^vg8Tl>p$@aO8Ogxw9`_w8MWn$ z7cXo|o|c|S3eg>ZU2-r8kZ1B=gxS}`rX?XhEgs+pz?ZHRQeaAW zXo7{NsVq=n3>=CN(7QYD@0zvn2Vim8(mVHi+ikNHrvn z65T~DS!wNBOUzL|DJU=#O;KK*xg9BWQQ!`e&Mm&b_riqcjbfT>@w1v*owoK~rdrq> zc0Dd3s0C3g+0MvfqlDx2u&rL7ot)Zy`ywc>x_Bo|tbNc69gbc`EKesstz0BMg3@lg zsj2A|?a=}KZ#{8lCtnF8I(c;i-%Ke=+&OYcw0ZjCEe-jK%zR<-{a4SOvz@;Sbtl;C z4CIms$B)ZH*Bl{5BI^FI{g9yu(j@gW3eQYa_8;O~weL_z4Z}J$C5OLeMk>i(!@K%i z>cS}Iq}TQ)*u`JZ&fbIde>loUAH!(YV+ zwg`zH8)lO&6Cbcy`&X)tn6y>~Yiz2N#!I6FRRn5k?&pWQA$)*$0?t@U17DF*>a^!i z`Od!J{rGV9`1p`G5=7-CjtwSeAPN}*c3jcu{@~qVZIMUNHL13hq?U}V&)RqTuot<; z{+Fw0YwW6D8uW**I=F$DpWa;*XXAykW;4rCx>GAr*$#P6C6N+qEM1};A!yJpaPpVn zLCX=3v1juKHJP{n)WU99S2#!j)*2_<7~5rZz2EOry2qpSVQe=RJK@?|E7&&=U&-YI zE@^GXxyAQxB+KeBBh^#NWqw0#RimlZ1l`4;Sj%CZk`e?+DX;cxRFA$&s}xU0X`GP^ zjZ7VOvo=v~h^lDjR--gi#vmU`X-eg{)=Z^y)`^+xNQ{hS)plKRYXF?6Y#k6#Q*>feuzGZuZU9haC~cny}2aBck7cphf0_P*1@0;bd=k zw3*h0NskTWsJ1_Ob3$|fi390^T;w`dThQy|2_2WMR|JBJ&GR`obuPVu>EOY?2sM>k ztfxGe`M-;dxicg)HTm*s#Wi9?seb7IXt$pTFT}V=T#HK$qasjLvauW5KJ}E%nKLmT zNu+rIFBKYM-e@U`Zi@o%h&K9rMY-H=Zt22}MK} zgF#AW*Jb-*KiH06l)6NYb(J^mSE=4KsbFew*!s95OV1w*n|k!luH&am{FBp+6O_(a zKM1aT_aZ}I{L_)$>r4vg1Sy6Io9IlZ?b<89aZwnpTkCky&8q^s6Q;F4_w$R8-aa*e z_0_wAEg>D4v`??UKRs(GGo)MfyGC74B@!O1qgO!fxprBgR@Y|XK^4Cnlo{3nMYm!T zgi+~00PmGLQ=`&&eRntUUa}Gd)SdA1WBtZPjgwC70YOo6n3EA3;d4URw0~PdO1!B# zpyJV3woPR35(ST3yF_Kk$1rm`1mpyW&c6Y@Zq@vCHXmO9Hs$%rudktYs@ABz!E}aW zS*Mg7Ch9x9sjlkUI#zu-gHL;+1q3{Q`s1Nw5`|6uE<{ANku_`RH(0XLJVV9aZ;0jQ zX%1ZLFCg>`vF=4m3MXfB%ksgFyrB8>=B14o8DU9LTPgxlP2ycW3(IVk`kKxNyB)QT z@I@utx{e(i@Gz7cIHPt?7)wJ%7j$0BoYT;nCh!Vlqf!%gyQ6HaA|$RaSJku*B^mD!BBYR#vt>e4QN31sz-yq*3A*Nr}u-P;9>(Y1{E> zW`x`Kx^k}x2b4SA`|f{BT-b7I zeJo)&c4LI9lbU8(QPEWp-Gl+&Y{gHD&2bmJCw+zGCx{AoUFo`>M@WnAtRYPqvLd@5 z8v3jN!Sd1ADzdaubKJkwYz%mVvRZ~lP=1G$-#b}zWFgpx-P{YUw0c5qYBN+xh&?}! zJ}a2`zJB<+CArgB$0aogakJm01O)4 zB!2IqabVo{e38JQCdb2&-tb0x^yKJQ>CuIGH{|q+pDxM49u46qp_1C#C@NrND#Q#r zH8#@KPFM*dUB!nwT4v`tfxyLEG)zZRH4Cs4_a2>h}R9{hLVc?$bs?5mjH2bj0l zz+}PqMge<75pZ(crdmPWmwYkXSLxV@L$B1qz<6oyMbE(Oi(9X$$1t_WhHb~ZQF=F# zx*+?MP!A!rNa?4SG5$t0w_l@>D#@nm#c~qR_^cgmoqcTt)2GwPgDfesEl8S&9%=Ed zksm;t1+bK;sND-mSw}1?#Jh#H-HmEzHI0;5jl(@mCM-CLF0G$e8b70UbadR?GR`SX zyCB@Gt$gxJc7#irG0GBOI&w+_A)SaCM$L_Ms|_W7a8y2dARAM(-}8U&fOds~z#vmp zQf)1loipBtvFz?sbA=52e-b7v240Il^XO^vyv)Cl z&cY!j9c>_uP-S~_0>BAKPCrZ}xbCNcJ~n<=gmjeE>x;@u$0J*E?MzIu!qRs_T+mD5 z#35E?omc=dFRkXOQO37lQlYr^Kwr}&4)&Iv{5Mw-h$)Ky#3KL!@bGEJm0nJrHmT~m z35^Zfa79-)|C?M2_8WXTZWZM`q<#!yKk-K`M1i@)d^Y)tztr94*%E~D1Ho~PREmgT z%X#SP!Y}SB{5Y8SmW(zt&PU)t^KU<{D~SI=1e_Tm!sLrF;w?rT{sj2f5Uxq>GUdRC`9)%bfA+F$ z)fu8y!9{AuI3fUmQfP=4T>?7VTG(`~^o z+LtvEy^!7jhm#l7p2*mPe%6os$$%+3bwnrxJhpm3W}K2?@x%2(`lVl5S+>Y5tyVeukl1f}LlLRLzSHvK$%gMPXc+oEhWc@MEUr zy#UE~#g)1a5c!G#|I3#z^ZjfDhX4D)qe@cF_$tcF@f*&e=7KrsWAEes{9};$xiZla zR33;#3pVY6$ha7=jCjdtbW-kn%=lvn7v`=y0Ku^FV=z*u=a2b4M1TU7N1T1wR-ZlQ z^(p^x3HbI{qr69P36JWjpEn-P9OqU%qfuRIs@WICtbbT~;)dBhU2SGrl`H(_?i1yz37JC+!$8L9dj6=UO+uGVz}=0sq6>|8+j&zwQ>F z_HhI%oUrXlpJD$T9R(#c71nG@Fx!%Yzc}D`&O8`Nu&4YMEfnnIy_q&pwkP zz!qHId8XI@jQRa1tm6NU%jjRjG!WYNSIb0uuR+X7 zZA(b+8@ysohU3q;%WM}I$rci`grq@aGlJr9nOIPWq@-zomIn&4JCfrqgA%N&BZ){) z_dxpE`?Q&Yy?BJzg2d4ZfW%fvFMG zuiMXEedw(`v#k!zm17KeSE#wubtRtaI=LOK ze0Id6J6A?sbKQY#e?r!pG1h(mR)(fhgj=a>6AB5O8x75-RIyk<>_wLcH~H7TbT~}E zd+XLhJa%N1Q^mmml%{yz8gmXoG>u)vHBak4r<`#xJ*PauESx%b?XexR<@etN<;(_g z@G;N4?-~423kf#}c<$!WAv|R^u@3Ex%>f{ONjRdE9wFzZu})*L3>D)k{%=hv&dm?4 zUjb$P`50-5J*a}+JPX0~(1-1*ofk~vZ;)3(EOW3BJ>BSU4ql3W#osKhG+A>L#Xw^n zY+8JQ1Kk9Xa(w%TzxZ!j(_>QJ*MhaEiDFe$B&B4)0)QfGv7r{vl32iq+2W3W9QO|| zK+V_Qy$Sn6sl>BJL@psQja9T~;I~O>?8GiC(ADa`HcViSK~|nSmVZ;Df}clh4(XD3 zY>~y#>k-pb+PcPhf?z7i~m~ifSN~TN6@a6f+_X#~F!!7Gr-NzLYv`#Xay>j1GKWJzM^awQ3 zz?|1TOvCMCI;{_gwr zH*rV8Nnsbwg}z11V+k3X$vynd?-|;>x<&=P#_TP(h$eCw6t|E1$~7-)x`=zuuh+;g zspc?taFC3lLGjbZ_mJ5m0Lh85gysm>4X0ZPjGr?5_C@)sJ`Tj$v)x|VXK{dIu+Ur36-UjIZ=|L|RmS1zb|=W4j0B=yKcB!VZkiz%A^C^ZmT1ESJqLj)z& z#$tgqaexy<3cY_{xvWnz(H|QfY15ooq>tj|u1S0o1c*dZ3>_KaYcQ{ni8a0C<{*(~ z>Qd6q{~$yE!t-DLTlR?m^~c=&YnXia_!k@)^iP<{V_>jq;vrrTehj`q1_AqtC|da1 z@7b9KuIIUk|i~z(S^xfMVXX|ByPEKOly#i;^exKe_cmbDr#&<@H z6R^r{il!&A9leL^r48fv@-;r_la1Kk>uzZL<~=g zwE&+g(R7h}us06;Qu7wv*uG}B2h0)bnpWBV0(_orcIsZYf+r9M^P{!1N)8hNd$f}? zY8T5Ct_U6-8G`H;BLdWVK8ey?w7dK?h*I)L^Lx)zfU@b%)jk>OmoKOL=J6lCXnsw} zX#C%kIgf=YI>owxxN-{P5O29p}4H|cdForEBdlwtvz$R~=`+NYC5UhN;$D%VW*^Y=yNxd4@OJv$84j|J0$3=LXmV#Aj+Vx8SdeZ3xDhpbG!blgsyI8oInuz0?*9amuS z_eG^(tNEo(jtH?$m3b_Rkpiwu_L=l696>m>$%uX4-?O5LXw_b>bYR{B?-hK6) z)rU5bJVlEh`1y7Gmdo>k(NrM!+=^KUgHs3ycAOuzl$^Ijx;YG@pZCf)cD^iQXo!(5 z7n9hs+fAq6rPKeY-${|R{IhSqOgpx~L1b<3*J;O^)&J+=NJ1Mo!?#mOsPLsUxLzY; z1zOSDU^2xY76*G%etoVXxfO-r~|9OU1fm;eGby0_9T!PgU`s*i|Z>mjsGz!u>f zM4hYVe9WBp(TKkYiBJcpQ#p-}ews#@qaXKdqHve~QB+inD;WRyw7lQndx}w<1Bs-C zv!(Rur1pW=yrw0Ucut7vluE=kqR4H#_bji?uSqdFmmGk>S8APz*6dk}R)HSKxvTU- zWU=nkhrmuZ=Z6&KWM!ozr zYGNyRtO@_rgQmlnlJa=4cc|iVm`9JYUyt%P#devYK^H`Auo0c#hkV=S6^BB%BIa7S zwfFHIGtk4gLk{TASa<;E)tL~B3enM6nhbP;uEa@rV*XKj{^zs~yu0uVIY$haMz?M^)}T|0fEo?qj~q2Z zv}MdDR^=ZQCu2PQBAtt}1#>4`Y3;W}yJ5s`G>QHyRw*RPU- zUe#C%s_ zYvmEfT~N~4KS76c zRP0!@5a|TGTc7jQ)Wn3)laEc3PNXoAJ@!viYmV_oJ7EVmp(&mmo*_f49V|<6^&G~2 zBfG^BW~(NP(MAhLv?$ykr%lQ6D%j;q^~0{~DP*ptIhO7*x|f;hV_&!QiAdTrDd%#N zt5kFW6@bm6Q^{EgDe300nvS+ak1nSygT-D4!yt|pAr5j5`Zo=jr0Vkp zhsf`)L}ypGkIv!d?Rfb=3k?N2hj-E@q&XA?`_1c=qSS~d1Cwd-ulg(p1av2(OYt6Hi zW30U+&xwbSG=cS$4}G7Zn-xf6KF;`4CC0pq1)l*=0)4r6$ax>1ibQpoOLR6WDDz#p z#DqrmK!>d>q|xEPBK@f};(BlI=9%`p zMc{ZP#2nX2zruA%+8h;e@<^ob_YY<1i!26m1o{dXk40*p&US7hjv{p45ECzv zB1l*#iKH)HU??WaB9_Hs^#D`L6S0Nf0DD!3bKAyS0UisMbq^x^m;J#3AMKo*_d z^Uz~8-o`~v6G|zVsKa^EqyNQUiUW2M-KCLgF6oBxTJV6bfqjO!Oh`6y8w$xJ%09X~ zO^GEj0~@2ZZ-8hIck6XK-Hzf7(CDXxL|l13l%WLmvNJx$Q`AT!4VXzwArj$n7G`*adDM?h#|`*(M@ z4wiS(dJ*#HMA7MPz7yC4SkQi>O|YnEa#7JmpZfWATj>#K>SAg7l5e8w@#sutcVo|4 za+^QFJ&A*V*4R`$A$@0KiJ3!z@o8yeDx(>4nQ}Xh-}3($sPf_5v0-7SEfLd13?@yw zuxe6X#HyvO=UxkLIsIy(?CiVqb{)JkUohymd;VvX1ZSRoc*G=qx#e7yv`K5$%hZRg zya!Jor(djC{c3G3OIn=qq37D#RGxPsdqg$X&%3iDjvdtl>1orOIQT9oC()eyE+ZMB zL_*b(+8OqQPLETH5|Q(m4eNiD=BMv-51{K{)~s0(zg*SZmeA9yB`F)zTKQZCm9sJ; zfW5QOCR+SrIXO}P*4EaEOl6tv=14z541v;{A7}LiKl3_qAYIgWU52`7BJ4UQ))pe?_+qY227K@jpK~YzB!m|%X%-WT&=TZ%a;5$ z*#G8j+qP{0jY@B@J1X-(Z9Q?m%v)-0zw!6YIC=vSK*S$Sbx&+6*G!X8$ws0i9RxEH z7C$^vSU$wX`LMb9`P)r=Xy;pM(v<;#%!rgo{n)nea3w9Aael4GV|rL&|M8aM;w(Qu3Ut>j2beEkc4&j&w{&ZfIHltc zu0!w%RGH?ZALw@#6oihoEOP#mEnpC-wi)hNsGb}1U17nRcmP}2!Fr;g0E)TId-nX& z*w_fS?r#jAp>;2(=Z31ewiCdyfjZ;hr`ww^pWB9Z0nVh~HV_w7Lqo&cj-a~(CPN-Y z)mG~>A3a*(=;S1DQ`4)@*m}zqY3-=?_V(so5_CF~JgXxPFj#%^iw*^fVMTKo^VW{v zq0mGpCPX$~kWDy%>Y%;i>Ec1A9j!PdMBs(>yH}GnyoFSoT>309CJWg2$|pC-cv5QgLjU1PG*o4xNRI7cW+;U%xAF zNj-T~0UcjoE!^JTww>*g((fFz4ON$cWgn zY?h|Qo;{n5jpst$ynFxt(#~^@xu~-?p_gc1rf08kY8JI+*kR^|mPNZwP4iF#=u${G z#uk=2&W^%nxCqVYxf9!9;?y}s$A;w1(yj&vzk>iiEgRy|^&Qbw$+mh24=w~SyN&xH zLuR~k#dQy1urI933GuXl`BcYBeQo%PdVu3c?0F`P#HmY z8~Wu|tWawUH|)9_8;dir))H;^yAu8G#URC)dl$El48{Y;F3{A}v>SpeOxhogthcuF zCr!AmC<$j~}87o;4|nI9HEZ@?*r*oh9eqPy&e)jWX5PSND_VZ| zInB9c!-*3skgyKHLxxNha{9C&=5D^*MCXn3C6tp}9CnkYBXTUCarrj7yws`R(k9Y5`@<*pU|G$>}Ch+3N$K}hX#w_{qb=pCS+>ejjeiAzNiGTBdnUGzwJjjb5 zm`pa{{SrmRpevH zWh+-|SS`N*cs9OTS5S~=E|*nhdbyqHU$%Vt`N}aYhM%TPNyVWpNEUb9IJLkc!QI{6 zFMaGE+aVxo#i;U}DgGEZ_hVlEHWj}DD? zUeA3iW`KRln!KeXoL4@36)=s{m5>`ZcA1!bWcv0g;t26>0eHYrV~1o?M73%nv88ES8w&)LgU>wgtg#P#BdN9!~jcFglAQW_16Ax-sVV?bB&# zYFK(`E1Q7QNXY89YP2)2y|(o%3PS;Zq=xC|H~qe8(SAIH{yZ|(dMXk}QOx{mWQ0b= z9CX6n)bdd~sdj*wmuJ1JAPXlxRO5h=U-#}s7c~{*r^n zXDnVV0oH;5;KW_KcfUbDf{ORRN$1^fVE2hczOF?ZCpij#>1DF4ca`vWS5gsRhZ6w3C)h zG>^>nhq~Sp(T3X!6oy7t&%!)^8p}yZNlEc*63ACY=TFQ=d52O&*euO? z;m?zb?(5G-3rs$U9f4&lR(z`)8+8k6B_U&51c@`drr5HQMO7qUya!V@=?how(^Kf_ zQ8;i_$=wb~FuTPiOm@YJFjnbJ5=+^Ik@Gb|!o%nLj1ZsIEzd;8;EA=53z1+MxgTg|yS8(@4|Hn!Z1M=9=IhrV$0o2E&s zy|oDm3fhRiQws2p?d=-d&&V(W%^;#*^oifQf4>`RQhK0H`)3j*le9?ayt@}@NyVjg zmbBmSYGklkz-V^WDi9gNrO*Ko`m|NVhAjb<=xKIr`M>Ly5VCI^+0BW1JX5rN!SV_^s0)fidJ209$Te z-eHjSpFe+&aMF^Ki+@#bVdHe`b7G2w9wLT-ibuC)wMlRI96=;#S-T;-nlyovxWh}^ znW=6gCdJCtCpTVfBbPlf*NPubcA&%GXQ;0c2X~1gG^6S~4Vz3iOlZ&CIOf>l9{4K} z>dTJjE9a5LT0LD!IvW0mOx!y;Y4UO$Y1Yf(dHp@?2CtrUC)A?v5%7Gl)F`Q8= z9P>%(#Y~r`%s?s4s&AgS8r|eQKdj3=IrQ!)N>z%zp|7uR{*ko+WxiVJrIuZ%zoB(T z;3SB{ocK~KSCXPBC`UgXW1Uple*E}y3exwsyKxR2v#hQ!2w<#ZEbRXoQzw#+98+%# zGAE*nB*mOKC8jk%QPK2LF6*A<;^H#dc0XoXqLlvH=Ugup4Z3Ku`yimFuD zpTN0KN}=&?I2HiXiq0Q$U} zs*X-)!_AvF7Y`O;1%Gkg;f;NBwDcxglJi9;;)oJq9l+d|={$XMB%+bd@k@dNM`I05S0U9ZOts;{d_MX3K zgnb9zNDJ;THqHe(@|qww9a~#Dul~+PQivOB_Raz*5&VMT8C^WOLYeP-hfaCu@iLNoHn zSr`m=o0y=Q`3W?(U6O-KM^$ij^?nMtskg{t4-*n58YH@8q6|ai70>~QoI7{!C5O@+U5BdvRT)C~-usuQ)+17B}CtXgVN+JGxeBxDYyr z>v4twqo_tJ4~=QOcM86*@E3#R18BX3dld)LXb}3PrQ+$~=WS9N?pI&G-hg%>CXT4k z$+;p4*9Rd{>(Q3CaL&}^Z_5hznwuBm6uhm-+rT+@?dur$D>LZmvl)n3qW!lJM?TSZ w?Rq&Ofd2_F?w^h&`8WFKz|?4F^vDFF(e(!2kdN diff --git a/docs/articles/AMR_files/figure-html/plot 4-1.png b/docs/articles/AMR_files/figure-html/plot 4-1.png index eb02d16b24b9b18a8122b795dec933c9c286b2af..b58a3e7406e671688e17ebed5e17fdae233a4fb5 100644 GIT binary patch delta 47339 zcmd43XINC()-_s+sm(c{Vk%TXK!S=$GFu>mWRRdDNCqWH-WX{S1PcL4f|9dj$tnVp za~2ShoFpfKZ)~N{Iq$jmeZKqi`m~KARkinCbIm#C7-KGXza@TtOWu7ET5)eMR>FNO zAuGO2$Z^pU+1&g4;;)OSG7$S6%y+E$oZhC99;D@Nb|mrg&cwdpw$J&yh!Ta90qvK4 zOZbjg?<(xL5vF+G^m5NcI_zLgtv-2x8yaCo(G| zop+twPn-VXD#3gG10_l^{zBBX{Pua(i$i)^-;P-!x)Rq0sS8Qw9Oy-rwbysv(` zP;Krllc1#xBhlZGsFZ3FwsF%YVhbZ9YuMZIF`tvhRGM)|QTZz_^{NDIY4Wq{Z~Ijz z={LT7{W|*Trb9J#+qYE;ojP@mUKOL3Rp7UTp80E7jJ8GCWkp?_#AD;f3Ua+4_7oiR8~Ln%qili^VhFmM@q^ECv-nPSlZK&7%@HCt$xz>%$Wy)JUcn2 zXKmS)-%HX*%g(Or&fRG!qoozPYpwnM{riimKj!4*9OKW;Nm#d}NM6-KBPeBw=$i!n z#+udHYqHD2Wh1D*f6bRB-OAsnU-$0*#$A-(zdmHSyp-L?%PVu>f@9g=#D)VuMy6i+ z`NiNSyZe({YTlf+Pq3Y})X>!I@x1+-E4w8!@(4|;^tB+{*u+$)pBSCV`sYW{8+Xji zk}~I}b(@S!1!WB^>#$@rZuzE{9v;1uLv0SvpUc^=-F+m6YxP-SeiPHrT8;R^e0{ zW5)X%bw|6(8?uP3tsKgshFP<6OP4Nnc>45(iRO9zyyv?gMo-Ml78DdnMaV@x(Al#5 z7Z%xt8Wb4VRV}ZU=<~3&)3vf&1|deJO-)VF1OM7|Q0C;|rbAaQNtL~lGq&zetfl%Y z-q*waxhQo$>@S*9vVm_P@r|*jQ+kuS^5q#iePc?K!TIy&J=uIpw;uK!9`T$1DzKH2 zFDn|kJGg_!K?!qU>(FzFE6yUp8Jj~ppF zlD3#4V$)%k)_yl7Jh4>dWc)MoPo^9KF^ec`&Z}6eGK5;K@Gl)ElCx&T6%`dNe+}hT zr<(S%Hj+VF?0rI>MteFXeKPy#C~hym+a%m#q~mnI#A^W-7V~5Jb~m<9k5)=B%PuM3 zmb#(o@r!xqs? zmn4;yze+q`_a~HjmsQyb6=vGZnEd#%!OhLhH`%welShmT`Ranyd6gU4M|sVEeiIGa zzWBzF-696ovGy@bb}@}#FMUtl6Q#F1=!ESjM$OWiQu~t{i>4HcxgwS3HG;-<7?A9{z z6HT|6;=R-+hXzNLtUMH4xS5ih1u1AF4yNVW%`KgL2)`Y zN;N}iFl#+RdOPjiJ%qUCXfJg%wgYl?C4niYaf&Wdxbb+PJh(I-ubo|jV6(#MFoU;cOZ${Fib zhr3}z#>K@QVfZ>qKNIW@cv3V{3GE9G_|L zQQ)#MNZCwNiq~|aYS+EH(GmOZ-O(xQOjdb5`$vzuQhTGN5qa$v3k$)uA93^HK7(nS zYro1t!rwAiHAbGEpi|9?)Las|rhmwsOo`DdX>uurQxBG|qRQ%>F*g(Oc6AMSylPud ztNk9in>XKD2yk+i{+j8jjwp_04)gaH8R;yo?W>PJrc)K_ezZG&CfAvzh~t2=>R`sU3WQE_p%ytcnm?fV;($-L`z!tnK< zd!+cZ9t{tlDf@f3fVm{Oc$w2ZY`%PV&Ro5EwWmD5{>hr1!Q`HczFSNnclgbX9@;Hr zO_sXqHfLduu>I#=pSl-4kU3+}WINL@`&>~$Ar$Map`k%mINXtgvvVzKHLIK3BydB5 zUOl(CC--^VEVagDL-}Nbrd!*eG$d#TcpIeBxVX5s30$NVl$6x$G)#Z<;KAatfu?I~ z?avMk4W)K?5xU`D`HWgJZOFT!ns!&5e{!Si$xefJ%1c#|9ki^nT4L@sTUceGgDjE`X$7-$_b|==Vu4?ei3=O?xm^l?p-m2-qS4I7Xgcr5F)n8s5 zaC32y3>%-wd8d?ObMn)tPn&n_2n(!@NW4a=K5Ri4OX*823f-nG=I2`29$q69HRort z&s>$kX=w#G-y(~5+W@%MhI0Ub#-YWxrPM>1}23_>6<%O3#aGxY)flV z$GUo$>@MwHl~+rjwvS;RTQwLvZ9h?$lUDWnk!>kkxE|N1UpVC+RgEv9)E(+Jr8!L2 z`aKC2*O&NkVa=W7PR;r0%Js6g&di2a!hOSJ4m95w6FX~buib5&D9F$_lpY;3sUwy3 zlPQAGnHQ96nh(+aGWag{XZkXuZiPkhAG;SV`hAb*FX0Uha7W$U-J%i_wf7m8{}{70 z&DkQaHTknO65b+2rB!bxHaQnUvym?co~#7K_f^8I#|i_0&XpcNBYvutmQ=Lq6m4lU{WCTXFB> z+T9gFjQl2{$mI{C=c{9EgDOKLdWpGCqAHM9EXR7%q|1dGX4sOMr~CJ+ zaClsKEfDtT(Idune$3jn(JJ)7$w~9Z+&Z!ncNeh5B>d-1toCmKvZqxT5;NC~t4C7s zo_M4OX{ar$2>yxLi54;Xh3C606i1G(J_~fp%Fdn<+6xGOkOoAU897wiIZ`U@K~2=H zElK*1ryRHBqNZjrHB2#Hvr|9$RzBUI==||Rt2y0bc*>d{C>tTC4On71RxQ6}#|{?f zyZ~Zu#IGU6IK&J2Q?uBs8`XrsC)D6;brwOOYR6|G&7eedmz)}u!F{>m8NU{^>cLO2 zvawZGg-M$hAFExW(l%sn^8NE)ri0B*yEuVS>+9>ueQ?2u+G91|SAM`*;O%lIbCG}xPAmEEVg2>%--wsBNND#r8P`F?I>63x#cn&n`|1n=D+ zmjoxi8h1GK#bi#4IunB9uK=P$>f>*F*ZQE)NS)vD;?!Vz-F z*BzP^x|mM3fln*Wy%DRPDO#alTuB(-(us6(h-&{G||hKSL;~)n!F>3`l$%DP3x%$ zdPZeoXJ$#)`Ws{sr>v~3;hRNbloCbhqcbhUeDf~h^^OyREiHNz|J8CY8RJ59L;=o- zd2q-Axui_<1G=nk?=12R;8M>e;~IOlI=)mWLccMIMNqKGT3qKQkd>dWFFUQLHpVZ~ zdaB)n{-E%s9>PvrTN@Q@l}=-vhS*ql01(4&z=H z!=_YOsq^eQ5nJlWhkWJA^Sj2z#S}~AM0(((M@s~UK5sf*yM{@i?$=CxUfR9EXe9P6 zn>R0Ud&g%v8Y(o?$D?9geC%`{!^oN?oj^3JwjPm03aJi}*i&eA8BK_)>g(a*;mtdD zvH_X^5Q>JckRwXhN*vg~pBK@HM=1Uuy}8^@F2*NsGOQ-T@eduHf8W@y>7QjaG2l;8 z3s05=cMSP@U@lE*3N?C60=drITpz_VY! zDz^iH{%p-gAIlxH1NEvtIz3%E&v}o$iAe&#N!Rsyj~m@33QBE%1TM?r&<1ZaS<8$ zkkjr{a)5PGX!4f2SuCI&M%QIKMf{4EPwiyQ=psOYcwTpf$w;Vb3M3j$%;v z+Zk=vQ$?%rtZqcx*aO0&_!U>SvI_8c-Tf`O_x-M9jyLGiS>^W1lifSLX!t;HO_VEj zcGx2;a@Z@r`ZJg*A`|ok-WT}Voz3(4Z$fRVlrUggwPua1pO8($?NTP%mY92@q7G70 zQk$8Wq5}h|PJ4ti3%Jy*`j3s+ukGYseHIjn@X5hdV8z0L5#+BC6iStQMTJyK(|}HI z=}|}ji~}4`kTkIa6MsjB|C>;;QeBFv1o3dC|NMAzmgmkY77aX_0L5zeOcb1U+)7(#c;Vu-kRP@3{ zx@(yP4%1}ay;0Clne|DUo4-F<3#=(dkIooZDy&Xuu^w@v%CgRu5lQ;jXcev5_Qjcg zV9Cy(JEt}LBmcBM!<&hBH?pa+kDC9G0hisfq+Z4bfWH|D?%*k!TTATX+Z%Rww%g9p zaW&2DZ25=Whxga4=HccBB^Gj#$s(}gAm#pXl1ik`PPRGIH*bFJr#nA4OAkyNNEKUa zpPhd2;KAIx2VRruAGqcDsev-U2h{*{KrI(KY;C9w;$yA|N0Y!-RugR9YaN!Aw zBolSEm~eoG0(w=HlMBA>XG6$=RjHAcSCI|#6FJ(98tp%|v`6fk;(xLeo4~u)+v38J zxjHhce{A2@AoQ+2pnBOO1U^5KujP23_PDpFXBZ%j_f9_1EkS3VtlJZP$j@3zJ=gI? zAgjFa0^oJJihw^P?nR|3WmqOQ6U6+iKcmh6D?4$zcDdZ%yxd%`yv3(tl-zU>%Y`1C z9x@w5mYWMO#S3J|s^_t)-0P`g2?`F@nfo<$I!FjPlvy#xi-Uv19W5ld0=CEBut<>% zv%f}4Be2!i368pG>~I!2%5-?9JY1HIz^VX_Db^gC8%P^WK#T~ERY`Z~^vFdig`vJ` z`u4_y--}YqQU!OX+28HO*mkpFx!mPz)hf#1EdqHoM5!!Cj$9VMC++s?Rp>TV^EXn0-$m-u z|4oTM&S9LYEC7>f+UFmA)mY}W_ zx;CgiU-Hexzr|JWIe`CVAHR85<86zT55KOZl)e8+q^^?pz#n^F zFOz)`5dG!L7Z(#v>CavuG$V0W+VRcT(-&RTX-Z85$_eb5w+_`WFE2-{B8_O#mk4Sg z`(O0loMu^hH*enL=;nW2yX`r8?saNnJ=>bq$JPzTKD!r2mV$L`t~VslNbe6!Iz;(! zVV;w=fxchIis`tPbmOLXS1+SWURFFe7P9ZVpxiv(^|rf^d?U|0m5SbtYT`WyGQFxe z(ck+uSdk5RTu{rCUu$(&<9$7zZ*jf{cbnt z~6h{Y!HA4ILI1w790_KB4(mX zYN5=KzqB0B=vXZdwM91WEb*lW9@lSBNXjoPtYlax;18Bu{I!5$)-+Ka^TUWwMnT~) zWGoQSYU2W#^K(|f_=v-{xS4QKTiZ-XFCe@KOmXG?2t3@l1eHr2QEJ6EhQN-Izr#B@O2(4B$b8~m)VyYz7d@n;h}0tW51S^ z9%&mnkjAgJ>d(ddgIhGPTl`TQixgx`hMrusa@fzGM(ir7GDx?lJAvZaXsN>mY@Ak1 zJ9g}#2fljss&F8J6|JUDZFG~ygt}=<^_0?|x1%_1SY*PmdBv5PvEJKEJgd(_eW<`L zjJZPi@^{A&vk~BN*i>dnWu`*IJ{23i#danN6v7rJCR;_D>Lqxx(f@j~k>qWEC}=~E zPow9xm4DB9hQ!VRaj@r&JrljMJJJLcdL`Ay1@ zbE*Jl3I8Or{!!QL;*)%G<1pGDU=pMPfH$9m;$DGB9{H_CGK`&on+?$C@J}zjy(6&X zU`MZd9li13%$XAF0tj3HTW6s-)PhIlw1}3QP^s2!9Woz+qUTyo+lf=fJ}0FS3C9`<{5U-j>AG8Zu1&Z|d;>EJ)W%YQ5yvFM zmguRGPVYPvz`J+jKyx3nA*M}6%pogkmiUB`xv)M?Uw)pF>s)rG4WG1p zHzzten~A0n6rb+t-k5d#C;q2=8wrk_wq@sT(JjY9mP1Obj*yQ4KEcP5{r%|oXPi3t z@KjJ_RjH=Bv|5xAqY5a~&tu_U0k53-as1D?Xu+MMUZ7;;6o1S8c`xN)~j|eOf_f z;QgsIWcswo6s4x*>e$bp&p|;wEeL#4W#}(B_Ll5SfXwZ96c#mou!b~FXDyI?WN+Ua z7V=sO65#0I{M;ZaR71K&{9J#_Trqi(UxUSWjwt-6Y&utjsZ0Xq?{IyZ_H>u8OZZyFsLXo98Y|!%YXNHB;i8U{^GLFy-l>j z&~{`eI48x|z0DbE7W38nsMOEOt!qe~aL7E|bj!<@!Q`*K-_N{+kTzjIwe1;T^grFj zIwYZZ{l?>H`|i!7>j||Oxz<4sgn+;bdYjBip;rS~mnM+#tFTa7PfxEbg@8gz4}@Zw zG2Ij4t`6qw4}bJ;klCm|I$VJ$F>LAT> zx;x}yfh_UWYA~Y!WxBCn4$42;od$nh2_L?FG{)n4uYRjB_(3}BrzR1tU($=c_degw z^|s*n%*3EP@WT!fu`L?Mg{Hd>KvB8^aNBVwxiM-Bo7~}j`%aT(U<9>gQlq%KCo}4~ zesj8_gz#)apo44`RC!4}gX$E*_%_HYSzrNV_Ya&-s_Ja#x>Dpt{P+)pukgQtL)dl>{+qmQ7%^RxU=u>AIm;98AmC^ zp5f6f!V^C3ymUHRXZcq!JqVJfyM^p@BCx3FGD`hPt&xw&JUZa;Er;_D9n&n@4%SCl ztO8^sGYtyT?|dUPQHP>cJQQ-pS1F8X3~U`fGchS#cFmtl;*}$pcrRZ+oFVN~b#)40 z*e=mu6LS_*v$iA3dwG#55-pBUspsIN2nzgGokuJ>dGch#`#S;1IJyQs^5}AY;{_0t zirtLB9Ay2UpYog6R^7C9>p{QL+b1tvXR1}X=lk~U+i;&hn^I^(!M`Rz_MPGOCtxL@ zs@X03b3I1Ou%qI@lF&Y~JuV$1Sw^}Hpdgwx><=yL1w0)fHRZ5$)z(Ylb#;S%ZaKIj zrT0c}m~1C+pk#aHG3*>|x|6qC^vadB4J^$dStW>RSKATqmab0W`4o$EWWkkSA9QrW z1(+ntCZWvL4z=YS1CKfKs<54o$VM;xP;Qr6pK{bdV~+x$NxKo>%NH*;R1Ff~M#q}1 z2E#5oGtmQ)5|uJL{#?6=`uR0o%RaRYg}!?y2^A03Eiz8U+BzLtKrpB@!TDb!sXgHl zMP+q5j}5URqtFo!A3G+yPT;4V<-`Cx9v%Ql#;@T*2N2*ozd6R#q1>G$BTv=~d{;7_ z&@3iZI`E016<3l-t@Fy28gIkQFcjhl^g5_bPU)&KkQ+#DbotWa`%YU+eFt+&es8JA zNXC!1sgf=j6BM%^$cd6rfPoxhV9Yqo$teMnB8*&r2=$i$YeI*|mjAgu#!dEDWj`v5 zP>vmZcmI~@Utld)OwX%HC62G6h=?1r+g$lAnK?dvniAOCXQ_H9Lp7>tF@-~VSToZ( zRl&5|VvYa6n1C|%Q{{KOUL#H>Z#?3Z8kzN~D<>=DKf zLF)f0IFh2{eqtZq_tIec$a9eGobPAjGzvHG*<;x9Xf6k38nS~d85&=WOY4PHWl=Ru z8}*Y}4j#Nf@)gWucUUH*cDF5b1Wr2^ne29X@nWA}>AjErKpNNE^hypNKI{Ul>ay>w z&aL$DADx}3{-pNr@ii~#tC*=Hv4F^VHJ6knLOh4*OpHE?uDP(=q-NN$gzq0YEs@_D z5@!Z{G&=Qh?aUMZkB??&V`Zh^*bXjV%y*?9v*$;1@s~4ver08n0M7$))9+teg+0IX zhpx2CbrfHrs|eDWpjPK|uY)M$Digc$eWvcEiG{nV+7@XStpNhqjSBL-lRm>|J^3z4 zul{XZ95>0&qDNvprt|XP*1%%R&V#m&4rrw)^wb>b-$PaJ;AMU*-aBSj~PInz2d|727U#(hF9+( zBGCiU2Cy=8kx>{L`epblER+u(z+WTz2FgzL^jW2tTC4n8sCCM47E~YKM){Y@vtFc@ zc#Bf%NeElXM!SIt@&8$WbT!Gg&=b&uj}5j6ht9(PRg^XJpYBJ9Nyke`S{Z&Lh^5{R z&z=>xfs=NjqLz0(J@k5o(i(m#|Il%t#8Kr|C+{hfl4BJpgCm3bD2DXU!H@qGg%64={B_HJi=U(; z3o=yFv(%dZ-IM5l6pt~ATp@tDhl?BS;8PU+*wg7paL`ic2~t`4^pCRgsxvM=er&8( zt@pLnz>CW61RrDcUCb<6?UL7hpx2iT*GdXQl%m~!(B$=gTg07G_x~N}PjJv6dhrTt zc7jVXO`Lm_OmjUbYYX#dsD!nUnj3Q@M`9N7VV=g(t^@>3k&*k&N--_&QX0i2h=nW6 zTE(6@dzKWtjF%2!my*gkP&_Is8w(2!OpgbZ#IzNjsRhD0{bmv1&0oBDf#&LL(1`G_ zpAV@^mwuR^%oC>4SXfv{&7OT`Y|8pBzb~n)2Rc+2DJl|*Ixu=E#!TrU%&>%72Ehts zoJCXnzotlon>`V8(z~)7Cbm<9dBfcye$m6qwzjsCg1v=Mm4Xp6I=$;Cb`9un4tf;I zM%k$9>~Mlg0@JWuqriVkiU_v19}2$K)zyim+Ja;xeOL(wL=!*W$14wMMJ`g|4KzVy zhbur=bXL*p%76b`-;m9}pIUuCZVwDekW1WTHk?!I%4PV?dpJSB8n(VZ@&S^E_k_ko zhJq8Dtlr!0D_p#f>xV<23x)XA^ED+t)vP~U_*d&Xe)FIH(eJ-Itn%9SCpA(?7+<>) z$ni;7r-9bJH?E3$Oa!dGRMIi!o|P#D&lN->65^%Kjsxu?X}ic=<^CiJ7M}D;s!E+d zxjy?Swfn7Eh9KUas{O%kk$We@NEZ}aYBy;iB=GSzOEY zvL1s!u}!IX9P&7nw7Wv$B8HWsiUj@sVDI{`lUKr5#KJxBF9u%b>bjHbS1f(vVRd?3uX?2yoahv|P zY_Py0@;#)ax-XHNN9L9TuQiu1e1BXjC%hZL0761R+t8A+w0|?yfB`y_b2Eb;h3zYQ z0>FO$ht==Zzi4&>JbQII)clO!M#j^5+m0yg4ZFGNQ@s3X(i7AA>9OTxt36nLEhe&w zD=n1=1;c)ixR;`gdfn5Q9COn7cb0&#O)?6Oj*k9Tr);JZfaL{2jh>~CvFiR=cz>>d zWhU%@MaH?Y_MD!72`z18kodnN?P&O(qL6_j;0MfrvxW3Hz(ED$Bb&aRd0!nD&5fbM zPUNT6z(G6sIx4W*Z}Fp~6SAi%Eg7Kwdt2Msa3QBWtM>~Jk3+Q6ZxX5nN>ohsu!#t# zosdQ$V4Nmd1&9<8I}P5SCQXYiSy?0`N>3NCLE~*XH`NI>Zog?)*~hyA3-=RyXS?i{ z{-u)Ykp&LQ&rxd6U%0^9J*LyY^~2Ij3+(*nf3fr6UByzLgXQ35`sFw9{g2O&!G7Z| z*Bb@Cx18onn{DhbUX8ZdHLq{Ebfeea6_+-w-~95Rzn$IY)8U){y0k&SK`QXeo30^> zl=IT{O9EHy+q*k(#RI#|+M=$k4@|o6yF8-y4a{6@j(nuY>e**7X&cS9?FKxA1HSpL zr>q8xcwBu`gb9H_RBtFSV7SGuB^#KU@EIMoWtwYk{YUw+>)VUnLBEx#w0qZIK8u9c z4ZUBy&}kdpBn`R{P*!d|($yuY{G>e3(U@+gylA2A6`*o*a%M-HBq|(1xdbm0xo`IN z#S44ltENv3cYdrkTFMI^>-Vn@>o@x^DDIReM-@}H?lO9>TN|yRLo_!xuUx(QB^4S7 z3yccVGxw-__Uu`@WJwp?i1j^k?*9IJQ_|AJ3V!)5zqo4cS~)nr!AkGmEgF2oF@-7j zl`fa1V><-BvyCreDxbG7N897~W3CR%?dshgM7eeUrP$cml`B@bP|2JE{C|_)j^04( z&6&p}Ah3b;Q7O$V3J@<0iG&qRx=N}EBF7`D6zHYLRYE9Mu;>b1Kv0mGhD20}RP9S$ z`z+@zI#Vs+NzxPXHXuMY*+Av-qerCKC8>YU*WA3ki*%Ep#JAIK94bnOu1ruf3MrJm z6xzAdGCpOfyZ&HjyI`til?wd(iZ6c<;J+9hJOMMFDQN*EZ9$-I0`2T5B!&YgF86dJ zGk3b5y@g=6pr!|>S`8e}iRME$XR+;vM@MDQ+g68OJwUownZ?|TB{57VYgAT8&D0?MRGA3Kw&8b98Eay-#SFXN3^88*3FV9r7Gbj+a_f=*39KZu^%P zX9*I>dva??IoiPe6t0q%q_6TRGg2-hs!5HQ4T1}y7k=aPqK>dA%4a3-y4YZB^NNP2wmp}n;+Xnj=afuz|V z-B!_0TkdJg3dn-1v>vECA%YKnKo9kkqYGlsSpG&IdJv`-^=`&H8(AWNP=dk@J5yC)x`=Dy#2_;zdE2T)0Hfb>3r`?3912LSD^=nZ=fo4#BEX|8`ZWv}OQhA=%!# zPmYA8MT^{DoHVF@^JYc$AoMl;7WpWpWA$c;ocGo?Hq5iqb~cjm1C7?HI|rqf0*j_H zr+17Jo2Rch*5^71y6zqxb|`98mbrqCT_^8S8#(R`d@b-k z5ku83e|z4nar@ZF%lgA23!p@CuUe*cesmhaYX2iR?@|f&J#$WJVPA*4bxP?i?l9Zg zX*!)VI#^@wHjPy^-JEdf?X3zsKx@F`O`UM{j5)-PPymN%0;6bubH+6^kiMijHErdo zc!elA(k4l-O1Bu1X*{7(_@P z75mv#OaI<*fEQ8UI8Q=zlDE|;czG4w0J&2LEnwy(79Q@iXNDA|!XLw)?%+VDqP*3q z82*p-egAGFvnY_@SyC2@Gv>IR1O%};=BAKwha)xY%;S~a1C3p^@x;9CwV@Q)v>ACc z9h)Ma4sve4{bc4@iF~v&Epe8Vky&yq!c`V6)!MsrdZd&P)*oST<5W|H6Ux-+oM$JT z1-OE{lfTY;>O;%KK6Iy&OwZcq2aR!$!c~V_O1i)iHN>jhQ*&QMz*bp_@egLMT;-3m z>U|j6yNYzaYu5{|FSXJ3*8NHgUzpsi`&o5rBE!zwudOek$-T#pb68hST!VckaI&tV zu&b5_d+yfe;`nc$h}H)vi>5ANaib9QUq5Xv(g$-&(N=$TC1hzOCsV zIK`vpoS|+;`bUT4iLHm^t&b{;RQ!m!6aj%gkK2Pp=uND7 zW#YQquD{f&3)P8F`P1^&69!+)U^1ac##{|}vU2m`y);GvbECLf>!F-&sg`5m*h?st zlagGd-*jNhC)6s^6c9Mc=7?B-F_1~{w2cLt6uq|WVWCw33AkpQx`9DNcoQ$1wS@V) z{=i?(O8we=kaX`g9pCya$85E3b$Ad6m*5oQ_PKv{fzi#0mYf%-?im1z^+Iz`(ij*R z_%jd%`Uk-K-rKibxKeU_1{8}LJ;8eF?$q=&AtZAdf>gNVn+HhyobmN~jS>J~yu_R} ztpfBpJ>$~}X3rr@DSl0ObKN!z3zlTfjd3<^z6OG%5^};Av}Ijrj4Ri!b*K6YS{=`K zDDeMl&Wn(>-iZqX!kP|!KcA>mEeg~DJAn5mOn^%DSJq$sM;P%@Ad3Mm ztoaEB=>%*n((3%39EN}XeAj;nZXr6aX^%{Gw92XMS>e83TK6kdk*l-QW3E)vc|fGxZKwY!tD+tp zq(rBMSp#x7liCd-4c6iKEjiM?!p9hvtuDhim}%Kh)=0ygt-U@Qpi;LNtjCY*SDiiVGP^o}Tmeg-ZM9HfB{v8IOLMB>> zmgA3ev-=JO#2h*;ny2?`a)>k%$Cnr61ZR6c z(H~_!H5`;O|FR?v^$ob88ctl&wgWg=3H}Gp=s+YP(!8uw5%?5$gTgi|HDggA`mf@w z_X*bxzDXK`U#nZ>uV42kJsRFCvsYZmd=0Ecx+C(VB@S;6;axYDeOM;cg>?0SIoVl3 zWX1ba*4#R~Xwf3FE>oFj0u}f?uzvZCjg93u_Bt(QV9-}T()w|ekpT#8H)m((fNT*) zK-abxU(}Hl&SsjiFMM$p&0O~L=ViIuDO-2`0Z?|8NU_4QZ_oXOyta7t%9VGG&KWIT zo3@xAb%pdjD-+5-qV7k+P+0j`H~)DN#ct78$G%^=PCFSfdd!Ne)tUkhZtv_20TD0f z#wsg?^@m-8lLRVXj22!+QT+0bg^#pj;zsJ`{N8y3fwJ8$@i9w=F7c)&T1EF9-#?#l zMDxp*G7RE`6UZCXFwo9kCyj#vyTub1WNxV-QEgN@dLZU9c5c|X@cO;ac5pAf zhy@#~BqW5r&k{tOHZrky3bJ&QF{Qf7@`V5%=oHc>~GCWS^5-Poq(>fHIo#p0UrC*#j9j&p+8 zhmP#B@cgg%KiIo4{6;qMBwQ&m9IXU>90O6q0ET)BA6Iw82alwhvO^N$6uQ@pR3ytDAB zeQIf2hZA-8l3$KdF7gCYc4Irh&ZT(7{alt2X`Q~2{Ui(wGl`$x>Lc9)a{m|{j6s6C zWp+s<$*A?y(u|pbw73&`g>Gyii21^%rlzDm)T|z?37tqnGkX=)ihg7d1bDKq>Ka&5 zcdw&p2X<}YK#EHs`3ZO13!b{OtEMZU>!c->A}MOaUY#^=JjX3>>74cXmGL8VMsR-f zi|Y#t3hGOn(;QUke+ntVI-50^ZBzD+*4kHR!L<30KwCkaF%WY<1UKcq146H zlRjBR9;c z2KfrU94|5BP!XK#dt}}31<-Wgy8r8!T8fX;zKNsw3>qEN&hhgOxPU zYt!|GW=ExIQs817SNvsUfu*kkMJ^L?VGYSEtE#GUdtNT^m$iKy%Us@^w-#(p6b}lu^)jHM40M$6|f_L`KeCR2oZ*~abF(@JA zIR5bXxH}3L5+d+b7%G7n9i7ojtu)~12n^9_^XLBSarjiD61>3!BRwV1%Ow(?b7`jI zk%SZ2JJa7Du1i1zC({^mZi8xh~^$iB1d&6`Wj7-XT+z`7))&EbfV7n=#?P3SmOGAw05 zmt3yRa->w1C9si&OhWQ6R%mkF-qO>WQe2V0r@>v3s)}q=gKXaa;(?v z)!iXwH$FOAh0(H?Ck$1|v_1aRBP%Pb--D2O0Cd>c@euywn{U7K+L>c{(J#7FQOe5< zydPb2-MBFwKl*%0%S)7{d=0LwXx<_6pU4i2t;`kP-7LZ%Csk!e0kd z|13$xU-<5h#dh`#-9GWVxRo${seOJibJ;h&)t(GW4usJMtYRVzB!K=B&X~Q!b~*?X z{O3jH=An>$7*E~}1VUDq;jjK?P9cMc~Ky~wdb z!-*sN)EJDGJ=x+PH2M85Xk!_G&|8h?E?nRaS?A*LC~d`qhYwx#+j@K1ApIU4!pwOO zg0bdAi**1wS|$1B3@NsNMcU6Yx6Zz-tZcL28K;DJr6`hG8y{$j5U?1gTAuYjx_l0n z$xVXH(?y;<)8mbV;W5%DzDHQ7y#H_P7uV*t(pSbDe~nN?=LK$mKkdlX>H6Z%j~?~X z>NY~gCB}E#R72v67?sL^S20dFN2axFJ@=8LN6X6hecNzdYY{*DVIhVvvB|a~Jn!lx zCZ?zMra0Jz4Ay#mG&U{asB%fRF)C@n$o?4VBbt7nz47Mka@la1?tK9Sukw4N(_oY; zah``v;H3>tjK^5Zr^x1+8ir?#G1Dj%17;d%qgwC_W0<;)z}_WC{}(S_tk-yFj{Bme zv#@$eijRPW6yV2I*yA^;Y%vwieKnH*Pgn`B{8C%uWZmCDAk%eUEvlu&z0O`$Mv?L` zx+ZOIZXTzVEg(@451X^nc()UAI73(ucQbsS$TH;*K~u#CCm8}T$tuP;?zKYMKZ z@cJ_-5uTTWSKBPQQ~+{U>K8jrGrk^MxUs%sTEv<3Rsk8kb4o)IW;=ZN5(KAe2Vx7` zC~R9>MN&>0CBRTmV$Og=fQXBREW@-JUk-40V1q;33v<;Lh`yP8P z_c3nn=gKyHDVD$Li49ZyR{PXWaSkW;;;|mHi@bel5kKZoF!lIu1}Ae^7yF))haFx9 zVWdB@sJ+xr4V2;W{k!&FyYzmk{?PXvS`B#&2pZ(!p`oj2-=zBT&|%;(l%yXvS<5?r zicXGB%`JZ(axO`%W@=hWt(D@ zT;mV{!N*lUZ@aPTjvW`Hg~pZt6ls##cxK%{{jU^Hn)pbnY9a!yD&S)|x*1UO+~nn< zDN41TioOgZw1SqwGGe-|R4ABQn_A!7)YO)_r^tgfpz%Iv$qqVC>|7`DY>J$;Ha3o1$M%t>!7|25}k9Yt6 zGvrAdc$ON;Q2-aDnI9b@bK{;)&Ngn#UptJSk74tZ50vaOaf-sro7Zw*si%`OlHX%& zMa}n?Km7L{EShRKhIF}Us$uFyjMKIa8|FoX<*irT(7Cr_k>^M4l|&iX%&X`a$w3SN zl#BKZd;m`dWY;o{v4$-hHoSrA(}N>EDtSr;Tzitpaa@3XQqD>1jZsc{i-uYon}}7? z-|ozrGcxEvnAThRAsIm&+$XM&EgS(-t#QuqxOXD-Skk?KSwwK@Qejd-1kOX#C)t5| z;bohQ=9sQrAot51@@z3ujUt^fta6dBbgXg}YQze6DzT`yeW}iS9g#QK^C$c)kw~4b z^#xXzi4^z*Q`mD#J2&mx6$uvN6#qg)xmR|x|NWOcxR;w;ASv();fD(j0Lr%p0tilYL&Wg@IE7UtWfHZ3?EDYv-Jh7%bmNaDuV3=IvZ zCMUOVSTLwk9+LAOBu7t5={&bf4&#iTaK-pw@M!+<$THWjx`JZ~!r&6sMZ|*{pl!YA z6nPW5110Bz$%6Ur15M$`R^-O3H*VZ`>h33KC5JzN;FShll7Pt*H&#NHHGdqdCylw0 zBU{Df9l8it^S^ zr{ivYYDa^CPT`AAVsOK8xCB@2UohUeTm{hudhQ)sw1hit7jPCzeGOp&z;x-welq#P zdy$}7%t*o=a4{y=KO1e%j<$R5;7~!zfzbKz3KkR&G&5ng3oM|K0caU|&dsYp{~NdX z?cp`)lB89j%Zy{?<=b%$6vu(Mbm!4$;Z^TV){zjMm?~caIEusESo&T?5!WO(*9&!a=AIS z=Lh`TK}d2V9iJ$6N+t0wtOa&+Ri5K123Mtb&uTFBiCqBR6Xf{#y%kB*xF zH6gmuz+x1NQ#a@d9BNRF)}1^^XU!fVWkNz==n?6{2=TL3LR)WS5^A*m z?8-909y%3?duO@e!ZjRf>+TLiGZzl_mpms0983Uo8ZkPcPf7NQJy)?4THq3-Rlq#v z*tM`j>=?*HS5Q=O)gDrM6OdHFEL}s;%L3+XJx?sZji61%M5|77dJ3sn;^-E}*oF9| ztQ{tU3;H|k6jx$>|5RaW{>|81=e3NupIol6MvY#xgZmt`^55qt0FX+9<&Z&!YVYo5 zam|0(mqfNl8}==_(vR}~eC;BN-Ng&YJlqMprx+=OU8HNdwNvB>=st2{nmlX)PW&UJ z{LznrgkX>j2vNlG;b#Glc#Z~AR1&nVf*h)!n+Kfi0qHJYnN+lN;ZgG?VdGJC6pHkXUvxCSP$@|=2`Vg&K8oyGSWFbVg9Igip7WQ?%LiS_1wj{}i#$mR zvvKkaR&n%G;9D5lx+1KA6 z1?~5s_O|WYLy>Brm`aKf?nk&-7tTG>r` z#&d3#6VPD(>xK4Do`}-1Az$gWPMtpcWc3Rw22FPSC&?#eHwV8gGYtUp(#Ub7EqWl< zX#4;Ck@2xH@rmPq$%|e*e_q23nU}#=m{28Ce=5$#z=I&u#56IHH6JzBTic6P*DM)M zQ#F|wRY8!#?9T$ky+O-ia+XFeHBbZuW ziNdW2l2K^t$0kg@94H^gF%YEdfTUi~-r)qc!w9{TS9eBKv&PpSd6q+W+ZR%g1CvZh z)raogDC}45Rjdi-^5SES!?%SGQ7CPo8jAgd)iCiQ5oZ9~CV8GG34U-Pz1iys;g@M? zX$)^2OS2(iOCq5qT>rS({B)%;gga@XhN~wiwHRUyGY#|H z7alF4d^ty!I{Y?;!mDWhlS=r-D}&r-;XdJH(pFR`UDLNGAns1UL(VII2AaAg@tJq=-$Y&X7skI;3Wd! z$vJlO^9uX+i}Cf5u#2C()xwhRC?LwQjB-mJdm1uu0K~W+h#agcsR?Au1K$L5s>6|w z(2a=Ssu+}YU}5n7AC_Lm&^auQvRE9F7qKw^<$48~1HEYwazPK`t`-MB@M@LqMLI0H zA%9upQCix}0cq=H6oFI{xRRsr2uYI71INE9YTfG9z;4y#F*^Wmr%8$z6<;>hM0@%9 z)fA$nw=j1DvZs;glcGiaP+su1hc7lq$o52D=* z2jMj&5ZVFQo!t>JnNsJ@RS0*G9tnVK^5`eBqJd1P#u=y}E?BRok?<9H5FH2_cBd+g zVF5~V<(n`9y9vV^$nkO7-Tir@DXg|n=*80%S`kTO!Lg8@54MH)?gkwy7 z@ixn2T$ds*kvS*GAq+&Y&pM3<64hsSVCNU&8JJamNVZjg)yg5Da`YK#*cIw7yMY)9 zW^>X)*0+$&U#1#z-gvF@%)2WSPJh*;G~)Wp6Pzsv4Z(x84xkS*2B<&+KliDVSl2k1 zz7^wyF=%S6@KB8h;4H+}(6{i|f%*w68BMSeIMPd(W3Mb&Uy21xN>hT|IC2g7_sFBr z23K_Dj|nuI2dH&UE6|c5GJ4g2d-FcTU~85wTXuN*ltQT*YlrT`A%~VjSNI40EL0?6 zXtgU6Bys65bZ`DLX%bCUT;CHUywfy)f7w{{ZT&aa0!B;E2qtgG!_T=p-1*jWT^-yh0Pu z-&n;c@6<|Stae$XcBwt!zY4SF2l!itK%U8m7+M>{qrTMwdh7SdZJW2p!TQu6(;*2h z!j!m$-=7LxVir+NHo>k;38kv(0wqo%%Ck6Nhor1aNOAJ=OTVQxo#lG&7rYq2)N0W> zksxV^LN5drKm&m<|6%^&?I^tGVlW+4Q?1eYeG?c068BZ zrdY7FnK64pMnIZRPVC}_O2cz(BoqY+**ySKHB~kMP>`v%a2Q9L>cf5Wl9H0vY}%wm zbUR(?Sajvp@~HS2Rq!P5a@MD>Lp6(W+~p-_i&FSG4#3p9$nFXUHrBf9U6>PLrO#L@ zRa}}s6ul8Y3L}PxP@z&sN3;?cU1eyTXyH;d%;`v*^FSASb6J-HBkm4rogF(e~# z7B#YTMxhej*99O1qcw*C%+RrqvhyHRDRgz+Sffk>#t;NpQIBLC9$m(24kqnMbk>WI@TL`@{pJd^^GPo`28Z31feHArzI^s+d0AIedW95 zK^p(uT)%YbIKky^`=5Ug0A@(k4OWjAj>kaMH)NrK=S_zfz)RO@_@RHZLm^{w>%1q& zxC{-{jHt;o@~$}Dot&INZAhp_>u5vt58OnZYX+!K9G@0@W7X|Md*VZa4$AiJq>I{2 zrvYt6S8JvEytOI?=oJYjtK8ajr$=(d0AyqZc+6~$kaOpC93_N*gGmoZ$H%FDOJD_; z27AGlyiMSjW8~!MRsg7%-2E9+!)qwL^eb0x+xFfr#a6Q>!r|;$L%d6ZY4ADmnMju) zvTT_=>dIuONRvGl;SgkNeRmwG+O_Bjh%%Zb!Ms=)4wh%Bsb-Rc=qS~3Y!Nh%9$;np zRvF2a%lA~~lq|~jp29%OLeffH+Lhhwu0RmVxqNTDBlJMDW$-Jpm^(4m#^GX8=KAN; z%NLAi&GLM+p0!LH7q4*kW61&R6w{vj@n|iJQP^Vxma-FXZ8a&~fA{X)OFme&)TD7i z8@aQGZtY)5UzY}vaGRccPEevpDfY0$~rsJtEoBKPyORQ|Nn`>$EPq+!*~b6Yao^srtTT-3KPPqdB$yW+E4 z3Ev+0_7y^(K$R4&eUL73l@>1s{QzwFfXPkP@si2Top$@s*{4jN8Oyb0Z|}FQNj(-u z_VfP)YlCiZlxwP7x%{A3x{FM9^4q+PM!DWSB2dL~Pfcl8fbpUKN$nT&-miJNTa1~= z`Y7b4;%E)!MC0-qO`q`8sWQ|Z>G#EQJl3;z8_Tu!hKTwB+}nlVaZGo8dfWN&eCKTT zGfqO!Tt~;3H6bCZIo&neR_;A(ed`_n0U@(>+GDb-;-0$YtykzL((YU6otf>N;lCJVHfzK(ImbOPFfiV#ZXXGnajKPJ zVa}a3>to|%{Lk&slD$J&0#Eq_Hk0_SV)L0cE%GQ#xH#?6$|RBSIn^KQv11iaubk^L zCrUo10bDBg#-~5}Guvu`;*&xxs8=En_lOcc7B}uFshr`ijysLUir1<~`QvPZt^%0O z?JtV9e`rmya1oksVa~VAk^V;-&H>XDf)gQ>Nk}}h?$YIarO)G9p}M}&=6_v7a%E~# z;ol3}_Mn8t%hA$t>S|U+sr9aVgm3)BMoh^S;X4r;i&FRiiWqf#6!yzi4WPS7^-I1a zRC?iz!U*tQ{M&lF-&mHvP3hP!rkf^RB62ZTKbH0Y$_xhjx8Tr`3l}HLG@{Vq2BA8T zQXKm7_LediNLJLzj@Ph5V82Y~%m4dg`9-X-^pPP84hd>7)cFWxPBUssPXA4myKE!; zR@k6ipSnP79m6o#>?ywtTzEQDNY=E+I1WcL7=?pCVa*rou3;_P9;Wp0GQ&1P@sbSK zDvWH{Z=Jja0eq{Nu%r4m1MklIeSz1|Vhe5H6t3Z&28xUO!fXX?kE>~Wj5b0d?>{e(-f+T{OBwXO>lueJK2BA?ABw9V9 z>Q$+Z>V$leMJbBPM@G$2ag+J^589|&@3wyU?)6I+>z~ahXEtIailan5Lb2?pIURui z!m$4n>hfg=BG^X2cGu*U|H68$i6K8~pRv%%s~#6*u6YX8E8rR!JoJOsH8f9-BZ(w` zY|SpaCuXpsW8i6MPij8#f5XIF)yG+OZ*N zLJ!?Kv656tI8J;)`;|&8nEqXUwExzLmYk|8ZR~@1@}F9OaK~`>fSe)Cu6JjJ0K%09GNt0&p6wA z-|7dR9}S#+x6=`0vHP#iWL;ZC9XKl6W}G|(K@s;2!fq|_d+Mq1Om=v$QC_M2iykLT zCpEblT|d>qC;*|~KZN4LRC)VD_22_{AgoX%S$+E8k1HomFef^{#^#6ND5iQqus_$* zq2~!sBl48T%P7W_7dPY{z$==s;T5@Pg{X8^a#}tDkg^0D1;>&YmCm%^2@#w%D*%N{ z6Rrx7*`O{HBhx`UHIZ=xx+dy7`UVEVVekwJmT?X{vzm`3xRl5Ya)rfHF~Zv>lm@is zBf3-Y&8eEh7_B7Qi1O5NnwQhh8bW(W;6AwK0AQ)q0?<@y35HpA_B9=M!oulqXGX%& z@oavlTCgbBd-n>|Zp&^(O#ED*-J=Wp_Jf@06ViGNCMvLg%qp=|SHsQplh!fWcY3iNVgBV}EDUYE;A!BxSom z-ExR3QCv!9{H9rfS=S^3uFPHY05uoM2}n(ddxFG;bj0`lVCuYpLgE^m3vW_fr~5A7 z+x&G{Bml>wnY9CjV(h*!25T-mk6#X^#`kMK29(IK4?~3xfDFl)bc@{PndKLc8$5%$ zi)Ny5F4{tC2J7nO1jP(C?PQ*yqlk&U#8>jW=#efcDB*i_fIqy&G*0Xsq7he z)uRx)spCLD_2dW*3VCHiq!ztXU0SXYZr7Wn#uUJ;iH>ba4Qvk32;Xv39~{i*SNx&& zrjVmfQo-6b%E$maVIS; zy#*~loXB6kyZ?gk-x-wG8+eZnh+Ha|Es`Sf4taWV6Miuq`<-r3v$(OFaJ1L>4*c=Fvtt{D=6QX_!%a1L@t;{LJu__=iMc~}e2`g4+ zZ(kpWOZpZZ4wLqrkHB2Xm^HoYaRMl6Mu1q@9>dS7|M|17nd1Q%88@`I-;1n|*wb(M zi&t8b#6jN3=EC5XGu$sdBf8~^=6fa`3y}7hnZZgM8S!3<0gZ#7H*U37P@nYjx_wN? zOVfTknlk^@%@#~d-rNHz)awmVUOi8Dc->B#zLtN_Pr~+T^4}YE zrKBcgtoc_kziBm3e8f874${=iGAY>WS<-Yy5Wlq?1Di%DK%h)b0d2^SOFR@ZDThyg zEgjWYA^pXZMMl3yB6I*knV z+?I7t-gjg5eVpO+gRRb-@nvKD0(c&yLDpv&nu>t<8LJY=HhxW>%&dQ=3pOf*|sm+IDRca zUl27-6=EWKV_WcBtB!wV(vmvkwOC_y#0@?Rv58+}bp>-!n$WSOWFLg6R{k9~@ zgmgz8;4kfPvW-nX`~3mXGa8{Mqz&>>qsxc6D0}HL$DxyB9N&z>M+Frt#JVQ)#I)YG zo!;P=OPiATdIl0uL_!^;Q3AB1qjYk~+`3Mt3#2zt#BR)&E@ zPx#H;3O!8(gYG&EuN#LBg5HcCm=V&1?w7s{IatA9LYRZ&HYWbk)vF-qGK-&{)}suD zgdrUN$aj-V?W^~rAkIB$cMR~dtI5{eaDn(d&H?&HUg>#Fu>R^n@DfUnAz z>GA(c&=(#vIw13-`th0&&g{p-Jp%S7p^heC$$$#)w*>;2#7d#jXYnoMKFcgC9YZmx z9eLYnCdq;6Y8D1e32BZZ2^T2u2Q_2)o$Zoq*X{#D!5en{vkRJMVGiC8X@Y246kD>q z0-Sd^ieusmaX0%KR)WkWHUU~i3luGLDsKn@QRK3zkb!~ko(IlolMmxuE5#r0qM?x} zOXh&sE7T;7Ac%P=Hl_fC%Nf+F^sew&Y1Uk6@Ix6@)9fY)`VQl{fUXWDZ8pkMB9F=R z61Sm#xolz4FjQvTAaua1hL&F=5%9jtBl5pJ#}bSH6l4g+>ZOW$3=@-!9jxF&7_?gD zsZ(k8;-Fpf4FFLgnCP%8JGIkFIg7>mXpAY6O z3|;~RWu2blRU#tfgv29|8!hNj-eI4aDenbXy`KBIAuQp{Uv~KH6o~2@ z9MFU+P|M2+gnZZ()M;HswyDo!Dl_Glj7R}2d|_6Vw}-f2HQ7+W>@ z@8A9m5pZXYRBiuF3bETz~fVR|Qg zH_zzauMuqYO!{Y};}q_)aZjoqmpk5(yP0}2=fzwNt(xeD@Afv4HE>IvrnL?}-~&ip zDMHm3ua`9wad#3;3l|ht3vJLvZEjotc|G%2Vc;JA4r|keZm2<5gsvPE0%(>Y9;Z-Hz{7${6`W zGj}8GWnti&3`nGT=&b)xx+l(4im017Q()n&&VF2NMksz1r4Y+jgENo`%9xkuG8}Lg zjbr^rIAmSEJe5-jnjnHaCJFLK+lMTvw8Z^mLXU##S@QQL1s8?VWd?Bwa;Z$ncaiQZ zU6;Oxuuqt`bg5|5+shTul1o0!FnIgIG|p+=gPjFO{NYNr5%3T0IFlpy6qK)? zUfv4Fu`hNh(7yfp_;OXg?xwm)a=qv5*Wm?VdQ)6IRtRpmqbVH9*wqLW*n*K(hb(Gl zT81`0V0fP^BJBt&d{`tO352={A<&2}j` z=#DqEhs{wR%#$MU&d4(rV~7!nRX9P5ldKK!#$PvdaKidN_m&&nqfkKfxO}6bfR^Hs z_h2tZ&MCK-^)pT;E6Ia^+bn8ue4!iYn}oH8|_lO;a-GuCTE#i*pzf4vq-6j zJJ39_a{3jRPIabQn}ux@3rbCI1$nnFza1GgT$ugOvUEZ#$D36E(d~WX#)PZs@HZ#% z4USYFXENZd?t|J=yqWP_D6Zcs%3|I2%5N~)DCgGF<*+1vrEt3mOaACPZgm+;Q!uS1 zvJSrP{g{tQ>tR}9OQLc4KF%$ib3d%$I*y~YY|YD${8u8!?e)yk(^y+O@D=0G+;!?I z3gY(@Vf-(e_~Aremazv-NVA)`3SyyWNIV3aG4ejm`DA&sZ0DXmN6r6HR#JMfXtRDJ zG>j%cHs&R!GV`pRm&^jAc#+%e;&ca&wD8Qv`J{m(t!M|o%-qLeDI3){jwx~?m-5+& z4r{)F7BO40l3FcpkkC-$9{pVXk;|IlGbZ<-T*-EbO{usaEBCi-Wtb`xPUh!iw{tVy z<+SttE?kfBWxEeAmFLp>;(JEAN=iz6hV~LKPW>EQbi_X1?sqw90~i3|ZuRdKC13R= z)DS}0k`D*+O8|l%;gY{Sq;FtAg+m4C-|{FxKja#E_w45>v* z#}qA>;t+|%CZgUxDmhsbvIx?=dn4BsH38flDy11HHEC?j^p1-hOj9`qY6@lZ=gvLp z7N8bx(DCC3sl_0FEcoF1I4tbVx)E62>NecQu0mFgHn`fEt0$ch&%&z5s$9Ej6_d4z zHG(}x_94Wh)_Wx2f+IOfu2gY6o(uW;!k!ASgGC`NHRfe!d7Tm)$c7G=jTn+r>G`u~ z{}x?#w0&v=WK7zQt??x0l^)9m;(fWRfCJE&!KerPEd@3a%}aB`n+=$}V!-z#Hl-*B z=&bld48BI&lDH6zVs*p}ZB^BW4<7smW~@w0)HwmKM^`C#<%Rh16*v&+%z?BHUgzAm zwd5V!4nB9uAp?r2AYK|uAaCr?4IU)|@InlLPp!J3=N_2n{VqR%)GLG~F@a><$1@3P zhwCxgPr)QDF>BjIl{tm$0T2?qiVVrQ1!-$uJ-yaFY}tpMP`?q0RdCh4E%M2vtV|GG z4#0VONnv4Ou8!|f5_ky7k%DKe&CgggGcYZgzx6%j^j$EAXhwWc5ir`hzy8YH2mWq| zW|?N->(-Xxs}6zqEyJFoDveGSuJIpVP_#6!lIy!fc4`h;>(;C}45wWyD=QkbvX>Tw zubUy-5!*NW25}@61H~q7BOKmI=|cm&@MMISG0&fW&z^fd0>Wz~B-9~;PG)dii{ppD z6pzf|!os7%&eUe$wpxwl!o6|x=IYE1Hb^Meh#F@RMjH|yi@>NN0Rgt-uNDEv1z^0M z;49jZRP|xJxI}BCC_qPa3Ze^RfG*Yne#7|Vrj$G7ybUAwW7LkP=N>{anbQi(nxtD9r5$bB)~ z6&~4C{Q)TlHr7ZvxP$*L`gxIwbF-{o=uxHH#|7PkMdglb4x3u%XV^W9J}OdO7C9~d zNK58swWC)?bRI6nO}IrsB=(#hKcAQ9p()H{ z=F}Bpo|e+kR#K)QbQ!$VEo2Hpa>H)I+(rDqnS!lH{iX+u;ABwXx^#u>-U`2)Uk~Rv z;(?U*?%m5|Bw;sea-lD~aOL*J;|pOmUxu1xePc2To4s7Pl!zG*TK7>d4hO=<|AZCd z2d{g6oflqK99kq<307p?$9!BoG!2HUo=wm(q2oICb@PB(golOgBhx~r?t z!ldCh5Nc0CWu(7+jm8O#Ya_YVV>_w3;LAxGD>7j_b?PB->WAS`$!kB}4hvgLus9lZ ziL9KrZ&l3AqbS(UBr0h)ILQ@wcUN(}& zE<&T%RZ6^ESW}jUi#PFu)fIdrf=x@C^uV%^m7FacFV@2Q@Z$%Z&NNYo<{%7Vw!nWF z6{H|F*I^PgyPCmc-Y1C$HA=8Z3P={zU3CqggKX`53520O{wR@{blL5 z%ix(xECQFb11R%Kp0yD%5p(hq&3%C@xRsTTyjD&jI)OlVGdJR36<0sWfMRlBD6j!K zO2{&6p4CI&#x;KP_XpS^>Ms=IAZv@lUU6NJl@5nXOmasbVrOyeLC8O@tqHpZQE`bl z?nBU^!1tAxDY$RnR6|~-;E&fUk^vHpuaCpfDis%2nXf=9G(Ddrq=MQyL%N26tcG%O zi18SwW`*b2P?-kPYZwXAJMtzZrll(kYz*C<6c<10PE{$b1G{kO5R5T11>MtMrx=Xi zJ_!pC7tN=*b3jQk(q*$Qd}O&MylAqyJ@UPJAkiZ5qU!AUCV009yduHhPMP1FTfkHb@3V$bhvIvjOJzma$b>?BT#TTJVzt zVJ|zYU=P+4Gy=f@@n9yJ?G%c^?A!MTA?l}eNtzR(kQj{l1Y&=$-pp(+8oasXC3;&~ zT9OqZ-Do&UGsQkW%(c$wy5ND#Kp>eD32<0?k zXP&a3$#U(6!F$kwq_``{7g_9NW@u=5$2}bR6FI!rr{d&{Mo8S(qC}wT3#Bo$5?1A~ z!sJ16s9*`6BSo01s;X_242T5wt?<8w@Fp-#@=EG?sLe`4*_69KfKmvT6hBDNJl84| z7!Z&lodDj8QwXQ(PMlOCs2TvmUqi4X0K#0m_<=AMfqBA5Q?k^^7 znEChtR@opnNVh1C$TX>r&ip-6vBv{ZuVBc5%^^$msPth6zU=4NMKr|6f0m>Se}um}mki2>9~73YtAE_hP& zgz%`SQjkfw-ycFJkdubA&mh;5_rtk-?XU%tx*wnJv}6DN{TY(XwXgiceeM(=S2}95pQd#cRNelmSW8C+i!)T=*<3z{7m#c@mhZ_VQt#tc(Ce?r$ zIsx-*be!0EN8L(?pXAR}ALwja(e$?2ER=a9W{U?3@K4XD=bG^!Uy%)mPkg&81ZF_0 zXp)v41(N5*jvagru1=UEH`H{nCG}ClBZQw;sH0nNwS%tt#SbADQuDK${u@Lnp<(+H zr)Nclg_P<-o~1!SROEGe^j*;%d{Aw@YZtRi|7q1i$PIfZiLwF|znzt~O44$#FaVan z#6}xe9`dP{mZCce#(9VVyvtu)e<{?2bF4y%@y}COX~63cMm{ z|K(Sb6Csp05FYWic+)Kuk4{agkkEQgGV_J2fCxe%*>#*QUIZajM3fy%g1QpZf>j(; zOYwEa6};4hW3Boe3N&NWkdb~3jdI{7B!@iLgy8~5G$Uv^+6M=n0I-$~@GryGhE8HN zC;*%u-pHWH{0u>ahK}-4Wp^MjLuOf5nMHc`F5vg5fVtpW3(C3(ZC!4@M(cN&x}9?Q z$%w=~nO8uD>MkzBJyH9=qklG5W)@8ieYExQ@r6{iEn=ywsx~1VhRddDS}0_uPrm3Z zdyl@_C{A=U3rhy@QgeOm9gr`$+%U7rY#g9iouK5d;Gvk978jL)+o^I6|pAkJpaLEu^Pd}RDV#rwQ^~# zQ{{mA#B`)3c zB_jE(^6aSDVmIxP>%Xqy_J>sL+5|h+SKVv@OvaE6xW=uo>q`!8kMqeZUJ#{Slav4q zR~HwF#0Sgs_NG`x+#syNQX_Z< z6lwbD<>lq@?%thIf1a)jSVwij{*4+;uJQ2Qv8p=c-J@}hs4x|{up$!(U~-bxh^`v7y*&W!Q=M|{42n^ZeI zdv+Crw7H@tO0cbaBt`yT@K%e&gD=!ltbz&`_vO0?Yi&P3QFJ(SxhG2Rn)8q|=4G6! zVkkM?6~gjaNzr}x{{dyx8{3S1U$b?tf}m&V3gHxjKcEl>BPdCTiqp?y{6o>A8-qjK zw{Kq|z(JBCy(1zbvP>E&$0bz6q4nQ8RV!ZW$PvR~7byAl z(|OS*Ae||j3o#yBJ#jXLpyDQ1u<0Hcmonj;yKiVVY;TH=1$vpdb!QH1XoMCrg-S%| zAXE_c2vxv2DB%EJCF3d<%$?f^ONA16zlNf?={O5Y#0Jmsb)6M;9QEJv%18EQ_j`BTy)^CU~{_W!f>Hh#7WCfJ=`I-8xi)H^Y#9r8E7|+Wv15bbEE$5xaLoq!x36y z>Ve(%-G8`tyc}4}D$vsG?^!F_hWW3Pr%D#zu2sRZNxRUwtbzq;@0{r z>(fGXhky8Xl_rc0O}o}-Ol{oV{c?fsUanZm*G)&W;PK%}nmr6-RD6|BLCV!CwQ405L!Xw>qYYC-_#B7 ztq%Ghm}MGc9!RACx$$AzFFMg35JI#|mk9j}d@1j&+Uv&`l3f&KS7~<&fM*fMj1RhR zZ5!RLP}G?i#lfV>vn$P6&1p+I^u}IU+#bS)w#edOMqAHOg2qL(5*3 zKlg^d8ZcJd1lF!ua~(JyN{96hf+YF_NPw2b@||-@a7f5rbbPo+QbSyz`&Vs1X4lxS z*v3pKFe^Yc$L64^Q=(ShzXs5_OHWD-hf6aiXlZXYU_uBJXB$uavn!w4Zf+2Su~*u{ zW#MbypQFnRKY&4!op181>@T@)ng-uGneq_0>pu5s&YA%7ja@>A5U5*AIUJQRqG z=Wu7R+!|@=XL<3|r?RzeLRvcdI#I^2#T^SKa6yT>^5f+8SN%uEep>51KAR<9bnX4G zU0cQhK3oWbmFxuw?mjn3@EVdNt?v+qaWU)8)t`g0nFMF>kETkZs(SPG?F}}`kr<4{ z(1iofK%s(e9@UI~9pRzi6Gf0O2XKNwS?IL@d#}5gdDy@oum}w?p!HNiC?Fd9&@W$3 zl4;@ZzZ(p{8B244O05*Kk|ojzB#dg;I}FU7h?xp_#LJt{_k@$Et@K=AD`TxQWc4au_ zARGyRj#e=*r3-;>C1{x091*pM$syaF$4E*X%cL}3C!0L_isT0XCco-EUj#Kd6!tB^ zW#SQx5OiBPSK0pVym21S`aVTx3~PN*|gG&POw&0zz=cOOH^A-}@I z?eXKsyIb;Wzi;WS0Jj=6 zLXY}~KJhcx@ci(-4DE^5gic+ho2i6Cip@(3!jN1Tx>fK7z^TdQj7HhmxSjV&DF-HZ zOB+Lxc?&q*!b5-R@sLfZx3x##3u;X+A$TZ%ikr%6hPApLgolTNC>LeM4hyqiMFJ{s zLNuYJq`2rZ6$GHBAhcwzAa8Vd2dWPmNEjZf8L9fA$rye}bv)B?1lXbM$e?wVeZw6e z+d$!4;@lyTKY=9K4)&hL$K>HwB^V|P1g&b(-SmHLd;L!dkt`m0krq4ZHEWQC+X0eU z3A<-1Gj%GBMb~}#vYO)UZP3de^$_9Ut0#QuJj zdf?#!6VNDUb;q-g-4{-c=8KcYS@;%2As*_7p<1Dl5F|b+aB08-w{WCJ?C$LBY};`a zD9!Ld;i9wk5so{=;S36i@?802sx=fz>;RPmCUXN2t5E_-Zm2sk9pLdr+iYQ9|FWlJ$AP0ftI7>0T2D*adV&P8$`N7n z2RiCP28BPobuYMHD-~MIzhvuMLQmcb-A}qE#1DagBD<*uDW>c4(ZjC60+H*>J~(cl z$u?{djDthBt_GkDm>2x_rneGTKW^(cUK(suOpX}ur;7w^e!@$mGN@GO~W)e>G82g0AGGqAa( z>)W?u`tQeW0CW@@i6}5`5aI_>HLN(+@f5iPznZsk3 zO(fkI!7?4jF%m6A^PSO+dC&Q6?f1PgGrMPG7GPpWxP9MM=N_0?`bB6Ipv~5Vuq_1V4m2+rI_G+-he6 zx`9f3z#De~h*(#;1RBzgImx%nNJ@ zHOsv(?qpFoaa54v^}O=aSWx6N=F^7hnTBl~R;xB@#K7(aqjWNdi`dSbI^*JDKhpgW zsf61u{^5FEOyd&qw|Jy|hcyNxl?a?$yY{x@T6Z@ddupQn)#VkuN0!(uZExww0;_s4 zT6m27wEMKUpCn$7f5ytNj(JVB6jizsP!C*WAn4gj&he4{l2RKBu%RKMZQUQ5bki$- zLmLrXzeu5qTlluaP};0-O3@DkKgWp)wa!(VsQR_hYTWDYyBc57ez4*>*zL?Gm%fxcb5~=eIPjYmVwPH)SqlJ`Zg)G-wCbpdZzCRl;{;7Wfxnmci$-X z^R53XFAMyQ4U`RAYc^JEn^o&Wx5bbyK9a{SAS+hb|V|oPeVuNF2jz0 zy@?+V7uQr`XFr8=YtL9m8aF?})m$G_zrJjYu*W@j7J$SR#iJ_TClq=%n6wjKwaNrT zJNR#da~)H4oWYSfK#c7TH5%;GC?_}>Lrhd@#{$sc-G)GEeiEEFa4CKGz-YlCYFC+- zwYxdwvp_$}Zc#WSc!EuvHw$wBrjP*d(ZPFB_^V|`j#*33z+g)W%IZ=KId(!>^9E_N z$lRj@PRxCgIt)=K3E6EA(@qbSfhj(U!u}BU;|++taCZ~@j{ep+^OIqQ!LJmajsF-r zP7d(Xpp0rLDTe=y7N5QYtAX4!plr;oh0=niXE5_iBGa2$p1ASh!*vK(J})tnLRP?C z-lfq+>%YE1dBQF+{pSom>jYCSbY@*3%H19#LT89Z?9^$O2MB*7LuW9&QLZmk!n>5m>4GwTSi|!4paOuHAXW4RDBx>@)tTx9di_2QN zjDZDl$<22{v70O~S8Dg*%S&;KW3Ll;ZUl%>B$`fx9m|>OzSLHPW&~VguFdMmr`L)g zH&n~xDoFnZWnT&SClzgNa!#Uvx=&62H)d>e(e#6u%NnKW{=Zl{q&?i;Cq}FqOfDmj zTBNFyYJnMFf5YEDf&#oCFre(++<{&^E;eTbG3w+JLy~`p|F)br8L2-9;$+i+@nw8# z2>_T-F&01y++w;P`4_7>$jANimwON|9%(o#W8t&ej4Ja+-$47o=f#48g0p0oxZMZawwFulU)<7@ z;-JI5)#nJv5x3c1uHe~^d<4VPCt=M~9uW2t#i-jmq2lKTpU!~}RDYQ$HdpY z$cGz*k+4ReqvlBgCX9@rCyrps~FV z?F`pu<$E)Fb%_c8Vd|JMst)8in}bs_sqSZZOY5(A7yW}B`NAa;!>NaGj*-<`(x1H; zQ3dXzj7lBieaeJ{CTK60VBn_x+I8)O*$+D;V5I#vB&=QXG9iy2jQ+Z!32DwmhH(*kEd1+~Pm~XQlm! ze#^MKyPFks5uroQez3KgbiouVrMrY(kZE$~84*qU>vWg&XQ7!oj2QFY;g7PWyK zmxXTkF%i!RoAMw(@$M&7cfu5lnJC>}BVC}oq`cLx(gl&S`^5cL%VL%TZ^R0eqz=?) zDhSEOAWL`+Gu)j>4lqy>aUB{yN6#^PNCGMot&#;c<5>k23*FwGXqMmFJ>dO6pB>zi z{!NE&H@gO;82=Aj1G2`DM^+&T6RJTD7uS96?1k}A%KjJgvz1eLe+P4s%|S07Cmd;4mF>GSKJTT6`H^lq9knLHXeMAxaV_ zH7`mMmpa+ffi9V7D&JVs7!CB>rw0ebOpZabtoTa=Nw(BDpMhVaErKMO9pHs;sLc84 zxkpKow|dn_qHyEDuBNwIceq~MDg?K>Ce-+|Ew^cJyFMDEv%L}18qI?}1iuN;4 z&X(3WeE2>pcgiQV5^skc2A$b#-L0>hSIPBrK1Ug3)1NN+A4c z$||@>!$80{M;Np;f(LGO81fE}|5W);6S2N%(ghYruIv`o($Qi_-f{PgM*Yvar$m~b zP3_8h`SMmeKe7OkJzsscb_OLEfX5@bCIoaV83Z|EL}=oKC}MD-O}LNDY8v@L{O%24 zy>OkmGhe5)kzmu^AVk@} zTqsoQ*ydRBq>5sTQ6f{sJ3$ZBmPe(u@l0QOzZrbuIVVkSQ@j3`f7mx#(C3{u>5Cmj2#{!ZKB^WffyYNphK7Si(U2P-Szg~y zH+ccFWnMr9|L%hqt0DzB{O;EE$S{QEAD4~i?3+^(G9(d<=7VZ7=>Ciqbko3a*V#x3 zix1aate+1B#hW+#puXSIqq2AgPp?>-{C?;vh-`^Qsp_%@Pn7cfx(b>LP?BFX`1(S; zlL(OGzx*6P&F~64u$Ji^>28x8Qq`vrbe?8sZsR@F^K1UQbjEGKoRV#d5Pi@Xy$%z4us@R6q}ediFPf{aG#bJJ%8*N zWV!6|{WOzro8IF^^lc`yswh2+^zZC7kWvA?AD%IJDb#Vp09sda3ejH=;e%LV+zu7V zzTdJU{uGGyspjexo3wngxD?;%lP>)Hf}lOm#xF)3TDEdUwaY+j#naP)s5z=UX)+Od)^zi)1k*y2(IS`+ zbtNuU1{wDrZ8M}Nht`xvX7_zpj(ya%R)zy2_ zcjon-hYSn%*>>@*P_UAoaNvwpgaMYM%;2}ou*gUd3g^oB4BqU5ADaHCFdumXq(4JtNi5D0IQVUgSN+%%EBV16p=}-qE(oj8&o`n2aTOjc5DN~4>4wVRoIl+mLN(X|Vn95dTW8*@+9%1l`3;}TxuzLaDqkh7SYoQ_WlB!F||WKh<+ak z%8-PFgsSiV^KEbQzU@rYViVRmH*2KR*vcO_@-`t@flDtQ;Y5sJJ!4uLh5q?iRVM2a>V ztwkkSZn_m73#+jeLF2=2{l<+rjc8oHXh)ihW$Sxw)1$sJm;9%x%wy)w1FNEni`qP? z&Sz`R>x~^S+E67KA9041qqNkc-B_?M=0Lzwh43t){rE~dQ)kXBHW_)KGk)@xEdhL2 zc=}{}f0JDE#1y%m&M3Iee6+W#`vi}3ft1p@)kGHox~3AlmVDqjCn{mxWz`Wp739MV zRp8Y?dPw<&+74nKx;@`cjd)p~%YtG6&xNGmUFU@c19CT6t=rJY-J_N-GxjNV@IFOL zlY7@<`TPfbGmf|(Uq~jmY$I5U31-FV+%DGq82I1;Zl^#@FSY<%X5J(%~) zUEGRT6ph0JOnVu~oT#G*Ji4BFh+XOu_KdjesOBm69*6Wr2Q%m5mW&;#6K74{Hh%GA z*HZgfFpcfD`(Y-)j!%024@3_U6f_Il%4@||dzx_AuaT70P|8_y5mDEQFzwtb(y8-u z!}L@%%H$t`sl)g6zG@4t4sVa7NJC5wN|u-=1i z+OL#A0h|aj9t6Y}78ZV}gk#a4G*E|w7$T_sFe$T1XC&nZfUpy|gArU6l%{a)@v9I( zS+|x$zMPa9=UgYEd!1cUTufR`INkUFdFUjQJSnM)R6(o_8{XQeg9alJUj(rz{#y-p zIWPL}Pdo#k*!}Vt`}eOu8|r#(6&dv&Imrb_U{kPpnm{rqG+j8gq0Vz|R*3-nhk#M{Vn>AiCX6X@lrU`&{0cWsS^U5~|7ilK(+T4M`&oB) zNx_0INAf#+xVQ6trDGi0G-QU4;hYr12HKUH z5LJC7ny*uOae?bDtf@U*l|zRtt72Zg+I@<8OeiVQI$E6B?sk0j=FLUg&(gnENIug{ zcQ(IMJ57{0dbGeaeCvP=bg(rN@!N+%a8LygG1gaG-FnbyN*AqfpB_xkD;qkP*N3~Q zZD_>Z!YQ+5o7Fl?Uxi=z7Bi@S)_q1PuLQSPw3@cyzk41Yp!EhCOPGV6zU7-$A;$5e ziIlF?TD)L1YRM4Gs!ib`b}6~-acDAa(faHd&6NNrqwkyHB)}6Zn9~%+K^v#~h_v?lLb?YQ8)J*t?aF_H zI))5v2Ep~|u-$wLE`LSn!%JTkjf_GE8Za3Wr_l|gI}NgMCc%Cf4s!tLxw*Nd2|DQV zV-BYfl`jVApSQV8X@zW|h$J)&s7sPX)0t3Tua9aQtp+H3j;*aNu!?nx0%;2 zzolRfW9wcn{>sSNJ8pVd6x^V8=&Q(K+3yt2=^Moe_yLd(xa$;-Krm(CD4J0`mnEik zAq@fq;PJxnZ(m8Jj8b4O?CIJ5V^IZuwfr(% z6!g`Z0gR}%50@8h5dd&VqtCo~{W4JoC%!NTH9QHH8HrjWkQeahU02DR)oMbV;)2^x_o!jE!2CO@9sviOcey~s1+ z{gQ07jfCSIN*_l@Qc>k`d|^MvzbJ9p+uNJ;Pv}Cd?_K)fg|sU+rytsZ$ZNCOEmF<4 z`la=xwsU?Q3>2XEzd>Pav+OOzuq$0OIQJn(G=hYQ8`R(LF!bG%K@Piia&b#Pz*F)U zh9xObjOe3+^XJ!p|K9e|th$~iY}-a!?Hp4o4c#NLN*vGAl>6Y{o9SW9nuSI$-l5Bw zQ;6}ND$fNA766L$U<5(|o4>40&X?}EN_rB2!-Ri=w1J4M7`+r>&-gr;Mf)f2{nD8i zv$B>fSyCmp{Z5|UNIXiDjiLweTLOZ4=YxF4UJmDa@unGjT5`w1?0H@2!|bowm{sXQ zs@y&<>{OOxRvvE1@a8>t}SD zSRWbpi3Gchdxc3#@(bn^f^-4aC6*NYh*% zhn|{gWFgUyBTlyJ!nd4`tw2v41*~CihT6qJYb)$4In?2i5qflf5l&#}O>)rY=x)Yu zm^Gbu+AIrr3-3fOkk9*Bf{y#SBoK_QwMc2*3V{yj4#ZtHpMHy>y%L1$)g8gYhT4F| z!I)%P)J&=BHW=WxjoAUeO}gLQr=#tu;r$jYYW@E*^(%cGCy4aUzYlUBhv z>9nqj$_?mpKiWFAJbQ-?2FsvO+-t(|{(;nKNQe>nhA}XrL zB_kzBQnISP0P8D&Q|Jwht1sW-c2-LQq9BZ9Tw^01VnW*h%-F8wK!IC|k-tvP+)@#k2aT?ckX J{c-Hi{|BNbpZNd) delta 47354 zcmaHT2RxQ-|F`y1S{gDMmkLECT2^UYB(lkcTPfU4)yBR_4P|X{&v`4%HtKpA-%Ko_|DX}{a5zn_zEh2xpY7wMDU4>P)@A1 zs-f~Zj#a7N25%J9LUV_MW^*WFv%Fzi~E(+ zU6;yDzjEbDN>9f4t!(!FW_}lRbOyUqd)lK?yZ5NjUtC;rQ$#vGLc5#x=nM1C}!0 z`(v`R-##Czs;XiHI!ul!P0^kXGzr>wq6BT{M?Bk6p z`Q1D`&PLth+-Ktb;K73(IqLD3&J?q(Wnz-Jd+**ti~7gyW*HRM!fDqvJJshJi!5bg z;w=km5xSA$#O<-BI>9KUtV~gK;&)biO;WU-m~TmG>EJ-AY)8g;cWGIeLV`)%L2D5o zzm6xIqP$_7CqyfKL~UvGbeq8vuIZ5z$4;DBFz+2T)$iNXKWf=uxbN(jF#RGQ#_HAQ zOzKjU&*wd7_TlM!E4CEq zXho}Vb8|BSPjFfveR=R|$+s9Cp-aUZKYjW%dC}9IFFH+Ld}<`1DY?1uMMPTKL|Uab zvs2cYrk0gVOoR99dpzoUqARBOThx6jnV1xnJ@BQSb9UWAgQ@(g?11k-x0fD_IY zQ z%*m3Js~xm?ROK5nU$1qI7pgs6U30sxMJPomH!p69nfz<&q*JCJD(i|J;7u1l46qDd4U+sfjDcjvZ5~iozx}{GOI9B_&nh z`+2>iKWNbKddRm(-~Ga+(%{E|4^lojp1<__$9p%a-E%+uoHb{@Vtana zpt}3#5uQU<-LABJ)^hn{RBP9@)T=edNuK>NUOIlXkE|*hXPQ*UhkHC|byq7j&G)l6 z3+>*$ThHKW9P64jhJC;CY$gXQjqDyRG3HYJq)|Tq4i_~M6Zkngy0oqA?UlxX&wSCB zx~dcY6r1qw(hyk{Yv;e0E1@IFWbZDqvq>Ohug8kfd74qZDLJN10^nlgfed28J z1)hZz)%e z4!k_AtE;Ov|3|(3@XKr6wP7JXHd325ZE6;hc_A#+A?I7zb%YZ6}tjT3SA%!{rew zFLb2k4&zp}EsDlP=w!p+Nz*EwgEB}+|`X=QI?j*#hhky$efoONE2QX2MOap?MQ zKeE2|gXJm*ul&42PAM9@(YH6}*$!HUHt|-XK}@#EQY8&pPUT6a+M-ht>kz(v<1Idy=s-kdkfdV&d$r}z1bT`?Tyw-|Akh^#T9K7l^p!}@tonV z8q$*K@*ez}7uPwOylt4Duk=GmDEn^W@c5)n%S)>PTnsNi|LHjkmMM-8b&&=UshO&5 znm*{RW!shD_pS|0e6Dd$mNOZ}vw>qZVJK zSh)AM`#*ZbOxG8dnfrHLZlv5}O7Y>@xzjDbiQH@WYaU>eKfkWdnq?{K^5O*_owQ6N z>#Z}tZ{{$!c(7n!z1oWFmcqrA z?hdO?X4!WB)NJo(lc>vDd}-$TZ@3)HV|MX7zgg*sq3vv@PM3ic+OdfaS;^Ai#BJvS z9N*Sh#8Hz5_r9d%F!pUL?^X<7(eq|3Xj5iZ{6KQG&&{suT9qnxLSfq1oy)}&#yR5} zr>`y@<)~PPKF`m==klym#>MP&KD98cYtgsDCUYK9QB5F{gJwT&q-jM*z5Tg(DVLZ= zr8brR>eVYl+XrqVc4Bol9g%3ME+03HE&Y@M;CABUEA3@G*mO%dMZP8O zp7}w0O_mDZa3Fj5=R<*TAY`w7rat7tP!8#=4MtK@4}^`Y1B0YJ4AClq09aC{R5Hih zPWy^QPLKLdpK;kLbT;f)vA-lEFvEVlS~weLm76|iKJy!6=9$lUOr5>`de%!{-{`g4 zc4yER%BaaoibqUL3*{A^4*vismjI)M0wB}nwY0Q~2l+jux5@e_0+1Ss*trL4re32n zel|85Z_vSSF#>_SO8)aE_S|p)XW*u1PIj3VDiyWhXSP=-M9_G4?AXyt)uNIK(Af@{ z|I#hY+QrPec5Os_{J^WInndFlG@gS8$6~X^egD8r!cuDf<0uxQaDDLVZO_>pDjx7}`TZU$KUlx8oZTT#8& zMMzad-Pe2K;o}p98kKPA>k$GMIjm~^!C>MhQ33hsHjR(>mBkyBN)3B57_XLY5N<_D zFZVlq`xhv{?;nQ~D4=tBTL5k#fFpoPPf@UkYD~*xbWV`n_Tcg31Un9UF<-IqPC@&T z1}B^<`J+egM5VOzqE5=-yAv*>;!h}!_w||AU8^xB?KfW_QzOh-)OM)#*$K|Cb67EJY+ZWCh>CBtJv5*P0h{izw%tzgeXJTt*4&*J$*WVG;#LdO~J2z`_yMbcCwsU zjM_?q)Zd!@mkGm|CLwP6RABJF0}OF@3vUyKyrF4jt!}3+Xv-vQnsg1mPd*rGbkISAI+&}Syy3I21egW5|LNB4ie91-^0OEW-Jhov$4&R=i_xXFeEy$Yd)2HV+1(_xD z^761C=j1vG!=QkqPZ0ylpI>nfR(FO5pv5Z zY7>g{qEvD1TCzr;O*$L3=i*7ZOD{b=!&YrOeF;zda6=sJYFo)M2I%XW)e<;SXBn&4 zt_>OQP8A5vyg6q9FV+CmI;uORga6p^<5G-_$)U4!`Sa)f2^hwwZpU9(<|L`@FdDQ* zKpQ21FE%s9Z7o?9(_E41R6Rw5X0Jo-z;|)$+du@jCrwO8r;mV=bL`uLb+ zY!%v_{VBfa%NKVVD5I=$#zdbq{k^Uf*>>^qdxL_4<|PTKm(S59A|w}S0|iFWoKeKbm#6}r4G}zFDJ7mAC|vX6U?s{PE{0%p2f8E z*xw$@c9E$Ll>wNs{h>fcF{!id&?b~^Y*N6_x#?gkNp;s=n4}LX3$`-vw;2efc}Cow zg9S-ApEaM#@11?PKY7qK$)t`q?A4lt^2MFxAp^7}CnxJMrR(G@qswCz20yNnovXR; z`tNi7J^EZd6_GDu&{wRTLUR8T)zBz!Xa}FzsB~k&8ni*A(6-T?iFK8C4k?e`c<|P_OpD~S>unF z);Z$)BJgaze788Be|~cc5bXAByD)RQhlQ@5UU+C|ZeJ}voX?(rHq(s<(@9DRAvr<6 zZPGo2*8T^p^_jn3LYg&*=lG*_{wuZ|N7vyI7uP1ouEvzgjFfa*W&rT~xuBp-ut;Rp z>gIp={rM_W2Zs!E3k$awFCtJ3`1ttp)AZ1<^iol5IK&+^zJC4MUhIEc7l-oXVy(%Q z-`IaojrT;aR`>AmkY<4IFSq1hPHSmunwLNgRq1mpyB&t!hj~_l*#Eq;Ly1nm zPisSQI}>vH<=$(Zs!Q4So`mMKRKS&)4kHZ<@~2R3fmU@n^Z!lS=e3J2XkVLJXMzRd z+q0)+PyDh+_9kzu!xXmB^_5MfS+9o0#l{k1W^pw^am9rN%Ig+592~7Sil&FF-qdjO z_GYK=$#;HzHt95DAYXeb_OsC!e>UeXeYWKUjV?YtT2!b5J%((Z zq0Xu;VLt~?qY&fPp)@d5pVVJlUcF`@6Mf(iOIjy<}>YGeYMScsb9ANB{yrJerjl+#qEsH z&`{o*!Oki|>{al9u}iIMcQF$RV1DrB;d0JcUuK=7KQP615s_N&4qP-hy;93IvdOU8G-LEQgV)XB zQVo?DNo)Jvkfm2oe)8tcoA+Ax{qjq^S!@fc0YcG3n)KGK!JoBx21o6%qyAekDDn~A z8GYca%;PJ&yXF`>E#ok>CPEn_aAah}uTk242imQD;MIkM)d1{^4ZXL&}`kU081vI57agL|Yo^1*<-_G{!`mQ%O&mTYT*w@!Lkh{fMv3l;t z;$YMI3`QVSg)@v>ANno2>NB+&mX(@Tc@1XID?fhxsA}?20p}(#kXCmkhlB7|Bg_A( zMsSJaLasDs8`QqN!pqBB0%;N*Mvt0b5hCjw)yMgl1>DFEK5U%MvHfiCr?uMNNp%}c z(>Bq^J_$IiP^5{!;T`H^+W&@e0DMXz4V}g62Nks6hSwE}PyCiVz`m@` zvQ(xy2I`?SW97<~yb1f5CD*TC57cK^mvXf@`S))#pjUl0HBTS=AvNl1cdeR==2fL2 zhuQD1;~d^@UK=W4tc!vKL|eIZU+r>B82}#L@y8qXeQxRZ99I4#VZ76GR^G6D&Hq*~ zE}Q(=uH?FSy_nrwAG^9eD)>Rt}EHw$hLVnp~aL(7OZyjP^7PoAmzeqe9M_qKFSkhfr z1h?wfd7`5tvgv~5K_E+AHQy0nq*5HF!7>F|&xo+INhXm{P`$236*XT=O@N*Qtf1-^N+Yt$}-S7pD`oja{59Z`ZR0dr=`;JH}?F1*rw zl+@t8Ip_Psl_KIHQjbnL;7G^-Bw%3!H;0AF?HFtia28u^=!;&G!)bd;R&>xc#j@=Jrzy~QcjmMMcqK%# zd=XHLD56mR{CGd5$^GoD>dKF#BmO?vU6WKKqPNabY-&Wuf_t)RFx7UbGYnW8t^adl z@7%g9l=`a^BUezrqDzdH{e1#^^_GUukC)GCCA|rOi44?!_o=b5)%5Wl7ix zrUDg=mxm{;D@<_%_%usT%-E;yVbxQo3b-|M`o})>CIn73fLDL8eLdA6daaj#kkt6| z^IT?`9Z|SbHZ+&%TkAA8&k^~f#zk54jlrvh9}xQMSCu)n_vj2uFDPj-w4I+QZKL@! zf^Pp&#pMr0SFq@b`Bg|4+H+dc!AZywo``hLVwc@{tf1)mF1zy9;46*V5Q=iE=(0_= z0@Xg^a-(_jKu!IWGWm_4pB^?1+UTxx3_krbTzj%z#Y5ByQm7H+Q?RV$&Wv!7%cwk; zZSb1ZJj$KR?NwTgW~7O|$2TR2&QcW5+7)lna+)p=Ib}!9ucoH9n+rJQ(5WC?z9v7C zLXm-`;9A*H{^R{^0b9;`YC0VQMpt~gJt+$)~DMhO^xJ;OEG}fLeZPOTCgp4(AjpKd#78ZgWkgk#EI3u zrmb`ztV>#eN)LpTt)(okJgoULdIpIUuUjFpPvYi}y}NhElq7@gYV)Z?DMArP&PWc`T^zu#y|Lc7jo5ckFmfN>97p&cFNlMmD6NS&Qd}ph5~d zLyaffa&ov{1xSb*sLY&FdiLy@Th!!4e-U?EtfXdUeKbrQ<%Wg^?BmSW8HTs;WGnym zWR-E-a_5?^*x9Ag@)~>gNG;JXkErlGkRbobsimzYUMmuqH85w+*6Dyj71@ zP)LY0V;TE?KbS+8N&@NafNpX%6c$>FL6}(9E>}<*Ab#vv9<&RTfs)WO0Z{LFA6tz4 zJ`WCX41e?)(k7N%$gpfX+>yhZHtCD$qHXFGJokrdV}ugzA)*p79@U=k`?|DQz1Q_2&`!?cRLD7nc zYiepTsE#*C0gH-YJ~_ufMyc%yDaT{20Yq!uYgDl#&KY&1!zy$9rQR3sFzf`cuFUc7 zLv(qR=|QgPUascgdkj}7IYiJS(&@x#e_^BJ`R%YjV`5^w#OzaC#w=N=SijLVYu9#! zM?|H(PFAl=D&Gw<30iiNfxWRt(aHu=1EJKAErKB0s;8xtz~cJVdwoX{@j}(5?Y%k5 z=D@4Dd*_Z~hpEEo3dED};oBXpq95TyirUEQEGi(fP4B%`FHB%ImL7tJ4BRL$osJlLR04tQ{# z!^_#&)Qu;t)4xk+2=CbOTFZ6K945cu@;?@A2;Eqgshn@Q_ZqaM?%HHvD7|;7HiL$w z^+hkelYMiS(2pXDnu^1TCth@Zhs{tY5B+ch*__;TBF+#Q9XmF+!7R7U(hwb{{aZ`` zjYmL0w#1XIT)(LCGJ%X(j$6u$(Tt=SWjKKOUJ>Q?XE~%#ohrkhltC1hnw(#)Ai(zb zK<>ZITD-IXLgCJ^SIoz*Q`g`6*tGKyIfzhEe&?J3vajl=y6Sh3t2C~T-|eicuipWV zS|K`ItI!nfJ>QVFKzS}uNXJNTBWjq}A*-mS@Q(Ml7j(eX)bss+JDqAny`bOpgR920 zK5Imf2Tsj`34wE^WMUFUn%L{tJ8;nG3`gem7Y;MW`wdOFfJxCcyn=d!KTw>oY=yEQKG3LVp)aXNK z8~k+Q2khCiC*H7}_c5DLI3+J}7KJ=5O$64@{Fmc7;!~UGsPJE*uNxi+E^2WpZBu-> zW+zQ)Zaf3j?Hg}q7zDWsz4p+I10QHt0z3R+J@kX1>JX4!A)Em-0{$3GjPy1S!e-fa z+FK6jt5E5y$DY6C;ajprh`WGx6qf@v;xC^G&W}P5<2{yLg%NzpQ@$w~eg(t|W$UR6 zFeQ4I?qu>iyj?&bxM5l6q!xv-MJ@OWWH^h!`!&RCmJ_i-I*^1j5`r z7^?9JXCeYM8k7wsumc2dY0A*Y`>Pm%=d&C=b6|o}e_ha8EVVfIn?*liRfk`Wqoy68 zmcN)4uXskU5jcogMvAJcmpH9b>(u}4WBQF^$tGf(4X@TK=LnmAe~lleF8_(Q9ke|Z zu6TQGavU)AfRp&dVQ{Q6Sd&){H_qsGkKqK&SxKo{*J9I3rG{Iz79WP#TZ}pxZ{8#Y zLu1eOKwK8cu#hvv=Jk%7=xfRu2e_~-}i$KtDo-rbz@CwQS*p%K|VUaQ0DoWty^Poa47CjEz!Y58OJtrB5RZb)2$wWiraj%Hj>WoRA-@uIWJp?=yS4hmj_5HWe z+pAKpMg;zF`_M858F42a?o|cE`AuP)_u?|+fn~J9>^|L^w}hs2xzlRs^G}EiJ2l?Q zv4~H+LEEMZ8*eTh>wep~jC}H+NzCFoY_bp7dcqs)_lsziGXwQ`OB9I!hp~dKQlj$R35q3UPdRG zA<(Ts(1TEwXf3Fr@cApDUBA9}@1Eb^To3r?nMw_d#{?_EfDkgOI0blP)9UZU+jVgR z8(a9VUl-Fyn_qZ|QyI{xUke*k)u0-NzjB|cr(M4ySIqwHQg7|3RwuS-O}i>km)7-$ zd6DV~Qs`~b#4jWi0Pvym&Z1Q~>mg7f6v_I7vInA5D2|TJEY0KlS)t+Q_;0YS`X&*Z zLR87QlhXoW>f`g!p_1Ljwt3_$McQY7Mw2M}Bg~=?YwLI2>_4_oV{uWTV zTXS6ea)W`Db*T^M*Eyc4abaRhotT&~>=M|qgWMVeIw&{!QInOysCuN0%$qmQ@T7JI zY^YzB2f3A|TO^GiK6#>yA`ZXX(3ZE{@sEY}+976KbPY^XdS!1~hMC>YFlt0yKJzzc z1a;k6Gfmo_7?P^9{_zc6!cHGlCa{`mh;F0F*gQ2D;%}f(v+B*6Q^vCI<`?4sZwjB_ zlm>}8q!4yIEvwzbabj8NUvkiBt*PBx9_Y{@sytox-L@cVI$!9Qm8uS!#aqkQaWQo) zvs{+vFQPWXYGi7Io`1&Nyl-BTcH(7E7)4z#iZlO*n^uz(A!TiyY?9g~{ORMzR)`O2 zfnxkkTH!hxe~+r)?kzW>=Ah5OIN^V552fd_cj0`JSpZCZc-#*MLCti=hJ|0q>B)EeeoPAps%z=w*;%E7g@8ZSkxjKmrlCTsAl`59%-_0xux}gMdoYsZ{PSjfjIs!=m&CnKJBcvfI@RKrV-~;GxC!)cGx@y*@LOeOV5--RfC? z@%Rl#Cp>-Kix*Eaa769CR*{x64a3)2xPf=!m>>gE=d!$pZ)It`p)gOt$K zQki`Q6sV-$x>W0aJpztP3p@pduC^=2O~Ovv?vWpa5W#WNv|dM89DMXKxE?%z45SAS zA6_k2QknNyXEYqhw&SAHH<%Y#T<-;*TLGHCP1 zov`q@wVa))SZ+W2G9d#>exHLuQG=OchoF0l5R;#O=pTolWtQd6zVXR1fNvUoxYnXb zHc>m%A^pRL4+WIzzu~oEWvs6BU|Z=4M1bURIM9Yrq4XU?{@?zKV@SQjcqA?C%^Nwu z)Cvlc$Lb9m_z({g$efUWxK^M74nouLc%joN1A{O`BgBY_2<&QK>S*n$( zXz#~Whxsh$vv6L<4{rR=0Oof|ka!a60Tc1$-b2K8I{1$VVg1VLi&lRVd4ujHWFye> zgpZEAZ1tP-x0}+th$r_ge)-?Cj8K&2&M`bo8eLGYpx78@)0s+}bS((=)JX=X^{*9( z;n5*u6We$7+O=y}2b0qV6pG;03Au9{mako_!lU|!u+t$AP(gBUk(p$a`AaV7*SK~q zF=J}Xh|n*H@a`5S)$w7pd6DdkAN3=3sXoQluJ3EVwe8fKv#W+L2z6H>^+((q)DR9a zJ4#heO%0AQgSK@2o{xRsxeb22yV;!6sd47anewq!-*NI4N3SqJ_U=V6%Kc4B+0^Xm zZON`i)&Tu-YX4+djK2P1Hx~wbJ}q9lR0&bq0@jZ>rAlxl0MJ)+az;UVMwmp4LDWUM zemn2<>ZF>;pVZF_z}Dd~nB2Zh|IT7T)Rk$vk!$)XEhsRs6~=r*XJt!2M22w0NKhgL z^>uZ_P{s7po8z#}P)q`nJum#(XAGkJK!2@GYrgyk-S?z%oQcU$8r@NYpHfK}vJTVT3$m)DuC8v}|Kq>Vz2?K&d=@%7Is$ED5FB9^|6gG_ z>N^j_VfkZ=9xb^7b&+0@P^o2<%zHpC>7d*YA`A9oZ6OTaTdhm#uKxfIWCQ}NtNO59 z=G;#qMc1FvnXxwFO3(wD)pKT=ATy8-CYS15( z;p>oX3|nPm@AHO!QZaQuyZY_=2h2yL&Vc!oYkk(dQinQxGF&y!C}GdA-5x_JWqQ4|IvM+p9lyIf-I9l}o&ml+%{84;h`B7h^PY+m$M}h`m zz2nW-dN&m<18bRcoHxzhZtebLSSumN30E94jq=!a4g%~yIXbQ#kC{n1vF(}Ns%}mZ zw$V}_AI19@iz`(y|3~(Z>@-6hCmb2R1Pkym)L=ZjTkR}*dU{d}UCrj7KQE9_4*ULM z=ChI{xmaa*8e!e)w^ss?CfJ~u#q;K?HW4FxbpG^s;Z_&LEjWfI=i>bRC7qP1c5IIs z(_jX7{b0t0tyG;vO;?xk5gFY!J-1q#H6mE@U%9-po`1{Ovhtt88^(JwwfQ~xLY*P8 z>{N?Ail6}DLKps1i&yD)n4TQ|!$RkAXummkGw^}T!XiDbc_a~oC`LPwgYtz7udHhu zd$&Udg)!}(nwg3ySDgv)Po?*XKc@@^jZ0R8-0|bbi_>3<*{cKT`+#up=h?Uk{ex}J z%t>*dt6U|;I_O79X=r$l4!iK3+eqD>T?s={8G#ffL&NazHXS=jiUE0B6je822@&Le z13%BQkk~jPYPISes(c$(^bGzg=k*`6AoNK?C-|2LKVQ00$I z?-JeSuQMfXJIuj(EP3e4L{b~;$xF93ZagL-C+Brz_H6mNVe+(%$9`{@dbZi=RnDA~ zqH83UKiz!ihUL@E3uns*^2mfQED2h0WF_NGY7dun+{)Oni?OK<-`34MLKZmfJlYcQ@Ot(~0`jy4xLLF=pcv8K)09c)aDr zziYCecbtC|qF&M2k8EaAS#LC!VlVVF;0a9NKk=-ZwDdN&}3S1%0z*?BB8GAqkwQ#p#h?0}@fn z*x0NqSH6OyR-H(hZQ$bKqL)BkQ%bQkc!@xMVp2R4(?%xx(Zh;Ixa@x46u$h;uQA6t z;^ecbea3vqZlSq`M4&3tWORzsK`b+xH?WE6rzsJr1_t zrDDIs^e3NSh9sa(+fVf75Tyz_x`8c6Tbp>01r#ZMq+d@UFmm5LS|eGWcpy<4$pekf z;^Fc^QuM^a)*_dHUGrvQR8Qw=+4UYH)ehuB9`QXaDb9ls;z{%pPeJ{atVhMisMalN zk;?W6mN0%s2PdgV;@WvtqBLG*K);Aw$t{Igq$ICWxGQmO;;ME${PYUYJrqJriv4)v zXZM{E(1f>cXoS@;*q1L5GN$fBO=HJ;bn zLGRdI6RS%->{4~!uLS&3A zNBeYZGKyXv3V|riCnBQZ#-~ydojK)oS-fr1+I;n562ZkUi8c4`-~S5dCKwMDNfg zhzOg7jH?wHW$-yKhWxfhS$E}A;WtK}0|%BoHOwY3u3>SiGpS6-<$SWTvYw~5&Rejc z1A0sutZ6=adtGW0@+X4vzE1X{VH|M{S(KAB83XdigbW|fFs{(V#DtWbt*5<1TYPL! zGvdt}KG14Hn!LYR^n4dZ_*#NNlp}lG#b*xzU*mdm&_CQ=g8UdFY;Yee@z+xAbq88_ zBF_9%cVZ!1W8v6C3_=ibk@wzb`6ptHvl>5+@{ z62$3=51eYRwqp%ouqx4bu1x)a5E`x+CV#CGmQlsfBu+s|x^IDdf>=rGxL>; zYdr+CPpj1Ps3jP>nbf}BL}wFsNUIaZy=mJIx&@9HoP;cUIqBsYaam95@$8v``g9(d zO6g3QJ#X>14Cnjz=_;8ZTZ#7C_~eTfz21OLbKSx+0aD?xL1thJ@sSrx}Ouwfw0s)w- zC}W+nA_ctwrWtH;@g@St+^OADVeE_-oLdgy+R6QPBz^PiO{sylvlQ^)h_o->65DxGzHd@wUSzkb$j;>(|BGS#Tjio!CHh z`TpiY1>^cR=OyWR6qjUxgU_B9PLjhjX1mB{5mC{lZTlJyU(Ez-c~Gi%QXUY2)`m5{ zR$23+`-9JqA3s)CuI1NIWmqEZ@%Nsko^Xjrkx9ZGI|?d_Ch;@6_=`fHKVOISqszx! z_#|%(Ommo?mnlp>aKpU6A#sXnbi*wm?_~T1GI~95R5;yAZu+{ z@O<~R=&c!<=e*Z<3mnu=Hs>xMf`a}maCJ-AwRx-kZeDJM${1hBqL^W4?Y8r5#rqYy zJ`iSb1)m%G*XkxBPXgcZEF%zo;oyF+0^H)HoUh%X09dSs@IDymt<+{{hDoON?jP4# z%o}!&A;u)?`4zLH*&DS}Ir|cfHvRo#t=N|k5vmqPyswLgwy9x$a0!ptQB%M!#!nq- z0bDxt4B9909UwTpd0zzWvC60FqMe+a`dW&jp-~fB%`+7x_@b~HPD@~XQGVC!?Uclv z(;H=dL_DkOQKe4q0v;8g=Zs`N%jQ2Y8Tn;DdS%rRl1bywrvkX=m1FI^icO5Tp03&d#db1uAOF- zl0x6B@Z1gwylXY8JJ!_feytSY{$R~cujZ+jE9Ox%vl8#_*HLRvz>#R`?v6rEv&KC+ zHPwiug92e2hgtP}zyIJBuCy3}A2bw-Ueec;-_+4DF1H)Ql3_>gE+%EaKrhZ%oXk<; z(f%20k{ViE?|L!2gWmR>jONHs4D6pCtIWKta2b&qSz^4ZubY_$*1Lp<)0p|Ee}`XBd`OF0ycqkf~@|DSu;MW*#*)J zaAn5*RcCj&)8>7}xw?cJ(Kq~8oj+t{f}Vtbn!da|+nD{>g?jPg#hM+een^rJ`s)x2 zfOKn2$bHVr%1ZPlbHpVW%T)r`VjiA;6TK}+M;UE|1d|ygtBDye>A!82S2HDE`L(J) z<^_xZ6&Zn;e$Fi{EL2`C8#!IZj0tG`hAR!y@+mm^u6Y+3_-IZF6Ox48C7U;uARVIk z=G=Q`&ciM5*=KtAJ4uj|*t0iInT+24?8@VEAr%5x7*HwC(3u27CCzjjCGb*W_QD3; zq^+&36s4gCxLXR>^?m!2EQ@q&{SME8>`X`Ej)Xf004O8SRt+nosF!3!t7bJD zOPuec44=6?9C0Le16oVQ_8ca9PvBwUmSiK(CMn~vVafR-%ENJ~?WMBfZb?Z=c-kJ# zQwj%r@E8Calu4Qv3Mt^=DWdPl$vp)aAOU2OxxmdxsbmgIceU{F{b|mB^>+)%V-hHIzGg$4~Q-&Rvo(-TfN_bz5;j(;3;XMyayWY(SPieh47PnOLw0CIhD zVzcwJXibV`v^oLBfqW6+9c6o$C8+kYN&WI)1jTf^10`1R{z`5XwuQU4Z_jw|_HWo{a_Qr}72&wpS4}VWnY#P>`jW7s zQn(@=>#vA8Gy+tpEm<>a2-C$)S;0TP#pyc(U|bldKA4yQfkJ()t_y}Ste$!;az(>G z9})X}lZwQNqenwgHW-0GA%@Kbo`Bx6?v@r7Bm#&`X$aT{9}=Tu;O+7HMVwoX%$U4P z7k5i8E`|bpMni-0h9vxFKS+D{zgJaHT+eV_QrPXWUK%j}#>&ZqP{5hgUlz&A1MS92+JAQ~4c;n0s4k|&fM%YjZK)(cCfaL7A(`dB3+lPC4QUT<>gpJi-#Vi>o zb5>A-yP)d=KFIlqSW}8YQmh2nV&q4r!~r7Lv6HO4iYLKbPQ^d!_psh$KEa)> zq5Kf$E@4Qu4w$h>?0>f|--b+wljIm_8K9JTiPAm$Kj#X6xyG+4I@Ni{u1h_)GV11^ zFHG!(PiI@=H~;|a#;C5G{IDMJX9~9vj6!b&0ChhxMm>^1?##?gRAQH^O|z=dW!IAV z!_VK}>{N;J#-8W5va+g)1vMmt|Mco>AhT#zCu8jp%0;g@|0;FWxq8r>vIrG{)RrR* z@&T9|+@_v*z4roG=e8=bB>)?UOw~*kjZ*mdMRTm-!#JXY=>=4(3)edEaze@e-LvC18$H*xRnCwe;S3&5KrT zJ;}f(V_dfAsurUET)X5cb6nMHG8$u;&`v$x_g#+EmA1Ap1fn`H8RSbwf6&t-@Ue`a zIkgbmxxgZf23o&<_7%^36%c@4rfmRUh6p`wg8HY=PPY{KR)PhA4jwp>e$-pCQmxxKEd_cmvT)GU64Ei7R2cOo(Pk)(B?a{V*lKJtu#cD_< zU#BwG%S#H|8m z+N_;Azc0aJi}oBdVaM7mWCFL*OK>U>&Jrbb6VM>VW-uHfc&ap*o;ZpZKycHcx9r|b zd)GvI8(5w^k}zak4I>|U7x(b!fAJgA-LKC|Dt+;zkMa%k_{KOTRa|!BK2iuj1TB14rb3*sYBX%m=yZ=5O1IhFw z_Cd)5<4DIp+1>2DXU`K2`_AOQmkz*4F1^Egb-&P!*SaTXRYQQmG`igPG;6YoHQThN zrlu0Lw~W1-8VEXiMP>FNR>L0*@k7)e$QejuF@6;;*4bfXhoL_8Wb+{9D2*^yKIOn~!dn`1%X54pa(wIl^tOYx8?_H{ zjyBrP?+!*9r~t2!jKb_ldBf|Xz+)na|uk5S0VV(nFc2Q zE~sb>nw8b?MJ~28Z_UorOAv|O$us5h3m&K{xagV6D9u#~#`PKLkn(7Bpk)>Kb&N+c zw4V3Yot*KOZSwRIq@T~7b>G$Fh2ln}F{nB1U_KN9z1Vz_Xk_p~izQ=sZcI8*QPEmPdkqN4glU>(XZsivzyQS~euT#F^{_|lzys|R@ zp$y|y>(}Rbi%IaV?B2X^*|O7#kE5fbY1}sNKEjX;!)8>kx1;(Wllds%*D#b+$Vd+Y zN5t7N1fyWLSg7QSVFJoW*s%B-0A!Y@h7+zQ161wzur@>}L_qqAJeQXAWmv)B0spc|7BqjPr#I;Ukzy zpaLXw-@JP#al+}wi5vd&TI2mjm;?D6oCWc`6>Ds+(>N>e8h|qF){9ACHVzRu@>OH$ z*SfsWkt5MxJ9=}tRFFXc`U!G+H1!p*ZXT-dX}~b~XPb}hMe#e@(t$R@2*e`}gSL)l z;6dYoY(%_V3T|OE4zCgR_2PvK-x%kN=Ch+CJUY-~j@NR$JYaDg(L-5FrLxI&I$yT^ zv#+MNV?*sjrQ4#N8hm26_MBXsWdag&PHKKImO)H7FOmLSb|-e-?~M_9}*Kl1e;i?By!a5aDZxa`QBLc+=3sDzXy$|RaL@|cDK0vYp;Cy+o`JY zrR_{XNMN4y}Zxl{&eS3)9omF7EN%Gca!>4-t2JlW3lWdgKi2OLxo> z#oINO02#d#?k0&bKfjGKNPlA(sMxCBJ_O>N0aUU?r=vf(PNC-1 z+2D8k*Xu5#?s17bh{$vupgcR?Hx^OPEjSTe!mMtNV(dkFP3?{K@3GC-uRjqbHlzUz zanJ5$`qSu_Ye%cEiar=+lc*33WLmn>0_?1Y^XF5ISZo0}czBzIR6-^I3rr7bxLz)+ zr`rYySAuuVx?PUwY8e?Bm{l3(ri1zCKk|4Mc?#F>LT!^(9_?!)?{6S4tNH%@JH!SI ze=;s7Z3@2A?=i|LLiR$;AKeBdh%=lkTeTuTcfa{yOiO#O{)t~5opstgS_t>CRKG9E5H_n-crE@xwL#M!6_ab}p*f)!rCJkYOzmH1ju>GgR z1N~GGt*S1X__Z|JQP7zRVC&VmJdmOeFdZ)u>sX-hst?iv=`;wOSm4t@7zuUlmH;i>XUF?Ate0q6RP&;Tvqxq8Ry7BUx|Zn;N9p zSKE z(9%1z9?`O&3;ug?wxQS@$+)J8FT>lLjhNK(FJ5IhKbacNoF<;v7~XV6DMqRbop747 zKL}!*G)cRrMj=`NM5^*&kr<2}NZA!A#4fcCHr=%cFxn@WCrn<31yaq$+uix`Ld-X@ zF4?ZIA|Q`Aj#32d(xF2VqoXbn*uo3aBVmY_Deufj`K`VB1qUi{_+QVEOuVTjOyPm? zdYvb|ND9#(WRCGP+&s$i`Ct2M0j~Wh>g6w^mJ=DmT1Ssg%$d~a-E=3cZqwY0^Fw$f z>XR)_fG`@O`v9M?b1eIT{6GpJEv+rSlrl;zaeXi|D1#SIoeHnv$4D)(z7nWrS5&4s z)%1Xb=y8f7ByP@LylBxGFc52rR(lj9__zqp$*qPi^0qw=G;X=0bSadL1=^ou-$99zEWo!etx9 znHhn~$={bib!^f;B;J?MyIo=qkA>Il_|@XRvSwy)ph9%F&M?XwilEB!db#Yy>#qQM z(5IQz{~=;V_?Ce`Vha|`%8d5U?-%?ye>5a>a_B|Lo;W9=3PdbQInwLr&z~jfny3V@xGqQ>{paVrZeFcm_6r&Zgv)Zw6#Z&Ae^Le`)qj3H z{lpwLgnlGcXq=v&-qhHrb9CLzA2DD1@opB8=!qfz#rr@2t}y}+nqC|c%YxMeVrLpVcK>+Mzsv@F+kFVTis!(Qw{$Ch4&PZOJE@? zq889<>LDe8h{HcoW8K64jwkrX%vJnQCus*%Bd}Q+@&YmF$ghn1bPf ziRFOY+>cpWlvq3;+H&iQ`bZh&%_1R*D~tSDNUb zZE0xm-+b)BB@}-|D2nk)2m*Jmc7FSMb4At}=G55-p$8K?5H{bhmX;9o4RD!|v6;c1 zcT_UbW!5}AM%-3KJBMQEjNEjv%>3};9~YUEXCFi{hR8(5;U2eg{=JeLtG=P?!&$1W z?bL1=`>;eH&_H?aMQz8`egI86d}3D6+HiM-7r1w_Y@T@>mA!b4Pkw#9HUWQx2EcWr zLSggt{mx~qry7nh^GQgT;INkmNw3{+$ zN`NA6kDZ+d6jz!-jd$&%%bz@XZ$;fq?$zuKNHvi&z3?W7KSpRZ^2sEVr$mLxAH(qt zSBds{!hYcAkCP22aTm}gc<37DEPpTjq7LSHzuNYshd`bnuPy+0FNO`fm%LyK!7P%c z@NpP30IkpZ>i^*|GmpeR!?KeM)NSLV!!tMU{U{_PWbv9Ep}-?XF!c^vG(SSxpW>(E zy<`Viw%8rTNpL_6kVYrzuvfM--?xmsIR!KKP&qWEV(Q2X*B~ts-3>TLZ8eAYee79i z5Md}P#IVG;?xl}2Ax@_Kxnys_Vn^KT(5GvEyD)?H@Dqd8|9#%NJ@kGGOmul6vk{`A_tf&25CI+etqw`PW}emjl>mof7GZ8OiX4g9UL60@v0UO z^8g4JhCp^?IsjxsG1**~7;mKEpeP1N-ksz5y1;tYes&9~*-THbKA!{Ox1~kOf@onU z88*?2EX`;J!@7+l&*#k1+@|-If2-Ckmp93)DM#@;#gH2S;t8d2z!ud^yM6{sIEF^c zO(#QsxMBg|z5vO83v!Z6ipiV^F6b&^rWb1vBb1W2+mr(F;<)3?=4Q%0;wba}3bM1J zn7d8<83#?2P5AQjK+SXK{7`COm`d)X)M7t|n$2t}Cba^r18PyYawIREEZ5Nm(Tsn> z15;xi0tDZpu@DigYzTOr4KE&`5#tCBu<+)8s=UM+Ja@EgLu4SyOOyaY-5#vw*$m4z zDKa%RRSdJ#2HPO!sjjTtS64&R;Nf6pb*q9v$!s|_VNFVZ`}g!zJP1-HTB-W! zsicZ%?Pwsj>bhnRZHF_s@Oady9Z!UfA+^dif|#Yn@G;sK9**d*=9o)vzc~j zA$Ly#_1HTE8`^XwRPHtVAwleYYI-s$Aj`tg^Vx~KPfRyDKWE)L4H6m+@t$b3B%VN( z3hy)h?n+Dl{b31?5>xI)XpCdOTx8?H=8ongu0yhcM0vsgFGmCdJFn@eF`5M|jU8*G zl^wnH$Q%qYec(_}+bJ6fzt9za!NKb8?>*_w#PmofL7fZ<%J_o76K*U$C!~G~ctunelKIQHjqM=5aNy?c4ZDX3{oO$+R*j zG>Q_oVM$3EXhcebiUum`&b&>%Ok@JdWc$j_dkVM1Te+IRudPCw6tY)bfyQqIOx-NYF+M5vWA0 zqZU>NDL-?S@%w4_6i#a4;d}%x^8IV;F8S4Wc2aMOtsn&JP7iNg9^|fs`Cimt?J*fQ z(0ym?Y}SujDqLeQ&Q7QxRwOX~oiU25R;i(M%L7tCx-Eiu>BI+8J7?Nz79$rSA-oNn z=ZmGY*Nlk)^Frbtk+n9p&^|(15sVE}^WjzjobVj-9Py`#AW+za*f7L6ka9eA&Yi?M zs)`Lm2l9Qk8M@I+m$LyYaNVHe43dvvtah66G0$THuaW&7 zxn545%o)60N*alRkjLmS=s*LOpaEGYfQz6%o2Y!nHn)zeX9yhp4MW^c+-ZI@(To0#bHkcY9+`%|X7VkR&KO>bpYqnrU5MA>%>PF0~-ZLJT zp(v0E2P;ua@R5&2-eKyo#dU@rVpDe!TZq+B^VDupZ0EOkM_iEI@k8 z6A#>kWmj@qf4QJd?12_njE>64(nX6FZN>2zTXh)~Vm-K}XFiW}eT--(08^aXxu|8C zaM+=ca+uSjvMYS&Uk5O@0I`cs)S*jcSV?a_?m>*DZ9}0rP4VI~NX$<&wNQ7JG-Z_c zWqm)$dhzhX_2vFzOF~!KN_|#dh3iUVjtJv2M-q40@68zpe5|;vdctRN{fn9 zoRio=3~uUs+|=Nv$2;$E58X*#J4t-T6};QfG(Eygy?EJ&l?KoE5}OQB3?Xjp{<|9( z0}O?I#BH_AnA!-@K3aK|m_amR7MO}9VJV7`Kv!4SKUcH2H=N3@E8cd0)A{@dTPBF( zv;16of`E`(lvZO6F?4KB6A=l;7RIiZz)KFD_x6}Zup%^~NS}i;wF+KOAA2D7F@NF8 z$MI|`OVY;o$-@%0)P7XDZt=Jb$ekVlP_IQR47SJi3~DBI+A8yojbO=nfsNPCEI{@sEly#q)f2vpwnApH?ZuAU1 z7@*W->p9TZwu?v!q5`lcrcGt0KBPAa&siNXZ3jxKK!;ItST7tKvE_2x(Jl$+4ql(X zS>v(l98$soF~x%Yh?jX9#$)gi<^VM~fj_%(jyy&^Vga}nkZP35J-iwMx(B+krD=LB z(}eADAWC^^u<1xA51y0!#jzHQHi`Z)zz{{nEa)_iN|hExb{!zKLJYn6lg}B}x)XF@ z*wv+>a?{<=mHGxBm34ddW)!GBxJ06r!04(#<3tOWnsW3l)Dc|zw!SL?~sRW{}!lis8Zn4+pQta%;I-HxeW>osw%QGdyQT<@`s3h9fxS_rwvVrb5Hn02L z6Im;P953VsK*cmG7of+l4*0w2@-cjTs0)9#w(bVAp^@xl4^2N%Uwuy8u@fhXaJ6_h z?wXcY<8vXCgJU=y)NzjY_#uvjGpObhwT-ZtDFjM(q%`0}dCk>E(DR#do3FFU&zH6m z;NL3^Q$o?0Eq0VV39N!=xuqGpcXg>^AJf-Irvfm&+L9|4P#U82^0xH(@@0Q%Q=yr2 zbUkWhJj+!JbHlJhf3SO-##Z|DWQFst-XkWl!cU)M2eM0uYe$wz0_q=BLIeF zcxCV-i679l#^5L>-T%CteqL`POKJVGRFF)0;YcCipN|85laId}nY zel{tAo0+4N(;^)c86WD=IK&!p+Yhg~!#f1AXQ7qcQyj$@=gnzIYpleew=AycASi$-s=;fM(fskGu?`N|{a!Jmi6wCx0h; zCLa?s->=4Q(?!5DcX{+wMN?}$7Op)tKJ27yo9#*~N3*`nMKdVbQx|ga;u!7C{H`}M zZY;crgVp;``Rh#e2Y-%B%7CNMF-~inW}vYT_(SE(677oJZ&q)7HQf-$f3{kvV3Ir5 zD?^eAa`0oDb^rLvDc38Pz&D^NG1B>A?PFRl*D7^fn>9rFm_0YBb5iMK%SxDT`ucTX z?K3`B_`ebgcA=gN(EfRU8l;B>2EMJ&+$K97V?F~a@zy?66ZDt z`qRki=Oy#b3g#+b|FNjJd{1N3bmrlM2kc^|^7g#1S;kv8$T@#{@P z=g%7VH;qbihQx<}X^2#JMmb~5rX7!5Oo#D3`p7F;Hh=bw&%!nBs@fx1M^{2^oPz?- z9(x3PEh$x+rzetf1ZbV*AO@LZo&9uP_Mj%^cp7WDaje6i8}87aw784U*8J^j7OO9< zZl$anJWEisVgK6UAz^4hKHX3NJWLzG>P!7?S_>eQ%Y5EykqzNt2R7Ui(UrHozlVpa zI-K>9FieqpeMhZZC4R&^UvQ}$^$Qc~@W{y3g%oPvD&!<^j^MJCbFE0_4ATqjm5;~+ z5t7g>en3A0*Pb*eZco;enGgtPw6Gri%aaxmUxILH6lc0e6on1K$*diR5fs5s_24t ze-t{~xxg#xq&jYbyyg&)#m!m>4u?B!aP<0xq9${(!UloTijknk6U8d|-9U@BsLlxG zE;j%LANG>1%k<)(g0nMTbEk1e=a4ywRSy}lI^7jVpzp#AY%k7wP<#lIH z011MEvNJ!YV?=|b(4c(PpvNMjo6P}EsnXtq+Ab`|?}tgJ3%0*#VeMDU^G|5xw@10) znc=V?;Xq!GI@&HZ)IxN-IIY?9x0{W>24bBKl;cG-CeA&QE#;7dazhip1Jzj9*Ac2) zx7s}VIJEw+k7&m&B7&I|T%hT8Mp~iGl=~ zoNn9^9-sw5R&jZZ&WaiO2{v2MI%$}iJ~;))Y*Y)2vz*B<4hL;?@{Q+!_^F;o?HK|^ z(L2R}9A6X|JGf}t9;0O~zFdXDZ<_C-GY~g>IZiUOW=YA;W8fuJ?lJP3XrFle&+85G zLHGzdXC5T|g?-~l+qRW}Cyw7;2z3maEn;i%o1qm@(TG?5s{wPg`6!(a#p*z|LQ)}8 zVsNRnKh$l{&x*PzsMxK<$HzwkKoHsCcr_Mz7p(<#P1^ygcnmBukLh%&TZo>9OFNPo zR!^LseOI$S0bgV@Y6GMxFeoW^!TR;Gf{V~`i#-SczPw%;1 znLz)@-tm*?hTg_#ZUC^|M{!eTNf3dOz939jHmQl~6>tp=t=TEu?F2=ng*~16jb!{DPT@?5#n6B%+cI||1wlvQxozk6z~c0z zQ!-vivcbg8NQUcFNi@wKOYbXL&6+`_=e@@Ga+m~kI?gc5@y1d=&NP0y571*DQB+t@ zkHIQYe@6z5*cG|)RPu}(Jz6o}Vhk%@5o)-sd+W3jadIDiwl^AY{Xvx@W+!4WW~$pN zwGoJV2Na@D5aB?)Vwv+!-}P(L1lyIrK)p%5GwzWZP9;s?XXI_9&b%33wSN<2ggeyz zK_R!$`IS%080%|09CBL#FH5eLXDOMyMF&omEp{GrY`a8#Ta`Z#!WwQsPo<4}q6sq; zyXjZOf>1UDqwA;NjRJ5fG&smz-H4|>{Wx0!;S|o0Iz7ghFZuXRFPCVb6U^$k@plS7qL%L=}hlC0fIPa za0QQWRL~3rTGF@y)MbG)4IDO7*Mz3wdrM0M5P49rOlMH}{gEsOJK{1RAdV&DClUhz zrAY*tPG<_vu@F>qPR$85Xd_Iz#zQFa?LMT3#OxB)3@nve02(^g#4yX0s>c^wXzg8RWm~!IaJmpzy#@Jzt6YFndf6E8TP8wFDb2a?cvEZ|(K7KYTV0D${q4z~GwlMf6F2jBXm zB8DDGtXC827LXjfaVW(pJe}h%y1CkQrFy_$2oE7OK?vXgoD+VKeet&V49060P)O1w zV1q;Y!qTNKAD;F`xOR4RJ77h&}4BT*RW(s{uQSaL0{V?jRbe0jqkJrykqDjW{JzARQA>ElBZ6%V8M@xkvHgvDo2X|vo2!tX;YE$%E`}|=EpHVw30A|fZs)cLp3;$ejQP$I}^nnb6990rJ+#U?PW}#M`H6Ru?5i6(5no*}a{MTEiZN z4)kB2Cx3nU^7fhG-=}neU`a4=mr|x&&gRl!BsBolXWl$KKRn&Suv{nh;vO5v>fAg< zt_>*ee*XB8gO)$WIAg}Pi{r=m|3e|94c$5gg$^)Vq(tIv^2T)Mruh$F`m8{n@)Z&m zdATWaBLwGLSb_?K8zG2mFXtlUN$JupY zf+o2wvPIjx90(T9Pq#^8d8^*&2^wX_$~DYdX!v+eso;p$lv2vtcjI1HH$eUet9LImNrL3AWCR>>V(C* zFb?R2^B~}iqSN>+9+5$JT`3WFCot$FlUbI>7R1)EdK6+LG9xh;SiI2W@mgZ!MpXQ$eh!y1Kbz0=k-;&I#+7S7{&lzL8wzaFv(g9S z4d4dA)+WoFkyb_nTL|AFO^A4Zb$5S?L(v&c_$larbTn%ZuRV5t*6;_$%Pez0PS6&8 z9(HtT_;`{eTvSvP{r6A{PGBo&-Nl^5Q@^4tOYzOh;*V{{5nx~PDt!6h!(Zb?$8P5s zqmFu}fE$2KrQ&!&+gZH5nD3d-AuK?A1Gq(Y5SY=?+m_;;1ctCgUS3|m)Y$my@SPUb z-}&-DI*uqd>2j9F2}26p)JvjX>^&$@xd9|kL+wYd_|s<1T7nV;+5-}R5M)I6*|CkO zu0v@|+)x-PW>7ww0$k$;5De(9(0Lo-B+?{({5TMSnFgGmq(!3goD>g~1Opye16fpr zOjC5jqMJ)qR`1|K<^Te zBO|@(|KP84KNkcY^Zxx<7B8f1}8^SLfo>_xC+>_Qt1qd=^i*aMa2%{YS|phs6*XC zWK`+&Qryfu6jPxnXzS6ps_wZ;OcUv;Y3M7C!+c^;J~SyFZKX~Lbr@EjvF>pyY9R|E z>=PrL(*bNf>fLV9iwUTVBQg!NnJeJ*xq*2jbl#R3Aa1CF!bdD;v;U6k!(%2rQ!E^3 zNGE)}cX*c-m7eC`)D3gaN088MgWwsY4zg@eJ`nqiXGqW;)kjITi(xrNj+v+!cBns9 zgjAVLfF1FO#VI33xA^&U|?H+Mx=_GR&fTAYsO6LlC=HP(Xm5l_qpWC>1!D{d#*~-gJXa zb#*YbG+hLK$AAvvvcx3jyk1Y-}r z9v`+ha>4FW;%rcK6=L$5At7#(_C^M`>7A;VIK`8%umtw7$n0c(uko4&oy%;${HCw>l(67^u?8mg6s> zt$_+zub?wLCwy<@1M~}zu}q7{=X4&7*}DP`u&&gdz<{Krc>qOQ2v!Jb%&4u0wu2W& zK`aaLQo6buHlz+B8|C4{Wi8Tf8`93PM{Z)akG;-cy{PNTtt*?9q@13(F4+6RV#1^9 zzi#C|$h}-r-+Jp{f#|d(HKou$6}JDdF+Uq}S=1sSbnK$bdf%s9^8a(nf^qXN&0ZvV zr?|%5PG(~9#<9f-E*mT&XEgRVcR8PU^_wCk^2Wr;9p zFC}K_Ev)!Een!LoI?`VUv1HDMuZ?D3@qoHO7uExwHMFxsXmYpBiNz{;fCP!r;?{8S zZE&{4`!!uuw0yrUAIm@1RJFx|l?7X)IS}7Uqur;z1qO^@f$P^3a&N$hQgO;GXOR!vK-P?BA+w;nQ zwEFn)eFjFeF0e=SO9T{%z<*yuM<*D_NyG>D^y0zZc;KXPd<!YGe7_$u zkILVpyfhknCi^I;%5wl^Q0`=KK)|0Mrn#ySPauyvoYR4^T?nXU2f;3!OTPE=HO|5mbam zWA&4M$o|=*A_4^vnFOE^kNQu>&pImrfDcFgUeyZNX5t0Ida^3NQXo=h^$cYme5)*G z|Gh){YZq`%*fTxC@5rE#z*bj2{*)8p*AVg*BN#IWX0}zoa5i#a-NHTNCIMoGBwM&y zk6|?H->Qv?3xLQ==g)r`l?~9pV67iew$V)gt!C!X(o|C3#&W)Z96=aje81ad z!1UX5a@}3p7e<@d4#xN!8^Pd!P3hNas&aG{LT^7zfVRL5-0b4xYir;9ii3pnF}op~13NLKo(7|T^y#nu z{@oPcr3B+}#o?%n2x#?n_%@E`5LG|q#ZR+?FO4+_%f2S6P_iEB1B?8!wQI)Lz?g($y)Zi; zwSHLm#`|)!Fsl@vI^e{~1wcWWl0@5j;~NJuyZpj2<4tqbWR44S%()uba%v5xsIbUO zV4rYFW$P1c4Cs<&w3YpuaJG4AM34J=htCqBETpCxGxwAlqCa^CdTm|k<|hS5BXR8k zzAFhA5WFWKly2@uv;an%mm_@-VBfqa&aj9Qb!OUkQ@-O4RaF`HXVCG(hR%IBPjDPB zPmqSJ1AVNc>q-wA>rV|$5XvlXgMQh(B+LCnOFB!PYZzVj>NxlYz zjVv3Jju((+|EEu%+I%0fajw;2P=TR@6Z#M=d3=aI9RKXCMB?!sc}9is$A(os0*mF5 zCy1@)7cWl`5wIQ5U+cp?iKfu#5Wp!x4mDKubs$v0dwHN(5Zv3yR*)jQ5Ee;OY?Sl_ zd>62*Mo4GZ`KLMwjPvSYAEKBdp%`73X=~vTRg3ziUq--7bh%eXfxokkv!9(}qmyC7 z%)aE2te7KNb zVadsksGU&_)a5!`|9G+Szy8Cs>w&(km6<>|rOa{z0)2nG1)Y-6x_R2@3nMo%ZI!pv z6eV3Kct891lL&at8g(ub5%8B#%wQmm?L*2Dg!413E`x%C;XE90VX!wRpJ)b6%}21X z3-sM__Umj5M~62$Gm`uw@i3kA(|ddR5P49A$b*bml7&BiT-A^7Nr~W-+7SBNJB0P= zX2=0KjVpAGtlog+MV!flJq0Cpmi6O4Er|o`dco}l*DQ6KN8bE9k~br5(Timl+Kw2}FMqXgI)d}i6a za902!1Qag8q9t=xI73p9ICM&?P{yil+{jRv6hO?80N;oY*i~H87X{_={!Ii{T`l#Aj#?>(zk*SK0KIp zT|}IbA=p#9kQ^w;9iB1-5hck>v_zJfaqpX1mAxg}+S&~Wk=>2P9{x+Ob(|Z^lC;TK zx;eSa05L10@2$iBO!B+n;AIFuu7@Ut!9i01Bxw4S++}l@4?VLlXJX$6gu>5+wsZ1s zhQgI%`IdYSQ%2In0Bj`c;eP4~TUo=w9_==HL?l2wz@dl)GCcArBHKa?BIeSB9^{5? z-7t9&<4~e2Ww<^Kns-dBgqd-o(6b6e8pE8d*xm2ohaI9{$bO+5q+2VkSn4G)h z#*PD9*Xol4lFt>oznp~=?*#9flMJ-&Fq7UzsoOa_nsFabmCl?#9T}8nct%lC7}A90 zA%sz-6kdbL=Z7$1M7N&DOS(a)zO?Z-hS4mTGtMHCaAFr7w$CS2 z9}mNRpzn|gN40P zn-lLw8w-%8hze6wQ~oGbm<3q8aLp$LIpvE;!&!tdB*ZBc#zLjy!M2S(szhO};J%j2 zd8m%bI$X4;9Gdw6Z=HOtv@bEqK*^sTGPBBg2>_v*YmgCP__P43y)mPQgU+n5daE^ z%m9ofJ`kfWtF*^xYiLN-qmBGe(jcOg2@yCDe_)o0|J?3bzGm1CL7nl3+!=bQT^X}j z&OW?BG&_zu4{2P~xiSckEQ0*$5zrJ0;eP+_-A5?;=1i-`FOb~eU5l-c9gBqD3x)gP z09hg{TlBmdYf!cn4}xeJ=mp_tahI1PsGeiq_@des1?jG^9C@{r`72khtks*hebUHh zd>8|}il+GM;qfCYaeF-2FyLnpGoyjt!LMq)*eH(?d{)u@NyTfukLWt+_!Hj#|bmo;DaPcy$W5L+NMpfx;z~d(DqdwPZH0@ z25R`j#G@uRXT!iqG>q{1xA%M+ESOqhopAUK^Xr4ykAB_FC=34S9P@DMQuj+J9p2*{ z=^{O&!XpFt%9<$9LEJ=J?$hwg#u2 zvQPKCMyrn|7|lq`#4vs%zd7NZFbl}7D=1ZGRP^g%_Y3GVV@1pSf^(l>(+neh*@oSz zC=<{oDaCR9{3JLgzivQa&f&WBJDpZFLn(NjkZ?RUAwel84eN^h)N*Db_Hvzky3v}K70C1W~R^A<-zcx(TG=&pZyOG+2g+mnO9P$vs z3$@1PMShdsB6w9}-86wC>t}s>v1;8qU91IK+!h53C&kQOa|nLk6vaDD#MiHh2SfZ1 z6k@}aJ$Q8x+Ej)ao5ZHLQX%{QMk4$uMG!|MStcx#kRarh@wjuxY;+;sMEmlELpw!I zVNCG!oYPU${Z9RSx3-iD7_6)Q+HEGY$Jez7f0E??@?uBzxpO1IFFY)K|6M8Qg5+k4 zIy>jDk`3$pD9y?Xd2MLg_KTK6AIByOtJo5(4CL1$U=YZZSgqcE*-iu*Yicr@buduf z4Rc!*G?#VyN1kbY5#02m?}KItxqp%?qJ5G6%>POeEWB-W*Lr9>_`?$kNf7eZ!?&o| z8UQ6^3^QVW?Z*_Av`OYHno=VZzyR;m#lsb;c}y_N37tGQ0J{d$0K8J5BtI-MQ3r&I z6U;9OaR5SzLte7B=f(K%I6Nt})Z>u;KPiGLLn(r5<{`o$Hhdj&iz!0~5WT@^Hj$TYVPuow^0LNdCpXw{p*df_&5VU#INDkCH_) zSzL#29cH0(-jAq73(x?j--}I_iY%9a(QdDHwR`)-($NbRO(W3~t!NsG8=Hh+{HRZa8kfRf6iK5s!m{hoRMo}dI|4FY?!gB+O>s5)u-N*Of*tWXtUKs8JD&`=aQEBTbgF z)lmB8=y4dt2Y@wN0(}xpw0}CR-`MpOvB0DggTV~*q+|8)jVg)K(&R7sdejuUSZ|C= z{!hr`--t)Btw%lXaR{_96cSBJ9RN{}L5FfEKD`Y1<$5}$EETAK` zR8iw|(7Zzbbe7S&E?bSgZ~y`-P4rRiICo9aRQ^Ut2qp&v;xSDxS{`>0G~GuUcmzs? zOzGWpilb?TiaZ7uM;U{^B`zgvE*{XF$~Uu$_#(WJWV;(Jb)ifV0?>ZQwTiGwP@GKg zZsyIOX_3q3*!&ls(lLyutO$RUJ#-))mKZ5#NL6#z7TaFmM{AP_DF_Q5xy|;*y?f$y z?SX$?yANEKM#XSBLY6y+-*!1KEkrb~m4gv55Hc*JDm!^$JtWO(tOTSm)n^+)wxems zaT*<0>0GAXnqsvN*p6>p*VWkC7Uhx`0O0#0N8Fs>n0)i-dp)LBtDds#DZ~!30P>~r zdMgq5n3{`!K?{c$XLTRi+FArz6>rJD4*&yeaF3Hy&z3Gtuljm(8gsz#OTrVE(B`E1 z8)gjMUM1aWx%pF-(h%;>L+)X8SP-SMd-n}$cr~@O2$SzA&URrI0ddI9RmabP#Pa8Z znpR+l87P1;vpcg)TOaira^j_c2wthLK{FhSw4q^u#I>O{qtu)5Fw0rb+?@NZXbUBl`-0Uy;LW zqh!H|TCF92+zku}$d~ULnilh*0}q^&2QX7GQh!pdB`WH&+gW;aNUzls_usjfT9cKYZ946dj!lHi#@m8fEDNl3g1ga?%zK=- zuYvl0tY$JP^DLR+x8OG&_-GwA7a&21b-`4H!w-K3oDDe>VkB1fNfWO}C-U~dEOZ;Y zO-urD`r!-v<3OTVt4S9h7RsT(`-t|B@WWTHHj&GBP*4zgfNa{NI_S~S+Yfc2CvjFd z!;4NL=}NyS{Z(aaElQ$`@DO=~zk_gXgxl=g$y_B$5F;Nt<->?*&J29LHTZh!S)=(CZg(_{F)$XEskNZdn<^_JRmSko|o0ER=yposkqr0|2BD0t4z5qx*T# z2Kcxu0|5B)K2O`th1Fs^NO_Xc)8{&VW>!t4VL2G&^SBT+(|QnL@HR#$1^s_%X=v15 zULGF*d5z;Mw?^Ihbg$KuyV! ze#HI|D=+(pkl-A7soHMbR67O@Rs%Np0zm|Q``hA9lADWx%P-?HhstYc?QUvBf4r}; z$JPm$2dND3Cd>y6PjUx>1t}hQUCZ-5APczxIP{iCO71~)%tj+S#6Lr>O1U(e`udjP zXB44?XA^QVQyS5Jaq^xBFn|Ww-2!xEtc=1=RaH;6v586HY^7c3)=+hN)_@F|HtjM$ z%T)*fBidWjrvuLotdk>}FzbG0iTG%il92_Eq284Q7+6Sao}Bp7r5~Y+MR%9wdIDq1 zK+^0DgvVavKVbf1?!b>RDEsMqc@~kKqI%YjD#jJ#&Kz!dLbVWOhT?TcPQrDB(%o9R zCm(rg9Chp&0eRBF*>}_LK+E_5R-q$3zI;N0EISB1#P2VIEJOU4C)hP&djw)OXeZZV zYr;>H`M5-3PBDdYO8n7C@|?MWZ)WLKx(o zPOAkvi-r&DT4F+l#ovYA5ZOCfLtj4(;&McUQ+~5&NI2eypfhJiMDGG^0-BbSOBqXW z05N-YZXAWVBUf-mZ#Pm<*!LzmH%JyGQec|WaO2MW)46Md)8+0$!6*_%Gfe_OLSq@`a!>U!!dE~KnIbY1D)%_%gDvz1%f!XQ+WO98xrazLA}wC* zSW=lyf}TLhVf_lfQ+~LsZ5uL$%|&_8+(ug-U<69$2A(k`rEn1p8su*?9aWtdieaoi zM1McRNUwZt37}wQ?pAkEOWJpbIPzxSmhtyqEcy#iF^q}M0xkfi#APp%iOs;=g3fNEv}|3|NgRxyaUdi9*qF37J0$pkKm_iiZm-cGMvomNA5D0qsE zZ9|Q(TF!fOx;mnZk8JuBEP`fST_r(aIgauh8f}#iPpi-2JDnr9diBTk$4##5YKuQc zQDzF174fjukxCW7ygZ8z85<*Hs2+4Cmt8ePPH*%P1mL!hW`xNJ9AgH`+=QNeTyo;2 zMm~}5VOKG#eECCe8;qDYS9Lm`r2eWF=1ALzg_&y(6D*d~`RtZY8LNsfbHoutbq4UT z=d#gb*lyg?j|5(jS&l0(EI@=tz?Xt_3TNfT$7K6iTh(jhYy!x$g9|QXcY_dK%+$Ur ziJpkT9*H(@UZ}fb#_ADm@tq}%1&$canp3>@vbWI)VJTeur`EGB06JP3wCFe8byNtK z1M#B_=jHPA*`0`c)Z=RG-hCgN$e-#erg})1gZR2&nc*>%o65n(pIS0KUgMJJbPzrD zV4PGTjwH3eMMTBv9Zmu@O9^O>jH4s9J$A3BYu~;fSunl=8&@4@FRiUxFHosQ{R-|0 z^(%mRrsEvQA3}rC&olrl%|%6oe|sN~lZYI_^*@xt%E~dD5{q23oWJKq*HLk2t(9IO8+)%_ zyB1btPy5Jm^LG_qQe%H}xi?p<=7Dwm^M6CVuk!z{_b(NAXPK!eTpC^A?YBzYIWFk% z{&nR=;?r9iJkO&Y0HeFRA|mEAbVWVUFOLcHF)9jt+X02f;SIJeZ}I{igeB0ss9oZ} zxYN$odUc#|x>gBWAfTZpwZ34RbMvG5Z-&dy5+p#G%mW0b=-2YRH2wAKVmY5Yyx8FN z>_CpmzIU)k1MLac4A4(Q+3=sGeFnei4=(~+bG)TooJ0A7IB|R&wmv2-kSlfQ?e#_X zwt*uX`017U1Ok_i=7)-1xqti);D<#x&@L;hGtn#Bo;vp)=SVLSODSt%kr3Do^4!c!4=&O^tdm7)?xUN%^t#IWV=M zAyRvc1}6g|z^?1`?b71!UA-94Sus3iVij{T$l~*h4s=-R_?xDiaU3pzZhz{con)GY zxY+vEebhtK{nwd`o9{{83bjCAECkZXnhTk}5g6X^PKTWl#lVpM0m4g3_qhsA8brlF zB#>!@-3kbhFNLrWqh3A!D;=!C#ecQ9t!o}z!v6R_2*F7IwdnD9jU_2WVC~J^KF~-7 zR)gW74i(ril*sI)!7uD<;feLj2+AZkZ+0Crb%WS6lOO!#3EkbvQf_64{tCyf2UEqS zYnu=(;0!A@GE*Si1(b@vVFFen2Qs-Kr(Bf9Z6`~i@-~1822<_#4D4!V=1$bOqhlKY zIwQ9*6lhfl;Klj#=VN$#O<8ycGlwVu9 z?b*!09x`=7FBt&&v1I%t>Fl;cuYpqSng- zz(OX#o1c2lBb!mHd#(h{R=CSf|ElER!k$ggDC!QhYctNR|KbUtb=d?}gA`ou4fQbL z_^&ufRBuw4+#QO8WLo}Bbpb-j<;6i_xtN1Bzyn(4PFbZ~Dbt*J6vndASZu4Ch}pnE zW+mF0xwIuzUX#@+Pjh9EbV<5VFE1a&K~mPWklay!m#(A=9Ga662Z>t#nv=v~_vOS9 z(_k6mAQ8vM{g7bx6`Dg$0|P5ZE6i95^a$!;DNlHuSL`n=eKNV+$xwL86w*=ts}kNs znKEp0!%nR7)LmJt6T$pnYx6U&^3j42*M+eo!SP4j@^hs~yssFzk8$QB?VK?m(!+&<6LdN}9gRufG%>3RU zqzz(Am#_v(D+U&Ec0kX7r**J6Vkj2=u_|+qT@Y&W0RjaG^)j8Z4v#+~3S0eMZQC4$ z=wdwr02q=erds+iQVP@*emwkD~xlk#F93 zi>>-Va_N7OJ!}q&SU83W%vJns^BGJF2kHTCfVa)O3kS9*KFzX2?ZoELBu3S*7wcCh zHLl_0Le_e?mqKz|9WsA7V!qv5(b-Auc2id`zQuk2g0i9Gi^YyBw^{&rAB*RwPFSXb z7eqGzSiFVs@Lsu7LGBQWyJIw~vKV!`F;TMnI52wkB?2G5l)xz3T6XR%!c6ASM z5QfCZ$7`(vV~U}5(o|zMrMi_AL{Xs`NL8JW5*|#6&jAY(rY_LUT8gYijK|~yY&a`3 zZ{m^mA{3Yzy`M0p5Rhl@$6M0^jVbHkkgVf8>%x5o6En)e<9<)d-QCJ6`*TDHL#_qj zD4km(luibj6xjWz`tB+FPxZY$c%SsCY=y43RW_qKcB4ANB$X*fniJ~+eKIT2Yl6Dq zJwNkuno!~rT?wA`h1R;mseN34yB3H{DYv$n2?BaGTgS{dB@)v(N+HUH&&?pZ(gY!L8 zr%cJLxOm}$Ie1GaY`NrX`adL+%w1?lM5e_XICm5vdc+4kMmvN;%hs;l2fZ~Ii&z<@ z6-$;}*I2iI(%6xyhpk6^0&kz(_cH^!&>YBIL(nFJ09v+mDF@K|!LX>=V3?3QyF)jt zvQabrcm*UQAD4_3W9{4s3rMeTllYb~&V6%O zuFXaH`E0KYF%IP`_&uyMxNzX@s)@|Sk4^RU^~gcLTQP2QIc}54N?C|9AAyMxr2$fL%H|M! z2@@#4g`2ivXaJ0=0g}IAxas$B<2FEhNbb|&{J-biFrzx=&Dt}V!;H;EFIi~<(k?4pb%ZR;^o5%xV``C(I_5t_r zZv-c*jn*7$4sr`2%UhUad$5(`jGOO+z=uYS;5yG?Flsx*2 z_3t}oiyusOf{r^%sX4)>N+W{3k*LzmQ4bVdBkK=v07uIz0W3oRQ^d?U@%dx&=`r_l z3n3hLTt9MRB(q z{wSYIH=Jm`3)2f*LT3h?E_r^nlPB{Y@YEpQY5wnclD>+H3Jon2fx!U9SSBm04a~i{ zgUWx*;>WG!|63SewBbGPi$<0RJ7>zR=k?{d)T7bnJ zRArL~JQM?go6xvpKAqG7nABl&pb~7hgvbNECPW5Nd#u|}CXut@*Q2$k$B5?8Fs-QQ zN}sGi7&hY2AZm^qfcICXfeIbCdE6^W7fEd{^5~biVS73lBL`6RkNhac zP#2E|-xbap!OGdMTN^}E8X23FKjcIv(QpY#!D(nKX5Ut~QHumF|( zw6F|%SnPCxDHryGoj{VM+|m6>m0;`2Hpt4z?BJpWDh{go(rq6R-i*syMYe6`rlvVq zmJz*AH@S6Og_BJU)(3GLczUIC8k9x%DRhO3GEec63U?OEHlQ`5CR$GvUfm4 zVUA%nyfJ%xDuEe^afn95ru;bKRMm16`QAc6WNO2nm8%0#rSUPi7$+4~cH6u2*2dGm z-ikpjd=XHHdDWp$Bo_YriupR^pZ*_Ltkl35t4K>r8>Gj4cr3I3g{!J%8|I{8U33m+ zNZ1Cl_M^fiH%m;h)FRY{M5AG_G!nk57++9Sv>Xf}>HMIwjy?6uh7xMBgiV5~RE}dc zlB660E0|m0FYrD~fLg$m^ZJ2Vq!5?ycrKC}UdPlAEUp=m0VHDu2kY#I`~{H->;G8= zlJ&9DSOx#N&Gef6h4v`lhNEt48=by7%q!Zy^MWV}>bsb3ukxLG1e0&%Y)KdhC}jY4 z4dC3huy^(@n%uo1ZB;wETMOL#9$@7UzBAts(XbIzISogBrFUT#cPR&&xt4qfY`}@f z2XES*eh5&9#LRF6`)teKb4H}W@t+G^SZ{yyzQLH4^|AIHZ=3}DYd*S;UNKKfD&KkP z80*)aP|b1!O0AN@(wZo58QoLfRi$-<(8r*)X2>!h8!t%vjy%5s4K7?xf|?y> zZ>)lik2;RL=J?7<1ZV-I)Ph5Eb}33L?)Q|5kqX#GPc+fp+lDDAwiyUS*_b&vw|{ZB zX=N+G;rA+bsPj&9;&DnB2scQ(`fkI4_ZI-P?Oe=mhU*r7`t*e1a;IRj)D!}?Cad&S z6M<+YUg`4EUw2Wv;aPT=?Wy~(F`Z`*gp7&_lJ;7mQ#qcFwA3wNq)E4!+?>(ZcZySg zR8`W=u;>?F_O*kO6Vs9hQ(LcDJIvYUHfrU+_e~vK&X(l3l=8h1eC;b3p&ZvOpHbjr z?;?x?&W^Py`4mM<1U1_Xwk~rFRB_V=G(l4z_ED}RFKhU@W381r2i<}M5wr%I1CD5Q zrPw~L2H{Frqa3gQS%w3M;w{NxjIe=j@j#HwQndd=3o>k=E<091bNjY&x{0PeU4$8dTi zIFOzuYbFHaNGHog)3Z;cV3+@pN^cxaSn{aCe1-W5X2sg-xhSGM^KCl!GzeS@ull{o zuktt0#VL;?@iaF17Zs-1C->;;hLG<96_d`+$z&M>#;(DqqR-@FLv>Y^8GImt0VJkZ z`7r|tHa0f2BY{Vxx{|aPyJYLeX?1jTfNnYP_>HQcqCQhsSJzwtTdoeAnxrSk`@qdI zAyi%(S!09}H2A#K5=j-VY`}`_JB*1*GEMEcV%SHBLCewgYYW@t+fHl!6n78xJ*nkh zQ9rZ{MCcy(|U!M5tcYlxR1{5Ep7F{B==qZs!To zqA97>RkrZTc*a)#9+#cAs!xP)gFp1-yecN~tzo`slWkF%6$;rR8tQ8Pga?i4#{zMF zqSmtT4Tvj)-(nj!|u zeY6I_sGm?c=HuyqmfcA3@fiUD4EM3R3$TtML}TzbWc9W7cY*uRRtL@%(ED4H=-7QJ zAPDdou$a&!d09bDjz2c~Il#+zDRkTd*&GIRHs7c+Q6Vfc_L*-+m5qDbceFj!0Dx>0 zB|x9D@=&tIoMjDm;7P6&Jups^ZBEPD!{rC^>27{pGe>AsLAZ%|iJxklD-3@UQ6 zPQ-6M6kSZepQksZfMgB?3Hpkgh4G`u9^x&ZFU$#=S}ogf()+^0$jIHKmuI868%V4| ztYkPFaC$+5ZH$a#w%-P3bL8>YkZJ->VsmKR%fX@B-UyckI7^HJE7{$EZQWm!mh|?u z(X>wcR>J6%JWI^Vfh?dY$3(ookXOwM)rsA~ZGX4ePfu208wdk-9fgqX-McrbboIo| zhNoK3fACcZfl3$08~M97OWrt{3uuJRselq=`jl_|VbAb-cBOPFa0bk7F+^{g{C-C` zl#_&Av;f=xg9i(UZ{TVe8b*L(a_0uXdD2Ng71AYGZK-1<>#k~zeMZ`=SL+qa=RD6U z?Zb#)S$}GomGueXut+QtduvKvaGiUMcQZz8LcgaKVSuPZ1d#N$e*1QillzvrvCtkv z_6~Yo5P^Th8l>QIOkMzBQbr$0_7k|(bUgsWZqG!97YC z_l)XnjD}F72MhJu4o5T&WFJA@js^XMGkm<=X5=jx+Htt(1=>FuxpTN+EGq5$Fq6HA z;h;dvgM?1Otr!-)LPA1`BFZQxMo*kIkAwccOK#D+b)^ki0@&7raS(8FA-DM2;fSVo zErx$GR!zio&55;id*-PP-5#X`;FUB1!4a2jz5@9(G6tTzS>KaQ#0v%!7V0tsJSA^} z2<%8><_@SqU95@Xo%arzoshp~fo`9}B?l$6&+$H=1q1{rq67*eI^EqHF2IwHH~jzw z_Y#PMKsDG%q}tVSvAV+WTsgUb%i)ApT=xl=<*Ia8GVy0Kz4Wzw_+%R2XV-b9_8BJ~ z7F1@aV5V$f_YBOU#$XGlu^F_jb{hsRZs^-c=qh$}&=F!BD2Ng2tE?wl)x4zf7Hiiuttjf=S1b-vucc&z98QU kIzn~ne|F7$J;(}IjNQASw;JgKEEZ>r>Yw48_MiFx0JNh*`~Uy| diff --git a/docs/articles/AMR_files/figure-html/plot 5-1.png b/docs/articles/AMR_files/figure-html/plot 5-1.png index 81e1f8648ea3e0b1b55479a1bea52596204eb8ad..5817821cac5357465db31e007a9d2eed6f6714be 100644 GIT binary patch delta 21415 zcmce;30PC-w=Nz;MQagTt7v6tYmg$7$}E$utr!qeQ3RP41R+c^Lx7ES;Ad5+I}9?b zObUk4Fa-#TKm!6Q5Wp}>05L!y5N60-+uC!^J@=mfaGv|zKIJilWar!8w}yAU>s?`d z*ueO(p|D~ywXl;{D30?X-5#(OsmEnemG*XuV zJ(k~V&5b$GV?$aCMi+WR#!^!!*=0o8aTyUD{1+YAXp39Bj`rf{xXb9>(p zn&zQ%#`>|UySNgZ&@PPr*S6m4hmUSWv~~iW@Eay@91~DGog~poY<4|m#KnISeAUu-Medz zs~cuneTavLM_Vs{wpEumcP>xBC8(VAwMF-#w#66fZZ5<`M+Zvk$YNVj`-OIPw)c-& zuQp{0on}W{xRU$)S`dw{RoF-cn=-HJ9|-Q$Jbv|&cxzK)>cPP0z$sS26p?w%_>$jr@lQ#r|BAf%z3a%-**VZ8N%C0bAS`cK?dm`tf z+^OEizGvFi7n1kUW8axPp~n^xHlt6Q-cJ?h_j#rFxzlRyb2bso#syV}nY(lYC-xW~ zlg94Qag)>;;<2Ekscl-Ovx(N+{U!=k2YgQ&r=gD?MD!S_2@id)DVau|swj|_ zl0sJ9QAs#4L%Ym5G8jdB&Dx~5kXJF;W++^h52E)unDC9RUAtDm_?VmLB`Ynh44 zjXe_Y{0wfd6YQO#{8%t$&CO^vSea;iTb)yP^oGD}U`4UN)EJr9YP9XI8ns%=IRs`sDelr?LE4d}{d0 z{MxFZ%R$(3cb``Nd3xYv!GWb}ys9a`A&X^i+?RF7F4vlSi7ZGC13OzdvcgW zEgmh6J*R)G@lFiUnJV!7tKP z1NJX~$Fz+%>K~)hR$j^*%oNAvZ@Ljva#!OV=`)NjPfw@c1; z>u0;u?8z+}U10%U85Vix0!UQC5x>YvMkU-Om*HwetJ%*S0~ctfba3c?roxqqu{82e zs(J>hOg1v=ZE4)oJMM2#9l&K({HmpCI@^Iym)f%@IM7A3=U4K(;!Dl79UUDuXqeOG z%OB1=IXS5j-fpWmWRWYEmo-SNRS(qUgprXAoJ+71>MbE5A)L!fu&-ojMI2=Ev`qa@ zqmptV!{+Yb3hUz!S$4(}V%iHqW3TW*UrI z6eM^!>W|8az0QhtFy&{)dBc-0{}>Q`W=#zzY<%q_q08Fvp~7)i3qIY!Z}_fO+7W&I z@KA^c&Uu}o=2XG&_%?1Jy^TKj`?l8d<&Sxc;2$+?sI1OehF8*P1dXLePUj(Z&XfuT zJu{o~i!DhS>DJ{Q3sZfo5Qu?_EeJ#Gq!1Id&sm?5b2 zK%}dDWp;ihzhW>b?cKP)Ol8VD-Jq$e(cic#Sy3ZDW>r06Ew?h6Om=d1h!ItAjm9E+ zvr8wFqs~ZT?ov)}v_)|GISc#>W`AQNWt9oBlzVfZSFpXpNHLgcG@hs%YrQf*nVcjP z3=R&?w6_nWGKY`N?viJ2-6nbG?%he7au4`>yJ>qSD^z$*@W!16(K|bqA9I`PQ0CRw z!QnWgDfjVNu@y7v23CEaO;&#+X}8KASy@IV;+8~oo_8Cwj5k+N$;xy~Qaun7fCcs^ zx^6UU)wHxUd-{eo75~}x?+`b*`d24UA)4@ou zB$pqUTT{(kJww|Mzv|kSHPEi!k}j|>E>i+0CX+?xc0ovGC|_c~dGqF6K@1PU?Cax` zCr|L_wH@Yu9w4CB+$XoGy^zodqN1WtXzM2E!~g@~)z%)X?3=o_{UPmmesyf6$;8mq z>R%VPfmyfW+X(z#NO`uT@KdOze8nTTB=3NusS?VU+-5*BPNcCCS@!VygZ+@U{; zCH{fgxi<}W_dzHoCNezQvrV~4**#?;v!kwp-JLTtGq=ogX0;#>8TQx&o+MU?V&-HL zbZXPb0q>bWVEp=pthR|Xe!wGkbi zrL=7-<%1&C;a{qo&hDhKxReQ$#Dr?6Iz=bb8cg-~&Pwt=C=JpOKSp4+Cs(5u0mkYZs$ z!Vis-TdD&~JkfXjTO=856EQ}gKYy+T%e)kTruen$$fxc7WR&yK?7qv%RbTC@F+6Q zN~iIKK2Az8`icAlN@n}`s$gzz?wYZJq^st$-gIXoZ*~BSFKnE?wad=I$g_2AFQcsCl>lf-^fV^Nc}(U zNQL}^PpG-vb<5umK5P?F$E*bxemFRDpCb#9Lp*+5-2bRiYr8 z!t-)z>u1qnO3GPdw*+&8!obOQHsF4LA*-J7&&hW675HbC$Fw(50C0J((u+z{4fwQ6 z=U%+|_E^H&$^xR!+)9YhWL`-%%b@{)y$X(b#+{0!a5AmA;t;g9#ayvaE#HKF{)3q4 zCIxM{WF3hrLF8AO<@k;C@*z?raYzLFw_askUDoL}fV&V`GvDERA3tsLpjE)x%~+Uv zW^Qb(pu1fil9d>Zl><=E2wzdu=jC8cTD#HzF-XI7w$++@9)R)M&nV{hUgbkKXN?t9 zPw~s~WpWk1K0edRmUaQ1TBBW%&kHDeCGF!+;gLLAWxzy~v%;RTjzU&mKlBXQd=ZEH z4oCRqr?W%H!fEVDHFPzCD(J;K81qZT_i0v<{r#V@ZG?{?%Nr|<0USYshvp$tkkES% zA3j_mnwm;aPeT&7Rv5WNV>KRFI)N4?CMK5IlP76qQjV+to2nt|H2FyYFVKVDCqqSO zHK9dI&&H^9VRv_TTEz&QcmFu`9Jh;N`zNOyuZ6F0uDdDDOV{OL`&!$idobq_Rw$(Y zd!g{Z)(MStNXPLND8$qcvE~gFkEV&Rw-P44GhioO81xWw4XzyTnmK1&l zO$P8k;Onl6WKEej9N7EU)v@ZD=E^{Ncwk=V@lXneAK%2b4W6nPs|f@v$RpT8Ww`F| zg=K*IJ%dY4aA>z18XBg$%dZUAUTH+67w$tgMj-qaoaATRe#ZZQs~488nJ6H3q`o6+ zYV8$MmE3vEXh>9{7PDEk^1~ws#@t(zg_xKaBBabXyrJKlUnTWd-kPZP8J4Zp*4B>V z0U_~@zOKM9qDiPoBgOrj0Hn7jd?ntR>-L{(fVu+f@gy2+YG?Z5OJPyRonTnzLF|zdAPR&PZv(Dg(>*Bq0UrQBHO3z55iVM##AFiedshB}@&ND_ z8FCV-pkg$spw;u4duOf}RfAA7HjWILH)Xg}_ex2HF?*kFug0xpz}YSLx7P%n{x3^_ zx^`igKb27h#lb>bxW0kGx~ge=)qZB4SH(y?g>q`Hp}Hv6mq{(_Umhl`d-bnJP+6gk z8eO)t#M^?BOU?0DA^n!&ml|HbMqZbUrlC{P&5fZ%4+n-zOH#V2F9vx@jnUHHr}&dY zLqq9l+vsHw2;(>l$=MY@GH;_*R}^SQMn=N9PoTO!dTB>WA}1PNYDaMARedfSI;~ZW z`J7AhqBx}%n{$ckda9I3cBUNkWApS&9D7LM!X@Y z)QmRl^VYi*8oE3Oc>6Cf5(smf2x(oDf$2fdH%X>k5p-H2Gmf-|#zs}5?^4yTSqmGd zuDMeUeIHD+o}Qn5a-%tr*T05zK`Cb5L{zrbI&`Se^WG6*Jf3=vB~s9v2Q)n`TSWS7Ul-OJ=G(b8Slt$cnX~vC336e>GAV;gP6MXa)vMIjAIT6M7UB z`!$3F?tibmF!IEzi?2Ud7YKoOZzuwS?WDhjPXudrW9-Lnq9&p-?CU-lDOB->_l$10<>W35MMFlDDvwY!4Y2L=f85 z)Bl=iZ!J*Dvb8ma-yBZyKVn(LJm|=wL({$R0pSB*%+X)}B#ikQr@g!7)hoT#lM9Dj z0a5Ef+8s>0;$10*+unA1?=dY?wR@cFW;rFAxAnw(KNlX-mzVEs5~#FRDaaTrAVSD2 zmla0JAf3haB(VDG!S?dX3V8pNAejr!vtfDXsMd4L5z*i?sG;su`S7|QDh)_SF>AtF zyI^j^|Azu4{oe`{rR8U#Iqf}(934U$8>p@*5;cav|A@DQs6hn;|1fKUb0vn{%NZ&Q zwUo54iItVWX=~~&F^TJM?@e8ZCPR%l)|)&f5?R-N^sTs3dlW?~s6S+Et^4X`xI}oO ze$6$5(@;RgUww76t?YmfwSD{En%{czED(6 zEE||SE%g%8L@)})^jIo}xDV(kGWTsSg(8^bHRU<`7Jq4I8Q}jcB{SAH9F+>{z2Yz# zzGkwm5z6>dD38qH?CjhpvpVdWx-m4_PVj}SmY-@ENcm!~yf~emGmIgN$Pt}`q7;L@ za)|vx-{9g^iLk+5opL`Y4-C-``{|`W_d#0E#mnPME_`_L1LPB7o?B9soB~!JK{3&7 zP0HyS7TZ3y2gAf{G|Ygx&9cCLZ32%`m@5*cEm%Uu^YUnEJ?bqsY0DisGFn|gBt_Vw zK?i!&)Ya!6h71oRbH1m%-n$jSyFo$pztkZAk0przftZN73`V>&QDMXr%iH@$YohjP zc}XQDB`s&!SGR4(($X>LhJH8g0zB#r|?g(6k1 zkmeIwJj)>X>4v7;_o|!r0e>ekXCJnZLy$4h&=5dT_%T{q*98reW47WY<(b$oY3p-2 z>CYa-1s%Zly-!*<@KuMkVLU*GHoIF1y>aIKDLs;N)yhoy(1&wBVW<2n!ONK61oTX= zPLLjr6@w)tDkA?XogT{TuV$n;12vHhCHWcC_7402uu1rIb~Sl{9DjyBd4=BiaP17^jrr)*Z-XhrR3T+{92AU{9v6Tq{a|v6Gy6G8+fb^UoGx>SmfY35X zn2K!+E`Ip&m;YXwAXsT4zjW5+I8(p64ejKCk+VgFvRApf~y!IC6VNy-r8jd*$yhoSz7S&#&fvGy2?fT}t3 z=3JSN-5BVOHg7skS-phnQhI?qo`eF(i4x{Cv;-{500h)FGv7-t3|=2T9hhTxNX-%q z3^vF#g?xg_@lz^(OTNegfMqMHAQ7Y6trow25yw(*F+89X0#+e0wNRs7tWs4KD*9D# zv)%l?G1>9mgZIy4{I~@eHdVPBv z_H^x=%hM;deAK^%J3{e*|5XK0^s34)jnsT2hP|LXDtH4b?fkho3Q@Ok@V}t{7FJem zTEXdCSX$}ardohiL)TPR{+f;P-)2N}8j`_9?*e)Sdq40+rj#AhXa7TmrHt&+dn@ka z2w2++MSwB$2@6{-u5SPm)wRo7)x@_k*CJ153BrbB@#m%h*Z}uaFo>_1t84xLwEbD;; z4jajeEistBDsk!n!Fx5gt|v(0Qs)p$`&eJylxNYf%`K--?tLy^{y~g60H1?Q8?-l` z69qw*5pmt-C?5JN-llxk{=QE;^cqQvH2A`^ziKHUQ9NB9=o|^)wljVR`*f9PW%z4l zEQGaeYi@yDg&V*Q^?O}*L4DFD3a`D&+NL~(9e6V85AS1_d9vqwL_Gn{ouNQIbDpqH zLPa{o7rjfC;D**GjQ84!M9fUYd8CQ4|vs8z}Bw z%J~$AkB@ErkYNPjFNQ2KDS7ke%~tCZi>ss7+#GcE6e@<_Yvy|zK=~=&laKYKOL2JU zov0F`iNy*`Bj|eYl=cMuJ7(7kbV3!40w=l;ulHTku9bS-JU;0a3t_vacd`1Lf;)6fqK-6dr&YNr;P2 z>T#cze8fl=S!i#_0s%O>Nz!&YEw7+v`F8b{1i7AM&R5{)%>*bgV+v?B2FzwH@BXR? zE{m#F;Os31J0{_x8C>HFIp$GOQIW2uSFg5D@0CXV>`wQ!bg&RbboGOI>re`~xPuib ze9;#v)qkugyjX9tq4v#Go$UHFFW81~*9D6qeH-5`re-;kY!I zjC5#wNCIIRp}`Cx^lKt?NU`ZqpCvXnG@zUk({{c6%z2=IglW!Gzx%kLx;LYuf?7Id z!6j2UyQ*V$@g^OO6=DE!LER$y-R?Uz{B&{2VGz^*6-TK03E5^BuDWzu|Iu)Yb9pd;nFmcJ&hzG&7c80I56PJR*;^Y?&DT)B9qNchB4is)*iM!LO3@8A>>*&a_pI z{J^9Gx$n$!fP~M`h+s-gr1tRWr{$&r7ZrKw2~bIGCyUEs`MSwk-s^2*`}8z51C1b) ztv(<-7pbOUE%;U+ccS_VOru1 zymDI-*E=jM>=B^Mme;Re6X)agJ#Ub89{`cMDxByGxo>Ncx+q+z=u1_u5e`UubTCzefI3S_3cyR%|A)|^cp2y z3Hs&qM)TAitc|EyWnL>UhRpsZ?xRN8TlR`TZ=s@d0Xm3JDk~~-48uSAy*qiWjeE7O zX~ft3U|h69LUV!k`r>exNaNiy6#|OK{-?O<@%5U~xsZe7`#O$1cUdeObYH>07=1 z0|N-sdEPaZCXspd-NmBCXM2XlYvZqNKl*`wSB&LOOKv;LeY&4u^mCM2o8IhJnzg6g zp>KZvQB-e4fmk8d{q@h~mw~vB;Z07OekZM<4~0w9)4Pl&y666$pn>oxp`BrGPtVeh z9b__@a&-bjvl-YmYy`4_5dq4<>$`y)e=UFMG>6%x>DO#Ru9^or|e_ib= zPxSaPL!ZNig=Y`0J({_{$BBCOV72`9Y2U#>$8A2IG;96rvj@XVYCN8twLX*AX@<++ zG$rOWvNulX#+mDDgo`!(JeMB-b1P8Uuso$0&2*HdLq zB(vhhSFitm8=4t^2&eq{w%oUhVoxL3pZ+(`|KEBV!ItxRE&sPZ^FMy1>HpE&rxa5o1=)G7XF>``9Qo}5Z?^u+uUFU_#i^v}`EzmLjY_897-y7DJQOL7_a*7n}1 z0MSpb3R_S@p$z`4Od0rD<-hpZk31s=h`J>2Qam>SE?0OVrJiwCCBdP;Y5tqr^<_BO zsfh{Oa^I1rDC>}XmoZOoZ=N;Hy)&GmA5k^g-!uE!0GiT8KCnLgRnePyV+Xp&skx1^ z5F#JCdbXPQ`33vcaD7J|R1%uU%mVgj8$UU_tUW!`6Ke3c&EN@6YGVG}mtcsWS8gh2 zbd0#aIbK=!2Lj3vYu&ILSB6VawXa&t!+i4Q`-k8>TdVeJi!AzW8QONZ!K7(~Kk6b_ zn46Q@6n3bg{F}x7K5yRF-!AZYO3%p|yS`^wH}cF?+TfWDubIQFg(UVhD=LCYd<6Gng?@Y{wed#j<*+kzp zVUI&usNiG4 zcA@RTxCl$7-Kv}VYoJwnWzil0oA}{|_7f!Dp4N?N^qq|WYi7vd z{kt0WL`7~Ddq8N<)R!L{J&9(H`tn4t?2&WIX-}kAs%k>>h+m_P_VwxbJ;RsQ z*47pzZ`YeR-5I!Zcs;BINz#z$NT3T?Hj?)?mm0F2=e(5?nxnMx7*wjKDWwI$okX4O zi>!L}8-mp#h4#LCdJA{Bq3+utJi)imidSGUDKj3HWj_AxU{a;&_xn7<9q-H#oM@JR z+uhq%%<-@MaKj|)?MVH_8Tm})7TIRY(2E@#;J3g*Sp-ra4fp-^HK#k*cSIQ6TRy%e zImsh`JL9sq_kh#o52`(CC-zlTTMpj@6^{6w;ZSB&^~_N7n3??|XMUt=exHvOCp_`J8H=8UAOB!n-f%#E2RqY##zP{w(Hieu44nvY%?*d zLdWNJusN1!R{b6po1F|X*$^U#gXuGIMa%r&EqY(-2?1kvU)bmm7QzJYW+%F)={)Ie zq`C*GDV}?JdB3!&T6c;G&4edsk7mQIyk8tfVjRSz5*kB3$KAWFxHXLyv$H)vtjlC<0DT7z0qHDDv|b#s;ej-;v#e+iD+z)AH;p{l~*1FBX-P z9UKOXA{%k(DZi-wFn*akzrMbn*9xdF{5$bcSaweR9&cQ!l>h6W22x*X`Wc%4{8!X0X zHIyGEpaT&5PAlz}weW&k?slD_2gnlwX2;qL zox%`ds8^AdGveq-4jtR^f|7jdJ8du6wG74l@{5I5N)elbJK=t>)nB|XGZy^U(g2 z4#C2rv_02IF!2K#cw;vI7N9y)r@v9$MmMuB5*&26D|z!Gc(?gt37rrzzlRdvwd{(f{P}Y@ zUY2z{|z=?Z@k`IkRqV8yzEMG{p3u4zb|C-1ERe6F|Bv| zZ9ZEN!S7_6$Ok78;nB~qoUnl}eoSc4SozNj)NGFcp85P+i`ki7k!cbsUxc~-(W?6S z#NCVZ&iLHP64yp#f<>p_+6DiEpWl9SIRJMQ7qh8VtpC(eennbH#^+CQi+8ucRpP2} zi}H@bo8g8cDjU2uPLbX${j-WQN^Q8g{$uylKdhD?Sh-yrbk$TR?F<&BGKJ~YbcuFu zKKG??yb-KL*T{`w$LTu@0`@|2H`q+1_w#^XoDBkRVi)kZ;0&d1JWjz+QaFWpw30$Z@nnm-Pe2 z3gB`c?d{WF1|o-LzVBwF<&bM0Kl zPoG|5W-9;fF?psIrAn2VfqI4XXPZZTOI7kj}YF zm`de{p;ewkiy85E;A1K1Q@bqE2Dlo6^N}pI7MXjL#L31dxENgSPvOK!_Os(TLX#tu zCH+h-IUT3C0+7%F?`rqbUF@}qv@!oGKE{M!fa)1CYi=y0fvScgH8H*XX>lpP*lm7o z60XCvq4XLu>y9w&8YfcyJwN@;>~~$oNc*#tRnt*ft3~O=ft!F1;J--vLtWiSdv{Hy z81cOTqXBUrUNgV^tc%&V^VlbH^!3)yx|q}*|NSR!%~1MknS~G#ZV9+uhIvRVf5Mt8 zaX`n4w005=>J8;mC)4!FF2ukXY#F$m%665=hkm*L>MPg#o?MQ2r_=P95e(gP9#v_^}cWMx=jho-S6I;MBwB2KqKVtwnNfmrg zh@g40^CV*=HeXBP+$Pv}@D_Lur0QVklmJJZP3cs`-ctKy>e&|$j56Mc8Y?Jdos#uD zr7$8+W8H>l>L|VN9#s(Oyn4a*CMAs`$~2Y{$Qp*dSJu`+>cdbweE3S+H8F{Zw#(|3 zpe&a3WY_o<*)s+V3s}p1Jdxo09YOcoyAht2XPzrLChjt{oO<@|=)#nahDLzn%p$Otvb|h^ z{XJ(JG=SiB%C`rIy8+!jU!E{p)WbF+(!$5ubKp1Q^Ix76HgY(ewHWo$ccg-~;Zo0L z=vL($qt*yFDQsoznTz_jaW@u139MJIUfF_lJy>BRsss;PwNj8ri%?<`@k_0EkjlT~ z3JeZ|5;3ni)P~}0+OEzC? zNlV%X4~1iDgE+j7&tR=;ym?wmroR7&*F?DDN*+K3YkI`mGKiW;goy8%q;u9}xd6)} zfm!Yd)e^6BpEKmiUUx!aH$lo$V8(wB(&QB$7-_nt`79aH(dsnU+72UZfFd&-t?OA zaeZy2&4CfI20HnA{DLX}?TrHDsRP3R+9xGl+_ff5kl#~J0riAhF6{ub_w>j0w{W*X z2>XV6xF1TSd9J+2Yb>$s+l7VDsPWu3G{eGsTZh^!Tq^ct$H0P}W?q{DRW8Rg0@^$+ zZt2+kzw|v}u)qV_f&xN~-r>VDuRwNEfj_^c-mt2$G87tbG!k-zc?k?iOJ9F22|v&c z4aOLUh^3Jz$%Z!kk^qJ$O!>d#3(gZJpF2*ohN*N^CYs+fkmg6}#U?r0l-H$h)(x%W zRnIS47nwI9C;3kD-4eLMBMip7O(qH@gmY5I63k(L<*9){vVTQgmimtQ5F^8exoeR3i=F|WibnMQFj4=-ohd<;&U)wNTPlH_DzmiY` zdNvsv%TKb#F!=hJ-DT6kwR|m1L0B}>h&5WrAXq|U+9~3^RAlF$%<7xk?|&( zq9+J;mp3_`DXkPOTrB#S|7_m)W4`mm6)XB`ErkB3Zb^pCtL|e7AYna^ zsYTMw__?K?1qN5SRh;>V-SQvmq&vVWLDM!P-SJdD_~Y#s(1^6Ysh2_=)xS;sAcZRz zHOs?Qx+Nu3QaVc~mz6vk3p;-PaV>d$PPUbRP$Q#)Vt3OND`QW7{`h>;GAH zpcr&0Y9MhzotGlsG>5Cfn2vDyq<6%WUpl?5yW0x%B&ql)30VVeP0jc>m;D*TmnX|f z1({P{kjwQ4kj!hI2z$zue}<6O$6L_qu$E2cSP=3-)kgAU+cVJHwm#1{rB@A8`&n|9 z%j6xn_?0)ZYj0vwCS-O8Xox*lEzi7NjPo(3E4GM4>ShNO?<=RQT|fgs85utJ1`~ov zCkkz&Nh^2vCnhCT$}y>gh*i*{RkwWcA%Y<+&vx66*nxDttjB0E1N79#6J&LRrw503 z*Yx>4li${W7INI25E(ZwY4K`j+2_28r?5eJ}bdI!ckkQ|Jh>Y0FMYV^)!wl z=dYoK64;+EblGTPT!9$UREdoR9%Kf|BIA|S_PoO&;F?TVuCd=E)FRYyx6}!JVURH9 z9W=Qn(4t0*m5m=|y1F5urE7rB5AkDH(?DY)fmXR(y!c*b+w;KXwRM&?H+sJynKRnc z(<8=vN8_H9_@k=b&Ua)h&uDAy7q&Cc$I>QtTV3_-Ve{r^JC}bqc_o5#q-+XXLk3$f zY?^yA;%~L)yh$C`%Njo<7TI3!R<_|=%qAjrqi}yeF#AWa{c@4%6&X@DZEd6J85 zKBZ=>UFZILFcpKu|3|Rye-kes!S3?^AI84-=J1a`?+(h-MI8I(ELow&WSqA2f7)UT zKOAn#Bj-iQ?TB%ajTck1PnHBnzTbwFzrWU|-=kc(VWb%3USoNqI9zX!*^Q;we{Z`2 zeZ%sU$I$bC^?+zel%fY+O}!yCY>7U(UmY9RB&`=b-2_sk-rinA{L(Uvq%2&e^nHTP zwZ>Z?@P2ovI=ou7@9{D>HeH4mpge2v4xXb4sJaQ*}VzYK-wwp{UhiIYzEN7IZl-nsl_vfgBKk#KwVOrxJ zk36t4FIZU{V_74vfr0buAe~))yVZV0pODsHI=MG!aCh|C1vwBn85qy*`^gk^>ulb7)^ujln&!UiHWoE|I0k5uFbLnVU22?x$TBzoQub|EsR+DsnC(WCZ zbghSf4B+{A8&xto%Reb|90Sgag#Q6y{}RDIonu0%3DTBYAE5NUy|QBV-C3F+T2_ z4*+VFQ-ra2G4xr+n-67yQ@u;fj8sfRf|U^a(bdzagExD=uDQ_@$foBI6Lt|w<<2K? z8t@68z2!62*Pc5*`;GgUd@TK>cOw=`wfcjHS>{c%6us|f^Xdy^WMz@HTT_PO*jl6v zVWHAlpf4Y=-*QiaqkNZ<+d6Wq=zBihZ z=xl;Yz)1)zJ$gf64ef*o6=u&iCoQ=O_t4PLMQXBklgw-Rx9rIu0h4Q?Q@oszzvr~T z?wawRlzKX(WFBBT9(qhzzX0ueHmH>hlbuPZma@J#m@^E> zEqQM{-e&6C4C6HhWmbr`)D)4A-YBr(OzOlW96k-lzH*5W%!7#jMxzaP z3k^{v02mH6!1=5iD==6;_4FvcDmd5O>_^da6R<^a@!X5se>2vJ{RJl;bVOuM;Zbby zO1zC%BD7Z2+ElW_@?(7`>m?n+T4yFM^{Th%yHm$h!jS2cBa}?ma^$5(38kBDCZ64e zLoomX63m;1tQO*+QbwS(JO-0AAemluH>#Fy2ef#E8E3-9b*#C?AhQDK=|!rI!pu2Y$uUn)C$3Bd)JnTBz0gHKN~_e1fcfLcijDR_Xv^c#tj! z%}PG{MOt&+6E;R)!xl>l=YcWxzURU*SHS?gtK8BX418NGC3qf+z8r>NsP!-MC)Bzr zA>!Dm<#z}>{WTb0lGWn8P)Q%+TR+|~j?)8m|8c6Ih+rSbfpPH~R_UZ5ubX`s*4d=A zyt-ldB1p<9xMkItGXoc>c7nd( zK;kPg8dQ?mtV&(x)e>OHuQd~;?w%mSvgZGMRd8Je^f7N1qEBQz!IxykY7$yuDqZz} z&Tqyc?HEmB01=Y8YK)A7U}#KvZjsqJHFEz+yNbqtASKp znA&(T9kaq?S{r?G3U4SY_s4Pi0o3tySltkUU{Yd$kak#0YoQa8FR&&as3D;^KbF5g z0czEutg%@0^#e?yF1#SfwEa#}_TIZEG8o7yeri^1wkO*g^ZGq;<`7y8Ah4c+@aYFC zP@oWGK^%$Kk~Iih?91z67b)EdC!tYr{V*y>l%W}tz){0S*e{`{pdVuwHdDW#(_e`# zw61L76%gEkX>7M=|lyWvfPsi|oTl<6F7z``KK8PNna86%EUQ#Ul7Ju=o|Z3GV( zvE~s+nK=}xlfD8#5p_^Ji^WGnMS$@mA%uK0ejGjnpAMQ&4?v+3J%Cl8cTP;sgS2jD zjADy&&Lkq!gDVuhKo}1ZUV-0AW-@~@z;%+Jk@fYW>g<4hbabk!Y()h{RKoG^#+qT}1PZ7ayl zb^n2Bt1uF@?`}hZ|It*U3QrGMIX?@F0^18uRbfajhjr9u^ShI_Pn%PRmbnGUd)QlM zfPXlsrtQn;ZqUm8PMtbs>jMKxsRuz$3-t%GaPFhlMAE)EjiU$04nN}H_8;3`NM?!z z8tUK*Wm+cFa1)y#up1_Fz=*O;LCJguP1gxqoF34=^8Tf$iTGq7-Ojk;FtZ&EbB6RG z-WVe*{K!8HQ%2iN6b7`^)cl5br@Z(v4@6`}FrW7%*N;KT%gwbjb}O@{Cex9=DUwXd zaf@&wIRT^4rjzSrFg!$)3Ko_cv@+tY985jiW2!rej9w^eHvd2!|qKUD!>dSc6(t4Q{==isXCE+yteApsvHo*v5t#;>kcjX{FD4vJQBy*1k;2iM$uAk{h+rh zP{~>~&UjO<&-|r;*A{Eu{|+fzxwo{mlwd|AIz#{`TcGNha{vD210h17Olq9A5ijAT z!7qS`FoCf^g%L4V7ngP4(9p`6*T*IF3*KA~(}UUXpuPYeeK=Zo{c)K|9H%KaxBoTF zoQ+ry-yVC6pF2ep-M_hw(XOFLOcNzbF_k# zIOwcJ01=hM<_&K4x zetWke<^c1>ix(Vld!ea0FtwV<`p_w?*2}j?^ zH@{hK|L!Im?#B=A2f3hd?09u99`xDMw|2@;+4TdL?}~!{S6?{MQvymGaEkFMIxo%C z97^EzAPWoOQRcSzc^#lOv+kZ4j)Lz6xkc5vaWCjcWI#t$DIgEbKy7WUd`>DHTaw_B@uw8^v^t8pg*QL)Z$f1l)g}H7E<3#%`?r$Wo z?sZ-58sErN;`T$|x-&&y`mn(*4(Z?yDQ&v^_zgD2CQfL`%UvcCnj%$@6c|+>YiVm6 z7+}vY?>CCRBhSRR%sH6*0^-lnEeg^~-`mUT>(9R!KAZ{jWY`bqC&V)=Hjm6(nDeZ8 zR5tk@Mkeyl2Ty5x&$By5{_`sL_jdAOG6GAzH zg#{4?swFHe1W2}d(>`LF-qOju&VwKsb~x!fSbJ4eOP)aQTW`fL$Qnk3>01U*YlG;X zk;thdw1Saw-_Gaerp4i5`+)#B%6twj3jRlzlBIeW-wb|IaNjHS!u!8nn2rUUKRGad z3=qJHy->F^QS@I!^M8uoiLOo(#f{l; zU1n;BUwde_wYIh8ytzCf+YvGPDsjf8B+T^{w7x#O3o1kIka^V$MrhTNlk7_O zHB6!I5X-^#zf7(o+{*fksek+q@ z1BQ=dXyxQD|FIECo!Ti2KX5}E<*7NS$aVc%PUjLR6B^wbuu2t5yx5EHfp1ajC zNYy*-F8B(AoiGYAkqgrk$^?kyipC1EFe@0xd4V^4>!HaA{_y&ti56*!%)GbXr~zgI z7zMc>hb=6^ALiz|LSEVzFC46h2kLhx;qC3_+?W1brI=Vb-zym&l1`dmuPxAz0kauUY zFKcUSV@!N_ld%mr#TN6Xm8SPQBh%qqsrG?sx1IEL2NqcvR?>E%1L9*$s$K{mfiI5` z5F)DD$8CFHu9$wW2=+Z;{hNtql3-UmwM0)PnFen6^bLIV$#j!qfgW#sjC(UVWgw6f}Z0&JmE)?wJbvU3&z z<3@(dZ-{aTQ!c^Q*9~oeg5phodQ#kQV+`^=)6~LZE!EWU)>m4vJ5Gc&2jj%4KsvAO zAn`<6N{U{$J52^=wsfvJR8?FIHCEyxZ*Z6!w*S1du@p>UtoAsCsU! zXm?P;g|6PmPfzRAw#tijua)lqysb#vKl|DOIl#1ffo@G@?IHl{TEXaa?~CQoDOL1^ z^ug~ePzl&v+4JvwrU##kq0V5iW0;l6#T+0R+88gXYNRziUcP}xwAIvR*`$Cf_|7Xv z3VgwgCBT;i)o`Kwfdff^B)a4)6quH>VbjlvPmkQWk9ZZ|eK~R^AC^pNhv?|Va|+5b zV7;GG`vgi3ignL$aP(eH4(_7Wez1pkc{;dhtIj|oZvJ-&HqT=D4I^v_!o8Og?B;uI zVDNb2!5WrcAvW0@O>NbUzq@cID>gYHAf2R{oKP@VxV;scJmHRkfq@Dkd-ovM(j2(@ z6L=VQhUxxv=Agr%@>vT(D#VR;MR9z#p!=k)W+i3;XXt%3d9l8iFI*UUyHnmwuh7^K z3%+G+gb~YU!^drcG04VRS$2XsfX>#LUcW3S7q%`@Ji2rav(=u0BdNg}}cD&ZD^6sFMPe&b4rd z=z_U}S$fOfmms)IK$~+X1-@-7UGDrzzC0nKsK>(~gyw8{id%B8+`}0Hf>lXwtnZJ^ zL|AuN04@4IZ130Ii5y&pQ=TvG@Y7T&$Lo`wQup5cgq--RKt9CzZddw&5HjlO(e_Oc z)tgzt`~DN?PxG@ukG$jtu+>_mxs>xthaB`DOeX3qgp1-L@3nVNZH0jzQk5z}V^AZW z!zA?gaTj1jpR9YJ{I~|?j_VAW);s1mwXy|=+ixWDEiO`EJ$|t72KIdmX9!c{o@91B z^6GyCf&_j02mk=s(G;Ko0N5-g=L*l?8@VO`0PJ~wC;$LpGyP@X=Y4&jpOVGYwSRA~{hr>}uk0IRwTBRHWKK)t-PM2l`e2e9lYFi>uTLg<~*2A$;#T`nGfKp?dvA&dYk+{@1cTCCRt<^}8U+C$jPb4j)MJ9RrSgZLj@Tll;?F z_W!W~`)>4@Yn{_uRv7P9ePgWj5W$sej(?IuUBo-G1qfW=^Ow12DA+-KtG;2EseMIeRyw@OM3e@ll(;A@t!+iJ^%m! z003KRtpaqF4L^h|QYQnN{YrS#t#dfHf&V0|2mIbrvrBZ=12OM&I$?`y3X=vT`Bzf+Sz-^*NEnE0&k~UYg|AUfby;2bS%7ZQuB3 zle{?Ru6DjK$=mzdpSnrMT+cZr$(_AEuOHC%%)T);V@}WPYg@_7dVOwPr4IlA006+2 z*s20_k~}@hm;3rIf8F2fv)obvx|8JJtg`=$H}RP3J*S^oHr^}y+6H44pdZhi6rceB z*iqbq0|0=X{X3w3Nu$y+gnE6Gu8o63h}a@H%ad8FwBNF)Sk#Sd1aER~z8oJv8K_0vc|dK)4pGreGmrHl zoNSl1&t6GMyHIb7F6&vZ(aHW#y9J*;i8@VvGZtLE{>6H-flyQ2Ic}>-i3|*UDZ{fy zlV38XIb?eNY+vO&M=l>2lpy_Qir9USqJzA^!qMQCblig+p0#i6{mAKTYo@h3*rDLNsY+(f9+>fgqN%i1^Arpx<6#GXw zGToflzwokvG5xr|$^tdNbm@{Qi5y*(IPajW^wEdH@F^xoAECA5!cL-tIB~KyvE8%3 zh8MIw+$QO|d8djvj<s&Tn0ja=)MVCrv;TJGGj z<2+Kqm|hr}4QY9NRM@!FHj7<=OKA5zxq6yRSC_7Q;g-7E8fRxXo%_+Q`4dhUZ{h40 za;4jw((X;Rb~r!(8!mq_y#ERNcS-Hw2iT{gf;%kP68}Q>DcFBBEsuAe$a$2T2+P{{ zn5~3*n)(mTFso%Nd{}z5j%nN5b-9v#-J+tR(Ws`iQ}e3&46C-@{5rh1GGNpQ^)w{3{S<_( zF{tYdI}9gS3Qb=ojAHUB=wZu8})g2 zR%nl5_g2xFC*M9Ld}LOK=!Z}Dl1WDMWjI;cFz4CB9^J*pohq|lWNT6_ELfcuZbYNC^F*vO9Y-`pdguMX1HjHkPMWv;sDY)@FpRtp= zc2Vo8svgm5H0kW@Y$DjZ<~WTK8ykzPbQmcySqJo!*xa|I6cJ8etqyQO zweQBphO|au8=IO!WW&zPI?)W}NayC+&P&1=h1Tko3jta*RCvs+nIsd|(M*9Cuf3fW zvL@2&a9eJ?ik0*bTC^?U9f0p7Rn9dYFipwK)T?Do>y>r6>%O3e|ALMNRWnEJd|z*M zwTEKnMfs(^XMzfxa6t6$^bi;{G!lq+b`Ot(}7xIb|%vq z+9CD<&x4XX8vGN@>@Rvmjk4M7X^0%z^p)4vllc@c#!@TN@M62b8~bV@US@Vi@cORL z4h`Y?*CA2`HSAQ^Atm}>p)jHh(0oZlV$|xAaqC97ukV-T@$uO|yfto(?5+a$kSt#*9x$mE@l zS+~@Y_Hd;ho5!zTzpkytto#lE3t>Gjn;sjxQP|xSBJe8C$B&m$g>?V9}}K;GQ~CZbYn2tTNh{hGTk%XyFBEbvA6}2I0`pvOBeN z^819qRbq0r^R^Jof0jnVLy~=$G43u|C6ejs>5=VQ#cjXD^y_U)&Ews(p5)+{(*2v| zuvcCU*4Ni>z}c_jn+2w3dh1uvd&fB&H*axNAR)-oR^5rNYQ_tX^Yu6{nxxBr0TV{s zq9HOp%CNhig$=RN*oUTrS2?4Z5i_aRgGDC=`&tvBHK1#Q;78drhvJOEvGk>B0|NsG zDm;72wD4`3qv^X%H3n}NmJdijN{C*}rar!IDmUx}xu^f|Spx$bnx~bnsw&5*Hau&m zU=O?(4+%p#b;WL}Sw{1gA<9#_2h=>5?^M1x250nN`}pzWOl1<8u1xV}uH1p7i5#a@ z=jG>P1DQeHOf_o#pt@1KeT_Nnu1;rM_aArr(_=z8S-f2Wla@y1MI6 z&6?k)>^#bq?de=yQy1B`O^QAqsFypCo+1(rRsEPw1tLI-rc)*`3GsrgvjFVZU?$GR#iVz&&m|L@;t(26MLEhj(AHW`?Y!@GQ79E*R!zB@l-~kH`)$?j|@>XmSywCRj|abl;$^Nm`3k( zg=()h+`V~6=@9$Vz_{$I*}28t5_L|4X5W^-e^@z%+4Po^4*PaU zjcZ%FUj1uWyL>?Gpb#?nUqQHd2#)e-joXbIV{8Zs8&)r>V0ZAy zbbUxW_K3h8E6jofdlh5x=HlvCi^`dE4+hB|-TkR-J2E}X&_5C-7|KnXHH*-T?IMgI zV5Lxv;eR(I)x`n!9$&Y|LoPSzdY550k-U_vC^%ESp@y~aSQ(({1R2dkw00RyfMPGz zJU<;frlApPNaQ3C(l2||UJVQk96Vk;v6UkD5N7eiMa``SaLQ03XAp1SJswz`ZlkBA zWle}YN;B%6URtr9>DiZPvOVThM=Zo1i+XvTj^Us?2~ zto{q94oJ+%gGhaEvtFF%)_=uA*JF}SbU24X6r=A{@AI{n8@_{=N@iE!ECDjr4Hpy^ zuQaap5)8kWL`+ZIHN;>JV(`EIa#`XzDY!c7EXpF0Gt<~c`2GrTiI9Z&_~3|1hsz#O zHgd!1zzD>Y`s&?hcn!xC1j)^^Ez&*C18mYmi|rgk{M>r zp{Q|6hUv;xykcf%Ccih&IIYdLWWyY9p=uoP3raPePsBBKS-0cox!@z+;*)OenYyNh ze5(I6xR3g53 zniCL-cA_=zj*gCHz%0~}H9^oz&8yU-nd7BclasOTL?1){OPwlQ8Wvhq7H2ArHGcgpcR0j#gmz?){XGgE(#{qNT1KG82iP zwJHV%sMHIPm!js~r%?h}F6-R)P%21NUS2OkM=qoEYC00$?!U_@raml9WexgoP2|_BPMZm5tP5PO>1m@+(PAO-&oQZmA)-u&$$&K7W7oUjHlg$7YI^ z9J&pnLu0ivSR~-vuLP9Ptuz`E^oe7T%OB%dd-v}Tr}tgzsCD95&EA`y?1mIuj#u0V zv~K!S=};VAkagBN1Fmuf^#XJaHZvkF9d;2_SIk`+8ym}#a%bi)mV7#n{Y{zBcU(uO zMjk(%!DZs@Kdf4nSx=t9XV$!n1{4(5VkoYVdtUa6KgP}w2nE5S3X5^PC?75M@VdkI zLMnX?@pMeM;?uP_h)msmp+j-`=S@ws`lo}jJ?`X8h?NIv3y`c96p>d0zbO~jtxPCM z715WMmxu9+S(N9Cne|Z@pvEEkk_n7PkL=q6oN!|nsuuvNU)-78wryL*QL_;in$zV@ z%(Qtw9ZZtiyZ6;~7nc$7j_pr@H1-iZh^{ic*2UjG-dO_rP@Gs+KwnvUn>Y4z?phR4 zl}vAvtpuisWK5pWc79tuqVLAM1nYA;`BDV%$8L#DOGxAmoA}n9DgCY%cA^h}_3gQdSuEHG+c$Zzdsl%mnf~tG zyS3q)D{lWM~$(olcpvmIN9!$s9s)DZsL6-Ir!~9 z-ku4m$aca6teA;Z`>^U}Z3N_EY~$hfH;#DGd(kXx(dwi>s3Z#d<^Fi*Cxr3KE$L9n3)HZ0k)4O*$-&rVG9S9 zCIJD|as$dirXzTCeU&>axp(h5U}WzPEe8B0xX*jKeHmx6EM^0>v$`rLI9B^^6<5k#T3c(q>{D|TY!Utc126f% zr6uHrCT|Fm&*>|PycRXD-j@K|qteuUqAh$bN@B5DV}N1>?15109I_gyBS^0$IuOp7 z)4_;39*BFBx=;VwVxHTKItB5DvQ8n`Eg{iNuixh7rbj%j0HSKVP=a#?uG|Go%*JDSF?_9lP+}+uQil!NE*myD z(N&n0frC{;HeOfkgOpETM*)R^f=0_G0T>B~LKTu=G~b4c0HCa=;Lrh&jk{MpC#9cqj_4Fxjl$3kw8z!sP&zsuX+Ln&}IAJ>i;mgObR-^8)J zQ}fh}FXiXuEzzy@Ay-~Txt^a&2Fog^fv5x+%y!;S%XTh)v zY2L3&iF(L$V61gN(~R-Ju& z`bT%N9#wEPa0EnB?qb{cpL}F}bz@?Nx>>ia_m@Z#3Pd5hQUOmzUyvLAjLT~F{JAop z%kvRbpo*X*p@GDY2)MYBoRW!u1R7Y)L~+0sL;cY0%Bz3Q@o|>2Vegz^k7m9R9O3vvZ~&Q3at>CUFp(RkhOX=rysoi-Cor)1vv5Z?Xin$&Vs3PP zCvO->?MwbFcpt;vW%^G8;n1Tl1)Uft3(bz5nDUAHibV#33#7;;*R1Lx)bPRKO(ItB zj1A*I@*dP1wt6KJ<8)^7ociW@>Z1sR54(;Kc1bk>t=o@mO9&K}uqfUoM%=^1fBBE@gltkr>%-+ z1T+qudU=zi_`53vN6P!X6MScV^ZZwfwN@0yQ9Lvj#Mkw_pmu$SOy^4Tf)TmlBC*H; zVFJG60CmE5$uC<-Bb zH-S+G-iK{j8M}yp6Asy*T)hKzkMhUg=}{}`D=%>R1hx?VF2Po?#XBPk!b`oPrD+^I z-v}KdcpA=sfL@ID_QnjRJGt%&dn?{#JdXKKMIPZE6g?)g=pSBv!1*6iMH(F<=qS+M zc6N3;FkZTKrnEfYbVY@mV2&H2vJm)ZaP5;(>taq$P9ci9^}Nxn4K~=o1JAz!^-+$c zT~OCFl!FB)%uh0FL>~ZerS8XKHz+(tm$gF%`@`wer?uO)CW}^Hm_|*+LP|1lCsM;+ zZxyc@ohT&nule*5s6R*{@;!{#V9{GCJ2OcV`}bGf@bsLDk2|0)DiPA>mjFm;!xg^p zcbtAzVt|G#RExx+$WoW?B{tDawVFdQzAsn5Kuy2;Ke4}!5wqBVi}`oO-vKJ8hH}cl znQYrmd)HsxbrLJt{{)wtm_WBSHALpqThr7X>VhWe9%AH^M2;k0k2M}>pP3^=gT*tR zpB0p(whBs8#{TvwrIqCknK6IllpsRlc%Gdq?dQs(AP!PxQ>qW9r?BG(2M6r}IDqi~ zuC%|6(0*dpob68BCm|6@1NMgCXaZ=iyt=r=0n`&9N~Zs`&bLKnl|mvgj(Gd>j;%&= zo%qKRC%dh)lGu28rWmH=`HxhQb7e~RF#Bh&ZW+t|Rc?4id*+qX!dw#;F_d$*lp9XX z*Iyr>6m?b{f~0ThpW|GfYw1=}LW>ulCi)8+ z5p9gRsMYf*?5_T`HM3@C@Fy&EnAYbi#n&YN0%AG`uLL;sJM)LbOsu|e{=9Zev39Xz z-MAB19-u0VZ)`&T7w~nke+CM-`kCz9l#Jhp{_Ov}jt^EM(<396rg-CBg_hW&?%|bi ztoxSwi(WtrRt3doAOZ_JxEPFY`zv*(FecUj6ZOM$avkF7>FF{v2@J9>-!0WuHtaLh zQoc;AQ4zOedsH0>wc`(}T##&P`+$koo2=4i8@`Kzqu%qXjEw z9`)hQ`p?@j24n#+4O#8B=O#uog%R7(u-esMFuo5eH?KE8DCdCVm5KN7-z%e2fU?_0 zTGKWbUT;f?i(@`wx8d}oKAaI}4!_8N{r)M>Z7Boc^R|zwO4SVfw%x=*gU{zuH%w(< z)ogT5|(I_4qI~1pl)7 zRg0AEQ5d&k->+W&{W;tV=^ZEkaSGJ>4d#F6%gFziC;u;;8~NXTL;r>E{O`YV>!xi9 z&ooXF>NUPWax~@72MObH+p1+6UwGfj`4Gjg9yJZxouerWiv?@dEAlX>hgLV#_V*f{ z%c~Ol+u=}n`TzCGKn>u3^ZNcjGspiwyrDP0N~pZ`_aEh#pd$9^SlefZBgrjFKF$%p zzx`|zBM4oJww3-t*17$q+`n?I>Z1P%N)EHNt((C}>+^3p+H&e^(zZ+?PfW3wkI%;Q zus@_XBX!RYnj4Y4nzsHms}LmN2P!lS)IrZ=fumxQWfwxc-S z@ceKK%g#Zq@d-v!SXkJ#X)hvmYT2Vq-~INk@Av!LQp%XdZQ>BKn-AUo-uLWMnBKNm zzR>N;R7Tn~hQ=BL{z)>;$%miXjP_kCeRb{S7Qhj`>mzACQd|CYJX-40w>ovUiY%e` zot@TCI%{ZK+sdTf}huTqnw1Sz5u8^(S#yMvnLV%;_4G73qj>EX6a z()83+jU%L<1IY?kIw~Ar|3&~Ck(QR0NEk%5m$Q#%tj=5vA9zBO&_+@bo2-yH6xSN5 z&J65)8`iz=)bpcP%Gkz)8~39ycr^Ht#iCHmGgsZoD?V<&)S_pvVyehmjf(T)2Eqrb ztEy&XTCjFUlGKEJXnPJC%YW$Z<{lb&R9svE zz+{%Oh$7@b`91fOku5$BP@+He^n0h8AC`?PZKD@_4}?cV9R8A@Ym}S`jvOssvg6hB zXVX4*;E+4BYbz}(s(W~+zHWNE*UiTVX=qN8$2PaAeicc|&mXu(Fc&vEO>Bm@ND@MZy(T%l86GoIfsMb7oA?l?(lgH1PIIdoLw zRH)H|xiUVVzY0E>d%V%7aW7H_H6)RV7H0S)@%}ksMwZu!74^q0!wqR&EIPd+k2a!@ z!QoGktQ2OXoOJd-wNmi*qW>DRcj#)IHj1nCF5-3<1SbU6nY{?y>1)i)dl*-tcdT(a zr?gidk0OG-?KUdd_!^Jij@k8wfBfvJ zul2LetslB=Y^-J(>+q67nLVzum^`&FJFc(4(60gb#I{C1{^OSsDq!?qJ6=k;Vpg5g zL~gnS#WU{iJYd2~88SG2ZRLABI#K|-!}CZQe*#_)9yxG1yA&XS*{$)9A`f2%)THD; z0^lP5#cW_UJUqPW+5=gkjjtnf0sC1gCi_T8Nc8p6>1T-++P*&pg#-pZ*uM+l6f1S> zQ>vL_vV%qs_ZVtHj=;fHoSNteyS>Z%{_$v~+h2yMDMppF#2}G>v{k#9 z`Iw_QSBU2AOj-$CL`Si5#tH@vHaXF?b62`w|fFc-2p4M?~$K>?1F&vA9#Ush|-c6FX^!`c;3i3dLr;cr@0uN!s=AH(S zntpj^$bwvrr2Hsv@$%8OtZw1hNe3-xoBrL*O==m=xqL+O65Na5+FTP!IKE{_=byNH z))f=JKeYK$roUK;^lje{WzH>9EQo>_*z`F8fEAN4hi*Fv6+uea{$=aHd)TyGMZ2m% zy_2O@eYGUg?BRN+7*mr!_B{%Gi3CL;$cDLVMi5=^;kE#{?#^ou)G;=qT4PUVO-6Jp zN|@T8LRe9;8+Q7AJw3c#yUGu8pFsz!`EFWCVgB1{) zot`E_j7dM>WSfDb`9SRZdC&cXBkEA&eLIM)fUZ~-Z(%eG`QB-56e0uS{qyQ1DEsVG zQ?@}mvsZ%(x{NQV4RtA23MY=0=+*{&JxDW_*(E^%t9|&<()PHO!XABLLF-n4jn6qa zu)fUL4@A@(2vD*B8VeO#5UZ3D77YJ3TeylrOoc_0#vY7eZbzy$F?fsbQD1%Jf^hV{ zQ=zNSF^#Vg#6{8MTF|>;_wC=W_0w(NL%!PMf2vZpkUl}p#7~_SxsW4McBRtanQW_= z_5CT0-OEs)*Y`bMQgZpo`n40BiYjKSf_=?0xjwAk=bWrmji`njXQFEsPFMAl_H3g& zx#}n>;NMsD@>sCKclhczVcoyF9z^ph+Y#>C3-8}lMsK%}(mCtqs~A*8yCAX^kcPS}jJS~c7A|>g?cd)j_ZZyT=jplqfzh^v^)mz2^?4HQ za)QLzvC-boj2#c^4*HBBvneWv-F~k>b)Y9p$668j^#}a)ZwGUJO2h@so=dFHGC(o1&UJY~qHU*~) z?6T?Iz%k>F^IA|V=$@<^ndlqkXSVawBf_Owb)$?~p;wHblWS|!r=%QJnIB?znc#ZT zubZMIL^{lpFCEGEN0Vju9j)pAZcur%*y%R(tMJ$Yp+=i_6W1*r_W8}64PgfgBA+Ni z%^_N!q{nxH!(uLdxaa+PZV>0Or%wL~TOF-YrfuNOET1U}-o=>sg#?O?HQ=LvS}1(# zIvc9J`D&kC`q&T5y1%u6t9tm$8trbc_+~(X`UrMGwV9*O@yiGd@NoxI5bLd z494USML4D|olV5gWU;TNu!^0QOsdp2-;;fv@#9IQ0z6-4K}=yS{+&;Q5Kiz$J@b8r zwVL z2h3NaCTy-Xnz{iZBt#)s2hotQ_dBs-KU4g-X1?AmpRq?`_{(4e)a;;ooOQme*o)EM z7VtsbZ}+bk6bfP(N(Hkvg*3n~gP+!xoc8 zdn?vErBxGpJ3o5~%I0RxN>IH`W+N^5ypfTS{!r-TMDfp2m@2Jj@b>BK8eA5%^~&ih z3@=9X!q-j-lqJK-{+UnFRDCGoxnH~XxenTV4i46ive$)26FT6Gm&G3hC)U zWwDT|#VU}oVBy^m)C1Kyz92LWf+~kJb{43Onm&I@`e=`5COt4d@%XxN{FK@(XLWrc zytY4|ux5*vi--3ovI{^$ICybFaD$k_ftS`o%!=uJ=p6jIskLv1HO<9QlOZalfvOi- z$kdH+NzMqMK{*j|jzl8Y%JG@3ifNmK3o9Am5ieNFjp}^vXP&rS;D>~`v)ReAyjJL_ zSULo>s)7`7n=_QS!I56zZh?c(4EipIw7A#S(pR1@KqGxOzD(eIAiDzXL@)GgZG!|0 zJ7T3f4b9Cn_zGO5yUPArM^IgCwi`Ynu<5V_HmKv`w=30r(Suee-w>71@Es60k~1~w zkkSeq%ZF30cL4|>+EJs|m85xO9Q7evRi0RjR>|+HHY3yJQHk^OUn;ydj^n}PDIh+R z4VwcM_<9I|jJDLjD88?GQqCD7L*7PZZ_rIAZQ_oY$GA#QND)zs-z}n%mGC@CuT?Ss325l>2)JM?GZc?JI%{Ocxaz)p|J5`cp!hS)! zi*lA6kA+Uo(e3bJ2D~YscBB&TEtp9e-GhiW4EiEyvO*-$N^V#m$1B}EC4#X^VL43y zmYdjvlNWtzB)4%K4mE7 z*DdRwgrR_{qqKmt*&hOc11!CVqV#%}US?{o{p`9C%mg3-3D%R9+gVthH*)uFLUkN@ z2cXNa{%PI`v;-Rq5K{9K=MOhc4AtKh9!)f(Lv!5Y_(6Wf{m1jNWcV%X30oio&m{1U z%J*07T~oXWt+|1FAN#?P$W1mO(z@yYGHW&hwVpt8W(iuZ03t`2OivJuBo&6_Ae)*` z-&K=pO!$X44Wmm(BcpJ%*&W+%^~b6AFQ=O|{|K9+6`vWdLl%|PQYl~LKvyxPyqwib z8@jRjqb%)8i`aQ%V@d01PeGnA?#!Www>xn@Omb!}c^JzLE5$GJL7}Z&4$>Q3WeAAU z_cS4ERza555z;}HCkXtzhmfrLAbbA^{rkHY2SuTWAxDH^2T^zWZXM3s5lFbBW7kBF z?T<4F6vgxj<(p$5Mz-SH+!?`9dn%l)+z%y28+58rtG_&~-F-q&FWUD|OkIH&1F1#> zATRhlOYrG|-poE_Wo3L>Bz0`KE(J!4kfH&9Rg7JI-&JqF(xx$O&Ks%!dx-QfH zISZdjRDNCeYfQ`fSOR~{z$94gepRaQM{(PZGgmMgxy+;yOub~McF)c}8vhur3VJYl zD>sBwkvv}fJ4CUGyx#Z-Ovyyqbew+lcy4mP%ho_D3$g7~i4_PC8B>SX1d@+uEeVo3 zp*n5YzGa?mK)zpG7f|Y}1X)sfxSN&xrtffh8+bw&Lzp-HQ z;vc)K;lU+6(LUhLlSpzr6LvYoOPWyv3`Y#7=eda*o0ur-y?QDd+mObnSig1e-o3Z1 z9I5UjA%ZaLIBZgg30K*_PQi_H!m%mo={2w1QX>@VC?HNyh7iO}Hrs9R>Hx3)jE5Lo3!(LuwMX^) zjn(+BPT1==akB;FOc;Tf%$iTkFESdr)dz>%#`)m=9U&L4NDr}6*ww4+{6c8J)u^Sg z8h{+H1mUF;+3FV7t6xn>b$=4{q|8y6K-u6x-VxCRm<4h1lYbyM zqo%TQIWpG@`x$h$%M6$tP@^$iTwP}=u%(rb9xVaml!D@nso6~EFp|?hCL!u$9m$+U zxcTlxfO}Yf_LtQjFpvj+{qWLaV!ndx==(loi#C9RPW6%|$D6X$o zQFPgs{TT1bz$e1>oZROBa)Z>>Tg&Xcx~;vdVS5H?<-w=Z-s6TQQ$6^ zqHpB^Y{nAm#a0N%XniSql= z<3e94M*29FhsJ!~j#PiX)vnuf)K|ON*@wz#w`>){Xrw@c?OEqlQB3~*OTk+gnLTfA zeOC_UJ`tHP=wXNbJq|E%`EX3#cCFAa14+i6A1f;>k#qALLB1B2t(FyBU`*2YCs|v& ztf^0Uwa*!5&D7F=lqWyNWle1}IRmL70^Re{i-BJU{P%=?C*y}r?EZ>iB}8}~%_dwx zL>|!&(>eVtU-`l=^RgCartxJE)3a9LY?{5#9U-35qEl%v)s5hJfnr=Wgn8 ziWKFa&b~RDeGz~gJ^atCP5=xG9>iJ0`8dR^`EWnCjyr9H-kI~5`HO5M=P`35F8gC` zL#^aE-(o0pQ!~=#yme6ybXv*MVNodHl72u#h^fC(le30I-ErCh(_pON=1y{pV)V8` zK;gTOG>oPhWPfM?*O2~aX%??-U3`(d2*?s(UnV;XHVjs|5_XJ@h1pYp*%V*?B~;>E zNBr4rmSCz;HX+yqbou!C30%Utc>{cOtrtT~2}>b(r|w5i5wmB6qJFBCY;im`#sn#@ zjgeft>HO_?q&?Jd=;d={t2R^w*W|kf*A$cpdo<$E({%=fH-q$(%WG8v@!Hz2=iHFzofI8$`gA+{D3C?XEIm7f{Q#wzgxOwo-`I*f#X)V0@Xes))d*Wwl|ad z8L6pNLDE|l3FCoB&SwI_;Wn`B0K7W_+9J~6dsgBY;83nkq1>}4YO{=U8zNylK z>Yr$@abiA-AF^UMvVne4xv|;fWIQ{Vx}5N=uPa?3EoU zAR|QC1c>rSX_?@$NHUvxbce1w?WkY?tMA%6gbjU~(VjYsT8figu1*0x6_B^Mv9WQK zE*|s@%4xhVMzse~T*`-d_+uT8mXI;V!_?2o=dM|cIJ=e~qgr28YB!$G>GA>Owh3Q{ z|AuH^A@B162hG@cS31u_l~JcUalX>5nJn%QIj7lFp6myM4A04#)nC?MA5JnwttW*a zOX`>G)l(wFtcZR;#m51(A~qeY|0^IR$q7E+F!-ezXQ@am2f$38>?Tnih@4f+zojA? z$nh;>mjF$3A)r%cAYd!f^kJ3sD2e`WArf-{JI3z8ehE9 zHP|1>8&1Z0r^=+T3N`U3Bt(^95TgAAwU?I*n(fDe8OnS@4Pc%^%SsBPOQlszns)~( zAbzuV8e$1k4sOI;1a#P$$JNy-OYt8yes2%Hup46%w9!uUb`;D}P?ce_QoFUFUC5nS zX!pH_sNiCWoLZom0ryD)5)lu8Jc(`KQ#03SIqXpJTH_B`nOoZr&6;~L_>3QISAHo%r}l)LtrgOfKCap#oYF$%&O*E$u7_; zHJ!lfA%|$fP<7ZD+Yn3kS}hk09O`GWFE-h1YJxQUz;qwq+~Ta@%?vBA0_I`)Js4D7 zK;$1a0qo$$3#4cEdOi|xYW&d;!prg|#sNYxF!j-bL_s8X- z?;e}=;xsqb7N}3yC*_8X1>L@7h;7mf^0}@qE}4|~L$a3DlDA|%|Z-S-nBT<|1g}JLfpicD>_e z!?3gH>LP?hV^dQg-Iuya4#+`T8rl~Lg`yAZ+=$-4)XW7!H=^`Jz3zRdme)T@~Qa$61#=B*E?*W`?|RT$YLd zL0VTpK!Df*(O9gNRxrWfnWUX%IfWt6YGs-F<55#*{_9(_rt_a*jC3s-0#1uE_E**k zb@h-Nx#Z0ZHgpMGsJ;fAOv64#(QfYbXy()&4WZ#O3Tt|_5XeVSMRh~X=qBoU^DW_7 zoaR3%`Uv0{ITM@V>*|>>zkWg$`D*;K zMpOCirz1kx<$5IYZLsOhre`Z;8v{LuBw@@23iFBB^c@Mz(zlib)*sb`UD+0ox*i~( z!V0D{F;hRnyis*Q!3qSe`{>#klyz<%=4-jnyfXLWL6a_aR6(JpprGI$E&wD~UMl;k z9WV}1S+fAxxz*gf*8fgvUEg$Ymi46Pz8i=AN)!E(7E;PjqBf~!ek??lZxy7)%Ry*{k@o!6>V z@5Z$pn>_Jd)6o*Msg;bGjW^bPnu>MHpQ)CH`(WJ8X72OdtKEIii!N%`$IFQ9{Vr$( zbM2Kh8&my60%Ik%^~Uong3U5o11sND40NaQE9}t)0Tjq^xOczh#1OYZHYtM=zZq|x7P-@ zw~suGxn`xWSzjzIg1OuAY37@HsV@uovXT;CV+v!PfE#{n@*QX5(NYfo0oUv4V<^;2=% zw{Isvbl6bGYeI>1?cQ!#{_2}IZ;T?mHhf14&-etq5q z0zss(Kr54d7sl}OjTmq@-R|Tzm9*AXsEjuEimMhywC-deu}zkuCAVloXHVN{#_aWm z`)PywLGI>ac5({PnxAM5vL@-TLc*NnhBNRd)YO*N%3a&_r17vRa;sHu2u3q4e#=T9?xJyxeYR78sRsVsd@ON!6c?&!h0gP+FZ^#JgN9J5rX^dz;d%t zu%2f9jpx!LyBfS?MLxZTZBg>W(`RS9Z39}>ar;OG6Z+C}!c}X2z{xY!_4N_NhcTHT zp?M+`*KHp$-3dI<&X9L2R}#`oh*9>3WfA!YO%GwBiXiwWf{>HUif3wBofO{h{T26Z zi1ca@5U)ctsDr7AVt`>jGc1Sml#f+IC*D<^|I<$!o_~@o!<#86i2ivLaUi~x%=vIb zq3EO9RO*2w)gvOGcx=q!Y|zy1pd?E;avus~CZAz;s`gTmjolGg%aw(ajbxm;xh@eN zYH``T3rRDS^U(>LXCHw)D-sbF#8cTJ@z3x&aBxdQ!`-1mEt%NK?i-lz;2Jtnz1rr zB?SeeFxO;|RRt?xgWpq75Z)tzz&l}~AF;p5O-$zYBCf?${z~qj`16#%j`{5iwv+k% zN>UJOx^X=$PclO zqob{_pLI676uGdPqU_q3*6Ly?=P>DY1g^Z{O3lQ`@tIm~KNdefk`OiJBqjqRpV1dl zf&E#J*-OA#yIJr!9fyMP%S*RmIvM*UBV#=TUnfT+W$8t&nAb+!(}hRm)Tz-tlD#5+ zrg;H&TZO$*zqYm}<~&Dhz4yfX-qp`#H-l3CHS`$N{r&2&*^P1&+omb3=#8g(^v^TL z|Lr4o5GyTP1=|og4&L2U2xv>s^5p3_sp#dwTvnf+>xESymFi1+{5kg_@N`vEm^3Ue zEUucUz`0Qvq@QymixU0K(d~q_bLBm2pP!wMRb&=b&Pp4^OYDP5sExXUf&@!*&YgmS zOqkU2vEttvwT9l0DGslsSonP>v0O(nO%Okjq85P1MySexxJK%yzxa@%PW<~SCE1v4 zqQE;Q4~y(Q8UfV0EgxLDYGtC3nhLUZaZz`rTpe}%{TF|bMuy$Wr4l7lm*sg%+x#m}I&8brvw+WD%ady6Yx1*5vE*0f|KSo49>xmgAv{<^ zZ2QZ;RVZdb4lEfjrCaroeHyQ*3;2j4Ha34(P@hUjYP>;Vu&m9yahtg5)XmK~A!_TmvwdKl1nID7IcJ!ouhTEo*%t;N*b(M+VOq2{ z;zC4uPh=RXpr8;LNp|{ud}P0xVp=KKwWtMk9=E8trc2374z#_Q=obi3}>0L?P& zITRc=3ySgm$vUY;>z**n^D*>D_JlY*$OBTo52ob-%iO6O=rcaBLz7Px&(* z3jgbB9QcD932LlP<_uk-PuterqWW(yQwJI3IWd z#;lcEziE=0w>>?oxX07JuA@Oqg9TCICZNS!wzDI$BRrbOEg=Am@sZDsl(~i6q+BrX z3W2y`N>X|Fgzj|MuV+l)0VWU-i_My!-MMqe$TVGJuKvh+5d>eR_r^MeAocxm;(dNi zlETQt1OEr!Dl7vYefS00dkE%x9;wGdyeJB&fL67thtj+22J=8-D?E&Y?vYywJs({WpO!C(T00wZ>^2@cmKBlRs^a0&r0&aBwtVR>}6wASu9|G zFv)#MPABdQEC&^cOb9z^jD^{8JMvl4GIlZ~p{=L2SdwO5L zvTuyl9zwX0IW3KMSAXy8gGp{o^10r;KAGet@pAwG00026Lo7Xn@V)Ek+s?U%>h%{n zFY9glU(5QGB;VfG?}8+s$jT2md?3kp3^?w!z4l*C@=sUU|HlUGyU}B=bxvz859=g`6wCUbRWbT+cbB zZ~X5Y&^D+5{dnfIG~Uwp;k`*N>FwK0@)Lc>d+vbw000000BotX3eZ)OrzLrR&J{P8 zU!8kdU)wuY7=PzQId^sM1uOLVw;5dEUMfJBJoXkB{r*+XU9r3w$6U`jC5yM-C`rC& zK--`K^y8UR|9J0NVc*~DwI5k!&Hw-a003KJsQ|rnWo`fKY+u{b>vaRh=r7h@zQS>q z3bn6TWiEfcZ=3^t+xrX9%@y{&q_5AVn{dqaoKycX)_+@oemryPAMc4P?EAW2`^~G2 z4*&q0!ox=Z02s#jve#0v_e)7Wkj01py?u=_P7c^MmU9p5yK6xEk}vjse(Hes-%m2P z!oCkAdARraX`6V=Wbip{#AeRvuU6Q8fA9UmA?5`D02`tJ4FJG;y)TQm+ZgnEa*}_P z^q;utFDuCS26edZ)+U;fA-!l*~DWegU@LrHfv62R+-ag z%@qIu)}#Op0Kj_HS-9-KZN|bHeaCz6X9l!=eT{wh_1+)Z#A9xz&6?BM0owooV9O~$ z0|2lSJlOYnwOd1cW8dfd2DCq8jpHmm9PuwU@qd_`X(!GJ001^j0U7{+o#5e|yXC}p zt|i?`s|tYfa%N`>*|wsKAY00000+v>I~7CGPhIL5fF zH-ARS%7xeql6Lwj? zJ?E4pclP?cen8tZ`^MOeIX$zlZ6z=3^|^JGJ^%m!003KJs|wIb^7JHM?(4h!b$_qV za!Up1PLhAK%Kk6j#AB}aoPJ{2c(3eh8)Q^~emrwhfCd0yM{x@d004H9|C8kMBsV0v zJBwE{e?5y=0{?K5Z|?P3$>}8jILUQMey6wppC@^1lBXoOtA=B) - -How to apply EUCAST rules • AMR (for R) +How to apply EUCAST rules • AMR (for R) - - - - - - + + @@ -56,7 +39,7 @@ AMR (for R) - 1.4.0.9042 + 1.4.0.9044
@@ -419,7 +402,7 @@
-

Made with pkgdown 1.6.1, using preferably template.

+

Site built with pkgdown 1.6.1.

diff --git a/docs/articles/MDR.html b/docs/articles/MDR.html index 3d8a28871..c638f0e5f 100644 --- a/docs/articles/MDR.html +++ b/docs/articles/MDR.html @@ -5,32 +5,15 @@ - -How to determine multi-drug resistance (MDR) • AMR (for R) +How to determine multi-drug resistance (MDR) • AMR (for R) - - - - - - + + @@ -56,7 +39,7 @@ AMR (for R) - 1.4.0.9042 + 1.4.0.9044
@@ -268,7 +251,7 @@ example_isolates %>% mdro() %>% freq() # show frequency table of the result -# Warning in warning_("NA introduced for isolates where the available percentage of antimicrobial classes was below ", : NA introduced for isolates where the available percentage of antimicrobial +# Warning: NA introduced for isolates where the available percentage of antimicrobial # classes was below 50% (set with `pct_required_classes`)

Frequency table

Class: factor > ordered (numeric)
@@ -306,48 +289,41 @@ Unique: 2

For another example, I will create a data set to determine multi-drug resistant TB:

-# a helper function to get a random vector with values S, I and R
-# with the probabilities 50% - 10% - 40%
-sample_rsi <- function() {
-  sample(c("S", "I", "R"),
-         size = 5000,
-         prob = c(0.5, 0.1, 0.4),
-         replace = TRUE)
-}
-
-my_TB_data <- data.frame(rifampicin = sample_rsi(),
-                         isoniazid = sample_rsi(),
-                         gatifloxacin = sample_rsi(),
-                         ethambutol = sample_rsi(),
-                         pyrazinamide = sample_rsi(),
-                         moxifloxacin = sample_rsi(),
-                         kanamycin = sample_rsi())
+# random_rsi() is a helper function to generate +# a random vector with values S, I and R +my_TB_data <- data.frame(rifampicin = random_rsi(5000), + isoniazid = random_rsi(5000), + gatifloxacin = random_rsi(5000), + ethambutol = random_rsi(5000), + pyrazinamide = random_rsi(5000), + moxifloxacin = random_rsi(5000), + kanamycin = random_rsi(5000))

Because all column names are automatically verified for valid drug names or codes, this would have worked exactly the same:

-my_TB_data <- data.frame(RIF = sample_rsi(),
-                         INH = sample_rsi(),
-                         GAT = sample_rsi(),
-                         ETH = sample_rsi(),
-                         PZA = sample_rsi(),
-                         MFX = sample_rsi(),
-                         KAN = sample_rsi())
+my_TB_data <- data.frame(RIF = random_rsi(5000), + INH = random_rsi(5000), + GAT = random_rsi(5000), + ETH = random_rsi(5000), + PZA = random_rsi(5000), + MFX = random_rsi(5000), + KAN = random_rsi(5000))

The data set now looks like this:

 head(my_TB_data)
 #   rifampicin isoniazid gatifloxacin ethambutol pyrazinamide moxifloxacin
-# 1          S         R            S          R            R            S
-# 2          S         R            S          S            S            S
-# 3          S         S            S          S            R            S
-# 4          S         R            S          R            S            S
-# 5          R         S            R          S            R            S
-# 6          S         R            R          R            S            S
+# 1          S         S            R          I            R            S
+# 2          I         S            R          I            I            R
+# 3          R         R            R          S            I            R
+# 4          I         I            R          R            S            S
+# 5          I         R            I          S            S            R
+# 6          I         R            I          I            S            I
 #   kanamycin
-# 1         S
+# 1         R
 # 2         S
-# 3         S
-# 4         S
-# 5         R
-# 6         S
+# 3 I +# 4 I +# 5 I +# 6 R

We can now add the interpretation of MDR-TB to our data set. You can use:

 mdro(my_TB_data, guideline = "TB")
@@ -378,40 +354,40 @@ Unique: 5

1 Mono-resistant -3314 -66.28% -3314 -66.28% +3214 +64.28% +3214 +64.28% 2 Negative -637 -12.74% -3951 -79.02% +997 +19.94% +4211 +84.22% 3 Multi-drug-resistant -565 -11.30% -4516 -90.32% +442 +8.84% +4653 +93.06% 4 Poly-resistant -298 -5.96% -4814 -96.28% +239 +4.78% +4892 +97.84% 5 Extensively drug-resistant -186 -3.72% +108 +2.16% 5000 100.00% @@ -433,7 +409,7 @@ Unique: 5

-

Made with pkgdown 1.6.1, using preferably template.

+

Site built with pkgdown 1.6.1.

diff --git a/docs/articles/PCA.html b/docs/articles/PCA.html index e45199c90..58207a79a 100644 --- a/docs/articles/PCA.html +++ b/docs/articles/PCA.html @@ -5,32 +5,15 @@ - -How to conduct principal component analysis (PCA) for AMR • AMR (for R) +How to conduct principal component analysis (PCA) for AMR • AMR (for R) - - - - - - + + @@ -56,7 +39,7 @@ AMR (for R) - 1.4.0.9042 + 1.4.0.9044
@@ -353,7 +336,7 @@
-

Made with pkgdown 1.6.1, using preferably template.

+

Site built with pkgdown 1.6.1.

diff --git a/docs/articles/SPSS.html b/docs/articles/SPSS.html index cc56111d7..110bc6fae 100644 --- a/docs/articles/SPSS.html +++ b/docs/articles/SPSS.html @@ -5,32 +5,15 @@ - -How to import data from SPSS / SAS / Stata • AMR (for R) +How to import data from SPSS / SAS / Stata • AMR (for R) - - - - - - + + @@ -56,7 +39,7 @@ AMR (for R) - 1.4.0.9042 + 1.4.0.9044
@@ -210,7 +193,7 @@

How to import data from SPSS / SAS / Stata

Matthijs S. Berends

-

21 December 2020

+

24 December 2020

Source: vignettes/SPSS.Rmd @@ -431,7 +414,7 @@
-

Made with pkgdown 1.6.1, using preferably template.

+

Site built with pkgdown 1.6.1.

diff --git a/docs/articles/WHONET.html b/docs/articles/WHONET.html index 73d25f65d..1e024b431 100644 --- a/docs/articles/WHONET.html +++ b/docs/articles/WHONET.html @@ -5,32 +5,15 @@ - -How to work with WHONET data • AMR (for R) +How to work with WHONET data • AMR (for R) - - - - - - + + @@ -56,7 +39,7 @@ AMR (for R) - 1.4.0.9042 + 1.4.0.9044
@@ -430,7 +413,7 @@ Drug group: Beta-lactams/penicillins
-

Made with pkgdown 1.6.1, using preferably template.

+

Site built with pkgdown 1.6.1.

diff --git a/docs/articles/benchmarks.html b/docs/articles/benchmarks.html index 1ffc6dbc6..2da29ea75 100644 --- a/docs/articles/benchmarks.html +++ b/docs/articles/benchmarks.html @@ -5,32 +5,15 @@ - -Benchmarks • AMR (for R) +Benchmarks • AMR (for R) - - - - - - + + @@ -56,7 +39,7 @@ AMR (for R) - 1.4.0.9042 + 1.4.0.9044
@@ -244,20 +227,20 @@ times = 10) print(S.aureus, unit = "ms", signif = 2) # Unit: milliseconds -# expr min lq mean median uq max -# as.mo("sau") 10.0 11.0 20.0 13.0 38.0 41.0 -# as.mo("stau") 100.0 110.0 120.0 110.0 140.0 140.0 -# as.mo("STAU") 100.0 110.0 130.0 140.0 140.0 160.0 -# as.mo("staaur") 10.0 12.0 23.0 14.0 38.0 58.0 -# as.mo("STAAUR") 10.0 11.0 18.0 13.0 14.0 42.0 -# as.mo("S. aureus") 26.0 30.0 46.0 44.0 58.0 78.0 -# as.mo("S aureus") 26.0 27.0 32.0 31.0 31.0 56.0 -# as.mo("Staphylococcus aureus") 2.0 2.4 2.6 2.7 2.8 3.1 -# as.mo("Staphylococcus aureus (MRSA)") 890.0 910.0 920.0 920.0 930.0 960.0 -# as.mo("Sthafilokkockus aaureuz") 380.0 390.0 400.0 390.0 400.0 430.0 -# as.mo("MRSA") 9.9 11.0 16.0 14.0 14.0 41.0 -# as.mo("VISA") 17.0 19.0 28.0 21.0 45.0 52.0 -# as.mo("VRSA") 17.0 19.0 26.0 21.0 22.0 53.0 +# expr min lq mean median uq max +# as.mo("sau") 9.9 12.0 15.0 13.0 13.0 42.0 +# as.mo("stau") 100.0 100.0 130.0 120.0 140.0 190.0 +# as.mo("STAU") 110.0 110.0 130.0 130.0 140.0 150.0 +# as.mo("staaur") 9.8 12.0 26.0 13.0 41.0 60.0 +# as.mo("STAAUR") 11.0 11.0 15.0 13.0 13.0 41.0 +# as.mo("S. aureus") 26.0 28.0 50.0 58.0 63.0 75.0 +# as.mo("S aureus") 26.0 27.0 46.0 51.0 60.0 67.0 +# as.mo("Staphylococcus aureus") 1.9 2.2 2.5 2.5 2.8 3.1 +# as.mo("Staphylococcus aureus (MRSA)") 870.0 880.0 1100.0 910.0 1000.0 2400.0 +# as.mo("Sthafilokkockus aaureuz") 360.0 370.0 400.0 380.0 420.0 540.0 +# as.mo("MRSA") 9.7 11.0 17.0 12.0 13.0 66.0 +# as.mo("VISA") 19.0 19.0 36.0 35.0 53.0 56.0 +# as.mo("VRSA") 17.0 20.0 20.0 21.0 21.0 23.0 # neval # 10 # 10 @@ -301,8 +284,8 @@ print(run_it, unit = "ms", signif = 3) # Unit: milliseconds # expr min lq mean median uq max neval -# mo_name(x) 128 167 205 195 232 298 10
-

So getting official taxonomic names of 2,000,000 (!!) items consisting of 90 unique values only takes 0.195 seconds. You only lose time on your unique input values.

+# mo_name(x) 134 167 201 179 207 310 10
+

So getting official taxonomic names of 2,000,000 (!!) items consisting of 90 unique values only takes 0.179 seconds. You only lose time on your unique input values.

@@ -316,10 +299,10 @@ print(run_it, unit = "ms", signif = 3) # Unit: milliseconds # expr min lq mean median uq max neval -# A 7.35 7.70 8.15 8.11 8.68 8.96 10 -# B 22.50 22.80 28.10 24.30 25.70 62.60 10 -# C 1.84 1.98 2.13 2.13 2.17 2.43 10

-

So going from mo_name("Staphylococcus aureus") to "Staphylococcus aureus" takes 0.0021 seconds - it doesn’t even start calculating if the result would be the same as the expected resulting value. That goes for all helper functions:

+# A 7.59 7.93 8.24 8.09 8.66 9.06 10 +# B 23.60 23.70 29.20 24.30 27.10 66.10 10 +# C 1.84 2.13 2.22 2.19 2.35 2.62 10 +

So going from mo_name("Staphylococcus aureus") to "Staphylococcus aureus" takes 0.0022 seconds - it doesn’t even start calculating if the result would be the same as the expected resulting value. That goes for all helper functions:

 run_it <- microbenchmark(A = mo_species("aureus"),
                          B = mo_genus("Staphylococcus"),
@@ -333,14 +316,14 @@
 print(run_it, unit = "ms", signif = 3)
 # Unit: milliseconds
 #  expr  min   lq mean median   uq  max neval
-#     A 1.60 1.63 1.74   1.70 1.83 2.02    10
-#     B 1.37 1.40 1.62   1.54 1.74 2.07    10
-#     C 1.39 1.45 1.63   1.65 1.77 1.86    10
-#     D 1.37 1.40 1.58   1.51 1.62 2.27    10
-#     E 1.44 1.64 1.70   1.66 1.81 2.13    10
-#     F 1.38 1.42 1.57   1.58 1.67 1.81    10
-#     G 1.38 1.62 1.64   1.63 1.70 1.82    10
-#     H 1.44 1.65 1.84   1.82 1.99 2.60    10
+# A 1.69 1.77 1.82 1.83 1.86 1.92 10 +# B 1.78 1.79 1.89 1.91 1.95 2.06 10 +# C 1.74 1.79 1.88 1.87 1.94 2.06 10 +# D 1.75 1.77 1.94 1.95 1.99 2.41 10 +# E 1.70 1.75 1.84 1.81 1.87 2.08 10 +# F 1.66 1.70 1.76 1.74 1.80 1.89 10 +# G 1.68 1.70 1.82 1.75 1.93 2.09 10 +# H 1.66 1.69 1.75 1.74 1.80 1.92 10

Of course, when running mo_phylum("Firmicutes") the function has zero knowledge about the actual microorganism, namely S. aureus. But since the result would be "Firmicutes" anyway, there is no point in calculating the result. And because this package ‘knows’ all phyla of all known bacteria (according to the Catalogue of Life), it can just return the initial value immediately.

@@ -367,14 +350,14 @@ times = 100) print(run_it, unit = "ms", signif = 4) # Unit: milliseconds -# expr min lq mean median uq max neval -# en 15.77 16.36 18.40 16.85 17.50 53.58 100 -# de 19.03 19.70 24.60 20.14 21.06 59.83 100 -# nl 30.93 32.03 36.58 32.80 33.78 85.59 100 -# es 18.78 19.62 24.49 19.98 20.60 58.73 100 -# it 18.80 19.50 22.68 19.92 20.89 63.99 100 -# fr 18.78 19.59 21.99 19.90 20.75 58.87 100 -# pt 18.79 19.65 23.04 20.08 20.82 59.30 100
+# expr min lq mean median uq max neval +# en 15.91 16.98 21.87 17.54 18.34 168.50 100 +# de 18.98 20.14 26.30 20.74 22.64 66.68 100 +# nl 31.02 32.71 37.56 33.84 35.81 82.77 100 +# es 19.13 20.06 22.96 20.54 21.42 65.26 100 +# it 18.90 19.84 24.26 20.59 22.80 60.30 100 +# fr 18.89 19.92 23.46 20.49 21.72 62.85 100 +# pt 18.90 19.99 23.80 20.70 22.17 61.42 100

Currently supported are German, Dutch, Spanish, Italian, French and Portuguese.

@@ -392,7 +375,7 @@
-

Made with pkgdown 1.6.1, using preferably template.

+

Site built with pkgdown 1.6.1.

diff --git a/docs/articles/benchmarks_files/figure-html/unnamed-chunk-4-1.png b/docs/articles/benchmarks_files/figure-html/unnamed-chunk-4-1.png index e3bc14d7255d48298afae27059a35d5f83a0571d..e00371786ecaa3e927e4beaa1cab18dd154b2819 100644 GIT binary patch literal 69636 zcmeFZc{J8*-#2_#LS;;Y5GA1r3CUa;A|VtB(I{oeJQcfS3}uLtObH1|G7~~lNf|Rw znP)O&ct1ybU-$5=`+nZ_to1zW`Qv@9eXZJ?>vW#S?>N5S&-6XKHPn>o*RrjpP$=}u z$K*9B6sk)U%F0+;YW$ZszOO&y59;&BmE`d!zUGeRy5f&DmdDOmQz)C6$^TY-v1TLv{KHK z(OvVGetOru7C!K4^7B}9KXYePcih-RC#KJNA)KP=vAZ0%cO17mNo8ehZ|CYd)^O-$ zZu{-m=>vmv4r5H0We!Bn+#73rG~*%@$vkA2yH)<5ukKU3<5q3s{`)Iu%l=(Q|M|u< z3hyPaf4(-ndq&6n_t%4!VZqz~`EgB3knq1=XRVQ@$3H)PY=!Darhk5Xmz(mIe}0;K zwa|Zf@r-XPn3x~TgoK2wpe!sb7^UeNW$5MW6&j{`>Lq)WoaXClI+zz@^2qknliiF-IgF}4Wb&(jlZq8-g- zemXHTqlDjFRn{x+c{%;egI{WaJi2=~rPfu7#n?7^{Tgm^)_*9Cg)u*`m%J&4-zneF zPjOYgA)}vS*K|&;spuQML^}}+iXn}ZCgjK>z045 z^g*HjqYvi)=!^e(>ew0vDR16vpkd^Ezr5JCyn=H3&Yc^*5%%2t{Kq;zU>Buq{rg>f zxUw)mn5vs=x9`?`KVRmc^RFTA_{dvqTP5wLtS(|f>N!0HnX7FT0(p4&_>KnhXrDe^ zd{H<$FOTEYsZ&CaRQdPpDM>9{S{qd1Zc#Azyn1oNh7Ip73L95Fm7aLb!l#D6XD>P} z&GkNb@Zhf(FLr0{H)|`{`u+Kdqvy|am)+ZPr!oCXmnYXPw-$2?5$f>I9w%cJi|`9# zVu~-_yiiU<$;ilX=n2tz+$_snJ$)H3JKKJTaV&CqA--C;+<$Ay@6p15(Zc0c-v{{A z84UPXeL1f$e`b@K>kh)sX7i&CeoBrFmBRT87$Ez#Z+S#?s#8COthOfwczyPR<{4l@aze^2{F+PTh*aYItAPhOtX z)Ns>gr~KASi^X@>rP&SZ#it4uF02pYQ}<}RUiR~Ic+cy$n=@P0A|&qOlTlGqA7P@R zz3qm7@5rBNE$JxnOtWZ{$t+LDD&FHbw0?);y>}l&_86ESVUv{cB&g^Tp@Y7xati@#S; zX4+h3_ipmlI)k@*&UJBPmGsP$N(mG&3zWA$UJVTmw>NJ@?y-rky-;?q=;fJo{q?I+ zOwVSTmsScE-h2OEUNu5uVQSXsmIIfK`oG1AJ5BMox=fzn;o)h|s5dN0yHKv7 zr{@zOGfx|<6i|k}(yQofi=E4jXVz8bSK_{g<<<2@;rLd5hBIf*uu9nQztP)Ak=vj^ znO64oXj}E}4x(DTI$(;N^w?ZYzime<0EaOU3qJ1?uz4FqE`Gi z+S^*M-)|QeXFYuQu()NrTct#L3W2CRBo5QidYLO6TS6 zU6f-x*vv_T4b3em$cTsinJw^YW)qgwK<2EWW6#FC-y^ww)v+{Ghsj1VHQlXp{CL`> z%1znL)v-#Km0<~tw!(S?4Hkb#C`b7v1fznqH7S`T`5kDkiV9S07uq@|@f;KXA= zw}t*5O0Rl#rHb>@qXRUD4jposuGQJ^y5w@b>1}ew;@RZW-9LYF%gSaD>4bPrEGn(qF{_y2X86Ly^hYx>Rb)41IyuF5nHwqu^!>3R019u)r8~SU!tGsJr zZqn+IZ|QA6_Jilg+KVQHl_umjDA3-fv==J-qNvAe#jELNn1)m;Ea{xPx%x2ES3H`_ zk?OfE{`c=Q&Gq*6nV|D@_x9%IKl&gk7Yfk&-8#MP6chFI<%CR3Esae&l zQr^qN#TBq|&uL5ZE!;WgIJiS?g@vWVx+OHUSWEuBd*5>{jnTvlqxwfjM>k|!$LGCN z3gG15w@=~f)m=ZUBHLcKd!q)fZ!3_uxl>tLS+a^z%FVnbXGKC`5ton=1!u&wxcG?8 zU>$uRk8w+mZJ5l>oaS|LM?D#isi+ixi#yJ|d9!_~Q(#a~Pb)`&?2@>c*$?;4h7N~0 zW4YF^znzf4KlCGG-N}dCORn1;*64V7;d#mC2o z^6u)V!fmuD!pRHPC8H~hx<5QPcKrC!8#ne#*bY!d6?lHc(b;d)r*X(o9j)^Ek2h;5 zOziA?1Ot40ifaLkR zCx@)>2M6<%+s1XRa`W<{#Y+VT2XEWE_tT|CdIR;2ig2kqBN3fCl=^hd3?CF zcW=Bd#?GTW;nZ?_+dI_a-6}1WZ(vbUrEXC_JexOzFDLengtMvjxx?9m>$G== zsFwpq=q0~BQ}0=SyDR5e+O@K}VzHR%0rL@2USOw#;`aF>FOrgs({#Iismp1KdLv!^ zM_O`AOhi^vIy*b1R6gLjNZxdto10rfG0z=@TACfsZ0nBPvwOFOwzm6Ut7vkD ztiMJb4m)JcYkKWk^!I)ZU0qs=d9T}5Rjl_43aL)B<6SE#Xt-1qsb38j{LBwJPF#%N zt|}IOLPjSw{}&tgjvWynXGYt&_V3@%zk7EvPB1xx+S=OhjD*@7uS6=ixa57OF~bh^ z@%6ni(_&v)Ig&qPi2l=69&j*;Mm=22j8elGYZV%N$f}!mlc3?yYbjpdvi{}UUVToN zGxV5QS^Mk^&?Qg>sP7cHDF^Xp=QG($-8ZRFnD3Ehy?LUmHau1+*Yj8 z?_{D{(b3Uy?AS56BS%(#iIDW%dHiAfcXip)Z0p|cXG|Jx&TA4zE3C7do0~81yu_id zgN18JVO+QFsH*C{$_W93oNYWjRJ%h4d@Llc()-ItY1*#R7z$hAke_)co@4*KlZ)F- zRdirsx<5~vrfsHOejtzN+}i8vKnXRqwb^^Cs;ZRmnf!WOnWmev3lPJhIOiCW$SeTUu(=Z{Pef=YciUjUE^+kb(2Jqt^Zhe^XLW3?V905Pmg z=T!f9G!@F*>y5Wj*kkQSTTzRgf-0EoS-PBxtBtaoTC0yqb|xn#UOlNOxqbTz6!F=f z&~r>|Y(BSdujJXeQ`Avv-DUwBM^RG)gRKwuo%NU=tnUhNUDyG@@$F*%_U+ppy8I4~ z)t$94u6=RJO7p|zbmQrPT1xY|52LO5XGgYn?~;`*R6H<&j-pnQ%<=K#M+)Vyzy1;m z|D2GVJe^f=t;j^=Nc{Jr>tYAz9{;Fo@9m}WQ@rE5SrD}%LX9T2nl}9N&tJ(#1#+>~ z+qP|ccU6Y(TuikI6DuoiZcA%thrqs_v@3sPT=Sfmuu5&S%(zz1aC=+S>(}1~H@|8% z*)e1%`CRo;r(MGXzLl$1oz&6kwfW0TEPOxC7r}2poxFxl{X4y48v5GuW9iM*azRii zQKdIB-@3U`z-UnCv`?LK%rM8B$u}IGwtH*L-Z7lB)$Bc%e&e+rC`T@KvsX1V?yHw? z=HQ?^%tY`@>N%E-tKX?N`Ih#auu9&yZJV6hy;pu&zgDhXDJ4+(jINsg({-^6q&J9} zJ+9Q?wnwGJ87IXT#op!jaONz4-AO}3ff@bmhxm9jQA@+e>G`Twy8+>?nzgv|yne8y z;6cBN)AYb<3Lg5Mg~h1DcOEyF83Z0nsy&b1t6O+W`pc6;cd(P+;i=4ybvTTdZXU<$ z=CvJ${m7r1%jM7Xbuqh`;Vy{6?P0y2uAt4>vy-!P`k9vMhJtrFwkoNZN>FSYh z^71-InMfPD02KYX;L)i>?W~zr=ZJ^3b#hYt(sNmH z@rJ8&J?cfrRaA_GAL$2j`mb?3d+pveU0v2Gr~D=z3yapgEsU}YubQQ$q@*}D3+S8t zTAizxtmxt*H8DB);L#)Ru`$cg$&Ov+E@J+CTTn%$oqxSYkz(^3Ea!5S2R7`s&H~s( zMael~m0{7wiBj@z^EsD}8>#^BfjrJ16cV~r{mumS_RRe2wU($N6didl?W|_q)E$p<4iY-8Z&CUA2SM(P7(+~5m&y2Jj zQ&qkGh5d zb{0-f1`2xhLl%*z1K;A-O*u(_x_n?BMW|DEYpV69s;cq>RZ@3=*gzY&_v~3mI$x7T zp&u3uE8Xna8^J1Wx$U9gIf0p1jhPl)6p=$B{Y$?`%VQLLUtOzD;ca8;(a_hYJGp^9 z;`$@>t?_c%C1&iIcc||@${{T`Ub0I$ygDxU2+Krqt2{f(VR&oqlIkPjo*y*o^71uD zZnrcYI0>frwX@WByK-Pty-VB6O?!1IvDJN3c6{oVG3V5#1{wI~%{chxr`6bvGn>-v zM-5#7c@ti|2y9!TlDl<4*T`s_Dlg0Yui?RvFgELa)v2>*&n7kSJcU?dm>g>6J_8+N z_3G8pIXOSBbgg4x@KA|6a_Us=3DIi7Ca=2hPv*oMwLH91*kcv_iW|}{JO~c1d6~)5 zl7NHizVGZ?qf(!ZDxOE=ZBBq!;W^QRomSVZbv08_jsHkXYfPXprYLh}2F3WIp z#|&6PNYN1rRah3@&w$>I-X>Xa{( zw=vivcAd2@^&DeT?F$=zAAlWfBld3Pdw{rJUVZZ=PlfSAClj@gsjKTq(3M`z(A#U6 zr`sFL1^y&J3)SZs90G2yDkd!K9{Zo}_L2DJ1LF&CAD&|Ck_ff0M%<%xQ z0J-xhe>KejGq}&Q2C52$3AG~MFyP6PCyFx}H@Xx7RGmljbqslx1HYHPMT>NoO|z^BA;1Kp)glhS2E~rK#WhNyEC{R*=6lo)9$r zB%8}@ho`vX1P?{z(caXTFW)z3Tc6a`?Xz3N0{NA5I@4vgI_&|HC!a?*`E=+!;9B3W z%FF2nxvO??bEgv3)SR`pwwBbpqm0s26hdwa{YSSd)BgwUL~!GO)J_VjB?^C!NIsFU zUAt@7E?PP|_ieO5qY)Ce#rTY#U{e=%x&CfyyAN>;sNe!{ zmu|MzPQ?JuVeJuo(!Q_Js{m>Z3bc0{{$OD?un@;#jgE?(6dz@ilgrB;OD2M zVc?L%0!Gw5`h1y4Yp!#Z=Ky0MGI*q4sfqy?uzIwo)Ix}riG}5k?O>fTKFEnOY|Q#r zY?iUE09mnX><|k-epDe%HbDAUSRQEc)eoOPm+s4KUKzD?pgT4|=E(Kydw1{I17bu= z0R?$ed1Wn>(ZVn_zMP7U8#Zj)xpOsYWywTOB|#|-4Z3-gUnKeY`R`ZW{MC4+A^i&D z&rgr;JbA*AH$RXRChIB#3S(C)@$&Q@D{Jcqk&yv4HQL?X-BEZNVZxWzYHDfbN)jEkwJ!2Phyy00&;f!rl@Yr)}(tgE5Gl{DQ~I6ZWnQo4pe z9nSOna8n(ov_GjaX)BNh{dYf=bUItAV*w`=s*@8yVRxDWl!P^V?A4VI2n*kT@?_}s z0+h<~t@h0;fVDyVz;7>1{`{A<9$v>*K$0`LF&Z2pY5&p8-qG<8 zs6A0tw9C>g%CAr;9MVo3?AvbIuiL>3U_u(l!EES>Qe*E{_0=V_yUkO*12Ge_XqDQq zX;Tb(KT5%1U2+NVL60FnK%1PV=K6;M20mF?;sFCHYHAOiU8I&~yBgkHWifQK{6AciNZ+8nb&`!N#ypD$oIA$1T=+Vo{$~IgV`*#NggyZ{ogsdwkL`)PR z!{oC}RKSP?Sqv(Fg&+=u0E=ZSM3an>@HD@%V6}K6!Jd^0IIf_u8sZ@n2gkivuY}@h z=;apgH>2bmgDcQ7Fgy%h1`)s$Am#t5wDZ@3o6f3FrM3V#*{C#2%D57g+?NSv8h0$8 zUN$}7z`n$jPeq!aS)uw0*EibR?cc`_C1~$fxMd&wqJA8}=2}vAif^5KMuh9W)_h5n2g)`9fiGR|sx~%nw2tQSWc7^IUN zwcWdSgU5|Qx#X6SY29^53yN-M=lOWP2yhlb9_3=Fj;Rfj@zIdFzylO}1a_rg{m$z$ zRjnjYdExx|?nza7`H!#klF_M?zY{B>{fp$N`{&C?<>V;-oYDi@#7yw=^HWe%q(ko~K0f?|SPnYE_{%SJL(7Q3-sqpEs=sMC(Ra8{EtBNa|euH1OLv@$e&|oT9 zn!iT3Rib838VhrEMiKb$3G?yJQh;BY%b&vjf-ZkZS@?Q`P`ni(cd!d?%uihqRKA)w%W-s*y5_J{9*L-pjVP3AN8mEGWCIGu!B&S=pi-MoC+qFxb3xfUooYx=G56e#_H=e+vFjg+0xim6zCYgJ zp^mn;91|6*pJLeO%X2PHzC}h5((l0jfPe+t(pF-t2%BHMXCb5>{18s8ewJlXlC85! z^63(YQLkTX!t>Njsx|rkoE~OwrA9yIYa9=_iOj z3N8&BE+Hvt(zHb}mKkEjpvCu#?A11nx%yq-gE>1^Gm!}* z#fJ~ah+je)HtaVqXfN5lA2VuF3?wPj)@<(X?&8UkQ0?57?e5kNPVXzQ9IZ{-Off>g zoS3;oO`p?gCl*dmWMyB$0x!HmgV`fgeNwwY+2b?`NP!ryn`4t$d1wzzLhCANPw3}_ z!ElzJJA1atBvj|*h87ub+q``$Nwvk7(;XLAeycuJNB+{O1jjD6+TkXLb;*Tab}di8 znTP;<%5X)tnCn~|%I|9CAD{WwaJDt? z)$;3qWdV9Z9s1)!i5U}5vl0>$UB1zRqX6%-nel!CD|^PY11ZZKw@H# z2@Hx^wBEzI=&Fgsa_oW?x6jlF_H}1h7eNl6KB?kA=RRQ}x)Blk=-I_Y^hSve4+wk|M1PIvlxd|4`7I!u5RKCrl3}!Xvz|PH`BgR%Ro_Yuh8K=wG;kjPJ ze5dG?lrKFMW{~<&es;~=I&`CxiXh@|O(`)kD|hbP2|2*xq?Ek;Gmbxd>i&r&t7e8Yz#Bzexz<)ZS8iLO0cya@@4#nT45~ws9V`S^`S~!G4|Cf zlWOiKQjVIpiUUJKJr7*@V$}KG+v-gDHTkpibz$3&dQcKZL%PgULd(G9S1Twe%uan* zKY8lZPQEM97XYTx%$mgVrt8j5yoL+0WB>lN>cvN@yide$ti=B2tQ|cTEP7?>&nGS} zDH(saic#cRRuV`#w4<+uuC9)a5bXWol60lIE+#dn=$ty$0TEO&)i9qBFA6~~BUxPx z@mA=;v)?0^+?6;TsZgo%>}ZtaJSY!uQ@iI%0aF>?)|L(zOCR!(HNv zbeUKKkC5}`)JZ@OB9sy(?&Rsy9;Bd`mv_a58V1f>%52)M{7rP2!QuZ!V~M)8QeNry z^FxqeS0dT~xk%>byhEM=bO~6zuWScTld?=`kNnB^5%#U#@F335P4rBJeS@RCLN4fN z&`9C(t-X40Xmjm`C;Eoff%lmd(yG0Ky}c4_ck=SaU~d*KOjK@^U51HRWb|&bN_JG_ zjW!e2OTCP>zMJ+HLu({QftXw@ysGbD;PqtJBFq8vYn(8I@$qpYBwGSlw&UNe(>eL! zMUOHK6^MlSKsSJhz#7Ptee?5-pJ~zU)k183Y8Lhr?ibE~eD_WcW!I5EJQKCmalN{Q zxMINcNhYTamB76d}23QVAc>HNi{`T_MP3F1uLA)m>K3)r2wQ^;*vXu1j zO~>Ru8wu#Ysp@QB#EO5LxyPe^YZw>|r;o3up{Zn9bjr=YhWZXWy7_3!*#^Zo=Iqr^ z=ER7!W6t`Yq@B$MssE$2qotKp%X;849XWYJ4QZ>0YXLnOdQ(Sluczcl)+%CkkK_!d zBsryXF*CO~5Eq}_quN9sAbDb9Vr;f6V9!>yq^7?$o|?Y!Q0T6?680na_FpKYBt&|( zTu$FLQMVW8{1#*_@NqhJF}lI}RL@$|Qxd_aPwD7*qH26#*}%g5z=B!f!5RdCa=3qy zU*m(b;pCL_&G?N(@@ZeZuRU9-fpEcoR^$8s8`4GpH)NRqJ-Mj=wRf(uXDfxQTZTWn zMMv&vK}nVD@;x7)wF$MRZ=h78hR7r6VI;y9!tel8|9RP;AXhbg+4(dh(0KxoKNemgke8QH|DR-RR#Au~3`xfU#Iz@z(H_<_O7Q(h zkNV#%AghA!m=`{EU2;UMBys({&ehoE3Na1>XujGGFhicO5 z>gqZ}bPTUrEz8?j3x|Iu#1&9}U6jn0@2`?AUCv>jiC(KSYJ7c3=lXFH8^MPV%UMEm zdxwu#9d~?lvu(Wrd?^WtkEun~$ON=BkcSnS`9BHbAZx*(9B8?;;7BAW^O;j8PyPjf zj}VR(%Xv~r1DjG~Vz^%#=Cc93zXxy=u-Kuz9whq}1hBlN`9Ts^IDL9knIF67)RYax zele$X>xJ1Hv%i1G!cxO~^Q@eI?tkiU-LwI?`ncLI=9Vb5IpTw%O*uSy(*l*6fZNPL zG{Cj%){Qq?R~4O4%i5O?Rf=wl@E?7~a-e1xX#*6?<;9tUIrP{NwHF{Px#;~Dp&X@{ zl@!Dk$U%lVRW`hYwZ8)_9*ffLSC?(sapa{zZe9N%ko9}uLZm*@949Yl4}p1mA|!EXUb z3M&pX!3##)_xbis^Lpd!xW+W{2vzY2a}E=oWZyn|QVwBJ3SFz)8`_PqR(W0W+3|@= zLG)^7yvfqS<;BrGBhH{WfPA~auY90fvaDIN#$h<4-g2m6fAGVHoseXT5o;Omm0ixR ze#!y09h!7`){QQrkL*4B_ERE_&rv*44~DI4lTWXsz>$)>857enLmzMz<`yurXdo{&H1UrP(Z&tl^)c* zqE&ACZyFPPQhA%nh8){#zCS(FnuY}`hB&32qEb>AHVYcQM|%YH#7TfFzR;5l@ zO2@*yV))w}L{znF>gr;k6DA}k9=>rSO)G!n#*HKt6Df03uQ{&OJaY#RkNnah2?;ic z6`(ZcL2~e$j;X2Homm2f?edo#ajQ0QFEWyYpB3TM?qKzj@*ko&w;Qi3A_L|71JTgd zi;V2{6{Zw`cJdpvwS&J;z=e*2W&?m{VYe4$?;uOTP47PHU?4^sP6rCCRHz49vPSPH zpTZ9^-o1O5pf(VFgr$UT&f8>fRzY$G2^M!qGDseb_)H^`SSc;e>AG-(WMTyK#%@b( zxp?dtEkq!gO#*YbTg)>rK*A#t0tglyZS6&OZjd0}SP@N_w6ho`3TZ#e6W-7bR4bt2 zg}9o}N^8iL`=Uof8y)|Au&w>km8TEtha1yraO44TUNv6-EFL?(hNwv^DCaL+=;=Yq zCrrY2H#{geR3WK}4?FsrG6i7;S3f@yt{AC%<-f?_M1J41bq@t=@a}wC6p$Klw!k2M zr7!l!r%R67+8ZESN=rI$=Lj4NtQmTn439wgjagG&VhdbK@O}ufG!&}Us|{|*0?`sn z5EX}4{VCm@qOU``9Ln1w)Oz3Y#Ryuy@0+EY7Nzf+>|P$$v!d%c6=PUls8YLi!-no@ znw|bReu}YGGS46h#dldR$<1BiG0pG9Ph?{l>89%nbaK7J6rY zM6rqjrt|I6a&~t1XO)lQ9%9+Y^C)s)J(oW}?s=^rrwJa9=Pp)tK z!c9_PA@zf{Pb_fIhxqtgJ00|TE5~;^GE6(=bF*9s+j@qq9R&GPiVE z+&{Hr|NQUYCFj#VR6^ElHg`tKLiLF_GZ1b0y)6gE>I;`P#_)^jwFc=zoY872P>lb+ z!eoi%q{Ybz4pR{}Xf>JEr5U^@H*}1SA^|Znt@C=_Z8tD|{1WH}uD*6b@pmK^Q&;c&h5{P<^gBTsb?sb?c}Fj)1$ zEIWxAzq>yDiaPr2`grxoGH|e0$YAb0SHJ-tTn5oQT-D>vl=AJaJ6~FU`G;Rr$`ch8 z-8XV%AT0h8EI?M-TT-O;pS8$8HNspIe0SYu3HnDX2l&$U-(KGW#};INJfIJ0!l2)@ zYt|I8Tjc!(`E6a&>11LmM{6b;r8mBEnl`0aIvc-so-xmkzaNhzKii_v@V7YMCf&+^ zPvRIBCZalh?YBWH$FR`y7d|X<_rU%6dZ}vhL7rbuX={^A|5Xt-Dk>`R&%@ov5zt4T z27JY!bwkY$uq-f14MW3`Y4#Mm;UDm*5ttQwr23|57`^PMuLti7?cL3{eh&+np*na% z8g4STH&ZY(+XwS)n-4bwmkg1qb(8Coa?)%X8m7@^A5G+T1e}{m<*pF+e9q;~Hm26k?o#eQr5z{qDHqRxpw!lqa<9Ih2reN+&=k{p7h)KY#nqGf z@Czw!FyS&w_+eot+#s9Fh~rEf6ukJJP}w{$}&kmAg#*`RdrJ*QFhh)5liR|8SAm}d@IwtqA6zM67^kPD^*tsBeWE%^ zNATjMOWTEozr{u$KXHS{7c7HUFdV)bGO}a+@sTkvUZ|*jLG43a`8>{-!(eh|_oZC> zQAL=Vv9@7<^rGUf8!7(J^dP~XwNaI~xv-y=4*4B!Xt+w=TS8P;Lsgeu>{s76U~Jv_ zehozqAtfS@O^70;dwCSer@qU@haj5Df$kA!fVjIrXWVEw1TFs>Z3}=SPKD7F#LM}K zk8WDKJ8!nr7lRN-O-%S9?~Q*uE?Du~O4Z4EU%65n9$?r(3r@&7mSgRQA&9_SJr63S zX8i#IAOgU?zCBbYtf6)-Koi5t>1@qZiMwr>s&wm?3^8LN#cmT4VuG{`Y`UlQ)^9T? zZR=zBJ7H(M$8Jw^nX}6F{9JJJH-)k|KYi_uKiohrqVS{`952r$_H9K4F;DP?U95GNs7=@a;bFMd13CAetH;1U{21P%%p4SU0xg(w7&CnWCZX3UEpmnTR+|y%_ZnuNLH+xAkOM6dQ30>zlFat%@w4pB_we zUA`4Mj3+yefsIaNldoE-z4+sB6&X>!PP9HDp*jl2b)dc`&p%|gw~^R7<#f}RH==;; z`i{r-iVj-v9l$7WiWT7Sz^NiBzWjfaY{LJMY&y(e+%6*_mbo{W9WjO$gN(Lm9lN(V zb*O+rF__+~^QCL!j&A4Xf^hGS(G6n&0g^}+(9fcr+`tTf4eTs)cApdWzRfV1p_2J* zBEr3E*BZo^9TvvRLm0~AuOsCKg{c!NO@cC#<$$YN5_C{ftnLIH^ZL*WCFb9>nGKPM zDH3hQ2x&1A1R`Ji-osDro&*Fy1|o!^Bp&|K{~yHpZ-&?Y8RN6w2_Aj1t6& z{YY%3LdZL13&XjX(>s;d<8*9SUJnEgg#{haA1*D5OK?a?b}&K6B=`a*xPpRGy&tyYu(mnU9kUPs!}FJS zX+7U|@ZijgO8sjpHOeWE=fe||lS}uc=5Cjqy@mzP?)Gnm89RNt1)Ag&4V6^r?^bC(}S~k&#?aT_%(Rel1Ve zpS!TMFh?eLz?Ame4e1i}u8}lo;Z2$}uXCHcf`W17!+qj*L#)({oGztS@=p=7(mV0D z;PT3oY=};ayDmwQA`SkjT%bcrD{%G6vu6k2m|eQG6Fl?}s-;+B5+^1rt0B(6 zvXa@+M|lgEHWIr?I(MR0d-D5`Ss!$c>Uedo?0YTdr1V2y@kH51a^XC}FIi|lDOt-H zc)}#dWLGd)zk{63Tc3nAnxh{%OhfX(-Q5;=&9+D7bK;D}NLkw`>~@(z;Hxa{(z ztd+$Igl}Lmuc-_bEQb+~7_8DgE?G|CV)Hsj!z|0~L{g)?gHnYvM6xa}D5JopV9KUJ zy^Y@|ZL-1QJI^i8Z^ml22h-(fZc!hU#A@Q45UB=y4vn%iG5+ZhIXSuX&d0z3*eMSX zchNTg7`zK}BgJIoLceA71)uA>&%1iBej+U!?4Pu3v?q*n&8@0KMjK|$hpH-w=A|U1 zgs2wU>8mr-2#eig-5*nZ;auAJyIPuMEp7LpY=He>en>zh75B=x!$<<#;ZuTP9rO?(IaWk@70t40Nm zK7H_Ddt3KX;quI~kl7Cr$~#nnCmt3HgXfluA-0Z}v0IQg2)$(`y#EfHC8c@HwD<$U>H&A&DUl8)ZStW>VyI1z6E6zX~GAemv#q0VS z(vYRWcnajBhKy^QQ7Z6u_9KJ|SALs>gr2_z-lVuqACt^%`zptk&5**8{ajsh&;cj@ zAEj!^3J6~JmC*_yit!IS0-`M13XuAf$E1)xTh?>7Z`d7k4M=$Tf2puGK0VO`!vXgOrd54UCWZ$Tqt%gu{(P zq6DnaoN|zrPCz*v{XcK+XSl;aVmulsZ<{*gm^l}{y_-nf3K<;>D~I6t9=0x%(Z|+> zH};7PJunku&C|=|_hC|~9-J1-bG`mKC%lP4Xjj(-0j?2BP1Wb~m`C&YIIfok(V7E_ zsAsha6$QZ{$0zr_{rw-xzM;IUs$!&AHkoA}3YnalDYqzGq>j4vd=lG$jzj$GC0ArH ziZPskUb7C(7pgSH)VBT-L_%ldcvRc>?fX3JXRCEdDmfLCz3`P;MNIB%Z9!I}b;y}bM=Rwg4(4)f z-F)E`;=7uffeXJ+1MT8NbU`Gx-z5nFmw;u2QHIAP)k!`QDl3l3wK^FNmh+JkwjYO= ztBH#SK|8buy=U;kV! z;zzf%UwqHwPKRAS>*Y^Q^)+Wu#|@Zaq-QeF=}&Xj)%Ain)`uY@1l-pmV`sN$Y8U6iljwHA3+gGvIx*{p8OR5oWdzG*ffJoKjSz75#4P{XNwm8x$Z!cOB5v$wJuOItew$&{YE&2_NKG z(M9wGh4eOe4Esc{>7~4@uiuOuvwN$Zg@pwY!fIDU4_L2XX{VQ5$9-wl&*e{Y-(Axg zSPRaH?R%Cfkq3gM%5Se;$Fyccb!Ut1)P-#mLDoT9UXskIKuZ)SP_wa zuQw>zldf#mJ1<0*+pU=7+u&)DTqN39lwnitLq$`^V!wDN!I;O#5<|DwE=SeP=!ZDn zW9!sqn_sUXEw}5WHz54p{((y}XX7sqI@1hQt9 zbuR;e+_ld-ra3>}m{hOCV~3rTRKGOcgI|iL8>e|S&DlM>GTAA>Wa#yvo_ySHwW%g| z@UQJVcC5lx2EtHmOkUNioWif!iqJ7)?F21jo_fcgJxSF|v=FpcxE0C1LdBpg*-zk) zT8WO+wwPLgvWA?ytKU`k4uR*25B$uoT-fqmjY3)+2`2+k-_6JnmH9n%Ab-*H_>PRc z7fB+g;vf=Y;1vqIp4Fp_Y`fvdtzs9dP9>HnMEl1@OX%>uOwrZ~2%dkKerwUGImdP# zn&H!Kw==eyxkKww*+dl}4JPWyDGG!V54e-b@u=NU!wMX%e4|JD0-mXfgvI9RF z8vb=-!WjIVfgzo7RN&dw!x*f_k^%GPrem-s_e^0)L4z6ka7^lary!;246eI9To zb)}5+_%7QN@1P(S2-BAB?^fiu0k58T@}xe@>Pw_-06MraqF`gcex;-{c+l>VhOJn8 z&6NaDjzjn7(tCUTs*S}h%!}f1T(S-5uc*V43S&TwGqkIEOFqe|N2ddmkpi@Et zXBD{;=q^Hb^JN)*d_*Ah0!pE7rukN6dwBd$wqgJRsRBVXKHP2bwEnsn#)-YX}_9@ZmUCJ zc4@{X)M@34%F1g_ztsH;fs7i7RoT%_ccJa=*>ha~>L4=vz_O3NP+ci|l5|S>Un~1r zay0J_hU>Tw9MHPni@*4^82ass$47!~jEy6Rh2#mb@M0R9n4V6y=S16(e+U`%E{4Ci zh)x~n4I(WRPa#><0GjB2^ky>4&^bdS!MtBTt`X*W(`wSdxG4p0GT+Wb{lY`4+Xh|O>2@nEX#Kgo{F?vQm5RA_}gv|)eijU_jE-oJX zxF@x*n{V%(28|16xg5KhiHQPfoXBoZA|ik`Zv(_f%wb5>g`&+cozS`}mRCSPfY2l2 zvp{noPk-&*m3Z%^h^ir-@M2Pm&s^-Me?_q2_=-ySlnM!SdiB#H5VU;AdiDa)Z3rry8|4?g^yqC|tG^7Z-;- z*geBD2tABVO}$K4Lm9$;6jf_IK_mrPLfK%^-h*`vSFP^Qlf)}kPs43TDTi$nh`;_L}%*=8khJF3|mHMo72F6bASN32ORP6WSmq3<9G<1h&DGuu(w2H<+ z4LFZejqv=&P*?nN>(N$e7f2)|pt09rBN2b7$8k^1b{roRUvc{p4x}2QwRd-PcHYJZ zi$+@x^nA+F!pIsNt=Kg*bPuyPy;r!GAm9GCRB;5rS#wI%`Q56^zD0euXO zzn>pHM(p<)(3ASZEllR`QJ%@y8Oj}!#QO8K>0Q*nO+>C1;{VrmT^Co-{eSYu-9qB_ zpvC_AqK^fXhl+t%he_k>ov7Yx9;sgLH$6$u`ma=BPC%meZVpL1I!v`lFD?DHh-k|& ztzEl{hJoCiV+1@B&8B%m+@<0kAP}Tf>I^+UkQx-_SVYD_H;8F{>sEo`JejgXfhI~1 zxv&R*1u?y$Lh=nmEnvp@p`YS+lj(EdzjY}FO-6J3;LIYZt9++Ni819xJp%<Hg8=(_Mf)S+^E*if$sfhS`vH8G6Z^ zvzSsgA6*8PG6HiU$&``S{5>NVhD6WQLNf1YZ>I}ITZqxE5I~|b^9_s|Lt%2 z6TiuMI5~M^ux=mXSgJ!?wVKxD0%W#h;;yVVNoQxTE951q=^CxE>FH9adn8SBr#}T0 z0y1_KYBlKyP#X;{+=5NU0|aaOIrR|MLX`x|0|Rf9>!T<}&_U_*zy>X*qz7=$U$M>kNGx$ zcrrYU`1|ej^aBXX1YjmVV$m18ACL&j;*n^Lf7B&QOUtjyp;-DWPaUbzvnksO#xrrd z#$0AQ=5m0`B^ZrvW3DC|^P8BFJ%U*}VkwRf|3=<#3>Ss0!X*NMO%^zWxVq{v+9M=8 ze{gr;&HyE0UwO8Jn_#!xKsrZULV_E57{=l~f`YVSyLaw9LCjf9K45wKyTOSWam(8K z_wOk}!!99KQgL+`kcdZc2GK4NG7fb2$Y03Qol-rAR6YO+hm->o;sIDRaqtavp7V88 z`ino90TzjMgXW3K@+~~?I+he&cqM|Rrk~CV)CU~jvtcdS;shBk{cc{P^6@#(@0)+{5=b{fO~$vG^L$n9q?}7 zj~0FT@(M_9HBQF4|%iKt)pr`2H^OGsty;d5)803KvrA4m594oe<9?dy2&U z_ndzD4nh>~NI0TV;0v7O@*gWJVUjYKotqwMhPrAFk7=u|_Jj^UfFvyx=OIl@zdS+m*taKhzVo&%=}>An{L33X>KHhLK<~ z2)yk_64ga*@gpG_aCLHH4$On7pmV5UD5(O5c?s#GxFshV$xK#OlQG?6W>pZ)iAqP* zGWa+T?%${2!(vb=LHh-D)o~TJsGl9WwVqWqGcF-c*iuKsnoQ7h#9d}zeYrwnWSAhv zb9sOx54=h;7tpIPWh~lsMa*WH7G_U1Ce|To4AiVi;K;Fo?lLu4&!`gjx=z?Mrq&eQ zXZzCiPpG{RwZ`C1l{7YP@%Q&f>c>}&@yQDUm1}j*dC%3`MhgAYTo`fV(!trllWUJ2 z9Z1S?n%)h|7}X~>Js$=K#qG~v_3lV^;HbEnZ}}jU6gON?)R?gFIF`3X>oS>zg|zad9-9$ZWZiRC@&*4IQWKFH&wPr-WY44*Gs$($fFyYJT*Tz*sbOgRWQG1@(mv}ec%PX3xVpt2))``ul=N&CySUSI`DA^^Y5 z`-|!jaba*$JTc+!(}c@@gfP@dB4611_w_w?MK*rT&=Ng|P$x!bUBg^Bb>-HXorg1Iz}-65T4jg1XGL64%5ak8|tqo%;+QDOKn zHPUjnx8qo!SS@VE2pa|lhR$a($Oj|;Uj%A6HGwN*gfgemErI4Fh zTJJmq5+Rbn_!ZDgIEU@w76nDPOo!@`DmBmoYT+idbP?SviNm|5d_dh^sj=NXvR&rY zrVSfJbPbCyre(zK_xO9C?WUojfu%XX5d^M+4&4bi^6POfSgmkPk0ffV6g+q|@hDDT zlFW0Ha4nK5-jNpoDmuR={s5@ye=-Ao^m-+9E^>Gz`u*~GarcrpO5D^y?eXS15LldV z+$z8c9{IhZ5Iusj+c{**+E=Wa^)k3~;T^79dYLKB&!14H9Efz9S6`71q;hnhepU5t zL<(^G7~AopTvqjbdBZF-)r1&-1d-Bs*O^G=QZ`MqQ@%Vq#Y@5;#V)gju@MmSRdPkHYKE60JPya z`TWb(rusb_ektbs_EKw3iwJS;@Jrao=@Qy zn)-REu>Xg=HxJ8kZTr8k4AnAa$W+EGBx5Pbk}+dNB145JQ%Qy*A(0^x77`IDr9p*M zM3f=QkfDS~hLS>L$lUwcv)pUl_wRY0_xbDndAv!t$H6l!oBaA!UjX~Mr(Q!{>V5wkSg z)f|PdWO-nn@k9e~G2hkdUS6JN%gJ%h`vq^HCG*Hz8ygNtgw(F*vfRb&!94Afa>e#B zvuj>{ek-~x@a4^uuCSRkUZ35#NfQWzNP4Zu&z>FZSuuXBmh0L(SQ50gdpO;LasUCB zKYwj8>R(uRR7KxOA97lhHL(1x`{6FSwnJ)l?AVc`Mk0^t5&1nVQTAMc&7Dr39=5Bp zRa+~H;)|{F&Bq|!1$1R+ocr}ae)Ma%H$LHEJ4v-*^cQqVL&uLFA8L@eXOE_$**E)kW}7=7zG}}U%RVt4 zw3S4*w_Q)QJ$GbFV1Bt~p69xCx~h3=9ydq_^Z`cJrj!lNag@yF=lhn$rmuHl1=tqn z-2SceTVU|yf$wA)&~@F;oB8syYyU2a(sx1-J5IK~>=X`m|B6Fl7N-&h158nC5@~A`<3e=%PyYFW!51q9yE~}s5 z4z4SqK;tH4Ej?+w8LT$Dd2hBJ$xIei<@YaclC~#i5opf~k^KZx{N}P|71+>Y%7@~6 z@rR~(@=oOJOOql=b4LTM9XX-SIgj!QU1Fu%mZe>zxEb)&yx?}CvkiB9L;Q#d2{5Qc z9*lcA`SD+n`sTnZg$rHF@>?R6j#{u^@{2)x4LtirzUtWHc*s?dOJZ%+Qo?+~G`NW3 z`wdwU zo59aGfBW|Bf*XcQmMl3w@1cgYUiZ2ko>}<(dB>BnAMRDPyRTOgz7abis|%}P+WB=k zf#G17EWuCE32uq4jTY8GOgfl_tu*fA+?O{)*PpOhR{-q0#>sENC?+_o7(&zP<-(aISBBwS+$iq{MI4y)sMr;M6}TS>$x3#T1Ljh`|Al?P`px{Pa|9!5-aQ2R@1T z#2PoYvTshqP<02AeQT}iJay{S47ZrSo`K4DKrSotuONqVgS@NGJE8qx7p|H{v!#qjir<4|ebncn+=gg8UnohgV5B;#pP%x42bbB|HG zX`Jlo%ZQg-7aiSMFb8t`o{FgM+q0 z;tRC3-8;%f6)EC1eU$XHPo9s18MvO}Fnq;F zv15m*3W z-~6$EDjS&T&MpIo5BEv?CZH7Vg}(2u_Edi7G|$0$QI<)L865ebnDLsnckbST6zehP z*6;X#j-|c3jusH!T+A(@0W~^S3;dXH`-UJY92X<5EZuWVEp>yZ(apGNdyA81UUO@h zCGEq;M&IvjLi4?!ZbAM&-0Xd46g9Fsh$K@QP}V}d$${dBrwqw2B=t)rzn#YCR@1JQ zq?j-Mbjy1t$GPOIU-SIa#u`=(Kj(F?Iyp9rPA&$1TQ5XChmT)!72Ik(k?yAl8c_*F z5Psyr!-vym%&2+NwjPd5QLnRA45QcZj;Uo<_s|HnsUBP5LZr9-T2UsfhVzRO{XRHK z!z?$f{PAwTusB^Nw@lt*5a2Wm;?(`|+NPVVheY;yEVmAN z-9PTo4Mkr5mh*z8&XE9CCUMIB{g1x-Qdo#Oz-VUZW5#Fm$F zeY0Ab5>Q5CFV*0|_kR;NR(hSZ$#^R(K!Ji;#bo+)t>r6Lv<+Bfq7LwFe{#jwUQ)4& zBVEW$j2P^Ntvo+XW0jpF5BiqX?*i*>;5We6Rabm`{g5)xT7Nh(tvUV(fuq#w`N!{Rhsuj3U0|-|xU^{*N>~jWT>7?<_`^K@f?Up0d|MTbeH$#S? z>*y~!XEil7(O_V@yabL#mdc%>vAVJ@MohCDy&JqS1R%hjicvGFU-nf=z{hYek&TK} z;sn2)eNz@SaJOiiDbZx|LBW$J)oAzm55a~+YZ0qb8$Z*WA8LcLRZEgviQX6*L!F|$ zNo4EYutsf>@!DtiLvKRIAVy3R9y>I0oX|gj zUKqbte<~b(z@nMiBa#)yZVc7Ir{X1YHgX=|lcmrFypW{KAXly{s4XIKWe}O0)E4~l z39Br|pi&$p#GI?vh19DRKaY z`)5jD@7}$O51K;C6Z>0TQ&Uq>KdU8aPC+Yccbj^q&Tg~tcXm3nbD|o<1a3HdxQhUH zA_7rEZq$%5-qcvJGEm*hnAsoy|gS5u&} z+6u+NIZn{pW3JpV2M3|DHg!7`n`N8(p@0$uc|1UB8$G>a*B6I;z0C)nTGnrcKB@h^n4opUIj9T zg}TJ`78OA&iKvzyk>H`n9CV@xn2)#5`U=PGC(>0H;42fyJdpTovZ7F%=#tW~Nzfq>&OylbGh}uKMIKwNn@;l#WeGjOqwwT^MDCOK zCih!3Ik&n3vGL>RxHC^4=&2o{l}pI~it0_=_ycBST@a2zTofIjcjOUu)G{mS6c0`| zbpHVV_pdNnP+W#o zK$QhmMzQSDtxmV4P_SJ=q&-C$#{;pR0|es`o7F1L5#JA*BwI)TJk*>h$rU=Sn<#vi zD*3y(EcxG|>-l+82fM5dOKfdnwizZCaIIuT)*TPth zMScBbppe)UC{R}cW-AKfv--(=q#g`4(VYx^gGE3F*GN+7ws!&LyGxT>RVknm2eM`b z1IaIw#AC#U#m;4H3gYE!Fd>+b;0Rzi1#)!dd%8nPx4PYes1fHKu?!B z=TaUtbW_iq$KT!a4jy!`tM&07%kCi_1R|MF+3j@l+^j?Zqq0BE&2#$n8ZzknTxz?8 zDHF^46dH%T`14Ak`58|In4QDNuR-Yb0JdMgdUegZTUi6Y35&_~9rMDxRwl`27k502 z+!v*`L7{W@I2=HbX3+d&E^wcdlU*B3$f#AfuD|-$7Y|P*UANGGJXAb0RbVy@ejl&Q zlWKIgJ!pSYzTtP;BwY!JQ(|Hw>#CNbS<2i}qF3u7V=Y;hm-nWJ87?WZ645O3m8&cX}SBd+ByF+FH>7RV9^j zY`jfVX={sK_G4rmp0VR$KP?xwE?Ja18zNTOkI^ca&1MQEXi@-I-iZ69*1k?n?ffKI=8^Qdi>2<5Z z`B4PUdvK!d^?PF)b$X>DR>J7Fi^i#CqA?lTJ;t_M?hEr?WZBZ@R9{*7-H}YLZQotH zyMN$9d6>XK{gR*S*FgPq_wLlLaBs`pW${-HN#Zz^%WVK=Zj^(sOesqQE%=Py}e*n5HY?rtb8L~A6jJO(f6 z4%dVKPC1SrK{AT4ulrG$h&l~%!VtWGOx^ir-TGTeBV+Y>$Kf63%^$SF)YMe-WeZyN zRKgn862#P$@L-;Z>3$y!!@t*Y8_}dyYV`B&VJWRVirZ4xi&dLiTdZ%7OG>Qm6=sgh zYN-Vnm>+XCo1*x=uw#33=cvlZk!2?xuY!#>9nk-i_TM1+LbH?oqK_pd#l1a{nwOVn zXVHP-TMFvT)%aB7RkRUEPIGedt@=NTHS1H-zuC|AVcX>IC3tw^MD3+#nO4;nvGbJk zYlDJhn81xw>{9Ql5ykKNZmK!-frG`KWM)IQe+os_cX#p2Ae-H=wP) zX&2{Tf*4N(9shw+U+ws~s7P6%9AMM9!==XK3y;RfpXc_qe;&h>7zA6GT5@*{ZT4~6 z>}^)5pFTG72xxYH{QeDkaHJ$fZA3XkpG7rRz|@oIw~uYO7xr4whi*G2NC`S>e?RB! zqknGOzeE3D+U=Y#wrZB8mO)37EzONBOKe6Bw%t!-G_&=3v!X`z>syq4&SNS|*rJt@ z5fL)ol6^PZB8ND6Ev-hoTI|^1>&u9tI&5Wr$ZoFgGuEW^8AhEtzvyani8$}q?@Zg0 zk)NiPttn~L$ZD#QN`&nkfFj%OZzQ@zv2FdNW)kenqbqT8hbvA|Voj%}o1Rq*oy&tW zD{RX1Y5*5djoAYz7`zrM?YX?XQ|VbV&Aux2IFWh#C)T{hV{~6kVisZyq;+FYF+uO+ zHzzFd5W77Lvb>`p{lC%XO?`Srn*Y`8=PS#{<#@WcF(pxuT;BFBw^MoSoP8Icwq%RS2A&P3Y`T3~JMRzauN%Rak7H;$I zP-qu`w_n?1NOUqnSs9Usd&qmxfg8=$?uMIdNkZQ4Sv8EvR!N_}u@qo65MR)7W9;UP%4o}ras z%#!@2_BQ;7+8gEC%?SH;24|CRDg3v$pEYB~hG^%9Da)FIuitJytJ4SDnCn$HAmP6S zlB4#1@hmD?qcRUrc*KhrKfr(`=$r;^c&)3d#`coJOzK^%!zMvz9jAuC=sR{C?74o^mMv;tnUC8H@)An#|3&y+@bAL!4ub{{ZlBaz!7QWm z96s{!LC%sd<%53j{Q2{t`LFEJz;ijIQd+QJfm=8SE>i-UNjNQwrLWote|q9)9}*N}>e10F_mwQaXy1kc?oTS5tb-!PI_Q`nw%Kbo#jL!s~@hHST`x^XaPDry{?(v2h4 z8czG1An35qrcK9P-HQ7q!T*U>*LG=S^KBUpk}yG4x{h?Rw5+TxN&>}(eBH_xCy5FQ z(Q}@y{9#j8!N+xfeG&`Z!3|?xr1hd2S^n;tA!XUl*pZ>Wets7vF&hcmb)`Wa*}hiw{% zt8C$-4jQyNEc(E(l4o)05`OZgZ{*TrM~@DiK0PEXS~4U|Ogi-Fq+MMhmNuRpQILw3 z8vjA#m9t!2woo$HC$yq|KyekkDW6PPHB;gL?xN^9=rz;OB~irPjI!!XSDTz}wOjBF zc?HHR|CXt0eSG#R!9g8%R{b{qNA35})p{U{-s7X!GT`xgmgR3>t3D(DW3Xgs%^67A zs)t#2Ql7qMf0$keuU|6z_icLWXwzz2&(;srSlNNMQuUg%sj9;YyR%<(EAkqy(arDI zFLO}xYqDcZbj}HILHilZiK=?JPVH%=P4y^qb56g%W%`65pTsowFTf(vFJmQ}?x_3g zXQ-*uL4a6tel^pbUIU|mk^(g&UV<8Qd(vdt!pn0|GrMq}_qbg@--S={Ks!r|4w&+V zYXpLoGFy>K9Hxt60M>io+p2ngUWQ&=SDA>UFdF#e>0DX+abU4g)WcINaZL z6(VNZRRrXy@Iv^s>p#Ana-<$5CT%BFuN@U%vwq8agDWZ&@K;T$>${wOyY9tLc#}`y zF@QI}z|HLB_TMeIV>)7P2V$GW@GBQTZl|iMs<=vE3rFuk)iD z=QO7*%~*Joe=U^(x{-&>oRNOg1vlUNE7n*q^;s~ZnPetLReuWwou>?TiNN?Au2$e% z-^h!IimG157C`wFxS(!!Y>7m_)lf)-!9O0s5hFJgl`jf3P24D=BvG-YrvNg#}Yk*!;P{>R%seKG$Ky@Zk!D*r5;tD7@sr0x4%I zroxN!N|B15!>ki&T~)8*RnsjkiYTfTIsxg*B3&ipgHvyCx45hKGou!+I>h1f@3*r3 z(G+@3W(fd>Xsg%y_d9QK(p9Y1Jb`DRZ$%G@aaf`fDZ0dCBZ;H5Z#!dKHE8g?HP3@g zO9nv{(K1p9bp&s{6m~!Z(*x1HDHKCDHJdhaOw|)KPCV!cc+6kk>=tmP?e>h|o3lAe z@EdrE@EkC8omq$Y`OX`BE+2esN}<&USq`I&m7!E6cMno@{-Q5wu2g>>ge-Ajo>+eKP{4NCC8kue*v-PbOfd=Hg!0V znAo{{_e&V%_pH#wV_qqEtC-k8)!NOwJzHOhkCOFCy?$u{9{Ca|Hl4Bzsj4^;!=gr- zm{eXm7`zE0DAx9*%=QIing+p(tmV|FuZZl@E?%sO5>y5!o5yx(V6cLPeF=oCHfC0Z zJk!=O>#!b)gcE#k9(~FGX!|%lv!!c9%&Wgy51Yho1Rnj4Q1mh4jA6)F4xSAX&Y2;} zQ|^P;Ak=OCZFK0(W>-s*^rLxm+?qAeB>TZG{pG(!?CsnEOMgKb@Dh~r_1Hg6u9?8N zN{%uDvITp3+)E;e_mfN8BX2lT9`ge}6^CxIv$t>e`su4ze(jmLDn2wUH#dO}dwOmR z4^2$0?uFo1JYeW68%{`VrxjAf$Oe&|>-di>zfy-zUFZM?kxOx&^a$-9LtoO-yp>*+ zi74EH^c|hXiau)cO1}B(vtTo4Yqr~6_Zk^n{I`UMt{)eWOcoI)A$xQ!zM;e)-I@8~ zbZr@!G7{XuGOXlVxhYv2tp!XXE}#}=mB8Jw4X|wK2zK!whQzNVlT@U+JW@O;YyfRo zLO@!5UT|&RT^ z>+9r1X5l}r1e2U(&3cz|nsi42@0UNi!**eyZ~m5v@XyqvdAS5&;cz%{b4J4ke|Fox zuDcauEsd!mpCF7-+&H|xW&P$ddqTotaKx`=$Kpzm^IJm#JGjnm!fhBbDx9aZWfJ|( z)-F=n$0$`2isCFI-@rLYd zU`ZBKLhc5;T|f&py$=jLt-U?E@jf%I6#6GMM=tv@uu-+zLNZiuwC;6N(RS9Jo1OHE z?!fY#tzk~mgsxL##*6a|-c#f}7pyEym0a9YmlZIqbCLuwZ_$G*2hl^wLJO&KF=-Hg((MzzrVjNBgSal+HS61@#c*eM?bs2GA=zfli7!y$I1s)>QnrMP z6L&oP^zRQ14<4Vqf&_6j>^13(ZO4aKTk#2|R%k>KxtTSEVHJfBo|=gSB0c*S)*|cv z{ZTT_mwQHPBW?HivI-1LsYDIFPh95iP96gt%HZgnK;wvZhn2BAIPDD$K1$=Tpnbzd z0iA2yuT%3?V6_9A0cyQw+_yMjG4Zgi;z@~7QFfKSa%E`XAd7FDZXI$&&ci8CLm?vw z*^_Y^rO^hkVQrSot8U#!m0k2o1zZ#uzD98QUMp?&Cs{>W4_Z6u?Y?)V31@p?irHh^ z<4H+P&&KN;EIfI7MDFO>gCQ~EyEk{K5{q=pFTFP8(_S9jnP;c8dcSPV(ep;;^#r%C z$)q8L&T~UFmGxI10(4?Nj@Vl&iMKK9y0LiGj0i)V$-nIw8TP5Ysr%Lk%rleG9ke=% z0kdaE9P}~+Yj>OX@my2w$ELed)6xbmw;zwP8mt}`Yk2pw>{<4Y&#fhjeLX-P=SVfh z&@5*?csSbYw$wHT0I`xJr$MZX ztqh{!JVS8x1Ocz!rvmM7ucCjnOx^Y_Xj0T%Q_rHP^OyF7giq-oTyEQIiG^}RohI4p z@8`}P~cAPjVzB`>WkZ?_n|?uSCvr9GI<;IGN2 zPF0Vn81Y~YZ`U9Xuqzw7K7-{s--b_V9RPdn_f){3qF6U{iHZYV_3i#F(Q{wJNT;!dugCh=M7f0BCN}ZG zrAsRC^w-L}_O{8)-qdx55ro`r! zidK@*Ik?c|>}@x6Q$%8lYgzYKgFP6)omEQJ%IGx?`1Rg@S|P z=P;PgThe<01|rSq6C^`27hlVxdeiaG3|HCp1+6mjNrIFSg&%Rs-$~XwEJK{$lyUYU zmXQT7Ui`-VW(wz1MO{^^olZ$%kdsS=N;h;N%?!=?_h3aHBg5%=(Q(t^-`-;exRFn{}_Xi;~qDaheIJPX`(juJ5mDkTz zI|W-5OD~-3|m%N-?v${?1XUm@xPlGxd)eVFn3SR&Z!tzd4rs%IQ!_k3-1538Nz@X3FopjnI^rjC@BtnFoT|-OK$KKYg?Nl1ufx0)kr=R{Q zOY^RlC3{8>UcS#GWyl>MFs&H@fed_mb-wJpe)QxBECsV~R z3dd~T_%ak7oPZO*CB<53-{2%?4~k27M%=X?vOdRs?#??w2Qd_#z`*D~103UM#O|n5 zr~bg#MNZzIj-{f=Ao|(bfAruL`)-+yMv~AZtfN*)_#sl(WLf1rTw>m#5v5c6${&=+ z;?xpW%HI`P*5xZ#22Y$g(R&9u1)lPBP$#P>_M%x%*T1#Nj3FGy+jkD>aOL*xM)Y^| zgsao+wjMgPX~Tw9mXSO5=zaP0NjP`v$AyNw*d0iI3uZh+d0sSyj>ytmx#x;^oFWnp zL3PCL&lc2_h(GpF{4VCBG#NyfnmqFXb;@8&POS9xSaghfhjO10_@Fg?Oxjn>f@P+q zqW~LL!;~xykKk5LLkHcY;`4H}qk`blz-GFMtCyHOnZh-`(Ei2qNliON+@{#`z166} znA`1CtBKf=s@1o8PX?1vJ4vF->BGEL_m@X6^;q_C?&mL-h-3r~CWb+s2ma%L%+V&< zd++IoU!`i@05thj?1g;A2INSmGr!QviB3iF26alFtk6WHDpFlOII#e8U`=@1x1vIp zxjQ1ir5U9DlSIeAGV?^YBAXv7WK=Xv;L_XOX5)14gi)nLaUx;$Lp>{}-Rkkt5)DbU zYCEG&bBZNJ43A>p0}75ncnM0+%uMqT+JWf%T`wZ&uV(k#ocf~|+21lA-gnsDO1=xMnK086H+NM-dKc|K(VEb=XhQcPa_N@w(MrY0tvXDy;mnceLq zPrTU9+2Y9$1UXW3C>W#VcpA68#E9v#u7zZ-) zpS$Lo{61D&ed1Zqlu+NB&mwaiWw3H`v#Kw2sJ_QKQ*tmBb`=AE!Gb=m7PBk%`%>JF z2TdBXx>l`zAx<;X!e5&zdn<{k3s{a+vfm_?5Fm4H8`YV&$w<1r^W|T-kxyWqJ*)ND z+RJUzicni^PqJMxJ5HxHlDN zD_af?J=!)CFs161?Ql2Sa;W+cvJC4(wF8ceCsSnW9Bnv^GDR@04fa3yz!4+m zzrGbDgm*96J`ayRB9-BRVKt7M)S7r(X_U|aisJ}%tlijYzpiXxtv!LU@^~t|=rhLE zzO3+Czg~r#r=nm^&&jTns$ele#yW8astRDG`;531!$|?_aSVEZ8xK%H;_WT+a_QKpS80zWB!)D%2 z0XB1g>SuU0w&!lMM0GjY6l?Jwm-aHS@6@&HMS)gi z0+d3=XbA*N5z&mieL1Kgg#HRJ8t1M4lU&eXSl|UFvH9`@JO$6Oy2JPmfucFB)+8k* zd5;`!l70MMwq-i+UVQ7gY}2O%(x2{@^MWGN4@9q7pP=h)3&B;_=Yk30ADGZ}{`Af2M=0EC6XlnyQ!0EX zM|V3z!wEkEXymyI+UjSG9fj&;P{BDWtWBh}ynJ}7sZ1OLZPj>xf<@Y^mtUvbY$?9C zep~HDDn(UifTw5!7qZ$T&#zsj0HPpammN0DDu4)Zz+R%vkaY^phPMli zUGzayGqVc_ph3r#6#UbGA&LX#S=*2y46a`zexNN`567XAX&Z~l2%FJ((uOd%K0JDO zGNuE^ZStxZZa{)vWQ)S-QaZ2?r-n*S6+aUI-I{bA~NIZ)eHDsW!%-= zhslk3azwn&2pdSfN$p=DzF0sQdl%&CLM2E}ill6U=_C|Q>(NYVd$}XTt?hqrKSFW7r&i9yKFhFvp@tf1($We=Ssp}!3M$iK2A|P72`+YAn z@Vxpp6js$$*-UqM*Dsn^4b^;fP2Dcj%!4+DsE$#Oel=MAqRxzM>6b|x~ClOmu<0yUkWr&GM6VuV7<8s~3&(;^~ zik0XdnHoy3UYdo1!4T<6FVh`5qkXQHk>aAq?gX z%ib%hc<68w_zFyN(Eome>wOE*#( zJrQu*Xi*0dqAG;t2d`Kq(b&i|yfPflaSJ&z+HPqOHcm$_mF%&C#7Z!?VgP-Y;_}yO zI@T9fFrl-&%zve_7jpxveD;XqjuHtfVM46j{?)2impmAimWOA|39>F_GnQE9qYfDj z;p!BrkA8eKl<*kTHQR4Xw7BfpXl!Kf@~v>mm}NU5s2XAT3NRadwkrMmpLHxnE04s{ zxz|d#rm7iTuksH~)#!MMA?Akc8w`7lso9$cXP%iu0e2xoxGY3b`_pJ8YD)c8@`W&PuI)NAqdo?1C8%r0Wkfg{WEZ!Jk{ z@VT0M!BU%LF^Q31EoVq>K3C!z{xigOjY)Imi6<7#!C+*A>kiVe7 zj<1xHM}%u=&kKr*)&)%Q_>C@Y{M5r;W5zm(*hf##vfF5S0^C6xsL95g{=wM+x{8wf z!IM3@HvR24P;`22d_ApbwI0Pz`|+{1lbn~L*h^TTL;=y|!0i{$O0!T}iT#FVoR@4V zvQY|JMsWJ&igq#>KoY|qeSf{A+!NA$KFt5psdb0cU!(l!P*@B9?p}_QuW4$ssSRs- zU=-r2@)hyMgbhquG4-JZS?K3iZ`k~8+0v~`ZT`r&_pUj^=dvCj_#!eEKfGVaO0UeV zkAusOl2UMZnvKV$rM?(f#E}7#;ilXTs?K@w=kM3nDP6AqZG>8JQKJ8sr7Ry1tu`Qh zV9^n|dG!X?m+YTkxU8QhsjcUM1w=%>^mJpViI#`%l>CHAA0`2lMjOQMEIGomec~G! zv;U|`$^CIBzmA(hh!Q z*T4Ux*M@%*W5DD!O7!y2cc%nCH9BW`%chcwLM7lrUob`OuDdncan?h|!tdvO|Alm(T5=`kRg1U56u-QWP%^G#Ki_}XVw$;c z=gm<=96AEz5}SxwSEj*VO|(9_f6##e*sbYSn6#lR;R2KnYR`Uu^6FJx#mv#0Z|(Zs z(ziBnMRd9qU@xLkEKA4?4tD$FPCL~zpMGfp-lrWN9Td2T1=HvD@c7O-*;-*|KI>nY zbvU=Q<*n?U)Ka5Zy>Uwhq*FF>uDXTaF8xrR@J^^#FVYzfj@00uaH2U@f7hsiK}T$; z_co}zRg{-U9eeOV^97_Dv6mBSFBjQts&{jf>!5+;ynO=lijFZQOON;e%=0mi9GK(g zi!Q6-kp)MGQ_neZ4bj65TJ7k~*8=<0)Uhsv#f;B9CUB^_>cS;Uh6&c(!pPG3p?JDT zu#7IB6OlDB@I}TpO$V-xqL}<;u{Z#6f^?QIX1+rs&Ol#&!nhI4-twaQYX`8VcsA!q zob5@=_CeYkB_I$Ded!`V4D)L8gggNi2Tvm(H_fg`s)Jrz{y!Tw>2LR!B_rTbW!0tFp>E zCY^$yt!gz)qHC#E+ag9l53!oM3L;w?#-%HHbQzF2@lhcf#Ay$`=~r1=YU|(f!LK9>Ur9>ehtn;(buTfu3a@sU9KzV+6B(#=uKl~I->+P z5-Cv&p#&pzHAyLIfNt9@KmNnyVJ2#ahz|A%nZ0w{fz)0m- z7b|$>x2(!wj@%C#D>3tzjE_SEQzx>AdPD|dGE|l|3E7p8gaVg z&bEF18tn3;y_H3JzIn=qhy|L)9{PkkphivqQLq@YMK+7aG?i}ho_Iy72`or|X--E@4&N+)cR(9l7TcjXyj*#za94f7k>G* zO$_vOZNSA<_1Yd;U4uzyjt(uQ=xY+kJefHdDcg zD0vtRC2i2OsY>_maeb1K9QIJ=NK%V{6?pAy$GZU{t`aRf+hq$y0rG)!q^n&mdO@Wq z8Nc$^VC@P!hcUKaA5+G+yQVKY~ZQbkrJD?XPz}XW8|*oF~Q++5};0M(yoAZOrGc_tIzU z4^qEqeQ8GhA!9rXBBQ@iQ{PQlW(Wzsj>AT2K#UvW5s^Y*J9rRckFM=GcOMy)vPDHR zy<49J+!-Rejt}7Y5+i^(ZKL$IU!^i;7}^9-DLm7fR7L63m%2pf<*BhXL~MBCR9nl@ zf}=w)=&I$qGC8$7V$Agi7slak1mrK;J8C7A; zlj3KJ&__~8@0CmGjLwsR!2_|qGRBvyWBQHvz=o8 zP`LAN!q@?w}x1joz^B08*HoB10-$)@+W76J+K1qJSxn#yd z3n&y+?4qdx9uncp=+RkUTC=XkG`hG`&&1CJX^9+$zzp^%4JV#<*X2lvKB&9fOo~hK z8%b=MOUj2PXDWYu?NgCL=!I}TVwjiVDqzcYgt?w@f2%c*oJ7RO)3Jbl0*JA-zamb; z!?^1OK9pw%ztNSheRTeUqMo(!wT!G`(O_c4x1JU^>rAP?MrW1s2GsZxbg*gDCXFqo zwRU9d_YNC%=sZ4mUGNoY-C@E`aDw@LjV|kTM{mLulv8j+1M1iK1_R^PeD;E z^YsXxQ105gf$=vPlL3rlV|)dZ!8z7`FiqeL=`eUp3kZ}2TTOqtn3`Q`)mpWpj@kBk zbaYR9j@qScy9Oc&+SPMbJ)x%1SZcLxs|2 zRF{*yk{c!^6dGnqHX%*$bxF4MG?tWPB8$^S#!O-kg#w8?wqnYZR&ueRE#&vWbBX&! zMABbBIvY*K-YWxgt7@i$nhR0)KiXlsYAw&@IZj^Sx0$V5NC`x?Y-gu;h5|OWTJ}Gi3&1aL1CnD>g(lkP}q$v3O{zN4TrD)}LKp@OD6=5Q{TgB%7J%qAQDFHVrCkYVX+n*CNxWLXaP3h2 z!>si>JINgRI7dX`BZ{u2f&x+qEHu`?(5tSb5b|DXD5&=o5h<^Kr|m$UGmQHJ_#YMX z=%~F4Ra&Uy73^+XpbC3gynqlsxzen&lRr5vd3iSTt`);y1c$6`rJ(=IJ@E<>dJP_w zbF=jcQ*T-MIcue(xyxqPA4`}yM1%KyOy7zASMD|&QHWgHDp@tJr;Ahnigi~Xjah1= zcVNKa?IovlRr=Q)=ymAOtk4x3e$P2@>eQ*_XX0n&Q&X^mF3xINVDw~Q#Dn|U4Xf5` zk+nDdUFhl4wrAXbTg@<5v6Z#c)*im^Ku7XjLcGkNm7;4jM#!TGzTZVeUcx^XKB`@- z*4FLYycnXxfDN4C5A30)_=y`FS#1*KiVf z)SM+d0n%YP0Lzb2=?+#OB3nHbxARu#5~+J5%MAD#?5jTfjq{l6mXyseT3@%at~F z4sBPu?$U$a1|Ri$tb+OhG$@D9PV zu3T56#>$nIeJVdWB{%P7Xg;SfDcaI2{lUju$M0}1pk2Cr{rXT;eTVxs;Ih(_vH#Ho z%M7srwze&JSk|){*ijvff29^NdqoWeyMA1#4gs&PyfmWBOdlk z!2`X!#12NPW`6rN6@)tTu4g9{a&W=;)1>lot!5rRrUKXiV~GNZJ8`Ngh7`bYIx(KU z(>n9F+!-jN_@}xC%2i-v_?Un!^iFNvv{kFod5Tr$)Y%tqZf-ExOlmaP_s457UCCw{ zvt$y+<}sWK6uKn!XAFEmeXZ#6$KdToBC4hsKw;rvwPYL?Mb3BmlBK_9JXbqmFB zUD{|Fy-JcMX)SF9<|kq<4dT;j#n!m8yVY)8yv@BEVyfeU`qW!LWiC6OIPp(^eSJ#w z804loSbg>z+D<}^6f;}ffhu-NdL3ET%d)nAV6w_^LkAfZm3aNZOH(ZLB0-TfDw%HX zP6%H~AG6)QzNUU^HT(7JS8k^5&tj~t5Di<tqa9{Lan(baPzX~|8AU!Pdkw|e#Jg?9q|ZSIVCe(CEK zD$8%xCEkY4ENZgv{UnzyfF9AUTn{dazBzmD@t7|Mi+%t_-};c*z%9Z;o7TUDwc*F> zHed25%qyJhqU?R(re|yO4r93$7aDZk;5RgMaCxCo$lK*jo9}45um=zT#0-X*38f<) zHvfcuD6uK4SAmk&YVG-{EumS3J3H4MQQ|TQq_SSlf=pnGJ>&Ki1_C9W?^6 zg-u)X(6eb>3NbX{A(avWskWop%GVE!$l$$RVxNcJ99H<6a-?7zd?Lz#mc5*xBC{66 zf+~CF71=p?WJvO!Xge=*cc_8+haqFuXm1=}IM~Eo63&1rV)Cy;#N3;;Kf&XaxQwOc zr;IEt9fzkv3Nt?15#9Dro z7@(6J(>ruxj8?sa>-P&@bh>T>1GSakp0>V8OjmT`QY@c0h;)g5*RX~Xg04ZFLyZ5G zkavkWrVAJALg~Y`;D!;APaAKGXn@XM)G;!A4sNj}_3}l+(zj5Yw}q&KdS2Z|bz*{J zWBMp*>9IaRn}@|pARQ0L`tEjqToPb)M}zBeO*ZSfF1^S zGM;QGJ^&71dyINa;0*5)m!FEZ@mUrZS9u!Uh%;(I`lMRkfV2JtcjEAEAc1HzXU_C5 zCr4XimQhRSYd&z^45~Atd;6Eh%Y4EJkbL~|Wu25M-IL0XH)W5_Dwr|4@38E$7Sq(k z+(Tg-+I2tWKJOUz>ZRwIcZk45B0URm{7Krrc88mnZm<5m;TUfXhz7RmHFyVf;x)&d z?~Kla0{953>|ssU`e^75tbYTxU7U4D^`xdBV{KiF-It(;rOL*1ugCf?o{Ha=DT590 z9UMQdKdfn3hM>QcfJW~cHkfo3$EP?sh)ET|SJ{Ebs>P-%2te!{6fuQqE|HIs_)i0y z#k{&E)c4m2tlV}c*#&>&JahgN=jr;dbjcR~NS9RkN4lia-|3PI{}D#{f76$zX56e< zrI7kc?sc7~>Oer8}*@LYfalpR;M` z)9N}$ogM!enlfdJIL|w5&qxdVJ!Jhw>GDM8f-p&;V|}%m-_Xyk6_Rf#`L%{F>$Eo} zye`Au2c+TbSE|;cw^x6lANrN*5aNRMc&FW%uR_t7T|=NfH9wJ5?Vhy{u`==-w1W6@ z=93S?QDAt|aJQLTKiA%t&X*$ohCGh0<$chkHI=l2(3=yTdQ7km;K_z1*<)_squCqb zhESfQi|~|OBg3aQ6HIkjBynWFm4s!KBPvU z?Xvg}&U;MLl95hX1m*P?0wJ-%!0a9^RXBRbUeKN46L^BtUph94sU^%xRCtIO4op4k zxlrT3lEjF*%(@DL;OK0_*cD>8)3C-#&KGL!x=?H~{sbq344Psdh_vZBALVZUFI6$A zA>~;+TV=`QA;h1GRLr1TIG`E}$(_49>;R@LYJgB|4D)fnAp*uyvq1i3n7d_9{%CnglHE~yWo z{1Ydmt_=y_$Sxargq>XgO-W1g+PMBJ2^7NNoM6BY{8Als6<9MEo^>V00(M;@AHcFk z)El2YQ>!`%OAa^R&$q~b5cUZAfYB+&Am!k~0CUq@f2VMxC!JvArAqh=gK3@KbJj^+r z5Xg>}z2@Pg8OjmvHj}1I>GmktRPEAVN|9%c#$nJDpRSs0=`N~Ar6_5eP}Ml zkyu_Pb`QqQAQg&!wFvjBs2ksV7~`N4p=Uvoir4+S9({jaOyamUa{Hq5XPdh0?LPI) z++Ny?5U)ZGMcgkhC@9d`uhL+QITqH!0Sji_s+)4sZ5yq@dAlCchziWvYQ_68G8Tx1 z)ub?HoKCc@y+&yIlzwXmjVYb=zKxO2)L})hF5Az0X!W-Ktfku=KgCK$uR6McTBTEt87@7uAY)KXf5)}d{bDOt`c#(ep!P>C$yat`x z*vO;^$^<7rDtVWx3b)Qj5&5KVsK^ zY!fuPbWa61Z;YqY1iIGRT$|{w-8*-#u81#veQ132QHe7K&4IUt=a1@{@_zF1u$OAv z-oLrC>q^IK4?3ezy2&c1MbPI~lh9r3ILAjN>SzLzjOy zw|!3c{9p9@b=9+z?j^cD)=f%r_3rGSL^l5Y)Uydk3*EcKu=nI#cyKZ9jLUE_uC;h~ z0B^)hmAPjajHi$mNZx$YA^%mk{@qbG)Ms+okv&eCPQvCMCSvIvY1%LV8qHRre z*FKX&>o$x6k=ePk*ZuMlk0x=;Dwb)1l?z^@(s1c!_ajSfZW~7}SiHKu)}9xxeYjxa z%||#M^={QvCL4m3(&LLMs_1%|EzU|!PQ|u{YxpN1HfE&b3NjcnVs?4QjHAFXA{*P|F8|uF?V=o5R z8Pll!kk6g7Je7j)YrgrV-S8M*y}Vz3q%EEy{q$Cw_wctjle z>t-u8_HJQ%`_f2wiQ9JO_F?ye@SSaC0aVNl!L% zCR9OjCD6ylqi?E<_p_0cS5~cD2^&=f;Cj~lAUoH3QfepVWF7BytNLhS$26-xlw@VF zla>!C-l;*VPAf)1N55 z^G3jWl28uOd5*Ij_Hr#UtTZf-aBL(V>^$9ldq#Fab=!|6Ikm+ZKYhB^j}LJxB~%WT z2sLr6-nvayfjfw(>)psUsb9l)vr2^fp05`gjkY7=!yTn{0}Tzw1woSn=aFdO{wg6? zP-m&l30jcxjl}e9R*pOmq>M7cca~n;kRl54QR3#1h(x1Zb2sb1svt~3m%J|P3M0>N z?quKOzwCoF2t8FFmG`8>IKHm2J!M!3V*2%e$r*G?ist@obW!Ubv&ut=Q187{J(Vvp z_fRsp%wRy9#GA`xN5xi~tl>QqMS>};E5U^|gO~1W*X2WxI`2!Xy4)?e0>Nf)&c;GH zckzQ0DjS}w=4CZd8;K5sVMPySUwKa8FQNK* z)AV-VI5xwSj)uLYPx5S&_x0`n8axr944yHVtZ%`;*^;a#Npb>DD2%7XnhtDFGuZr8 z_Xalyk5C^XdDkJ@A-#av6a*< z#c@(K1{I~Rqf+zWCmzdb5JjL2&#`2{ZySoIU1H?7@eX49y(O#&vVx;CL>n;$M;e+d z^aL4mhKv!-zQCj33cIgNqstJhhiD)`u7;VJZEEp=!><02qt{o0TaR2yyg?1>M~SP% z58uOPX6Q{M^iFjT`h?INt11#&1&~tZrBr=B@5UzTPcFUV);)WCp@T$edHp!TMqCv` zXU+`I`D}}O1RgYI!FRaVH<$YVXds9Xv=Dty)Wh|PR0zbbBZryz)vmhYhY-91_{o?I zMQTRIh#ynGoLp!@Y-LZ9nDzRRCeK5%bSXIH5#;C6M&ZH}jrtUi7wsi0ZDAlA=5&~1 z+;K+uVJ+=<%hdtr8;Hc0DoAWPRCOB9JG=m2;*qAH}oXMy+0R?<&00 z?8Zco>vRoI);fwvzB~J*AIK^SF^Qqu5fHG)yiwDp>$$&zKMU_GxvJ711LW-}^H$ig z52Cl96!gL;;_WnxbrH?QKEZWgCG!`#S8#VjNS*{}oX|c94xKGSdMUPK(TcG0a4NgR ze3e1r9JaDVIc5t8$q?r#WUmZ%z#UP5%b2t}89na>2Cb9V6mJv_FRH;cSob;V(l@uP zJz+ww&I`ifq{A~x)v9~s`Lk!^3TI_tPH3w-$lq(-1x&GmArgIy@?xrUiu%Mc+K%%k zM%;c;wRRp=es4`hEXoGzkplq333nz;F6q^^lf4I6gC{M0}LC+4mmwSLDwEU`XZ z;s#7};GaY7FIDE|r>r*|Q&?GjW!AwF)`1rHErTcet{xXLMBVj3aRF3QW@6&)x zDKdmoMA=G0!>%N$2vJCyDUs5oi8N7^k_fd$8f6j?wJi49cQ0+~N=C3@hl~7i@4% zJ6Chh8Y=B9_}mVr>(ikHoCY?4s#Bh;b>rtVlsFvj($w0p7MqMm8UO+LT~CLWYRtyy zs*}Y7(rl^Q9SK_~Zg_(vZAsRI@&eq`HK*!s|znISVBLf+=NWef3^ zN1k6i)ssDiCT4)}XdK+03AZlv4fqQU9~1H^0;Wte=}@law&%8AROo~L^dOcwNxm2c zy#cn*CM%6#vQG_;OODDiG|3A{&^nqIO=BjI#$1~0F|dkqd-0qf>wEYd`ztMn!SUYQ zUZuRDwg52EHm}XrChwJGpjYx~w4tFWAb2(y!!rID1pbDQT<)qDhu1CUp2DXV=W=rZ z2hD*s3nIm)9g{IoF5{j)-CMkjO|o`EQoM=lbXQlGS4d)rco}xsO^YI$tQUadgYJSe zuL0%j)?m&X<@5Rq-YqWWN;lLs8P4fewRO#idU!w?`+}vVCA)qSzV$}=Ou=P7JTyQ4 z)J56E`gw?2)#eLYM) zxliV*O&B14Ftgsu$Xr-swur_f0I^iACsa=(A$CN(&kh`?Ruf5q3`3nxx-pg`?HG(Q zyzn@S?SU(u`kajZkSZp8ssl1N$OpuPeb7R&PU0+lRX@f_(*w5&-vp<7KL(f!LJvK# z?IoVXD8wwuHl4VAst)p%8EV>g2qFVBq4Py4-J1Sr?CX>5rrEgLG^JvZkHCjgFj%cmDRph73 zSM8-11{&M;&*I#$@kXFtM$PYQ=t^vbQY8a}97s`y&Byo(&jWFaQzk_7`=UOXcifj;0Lj#vEy{fT<#>br(>P-iFI2$Y2q5`u9BO-!oNgkuG!JmG_H_gzfJtsX5Mg$fMjumAr z8^sU<@sP+3xe(RcW$D4ojVau?aed7l>#6{0~Y6 zJStV$w{9KMORBxL<@E8RizW|;*wsoU3U+J@t`cX>sA_CpxXmj6Hvls$XjC!I@`F&f zF90T_pg|_&Ag3!=uJpr4-HHN-a={Q~mI62*_yPy|iNtlnyCceW8->1et*^NzXIFe` z?8nK%@T15^oO$b1&#ynw*A!!y?t?ka%D?%OV;d;TDJ`RGiy?4(72o`~MNwMWwRi~VK>|B2SsV!}TyVpF}FHZIgP0hggE%GB*>W06>>t+2D2wn$yx^Th9=*=i%&K<_uWG= z09+5mZ$qim(r$zn2g{Db zqTJ$gO!kFLM3Q4N;(inikVEo=*}kjo!Bt#R!tPaj`aA9qv)aR+nJ?L&7$3ho-}Y|h zd2j`Tb0wOxY|7raj(-5rdoZA$9eWin`fVQPThA@B@hU(3Meeq3Y8_?a z!T`XYB^P0Wn_hZ8wXAkobjy?9arDvShhl3bcdGGgY>;m3#WIq$MaCB$5D{Kpr%Z3tQFD#&!g&6l%p<3teIC*#_I z{aYnM1At=lky)1;#YQJkUTLzv^ZZmK}AWa^@Gc! zf<;<;J;#wu@%A*tP*2_KLmsylK|OL2TPg>%g0I)#y|C(}Gwzj@KTSzz)wt0 zYUSpt9pqug6(Bdz8XU8vTE%ap%#;+=HZWhXXPr=%I`VSy{=|J0r-REuA{1y+=n`fP ziu!m(i+S8IXpOmH^9cHo6wK$O%@RUmIHn#U4zOXcn`3_RRkjufQv+Mj@%ItKL+88a zNPRP=o{|fu4N;S#6!VNN_oVxAZKHy*VJn7!GqIxL=k*}6GmuNxLo!oH`6@RKb|i0SY;9{LQpS&0U7{C za#0AXiN^GUMqwQ0&)T2+1ri6Auv=A-UbGMp_9cb}}V5SYpp{3YV z!m1ZU?Tg*<)j(Uj;`55(js+ERd78E@(<2I0RfUfrul59#La+dKdpyu~a0C#8JJE)M zutI^4=u3?dbMi})=nLQ!XcDoR0z*ZD=SE?zz%QBG@jgZP`NOrEs3R`l_gE&aho05`AesP7gd2O&j!V z9L%uo!1D%yl5(#W9zlH5E!35~XGQcv$RwWs_;uh;lUB|@hUdmgngB)>p%fM3M}Q7 z*8cNKXr~^+J;K5MxgmQ_u*fE^R*%F74`!3%ACC!H`$u-;(YANwr+%%9uxCF zgNAFfHXpj>W$4^sxd%W%%L{oE(%ro!(EUMBr3aj33axm7ta5$BpR7p6! zYb-iYJxZHXZZvXN_a?6Lp$J@z>WLio@x$&3x|R~I9@=D{GCBg5m6Efl@}{f&VaIS@XQ@clwMi+Hi@qtl2w}E7oC%%A3B65 zP^B6HCS<~~%4yrnb(%uHAQI1S%R$h&GUiFs5duc{;RjcOoi6aNBc%?S2^5#uI3sc3 zg53%m+@c!g>wx7M&W)&P;1uNDMITIynADvxw&c|Esu%k`5fAMv#fbolA>q3TY0L^wo>5r=F1THTETa2wnK!ngSXyVpC3D+8~ z2g)6QYcRUTb=AImMZihWFEI?nxJAW2rFX{n8Qg_5%nTQh@q&Exrz{Q0uGQ8u;QwhS zhfpYK?gvU`05SrE&QPiZ6eW4_&{1Z=K9T&k2J6?c0y;p&&P&>xgGETPiU@>QhkQJk z(NulVU}t1>J~R_R5sYe%4z=_UU#KDg!H|6b8aTn~k!8`ZaiH^lcLb@tBW(Rt0vgCf z?kL}n45BtVLs9X2vyyU={D!|R!fcQd3`GDc<_9-31><5DbQb-^&0cOX<%AK+O&Ary z`Wro!R_wZU0Vn^9FzM-pIsr+fXk#i=koLg9N#X~G0eMH!#ji(`Le_bFkk(QX2yy6 zk1+k)q}Y{#?2LWOEF`0R{>wWzciye#*y;P2O(VF$o^!Y&A~YmnOWgx;*1jWmEBVuc z^qtbT-!H9wo5}6!aMW|^SHqqD(N(`}d~MD$vbpaeXk;S(Cs3_3@8kzU59F6wnVc}=52)Cp5|dE z&lx1CIWE0D7ke)%^pJMN7wSYn1sGfi4unHFQKKKdEEI>0fNdkXCi?Eisr(G~3uc1#uW>~)XeT-w zBs95Uv12rvd6Iq;*h%A&6vHb+K$;W$?+QEZt~@+e1$dm9-y1j>GI1D=TU|)-qC6bv zEa&SQIn6~S8ebpexOAF0ZC^Wqqn;YU zRPSS>3zB+N%^jNLN$>T-Lg|SqbWkDn`)>U4&}`hPTN2DKo)4Un+`hM)oGf<`xQd^u zRVrGx7NV{tef_J~uEjqtYcbQnunwR~z>tbY;-4Kl^X$;HA(xXlqJUHQ@IZEEn|9oX zCw|vt4l1_<{<}uJMW3}CdSRNt3am8+qeEyKVm1HS#>0PU0pfK?a)Wi{TKv1JdrzRV zd)%q|ngR1J|3S$61?P+#Yq+z1&nS0GsXG?d#<|)fZdktM;`#HNz!8-GfgO&SKkI#b zLIQ_}(1E`iZGk??_mJfRti@D@)sY=x<%dzt%Z2X*OFlX6SUS#IdKI2U`LXl5(c4xDvPT%tI%`7CSk`5-wf-rrEPmQczp~ z4kMDbgG%NS?%H8I^e!S=Y}1XecI98@-0RPl3xDZVD(3S#(Xh7p^y>NpYd-Goxl`Kv z@T=Z?ac$N2I!;c~*ra{IAw&VuFizIbzA9cu7(9YHXkayss|WJ2>-MPK@y68dZm(Wy zwZ~juIYCO5|B|styiz0cr4tWFSSAir`{qB0Db@`M3)4^bnZY0l=)1&4II`IorO~f@ zn$GR0+JXK_)j0d5zp=-);*KM)r%#`bq^nPtzuIjOhK)>Sn;R4*xDurheYf}PBg+S{ z>*_&8X{4QUVNswDlHfC2uyOl_Wub zjKKwT)5nh8tNs4Di#i~*%q7s8)mfBoSLORbwQ@4{FH*Myug;MymJkjVbeL!uMv!nUJ5c)SEH${a&&!+;mz?x?0tfsl>SESx0E#xk z7h}5RDkRZko|`i|Tyoyy#;XNU^YB**z7@mySEI$K^rjjF5oI;5i71u8Ol+nUjlAO6 z?2EjX=;{cpvS<%LGO&0VN_(!M6SX*3-gbZU+Bi4ZOtoEbOV+K)36qnr3P&G4_|Mk! z!qM1VyH<99h5dkrJ_<~OSmo(jkTm!e;AR0j(=-(9BhYp{woLC5K(A?kbI&=yut^Ek z{*VJ8qf)I`>&FUcfDqTzc7?(pe>^cw5rV%H4C0QbJle|C3YM2Z`$lP2a*Mh1Hy_1$ z3yF&iO*5rdlwJc*>O&EccgdU|+S5vf8HK>=A(M-0Iylh+YIF2$`~Te~t}b5xu`m9s zsho5!T8!dQc&B}8>?-wSmrcL2b)&BSvxoM;?CKDcN1Rwmz!wxWmK>=_UkPszG_m~$@8Vfq% z!SBNqKL|o~5z*9`^h_)qo}6(VeEQh)gb;+K6U+#`$LWU$yihAdi{XQTNkQ3)5+$d2 zpRVG6HIgv~ZmN6>3x>N^k!hCc+VMWe7&8GyDUl?Zg&$0*f;8aovvY2(6Y3qGLXh

?y|Bn zLi`BPB=&aKu2S$ffX@T;S&8`Y&`&$=I(Br;0>*I18N*@Q!~yL}C2Upd=mVtCA?w$} zc*u|E4m;hGx$SVjtAc5w_Xe|4;Y*q2(Va)3;y_IqX6tm-oFAbGXdmn)S!j>potc<$ zMyh_rj8!XFp050)x_ftU=@?^|v=As+89l;bi*YH4%Z0pRjeVOcb}Ki?r-ndXU8Kwg z^fC^~Bmc2cRLA4x7Sd`b*N03M^mx;WOQOsi&oMXJ?LkV=_!~0mfRCjT6E=D0aXW|~ zDaw)rZZw-54>Qzb#eTfYNa2O$#=(4cR*}uMIT}fyQODnInv3cQW`_XOdNiIIm&pelXA;hk->RAbPU;<-MT$9xQ={TH4Jx>B* z*j!Gm4aFa$oUK|sp)o8$!*Udi^#lRj^Zs8uy6SE6+OQ;RA$?;XY7^4>JGRg*jt(MO=g-g=lVpW&xLm)0EFi-c0Bn z7zUD@DPH<>bhZV*zvY4?3(thapm*Q2Zzr8FM5zM?g?tKl*n?^_t?SQWUf^q%GpG}6 z_9}i}yB3I3XZ0rWSY%JO^uh!~-8$VcRUOHs1>PH!lp|!Wn(JjAXS3*$RN*3b%E0Q{ z!>O%cRlu!!*Bwh5&w^t5stjaj8t zC7$-~QP>e*SnZ|>&rq9Z|D;rNd3nF@*3s#(KP#xEaI|eZph6Jgq{SpZAyNMXVu0YU z?kIa;c!d9<(0=snAhd7w8adoc%`8~B;|wlr^MZke+vU`UB5K~7^$pHgI!*rHy32fP z^$_zHH-DXjB#?)jG36CQ5y-$ob{KF#NhcBllf9j7O+u1Rzq)p)FT)z^n9Xp0Q*K^L)(hs%i!sPn?yg@{&7*Pv72(V-Gjt{BL~a*my<|7e zvTOAp!3jVCvNS`MMvCC8_M`{0Qa`d*?s9bqujcL?GThZu=~|N!g-!%ZTx-vsIj@hK z>p7crM0Tcrvc)aWxi+0ax3cNf@@;sk&*n^NZ{DzCEPuB2K*bxSrm7FyrIs#z^kL3#1fUdLW9^1Fgjv1f2z7pAcMy8;b1E0A2W+QS{8%+^UscAPC_A+lh=#_wVl)?@=|4G+Te8{F2DZmX3vi>UcJ|gxQTVL^N=eDWj_> zD&^8uiOR{5x47bil^Wab;C?ti&?T@O+6{mXiczIfOHY*8D9yg%w>JS?8x}Y@Ug59M zs9t^xJT1^CD2^YYt)cXu1Gv(Ge|Y}_%9zPhIzI4|ZDnJdKkGnzeEj-QZC&@SN~KUR z@mD*oA%bW)^32a~bv61C*HL90KeX%K6e z;P}CvT!S>9!4rDg+NbZ{a-AmIU`N2Nbng|EBP-3YCGCa28%a3q2nC%AI8m4r-g=5A zTQK9Cey9;}*?DMIQPRYXtaU;44cs^ipA3Eo_KDF;|2+xnvHRISdqf*NEX+V?ctTuI z$Ttm?0?-gQ>^hAr`v{HN`bN*LcidSg3>e;ujvW|#a&hrgFz??JeR#+nzvYbHOelj6 zmoG&15e*#*ak9`azDCcEh`4Oy%owUL&8fXue;tFn`w1d@|(7#Of-c(t+0|Cz%fba;@urFpdxlZ?w9=d5!c`XgfLRD1D zT@4=qJxaL^*(E1K;Q&%~XSEM#Kh^SZbb@o{@@iiq0}!8D|L_8qRzDm?7tL)Dg@F8?hkH@I!I%HrlMYAlgLDO54H4JNL}!t zvHy*;Qc5_sck~(Ou!W%+nE}`Z3Y%aN>f#_&-V!-094Nvx-^Zr`4Pl&$e55%5sG?Ro z+Gf)lP{#u+A!J7yrvv?9v`-99$lDGgO#;YNgpO4eq!)76IP{%?i2_oDkD2H7@n6+B zJuYa0%bJaMsKp03AnzS8YHY4{P)RIB1Z||budnZB?Wc-c>8YEk+< z^a2USviEq~g_cGO-RTI3mLkX$sTmMZi0$69$Lah-(-h9MJPdCVl+6D+8=Hm;J9DKNQNC$7`{J>q_7)BxKq(=KxW3vaXR2`@xKXpD=T z(*ylPSKpRu(tD9~Dzk7@!ULXS*6ht_rj*MRT)&Euq8YITvI$acB#Q%Hjev^uNWo=i z2687cov$Lu9YI_YfSGEAn_gtVqkt$hueo)Byts&1t!xsxtEqAR`TCFT`#(8zCHivq z9&mMX4xKX)eX^wL%Ix7iV5^XkHS5Z=-|OF(L?xxA@xdztv18WgxB3BY(E~I_2n~=U z5@e9c82W~ZZH<)@=*WVHFz;6FVNq*0T`D}n_v?7c*9?ix|3#kg~;7IXXJ zNk$R0dEzU6J+9i@r}79DS}{6%RY;GTqSh~zcE_fxPBEIqY(HwX?{K$F&$+*58*ZSa&90B5m>Z@42f_$F3u71|JU|r~SFk5*YXrfViTM0y~Q+*A;SJ zUlEP;kU=m`;9=Eq5qDlbdl8YWEn!wk6$&s##@KQRlOC92Z)%Qf1XEZC<`Hl%-CL+# zDH*08KB{S5$kpNe^++?k`xJSOeOZFt z;IV1SM;<+kU!6ZMfP|v|`Ksgt;NT%^%)7wSb2E zt>IJJWjRue!5Pf@K>XhH(dd=#&UxAfg<2LXM?>dB zr+s{|pP$%PTuk^WD0C01gRfb9p^BpjSh15^OnRaeqDhsnGX+J;IoLlfq)p}59fB*ONO~B#3!1>W^CR(tR7pF9aZ%;FsA98ej9gjMxT>- zM{f>i{L4I)mwsZ(6cmZatqsZpNkCs(H z&c!=Fj6#*GuTO}Jq}QUCA)Nzi2h^(*+GpCo_X|q`?5DHM-24s}WDZJIXxRYWfqR8a z8U`T_fqmYFaVG1F<)=LA`0H2hRv1dK_1PWH(fX#KqN-kNdqdQld6s|v%3p`xxMB@z z`eFA1!A<5GYJpL2dp8M7^CzY5O8Zh zdroXsT?BTUpSSgFhSsS+Z|j7lNP4!KHr3=bJau1!POqKHZVCqgo=8f3ppH}Q`VWX< z{2b|fZn=Nc3tu+lCZ#SDSb%9VK0K%ZF|JA(6Ey70Br-n=+_J=Owoba~zvjXP6a*&23ay=es#^=0``0_;@wi_%_;ugihTG^oidfUTdsf9j4yl) zVb%oc2V;rX;NS(zFIyHpdvJj=LtBbYV*~ZLa8YdNXC1Uj0__UZ2QqHRu+%1#W`y@R z4g3K?56l#Bps*H}cI1tE&8*q)KK0ItMYFBMs#D`ei1on!NCPf=wZiTI(xVJE3}67y zR2BQ@r;>q<7Dxn~F|{A$5gWtFKxnj5>magYSNIfB?}k_dBJ_Ig!j|iWOen@-1e0^= zx!KgpBfW4!&?pw0ZqvAsjIF3(aWz|=!cib>4l!?lQpKq!0di{3;mQcRa_L&KpA$0( z)1SMs+;4T^3^PkrLv_>M!;(Hl;5GXp99{@G3obe*;z|BjO(X)c7!5Q)qXR9pa2<2fFcFAe(#;xgY2 z8nA|R<|jrxgZ+nt0f}-qTRa;68obV6sQd^gBZYvm6y!g$DO1NR$f`Rg!=?;so6y$j z48;Do`u0nTif&>0hCjep%nKcrKAaBzP))sM4TIE;VT5p%Ev>(RMVZR9p$<$)|3TlT z_YDcKpLi3jHbT(1R7R%8Y*9clHl1IR-kxiEZUmC@)qbP0CeLwqR9)>UXp*gp@u26| zv_mmB)8B;yB?r8fITeFjRVd52T$tm;tC8P{uD)dLtR|1b=dUfFpnrxj{ZQMraH@o=jFbYqxIR zn1!fkO=Gjhbr^uP74m5P_)s+d za?S4byA?P$XEUlO1gX3O#mR>YND{!&lY4GltsP{E24Cz2MhLa5u2nvAU{#+!5Ch~9bnpQJ@=1LYSgyV0F^{UEXS^VpfpzA4eKT!>`&K z>9yI(Szg;?WYj&7U;XYIqB_{U3gWZd616`@B74KHSpoS}jds8}$@mjT4|Ly7=z=p!^g^mtO*c= z8ut;nHHHD4WG|Uo-%ZBi2dSxWvvxWu2yRKc>0Kx22_ILa0-J1pcQ%# z@+YGTSIpoCs??RWZtYqqU@#3#-zvNEljEyrLT)ea_M!E372m#fE5qQTsyofl59D80 zVx~v9Ck-u554ll(m?^@O+E~_A**UZIm9wP<6eVcW*%<0x`*5FfmVCF7xgqRRWMG@$ zVXSLaue)!b>G;?v^1GC=78GkdaVhY-HDwz)nVta{w;HY8R$>#zO@fl+4NFnVvMFKs z+eV4*y`caAnId?5VlCYht#|9`ohPsZS`Aff-ikF#;4z6mZj@GKz#3`1)L(Wds(lk4 zVm1a6<=E84(OMm&AJ5|Ai9JP%CDP*90d$krn`wdQdorVl7-OYO17Mwb%2K z+FcDDp|t{tZ%_8YBJ0e?PNz|H-kK>2i@7OXSIx#|HI6c0P=GIu)QupOZBN+|B6(|% zgM4_H>FY=Jv$i9`LD{I0^^Z$Lxmgge5dn{GY7#?A984;d>w#8IKj=*DyKhO)QgKuE z7PoD?Nqw$T?f2?rkF$t8yq%U-wJa{WGe6#TyzG#kECaJzv_E7N zB#j+CHd7)~$-0SW?3idimJS#I9I+dyIRueT^Nk+TBu<2I;rN(`*<%+^86{eq?AgQ7 z(pJ6LGArqk-Kf^LlIo2{y0eY8X^zxnjvqaGHzzCUN7kFULaX)bpXh8fdA2pZBgY~x zvt}??xIJ`xWGP3q)?;dkdCy+hZhP=}W6oC`7B$~DzZ!T<6LNUwf2jQOT@-`_({N-E zInE!QB9fNuxBLP1F#?KLjzO$U3xjlhxZz`n?vBPr8$UQ_8=h@Pb5tHsbUXp2Oeh+u zL{Os4+VJ&~f>dOB_wC!a*%-K)wB~wSjY3CI^+6s8osw5TP-=3}xo;b#yZ6r56{v0s ziAmQq)P00BwPschg0@f7FN5}R+qP-Yb+F-}8=R$^XuSkM zhS*0a_^P9$Ly+|fmSxnmG!wupKw}dA3AcYRaaXAP$v;G3MzVW6Q?|%7r7Gbi&Sw4k zxYamVrZ8^s+Qzq4zgvMz2&@L;nk1)der1q%>Rg*{k&I)y-lSc3bE!8}@JtaL2FdY? zf8Wa)@Y;auaf1=8=gGTB4CIH`_2THuBemP)qY*-9K zS`@r3ct{|Xz%m5~6W1j(1IrPv1We?jaicw{4{;yh@mPu!fl12s*JSmxyBtw}d#zAT z%lP%=d_YGShf0|nL^_Z7PXTBQ<@Ibzsz>5%qQSwmw0seb-yk(*$mHC!q})Hc1#tqB z5Dx_4p3sz_qT*MT=sMUKKtwKsGle7}8PbU#tD}XiMb{ zJTHC=i#vjzINNVfnr|#P(8ap^R)tFn(u_gp(D9SVv&M0JFTEgI%oK_<<64l|`LH79 z$8Rx}#AIcbl1Po-fI2!>UTTG?&TIPIiGJ<${o?|S0Dun4-kZE9pGOS6e$akV%WdS#!pgsjjl9XdW)O9%R(>NXpW)m!L$(!7)hsrpfDj6k z1s`73J|j`QjJ72Tk3fkg43+>NN4DU{AKOX&5nnb+!%b;?EJ&?YAjn^X4Wm&YsKnLb zv+IM{gQx`v`{D=V&We|jUIactCel9Qo#U^G);pW95?kSEEFoqLZcJ>o0G(TAc@A+v z2K33pt^W=l9eg8TcpCcr712r$#3`W@JIH$Ckp+D}cP*l^2C%|Sg;E(0qGDeW2O`Zw zM}7%C7rSdbVVA=9wV;5RBCwC^ixV<5@%;3WEe6LV%`e3pCw~v2+JFSuTil}$c~%*e zjdZ{2Pf%(zATd1pZ~7J1GU>5}hg-M-pN(cnUzu#Ly?uF*N^T zDK5Hmt^m3Z0x=*_rvj06bW3?TwdG*ST0>1d$VH{FI9mPZkpS2Id@LPoN2N&kZ47$; z&6ir7m!hR;Ps+?zM|7%kohIoQ4Z?)eEYU?yHPHW0pd*?ALC!aZr=cCHHAiq!SCT|UDl$`sGzf(ZQKa1FWS*l8m6T|bxiS-xc}h`KC_~5) z$sEc&{@c-WKkxT^@3-D}z3=~h|62cA|8I4#y187}d7j5{?EAKF+qUmP8tSU688{gz z6v}F~!%A8d3XK_sLLE;}hwo(H$ohc4=uD2PD&cQ@%^oWB#$T)K4(nZ}P&TrV|EQ`3 ze#=uRn<;8ailWqxzd!yMB8WyVR?Hd@s3IZTsF%$v$@)y?bVBS^n{L$2iDB!YA+_U;Q?( zW0?N=0|xf6Eqwp@(xUPcQ~LW$=&XkS-!DH*%T)c(_et_mcds5B>e>C)9Li zf4@5LRN240dG?=AUC7AGW2c-IW#6o}ZrG{Ncu0bssm>zjdD}>0dis=QyHq5z@8+4} zj+mIu{gZBoL$4+$3zasFq~QO}_i>(1)5(eG4mZkB)zDbW%^c9#me`b8Z;>O)&SWPQ znddf{Y&_ItzOQa*(knxEy)t{S3PnL#`I_<2RJh=EdS+%7Gqb0y$H%KD^Y56oj9Q-> z`a-t2&x$FN-X3y-g7kEL zREmmVWjqylrFsJpY6r*CJ44NGa z$MLc8^)tmr%{d92^B%HSW}6lNUKfV|)BhvO`2Xl0`48T_F1ejTwpyI!yR4gx8+UJ( zkl1KuW>z=gK)+^9m95urF06D;gsPH~!^yvQB319$w~E6jPN*s>Qc)Dv(!9-LqO4VB z36c3lPq&(r=0!{Dg}p(6fi~;`A}saR%Ax$nqGUKi`D0U4nb>a7-rs%ZpsTCoPBzBt zH*SpAh?JI@WS*V=+3skw9UqMstYqfaxECqs$;o!(%}{Ayv^TG?Zn~1IYksr%NNWz` z=V!+cnV9gY1an@Ky!@kUeza8AhOg+7R3!Tz6B@khkt0WBj4~{jDKP~FoEar^7R7Db z`3l+(M5?D66?0zh`>1^GTx?d+RQ|^S2b0l`;s^UJ**-?gXQ=$SW=@>2{+C%^i*7QD z6QAqM_t7&j`0}gaao{A~=3j-~7I^dK)$+3n7cN|gY-`CfW8_ymm}}D>W|p<{P$+-K z@~_{&Gi}mBXZ~N-4!tcGg=$Ims*5761O1IsC+mVsMxE352m!gvM@77s; zd0sx!xzX6;irQU)a*G_3wwKmNT5L;Z=`PkrDcjqN9Xxbs3q3WBqJokV&4t>iVAHBw z-|Auy8BJeYoSS5q^Eg1>e!pdt3ytkytNi_hC^v>p-V1wDby8}pZU+i#ko9h9X_33{ zEES1pRe61bu*}D3_o?A>AF35&&815l@Ii0BRRmB`*2pi2BD@*s1yo!y_L`-wm77nk zvcyr$Me@Ow_BgOWN~Cx&O?Ua(4_1 z58twX{{}2x`OJ7vrpX(I+z!Fr0|Nu>`^?umNbyh<;_E4itMnU|I4EAr^PMXwB};Rb zAtMX(oy&9-CJwRJmhMXRzZ(+k%|*|aQRsbr?ruLJR8t!z%c!{atM9hm=gyroZ%XC3 z#Vy%A{;1L7O}XF7`a);hiT?T(y}iA8cHeweBOOOJQ63xAI@04|^ zM}^+EF2?b(`u2~HC3~EV=zMgIJvWRNPxDGS|722J8`C^=Cp6R-_hi*sa%P8f_v=;J ze|@HFFLbUN@2Rq__Co5}PeYzx9-bfn_U)!)UFD~9EH-@l^rfLy7XU`sr1vU5HiyxH^9;7aC8cEL1@Lpaz;5H#BH`BG^ z{lmR0DYv7e*HCPF7HJjBaOT1~Eti=n6#;9i@X$3iGyqQMDf?wlF>jK)spvP7ngJCB2leE=s@Jd2;&hzOHfPZ~d2;+U>xmc~yue$xR1P0L9C^ZXub7zVrEaC( z>DWU7CO^OC|KWp_>2clh*q6>o*GsR1Sr;rhiKB^73*o@6(7*zJ7i~AFeqF4@|m+tdzKNa4iix6J6u2;EV?I z_@OT@Lzg^LhG;2~>U}u@GikWeQ%Si_LOuqbUKah+j%Sy8*VP~INxQG2tW1mWV_)7~ z?f0wYVsz}u1oi6m@s}=LlA}G3B^h+0V&~>&qU23?xVKkx1gk8}4P{i1Zrir)ZEbB; ze2Cm&=7$o`d6OUSA0p8C18*4_@lsqqP@TMwh)Ydz8vb%6)3l1(=hwc;5bp)k$f4tp z_Praq@oK<9sA>?wN!7t2+hDe%*nO+GINR*(EJ-ccf`Or->kt=ia!D|ckB{4IyrHbD zEGQ^g=C?*JapzD|8W+FXtE7_&oDF{4`T1!SK8On0Dn9I~3Nan{^pv;8)YP=SgOM+; zO%J=hcw-CF1iOrj=rI9S0rkiIIjKXjN{4ngt=KQv6L+EO@CVbL0_O2tf5Z5%R&K>c zIR&1vKQhO|^{r3+F8(~=P@P{JZFq%af5XQ{my~_`I=B9b%h>_)mwoR?ljWcm~Z4Mt9omb z{4F`pIhX81YiX2JRQR@Rp<1A3r(@x^ju#LVlcQIV^u6|Xe z?!woZ7xd0o|zmIfJxaQ(fHCaL#FcPcE})DJjNb;>D3)&^TX zJMO)StNAs%MUjZbOipm{*}rfY&>C)ev2yQ)_X;K^arSq_UB=Gl z+Mg+KD1Wry((dP1Np4Adnzmfqs$}hyx?*?dW6^TO9cK@l7H%p~Ki$#f?0DZfCl_H{ z^F;f)b?a^;Yeai5aikgKs@T}<4h;<*Y>(b{^q$MH8x}8Go+AfZwPvq6Aven}<h$wC(=>n`~2ikpZM46H~X(y z9X?Dy>?EC>oa~W4dOShNs05qxM<1HjGYQj|+VMT$Hk3QO>*5T->&U8;8fMwBD+tNRmde ztT9D*h4|rqDe)@@_UWvp*@vGie8_oL+Q!bt=3iZXq_lPcTXye1DzMVpZjN>9s3Si7 zn07nU97VRy+UAHffG)ZFW*Ywe%olR>Gm-3%MTmbe6}%%6C&(uy#aUlpkIhxqZ0sEj zaI_W(Tgxr|>#=l^@~kYe-0%66u6OLxhB|{Paj$ZiizL zZ4khV$}R37MDB0M6a96uD}W^YnR%`Q^05GC<~3WtdGqEQP8cvSJ`_kDiLvIs$n=3{ z_<_q*%f(9*{hAYljWvCqsp;uDX({3?^&jeRVzVt8lQr|r@P52*{abR)8XFt?J4@yF zajr&w{Nd=borOhnbJy@uCFkdZgBBExDDHg2`RttM&({L~Z|(nfF?b@}& zYHC+dcKR}6YaNUbw|;Kld*ta*%7+Vw^z}IloJVif)oD=nQ_ebg8EtGY1*Z{?n9Ny*Xry>2yuVZB$O06)->_S|XTl2w=_S0a^ zokL0v(pbus1r7tBV!ocs+G+a!!5*7;KhkuB<(3yN@6^kBJ-YW1L4@o7AVSyQKVr30 zbO?+`HV7oUq8sq6q6WU_}ceQroDN+WHnHxkS&I%SA zx&id|zq}qt?^o{g_%XL(kqe8$@h)N1PT1`(eUZ+$Z{PNL{aWdLlq?sDrxcwut*B4D zQV#T#L7qnw03RzTQzLDCCnFdb7-H(p2amlxrsPnF>tq!;Hs+d_CU~7)+9`EiwzH(? z+&;=?IXPa`Uz0Nu&Og5zeDXrQRJr!MLZr!+z<$o7_jh08S2IeOEiu@opG|+^MT@o5 zc4N_c5!OYw3Z+s<(>UYhxxti-=YM?`00at*qu0CFej)by&6}?SS+=g_;Tf5JNwust z;Xd$boAzL7RBMpeV!MiNoUwPafpopCnp%)hkk`?pN41Ymxc63v`>0PCU>V2$@jbN( z10$n!{kYES*RL1uuD8|J4mV!6D9*oWJL}@QdTUdB1iP%;KE!3tebV)jh@lK5whuO@ zG}B)oVcntXF>W>{)UeJf;Q~NMv-nD!?G(YR@zMtYMbR7WmK(LBjYnO+ z_j|FxC3xlXm@ge0k{$1!ints_JKR^HZ>7AtZqX@PEbjGMgk{yLI z^7exVftv9u=TLgiEX|K@sj-i2LmmG=5i%Kz2>dRSjk-haaxC>DD)-EWLFRZb{f`Aish`Fc%D)8+ zAZ0BF$122#_wV0J<>sJb1g~k+Ua+HvU(LR76<++Gk}pMn9dI06e^X^^>r3k!vhGtZ zMMlQ+lWwwZlY`gJ6gutyA&Lk31c7WTO4qEN&8|NI$q?oZa&6uKJ{8@Y$Nlbcn=p6i zucKNcGe&uKBKj6is?-qPY$x8-{qvMxVBlL_aJ%(9$Su@h3tWaXt0)TZq+?JMMW0bz zt+-ay>Wipho?W@6$Oe!aIC>MqEv$5Yu^**MXMb=#mUU;tUC^&yeQh&6A{Z9=fvmeY z(x?BS0A|-S&i{^L`Fgsc*^A;bn3OO!UbU&hB4^IQBQTJ<<=x%wcf!MIDRR?3Erre^ zC3x#xv;Q8&vP4+tEy(_e_EiXOq81H;?;q{2*?N0(jTot1bd6kTgMxw{NI43X%>R^* zekpHS$+XkBgnPUC<1z!=;%kWfMN4x-GXn|H8mCTO4UwCp->Q1+_2pXGzMMW)Jv|PT zoqI04XTP~go>y2Wb*%prGv$9_SS%WrT6(8Tmt`qkLm8!0Uz$pn7i}qJx3?S`Y|njh zu@}zryL^gkyA=0-nNMlo zee1u$rxfHhoA1L;@^ROQSH8gpO`)tc$5J+`+6#A!??*~Ir#p9|m}StrM~>&@yPwtJ z!h2kQoe$~l^qSuV?o95%hYKh-9R?d#AwOIezFa)DLczmBMkmAQLlJ|LgMlz=&ufeu zyBwsrvZHp^nv?RWWNC4}2jFO?%WsY7#gE(+1uri-N?tDw9t)Sam4;Ww;)@#a-+R25JU~AP z?sbK5!Y${)?nk#;tJUB>n3`jeQX6it?K%j8H_D}Z6*~#=p zcxM36b^hf(z8yQ%l0M&`QdL$ix5_x#j?y?9<2=vmg(?;6bw3_QR_4OIlLeIWv z8EmhO7{Sj7Ee%BJ=$HdlW@vIPP5Ed=2~hlmn=HTDuh!4PYx^Cf0^``9AL_=p@B?fm zV1osHXQ(^b`e{OwoJ@4!#82ty%;newtE})V@4D|c#Q9?YRHWV9#9t0WO{-Ct?m9cF zrLTY8*O%Ji=hqexEja-<=3W_$zERMcFRbabc97N3NHNlFU%h&)ohfHiT%x9Pj2ADJ z;k4V4T{)d1Ij!J27nbZk7@Z2w z%=+5(s?83+sI5ynxgGn9qF`wFxR&Z+`kBH4&lcL1D_2l{7Ec@H+5_;FF3ky3VxByq z0R!R!npXB@bFQs1SxMv>)Q{L>D}3C3m%4m@aq$GD48f96iSNKZ>k>oQipGTaO`fFHja5=Mig zdtU<^>a>^(?BTgF?@>yO*Q;)F-5C-btbJ=Q(%Z4MG^b9TiuvpFGb7`S#6$(Kb%aVe z{)p!8yYHHn=KH7>BHI#=9;%s-*i4_CqX|M~&Zfu!W&h-5p2LRCx2_yZ6BqyMlTx_b zl}DGOhZg!yAoV3TFgD0^)elYPX5aFc`$`D?+xPDW6uVD%Hzb`raQVm0s*}8$>&KCk zwr<--8?O?45RnYbVgLw`&0=Do5)uyLfJ_v8HF(mx;fxdQ>Y}u^e~>C||3a!PT&@0( zNtM|m9>ulDxj_WNgDnSnLa19d5u=;H9YR!_VxBp#)A)R}PhU?@Z#6@8UR3pl_3LMf zm|5y0pQUgA3X-2)>^wc-9?G4EKBbqo@x>LcA!SDX)1&uIz=c29V@ijzC4BR{u5!Qj zYR7?3w3bb&@zlwEX_#2M*eRf5GN}fPkJ45}mKX2M6a^HsgX5J_mu+rAmCLKCeGN zJ*w-rJR@}AK;Fkd56DbWu0J?JdO_ad_=AVL(rz<7zm^ZOX0g$ll*Ym7SQ$u=ae~QO z8TIB@E54P53+pcE=Vsu{;gEF(yqm$Jgo;vj;YFi#@pxLy=K=fyv51NuaSKA5R~od- zIQ*~Ru3g2wjw4{mK)1NYH-(#VfIK3#{5`!i9hvE`m%l)4f?_oG>8J>l$h`2R50fQL zlXE%Q`nwJuJXrLxV#D;co7Y;1Hf7fe=p=Vt1?xNu~RqqjwC_6}6+ zkd+p^R-21QXmga?H+ju$K}G&#!Z82gBMDpPm>);QWMsaMtz_JJ%la+bv^fpYGCv(fl9s{fxk#|#a*Z}G|^DuPh9zkK=J?;pKw|MUWY znDUsl4>8p-G`x8++LKK+gjYGksMy2C8v#>{dsv?{xN?Z~e6yA2KQ!@0zE6&RLk?1l zUMvIE5#6J1ki^1zcoKV-9Hn^3LW+cW^h)_>?VMj^FOYj-(I`yRX(t|A?*=Yb*2{+! zAL5n-580%oq~Nrz3|8?&UfOX;+VfpYm!;84-F$`PSw@9tmTcnntA4b4>hu(ArWoZ6 zO)1CZuE~>@mq?!*^>?$3j-VcS@wVlD;7^luE|F$d>id>=`PtamUYTUN(8wZVQObrK z>Ld<}phh57P8<;E_!knS zX})5OJfw<)k}5;Z8L9{m#dMka+2&V3hKl!BDuwa`KZDATZr;Mjun*;K86@Bcy6NQg zf2cC8(8d)Ckozc`w{NeqOy7kRt?-I0`_6s))`PZv`}VC*#W$awHG(^LDjhk(u#YoX ztmZJzYaPhiRKt9&fip;Ax9{Ea|Jh!+6~Ci!oPygERCBfs6TFU1!znlWo%ONgWtAYS zix)5UfQ)(|dd^qtB}jHkUH{L(6?9A#jnBeW2I=<;jy)8kMf5*iEOL2Ef0MFKA&o%Y#?E(DW_P{hp ze;nb$^j+w-+~F%g+4UdRKUho%dTaaRLqq^hhY9Fma~uQ{Q`7Md_t9@a0W(ncn869k zFMM0`K;B!fDgDe1LYbj@GH)-~4^nCzr*%hLs2K$C_J-Y8*2qq*C1TLTgu}v+@v?7= zl}f4CBB4=pxyA4RDLzQG+Y~;p<&kpmfu8}l6v8X(VI+cQ1sF_3%nsK+9y}pBltZPn zA8g0^<3mguleMcKXf=mrOs+oeHuEiD9OTv6&Js_#4@;*sG$`OQFY=jz-B*S@3!od& zTXP?Dcy!58eSz7m6>t_J-?533I=&)@aVgxAnBG{iOn5Fl!Bn%f%8XTWB9;L#&x0&~_KMfpN%4xU@+eM2jrXJ+ z9)jDTlXX$tvgw%GL|ffJgzYK3xs`ZC=aAzWcO7l*S+j$F{@>fak8R^CFulpXhkALT zPkx2C+Q0|=@EYnx(=X4@Sx8(9?0=TOyfmL_Ue9-vV=ojr!Hi*SbZsSeGwY-Ah2J38$C7h5g{!dREb1T5RZV+&~Pdz;!@53PsQ;4@A$FO zT2~{O^6@zy;ASR8K-Ddtisi-5Wny%Sjg2L`De?|cS#lx{ljr{rqfr0u2_&&@pwN{^ zjvj?*1$La$g%XQMgouonmKUdcPI%9;qI`X3ZwWKa&tu#rAf-?IXJ#5I3XlUa*5HJ% z)VnwIwd4D{yXP`bBi#OYxq$iz^o`N7?DE3z(~!jxGK*i@LM$gy7kFzADdiy`cX}^- z7LUO4^*_-!w#LY9;~+Vk3O)Ja3Wht1xd8W6P_I)2sW>(^kCOTx+zljVjnS!(QL;C% z#pg~d(gVr^&JRVlrz}8?d7hi;g+6pH_!Rx=Arr&T@mn5DSHCK zkacknu=NO>*DJ9(+dSY9hegCqI!RCGV|f=~z#%%vx!kr417|a{Z7Mg}zn#>>*)1f7 zzV&qgN4KM*ZdLKRGf@b&vwTLrka`2CWFFt`R{RV2nz~rj2xyhkDAllrfPpp?c5sdr?G~lzD{($SRCs_;F ze5itVo$g)-h>MH;_V&(J-V8uzZW))gD3MfywTH`40stZMx*|uMvWOt}K7F@&2Ql?-vM;8}3CI~v_HyBZK6TqU z1`6y2r;FY8U#?ku=LFRCpZmv#86!UU17W#)j<~fIISj0eLJ0%^52+pic!1kZe~sHk9JW%cu%pV}fIK&NnA!xS|o(b*B!!lx!jJ2wIO zzgfA-!v|JD3I*0YsN0b=jQm^V?{~5iLbU9E#MTHI$S>l2m#PIi#(i?FL)q9FNN~p;@ zLgPlERgZ%g(kx;1#Rn0v!PNEGv74b?cLRU&0>H19TW-|R(;ILU5Qwj*rx+PumWm7v z38{h|jy$t%<+jjR&WW8cGt&KVJkf~%0%jyp1UowHPk2NHulI8N{&T(nvu6u4q~ zJNk6~GUszgu>Psg;dTLJMwv~n@OIB;<8|Bkx5=B~{hJ@X_`{2|({V2>pI5*O)*&6x^}n%DeNg@-FqP-Lz@c>8>VDDiVbZ zxV!2shyaSA{KQ)cVsXk<{?NgLlm@2wUu}(p8X3VByj(ehHdZ3pZN)amG;Z^h$yOH$FB{I# z=3$)%&y-r0)w1be`P*ZE{rdIXdDMt}^2Lvj#}CW`@BPO<7g@cRRxO`~epv=IQ+}RI zE1=#73&yt2w8TUo$TlE7>L9SFMCN(Vw{^a<$ms@2W!{|51I&K4yW3=8Dz~)wCy0*+ zMUq|%2cXRL)C>G4{7eC@U)GBkRKyTA{l!a1N5{`sEIszP<8fUsF0LDhG_E^0DziY~ z7Zg1FFsC{ic^Bg8W>mWu&%p~$XvWEc3u~||LF0O*wdo=V#|hF6zdw-vq}js5ra?+P zy*7Afjf5G)0KhJ(--5k_EJfJ~(UAEy+-{+@8P7-5aqtu|+9f6?QZ!h1I)zU<$tY`H zeRuv>L9s$?z4=;h?$qIvF_&bo-6LLd)SfEw^~5zE!xWs7m^kKM>jy5a3nHgP18Z6) ze&7Qyd+y^CSFqIu5|fjE&FA=M7_Jcz78cfaU2Zrajv@r^Z%84F?z>QvFb5n8cY|xd zO1$m(tXx_MzuIcI#P=v3PvA^w8bfyGYe+VD_Z7O6XkgXZKv95f%x8sPZNu--*Vu+N_>!5$|k zSNF}?(7|!{H$BDZj4-0Pe$mJl_82gb!%psH%siLRJf|59e*Ukf8C~bT|H(1)*dSON zB#S-te({?*0c z_H~ePzB1HIZ=if|lo(~;;wf!5m@jyB;YE`DW$PC$3tpE;7?fH@rhHb<6y7?%nJ(DE zc&K&6sWi9V@l4k!<=W6(>o>cZMO*ER<`k_A^@NkW!!)h=(qr>?STy}WxsyyGQZmCw z2;mG_U1Fp9+Xk~e+QS!C7#^Y~f>N|mn)2-T5wz?5KrMS+1klEiJghY~iz$?MBsVW$X0Vv*|aoq2he85{HuY)wFd4C;Q9-X}8c*tQ=h((!&IK04A3|aNS1VntEy)Nm1+0a*X{4E-rh!qDp z6(vG`t#v5>D#)ioLdmg(C>>*AU&=Tnno$L-*4x`#B%ZELkGcIwk`~1!H7%iLAE3%6 z-Z_Y%04!NMiA(`@6)^3H0&#|ze}1-FC*3f~!8xbJ>hRH{hrrH;KVd)_U zNRmrGTaQfnWM_n!83S?GyNsKF4G=EpNNK#Dn!0oNYd$ONTrab%mX{U}A3K)%g83hO z&%DgOiVde=4m=Y-6%_bWu2$wZ6KXZi_3K@Kz1tpsSqwsIy9|lhR|vzSlcs+T3=gq7 zAhTXYDqAB`Jh6_r1QE(Wmk?JuzyjHID6)*aX3er~J9+UOs$Uwa+1mbiuoS@SM$gE$ zlb`@%or8@6X!Gow>l=>PtHwM_VDgc=`(+M%SKgxcRwYf+MWC+EyxXXVK1P842g6*^ z?~l?1y?}RyhkkW@eITCgju(93g6JuADY_X_LoOh9s3>sU{7yO!jsz>NG%DEf(-*TuNyN}9Z;kG|+I)R4pqILjF(eS-k9ZEvqUkPQy( zUp6Rk*a6K*>Vrh%vHh0f5uT3*3&jQI%;Jn~AN1$iI3J1YY=w7JqSM0b>ivc@fxBi#qSdX9e8o7i2i2BTf*c8Totcg4L%O~sbc{i z`yVXy;NzX$I*{zHe7Nx2y*S;n7TT7|^ebC>+a!j;SAd#=F~MME5IT-Jm60O87%E%X=)YwDbyC5}UHis|3l+H4J@9hn zL>&CnI~4pn3Z>&1SaJ)CBhiFRhZCeh1nx0MGvU5{!8)qqAN+IgHWgwEU>P9A5(SRuAKj@k?Dw@S}5tv0GjR&mgpeV z$EVMqiTMJ>Ip4NzZ${`&-7^F2q7x05{%NPJ#FhxntQ!)-YcSE_PB19s+K2M*Pc~8u zO?N*za`b;(F!aP?x5-y{I1SeP2(a_pJn%do9kL0}khHo}$>nvmt{_ZQfZTOMGXfWU|ah+lndZQv!se+y-|b1AOj# zxt5CD@hMHsE65!(Q(sIelr)``h0(cuCygHwwk73ghq{B?MJ_{UB0w?=%N2a92X}J7 zq5rn=H2RvTDX(6=3NyDgSs#OZ9%-kuFf`80^n_f31DjZ;A-`0ii>SRC zL6sS{JQ+e&p%BJfR9LhFil|CB7U9lqp6)BNxp@c(7&P?7E1@h&I!E0zwzTL1de=i(9dywT0_4d;ji=C^0Gl*t1|4Bkdc2G}jPp$YPF`%$Ka)vA~0FFS^9TFKmgy(6uZ)L zLbuwl7#%rZ1O=v7U|Pg`mJvk|9p!YPQ`)-QR6gk0WWaBh;FTyP9u{7us(IKv@muPwUokEFA2#b+8S(o8S@e={z;4lM38uAef*voIxU`bY&q)4 zLPG_b^h~iC%61y?u%!KLm$U4Q{TWLt1^9of_TL}UuW|I8BJHr>>|zkzZF-l6N|zWZ zb^sW3qbu7Zznl~(I}b_pjw-JrWCp5+$NVH9(lWAb77-y2xx56iDSIiHkKF&=HWg{0UlN*SN ziBNthqj?2osn2_WjvxeTJ4lQ2sqp7lLNY{iDZl9>3WgAY@35ef(}8o2$Zg4%VOKyz`u<=)9YRug5ie zoW62!y)wP;+PaaGL+r_pRy2wlB{$Ni6}og9({ze`mZw{ENyB-PCsU4o8v1&i`{Y*I z%PHs@6%FOoTI9r$o*PHhMey{aUe1^Xp}D39sJ~#Bu!u;N_wuy2DLONNGQ;hy$G!z@ z>L#r!ct#{506f#4e0Hpy^@Pk72n3oTzte+eJ^!MCWH8 zIV_THxdrsva6l=7J>1}^&ZRdfj7$&dnD^)VC_bcI93}j|=gr{+vb~M*)>f9V}d-C)r^L@l)H(S(VB|h9)x@oj@xkR-EhN!bR0+@|p z6wo4b1TVAul6s*Gvx?|Hw@;x!dab^+xauWRQg2gBb#cK?{)*CD-k+P&7kl-2i# zmOm3J`&DowU(-ps_Tt4}ujNJO;?5rkgOx;GOEZud-@kqPcEe&f?f1t0m+pp#KW#Sn z0YpJV`C9C*t92&%p5A{Z9>GF32*70hzMckt;s>6D%nE$hBjlTiqf6Z zMNYP^N*o@zG}5}C5-!nH>E_gMPsPGj!nUKqJ#Dwvp!UYgwc1Hl{YKn1M#XLey<3@9 z+_-g1ykBzLV*{b^WFuoy)b?Z;K;=yi)3xkrH|lzx42~rwgOn0he|aW6H&+55z5QqW z)9Cb7RML^^7sIozth9`Nnx)frcye>Jgio)#GgW1&{4VX?XCpoDRqI=C4d353rYK{} z``Yu~5sS9OQ$nC9I#TVw+e<<)9Xd8NG;{+h+SmNcD@h{7+Xvu;UN1$-5p`33d4Uy% zE#HukHDtB{THxY=Ux+6rK7Ol}wKWTDbHqlB^4%{bMcC$R-W7EDP!gHC8?-k*)e5?P zo#DnN`KMZ|9v*Az5^g?n&eBpi{ju4AeXo7~lO)0SZ=%Ge^8x8R=0|c#hc0y9?R07o zw$kpWyHEf8QsOC{ZkX>2`0KGa*$gT~3As5FW?CuRBgZ*zZC$Ir+q5mY(SowPdN3?3 ztU)q1?G!IBFX^TkgP~=Mq$CIKBRywHYwEa#baTLt5t>tU>p|=Uk&2466rdTOsWtuO zKCK$olJ!rVHiT)3n4S^}@93PA)qTnv?|PqpM`PSe|Um6deq>FF?y zzQ7x43565O9IXCth7vUdyMFw*FizIsz~~wL?i*YC_V#vEUT4R-jypR$zdbL8?NHS} zdb6^uy`2XgV2&M$;5>_Fe?)}(3N^kvFXrOr_GqC!T|@A>Rf`xILqYHjp=*$6$x|oz zv+f8{8lp zyk8g`L5_;m5JW4-g>h|}i2asy;YZBI?XPu4;jna6d_Shy%qOIMDXvrH2}W^%w<28x zi0P*;=Hg7=0(Ha(ml3H;id=s~%J!-)p~0O}mGysk4f_*iVfyF_b@izgp`Qm2TXdqqP`;eZy;b8_CuFVCLv8?iXLHK!;!WuNxb&jZAU z`&imp-Tq-tzSm+wx#hE{6s-`=Lp(=K9n;lMpGkVgyJK?K#R~t`d7ks)XlwU#3rX80 zBGNa!L`r<)lY;As-*>3JXEw8nH)V1Wk+Hn3t!;Ci@co*4q(X?U)Rd*Ad0UDC4%+0W zme$rda4K$$YFH`gomeSIq_(^eiv#C2zDYwK{~H>mn^ph>%rKgB^udl|ocduUB>e@C%2h;rQ?@zRA~ zj77!8A3EfdMhuOgWwVZTUdlM~bRDvzlzNm*5H4oGTGxOxsn^xry`rO|BgViSwReL> zPWiD3$Htn9ibLG%wk0lIO)Tk4ZZJJRm>H(k_vnDMbVYOXMr;+j(UC8ihaNv}4znkb z8|vq|U*F%2O--f0V6LPWmYtoOYqE4Fg=!_=fdgN@cU%&C$aLgs*2h@}_lbTgY>K-1 z40QP*RK3E1hRd3+aL^-6q1QGYS%4S{DMG4rF0QT|3pVoqP?h|^TSa7Vn&>joc*b(c z(eWDYoJ=S{#6np}s!-^-8iMP)$9$pA#sfYwPaa%&5cy5YMQossBJj zRNym+*fFPs#^3L)B@{Gq6yUp;hMIOE9ARUyU;gpFzUIVf@$A@2Q+X7U#1#bEnzV@L z<>hS_69>U3RiM!h`Su)1JGW~h==^;rFBGylU8lx;1k}hCvQCslWMN~{FxOO zTM4rMxkaOp;Ccp9^Ww;UicruyA_;CxMNMrLMgx)PKYi(yBG;E6cN+naZv=Y zUB8zYIwjX{*zgTjnC|aCE9pmrLDMZQEjj)WzWa_)Ws^hAWH3se*P;~ZX8yAn;?@UI z!p)3bf(wVtV!**8oxCnCE@vTQlQ}aJ{xww?*MfHVvFYh5RA8iS>dDimBY{NK9&uBbQQTBa6JAf8>?o;=@%DP8yXr88iuDzsZZ1dc?Ew{D&60sRC=!>$m>H@ zke6h=ttp>lT<4&Av|KQPAXFR;TSdm$+^m3rm6aizGIFhQlFo}gJRonXs8}v*9G*}B zCIJSPw-&66Y#TSq+p#X*yLV6je4KHTa0fL^gwq=6j6tb*6MYLoHS)NK9lLhDA#LTT z$*Wtn$pkYC4a6H|l7^}_d3S-+QBYL8!tODI=!Yi~>y{>XwBZYg-RYY*Zjid3@Jxg~ zXi8_+ynDI7ZVTD_hG5JC10V52be@@=4Z5MUcE2*yu1~Tss+eO&M058Us-Q3yZ!EbQ#xDYzdf_K`3I1e2zLj^ z=mN%%xQ*uL@7@i!IK2Pc*fvJgS)_9Vx(Ylli1WTUusBOZ1HyPLvBTcO zU-m%JGyR%(2}H~~*om(LL8F&bU1S9FK-Qw_O4D(#9V`W(kZO>dUjEAf-XAbnjb~>y zKWk66Qu#n{A#Vpvy+4mF`4K)1h89>qGN$Lin&KTyCQ9*Ed<^pfo8xRpoo6bMy@wDk?10=m(SxNZ!3B2A8<(=S}( z)Usv|%Zve_?9T6t@;eyola{s%cN%tNo0XLnNP)9J>dzX@_o0k>jUg*zO$N4GcI<#a zwaVq&wT&QG2v5`BeiIV&xc{V4QevWco!CCk53(71_pjE@;E54?3)_R;{FF5wPes2t ziqW?pKl-c0@1ZxOZ@!Va3~u1LX%#bOb?^|hm%9hIHi+IEJ3!<6_cs!D*l&7dc$ko& z+|o|RMkib4wp+CR5s!F@o;HKFDq^XmB#uufswepAr&W@1Ubw}hAD6*H6SpT3^U=pk z#yqHe#`v=n4`f`$2qBMdZyJ*EfW{RIFxm<8OJWgm(1i91HHfCB=9YZ9<1Bt+Y+9fz z(HKN#r%@<4-Q&xzN>k{}h!70Mj!a4b%ElJMAK;Zr)lHsP$#4<)WHJ|St<^g{X{p-v z{rgpTN4s%ND!HV+79-3Ipj>BF7B#0C1fZ|Be=*mxc{k2{3}7s@_H~~hT|SOkM6863 zL^6G8+i5dVV-GQA21N+wg$R`BH1}Q2v_{Mc>@UBAZe>gqP%BP=0pz?G2U&Tv%r`&u z0P46SjbA=!)w~@pOsFn{cSaqc=6I2jQkv9*FIM4d{2Qx)Q2TQhO1i zAE=WwEd;r@XYZSnG}~=lauZigCNPj}iAg-DQtA^V zR}H=QhW;@&IjO9mKq*=Hbrj#*M5c0p++#+`0Zi3{T#jO<9I1+hojozv^W3>D1d)O6 zMfRhiqcg!y!tQ7|dLNxPqzMKHl=6D}66z(lWj3tFL4msi?LMnW^9Rr!LB)u+Z$PQP zNf;$8uKd#Y8Z5M$O({Gz=io^+$3PSK953}&Z$Q*O2lf$b*d&bpCE`j#x%nE?biVcW zUfXf~Z2(Xs7_VWIW8*5HcoygNEXsF zLfYH0_I7r56bi8ok}jzN$053yEY)ckB%foTASvm|EIQbv(M~mv9=0-o9-M445>0M? zcrVsG4iI2eu1E1xqI29WfDv|gM9GD8V_I$SThcj z$cR@F5#bwH5^REgW!^@M{ZpfzA@C(1@i?BxaSA2Ehx3gQX&7~NT_US8E(&wAx`W3E z*N=jLg5IJmBL$Ts^GS^sNCM12&J~#268Pi^KNFWY6Rabo5}l}CgrG;1sy~hiTt9S) z=g1qy3y`u%`xTg&leTS84*;iT=I6O&*|ggBN=tJgb-aNu;<@9H4qAW74gs(*Y0mY3 zfAk1v%#UxU8v|+^rai*lWS%x1deA0_;W`KkpWE((^TEuW)lpGVq*om0W&G{d5MtCt zn11<1j;qj#1~XXtG3pHy}C9WahqVaGhcSrMiZ6ee{L1o&w zapM6=$yidF%GxC}Ff&(z8`}26_+LU5#+b;nd%iur5w!%dxHKj4Ls0d{3IPfq9i0T& zUV%x2i_R3EBTrvp0m;C&{--a%ZD3=O27HPFri-D2jXjTre$xB4Zh%FDtQi^pMzw;j z3jjs)iin6%d;mBX78dM4mm)AICVW0O-u(vlQ)TD@Z{}nt8%`eZUXme38l-7z3UV1m z;XPxb%mAGDTbIsEc2c_f`U23i#f3&s#bd{q$mAh#n{fz3AYvYtt62`8zxT4*NHOfeR`}S~V8s^zh8yg!#+Shtti#lv-YU%*$SM;$9**GuE zT*}MO=ipK2%aO%->_D3XVvEXfq^YIl4NTgjf+71g+yF!~5;r$;e9BUN`_<#$jbS}I z8j1I1k7;EWrnmVe7Awdl5?zvR5taBI?|3_xH^ z#qvRnGKGxO?T+3GSr1RoZzx88eQ&nN;Y8ap4W&5h(levGzC@Yny>HC6%nQFDX@kRa zKVEc;20V{ON+Yp|V-W@y9*e#_?g&xXL|UiwM7|+2o{4!*tJ}(qLChUwMs&xEHIh!T z?P_akViSA#UZ__n{D^suei)#Bwp9{n$SwD4G>wdGMv~c|o)QAbc!Thc&6@q07lQ4t z4K;k~3kJZ^O3HT0x6e29nA6wNGO5pc3X0=-Zf6$L+M%jgN_l8Dht z8uT0{V+Y)t^Ru(p!wgTibt}!m60Dt@?3-&V^U1IiXly`OH{k8{8)0N%Ak#^KTFY^R zMn*;uzX`vJ_6zbFJX(S>A-3B&J7+X|9oC*amyj7Xy82y%>8C_LvC1eZ9K1syur|58 zDqrmm-(9moa7G@+P?tmlVR9*vOo-|2d;#rQ$`ls2^sH*EW zSHpsK6)aLL97cvxBWNAppLb^hxzxbvxWHXvLc@qj5hKq@Z7^2gS4j5&7+7)ri%BCp zCay!-eQv~g?ckP<=RbOT_n$U;bv`ra>7HwneJMMtP70~2s*;^E`T*oLip+1&zQhj` zwv`(;GPH;O3V0|vzq7ZM1KX@*rkfFyY8AhRAlC*SO0ZyMVTpC_z`(Q2T|^%TCph?2 zV)79PK>^gt<2W1FGoXGmLeAYNVzkdis}8fvDB;D`H)&7bOtOqXkw9DzbQvpYXc`Wv z5sMwmeou5A>}Tc}#KKN_DvJYT&D5s|MGyZDBdfnuaW&;2KI1@eXKac(c!YClk zJ&ueVhqu(gsy|dKY2O33*w}|sou={3)esBJ{)@WB;Xyj|MheGg=x!3AEJzG)`}&@} zO{aeqfGQJC4w21lY-}b6|1a|1JFe%x@BjZq_RN-@B-xaNh!WYQL6p53BC~<)jO^@L zXsM7&l8hrGlxQH4QBe|7DdBg2hT}ZW>pH*J_5Jtv`*l07+j(5)LG^jRU*q|Ftmm!{ z|7YT2QjXUgoBWRTZ`M#v-yS&l00>u$le_O`RZY4oo;x^*ul$-6J{^o#V<30B;2w~V zm}hiM+J_~!L*87D&_3Pc*PX(m*f+TK^^YOkb!!cdEI4eT<^AUP){58RLX9W2YQm#k zs6fEPO%8^hj#~sFp+@YDS?2+{85`xk`)#Iz**b`XqR^Vuxbk>P)hPA!x z5h-y$)XOe@-*ahf=LJib-sH`R&;?a-1;Bmhj*6RKS|cMp_pd!*O)7(E!f-WHp6LJ+alS1LU`WV&pIb9nIcn6JP zY4+(Fbdn%jRYPA~T2jkk*4P%|){dWE*67x)+u5)%!-*3QBxN-y=)eZNo#nh`UtVUW zg8lEGVh6@7XDbEB^NkO%>w?S82!Uoc%Ag_rMinY z6AXw*SEnRrM+XO(2ui{d`x%FO-~GQ~Ec7Vum5!hH3p=&(#Kq`nUji*(8G1g;$Y{6w z&VrnTR$J=b^^X6=S$H`=nQ>s0M%_c5G&RpIZ#9Xo00h>xUi&F@;WRyY-}Tof zu{EY~gh(9~6ne!v^!tt>U-KtgTifkCaqjfiUGpw%H<2QqrU*)32()nHPag60Ui~M2 zqW-!qX^-pKPjj9;ZC2~?w_0*=ty{OwbLcmjd1NZt;1143Fg|GJxtD`rmPxz!1c;O zsS0m2YnSUd!l_QDSt&WH-mdxb7sW5Yc}4KvCR8FL0{zZiJz^HnXkS*t4OuBU2QRyq z_A=LMjHr0#+4sd@VhTl0;xXOZewQy#ZaJir#fo1r#J58|(&nw;HQjjhC@fVQ%$}tt zS>0Td3o@@NNg@m6lI!>ts1IKU_#GXB%y{LG(m8@FSFIP0i>nITd2LyImh%P2bjy}; zAKThp7~K5C#x)DZck%zRhZR>19Hgr5{FN(LDi$Pad;;gI^FBZS6IX=l`>C~cvX+ks80N@fFI@xo$J!DJl47|W zFyE_}=AUez1JAQ|#Hk_l25(M`3|CQ0A5yThZ1Qdjwsn4fen}^sB=v`ofwSZx#H6iH zIYW)rAuW7hIwv2HeD}6(kK5L>SDH#zUidalL!DLwnIOeESyBcCYNns8&qkww8DN@tm#vTply9dTw}|(Sv>K#9zF0={guS2Q(N{75YhNM@b{1>;5!5 z01K0d;qgWN)y)l_K(u-p(UD)1f8t>rJbbuk--Z5Bkjb=g=THc8_8Kr(!0%B-m;m02 z9xKWg_Y7X}dj1GqKq5^kI)IHKI2$-Avn$TJmCSFc@7jo9@1y%|-`-bSTzU7?m1`i` z1$B63c2jJ)tic|{7?$bO{}Da;DY`__CR*pr+WGXTb5u*v8U)F^AGh!&29h*PFzW*h+v?djc-XzguGm z6C(%$pa+wRz6^fkpR;Eorx`D&$I9~MbOY_$wpB>0Eq-M*U6p`H#3X>Cb2Vx_iIxPq zY%umb?mq~Hei|dXvEOtqB>t^>r|bC{++vyaW2>9_Dirq^6N{w3{Y5=^+Q&R{ub8E^;)=F zOycRu{W&zqo)`C^dcmC0>rRb96SW2lF-QK5llGrk3<|AuKMg+11Wd_7abil|^eteV z=BR^j&ivYjrjIanRaids-69e$un@UaJ;8O%0?sUI?E@eqh9|zo#U*)7WVi!YZ;YGK ziH@U3cdm>)KTrPbC=ElxM@ZFpSx~SY?);@hit^?>X?+Jhs5S2PVy}h87c?{p#wOwA z?fILjeda&wD+)qDC-b#AM>wFcUdw{f=w4%tvi1jizZ1a|!>V$F@7i0~XHE-`hToli zro8T(a|&x?Zx`X`05U#B5zl>V2#I>}`cC%?$s_Sw4D z5EUM88JP4AWpz*)WX<$`8dHDH_uMH(QL;FSGRE? zM+h?)fTwz`TG4(L$Cl|MQigiKM|B}`lwM(|@Xz-4wP4W%sRv$@!4-%bi?Y|8xOu{~ z-W0nLlnSCmhn8;!{&ivLk`H>gsloOo${ruMcX*It$+>D-PxThRtuOwS-Ik_-i4{;) zvUXH-w8X$7wcGl5(&>mh?g0zQ<*cO&epLJ+BV9B4gAPu_(=WZPY?*taoO7vdm=195 zDYI$FR5eB?TORw3ueRNNr`e9Ev1k3ZR)K*9W||1sp|AIYFI|1m1(|MP#mPxkBuB_C`=Qaz~r zV`bWB`_bRP2@Xzb`RjqHnC_lxIZlHRGkiiDd*GzZ=N|mN|Jvv zF*N|nOk8U&y~fGAckW!Hq*?I2Yzaj#ID^7~0uVHQEkS{GP$k9Toe;2WLR5rcqUPQc zGpyJ7&1c8eF>CJHW1hAutFAKrB()70d4s{LkQG4Ytl^4nesa*#_szI0d$Ny59n`MD z%@K!~os+MC| z&}C9YZA|EjsUIhHEVqHJ;KF_h?Oa76O*WzvLs|r~!q-uBQU6{)@7+;8eW7c-oFbBR z2EGSI{cPM4pKAAbsGpuKN*sJ*+*Pm$J_8pBr!=lCSDOz6aIrnb?R~i@b<*^D!C?G? zzs^OPE7Kb2*%aP3Wje4xFE;X#t9BlS_GH*L~nI+A*{9*}zmQ>V6-2o?Icn8iZj0ce~s*HSVV zune~E%a5+NDQ8D%^zJup7RG@Gmt7W}^z-wD&6se-J?gOqMCUm)4nNuzYwmcs5+&tz z><99vXm($NZhR~(ya9IjGC$vO+!f29I50;E&;?Su&c;K;JD7%4$-KBarCTi+hS?9k zbwrmXUPSK2Szne9cTD76wMt}L#dn4=D6g}V+;v6;upl`@QtW!Sxd zGE(Rouxdr_s*p+#L#qWWkur#)LdqbZ^Qtx1R}vq9N4!fvA$W+{!|8ima0 zZhj#vLh@V@-~Ef~u$!|KRu7tWO0QIG@JAc`qboL`0BDS9{`yO3a}f`&?7I4-5D zU?^ySlC1Ay9=|GrAbwkstdg`K3>hC?(h1R3PUVG8I6t$7RC7~SeYbelhyF**n<8xI zCpq9C23y^at91U0D_u{I4@!AVV!9ZLKIy!?X>ekkr*1V1ry(Tdc6xqWHM;pGBu!51 zUbq*I24Sr1e|XO&yZ@D{s2%^~KT{Pw6REO@@ykT0o1ET_ZO8FJ`D46&eRAvHPmS}X7!f~=7-G>aKs*z9@Mggs%5mQ_R5TYX`#zh?#fhe%EI9rep`!IQC z`geIBViSf(yz%hVNF@ajv7&8u74w0oGQ#F;|GF$?Rb>yz!3xhjYng}DtlwhIvf}(L zAO=44kyXdKcvF5m%bz#zA4|zXbFo#@he7Xk=Y|S@5c4nopn>GHUA}x7 z#ou<&dtYkJSA9sz5s4LM!g)K6B^M{ZTfCf=FFWttoNXXAk}fM|q zU4{G3CoZw6N5*kpEe=XJYo6rI%3(iBz=1%7M6xRzacBfYkaI2BkDfqRr&6cwu& zu-S1h-@licZl3ztoWV)sEF8yOpA#j>eyjB_&!=iO^)GjD8&@0^2%j}6`2ADu4G{re z3!YENI~=|=o%U$rRm)3mP@wn5=>&Pte&m>27t=5@;drMRCap($q*ss~IosZ??mjBJ&l)mB*Ey93O0% zXY=6tzE?0q4^EA2y3qR!;cg~M2OtM?>kM5aWGGTnlkP`=_Yq4gDUfgsv$Sl2+HB^I z7o>y!wu0YCNEqX8X7A)QWsXf?F2f~g*F`%Bb|gp>e`_PBqY;9$!Zt*qy4jY{(~_^Pz?z=3(%n&ZhT62c>m$p8eKs7JN5>j&D9Y^T$D<=1I) zK2v?j`6djLtPP5uqM~9r_EA} z>Iwe|PQRqdweRlkUSCypGps*~T*(B*;MJA#HBPU;o!Y7IisL9qbUq9#IzEbny3RvT ztC;6A@uJ>@;{1rbP|8qrx-gqV=(oJ~c1JPr{Bl6aK|L3qIU(ec3FRkG?u>u7$RhWX zw&Z($`K+>G+0bFbTDZ@vb!);YGn2aU`=b*pO`AJD<>hz_{n9tPbrM#q@4Gu~&KyYM z8K1ItpqN29FwWF;nq}zrG6c(1Jz>kEghkWxW<1{Pu?g-kudna7u{g!3+rAr5o-_wo zQ5sk3QiiN=x}cbdLhVCiHqgI?GHPgT65{r!skYb?0mrj56hsT z6>9bf*jc98#8tjnbN!I=m5mb~-880vOiDVJR5emS-nVb7V^#Rnk0$~_Jn_`zX#=CF z*tV2pFGIbK*3crJfj1Z3N1)1{K#8?^dbhK`gtv}AV^@uQcpdT>iXL1*xYj; zS5J4C^m0wp+(~9;52xmMLK91PrO0Z#BO*I(bwS!eWl#}T#)^{kE^Mmq+ss-IRO$LfgST2q_3H+ou7m^esR z^-R!Mz3j=yEcE*JP5zqoiXux}a}k+_yL*m0^?jlS{^ZanLBd8>$B4+=IWEI37AUU>Up$YIZ z1X7E-Am%SSZHS49F&Wzu85GdY0%%9oN7Zi(v@08;9sYgY^A0y{gAy-}=Y(%(xIrwT z+%6Q`%YT&S*k3N)`}FAbi}|?};T3`!(DDO|9ZtTHH-j=}{>Os>Id&^TC^ZBA*7WN)57KL^qWbY-=@tm*D8s$Nx-#5w&MfL#bJsdT{UpCbc*V$pA0@gjETg&@+JBp z$Sgs|F3itR1wp@sgrB&El=@3Llt(TbQgr80VCdn><{=jvq6Dn}l{&k!;?9jOqof66 zW4@+0&|Y3ZElL2j=U3%8P+Y$6u45j+6q1Aof*Q2&kj%W`E$DnW)G5E()wfz>QQV8& zy02bPfcOk)LE4Ff!0Gv4{CxXSox}BcjMFF-Kq&K0-T52p9@Vdp+2`H6s`|f=Q?DJ` z0FT<+Dhau6AwnZ0pVCN3NDzS+xewReBvOw$e3X{oiIB0=PWk2PK1sfSZ-hONoM*BC zc_J-v+@esz=R^(->b@Gq(4`YWBjiDa_vow%&C;Bm>OFcHRsBnhTA=n+%$0bxOen+urqrnB`sel6{Zqt0H{f3){@p+2@qh=q zjy##Vk3~jjDaK4XYj|p*s==OCeJ^T?P_5hP#`B+&^`V~A1}8d9kpO&P=F_i={R9T{ zru>$$fScZ}f8OQ#gSz9N*7JYgI1EB@VW-y(JC4c3>__iD|GR2+8S$v3paeAJ|Ll+K z9%|>t>G((8@3fWU@wd8vJ(5(DTgG-Pmz+}4>Ns-D*s)Em(l5D{bfd^Pt(#z$8)bbY z;MVvNHg>)75K4|NF$~kc9pN94B8lB*w3gqMZ8Xc%iDl9wewMXYhJggdu#P0fK@sR0%)-ck@}w&FDmRP?o!{bA2r_8K^FAYOvC)s+rjg1nFcc>F3- zy3*(?0rzs>PDj~*fG;`vQ$9yb`S3YCv@(#ogM?-ocTYMVZ_+9IYq z>Bv9t$~3b0jT1)}lV_8gW$FkrL9L^%$V6@28`ujgYl2Sg3Xd+e5<$_$g4i2jM zn|o1eQV=kMBq}aX^Gx~7cPSo}$`tFh32J`*;GSC?Xc7P!w{hfLDMq*iD=XjwbQm3F zV`Ecrr`)~H-~e-JZm39`g!&@b!G9Td*ZXePs|DG7vMpo3$(K|HmG?m^_ep5c^u{Cmb7y~XJVlHY7{HU$QAJQC;cg#{4YsiKeNio+;uOGqSw*z zO7`zQ-qK$u$Zu<>pb+iU4t4Haf&q}JAm~l*za24bv<3Y?3*)9o?E{QXZ$#IvbEPb| zv%MADAF4;hwPdJ>dFc08_q_KFpUEjq)Ax$qUKMVN;1snd?&3A{EZ-}et66N`FigG{kutsJhr z?w${x90rB->^nw|TBDLSVH>*ZGmAu0#|a#$j{Z#seEbq`UPa9-e_C;sTZXY)x2p#9 zU}{@bOPbQukPS)!yJHUu*HY(bNB#YX$60H^HgyDGRO_{N;^5|r4}`4B^vi*ZoCjC@agnWWdNR2Aapx=h*+#GE1sKn}9+FicDPkg2t!DlH zgKDljbcT;J7NHI?9cS8wssH{LcDqK^jA!hS5~n}?x9h5r9UPeRUGeqhc<)Y{k4VR* zZ0T9QeR)^!PD(BR{N&U3P9DF9Je8DN`*Ly4RD7N6*-5jIwDXiQqEUZ+ncO(F^UuFN zlXBl6ZFY*FCFdq zM+*RdB{77Q$+!i{pscK5)Uiw)INWz(CB;Xu(Ss8${{F-_K)*T86jQU}z2UU0DJ02; z!oH%&Kw(;0fnsLX7}J0LrUy8QNxOOWOrbzoBS9q`qwV%t&32qIJ}S2u4b;6(n}0tZ zf0Le_HD70CRXOf_ev0BE5vmIOheo5uo0=*qK7RS4?Wg(YchQJDbNt@A8VwZ+j&Z8e z^cliCc?6e&2 z-4{tRK%DUlxauKX)#yy_b^ViI#b*SIc4Q44K79Ds-ju)F>-u}Cwq@A01Wa!Z#obsL zAe~ckE;%uxa9FfOHnMzGd>ll*!nsngA|k1xcy?t)3&OTJQm@i5EQE=W9Z8Q^$86fK zzoq7L`YJDw289tst07Q{(rcvnSg`763xy0L;NW|WkX})d$a*i3%&&?somR7}%#yha z3JBkIF){jzsW1f6C4x68u3~djoW+UoUmiB**185+4<9RND_7I$%OopjmszQO`gqqG zK+k*suuv}*Uk4k7?ft9x^XKcRmTClB*5Wee-c(Xhj{l|2no(%&OQ@Kkcj=fk{J>v= zhvToIK|>s}8mgOi(>mG}W9+fsoi%%7zGZr&G7Ce7tVjg0;wm^voHn9kCXlxo`0V!& z?_vz|!_)do!i^V#B*=&gJ|bv4pqR7_(I=(xWFcooYFh#_`4`OKom z<`PwSpal0+I*35_QTfvbroMiRHYW<2H>5DYk-!I$a9@6av~yIIuJ2G9Zb1GfbBYBU z=QDj`nk5p5iT1jx>z_Ui`Q^}Ak(rKJ!xkzd*zs5>L4tCI4!{P^0s;o-=E|1dQZ zBX=1YjVA6qUHpFv|01{HXgh)}XHd658E7BOreTn@9;$?mAYA~^rY)a4jiNdSYP^@O z#Bu1vNu{Kfv)N?C2pKId-Va1#o(1UqUs4P$N3VaM4fUZi6DII1T;<=;^X7bmAl4Ay zGS$`A{<&l^g@$$)BP%TDD{&Zd!;3D43Qb54%H#D2t7Q@?_drZO@tNn)^CK{UhZEN- zW!qX`Utilx;zauPKFqaYo0|HwE2x_~<^${Oxiiysb=ATDPTkCoY^9)`ka=PfHgqkI z3sIN>#njTzSsy=slnVIV?E9*yd_-=g@IcZcd=A0I!b9vHJ8%>A2nXZA$zyD8g+)YE z7U`epfoYs64#FciQB1<94Jb8Zrj1y_oyUb82Q?d)xBxXWTS8nH6hu|Wm1e*=9c#x& z0nL52>=uzF2^;qt8P(GabBi~(U>+A09%7ox2KgEKo8HEX!w3KyO{OZDT~LC;M@tD{cUdCE1Gkg(Z$S~rsWo6T0m$2(c>>tB&2d$IggJ0tJ-t9bSHVtLp z!9MjTRQR3u_b7H@Le8A}kNus}mAr493LF&I$TrmaO7_pk(Isd71HZ4zEQrauzC_VZ zrGCJJzP6f=uFTr6aq!L}?a?)z=4s{Xxjf97G|_eIl#`1;?VY!G-|myucD%Ofzj<%d z%QK(Ht9`TX*t?!q&5cI&m6d1DPAvbC`Q)2N?H)HW9sVlGb8)?XAiTudtb#}ji2BO1>*8a7<+zGAC+M*I{C$ae3PH6co96g&>0Rxo=P|=$%$qO6 zCAm~^8PdwXLII3t-1XTW5;jG-;~w0-wOU|T2%)h9J}FD&&havh%VUoX6q7VsGntLX zj2=2}=(viWE=&-YrU&sw6}>kF9-e#W;N%6@w!#AJ?>bRAKbP}J>%NrX7Y^vy2#9Jgu4Lu=;PE7`$C5^PL3@aYFx63)V zpT+JK541~{+Jva#cZAmsDg1#6WXtz&C22158&`xjYZ(^Um`JYDarK179b66`RxOJE zo}YUu|CHs6$9eOA#3)Ve{Wx#)rIf&?3%>Wnml|^?$B^gCaOxZB=`9qQ`T1V3>(;ZF zwDAdFrpW7yvb}bWSGxUeUd^bVhcm{GzrCunU2^9_z^T%bgKeu*Z<*(}+Y}w`w#CNB z=EI@AWf^MYeZAJSg{d-(N?qKzwB^g}Y|EV0FY-^P*fBartEdub-Ld)SY7Fx`-Y=se z7uyg3Igi}(s?D1>k9T8+DxHnY{rkjyoAD&j)4J;<-@%-}Oo!OheOam69K;Kh1RmF> zDimJ|Uc3nL7zKsn?NR&Vi!E1ZX;QUv-n|Rhy0kOl{frxc-I_FK759oE*Al^{2!l7U zF%>CIt87DWDAI);crGvvOn-8I7VVu7ZL*#B@84f_?BU`sHsd7(VBkR8fb_ZAQp`yp z){*nVMNyxVrspsw?tI*n#PQj$Uspcvsm}7yR5RG%D1{b=Dv_wVa z+Rk3xLiV+vb$F5P&*zGkonF`EE+5m?DgWKOdA&khhpHf!Npl!QYU5(v$vT`QI*iI=h|Cx>g2o~C4*U9vwqcUdp(rdJTsg`CK zDHMv7yH%eb{MgX{%9BYDH&k*GxSqQ2mz$4Pj6gh zB~`-+1ENa7+~NTv7&)x`uC*wgRJlg+jzs~FpIQz)aL18Ymq?e^b2oF3OInVgZ*rAW z8-_eDPETJ}r>Cmd65D8<2^~t}fY`Q5(Ab9+y5`$^ADc585pj`ic`-OR!p6YDvI=GE#E- zQF0y`lk-^yRjuiTQYrA+o4xz?MVA|oADB(7*`c)FT_vPw{`1REGR;2P1?U|d<<%#* z$dzW`qI;Z9UAZaXHjeYOt=`^cN!AxkUX7}#POjZ;-Yb6z+JFanje%(z6 z3G-4YNXzr?ZJ`owjc!)pc0d)BBDailtTy|2l7{(LT%1s*g4AHx8aH9WEW93x1(ym-(<9CR(-YfHyx)Vj|jJoE!s4fk*q)`dCCL1%#<=C?%l0T7D04$ ze}Z?v^()9{h9Yx9%(G{bMeRdI?}ykWrj3$_tE0k-e(uPa>a|c;X>Jb1#YejI=y5h- zD8iLvI336bb>d}*x${h|hrb@@7H!i4=cS(`llr=fOV`1O)SePvYk z5tidl1IhBpml&%8O;FC_L<^kwbR@Hm`uMHs#f?5dk;%zlw0Eb~OjVeNipP)ego7v! zB$Sa~avw9*f&dj-k6G3xa!ybwBORW#oJnd%*4C=7#qR^QzCnRin-A{&S9Aj5#z>Q7 z4hz04?`Q1~kk<)nAVH6Ny!Vwap4m4OMnNtCDtFpl^Qh_}XU_b^RkA=rIKCIB7tMEa zdT|G0fuYc+&NNzrV~Gmj!3Vu#PBBGI1kdFN?!01QZgM9X)&qoEH)Tda&XZ<({*M?u z5FOu8#q>r$1lLsbk8NxdR?~g1v%b^5&GJkoF@=cI!a1ZH2_o1$HsjZ8*RS8Ds6*gr z%i8)mS0Hjy(umhn#B3-o#s!z)MU-$9#Z|V>yHOTK!B63(cak>)274_ru^#GmL9T_d zoeL=> zarZ)Kg*)FyY*NYp==1i~=BmENgg}6rr~$>KBmpr=b0zNlOMZG&1_001o;uy>g;GkX zg}_x(FB5|*5tB4R>%bAxQ=Ze>Q9e%PMwiZubO@r`yF-3NSe`d_%T-an7Lpj&lX8=- zTBPAje}Bu1u>)*K$%@(Y=3#`VPjx^pT=(q;47i-?Mja+nCSJ7w=RgtSOx#aQJ(Nc3 z$;nPeM#*K>Ejt!G6F1+iMq6WJV|y8eu_|Tysgn61o0T9$M;x?N!WRRo?ohvz-796W zoA4!!7*A>(I6uxPcGMU9S`ELaZUDLyIX=%<+IP9;K4uY84^qCT zOTA9w+13owBPPA51DCZuQ&dIyprlsb( z7A>?pSzA#X=OxZp`d$NQv(IJht*sJG(PqV$orZ=6o8B_4;!6dxfbAmQPOF9Q9c1x58%k=1v`#6)0k| z(HO5iJ9CySin3SR#S9t3SpqV)T8`y+MHP@gyFxI%v*BUYPQ5|=6boF|4F7|6^*=%Z zCE_NK-8SwY2QLcW_zQ6Id>fLP{G~(KldZJg;=2@=znK47v(?v34RfdHJQ7fW$MYBb zQx<4xHf-HGcn!TpP<3H$JN;`OuU<;NaW&*~z&h4VIjLfgqH%C5#!5 zk)NfEjz%V^$)F(8q33Oj_=C@dtI88nuOT%epdQLG5j4uAaISZelQBzRt863qT8x<+ zHT$)y{QD89*)`^Rk=$B9u(#=v-I2`Js#kBjb%Cgu=pqD=mN5|6zWb(3`14>>uLqpy z%yLsvOa;bYQVBUUBr0%OWd#)d8xE}BU%{Js0~J^vV2_p40n+jmlEVF8{z!8d6NlY* z%$=H>>{2Kw=NFyU`tzeK<9NFGLX;Gen3dZ#4E3bqDh&AHfWJXwi-lTAPTUrPl*r_c zuXr>+`VIPCgJy6oMGgHek={LEXx!l~B?+G+uoRu%O1;M!h5q9{g-z>o96I-O5H!-HG1>- zO)DkkNxuB&@vv!^pV$^8gE%)_fu^D zd{oP80mrwVLH{c{WMES)9twqwfWtOBE6Q8WwhzMXi6)Q7|^ikCusn6m(kQI|$@j zJHGv_A%=z(36liGNm2z9TPnraZs&ZEoEG?_YbfKTlZTq~k9s=Fs4KbC!n_cL&2pnU zF`Y2M6FHRVhFJSc;@cnzpj46U5{X_R2q}|V{>}J7EmU(KF}6wYwD-DdK9=H7$}uJnLEwuU~-+{2MMbvFA7~12j3^YMVZpwQ**)zGf5j0H5Fa`$?iwCZgED~rU6^Q=EiG+~;#{AR@9?fOueiQv4%gnP0 zUG^H^ofK@jf0TxM**ibVpXbgr7m@@sN@M)mZ($X`V;gF)#qS=*g*a1RAX!f^ADV0@ zLR;?qzkp%D!`ISm3)sy~GB?zonvt1Tj2ZwZ zlJTWt>#knCx&gJT;L&-ichd^~D z1$t;&@)OyK=aH}))K@+t?oR-s)A58N!&!3i=*@wzZTXZu15@tOag&@<3Dwv1Pu|;2u;I-zhe1BToU5oL~AFC zX*q$#a)Ngud1@;{%0(x{?=Dh#$toip>lP=65H76fs*>DFhrE$xnOt@#0VyACM-m%D zyqBB_g0X}22tju0Fmv-H|BDzH&CpHLi{2Rl0@PPlgjcT4rn6d8KVriSztg8vYfOK9 zW9L9`YR270CcEsyO%itQMq|R+$nc2D{wvosBUp&T0W4h5ntB7jw&nRxv449prbxTE zxo)bTLP~MY4CmaYDyE%f+hw^IFq2FYj2^o?QBle>#Rt&h*~XYG?g|$@ZL`xHklf*Y zy8jR>2jiSrRcS6xv~l{Z(=hW2zTc950E8FC#`#!GCXP;?(ZeVX@hsOHpF$NJfUi%ZS`ySW5IRcRDx-|X(!Qo&Z1ufhHO5Jc` zEn0H4PHD+aFeDsKrug-Yg!y>^>HUZ<3}` zIf@aPQ6ZyL77~%BNXaoMbsGkutP>so#Bk;D2YVckv`g!p=9u^;H2d_UcYEx+TSXV0 z7(LSW(L1{p#$9)+IyO>PvJQ^8lXfj3xt949-JnmAfrR7RZ;Lwd?qq~^`jmo6PBB$> z-}s! zA;^-t3T{JS(vbTn68}3!x?p+p1pZ>CSt?kHEYPAPW9hvLBs1Y>s;{Z)zF#v=%o+DOAV5;iPJ%Q`J?B1PVD>qrSYWn_@ExQ^T8sWB3hLFcPKL9 zL~;LzensbW>by!-?0q%}t4vRsIv8D&F-||h{icq~^5w}bcJ5m{C6c5mRgc_`2Lxe# z)UbBd%7{P4QFuWX?n?#Vtzp{8#x@igv{*}e9T;b3_UhrK{H&KRm0$p=nZgfE-wjZY zGmC04>vNw=(b2S~@R=bhem&E4i&Wv~IV$t_1*RVy0$2K&Z( zM{H!|tRRIJPv7Fs=F{v8U7m{c7EFu4ifH!{;eTLC?@)bs3`T;kOwU_1Q+?dsqmPFr zZ#K8I$Wh-pY%+{+f9=E< z)6ccV@l8Jt#^(3FuXE2wdj^Ih)amR6=4KV>WHe%Y-n?yz7Xt%Fgtt3Ru{3~zYmnE6 z4!_my)ywQjF-mk{arH}{t))>zs-PLv^*L_I5%Vuda1PK6P0ZZ0ly(^dnHL!4dAOz7 z%FXS=ir)0bc8d&YNu@SiAd0CajhYX`&3FS4UW777N@y#$;Lp@@v7@f0_jM?FG_rKa zBHHYt`J&mS&3%4i#-fvBSLd4Qp+*k34J!%QOJ6{0A)z0u`xVf?)DaTTut+;?PM6Rx zWXa67a-lAXs#?3*gEwF`Rz`dL)GRD4+9AyZR{DyFMq!@Qc6Xaypt&cGA2;YUeu^I2 zf)xx?b5_9@$zGn$x!B{-{j=7=;;EtNm5ls%?dcm05eYGh%KL=Bv9F5EvL+9!mz^YG zgY{Z8DClR{Xej2SjO_l%=`*TC(;z6+b%vFgvD`)ot<5< zdQNfjjDk7O{)s-`O@Rw7PyAWF{RV(@O6?YEW9!U!c=4+YyLOn9;Q~%F0WZk{s? z2D9Y8xr2vIzybNiRbM8K53VmNC^6c}h)Mt-QQ*m-=VJqHo*YZDTd!_%zt4*wgc053 zbMB;BATvUV9Vi1wO-us34K?7242sNK>lr+1#`6_J1X2%~tAN(A4uv$8f*3?Oe++|< zuaCJk+v!-Pl)F~3xQd8h9D-6tG~E&*Kz>R@UNaC(3BVC^vSiK~`woUbJt_0sn9U3epsm6p>7Y{wk zD=O;NJ3YC?^KAkrW^I#Q4&6*fhlEX!t4Vdf(JFYl&lHWa@b#Nk=G`)i4OtYaQ5Jm1 zq0bC}j=sQZN4!Vag&h3M!OT4nGG>epBWB5)U=-`Vj?WxxY+4EE_u-OJEZyZ)pBEbb z2i`_ry!bU_j2SK7hI3%RfZrB+swO&eo_~ zW!7ZHeAAIQq>4n>{g|_ta0y7~E(m0_73; zv!8jhqA<{=%&%I3Z|JQaIbBTH@)huRqOzLWKcWmy{v)W`{2yrt{|Kix`$r&x*1z(r zhyNo4;s5pD+$VYm`z*!o*Wk-#I>Artv=w+I?V@v5O;K&hi|6)HC8=p3nVGE&mrSszO15CnKdGX&DqK8Kk!<7Bx{aQpABBzmM zs8A3z+yd40tgr-HDjCEe|MS!y%@hg}^oojYxW>f;APrtF`+5?G{xrlnA_`O_*SvlE zO`7N%pFNu_mMT-`l zBe#h`ea*Q8ls&3`OQ5fj*^!7z^7}E{)(vV$Mhu;cE(g~;M;7j(f&=$wBW`LgbBgZF zJU@|#rt@{x&w`&4+YL|o7b3i~7zb#JPn(E;+3x<=i)%a&T98cv0VJLR#kixJNkhz< zqj&Zrt!O3>iq~4tu8ubcbp_;tLRipYff^JFp3_xCw|kuN$?PAvq91VYI!^U;heV#2 zzzh`3GRlP(-ody1$b;v-+6x>*UiryX`(5hOz$?F!s4ZSnkg-0GmsQM1ls5q0Kq`S# zL@`8x42NWm=w0xFY{BU&lB}EuR9j*j;WmQO zUJdK;x*9n@$s-n?tZiCrAxl;yp+Jr|!9m4uBbRGyzVfR7@4WPIc7gu|O)w|&qtNn8@afh6pfCKheG%ul?A-cRy>rxQNGb!ck5IC&3u zB-Rz<8s|j_nzDNR!9kT%ZoH^6_^h7Mb7Zq*0?hk3dq~|qo<8~GCo*qO&USjT*BGN= z;^+B}-E!!>m#;&(m2Z;RZ0aj35djqRS#@f3f#T}l7|q<&if4wP$2D?vcd=oCrS`31<_MnHG!DkUkW*>*g9%ywj_P>_> zi7byviTHP9KS{O-mBDiId1O!sHH`nY?}zTs1~jWIh#1wAFaj`fk0nM+Rv7qr;0&k zy7Mm5+*aUsKg-f$9kO@K+scql&|~w0s8d%A#zJ&6&1hWbreMU)pA&B&16Khq7GCTM zavj{=i1*xriEt{LKqz(Z0Bzh!lKVhSNLoXU<7GYr!Fg#enW7W@@Cr?^#HCNTxS(B= zE)x_Al#*3Etj8}>9(?sT=AuVdn@m94+_`r|vv zB{RsaL>6gPc0w;=UR`8mWI8A*B*kIw#e$i<1+XTmgOQLQDd7~7U;zJwyzTnM&5$D; z3@9>6HcQ!864#nS03|MMj(_1%i7t5TK9(t8u_vgzerum%e-wpQy_-ILtn*Tx+b_m$ zYrQ?F#+uB}eInLfA&TsgX#7Nsvt5dcL6sQ;TAN`<;Zl#rYoNYbTUVAui3qgz`W$22rVOKzy-`+!0K*-W=60oVuARmQ?VaH2s z#s3KsnP;}(G)Dow#`3o(HttEIc2zRjC39l{luu2Jn75fqHXwEU>@9IV?g@l;8!_53 z2WOOy#kFEFt+ekm(6O~ zi4~#>;W-&1DT-BLJecKb{PSyGboGev0rT#k_~7huGqw2h`BYvky2TrkVV{$e^KsMg z{{i%1*IqXKRylB38>OrMroOqCBRP!^DK!}uaZY#G+TbLe&sw7*$~o^z1mB*qLUXKR zpwq;svaDBEYwcfn>50Pz&CQ(pRvipplj(`39ZD811pF>74?!XL-MhuV@H-mQ1;~_$ zyQx1kDQm@y?mDZS-mFXCHt@UMHdjcBsi?2BKiPSzo1ku(w>yv3fZ>mGIiT=pd4GpI z{Yi3J$lNg$2ubq-fWpx;DLfFEUAXO+$N!5Q3VMD6@+ZV#VlK1{O389;G*pE@7nt06 z&{?gnT^%1@(4Rw3666aCWz=0Oj%1r741t?(`UCFu6$FO;`yP$i zOGVE$Bka@0OjJ5`n)9vGErgPjTdM;}vT_W$$53=mwvGfUG%{W65+gv}de0c$^C8*) z3&exu>k*g%4_t(1b-TN*-?;HL6-nJ{eSj*6jbpIo{TBMA16=alD24T~*KR`yl3Y3_ z7s-^+gE0%wJV`y+-gr`jsL@@EG%n755q-()^Ns3OX_E^3$x|QDx03mk-T{r5)An~Q zE>ZEHe=MkSy<-2;NFQV7xdmw*JK|n<{OfCn9cdgMsX!9L~G1c@p0p_;hRxTkqhB?WMCB7na1dY>qvU?C5e9YbK|;;VQ5pbFT0d( z_(|CkTzE8iMiPP_hQW%3i8EKP(Vl?c+Om{Jn2br-+87x&q03t$H*ciVJ=ft)f|G?O zke8!^E)-$A^YUXAx0=-yHM0W)lz*nq+z>fXAJk-n}o_BEaVARW62 z&PQ+%twlY&jN3zCiXyYajB=T~)1pO?dd8Bynw!N=0-n1Q#3CrACJJik;>k=NMMP{F zZ){`)tbKFlc46BHcxUk$A(?D&IN;w!Wp%?N&!2BVQqC<@p?O^!Lc&w1j6U!KW`Nr} zy5PzdEEdxM_~I8>apnop&iDF@;;G=l=F!fSp@~mpyxbpENX#PJ`9yDof}vpbb|36T zh1c&$NUGh6Z4`uTXbzS}B8lR|i8N^YfX~$tp}%+&a6#U1 zCZC+7FN5|xcp5q`Espmq{REmJSh09dK@^2jr`C~dVrITSIT3Mp)3SQ42YBM#cp5$$ z*EA=BVbB5KhYp&W)wyF4Ew@pm2MxI$%DbNiT1uR~-GXD>iN;Lmx?h6jMjBnQGl|ejrPRqd*VN6tqcvJA4QG@K)%Ypdhd)7ISl&1a)nB_$=zZrzr;_`LA&P*h(d zx79^=ofd9Yl$DPou8Y$s^DdmyxM|bq%U-BL!5Ejgym~?v4o$@sbuTNZW*OqNx!RX5 z+m=2JgXa2R`aNNRdRoVZ-y4{QNvP#-*vUGmg=yh`ft{8q=>I95kvLT6^cb6p)2eB%mg zY#N4quo)*;irU72h$b9Jf+^w7OA+{qFC7&sZPT!ZLq&*S7TrAfAjmzT$4~E9U?FN9 z7o4nJ@ds5@cK-hiAF7br{NKQ47wmK^hMOhN=yOP#Y4HQ_3Q^0lOr%=>;XeXL}# z_L_~JL7{|@5hZhB;!TG>6*-KIXM@r7U9xZAJ{hF3R6M?R`2v^qAMy)85mA(qLfE@i zrE`X@?bX$0#w|{Se@apo&nXj&=AxW28zWSdm58t9?@kO(TUDCX6pF+b8{bz<)~XrX zQ|v@Q`M$L&V!!04J^gB%c3uW*AyI157nkpRZk+$FC>Bf*uc0#7BWTOj|O^c6$dTD7v7(*|5kGK+y2>jKk@ zFBK^+Q+~qZPXXc|m~(WsZD=(`1&X1x<=~)nw*goi#4V>#h_d@f$*P}CkrqToC%*40 zqzCHu8T7m15l4Qd^Y%oLcuJpcS1uru2$lFL=#taiwkk52lm#X!jWZ&YIx8)WjC#49 zR?CQoBgT^>IW-^+pIv{!8488`p0+Mo-c?J&c&OOQ#F{A4V>j|SAM70anr-lJ-2Z=4 znAmnIVa3RFO9`?N%tBH)1Q5hgqxvlNi30+y{tG^44kn;_I*`Xj^z=RXRFcpNQgV&U zRsbZy9G4vR$obGzIJ)-rMqLt4ut}lntiaxR{a&To%G-%#_Zgs9+0|6NpI{J;~H z%AHkvkrgmYU4{mnos-yFhFHdb`~q2w9_kgi8eoR%7aWm|=tg zCnzD0&A%~euKBi%l)KCp{TsS$O!F*;?JtIn(nd zOj>hLsh3rxY4DY(q7q}TSPK#_QWB0yZxe1fvVHYR1hr3kzibQ6l=u~|bBA_(vuIs( zbo5=npA2L0^m+T)HLL84>k8j`Du=V?CTI)rc5ag2Jw-~?M9_=Rr`k^$Aowm9Tl`RS zx`X_hw{a!Lq{cABD%exVpaL16cjAA<`Xq8!dih!oY8oeu#zfJze931D92d z%ekJ>WX|?mM=PGFB*?dEGbQi(`JU7oia;y%NU_WqS~`>Y+!3&VmAL_Y8~GBrPCd%SFLU~sis_wOXRDanV8LX{+{ON35_3^hN} zVx?!uQX13{!plXyEBLI5q>N42e>9rx25kIc0nSY=1$N)ZvUnA8>K)%4I3h?GHS zgT`kT6fgI<`R!hkb1}M$jW@pS@au!b?}Pr^mkD6UCN?mlZl6uylMzM`T$IBL1}q5ESBLgC5p_@yKld-~8X zZSGe9t)lQRe9oTffqVe@k*Ue3Zr#`0@DOueSu`4&wc)v?e%IB{Zti_L5cL4WU{Ff# z=b0bvioDuZkH2vUE7QL1%fYY=EG)e5#y*k(B-JZzHJ-6We_2q9Zt<=*nt?^7gwpR@ zwbbs%a|j0{jI&F}EV^LJw+nmXo^JKC_o4es^+)aPscD$Jxx+8xHQ7+zDl{V_@R(T! zP3HO)V4vSlg`4Jaq*EI~bx8vek#L==H4pYHA3IPb{i*Fh(|D14M3$OI3`}UbJ%-aK zs_eFIcO9LgO{+I<92V0wgI>b({<`~o%gW>QAKs*YE`Rj|q?Lt6N4&&xQB(%YtKDXw zyLm+z$iM;-X;Bc+{l_5RAQ^>O_JK>sJD`;`>-NDW!|Mplulo15XTlh#oY z2RZC9$_3qt{mGIJEpcymEbUEz$$9j3zBscJlX&|w{V>_WLf&O>dLdk5vJxh z0AA*8QCYuRPtEw&Spl&@>6+EnO|}Wu+#Emp0SJvnRMZtjU0S+n220w;r-lz5nMv>w z{SiZu#0 z2i*`YIr;Josyvq@%UD99;IGaw&|W}3$|$OPr;*?A?gOvfe@E}7RIaP%wb#>jxNECuJmgN>5w53Wx)ny67FIm@vX75zqVd!mjy{ajI$VxeA)R#NuH_!7otm<$p9caj_fD$gzW` z>O?dMrpM0ks`%NocfSMm&_3e8R73lL-yWS){KrD-dVvf8=;P1AT6j`yND2u)FNFsW z2Z4&E$)&t5ri~<`3q4Ew{{1IS9Nht%H~0H>DirVY9D$1WE!H>|d{X=zy{mJ*V;3T+ zDyk_Uc2K^US?-XDf@BW8eK6qBhTGTtkcDdB{Q--PK~LnW@4IymU9LmHu`Qkf7zi~d(is8$P+Sbm$hSOVSRaDN(akukfeQ5T&-MhfQJO43FRa@brI`j z%qiZRmlD+UKbxj>N48;-89vnHLkkXg-rft()qwaD?$wPA7M~m1I;j_9yX986wqhG0 z2Ylm*pdX;!{d}u)%YQIl6W(F=*!F6dh7yvdZgM`VQBj5ib_6QD3ZOQD5x@o1;5(cy0*&n)3|M`M&M46{x6qRtmwky7ozeP%Ch} z8=c+dUxJ57Q{SYkiHV6>MVo#6M|JLoAGD%V^_YF+==SM zrofiVqS?KITF?-iV-#AvF_*wL2{B+>9oBbiBI*du%`g;KNzwMK26_~sjB&uzUlpa? z;$b`z$%mLdTLTfS&(cNK>tNC)z2V*`1Ec?^y*Cf1dVl|gKdRkKlO~FiAxRogNi-N@ zXD)1Gr3smbkZCuHG|;dkk;oL1c}kNcNyZfmC8=1EAu>C!TYI11{$1Deoac9*KhAZY z=Q>^AZ~NMNx0kg(>+^Zv_x+k~P4wy5ArKoJsvc9hZVpVCCA;LnMk38R3uU=gS(H-D< z^aPUVM{+HdoTu#nd$+?&O`xR8P~&6$J2#}+`5-OMAv25*R+=;VCB~9MR!e{wkaTJ?lbOSK@rk+Ng5EUPk%f*)F2&qL({ zoBF4*)Z^cqH1-UPJ$`>PDmzWX*l0Sh#BuG2)l(A;l`Qw(FVV}1Z6BBjVfcS#GXQ3K-Jw^636eBr7FK25 zk>e5S=DrxWLa0Cw!2!q>X~v_^Fz#*-p6t6kX1YPV2ez<}2m^6LMcpsW*V4i=J-*b; zqg8|kYBIXnX16RLQY)F7(F z4MOe)+GK(JGFM}*AYn{LGYA;g)a0Rt3G^~0TlRMNAWGqDRopz>^pxH?&dedIfFi+> zJV{|M7`Fk?(0*gAhpNv2nX%oCLU>C_dO>@x_VX*!H<5*V9bz`gi4)yy}cQj0#kq{q0E;AwX9Ds0e=MGIze=|W= zYHx6Q$&L+A!{8o(%+eV@8m3z!o=%jKIl&%=^amD^DqEap(O z^muIDPl%0XBlI7!tcC6AWIBL(=yI7gGyt^sfJk>7?%0x|W5P2>MzQe`bRm=y2kj{( z(bH6oPrnSxZc;1ZC~42=@EIF2r)5Osp~1AjbzJceg9aWp^D5)B&zc@n76Xv<{fK&@ z#KO0L$Y^Udy(m>37}tlP4;s(*f&l&{`}60|A0h21{IzoLB-$U^>-U$mWe|I7t!pkK z|GquO5g{(+B(fXf2)C5tZsvimEx2{G+j)IDWRE1pRJP99g6wtMtftAB{2}_gg9Gp# zoY{AOeyPyTXO_X;2bAe!{dyp-rOywiHUWJP983a}ihF$DDNgUNxO~LpKO?(|i6UYd z03jKs9u8!qO?M=5Dq0Iy<3@ZQ<}viYG4gIg-O~s|px)P>ZIgKi#uO%L_^lvT43Jd- zv9|8nEB&c^0^2NgN$EUP4d~{&-fZ~}lklS_4=D-v(l>IyDUAHkqYVg;6mxL#XlEBB zWf;IGss%l;Z`wg#a-XqLM^9KF#n9&X6B7W{&w6GVHdizC9qBc#&balF!Q1nG+*RWP z!xaTHk!FMP5Hsr?XV7gAXhrn>;j3`XLvm0&<^$51Rw@AQ|HJm&i=(k-49Pg&wYvh5 z5JFl(4F~hmCIB3XElH;@l^;D_*?M0_Rnut$Um#FLRCU?V(wIa1GbbZYL@gW8yuDml zY*JF6Wv#kpwX8ZY`IkKs=^15#!fNTCFC4W!xyqyW0x=0r8bKM?F$UrV*&Wl5k5AlP~5jHo*u)pf(Vjyi?_m z1akV_00}bNAe?T<*m!d{g(uKMfV)pNevJm;y|+S;+X+^GH zZp9tQUKmn%fXlw+Q^Y-hJv3U9)ZPz7V?EBX^uCS9-mRtFr0VKw(vZA*HG!#iip3g5 zsP3QGcDK!qwFQY zrQ2x52dwy7*4oF*8q*(x~5<- zgP-ZvJ8M$RMVcb^g2&e;1p&T7vk5gj-?eSH&@ce1=<3de(L zL4|GjSR^ZjrxOyZIaIqqXLB_Cq!0H;b7~fAv2*55NpeGh%Xd}2g9o0Bjh)yQwI70N z=)fZ5`@=NF6oxx@GPlo(cf2n!7igL|{66-2&LdCLDV-=HvGK6G$8A{QgM!-xfG#0j zUQyBfVzF)J(C`8-+^50Cr@;!SY+aKk4$>I1k+PC>!_`2PPBz%8Vov~`yH^KNAP|#o zEmC!YlIbK;S6p1u%PfHNfOyaH9C%n(!j0^dmHxIp)&sQL2ZaMeyq8fDMm$*07-W}4 zD8IRRXze0e=78Beac9@dqtYbl3=$rYS3z||c3JohiK!D{*5EQ({3oYWFb8HT%8BP+ zYH;viRJ`{dGcz70J%j9zqi}GOfV8{oakV1c=-5QQ#{3;f$1Ch-El@mseV1~#Y{(h5 zf27)d>oJbLhG!Ff1;c0@m^o{fDoE!tsjKO5fuj5Z@=_?MUW@mF6Y5J#jr>pN-jvUu za*Vf4qi^s}FfSzQCrxG|+pkS%>I6C-DT)MYGibn`P%;TVllu?<%&bQ<5ms&$*oOGT zN%n^hPO)#9qK;wgqZb-E`Oe1^DHEsT(U9#W4&v6D5eYwAS!b{AXY?ZvYLAiDAMQv% z62vm2iX4D!k?}=0Gm*jFEzHUmH3*7;w9?;#@oj6f+B?M?{hw|UnsrjL`v(N<6`O|p z0SNn-YnvX8^ce%zqypEyo~3+;la$MYKUoO3;G_?)vQE<9`6rlWI(bzr&B_ohl{ z*11?wkp|}Lx}2+JK+gk~NS`Z+A)firl~SRBS^Brs+HYOw88Y`m;3#Q6aQ@;&eHUHf zsS}`yTA}!=A{ZTBa}Fm-&omS3R3ngBB@n!aFmPCE$u!~q2k;d+*Kd9xdY?Csl2;k= zhJ>m6TcAWlu8gmvEQhOD0|l33R@>YCYec03=*l!Uz^>*? z;7%ZE()WJlS9+M%A3&qwM^wDQ+{O6#-OqD105ab8>idH-yN(~SYk>P03@G>4 z-IP_mT;>@MVA%ki=9CW&7WtYM9;o=vt|Gx^;x3%Zw#KabjJpWdazWUz5}d*i(nFD> z-8N|W#(O3r(*PSA3J7uRH;r=xcqtl8_Lhn_tKT+7hZp~m;*MKPoH%idbtKg2^b2v3 zPLQ}Al6f7HZ#Jf+5|85-%vF{ns`?$aW?`8ZGi2tudhZ^b;dfW-ju@B8mO5|Bx;oPdnOO zqHZ!b9|U{PWs+@>^SQHO@NbJyKg5$=_&?cy&>0s!W5Uu**<3fG{XwX_~~csinY=iJ(d^$va^Z}zRF zRb$TyDuN-^qs+%7_&iQlig#AH(CyD}o5e-X>e!Ia*ep~fij}9~1?Hv!`2|8&e`#8s zPmP%~r`iIW-l36ews>S53OzrfY2v*ddBp}>lnQQRduI+7dA@H_D$po8@14J;+)e|6 zKQaV@@)8v@H!&H@G+YfcPPf_)MDox^1jG(pSKX8;jZPeLI?JwkBMTNT%*;9Ojc{Y5 z2BiW3!3sCO8k8=%wM2ZUlD8Pt-{c>_;npI?pRR&`P1~CRs-^KD9VK=z5)NOGYnfsg z&}tG-3@1E%`(#t5ovS!9Zuy4$@mlDf^&7qjS`;sZi}@$$MysV44^v<*8oI9Mm;C%* z77-_kljY?Y{*E?|4ojmLMsF&YnlliM(2{+qz>8h-&Hp$aCLy6o{^eEaZr zfBo7uarb}U<7w%uM)dmlFYdLtK)-%Pap7eC|Idr3^YNUU7$j`D6pkO}afA!=>r<8% zHrek3twV`Uq>IIu0FM=A+R*L5-l%zu5E^8k(90LR;n3FN3jiDec#xxKXg*j5cS;C`cF@w9wMCP|T4uE52mYiN4i1 z>)(B4QCu^O5Rp*ZQKSh;YT;(Bc9?x->;S%Zqd*i3Vh>LN@k9Hdq;nec!;^jR-vEQu zPKT>_ng4+e$^jl0(l>W6l6PB+NaK>j65+Uo&09bq;}b*j_#{9qX~q)Vvd>T=c-!AM z*?&MYMFG5M?%G&f`_P9iT6bX5C^Qm;WYFQqe891j=)^CS(?_>gB1sb{RwB0}X9n?` zp9)OJ^h2*&+Hx0?e{Fc^{g?_!2hlD(&*^){@VEO?Yxe}MoIi;Ro^gdGJgWJeFnRa6 zV70&;ETd~wot#Tcpvm9@)jl_1DYRVJUr$a;z)$|oqC#UYHXrhfHA7SinYk(Y1sxIT zr!kG9_fO5cD6B?8QaTO61d?}&P_~Her}*l}fVI&i215wR!$=N6qcov)c#pJ154=3| zz3UL`jngjM#vEJyFkDkLLiYn98WELf{TgbFAr8QH$lvakPi1gWTK!z_dGMr&*D)p!=ywCj>OpVT8 z-*VA3fpL6qp_bCQ}~9DXX)lxHw|>__pSPKAO{WGJl}T zW(PezxVv$7P=Jkc%e*UNR8iWlqLi?0b2T){(nW6^%8#8O?MS|_!%N81>u^PLfirWF z_KVrN8HkMKTJh%fNEq6j0+enSrO8k_w)|!@iYSD108Qy~1jNAKge__0WW|}+(%+HS zqe+xEMXu1AX=a&T+INIAT`|yrcyfKGS&aY&R-g#K#w}23(*lX2GRX8~Fl5ww`Uod~_g1+Iq27 z%mS)oZO*-kGLNs#o1ELQ#{5r+?*A{4fm`Fqz^%(%%LG?K!q<^uwr^j=tzCqx<8#`g zqca*JsUN61KeYPbQDN!gVqPCkjdTmq6%(=ftdSJ_05`qIc(uIZXcV~S6*^N8mzSv1 zN3W`L4XaDWUZD0?!}Ia4S^TC^=1a&S$&y6i8w70tE~ilbGqN)=T=%*CURwS4G_Jq& z!Uicq$mw|o;--7Cb)Q#4llm1rpkxcpb4El=}w`h zfX(`w`=t5Mv_s9>TKRC|gb6r|rNvp`Ok15J^YZFr4sm)tkXNGd%B6G$Sb-WLJM)TP zStWhth459wJ2^gECf2FUp0xQ2dFIf<iMO<3C%7UFX3COfSoUV~kThF4MJ9c18 zL-~hK6{R{!%cjC>(K)brAD~#29nltSd5Xx%$*C>CiSX;6>>;2g2F!iI@p|vS>4gcGTC0EJ1ZdxJGlN12!JnQ9e_Y) zPkQpD1=9KfCEz~KV-86iN-@Mm)`sN3Wu*W>pC<=W@XqVLtP2^Bg@IMF_Djp;DO1oh zK(ITI_6@39fT+9+77V7DoO-hCy$TFqZ-s)_AdCUU{eV36Zw*saRr)iA2>9 zP))2tr%J^NhbWD5K11yHw5;y%7I6>`40B1*cEg4ZT*L3Z>JO)8>#UepRikDT>h1`5 zy_&tpz+mH0ehRv>Q6X5yPzvp;lm!8Oxdpwy7qa0953>(&Qr>SjW9QQuDeu^z>)5+8 zAR)O5n6=Qlbt(E4&w5Ws`TF`EJ}-ro7^v%k#+W9us2PWv-S~ElC^8HnCGbzqkj>Ck zXV1)9@6c7PWeWMS{?=nPy{7|kw8hmSQ}L_O^}qi5D(kNthcMHDPdg};gC=WQ4_@k; zgtz!7Dr5Ib2o@+=KttoqvnF4t(~vuc*gs56Eo{?&4Ze?hU!c$;bP3RtbEwWJ#zRQ{ zuZlI=Oy54c6AoTVU!cTT$bj%F|7rBK5V`gyARcC0N6v7mSqxDyt!;gNG!s-d3#Z!^hdM~sSLck9=X$`6;V=zUl z$y6d zs9>Xy-z=4s%rbByV7l(QQawtl1EP_@Y{a)?76YDh8nLQ@^F{`F!1(9XD3sgn-+#w= z!ad-@aD|Fv&i&?U{SaUqVo8Av`y$0bHf|ULl1jtb`aNg^QGmvAy70qy_W%_mIYIrW z_{Y~~I3&4G4+seG60m?j2uPaO=%@RnfKO)Kg#!MImdVU%)BY?yjAu5ilKOaAij2pf#5qA5b8s%> z4c#g`<0oB2UGHA{sPgWhM%JhC6k7i?pB5wgSZO+{6fodO02h?%Ja4^HmC$&b{(@*H z;7SWNd+JMK=78?W0{T~@bMP$VSKxE@4Fr$E;DO|odo}yr&itR@^nZ4&-uG6Hp}D&| z3|dKw@x`5v(zXqCEvaDC1N#L8@dZ@NjjQ0#jF0J&`Vm+ziL6*IFi+Dl==`GKD_apl z!*vY&FL6u2tq_e8<&uT(DRIL15UTM%976v%)?29eYx3L~BwYG&h0xfzA06aBt#xO% z1qp*1AFyLR#2NM>`i9w4XbjsL-eXcN#~>(YK8Cmvd$fX)XzR&z1Ah`4i#!A15RulC zfI(En6FCi4w;-Z7pgUXUFNCUv6)2a2`P6VG=e?2WAwK^jkkF5>SptrzL6?An3BYg5 z{B_yEK`xBiMkAvTb~heHka5$ANPwMR`%4BbUvG44<|fzxa1`1Cl2uUFD<=M^;$B>Y zoa^?Qi-mOC|2HAUPnI8@#Gvpq20_bY#u76W)a#BQl#3Q56!q%wv6Au-A(2u7E)0N^wl;lWz z|9i^IKKTD?%G(oH*;)@X&2VPL;7S`ok+y)MXs`qi*zM?K$P1jv!d~n^SnOXmyFx4E z_^^nj78auAT^@OCTdv$hZBPF5$;2ynIo%y~3chwtB=Zl8SC8zQCQP0sV8W3}t)0pA ziv9tuLLflXC#}vx&|Ts<$&ZZMU0N;;%b834qYobDMpi*_pI-`_7sc*nn~Y?aM<$~I zwst)RSMb%LLzGB}!>sB+fw4)NUwO6cBLyk@r7JL`d75z~&<3Aec2su_19W}hr?OK@ z?XmcpBPg7EvIkxHKfKzjo!ijSr~Fw?9BLDyjYYx@i;9XQ)L+u_mUdsu6r>iQ**tD6 zg=|S$oWP)lVk;p(Fp3k2BivY@hFnD@7Z(}mh9S6NwslRrFn+!49KwE}t*)`q6~!M1 z@Ew;f5AmoiqDZyi;d@n5vi0^RmV9>N@8}pl*l)7OmMv0S>;Pm!asRka3fJ`yMwupF z7Z8jvy{j~d6qg9e@74gIaRo(fO@!xV(j0Yjpv+IkxP$z6$(vgn>4McoD zRF;qe@Io@(>~N9!AM(C$B(zy-xiM0+SbvsXJJ?C<5Nx)sCtJ1M zjq=JXbg|ac)Vx^4BJ%~n1(uNjA0Ome=xQ4T&T}M^vcfcD4jY_HTWK(R63oF}HR;!p zNBY${XTj2NeVf?vR7=s898CfKo?Wd(RpFToRG$uRj?7WGf;HAj3BI?@a!H;DT-HA$?s+?e?l4#xz~!Ntoa%VW0t{CzEs`Ers2# zpy-}ql!*2fn@fO$-qb4LnK|?HvZ)GEEQI4h&kM0tp~9ap#@XNqY=huv%m14XcINJS z^q|j&o8~^*WEj-G~|5ji(5PU zPu3m-EW7va+>%m_n95?co7AcneU)2i)gk<(+GN`F(9+L6&lB}qrk@0~IxDxK@#DpY zTVHSZ@j_Dd6e|VSVIw&0u`0i;3MqM_@kR(~_G9$vXTKjkOG5gHh{v2RWf+*DO3q6X z6oGVrNxHQRCsFL0yN?E??|CJ;{xd9=i18{Z$rL_+F75GG2Hx53-526*ux)7uI#n3` zGFyOy0H4_oulQY1l|niC1mOGcH87ay%hr=&-10oIh&O$Oc6U8QV~#8rX}rk*=+uDB&zWOdLR3v5A_wO{8-~J(x(0m> zxFZc_*C1re|KfiXavhJ8HT8e!b?m)Z#W`F3>De#=`9~Pd;G%d_#m}XWh{uU4C0xkb&6BEnw{y`GA_>2{iHDo0O z8ldZG9E%Nu0Q4OYH5$9-_n1mjL?B$Ska!UY)R8N_530R>jIh#S^;jSqEAkOxeo?Q2 zM1H3XJX)xU%oh4DK+^hwsc!0JnZpnD9088dj-EpkNn3V_utzjPIRG*$tr#4;M@{Cr zdRV`~U^#go7GsTD|CVePG8Zu;5!jOTn7bKY;9;A$>j_5p>eMNaUX$W{&&*gDiQZ&m zgY&%GZXc)R!5A0c78)E3vrBTDrKnO>4l2d#5SbZ}vz(1I76vYO5h}U7M&q?uNPgwk zt#4iFz+7J6+MN1i8r;KvQ{SpdI`l~k2?^3hH6@)N{fn%9QegiCEVDaATCLg@_xQXK zkEe*^`<#p!@?dIhC-!;Z#4vr-pi56m7Zgb(Sw~}h?ic%VU*9@$V1G#HzqA{Lnm_pY z`07^o+;u;NRWgV>7FO$azko9fmry|pr|m#r6YlJAtsnf*d&jab=j$YC#yo>&$@rU6 z0p>m8K2zq6H;CF~ePyQ=$0D^B+Xh@OELyjNqdiVU#$Fj8iDiJAKu2n|^sE)$5rpg& zax>{QgsdhIU;69U{}+hQ2&~$ukeiD6FA;kp8Q<}+8MI#tl4G!b(vAoso#0NXgs3l2 z1%o;!lkn@IkaI&uO4};2Q|B_oL#u%M;;{H)bGHg@HQA|&$^quzYgucQu7Tdyd$>y# zt9W64uK5SmMX4A{t0%$;>0-?6g$t+Tn|-hBzJ`-zK|mp1YtQ!WG-UeYaj1ugRYB4i z%Ni$7#+H@WF)jK?v_nuY);infavx5ujcJ(zuP_c2&6vuV7VM7Zhg=jK>NX{%)ASBe z+K7g?;}=oVc}}aY7?RzBGxIX?#(V)>c$t5sR>{a9CmA^PpOBnH;=I7mOmHegknbD_ zmA=A20Scu2TT8kPTfZyk?BNUG!HrhRnDdrWydA+bfO5a|2!^ad=}?gTj%}Y$NDm9` z9w>%scr{7$%s^dQjsUjb9>>}~2n#}V zn%W7f8UOWPVeva#@y9(`brx1u8NI5sGUND2i=84a`C={9O*!ZgL3YMOHZ0%G9AIY0CB(7Y@5oJ?F(7DVfktr?>m3W{?ISzJm=c!ir?i<=sEoexL$Ym zQO81~j8oS~o{IHe#~b%l;#H2rnCStnb~KC`zk}N`I#=}#hiBBZd7`_3o810nze!k! zHyY2Z8g9SqlqZ<@%(@Fx#Q1-KH*R#U;{Meifgq~Hu~w+=;h_NfZ_Yhi9)0hgI<#I< z_*-eeoUW^V0oHME8t?m=4`_Q~UzA=v~ zoM$93PMFOUDb)u@G$br#gr1Oe7s^Zog+QN0QT$svvL<31Z-rdmf@FYD-~@Ukf=bma z-;;_6qC%`Yn2OF1y!tOF62+t8+?^_`Qj+Pda|3K*xHOqpm>uvQ*@O4>7bBESR4c}Rs*MQ&O zls*X^iHy#?lRS9ldV9p7g3d$vo1p}nqq6~lNzjZZq?-f@593xmg`U>l{=wuc1DAl3 zlS~Zh-$jrad~lX?=qcT3fzW#hY{P1r26iJSjzO|OWQ{dtTPN*S`8q3HEP8|@)|jL~ zxs6jqyqb*$>)j&Lyhq>iGuKc=|!23TjmX^e=nGvV08;dYIwx1^Dy3u><`xwBi$|icn}^o zk}yoE>NO52cqNIUBwZb{o3NeTuV(*1IvRG=OW^gpIoh72seOFyM18Wpq2W~EuTX4q z9)v{Q!EIhsyU?mH&^n*{T1{Da-4o-Hr{QhiW(2k_9IZRsm}LI@(J7LHXQVg{-MS}m znzLr>@OHi4P__*2Qao5YP*Br(T0=hMsJG+zm;dmzpen&%EE7-(zS)iiMkei4|MWSxV7ccaWr ztX=vrCHRhimI<6lJISI_ z=NyyexSnE2q2Fl2eV_Yc&R`8vMlPetftm_(C!k?iR7oCP5~`&0XsweO`DhfEni<#1 z&+_13m1zFE-MPz?7U)a4?35`Ix4|O>S%#q;8Z{maduX_;V*OM@!<&X{Y*kJgcm@f5?qMAGYY-P^W@aD( zsBI>t4mfy-zWY{dIyG{7dRSIuz)>rr{y)cd9{&qfq*fq zrPFm%NoI$BG!38&a{TsVY;{Q@N8bbnAz#f25B$FJi9%Bx9J~%HH+b`PIQB*&m}PL+ z^P_$XLq~t#Ws_3r*}vZ+X`u+fL7TY)YWgCVM(-gT3<2;8M>Kl1z^aw(Ga^CqQZ%99 zJT350x$vaIM}cJCtmcbbXbTz;2@ln8RWgFeoumyY1cKw_i2wwMJNhXA%(ezC=)!2} zHcp}s5SH)61U4SS0!KlkM-E0|J%O!hkRD@lro1$l7i~tas1A5|DM^;ZSV-qTjaMvo zsm*d&VVlz`ibuU3zAW-8g{_OV>B*^DXs5?6X1mzE%3JGVV+?&943d-|I2GBCHkl1) z5$BJj3%Q@s8SR&rY(9y^$Gb>~AxcufXV_s0ay;LRjNyhQ9+PY>n9K=Zn1aB+Of#!S ziS&`=l=e@>_@U=W)eq54e1=}7DAS1~o#n92VIrVFLU{2J;n}9 z=Q6F3peLs{A^}c>5g3z4&P@lOd&eKH%PZE!V0#Ue3ZratH#lXoPYYvF}AktHCzd zX?O|ZnT^?{96j?q4I42#R)gMs$ROxDKUylEI>1FsY$*^RQgm@~PN7w*gd>~~PTC~LU zM#w8gm_Svl1x`(o+IH9CR%g0~6?jC}a9yV5TA4PGvM%SkjP)$5 z5EQJ1OBwX6=`#I8Wb<~Z-iZ;cO8N`rofulM?T&I`_yZL{e4+po?P8+PIaD`$PuhMN ztGkw)KJxqne?k}bnkC6Gg0F7FS@k;;g*Bv6PYg{OSmEXxMC+r`I|2ZS# zAP#QAxr`+gwgPOW))Uo#jmBhzwF%+hPd(|31g08~#H7=w>SPCSNkkZ398b|GU}|tn zJ!H36fd6VK3#|Y<;E~{7!0$BNU8SP2Ss*LOl=Nv;0!pKQA1GI>L=Oq81yR~L-Uiyq z+{B-_wSGUjY!^`HH&L%GE^QU%x(sa4B;gh&vuVD(ix;1dC-V14jBx=e`}$fuf5BxJOMg21%|e`IPs z0(KYQ9`?^w8NILkx{~!pa?_@FHV04D{fu8XqGhwCx&=#+@WL?BqED9)znh_vbNoB* zD{#eDiDL+VPEdapo0u8$Gk0B)l$K4^)#fKaR&jgc`f-kO{n7`c>z4wkH;uV`<;rrY zRCYT}Hdxg>^VE|M4qIUVgyR{RXwCORZR2|p4y=Oy364~3$QfT{^^`m-m{O26Ra18u zGl+k)=B{0k24!Jsdc$=b3htVd<1P;Hj)LA~87)}4l$*ga=%9~_syw=j#jGVMd4r)K zb=wjR(RoY+KxVU=zhv#E+hyqKaT=G9a+n$4XaGz^$NN)m@j*z2+%TQDxKw9&L0C;w zG}6(=lbHsI8y8liiI;iF`H2DFwmAe&lC!e}FJh>_)bo6$domw;tSU{<3$7h5reLVy zJ8xogh6bLCPGEW;lX5$D7#bQT_7(;5$HbZ}l=_^mvj85Do*B?ILu>H37zA`1hOw{RxIxN7=o_*4zF97*NExwL6k;;Y zyVbk0Z3I~GcElezzG(@O%Czp07$jJ@92fUmlAZ9-N&A+NkjmCQ^H1^J_BO>xD z7IdX5l9s_z?d$jDA0?1e#kWm`v_xKdk*?RvCv;scsR9~!{w_P zW9?XvgOG9z0Rjn-jR^FE5~RVm-9IlzZ}O!}Bl#b;kmL+XjYqn!FpZG>@`+xiG3rsuewSKSw$0te4dTBYXgBHnQOCcO+8Qr zIU{$z3^r9Fns%4L=gNd0EyTMrFAaVk|MsrQAv{UYP<^;*md`dU%Na$EJ&mC-A%i=b zPi`QHB+RguP>IZz<@zse5@@<{M1$afgFYU@HE z<8;RDeuVXcaVyNHjkbARDqs)uu+zui)^tLW$xXra2d8=??(mY62?!X10O54Mnyj6P zRuTf`ew-dymTG7nO8zmOJUB_{y+Y(Qju^I872EWCtE>A*j`WAVNZahLudU4>SqKYM zvm{wCMZ!Q1AL>*TnlXEPB^c7lVT1=m2YrF{2(p>8N6@&0aG{jbVU2|$l|46_k$VM2xmzHQ{nkv=g~M`#T#ZHjc{>ZN*pg417( z=Tu*R0rTN3zpeHjfhz^D?BOvTKD%rxEj6X2gO|mBy&oI>$!+@+GHx!0c1FNwH}G5$ zNFbp?plnItU7YzldQY_V6PS)1&KiuRzeGU*Dk(_O-}V{C9{{AZBoZI3CE*E4`nR5t zm9?#(x~<_Qf4Yf_oO^ea*1Tm_>|64fZB?OLGlQA~HW5{UE->VsV28*XM&Zx7^Hnt1 z9A`NaMKF|PQLGrEtn-{!VPdlhF{OyS!1W4`K@JDQ;7D8Z6X_~6HUggDXF6Z-+ezoV z32gNVw2a9?#|!m1ZSd9QO|Fv#*3yqL@B*qbNktsTGGPow>9-a!Y`dG$Xw_(ECr}XL zC~vRPnc)2KkWfM8^O%j)6v_l72%c~M=;66WUcN0oN%g?*LBf)T54JUSv?<~NeDKLx zuAye3vJT(61E-66Gi}(SkX`DOuSj7*4Cx>UJp3~Cl9yZ@+P?tePjA!F*Z*QeT$ke$5*n_fBb(-1Rp2vb#6~AQ7#nC{v&B8NqtRQq z4={P#F;$b^EUSewHd6kPCaPLKN#08wy}Ty+N`sHt+sVJgG?XGu7!=Pw=^SI{T3l19Sv&J__|B8>&Id+_Zl5$G zB_QJ6z4Q&s%zUr;@0xD+^yw@02YY$>mG?YIy}WJpeco@oAM9DZ;;%&gH=8+s=o@T! zI3&Mt?byb#wR(B4Ux%LeR2VBM@(d7G`}pAg4=lID6SOCx`bMUSchQNCf}h_i$8I7g!4KlyfQ_X?2`4J5tLGaS z7^FOUB=8KtY4O3xJ*x_9YyY@f(&FbfqFOBI&}f(4C^#_eQPvZIxX;m1@B8=f=cPG6 z3BPx@x_h}4gWQWmeF+s+Rg0rXzeXRh`3fBz;SA^*Yy?3!W!+u`9BIKA}^ z41QZbT%IRBkzqRh;o)|3bMq@LEuFQs1J0u=tMpBZikA+gEJ7e4l2|`}`Xqes-o41w z)C~fHf@9ULKQcFO-5Ln2J1aLg;FxS^-=)9dl`laI=Vma|w35nC&@w^s0ue!@uF z<|L!U(N3xG0yW?%nAP6Z)%n9Kmsa$rmdI5uhB=xFCX}C_KP5kZDHdQ{DQSr`S)&@Q zd%m%;F|BA~ozhCYN#^o|`~&z4BR=~T{UvJK-~aT^O#I!p>El2BzxFRb@Y}oUUOqQ% R<7RpxHDyhuq#gTC{x_;7grWcd diff --git a/docs/articles/datasets.html b/docs/articles/datasets.html index 5d7605867..6b0d3dac9 100644 --- a/docs/articles/datasets.html +++ b/docs/articles/datasets.html @@ -5,32 +5,15 @@ - -Data sets for download / own use • AMR (for R) +Data sets for download / own use • AMR (for R) - - - - - - + + @@ -56,7 +39,7 @@ AMR (for R) - 1.4.0.9042 + 1.4.0.9044 @@ -1163,7 +1146,7 @@ If you are reading this page from within R, please -

Made with pkgdown 1.6.1, using preferably template.

+

Site built with pkgdown 1.6.1.

diff --git a/docs/articles/index.html b/docs/articles/index.html index 1ca61f0bc..b5e7b58cc 100644 --- a/docs/articles/index.html +++ b/docs/articles/index.html @@ -6,22 +6,6 @@ - - - - Articles • AMR (for R) @@ -36,21 +20,10 @@ + + - - - - - - - - - - - - - @@ -85,9 +58,6 @@ - - - -How to predict antimicrobial resistance • AMR (for R) +How to predict antimicrobial resistance • AMR (for R) - - - - - - + + @@ -56,7 +39,7 @@ AMR (for R) - 1.4.0.9042 + 1.4.0.9044 @@ -305,8 +288,7 @@ example_isolates %>% filter(mo_gramstain(mo, language = NULL) == "Gram-positive") %>% resistance_predict(col_ab = "VAN", year_min = 2010, info = FALSE, model = "binomial") %>% - ggplot_rsi_predict() -# NOTE: Using column 'date' as input for `col_date`. + ggplot_rsi_predict()

Vancomycin resistance could be 100% in ten years, but might also stay around 0%.

You can define the model with the model parameter. The model chosen above is a generalised linear regression model using a binomial distribution, assuming that a period of zero resistance was followed by a period of increasing resistance leading slowly to more and more resistance.

@@ -351,8 +333,7 @@ example_isolates %>% filter(mo_gramstain(mo, language = NULL) == "Gram-positive") %>% resistance_predict(col_ab = "VAN", year_min = 2010, info = FALSE, model = "linear") %>% - ggplot_rsi_predict() -# NOTE: Using column 'date' as input for `col_date`. + ggplot_rsi_predict()

This seems more likely, doesn’t it?

The model itself is also available from the object, as an attribute:

@@ -387,7 +368,7 @@
-

Made with pkgdown 1.6.1, using preferably template.

+

Site built with pkgdown 1.6.1.

diff --git a/docs/articles/welcome_to_AMR.html b/docs/articles/welcome_to_AMR.html index f87c91b9c..afd135717 100644 --- a/docs/articles/welcome_to_AMR.html +++ b/docs/articles/welcome_to_AMR.html @@ -5,32 +5,15 @@ - -Welcome to the AMR package • AMR (for R) +Welcome to the AMR package • AMR (for R) - - - - - - + + @@ -56,7 +39,7 @@ AMR (for R) - 1.4.0.9042 + 1.4.0.9044 @@ -266,7 +249,7 @@
-

Made with pkgdown 1.6.1, using preferably template.

+

Site built with pkgdown 1.6.1.

diff --git a/docs/authors.html b/docs/authors.html index 6b5a267d0..65f35e465 100644 --- a/docs/authors.html +++ b/docs/authors.html @@ -6,22 +6,6 @@ - - - - Citation and Authors • AMR (for R) @@ -36,21 +20,10 @@ + + - - - - - - - - - - - - - @@ -85,9 +58,6 @@ - - - -Antimicrobial Resistance Analysis • AMR (for R) +Antimicrobial Resistance Analysis • AMR (for R) - - - - - - + + @@ -60,7 +43,7 @@ AMR (for R) - 1.4.0.9043 + 1.4.0.9044 @@ -531,7 +514,7 @@ Since you are one of our users, we would like to know how you use the package an
-

Made with pkgdown 1.6.1, using preferably template.

+

Site built with pkgdown 1.6.1.

diff --git a/docs/news/index.html b/docs/news/index.html index 4220546bd..134fa8328 100644 --- a/docs/news/index.html +++ b/docs/news/index.html @@ -6,22 +6,6 @@ - - - - Changelog • AMR (for R) @@ -36,21 +20,10 @@ + + - - - - - - - - - - - - - @@ -85,9 +58,6 @@ - - - - - - Deprecated functions — AMR-deprecated • AMR (for R) @@ -36,21 +20,10 @@ + + - - - - - - - - - - - - - @@ -86,9 +59,6 @@ - - - - - - The AMR Package — AMR • AMR (for R) @@ -36,21 +20,10 @@ + + - - - - - - - - - - - - - @@ -86,9 +59,6 @@ - - - - - - WHOCC: WHO Collaborating Centre for Drug Statistics Methodology — WHOCC • AMR (for R) @@ -36,21 +20,10 @@ + + - - - - - - - - - - - - - @@ -86,9 +59,6 @@ - - - - - - Data set with 500 isolates - WHONET example — WHONET • AMR (for R) @@ -36,21 +20,10 @@ + + - - - - - - - - - - - - - @@ -86,9 +59,6 @@ - - - - - - Retrieve antimicrobial drug names and doses from clinical text — ab_from_text • AMR (for R) @@ -36,21 +20,10 @@ + + - - - - - - - - - - - - - @@ -86,9 +59,6 @@ - - - - - - Get properties of an antibiotic — ab_property • AMR (for R) @@ -36,21 +20,10 @@ + + - - - - - - - - - - - - - @@ -86,9 +59,6 @@ - - - - - - Age in years of individuals — age • AMR (for R) @@ -36,21 +20,10 @@ + + - - - - - - - - - - - - - @@ -86,9 +59,6 @@ - - - - - - Split ages into age groups — age_groups • AMR (for R) @@ -36,21 +20,10 @@ + + - - - - - - - - - - - - - @@ -86,9 +59,6 @@ - - - - - - Antibiotic class selectors — antibiotic_class_selectors • AMR (for R) @@ -36,21 +20,10 @@ + + - - - - - - - - - - - - - @@ -86,9 +59,6 @@ - - - - - - Data sets with 557 antimicrobials — antibiotics • AMR (for R) @@ -36,21 +20,10 @@ + + - - - - - - - - - - - - - @@ -86,9 +59,6 @@ - - - - - - Transform input to an antibiotic ID — as.ab • AMR (for R) @@ -36,21 +20,10 @@ + + - - - - - - - - - - - - - @@ -86,9 +59,6 @@ - - - - - - Transform input to disk diffusion diameters — as.disk • AMR (for R) @@ -36,21 +20,10 @@ + + - - - - - - - - - - - - - @@ -86,9 +59,6 @@ - - - - - - Transform input to minimum inhibitory concentrations (MIC) — as.mic • AMR (for R) @@ -36,21 +20,10 @@ + + - - - - - - - - - - - - - @@ -86,9 +59,6 @@ - - - - - - Transform input to a microorganism ID — as.mo • AMR (for R) @@ -36,21 +20,10 @@ + + - - - - - - - - - - - - - @@ -86,9 +59,6 @@ - - - - - - Interpret MIC and disk values, or clean raw R/SI data — as.rsi • AMR (for R) @@ -36,21 +20,10 @@ + + - - - - - - - - - - - - - @@ -86,9 +59,6 @@ - - - - - - Get ATC properties from WHOCC website — atc_online_property • AMR (for R) @@ -36,21 +20,10 @@ + + - - - - - - - - - - - - - @@ -86,9 +59,6 @@ - - - - - - Check availability of columns — availability • AMR (for R) @@ -36,21 +20,10 @@ + + - - - - - - - - - - - - - @@ -86,9 +59,6 @@ - - - - - - Determine bug-drug combinations — bug_drug_combinations • AMR (for R) @@ -36,21 +20,10 @@ + + - - - - - - - - - - - - - @@ -86,9 +59,6 @@ - - - - - - The Catalogue of Life — catalogue_of_life • AMR (for R) @@ -36,21 +20,10 @@ + + - - - - - - - - - - - - - @@ -86,9 +59,6 @@ - - - - - - Version info of included Catalogue of Life — catalogue_of_life_version • AMR (for R) @@ -36,21 +20,10 @@ + + - - - - - - - - - - - - - @@ -86,9 +59,6 @@ - - - - - - Count available isolates — count • AMR (for R) @@ -36,21 +20,10 @@ + + - - - - - - - - - - - - - @@ -87,9 +60,6 @@ count_resistant() should be used to count resistant isolates, count_susceptible( - - - - - - Apply EUCAST rules — eucast_rules • AMR (for R) @@ -36,21 +20,10 @@ + + - - - - - - - - - - - - - @@ -87,9 +60,6 @@ To improve the interpretation of the antibiogram before EUCAST rules are applied - - - - - - Data set with 2,000 example isolates — example_isolates • AMR (for R) @@ -36,21 +20,10 @@ + + - - - - - - - - - - - - - @@ -86,9 +59,6 @@ - - - - - - Data set with unclean data — example_isolates_unclean • AMR (for R) @@ -36,21 +20,10 @@ + + - - - - - - - - - - - - - @@ -86,9 +59,6 @@ - - - - - - Filter isolates on result in antimicrobial class — filter_ab_class • AMR (for R) @@ -36,21 +20,10 @@ + + - - - - - - - - - - - - - @@ -86,9 +59,6 @@ - - - - - - Determine first (weighted) isolates — first_isolate • AMR (for R) @@ -36,21 +20,10 @@ + + - - - - - - - - - - - - - @@ -86,9 +59,6 @@ - - - - - - G-test for Count Data — g.test • AMR (for R) @@ -36,21 +20,10 @@ + + - - - - - - - - - - - - - @@ -86,9 +59,6 @@ - - - - - - PCA biplot with ggplot2 — ggplot_pca • AMR (for R) @@ -36,21 +20,10 @@ + + - - - - - - - - - - - - - @@ -86,9 +59,6 @@ - - - - - - AMR plots with ggplot2 — ggplot_rsi • AMR (for R) @@ -36,21 +20,10 @@ + + - - - - - - - - - - - - - @@ -86,9 +59,6 @@ - - - - - - Guess antibiotic column — guess_ab_col • AMR (for R) @@ -36,21 +20,10 @@ + + - - - - - - - - - - - - - @@ -86,9 +59,6 @@ - - - - - - Function reference • AMR (for R) @@ -36,21 +20,10 @@ + + - - - - - - - - - - - - - @@ -85,9 +58,6 @@ - - - - - - Data set with bacterial intrinsic resistance — intrinsic_resistant • AMR (for R) @@ -36,21 +20,10 @@ + + - - - - - - - - - - - - - @@ -86,9 +59,6 @@ - - - - - - Determine (new) episodes for patients — is_new_episode • AMR (for R) @@ -36,21 +20,10 @@ + + - - - - - - - - - - - - - @@ -86,9 +59,6 @@ - - - - - - Join microorganisms to a data set — join • AMR (for R) @@ -36,21 +20,10 @@ + + - - - - - - - - - - - - - @@ -86,9 +59,6 @@ - - - - - - Key antibiotics for first weighted isolates — key_antibiotics • AMR (for R) @@ -36,21 +20,10 @@ + + - - - - - - - - - - - - - @@ -86,9 +59,6 @@ - - - - - - Kurtosis of the sample — kurtosis • AMR (for R) @@ -36,21 +20,10 @@ + + - - - - - - - - - - - - - @@ -86,9 +59,6 @@ - - - - - - Lifecycles of functions in the AMR package — lifecycle • AMR (for R) @@ -36,21 +20,10 @@ + + - - - - - - - - - - - - - @@ -88,9 +61,6 @@ This page contains a section for every lifecycle (with text borrowed from the af - - - - - - Pattern matching with keyboard shortcut — like • AMR (for R) @@ -36,21 +20,10 @@ + + - - - - - - - - - - - - - @@ -86,9 +59,6 @@ - - - - - - Determine multidrug-resistant organisms (MDRO) — mdro • AMR (for R) @@ -36,21 +20,10 @@ + + - - - - - - - - - - - - - @@ -86,9 +59,6 @@ - - - - - - Data set with 5,583 common microorganism codes — microorganisms.codes • AMR (for R) @@ -36,21 +20,10 @@ + + - - - - - - - - - - - - - @@ -86,9 +59,6 @@ - - - - - - Data set with 67,151 microorganisms — microorganisms • AMR (for R) @@ -36,21 +20,10 @@ + + - - - - - - - - - - - - - @@ -86,9 +59,6 @@ - - - - - - Data set with previously accepted taxonomic names — microorganisms.old • AMR (for R) @@ -36,21 +20,10 @@ + + - - - - - - - - - - - - - @@ -86,9 +59,6 @@ - - - - - - Calculate the matching score for microorganisms — mo_matching_score • AMR (for R) @@ -36,21 +20,10 @@ + + - - - - - - - - - - - - - @@ -86,9 +59,6 @@ - - - - - - Get properties of a microorganism — mo_property • AMR (for R) @@ -36,21 +20,10 @@ + + - - - - - - - - - - - - - @@ -86,9 +59,6 @@ - - - - - - User-defined reference data set for microorganisms — mo_source • AMR (for R) @@ -36,21 +20,10 @@ + + - - - - - - - - - - - - - @@ -76,8 +49,8 @@ - + @@ -87,9 +60,6 @@ This is the fastest way to have your organisation (or analysis) specific codes p - - - - - - Principal Component Analysis (for AMR) — pca • AMR (for R) @@ -36,21 +20,10 @@ + + - - - - - - - - - - - - - @@ -86,9 +59,6 @@ - - - - - - Plotting for classes rsi, mic and disk — plot • AMR (for R) @@ -36,21 +20,10 @@ + + - - - - - - - - - - - - - @@ -86,9 +59,6 @@ - - - - - - Calculate microbial resistance — proportion • AMR (for R) @@ -36,21 +20,10 @@ + + - - - - - - - - - - - - - @@ -87,9 +60,6 @@ resistance() should be used to calculate resistance, susceptibility() should be - - - - - - Random MIC values/disk zones/RSI generation — random • AMR (for R) @@ -36,21 +20,10 @@ + + - - - - - - - - - - - - - @@ -86,9 +59,6 @@ - - - - - - Predict antimicrobial resistance — resistance_predict • AMR (for R) @@ -36,21 +20,10 @@ + + - - - - - - - - - - - - - @@ -86,9 +59,6 @@ - - - - - - Data set for R/SI interpretation — rsi_translation • AMR (for R) @@ -36,21 +20,10 @@ + + - - - - - - - - - - - - - @@ -86,9 +59,6 @@ - - - - - - Skewness of the sample — skewness • AMR (for R) @@ -36,21 +20,10 @@ + + - - - - - - - - - - - - - @@ -87,9 +60,6 @@ When negative ('left-skewed'): the left tail is longer; the mass of the distribu - - - - - - Translate strings from AMR package — translate • AMR (for R) @@ -36,21 +20,10 @@ + + - - - - - - - - - - - - - @@ -86,9 +59,6 @@ - - - - - - Survey • AMR (for R) @@ -36,21 +20,10 @@ + + - - - - - - - - - - - - - @@ -85,9 +58,6 @@ - - -