From 693f64bdbf91a0ce9b6cce1ee686ee4bcb2abdc6 Mon Sep 17 00:00:00 2001 From: "Matthijs S. Berends" Date: Wed, 17 Oct 2018 17:32:34 +0200 Subject: [PATCH] new EUCAST rules: clinical breakpoints --- DESCRIPTION | 5 +- NAMESPACE | 7 + NEWS.md | 11 +- R/data.R | 3 +- R/eucast.R | 1104 ++++++++++++++++++++++++++++++--- R/mic.R | 7 +- R/rsi.R | 5 +- README.md | 37 +- data/septic_patients.rda | Bin 30709 -> 31152 bytes man/EUCAST.Rd | 47 +- man/MDRO.Rd | 8 +- man/as.mic.Rd | 2 +- man/as.rsi.Rd | 2 +- man/figures/rsi_example2.png | Bin 27922 -> 28227 bytes man/figures/rsi_example3.png | Bin 29021 -> 29394 bytes man/figures/rsi_example4.png | Bin 21029 -> 20985 bytes man/septic_patients.Rd | 2 +- tests/testthat/test-count.R | 10 +- tests/testthat/test-eucast.R | 66 +- tests/testthat/test-portion.R | 20 +- 20 files changed, 1165 insertions(+), 171 deletions(-) diff --git a/DESCRIPTION b/DESCRIPTION index fc37da37..ec73018b 100755 --- a/DESCRIPTION +++ b/DESCRIPTION @@ -1,6 +1,6 @@ Package: AMR -Version: 0.4.0.9003 -Date: 2018-10-16 +Version: 0.4.0.9004 +Date: 2018-10-17 Title: Antimicrobial Resistance Analysis Authors@R: c( person( @@ -47,6 +47,7 @@ Depends: Imports: backports, curl, + crayon (>= 1.3.0), data.table (>= 1.9.0), dplyr (>= 0.7.0), hms, diff --git a/NAMESPACE b/NAMESPACE index c99c60e9..42c2a039 100755 --- a/NAMESPACE +++ b/NAMESPACE @@ -161,6 +161,13 @@ exportMethods(skewness.default) exportMethods(skewness.matrix) exportMethods(summary.mic) exportMethods(summary.rsi) +importFrom(crayon,bgGreen) +importFrom(crayon,bgRed) +importFrom(crayon,bgYellow) +importFrom(crayon,black) +importFrom(crayon,blue) +importFrom(crayon,bold) +importFrom(crayon,green) importFrom(curl,nslookup) importFrom(data.table,as.data.table) importFrom(data.table,data.table) diff --git a/NEWS.md b/NEWS.md index 96148302..53fbf068 100755 --- a/NEWS.md +++ b/NEWS.md @@ -4,13 +4,21 @@ * Function `count_all` to get all available isolates (that like all `portion_*` and `count_*` functions also supports `summarise` and `group_by`), the old `n_rsi` is now an alias of `count_all` #### Changed +* Big changes to the `EUCAST_rules` function: + * It now also applies rules from the EUCAST 'Breakpoint tables for bacteria', version 8.1, 2018, http://www.eucast.org/clinical_breakpoints/ (see Source of the function) + * There's better error handling when rules cannot be applied (i.e. new values could not be inserted) + * A new `verbose` parameter can be set to `TRUE` to get very specific messages about which columns and rows were affected + * The amount of affected values will now only be measured once per row/column combination + * Data set `septic_patients` now reflects these changes * Added parameter `combine_IR` (TRUE/FALSE) to functions `portion_df` and `count_df`, to indicate that all values of I and R must be merged into one, so the output only consists of S vs. IR (susceptible vs. non-susceptible) * Fix for `portion_*(..., as_percent = TRUE)` when minimal amount of isolates would not be met * Using `portion_*` functions now throws a warning when total available isolate is below parameter `minimum` -* `as.mo` will not set package name as attribute anymore +* Functions `as.mo`, `as.rsi` and `as.mic` will not set package name as attribute anymore +* Data set `septic_patients` is now a `data.frame`, not a tibble anymore * Check for `hms::is.hms` in frequency tables * Removed diacritics from all authors (columns `microorganisms$ref` and `microorganisms.old$ref`) to comply with CRAN policy to only allow ASCII characters * Fix for `mo_property` not working properly +* Fix for `EUCAST_rules` where some Streptococci would become ceftazidime R in EUCAST rule 4.5 * Support for class `difftime` in frequency tables * Support for named vectors of class `mo`, useful for `top_freq()` * AI improvements for `as.mo`: @@ -22,6 +30,7 @@ * In `g.test`, when `sum(x)` is below 1000, suggest Fisher's Exact Test #### Other +* New dependency on package `crayon`, to support formatted text in the console * Updated vignettes to comply with README diff --git a/R/data.R b/R/data.R index da83228b..d919ffdb 100755 --- a/R/data.R +++ b/R/data.R @@ -186,7 +186,7 @@ #' Data set with 2000 blood culture isolates of septic patients #' #' An anonymised data set containing 2,000 microbial blood culture isolates with their full antibiograms found in septic patients in 4 different hospitals in the Netherlands, between 2001 and 2017. It is true, genuine data. This \code{data.frame} can be used to practice AMR analysis. For examples, press F1. -#' @format A \code{\link{tibble}} with 2,000 observations and 49 variables: +#' @format A \code{\link{data.frame}} with 2,000 observations and 49 variables: #' \describe{ #' \item{\code{date}}{date of receipt at the laboratory} #' \item{\code{hospital_id}}{ID of the hospital, from A to D} @@ -199,7 +199,6 @@ #' \item{\code{mo}}{ID of microorganism, see \code{\link{microorganisms}}} #' \item{\code{peni:rifa}}{40 different antibiotics with class \code{rsi} (see \code{\link{as.rsi}}); these column names occur in \code{\link{antibiotics}} data set and can be translated with \code{\link{abname}}} #' } -# source MOLIS (LIS of Certe) - \url{https://www.certe.nl} #' @examples #' # ----------- # #' # PREPARATION # diff --git a/R/eucast.R b/R/eucast.R index 69a7cf8a..3409b7fc 100755 --- a/R/eucast.R +++ b/R/eucast.R @@ -16,19 +16,20 @@ # GNU General Public License for more details. # # ==================================================================== # -#' EUCAST expert rules +#' EUCAST rules #' -#' Apply expert rules (like intrinsic resistance), as defined by the European Committee on Antimicrobial Susceptibility Testing (EUCAST, \url{http://eucast.org}), see \emph{Source}. +#' Apply susceptibility rules as defined by the European Committee on Antimicrobial Susceptibility Testing (EUCAST, \url{http://eucast.org}), see \emph{Source}. This includes (1) expert rules, (2) intrinsic resistance and (3) inferred resistance as defined in their breakpoint tables. #' @param tbl table with antibiotic columns, like e.g. \code{amox} and \code{amcl} #' @param col_mo column name of the microbial ID in \code{tbl} - values in this column should be present in \code{microorganisms$mo}, see \code{\link{microorganisms}} #' @param info print progress -#' @param amcl,amik,amox,ampi,azit,azlo,aztr,cefa,cfep,cfot,cfox,cfra,cfta,cftr,cfur,chlo,cipr,clar,clin,clox,coli,czol,dapt,doxy,erta,eryt,fosf,fusi,gent,imip,kana,levo,linc,line,mero,mezl,mino,moxi,nali,neom,neti,nitr,norf,novo,oflo,peni,pita,poly,pris,qida,rifa,roxi,siso,teic,tetr,tica,tige,tobr,trim,trsu,vanc column name of an antibiotic. Use \code{NA} to skip a column, like \code{tica = NA}. Non-existing columns will anyway be skipped. See the Antibiotics section for an explanation of the abbreviations. +#' @param amcl,amik,amox,ampi,azit,azlo,aztr,cefa,cfep,cfot,cfox,cfra,cfta,cftr,cfur,chlo,cipr,clar,clin,clox,coli,czol,dapt,doxy,erta,eryt,fosf,fusi,gent,imip,kana,levo,linc,line,mero,mezl,mino,moxi,nali,neom,neti,nitr,norf,novo,oflo,oxac,peni,pita,poly,pris,qida,rifa,roxi,siso,teic,tetr,tica,tige,tobr,trim,trsu,vanc column name of an antibiotic. Use \code{NA} to skip a column, like \code{tica = NA}. Non-existing columns will anyway be skipped. See the Antibiotics section for an explanation of the abbreviations. #' @param col_bactid Deprecated. Use \code{col_mo} instead. +#' @param verbose a logical to indicate whether extensive info should be printed to the console about which rows and columns are effected with their old and new values #' @param ... parameters that are passed on to \code{EUCAST_rules} #' @section Antibiotics: #' Abbrevations of the column containing antibiotics: #' -#' \strong{amcl}: amoxicillin and beta-lactamase inhibitor (\emph{J01CR02}), +#' \strong{amcl}: amoxicillin+clavulanic acid (\emph{J01CR02}), #' \strong{amik}: amikacin (\emph{J01GB06}), #' \strong{amox}: amoxicillin (\emph{J01CA04}), #' \strong{ampi}: ampicillin (\emph{J01CA01}), @@ -57,7 +58,7 @@ #' \strong{fosf}: fosfomycin (\emph{J01XX01}), #' \strong{fusi}: fusidic acid (\emph{J01XC01}), #' \strong{gent}: gentamicin (\emph{J01GB03}), -#' \strong{imip}: imipenem and cilastatin (\emph{J01DH51}), +#' \strong{imip}: imipenem (\emph{J01DH51}), #' \strong{kana}: kanamycin (\emph{J01GB04}), #' \strong{levo}: levofloxacin (\emph{J01MA12}), #' \strong{linc}: lincomycin (\emph{J01FF02}), @@ -73,8 +74,8 @@ #' \strong{norf}: norfloxacin (\emph{J01MA06}), #' \strong{novo}: novobiocin (an ATCvet code: \emph{QJ01XX95}), #' \strong{oflo}: ofloxacin (\emph{J01MA01}), -#' \strong{peni}: penicillins, combinations with other antibacterials (\emph{J01RA01}), -#' \strong{pita}: piperacillin and beta-lactamase inhibitor (\emph{J01CR05}), +#' \strong{peni}: penicillin (\emph{J01RA01}), +#' \strong{pita}: piperacillin+tazobactam (\emph{J01CR05}), #' \strong{poly}: polymyxin B (\emph{J01XB02}), #' \strong{pris}: pristinamycin (\emph{J01FG01}), #' \strong{qida}: quinupristin/dalfopristin (\emph{J01FG02}), @@ -92,15 +93,25 @@ #' @keywords interpretive eucast reading resistance #' @rdname EUCAST #' @export -#' @importFrom dplyr %>% left_join select +#' @importFrom dplyr %>% select pull +#' @importFrom crayon bold bgGreen bgYellow bgRed black green blue #' @return table with edited variables of antibiotics. #' @source -#' EUCAST Expert Rules Version 2.0: \cr -#' Leclercq et al. \strong{EUCAST expert rules in antimicrobial susceptibility testing.} \emph{Clin Microbiol Infect.} 2013;19(2):141-60. \cr -#' \url{https://doi.org/10.1111/j.1469-0691.2011.03703.x} \cr -#' \cr -#' EUCAST Expert Rules Version 3.1 (Intrinsic Resistance and Exceptional Phenotypes Tables): \cr -#' \url{http://www.eucast.org/fileadmin/src/media/PDFs/EUCAST_files/Expert_Rules/Expert_rules_intrinsic_exceptional_V3.1.pdf} +#' \itemize{ +#' \item{ +#' EUCAST Expert Rules. Version 2.0, 2012. \cr +#' Leclercq et al. \strong{EUCAST expert rules in antimicrobial susceptibility testing.} \emph{Clin Microbiol Infect.} 2013;19(2):141-60. \cr +#' \url{https://doi.org/10.1111/j.1469-0691.2011.03703.x} +#' } +#' \item{ +#' EUCAST Expert Rules, Intrinsic Resistance and Exceptional Phenotypes Tables. Version 3.1, 2016. \cr +#' \url{http://www.eucast.org/fileadmin/src/media/PDFs/EUCAST_files/Expert_Rules/Expert_rules_intrinsic_exceptional_V3.1.pdf} +#' } +#' \item{ +#' EUCAST Breakpoint tables for interpretation of MICs and zone diameters. Version 8.1, 2018. \cr +#' \url{http://www.eucast.org/fileadmin/src/media/PDFs/EUCAST_files/Breakpoint_tables/v_8.1_Breakpoint_Tables.xlsx} +#' } +#' } #' @examples #' a <- EUCAST_rules(septic_patients) #' @@ -167,6 +178,7 @@ EUCAST_rules <- function(tbl, norf = 'norf', novo = 'novo', oflo = 'oflo', + oxac = 'oxac', peni = 'peni', pita = 'pita', poly = 'poly', @@ -183,9 +195,11 @@ EUCAST_rules <- function(tbl, trim = 'trim', trsu = 'trsu', vanc = 'vanc', - col_bactid = 'bactid') { + col_bactid = 'bactid', + verbose = FALSE) { - EUCAST_VERSION <- "3.1" + EUCAST_VERSION_BREAKPOINTS <- "8.1, 2018" + EUCAST_VERSION_EXPERT_RULES <- "3.1, 2016" if (col_bactid %in% colnames(tbl)) { col_mo <- col_bactid @@ -195,12 +209,32 @@ EUCAST_rules <- function(tbl, stop('Column ', col_mo, ' not found.', call. = FALSE) } + warned <- FALSE + changed_results <- 0 + + txt_error <- function() { cat("", bgRed(black(" ERROR ")), "\n") } + txt_warning <- function() { if (warned == FALSE) { cat("", bgYellow(black(" WARNING ")), "\n") }; warned <<- TRUE } + txt_ok <- function() { + if (warned == FALSE) { + if (changed_results > 0) { + if (changed_results == 1) { + cat(blue(" (1 change)\n")) + } else { + cat(blue(paste0(" (", changed_results, " changes)\n"))) + } + } else { + cat(green(" (no changes)\n")) + } + warned <<- FALSE + } + } + # check columns col.list <- c(amcl, amik, amox, ampi, azit, azlo, aztr, cefa, cfra, cfep, cfot, cfox, cfta, cftr, cfur, chlo, cipr, clar, clin, clox, coli, czol, dapt, doxy, erta, eryt, fosf, fusi, gent, imip, kana, levo, linc, line, mero, mezl, mino, moxi, nali, neom, neti, nitr, - novo, norf, oflo, peni, pita, poly, pris, qida, rifa, roxi, siso, + novo, norf, oflo, oxac, peni, pita, poly, pris, qida, rifa, roxi, siso, teic, tetr, tica, tige, tobr, trim, trsu, vanc) col.list <- check_available_columns(tbl = tbl, col.list = col.list, info = info) amcl <- col.list[amcl] @@ -248,6 +282,7 @@ EUCAST_rules <- function(tbl, norf <- col.list[norf] novo <- col.list[novo] oflo <- col.list[oflo] + oxac <- col.list[oxac] peni <- col.list[peni] pita <- col.list[pita] poly <- col.list[poly] @@ -265,18 +300,52 @@ EUCAST_rules <- function(tbl, trsu <- col.list[trsu] vanc <- col.list[vanc] - total <- 0 - total_rows <- integer(0) + amount_changed <- 0 + amount_affected_rows <- integer(0) + verbose_info <- "" # helper function for editing the table - edit_rsi <- function(to, rows, cols, EUCAST_rule = "") { - # later: use this as attribute for the edited observations - EUCAST_rule <- trimws(paste("EUCAST rule", EUCAST_rule)) + edit_rsi <- function(to, rule, rows, cols) { cols <- cols[!is.na(cols)] if (length(rows) > 0 & length(cols) > 0) { - tbl[rows, cols] <<- to - total <<- total + (length(rows) * length(cols)) - total_rows <<- c(total_rows, rows) + before <- as.character(unlist(as.list(tbl_original[rows, cols]))) + tryCatch( + # insert into original table + tbl_original[rows, cols] <<- to, + warning = function(w) { + if (w$message %like% 'invalid factor level') { + warning('Value "', to, '" could not be applied to column(s) `', paste(cols, collapse = '`, `'), '` because this value is not an existing factor level.', call. = FALSE) + } else { + warning(w$message, call. = FALSE) + } + txt_warning() + }, + error = function(e) { + txt_error() + stop(e, call. = FALSE) + } + ) + after <- as.character(unlist(as.list(tbl_original[rows, cols]))) + amount_changed <<- amount_changed + sum(before != after, na.rm = TRUE) + amount_affected_rows <<- unique(c(amount_affected_rows, rows)) + changed_results <<- changed_results + sum(before != after, na.rm = TRUE) # will be reset at start of every rule + + if (verbose == TRUE) { + verbose_info <<- paste0(verbose_info, + "\n\nRule Type: ", rule[1], + "\nRule Set: ", rule[2], + "\nEffect: Forced '", to, "' (", + "actually changed ", sum(before != after, na.rm = TRUE), + "): cols '", paste(cols, collapse = "', '"), + "' of rows ", paste(rows, collapse = ", ")) + } + } + } + na.rm <- function(col) { + if (is.na(col)) { + "" + } else { + col } } @@ -286,7 +355,8 @@ EUCAST_rules <- function(tbl, col_mo_original <- tbl %>% pull(col_mo) tbl[, col_mo] <- as.mo(tbl[, col_mo]) } - tbl <- tbl %>% left_join_microorganisms(by = col_mo, suffix = c("_tempmicroorganisms", "")) + tbl_original <- tbl + tbl <- tbl %>% left_join_microorganisms(by = col_mo, suffix = c("_oldcols", "")) # antibiotic classes aminoglycosides <- c(tobr, gent, kana, neom, neti, siso) @@ -300,93 +370,815 @@ EUCAST_rules <- function(tbl, aminopenicillins <- c(ampi, amox) ureidopenicillins <- c(pita, azlo, mezl) fluoroquinolones <- c(oflo, cipr, norf, levo, moxi) + all_betalactam <- c(aminopenicillins, ureidopenicillins, cephalosporins, carbapenems, amcl, oxac, clox, peni) if (info == TRUE) { - cat( - paste0( - '\nApplying rules to ', - tbl[!is.na(tbl$genus),] %>% nrow() %>% format(big.mark = ","), - ' rows according to "EUCAST Expert Rules Version ', EUCAST_VERSION, '"\n') - ) + cat("Rules by the European Committee on Antimicrobial Susceptibility Testing (EUCAST)\n") } + # since ampicillin ^= amoxicillin, get the first from the latter + if (!is.na(ampi) & !is.na(amox)) { + rule_group <- "Ampicillin susceptibility" + rule <- "Get ampicillin results from amoxicillin where ampicillin is missing" + edit_rsi(to = 'S', + rule = c(rule_group, rule), + rows = which(tbl[, amox] == 'S' & !tbl[, ampi] %in% c("S", "I", "R")), + cols = ampi) + edit_rsi(to = 'I', + rule = c(rule_group, rule), + rows = which(tbl[, amox] == 'I' & !tbl[, ampi] %in% c("S", "I", "R")), + cols = ampi) + edit_rsi(to = 'R', + rule = c(rule_group, rule), + rows = which(tbl[, amox] == 'R' & !tbl[, ampi] %in% c("S", "I", "R")), + cols = ampi) + } + + # BREAKPOINTS ------------------------------------------------------------- + + if (info == TRUE) { + cat(bold(paste0('\nEUCAST Clinical Breakpoints (v', EUCAST_VERSION_BREAKPOINTS, ')\n'))) + } + rule_group <- "Breakpoints" + + # Enterobacteriales (Order) ---- + rule <- 'Enterobacteriales (Order)' + if (info == TRUE) { + warned <- FALSE + changed_results <- 0 + cat(rule) + } + + if (!is.na(ampi)) { + edit_rsi(to = 'S', + rule = c(rule_group, rule), + rows = which(tbl$order == 'Enterobacteriales' + & tbl[, ampi] == 'S'), + cols = amox) + } + if (!is.na(ampi)) { + edit_rsi(to = 'I', + rule = c(rule_group, rule), + rows = which(tbl$order == 'Enterobacteriales' + & tbl[, ampi] == 'I'), + cols = amox) + } + if (!is.na(ampi)) { + edit_rsi(to = 'R', + rule = c(rule_group, rule), + rows = which(tbl$order == 'Enterobacteriales' + & tbl[, ampi] == 'R'), + cols = amox) + } + if (info == TRUE) { + txt_ok() + } + # Staphylococcus ---- + rule <- 'Staphylococcus' + if (info == TRUE) { + warned <- FALSE + changed_results <- 0 + cat(rule) + } + if (!is.na(peni) & !is.na(cfox)) { + edit_rsi(to = 'S', + rule = c(rule_group, rule), + rows = which(tbl$genus == "Staphylococcus" + & tbl[, peni] == 'S' + & tbl[, cfox] == 'S'), + cols = c(ampi, amox, pita, tica)) + edit_rsi(to = 'S', + rule = c(rule_group, rule), + rows = which(tbl$genus == "Staphylococcus" + & tbl[, peni] == 'R' + & tbl[, cfox] == 'S'), + cols = c(oxac, clox)) + } + if (!is.na(cfox)) { + edit_rsi(to = 'R', + rule = c(rule_group, rule), + rows = which(tbl$genus == "Staphylococcus" + & tbl[, cfox] == 'R'), + cols = all_betalactam) + } + if (!is.na(ampi)) { + edit_rsi(to = 'S', + rule = c(rule_group, rule), + rows = which(tbl$fullname %like% "^Staphylococcus saprophyticus" + & tbl[, ampi] == 'S'), + cols = c(ampi, amox, amcl, pita)) + } + if (!is.na(cfox)) { + # inferred from cefoxitin + edit_rsi(to = 'S', + rule = c(rule_group, rule), + rows = which(tbl$genus == "Staphylococcus" + & tbl[, cfox] == 'S'), + cols = c(carbapenems, cephalosporins[cephalosporins != na.rm(cfta)])) + edit_rsi(to = 'I', + rule = c(rule_group, rule), + rows = which(tbl$genus == "Staphylococcus" + & tbl[, cfox] == 'I'), + cols = c(carbapenems, cephalosporins[cephalosporins != na.rm(cfta)])) + edit_rsi(to = 'R', + rule = c(rule_group, rule), + rows = which(tbl$genus == "Staphylococcus" + & tbl[, cfox] == 'R'), + cols = c(carbapenems, cephalosporins[cephalosporins != na.rm(cfta)])) + } + if (!is.na(norf)) { + edit_rsi(to = 'S', + rule = c(rule_group, rule), + rows = which(tbl$genus == "Staphylococcus" + & tbl[, norf] == 'S'), + cols = c(cipr, levo, moxi, oflo)) + } + if (!is.na(eryt)) { + edit_rsi(to = 'S', + rule = c(rule_group, rule), + rows = which(tbl$genus == "Staphylococcus" + & tbl[, eryt] == 'S'), + cols = c(azit, clar, roxi)) + edit_rsi(to = 'I', + rule = c(rule_group, rule), + rows = which(tbl$genus == "Staphylococcus" + & tbl[, eryt] == 'I'), + cols = c(azit, clar, roxi)) + edit_rsi(to = 'R', + rule = c(rule_group, rule), + rows = which(tbl$genus == "Staphylococcus" + & tbl[, eryt] == 'R'), + cols = c(azit, clar, roxi)) + } + if (!is.na(tetr)) { + edit_rsi(to = 'S', + rule = c(rule_group, rule), + rows = which(tbl$genus == "Staphylococcus" + & tbl[, tetr] == 'S'), + cols = c(doxy, mino)) + } + if (info == TRUE) { + txt_ok() + } + # Enterococcus ---- + rule <- 'Enterococcus' + if (info == TRUE) { + warned <- FALSE + changed_results <- 0 + cat(rule) + } + if (!is.na(peni)) { + edit_rsi(to = 'R', + rule = c(rule_group, rule), + rows = which(tbl$fullname %like% "^Enterococcus faecium" + & tbl[, peni] == 'R'), + cols = all_betalactam) + } + if (!is.na(ampi)) { + edit_rsi(to = 'S', + rule = c(rule_group, rule), + rows = which(tbl$genus == "Enterococcus" + & tbl[, ampi] == 'S'), + cols = c(amox, amcl, pita)) + edit_rsi(to = 'I', + rule = c(rule_group, rule), + rows = which(tbl$genus == "Enterococcus" + & tbl[, ampi] == 'I'), + cols = c(amox, amcl, pita)) + edit_rsi(to = 'R', + rule = c(rule_group, rule), + rows = which(tbl$genus == "Enterococcus" + & tbl[, ampi] == 'R'), + cols = c(amox, amcl, pita)) + } + if (!is.na(norf)) { + edit_rsi(to = 'S', + rule = c(rule_group, rule), + rows = which(tbl$genus == "Enterococcus" + & tbl[, norf] == 'S'), + cols = c(cipr, levo)) + edit_rsi(to = 'I', + rule = c(rule_group, rule), + rows = which(tbl$genus == "Enterococcus" + & tbl[, norf] == 'I'), + cols = c(cipr, levo)) + edit_rsi(to = 'R', + rule = c(rule_group, rule), + rows = which(tbl$genus == "Enterococcus" + & tbl[, norf] == 'R'), + cols = c(cipr, levo)) + } + if (info == TRUE) { + txt_ok() + } + # Streptococcus A, B, C, G---- + rule <- 'Streptococcus A, B, C, G' + if (info == TRUE) { + warned <- FALSE + changed_results <- 0 + cat(rule) + } + if (!is.na(peni)) { + edit_rsi(to = 'S', + rule = c(rule_group, rule), + rows = which(tbl$fullname %like% "^Streptococcus (pyogenes|agalactiae|dysgalactiae|group A|group B|group C|group G)" + & tbl[, peni] == 'S'), + cols = c(aminopenicillins, ureidopenicillins, cephalosporins, carbapenems, clox, amcl)) + edit_rsi(to = 'I', + rule = c(rule_group, rule), + rows = which(tbl$fullname %like% "^Streptococcus (pyogenes|agalactiae|dysgalactiae|group A|group B|group C|group G)" + & tbl[, peni] == 'I'), + cols = c(aminopenicillins, ureidopenicillins, cephalosporins, carbapenems, clox, amcl)) + edit_rsi(to = 'R', + rule = c(rule_group, rule), + rows = which(tbl$fullname %like% "^Streptococcus (pyogenes|agalactiae|dysgalactiae|group A|group B|group C|group G)" + & tbl[, peni] == 'R'), + cols = c(aminopenicillins, ureidopenicillins, cephalosporins, carbapenems, clox, amcl)) + } + if (!is.na(norf)) { + edit_rsi(to = 'S', + rule = c(rule_group, rule), + rows = which(tbl$fullname %like% "^Streptococcus (pyogenes|agalactiae|dysgalactiae|group A|group B|group C|group G)" + & tbl[, norf] == 'S'), + cols = c(levo, moxi)) + } + if (!is.na(eryt)) { + edit_rsi(to = 'S', + rule = c(rule_group, rule), + rows = which(tbl$fullname %like% "^Streptococcus (pyogenes|agalactiae|dysgalactiae|group A|group B|group C|group G)" + & tbl[, eryt] == 'S'), + cols = c(azit, clar, roxi)) + edit_rsi(to = 'I', + rule = c(rule_group, rule), + rows = which(tbl$fullname %like% "^Streptococcus (pyogenes|agalactiae|dysgalactiae|group A|group B|group C|group G)" + & tbl[, eryt] == 'I'), + cols = c(azit, clar, roxi)) + edit_rsi(to = 'R', + rule = c(rule_group, rule), + rows = which(tbl$fullname %like% "^Streptococcus (pyogenes|agalactiae|dysgalactiae|group A|group B|group C|group G)" + & tbl[, eryt] == 'R'), + cols = c(azit, clar, roxi)) + } + if (!is.na(tetr)) { + edit_rsi(to = 'S', + rule = c(rule_group, rule), + rows = which(tbl$fullname %like% "^Streptococcus (pyogenes|agalactiae|dysgalactiae|group A|group B|group C|group G)" + & tbl[, tetr] == 'S'), + cols = c(doxy, mino)) + } + if (info == TRUE) { + txt_ok() + } + # Streptococcus pneumoniae ---- + rule <- 'Streptococcus pneumoniae' + if (info == TRUE) { + warned <- FALSE + changed_results <- 0 + cat(rule) + } + if (!is.na(peni)) { + edit_rsi(to = 'S', + rule = c(rule_group, rule), + rows = which(tbl$fullname %like% "^Streptococcus pneumoniae" + & tbl[, peni] == 'S'), + cols = c(ampi, amox, amcl, pita)) + } + if (!is.na(ampi)) { + edit_rsi(to = 'S', + rule = c(rule_group, rule), + rows = which(tbl$fullname %like% "^Streptococcus pneumoniae" + & tbl[, ampi] == 'S'), + cols = c(ampi, amox, amcl, pita)) + edit_rsi(to = 'I', + rule = c(rule_group, rule), + rows = which(tbl$fullname %like% "^Streptococcus pneumoniae" + & tbl[, ampi] == 'I'), + cols = c(ampi, amox, amcl, pita)) + edit_rsi(to = 'R', + rule = c(rule_group, rule), + rows = which(tbl$fullname %like% "^Streptococcus pneumoniae" + & tbl[, ampi] == 'R'), + cols = c(ampi, amox, amcl, pita)) + } + if (!is.na(norf)) { + edit_rsi(to = 'S', + rule = c(rule_group, rule), + rows = which(tbl$fullname %like% "^Streptococcus pneumoniae" + & tbl[, norf] == 'S'), + cols = c(levo, moxi)) + } + if (!is.na(eryt)) { + edit_rsi(to = 'S', + rule = c(rule_group, rule), + rows = which(tbl$fullname %like% "^Streptococcus pneumoniae" + & tbl[, eryt] == 'S'), + cols = c(azit, clar, roxi)) + edit_rsi(to = 'I', + rule = c(rule_group, rule), + rows = which(tbl$fullname %like% "^Streptococcus pneumoniae" + & tbl[, eryt] == 'I'), + cols = c(azit, clar, roxi)) + edit_rsi(to = 'R', + rule = c(rule_group, rule), + rows = which(tbl$fullname %like% "^Streptococcus pneumoniae" + & tbl[, eryt] == 'R'), + cols = c(azit, clar, roxi)) + } + if (!is.na(tetr)) { + edit_rsi(to = 'S', + rule = c(rule_group, rule), + rows = which(tbl$fullname %like% "^Streptococcus pneumoniae" + & tbl[, tetr] == 'S'), + cols = c(doxy, mino)) + } + if (info == TRUE) { + txt_ok() + } + # Viridans group streptococci ---- + rule <- 'Viridans group streptococci' + if (info == TRUE) { + warned <- FALSE + changed_results <- 0 + cat(rule) + } + viridans_group <- c("anginosus", "australis", "bovis", "constellatus", "cristatus", + "equinus", "gallolyticus", "gordonii", "infantarius", "infantis", + "intermedius", "mitis", "mutans", "oligofermentans", "oralis", + "parasanguinis", "peroris", "pseudopneumoniae", "salivarius", + "sanguinis", "sinensis", "sobrinus", "thermophilus", "vestibularis") + if (!is.na(ampi)) { + edit_rsi(to = 'S', + rule = c(rule_group, rule), + rows = which(tbl$genus == "Streptococcus" & tbl$species %in% viridans_group + & tbl[, ampi] == 'S'), + cols = c(ampi, amox, amcl, pita)) + edit_rsi(to = 'I', + rule = c(rule_group, rule), + rows = which(tbl$genus == "Streptococcus" & tbl$species %in% viridans_group + & tbl[, ampi] == 'I'), + cols = c(ampi, amox, amcl, pita)) + edit_rsi(to = 'R', + rule = c(rule_group, rule), + rows = which(tbl$genus == "Streptococcus" & tbl$species %in% viridans_group + & tbl[, ampi] == 'R'), + cols = c(ampi, amox, amcl, pita)) + } + if (info == TRUE) { + txt_ok() + } + # Haemophilus influenzae ---- + rule <- 'Haemophilus influenzae' + if (info == TRUE) { + warned <- FALSE + changed_results <- 0 + cat(rule) + } + if (!is.na(ampi)) { + edit_rsi(to = 'S', + rule = c(rule_group, rule), + rows = which(tbl$fullname %like% "^Haemophilus influenzae" + & tbl[, ampi] == 'S'), + cols = c(amox, pita)) + edit_rsi(to = 'I', + rule = c(rule_group, rule), + rows = which(tbl$fullname %like% "^Haemophilus influenzae" + & tbl[, ampi] == 'I'), + cols = c(amox, pita)) + edit_rsi(to = 'R', + rule = c(rule_group, rule), + rows = which(tbl$fullname %like% "^Haemophilus influenzae" + & tbl[, ampi] == 'R'), + cols = c(amox, pita)) + } + if (!is.na(amcl)) { + edit_rsi(to = 'S', + rule = c(rule_group, rule), + rows = which(tbl$fullname %like% "^Haemophilus influenzae" + & tbl[, amcl] == 'S'), + cols = pita) + edit_rsi(to = 'I', + rule = c(rule_group, rule), + rows = which(tbl$fullname %like% "^Haemophilus influenzae" + & tbl[, amcl] == 'I'), + cols = pita) + edit_rsi(to = 'R', + rule = c(rule_group, rule), + rows = which(tbl$fullname %like% "^Haemophilus influenzae" + & tbl[, amcl] == 'R'), + cols = pita) + } + if (!is.na(nali)) { + edit_rsi(to = 'S', + rule = c(rule_group, rule), + rows = which(tbl$fullname %like% "^Haemophilus influenzae" + & tbl[, nali] == 'S'), + cols = c(cipr, levo, moxi, oflo)) + } + if (!is.na(tetr)) { + edit_rsi(to = 'S', + rule = c(rule_group, rule), + rows = which(tbl$fullname %like% "^Haemophilus influenzae" + & tbl[, tetr] == 'S'), + cols = c(doxy, mino)) + } + if (info == TRUE) { + txt_ok() + } + # Moraxella catarrhalis ---- + rule <- 'Moraxella catarrhalis' + if (info == TRUE) { + warned <- FALSE + changed_results <- 0 + cat(rule) + } + if (!is.na(amcl)) { + edit_rsi(to = 'S', + rule = c(rule_group, rule), + rows = which(tbl$fullname %like% "^Moraxella catarrhalis" + & tbl[, amcl] == 'S'), + cols = pita) + edit_rsi(to = 'I', + rule = c(rule_group, rule), + rows = which(tbl$fullname %like% "^Moraxella catarrhalis" + & tbl[, amcl] == 'I'), + cols = pita) + edit_rsi(to = 'R', + rule = c(rule_group, rule), + rows = which(tbl$fullname %like% "^Moraxella catarrhalis" + & tbl[, amcl] == 'R'), + cols = pita) + } + if (!is.na(nali)) { + edit_rsi(to = 'S', + rule = c(rule_group, rule), + rows = which(tbl$fullname %like% "^Moraxella catarrhalis" + & tbl[, nali] == 'S'), + cols = c(cipr, levo, moxi, oflo)) + } + if (!is.na(eryt)) { + edit_rsi(to = 'S', + rule = c(rule_group, rule), + rows = which(tbl$fullname %like% "^Moraxella catarrhalis" + & tbl[, eryt] == 'S'), + cols = c(azit, clar, roxi)) + edit_rsi(to = 'I', + rule = c(rule_group, rule), + rows = which(tbl$fullname %like% "^Moraxella catarrhalis" + & tbl[, eryt] == 'I'), + cols = c(azit, clar, roxi)) + edit_rsi(to = 'R', + rule = c(rule_group, rule), + rows = which(tbl$fullname %like% "^Moraxella catarrhalis" + & tbl[, eryt] == 'R'), + cols = c(azit, clar, roxi)) + } + if (!is.na(tetr)) { + edit_rsi(to = 'S', + rule = c(rule_group, rule), + rows = which(tbl$fullname %like% "^Moraxella catarrhalis" + & tbl[, tetr] == 'S'), + cols = c(doxy, mino)) + } + if (info == TRUE) { + txt_ok() + } + # Anaerobic Gram positives ---- + rule <- 'Anaerobic Gram positives' + if (info == TRUE) { + warned <- FALSE + changed_results <- 0 + cat(rule) + } + if (!is.na(peni)) { + edit_rsi(to = 'S', + rule = c(rule_group, rule), + rows = which((tbl$genus %in% c("Clostridium", "Actinomyces", "Propionibacterium", + "Bifidobacterium", "Eggerthella", "Eubacterium", + "Lactobacillus ", "Actinomyces") + | tbl$fullname %like% "^Propionibacterium acnes") + & tbl[, peni] == 'S'), + cols = c(ampi, amox, pita, tica)) + edit_rsi(to = 'I', + rule = c(rule_group, rule), + rows = which((tbl$genus %in% c("Clostridium", "Actinomyces", "Propionibacterium", + "Bifidobacterium", "Eggerthella", "Eubacterium", + "Lactobacillus ", "Actinomyces") + | tbl$fullname %like% "^Propionibacterium acnes") + & tbl[, peni] == 'I'), + cols = c(ampi, amox, pita, tica)) + edit_rsi(to = 'R', + rule = c(rule_group, rule), + rows = which((tbl$genus %in% c("Clostridium", "Actinomyces", "Propionibacterium", + "Bifidobacterium", "Eggerthella", "Eubacterium", + "Lactobacillus ", "Actinomyces") + | tbl$fullname %like% "^Propionibacterium acnes") + & tbl[, peni] == 'R'), + cols = c(ampi, amox, pita, tica)) + } + if (info == TRUE) { + txt_ok() + } + # Anaerobic Gram negatives ---- + rule <- 'Anaerobic Gram negatives' + if (info == TRUE) { + warned <- FALSE + changed_results <- 0 + cat(rule) + } + if (!is.na(peni)) { + edit_rsi(to = 'S', + rule = c(rule_group, rule), + rows = which(tbl$genus %in% c("Bacteroides", "Prevotella", "Porphyromonas", + "Fusobacterium", "Bilophila ", "Mobiluncus") + & tbl[, peni] == 'S'), + cols = c(ampi, amox, pita, tica)) + edit_rsi(to = 'I', + rule = c(rule_group, rule), + rows = which(tbl$genus %in% c("Bacteroides", "Prevotella", "Porphyromonas", + "Fusobacterium", "Bilophila ", "Mobiluncus") + & tbl[, peni] == 'I'), + cols = c(ampi, amox, pita, tica)) + edit_rsi(to = 'R', + rule = c(rule_group, rule), + rows = which(tbl$genus %in% c("Bacteroides", "Prevotella", "Porphyromonas", + "Fusobacterium", "Bilophila ", "Mobiluncus") + & tbl[, peni] == 'R'), + cols = c(ampi, amox, pita, tica)) + } + if (info == TRUE) { + txt_ok() + } + # Pasteurella multocida ---- + rule <- 'Pasteurella multocida' + if (info == TRUE) { + warned <- FALSE + changed_results <- 0 + cat(rule) + } + if (!is.na(peni)) { + edit_rsi(to = 'S', + rule = c(rule_group, rule), + rows = which(tbl$fullname %like% "^Pasteurella multocida" + & tbl[, peni] == 'S'), + cols = c(ampi, amox)) + edit_rsi(to = 'I', + rule = c(rule_group, rule), + rows = which(tbl$fullname %like% "^Pasteurella multocida" + & tbl[, peni] == 'I'), + cols = c(ampi, amox)) + edit_rsi(to = 'R', + rule = c(rule_group, rule), + rows = which(tbl$fullname %like% "^Pasteurella multocida" + & tbl[, peni] == 'R'), + cols = c(ampi, amox)) + } + if (info == TRUE) { + txt_ok() + } + # Campylobacter jejuni ---- + rule <- 'Campylobacter jejuni' + if (info == TRUE) { + warned <- FALSE + changed_results <- 0 + cat(rule) + } + if (!is.na(eryt)) { + edit_rsi(to = 'S', + rule = c(rule_group, rule), + rows = which(tbl$fullname %like% "^Campylobacter jejuni" + & tbl[, eryt] == 'S'), + cols = c(azit, clar)) + edit_rsi(to = 'I', + rule = c(rule_group, rule), + rows = which(tbl$fullname %like% "^Campylobacter jejuni" + & tbl[, eryt] == 'I'), + cols = c(azit, clar)) + edit_rsi(to = 'R', + rule = c(rule_group, rule), + rows = which(tbl$fullname %like% "^Campylobacter jejuni" + & tbl[, eryt] == 'R'), + cols = c(azit, clar)) + } + if (!is.na(tetr)) { + edit_rsi(to = 'S', + rule = c(rule_group, rule), + rows = which(tbl$fullname %like% "^Campylobacter jejuni" + & tbl[, tetr] == 'S'), + cols = doxy) + edit_rsi(to = 'I', + rule = c(rule_group, rule), + rows = which(tbl$fullname %like% "^Campylobacter jejuni" + & tbl[, tetr] == 'I'), + cols = doxy) + edit_rsi(to = 'R', + rule = c(rule_group, rule), + rows = which(tbl$fullname %like% "^Campylobacter jejuni" + & tbl[, tetr] == 'R'), + cols = doxy) + } + if (info == TRUE) { + txt_ok() + } + # Aerococcus sanguinicola/urinae ---- + rule <- 'Aerococcus sanguinicola/urinae' + if (info == TRUE) { + warned <- FALSE + changed_results <- 0 + cat(rule) + } + if (!is.na(cipr)) { + edit_rsi(to = 'S', + rule = c(rule_group, rule), + rows = which(tbl$fullname %like% "^Aerococcus (sanguinicola|urinae)" + & tbl[, cipr] == 'S'), + cols = levo) + edit_rsi(to = 'I', + rule = c(rule_group, rule), + rows = which(tbl$fullname %like% "^Aerococcus (sanguinicola|urinae)" + & tbl[, cipr] == 'I'), + cols = levo) + edit_rsi(to = 'R', + rule = c(rule_group, rule), + rows = which(tbl$fullname %like% "^Aerococcus (sanguinicola|urinae)" + & tbl[, cipr] == 'R'), + cols = levo) + } + if (info == TRUE) { + txt_ok() + } + # Kingella kingae ---- + rule <- 'Kingella kingae' + if (info == TRUE) { + warned <- FALSE + changed_results <- 0 + cat(rule) + } + if (!is.na(peni)) { + edit_rsi(to = 'S', + rule = c(rule_group, rule), + rows = which(tbl$fullname %like% "^Kingella kingae" + & tbl[, peni] == 'S'), + cols = c(ampi, amox)) + edit_rsi(to = 'I', + rule = c(rule_group, rule), + rows = which(tbl$fullname %like% "^Kingella kingae" + & tbl[, peni] == 'I'), + cols = c(ampi, amox)) + edit_rsi(to = 'R', + rule = c(rule_group, rule), + rows = which(tbl$fullname %like% "^Kingella kingae" + & tbl[, peni] == 'R'), + cols = c(ampi, amox)) + } + if (!is.na(eryt)) { + edit_rsi(to = 'S', + rule = c(rule_group, rule), + rows = which(tbl$fullname %like% "^Kingella kingae" + & tbl[, eryt] == 'S'), + cols = c(azit, clar)) + edit_rsi(to = 'I', + rule = c(rule_group, rule), + rows = which(tbl$fullname %like% "^Kingella kingae" + & tbl[, eryt] == 'I'), + cols = c(azit, clar)) + edit_rsi(to = 'R', + rule = c(rule_group, rule), + rows = which(tbl$fullname %like% "^Kingella kingae" + & tbl[, eryt] == 'R'), + cols = c(azit, clar)) + } + if (!is.na(tetr)) { + edit_rsi(to = 'S', + rule = c(rule_group, rule), + rows = which(tbl$fullname %like% "^Kingella kingae" + & tbl[, tetr] == 'S'), + cols = doxy) + edit_rsi(to = 'I', + rule = c(rule_group, rule), + rows = which(tbl$fullname %like% "^Kingella kingae" + & tbl[, tetr] == 'I'), + cols = doxy) + edit_rsi(to = 'R', + rule = c(rule_group, rule), + rows = which(tbl$fullname %like% "^Kingella kingae" + & tbl[, tetr] == 'R'), + cols = doxy) + } + if (info == TRUE) { + txt_ok() + } + + # EXPERT RULES AND INTRINSIC RESISTANCE ----------------------------------- + + if (info == TRUE) { + cat(bold(paste0('\nEUCAST Expert Rules, Intrinsic Resistance and Exceptional Phenotypes (v', EUCAST_VERSION_EXPERT_RULES, ')\n'))) + } + rule_group <- "Expert Rules" + # Table 1: Intrinsic resistance in Enterobacteriaceae ---- + rule <- 'Table 1: Intrinsic resistance in Enterobacteriaceae' if (info == TRUE) { - cat('- Table 1: Intrinsic resistance in Enterobacteriaceae\n') + warned <- FALSE + changed_results <- 0 + cat(rule) } - # Intrisiek R for this group + # Intrinsic R for this group edit_rsi(to = 'R', + rule = c(rule_group, rule), rows = which(tbl$family == 'Enterobacteriaceae'), cols = c(peni, glycopeptides, fusi, macrolides, linc, streptogramins, rifa, dapt, line)) # Citrobacter edit_rsi(to = 'R', + rule = c(rule_group, rule), rows = which(tbl$fullname %like% '^Citrobacter (koseri|amalonaticus|sedlakii|farmeri|rodentium)'), cols = c(aminopenicillins, tica)) edit_rsi(to = 'R', + rule = c(rule_group, rule), rows = which(tbl$fullname %like% '^Citrobacter (freundii|braakii|murliniae|werkmanii|youngae)'), cols = c(aminopenicillins, amcl, czol, cfox)) # Enterobacter edit_rsi(to = 'R', + rule = c(rule_group, rule), rows = which(tbl$fullname %like% '^Enterobacter cloacae'), cols = c(aminopenicillins, amcl, czol, cfox)) edit_rsi(to = 'R', + rule = c(rule_group, rule), rows = which(tbl$fullname %like% '^Enterobacter aerogenes'), cols = c(aminopenicillins, amcl, czol, cfox)) # Escherichia edit_rsi(to = 'R', + rule = c(rule_group, rule), rows = which(tbl$fullname %like% '^Escherichia hermanni'), cols = c(aminopenicillins, tica)) # Hafnia edit_rsi(to = 'R', + rule = c(rule_group, rule), rows = which(tbl$fullname %like% '^Hafnia alvei'), cols = c(aminopenicillins, amcl, czol, cfox)) # Klebsiella edit_rsi(to = 'R', + rule = c(rule_group, rule), rows = which(tbl$fullname %like% '^Klebsiella'), cols = c(aminopenicillins, tica)) # Morganella / Proteus edit_rsi(to = 'R', + rule = c(rule_group, rule), rows = which(tbl$fullname %like% '^Morganella morganii'), cols = c(aminopenicillins, amcl, czol, tetracyclines, polymyxins, nitr)) edit_rsi(to = 'R', + rule = c(rule_group, rule), rows = which(tbl$fullname %like% '^Proteus mirabilis'), cols = c(tetracyclines, tige, polymyxins, nitr)) edit_rsi(to = 'R', + rule = c(rule_group, rule), rows = which(tbl$fullname %like% '^Proteus penneri'), cols = c(aminopenicillins, czol, cfur, tetracyclines, tige, polymyxins, nitr)) edit_rsi(to = 'R', + rule = c(rule_group, rule), rows = which(tbl$fullname %like% '^Proteus vulgaris'), cols = c(aminopenicillins, czol, cfur, tetracyclines, tige, polymyxins, nitr)) # Providencia edit_rsi(to = 'R', + rule = c(rule_group, rule), rows = which(tbl$fullname %like% '^Providencia rettgeri'), cols = c(aminopenicillins, amcl, czol, cfur, tetracyclines, tige, polymyxins, nitr)) edit_rsi(to = 'R', + rule = c(rule_group, rule), rows = which(tbl$fullname %like% '^Providencia stuartii'), cols = c(aminopenicillins, amcl, czol, cfur, tetracyclines, tige, polymyxins, nitr)) # Raoultella edit_rsi(to = 'R', + rule = c(rule_group, rule), rows = which(tbl$fullname %like% '^Raoultella'), cols = c(aminopenicillins, tica)) # Serratia edit_rsi(to = 'R', + rule = c(rule_group, rule), rows = which(tbl$fullname %like% '^Serratia marcescens'), - cols = c(aminopenicillins, amcl, czol, cfox, cfur, tetracyclines[tetracyclines != 'mino'], polymyxins, nitr)) + cols = c(aminopenicillins, amcl, czol, cfox, cfur, tetracyclines[tetracyclines != na.rm(mino)], polymyxins, nitr)) # Yersinia edit_rsi(to = 'R', + rule = c(rule_group, rule), rows = which(tbl$fullname %like% '^Yersinia enterocolitica'), cols = c(aminopenicillins, amcl, tica, czol, cfox)) edit_rsi(to = 'R', + rule = c(rule_group, rule), rows = which(tbl$fullname %like% '^Yersinia pseudotuberculosis'), cols = c(poly, coli)) - + if (info == TRUE) { + txt_ok() + } # Table 2: Intrinsic resistance in non-fermentative Gram-negative bacteria ---- + rule <- 'Table 2: Intrinsic resistance in non-fermentative Gram-negative bacteria' if (info == TRUE) { - cat('- Table 2: Intrinsic resistance in non-fermentative Gram-negative bacteria\n') + warned <- FALSE + changed_results <- 0 + cat(rule) } - # Intrisiek R for this group + # Intrinsic R for this group edit_rsi(to = 'R', + rule = c(rule_group, rule), rows = which(tbl$genus %in% c('Achromobacter', 'Acinetobacter', 'Alcaligenes', @@ -400,41 +1192,54 @@ EUCAST_rules <- function(tbl, cols = c(peni, cfox, cfur, glycopeptides, fusi, macrolides, linc, streptogramins, rifa, dapt, line)) # Acinetobacter edit_rsi(to = 'R', + rule = c(rule_group, rule), rows = which(tbl$fullname %like% '^Acinetobacter (baumannii|pittii|nosocomialis|calcoaceticus)'), - cols = c(aminopenicillins, amcl, czol, cfot, cftr, aztr, erta, trim, fosf, tetracyclines[tetracyclines != 'mino'])) + cols = c(aminopenicillins, amcl, czol, cfot, cftr, aztr, erta, trim, fosf, tetracyclines[tetracyclines != na.rm(mino)])) # Achromobacter edit_rsi(to = 'R', + rule = c(rule_group, rule), rows = which(tbl$fullname %like% '^Achromobacter (xylosoxydans|xylosoxidans)'), cols = c(aminopenicillins, czol, cfot, cftr, erta)) # Burkholderia edit_rsi(to = 'R', + rule = c(rule_group, rule), # onder 'Burkholderia cepacia complex' vallen deze species allemaal: PMID 16217180. rows = which(tbl$fullname %like% '^Burkholderia (cepacia|multivorans|cenocepacia|stabilis|vietnamiensis|dolosa|ambifaria|anthina|pyrrocinia|ubonensis)'), cols = c(aminopenicillins, amcl, tica, pita, czol, cfot, cftr, aztr, erta, cipr, chlo, aminoglycosides, trim, fosf, polymyxins)) # Elizabethkingia edit_rsi(to = 'R', + rule = c(rule_group, rule), rows = which(tbl$fullname %like% '^Elizabethkingia meningoseptic(a|um)'), cols = c(aminopenicillins, amcl, tica, czol, cfot, cftr, cfta, cfep, aztr, erta, imip, mero, polymyxins)) # Ochrobactrum edit_rsi(to = 'R', + rule = c(rule_group, rule), rows = which(tbl$fullname %like% '^Ochrobactrum anthropi'), cols = c(aminopenicillins, amcl, tica, pita, czol, cfot, cftr, cfta, cfep, aztr, erta)) # Pseudomonas edit_rsi(to = 'R', + rule = c(rule_group, rule), rows = which(tbl$fullname %like% '^Pseudomonas aeruginosa'), cols = c(aminopenicillins, amcl, czol, cfot, cftr, erta, chlo, kana, neom, trim, trsu, tetracyclines, tige)) # Stenotrophomonas edit_rsi(to = 'R', + rule = c(rule_group, rule), rows = which(tbl$fullname %like% '^Stenotrophomonas maltophilia'), cols = c(aminopenicillins, amcl, tica, pita, czol, cfot, cftr, cfta, aztr, erta, imip, mero, aminoglycosides, trim, fosf, tetr)) - + if (info == TRUE) { + txt_ok() + } # Table 3: Intrinsic resistance in other Gram-negative bacteria ---- + rule <- 'Table 3: Intrinsic resistance in other Gram-negative bacteria' if (info == TRUE) { - cat('- Table 3: Intrinsic resistance in other Gram-negative bacteria\n') + warned <- FALSE + changed_results <- 0 + cat(rule) } - # Intrisiek R for this group + # Intrinsic R for this group edit_rsi(to = 'R', + rule = c(rule_group, rule), rows = which(tbl$genus %in% c('Haemophilus', 'Moraxella', 'Neisseria', @@ -442,151 +1247,218 @@ EUCAST_rules <- function(tbl, cols = c(glycopeptides, linc, dapt, line)) # Haemophilus edit_rsi(to = 'R', + rule = c(rule_group, rule), rows = which(tbl$fullname %like% '^Haemophilus influenzae'), cols = c(fusi, streptogramins)) # Moraxella edit_rsi(to = 'R', + rule = c(rule_group, rule), rows = which(tbl$fullname %like% '^Moraxella catarrhalis'), cols = trim) # Neisseria edit_rsi(to = 'R', + rule = c(rule_group, rule), rows = which(tbl$genus == 'Neisseria'), cols = trim) # Campylobacter edit_rsi(to = 'R', + rule = c(rule_group, rule), rows = which(tbl$fullname %like% '^Campylobacter fetus'), cols = c(fusi, streptogramins, trim, nali)) edit_rsi(to = 'R', + rule = c(rule_group, rule), rows = which(tbl$fullname %like% '^Campylobacter (jejuni|coli)'), cols = c(fusi, streptogramins, trim)) - + if (info == TRUE) { + txt_ok() + } # Table 4: Intrinsic resistance in Gram-positive bacteria ---- + rule <- 'Table 4: Intrinsic resistance in Gram-positive bacteria' if (info == TRUE) { - cat('- Table 4: Intrinsic resistance in Gram-positive bacteria\n') + warned <- FALSE + changed_results <- 0 + cat(rule) } - # Intrisiek R for this group + # Intrinsic R for this group edit_rsi(to = 'R', - rows = which(tbl$gramstain %like% 'Positi(e|)(v|f)'), + rule = c(rule_group, rule), + rows = which(tbl$gramstain == "Gram positive"), cols = c(aztr, polymyxins, nali)) # Staphylococcus edit_rsi(to = 'R', + rule = c(rule_group, rule), rows = which(tbl$fullname %like% '^Staphylococcus saprophyticus'), cols = c(fusi, cfta, fosf, novo)) edit_rsi(to = 'R', + rule = c(rule_group, rule), rows = which(tbl$fullname %like% '^Staphylococcus (cohnii|xylosus)'), cols = c(cfta, novo)) edit_rsi(to = 'R', + rule = c(rule_group, rule), rows = which(tbl$fullname %like% '^Staphylococcus capitis'), cols = c(cfta, fosf)) edit_rsi(to = 'R', + rule = c(rule_group, rule), rows = which(tbl$fullname %like% '^Staphylococcus (aureus|epidermidis|coagulase negatief|hominis|haemolyticus|intermedius|pseudointermedius)'), cols = cfta) # Streptococcus + # rule 4.5 edit_rsi(to = 'R', + rule = c(rule_group, rule), rows = which(tbl$genus == 'Streptococcus'), - cols = c(fusi, cfta, aminoglycosides)) + cols = c(fusi, aminoglycosides)) # Enterococcus edit_rsi(to = 'R', + rule = c(rule_group, rule), rows = which(tbl$fullname %like% '^Enterococcus faecalis'), - cols = c(fusi, cfta, cephalosporins[cephalosporins != cfta], aminoglycosides, macrolides, clin, qida, trim, trsu)) + cols = c(fusi, cfta, cephalosporins[cephalosporins != na.rm(cfta)], aminoglycosides, macrolides, clin, qida, trim, trsu)) edit_rsi(to = 'R', + rule = c(rule_group, rule), rows = which(tbl$fullname %like% '^Enterococcus (gallinarum|casseliflavus)'), - cols = c(fusi, cfta, cephalosporins[cephalosporins != cfta], aminoglycosides, macrolides, clin, qida, vanc, trim, trsu)) + cols = c(fusi, cfta, cephalosporins[cephalosporins != na.rm(cfta)], aminoglycosides, macrolides, clin, qida, vanc, trim, trsu)) edit_rsi(to = 'R', + rule = c(rule_group, rule), rows = which(tbl$fullname %like% '^Enterococcus faecium'), - cols = c(fusi, cfta, cephalosporins[cephalosporins != cfta], aminoglycosides, macrolides, trim, trsu)) + cols = c(fusi, cfta, cephalosporins[cephalosporins != na.rm(cfta)], aminoglycosides, macrolides, trim, trsu)) # Corynebacterium edit_rsi(to = 'R', + rule = c(rule_group, rule), rows = which(tbl$genus == 'Corynebacterium'), cols = fosf) # Listeria edit_rsi(to = 'R', + rule = c(rule_group, rule), rows = which(tbl$fullname %like% '^Listeria monocytogenes'), - cols = c(cfta, cephalosporins[cephalosporins != cfta])) - # overig + cols = c(cfta, cephalosporins[cephalosporins != na.rm(cfta)])) + # other edit_rsi(to = 'R', + rule = c(rule_group, rule), rows = which(tbl$genus %in% c('Leuconostoc', 'Pediococcus')), cols = glycopeptides) edit_rsi(to = 'R', + rule = c(rule_group, rule), rows = which(tbl$genus == 'Lactobacillus'), cols = glycopeptides) edit_rsi(to = 'R', + rule = c(rule_group, rule), rows = which(tbl$fullname %like% '^Clostridium (ramosum|innocuum)'), cols = vanc) + if (info == TRUE) { + txt_ok() + } # Table 8: Interpretive rules for B-lactam agents and Gram-positive cocci ---- + rule <- 'Table 8: Interpretive rules for B-lactam agents and Gram-positive cocci' if (info == TRUE) { - cat('- Table 8: Interpretive rules for B-lactam agents and Gram-positive cocci\n') + warned <- FALSE + changed_results <- 0 + cat(rule) } # rule 8.3 if (!is.na(peni)) { edit_rsi(to = 'S', - rows = which(tbl$fullname %like% '^Streptococcus (pyogenes|agalactiae|dysgalactiae|groep A|groep B|groep C|groep G)' + rule = c(rule_group, rule), + rows = which(tbl$fullname %like% '^Streptococcus (pyogenes|agalactiae|dysgalactiae|group A|group B|group C|group G)' & tbl[, peni] == 'S'), cols = c(aminopenicillins, cephalosporins, carbapenems)) } # rule 8.6 if (!is.na(ampi)) { edit_rsi(to = 'R', + rule = c(rule_group, rule), rows = which(tbl$genus == 'Enterococcus' & tbl[, ampi] == 'R'), cols = c(ureidopenicillins, carbapenems)) } if (!is.na(amox)) { edit_rsi(to = 'R', + rule = c(rule_group, rule), rows = which(tbl$genus == 'Enterococcus' & tbl[, amox] == 'R'), cols = c(ureidopenicillins, carbapenems)) } + if (info == TRUE) { + txt_ok() + } # Table 9: Interpretive rules for B-lactam agents and Gram-negative rods ---- + rule <- 'Table 9: Interpretive rules for B-lactam agents and Gram-negative rods' if (info == TRUE) { - cat('- Table 9: Interpretive rules for B-lactam agents and Gram-negative rods\n') + warned <- FALSE + changed_results <- 0 + cat(rule) } # rule 9.3 if (!is.na(tica) & !is.na(pita)) { edit_rsi(to = 'R', + rule = c(rule_group, rule), rows = which(tbl$family == 'Enterobacteriaceae' & tbl[, tica] == 'R' & tbl[, pita] == 'S'), cols = pita) } + if (info == TRUE) { + txt_ok() + } # Table 10: Interpretive rules for B-lactam agents and other Gram-negative bacteria ---- + rule <- 'Table 10: Interpretive rules for B-lactam agents and other Gram-negative bacteria' if (info == TRUE) { - cat('- Table 10: Interpretive rules for B-lactam agents and other Gram-negative bacteria\n') + warned <- FALSE + changed_results <- 0 + cat(rule) } # rule 10.2 - if (!is.na(ampi)) { - # you should know first if the are B-lactamase positive, so do not run for now - # edit_rsi(to = 'R', - # rows = which(tbl$fullname %like% '^Haemophilus influenza' - # & tbl[, ampi] == 'R'), - # cols = c(ampi, amox, amcl, pita, cfur)) + # if (!is.na(ampi)) { + # you should know first if the are B-lactamase positive, so do not run for now + # edit_rsi(to = 'R', + # rule = c(rule_group, rule), + # rows = which(tbl$fullname %like% '^Haemophilus influenza' + # & tbl[, ampi] == 'R'), + # cols = c(ampi, amox, amcl, pita, cfur)) + # } + if (info == TRUE) { + txt_ok() } # Table 11: Interpretive rules for macrolides, lincosamides, and streptogramins ---- + rule <- 'Table 11: Interpretive rules for macrolides, lincosamides, and streptogramins' if (info == TRUE) { - cat('- Table 11: Interpretive rules for macrolides, lincosamides, and streptogramins\n') + warned <- FALSE + changed_results <- 0 + cat(rule) } # rule 11.1 if (!is.na(eryt)) { - if (!is.na(azit)) { - tbl[, azit] <- tbl[, eryt] - } - if (!is.na(clar)) { - tbl[, clar] <- tbl[, eryt] - } + edit_rsi(to = 'S', + rule = c(rule_group, rule), + rows = which(tbl[, eryt] == 'S'), + cols = c(azit, clar)) + edit_rsi(to = 'I', + rule = c(rule_group, rule), + rows = which(tbl[, eryt] == 'I'), + cols = c(azit, clar)) + edit_rsi(to = 'R', + rule = c(rule_group, rule), + rows = which(tbl[, eryt] == 'R'), + cols = c(azit, clar)) + } + if (info == TRUE) { + txt_ok() } # Table 12: Interpretive rules for aminoglycosides ---- + rule <- 'Table 12: Interpretive rules for aminoglycosides' if (info == TRUE) { - cat('- Table 12: Interpretive rules for aminoglycosides\n') + warned <- FALSE + changed_results <- 0 + cat(rule) } # rule 12.2 if (!is.na(tobr)) { edit_rsi(to = 'R', + rule = c(rule_group, rule), rows = which(tbl$genus == 'Staphylococcus' & tbl[, tobr] == 'R'), cols = c(kana, amik)) @@ -594,6 +1466,7 @@ EUCAST_rules <- function(tbl, # rule 12.3 if (!is.na(gent)) { edit_rsi(to = 'R', + rule = c(rule_group, rule), rows = which(tbl$genus == 'Staphylococcus' & tbl[, gent] == 'R'), cols = aminoglycosides) @@ -601,6 +1474,7 @@ EUCAST_rules <- function(tbl, # rule 12.8 if (!is.na(gent) & !is.na(tobr)) { edit_rsi(to = 'R', + rule = c(rule_group, rule), rows = which(tbl$family == 'Enterobacteriaceae' & tbl[, gent] == 'I' & tbl[, tobr] == 'S'), @@ -609,20 +1483,28 @@ EUCAST_rules <- function(tbl, # rule 12.9 if (!is.na(gent) & !is.na(tobr)) { edit_rsi(to = 'R', + rule = c(rule_group, rule), rows = which(tbl$family == 'Enterobacteriaceae' & tbl[, tobr] == 'I' & tbl[, gent] == 'R'), cols = tobr) } + if (info == TRUE) { + txt_ok() + } # Table 13: Interpretive rules for quinolones ---- + rule <- 'Table 13: Interpretive rules for quinolones' if (info == TRUE) { - cat('- Table 13: Interpretive rules for quinolones\n') + warned <- FALSE + changed_results <- 0 + cat(rule) } # rule 13.2 if (!is.na(moxi)) { edit_rsi(to = 'R', + rule = c(rule_group, rule), rows = which(tbl$genus == 'Staphylococcus' & tbl[, moxi] == 'R'), cols = fluoroquinolones) @@ -630,6 +1512,7 @@ EUCAST_rules <- function(tbl, # rule 13.4 if (!is.na(moxi)) { edit_rsi(to = 'R', + rule = c(rule_group, rule), rows = which(tbl$fullname %like% '^Streptococcus pneumoniae' & tbl[, moxi] == 'R'), cols = fluoroquinolones) @@ -637,6 +1520,7 @@ EUCAST_rules <- function(tbl, # rule 13.5 if (!is.na(cipr)) { edit_rsi(to = 'R', + rule = c(rule_group, rule), rows = which(tbl$family == 'Enterobacteriaceae' & tbl[, cipr] == 'R'), cols = fluoroquinolones) @@ -644,63 +1528,101 @@ EUCAST_rules <- function(tbl, # rule 13.8 if (!is.na(cipr)) { edit_rsi(to = 'R', + rule = c(rule_group, rule), rows = which(tbl$fullname %like% '^Neisseria gonorrhoeae' & tbl[, cipr] == 'R'), cols = fluoroquinolones) } - - - # Other ---- if (info == TRUE) { - cat('- Non-EUCAST: trim = R where trsu = R and ampi = R where amcl = R\n') + txt_ok() + } + + # OTHER RULES ------------------------------------------------------------- + + if (info == TRUE) { + cat(bold('\nOther rules\n')) + } + rule_group <- "Other rules" + + rule <- 'Non-EUCAST: ampicillin = R where amoxicillin/clav acid = R' + if (info == TRUE) { + warned <- FALSE + changed_results <- 0 + cat(rule) } if (!is.na(amcl)) { edit_rsi(to = 'R', + rule = c(rule_group, rule), rows = which(tbl[, amcl] == 'R'), cols = ampi) } + if (info == TRUE) { + txt_ok() + } + rule <- 'Non-EUCAST: trimethoprim = R where trimethoprim/sulfa = R' + if (info == TRUE) { + warned <- FALSE + changed_results <- 0 + cat(rule) + } if (!is.na(trsu)) { edit_rsi(to = 'R', + rule = c(rule_group, rule), rows = which(tbl[, trsu] == 'R'), cols = trim) } if (info == TRUE) { - cat('- Non-EUCAST: trsu = S where trim = S and amcl = S where ampi = S\n') + txt_ok() + } + rule <- 'Non-EUCAST: amoxicillin/clav acid = S where ampicillin = S' + if (info == TRUE) { + warned <- FALSE + changed_results <- 0 + cat(rule) } if (!is.na(amcl)) { edit_rsi(to = 'S', + rule = c(rule_group, rule), rows = which(tbl[, ampi] == 'S'), cols = amcl) } + if (info == TRUE) { + txt_ok() + } + rule <- 'Non-EUCAST: trimethoprim/sulfa = S where trimethoprim = S' + if (info == TRUE) { + warned <- FALSE + changed_results <- 0 + cat(rule) + } if (!is.na(trsu)) { edit_rsi(to = 'S', + rule = c(rule_group, rule), rows = which(tbl[, trim] == 'S'), cols = trsu) } - # amox = ampi - if (!is.na(ampi) & !is.na(amox)) { - tbl[, amox] <- tbl %>% pull(ampi) + if (info == TRUE) { + txt_ok() } - # Remove added columns again - microorganisms.ncol <- ncol(AMR::microorganisms) - 2 - tbl.ncol <- ncol(tbl) - tbl <- tbl %>% select(-c((tbl.ncol - microorganisms.ncol):tbl.ncol)) - # and remove added suffices - colnames(tbl) <- gsub("_tempmicroorganisms", "", colnames(tbl)) # restore old col_mo values if needed if (!is.null(col_mo_original)) { - tbl[, col_mo] <- col_mo_original + tbl_original[, col_mo] <- col_mo_original } if (info == TRUE) { - cat('Done.\n\nEUCAST Expert rules applied to', - total_rows %>% unique() %>% length() %>% format(big.mark = ","), - 'different rows; overwritten a total of', - total %>% format(big.mark = ","), 'test results.\n\n') + cat(bold('\n=> EUCAST rules affected', + amount_affected_rows %>% length() %>% format(big.mark = ","), + 'out of', nrow(tbl_original) %>% format(big.mark = ","), + 'rows -- changed', + amount_changed %>% format(big.mark = ","), 'test results.\n\n')) } - tbl + if (verbose_info != "") { + message("Verbose information:", verbose_info) + } + + tbl_original } #' @rdname EUCAST diff --git a/R/mic.R b/R/mic.R index 25bbeb78..594262e0 100755 --- a/R/mic.R +++ b/R/mic.R @@ -22,7 +22,7 @@ #' @rdname as.mic #' @param x vector #' @param na.rm a logical indicating whether missing values should be removed -#' @return Ordered factor with new class \code{mic} and new attribute \code{package} +#' @return Ordered factor with new class \code{mic} #' @keywords mic #' @export #' @importFrom dplyr %>% @@ -148,11 +148,8 @@ as.mic <- function(x, na.rm = FALSE) { list_missing, call. = FALSE) } - x <- factor(x = x, - levels = lvls, - ordered = TRUE) + x <- factor(x, levels = lvls, ordered = TRUE) class(x) <- c('mic', 'ordered', 'factor') - attr(x, 'package') <- 'AMR' x } } diff --git a/R/rsi.R b/R/rsi.R index 19017a85..efb76031 100644 --- a/R/rsi.R +++ b/R/rsi.R @@ -22,7 +22,7 @@ #' @rdname as.rsi #' @param x vector #' @details The function \code{is.rsi.eligible} returns \code{TRUE} when a columns contains only valid antimicrobial interpretations (S and/or I and/or R), and \code{FALSE} otherwise. -#' @return Ordered factor with new class \code{rsi} and new attribute \code{package} +#' @return Ordered factor with new class \code{rsi} #' @keywords rsi #' @export #' @importFrom dplyr %>% @@ -81,9 +81,8 @@ as.rsi <- function(x) { list_missing, call. = FALSE) } - x <- x %>% factor(levels = c("S", "I", "R"), ordered = TRUE) + x <- factor(x, levels = c("S", "I", "R"), ordered = TRUE) class(x) <- c('rsi', 'ordered', 'factor') - attr(x, 'package') <- 'AMR' x } } diff --git a/README.md b/README.md index 597ff566..933fb3ce 100755 --- a/README.md +++ b/README.md @@ -202,7 +202,7 @@ Adjust it with any parameter you know from the `ggplot2` package: septic_patients %>% select(amox, nitr, fosf, trim, cipr) %>% ggplot_rsi(datalabels = FALSE, - width = 0.5, colour = "black", size = 1, linetype = 2, alpha = 0.25) + width = 0.5, colour = "purple", size = 1, linetype = 2, alpha = 0.5) ``` ![example_3_rsi](man/figures/rsi_example3.png) @@ -225,6 +225,41 @@ septic_patients %>% You could use this to group on anything in your plots: Gram stain, age (group), genus, geographic location, et cetera. +Is there a significant difference between hospital A and D when it comes to Fosfomycin? +```r +check_A_and_D <- septic_patients %>% + filter(hospital_id %in% c("A", "D")) %>% # filter on only hospitals A and D + select(hospital_id, fosf) %>% # select the hospitals and fosfomycin + group_by(hospital_id) %>% + count_df(combine_IR = TRUE) %>% # count all isolates per group (hospital_id) + tidyr::spread(hospital_id, Value) %>% # transform output so A and D are columns + select(A, D) %>% # and select these only + as.matrix() # transform to good old matrix for fisher.test + +check_A_and_D +# A D +# [1,] 24 33 +# [2,] 25 77 +``` + +Total sum is lower than 1,000 so we'd prefer a [Fisher's exact test](https://en.wikipedia.org/wiki/Fisher%27s_exact_test), not a [*G*-test](https://en.wikipedia.org/wiki/G-test) (or its formerly used equivalent, the famous [Chi2 test](https://en.wikipedia.org/wiki/Chi-squared_test)): +``` +fisher.test(check_A_and_D) +# +# Fisher's Exact Test for Count Data +# +# data: . +# p-value = 0.03104 +# alternative hypothesis: true odds ratio is not equal to 1 +# 95 percent confidence interval: +# 1.054283 4.735995 +# sample estimates: +# odds ratio +# 2.228006 +``` + +Well, there you go! + #### MIC ```r diff --git a/data/septic_patients.rda b/data/septic_patients.rda index c39cdaeab83a7ccd0e21692aacca596143ef9b67..1097501168039b95f0fca5eaeb63ce2260cbe248 100755 GIT binary patch literal 31152 zcma&N`Cn4o7dLKQ^{Q#t0ZFkz4G0iS5NN(P6$lVY5KJ*|3P^xpgOz1zvnm?X&h;XRW>7>%?<}OVDv? z(B!n@1^Tof+|d91f71PDqd)pjW4(8q>9*&t+yA2^H-KBYo7?og9@E1A$C;7o<~D7w zn`G+JbFW*{|5*Qz(%syCaP#$?n#}z9f1DX-0WdeW2+Qk%(GQvbWBmW4|0{9&w&jQ- zc!0kfgvm~-gC!vlM}_@$nXT%J=bw|4-_4H?sSYv-8+1efK%< z&rT|ZO;=X3*(@>@tgi)7r`H8iz1b`0xw&m$TDS28)kv_oyO+DEsp^$(mfDptOF1>X zh{&Qa%e`R4NcH|o2tf%@mqbw9i@;uc%WJ4inFkvl5ij#_W0>yG!^iJ;2ba6~&{W}p zS#+BB%Yyk(t;J2~RegPQbE1<$NcZU z+cY#*WN>pIoVp#bSI5oz-xF@rnI`N2{ih^hKmU(|rN2NGH7ck%d0^#d&oR1U`f=!S z^(THZ|MQwb?~+r``CPtp)sqzq6ws=O-e4*PkLxg#6D0bS(sTH_QjZ?Pd)`fAy z&im_IxZi<-HFwL)$z?KNo_G%PdIQ{ljb7s~1BM6#Gm4Mag&QB2QNXXe;vZ&pXOC}c zV`qWE01ti*r3^Q_Q?YKcv+M1WJPoXE>5G_kL)B%9&YQ*UjUAiryzE3+BL`Sf>JGTRWCJy&ia*T*5HX-1Wcd%7vZB(qXArfOH`h@l zrt*xLgDnPXJ^0B$e1eg&W&aC-7@`lj)=_6OG8YrX0x@wFtZC-D_$*S<0y4XdrmquH zdTfXIpkX-Lx0zKxfMvqY1F~YplsHP5Xs~1hU%w5GD8F+gU%)xKbjiBa{PD-0M0QB+ zw&YX3iW)>+Cod0>w+^@ERS3BK{QjiXh+xnlu~Om_4F$Vwd3DkCk&P^D`UpqbSYtxkG>ZFt$q;HOZgWi ztq>nes9U#v#+j4tm*3_Si+xNxP822owyMl|g7H`LzQ4!RIdQzU+m7Ew|FO?_hRv6V zOAc&qU03`aH|3A@=iIAsxw(1B9Y=YG>B+1mrxwQX`fSZJaxdQEjc@Ki9}awULxcJ$ znkU<^vkMa$yOrGC+qYWvcpkt2ubnvX&mXP3FlWDSuWatqEcoT#%wyL@J7%4848>UG zd(5Q7f(v8N`$}Sh`_G}Rig77ht}g4(@hxr}RnJU@bz?)(H23#mANQQ9 z=;;;ST)Y)qAbqMu1fC)vZR>a%bkFkjhZ;T!qBXuqN&?K`pNpPh{P{rZzNN&aer#;P zu{h1rw$7lAq*wkg;R|F#XHFbDMxw5!rj5TUSUM!BuHL%(;`xc01$E12HuPPWuKoTX zWL}C_?XnlC6Ymtcg1ep zWa7vBF&^-X?|<$J5x_5DX8ykXj=zub@in)mY{6#vtLzbeW(IiLcD3L_>MV8f!G=_$dVjO&XtM##+7e~Vdwl+$r#r#Ve!v(`{R=#PHwrUv{ruijpS)T?3Q+2Q#m8>?pFZ>NqHUQcG7|SJ zIC1>t{3G>Fdm6DlCjabO^YJe?a^m_XVs=Ik7QiNtX&JX(9GWOz?6@%Lx+kbDp!Ckn zX=;4@wCU(!@UB^h^YXVFKD^laOxx{wbaBJotK@CQpvMni*OXjrT;>4J%W#gq>mB!d z_O4MHx*DhsySDlh{q+Z<^9??H_ea^H+QKi)4<&zn`}*^`=T93JzU=w1C;Ni>$VTX| zM+Y+}!12-ePTufy#2x;l6hlLFzj)2{qZe=zJLl(9ceRc4212)Oz7(@n~v zA3kNuy7rRyJwND{xp{F<%YOw@DCp|qq?lQn;WN1AhD(=Wc3q%~geyfd8a$15o%=Y7 zS!Kav#jzj$+3E@gDQU&7%rc09WWslX^eWm=4uyk(crB}1ekabhSs1W^_;j=(AO z%Eq-Q(x|H$D%VA)Yc=`O>v3ilU*>A@Q5Z*E44yJM&U{bQ=DGG)KEAdxK ztHx+TqI+Q-?D~oEHR7}pUlA{ z0VnWcgTCfvp95bUL6hPXw zVJTkT!{cIE@lwi43N(JW zZ>^8R%C|ft@vX$TU^4}RsX*&{5qt<#hEkN!`iOm7m4(gF1WAQA*LrfaHjrM@I{~+` zIIy9dU5ls(7{rQlZ;7OMM5&zkHC^ZE1VuXQUWlKLj?ly63F64n2>~byMD6Fu^VTA! zYx^eOZNzt4pRBXi$CApzH8SH#rH>KCB$c2e_MTwom>H$+b={`&-SodTkomx%gcN*I3r5-|kqqMb7OPsvD ztNo7B(`6iOS&5IzxI?U^;y}GhS^S-rr+R0LN*Y&(B$Y-5CiG@8H9MYl%$AzSru386aqS zC%~RE`p#Bxf9HOO45i{XkrT6HV;PY??nc+NQhZ-=RS^`e$M&X*paVIc0(116HqoRN z<9>gg8E`H9*)&2vq_lhZi9*=V(kTcGBKP^hjU6(ME9_LkxeA4iU0T_bD~)8OLwF*DV+29PR+9%5eRYq8 z&2ouQf2WZPH)JOb(lGF8&>X;HTzgtwc!0%x$6EPg9IUbE%U+b3!D=azLp zPK)d+ZXFse;b!5r01TQ;*G08A_iQKOeejauz5%D)RHA=!r3ir#RtEAY5-CWQXPF3$ z!BAO$7FF>GR`++0Q*I+YJDpM4uGs3s5tId~>7K}wYN?c6wnknW~Q zoN^|qx4Mi7<|l$H^|d9b8yefW*CfDDd#V);NM=~;d%y;)s9eCw?7ex^Hnp`xBX+=m zbx_H7CM#o_6)s!tmbNynWHv`BxupL5o%wg zUI%qXzfCO}n}M}UQu|9z>KD(Veodb2__~7F@vOb+_Rh6B448eW@f> z;oetXPlS+(?trlXIo~1@Mfjkz;te4~sr4Fsd)w$R2ns?qu5$>G9K6EL01c&chZr`U ze%f}zu@V}?^O)^^p~oyj^~yfAm8Pvh6f^3j0Tg4y>f8~$T*w2)xwtfBqyv|sJF58Rt|`0w0ejUt}P?DyPqHZI3sN}=g!UKqg(QH zZHu?RRAC2R%+44ONJ(rA5 zB~T-^%pCqAR9kj9z!8Cysr9bYx=Gx+Msd6Y4aB>eA=ywU!9bz)_C=zeY*oOq7JU;g zj#QimHoe%&NGmLfXPRZt@JxY1tv5^H9%wYb9N7mo_Qo)KvSAH1n(SrGt#!y=dCP^{ z^fQa7#%7{-7~I}1XdQ@xY6&`YT&xI1N4I!6dJhOKV@Ly?HWmdnp~31Zi=8!qhmD|{ zz@6y)b^Su8FI=Ff=jbL)Sva{xBiChfQ3^tz(ka3czOK!tmHL2fVr)lm=f>4x*@Kc&=W)uRH*s#zC?-^y>Zc$-G~ryKT3<*rLY?N@bWaQvAr$TEW&2fF~!`7NNur_ zA5W#mbR&eceu_lNEgy@;grdDtQ0hc51V}h3H~>c~2k|9F7vJh__7*C@EOESm4(=h6 zE9?+jGP%^oLDo>TUIFoyB|$(aTLmVebHXl8Xg&%gBvopCNDCQBX%1-KYlvkj`7%*( z0+rUCEsHOux@zM)wS`s^jZ&+Ws;G<-8!xAC)1zZI5gr|nD^Gbn$c-S8$=BxjXO^o7 zgrsHflUBwm$+94>B6XZ@sf}9yBOX5k0>pACIAU083p`5bvQ^eaRpzneR+~^m+|sJG zj2(K}SSeQ*!HHUSFv-QZ8Jgg!1y{#QG*Q7M6o51c2TuU+Ojdf-3tcVD0dZksgk4Hh zWK5pJ0SC|VxIG~xRBSSe2vvb*1SqeP%|-=@o-{~FLzVGFktXn15HA&vlgaStmiZ!F z-#UAWgDy*!DsrlG%yg{7f!B{vbjk@D?zEdvqoB0hX(slG>8Yc`0L=g=DvZ(MY$*$tQDca#U^BzcF7@Q#I~8L5 z_%ocPvo^|YdPLnm_uYxNmaIGUEH$aU&D3}2W9RXaB!aNuak;ucjaa+Ow(qZNuMOTdD}O4ihfpZL^=%_ad%c;5-;0P8>f(tb}Y)U#mY_k$#K`?P-1dg9wmn8!Bf=cg_5ZvPrhi3KP{0fj1{lEajg%PE0<@@iBs>Mr%vL%g54P)LIsyd*{>?XADeB~ijO}g2%ru=lR>sVlf!eQy1I#6z zD@*VpHV!_pg9nM{S7@^2#8`okNG7U)%FujfGPp7rTMNz6y^v4WygesEb7}l8hCca7 zxK*SVaKW{QUg^}{8etYz&!jnJawbPckh?J5%qXZ5tcNd%?x=)d^0&3UQXYM-~e*X)qj&|D@B*!}hqy0@t6no?BN+rQGGOH)$7L4kUR3K&G?dq(K# zB#oG2wk|lvl}sg@75TY5rVc!6wF+(IoIu&z(;7?){$l4Ssw{?@jfJ)EQf*{PgChMf z*)Q5=5X|w306|u114h0Q++|Cq(nO&=l9}Os6A(As?Br~*itRromCC(~%sr7xT5Sxt zm!?aAXF-ePrXZ|YTVo1BiqTq{hFR5XJivD_ukuxxs!(jVT$c=!%=dDdfu9}%KtybE zBC%9=WZNLbE_9e9`wS6YeG$Q`c(%O43VxMIPwyH7?{k&;17S@c_DGF%IbS0*E}KdgII8zP`( zGAbi|yVSJgz*=fr728kSgx=MffOT}@v9#%AdJxgZX^3HH2AZEM?|E zVZB-WJ`}kek%d%>X*`Nhq(D+oKs?m|6^IzQ(k><%3?~S)ZK9d4nxGIgMx?2t&`b;R zv&>gqIu6B@ts!wc`(uo*`IRWX2EvD#>~2b4j(w5S-HE;%Rwt#>jxNVVD|fGH&$ zstRiyM5v%Dav%-Q53oVNYB0nQf$5AfVJUS8u0T?Rbrdu71e*r0qCjNW?9foN4Omh~ zQyqVD_wD1>baObZGSJIRrwzLmndJkb3X*ZCIu0F+VLua;fw)WsGW9yP4+5o0Bp4<% zzSy}STAXb>w*AgPAOu8qTA*SaI@Ibl7MR2zJ!zNJ5FGDzWlX+-?N^kd0w86ePD(6E zOE5v{RAGtJSTE*_lLlBt0Cie*jB&IUfuME9=%|T4ViipV9gFO}6qMT+UsDvy6*2gy zuD79eCKQNC_cacP(~QFqy{j4*=o#2qIwLf)kWQKMS~xbf2BudeBSkt|P8gA^f+(Ob z8U~yOVx$g&DydH;BM$Ip>00aPKn29kty59ia!HCpZ{rt^z^gfUD8x7*f(?lELm!(c z$kJ?VHBiAf02S`fm^w#o6hLdP*L>U75n>IS+#Yr+4F^gjxdNpWB0x&_tt9G)xGp`i za%&^R+N`inWvC2(b~3Dk)Y07=g_L(Y&|w>p)7EL4xEixv$7A*MbPTsLG0iGh!VTe9=X)~Z4Qbj62C`RF6H`9MOdYkS z7$lNwU(0I%q5}AmkW<`=^VyKhf+l4N!oxB!U z#l?3*x!t8c^qS~AAM=y#p+JTeqQXRK%Uw_;iNvzeq-0K%xivP8U>S=dGAV^a>ePlX zaypc0SJN>RF&tZLt;H~i);RSws_s;l^!CY7A@oGF63JvH(yJu$+R0X< zjn;=WrQuOPTw}UPqUm)tgk|HAoKE9}kE9xq4xk1x^-4SEbldacFiI^(JR?q*+Aj_g z)Ai2sIxHKT2C6{Wr1bsj9ASexarMj78b64H<09$nOIOXX?pwKg_1xxuSVs0^&ROF0 zF5xEsQi4`IYauE+qqYCZ66}Hq=e9!jb}_NT2`#t*eT=BQJ_0UJdUl-h^zqvpvCEFa zudiLUrFP}&0nxg5fO9*N@6U`n9^j>nnAyI+@r9GdZk){Ulcig(6VG%Vfu z)(XviXvphT9Vsu2E^Eg8fa#ePS*GjgKDO=+W0Do!cBk0TesoTMWIpFt)8?D}1IH7N zfhYa{VC9N&Yyjy=(7K#DecVb}O}OWYbMaoMx$?NU^>sy&tGe&_lkkX{ZDg1CGD-j;&ELPv8^EURxjpy%^AB_H-E}** zx)!XAkE@8#!!B;9KRo|mkLeGl#ZCKxtoPdco;Yn~{@-g$-%tMbZ$Oq8xdBQoqtMiH zpwYgzCnFL(<+H%75~^2kM-tIfDUWm4g?C)(l!qn~c<#MLP$;o904t2t^Rsk6qz0Ck z@WAc^{s;U*vT8KF3+L+|4hlZPr;Y85}s zLmdeB^)#Mrih}S!rL@$Er`vMQQ@9QlK{w_H=K7{pU9E>07$jAanyYjM1agp!X+lSM z6(Nu-CuCwgy$poX=?noErT}@9y%gbGFY>4;fS8n2QOw0CnWRK_?}|t`4gj5g5--S( zaHs4g_*BHuXsOmhbhCGa@nmUCHkJdn5()!}p5asl1}UMPB+H8}`n`crutzX}80rV| z{B|YaO2FaD?`!uS{O70IOS4?DCl=1z|DRwU?oH3+s^{i4PcI!BKK%K=?pr)}_~GxX z^e?Al-{n2tZK%F_c=P+uyAN7ECEWgHPsnls$S{r~cl3MZ{Q2*yM>U@l|E(~TPMpcV z_wTuP5r19&acA=KZ!YPdfB$>F`9EpdaQ%NZ8HYy=pQI;Fj{S!pde@n@U4M>|;>nuS z?rN7@ZZ!X$-YNG}^fbX=;|eD~bTq4~xG#0L8`t0cxNy(?_7C*CAIAs(`dK?q*Ac3D zh2K1U3&Y` zk-;sXWw0_$Sc1t$0UEWg$H2zk5P%(n7c$b16 zBBt+*S~S_XA?mH^pRqT8d~XVX zzdJOs@D9D{qQ}rBRO!V(dxiyvF5EtYwY0r`W5zAnw(I`M?pwPGI2Rfhs>Q>*cHYey zdnSrHdW`ffe(8bM9PESZzlGc_8-M-o`If(054|{3WVfYsI$rE~xupK(X>{wCh6#?{ znUnd)!4)SKefj%hZriiD$A1o3H1B;23(Wt{o!q_PZsNVB z+aFW7s@P?J{5bKVp*HOE{gIFNZIfvqE_*EAHEJG_oFi4AgKj*xtFf^^>uzgkQ-OHF ztT&%SZI_Qki|0PE{_I=P^RiVD@x*tb26=sh=|rfs`N;97->csh3Zl2M-(NW1T%)MH z#QC23M|1a+l0ysgirN}hw5@nJUb=4d*e%q>Z0l0WSL}Oh>Yd#7-6`JJ-*tYwUHQ~@ zdt!S})$qHEz|Z;AmfYN1v;WThYYl$(?;GDfU%lg@b@c1fgsmM{xb0ga&d(t<-+r0C zWpS47<+X?7AD|x?zcqGGeoy{=&1u_(cMGf7j~m-(oxaV#v3~f>qO%P}x%nZVQeLWv z-_JWxBM&b=ZM=1WQM|h4!0G{GU3UCmzabZ3x)x2HJ$wpe9lwSkFABCk$v&Z~|Mlr- z&(CjitP87e?fH!hYM<5en55dTT5Vb+zSa~Gb?RmCw~ZSo{+R209b53viDmbetQxO+ zBk&8)NI6&Vm7UBPC{xz?fBtJ=wfy46iMP35R`f92i6e88!FiX@bYv^qXRO_H>=tIg z{_^?ThUObZwGkP_gO7iCzBxv2db4A1)7j&!qJg`;6|`>P_HEhP&902g32T$~G3-~P zt=y%xi*Q|AjvQv^$DfHV^&wVelUeMNZ1&ouZP~b(rS!C8UYwqI&A`LHz}E?|hh|R1 z>dg)KEe97rz&L$wzh0h*`K|DE2K{t$u>Z|P58uUHM{Lge?Z}+mGfCUXFMG!0VX zemBhx6twi|Uq*q%ZD(wB2l5S6gVdj#M|l z(v*B$-h@JqRip$5lLVBkqJid5ooT0fk3CAZn%;gr-(ADW&mywmAI>j+y={l3h%}ybfMP0fZ_3~-%(Y|A~ zh9K?E6@qP(FS?Y2ttKL8y#q8DE&sYBq9}z^f4Z6OkFnX>EcM-eG!A4u?Z%D)RkKNB z%DIxj9fmP)r+@K2qG>wa?%ViHGZAxksEO{|clhMKVNPvER&dJAHw#6YthAp?nBgsp zg16LU&=O{SjA?-gub=L~=yq;d5c^A6^Q5k43A=Rn;AKHm@XRe6mNX-MPj5&S(tvZu zlas!tq~q8%(X{I^J+aZo!NpBacO@*n{piI`K^wk)$sEa$A#X>W1sz5E1|0a1@Y^22 z&UWFhBiVmz7j3xlI5-h!>l}XbF_d#1v?ue%6IlU2`F&1$pi5eAd3`!|5&Q2G%7X2J z;`G(vV%<^ct`xH^&H6p~KHqfFcSfa%^|#`@tvkxMV#l0YtKd_zpPlA^kFb)%wY7s z8h2wkvg2VVw5jJ-`@x6M{0m<8>IYlT-7$cc+yh^IUv(t!=p9ka4qRCO-9W=F4X^Lx z`)$8ekNmgnQ}doXMERnn=ga2a%DZ&p;6-iz&BLFzZ`wsWoYk~G_Fu)No^Q9ZK7QK# z-;5)_3kQ2bj$MBC<3RKpes3(0CtS41d6#<$a}Txlg#V=o-VtnO1=#0Z?#-tg`zktS z-q}ui6v3!6M!#%HTD>Rs{)R0JuvhUbYrUW9gT1|vuUVyt+%tc{9#zk?JBeF=505{z zcGpEo{<*xig59neN8avy^E7|onOSr9FFCyPee>Xr98=RN^Vc~)B&lxx-q_<8OW=(b z`FjJRSs53wA!4Cka@!Zv`kxvL%;!h> z%Vs9v*5h|88lE{g9Yw)^c(k%V_~o4!-(NRC&(Aq?;DAoS6#?#-Zd!Cw>AeVEasG2n zNlgjY(q<-{$9V@)T4(GF_k^roJj>lSBf=J*10DnfPP<=t@IWa#oIE$8qY4Z-b~9(j zq0I+6e`PGeFNtos3-MdLAYY4x+r=+M0nXUz(HINAThW)i_t zv{KmIcMcaaI-a<8R3o!%>Z_&tPPutVtf*%VG6)=49a2}5-3+n}%f_NIE%p=z*IsEE z9X$;qCjv_*KzL)b#V!q@No!CHeH74@s<2CPf>RwzOP>z!G6Wldw5)7HQkP{&T8gS? zG}kkr%^~)j09y`e6z@tiW5MpqrRLu0JNn;Djp z7HlOimdQ$kgU9LkU=ZD?-fQno!gd+K2g>*uqi1}V`1v04MHEeVWTDppEz zN_0+pIx)LCF%qkZ$H`OBvJ#`BshV4P4WR%9zXuViD6Pz_ zM37x)J)KkK$wWX7UQ}W0D~;4QsHC1PQNnQ~0O)E^j*bZGgDrkMp`Qnf-)zVM4MVTx z1UKQ)7<1 zUKkgF<+>uu0GZ7}I62u!Fc}!B{axB-71u683zCx27QlWw9*`a~Ha{zB1|msIu{asr zu_U8!NK0T7UgD7mVk+evF9(T3Eu+$yrbO~!vJX-ck*e_3s-U*afxb$V-Vb7k1Y>-K zV|Hedx-8H#wW?H$L0VF;86ef7r)uONg;hAj^d|1_5S}Jl8$fiuqqmt~mf4{0HIT*u zcAlu3B?Vor*BGQA{jh?S15d%^@Yo>1s9h?;+f5|nxLKz#kgsse$ENGo+84df_YBCvs^29KyaimHM`brsk?C?T6%O$52T z^;woW0S>4TX?(Ow|1t8I0iO;&5Q>rFdB}joY;Od*iB!a_Bq=O)ksUUJSTeu}nTWyG zPk{D2`Z+=3C{ZzN%5TQ$29SzNhgu_2uv0)jdzvJLZr4x^tT?Vqgtyi~bw)eKagAXg zv(!tJIbl+n-f7?{t%M$7Jeo8*5f)CwjDhV^NLlJY4y8eHR%}%4H;5?MM6A$hPDYWM z!ypZEHM@#k#*;8v@a6=niYH;^1Vftx>wTzU70sTM}1j@fkP{U1+kVr%7rmAvDCTP6SYBvG20%V81GNdjLLG2>yG_Dvr zQ9&9rQzm?7E(5NszU3rcj@G-`JRBRrne~?p6-JD6*Iui#CLsEr2T|O0atrGzePc z+f7M;>ycUtUSI?4!!RZBYLE!0m31QUeBj_IO&Y@+M!7{{V*z zL}84gM2uXkgsC90a%iWa zIErvYiNHZ@IRF(!ryoU7I|UUD@*JpDstOZ>hs%U|q|P~oTQX5oIG;_~m!+Y}(xKxx z4qe|2b%|%Nq-Rs<&B6L%OcS;#R*Zs6bR#$-K%Ih;IUyL!ILd0}+xyC`T8mAk?4G`!Ef^P3&F^of%5NH&%rHmO2v(P41Ke!U@e+%e)%P^8|W8dEV+OeZgo6qW)I`x_czUY5k}A?sJ9OoB>it+W-{eV`jao$cD(Tv!$^jFPgP5M|SqrE`{E$Mo6@?hs0LE!dDc(;|O~MvYT6CViLW0FI6r+G@ zX@SlB%3kRT#d z!<~{ysxcSy;PQ$@aIBv`ky#BI^odmVM0SE`q^nxxsJ~^@$;|OiLy`)erP?4?cPw~- zBP`Z2O6G%t$c0jiC0=CGDO9XJj5R>g=i@U!Qb9=y(Sw8%(-h#|gwfHp`{*H#;jlEi zL`e{~D9QvJs%IsD!-OE!k{p1>g{flY&|G#AGKsAw6hq-+C zBB~PwX+{UNN;qVcR1<*=ozfW_jJzrlnI$F)b`awX6VvIs2pC!fhXn3Gz1Z_ z*AQnW=lo`9-eQ8;fmT)O*&Isd$hiUg?Ww3?f!SCdJf^q|G%U08I4w9pxm3a}OT#Og zb6Ohk%{lDdVJXdf7U1uBkcyBzsHm_4VAGAididL!f-{8;iWZfyIczG3k;Y*o5rJ&U&#!C6?<9BtK7$6u{DHIXM0V_he_-6b57?0w6#Y ziw&(}2pa%7Q=KxFk;ELJUCKeYEQwO6UQlYXaTH;qCQlo`UW|)Phi3B_A-(n#ybMJI z8m(vqigr4t#LR-oQ)duUvJDJ|2rE{Ibh56nY&Zg;jZdb>igESqfT^I^qUBD6*fomO zQGFd>(>vm)$1$ZX^cH98*-C4(cO4GI7y0n;ofL}DUOn~EqeF+-Az=E+(Fqc|Wq(>T zK^qIFsX>To%4+NYlTnHhHF3#y5gqDel9kyMWGYP)xWC^)ROqcOy)8<|&~=G!NWzi= zQcv@wlx8dRG)bmJAYv*N+|d!GwPaKwFU}6d#qy+2 zF2ix_HP$*8OG;{qVltYQ<9L+P73yaPQ57Kx-gR_h0F{m>t0`4VWG|Q1X|<;_^esM) zDU}%~xZ{d?Wl9;7ZAd|7QB`8!D)ordn%b$72y}{wuw+yzx-<&(Lz+w+MGhzv$Kv&M zk;XciwJZ$k7(+2AEfTqSbb?_e8KjKn)Oz7KU53XG^`!^PTw)w(Of61igG_jHY8ltS zwWn1fn~2STsn$kfi$XZSV)7>>;?A%XMH#KWW7s>L-(rBU1_MyF??Ep z(1f>F$`maM0vj)OwTxP0SsJoS0Z4H)gNC)iih4=QpM+ZqMzC8?!0ayyF#sR8*Yb!{-;{u&KgJLPw%#|t1CKLuK3?hK}<5YqYKOSGA6NT5}V<8xC zdU+*WODq;ENCuvWp6ays(9G2Y5t_gxb@YXlPIVe+B!qDpd2|q;rgoJmNCVt#O)x0j zQX5GEMhXT=+3GN?h+z=wL_YWfaGKMu$!2(#A$twJ%I-8`v77|2>Vq+eEDX#| zhT+rn>cT>$trD!~<1uC~hc=)9!fT+42>#xy8kz|VpC41DpUxE>2r)Yx(juh_o{TBO zPAM9mg~lk0049&B;UJnS!UR$_k#%uay@zfec(e|OVuzpf^J$su<#@{aHx<&#YNayT+be4KVOxGkF;8bL#y#hno=fH z9Dv5t6=g&Nk#At>$|!JtM|UDtpDeUjSVdTAh3)`T=RclIgsF9uth1Ux8FRF^TQX*o zV9lxZ+EP=M(d-A;zyqpdDf&pXf_%1@7>4kpGN8(uhE*6LkeFtoqQzdEyA7#L5s zYn|^&oA&QFT=t(A3f>n1o*qxWvTFPDPt#7DEZRS=o}IYFPlBrJK)!of$%NjO)A=LY zzm`+LULNr>|L)8 zG5@RYhllY??Yg*}u}6cBWW1eBsPu+OqLEkqlqvk(~L4H;IEeQH6U$LSq89wjqC>n=z-ydu@OHRlkI|t%dn9 zbCl~HbyZH@Z`1cL7 z;ydi-;e}szq>au#apdbScfRRVh-~Sb{`DcxRzwqRs9C>lsos(KYPJDgUVnik&?d`nB2OiDE zqBAhN<4M>P3q#-5uBdbPCcYmtn4dO%nEfsK^ZgI}%+|yuB5_@A=2gr2(kK^OvN?=( zaVBI-^143v2c8)Ct%EOWHzjL>yH^MEuSOn}Enan(K6-Z5jjMZnU(`M*{b?sVwA=~Z z@pO9mnmqUJkR7dstnK-F^i|xJRnsjs&n~<7n!}tNiDNjZw;CT`CuD@?{v~(YH&C0A zdWJshN$xDwH#|OP<`PO&&|EBhX?hradqWa*o1>cD=lF=W8*3 zTVBWt$2HlgiCh5`T0{*LrJ>Z6ir#E29?Qscr@!kDe zC;vtK>oMr~h33kyb#ffzrO!`kJbJ{GTjvFxJYtCoUjhyn&JU zX9ZhZ**E%v41kzx)>rBTf70$l!$rIet*iET;r|U8&EpkMf1t;M!{TpXB)`kDp5J^h z3x4(rY_`34aUgtzmJmj$T1JPm1OZ;DF?x`45 zo!j?YBk?r92>8SnO&C(C;?#4S~*F2Hi!^}P7DP6JYzcp92v>cMfRSSFa z_MJ!dX{I?2#U5G}+Y@>H2`eQhn`X-%}avwBpzPT4Ww+ zAg%waJM*WL?9phw+pZ|DJ#y#$X8|bsGWRFpZ(m-VyT$SOcGEf6wh2aiE5-T8;jYZX z-8q6^zoa_Yd6#?i4dgYTje@_=KN>lr+B54I?o{u#^cd7;(PMA6d4163=D5M_DPv!w z^N-H_oYd;A!eH`l6s?LbI=1Xe32W!z$wUtOyALI3cl7t?`>$RPl38nR-v5#e*+(4t zWoFg#!smdp8u+L{zz+F9QWAdN9Y?OqDyWNhjbcbE)vDEcD zS9!!d^Nf}*7gpa<+cstB7U%f>ebmAuNSi|ooBB|8@0$~?%`*|Xuea>I{vFTpJ#b_( znYcisym7VfaerF!l=|#zNWZRhV$3`JEf3xP__#JXoio31l;5=BkBXGA1wWqI2O%N> z<=1~m355{9Go+6j&ScGDy<2_!Z0ePwdB`Q1ljk!bKR-w~c3?i#mx?>Q75nHDpU3W~ z$lkK4ZTmxG+`*SC4#fNFHg|smt8XP=$yhOVb>8YZl)lWN=A=e&Ydgr%#C=h}!1E)d z*MI9<-_W(&D#jK$&_B<%iUiTS*Z=VCk0|KSi`6|xm*M8`!L5Spg5Lg8mIh?61>RSG z^_R~6>uJ~Nu+5dR*We5N3Rm4Lvz+?D9X_%up1Ad<{a^ra_tTt);6?kN^JBLDwdeDX zzSXYBJO8{YT4)bEl&$>Q_NFLx1gTw`6^fAm)V*WNf&GZlb*bU?%hzsJuBuuA@qG6< zSD!XEp3Mc#Fa3U{dO2+Q!NB?pD_U3^W^hus|8(Q(c=XEM(qv!8=h5LF(d4@r?W=zi z5CC{Gi8(NvTmj8Kr5`J|Zh%+&Y9;FpD+#A^;Yi#NtzUw`t_?A^>K%D+BfnkSUHX+4 zw`Qx=ec89Ku(4ep&ooOJ%2tCGm<1&7-WcK+`PZRLyzn9T_;#lq^X1_=!Bf^(AVk??jeJnqFnWGD-kHi`t%119a-XMORJEuCzQ@&hH3xo- z{`O7T*%(IMw}ptU?7c18)P~^B^&aQ$ObKP*hJhY1HziD_ouijO#DCb|y?_kbvGqAi zdcG;(;T9Y_i&X&CJe!3lFHp{|T|H}d8vl6E0ku&+d+|8nrblDe4A1F5#SL1nW?@gM z+e(;`oA!8?E1+Y5Ui6kxXP0ha&L%&I;r>jVe3|iJ5A$>PEz7^KJwyaNxLpbethHK;RxP+Cg4@Ct?v8pxZVE@R`j`} z-i~jxO?-@>b!)TdAPntol4RWQSX{mLgLE$U@9~9q&vqJ@XPUb+trL_=cII<&*ZT7x zr|lr7>dLq7B|rP|wNMkQzHcWiI~Y`d^nT`D6yJH7vrO!N;BC!B*|wNPhiARG_JqrK z87t4Aei(d#lr&)Nrz19gt;i!ygzIesE%-;Wc+|JrA2B@9BbRYw=@(AKx$3o92kSF92N$DN=(DdRr_pUS?Ut3hfNSFYw<#W< zerCvde09(=L0U0`+I}xUyL|ltL4aHvl@`(;@70wf%WEwCq2|N;r`CJSCQ@IW}BVUnGZ%sa~4aX6LHx^D|^JBpz`6s@C0gyK!demZT^$5TvjRZ&Jv zBONHSiDRDx?CZ7jI18a+O9~;O6oA_j8Vm?fY9C6=>w7oGt|oOZzQm**laTO&C`vr~`+E*wzU}Qu&E91Khg@s8kY@C|R%F!%`Z_!0Gl* zlzm(%JAY_!a>oQPYnnRhsF{{UAE$!&2~Ff2mT9E0_oGw;j9-f3X9YDyk}wN0Nf&fh zQ%|9c5FZtzSKFREmr4moI4Wj|Q>uJ=-YG08@mdF~x*!kWTgcWfQTN!=T)rD=<_jzL zpw@W9C<`7nWl>=-Xf z8SlPV;n+qPWfw`xO)*H4Ksq*HwuQNLAK_8b#-`$;*3I(6>XFBTwuslKyw17gZ>n?d zt=zTL?fQA{OIk2vk1km(FtlWIiAOpb6Jq0uJxUZyjLfPx*zw`X*@FEnhS3NLG?Zt1 z`ax2YF}zpD7D6s|+q;^@2Dw9cB&3n3__PUOL_QQO3)b{ZVO2qkx;#IZQHx6~>^*OjC&rL86G#fy z6sCo%E-@n-s*U-iLO!$6)OV$K_;Q`#bT7lYJ$#2bFC}LmC0wymM7ut@E0;~H8Dg}Y zrTJ|Xi+7@-sdZgq_c^wrag0pv%NyntWw#36n8oU@wT9(joZos=I(AmbSp3B9iFV@H3U=LbuKUW@4z@socP8>Y?^NaBjC zp&+D#pJkJ{Ou9kP>ath3asKs|`kIDVbW6vLcOb(EmJ~wzz!;dcxIDh+J4bO0)Syo@ zn!%;Bns#HOhgPa%q7C>KiOhXe98pr<%2 zggcKPFRW#$_c^&&+>1Tz*<)RI8ong@+mul0B`2xJv^tf|^;|moXkJ~N0K{kGj)47n z_10i$*<;@AB=)(z=kuZNqN){^7}dWt5*}sopsQpid@|WKd zVD|+DRaLeSzm8m^i6omoVn+x(AiH%>lDay4%uJ>>YXl6(+!ppI$B8rcE@$DraSwc= z*!N9QbQtsmCpu=2vTrE5Y_Cy|JIZm(Uj3xNeB@|=ju}A_kj=A36pBRW6nGoU3_h(_ z0deK_bDR!VZGp}BAx)K?EoCorBSVSebKksOld0I!R5an%8Bc^%?4Vdq+Q7AW?yU8( zvQtCgJ8I;WwPvpFa6{~cn%HqfU|Qwfu-U@qO-QPlhCe0ah?NFFEZDkZ`+7LZiGK z_;k5>FlzF$jnellVK~71=`1-U;mnY>?Zq6)aA1_Ne_DN+M0vD!%9KHLW;8J!MU>*2 z1@LgXA%LKt7fs32W27|-MB^0Ma+fc$_8uFBo;yPaf#~yjOv-xf-8yt^%W{QY=bfWX zy}G-%cB(@7G6iVoP@ia0ZN_zZFNQ4^%a0aTQt8Vj=GCQ}*QXY-C0;EZS9UuPPYW!Z ziHgZ7$qB#U~S<_b*&b2xNRychrr;))u6GJ4)s0LFkLb^l()pABNn<}NELHK%B~buex21r zg?w=8XIl@9jzW^NqR8d#oQX(_C{e{QpCWI44ohi#rRL{gJdkWpC^=#{1!qh+%bbzo z%031=C&HVtDV?USocGu`n+k+%tI3mDf}5?41CoF_C~(oUgm4@wrZ3a5cn3HRNk5s1 z(5kY*!zkt4z6vt@JRJ*{jhKLR=>i1?5oHx{g|e(k$ebDE@yEWyT3sf#9Gg(FdQ!!T z8j-n#OjxCda43^mWNl+%bnT@hMuiDp-n5$7E<#5jvK>uzK6Pewb@)^;Zo}aE_+l<% zQ^x5eu^N-?0@+UnWjJk&CjD_BB)P>R1vjLW*j!@jk0y}_IOa97QxQgR@^JX>O;&Ua zi8Ce^;6$a!6^;3X_>%@yE?rm5clp<+zI#-=>kfA72|iuAg?iS!>37m_Cumjur1*Bs zliZ-_xp%Q2ZTz+eqdv5^DAr?IYSOh9TO7t@irO-tnn2-nIgwm1{h#8A~LIY8EsobAhpycZInaI_5_c&_fpv^p_Z3-7&OC2g;$=$qb0$w;1Uv zVhK@$G0mI`aJh#?#&WFIQT80h!l0lh5=X&}`i7P)DFcMcXp<2wGKMLyaR|JH*O*7j zXK7DTwSNr1uz52!b!@6d~?WQT6zj{Wl)G<=kd zrX-yaag z8w0q-jX)kGwDc28-Ip##EJMg{_EC~kkphJMNt$8dSaoM9VPE*^sF|ULT3TB`^)E`0 z@g>TS^3E;b66;EqT34#3sBza?Oh)lWOigPV zUZ7N(?D3wjd|paONXSHNe7)F+Qpu^h}4M^nS@xe zMIswx5SaoDWTPY+Fwl}^izX}@Xb~boQdFUdCQMjjj6pylC}AOHrOvTzR8ksCNfyPh zP-MnLDG^B`!$g>-#?eNxqZ*_NH3_1OYAj+(Fbx9{C?ZTyv>7&#DkE62jRv66w3UrA zOs1mLMgX9sgi>KifQd%PwH7vJvQ`UYL5Pf4+Kr+NQ6-a6pwNtD3W_l%1SCvJfv7PS zG?>QK7Rg44(Ty7uH5k^!V;e|eEMqWiLP&#X&{P_YjA)}$YZVD8M$uw6D5TiaBxs0{ zM5xV#qZ&5G#B3HIHKHt!m|rmZf5m-E;`haUL*n$!l4(f7CQ3;n!U;twB$1kvH8Unq zv65vZlO+a9WSUIMnN37Ng-K?RGNPtYf>3G*$(lxpCX)?g8kE{)F{V-_@oSHFNg&CEnE=U_WK5YOWYa97GYpF?S(_CWXLZuhq?Q!LB4r~< z6v;_tlQxQe^2n2{JJZ*WWyl4y%K}FPXrW7A-f``q-Q8Av!Cr2C9gVW{V;UN%*HF>xf z2{GpA<(e6&_TEuL4giVR6h*a7lWajy=AooiUa-UuIf_xpCq%u}4Z;Z`+z_QghJ^_N zkty74L`Zi}2z$9tPqbm_^8jz~#5x6cz&;+zg8Aj3NQb`pGk;7>wIeN znA%&LmWT^QN^QBR-5Da#W1C$xT1Y}MkYN;L84#F!?*9LTczcWhFI|EPY+OWSMp_Mm zBJDTMK;KusJJY3T^-w`wdI&HiX3!IQ2=>4)VW=lm>se^_@^QncORK)wx~A(0ym}2P z8QZl`<$`nb$+@bXj#McL1QQ^Lv;qkA_L~HG08Asj5j->wD5#xyD{x#v;ldlJ^}!B^ zjUsXScJhx(Ao%?99fJy;gR;^cP|!p*k6g}BA+e-RZnQ#5s*SeQ@}C{H;JOY65}Jk}6XDDPb-bb7$xfdK zo^r|IXy^){k!AuxAQ^&Ysmv1K;we``F2>#BDeB?el4%QwIq-Qh@)(6gs+LvAU6mt= zA{fO~#A{)(5$$t0@mPrwAxBAJn_&MYHWArz%sWa|51fFR9K2(?W3!4neXtUg5IRUb zL>=S~bp%`-vR4ps3NU~n&~k+!2T%mJoS^?qutR)DYKEG_wa`GZ-fRADb@R}OQ zH%-As?+xOV9z4M)K-g>!mo@<&Rse$TD)gi6^f5AN%ChKOR8%Gt2JT@8!Sy#0oxf)W8ravTfXX9Et}h_q6q z6S@GjO0XJHP~=cWwdcSoT~sRUTBah7MMSWmL|CXzfRr@Q$`mEwi6sdXOM-=_v9uY1 z5T>cYoI0JP9F1;*7)G@m4(19sG_lAA0#kN7J{!It2|-OnNleKG8j6%MBE^$pA~qO= zf=B~EBmj{ecA0P^vIlh(1p{!JlN(K4zUp}oJ6`eC<_@XVJ9c}9)6aX+?tWIi=ij~a z7{7k>|Gob2`{i0Onatc){M@X5SCyEB(Csy^-fIP4Mh(QSHy31$;arie1@zWlavZkR zvG%&N%qI`cuPDEQt&L6>@cI=?n+x*C$d5co8)dkol#q-t^JyLJTo0GYiGO_ImlS}> z!fa&S@GB{k^v;y!y~s$}1ly)v|DxDs63L8Bux`&CtbcS%UGe^vX~7YHmn{sfTV!4Bg+bcFt1++2K2_pSyAKL_A>jJwYg$W+;Shl4=n8!Z}EEG#1;XeU!$H3!Cexx)|A; zif$Ofo*$aBNTO_-od;WkI>f=#7`t$~;k=Kjxs_!zHi6sJ`WS62SQ^50GCB4b+9l2D z4)a=ZPT0sflaqNgg4T3BCL|&w9nx6woCm12jSRKJVVGrL!|ZH{kXi~9C{Yk7v2mFV zHoAew^D$Q^nnJ{dlQ$}8;7#}J4cRjgOtA6nQf^qO3V{9wx_(B9sgU(%|qQ ztWG0dBDNH)i3l|fQ*`(~_v5?|bHpA~*!j%&H-CHk&O^pf?c^Af67gqats&u#{}{T7 zwL*Hkw6^e+y2A3`oLgC)Wg>N@u5p)vUbeMa#`k5uEb-U9H&U5vYG!4cRoN~>ZVn_-r2R%OzarNKCkho-kDMhM$< zA5F1+X0kaXj;ViS+FbT#h#6ws9}*^%)=SDl*l}o-@VT`-gR`p*qXhQkA1TWyX#2`h z?OH+9?Thq0c}z&8rU}f{Ox2S+WX#+zyu9w|Dq)k}bbeTZ#jUOzIvP(z?Bgg#I7oTA z?X<&bX35qEVKS4qeM6SubXG3L!%)=MLTu20I`16ST6p7Rx@uI%OD)GAA~0zY@cM>D zcko)Xw866ppu3=Gq!D#-g|MQ0P+Y^gtfdZ6cAvGUcw{hMmNJGWwhUlYnW6k6WkNfy zQNdazxawuB4DwDVLbo{q_|Vki3mZhNsA*wAwUL$q=6wx^CGdV_-yp^iBfZ}t>u-r6 zfDqZeINm-(!0h3~8ZG17z4r2WKAuOyS#>KngXMzrYr1Zv2lqZxB***f znT*_Ox>hH<)V;BK>*E-f9G>$X*9P1-VM8E;E|RQUb-Uw2961?97^#u2M*#vWMaX#W zGegx&(`r?n^|Hhu#g&@>g~lbudP|_HWcV-62IHP8)kNs)-P))KM~R4I_?{ zaJZ?1$9mDEQD{`%;N6Q9Y)u0i;(T>_l*1dtD2IW`iP~rt|JAEP5@@I+WN9yEmL zZ+;i<2dW3iE=o=7!xsF`Mn?mgl)5r3TCmHHP$=v0Kg^&&wDu+GABJpDjMCET3nJ2^49;aUK}Ck4~? zJnj^ZJUTG~rAK6^PQMl8_77?PpNR1JvzF_o;jbrd@tE%Ks_<_!CFYJBH_aM8U0RK4 znbmUCH5S%nR*rTVT9zNFWK4Fd(<^ef%0ze7i`c(Ad`_Ia^0xxs*)tNP-5lNlIlhtU zlf>hlM>$s^Y@^B>A(sz{faqaVlNE6j9UW_@^n00BZhKYlL*R+@+R{`~aMw(L% zHRI9owC{@r1DE+(aY?YiDK_$Y&*nMGY;hf2#xeBiM_A7N07%g}jU(+YMfLNKb!qN$NaUEdMg-TGX{eq)Fc z<@GYJ#CyMX9=~+G&_mr{$JOffJJ#p=k28-)R`vJ!uAL7%y>KYm%Q`KWIic&Tn(nTa zmzezet*Df%H$56TIG|Mq-fpo zg%P4C3_!}_R$^ti4+64;@RkWaQsIFNrh`e;L=2B=5=pe{6GR>^VXRAzo81VoFOM_H z&%GoUFg1A-f=G1YT%46SIB@!bjKUqAsfvTVvT=NTA)?9{*WVoyOp+r8@an0Su{aCx z*O9b3Vn`kMG6fe>@A9N$ScW*PY>nLROrd*DXx>J~0Xt6Hy(J4q^;VUQ9=q&d% zUP)1=#~}JmK#|bseCh;o2U80LUJN~CuU@Ad_qvA9z_{NZfJq3ZGAPOP8NsV%@kA(C z*gYtfW2Q1kX5v155XA};3A}RJC|N?vg;azNVpA+Oe#)aqsV$uwI-2>X@$^_0!iuOc_24GO;?yWAOs8NFME)mDnh1vyAxK5a{MQl@Qu4z8y#KnU7 zakT*3s11`i$*{qy?;e_;Ov}g0-e0F4HSw&e@}6bs^?RPt^$%bKcl$B;bmi{b+;;4r zui0R(Me#?)_Dc1ma$T7GdtgodpD%Xo)kRe-ulzk?;V&k zUBORyVb#Bnm(1@!pRoJ?QX< zy7iz(#$$`yYxeZ1fQNvNMc=3R@DTU&*))32?u5H}onLUDzu%+;H%Dn>!1jGL9yhzM z>3t7?-Y>&3;(1)0dq@%I?J2q?I2qB;CH+?E5c1UOd3{E=Igm5rt?&NV=I$^=R&i}b z=fwHodWiYYH<9~+F2`}4IBd#;1>iYIW=4GSGqW@34^Pre{(n4eAx^D6gn!? zM&8_L{J5mJLXwnL_6Drh8pGQ*L;%o@r&*~|E(OH3@xYVJDQrA?Sr4SmFoHz;2Ltx< zE6YPG&S*>o*AEqG9u0*U+BQfB%a2@gV~BXzmY`QN*FTOQ$4Yo!>Ybq@qtzM}<5mvU(`l)LNY~IMv0uqz!;T`f41; zM*zSzd^3nnQjS5rLP0%|$p<0^X0+%V5B-&uj3uGi^^`#!Cj3Y#6p&9X{gGH!2JAK@ z7x*l^3R26}C(1((5dVZFS-Ym$!a^f-c^*fQX=nAeVKtiWfNxAA2w{ICj0+DPn$-7} zi%230grDD`jBm;0zvvETQ7FUykX!<(Cwn+d7&%Vt1-2&w#U)1*2&%?%<*;IB7a?+7 zty-QVy1BxHTsSxjaHz6ZL3XOvNTi8Wwhdm=+@z#Sjg2n$4ROj^owK}eVEY7su~@5g zW)Jb)L5eEKMQWdk#BQ8LM>m`bN`mgiv?mPGWZrKEi(u*z-o?6CyB3zN(@iAJNmCmd zOzL$v^H=Ej`GRJlocuq0L+e}IX&Bc{m-YOA6U^RHYBjf~Yny$3Ln#ZNfMqf=WGR}( zG(QM)Nx81`#&EoL8Vf?1Jm0hCwFhJ7CMC-9xXgzG!gkUautoIr;S5tHfnl4%(~HPr zVwxKt`Vi6_k4MiA(R+&OOQA07U_+sjg(1OeK65Cs$cv@#yc<&*Y`F|ru&oDTSXN#)y_}_+NND5NqKjZTMwRHYweXX|x zG9tWuM3S_x17iC%-qWKKZ%)RP8h?-Hj_K zhgLdtyi7Z~M&r6ata0B?kj321+}F$(Mh-SxZ5Q=(@mNypth6YK`mAuzmUX7@Z$j_z zf2JU~`PJ_3{@Z+39^@U&9d_XA$lrHu&NpORkHzfl!t%{4OR4n!4bNV9tG~&*AM(zg zI1as1zGG@9<}r6aD*)=|{k6zJn|97_=Hs2M>G|d@5k-V_dyb5(!Dzc*G6p&bo zL_w0aiK5sUjZze7P*G8wG!oI>ow{aG8Kp$hxz<>)O46d?h9RvMQPF7>U*KgCR|udy zA#?=iUYle*nIx>>Yj%-Ou+^y#sv z*rhbhsn=+t6myuZg>2~@i92LXh;rdp&K^$S5eHFcF(b1xQ3TnFvLmz=TF!?+*(o_> zE{LwD7_}zXUCSm>WJGsx*LJweFbd*JI8{_qj!rOzZg)jSmg}ypmbtkVqZTr4&Kk&; zR1}$$PSDw%4wFNO?cK4$E&*~nb_R?Kj3--ML^Cj{EJRF_jBEpv5h@oz$V%xJT;&36RIvn3k2PzjxZb`@8m3XtZa zLQ#<-2vn6J357c4<;h6M5bVTCEmnveP9ejQ7|EwPEe;ZGlrj|{q#&+w5;2w`%S4oE zOp4j=?$TQk2&D=zR3e=BKuHg}7F7w;US*8@}*Kux=3ZUtoq+JMuMXCs`su4!4iKa!!RyB~$t!F^4T-Qk( zITgEOcSUYO94<4myD1FnQq)k17OmTLHQekfY&G0ylUUW%3UxSpwR&%7I%*2wrbI}a z8rV$KCS8*`5GPA?q}AJbyn9zFBTTWQSfdshT)7n$(?+^ga^_`p*G;5}hO|8 zGN5qf#8iiLaH{iE$Z~VAlcCciF(~RZIf}rkkw(j8NK_qQj<|9Q+R7?dMYNE+UjGP%wltQ5gnQnX067r3A2*43ixZ(P1n|i3t{~G*l=cAy82S zf=QJi647E9(rs1|0YVVc!rM=AJp!3pH4Iv0tdVUCK@>BhLMR0?Q4~(Hxyb585h}@~ zToMrMT^#U`iB{&@fnBjWbgr|cU8*HeZ6qT~$fztP|XE)bHk zRjr#gK__mRCvv*Ex-t_nFw_GyY{Kr{Y@55OmM(45GcxYmvzd1mQnM;%Aqy%wP;~{I zxe?Q1NK8>pEeWV$bEYv|x~N1!=!M;4$f7F^hb|1{hhiO?kKAV&g# zxX!Fu(ON*ZQP4Xj1+uxw1T>b}MVyQ(X%Imuz?3K!B9d^Zfgm+0Mh7c}7Xcs;IYrn< zV@@=MYXC0DB}xh-W^V537EYkZjhgPEAw(p|lt%97u@ot!sYDqIR1h&sp{X#CSddyZ zkXH!jL|~Fa%8G?UV`gsalSYxw#XG3A*(fG+k;$^{Of`kVLpjw~PGe?kd#=(=Id&G4 zMdi9PYG*QBv7$}6x@6NRwsuRZ?6Fr$x`n3ENtY9e0m+0yGUTEhIZTa2i#mqc!h?yN ziGpCY*;6Z>M7eHmT`5YpH#SonT-&JzipJXI6}gntD5Gf6iJFqdu~8dEu3(EU&V_`| zU50mY8A|6;M5kvsm{LFK9oZZ(1Uf4Si-c1kE);wnY>!Yd>6;Lil`hPAuEb)nmQ6s= z)Q3jUnL$Sdn?ti%qQw)d3t*zIdy*WDSY(`ooV6h~L{kE!lQtZa)N-oYPIDJJnlfZ# zQP*yj19G}0A|`B$MwhoUvWkXbq^hH#BTSC7H1| zcCPNwNnl4|G9f``fU%claJh22q_UBbvLLugvsrNwY71#46k|hH1RV_#GqQ`FoLMyH zC4|7EM6BG@QYJ`4VJtPx+RiTS!r*cscA!LagrJ2>xMfl{M*^BuClKijLI~_4 zT8t{!r>_%SNu6uJ>-x zsZULAY#KL8Ac8>&vgHxWh>L6@VL;j!bE~dm;jPWCnp0+0T{_0DYV3?$X6CuKND3M& z3#URo1d4KUc2rbw^kv*3$SKY$5yUfM9T7p52P0M$nZukpvXG36l%1y(NScBnCnQ2R zktnMgtX0nAq14p5!<{a)3xU!l3lKn-7eu*Gip^F;wVWcE5u0QfNG(N@CrD179_KFb zdkBK=s_ep@8tb&^?2&I>xEV;ux4Ws=ZotdAIwmZY&0N_Gn=+Xu=H-ozlI770Cc%p& zf>_rsp=~R!w&^mtqq53qgOdp2K^=*lPS)_b6dog+88tJyyC%s;Q%kOr+os%MlO?BJ zXo#^hrsZ8t(y^?uNaESY5!SvDtYAR5UFVl3=VaxkfA zjV=@zw1SdClrGwESs~U%#D$QZb={_6ZF5~qG&GcK?$DwOp(2AUrks`$(}7GCh8IXK z$_u0tWJ!cF)=kopW;Qm8>DgB;(KSaac9X8UQMAfHw#rOUrfD}S$0)Jg#bq4qE&)So zgGsR_CP0KzbE1UZOPEtk(Q>&M*2ckDqK>Y)x4PQw*j$Uzg(O7DMMjDMlMYvRTTFv< zl$2phu8niMW!GGdVztVqLYi~2PA4KJNsCK~P!y|Y2wJwBY`bMNnW@=KR4x}Fu2T+3 zbE2e+B^tuu&PCZ5AkBe8BBKENh%;S|!si zLQSNTZ2;zsWx#;QE(O(?kZSREnL`)n5JU}qdnK6@?#+92oY#UY9lVIVN5Bc zv})|Do0mv}HcLg#(#ED^vufs+V#OrxF){>*#711WqB0;3MFj=GK}$PG5Q0s!ScT2a zQ5sv9IogtwBFRjGh*Y^qO$Y^2m6#aI(`^i?+*V6SrqSiv88(fyRe83#q@umuURFz{ zsUi!Tro|;QrP-oXC2+JrqQHRGAqFO`Kn)nE)Fp`#$`o13gtE+YtEy2`H+9-AfXv3t zDB3qGnxdq|a;rNoQ%S6V6e3s@HI>N(Ngzr(&J+~Off035W0NkIOBQCCxo){G%;i%z zHFWOlGB#4PHjPZWS1S}-n(0N$l}5B}jP2P<*EP$P7V2`*q(T#h(WKH2qfT-zG*vV= zbF5c3iZvFLENin;Xsec)X_kXar(E5gl}Ut64xNSAoMIC>G$aX$Ct{+D2;&Is3$Y}a z6va;J6issHE_BxBDF-THixmrHaA-pjS;c6L7)XLZ6vDW1mo>73XyirHS46GNB^DAj z8)T@dLs6*{aIETg6Df$Q=8ev~McFZsH{;^o1)5; zOALu3F`?YZfXsa_1uHwMO_hx0y22Lp-^a zl_ICZ-n|vMyJpqU=8`O$S~E>0HFCO|VMDs+p*78`l^SfvD{?KHH4LbncCP6r_0&tL!xK+e}lup+uq=`*3Cs$Ehmc^v8 zQ?AvcY*#CqF-2T1oZPvn<QFJE*SOu12DFYb8pUsS?qmw30xaE&)3tM!z|;w}$vYFa!aEwYrY3gOrKwA$!)qqVtnSxM zS}m>@ob=JmVzib^ks^zMpbJ!jiUi4*XC=p6+n2$*73tO{i*qGwnncY`mfcOVRyC$$ zMO1AwmCaW%&1-bEHfu*nVpMaH42}%dkxdr1%G6tO<|>`l*jts(&=tiHqk{J zZfjo!c}2GJBDRW(lVY~yZlk7Hjo9_gww67VohdaQ?9XFhO2jXN|~c5WJ$(jo&Zdo?YY6iy%lLuF{uoZ zZj@`OwvN+@0&#^lT{|Thgf*R(lGZt`a?xD7HFH{$#ky_HS2aa4)vn5;Q%hP+2n6g- z6fn4ioD+c^wl>_=T-RpOg;zBoZHmRYZ5EBK%NuTO*`l;V6>MQlxPdT?mT<+0O}sM+ zo`Y$?tBEm-IL1>FbS-l!qgctAw%n@au4{7AZH#K8TCP&Nwyu`cXw?;sNo-m+t=X%$ z723BgTbo)nM%c9$+^m~rG$yhN13*iU0yOQp4czUqR=Kitb#}B?u(M*)YTpWS*xMGX z&w{Pzy6v%B8>u5rV6}|~<)}6ATam76u2`{AnQSJEW1X;8wgN(SQz@~R2Fe=csw#@B zweW7O=HghkD5{NVH)&dm*Cg7xZH;YQ)weWPH#Mu9b67NT8%{DajLf9$avO&SAQID9 z)m+S}HLh+}#jUtSV$ml{Rtl)BNX$v8Dyyc()N6BGwOrM6V%wD!Y*xiww<3+l8&ov~5wVVoMsaQDbecYSFd1wz*d-(W0%5SgjW-v9+tawyy5cYi~8-ZRHlO zZKAI#uTM2&ZLDpz%GJwlu|=<-9rvYZoo5=BhQfD%IxEtyfL1ZCu+MShZJ?sy4Y= z*EP#-Rkot5MS~~+6O3YZ(|`kz3EOSWXxz4|lxrH*a@yB6(XAC}HLI4jb6aXHtwy%g zRjh5fS2o<$wk>UP+OI`GDhi@pMW~~20UCgkDX6tojiTDDYSFgaM%LBkT8nDjwzXbu zTHBRYEGS3{B3xBOnDED;Jf6xtp#3SI5xc9YgMax6x{O$4u}!ovUIGa)#V&1!X&v#1 zjNZ{<3$sfXAds6Yu+2tC3>8vjz1=Y7-4!V^#evle;LD366O!gp$uTm8^C-m(FkotN z-4>*>DAySqEQ2i)rd-YlMoMeB1yb6tdX%|!MU2LAhEl`|@;K>%GEs1`cO0Z=vqgr? zRfsZ+DRJJxhBH?l95I!87?RL79I+(eq>>4_gr=mVb}&nhRiVP-mvqT<1=8e~qUDn} zk}zW~jAr1@dRg;7pwJBXWDGwiE}x?j5Tw$2=7{|r?k*}y50>GY_dxPIl1X~?!#R>= ziOL6(b$ak=Q>O_)xHluoYfy{P;(Z5#zC0|f4_JLo{0{rUp2y(b`h>qxtYZ{sKE;zd z6)t96tuExPCCN}qkUKNH%(N^xs}#~BOH!h$LX@Hq)blLPt20c?N+8Wl&hmh$7=MC83#v1Ic3pj&Uj_@J};J}L2AU$XuY)0xQjs|S=Q8mmeg0;-T~fZRV7piRkelx%89vN%%^ z3g?^sWIHnh=CU&p$dFA;M?K1K{)u)&d(M>wKP}DJbeXz%aWH)IwH2>X*4r`SR&NH)j>gV^A9IW@EhqkJOn#0nNF+;EaCZu&)XzE>+rjo z5$xBn*y;FXWyZ!;3rqYy$(a3+d7EaP|2I+ejhU-o(W3q4?wGA_JbyU!e?!cPtEJ5q zb$4I?UvB;mKUyd)MCY&3`IqQMk<@5rT-heCH8`;3mpSFbWV7F#a{O!ta8vj~T8Nzv zSy*xx5>|ru6ZwheZSvJDq?yA^kogT%Ud_rgzB9fy{KQIn7!H5eoa%dh_&Bc)GQWEm z`LfsUeSJ6&3;ZXLMl&J)K5HAN$0Z#`{_gx!uoC$5MymL2bjkp5^0W!xcbI=VG?cyt za9C0bty)Dc3H3K@@r923veJq#S*TuF2?ZCbc#VdYW#(KCLtW$c}G z?rz+)u!w z*U>M>=v$W5PwpQPXO^GrOie9T#Aa+m52m=2)^ZG4Y{llqYT96`V;Y>-UqwUQwY>^( ziS?Ou|AhUFfii9bJkr=`Fq0LeWph<<83loimaW?x_*S3Z0AogIXWsU+j%|*S57gzB z^fp>Sv5m!#HEviYr)d|jx}fs>w*2`g4g^#Edy=eNQA_htQg<0?$=Vw8(U7PK=D6i( z;=Tu;Eg89%$9QxDyH%h6>{V;=#?YTm*Efclfy#(2uUhsNu3U8QpF2Mvi<%2xQ@+># z^Mr(TTMFNx(^B4jny|ZY+gA%7{9EQHiPJZF{%+(JUip^y=kcc(gA_j=^OF>3{dnW; zHKHu>-#xn*-VA%Rdn|I5x{6}6T?jitc=zt7&@1Qj1{)mCh+*qXPVrmW+$V2bu{P$JodTrAmYcdT@V~e&vSUT91 zaB$fr&s!`m@YGmV4z<}IT%sXG|M}_s5qRBQM`c=1Ni>m1>2*1-Q^y2p` z%NA_d99%Pc`}vEDFHb50Fk6?f^{*IjR+F38rMzf7k~ijx()Rw+75dY&e`OeD;j2&1 zeAqFlSsJ~91ir)(R;M%OKMqbvP6)I;<`{;Di$opzmoS6%*tQ$tcKb*L1FVfKVof)(4H*FI%?Df3?OJA0o)i09B%XF4|zy+f!S zBg^!{zYje6*|=m;$4_%;KaKFWhs(p>zReV>1ef@{nJpj!{P!y>n=gOA?YFb)EpHjl zgUCMKGN$`O^|A9W^WF#M^2;M}p$D;RpC_#S=Rf0jmRx(6(2$g&(!Z@;e;-=8{N)ix zhu%=QO#y9WGMA`Lp(C%sx8h!*_K$T}Pe9L7XvExvPX<4~!9-OyKCL_+*Y+<2zwd48kk9_aSJe%|A$b0Ul3lDqTao;GiU)(+3 z*`WMy=IzywOn=+nLk9w!!V7;d*?zf}z4G59b(?<&bmpL^7X9=0?t{wqZ=T2kLVe{e z!c+g)j|R4n@yAe_TsGdZmALfHeq!Q@h##K0>gq{77YyM)ZL3b*W}vOvSxw7oaO)7b z$>xG+jH*{s4RhV;_-K9L89w!sJ}`{e-dPc8soAUpHzvL8oFw+v9Db(TX8)sUnUcP{ z1$PpyUzS_<<%8U8)Vjgc6;|MOQphN*C3>oLeSfTwJM=K^;hQ~I_i?}7{oO8ATgGck z2zp=I_oH`Xud(xMTY2A#a<+av{cC>hWZ(CXKbLjA`Y(CXoZc9^^oRG{r{Tv<*S`Ms zxM&g`$s)YbMen7wo}m;vQ{(6mhV}(C{)$8yOeIb#aSJ&aPCJL_hWOj?7dEmpqZm4FyJ#21X!e7)}nFX8IEo} zR}&{Iqd0sG1O?INl29!kR5XzN&(^I`Jrox_jv?|jv9nO9=hMo3@&uk@ncjw;xktqJ zsWhCi0Gy~v)a>uTMBqniIHhUSe2`T%fw;)G`J_1vXr*NWg(3mIG^>h{y?!T6r&6QM`9?O zQcMK30|V*NT3)1h9Tuvc0-LQfBOe9>X5o{BlGv@O^%zRc6dcfF>6U_%s5CN*3?rt2 zAZXd4Q*lzM&0l0AFhyq z2ja2xZ>xr?JXb{uMMMQi%g3kY z=OEounW{gZ!JmS))r>chJK6@T=AbYNMU~BQ|2(Nh($PGmu#Arew)4pM@1>EzIu<%> zBp_;6ab4`%m*TFHnVI`H?RQfsFov6?rI!vd3=fLkB5LwN%gNU|5)`H*!I^3bP)gaA zITYj=Mhwz*jBIUI+QQxpjR}0E@UE=N)}9A8anvMbx4&yd!^&42==jsS=gd2#gMFzrN891=y1rcLsA z^{A==dzWj-GQBKFp+IM)Ev^W;Z-no?_Lmh0u6AnmE$f*CQe@>R?CVfbyAtDB_GD3 z#>!k?EW||)AQYabIL$ARc7m(jbA#00AuFERmAUnkVs`qogmH7d_jXar&zr1W)yV#$ zj&6luS%5-mhnEK5WM8k>C=$&v`W##S4y$l5_W`=LXa3CPng((o{N@hZWR#UbA&=`$ z!mET4I4sNpbd^wv>d1N`z}rp}Al!rWJCwMhUDjTE99$emrA;%dD$=Xdpv zv$I1zilLSKX3Y2Wb3bpQ#j=9MJ*zfOMnuogIuo2cC9rfv+z6# z=$Q{wF(X9h4Cl#wpbi-|B$5+C7dwWGDh;{EE%D~FP-xQpK|Ue8E|t6(Y4aij4M7Ab zUxB??=|P$mN=8msTLf=_4tMhe5fR|=AsMfcpae7BOlh`#+Wn@nV{5GBl?9(O4?Ucc zt!brS9N=QYY~$_IGEV_1Pd~WBh3gh01m_EMm@uETZ@SNy1PY1klh7Sw(IC8b49`s+ zv$M@=Ycfp+ubSeG$oh>v>+_P1C}lVC$o?EtUr}{>(bmoW9W4A%dBNrKOx>0D@Tt@I zA_%dYhm{l4AXSqw5gIl9WBanHx1^aU{<(^gHa}9!rbP_ z7h8n`@&KsKEtZ=U57WW77EdgJJH~5S2y>*3&sPmny~fl_N)3aKHv~@7-8Pa-WA`ax zdR^zcP`nvuHzi|(H8i=+6s*;%aB6cX0y;*kwV_R>z}j-6QULJ!M<99OWk~c`Qa6*+ z!cG#Ga-&n&#!B`e2%bi21@>w)At}g)n&_lD9@f;n*c^qJB0bzceaYm4q>gpd~mO>xZ zUyVN8Io5t|JZrS^>XwXXiienSC>1+(_rxNNj}L%Zjyz^usZLz)a5KAPG?to z>-hzBCIfiuzVmeeCPIvDRI5dvuFe;fq##@xUq6ACsdwe76-2F8Nxrm303YG_q-IJG zzr3cYfPDT<`Y4mB(v(j$g*)7bL1^W2VRCP(Zxj~K1_Ti3)S6`UL+>TTZT z%|k=%ex768oBJvY%QmRb7vxT)c6DWlgYFm{qt=3WzRwLT0J*cNrHmk#ySEuAnu;LF zU}9)Ho8ao}G^#1>Q)a>?9IqYap|cCXK8eD`X!EbaOS}b0cb1nQE@~&Dd`j+2XM5Es zrGOlBVBf^?%=An^@sjg1&O5taoQ`}a=zV_dJmu~wDk$c39%JeHu2$^ryf@BTa-06l z=IYza_uWRQV-1TBtzNV1)vlR!dshVP-9oxswBe_tJNM1=jTENqNt`@?f5OPg2YD+) z3d_<8H(h>VI8923oe5~1v1N{IyZ`a~$lO!Kh3o4un__f@h_frUtc>0T*s^ec=943( zui4vf2A+DbV&cgX%hq($(2Lk3)qPBD=HvZGZVW%zv#+Z<0TfH=W({x4ecf?;MMEUQ z9rs{Ke(2ln)U^)y?G0sEj&?{5?dsX#5ihn&Vp z3bzRLMlS`B7iCNg=?P94mN590ZIOg{ z2vA4!2=rsfzG1(-g>6n*y?;7Cr4CFafGI&d>46+0 zPRc&iGd_mYkkGDeSDsxm(=9@v=@7v)q_5-yg~_2ZTv;TvPfMm)>=NO?MYD*RAAvl@ zP2{wt_>Y{^XKr4ShDSo{po`-J&B@3-cwKm^P;bv`2t`W}1A|nicayZXkAv3ouT$(C zZv(FKCRs zq;}2>_1~C`U!2XWfGo)edL%SU_KRF|`n!=EV5U4RBFxBS14H@HIv`RJj~|+Oom7TG zB;45-+|mF2fi>X7$hJLF2BHCv3CVGG4XMD!~NOzhwpiLXQtOKWF)~U zH0R-;-#Eif*rVahc{msVDbGgQ^VrV1RrTh4#=-OB^(7R4xxU8EoXtkZ3kOsnn82N} zR0!EBz`~#^Jee#M&~1I$P_I^Cng?g{nKVm$-pliu_5{}vKY5yl}JNJ51tvXjNOlJ`Eh3EWd#yg?j-1d zf+ay1+72g$uVZqc4zU_d!GQ5bD_kgM?2`2|u~1}+NYKJxf1aa#PY`Ck1ZJ%~;F{Gx|8>Sx~D9oLF#-|wo zi|uLg?73hw3~mBS=oEK2jxT(;9?uyD=qYA=o>{2X!O>E_JkBDe+>r<@`=$!J% zF`nV98muBwkpB1#36TY~9yndlb)|2WHD4r0bH-)|AifWV#7S5wWIEjEtaT<+m_Q~& zD7~rU*#m*{&jYH229`g|rR8e<|y5o^ZsoP55+ zgRycZ0<>PX!73UxA-AH==?Ak3!mf@s2u3j?x$qgTc>STlXT4N0QAnw3#j9}?J=5FD zMCU_;@Dv2poEq#dK$^lXs?l%&a74;Q`M?4pfHO&0sHhnZf|0#kemIpCsE7`)qvpdP z$c};b7;ukTJ3&x~^#U7MSOB9Tq)LXQxNIX?m5CNrq+ZP>kc2p&1X1dQPHi`}ovPlG zK6PUyXD4jIaPcYqq4^X_!mBsyyB7VvC+y=Uzk^oDFJH}XU1@bWoGfAnlcF6A4?@e} zURzH~O^a8n(S+g|P_m4e77o3hx&AWE9-{E_w%s4Ta7O`dPmh}ftZQ3Sy#=S_I+bh}=EKe~>mVJha-PUn;Isv~r(z~xbbH9Yt z?S&t{4S$9*+!}+{WV|>{dH!tXcKrI2$Xi?27dkhk4~cW%10FoyQnL2^!IY@f@^v!- zU1wp~tWHDuz3h~v#LSgN-0)|2$nIA!I=f9>3ibE6^zBK(ov|amf&J)QMQlMRYF|;? z=6xBRZwevRGkXqfl0Oh1Hr!6oE94RFU(W}by0A>j^FKjLiAPh+nicS7= zN;BrnPcdWLlRR{a%Te0G)e@kYFzCd>8-n?YZsFHn}0Dn>-n!s%c+nh`mF zcAp5a(v%UQ2tagXBjU__xqJ?Z6at9TLgkU`e+U)%U%2r>I`>f5ALsA?eS8gSc;d|$ z)=x--vE|<^f*?oRTTYqvD3mS=*k zO<5Xw&3y2~6>mCkU7dPkT$4Ufe5m^0(c~ZZ6Q6Bef2Q?A$RC*}&hoS;ADLAL*Y5wT zI{Q15c>TMqZ4MS&!479-3Z9>{JZLe$+HQy?{1Q8GcGqZV*0rHF`U53u=SJ7A-7<|BH^6duz>7i3+vmMqazx5BjFIsc$>4tQ=^&D5X{A|(X zXM6wrb5~DCRi9d@+DdrXXU(a*reauXr+ZFdq`N!J_ZDPJMsK~?x^)E)d5hCNcE8ED zX7c{N87KX$=-z0ndda!Tl+INW+hsheN+TiE2Kq?`g{kyZM`Z*N=y!8{aFxm$BSyhz)U$^zH?6H`x?S!3YV|Gn{q`p`!Ze72%?H=%5*q23@wPICMsRxdcjDB6E5%n69zHKPHvRnaSW+MNmn)O^1y5QxuM|(wLCZFb7J7Cry-=VJ zME_*83=Lgs4{@3gaK@1Lck8LUi)zPuH)kA($*Q|tV1;-k6Q}-Knv?a}K->8?BUP01 zTKVwq!@Xu!h;yc(Z_LDR-nDO!@RZw*Y5FZ|yK~;;_ZuqsJA1m$Ux=u_{N2vo#q`b3 z*CGAGHn_HL9Db0Nqr3fv6_V0@r}OB$J$Ll#{daeAUS>+0e!G`cz2e==iJq+9Vd4Ej z_j|#hc}dssUd1J$X3Zr`ZBOQ(my6B_uYKh@d|z+_0lpDK{h0tc$W}!ZP$3kw!Rk{3HPM-@2`h9 z?s~v|JvIG)-0n>A%3gnV_+$G8af4|_80+=)3MSbG8X{*)TlvHAg>Q#`lv;<72iA%^|FVMlgh1Z_-MIhY`RO?^O}S^-uvD37xLfDcjVt^ zz9>G>b%!xsJIn!O>=$=^Z!!so@9*{ZC8;ylZ+=)Dx#WjHWaEG*LcpcuEkWl0&duu1g;e^J90)X z+o}Z1*|$=VSKEZ=Gm3VFqHCIWC3m;3o?hCcA8HG;C9i$7`A}szt6<5iy<>epmnps| z%;V*Wv*_k#fitd6YctV$+pAORTFf6CNR^2>v3JhDb-X*49~3anso2c!?7{{ttbZW5 z;tcre^VBDfZE1~|6+i4O1Rck1-(zj+YujuEDDRK`acuIR74I~Xp3yiPrvCoHZ(^DQ z){VaYl06NvG-h(+x7IR@qTwGe9LU;_?X!p7tV)6x%Hb@U=dEedR&kyk;;CXtZi)TPwSFrq6Y$6nwp&ZR%{QWB4XOuJ9p+NK7R7e`j|e&DED$V?BJb_ zTx7A8{giGVdB9uuJ-VM{Zb99&I0n4vxQ?uLP6PL_cd%`R>H?ve3CfBf&b2}%;dv&X)7bUu z$!YsX{zKF|vhoh>*}Lp}Syl~fCyPYlel`SYjaB`6FtQ?x%L;f$sh<}U6Vs>|Xd2Y^@UDeteb=|GIi?zohAL7VP8ZujyFeu{H6k zEag1Z=okbry?MWWV57m8pivdPyg4q*&6jNr0t4(YYJ*T zYGBat^>^8iz2?BSI&ToZ?$sfxuhCHOPv#GN%VgQy$K1@%n;ngPF@YMu&oV zWPu{H&cE4O__MaA!FvwA1Fbc zUh9{#aIwN~9|;KDwBgO1FVq|4+fVpuHay#MN8bPG$Lf&jGiS$?L#GeVIk*yd2gjXX zl}gxvTg+X3WcS10-aOs#cVX1pe)@J{`OQ4Sb+=#p_OEaJ@>8K~B73v1O?*)cjXe0D z&1)i`HN0?b4h!8^w(jS#CFa2Ldv`88MgIH~{&Gn6X9ec(SA_ZMt|9g}rme?KXCn%@ zvA^6yCERm%jVC(ayK{cq{_BN;5ax7$eUokx*HosHsCpMH&A0ZKl3>0Z%)0l$Ca ze6iuT>96l$E~v!q*tOr>`Stq%S-5`?js(>>e(Wc28eZuD*WL=lu~E>fRPBO;U7Q)Z zZtcTG{35kAl5xU@ku<$rOCN1n(=7iL~AAQ5in%T|iEBepMV z#IU^=z|RUsj{rWBwpzbsZB=ehug%sB{}`w``z5m1r`paBBXUl1y8uf6f) zG$VnS5ZnIfhvf97U*?=){2MC$opTCWcDUYALH2EO$CW$;D-Vg<+x$K!y3R|cC72@F zAel(iPJL99B=lxnyN^d4cQwWUxzSQFs!RrQwW}Gks^}4k!sEoaND2?lhzV)pjTjpd z4%@(ZJ<-u5Bm3IbV6{~;idm!h46ww&gF-Cx!toe!O@V>ZK zEJxnXdm6{eQ}T3DK9Quho(Pe$^-``! zFdI!mbv46CZX=G=#5l+6$pmI9#b83Vj;T#B@sX(ux_)u0PY64n#q-w3HRDkEq&4H%Tv-R+6yk1pIXKoMiZ!yAm2G`O#Y5@=>iWGDvS$D?qlwnjC` z1y+lroLGh%>~V}_C5v3@ut|%n8IlG^XB#I|+hg)^YRE;qH3HZ-K8a|_qPw^RavRCT zg&SR&;56RsuY{`5j^bTz$@rKz2Sl=s!Y2q?pVMG-*P;}d`QyNN2!e=c$JH@KBxHlj zDCsCLj!$4*DVB=3-aZ_MBSH6R2{4N~KM%jdRelCJtHdc!V|RN1K05{7?Zw-&2sXsP z88^-1aIwYMh`cn2k~T(&8{@v=vj80>4QptTNJq*;^x-nR zE98vBbg|M@(`zzQDy$HzzY9*xmdt`;(*6ZB?_zGoFkITiI9f`l*7m6;MfoDTwq>Fr zKZmS<1*zRYu8vkUEN+rQh-Eu4Bu-pn|w5TeLmk1C5ZuM&caHyf^tSaM;^~l6{8TA@#gr{3ARhlX{TClP$a1iofN1y zs`(?5@5_MgufBB$L+fLSF(05c|am@Sz@XhoSB3gWmj+fX%8 z$1BSc>lVuCE{7U1&_}Nt;-*XlMEOb@f`Anvd>9E8;?S#!sL<4U6DkGD#Q=@CdGYhd zXf6y%5u(YbxY!1;CdxyHsNtpN{9uzcxc(@d6$+&KNAAcL+V#V@>^Mrjl)+|@&-5AO zc_~L}uGV;AtFX5F))F|f6^`#yG=!2^{s^Lx+!LZ*>L@G6kEG6F*JoCS`tNbQCUIcY`)LBz+MLm91*+Kt!WG; znFy&PEB!I$qQ<%)o6l*xc^x=-(W|kU!dmzib%4-pYBA56cMypjyU75Q!NMGFj(eCD zZjqaZY4&hZJiKZ=Oe;esWy8|KF+7qjDL+DlbD6XG6?mpy+QKtQZ;@>-+bANNNU8PO z`+~9s#BjH2NNn>p<3_kr7pQzvfMde#G-~M}EnqOp;~-Rxh#XDA9hTvYS(FR2N`q%M zwdUu8EE6qJbB%a{^*yE zai#~)7eY0_7W3qrdtV3qw3~7cJi^7ONf4hb0-}upvimtBS$NKkvVoJB2ogvQ%+mIS@J0rsi38n6;Z266WJ+2&!Wj{bg6(YX4w>HO zXcVq8i)ULs3sp6#qkZ4FNt+9PvGQi=?8iGjs z#dsMVqbmTTh$>DquMIvbCy2%@Eg(=>8p$Ospm4f5D!nkDBJyRDO>7Cm(H7?J59?7z zkSIcx&xVR>gL@{^Bnqn}CSRgeXJbep?GTgXo}H1(SGk(%KtPk-1{~1k3&@)sZGmIJ_GHG6k!=0o>~v=hvkGgQ^3fBRQUwOApmHH5TfJF`fvfC; zv&($C!hz!qlld-<+2^oEkW54g5*6;$MYD*eWZIw;uTdeRz@;=}kc(qMdl8dql=%2W zi?=zX#VFKhApVhpV6p`+3#;O1oAaZvd@tMtGm%YhBZ&}V4Q~~-YmBZ2WXMm>xX%s$VcFBi_5Pi00q%|JapdSPb4A?FX%qBr?fe2OQGFT#c z(2Oj@36S-v3WT;#I5Cg!gw*=P<%9T}K}1{06ucFK^BhIoOo8!RILiE-1(f(y5R6h0MU6^ZN%)1vK` zZfXuZMN34&?86ijAB31_A*I-p)QNgK-!>!;mxa0T1JarSLS7C?@$_??p{zKWu@* z%TbaPH-tk}BHm0h`4jOnNH=eYkppcY>FxTYc#&H}(tBFsGbF4eh}^7TAkoU8@{6?% z7-c*%yOkrRSxFQaoIj9_tn$TEQ*Go3DA{BsX~2PfaSeEzR>D+9Nrl?%lrSPOLmOh^ z%Z0VJyYbj0bjl=L2GKFe0+&di2IS^Rxh5M5(Ugbg*=!A1vd61cXzW-DlbV`?7{rnL zJUXOqHaAz&029u`jbtKCS!BJrJQNu(KpIT~JX;Lm^hMGJECcgRxL%fc7T1omQ6u@{ zDzhKdtFABxh*e&rj?)@h2kA2_0+`Yvlg7^0n`|S3fLghkS!MHC)1YTEv@RH}TqlT( z5<>N>oG>(5$BYN+0_1eMT$yK#-hq?G3pHZC0BVz)O-&BYB$eJkfCx<_Bat&uCKTqg z;*-ivw!0=hk2u6&N+|Oi%*tH4TsNUl@Q&u?+(!xik)c7{H|I z$+$BT9>C{M#N~%kf(HtKHR$NMl(3}4(7;bB;yM)p)x9OZ15yDLznXH@{C(Wx8^YI) z18+UP6;Hl3XH)HvgO{>s4Yc>(oE({Dt9e7P;H$va%oU$fx$2Xc zA-^5`%Oq{@#orDUA3(t{n(R_YSt7suKy1xMK>g8oi)K0+@3LNW?uq2hJptP2+35Q+ z@7b4Mh8=wbKwr2w^JCz{B>guq=I|eH$L{R>1#wHn|Lg1jeEf^%t%z%zae%M>cCBBN zyCmuRtG>4VLH9WCE}Fj_TwhNe|L6MS`lV)ODDSB^@mAdenuRF{yBSv>eO@ivus2iZ z|ML1T>%RsqTur&g*qEAhdu`b1Jq?Tj)fdKe=Z+6Icq1%G(3^RQ3PJo4*!K|1#L+Xi zul#xXvdS&}@h<{H5pDGBNd+I^mdffh0E?J*mb`jde15M9$^I1)S{!!W{`Y?Z`%CMtpJx!6&O*{sJ#llV z*_m;CN`LGnJh*&+hBH5XwY$Re=pgN7BftKKPVj#geIAmDS}}2? z_#U(O`JGcyuh;-m`ioY-#2;UpXv_Y%_4&1A{5MO^pB!G<7P?^bl09i}1cL$o`Qg7^ zidm1bt*TwO_vYBh$fV64zD7Sf^!vcjHi5<+xt>IR*@4dsFWz)wB7fiVGDTa&hFK%a zmBH`l4E{P#kVt}Xk8N(r{Vd?b=C#$OC}F9LgEeEJr_!Cf^2hZ(5C6dzpJ9K4e0F!W zVamlgAvh&R?b_kHf6PvJ|zjHnw@O)_h@%Q$Rpax0DrHFTT_Ke0z zS%Fu|Ag`u=OL*9~?zr^c;nUJ<)v-}83e81+L)l5hZ+Z3r=&_&>x2tpc$6Jv{b?)T{ zUIZ@ZWAp|$)4WDY8VXqP%AQs33268eThktNkh6+ayq0*Zr~avgY`7~_yva8tV-bg# z6|72D&JWjuesJKn-OVZYtsnZOzan^ucO`vCMVOPmZduY%(#C-DC->WLr~OKcga;Pe zDgn*=78lB&ELka0o4&n6`G`6t(M8i>EwCw!Jz3925i4@?Yuy`K5nQ$2Gm$w9n= zJ@fF`l8Q2@C>38p|KaX`5x4Go>X-SSxr~Tts`wRv^rYQ_q|_3raK+*@cxqzDMPX6} z8NCM`$6-ZHPNW&Z-^-WfpT7R8WBB?t`;#f>k>J{m+B4E3dT-OEQ=y(lfG(fh8|LiY z1;J!<&kSzc-^S}0T8CWt@m9h6MS1Hp>GPIvXgYjgTVq)G#^Wm`HgG^B_l&7*)BR=! zPkxP?zHIZVNh0%A#j={D9nLFe%Fg7jkkpNH&mWbQ`yD#BSkU>$+V~K(J!o%2YWz$3 z-=suE1MR)gPR*)HpOj_&^~G-5`R5byIYq}A z=ex?nL#q?hnrW{){yu#xv;EXouWn|;r-ivV615H#etU`P+dx9m{EFM3e;H7uxRxZ3 zDiD0TJeWh=zME=VK7HqL92=PX=*5y#NreHV8vV2Qc$BKRUa$FN;|~@TJHGI7wVg$G zj#mc4gS}(v?ugSqko503GjiX1_8#Vpl;_deDQ$A9y~n2$?z+%=FKExneeinvU-Hq? zw%djKqP@GOw{U=8+Z8uT3O(M%mVF|_hKRAiicBJ;v@_`n@mT~a_mM3Y>-St@qMl`y zzgk9>cYZeuwo4;co}O<2IvA0a3mYb2q#rH!ob=BkSFm3!UEyF~uJ{C}1(ISbrZO{R8gl2Yx<&GPUJ0F*_lTxvJ~q%6iR0+U4mD0BXMcF8b87`^V{%qm82J zggw_Br)QQH)ZNhMF23==x6uOWSP&S~+56T!wd`~?yQvktf&295*D-MYWAaqoR7b*- z`+Vn(Pow`xa1l>zS)B*CTC+Xkx4OAaVh`KXYvDp(9zSnn&?|abs_JsZE7f$61^vqa zOAV|`(gjt->Z%fLPU)YZ3{S)Kfuq+jc&=UVavhL=*J13_MV!p8}?Z zqw-fwewKDtv+?E!##_UxV_%Uf1C6GsqS}(cLNUxs}U1i<%CHnzw--I#*U_aWWcL3@wx|Sl&JQ z=IDTUUMT>6nHu%S?O!_Zv7+JJdo-gf7xZY8;|H$v!1}TKPsS5^{>khnLt*S3#{NB9_xy`;HtvzkghTNuA?+#zM zqj|RONhM%Q&E8utZa(=%h5VeHe1hh`_ip3r0(4j8@-yCogT0B`>`nWL^m2FT)t@lWUgsc?zCH$Vj|Ca>B5B(3ERB-NBQtl{_QAhS83I2} zD>%H)8=^9NN*{4i5AEjq{>z2$`EK{Q)%Sn94S62p9XywZb|8PfIP;fsOJQ>8vdq_4 zHp_5*=SKf(KECJv?#Lwt#BGwczsfPy+k@c2yinA=*6IKmVa`y;x}Hn6FZNqOHLnWQ z7{$h&;QnevrS zmS1dVJ}rK=D+0ZpeiFBL*$8nbPk5BQWo0s%X^-wCOyC630OUE)_66-Tlb?MK#U1@R zsAvst$GGs)Y3;fsX82c@g=i4y6Oo{pyk*Z%Z9gp@m_Kn?7SNy!3|jwwt+bQTD8dRC zx&0?*_6HxyzI14sp4>7|a|blOVc^72@ms;tKR)%px$XrEg?QCuM<2Oaw`Og`irB{e zFC~4!E3UFGmM_oeAf^ljx%#;;D3N|Uf<3*wKe%2%l>_uGGeS+j2C zhJ?DG+*u-DLncUa%2!%f8KxoL?LVx>S0! zq$MIeJt1$YU{~XQ!-sk|^5~k)T-y&tZO#{cyb_k zTF1Yh#|T-*Mwa(K<2_rX;19ZAq&H}fBA)lqG7M|aR^Mv?SWY8r4rlxPzAl|4J9)>h ze%YYh=03Hf@w>Ia$4L79zP;5S*5{Ae)lVcnshdOFsJS}-1^QKu8#POhh|3=V{z2LI z=khgwp4im!<^+ZmSafacL@zl^ungG==UAXMOVw2|8fo^T4~|!?_&kQ#n&bGxvi3uv zEBx(G2k-o;ex1I)r`6DM^3u|)a!F7ByXn3LGPrUPQNQMTuNnM*8afYuHrM|T*WQlA zsM#7pM5qexA?uzTUr(uQ6Dtu1@{Sr}nw_Sw%ZIy>v6oBxbbZkPD@vg+h|U;N@+yKyR-4V5Dm@<+zeVxqFlMJUjxnKE$X!?SMWgdW@>7zwr? zD{y`A6W$e!sf)xMTHvlm=Hp&#y9HG6gzgROf@S&XY_~_62aHG`DX^*PH(PMP_RTp1 z>5$c;QnP6f%5ypC?4E#z_S}XxPX|k8;_;J>#)R5OgoXbIBY?2aYC?z^!;z+&cJQ0G zr{6V7zgP-rnGA(`E!7kihcE2C-k2zV9yvfw#d?7;Yd0nw z)IA@DsK@TVDEvj*SNN0u1}Kb0!wJZ%`z zH+<+mhVGT(4ZSz3yb$uP$O2r4h~rXgi_T^bLPq%vFdIDhf^V_I*orEu+aq~Q2{ z(`z}roCCbdQwNy%wL|YLOefa91ok?qL0^+HbJEvPNEq*(_cG=zgomY#a|Fg4J)pWZk>G;7EU5<1HZxlm+EZ7 zKYC;0?v_%nDpseQtPD`S`+s%fhJrCYvMwZ>fLcCm^Sd9Y$Y{ zU+g_vz0_tssVt}dcks{RmkIyq-(r^jQ_A7!RTjgu`#h|j!z#1lJ-A@yX5A8_UFEPWi6K(SaH~V5=naYoJ_p2a$udXr*AVD_PdqaOYE+64Ynx-$IpsK73a-?OoBzg7@hNmy=WTT$kM%jYYP*zBtqN z*HgV(^fu;$A9q-Mq3X&N+h0C>Ydsaio|?LXNK${iV+}U*PR^u<}y^47=Ge^1RZf6fg2~er_Y!%Sk7%u^u|S z(D6`7yv8FuDjUWn6!?47cHdMRzuvC#apIf+oAyKJ_R7e9$E9}3uzw9?-e9>mcg7}Y z#Hou9JrH+xnCPvkWlhd7)*lm)wpOaer++bdcS!4putY@{pF`8|p^=%}7EKbq8LU^g z`v`Ahf;lR9|>oSHVvniuI3P`sJ9C3M+ldd=^ zreCu-Ub@ObT=!yxFvo?fr9~TraXCrofcsKW$;M9B-D9A$+6I&#vP|XIQJEc=f^adh z#xb%mEcD)Zo?yl$!nxT%By~f*2mB}|m;zUgq<#rxt(1(xoSTuG%|t%j zrKr}?nCqF%p14KEL)8km3eP)`i!khI;;Jvy%dxhejLV)lN?x{4Q$7!p*Y^3ygP0wP zTrdh{&eeDFfeMyafBzHR;e*A+1pQkFf{RkzmW+1f8mQCeiqY5ny?Ti21i>Y$F2nHi zb47>MCY@b6Fu|`~($KkoFQVCbY*>70O5-Kzd}eYyUsU|icKt=x*ZG}*!5 zZ1)O?(95pdN@^Rw$<=d8OJpQ+&#OiR`9|YokA#22n#RYWQiex5VG+tXxJoUXG_=rl zoTihI{sR#^paVV6OpQlmXL^(G*`(q#zYPevNI(<#t!2?_ULRAZ#KZaEmNDc;ul?No zn3iEhvQCkFA=5(&olwljn)-HYL*mH;xQr;@5Iy~7Orhm$oXIUi*O^C{h`OA;_$MI^ zZZ4tGX*y;SJDOVkZ8vQ4{z|pTNtOZ(*=rBt`hiv4N{RYnk<56+6RoCY>}Q!L$$1#Q z{`~DHedaZpnPxjWR8YSynwAJ_Qjo}NJAL~d-S~b9ayzF_&^RdGsOhv3`o|+XJkeNt zMyYb<^(bmRD}x0b7-lxr%&58xD^uEh=k8m5AmYb#ykEzZUZQJykW}sq71~WtoIj{k zEEGDgdC{!r9d}##XT^i;ypyT9H~pi64^c{L396u|-pX)b=!~_8`*DtcK zTexZufwq`?&qmT?cw{C^oHwtT`eJA=7tQR|aH9^rj+S z-Zb0LTbF$K`gx+If4VW3727{acYY;nX}!GvMEeZQSa|>CXUMydSJ?mk{+YBQ@-_3c z_jd4)PuuQG_76ZO43_?!@Eh-1-JjV?;OB{1{0QA)Do1?}TYIWr-@m+m;9pC<~r< z?=m2%IQP~`NcYhdm!hcf3q|e_r{G5@EJIkCFb=O80>YQ+4=_^Boxf#1J-=4-K3Q9D z?dK6wq^1A^3G_^kB8bJEwKW}%jDm)36wy?FfZ z%g5nIf8HO3lz|rVNoWcgK>}tvAeCS$gg`XS4>XBXK?zbO^r(e8rRgdB*@t8G_20eMSUAvJVcj&$IJnl3*wa6%tb8<1RJOYB2p)lmNE zQL45OcuEpYRo8XX_jj$5tfnb}2U1jQYV`_0_mB=V6koK1w-&t=$&H4NbEDf8{U>Bp zr~!Zye>dOhwfc6GmZDTpYpt57nzT(V$`(px%>z`1gGbT)9sq^{sMJDdR5VbT9*9jF zPE})7``SrUbsgzwa$RB9eHtIUT%3uW-;AqM$OsS3s=lML@ zipY(;GTaABHO@ErlU@Fu0G89eX_e>-%$Q>#0jQx4sGm6`>;DQ zm^i*LO%rB!F+kAdL4UXQ#61cF3UalyVn=YYTZ%oL_riX#VS_%)7_J)ozwn%#$^^jXD+))yR^zaNp6o+TYg9Uzcy4 zoZ#6K*5qqLZ)K-X$*%z}nz!x3>_x zU}xCYsdk}FKp9e}(l7t&emyr16c0(RImbGtKMnZ3-+ zc+M5h)i2j&;b6LbA8(a!@LS0}chCImw4puuU4^QnO;nnq0wrNu%PcKik@(3Hbb%d# zGo+J&;+%>(*l+~4v$81!cJ!oU4@4qg=e2}}mlr_R^3z0ajEbdP&yDdIx! zkaLW)ld4Dsr^f|{`ciu))cDuq{@-=C;y*|5)_b}{;}m?BBoLR{?;ILk;^gzaCuH`) z@A?IslWKZ%sLfT|J|^JeJ#)oyQhY;M?yqXj)1d~TXRwO0%EzAc7l`E`RS;(?1-)dK z9{2fPvLQbkhV#jIeKy8y@ScfW;*S`5ofjWmtx`UP$X@5lx4K9IGx~!69_yDuZYN!n zeWvO$S+PYqJWJRo(-MO_*l<8-w+)DcS4G@j#NKZE*i+Ior*DMuZfA=eB9Lx$mZ0S%VjhTB@|UpHU%(Q{V?FVX6z&EZ}OqZK~k6YPf4@?B0eZyY)|< z-fkbWshM*`@nrD0^T3leW|8W*3{oY{M2?Ku^ElEuPd-TH8Ed>rnY3Rj9B;<*f27tl*=;@lkl=}{lbUxFlF9y+23h$W2vGb z&P4CrMNu`CDjWLuDmRqy9}$!Y7^Ag*!5mi4DQe_m`9PEOF~JwlHm}&FkhgJbPUz2F ze_pnFuV*6Gu~QBq@%uAYY*w<|Jn_W+uJ0P5EcoY6b<-*T*MW~i=NFdp;AU#}qOrGK z@jh#G4KW7i={;zMGh2N20pIJSKp z%m2y!^Gfx{vy{D`1|R>pOrs*3^V{^q`=^~H`<=CtH%#nwe>rJ7tZNdKZ`QYi2=DfC zTs4Xs-be1oH2)ivWzrk=`*A${1;6u;vPaM13_tVmrH@Lp3*7Ub_4`0T+NDsX$04mB zzg)TU%Ft&-UMsA$1Qwb(>HWWWQLXZs?D-j|tkA%0Khs^fCX0_q=s_)yRdG)sm|^ z_IRXNV|!iQ(c}g0E3@G%->%8_`tU-ujH%jr#X+_3!G*=p|7!`czF`g2kAfcKib07I->P$<%JZxyd04%}{80$^=>G{6l$KRRYTh_I2^i`b z8x6VA_9^Y5UBq+SG3o!M?|(CPISp?PO30Cp=zt+}t@b|@k1&+SC& zA$86-+xa+o3up8`tt$PO7Ul58V&iNd^3{-voWnuMYXO>4rt9@FGlLmyJH&%g@I%rA zm25U?m>N7|z}WV?Kb9swIAM|hJh&E8!N2F1x?m;gi10AZ(!k>jHmCzh*}*5d$u;2H z3|RxE%p&0-i3#$)dB00qroXXVbEIB(y-uF<_cAT(1wDS-A*RNhlm{NE(*FzbG>a~+rct+x^SrF!3u zk*)SzSrSl^gq^>WIibhK^v_l;>U2IiIqaovxvBU+z#xHRCB&}K$QLfnKMV#!W`Q)cR&xHgU9pC9%gwg6; zt0_gxq0DN1&&DwK^lr>UvA8Tx9C_2}$!*o}{LW!gct^lL$9?>9Ju}+>5E?^wMrXq} zi#B!(4eT~f+Cg^-z``#wA7weqtRp|O#&Ul6UuoiWD3TCJG<<6yc-`c~NLu_t%n^a`QeVzp^n;(|_V(%k}+?4gbv#P{H zPnx-wI_@nop8m$+ldmY3-OO3}r^JX7RmLj3{L-lZaM&jab?=oKPpWaE1tLt-#(~a* z5UR~q)gAUz2^3aZo5bb0&yCKnTa4ec3hr`z0OzO{z>%PCS8TbA1INhS*M(ydc6*P} zbVsqX?CU&MEpL>^7b7og&~7_77=dyb5!(x{rz#}D(y{wwdu7MK5Od>8_F^psFHpxa zcb@g@x!9ZU8#oC*d`B@U9XBp#MDW-%62vGy?&SsXIOjvh1i^0+|6Fs}z{Ov?wnSRd zelB-S)*9aJ7p(9|O!nkwKlWDHpgtQblM?YJ|M=E56+y<_9+7d@&}62M59o~=HFkWX zW@YFUX80YD0)7xbt)u=F&Ke~jWYxlFlgR0c2SWl_%MWJE_-I3vFviGwU+2AykW{Bo zWsPHHEvdu)uh)@9s$CnGM1g)Y;Vo?VDskqWhe=-s!uRyb7`er|Q7bPa!jzhzVTYxM zcb*nJ!lbc8Gka%=-+&h{B)KVmyk>ziSw&DUT!{Q?5J-PmZdCO5qbz6l@$x$ zeV7d|q0A&S9DSE7+X@PUQu;r+6*r&QUwxn8GjZ^K`Z(NzD5k}$v#;jRTibjmJ!~sn zKrPyLuYwa;u4BC&M@Xre-elOWnjR+0KXxj81=ZHnorfkfQU=05@p)crBLd%|!WNec zaW<*WG`RnQl(iga-N)gLeN+{gK8IVbTt-p!RLrwaOrvg5d~!S~7M0^QQ8@lReX%w- zt~TXGYeIrG0w_w%D;!+YUXnb!Pi8m>dxp9EBm2H!SiZC;^Uw%Uw#mV3Jh(t(p}x{x zX?sW+C%QtJ96{%znnkff*vx)0GxOrU=tS5hSA=A52!MqOk-wUJV=Vh&Phu>7AO)HC z)p6GK40T1RYWqfHsW?lULqce)z{8MY{g)8sqdD23N78HD>`#4FQ1J@^p|;r=U#(E^ zUFVz!=~>(swV3jpS4I0{HEd@B$r(+beV^Xl_2YolT!TpZ9p=r`;+zjzJD;Kd0LNO! z$)u5q0bh>DhDy4Hqfn#|)|VkPxXaK+o%76lEV@V9BbRp&Qj%H+V8{_f#lBy zaaA_niQCbPXeK7=qm!tdmHjEL9#VMf&TokNc~NN(N9t%-H0P@vP44)c=N_ZJu9`8Nz|v9D}mt<-?ht>XT|$!ZiP&{i1gea3_{T>jfAP9ibae@ zV+z35sV?DOv)AIMpzTY6?K(Gna%ev;#N@Po48A69OK~_xKFZ0i`d=LGvD?b&TT_J_ z750j5;K6QH{!FZcs7O+Ef?AwvFa z1tVInMa$@_LImZV5Pafa^URfj6h!{bkw&i1$;_NpE*-&)rI`t9?EFHBbt?*Tw4tP_ z*dpTvGeuDdB9W2)&+W%@RE=?9VUNkFM3odLLr1d53$WQuvxcDi<*C0LX`hB|Tr7pLKeTrj{ z2ofb}ui!c7Gw6M2V3-!;#<87ArrLp*2BUbIRGK)pQ2^qGu#2)Lat%lF!9Au^`faBE zjvT8QpS-cQZ)R~*vF7%D+iF>(!{@xw$6Z0Hs!EYTdj{H18i(wUu(aVVd2D<~h-W+W zuG~6t^>sk}zk@Z=KuY6HWH@GB+S* zb_Pcq>RBNp^5q?b>hiT}(6?j-7SyZlfC;u-!&+3qI)I4Q)nHJ8+spw;4(i!pn_Iff z>3XrwZSPedNJ0~4oWTSchC}W7?PkiZn)!*`S4DZ{MaSAby3Xt0koxJp?0Gm)iM!<; zBaLAo5cV9~X6$7n_f>~WKrKXm(fNKiV7jl%Z9ST#73U~y%`>S?khGUn`*u0sfg)z= z$ouUY-&6V&#a09N`D#NR=KGz$|1+}~zwC&lpYj`rJzag5P_Z%kAT{m78HnWYUCjTp zWKZeNd$<@R_)>=Q(vRkX#kQ+=Lq z6J|V0Zf+8LmsQ$%@?v=N+v{=OTX`byV2}76S|@)`QMSrBB zAw|h`<>FJP75tBikYIhvMP$s@gTtgZY)r7@Ja+fGREu7HiI}?_8M->$RrTf8-~a3j zz243AF8yOZX{47D89A407rB)Z`CHpHHmB>)^z=Azy65wfnOs_VFz@GF^wBS1Q=>3% z`1oIEuHUH+V+*R8x)QwqM-s;l)NBoyD_Mp}Tji+*d};U9k-63yIc*{G@6!k4+*MQl z%~wZ!+b-OzRP9dpmxV`N`8kwOf_(aa3mloa>R0iA-@kirhN-t2cAkfCN>c4D;t_vh z<~7;3yPca&)7VFQ*}PX))Q4$PZfq|b2oG#N*5LV@mzma9MZXg5W%&oG?(xt0hLU=e z(rVxj*&bfAB4#W(QZgxz%PGNo^n$u2Zin)|)*xYI#la9-ssHE&jzHI z)I$_sPvk^&{t5hj$tyC4Q_pMcDJjwaR+b`FE&A@$tev>hX*<8v!zFP2-IdV;IzP@w0ys7^o z-Z(xOgvLq#o&RO0;B5=dVC?R~#OFSjnSk`#?;7iR$7u<_#H_D16nyr7_f0VH^Yc+C zcPWp`b`6cCDef;6qlORZ%>Cai2sM3g~$%ET}%lyMS zak=4%`Ioi7>wPq$cA!W9=h*Fe+r8D7ceg&nA4NUhFP`3dfBEhT2#NhGcWeX=o^-;3 z`+gLC|Ks`f?tii8&gDDM+uQT2I$x0Bw6ZI01szQkUDWh{8@Fa+e=HzZcEPgM^UbXV(-!r%Aa%5zeuX9Pxub8*D)(^O@?f)io?t6u_o8F+c*#!7 zqmQ^}U*f>EAaXG-0v|bOg;69$1xAkG>mfPOF{2fmrKO6bQmJz4sI}3$@v7LiBftC` z6Ap=X1)~`&83(0|3)W#4ZO!Gzt+|LLcTn8XL$@px;XW6=*;v*MFg|gv!miffOOi{k z9-nr%>}%ONQP%ODiEd+W%=aW2Z|%~Q5ZulhIWsKEx}VBwykDHO8mKf*ap`T$YmwZo zI0MCF6Qv6I0BsZY7_MOpMTjK=w5%qYk7!SAOU^XPkkK4*%d$xKl~z%OHETDm*SiR0 zR8XYG$93#!6I#oq!&Rvxu5`WyczSIbg0n)ASI9e+$5~+wBTFI`_yYVK+C4Ct zxV4ejJk!!{lO> zFTYqi=gLRJ06vQ975=9=ae3%P)M32hAy}s;&W$Xs7)c3PT3du*wBWoaR8`br zu-mjpEF#{|LBoT`!-^z*=aYr9~M1vyLZy04{;O@|wxspeeS+GAU-$&At?Xcv&I;UdRX>TFksKl4)E zhesr+>PGA8a7Q|UO+wA;SXZV8h<`!M>9M%iYqUo~b?F ztiJj+rUW?>B5%(nNtvTd4~|Grw7B<{WFb3x%oW@ROgK*{oU?(Rd`9MR(MWU)#21Hu zqs}rCL+VGg3}faStkR<#jDcb`b4w*QP#X>DaR>)}&;+Q+4>qouatClvw;ZvkrPgu1 ze)!%Ze~0OIoO`_eiO9^0D8YJO6FCXvxs(Zi#{j_mtuBS41w3j$GecvlHqf7tx^RNX z@r1lPU#Q;wD*WkfMo>@#dL$m#`^mJ*=M+OgYOBo8#Xx4!wYWmHx;zRl7l0{9~0u*Gsgkq7aJg7oix;0s} z;a#R%pMlz{U%R`CwLy@Nxh#^^XJEBI29o0T#%JEw?Oh91Du3IAmA|KB5nSD25EWLq zV%}QYQdaGJ>e&ZgYr}1lCxp)l%RsqQZEzW^GKLOkgS+M{D}}7f8pI#?c(0(K4)=P8mZpr zeiaGuTuoV&c}^dcO{qr3bu<7IRwPV?qu1}D&8F%uFWL8=j})xf`yr?{z@&pvCt z=Lsl~Rp?>XPR6@#(I7`H4dm%oL=DKrq_=m!*ZH6^Rc{ogS)t7E_dVVsmCEu|ZC55v%oSUYnNL$$O2pO%MLwqOQ)_W3Bpk8Wp z9#hN=P)0^z=@$6SdE%$uirATKrR;-yt-0ena86EwzR#p&i2m#eJ$;QC%4jJ=khgk3 zzCF@ZC%8pBK-k(yhdPxfTTY35N1fzy^wKC_5XYu^~Ya&?lK^a`;Q4XrInvtYEGn_U)mVxag{Z5y(=A*UT} zE?KQYB0D>RQaD3(QxmFc>k6^&J+xX><8V^bP6~9I>6j6h+X|yh`7T*4X4mSKq`?6b z7y$}rkyKS#eyD`HsDipRDRssRg;e7wPqqy zaIvCG)4P&x`PLDc3R%~2hXTVRJc{-Rn)pGIxPfO7{D^6%8>$vK8-d?y3RO{1iqSuj zi`ybYA;%^dWcz(z$+$>mkxF4XfKR;XC#H$W-c()%OF@C4zaoS)M@*bH51v~`HUNR_PDRh?4d$Ld#ndZ0E5K zVg_%wPDerX$?Cm*#8qWA4T(T%K~d~#kZpVEgtlgBch4qz#XnRxSf9GkU51c3Z%t__ z%yHewMM0D8LBsD-)GGZ4cf?$fWoGuOLehBo+Ib5!!j;Z7iiu8&$_L;zkS@03F|3(d zXOyQ&?YZB*spznW<$kQcYDe`naA1Z{toq>!mFw5?3fQ+X7l94Z@GPGuDQ>CNFl3KM zOq2V599R*Sq^M^SphdlaH@?@Nxl)K%<2^q+RC$k$d{NUZ9F5s28q+bPX)aQxmTXSc zLi(ut*wu+&Xl(6p-&ptI8#IB-v=|O=aD`PGD@F5-`-u86uwyDY`jbAQ=mHittC3$- zQ63tBg2+^BU?dPsmlHo-S zPWI)t+)T7OXSxNye66gaf&yW{*xz%irL1%C^w76JSIyk%#WH!_ALl_W1hfPI3-w`Z zTD?w!D*+v=54{M1IZW1swrf@JqKa_b@QKRc>mY$*l#!x}M%DSfj$(D*YZJ{XZNoXO zmua-%TSApRp>S|8N?pD+tD~GNuboxqCdB36d3xd}(MTx}m(g^D8V-2d(bg)+%TCip z12ZveE8yC`7DtGcJ7vAfK!2Wa8V~a)i`sBzrk~8&KL@Z%s4T(}`J~IX5V~2ItCtB3 z8Rgrw$Oh9yD9+CE5^!$bVr!p3mwMiMT+AfM6NVRpCs%IcqOB^NCq{W7AJ6eBe5aabQBO`(MrEhm zCb8Fjzs*BJKc^>}n6nt}m4#pF$4$7A;v)hAQ0j>Z`v(Zez>c|=A{#0)Kw1|~Wwmp_ zCSOSP+V|EUY_&VoPv96-x1v)|20uVP{p`g?_M{9{}nVc4&d?5)9?p8+Xwx_ld zMqD(e4D6YKgo7!%S@}75kgR1!s|!`A3n}cFtO{N#(rekpZ>{am^q?Ik9f4#!Pgq=b zPb^HCS`bK}#*74y)VH^0?($2L@+5Os&<#1^(fG9{LP79S?nS;lC!ORM(yxb4XxbXn zgxRCeG6cS-(b7rcT@gsz1s12S&gZSzwp}3P=Gi2?j;0@H;5{WW=k>OFI`~yinVy|h zp=qP>p%Rnf5S0#<{gzPl1~h`ObeH}fMbGb8S zWk^G=O>axElBj-T+o~h3W}(};dQ(bK-D&1^f2qYl3SmFy4ZvJ6)2ErG=2{?u96a8u zo#cEdY!X8g?8YllhW7=L#RB))!$r*VEX!OQ0>PUhCC$;rkRE3PJ4V|Gvn9MmY=+zx z-rm=yvDn56MKl&G(wfXjC+t$Q!^f?8q?1C|d8@`Uaj(n|eonU*JX{(28VnS@v8a(1 z-8tW>4hSPSOmtF}!?3IuaV-I>j{0rrjTYjNo%G~+Q-sw-XLdv=vA)yRI{0)`#V*h< zWGgH*a?^F=Kz|-rYN7oiIWEqk+!v4_^g_Ve0|m{=2UT~WU|j*88q)N&t<6GWPF%Q3 zr>CLbNpZ-Eg*}Jn+;-k7Br~AXj^*J38L2JRI}v_HVUt%3Q=@3BtnGIm^uaXy!U#6x zd1;NTxXHEV7T0FtSfE|-rss>!(GC4WH8-O^?P!UpewboV^acMYm9;iD%BuRgNO%N^ zZpJsqbjP26t1hvPHBOT)*bZ^Ou;7k}sb~XPWOGkwgp==*ljPt@wRPB> zD64c_bC&4L7x{!UK|9G=113iH*Q!V$b;|UFlLsHf(L;H?cV9mQ{K$>ZJj2J`CgG z=WbtM>#h-DwXu&2Z$?DpS5{#}rf+U|$6}#*6ARsV2B7#8gz-RU4 z&|AyG7nUT>H*@}ZO;2DaY+<9oS)I7Gu?lMmEu86sz#2A1gmcw)j;I4UUmM*5CnwH)Qjobo3!Udcn2=0m zAiXKGQE|M1xY9#dDuS^>qupD=>6-xyY#9T|W$o+#-G!<9YMI@!&H4EdgU?+wUvzacKSU>jiW2OC{5zfdU$ZOeN0LI5rgV1qz_ z);2ZS<3Q|HVVv8e6)CbS4F@ZzhOW$p58>hc;q;aHjt;+YKiAIY9A|ZN6K+1C?C5)g zyD~Q3+7r!O=HVB(&BZ`m00@L``$cuwG*oY(*#fVT7XkH& z;hj$xOkRGF?C_;a1QtQf6<{ttrD;3@l6V0s^CemV2> zF4*vCrZyiJj~W*Q`Qys#n#q@+bYuRuWxH}NL+&ZOhv#kB8X0|-6_({{_Uv9u`n?j# zx2^0YA~-F<5H=P@d!Fiz=`7!BsZXuY<1JRK^ber=y8)~r!Oomm9j);(rMY_Fdr~NQ z`CYT~_D~Q)r9kkcFy;EoE_0{F50Gq_lwJ*A#}||`uOe^jbcSo7clSqJ_ih==@(HhU zORA@0!)}dNyD-KFZYw52;6nX{vck<|Kc?j;XOsv6)5IJm)YAEv^C)6%I0i4B!KD&< z!R!(I1H7fxHEY+dvbKj2pJF0QB|Eqr25bc5CK*`iM*3seM^+morR2%|d*S~9Kj{|% diff --git a/man/EUCAST.Rd b/man/EUCAST.Rd index f2d752f6..6fc83ff0 100755 --- a/man/EUCAST.Rd +++ b/man/EUCAST.Rd @@ -3,14 +3,23 @@ \name{EUCAST_rules} \alias{EUCAST_rules} \alias{interpretive_reading} -\title{EUCAST expert rules} +\title{EUCAST rules} \source{ -EUCAST Expert Rules Version 2.0: \cr - Leclercq et al. \strong{EUCAST expert rules in antimicrobial susceptibility testing.} \emph{Clin Microbiol Infect.} 2013;19(2):141-60. \cr - \url{https://doi.org/10.1111/j.1469-0691.2011.03703.x} \cr - \cr - EUCAST Expert Rules Version 3.1 (Intrinsic Resistance and Exceptional Phenotypes Tables): \cr - \url{http://www.eucast.org/fileadmin/src/media/PDFs/EUCAST_files/Expert_Rules/Expert_rules_intrinsic_exceptional_V3.1.pdf} +\itemize{ + \item{ + EUCAST Expert Rules. Version 2.0, 2012. \cr + Leclercq et al. \strong{EUCAST expert rules in antimicrobial susceptibility testing.} \emph{Clin Microbiol Infect.} 2013;19(2):141-60. \cr + \url{https://doi.org/10.1111/j.1469-0691.2011.03703.x} + } + \item{ + EUCAST Expert Rules, Intrinsic Resistance and Exceptional Phenotypes Tables. Version 3.1, 2016. \cr + \url{http://www.eucast.org/fileadmin/src/media/PDFs/EUCAST_files/Expert_Rules/Expert_rules_intrinsic_exceptional_V3.1.pdf} + } + \item{ + EUCAST Breakpoint tables for interpretation of MICs and zone diameters. Version 8.1, 2018. \cr + \url{http://www.eucast.org/fileadmin/src/media/PDFs/EUCAST_files/Breakpoint_tables/v_8.1_Breakpoint_Tables.xlsx} + } + } } \usage{ EUCAST_rules(tbl, col_mo = "mo", info = TRUE, amcl = "amcl", @@ -25,11 +34,11 @@ EUCAST_rules(tbl, col_mo = "mo", info = TRUE, amcl = "amcl", line = "line", mero = "mero", mezl = "mezl", mino = "mino", moxi = "moxi", nali = "nali", neom = "neom", neti = "neti", nitr = "nitr", norf = "norf", novo = "novo", oflo = "oflo", - peni = "peni", pita = "pita", poly = "poly", pris = "pris", - qida = "qida", rifa = "rifa", roxi = "roxi", siso = "siso", - teic = "teic", tetr = "tetr", tica = "tica", tige = "tige", - tobr = "tobr", trim = "trim", trsu = "trsu", vanc = "vanc", - col_bactid = "bactid") + oxac = "oxac", peni = "peni", pita = "pita", poly = "poly", + pris = "pris", qida = "qida", rifa = "rifa", roxi = "roxi", + siso = "siso", teic = "teic", tetr = "tetr", tica = "tica", + tige = "tige", tobr = "tobr", trim = "trim", trsu = "trsu", + vanc = "vanc", col_bactid = "bactid", verbose = FALSE) interpretive_reading(...) } @@ -40,23 +49,25 @@ interpretive_reading(...) \item{info}{print progress} -\item{amcl, amik, amox, ampi, azit, azlo, aztr, cefa, cfep, cfot, cfox, cfra, cfta, cftr, cfur, chlo, cipr, clar, clin, clox, coli, czol, dapt, doxy, erta, eryt, fosf, fusi, gent, imip, kana, levo, linc, line, mero, mezl, mino, moxi, nali, neom, neti, nitr, norf, novo, oflo, peni, pita, poly, pris, qida, rifa, roxi, siso, teic, tetr, tica, tige, tobr, trim, trsu, vanc}{column name of an antibiotic. Use \code{NA} to skip a column, like \code{tica = NA}. Non-existing columns will anyway be skipped. See the Antibiotics section for an explanation of the abbreviations.} +\item{amcl, amik, amox, ampi, azit, azlo, aztr, cefa, cfep, cfot, cfox, cfra, cfta, cftr, cfur, chlo, cipr, clar, clin, clox, coli, czol, dapt, doxy, erta, eryt, fosf, fusi, gent, imip, kana, levo, linc, line, mero, mezl, mino, moxi, nali, neom, neti, nitr, norf, novo, oflo, oxac, peni, pita, poly, pris, qida, rifa, roxi, siso, teic, tetr, tica, tige, tobr, trim, trsu, vanc}{column name of an antibiotic. Use \code{NA} to skip a column, like \code{tica = NA}. Non-existing columns will anyway be skipped. See the Antibiotics section for an explanation of the abbreviations.} \item{col_bactid}{Deprecated. Use \code{col_mo} instead.} +\item{verbose}{a logical to indicate whether extensive info should be printed to the console about which rows and columns are effected with their old and new values} + \item{...}{parameters that are passed on to \code{EUCAST_rules}} } \value{ table with edited variables of antibiotics. } \description{ -Apply expert rules (like intrinsic resistance), as defined by the European Committee on Antimicrobial Susceptibility Testing (EUCAST, \url{http://eucast.org}), see \emph{Source}. +Apply susceptibility rules as defined by the European Committee on Antimicrobial Susceptibility Testing (EUCAST, \url{http://eucast.org}), see \emph{Source}. This includes (1) expert rules, (2) intrinsic resistance and (3) inferred resistance as defined in their breakpoint tables. } \section{Antibiotics}{ Abbrevations of the column containing antibiotics: - \strong{amcl}: amoxicillin and beta-lactamase inhibitor (\emph{J01CR02}), + \strong{amcl}: amoxicillin+clavulanic acid (\emph{J01CR02}), \strong{amik}: amikacin (\emph{J01GB06}), \strong{amox}: amoxicillin (\emph{J01CA04}), \strong{ampi}: ampicillin (\emph{J01CA01}), @@ -85,7 +96,7 @@ Abbrevations of the column containing antibiotics: \strong{fosf}: fosfomycin (\emph{J01XX01}), \strong{fusi}: fusidic acid (\emph{J01XC01}), \strong{gent}: gentamicin (\emph{J01GB03}), - \strong{imip}: imipenem and cilastatin (\emph{J01DH51}), + \strong{imip}: imipenem (\emph{J01DH51}), \strong{kana}: kanamycin (\emph{J01GB04}), \strong{levo}: levofloxacin (\emph{J01MA12}), \strong{linc}: lincomycin (\emph{J01FF02}), @@ -101,8 +112,8 @@ Abbrevations of the column containing antibiotics: \strong{norf}: norfloxacin (\emph{J01MA06}), \strong{novo}: novobiocin (an ATCvet code: \emph{QJ01XX95}), \strong{oflo}: ofloxacin (\emph{J01MA01}), - \strong{peni}: penicillins, combinations with other antibacterials (\emph{J01RA01}), - \strong{pita}: piperacillin and beta-lactamase inhibitor (\emph{J01CR05}), + \strong{peni}: penicillin (\emph{J01RA01}), + \strong{pita}: piperacillin+tazobactam (\emph{J01CR05}), \strong{poly}: polymyxin B (\emph{J01XB02}), \strong{pris}: pristinamycin (\emph{J01FG01}), \strong{qida}: quinupristin/dalfopristin (\emph{J01FG02}), diff --git a/man/MDRO.Rd b/man/MDRO.Rd index 9d8a63f6..7df3ac7c 100755 --- a/man/MDRO.Rd +++ b/man/MDRO.Rd @@ -175,7 +175,7 @@ When \code{country} will be left blank, guidelines will be taken from EUCAST Exp Abbrevations of the column containing antibiotics: - \strong{amcl}: amoxicillin and beta-lactamase inhibitor (\emph{J01CR02}), + \strong{amcl}: amoxicillin+clavulanic acid (\emph{J01CR02}), \strong{amik}: amikacin (\emph{J01GB06}), \strong{amox}: amoxicillin (\emph{J01CA04}), \strong{ampi}: ampicillin (\emph{J01CA01}), @@ -204,7 +204,7 @@ Abbrevations of the column containing antibiotics: \strong{fosf}: fosfomycin (\emph{J01XX01}), \strong{fusi}: fusidic acid (\emph{J01XC01}), \strong{gent}: gentamicin (\emph{J01GB03}), - \strong{imip}: imipenem and cilastatin (\emph{J01DH51}), + \strong{imip}: imipenem (\emph{J01DH51}), \strong{kana}: kanamycin (\emph{J01GB04}), \strong{levo}: levofloxacin (\emph{J01MA12}), \strong{linc}: lincomycin (\emph{J01FF02}), @@ -220,8 +220,8 @@ Abbrevations of the column containing antibiotics: \strong{norf}: norfloxacin (\emph{J01MA06}), \strong{novo}: novobiocin (an ATCvet code: \emph{QJ01XX95}), \strong{oflo}: ofloxacin (\emph{J01MA01}), - \strong{peni}: penicillins, combinations with other antibacterials (\emph{J01RA01}), - \strong{pita}: piperacillin and beta-lactamase inhibitor (\emph{J01CR05}), + \strong{peni}: penicillin (\emph{J01RA01}), + \strong{pita}: piperacillin+tazobactam (\emph{J01CR05}), \strong{poly}: polymyxin B (\emph{J01XB02}), \strong{pris}: pristinamycin (\emph{J01FG01}), \strong{qida}: quinupristin/dalfopristin (\emph{J01FG02}), diff --git a/man/as.mic.Rd b/man/as.mic.Rd index 02e0ef53..3a178ade 100755 --- a/man/as.mic.Rd +++ b/man/as.mic.Rd @@ -15,7 +15,7 @@ is.mic(x) \item{na.rm}{a logical indicating whether missing values should be removed} } \value{ -Ordered factor with new class \code{mic} and new attribute \code{package} +Ordered factor with new class \code{mic} } \description{ This transforms a vector to a new class \code{mic}, which is an ordered factor with valid MIC values as levels. Invalid MIC values will be translated as \code{NA} with a warning. diff --git a/man/as.rsi.Rd b/man/as.rsi.Rd index 92a97c24..4e6ff224 100755 --- a/man/as.rsi.Rd +++ b/man/as.rsi.Rd @@ -16,7 +16,7 @@ is.rsi.eligible(x) \item{x}{vector} } \value{ -Ordered factor with new class \code{rsi} and new attribute \code{package} +Ordered factor with new class \code{rsi} } \description{ This transforms a vector to a new class \code{rsi}, which is an ordered factor with levels \code{S < I < R}. Invalid antimicrobial interpretations will be translated as \code{NA} with a warning. diff --git a/man/figures/rsi_example2.png b/man/figures/rsi_example2.png index 399a8b48b0e66510d9efbc16db98a1269c07d5d5..392d75b8d43af942ba816ef17517b0b103df53c4 100644 GIT binary patch literal 28227 zcmc$`1yo$w)-_6$4jO`62o)^26P$!1xVr~;cTYlq!h>6Y;O_1gAh^2)cXxlgx^Lh2 z-TU3|*%<%-&ghKONmZTN=j^@LnrqIv%3nrG7!`>C2>}5CRa68jhk)>K4*}sp>mLun zzwlqqNP^QdYY|mD1O&7;_@4)zR@wRp2(J)Cq3;x&zwgYsXeg}SAs+1O_#FFeNN z&}gP*6=LdpQc((R*N|z(s!-R8k$V%vN=M_>jLN1VCW$K9x2lx-JLx?EwfG+p#+_H( zk67$Hy@>W%u&^-b&r)*av5%V;ER2XHLNO})#PeA)pCcCSP%kF$b!c4VZCz_YnJ$Pa;*dNgb zxO8f)#)GfoSh(N5ot&Dgpe1lORy>$CD`Kl6w8(x)ZXsg)A?gSI%oDyLi>wENpDx7SPeqC{lm@`UR#aj>XKx zq~gR8qiR)53(wutj^pWn7(7N2sY813YvB+c+ZC7!Elyy&A3Dj|>8XY3>#V}Uz2OY; zVLEnp_R7jiQy37HOBXet;1YHuL#pnUuy)}I}e9* z98+^>_0#8IbH;60;w^@2lFqu5C%~fJxG&zuy%=gkTJ$duAAIL{RPkMk!2r+jdqPcs zY}e?jZZ1vJs_&1ZW11}fkc`7^F5YPOFmT9?XNt&o(^Y*rk{0?1PC`(Vy(7N3HL_GT{4mP<=%wj4ve{9#|D zvpV}vKB`{bDK(b6>z(SJ4K}21`0r7FAlFtNz1U+`Ka<=lftdV-brk9}7(4phWi-Z|;>npy zSZeyI<6E}?;+AD$Q}c-7;?(u*R!f}_NrSFcW+!Fpm>}_SENQ+FD zqjui0f9UahdxRJ6SmWi%$^CO=4NRbl29EenR$F3?r>B&dXhB&{lD$Jf9XSSSF*{ZO zIdqhp`W*$zp6vVO+7&a()FP`t-anm|+MjV)Sa>p1xDE~W>Y7sE$VkteOL#KcJklYu zc!p_`F@Hue?mOLwr3D@m``&}9W`nW3S#0~R=R>IPRwI+5hZX7b8Wm-D&-LS5(cXiZ zG#oohaaF;;3s?Js_8tLE4qt|Z=F#17%&vs}CA8f5+gx?>9_xG^L(akaN@`!@oU1wk z>%1ptR%%Q}qfg`6boGj&Ad$ZgU!WHr_lTg{tESw>z`F?UDS_)8{uqM}0anGBo9H^B zvHNr11b;LuNB(V&(An1zWRKnY+^foR1bb@T=*Ff*uZse$K3u{zpT2L1IUbq z#V4+-t@8@ku6~v>XYI}l@mIZ{YzS;@6V9#cT4s27c>{6{F}LG$Ss9tZAMd?Cg#m zLHHn$b4`Eu9M{(Dak*aC$LMJ^H6mi~^@rVrk}t&XyX5`It$T6&kuCQt-23ubN7&8Y{DWS%26wT+=ITccm&` zWv%KUzxwx-p#ME3;o;$Y7r!5Y0}{{WuoZw!lPQ(xx;I-hI4EPOCm#=Cc$|2 z_@S?kN;G-u@%n(9o7?v0CY!@rZEY=>KAb0M&S)q+1^M~;aSe$DsD6_PL?GVLV^s?Oxq}G`*&&zW&PkdR9@9H1vf(RPB?2YKe*jR7*>%&S`&*eQ&a) zZDE0*l#~<#`C>376o_M!W<*d{Qo_VxwMfH&8HM|Rp~&zaw&QNGVVSbfOXcUtR6hj8 zR-`f!+zRTOd}gA=;@F=b&w7A4_v}p*c5-H3-psqOPds1@TwGi<%7rV(m(a+_NPROi zaj24#(!9~v@|Wn8M% z=t6FroUD#(_$Qr;D9B+o-%FQGssJuB zNDHDzP;jtvkrrK9Sm*MSr|_dY2K|pezR|n6xBwXJVD1jy_@m^&E*ySt`PL0ipPmX* zKLTe0lpGXrGGbbtm7= z2!)QgIo&#Er*-y2H?>N>HsCIiV-A2f()r@&*ptKOof`B$kyK{vg<52FqIH)6C4gYj8pw6%rrzB4h!_@V9gEt_D3)w%uZ zitv(3ZZznPWdlz{O9urJO+%$}$AX1L(8D9K!Yr%l_U!rP^rid!H_`@OUHYoy(?`ao z4lyt356XkxiWbDII*Tu8A!-=cAE#*0Vhm5wPfIl&?%pl8`b7j9CX3KyTmDv>=-|C@ zEZ?q5)8r5I5`of+FD!H?b2NWwjCN&m+t3=qo4_H%=ZtENebW&Bg(u<*5C6+85$LR~ z+&80>uQ3$o#ot1Wg7Pj~+=NbbE3tPG5>WvR$xHTXH2?U6Tc@>$dFJ}WW*W?vl+@wv zwaZN9ZFsVFrB0h0A;-(<;>9df!g(6Hf_kU@#bO-~tfb=s{t+IY?-_Xp28xL2^!H1F zHR_c=sc4g<6rHz~IC^fYV(Ww+mecd|=PSxA=gtrr zV&YvAPuT5BgvU_@W>{dLqOGl?Th)V4Pu-@*VKAPid-2v%M2b4hq1r_$mXIt@Thc(C zjg83pU}U#xJT@)Oe_%@)H5xJc9M#pm?BZy`FWql=>A)j*NWG1iv%*#w;Elr>oDget zZ-}KUFjKLn;LS+yNXuI^YD@esd0MSWIV{$&E18d4vARqOL8occmJ`oB-JC8}`qVEh znbVud?F8bjs*KD>Jv~e!qS-npt1yvrtA)mk3ug!cpZi6=YT1Rm=ll1qA;jD;Dk>^t z0JNZyAlDNTa_e=Voc?@9OifC9J6;fUcT0kP;oyXRxf(Op;L7FWH3h*^J;-r@7AWAvu6yqs^} zB^~6&Ow~pn4|Zk0iJGdkP`9=|_}$`Nq}_A}fb0Hj%`u>nrlzLgoKLyK_IR1mz}4lY zkDs5Pk5370o#*WpU@xK#^mKLC`Vz8|UZtc-ChxI$)S_4I?7eIy$A9yN6NF#$d3UI= zu-jO!)AklYr3E*;QUA6^$@KKqNS2lP?At(f2M5Ii{o9O~9b4M~ZCBBj-|yr`X^w}4 zt#)TG7hH}zj7^x_&XWjvs{LB0?Q8?;oT@BBw|%Aj45kGA=^1wL2YOzvZiSOatPHqs zjiQ2(8%mO{OGcx#!)LR^)y4>A)$4$b<=y&=P?_WLy0T5sxPZ6O(G}P%*H16k&ZJ9` zP1%#X?V3rsx)*@Oe0HNL0Cft?z28UWz$BjE@f^2$S(DZ6LcgwXQaV~SIH5%tQ*R1; z&D3jjh^}YEw`tT@l)ImLzf#u)iXT6jSp+S7owo1QKIaYQokZ1bbd)QKjw~Z16PC6_ zK0b|(T8bX>ZtuLoJPl1u6crX0=H%pLXAe$HP^Q|g_xt$z65!!Im;E;kTOF3PK9GEV zb~ZjTVzyNd3Cm7NNf8R8a*ju`H8nF!n93_!NOEYn-pfo+hpqN3sMgqqh7O2{i$|Q# zAA2mLN?Y!S5F2@WciP+!T1_6zFSRe&AO{Z&=EW>~BR-MLU_NSKMnzpJP}if7)?#?! z-_YRZd8Ueh(KV42r`mjqS0Qz5AySR4m{yLj?!?hOpc^3-BEPQB1?ld3!|7=5Fpz{c zOy`HD8RTE1A#(sz2VXf*DV=H7h_6_WeR`obVMnt}5{>S}eobDH9-8q0qedO?y9CYQ z{@f{4&A-lv4H8TvGYtrpr@rzu^VnXW!QeyrHfb* zdDGkie@#}+%lnwo@Xz;d-|Y8V(sV*HZ7H20Ri*QN8e@ban*~&Y>govtozKzOWaR}J zG;8grN)2X@DlKMU+1c5@S{4tpCR$ojva?}u(AL)0R^tQU=k@tM;*%$Ac50smz5&dc zD&kuKxxyU)1y8~hw=R@hfwYe?JRAc1)!Tbew~y0>t6qE3Mbg;jcTUV#U*sOgq{nlA zu{^#p^k{SQrx2h2qOsXAA3!9%%3z3bZMP=k z6SlH~H8Z2mIzQY{w|l)Gs$Kl*i+Yq)X2h9s<@@8l?5l!{vF$>gLsjq}sHV3)zWW zk}~7IbamKZoMX79ri5g(wi{k7ka=suk9y_Tj&~sBdPKO21a|Fo7iQ0J-jPF)_!3`o zk9a3MsI!HAnWwOPYJLKB8cXB)u3^ub0p+Sw3l%i7j--zDqr z(1B@Wks_NatsY<9fy1_JGMZsQQ%mc1E01>~KaOIqUD7Cltw)*4{9@7X`0~;~+k?#t zq$ijNS6m2T8TmedIn}c3M3&5R+Fk~|Nez-Z)biR4)N}BFJgYe=l%VRKz0iIW$Mb>WSY?*V@8y~?bFX$w z`Ol$3!*ynohWS2;HESPHl=X&2rF~vrNUY9AC<6Lrc(AlBTb6Bko~rzMWJ+tn1=j7^ zZlkYZ&YLJvX=&{eU7wts&6TbQTzUPa%!bX<@O)KE^@n$7@R6>~)z-%gP<&pKDrA+TDmG!OM)L&@ z#INd9>}XJ6U@J{D=^E`Am_eadwd(9iDY@3l9cf&?Dbf9(=9qJ503n*ehRVX5k0nJ2 zC|gTS=QB_Fl<--7%}o>)?5tq>!2%WKiB~Lv788Z!v-A#9nRT8XGc#7`U_XD2i(8y; zSXU~#Tl6F03lFW_jo6I0>gYc!T6*pl;q4UI?V~HNsnt0qM~?+KQ4|M8*^+w0+q{cZ zS$XOaz@31YetCI$dw0FBam8%A@(a-Z*3yY+Bz!yD+cb0<%F0fg!x`;?Bm;IOB_)f# zVhF4mM$&#AX{givomq3Gsg;4EbnJtR!Ta+*J?H>JH4-n2L3N)Iy2vwT&O~_WtU5KU z=}*67`6xQHqZB72I;20>&-iG3dRoE|C&503i*f`5gF_(@hC>(6XgW%Xl;$x+F~WpG z_fr4dN#~SNSn)VWsajK}LS;x#X%K2EW`M(>Rqt_q*5-#^S6xl3TKW}6A@yBFO|8~? z@qM&GLqh|lMC>a%qQ8^}dXHzQsB`r$ELA^}WZvcMR-N%}KWA+YfAD&GmFGTkydynw z=PV*|IsTh+#i7_4pzl|0r2`4}mzYMukXPNVv3;reRjXKfKP9qmV#lePpU_f_5c6J% z8gF=cUYYpR)C`sADf9BqVZFR~D3xhfHE3nHV_k>0H#!UZI7kbIOGHFeX+AaVj2zmD zi~>I*8Hk=gf2DbLbQBOE$K#CoTj<+2Wrw;S-N)BW)noIr&xEs1u2_n;{^m8i(a@)3 z6tbjh0f2X3t>WNI502PGNOA)TBx`TMm)xazU*&V2q?)ugy%!G=ZU4LsTEc@oBrq_# z_y>8aTp;a!TAyF$Ag_P>bLN2XkM2W0p26Pv-Kw=*x)*&F`ptW5$o7@$hqhAffJHO& zbGS%g9M^Pzo0||9z#<&qgzXR8c%SgvR2qOf5CErbm^C$KiOtN)*h5W8hI$+O9cdh; zsAmHXdVc^W0LHbAq7r=UE}i*k<9qy#4HANLiilCOqcL6V17w6L%Ow)|5?IM1ZB(V}ap<7Tj6c(ilYB-02 zEQjB2OYOrX?^>h2Azqaa^C+J0bOE%2Prh(oKmS{nf>8SjAWYyoPls$8I&#)QX!*p+ zbe#T8M7rxH4LPb94V)4@4@jk~&BGg;3M$3CkK9XGDeRd*3LF5$uL|c+Sw6-%=YEN8 z?)_2zMtVaoo=l4ZAnFcozKW8itxBEmSIIiWc}=XPBk5t_4cN^Vne`k*JDPf8L>0nu zR*|jt7nqu!CKiJ5*h%^?6>eF5T28wlk!1DbG*IA1%g&+A(@__g#BSXO+uSAU$zrN&<*2srR79OBanGC`x*3^PcPlAT}BJ_#E=`3I6s1B*A>qN%+jh zY59_qzkMqP5-tP@35kH!_&LVv`g&(aM}I7nAg_(>R=c^0X4@B*%{Sz1FEvs53HMga zbE_hO;;mA%lkVs%9SEDU+^6*Y<2V<{#o=~e|K=jO7kOa->Ga{=)?Oi@kqQuCN|wGQRv%YH}S@gTX||UgT)uVaZMV z;#H?3%?9kIUK;)^$PS2}4^V?2v9I$fOo?gi7F(YHH6K_fAVBi5wYL6U39JIZwtyjP zY;5f8{I*I)OUv{A?)JxzABIw~5fKsa5&_RQM`lgSrZ0S9Z$Eioh&t{0i2yExSzd2Uc z_Gm9)-;>l)Rieeg42y}G*qf`X2?o6F!TGtghzJY@`>5(Tlqxj45!X>`zuCH8b@1Xv z6z-;l3FE)Q`aYmzkJ+d$ay*%<+ps#Yp@7`$bycmoy%vP%$MPey;+TlvgGc6cof*&wj~k zQ`_y&^8(pta|H757LH(KN(zeFnwq%ycwmS@L`1}t)z{azw=eJI3=V=HYFNH16}tPU z6|Vc6pR3?l`MKH~`cTqTK2225q+#(jlt97;A;Z|TF2;L4GNbamDUfT6oLJJbFmW%* zeA5cr^NE(ISc=s77%!a**Azk=En2jT937FgJ|91B!z9dGqv zHXv8Vlcu#St&!4YqEPer$n^-7_beD8cw6_dw%+3g5?dM`LELa zs;cv^&oI;LbaizzCE{8cQ7{1aU^!nOr!FI%z4eo^-1*xaAjI2oQ`SBe<_--Q#n`~i}r2;|vyUviBROE=6oKkpLJd-qZ;$i4_p)R(HXehBt5IgT=i zsO|0kUe*_bqSJf@Oy+yUsjlQpd)GH@jLWmVis&EyX<9*gbWN8g5vbEqx$^bLJNV!P z%!owk`)P6SxGK;wJnZR@*CUrq8tTN(DW164B6B>B5|$Sq@8F&MFU6(7=C%4Ijo;hu zd$w76rzkg_@j6{0KYv1l&Ao%POXa z5NUPZ#^{&YW??bAC8IAcnO{WDdCDKOd~}0!J1fMfYIVL4hjxyLeQ;u#Sf{x_`cuV3Kc0i|LU2&uko{fK!uWjpW)USqKSH8t+h>GIbv&XFCithH&teo zm0MyHhfSko4@xXBCV09oAPp-HR&Lkzmv~U3QVIkkJzYME)Wx>zj!v%@i-qFFK|qRx zhBlQM_Jx9Mt*~wCu5XYw1O0&8f)LYd4aLRmX zUe9!WmPVa+bvq?|o?p#rF2w=4+E`93d)<(P^&E@1o3n+%^=8LJd0IMHP}AO6gyqn# z2k8;!Gjeo0WOa`c@uxw?bDwv8bYg+1>V7(=3~ES2L&F4ii=*@N^_TpoTVsJRxc)7l zCFOConFYjXJ3G7UlM(3!&ufdl$?EFr3bP5v?Qx6t0PF_W(}2)WZ4l`}?UyAHSL$)? zsHv$Lrwc@3C1>_H0;}2T65G}8rn{>=00aQDqF!ZrdUh5KmOsjbpuDzrll$e7pdXrv ziHT$)*J&U_;~)@hw}#b5-)`a2w3Y4vCnFAU;pue*^(AmjjE+7BI3XY;BnfVCYcr{X51Jsy{Me83sPea$ zUa7|zUjFt*H|+oJa=6rv@%lq=JX>CEZM?WPfN?cGlangII{5qdZxCuPudW)8`?;I$ z@3@`Jjg2=5t?EmRhai>?U{$Gu+7oc;npYIJKXPdb^e0X#qwubacs9C@>eLW?!UA`JHLL3K&ERQw!wGa-rTf;ms?u_@73h#VQhP5C|}EY9mVN!bpn8CUtgcU@nWkFpjx2zfB8V*<`ASm z{s1WE;Q078;6J6MrBQ+5RUnX2t#|NT!?*E#^aIH55Z@G43@v6q zl%y;Dvx;K`mh}gZR;9PuCn3upa<+fdpV%*@vigVN$l$3+$<@q!3|t!+>}ojbrkVW$ zJOQl_0scRS+h+5YJAwm4Le`@FPzlGYSH6*k&X`^tEUvDu0?i*79+=zXISD&QN8y19 zmqF|1Y{m+ZnCZL%NZ43d3Q9_iS6j<7%VWygbPNm(^z?hv6?xP#<8c23aG-+i1>e2k zN==@(UjT>pC!yW)nFcIZ83hF>6l_jVZp^-Sak;#`KCf{vegk4OFrgUBGR_y&`Qr9w zh{wdwSfm%eWsM7G2S}J8qYqXmiyeRJ@3>(UeWKo2ES7FIYPlfON-gW4+MwrErj+~+ z4kK}KaW|bb+=eEUk3LC|y%4p-3i0=URy8SdYa#L*YyMnz2VF&x-ac~7GyC56w! zhCk=Bk@~KnEGVc+Td~Pnt2{qWDC{-}5_-ek7YbUO9}Y(+v2OCl!S$5ruh zajJ@n8O1A6G|FHag`r?>SecniOG?5R(oW3D$;q$Jc6$Z}fF*$+{eH%!(q49J32bL+7p8bq=cvE zee}Tr+=Ok6$T+kr_0Bd53Rpd*fw&BwV6jIvBFG2a@y(x*#&A3u&X7}^M9C|!AIAWEX>WPw@u-Ak`jK|TKgOkGHM2fWL6V7P0cx@ zWRK|hcvB0D+aY0+0@bn)i?Sf6sTF^Gr>Z(tx8FG9EFhsLnOI;G%ztyx25z?T=BNkM zGpAX}o@({ZhuN}e%q%Q~F=0v8ZN31Vpw7}#f_M&=SC#T>MrOMVF1Y9eY;E+~jkGWP zd3bq&x@M)T3v59kaJk)HIsD0V8ui7uFCSLJWg!wK-LDM|yzuO_Gg;ydd;k7D_|(kH zAm^E&%H)-r&gm9wMPeH2>r+$p7gpeooaUARQNZKW zQ0LQ;u7Cfb1{GNgxjCqWc8h;{(L)(p;L7M*y zH&I)$HXvsDvxD~^D_@oFtUq=APpuHKM+$4_3tq`@ZFGU@QBpzzIPk^`HNh?&dk*iQ z_#`JL7Y8T}j(KN6Dy;qlj-t}iVPJ^|hPU}@n>5!i@DUg%g)30d(wc*y2ka*^K$>QN zY>gMpobAql1eq2x2;PGbDI4CcZ)n(`#9Mb5{m%O-V11nQMZgP#B^U0ENq-(8AyWJE z4a-YQNeysLm&_XZ54i`rY?D-^QjbnY$-#_I*qJ{ z?2kzECxYdqqmxop#DJk$ZLI^^A(FlBYSeVWI6sACWMy%HykgK3&ATn2CM{YNl$^Y9 zxZF9A$jxE11O?kwn(uNYuc*=We9mbMlL&m7eRghcF6c8LAxSnO7TJDtzxYKq?L#mD zn;2>ec=^*bBg$*d3-CCSEEp|5E3bf+Uk{L(fvOS}mgiwR?z?yI2DrYD%ZGO}O3FxE z!|yl6-rgRBcX@gFWQSJ;St}3ZZEZ{KYe2LF8a)W`@O+6V40rpR>YAFWsjFY-ry28- z=LGfEZ-0J-I6X7Npi(T5M)?EWlYpLPog-KiQ}zy=3eHAg?}(YCcL|tc7}e; ze7bxSK$_VjP)>qv0fh_!!ER}J+20tXJb+856 zjN#yPlBzIes_X|(KaFd( zBa@Sorqs;wIJBp9MV7<+S-$+EpXEsX(B$mw4D@_h>0a9ct zzT&69zFre#La@}P)25LvxZR;{KYu)kOlJle{MjFWI3N6ew+wGpF_$H-si^@E0Z2pS z5DN>7J^tdTs3?I~)(#HjsrB_dW@g(Req{dxsS;NQM>^s$I8R<%%5LH+!g1l0+gbGV z!=aD=-r57YW5|ns!LcRSEuOp6Y=ndfAlGWu*k*uKJyT_6B}+`(V>ww&N<$+~ivx(P zfui~&B#dAp&Ld#%1XKwv4hf(82P&rzD-rj=1MUyF+keinW!ZBFd|8D+tYyJ9c_~sm!otUs+H)|(^E-F$r=M>WaJel_&2$LeM%u2uWw<&3u+Xw zH(6O(vpFfiO9Q^mP~*4Z-Ha3ESkCGRbNK)XTf8!63j_T{{4-O7=+I&IV zS-yG|_)1SO2hJA#XTT(Ct zn9no>p89@ZDhEE-+BzS9Kjq8at1q(KQMlJ@(=qjTuBo!D!(0{tt4s$g5Fs` zdW7IVsUe8?vJvR%NBzlxJcH>A1)ds7q{8Ee^ zgYMk%z=oMT)epNB(}X<5dk6TWxEdmLVr?vQ8>3}13xypZaQo@eA{gEPVmdRO9a+uW zGL4JvQ9kI&P)%>Ld_dOe9`#(^-f-KKq)NToIL-dTKLQ6{h)yOhYeQ0hk8GB(@T!1z zj;JQk0B~cn-M*9JCNzXOrx*&&EMytE`X@&v>&XZ<#_>b+ShcnP#!-cLxG6hxhuE_h zn0y-zB&Vo#|4&Sn@$o;TD6;hb=Cus_HQN49ifaE9Opm?oMwCfheXg(Nn(J(7V2+kn zM)Bc%j72c)7m$O=Xx%=Rx(PMtTg*O!w^zvh!`WE)L);f;`3H5@NqJ;p^qBvdv}4ns z%`<8O+B80Xzea_iFO_@&eJ`;+qNw8nR>Ar(a!mIDABttqVt5Js;ec=YDOUvXns!!rmde*ceMwSn4r63yE zWvZvaz&29E#LyO|IhS%#(#5CIkzYcptHrnRgMAJ6D#STIak=^aYgTGuR!V!V94F){ zwvU6PBEh1U(3%(0cJ7}{keeY`_b#Ap0!|H(2FAw5fJ0UqG$JI!!DXXX9B38+Z2(GC z?mX2i|8HEBm9L_XoZB)>Rh%~#s#K#L4tIw4Q3)Yeml5et_#4HbdVCu;I-R%3+u91pN!y%LpLJlc55D&NWpq*CT+PM@h?jpMV^oymevA*d7ZWq!fci-pz)V*# z<1uvVXII-rg!uTo(-qsQ!lSN$s8@*w4XR$-1yz7ipt0Id<8O2Pe#-lUbaHAJoa5H@!)A>9sDsO1C@74efpXano zMtl8%VgIA2-O1w?#X=pyauY3@8^G_T^I}9nlT&on(wk19{u|n9@}_b|&x>bu8-w3w z-Bx4Hc(SPrI4Vc+Uv8L=w8hS-D^FS5?0bJt7v`~`n`ptAA4#;`Q_`4D5QPdZ*x4Mi zQl=h#sU59uZIMr0p}ATYV-g(ofMwhiX2J-__~}KzA1A-dwZb4%)|gFHm7o7;nzml| z!%fx@yNz+Kfm=xa5kh%CNSA;l<1n9O1iX>cyvsTO?WLu1JU!{h^77PnS0^T~U#Ec- zAu1o2nhF6rkmc0>>4+iZ%?3;9?vjC3B z8L1@vjjb)u6Hr%soD2b?7bI*p(8LuKWzrAGA_k4>SI6H)fPfqGU#)gP7<2*+E5uy( z#-KS2pm~5;z;=lWNphiQ`Ukx-w#Bk?FF#d%oyGEzd?(qjtRagVGc1I!s5ZZ`@q>n@ zQjuPBM08h!@{rZ{f)GCGiEkX%ski(wf&SSNGU^oBtFCKu%gEtq2IGHw0p_$yes5D( z%SJF@ahvorZ@Ndvv<5=X-V{)CaRcsry8Z+?< zt3=_BnjGRGqK~W~OEw-MBK$Z8#Eg`*G$jP+pjM5SYoKBgL*Fb1eLi-e|Bih7pWn6Q~-2b)9VQo06l=!&wuR zx0vilazexE`xU z)Evx(fJ7wF`CZ;adG#dgL}~P`US|j@GV)BLM;#R64`|ZELzi)kiX<+%IME1z@>u=V zJwaUYx?IJD5OCVA07564PW=P)uV(eA=pukGLE2er53ErnBqa20>A7G-q0zw%U2m+* zA*piR{ViBjMZ_~-T;oB#KmD1uNwJ}3_qE{cQW^_7T~mhHuYHbwCH2sCo@NOyk=3O= ziJ~gvQcK?2;$^;`($`;RtA|*=1Hr_wQrgh`l)yv?%FY`kg!%%$2q2hpERRAXU%>Z% zgvrFnN`)#tRNpjD`{c)|rZIpqvw+(Hk&cXw%F2*LwDTyU8G+O)ywOe^lcchZYE zwg3Dn5y$K!t_?o)X9pKgo=gh%He4Wm6fN3i?=2N=E8a1 z_6C2W7n$zabc^4nGT1M5RjYX;iKP+U+?G^VBpCPUn$&A|O55BWYZaVxz@hR+Z`m^F z^ZKA8Aou{z_Z*ikM|a3#)&O3YL+AQt_#tq~41UjH*nokdC_9^q?Fr&8mK~gDOS+8OrV1U!^YPn~EE?_3-N-U8o5f)xmti%@E73q@8aHMfVJNUf*-1 zXx>TkoHWH8va)$MG`Jd22l{~6W#q{sqkb=%`&IeEm?$n~j)lx;3+--nb-E+`Q&}NHh;LqqVey#=HRWG zeGmSYW{J856?IE8B!|f!XEjp(g3>kF+rno48pWharGrN010)jEc2psfvh+@?nUQ*< zx7+xK{>IK9tGbsc`7@*4Q>=fwD>sJVU^Lu>=*<>hLlr2p$y1}zK%;$iXX3(G{PmIJvU#N^c6uX^ z`GDwm`)7rxtco+*9V1-3*GMEX2_1q%LZ{&Y?^71K=Xv;!&!_4q_lGGxZ=9)I(FDqlQ6V1QFOrkj(}@EHCqN#mF1zm_{em`nX2}>xDc!3b!N-tI z?`&5XpF=ETz?(~Iwh(0^rY@WBBXaUar68iHk?#c1Gt1HaJPpSTPJzneH~!`GIs!A? zC{P|+2^@*kj0Z#lPdng$CuBnr>TI?{!2jRlocza+-rN`w16*v35S>xywL*Ez(NtOA zQW)dEe?8}L;sPZz{dQALX4CKWv?~(#-w>F~ySa>pI4J80FD|aM9fX=8TRfPCh-XZ+ zvCyj!iv>F8r;__ZMbn_Iy#d`e{N-VJg$AO!v$WHaiCGt7v|G{5a1x?o#%V`1SKA{^ znm`|vHv98RW5EakBd~%2L0som@pe~tNIm&%)yyn$!RCIT4P857Zg-F5Nf$0sp7^!_ zQsCF{5q0^F`?{=xx-rBKv_L* z0%?owH*tp!eO6s-0D2<(Oy0SMk%Q%sS<<;Dv7F zE!bbE$3Qh224K%$Q0D?otWjoTbRcL*7e>{3FE*XAlx7y;sSzJ*&n~U=vF4omD!6QH zXnm95=&4ls{km;QYqR}{3s^#@Y)f0EuEdX$a6)Yk7$qBJCdVB=O9@CeFavON4Vu0K z0t10Y3RDh$>)!%@wbb2P?e{OoS0CShZt@dHwLo4<%!aA*FZu*pcEi*xz3L%6KfYcHUV& z75nvhq}j>ojoBJY@@22vyhLk4m-~BHS1t^|kdRYR{c3K01=uS<_P~2@fOk?H3Y1aM z1_hd`cjDhZKoCfaKk5M3f4}|7u&XM+Q{WqMP5)my**+cp(GMdyl+Z~bHQyU-%YRzD z*Ipm;7(T;#5hi`nOj*$v*$9$ag<8sxrZ2H1g}{rZytMGQ_>@T|-l1 z-qgUe^AD0vk!(F)qV#!Qlj%&1$<|drQ90zCaG6p1t_QtgJ9DlJSF%fcG|s-}0-?h~ z8NG#?b$}}Z@V`)_rW6SF7Z(>RD=R<-iH*gBz<+W{UQQ0sRKUc*VLAJ&bO&(s%gf8E z(LgKFs5Dodcnpj=1tuop6G|et^Mr*~%{Sq4(N`{uy$)>^`*QKhZaNFZohdjGUo`M| zKO9bW`!qN~?Y=gx@?4Qt!VIQzQY>djSiX1Hp(>$K1dQqMIYPzuRyX|Ku``}_G^*Y&xs*Zck5L?66bNqSY9YdP&BmCi4|@G3LpuFbYc z-qHwtpKBs@%^mH6wrXF#ac%JX!N*?n-YtT{2rIq#jtcI=Gub?zg^c9CJ?@@M;p(!Z>l_~uWl38q%$J!8fMAd z{=VR1wAeW-4Nd-u+Xm9kxijjpbD1yssXLUF+H&S-+Unt)Uq6#l3@!c$ji9-aWpCM4 z6tYKUxG77{uuYD;*CM`ZdTj8q3Hi2q)bPy@?8mRHe=;TwX62|yd(EyVvc^5&Rtp~B z2s@~sF~5VoA$!q5^fG%wZm6ZLd{S{}`n#W<(?puNe3E$Us&ZbS3SX@!S^P26BWBm4 zG5ctr1k-!DLt3}*tNLhgWMtncI$*V3HfeD^CqJ+CIXjugK;rHgSQQFUps(M@6Yt3p z(X@Y(zlnHFm;>Gr9!par%urLIH(gLr@YYnQsQ?;MEJfnh&39y5YaX8#_fL&Axo(I-8j?@k4jnmVNN@;69GXBz%^M{7! zAF4&}nv2)Iq{b1PZ(aAc`?1B<=+$Gm2YjTjP$hdzuOtC=B}ji!+igB-)KG z9#i8VQ?KJ6h0nVP#~%1{p3s@BW~1LMdP}S8d-C@Fv|~z9D=RA)h2R{x_@i?iq=wY3 z2}XJ-Y{SCCL1^y1tfLc!X3Fdd{1v9Ou|4ST!m6f|kL`J-;4F+qbSGLq;v(QaP53ky9^z>L}MU?B`&X=$wjp zR#3&xmvX}Oq+mN|qJxjqicn5NzqX)dexPxlyHk?NCw}oM+ZT~ye_cQBuF&Ee#c;;> zX^O}6B%S{VG)iQP*_-JU!Ny<9?EDh1hUh% zBn5NfC>3sHMa4)l+vr3ete^AeA0*2ENq6eh4L2TYH>QT@5jCqAHT$N(-78~nQ;e*M z@khn_YyPBvR3uy|ram>jZz{Z^Qt-sL)OmrxRQa;yd$d(~(;x49xiXN>KbOi9Wg~mr zWyk8-*Ykr_BMm1m$IBosKzmYZ9@?`WyjtK0tmB~#&k(d zX04;X-W(HRf+)ZUjCo53ZU_Et!p0hg0XO%9`f^_S zt*P7{K^`pnYJAH58loOalJxnGVyoZQYVBE*+l{=U&-19Vd|4m35|{Wi{%42CFQxdy z8f5K#IXqz&-d?UBQ$ixeHunh81jmnR8eSdrapw8NG(zn{EcNs4svzq`CCEL5S&Lk` zypfU25z32D?PP5H!c+&+itfTx((o2?I=+2XL0_02o49tFkGWW>ezbO1YP`RRKqrq_ zXR75*3D2JG>8h87N`-D~uHW-WNlmG0dtIWf9QylpjbtuAWreYPH;bRM&!nk==A30Y!Eyfi)QY0e6-}G zqOx5XZXz49#gFh$PSLpyu_rBAbq5^!an55;`e<_gx0R%?$F2m>7D}`{cBs!8&T{eW zd+KUA5j7Lw?QLrq&>B25ePomGcG7t&-_lE{)c?Qc$x#;JV1{+fSEZ*|>;YVWjN{m24=2Kw*j4<|-% z3oiA^Vw7poS)-$l3ZrSO^A~G5^cev?$jfy+GrHL}DCJ&R53O+Rve$C32=;X}>q8wC zJ)xOW>rR?CH1kuv10>A2$jg_AMH%vZYHL+#I()-g_TC$RPCpEIkioqW=dyRK$~Flr z%OP`BOMk&g{JCFEfAr{HPE#GCw7ZYv4Alaw`G;Afmay7#lecqQ7rmSl)XHK=M>8vR zt_%k5s^0v3RzT6hXUNVtE#iRQywmGy|3LkVYqfow%vQ-PU%7#3RNa`VR22zNX0JIq z`z!NqV!iGSO!Z`fW37+9{9aQ1OfN$@UNb`41O>TWs&<(w*}7F(E@RF+?IxRfJz0ow zWKTnLOWN=6gW`LtV!b$%RhH_4ROVSSVxrla5JiGi7VMuNUo!kWSXO%HtUxvI;Vlm? z7L!QV?{OZ-MQ&WD40PRI1Wpn4YrUnw^nH2r5I_NDz2_40l9SD$D*?(w5H%-0d-3AW zEnDuwm9~Kdjnvw$l$2{w=nhnYx#y7HLZX|x_j$PIdd~<16uoONY z6u_yaBUc8zY{Xled73})cpCS_o#U9@!T#%IN%`!>H!rzvF)vle>q+*F`ou7gM~~Vt z>%l`u@W8Y|^OozYL(2U)`g3 zc})9#-|o}oj=c?`6c=tNe?=OB37MVfIt@*rL6?y{ftz zRG=QqGV&nGWLCDD-IF~y%}50bIAwnIZT6*=`n#48o3foDI%?aw_vwFG59q!OM85ZGUo5U|o(C8)@Mo?TiwYJU+=d?xKnxO#S#16Vrw6cxH3PLDL?5t zr)cJMS5HRk6phemNr~bJbp)T+>urviC@eY@$m7>^_1bPsUdwRsT&NTdQQ*$lWJ{LYy5l#5AO1!@CJ^V9DIou$&79m=TbJGDf0cb(kY8ZB0kA-5-C^4LDh zj!o^K4^u+(g2rL+6hA7~dhu~rF-Ah}drJ>Q}4>DH0=VIUfdQP~vv=!3=Y~<`@|Rj?v>qxYw+_hdk=%-%{p8(f z*T5m&t5?yhs0{sU(|!X@Vi2Ryxny~c5QHc@oudp&M=&753-J8`D=RC!LyM`HMh}4) z$J?4qSv_5ABk+sLwH0wpyDR3XsF-x|$-6ywwCCrnSJgeEv6qyhPLSl2gCxrJbFNza zuj2&VGP8((B8}rUDKRB*+DOW1NZ>wb_Ww~t?y&6G{g0URcez+$`v*L^W50SE{NsT5 zX=1_#2)MFx6PZi~?Ua`%I5kG8`KZkMwTRfdhoo+6a)&lvE5M?)B&G0*ofH#;Ipk4Y z9KeC7iQlLAH%sZ3de!}_ybDpnncIQn0EC5 zPW_7$V*x|BuJ6Mc+gkkj|Dt65H*FUt=dL??y1I+ggYj{37YT4`+_7_~u%KWAkr)sh z%$11G98}rf%TQKWS^ao@e^=$Pi};PnjTMtQDvpkh7cN`?kB=ALC@JlvN7E?RpmMQ# zX&}(w|1d|mIS%wNX(t&#PeLV2+hyx&{$F>|DAnaZl?X5M^M8VgF*q>Sl!UIq|7@de zw)FI#{Ez@DCEUocHGlmmbA_R?@esVR8rNPTTSW*Mc@NdyL5&FCF3N&uK6TR=gd!y; zpT*|T#$uPJN1!IZ1JKglU0#{wrsLde!1TYds42?YvSVzc_{Ek9@D=lqkPDi2H@7hUH0A=#6{>9I^ z|G70_s`1aQfm6;J6tcKA$)&eYSU76p)(asMxbe49o)G|U1Nyc2tKkrwftYXa>KYYe zJ>zy0`Dblqfs>M zd#BLw`*B%mX*c>STu@dT6JbnH1Z$o5o% zY=aXZRSQ^ZNlD4kkrAwlsF)bnp$1*=!&1E|Y`~;VNhzwww6YjQEP@Ce-S|1MEuh_s z6PZQX@xH#^Mf1sz+is>D#>m7?d;N~BYZ2b5PJKVdHw=`%S zfQ;i4!d}F403g?}2R3~F{{8vB5E(G3X37`#OUdN7d{6!m1EMxH^}4$HQ>97{<9?&I z*buo%h3R~qD@$h*ZvBek`^o1ra|S0)Iq>rrFMfpbnMW<|c~n&Tjisd}8E0}UQXyhO zEmU||IMlli-1I5#=iX zs`>#uI`lz@@N9+9&?Ls%;wR5!EMb!K8e|Ff!Nqv#e#_H0N-;5j@9a^n{{H@QnW|@; zG8nJ|D~5@qHvYHp&&ExH3PMRILWEeW2O{ zA8zgMS!H=M98geeh;rWq14k$ViY0%Yb?*6-Co>@9*bySp#S1Vij+$eOyz0Ysy(O;G zZG}Lwm&A_@Ddu|=L@%F}ep=BO*DioQ9ttS`w3?cAd~dKaBL)L2i<6Rg-oli2($27B z83tW(5_Yb^2U!%jL@Ivk>-LsD9J;8JoL_7`2JI_g?|!TB7u~u*45SJ z>gsB5WyL{Jo}JJwYCz&@ZH4%L1`CexR#m8{e?;m45P_#!!Gf(#SxJ(w8RK5!gCh1x@pEjj!=38?o z@&#ubD0k%=ZNO~=%BzL=jo+zdWmkuNeb&Z}{2S`)<(pV|6`Cp^KKfa=i|X;(j|@1C z5yOrd`K%QuCv(wr@$eW`xwXB2|FGA}ct(L6^t!*F3F87iJ2 z*E^w>ZPbVk2|)9YL?W@FVaTp$PRJgn(zvfM+GrifuI^%UjY^-$`Dr>#ej4@Z(dR9N zO3}jSvyGI6qxeClzkBzJV`FvSKsKW|f#}Hr=mx4pL1K$$UIK?;9I0{M7_aJSakNlRN=TpWx4i+$xXmK%$`1oU)jpnCkvm$OwLVrpwQu(wWX z?dV&0(P|NnN5Pc8<&)W&^x~%}=^S^cRBy|D*S`M#mglEABbq{=KCSunb=Qb$w)q8R zi=rxzx~9AA)6!C}AZmOc%#wPwxUg{F_N|BxZ8h3(YC%YVG6!Wph`sXMq*D%Gq1>wm zXYA*P_c&;zC;AWwgtKQ~0bQdQp=_+yZVWf&ZaY3PIf?b>0}TK!4cPzkk-gMgx2DZo zT3Nw_Xa%7O1gNH%rOFEl*10Or|pj`e5| z*)I*(e`1~@w=6n+iAB;uaD@vyGLaMQsAGrE)}6Y-NhAGR4B1pF+4!l+H$hV4!9PEy zj>__2ItMR+Lm)L>w{4ca=Sur)UtHKG-x3@kFrLPmJ1qCW*_EG)O6`>a6WIbm0&@JZ zsiQA;Bjdt8V7hAV5fZEG`^_`ksywK+{i6*n6W2lMPPcCVuiDaX6Ntk!Zz7|jcsHCh zj#I>;@Nl<_GKoZA5J@1j*#73IM3HsT;@dq`twLyh&wNG;6s;t7q^MbTLEYhR-!wHf z-yY9}-gCLOAk(@~uJZgAD)N!Ypxt$5$oG&THMg|5Iy?VH&C@f{BB)|$7&qIsFi_!Q zjm~4sqVx-CW-8gPH)yukR3P{x?^n6cS$v2Ng9E0XUgl>+N$l?R#nM_GJ-y0`3J6s1 zt^d}pgGhAvz%!Y>D48 zKKm|PCry6N=R{t`VnLrZGbblb($(%^{3)tBjjL2chs*V)uQfaw8Zx$XM<-UqqWO{y zS0d4FB_nukpu{)dpJR(AYfJ^HSL#6Yfx%rxKRN`Iz6Nvk2s30Vc@bKWcL>zGp zPHG%+^zc|kfN%(=h+zs+CQ0@AsSv$LVRI!pIXQRta#PaXZL~N-pfW1E0{$>MI+{pS3LZX#&JTEP zpr>E86oMGh;W>@iwHVJ%<(o4TpTEg%41tHhz{Hf^=l1*8Pjofxy5GM2#`K_*MB?PY zwdHp;70i!@3I*H`4?hrGi8dHgK>QcTN?ZPLHK+Qea3X>oiexw%1*~Q|miOVA1DW=5 zXDuwaOW|ifkgCQ$!g6}^ofoJvaK8GkC16xzV`q1QZoB9sPP*+l;lM`rZ8o;h&aFT} z{<n&{I<_KcxeP_)@ADDnukA-y!ynmpA@>!pYM|p%n zGONp1JQ%>aS3`noCX0iU^Zq##W#vFeGY1EuwdEoKUa2RURm}ACCQ#^^n7oo+`#eq2 z!v-;$z)zcri8oB?%A%Ex4JA6ULb!P7kXE*CG8x;ZsQ?0gcF&ntzMHl*fB2B97H^1$ um{9N7c`o^jRc#{N0egS5v^l;f&Y7vwJza?Tn5_1^$N*DsE(q#%uelysN0!bl59cM8%ybScu^-QCh%A|l=09YZ%moy|9%_kH61 zUBC0sIcF}sX7HXn_ugx*Pb~aoq(o2<@evUa5KzQKA+iVv_jeHx?)`XrAN-HN#qXXYJMH#xI}juZMpRqj!F$n3$`r@bZ;% zk>ZGI5fbciVY=OU(UhtY;po_yqI*kq@KV0&lj5pl{aF*qpqIm$` z@sab8!J8pdCd=K%*8dwDRmr2!pFS-A+#kJ-==CEvH#d&;b6+ACD-De}73P={E-^7N z#@)+$`4`G=Wo>Qk<>`)z-z#ui3lsxac|DyGlmges!|CayVx61AIjpR#WPiNChyFw^ zIV~Lrhx5bL?ihMCY&<+M2wk_Zh)DBMA5Sk4Ik@MBm*>51!Z~X-{0S$`5}0u z*-UI~EBp&@QQ`%nHphw*aULtr zn>Q1alk9Z(4Mqw~h6AtO`waTf$PD>>Gnao>SE{l=IBVPGvlLKKu`eG4&n1g0Ei3El z>$8JGDbf=YUz(V};D{7p0A^-pBqb$(w6%G9diqhZu&{s;+UikNRYf6WNY7U9r1k7q zVq+Tc$(NbAJ2c8)hZgrCtssSF2D!Pp`JfVF_(4d+HWpevZ*Fc*u&nb73K%u&$f--g ztFlr-DDiF@T8)Gm1QYSq<>ngRTwTz0J2^Xt;Irp92};@89-kj9<9U;$4-5>Pz{YI| zjGtnGUD&$IKYM8srU%KX@jOInxfC6=zeq(>NUK46Hk*rYt5@E_Q@0t3`rh!pats)& z|0m}CUu$i-+74kq{DtpNveS8PfnHBvwAq+O7isEdU_QGz5!vV(y~XwQj=5N zab607lzOx5Lh39Mk6<9ped za!j?0$MUc-i8tw64N?8nM}(4n0^zdfnd#Bfd=Z*1OPYhb%)50iMc->g7CFmeP%Kwa z6`r-HHRp&lY>svRGVJJ`iNYb$k5;sBhOv_(@<(B_7Cq@6lJ=_&heJnwCmz@zW(e08 z;6|CMsm*OsDU>-&=48H-F1|V0E+fnHYSZXlOKe!*)6H+wi=SdlwaZ6)PZ|!-(Q;hW zK|*;y+4AYh`Yv;lqDEKjx)D!<=jLk95V({aO8X9(hq*|cv8j)sY{Mz*Mr4z-?mV~4 zZl~E!F0M^u{$GNZXXq(>4rz?xla)th>`TnYRrUG?M(pTW0!3~zvb`7*kd8fURG4;l ze+;W`NG3M2CEJ=?zWpr5t(xk`g@ci>ON*VxC`wM6$*PsAKJ@bKHG)av2VLIJbp|H^4sGPU7?R0OtnH*dDR&y;AlEJ3Q1owUYsl41qU*?cH;bAA7$z~S@lVRJW6_o{;-O(ieuz; zI+3Dxhb$7My~+GJ(HF&ZxJ+c|)o{rn)F>^DiXe6-?YyoC9o_NfI3!m8EC@=8{N4kH zBGe7LAJ4f-X`QQ?zlerh)u;3%~V5%bXSpy5mTa zIdE7d+8B6s{jPs>#Hp3Fh*1|>a|}jo2isSZr)!RR-w%uRtuyzFL0p#djgeO?E3%;= zjdrVxbGB5+F(03VaAtikyMRAX4H`;QK1*@?o?#V$`d+0>D9pFGf2)#*dN095#kr#n zJj4+%`Ntz2T^`NnP#!%EesuZ`JlHs`A}QE03%r(~N-RpK)!H1xo}S$T%|e z%+vQyH?=0?!8|!vb=Qw-*N;4ZlRzXvzinXj7S|tvQC5UTPF1ze_43sH=0ZeG&AG+n z9;-pmz}OfzqF25BUT{DF87VPw3P_tr7gr!}6sc8Xe3X%qN#S?(rQ+n|eEr&BYb4Lu z_l4?|BpPh5n9pt9vMf~pa=H?UU>gF72!2i3cOvN`t0|*0?Y{n@I2$#@FJ(5t7u;vx zj#)Po1XAFlft}JQ4c?Pr$yEVft!?2>0s@}|=%uo-#40PNI#jBl(OEWV$$iJ)qZ{^H zhw~Y*A3uzjZj~V?opg6Hj!UDG*ddFe6-L`V6@=HQOvrnJctd@RixnHxBkSq$^UZA0yO?+?d?xub9N_(tOMMp=6uDe*X zk(-9bUw`uV@84WDYa5%J)MoGBrw9G^k6d=GkZv8U8uJ0uCfRx4c2%2;mNQ{IKLAgN zCl=L~NinNzi9fSyJjg7<0IE0r(m&H^Z=*_VQ|6muX0S?JW@aWD|9MMGi-+%Psl*!F z%^|-Rl*v5y3~X$Xw8(!K6tB{^w@tkrqqUO++~=mJ)!q@wX=rFDD2%3R%e%swr~Cr~ zuwI&(xV~wbbGY5P!uawV5|h(lrx*1U;uuw#@9sdgD`f0EJHcV3$XV5!CK`VlY@Pt} z8#Npb?>(1zLzNvYpRLyse0jEq_Vj6PQPK5I_59({kspZTw6@mWMJZEbC>j4U15w0snyDR($nB6h#BI#_BK78bsD?;f~H2sw5D z1(tF&mLCMNvbtKS*MVAW2^%Ylc>TdYBqYSwS6jud_3NXVt++Z)AAiN{9joK>x9qWI^*=AMyg?KqoTTU9dT zuOtZb0)vD5%JjR>UHH+#?M_ZjVT46RDcIRn6%^2-gZZPZ*8Kek0|`lMZ*T9vb`jV27Wu&Kn>MzX57*5rOe5egq60Wz~!F>6iIA73;7^ChZ`^GPWFZQ;>)P(*6 z{v!uINOpU3*UKRSib_g2I5>M#l_n#(A0aF2>-HN1Bw?cD7=EZkyc>IajCoob8m^l| z6k>isK`1fTpeR8Q{n%016NtykVK&8PGDgSBT0WQ|f`-rL>nj{Wq#-ZQ=6>T6t>4(# zSbOFDf{>8U?aIMh$CrwY&Gs68GUJUe_y`=NHysSUM!g-aVqqxF%7FtYtdseit4yz3 zTHbb6#l(z9)2pd+@Pls-D4%yvfcO79W&e2*A%Y>%oJeaCAplG*tg%sdKn2BH1rK3B zJC^JrLeIYfm5Q$w6^WXS*kkn63=FsZ?&*(F;6LYYhoLak(UGUiOXfkirPe=vqe@G~ z)RO`OuX+=tfAcMNMvO}*)urje=(=wXCDh-x#LUe}VAD^@YHHF?!|%4H1Y2~m-$(Fp zdKGmKT9BWAaXbu`B0ChR?Z>IzhPLZkPrhD<;>M=Y-o!zNKbG^&-tF4;{B181(zFDC z6Xw&W&N2f}Ctr+>JaxaI*zM)yQ$Sug-aKFKD7n5m3XhE~v9&!<;7kcMy9V3Nb^?m> z&^fN1?jfYU*O_F@#p*88(Q*FVg9{%NnTAE*UZ2gDG{x(D$`pavtRbTzUq$;44cp*( z>!?Kg1{2nExHwq2x)M&>2#aVDz4=ZXlJg$2yGt_f#`Af;Y2wF^vd!V^oDWA4Ma>pk z+u;;@vGMpAgI!T_W#s_|eOH?KC!wKX4<6h41vl~P`&%5H-S;qnbCxUx1mJl^RsO1L zSbgyF$s1g)eum2}aRbfwML}VG>z;{DDg~7u#Y`kZnbRoHS?vgz7aqT6-~^bBXk@()l#8znA`Ix1NhuahoKa-DHlI zhNj+za=EY5st+Z*Yd3rg2tfkD=CaUvmy7%zqeEmr%^hwU7m40p$6=~#u_#7^lM^|XyP^*wkQs7K7F z;dZmQ**UvaK!;gAJ?9kU`&BxtT@uz>b}Xm6TXrwFtZ3vPgVB#@$&BAOl-w}FOA_InL@c<1>ToCa4X!H)>W^)%>?tpQH7aisCswiK2CyL`1M^ zs25VytE&#zR~NjMk+_>0vSxS$1iWtQ-=QYC!NI4=e9S4XRccjGQfsSHaj8DjU4F3Q zBpL~wRR|Qv{7oRbcf}Om=Kdj#Ntf|^kZ-)XRS{`$6h^ZJiVSdd{V39x?U8(-OvCHl zDl3-cmD(N|%rV-wphWH+K)tkB$59xQg6UvQ%!-?9t7Ng;?W{;n`m5L-1#MgS)U7Fu z9G9D{>zhCz7WHbojZq!rx(z$igksdOGexd)myc8v;$`F1s?E)&t9Ae;=iuOIZEXed z4C{ZVV%hS0p(^j?jhl!a+vwt?$g|2q2M3G6H}G5OZA z)^<~Byf_#edq=TwqU}S^H?N&WOP$6{L38ucT1TEvh8SPb%xv>8M6y>4-Dm+8~4F{I6Uu_Al{e!i0n6H08cQbrzVYGmn zoBK+q&B^`hpvGiewh6xV3Y}i`!XWVp&UnRgo5ay?D1x+w!xz{{jWj6f}ZpP2B%^L+! zJkJ2Lf`*2Mgruipcd|A5@#DuoxS9SqRuR5;f)WWV?Ml|ozh?QqNwCPu64~!=e|Nhk zAtc;c?Vc|xE}pG9*yxF~upG_LH8xFrIyBJd zzj2tUGHV9MRhI~utc0o0Hzlo9-JDy!>j(7x*S*S4Mea zt}lu3$B%6P_N5dz?s~lrV&}78H^;-er13oVM_x#~|ws_mopQLXbd~ z9;_|*%v@>t5->OzlfvuRwbOKwyNV}E&1#8Vzo?S`UaMa^*8q2)U#6w8;57)d@7EMgT>6d5OUqkoP^pZ9ni3m zz@~E9C`*p@dxgFU2(k3NQUf1rO?I<7l67Z5~vDDL-+s_ky%8N$bGfq7DzX zZ{VQZ?79)W)RovBB2llrrM6*G(h%C<;z7pT6Jv$PJe)kw()R~gyqWxzdi~==E)R+I z>)aoYd8`QboF`G|?E|KR`>A2t`8l`EF?;_Fe?BPwDX7Jh(;$3mY7J^c*^0`_i>s<| z*QVo_hapc>J65<@=My0XPCFZD$9YyUW8GRek%5$?i9CZ%maf zoS3b`KIp!gnre_1NTNDXt2Biv6_cY87jHe7D+8P(y9-q|meL3AcnpDhPINK8fJNQI ztK|5Rv>w@a-FzH^ko#c{KX25+=d1LEqMUwE)JqPeb_hq>=`9OqY!6v!v7AuOg+1QG;Y8%}}l8}Fe%JM>ly(i`3j|h8LKj)Q|v-ot_tJt32 z%#|kf9-jk}!+9FlYIU86pK$x!w2ZR8(7;)D7bJ1yO2=>uChW=a#B)8#u7pvJ4-K+o08a! zWL;cbAdrXMWk}d`3yS?C`uh5##Tq=up$}ITQbEa$7&0#}_c9;v&G+sm*HQ|KsMoI_ z_d@%^!@C+9ay%bH6*Mb}y5Qe+gi6J!G|?|}^A&r{B=`bKoh2#7*z<(qvPS98CVscB zT#-?GNz-V?;uR6lfbm#7g#9c=aWaKCa&j26DJqSN(_hauxuV;PCeaSu!cCTW_K;(_ zp}u)}i^Ur2Af18ozoTrB!}U>JxVgL|mD`!OiSkSaAj^sk;03NpeukALNB&45KP*1k zvyE#l!zBL#^^t0Ef1`Ll_QtMp{e#I%NX3@B2$u#OGEwwMLf7x4sJKO)>$!swnzWjn zN)k??wldq@*5Np!{u?fglt>);vD5hr(~6D#*z?IoV&0-H-Lx$<6fEy0q~ip8I6kJV z98E-Ybd~LrFtEGDFP|Jg@uJ><>dej`%zI+c1%sxnO}eV_7G4J;5+;K`wI)& zr2c_{f&TvC+(pUB$zP|Xt^ML{2}=-JSwFywA9?Fw)8pG58Pv^iCHxYTl#Hp*m4k|3 z%ABPAE<4tr$=Kv8j81fZ3n}Z@6*cbS8?g=vvi*Z8WWDXVh6_@}QL5v^Cqx0sXksFl z_mAi@bNzu-^}F`SKw3&?P}L^w0G55mmQbmhvuE3K{Rq7k`{?r6t+=IQ;7k{!;(MR% zg0{$VYeZdGpiXi2IuWmHh9`AnY|U@5^7f$BPJ8ViyO@qYFC5Vw6$P(ZK-prPMn^mJ z+tfe6cycg%;d$rzABU^2?KTD$XKHQO+1WwK@Fb?`{NjR;+x8AZLef2-pusOMC1{kC zl(gz>#bkB$^z=*uMq^S%*ZWX=V>_OQl~|nB(K4$k*&2WOf+~IJIWY;5K2-^Xqk{LQd`lWEdO$}sV^?(C<_<>DfEPWYnO=hWPWEF&&{nHWK2~# zGG3?S{G6PG8Js3#+JPq%1nUZ8(N9%Rar!a7P?eO~rFvdfKQP2*@9m;fudzH@>wSVo zWNT%mQelXW9`tXrfw(LeH@DN(`N52M|KFm))-$Zgsl=LsN}&OS04Efq=%X3he19qG z8T41z+P)*@xF>{5%p-y!LBDVO={V&lDb=Tb=#iBhphRfEi*B$s)XC*?%yaWGj<;56 z;?lx~eqwFl`{)?z5ZAjO(L5fHu;UC!knY0iQe%D`zcCqqrQ~Bs)|4*HH79b3`EoY# zjf7d4Ve$J$JF4Q;C7G*LyPJFoJg7u);NGFVR4q6?Mp=lFC4&G%Z$U2Jy7}hWQS*!* z8I1Asn5*eeSdKeG??&gW^Hv>&W_aGnY_x>zJM-LOsmx!JM@(ajt4d={t{Z);czgxl zmRjpA=3-~nqPmrMG5vh06r+xEJF+C~Z?0Gm0vO{je0p%Sww;%QG(V`+zGs89GGEEd zdm##;tD+ELJun=8ZEwP;qWFUX#X6;Zfruc?*;jR~6n*kam_t7N?3;uq5y2pxnav~a z774UGWDoDKOS;Er6TUM-Bf23$xq_$9VjlBxq^nG=A=-Mx5ScT5d0EpsV%rP#6f*<& z#&@=`+0{ya^8vSj!2o$jJAcVqqPMPf#2e+KWnmFYd(|_}*eMovzSf5bW-o~d?jfK6 zx);HBi8NjiCY=kR|2i^v>MgQFC|I9`$zFt7`Wbf{RH1kbxad)g^5k^NZt#<~uFjX;;1J+45@}gBdfz z*4BrBR(l7@kxuFB=>buZJROCABazGI^{ZE}0E0zG7pOluTA(EI{(UJO0U(S%_q{xM z_zWBaU*tm`a!3amX|(>?&h*)!2r>F#t8n>Bz91I=$vlAI zytlJcl#`=0Z`7^}(xSNxxuhJ!auf+BBGBA|aw^c6F%`a~P0(T5lX<7p;B#YER)E*{ zZ$ckNBD*X>fO0FF0o z>*aK?ogF^o5vtC#jg5_i4CDXe)V2y zt}ApN0#S-TnR-My%YQvG$ZS&sv`onv&^dh##m7%U30~YB?nqxC>C@4$s0-H-@DU)! zGy&AoXgs)}0lL_zuw_Z713%~Y^&K_0%#}Wwyk4jRT>`*H?ct=jRMpqvyQ=~j4f1Wb-(RawJ?a%YO!t+Q%vFH(!5(a%6If8nSouTDS1Gsbry)?TQ!_t>slmg4)r^9N8fi|1}+ z&Z=m%UqWY{dG^HK)1#k!XW@-jeN(G;xdsDX3=fWbd4VrSNjVB6_vgb1p$0AIHum^ z0+g*%R7Rkk-qQ;3P5fXhhe(^yoCBthDuFB>S0VCwfL1l@*y@YHul#mo?zI$P&`eD- zBR-N^Ru5372ZnFeojHNLwxgS8kyg@pD0p~yFZd^u)-U~^k}#6IP&G}x;@hi~mbaH) z2{QJA4IA(EQ0Jl%+vG!tInF0B2QM|N+RkQK2G*{bdZJ3&pAQBlvWVyrl9mmO_feM^ zMfZUfW+)fh^_#gaqFvfg+Tf&OOxI9ab`DmxQ&+_qN<)%9@`J`6>AG|mTkW><;#czn zbTf$_!lU>{_Te;X=eDYY##%sO9hFQ`-t?;e8$g|`dXwG#iFg|$*3xNs!@5x;b_}A_G+B2oStJTeB05KIi>xM-V|l8p>CXa>!HjDEy!Qgkto1q+XepC} zvaAIS84s--twGigrqSj8{qJsj4#rV3Gs9C%rr#r~u#b$k$!=33=#VRNpcegnL?;VI z3OGof2D`8CW{`)Dem0_}`5#7*Z|nakGo-o-IC}q<@MKOx`i}Ugauzn$eya4Mk4Tt* zEFtu#t;kE8FrX&#|2CM5-=2Xk^bzY1=L&D&Z2aTDYETIMl(^s9NF|j5Cn8{?2-N*K3PXS z(f{_E2$^et9uBC)HGl|7J;i@m4m@B3xIW=XM3GP35+-)4{bs=@)EvwazIe=)&TAa@ zt;*6QIz>%~8lzZPwoWma+t1PeaCO)?P5w@<68=e46Cp5DdC#Z=09QQ9UH-h>BF68F z#RivqE91Uw+x?U|nVC$;88v;&9U&$rCZjJxw&=%-+L$E8#l-`>zui3*{AEMq*89?G zd`;0rS|(p&b_PcTC%FN!=|Xnt*>nntys3b{6JwX4LnmxjdsFBc$FJ4*c_3`$>%HJ# zyxzWGt)I^i`QH!837&B`*(+**lWrPj3-lj3Dv}f6Y6TorS=g_%e}b(pY-~6H7gp7n z?kqP*nCzUK7K5Rdp3e{#qJCXc)mSn1a5ZEucU|zh5|UaMV6GsmkvQkS5Gg@*8E-Xj z&1G+@2IyJ{V&WF7G&IY#+ML6GX&OE=Ja=w6{Y~Y8?<$X98!>84zl}oHW?3ZwwZEA?`JrX&1~W(rRwXN@ytrhCDWJ<*Ogp_+g@S z3h&4 z_UwUQuDylQm(*zAnOULC8#!hs9Grrcm7Z*M3z#nM+SX{ni`SA&oSgPhD4*p5f|4ji zqs}&L#)sSSa0OPzc)vSgChdr=jR{JkzPN#I5;=}oC`&I zYHBLKEByIKb8~Y^$)1rsxzXp82raaRHcQ378bd9*ih1g1hbBXP5s4HH6U0(zV0P3d zBoonf&E`65y*aDG?9Qwq+v-kw`#q?TiO#|^IRlU zWSQpz)%2W9X>Sw5qQ*A@G)7EBmo+B>`OgG?SB}=lea*!M ziswEE=8G4sz<;;beA^_Q!Vh%fcqW}6;5UBL2_{lR6qF)X8h zt*f5iGAP$sqv!v*?gH8v&*;|16MOHVz4gA(6-4yf>b`uC8uzaS?nI1rd?k6>e)_VDRY^ z`JEMFu_uldXz*a`KU*O{{l{g)MEn$CV9oZl(qAB&-E`3eg6Ym%5FzbMO5-5ky80Y) zyx^2(Q-Y(ohxlm8SqbS%klVW6zz$xPQ)$UY)my+}&lWmu_%oAMmZGdPXr@K{D8H9* zg)QfuL2vxY>9oa*LC$%Xa$rp8>5t7~H5;sWD@ zEa}o~(XnEU%U=W*&%

0IpdBd$;wbisn=E6XaxPuLUqR?Vp{U?eD(=>Z2QcGY9_l zv&v})u{*ErMrd=h0J_;+1DMa908TAWDL5JV=aEHmLAOQHna+^GHNN4h|)KB1(^4SN^njP9Trt! z-;V%HS{-!JhYCdQ{ArNRs_+} z(blwAKrb;FFOJ#{e#r$amj2U3ybhML@edyJ!i0fWCpdJ+dmNw5AvF{f%GqXyA z!vR>8oMuy)#KgDY=Bb|E0O1S}lGm4K>vq5bq9rRUDr z%>~taEA?ba#9$I~$SS>zmlPw`rOFpJ;?!l!PxqP|48&&L=ZpEW*C_LQl^ODriH+}v z#1@4sCAWB0l5-sQ*%rOCYIPI#=6HbmW&Ch}U%(K#FyJt>Ln6dy;Hp&op7-zUsOswK zmro2u;_ z1tx0n5If_E%!P)Eha}`Af&1g_tKZ$-msdyqm6es!$-K2j!`T2B2ekL&_?FVqV)*%j z%_beegzAf9MQW5E;=!XNMn`Wg+y43psb-WF3KUcxE-rSu_~ry#`jV&Zjqx&>Rd3m1 z55xS@a_?u&`VQtI_Bx61IK;kA>cxsgf(FI!ybzaRD5NU3+BTZnU}ZZl7e1BKLaBqo zs_b^ANQAsC>(PjKsTdh!)Q-BMXvsu^$dMntqhzd-~Aza}Ik`1y$e7cytS3p_k(_R9B=U%!6+ZQvE^OsERFUNA|B zyjf_Ik@q_6M++3jG92TH*U8<3bj(y(uWJVN^JcEh(H8KKj66lTsZwsUSNfTs12gg)q*D)0GlM2;b4lwHa4C<{0d08(9q}R=EDA8%dP0+nONB$GDS17t3iex6~fsC8#4N))~vJ2V!&c)nWI@h&*sVhX~x9AN32w zT;@YzW4#HSB{enYv-a~v^{=vv;eCqL?En$eY1AE0TQu*?H{UWgUzJ%d{zwz@;dj_i zH7D$RHeRSAr>54;7tRZ^1DJN4N|d~6+SBRACMJM9aJ)FwPm=)_G%ovHbuhqTq7`8I z1K~74U&X>=@6Ma&z*~F+0;CTzp00(3G$g#E9AsZ!KE4E^Ktr-*m}2nRApau~PRc%6 zHS&0qKdM=6s(ir%8S+5kQ7WRK4Iu?8R}mBc$jC?rjk?^$46URQX4;IRB0@||@=A}G zj^$q95dyHj>;(AUDW(CrpjKsSbnqM$vTs=zr`_%fTCAz5DUf=*U`CjKbPJRqa&lIK zl{glh9``qK)*Og3z)gAuy>nrI&#iob;8BHkS62QPC-5(Q2XvRfvt$?$f1b1;-b{Cy z^##~}{+*D^=8d`lo+{vingt62WK7_)i=tKXhmf*E?s&Y^$Z+}B+}!Y9&UwtI4{g?Z zsA*|gSy7hIilT zq7u^w;g(77S7055EBv^#x7VyQ6l_Sg5!0=;MvS*RNlvxSmeh zgA!!7elMT$4cN!<z-@&& z(}yo5zX5h}z$&HdE-QTd>KqO$@%;K#l_&8RctA`iGSZe{kAZYsTidUmo^o=)Q6KtC z&f1fji%X>p_@bc8zk+}eqvdvy<&|;Q>cS3kP#zHBcc}2C#c0S*W}rYi+u7M!?@h=V zL`wzddaD7d7>k|f_$93-`rA7@fE80E#RR*`paJ>Vo|Bfgppw*xo1&bBnwlDF9}o}# zMh&*TJrhoHclEjAVl=~95;%DnpFe-TLIF4r!H_I6lZCFELxL5g_Ijrinrgsd<$|!1 zCQ}1yo|>9Bq=yFwar~~_DgD4rI9~^)MSt|@(aGkpkFT|jjh?PSkr@+JTQ1ZEw7d~wYk9^!a<_k%`y1KGxzCHyuKCl;{)v~j**ZY!? zP*B*Jm|mp=m#D9=uZIT$DQLGa!1d<21&kc9_njOc%Ub|;5J8jrP%dt*uH+{$yxG~= z0UK#?QW7u%j-2jH$Iz*Sr=;uwAE$z)rRDGbe#*O^i2Z#_^Nh^Qm7D8J|7Lek-&dyv z6g#t@(r8kHfb5TYH1a2j`Y){?U{K6VP2(r1_A*>Q@V3zkUd(HUhbJfV+ina1btU%( zLqekau1uWWLr|^@2L}g@f(`T%P7g_X(LEo_gmpQxHz!sU~ye`8x2#Y9CdZERSXnV$h$2`cLA zbl~pI&85m?1z8WgIH_7dGM`f6=@D)MoRvNE9qlkUmy|IOl3W1s@dD z3nF%jdhHPKMuXtbnTryw4+8qp#vmDBUC;LyLFI-XmXb0L0{$HlOU@0VesgnkrW+J` z0%|033SeQXs;WY1U;rcPKtUB3b#XTD-h6v=3HAifw6LsfXny_{fUcX3jF7%$z5*u# zz>fph6PVitxw-p?hltOfk)(r3goB0E3q;aC^1{aqVX-X{5s?sLfn?_a>c32&!g|GM zcN520Tow;J`0#KH(!=B9z@VU$v$MUK+9Oah;7}HlXm8EdpHZf`90CyIEIfG_b+xCTznvjmH#&b~e(X5DXKeL8&wK@CAh5=1+a z=TF5YB#;mhK`y_zdVGs6es?+1spL_eotwno+^GgJ-vSH+u&@E!%2;sjpRI=t)&?Mu8V;m_(jhPq8APbi(9pZBBk^58_%$5L z6q~7%p#lnjJOF$EtAZf=O^^h=y`#hD+uduX#>%rGIw7InVxAxR7~IwVkc6mcEW1gx zpPyfG@$TmoR|7M%*(r4PWVmcxet!Ok1deA9@0*_iz#bPD7xu>sd;shNNjk`60Maw6 zRnf7qgah;jg1OszlKlua;GqeuV7N0SxIQ!0mf4*TjxD?m762MJgORs&Q{}X z9b(dsQ>w+T^bI+0_?k4FjK&|3;-4o61mxhMNAc!KHHMDcr$?9yofTs;K?t8H=MyD- zSG+n({}y+%F;QHW*uc55bV&bZ?%R zh^PsmbATA7W0@A~_nOMf%8YkX@x?ym_2kLrfSZ1dMnos34?rQ|%a=7~PoDSy{CP)b zprE0xa{%HFgau;I#<)-c5&=M#DE^twdOzG(XBr&KsTtkfn>nk)pgH6hE=1_pc*$!x zOKTfCaHgh>e%}hC1ScCT-Rdm0I$U_4m45qie~F48WqE{KKjD#)5-A+2Q6`az(=Ges zps};pMK96W(M<9i~V@&~bbVSK|eI_D@OF^!A?*rsB=WOGPqs&Vt zg1m(s^KGbZZxX6&kHeJzYxaZ*pO$x=97wi$!|WAkW@cv74hE?O1(yc^G+!Nb;Njtc zsgMG?PeCZ2ntI0`&TY;#+w3mD!C?ocEEEaoo}Uu_yPP;ts^8z96VjfZyNy#z!4da`- znOnV2O4C;iewGZ@WS0+T;41sjRpgPC30_JxIpF}3bYC&0T}_%dWh|TP?a#zMZ}pn@ z5*}X$mMh7Gzf3rTJ3MI$#?}&nojePsE_EzxH95fbA$r|e>iA)s7{Nnv1k|e)6>Ox| z*4A*q!GY$N{9_8UXl?_2bKup8kLT9;@zC79Cze^@YTxspx*|mB--!QDNmWfng`I5& zE6L=_tAX3;bUSZh!wV8674F15pXQU7R*Q;$;Z^hAJsI<8p3OVWPfI|cHmYC|JQH5w zDL>=(+vGlK#zMTR+~Es)BghKQP-%We)xx{>)VRZ2zw+HkyAx-(+`7WkBn3X}y=X!$ zXnn_1wOYo~9n->^%!aqx1{N)52~%59t4J%4Ep`kdtx1}}m_LdssX-H4HFs%GBS?5( z-jJbXCGL~{3y)bBqO3fz)|=3-YXyOPD=D!s5gBpV64n0&q zvSPm_U@c>(wj}K8&sEUFKIGW_P-RAcFIh*5HT3ntgGg_U&&B%}#iskOtKb)C-2@{f z19h2W7QMInEjt1>V8Im8ah#h;G=Z9qgM${G`>)ug6l*&%g{? zaBG1Qo3k1k_`vT+{IuBgZr4uc8I^)w!oQ^$Sj)%9$6Qb4-Y_=0tc3T~c{ga@v%8Gpy(N@U z3lUf%v!^E#f=qU1{Tiza7mDLdQMF@YV;badrZBtXWNmev>m)K`G6fye-p(u6_vLAx zQ^`_Tg^l*ft{a(0WtEelN3AFlRF6jyG<@;1bJPh6w|S>VTImM68U0$1bJXEFm{d{( zb%R|uqZuGOS@A{7yb8WJa4UKXfvi_&R?fhS%3NB1o)FE1lBHMB9zG}_2vHM2QcyIx zM`d7WSOZ84fMp$Xd7>7xKl%Fp7bu3_|1VJdQOVhB6XB+z!W8`dB_MB1DXgjGW-m-2_EB480nM2f0Vwqqo_h`W2qoHC~O zPMNF@yu~&Xc=a&NSc95L_*1VpKON=cVdw70+Xg`AQr;yw_cK zc;3_e*;?04lHhu?{6x(QFRGK-QBR4#S!~1_R=svLQr-Q$V7JZeIPjcPdiAGiEhE8% zhY^G9!EDix#yh|4kO=_X($Mf>W`ujc*D}ij9X#LrR)q zHTDMr;l^BfS+!?fRSot*(?PMe`a|PIecLERZWj8ET%)1S5Oya@h$LZsKvWP2nZtf8a_pNALi zwwaQ1nv=fP2wNehFLg6nf+y!Rf52<5^U>sS>+<4NJG0|Rni6~Tnlm}QN4#+Ce&}18 z2lzchlLJF4vq9Wv9CDh^rf~C4)Eb2+H6}0jTPQi(NypOa4?JlF_v|m{gRDPW+WeU=)r&a>F7a-SqSpPntLhWUyYRZ&Eqg93d%c9MHV!0}_iElH6re;V zLM6(^YG?mytrJl7byO8W_O9`s4XqPigl+bypb{Zdy9gQKZTZJGIQ`wteEt6{bfd31 z0%dw`_U*^wj&(`#7mZKfX*oAxlX1Zb7Km z@k&oG5=t_Dj`nWn!|Hiya0 z0ePq)A8&v=$0O#EITL%&;KCL_QV05!yUcT$(^ zXlHkr)yHnEMn2mja-ALX_2qSki}aLT{;G=^^HtJx5WVXY_Rs&;=@r#IyXsy#3jPkj zK@vShef#K-M!ne=De^t=6LW2Q+FHgi;{abLWjxU3oH$d|I0FZ$hA~TtA!^YTb0#t- z0L`sO?M*^Xi4deg{L98hP8p?StX8?ncr8k)*yWi!##!@^yY8vx)yD2>V%M9Ce$Wi8 z%5L^MlqftVGf`s`en6Mp_y~P4I@E9Rb`fvG3H@2H*FHa@ojqEZF)2GVz*bG`Nj*P< z=rdG{rAGi*8b*VYPXaS3HRF0h8LZE|+LnVn{i_ewltI5VRUx|8%tecRaX~b;++^)( z-nUQv5r9e`X;P zEfHFnVrRxTT^#B1NF>Ld*}$5Zr~jOV{#~{M@@J@70b9w`%)7qMJK9%QR3HC81aFA# zd3mOz03a|IiEaI7odoP)uB=a7Z*Nx_o^_P-c5pKxqlamUb_^59`Tb`6S+r|J|F`nh z*Y(@1;7xtkQ2Td0Mv(YYcZ6t$nf_Tc`m}1yX5}iK7c+8AP}SEcndE#D%~zzR6>toD zU+mhu+5YprIfk5;+Mkk9t^>*4G6X+j*t3Du(lf8nr$ z&MXZyU&94w28LtUZE9yxMX1V7y9OFDCEu!%N$qLn ze)7`K;jwT;Nsi=8cPtj<;XwizlGfuIV1Y&Gnr&9KJk!0YVXTuzJ6kd`xprmp^fkY| zSeb~aru8?@q?zYBTQQOv9oci1zHT}jPR!?FmhQ6ji2wA{T!OQF811UnW@x8e&4JP)T(@A&>y zb&#v}^7@>FU7CucLCulmql_L_>*?<3LQ);4;0FvfGs8| zIWxR;jzRhaE=DAvUCb7y(8X$l8GL*_o}cmN~!OnRQfu zVSgjAZ~y8Qr|-*q4@eCgTWB2?^0A03N3jN%igT%`qT0R|LD5R=rbkQAcB%vluynJY zibEA5Px3uf-`@*Sd}m6V`%*RUp5IsXuBe{9kWwQ=l80Zug^eGT#Pz$ZvF{O%(H3w?mSAv#2CcLDT`Dlk+-q3vPYR| z`r7o%B&5!q<yTcE6dLG*HsM6@$ZBL-%;=XaaItKz1plrz)7#JuhvTACS>9Ai6 z0^TGVh;hryFR-vq03>EbE(h!epwhi{faW~sxK6lp=N&FGG7eRW8oeyU%kN*mj#ah3 zDfp@a^R60GVX$bLvdD~Da*GczEWy#95zc@i@Q{ zp_2&%#t>*>;14^Ias#dG)2B>7zh~%=9zKMKh+LkZKM#YDE*>~+WBmqTmywYX^zM&& z(=#%bf=E=J=_IAXz~LL_x_42qHm6q6CpBNrD7z$x#dll0Fn9OA;g_Q8Flk+T>%@s&yLO?|*S5O{j#Q|qmMg2ZjW_8qUYFS;*t8Iya)+V9 zx1l0(DeR)O^pwp`cJ9fFyKiZ#HHxBC)^2-*X@?h$xhpt5DDoc~xzVv~n!^(T1=rKk zRNS9NE=KMxvZ__vG&|=lgf2@f#Vm4GEMKr}&VBV)nf%hT=W|(U<`x}!L5lK5O6|v| zze+x{%ng)aBKL%TNQnG&EI>+q{g#g#do=08XO#}IXV%_tqQ&*6l_Ys`oR>ats_+Z@ z)=4}SGLtu6WHsX=l3i@OWuNxn94!UZ> z!st9a)*%D>`qj+K02q2_iD@wEcb>6s>!YQ?t=Sz-{N8B%X$MIuBsa3=bNFM@IB9$3 zdMM{SKlH=!Aj_!6XyWgo^6KgMouyU1QC`}8ja=(I#jz=pqb1gyRMEXrV{Ek9t+MP} z=53q~*mr-73iL9kQ&%k$TgvV6So?6}vE-<*qFjqT&F-ihRf_vr;!>*R&SiF(CQD^-r9Y>x3@hq;g80ilZn5_64_MEWDP zZ^HI}Ny=edkrxRGOiRdgV%ODGXgz!9Z9n-syT;b4SE7afsw$jmey?;JGj9D<+sxb| zdmMc?ig5$lLwaS-WivI57Xz4B*+fM}eWYQnAtwzFi-m;+Qi-vtX-QGhbuBGf85sx$ z_Xla7gsDsGg*-x^g8KEcqKqfEM*X6eShIiCFY2jU3kbAlWx$1uJuSoRv_P|s#oy|e zUQnyJyz-aVp6PBhm3yHs6c9EPJF8dQ{lq!0Byo7(E;a_S>ZuQHPfK^1s6H>6{cGOa ztWH0Qr-rsziCSJ~g3YnMG+UAVRxo4u3{9)-?W|*CUuT@CA1o`Wsc$7fi0zHoW= zXUEvt6{AJen=3LidHDHNo7whlXJS%weY$aObB^rN&(s=K?ODT(6%qwQW2Ba`CkhUH zFE8vpp?XV-yw-1EJ?23Beyc}Jd5M`tVWdOnJ->5{d<(s*@{D(^$&$Kz@1{-k)*VQj z$O{r?+p5>U=u29AzH#_l+E%I{odz9Ioe81LK+|Sl=b3)G}k*V!p94!zILQI2D=-?K0*kIQG|q5Xcbz?a_WndVjr1ygapZ(MEcA-lUCOD!Y$>;79(2UKh9U z69dXN-f!F*F7L>{+r52Gp4pW>n*B#_@wFW<-fnKnxIFzi372|GcJGn9Ym>evdmhwv zEx2^Nm}5+_RUn6I6?nb=W=a%Ju3(XhuN9+jV}eZAheJHwLZr%HGR>{T zr`rdVr-vFtDvYlc`c1j57=~v=(o;T>a6VF*M6kV8@LS>H@|m^i;h2c;4vaQYwTCEL?IcMel*P5s9XW^z@ zUHk>)qd~&g%I#T`eq4|@u!);#d%dBp!Tbn;VC6hxVtejG=-DfF%p13r3iIjJYm6vU zf4_UF@05SFa15>PiEFF;Y2!M6+(c%hjG@WrQCEx>A3E56$amtpzh~&qQ^NU&c%#be zoF;^Om(05_g|cjEl_kWs4(ZVo95>+QJ>T2v6b|Cd?nH{6<83-Q3Pmw^I+%i9R2ty# zu<@(H3FCMi7fflY?~yuA=?pP>UHxzT!(ZKJ>(Dbr@`JGN%fti|kfQ@TBO@ZSG3M%hS^nnkVpV?Cf6N7ye)^KFN7`bE``~!4I`5QXBy*xw{LwfY6knONXWl8jAsR zykBZhRUC~6((>gCMUO-aY`_;`(}$Cb%L0Vdt@d;(-)hij@>j2-Q658kAFF5rPfLwD zeTte0XaR#NFREtrgt}76P+6iYgifFI0W|nwF)%zVCB5J0;fG;f$YH=10f+$wkm0|I z-=Cc&a+f}Qk(8W#se|=43$gR~-!+P!0`@vc^XMr+2Q2gUJbyQ*2>>>YEIkEjVv!gx zFS=kp(nmw&9$jGVk^JA~c|RRhRdkiR5BhgqDf41U@=s@b%wV=sC(R&uPr!a>X@Y2G zS;ej0fBmIGGV^~v6~Y=1PsYwp&AodA;U>xUw3hrtVRzL>V?H=DNTc6xX(TUCY4)Ob zZfh%0bsC7sL?1ut;f1((mKJ6EhN(SeelI+^g|#0rSzK`2v%|b?cT4B-9|2Q^LP|1C ztlS}ds0r79{HR$(Ow7&Y?=dtrlI!ojCs<_hb7%LFWcbqqa9T`r-05diQ1)7NGS%T@n!%cE;|zn#?*_RWvST ze9s>S$U8N{m^+qdywY$v!_qN zyVVZQc*B&E2u^I`KJ6bXBpZ5e?R)BbT>`z=@;a+cY;D+5 zUDX`M47)m=8o2icdo1w=npJL&Y}hIP)xd7Nq$Nf%R6NVlmdTLUZt0%Bwb~EI(hYiU zBEeAN+_T=1=x1?oc*<#cM_(wlf!)k`YP%gNK-QaL0E z9;;J>xciWzb9hgo_^KY))o6#fI;TP!rNE2Q&1<34H^tWmD%`sl-4~Qnj-6ueR5Fz- zqg~+V8~*9?O<~WJgyWOw7vf4^4ZV%W!C;K;O>Il`6Jd4v&?o;~ zXKl26U~6EzmZo3SC-Jo(S&@&aRVsosuGp75)?AQXJr@-7BQ)yOLBpN&Ug7({)byXL za(1m~C%x6o7WvOTiw|e_Ix*LgZI6N(|Ldf!PFQ9&M#L?<_6MdM8>`?7%ePKWe2_io zt}u2Cp*6PT{PBbfst?4B8q1JAv3&A!>=}y+&a*Tx@I9JU?4WP-KyR5uNd(<DJzODKvgNehf-DXt7u zNJ_Im-zuoYAi^q$!Q8i7j-KY1m-Aka%++Hh?@Vl`dk)rG_SI<>>}wv@x3F3c&nf9G zS$H|{v7hun;B)QIEU|?>jFp)S_5w+?%V)yXLOx#?4Nu-JMOF_N+C;r4w@!TRcCd{; zOQ1D-=<9X&RIapK+SKj%qhh+ zJ;N3Fx7+H_*RBgJf!-fQEzgtMMRA`;lX^eYRL_}TPD_-pP2-E$e6#&k2l@Bn-rqly zbZWNuaVI@2q*8e_QsnPz&M^W`Fg9{1JJ-@V;MCpc-$fn{&y!D1;@Fr3G@k0TNt>zO494|WPM80DCx{uvx{ORpNbt@Su zHwD#Dmc;U;l!AE4pCY(h_oS3bU-t)IG#Wb_LTfwO8{e|}J^N==@!UR~ZSj2<6Wh9^ zm=uMI%yZHeDrG%WNGX*Hg@2HW|E5gZeZu7X_&6MQY0?xF6hJ^-0T`HLd>P3_Rh60w zl=q`Qhi-*?^rVKC*7Csm+O=DfD0dOwn56_$Xm?;)q}o~b&(aHb=)zCNf*zkGRALPFxtKA#X()zM&pj~Q)@sW5M4m#M{a6@GXM^3WAQUo0Zh z4I;z)=zeHIjiAG9X=#CXAaDUK#sXk&;4a3irte@^mnk(UHu75auz&PM^NGTR(WZCr z-qqEm``-7wnWskD4FKx8uNoKZohEWXdCMhAA3!6XhNhZFO+$m0me%Xx!({pbyfvJm z-QqO!vs@Z&v5~in43hdQFG%VFgW&ytQsboROdxX8pWG-H{(OX3WEgHh7cMUgEQ?cI z{DqaDkI&5FVk1180|IW+v9qzgYi-T#I^6K*m=u``JnJG#>lk?2gmmEF+e=pe2uTLf zE&a{R9iu7RMPBC8%LBxFGH&I#M?Vt-BV*bUc}w)TOmnOo zu#u0JggHyW2kKRzIV+S=L~ z)z}Ec?f}iL`?%@B*Yx1*+}vlEj#9(`YFDpv1Q7v(j)r@qXXV?sk{1mSZ_d9- z%5^a@=Ia8f4!Y6B%K(!WopX%OE(NGiV)#ttAo20J#CuNkc9x;vKgi~#nO2bnb;b_Awp(b1C=6H%d| z*K~EQAhPp0lD70{ju=_&1J3~@-1-}bC|IXOg-_>kEIczb{R^hw2UK;(OicfBvd>$GqY~6dNI<=%kbmegCtT|o= zTbiSZrTOjp_2H$6;1HP<^Z+mC(J!wnDh1!W{@#Zgo~^3Z#+x+669gm{g9pM$r=t3F z$)99X`4T=gCg!`9Y^uJJB;nQFU8JU>0++RzlX|6&aDl~oz;gYj&3DjznL0&$hYt^e zQEOYK&s=Mjs&X8pxpy^*8G@amsVQqiLq0SFuz~FE)~aUb;CKaV2$r+N_xSN7ZI)`ti{J7Kv$MsJ15kZ#Ys04gLu>1^yH4Y+uNp@_J?ql&Gq;+P*N!-Wl4Po}GX98@S*XLRMPPNrC4EW8c+KzaM6gg&0(TNFibf)N*=|+ve(Q zMz^AjU{-&n$(j8g)`gvwS zsCRgJO2T9enpqz}M%?=4tEhD%$9XKb#su#TijIa9$C4#b7_J=iheEk=4YZ|4hKAm< z6i2?!&Q3{AR!%38XWQD^mY1E$;{E;o*c(GURa;-LF3=DutaNx^viyxJ45Lm621jK5 z0Ks2URMap|sgH7~djCRs7TVK-=ZU;VH51^uVF_YopHLi;USQ82NXN@2A+e5FbuCMe zng6CACgH)KLg1)Ti$=mqoo>&(o0Z?E{=zc79Rrc7#6aU4oKOB-JFs;zkYM5(tpA?& z0I8nB^rO*Zji0KhurPV)uu00&T+?Y5$1Q^e`U-*q0y>b#0;}>KH;mIDAi7NJ_q?C`H|wgcGu|vOeym%68I7iaIaYHnN1GQF>MuauEs2KE)XE z`UP|Tu|EFn3>EjKG>r_3S31aY1i9ZJB@4P@v?QLv5(nsYIJ^dgh;a`KFerp>Q2n3W+Y?o#&Hr4oV@II$j0ahG-F=9;-KQ) zor`aV*aEE#h-8hTb&MIMs55U*%PT52JU--}{7e0g6=DlH^ZGUh?cNMKQa^ z3QJ00A+N;~igWY$J>Nl!)T(_NQJ1_lckjgm#u)Lwx0pCUFB3HLb91S;Z^pz|t+awfe5_Yl z8N%N<)DY!x8;4|1^XUGil@;Of)~2R?badzzOF$(p)bo}yADqzZrx(FXKUYKw}zO6Jd*9vMij6?ArOx;;qF07 zU}j;->}|RE{Qmv>Aj8XvWI5cP=bKW+y0ofTev{pKqNo`dB7mwR>|^=5Fsh?bd&u+t zzb`~bCgYV2BGCvDsF2w*Z!v?*pkehB8koDa+Z`rI|C+luFo+tjS)@FB2?8vHZ?TdO zY?*fvDh~~&?*6K2Z@&N|C_CmYd8}xPva^pq*egyaXc3%gw83#h3`^yOf7N(v{6*&} z3oNyNe*Rx;zI$AL3~mVgz%MAM?p~O}0P*21BcmfFb;C0tgfZ|Y+sofZPc~&XcTH2HK9-um9FXyDEQHwM*L~SE@vI6X7dcnBQNO1_`qM zvp;@7nw6Q5FucCDSRu6X(-F%=;;8Q%YIRw=!yyRl@5@VXzT@ey?FAd`xUibA~? z%0wt{i&9hNvVA@bV~Uecc`W%t#+#Nlj?w(}&BYCS>G>Y&DzAk$K|3L8{Ba-T9Is!W zuD<(%hM9qZK_gS=+u&dm%xGcE9~&1ZS#L%xT9sH|YD9v|$jCsOO;<-Jy*ik1Ug_c0 zt@qOQFrB&aM@*Xs0Rn>2AqjUKr*UX>4{~b-2LXAk*2aDk{8)u8JN* z1cFB;fw1ipc@}XDTtjwkR@p)~rM#)_V}@%nk)y_SEHUDNuJTDtNGcT~k*~*b?yCw4 z-r@2|Uk`^O`q$%!u07c0Q)J{tI%J$?Z-4(9Ruh)P(EhDLN3RC`o)r%v*0f5Uo}gHa z{0YHgO#rhtp824udB)(~L(uQ2L6MOG-v@O|=y_GJ z=E8$`x;{f0aZN)5(O8pw2I<}jt5AGi*Jl*hk;dA4drN<3?IoO7b>tHwa4?HG{_Ty9 zZZIPhA`DDSbvy`;74Kgoe@VmpA=b=*&da@oUpBj`t?ebz!QQ%{ynO8n69Zw8jNwjL z{79aKtdUzQ@6sJNb)L|Y;^Lh7`YVO5OME4NLo`|9U_;(@7CVxPb(hr-rNGsoB`{?UiwEnBx@jikaA z0>x`;*CN6SRww}h0VIEH(Rl>~kU#?c{B+7)i)KSdXBlAwVvd3V0AK^R_eI+zJD z1b$e7^!fQIeHOG61_yrxdaPEpx3|~VXXNUgA>7+3QgUS*K~DoLx-zGwg~e6tlU!W! z15*pf5*djh*Q% zVljrs)RHr3ZRX?qkfGL6)HYfA+P%%|@)<4NIzLZ3wW8TjTF2u6VK5@dT`)c${O%Va zMvn;YKInz$;CAskhZWqGx}*Bw|4IJ;<3G0()P9&%<>uyc+>dQKt^N5kkjiDd(Cp5` z!=sR2Rhs_k(my`okQlgXG>P%B~Mlz=#F>n)|J8j`~^ZY!?mm_2-+- z`xBUGXlQ0;W}qiq#pO2hjT|&IUAsdA0|Tr5iD&^|jk-e8(nv(G9UL9khcg#fMO>1q zl%uSO%1zyZ@*k80G;0`@<4PT<3Fn!a&<{IH#S5SDx|WAOH>J2b)3JA1PT_AsZ%BBH zpYd)f{ZF;q&ST0?8E^UT7JipJFt<8ZP7aKIDNskj8YGULmVw%%My=|}oAoe*+9>U_uG6|`{D;Z zkB*L5Sy`)fm~e9Q^2|(4b8~X)=cS=wve4lx3*~d!k&=;7DW0&dnV6oosL*P>p{ZUS z_pDr2G^w+$@?>^-lRVelG1l$-XHax`n{06zYN)6_&En~?f-$tTyzY>}5KXZl(X`I6 zrO@bZDTC;~`|JBX9n0cop)D2dk+H$?#RRn4I^?_ZcA;$$4c9GU7YLlAJ8pErw>KfoEFH5886sS{1)H z5%5*Tlv;n3<3OG?<2<;tvMd)2hHXC{Zj!omgy|V%rN_+ zST|f;Vwd^PpIh`UUDtWOSSv{q#ak~FHkH1ex<8ytSaOS!TKVF)>-6?^N~pnm!)yHM zaC~TwK~6Cr&&aM=K!?WtsmHLQtA+y2)^>$3{8OiT!Aowig29_4SP9+vl&`l^-@I13 z71%|2Poa}yOoU(;=Qkd|KT&EoU=OrV(~WeHcVawu_<9wvuFNJIwNO!iY6FD?7XC7U^ckQQa7kPLKEJ@G*kUMB>E{UM!^VD-X+qE(+@< zJhSuJxPG*z)Y1o&@_ln$r7Ze+XgUss(zl2ao)uT2qK1!I)v0x%h{oo(hHpqNT-O?A zw~UT$W)^T;zkgp6*HpnQQIPS2^jbGJh*jC%Uzw~))C!G$cfF7;xIl5yqGmzWaOSFr zcusxUB4#4h8Hz_l(@gOnGVa3700f+VQ@DQq|p+P`I1oogAGA4%I z=*h{+XatNDSvxyBX=!N$994|l{T-j)KBe?;Ce1b`<9Ei0cSrH;BNw>EKG8#AIPc1= zF*d1WpmUSYX6R<&|G8z)GXGQDTi1;#UaEmu?2%FrM7+78T~{QMaOKg2yy0feBbIpd z6pyzfYFu>s4j%NMg7A`6HZ|Ct`)$rXvuex3|}N*Qr9M^z!m@&@)WJSWPVsYk3DDq&0N5#-nqn zD?AZX+M@vZ#4SutX^TV#k!nhcD>AzEBDMdAfCu9y%QJ7o&9&E%tYh&IUgIBOTU%S= zp#&%aQE_qX-d88JE{%WI)`n6zLcx^v_4H`fyol*ol(Ou%93Vw0c_R>_bmXL= z!T3Ad6pN7PLLjvh^C6_sFE_5Oe(Yr$2U6E$(0MsNAIU~;BSZYZyc>bCn{1pI<*-r^q*Xrzc}OTw?Gd=$ zJXIkAw*zA-Q*djK{7viWm%vQ&c!h*jyM@Z7s9QV?(oQ~iI%{J#&OR&~<8LTNKZa?1 zUt-UW>hvyh+F$s5_IhC?ub)1*_2n6b;0@%)Kp2Wk94d<~K%|oF0&7rLfZmXCsX8HE zsC4=49lccGwhAHAF2u0(G<|nqaeVSfa^j)-XYbk2#ZXc-h!Y7I&%J8(jE`4KxmVVg7uOnwNGlX6)Q09jy9#hW;V|c27NiSh(UoQ zW$F=!&`bD;+VD;69zI_b=S1c@R+}+yUl0_%nM9~UZpRMtSyhYYB?dart^>`aH{vKo zJVIur1`3@}EpD<~gg8Co(tZ|QANj>=?BXK-dOIRGy88FoeIAbhUKI*_+XjJ*#NK}W zBD7ms6p-{5P2H&b!Tf_lIX<{IW)Y(g=~L0?~iZ`Bnwr^(soQE0pvx z#0eEXt!!sVgVTiUDj5S}W%hwTrlOg(2x;aK+{MP!ZZaH=BoQF#pTMqYG|=*zPiMiG za$mM=du1mheR8Tk&~6{-wrTbek_Fa3`=7XrFn@ZH^> z+cEe1z6K>xBI!x-GF@BHJnBg~Ek>MECa<1DL{pM}Zw$ zU>9%np8S??7A=oIz>^%2Zj~|xr*FY?zlGfALgb557`f2h?;vuG7kCQ!j<;8*O)k5X zS;4q;L+N~)%!z~q1ZDb72{4dgyTgdYpk`I>*JrzqYXgTOX%OZh!BAH%)1wF5J>3&v zr6B1X$EWj2%LV4g;t46q$wW9f(dp^8YpJ%CjMp>fnK+{fOu8~MGL=>EOIAjv)@FW- z{&J^kSnzm&4UY7vAB)=9>o+-Fya-O9MjT2<-+M-ZgM&hi z9Zm6=LuI!!^!{zpS@h1&c7N57lhIS7pfTE1HNFwk{`8V;pMcpn>4$5a6~>3qzWM2q zcI?;CKTf=*PkaooTd_Evg$J>)Z0LZ6xH{jzKkO#Y&&lB?iSWI@UIasg0(@i1nyiN; zM;mKpE+HXdW|n7_U0ZuLkj%EZxk>h}te}9~^X&b3TYzCON2>SSa!r-iRU>CeNJt-s z^YWt=|G4WYm|FxLWyFfl)#m5vih9l4nnFRAw1V=o`)CS{kaTU|=Qk(oxI3uDE(4|= zCk_=I_K_as>mEH=8SCDLe(S+)!_Tlp&<>1Ny>|dk1r1W_vG(>s)|X%9TgSz=G9YHHa0>=Enz6w zzo5`5wbG!Ehi{}6?}gDBy`$~>9y8RXPpddA6LVN>fwN9x4 z3oh5wx{^`7ae0j|wUpB)vG2K_MC%mon{GU5eR|g9b9?2w;NJbNW^#Po>);#mSiT}% zmUJww^;~`Q3U|Z`=lkiXw6r+4+mub+jN?I3$Vh9pkcFRxI;YZMwYJs@`B z-z9tV?!>rOu|6Tju)s*sP7GSP8IBJ+u*wZuuA(K$P%tqwUK{`Th=L2V_z^}lF)h)7jsDBwakyDdIZy z6CD)b@qhko0DYeWxvBd;F|!QIN8Ore?Q7-8B;Y)E;%_hMI{5_4lYy zCH_JGdS~?W8I!LCA=P>dArb@y)YD78flO)`x&_PU@8PM?QuIBTl~>V+IKe+}qh3eE z9*fpYD?^0MrO#C#@wQKX{>s%ibKFdu7H##kqQifoAKR4ZeB(9eCT|7ep=~x9H^P+I?4_->!anaB1YnMP6UR z@uXqn(@sa$PefJ^PVDlzW*Ts58$z~SRg>Xg*$vPFPEzDYJznCCFA&>0@ysO|NnT33w3jO8MV zEwRRbLy|!YHPZ_ALBNeJl_(Gz#^4ll7p&Zp zqp0fV-4HPq4ujrL{(~0KTUWdm?N@hTy;t1QzFYG*fw^TcXZGr3h8Gyk&%cdH<0OZu zv=$We(cz|9CyYXmL=gFzJV*p*-PiN3u8x_mi{3Q+Fc|KeAj?1%KsHaT5$x!m>Cs`r zj+Xl-j#=V#4He_>?}5PvBtKZ6_Dv$~oCak3!=#Ak@bL71HTubk4BAc{FG`}8VqW6@ zx{4#mpshS@kjKFuiy%ZADW-_uR0hY)8Wv8tA$EB^a*ocjV1*0 zoPU%kW7^^VPW@RCUCf>|(T2>K#AVq8)vSkFp$&u8YmRm5w|ZA$82e?9^X_`^UduioHd#ao~U~3ezKw{9Fop zkBLU5N(AtJV_GwEe2y9C!TnV3BCnopP znLw#km8Yf7HDBX5G7OVk_zgN0XFK}`KABYMdlJnn_lml{H#siQ@JZaLBA0TpQ?6TR z<<{pg7&}f(s|h*l5Y04|Euleu?F{pj(;Wt#& z1+U{l*F|sF|B1Y#VPkW=JX#H)DAB5*q@$C>{x~-`cX_;iO)GVP@C_cHVD_AE{Y1M@ zle0G1#J}zH(15Iox;6I7epAG3iQAiTkMfb<-fFg*ME0l_W5SOgKN=f(!zIL^?(XhH zL_|8J2{08^)vC%$6%`d&L3MT9+ovMfFpKU8QfX=Fch0G}J$&g3K^=omnDfvJcLV$U zs@<6*apz4rr9t-=yS^vxxY?lzMrCiV-Sb#7)@go)Gh=phlpIsjCx7HqDs%op&FNsA z1|6rKh={x6OIa_M(>Jb~Nuf@=mAzDYPy1Lj7AsQxlj!qAQaUx}IwT$tNdHSQ7~e2^j*OwVq;aArriD zQZ$d9et$>GGNcagSR9brL%!@O5o1q6HzPJ$2AhPkVIq_AIg45*E+c7w8*-=#*$B~Tn0-DabK;QC zU|yqBiiCvhHEH4H(^Kovo=dA7*A`9O&zN^6>59a#z_Xn`S5sHnQ!_McE?L#T)!IFiawQ_?dNL zNTz1m-c)(!p@+S(eR<&90Vp(Q)Pnj~c!ElD`>5Z+E9>g%FK#(csIQRb7%x1e$vz1& z#8>d+^jF3R;Drw#Lnq|rqoIiKQt8MxIUqkdl-+4**Ssv#TkS8J!hxyLPn-(!Q|M2T zw{wA~NE7t-n5i^<^x=0|)1FSX1rCll6dIS1@T0pMS6N$I+vHC~z_&L& z0|RQL5ote>1+SRht2Gt=X=U_$AKV#`@YqSXkKZtLWUDIfpHt ztVfhFy(TfcKUm0Kv8#WT5jbxDCJd1O$HaHYoMVqXbxf3<&{ZX=U!hZh)etXDu;J2q zkOn27jOkzfxhoL}gPG1OyT7j&v-i&D=)gR`uJC zz(0TftbNxg<`5F{?Tw)+^L-XB5g5HEZe&4txBkgu$gAkZ>`i|+Y6o`l&1yOSQeEw9 zUki8j>w)};ybuPu%sdH291ncO{Gv7 zEu@v|B{xLK0kNQrX#%76(b+Fs+v%^*nVI)o+pbA*29sWAH#T~VW{C$-P}9)JX9~77 z*ny(0M7v6FQ&vLaN0EB59&sxQeq;RV@^HiBZo9d1w!mVQ#Gffe4;=e{IS$<#W}RB_ zDa59g@Y`}G8n#HVOhUO9-6UG-l+(f*uD zJcjq%MR0B1OOirTyuWIuB(Ui!xMXr(r}K52iClB~>N_1;M%E7>)Eys)Q4zj*@P%wI zP^d6?;Ge=@x2rurDU*%}rFo3xwA*;s!)BmJEZtgvsM~hdGyD@W(f*!^BZLCUn4Cx9 z_6a^hJwWx(<1K@dbpK4!`@fTc^Hh*B^?PZ;nH=hhY(JZiYI&qTT0cLh^ieb)#(+4* zR7o%GcIx6eaCG;%?JEMX))3X_r-+1QrrP?L+iR0J`J3w)`#Jxo;*##EU%@u%M?s>1 z$N@!L$K>Y%o_uq+{K=kYPrkY!K%A&@SeH~Cm~eUZ@;Ije!QoV%Vsu;EM*T$lkw6Z~ zIprEE;@<&C5(%u2Z}8+#=Xk=I21vUkTsD##k9Jijbft$eaxqUm#E4pUZah$~EW95< zk#x1}pl*cVo;(8dgU-7itkvDhn zz;9vONQ_50E$Bh5&P=3jgEkjmNyQ7svox!wA;FM>RU-qZ5+4 z`|U}FezHcYDI*UqKhD3ugTbOvo9oJ9`*yO5*P#;H*@L9+CAR$_q*$XJb~A6;+PZ39 zxb((aoOh~LZeI!7KqQkzb|5>LSLgFCy;RMYx-!a$mshy;%=nAlcXi*^Oku36+GT7hy;2p+KPutS!dRu-eQ29a*pSy41^MoSo)J@dIHlI4PEPFPL@m=0#P5<$<2* z!5eft#L=F(X2GoB@c8A2HIR`GIMOUqAXc#E!kLkeT?ISrbCb5rWhh_zcWqUr_ug*z zI-q_sK!xj^PD+FJQ#32j#qtTM;t?tU*=SL?*uBX1fJQ=rkPmxfm(s_V)u?x~6Sj#; z8c2drjZ%m%EL#bo!+D8#xQak&Ji%Xhx#pY#X=g(3gUhG?$@en9LVyS>x=dL$B`c3< zeVVoxt`hb!h3nAT@gxOE!Mtv8iHSgOGC~0> z)uMljQ&yHls30MM-dgf{x)T!_A}l9m+MfSivY(8Zbt&JDE`9cmQ0syMyHOuGYHo7h zc%qe}b>v$Y?GDLaqx|IoL2!u4b6MHUhnlZ44ZRLOjcw|+`P>2$4ra038SJ<|6yLuJ zgjB1kGMcQDlM_&WV@J=tUugBdPUCU(!p(0RBTfzLC?XR3$otS-RYdN;(7e%o5aGHb zW%^^l#Wiq7kn({f!$~ytH&L$b_w44HS_F2>DF0(qMFXO{NR*lR-IM3T*W!vY$#Hxm+|eqEn*~d%F=vw5`$G8I38va_P9Nr(!X!M>W-p#Owx^`Y-F_D=)A4RH&v$3=XtjC{rh+DYeldLSPXWa2{_h7 zMPWD0O;IH}pHY(6O&e_aBX(haL(9*F?qKu3y!LouSX#UBkvJ0*kB{Iy0{P{3Fzm&v zSFhN|=^fbj4&pT%nP0rHSQ0M%XOM?ShYznOr+KqP*f2y8c`7p(a_^I@+Bkx zH1RKOjAp-n{d!O{l#-HCMpkxZWhJ-(42PBVXzTm`N%nGn^bmesP~R9Hba}uB8Mt9l zA$E|}$+#)VXifwOxfzSXGn3%5;2s62PPjyQqLH~ywdPO4bOl0EQd*l=WKuUu)i27z zk}%QGLSYHP#9_!6Y7gx%_hc3pT0C)aaZ~SkEPv*N6LUF`blcAbVi3o~#-@^2{);d* zy!=w50<`Si36k*Gdy-qM}1u z_ywi6MVm*3F@oRFY~A;Ft?aM~dmLE>Amcb?lM8MR^Oas{5fsWPewy+5_4Yd82Rtax zCtaQM|NRJWORr6NXu^L9%Fg09SmoNqrBjxYhL|ZdT}`lC(Pg$R(;1Z8V}7- zx!!H66sb~GWHvYrF95`%gO|GDc6$uS$`7+wKRhm!L+<53w}egcbYkYn|3+k9ywwn- z&3FVM7X}fU5@%2i8;B)5L#H@t;vH%uoaJ4|3wgL07** zKK<$F`6yM9u`MGZTyBFW=Ny@@Jsmrb#J&RE%a)F7cKpM(a|p#Jg&n2YHw`b+Zl)DX zR4lmRA{$6`OsDSKbd=AmnsouAREH+ZfGW%I{mbJeqRHKV5#as_$az0`xK$WVfT#fI zI*=mc?9-Zy@a%u*+n}=cX89fA8(quR;|mWyWxbOF*`IQzMWLsk$T3aO69nsC1`c#MbVA_t*U5`$ zF)P?}S~I0LhJdOPE;qAPO2P`l=0RMsPo;)9vE;A{$PDxpB}J>h|9J}X1*9c_J}J0S znt5E~p@j6|4#mlnf8?Eih}Z7@mmuwIOu(mD?dalEuQcn&n}(H475&Rc9zjKEJ{XIE z8uZU>Jj8MNpK699%mI>eBxW~kNIQ4=G!4EM>+AqDo@y+U5LAdEM7;{@`5#i=nf038 zm1H(=7}0fr1RzUwDFAwnC7;=K4p4gHs^7=+&rarV`SQhug!m846N_ufsShYIwU5NN zZ`0&0ik`q;bUMAPR*e6(EA zSq^Ir;RAj(qZVqnGQ)rfav?#J9&C{Vyi4FiqNJk2N98Is;c7@AC}-|?HBe#P{RoR} z&igrh@&DoKM}LHmDHfp{dP(fq-AsJ_R0I^sn~YK;0ab#Ag0eXob?|a5d-@sPnFNn##?(hP2Mj6~ZW}w!A~?60mRP~8sAvYO4D&pB zn(CAe7nmzG&{FfcrdvuYh~2Y|4?0}xunNW8DT{bEZ*P{P*sY*hsYVW`@!_(_0_xwd z_NtL?`ao^g*c42bl6R&d*$TU!TEP`;$!&dKrwVwa&+Anhhk4Qt=CO(8Pl_uly-v<; z?iot1E81^XqBEI2t&4wO;o4Z$bDvy4IF3YGBWEF57vN8?s@>0(#^`tjGFAf!k7A;t z%PT8Fmw#}l6eypun!v0+z*>Q?i`b@KB!4XY>Feb&MImdSJpgEIT23b=$=v^39Il{u zcwO(-WlKhaxUXAp_hrz`O24FZR;Rk&cCocLmM-Yy$Bok~6kOV!nW}teqQJLcEft_H zO}9Wjiv-G7aIpJwFx`$zQ&8e0GZ5AuicD9U_5&x&`ap8kyNRM7KO`s}c+-JCbG$YP zOlbxR3K3(Q)L9_M{)Z*){_eJHJ!Nn$Qt+w=S>ypk*b@mOj^{%o)?@tEugQrGN^=+`Q98NlY1TfvTXy8rMo_qZdIYB*I@xr z*4peeKxbg&KqiXH%*;$n^V)AYxA|2&csd7cOyCpVaMHw=S-lmN9<$eBb=X4{ zIR`jO=t&<#d5LaaSx!z)mtTA$7#TpM@`^yDQqGnj<#G74Teq0OYKjW?$}#KKhQajc zq%_L(+<#fu;Y5#ZrU6$WLwWNu?}wjy1CG|rU>^+o-Z?rr9Kmp?V6eAI_t$OrRt#<; z*bDCK=>ROy($V3L!si)2wP1G2Tv}S$hvBMmae1r9pJ>T|4#S?jXd26ey4XB9;2`PhSn)G$X-4S5Yz?%zQ{K^P2?0;Mg1QTa=`y*4b$uV#V zI#T}ix}ZPW;9gOsi@nPtx{X_G%kGY7VLjjh6q&U@Sh&U~NQstXdHDGF4Yjtdmutnc zU^_3=ytZHNoSmKR>+75B;vZi#di6AcS>FRNrW3`Q!|8le@uAhZ&CSiNtv+-0_GP{i z#9U>ywY5b>Th9zr%z-ecs-fX>^rsiRdun0=oHV0v0Z9K!R=dEtb&D0a$^Un3&m+LFd3M zcezNb><0aEmO(aPzv4_S&B|I<^u3A|{c-_pqMAU0H0nalxHt7m_`kttezSoj0uJOy zj{swQwM0`N*SCsE8TkCeweA&h$9D^G%xNQ%%-&h+ffsA3uE(xLEqYn;ropb6fJ4B=?Sk{R<)=0M^0(Dn;v? z+XH(AI14)CBu}4i^mmxHHD|!+VjSolS25QQ4h{q>RGLq}R)$c$qoB+^Q6+_GJ^5ZH(#{O5}c4@gihX??<}?nfm(u>7tW;u6GD0Okqii!XlQ7O zfFQhBiNqooY(7;5+qFoI-kMVvuz(=0>aUyW94Mt0cYXd$5ifH(#JA569)(UJ&FyM4 zKX?NK#4_8nwF14G*XYO7#*s|gl_rBJ903%J+LeEN@78@&6n{F!0CRz^O~Y!eqTuDA ztxreg4v1`fTd;q`?8CzR49YAFVop78k)gj@Hj8#;=c!`$=(KuyZET!}gykD8gmWIm zlZRqt$_Z+jF_y25SuZNO$voeKPzp@RwY4sQeb*>H{X}TMZNCgPG5G`ks(hi_-rXt# zpUYM7))Ei{TCewX8ys?fv06{KIETWm8i`E0XR}u2AiC^j-ruap(8$s%X6UJ@IXNe< zp&Ei%8`SZ;vELFHQb7s5QKayOe;77LLxR~2EW!8lu8TbBL!;S}LRTBv{{H?X-QGZ^ zM?ymS%c%|m>kVyeL!U1Q=yeMoR&sLaIQaiz#35kT8RCKXM^^kQG? zXF??2X}PaP+%=r-6t=q%xrF%TMdVoe{?2@$5S-l8PXn{$IlHTj+!1woc4% ze4FGUKlddz&%X@o^&36*=_WKc1-=6h506lUX4YgzCiqqAdjGLB*QA;cb>BvjIVbYaj#7~2| z`cWd;B)dJ`s#!1V#UCI2jA%d){(wbLn5r=k;_|4F>fbIh)KyLaaC=5T{ zFHuRKm=ds4`Y2siCa&E&7T?|3dYgR~n1VTFoTN=~>t()A6}tGx%z&}~ZYhR_O8Rq3 ztODiB1-W&?0be37cgJ!2qV(FA6qGoc;d~pNgLNeTAu9eu4o;o|BJ5w8Fo;xKyJs6l zRCKH;T`R*D)e-@{lbDn7)vE*G z6&n`1=kM08$*k_>c8fF9<} zss=NK+FDx$DJYf(xfb<6K(Gz?a7N!3`JX0Os`-b0HiW!#F0u)n9;-MV)vOi9{)TwX zT-6&*1vhlSwc07!oWt6m$YR*&vF}%J9 zj*-(gP4|nRTz!J!fWFG${r05gsK@U!@kvEeP}NGnUPA$?rU1ppBQgHQij^!w{@F#l zY`w8!a|26x=EVM02g+slR^R(OIF9n{X96QoLw1)o4MZoZ1b94}N|JM*$NlKf(zg#y zJoJ#)NOJX1XobXP8A(p4k+X6RTzZg7HTibd{wIVR<@}4G5>}ZeR+%K1ON@^S&D97~ z@x<2EJ$Pnv&mB;8-JEKmvlI@%qbP`tZCP2AJUq!TfQwSiGu+o$d@n;4jX>S%x0kC? zOb(J@eujt4jxg^~zjS|GTpWBMSy*g={RoJBk-j%8+vROOKncI3wTV~0h)ju_2156H9@xmN5@VZ_9&Ch4M6@B|s{?bXpA@38B7DS-qYQ zkkH@&y#jHQ8_dPTN-{wFXZwqp0ImaUTa}s}K-T}tFZ~K@{%~vG3ps(=4vCxFHeDta&&z05*2Ch_c$Yru>ZK@hI1ns_`R+3;iQO~WYd3<~i#ru<_~26p{s zH{}v3-eFmK$D518;(Ki%v^%W!fx^bcTx!Igm4-$2s06_s9daSMilw*Ug*Ms~#Y6L# z_QKTrf>Nu^T*!gbvf9*s{l1Oq>}2;Bq17vq;mM0w|D6(^IZG0{QQaH*Gsi?l`^4=m z#2=cy9l6|FuwvC|g@RR*K?GpAU`Tu;#Ybc`-TjfQVQ5CSR@# z8WtT)8X7rQyt_pNrnML}~3(6jZMTyRD^ zgKWuXAxfOGYnvTCN;`}&N>am`8kDP$_^q+vTvoxZB|(Eo!!oDm*1 zyFNU1$r7os<&tKLugE}uaXH^}Y(n%mn?0-OIMn1IKW}K}+2YsEvqptU?Jya3=(sU{Ol z#p_t@v&w)y`*mqSc?x;(VJ^=fOfR996+1%P`HSePGw55Z?} zaBz4i(la=iF68UeGz)BZ8?Sf5k7UgSZcB=oC$XejDKt+Ph+^jQSxd_qYDUVcI7qqy zS>6gjO;=YJl|)!iPtRji)V}`y{+^zZcQw$sf3wimZ!P|B9>4Xh7Mvju{4tZ5@oCzajakdRkd6qJo>`ue(N z1bif1X%m`06dIs6gFqt$@WxMs@KT?Z&l!WFD)>pvay9vBzB5!AYEr=-Cw*Eqdg^Uf zHG_(#cvUi*l=Kt;#^h%w6+4JR1|1wW39llG=Chv-X9)0t2m!*am9LDJ)-H6;77O3ya7T~nGON~7s z8o)9FGXbb^zS!ORQ~ft~Kc9r#j^g?AZ*N|~xd5%Nez5|kAgv{KLv7cb< z&*UvE3V>x#Q=A(6B_3*TYxXY{$AI&cZtUpxv1G+m@WiJmv-LKQWkQD4fg0-vOR}&LhIwXTRq(BN}&cq(km^Ebl+E z*(c+b3tfdJ+OC3fAD+noZII4tDr0PH3|I=o`>UzN`@8e|+kM~i7L3^5YT(yOH1wG< zs-UK&1r3r>Fi^27>+82zj8ckVgNis$F>^sr5J+&7CE8`g>7b0)DAie=-RRjy3@&6? zc4fAqZXAj-n!Kq{038{SoY3ge3-u(i89tW6FqOiR(o&i%P;B@f4|0J{9x$YZCRba} zRA~i;)~jYToL-a4>c7|ICskF|)H;wJrb@KO7S=pUfj=;g4BeEI3nQZ#os6+-Y!q~8 z%rlcFq|bg1$=nQkI>x|E<>nrpEfMYks=9EA6(AgecFg;w4_H1YqmsZl-HL)aTf9~M zd)x&#dY)Z70^UiH`dZp$Sm8D@{+9`Y!hY^IO&69ib@KT5_g0Ozkx=A$S0<1I`&ruf zowvq;J&i@b(FtUo505ZZ3e^Dg`C=P@2&wz?4wQFk%^#v&SDR5FyEId;uCycycP0=y zsC!(JpHq5T+g^Gd#PrR%t%RGJnz}TlzfHmtyjTk7S{SilFLU38coennlVNk4sr|vL zK(tg{uG;D}pFmpk4F>R~y2EOPYnPNr5Q)veN#Y`_>Nyr+Bzk66cqgw0DdD~Jx6`+( z+CV0j3e#h@t>CV`cep>BZg#I4G;_4JVt)q6g;`7t3~@3Oa_#k`7i!?ZZMe zf3R;FYpcIfNsfp`n$e$sp&CpYBBTn{J*_BVM%~{a>%Yx}*QC+W(UJT|J)mQP1T!eo z7~VEhF9E_TE}a7Z^-h&!Bv}h^+yfUG=%F12==L;;O&PrBr)KN0JG-Q5d3T{a3kdFr z$e4Py@3p~^1EOvyORF0=4uE?S7Z(>en>PMcXY0xY?;D29cN#Ff_Z+FT{dCrD$YIn? z>1+^qndDyBwaX$J}oHw!yDT-Ko*u9$i6?CcCWG%V4p7LkH#axHV}HHZw7;5Y2tP*NxFje1|FnSRcoDt^4KIY} zg>vrhm-(4KSG{zZJF_*i#S;tQu!G~(mamXrq_p(IOL{DDT6ASwim(K|QyR2$Z{UN8 z0i6M?$?s>YE#dPQM#SdCn;zK_5JBYCefiBb%^cqD1QdV#tt$15 zL~z-VcBN@jGzCYI4Rn(&ExjR^1n|@+=M3HOLX$yRv?uLJ4(rb^nD~sjIhdPF`Rnuf ztRMvzM6N)hB4qcw?ZYd{#Y(8iHA6{5J@YxIWnFoJxc4b9U6n=)_=PdLk>m#nM?dje zUA)lVQPWG>`+P2a|qE0x}lx z7)1yscrSIgTfHn~KS}uAVhuN0B(P?U4V)^~ zonNU{N2em$Q_#|=-RNJcjshtrTJdCo0eCBBe+yx0!7copf~WiLe~V3LkJxzwLME&l zpyXH<3I0eu_sG2cR5kkh^t2Yawsu-*(#`d}lZFRw%-9+}4qB{GXUF^*R=_bgLrh46 z1kTx)4pV>C{!+IPokl4S?E6++r-gGLO~d7N7PUlWg)>oAnls@-(CPd zR3SgWUGTJWoW1wK+k9qo5zBk@=*Ax5vuE#kPNb=InmEA*HXp&or`?j;v(Tg>9=++u zKrFm?(7HP-kDa7nEUDKLR25yC;%Z&x;4^ZOsUuW8jE8i6%>P!hZAaI6b|lL$+rW-p zk7x!TTW4y$k&OxU#e<}c;I^BVvu3{W(dnaMO=rq>2W`pD87l$ICy0;@ROOY`^PO?R zq}N_bI(-`GHDpu!1GZ`L<%E0$hCl(vOjDK6R1J{I;D5V znfGwB33xFSl+l;$@h_Q~L1R`vTqA>vQrlDIi#1k+IPz)S_Iq;;4h_v;zuEy)Ei^78 zL(pvCDJ5&_Ac)hMY~~RxD<=W?S2w%e1lK0K5g2w)a5_*!UKFRA+sobLwUo)5mx_LE zam1p#j`sddJ!^2$OxhyZ|B4g zJ5gR@9zKLyEc6#X4qsS2jiY!BzNZcFzA5K_R#$-* z^bS~+H9%pUlIUs*@v^imoOw_1&>!ZqGaVflm!lzT%DVPTXmY+vmHb}X|8IBDV%(>o&z7&wwYfK^2=Oy0^UC+#g0A|dS zc*;&x8quHIr|urBHl#Lvqscm~PU(??f)2yg)tEiWm#*2e4V_rf-t#YqM3tiklrd+~ zFHUW!NkaCZU;t3JhK>%lZJKX0pxLmaWHaltk9e+%07!>`nEnI&@|oUeGvH=i5=IA9 z9JuWXu8o~4WZbVhCI8>F5MU)j^a)pXoV{})=IHr;sQMHl%02WL7K+kD@@-vLK} z1IXkRR9oCYcae-B;Q=L7%lX3g6%bR|7Cp90VK5l*-(Fm}Q35A>XxPmJKg0jY62u`1 zg*vhB?m~(idO#&Nb^2qw3-gQh)L4D8+MBxw7>r-OjEYyVXtMO-IL-Sobf6AS}2cXoF_K_ue~Kg~#jSK;*+CQhv7)j>ZnfV3+cKko}8_iwT)@ zK>MkR%FmO{u~hOtP&sp05p=wQ#zjY0yqln(3e@`Y0OF?`FJvdwY*ShjiJqp1Mr%hxBe}s&Js~?v!OJP>xpi?`5S=%fV6O&iDGYJ&-m8Q86Kq*$xe=IPZ08 zR1GYPzj=Uhis1D9La_ocPD)VXz5SZEotYA0)q;QcdqppbIy9{-=B;p zHES@qFz(^Ez8AO*p6^|pTQ3h{&z=?PS3a-GKrOh?z1PXj9kvd6e$3BQi9n|2JD&g6 z)}r*M!-|9ah@V0AN2MuxcOz)&z~6qk=cBGpiJ=~QS^#cHpJM^92|38d+1xVh;nxAg zy*z(#GT_c3j$0EujlwjK;IeTks6sI)gJ6FGRI}O|>vcYDE1`#V6WVpp3~%bqTa<4z zZ9i}c`f>Y>AYYYyyFAEf>`VJ`8}ZC!Haf$@1shJe>xtWgB7ck@`3e$GgIs)_VnE*= z1R~t1Cxp(A_jLygQ?ATJO<#!WYa3|(f&V!hN{N?0x`wEOGqO$rpxCu@D;?CJQqx)K zAj|;WeqdR9AIR+p@SPfjzDD0PnqElj#s+pDp3CSKKq3F}2AJana_`>maC!7p`*Zg2 zyTWpGNDDRt-972z3cR`hb7GNT-^}*Oky0u=VC2Kw*Nb?*d7s~>Fh;yaz-9h4n0RHf z4$`|f94@30G&;ekeimOD^GJg)fAEi8haE?5ExVyDT=m-J6E8g6-M&ii2+xk2hlmn(C5)3RC#8Vq1_5{2 zyz`4dgCOmEJ_Uh#!4XO{1Ih)A;qrBOfuX(?%xR8YEWgEUAf-57)j zsFZX`N(<5@3J6G-fOK~YNZjYA@Autv&$##8Gw!(j@#@&V>{xrPC+0KfTv<;&e${+R zNK?$me-qbdw9rV4mwi9%qHC4lhV!=8GzOw7Y%*6MeiKo3)BUN4`_s{fVw@nLQTeKy zs!99i@s-0D$sQc%e?CF|9J&W(3yt*(`v=sn!u~4k%KvF2q-SV_txqa{_Q!LXKlDyt z)_>{xvg+eOLxs_W5K{YM>W?p`R!rWwn4sKjpt%n({MWJQHn#rI+EFrkb@TnbOFqk-&TL&CP;hOC zf1*q|5wWYwLOpWD!@O-5(Ahu>?AS@yp7%tD{ZTW5uv%dWi8oK+fiT&-E{0oScG}`K z=_e~S)3Jn<$Xd3Y7!IbC|8fh;zc`DGLspiWPRGZ7HcKlP9Anm*C27@TookTxBYvRD zrNo;a9_5@Xa-cNKs;bs^mT%*|Q-|VrA<^UN<@gT$sN2#Rrm-1sX!)dT`q5$@q`hlf z6e>6Mw4MF*Y4;rFel-u#_WZ=UJR0NI`J2e#BhUD8N9mxqdAYN*b4Dt89r>@H2S!BR z-Dz_p*xx0v&${5sAtn>AxgwAj?5Ytn;x%#mv%P-IWr2Ma$zy_nnd)16$5&p2VqxgC znN4YZd}@4m>>HgU8^(mNcqBIx{bBgZ%E}6$)Y0gZP6BeS`bqm-gBo|3&Pwq@q+9IG zWF>t$H8u70=~?>L_I7Gs3u4rwV;S}gs@iQa{3#AMLNCShhcQ=g#v#P7(jmSf%11-jDy?}FRRXVI%CX-fFT-+nh=@+=N$07B2 zs>P6N-zJ^Cr>iR=X@7SRO~o*wM zN*zg3DJjPA>^l)@-DYpMNkF_z#u0%-^@@p&O8QG78`CiRuvO6(38eIX%A2;`>UHOd zU!asFC7)UJwt%t0PupMfmw$rrePhGEE-(Mtw(1QY&=JwQZ+&B;@IUxHeySklUL(fH z=#Qo(ApyB_5Hk~`rd!cTS=rf0Mb+NE)06kzj3@5cB^x7(fa&cMDgHR}UpJ&?OzaFi zQ&UnJ9_5qqlb0=#1wLV;2Dd<&5shayL_ks-GOg zypQ#+p&A|HEdo-*O%H+&58b(gH*rM?2-wiAg}JIFmNUS+=u9EMcyX%C$q%jg`)9es zGyun%xmuerV+cRCA-N8w0r3h<2=69er}Sl#wvrMT0Ee)Ds;fmprvV8(_-Ibqi_~EQ zcAID%u8}}f@|U5Zdn0nXQdg+keFB$(e)1?sWx`^#o2Nr1=Xz>=^40E)A_a~o#NTGO z`ufyh@jHvs8}9Pczq~+1^wR7(VRJ|&T6hqJQZ_L$v9gMAnWBd3bQ*@h@FsaiW zKToGF!0oftD(bt-Rmr|P_X>F5Ou$|ELCieB8yhH)>g$WqZQI=?cOrmJ`Sgh&mUz0{ z*Vh*++Au)$8B(*dvOpDC+W=ZfFt-@qzrm!K2;>8E3kwTdTU#?TGr){}_CQ<^C~JR9 zd;MEZ;pVL0JwA!%voz7-p{?hzvC01Yz}L4vTCoji1Y;_SLFUnD`6djf@K82Gg+?aq9S73$wQPcAZsGe6{tj1LC&)+-N%D%cX@t&R~GorM`UFQ7-nn2lK zCg;A0riz%0kalHiENG45m48sETJQ{e9Z^{2;9a&ZA-micltD{(Bev?b%(&&LJDmZ~ z?H@R&vcv2?5x_@g(<|SY4ionVS`!eo4=7DnhKgj;HV@{L<^?#|*;k>WcPZs$V}s6u z9$gE^s~RAqqvuy7B88k%?Jo7m}xFl??{fF94ahd=#Hz*{iPB6s9@Sx4u&xg=|&Il~Qr6F`w+P}#UxKY+r z`IC|I;Wi#@ios@Fpl0g{u=M5&?3^Kd)|%{MHD$^|kl(Y)u$*q#LB~UxFnKKHej4zS zq+=<#!%DSG;g=>0{a07vho1~=t0+yng!@tV?QeOSY`xLXbk<-ca5uM5jG@1vTN1`L z&v(8?mG-t#jdZ27Bx_29rDjfT=*`@as{5r3n&-ZXu{8-B%S-%tY9ecTyCTDOD~wJ8 z3@bQwZRRyb0uR4<4PEU}$(X!<_eXU^o7#wZtkpuCpF{wIx_{(mzit|*>gs}>P|$YA z&|CZ23cqNY(pZ5X&)1R7>vB$v9k3bS=P42J2RInqK*+xr{hyfXOpFAy&#|(lxfXW% zt^dg`@-BVK1?%_a_?gpX7PK(xT_6`FKO4SPHD)HK{2#IbvdjZ4YloyOn8uh|YxRaJ?JeiMv2qc4jC zr$%z@0`->6#Lb^(uuYk>d>(whC96s=J858;hdS`IbZv@^Xi>hS@4)T5ez8_8YIGJw zVLRL7jXduRowHk@e%e=q0`&+TJd~3JrLG^2q54lME>hilv}WM}sGcFYR@=)ng2l1?p3bYxroc(t6+MzCE3_;sb0*m9VgJO06Zg!;0j<@l2l#wzCB$36aH1JJ06H zY7>kgWVvY~Sf0P>7k(ak7V@`ZdOKue2)0ICqdUMIbNOC*~s7Ok)d~`*ICqy4HoQ0wtNU1;pg+`qv{^QwkzrPJw1J6F9^WL}@Gy%U z;_TM9-EdLRkvkH+_P&VyYJiPIyJfEUrN_s;Re^6wjlDIl2bRsi3#+qSlB1~G9Jj24 z(n`DNp){0Hz?lSz?&wn+Cjh+Xb(s=GZ+fKdfq04HrQgn25$_@_jTZx+=h6zcqzA_H4(be%V7o#L}U%;2NH2(n=2@M&~MabIGhCL8z>SouOkkFG9w?8oLE zKJB%<9;}?U#^9%l1*cx^z(WUi<+uQhTiBdmUjW3w|W8iH4RxE zap&*Zll?u}7_x8<>t(sIvLz_6t)sC7AXW=;{7GzSwvCs<6<<*I+FTYQUg&~Q#CqRX zHN%0~L@wqjO6W39IF_)9Mg@yhHQ9NB)f-_a&r+K*qF)F+hmJ_*+m@tqN|Vx#ej2;Z zg3|l@v{SDIF(WAPzdA3^iDsn;)_S!(s{PE3t1%zAg4o^=(sec zLoBNo)1RaBgx(RjR#)AaP3sG&olN%8Om7&IH51?%fQ(|I4$Y;VHvp%rf>ww+G?G=b z13EjPYXM){QGi-XO;1k*nbChVPZDr=YM0Tw2y_=)VwjU!NTtDt=a_k+QB8e!*%$jI6Gd6Mp`^;%suHC`B;Ll_%0@CcbMN4T?KzDwN< zX>TT ztGT&Vbb;g78dF#jOF;>`=mmMa*-dZt`3uSQle2VN%x*5$Zf=oXljY6Dccefqno9GM zw19}Z<3&rF)rxxnbD2eAg+eaQHG2Bp!ezQX^-CR*(Z4x6U|6b=mIV30&vK|#URmP1?_=KR1OiiufF*99*X9UXUb3Fk)Jby?DS6b1hI zy1Wuo75oSZEBTk9cU|r*7>*Vh5HK!1kka@dU2PfvDLPOsDgrOHoerg}nVLVNl$66r z?_j2EoLmvz9~B`)51p#%`t`RT*;vO?Tb)y8xkZEuuRHG(hzs&OR(4Pn?M531%oZsY`RTNmJxANETlepDZbOZ)0^B=K2m zOtXG32clF}27HmoAj#((HU>@mgl2!U!dW>XI zIO*Q$LE-7gnpedT6iydeeE5vM1AqDhF_!Ult>}l98!d&cPic`Bn5@?D>}y(C%;w=h zKGt`)qm%=Gx$kwY6%iKq+e_gNu#gE|UMRO$%h1n0;ywAy&^VC(&ij~_tZq|(k>{7b ztBKYm=2T7I{Y~M^Cu#PLL@7}47#uGuc{3;Oa|U-6-5m-6j-;aTtmVY#h-!$K4bcfPw&?5M<5b2F4 zv8069=0snW9+lZ6fHD;95V|0l-(G(BWY`eyWTt1BUN~^!veTq{8ix z#JjcsF|@Vc?F=O3pj~taNh$BuGp&ozx|; zr{1Vo<0Ls>k}QgZ_t0Q@{(Vv8=gf%fma4E{)~?3y{pWV)_Al&9QF0v?b&L@AF)-{& zLm(ex%D-MaHkBzUTBBF?k1^8hdg(e0@5sEToI%!KQC(Di`^(&$HsE8Ya( z=9R@zfjX})y~94G#-%D~_=PwcLR-Ny6R@WB@w%iyko}8!9Xh^{PzKSFlG1G{IKDs@ zqNh(#D05jKyP=wK;ZkPFf7#r3drfyL^j;cJqq!8Jl6RpDhbENjQO&3`UrVw}4#T?% z+x?aqhAM^CTn);dj;=&*Y2r^7SF}5<@!c~;d_TJfI|ln}Tzo|KaY1yK47zMXn|m!pg3+&jueCnGEDQPYGftb+@v4311!pxgATmOj0SXW@ zQcjGHzJ*McSvWb($^EAV=!eVf&^kJ?I(d72L0=zQT3Br8wo9p1MhX5JXQ<|VjU_zw zX?1Tb=%m!o>35a8C9yzB>hj3fG2t5?Q%2??t-U=!+ho}sOA3%P$1h1B+U>bI^Nn@V zXV3YVc7VQ0=ummxI>>WZZKGw`fKn^erTaLkAu;MPwdVDKYdU%OC`l>J)A*_M80Q0J zr?+L%h9?{Y8=cqetlvJ_JXM_$eb-tRZtdcD;56iB_ZgdsfVYdg9Caw1?V^LZc;KsMIba)Uw&C070Bn?4-rL23o+sF3k zFugE_tY&Ar>qCL)s?DIBl>Vuk2v=#3F4t*q-eb$+%yhQ4!zaOn`1m_pop{4hhUw4+ zhXn;qWq7{hE!xkrjkL6f2h8ve;POHnw*%8bZt| zuN`x|vzQdC7ko9xs**&S@23J;gVPrOP`R8P#Z~&Lti?^eWg8!xtnMVSV`~y?l+uF| zcq;v|ohFOT{gf#)rc%ELncdbYDvxI+D1tVVpU%emx9GCBOy@kSG56(RiCdEzjHz1L z_0ceW7yW|&)8x+LlLz_fdDpI8`||bcpW?wV9lz~l-u1?Rr{e`i06RB#kKIiYC0|ne%|(`I)7jn6pkd&v&`*xHSY4tY`!*lc;7MeM z%!N|L6I3#aW&FC*Rq#aIj)Iw|_;i^LQ$(hTS1?g=-Q`4Q&O7bGOSALr3u8ArtamxH z@XQmU72HNrF=2JgCM*;KipEAfx@%lawq7&JQAp+{jP5qH+^}Ni*~mV5#oQ_IP<8PO zmia7E?#P6``%dtp=$8?m-QEK+kkF74kl)8||Un%})pLIX5TA9i&}=F~mehN=pHCZLu|y z6$|GQgjp&1LLr|ofhd@010xMAnZbRXK{nKpy;zG4n~2u&d$(0-clQJ8a}XDOL+=%) zaVunQ1FuiOd4;^$0Y)UCERSxpJGpNQ6cU8e03yVomfdZnz$T&=P;l$r-S%U2;x7G*gqNe|JyI>z~v#L$2+|RHG4X7zeH?D%Nfbs zVu(Kir~~BKgBbI~7-$?2{hy;ycK@3KblpkCe4@3Ncw(Sn5!7aJ`yStY@>%U%I6esv zx>>)1C4>*3AD}3*`P|xDzN)fUusY#xaiz((i{8~0G82eUL_Urmr<4F)a90J}C01eq z`0ZvxcQG>Fn9(@*fH55Afren$UDob`HG0H; zs4&y@dssTIf25SLkAFP-?RypMJU^8TtVjGK*{YdqpgscJg+|PCh|dQU#=!K6gY^b@ z61283om+ts;C7NuyV*9Vbduh@xd~vSXm&WK+Z z;BjT+-X1`)1aJ(vn2&eYZ@h0B=cN&_pZH3KhX3&pW+`i0ggPs*J0<<`9YpWT$xVs7 z@`ZW=Y6YqQpMy3u;8bg|6_CZvle`9O&W?NkwxM_5{7R<(lb@#(*eSqFf|-L4JmRu4 z)F3|S(IFi-)HGV_Ne^~CK+}0A9f$s)4PdS`@sV zf#j53P+%t#PE@`bXmv7VU2VkgJ$cmolaT*$bj(~eXJR7j`TXenbwvHWT0n+Hta~ya z#C`MN7N3G!MS%!66~~HSW7GiGjzP9rU&vdC2i$%K#v@4HWTyXU@vf9d|E~ zxYU#tX|a9K$OHfNLvUQz;{pG5r03=L3nt@aOa32g8A;7F{TWw=X1-aEx9yHd#n+gsN{Hf|QT*7kFH0HrSt6Iw zXK+!dzg2s^$hpc30wx?8{f}k@ZbS8M279#MUttfQiQs0phutq3KnUVnTVVg}?(QOV zU;SWzLK>L0N=ku|L{!@>m|F42g#?20=}o64wRE74v-I}%D#i;yOWoKG=NMu}Lqmhl ze&ZF&f+;xn)6HS#B7Gu_~BeT#b7&}NSzP;l@BIXV`JuFEja}R4}e~W@T*O;zr_c073osCfzg17spZB* z1N56UFo|Sm%JKM?llcblbWadw93CDb4j8l|TInkHZrTCSdlUp54<3a4GGnLoNK9OF zF5DC`%@DLEHPToti}q~0uV}moWFh2K_uRc)%ZR$$Pta;#KIa zwGyE=-E4Cm&em+aormNH3L>$cF3E5v#j%PfOye1_COk!nyxs>u;+g`5iZf6j!Q2e& zFVes5&A44-jcf&RAIwPr|J}k~O@DVQM1}{1&oBdUwHxRuY9{)q`)5UB!zmPz75S#$ z)UvGwd`iHTR(jI$njOwRYp@9b#z1f7s9DChnt*86WSV;Am^latYT$Efjd$sC2(ZY)2>P3-YZ z3+%P^s&%oGQNk1R$o*V;yP+=k+l!U|Y=0n7n;72Dh=e z>?|mksh<_6)r)O^tCBrKGP18mPFD8pJ074CBfsedVaEd##6;T}f<9CgmebOS#WUA= z;NWyQ+%;ZjI3EB9M8vgl*$4uO#s^XFqw-(oreYU~&%7 z0%D&6VF1SGn!iB`r&sOjfH3C4>qMTj=31l=k%8mtuoJkEf}*7^<3SvvhzIU~LM-oM z6hD8Q4X|LvPxg&9GzQp%M;SMqzqfD0XNP1yD}H*=DU)^+jtNAYROdHO6tyYg4lF#* z>J7N<3u5F)!POdh_<~@V-3w$xqSA}s<8<M-wyS{G07MKfpOYi_ zmPUjfg@;5Y2iK6*000LmvEb{5>&6bkpSYFPVR0C6Pn)ivp~3D=C6PZf3~6rq)1x2s zj-*{|kfdOAUj?=+089H`@F3bJ=m4Y03=rzWtz|>2d(dKDfY!f$eIg70!U}v2&{mKN z;aYrdc!mwu$Cuf(xD4wt0J$&6@gSP`r)COoig8COE!+Q74dweB0(hj+yNQX3rdzjm zr{FdwP^u)EkjF~yBw)P}S*wFPN6_u`v z%4bDRz4F3M{U3INCeJSKp2x5cm}nltxX5oHa?1yB}@Kp+bLAXF-x@{N4 zZ26$it6jymT_?b(KLzaMb`J1(eU|#Nks1RuHxR*Y!M$73_>I)y%L0B2xI{#Xckk{) zWwThOd*;{bNOY3LQDhfb2_EjPQc+MKPd(_Bs80aV=ICHM4X%)KS+6y0I2-qUF8x-N z>FH*e4`KoXIS=A3CoAi=u^dJ+1K=fB)uH6TBOsvRv+5&J6fr8*Io⪻WGe7k|U^3 zXrXLK380MyM_+w?8lQz(C>qMHJky5j*k3BY&&3J7>QU&N}K>Yz{&#JySS0?QS3(FK0jG-8K zc_U1<%WB}+V8F(%`)Py62jP1IAB8b|v19Hmh7dn><@CWaIME5;O(Y-H`X741*MS5CB;)4`NqtuH#5p zgCT6^CQKrcdU3ei3z7#=r7RDYF)=JSMk%Onza1z*DgH}c^QLk}P#le9Zr6Q>Br29miBW$G#`jl6+1k9J?19MVM1wZf=7%9- zft{!Q{)UnFLzt67KDG6{D*K_|d8uy^YJsChNM=^NlzAGdiLSHwJbm-<1VUp~i$&jb2Ds4(OU24!Vr+}+jyDV30rfXZmV zbq?5NYAlicR^PvUi-8xM4xYP-4+U^M1Sv0IoKQCd&A!0lnXbDrxf$5sKt}oA))pKZ zda{f@rG!hn0O0@R4qvzJ1?MP2jC~eiVPQtbrb&C=M7V`Qt}bC!K189#=Exob5NuGG ztd6b&PYOaf%<7>M0Rj|!9`;UX#vo8hfT-2caRZyYE;Slz;+~3WzjFH-aM|ASK;Mx6+MDBOwivk^%xsHwe-t-6bjA9p@g` z{?6WK$GNWa*O}{EA8P@_yz{)zbKk$Z$6r=j4D%MzEd&CA`CJ?+k3d{rM<6cM-?$9l z5jq-s0bg#u7FV@FAg~%x|6FRe`l63O+($e|3M)9quTD5=D9oQ<-`uFfz*za#N^ylQ zhR<^NMTe9e+ub`3;nu>Jo>r;Ejxt-RndU{(ehm9;qWWC_j~#8kB$J8q54RwkNJSru z;p>JAr{~<0gvjmldD~OzB$t%EG&$s+|<;>q+SxJ8*`Ul30{B|BRoEy-(`Q*h-^D6GBR?YzrSBg z&&tZm($aE{QBhG5z9&lLhorcE-M4AI6w4p^%FN8nmGbfr7O6LHwq{p4J391PW48{X zqM`~Et=t$G7|hMh1Fh1&d}(pK0>3ILDLHH5n5mRQPe&KX{_Xqs@87<$^d@IyWPJVF zai|5)jg9>-Y)XllI7j?4UH*?PFC``k2?>%S zbSvn_%jeJim2xw0^8M@L7+J&)Zr`uC}PE7Wp1Ba=RE-br+$?W=J+$$FWYr&cUc zyRg)g+SAjsx5_a_QH`6TfdfIrS^xkJ?>5IeN`>QBH`9a`{9Q} zX}>mV;7TbXtEk9f+W!TfA#fh1!6ftI1;_dRO+4y&Ub{ANPk+2e1$*Cdtjos_^ON>g zhPq=OHynx{?lqHpc=`Ac2_53$;);lf1hRA6uMYQTy$sq|YKx>_Utbp``l?lZT-Ys` zv!Q5awqjL#w%|YAucYi<1xxFO&2NXxLJ3IztEL%(kCNy&xFNsb6UV< zpKwZiW3sxiurP=nR-^fc=k=gdsykmFJoVA2b)OLT^z-wJq*o>~kyTS$URg17W!84v zQ+)mUTPT`XFp1M_5Z9#BVuHhz+t6V~;sau0;#ox^{-@nF5q~DDT@pAX(&d?=3)`*B zHL?^2OIdk&c{w?wG-b0CZh2Gi^N+XGZ13#A%b#=ziMZKsOr9N*%V6in7r!(ha*AF) zC!LKOFfnEACVf1aQNWV_4(*x5nW%!jMG)6QPp*0?#^7UQT5g`{H}d|6-c7^`bBmm1 zI8961bx4JHceb5zoCglGd770(48PGYDn2=N4d2W@RgWefmy=$89u%G$iuO?TkEmAe zmoLM`X3Cz6oQK;J4pRfl&9`w<`#2mK6z3L+tdf=PvX|jl*i~m1s|@97o-7Jon4HQ` zySGYUM!({?o8B~~617w3coCsY$d}$pS7!5YC;mI{Mj;2i9WVSfH!is0Xr=pK4-XF= zU0iHRDwWnpqFF<7&Q_9i3HM!7e?*?2pO2MV87Wg!QAx$JK73k|Hcq39wRYd`|XRP(jDWzh3Ch@sW}G@*aLrjop<+El=OD#6q#$u z+}+(p)WBD$g#DDry)wP7HIgV}C zs<}Lh`?|WMFRCe#v0RvW>wT$lTkX8nr$mQ7jQL;8H)-5?z0)mJ*#7wMLr_ooO`2f z!D9a^)&Z6QKm3j7#*MvR*#gP1RW;q#)vV-2C?L(&c=;t4xm`J%W<{r!HR^BO(6EG#Y^sgQuq_ zIy!o4N(!OR%^Noe1)Oc&=v7-=Tk)u+bT)=Vf`hdR4KXY0gcXb}yM-=Xb#)(v+l`4( z%%|g&Hoax8B0U9AG{< zIkB3kD2^4meDL$t_taF%mxkRAw-E^A2UlImV>d~J+^aG&e60Hpu~2P1Bss$5Dl;=P z#VaaIejZfAi5I5rOChV9^zU)^ijL&GXl)Y+DhHuS~pJ?ZZ&N3cD2_ zc{Bt4eGt4#{0^x|nro{KW^W>kHI1IkhX<)R?>=9opUK0EPpV9QS(zCZp=&0X4IzQPM z@mKa3t9}ua9{Ah6sbu20{zh-DhsP|Q?atC-l1EnYI31&LWG_a)8WD>EWDz)y_e|Im90etJ~<#eeJuO1fL zMvR2VmLvb(X9R+v;}8qc-Md|yik_Fq$iU#bH=umf1^21$+P`6$*Y9p7=Y2(g*u2=OXZU=gQH#xRMY}75( za*k9%dFqUd4J3BGo)w)Cgn7a@+}{3SgMoV0^O}|Wx9J!0_ph>G0aW65={{I~b6!XG z?gER6jtU{RA$zi9_T1#AXuWwJi zNsbhOC50AI`FiH^`5iRld(ha2v&4&dNhR)0qr<9fZg0OL6qVww@q|UGqogq)nt`T` z^kPGy&iZ!`wo%{q`W#^*S94@?5y3T;$nRt=A#rO;6@F0mRzBldx$}y2?>p`Au&{!{ z!hc&Vrgapg8Y!_DYy3d)5VsZTgJDO^gHUmHqRy@aKAA-R=SWX9%uj-D6)FtU&!0aR z7r&pfxw+|nc8nuuX}SJguQ}sIToWAf!QUZ5a*+{g#U_<+W<_C_Jb8Jo=J35J!`|lR zG~W$&0w#&r;b9dks}1N63DVK=@l_5Rlda*8$a!sPC@Cog1rz-S^R+z=H)oQQlZS_g z0cbqND16lz@bf3qM>i}y94btwusEXH%6&8`JTszIANGgZTTi~yTdqZ-#uV`PbCmO$ zRKC@Xj(+l^mPxE~-1?3B`vT7Fyu6<@@BIt;Adw>@BNU;2x`Y(G?x&7Vp1f6{%e89% z2kMcydX08SO7cw3hUetv84|R$wFLwO9AfHueLVT-H{1}SOZa1dMn>q&cDbKc&YRBk zxW7wq?I`#qbFM6(tjx6U?@{I&UdPir&(q?#tkx&1`KI1r(9qNC5oG7&NM0L{9VZV^ zQc@CicluG-_>8s>7I35Hgo%dcOGd^*(#2_}d=?c&x;$-k`v{tKdA#O5Qc_Z4;&!Gl z3UuBgIAmm&`t43mPOx$o=Q5i@`swx6nCWF@F`D8sGPSNpthKsLq$^`P~AFUR`v*TJ?V1j@aHjMy~DW&!6Ta z1rMpIn+69tX=qwtz5Hw|F0j~}Spt=E9#VLCT&#_i7SaQz%aDo<3k$;~AZTXkfMYdW zX=G~S;NW0uJ2y?)Zy3cmPHVbX-Sb^f%)`S2UhKh~AQi=T6)EJx!ovHt22P97Z|K%C zPMOjPa64qBKQ9}q@#0jUZnwW*YoZhjh85x>SUenPhl3m=MXg7`>#)wyVX2TaQ0;Pn zKk%i};SWQ{)6jIYvDjGwH8nNss^-DK5Asd*^{-mP9K}Ff=kcIXt{A zCoLTu7pJ~fnwF7qe02Y&pfSa=*$e+dAEo-9Y@sVT$>+DQQ>~SATWg6bN;O~LQM^Q`)$!_cb1($l497h z|KcfnA@(03MGhQQb#?SYVzEHN$FF|gn87BY!`0vTQCQ#DFwEz$K3-rT30qZ8t_RS! zfb*^~1re*hxV(IrQqF*BF|_!b7#RJf`PtdLZpTILL6wz!>-<)aVH?ZCBTviYn94$ne>? z^D7W~ZcO4c=%i{z;w`gbP8H>%QgO(VVCI@biYe9Qfl7ys-plEQsev2!_dW^guI}E{ zd-MKw9XE85%~iYowQmNU)=>8a-A~ItwhJR1MQ9A(z61t|gM*`>bmvz-Hk9GyEa?Q^ zy+L&=IXlIr!{lp)nLDJ{)o3GF>uAZzlK|!ameGA1C7dpwo|bmI=i?=hSw8e4EhzN5 zb1k9R4*v5t7L#EUzzc*iHEQAJlbU!>u5t75kP5oS zY%sw0HR`Tq;HMWzXr|FUNFfTmehq=hy&`e%Z3UW_RC_z~Hyhg;+dsH}uMl6ft9O)} zmxpJI^y(*cXgxn%a)boj)~B8|HtumO(KwK^*~$Wpa>MK&80gcBN=r}A%E?(V>#IGn zdD$F7%4rTiVwx&D>uD+*E8XZ<^;i@x5zQ&4rC~jOfcT{O%pkI&LQP*?-^l0@{%rH! zOSN(u(dkqU5xg0fD~_A_eT%S1xq6e!Sf<)ryTq^LDn;8)E6=*<(kXbXtQn;V=dpTh z%%tvBtEsA*xSsH<)wmu3@ezM{w%5eLe9QWqaFD3Fnif+5V?j|-QAx=HUvSp($@Lsu zk3)Yy&=S~m>JT-vh#Pm{t$BL?JX{&cZj(Hkr^qkaFj!9|NzhH=)(&P(+Q6S% z+dKX(qrDWrx`%Y)4yHV6L7zafGagTPXjg1IdS=tvJ@*gro9il=B*h^2h4ZX0Q))}Z zE}z*q;H0Q}xYR#A%Y5lA8EWO3YgfBkTN#=29li;xtE*#UJ5Z{BD+r^zLttY~X3D-d zIla2N+Fz3E8ybW`wEH`Oj~33O-JnbiOKNiR?L}O*s;^%e(&bI6f<$vVTU#F=hN3rG1z}M5;;4?kc2Io{Hzv)!o(D+S4<$g*Gt2arf?Bq=H6ge<@B=pQgUab7XKZ zR>-5QFJEMHa{Rw&R@%#)mzT{gF8XGPzjc5{zx;`dxvHp0iY^khGl#++N=7lnj_t0k zPF=Y5afK!2JG#!Vj_ly!)jpsY-$B>8S|dR8S+6guZW4`mX==s3)3QU`+dpXRRHU*uLnT=NJGIXEz;Al@KjIng;C(n@S6z4 z>q`JhS@r9td@v4)(L66B-VRe4X z`~IVj5vT$GF;;e7*4EaR91R9PH5wyAEWM-HY^Vl0nJ+eZMP;QJ5^1|K_#(Aub-a8B z=nRtG_*e3uzRVAezat_dyu7Yb+``7*7|JKdnO|5S_!ai#ePtB~zqK)f~bPL*$JYs;>xs)9q3mi7|`3WCW5h)790gE7hfGY})~ zIQe(|sneAG)2C0)&AA>6yH5jGt}_r&i`MPjU#^tS8MswNY{xrePbopNYBgoFg|ksuBZj`{id6#jI0MD~Yma5u4FG#HRe zP~l>jx7-Wn<)x-JoT>L--G()hK>nlPn9W)9@Zm|=+S;0%GgKzaXWhB=%(3kI78!u% zk>`75a*B%2kQfc)RZiiB34+%YGXj7;SGb?`cn#A=^}f`E+Tlx zUp!|3g~xDKKMxn@SPkXXG&V+rhrgU+kUm8*@{6;n3!I+aH>m_2xJwBL^G-EI#XVqY z)+I0h!C77QLv3#q+E$0Z>;3-e4-)3d{@Pf%&7v5&n}SOTj*sqe67B!2tbBLq?q2{I z5kN_&*nJ8RBPrkvUluaT+gtkS;N`5SEcD602~>)26EUHo=>w*uq!!oC!&~^9;eBD= z-u^6p5qqk^z)7(Bxuw_G{3uv9e|%iS9T|^S^p}X| zl9K9Gj^CxIiD73dDBQvMuZU_tD=Vv}riL|^fs>Pyg5tg3@7Y<9E>_Hy=pu>APj@@q zPPdvt9!mMG!L*W@dEeT0j!&d|SMyP*_|>tX1|RRaIex(ZjrD?T4G}ksuIzca(%{PZ zVv$Nn1dJ8Efu%kquTOZ|Ft{%lYXAblrX@QYo6Vj5OE+bLQspyXuZx9{VcxpMYdv>E zy$0hRD-|uRfAwJeVH=dNkU0yy%Q4&xmiwJcFPJBxZBlH_05UylqvbO zlV_b=LQ6w&pxtswe>d!Q*E>57S*~*U@&4NJioaU!dP``;nXjBJz|rzU1vll=+QxNg(D(IeoLw!_?Q1x&D_g%;jo6WLLTS9tM*q%P$F*a z#n}e(4he~diVES~yNxVTPoC6)g1HwI9v=QkDyA-q8KhlMfpiJV{7rjreNb$Cn4UtE zRaxn>*7k(Ex36#HT0(HoANFEx`J9}+_O`J19R=gO8v^?$M>)}f1ECxop8^6dCI_R{ zQ@$34wgqILoygpiQF-~Yi3wUgp%sW7B6V`Kl+o=&x$4R;LH{TzDk{UXK~JAP-D`*4 z2UOl--<7d(^w46ZlnS>8uKK;FC$V|Azz7SG+Nh}vEk7c zlGPCdpU(xo1-zK%Yvv>*7bl`-V-=0@;>csh+i+xZzkWGEdKP{Nk1URija^D8oph_m z2JpgPpZcnfmW_?gURQppOr}O<;L8Cu>FCJMYRTNRA=boQ9JF$aXzFz=1cLkRU*V;| zv$BM>OUp6s%Qb+FI?i--bp56rsdV3qzenj1G9gkgU$45qz1-w*%UJaA!Hsxe=wqRj zViA$|*2(fPOMRRfw5noArM62a#(Xd_rul*|c{gVFn{gp63P7}sW-3#-j_5>jeF^Gt z5X~71SMjHWlbtjx-mFBL*!a=F>w(m{!JQ$I)xpfjNLgStR>ByqXM8CJ|E~^Ftl#SE z?>}|BCzj1+(5C@iA> zW}Pbz4hMg`0#>5)Lg37!S@04-lgl(B7OD+KBgP=*Wv8b0@zc<7HIrGa&vrEbhWNa- zxf#Q5f{TWA%^jMY7bx{v1Ey_~8)H`-J{IeXVUa2;XHBeGdV6_oCS3cZto2-2F7*2) z55??)V;@EHjoHrNA2He*#;%kH>+|E4MvkoF^r~?;4a$)U3JRx=w5g9eOuk=2X*ZN! zUS2eJZuzTxt#OG3Q7AC#)J;_@PyWz`MY!*II)1U(i?1&<)0J{^z(|2@fWi5#(1ZQ# zqeboy;uRX^{9mR;xaj_oku!XnU%!&)M)M2{X|*XRDST)9HkcTC1+n}D6sz2R;CM~a zL;{v=gyjxn8RkYVy#z0?ZRXEMnw6OX)s7qT^s_lis1W>EsMhT zo*%Ka2i>)-tSl%_(p2pVo6V)SA5oouj?B^;n+pRCg_o~O+yj8!8iq}#8=p5eJRC^G z5diOo0cDvzk;Lb{m{|Tq1O+>SmGLfsxBdoSY>%V)XbQW$4I9#9Y}Z7%`Eg!YCyl{8pmx#?Agt88*3%Zj=!P}bZUg-8plb57(+Mxt%sZ z<-5X6f3UR!kZn^VGwa_;3sQY_@(k78S8)+_(9Kem1TV z4|3~$<6u^oP)f@LOO$k)37nPCr^D6H2t}acAvyz6Ij>#X>~I#DEy!$r&3P zYiMZ5%HIBO9lg$FTiyg|X#a=IxltsIKDT^+zKNWc3kbF+Amf3f+ zkj-xNg8GiN%&o$M<=fWR)l^i#$_ZEHxmm@=v+)!v?znNsJ?V`|o;Sa}l9G}>d_c#c zjg%xe36}?pLPrZ z^JH>zl4PT3;CEg`k7=>c`QhxNB-eU()f4ku4J_t78yg$7ZYTEk1|lN$5wtHsCjnkZ z=o8CjMdorKWg#ss{pzs;`2!xFqw}*9-0zMi9dYq%MRL1%#g5L-_RCb`v|bS$@5!|H zeld&f?A!uYCU}0RS5rusk^ge6$YgeYz7YhW^?90+YuB$|Ckc>Q8yv85pR{@Fmm!@% zH%C_T4uS#yWC1LTTG$r(M6Qf$xbaM;R#yu&yO?*D{BExg5CMF_=^{NdwY?s`d}=B+JL+RT0%^Wicwq%>M^dFJP`e&tLw7c=|J0ZfD z8H=%!d04rM0^Ax(!iGeAPBu0?bMnz)eqKEAy_q{wd$jhK7R!Qyf^;h1fTMveNv@*$ zyjg~{@3onrikjf@yFb5wgJMNRA*$Zt;DzRQb=>8b?YL$uu-W+9+S>E>|KbZhIYVhy zaLWes-$1hhMVKM;x%!F6#uAx^5g|1SZpuODHA$wL+U8 zG6ml2fEJt_GLY)<@%J5PfBlj@E2yo#00}-$fE+lR?0<0v0{6j_VH_#haR2(3rh(cb zk8(05s$Cq`MvLb;8qb+`WA6kA>m>C8CloqfqNH9a$qnLw&01Jcw7V4*KK!24^%5fa z2y`oH0oTKi32`YIqMq^#Ss?AfgUz7cZIrF9)?xII_A{*sl%B;%j%qND5~Y?Cqu=$e zN6yvmiqy)z^8~9W7sLwGk4#KVpiMud$dv{or)D>%W}k){!R?Us(UY#X}>cmX(%?{T4u_)1*0Hg4#62|9q3V)buSra!`H zNCFT|x|7mSds%e3>HAWs$oZ}3=I#~P#dBF{0T%gNXrDcM7Hd#?D18a>!W$fgql0w% zo0Z{yP|X1Rz+$4IESuzqD=R~}qE!34yK^YvABAv!g`I8fSOyLb7ob*hWOVfSw;jV0A8F!sw6iGWdiYC2vxd)JU`jRlUbP@o)wkr9 z*2(#QgheHb*-wX4SY(AP;ndXBuhMAV9)mOJ1)PEwg>t04( z@LbIy$j6gYRlNrin-@9&kl$mIF2i+*FyQTdKL6VJw2C7o`z4afHSG@g2uJ7tQv;QG z1qZRQvC(2&10_|mkE8Y|M0AY)t~c>*)}RE>KhfIm;DY|OwlbRA+uQ$|POB(q>+%!W z<#gz`$hEb#|keO z?O63LH+PM1qv|O#vpdsL`gCCn?V`q3F|!Yp2f;s!IDr8C?bb#kbqOggSlQSn#>YVg zH_A%X4=Eml;|C(8{h!|SBMQ{L)U0xR0}Pf(vvcXA^0`%`NX=|a_W!84CXbNv+izgz*#pbXaRa5rye|A6=cm6uKZQRE zJqZnq#1RN(GwQy;UBi*Hv)g-r4V@nz0s>RcE4j-T3Uz2gYN@Z~+E_4bmVSK(=Mxn; zfU1g8>(Y9Raq;ks{t0A(Cl@686#3u9u`IDfE+d}kX;#=iPnXXc;An~~cdo3kv*$WY zD#%!}U#PZOB&tzc?&)cm#*cT6XKS}+o;Y6VO2DAB%C}tV58Y%``8K^bq%CB(+z;;& znueB^R@a~rm(`>`0fLAK6v6|%HZ;y$Ifn`}6 z{yq!OFJ5UG?ZmLm-6x}`rw4saOICIh;wq#()@fi=^kuwAy-)}`R&a*@5P+Oe>6H6P zC)X4S_v>j-Y(bXo9-;v@4Go>+vxBJ+GJy)~c?n6$cJP59d&J4lk6PV(_wIp~hb#h1 z6hQy=Yu6h8`+%7_mWZG~kjer)f=!f!c}S}#At|A`Du9C0niuc7KQu0I;$G+C;sWHb zu(((X@1cw_4yYr@>sgY`iEb6dBYxv!HuAZa#Brbjf2aE+vkc{9m?JQMP%dO{KHmV88$fS{O$Ghcl(Xds0 zu*s#7;L^Zpp{Cfs+M2DH1Ja==k|@X!vUe+kxq98nOL6z6h;k|_oR7BWp>(c(C87vj z%E_i>?!>3YO<)m{@H@W#$6`X>0sUf9)E#>F z(vmUMWeP}Q1Obe^b&Dcpb=5pn{AZMPa|k*1jT;{&(n-8rasS#J52nm+cK6P=oLLTm79ySdqP9yWtTFzPal5VYZbw%`x))Q=va=v$J< zxf3|$&@(A1DE!2;6x!ykOWtWPDbqzF@BBwQ_s5{;UMr*rlXhpr-2A^2?|CQB)x683 zxb_=h#i|Hcd;>YkN0@r!0=d7E9O^y~BT2z4&s7*18=H|ePm$jtsi9ZN($T0mXhS?t#Srt>Z-X=>IA(ytI21@#bgK1jc=mdEl2ng>m!LR2a}eLjj&UCZNa z52AIOwxIjwsd@IC*&~<2eAO}u_x`G0`NpIRH*Ux^X zsX^0?HxMs`QZxBY_vyv?S?$I73H*6%P^kn2s_lu-(3JBuRA0Vq5S(X+QV%Iz{v7Gs zZ#KWUy?D_H^&c8gYLD^p{u-ZA7YXdMT%{AZgBQROFdD92y(*O?2q+}p;sQuA78(C= zUthQ%FgjdZTt6CC)&i@knoiQa=QoZ@rW(mT{-r`NqZkM`TD*WuRP{E;(cV^)tM1{6 z*nKaLq-50A-1Kc}M=1(ks9kx-o$FRDHqQ=K_=6Y{rmi+|sxU~z@N#W_ii`90Mm+>3 z1=-mZYFB|*LJ>C%xuLPOyQ=~4$HY#!yG8&^#CqT#rAFOk*?9r#dm*)ZoUiu@5y^XX zKd;r%LPQ2k_8S*g-0#|3TEw3}e~=R9y#8l);=9l}$$vB+uOLFisc^NmwQFAT>jCnX z8cy3h!u?+UBO0vMMTgDHlJ727y`9*Rp>J z@d3BbOy<)U2JsazsfN=ak9 z&b8K+$9b1Vy?J#q`mpz-v+t1kFEci3ODUDUpDdaAr~8L(Y_&;oMC>1Q3EyF-(Z5Dd zjXM8EAB%E{DLaIjWfFKB1sU$$!z;0!uY~YMM{~K+3%mc2e*|F++#%3>s9xC;L2O=j zy43o^w)MqgCz7JT;m`1QN)+7BlSvZvZoJmT6nqkVQTM-*Juo}bYgoAFW%>w_*Ps=F z;Ls+aS1NsFQ!=xUyMqcbr;)?u3bqR53U}#vf)o^eqt$VqH$ovgt5Fi*r zCg40gHl|(eya(v$muWEx6{H>CX1-?H+upq<2^L?Q!|h;p**2<2k3t9^i{vUn7pyEQ z>K`23huF4y@huN2c*2eT@q;K2$U%baxoal_6QE`r1J_R#qzJu4FF6a z|NY|`JG@2Xs^4Mq6u7I7^W7R(4%*T(Ga)pdy8j9A3osE*BdQtag9(QZA3i*LC;>v| zj#}ZLr*@H}6L|tt!pp_RJt@%q78J)vbn*%yD|WJ9l>5nQKWPG{?=YLLFWW)j7#^ zyEW~3c-hVCLB*Wz>do&cUESQ&yMtB`G8TXaH{5o+P8}AvNw3y@gB+G?(bk9eDGSx} z=@36)V(PNZXX*(Lq-V1QM)B0w`Zh}5Re>T2PUgVCfNFWU`jG1|N#$*SiU^PYGG;HX?PzQJP5-=)n&LGBxHn|Fr~?}Dm#nPM;~iL9)+mB{d_YcXYFF&5xeh!AQf-o{50qeb~ zHyE-scR=(^%~l&3o3g4)CVQ0@BZI+ZR23PW1Mcnnguu0vjoOf)pob|FC%E3KZ5p-K zHlr~tC>=fE!-rXj?u=HLoM2am`7d?EvRy&@YrFvs)F{xuiSw+<>t;!Wlb$Q`->Y(a zANP?_+fM4Ep@VF3WM9)Y#+Wmqa2=tc&lA2I9RyBxX6Lr=b;=^LY&8G82|8n=XJgxe z&2IbV&F722Rutt83=D*LDuo)nk(mZx&-d?N>FGr?syDH800aj5d(Y>&v~;3?i+$?; zHN++rT&AMILqkJ~2QuC_lIa*gtl^as+^Hoky@^N z*7!Hw2Jjw$?nAV5ZF>6kKU~N@G5Oc8U*JI{C*P-N>*~VyN3QONkPDIBzI{KkWYQzC z>C?{W&lyiNztN%`fh#l!!hSeS&^9&*uD}c=nBhtj}V*}+KKej*sKiHUB%sG3WMl+Z17kKsm9h#dRKu3~9;x6y zGGRZHk&yv;IK%wM&`>D^W_|!LHLR}+36R9>{-Mx3QRx6q%BRG{^EsU$&wzByOH zY#&4c-i-JjTlHq5u3A_3F{laX1WfG1+tAboFA^=hiD(SKdI*903>{)Xi$}lZqv#qX z%zeRaf1;f3|LiRvJ8p5iqqKK{D_)* zaHIeN01zcft!MW}Qaqr*2|afWWAU%z-6H*bDb}FEhj^>GV?5pu3>aQJTw@ttZtidB zOiUJDPVAFbJ4;^!fj{U}hMvv->=>6qy*183&eiwP(a|iGavqT9MTJ7dDR6Kgvah@U z83$4x7T{_iou`)*uAS0mC?E}fQdm1;4mcz zi%X;28kBSE@>3Y`a-H!e@I#da;K;B(R4JfpT}4A%9#d9SOb~SYB;fQE3GFIoFRKxB zWf%cd5mtHln#RwU7?S3H0C$xf<-d~8*9Y^A3ph?66yLa6mF=DRT ztcPhon76xp0{)Sy!7kSz!@>FPytll)ZSCQ40q~mQ)_=7X_Wy0%q&@my zfmfNGqbE9W6xf`$^(j7`9v{k}jNkt5@$u7kW}!ts@0-TS5h#w9rGV@Q8UzD0@SZ^X zoF6Z@37UAJqocF7!-UlTHz&d{`6I@E7(w}7382WhSpFrm$KF8RkX9TIB=KqrUw?*% z1o#nRsn!k-8<3}j@Rc@DJva!J6|bcApqsq=B;azME~$L5cEUkP>AAt60T-eQ_>4Zk z${PGI(853uvRxk^>FwQyc-}lU34&1Hz+ir9>5E3lynzcO(kwHH0eiiu+VXZWYgtrlhIA&x~;9Pjp)`~ zYw78cn|?ZXca9(`ILRkBU!4Hz>`=@B|%*OpMU2qWM)ha#B6tM|MDh^M@R_AO;?}&M8v1 zS?u}m-manN+8D2iW3sL}|NVg(t`oBKi1#IKC;Q{QE>UHymvw$a)rDI>31%nE2e6y= z(};;RZ_PH##IhQ|c7OGlsRMnq)a4+5Doh*+iX1A5q9HEsSC=37gx&!#Ttq})p`mx1 z{=Tab4m+Et8K2#95zH_^NRN$@ayB(Y5aI%mE20$O=LcTzvO4_OJ`AuA|m+tO@e7My&3^P4i>o+w? z5kD$GuB)qSf256zJ}wEFo9?$W@(a*Ch0b>SP|w<)dk!}Y!1DP{(uM1Mr1B;W9($+? zgT1XSL-aI0CwN<&uykP6ad2^w^H|TVPgFu>vM@L24n~2+&dkQZ5V5^TRuD2_$m%^z zYBig{_mllci{3bG-Y|NOdvB;hJTefnOk1 z6u|@5z~;^AJ5{|U*UVjt2PEUt66A;;QJFH}3N zeZi}n_G4={GegFsvrVE5FPM`HA}np&rHhQQ1Wenj=4NInKk9QFhZ#N}+y3j%U4fXJ zR8UuQzm6YC|9Awy91y8s`YvbEXq;zI?57!I~@}n`#il@E>-jl zCett)2u&a{K)|TBJL5}k9reN(RYwswdgj}sW#YMebP6GRS9UnO>7bocsAV~puKMaG zHY!g85fKOpO6H(D@2@@P)xY|e$b!S=v6|LH(5?M=vSWPQysPRSbOKcDHtXxxuK=oX zd*+6kQ-MRXh){(7q_&)fLhaZa`yJ&FQ;nC$?$3k`0OMWcyCL>k2`ESMGu7MWbIXk@ zV&_LE5GgwBsz=R}*|k=WLON6|77y6u0EBdO8+@{g=dprWL8_-N4s$L&z>Rwj5e$^F z6R$}!Vi_TEjrUj;K-Z%epA@oa*G8+^V2ogXLb}WN8Q2-HU8Qy1AE3e$HJ-1L`lmR| zjwGl-%#UVOZ~v7AfcT}8-7EwjyAlQXAh-Tc-}zf!^}IZGJPbz|LH~U+?FLP%1uHa~ zZuPJ!}R zxyR|D`}|t&fFHt$D=014Wc-_ZdqIJLb9_C0vqcf*9vA13ix@Tt5)F@u;YQ8lvl)T; zY06GSApz$MKyzSV6%4M8F>rA?z?iCr54%b0^^gwD0)AH3?Y2lXvdJrNcXxNq?s=Ri zI)B`_kKl*cLIQ^wi0p+$MXncT2cX#Wd#M!<|aUrL@;Cv@E@k#$3{mj$4YW}_Ukc&QN#yOe{;~u2KziJCyI$# z{5MO1g^3CCHZ+xje0+RdT+!8@i~ppS-&apz!q$leDHI%7r$2o3N*f3m3bf`X_q~)8p~gJuo`{pJvAm zcL1(fTYutl(d2xFjZ)O<>6i>rp%`YE(t>OWYFN;_w-?u2@D$5h-KV)Nj-%_ z^j6T7`d844W;b$YN5`^?3QhxbkP1+KUc}!0lY8FBzM6 zwu@CT>6^D7jc1vCf1>aCK!yf6_dlX+E#OYv;^>_)a+D1fn<(3U z$GDe^2gY2z6A~sM<_fX#rM0!{H?vJJxv`zF^am^=n7}`SSTn#T{aO+>!w$#tyUghK)GO)EDhuk)aqh@1U&@Cs`teb zb!V(8UdE@B{>4H1Zx?NzDZd z8yjfrNg*NKA0Ir00XCpZR6x0|L3pl>Ve7sVm zL+Kr;%FP74>|gpa^}p-OO2H@rBu4PMn5vR!aA6@Es^Rpw6YHLz9)$x_$3J622~W>D z9bHCazJ2_7y9NkqPs%fB>jG6;+zx8VY*Sjb)@JZSXxdhzMgB0{%Anh4UqWm(etXH4 zw)Xs(-i5|eg?8LyiK|Hr1M+L&2tWzz@;MC2^sOCqMvG~*4GVg`^y`7Q$OD`Y{)0P^ z8SP2(&}cz5xyuPzp?+|xVO-tsONM9zwBLXa0WzdQ|CZ4BaI?}z@`t_NmPeE7ZOHx; z?aO}6#$CsoHF6hHeyQ0YXz(gP{@l%El<I$zw;M%O$a`jhHg=mEn4C4xrM@t8zhBBle* zzTq%}nex-C8V7IR=c7>*+U;PJ0hMr%I2|LV==|)8tETh!?zSRnRIUYaH51UD3@cTI zIF%_tV6!~Ezp0nE2p~v()wRBQj_={_L&Or*u)w-I*<0Z<{q?h3sd)>=ei3SyHFPdZ z1BOP;cgYQ{C;Zi)7%z39I^e&5>Iy*&(F}a5#pXP#AvM5AciG(H=28_a*H%g z3xbNF?ep2D2G_N%P)2cY6OZwDj?$}2LAPTd;a+>oW7Sn($0f`k4Y%4>*soO>b`mKT z7nIhLLj&S4U8Tp@Ut6Fa-!L|&z-eG{HDY-z<@4mx(;mF-+fIPuNm+Cds5t8BBkixh z`GOzUlkf1M(#$wS_csM$C_>-2Me+q-qXWL)-&TWjhze@{lGp>x_9Wfbww{3;k%0*} zW83L>o>kaExc4sTzAk^#qanz2-x#c2g7ZID5yrPAVw-^E)D3By=M~CpY9>TQH8Dy4 zTzKGlzJEvzA%hXr5Ry~F;MyXyW^P~dmojcXzBtYO*Y+gC?R9^C!Eo@O=mr8eS$Q?3 z%pc^7FAKJ}{rwVh@SzYlqGrp1B@J!Qw=;vkmKHQDHJ6;j@=c4uvM&R(@^m0ipp<-$ zaHOTd*XdKrc=M2pqvKMv!^VVmR$iVJI$(It0ynrN_*Wpl3~jN`k@P8&h;*ltVqKygj97Lojh=v>L=Tom<8 zVFaM;Fq-5YzHGt7uKJ&>@C(eqD*x>%I-drW9-Qpuq5P>Y!g#gEuLw{8Yj*r474FgTF^JKq@kO{g7TvPCs}K-} z+C9t@Q*-7-47SYlA5`ca!We?Chq9d!sI+0?J4k?hXVd$eJiH1w-h8quR!W!G1vbK< zXR7=Hv?Pc*w03vHz;ZmB5q!pl+y8S`7%qpAWMaP(k~JW^uK^ziD;~|oa`u1cNFYiA zNe#%UP^W-wjq1iQoQ%qs{QNt81&9NtuSh^>2FjQHJ1ihT0yUEMM6#|&H5L>Xt!igb z(n7`c;d6(O0A7NEg8{oxr~GGa5u@RD4^Y!9moKOFI{S9gFfepVg;8ugz?S8D-+Z>z?L1D{ExyZ->^E`iXeE(#&- z*jU=1SLCx?cY{sLjKD*`k@b;mL1TE6(~4VRiWU_9&{5O52w)L=ffFNcHU@_8^d z1;}2_2IQk-V>Tts)4L^8X=!NyGGUIx0<3}6sizD+x<#-gFm4PMbAo2<$B&yAYZERS zclOSOHoGgvkvf-z@yoqF1Q2TJJZ|hwrH+byJ9_Ev)rXhviWeO_t^Ce9G|be_xMucI z_fsOqj*N4GPzue)9ljy3yKUh!M)s9QN2TJ10r+L`1^ znsD2R9f^gR?Q)Go;9GJE*4C_U`+*O@s=|*uISwn0LyL6^(OjIfy-0csZC)~6-rn=E z#0BZ<^nD_p-opuY)kj6&?t9(v7O`CTc$-zf<+k&W22cu26qE*g(P7vm{za-R4VBjo zMz8UX2M>P!5JoZ|9v!`53xbBW`#!u7&!~^)_Kh14z-EG9*p27uiZn4b1xq8Drfqc8 z892i()f^ncJGZV)B!fiL+1a^C3o~9Y2SyQ!`T&Rr4<0}aUeE>Q{M3EqF*HEKB%*>? zx%CkUG2krn!Z5r@%kG~(Y!dFxHv0VABGxuGMjbJqt@7owZlR-tNczY3)%TdZtj{mI zpLJ|+?b#RLqtuTz6-V>FvHYTv?D5rd7tbx2q1@bjZD7_Ivz0m$+*me4`A}W(*f+e` zao0Flv<01+0Sh~xWw2GPW8}j+h&S`~-srmmF~h-)X}kZcweJqcy8qw4lrj?TlA;j0 zBe}D(XP4D5LK$U6ld3e_rE!o#**};(S9msPBd@kJl<~S1;VI3Urm`)iRGQ%*_E7xLIWd zCmet@sQUESwt#a0@qzBlCNfG}X~$3dF>NQ`Sozk8I7wxY&i=CEX`?Wqk;irQ5cWT6 zwcP<~Z|hbqHRZbcMf=@2?Y7-igeXAGf-iS)$ga@(ROQe8o0!xsW1Iw*|LGIkVL56bw3_j_ z?4)~j;YDatV7)QnGB-M!+ukKP(KhoKaVVebmMa1pD&(FZ4#^WhN@Ff{v+nYFZb>FVy=*77^P z_!J$xbjC8jpukf_h18X&l8f}2J~-a7_ko1&I)l543W>ornIu0K7QTFIlkAx{qVu z>b8=yoTR)YJ%_Qq?6+Wl)5%q}%9wX>*kt?-Kn_ck3U}jn{-#-w zxFuR?(rP0_esmY*r=`8^>XQHS&#Kne{L)fy&=^o`@C9ha$w^8{eXOh`?~4G5Y%>|p zIL2-ayx>U*=)@XB_ zcIt+PSB)MeMQ%pM{r6z=X9M#~O!Q-Y5E7CHj0s|)+SB4>dUZWI7VcPO-!hJ?v{P^p z3^}-~SIPXES!^c(kS?roud5LZuYvs*#w)R`zaZ&uIbI9s_5OngWQ(_d0Z+i76QmCT zLW$?!w{m?^CtiVL)22$7QyHkWK7BeN@rpJYo-qNeH;)+_MmwgnBx#?m@}iH+Xm*qH z-~TA@+kJ}W8oP1Xsc%g%8NkG_PJZG=on8&%PWH(ccUhBLM-Yt@E{*OX-_Xwl)bnUN zv@uB0NoKdPvhv(`E`}g?H zmjZ(xYwQkMH}VGEqiyMMA8Jer4~M8OU+nX}JkT%Ufg%f&qL(ja$Tu+cb50h#nFGGv z2)4v)&EYD#7HjyccZwdh@((s&z_&t z)2NtH9D)rPz#66XFf`OU{_OnNU|ws2!|H8Tad^S(ixA&2+q{_2{Y3w!8ehXhaRgN= z!!P$C#acu&-_?^V-?#Iyk`14nsQRiO_@zww%6OIt^CmK!c`EA(s0X}fKh}YM#jpuu ztxG?iI7Um|QR9OE#whB`bBpU_AXpLc@vwDEYCAW=5DDOe2XF8JFd+~BFz?IZhmRW@ zXISvF-|Fe`+QTGyRtC7&EZ#Vb-4th6`*mF#a^bHI)Z`q=*yhGHo0_6xn50_LJ?$D|57mI>IJ{0GfRVIZjaER$=Zphsn9)5<9JFQp z;WA|WcOLBeZ+Y;?+jbii(`i3mzxgM=et-R8Bdjh1?ssXwEZmNV->8pJW0ESYBg1L( zg+xRm-k+ZRbnfl?b#=iP0w*vj@tZwb<7cuA>g>P8Yq3Lv!-;LfYJ7LgOcK9+|9p+J`0f{JN8W%7 zpYB-6(}se30CY!-KKORj>g&56g_Kj3U-!3&vR!_MN_uO=yDt|w83Os9ZlsIE)%jJ+ z$k{QFn!5IxzsfjUEN1C~&ZckY2%m^op~6dTaCFfewo6Iw4Wfr`g%J7nOV9 zS5sC&vm0;gBPfK#I{(H}{Hl-EQ1`6%CcF^$(ms9qk?FoO^6cCvS6gECTDJ?E6^Biz zXnlHhF+Vr=N2s-Jobt&^q!u%g(gQ42plChg+HlW1Z|aEL9T1N3#xKwT;9qXDJVO$H z6gFqX$Ip*?u#=hg(gvNy34@%Kg|72KjP$&44GB4%>JUURs-DvAeWLF+Kje-g1F9>& zfQ%Duc;HP7o&|E>M8WG&U1=S0B&W$v>&Ovnd<86{hLemf+AF+-cXQ1TMW$)vdQztz~Y zw!$7c$zO?PUAr1mP#?3FC>Dow@1IPBJ!N|w1PM;gVi{p2`^(J#tgSn8J^qrIq_L8_ z6}$gQ08{lfplt&WU#85=%*4jVrlOez`3%5mX=xlQUqmfj-|z=?V-;!G%r3N-uh5Ykx_%o;|ha zQP2SBH8L?8aXOmxNgi@UFEcRqO*I|7F*k`j7$OmKkNm=Ymaml0w8~6%mNR%t;a(5b zC1K)7D2cq<8+$}J>%iO}0EK|+21xcyg11J*9-;7az!Op1hu3~Z5DvJH*iJ;Qp&{6r zih3BEo9kFebj3ysKdyUK{r#E!)_j!pC}>gZ^9Iyiar!j6@euZ1K&{=QQ-U*1pasN4 zM+2gny^?=z!Z^}J;SQ~8^R{5Mfr$ynp}3io*>N*RR+ZIK1P{YMg#16Hw?UL)%yAIu z#`tEttZup(@0HTQ{CXFZ6_;Ljb`o=u@%5D3|9mHYko}lF>M2|RD?-Dq0)5+m=vg7G zWFWK{!Z5vf7#23SumA&A3|t`dA>Yv2UHkrZ<9V9CkfIAe`DV+n(IgsVn;F?6VbL+~ z00|VH!?I}c13@LYzhI5MuQj**yT7{g+*|rld>O8-MsdnMJo52F#>;e<1T;+2pLSugdGxl-N(}L7y5}m4DensBOU10l&)KCoZj=; z&{Nf$pI0rV871pINvU4@4Ch^8eiJGev{IUzRP$0(ucN=sE>Krb&%>im{C`rJUTd1G zn;TlX;lB`U6BD8#;nb#ZX$oj|et$w##w;wUTG9&hgQ37K?6+nhPLjC&d3=}h%F24% z>aYJRHBf-+GVpw-At?X8ea|h3_5Dv2ugFFU!Yzv^U9H_KokvvE)OG(3?s)Bg7WZD> zV%SK2n#@KoHj^SqKlAZhN~xna|E{zg=&bZnC1O7HtibAb?QYd=O?f5#YWmsl8tXpM z!Rx#ceoxO65 z`PZhjo*)@qzPt#&A)MpX>7(R4&p9|`gF9=wud$(FcK~RYv~+Zv$=ISufO!{wS``iq zM${-je*EKOcb+4+(v_D7cUhs$EnXO#_R_vwPc+z~6f9-2D|8h=xYaZ8P`j8fW6_ zZRSO&N3Wn7LsME^=or#$M~K9c`elktby%vdElv?&&1Cx4^)PJ@3d-lAr?P*vwSlZM zC@hQ(l_vQhMj5uYL!grB((4Jbt$DpHuNtRtQGC~~H}Ho)CV)6rP|)TeHs&EmK3J00 zQ`)2f$+4oJBCx#84^_+~7zj&@rqCnC!tx!r*vaKzuyQcU| zdVR?+iPos{TM^641ymyr&Wsbs50n{1&Hh?F|7yx~PB?J=b>(<%)1?QQPuSF5rGh}W zG&kPC-q_?|(c4hbm&bJF^Vy5&QOAfg0yZ*_%P$ROtx}p)1b0jxsWKU|l*;a1s`uwl zD}3B`t|2Xi^}))=#RP}iQ)m08BdePSRO{m2{AKJ~_A(&pfZAZ}YUj*ucLAFC&|%$e zDR``_>-XbYn>Uzrxj!q6sT+J;P-|d*==5;uzJ7WU%P?(uaAd0;7UJoakYVh{tD&~MC3-}dO!q^Kv;PApF~=80~-KC z;3(b`Cybm*Gh6k~=SWMu(Ce{3`Y@ zkh7k%w~y+2{$fO~UghMiheZeMRWGN6AfTY;(SYQuhZjD z|Fv{!si~d|MwYkmW#lAFZgryk**Vne4S{H6>p>QQq0+g<#m_HYDZ{%(L~^BjFHqXs zBZ}w>(SUxXuqYqPj1)Qnwz`glsN3Mdp@EjqpUe0DI17sfFk(U0hG*ALKN{1ea1D^| z4;^|BD-w>hFnV6}N_8C29gI@BxVCM3*L}#-vmjFku|UeH`)tGc=fHD1XVzWKsoPHt z#LN>%PMqLFH37cabh9Q8NL||H1;EO4a=t^kY+mSKVr9k0I|yI?`uC@z=>Ycn`P?WF z_x(Q=6D9do@J_-wEnpE!=O5oZn#Ge*-Z8*R}=k|NrsERz;w0D2|-V=7;!y$O;Q* zw`wzOFhw_3h}j3KX%z5O1Ss&ZA619^_+0Lb`cv^oHQPP`DV#C!+QM_WXyMhgxkG9D zMcshw*SVB^Ojkwu_{imDC1%rJ%sg*GvYjx^=XPHB<0S@8%#PfLGVV=IyY2F9>Jsi? z_B(@|`>M1QckB`z0gz`jJ0vJuTPThLHvmtS!KoB{S|&zDeW7qX!pjR|xiDqFv~3=| zbFc5+^BGsKuvTxrj4nOsvXyT`7r2GfFcln z1Pre71O51+471hE9$cFGbfp^sI2#;0Mg?XCZQl&a;(LYPK!evT3Fe1g3=ao~tX&JL zw!JJY_b~MBf$bhu<`?Qm&69_{Dwf|U#rnj&0K*k*TW(0YDVMw}%zQOxHJGDj8#=R< zG6a&8ez6>{%=&OZ7y6t)bS3DFwBr>n)`acBn7KKZWy6L=uz-km3FB{Yk>O|$7uXvs zxnJR%Ob8@RP2ss)3$Pu>HYk$cVGahlrRU9Lgc?YQQEIJFFn_ebZ-S`xUCQM+a0C9o3 zo*7GSTAD4i>1Z)Zye2Mrh!m%X9Zn4m-R!*;m24uTR)P|Td&iEtl2;qK6)u3iOEt2l;q>iX4$qmR zMruA+eQ=k(>hqq;kBSbwt~Z@WD!^UGo|Tr(j+t3IkDC9<{h^#l)?@zkiMYPEpbO^Iv`)XjGVD;yn$< zGc`xHvZ^XICr4-XXnN}wHnxnma}+7KEbxe0s=#2%&Mwmj4xx{Xg{7h^=sd+55fiuo zVFLq%$5nEpe!A>8ORFiSx@gJTV-I(0MLxwG6uhbPGJ0{mS!o)-FvWw5QFBX+8!jAY z!5EvE{1kKEz%DEU6LwYAweI;&cN7hDrR6%#rir(PE4qnh4K_w}pGwWl^FZXoC|m@F z3p}fH)zEO=_L}Qz?AHpc4#to|yKmMm-hRnl9VYmsdOSRsSa3p-`~#1K5o<%MT(IRF!KAzoe* z6qTS0W~KE=-Y;KXfB=9>fg^#>&#JA|YF9dP($NGSGJV_`)j)>R75Bg0Q(8Fq#84NW z8Q@o8`kvb55$*1@`y(4Aq8vd0dy)$bLRdHEmd>0=p9mfaaj>(K#m_G?H8(assQYP3 z%o+F%c34Awy^Yhyo;*#KeCFRvV)p)aCb1-MjNjfE$$Qjx&fU!ogj2zrk25pHJ|&_4 z$@J!^*Gf;|X8NhZ<7X0;Q|vMF0C4RJ7s?kA^H&}HFBh)?Mu1HShS-vv^@wi3JQ#S{ z)Ez&UDay(M)&GfzBjKP7)g`1nHXs%pBrs!t4pkzVY)W3=9lH z;iF(x!Lk6{3F=otW*((+KsVusjk1kh=O#~GCnq_VZ8wBrs@&hd#_AsXCC9+vZXCa8wDlEs03jwGP2`TXfv%+#;uFyV1R=vVsU9C z6$dlnhrx&B8Z|gJrltkS4Z)vCq#`E^v-eIAylA9YC}x^gKm6M7489*!|GqBXM~^l^ zZpPH^5e;wumw*h@Q&SQ7l{%7|U)wU4&IT=(OzK!!Spl!m(yBv38V+^0V_9LKZWE_W zj?gRzC7u*`xJJPZw0w*@9W-go9sm=Jj+TQa0i)oZvgdM>aPH^S|G$ljnmSUcH{wbY#-nfyBLmiHYEf68Q+?QeT)r#T9O) zr^OmezB2uRuYf?D=ev8~>s}J64wG%t70=~`Y2<%(4UNE{AV>`!<>l#>AKJ-^0}je3 zD>tB-hvx-MP569!89QK~WGAJ)YO2~qUL++Vh=p2k(i3_PaY|2@3;I(|z#R zIKTS2p7+f$f`o!T8^LxJduwcTlwH_(@|}eYslwtYsX|pQuA#9}1pcGusE`K1@}{0- z;3duU_}HNqmaY zNq2X5hr3jY(F(o|XV^fLHr``OQdtcI*kN7_#R}$@2^R)}5h)*rhojhsyrA!u6RMuN2*M--O!05^XPHj*(H|H}jV+ur50VihJN*Ofj5oY+!;4^FhNL zQ@abz3jQij5ssiOM)h(t8S}D@+dYQ0ce3KNHQTQ>@WYM5{sVUzRu5SilB8VfCy_Ls zdOc(&DP&{piB1ncmJ&`(HhkkJjxg!Glf3fMs)`X)YdSi*(cJW9IERm8sCC}e6%rqu z9>En4zb5E?C-A}FzsEm(nC3ib>CC2H@ZtrqqKh3*PyL;n%3Qw$a%@^dTISdnLWk#H jA<+GAipc+KPqoa`J}wz#Hu&Wv(PAA^*HOzMTVDMy+j{a{ diff --git a/man/figures/rsi_example4.png b/man/figures/rsi_example4.png index fe28be02713724cabba22d168322ab91c486b164..eb8b0e1351ab9ffbfa4a793cb43fe1b49194bf2a 100644 GIT binary patch literal 20985 zcmch92Rzn$-~ZJ(Dk-5MDy1S@GRkZy8Bvlw%PK_3j!r6+k!(V7RI>Lblyw>WbDsZmKhOX5zh37)&doJ`XS%&Nz#%hld{gvHG5! z`_Vt~Jud0fr%#lQ?t#-A$#V?GKI>MKtk;)&%O5|hk#+rGR7*=so%p;QcTgC0Q~K2g zj->p{?{n-YdRd~mbPAuCH-7lA>zJi}N51{!pP zi|_n0(OWYyF=2B0`ZW7#Ng= zOW`w}7wk4Bxp*>3Xh+wl3!gGFG8$MDDt0e$;>Qnbi{w1kAiZE*(@OnRYVnz;(NvE!r|UXuhUtarqUFT_o#pTS z{W#Whe6k%2wU5I^Y&&c_Z?)&y`uO-1S@%C4n~8LuV>^7fzOk{9Og0&8O2PT(ME~Gt z*i_0ZE-qds=Etfq{4p*lD{DI1N8Dj%RF5MhD>NqHN{^>}xbRzExtlj{Ub}WJNxR_A zojZ>oKducIF?zB`h^vRw+rzg~bsUA9wd)QF}g@ha4(aTeofU;S4HDurDn$e~=059v^S-CDaP_pqzus%H9D-9-loR$!{~*gf(~~R>@Fb zAC+R9c#+*$l(dsy&$Gq>Ca2Nj$$>_nJz{g=wjCkjx8}Z-y1kGOZ~4BkiX^NmRaAP= zb8yg-gwZxefw52-K3E_(Q2flK=KDJduUtUYqQXe zR8;xSi@7noC^j+tcrVK{7RFQXV5dp*^s*Mnnm82FOJ+7s- zJ1gt?^D``dY+ETOuJT{kDRfd}@r(UH9J{XZR$sV16ApVPoEfA-<4gQX)IbYSlA-#5+^6)=wDOVO37B~$$2KOBmu^sNNtC*`wu{?tnwKuAypXlT7nYajRZAsq*Kn&s>(5%EDYJHeE9{bs9*>3f<*2J8r=ISSH5FM~U4)Ei)>L znV(P)&#m$Gd0d?2&^FhS%)x?SL1EkBHq;cewkwO94|K(+t0xreuHU@5 z*U_^TjUXl_#$~>>^SNAz+l=sk~m(6Y@Qd2^$MN)Mj zmxlYd1_cR$B_DHBQ&VZ_4b!$IL^DH~5ufe$)5^2Cq@vPUZ<{44DXE$(^1ib((w$o? z_sz70S)$I%i^lEKuXY9{YEnJyBe?^KO-)T`Y05^7yLJ&xBGiAmY*nk}L#h|e z0ayAxvtKoKON%;AnaX}|4-Td`GU_`QCU{9n$=~0fQ!_i+%V-tp-LH~5Rmq%rHwQi? zCnuLPx#So5UTt{3lj=ThxZfCx^d4dBZ)Lc9*V~%1%ym%m$FCd{5wS8~7i?u^_0ZjY zX0()gHlnSq?Sw1En9w6iJ4)rR=@!4ec+vOn*{M#aiF2;SuWdVWZ<>sKeH$(1b6xL| zvaXuV?0AnGHB-b9Bkuq`EYq^-MCXOEa;Mgs8Z*>RdwYAQ*P9pxM;((ibH0v@=xAxx z@K)bmwPrhyHnB>=jgE@So}S6BndqzQw5k&e2?`7Nm9 z6B2IC4`nggeg2h&`c33%1A`uy<@wIH4|h=S7WSV{pF&?>E4rUVVx(JSlq34;&F>!w zL}K~&^4B*W{r&x|nPz|=y!I8iyV?%@2U%HPpec0J-`tE!!QrUmIF!-d-Cb2xMYI3R zE@5lq()*i!`Q?`(Ys%gOw9?wz9pCDsHD-#(FU2W)p-!S7qPU}J?cmYw78kg(v~Nn# zVR>;nhho~S2$!oyWF-H}VpZ|-V&^j3)(7$N@z>jPhniAKyYrlI_M&oU=Z!nK-@JXRm1Aju zX1{IQHuMM6o3B~a)QCmTVSpYfVA)-Pv$%i%eodH=34bVy3qy&W{R|$nv*#j2?SZ1O zsdSuYdzKdGJ&1FxtgPhb<}QiYO*)=u(kODnRCj4%R`N%ek3{ImgNF~V(D#0Q`*1LF zL_goUpLRO(!qRX(i}}0&b;Y8vPk?@=X)~W`6E6^^Ug`awzCOkgW^$Hd=GU#&R}2jd za7I(OY|W)(-b@nWSKt5EQQ(-Do4a|}(etrN+BudnmA+;(;GSa}AoH)+}>JJG&=GZlu5J0Sf9!?S1Cce=cI*5asK(>x@q5X$eN;kUpZE@&27Nq^$;4hxDw8@^{f=c^Vf z@zDfdK^H;2KG#%%8d5Txs(??Fla{uh>wn?1>saco`6-maS4!;HCOqQRGp>JUQ z!I=j-$5~@~Rz99S&_G0Zok)}tJFszq>L&3h@Fe?Zo(a3w-=Y(C|C3R^6r3U!0ah4t@cJ8m&K+lKIejYzktPko_BS1?YuSJ4#>u%mCG+8GXLwk zJ@mY~$K~ZW(=1N4ngbT@7Bmf(V+jKoFfUp>BPn7tcvfCske&);t8jT~9{-kG&bvQ5 zkW|FJ^}(}KZr(eO7%nd@IyuR*?JR2eQRlKWky5@V4^M4O)M~wM^-dX8-}y(q)NIYm zmxmI)4~zSvE~3(Na&r$a%uYBNoj6g9V`}VnV&6*1%pl<`%9MGpq0po;@$i*0DhB>< zc)R(TE}xuobr;Gve040LPqr|(0RATHl~Ujm)k`t?*2}3gm>a|vjh1X&a7ntTsAx0X z*1W-RJf|;$TvJnUqwD?+R$I!lxWt};hMCUPF(nIXbITKo7p*=%HmZ7mWr$8(L90QjKVz{o zDM&|XC__q}KG>9MpjNtZeXDsp?AoO{CK^FS~J($qZ2S~0V@ae%*=_oja-gxML|XX+Sanc_^S9hmf!9* zT<4{ie{ysTZKM#l!s)JI$QKv3Kj|f-pt*SDS-#D>K#7!vJSw%%<8U=kGoiGT{(YjyJ z#%2oCb+!N`kg9ZxZ*=s2nj2x`c0DgaKw|m;asx*?J*~HJ%g6Mny_i0%e=fi zaEFP78C--5)oI(x=*ElJF#*=OjJ@5FW>|Br(k?asLwI<2bab?=jEp#*3;9FQD5Mha zE*B}j=t?b~EIugTi1!n!Ve06<)19uL$hrH%)(N?DHT%@G%^eDsP~CB6?~VCU|IGNF zy1BW`nple0WLUI3eDELwFM$pdoag82cy+*E;nx^@$Irj6 zyW{E#NO9}iyJvx(S=Yh4H8M>h$;`aG5dD&_rW=a|`qK}Gf>~}q3AdWsu(Y&^tWIZH z$+E1H(NN7t%KUO`=EfI`vwe{YGBOMx0qDVKSm6Nyr^A1+CG(qODLBl0aYMZ@9WQ@+ zZ^D$Bg{2qBzpLD*Z>hB9s^R<6(yk0zdL**>2>7iO)SZ56G=;JFC1cLS3I;; zHi-MJ*Q34Mb~XK!qZD)iF7EV+|7$q&Kg2;9vTPSsRDwc7tIP!j1$%pXYJ$=1Ja>Wx zd3kvS3X`j<-Zu~rY9{e&vCPy|OK6`%z6WsB)~ic`_|To5aBJgUy_$&tY4$o3tsM99 zTE>~^<^sp882JF1fPjDu-Qv|5>gOam$=kPYXJKKXj97X3X74*vRGT)1L)m$JP(|RMiv7dG@{*Q0qO7c};^Kvs^33nAWl)tSbIM9WIJj`(0w_kHH;V4f$?unn6`l=@ z{`f&fNy*o*uQv4}()s%%Ct)w(b&+GoLac$+d$8;W@H;m&$NAaW5Nknx{wE@~iKoW< z`2oI4c|E0HD907pPZ+v&Hyi`u_%Ya=7M=Eu{VtCIGc&WC12hVVC@qSyN-rAJzALc@ zum?OaQBqNfJZ5#~*?HAt%4TLm877U{Hr+xTEfEV}*7Z{Esku(KpLwE@XR}0H$)5V_ zFHSbSasM`)HzLSnF+XL-*_bJ5Wn&}QX~IjNtf{fP>H(xqy`0R0p)Xz-wML)VxIw2X z_y|3fQ<#BTfwp<YAE!^77mq9OTMMJvG52M~?9Ey+2@i{`?k~3n!Mn zNU`4Zhfj_g+k^!lq$;JS{ziFG&sFVU)H~vFKC%7u^AZZWfv;ch^t60GuMAPg&D_>E zHo4}_Nyp^3ticNl3+d`yjfpQ`f_`LusN~?`p{Aw=4^fU)qP)k<#pRXfNPzO!!CW#S z!NJfKR~Kj}H4Z=p$A;&+X?e}WL{?UIHsbc}+u$aQ-5c=as4EYJf@x`K(G>ak_*4VE zP?a7&O#4s?ydWnd^YwbydG>(j=4Q=OidfhRx3kk#*wU_)Z!YBWJqudlRdlsXkyQ#f zzzmerVe-3;4BpGj3H17PZW_?-ii)$$uj1p|@@z){*vuZW;w0U@xe}{h zDzQsQNMxuNIL%r@2v(3-^moUlmQuHA0=EVOo0Z zch7mcGwPZC&1Y_cI+4@+0f9?(zcEsREKiIhS^(P603h};jSMPJj`rsJ8ig` zb&zJrhB(rS`VL zrOy!$0VbXx@@%FYi$;ON&H3JScw*E&^Z8%!^IwR4_4eti+b^YiV{Td#uIctKul~$_ zgnSU1GVV5MMm=6#aHVC>T9mC_ghP3_IDCf0@<+@4-LuRuUVEEk>i2T;wEdYTg|UR4 zD^b4w!rjas+F@FLeZ=XF5W^ah`;I^F+>TH`LUpsUY*yXgpc$}IeA4PKg)A>k7s1l_ z0wA+y_3HQU-&1Vf1sU}}s0w~7RpFsmVpTpA{)^A$n)B_gEG@^!d&nLyU%osWU5^5g zp`K80Y%|hvP7)1^gTn-l<+Y4Zchx{H6ka*G^m8lwSy(Waov>yh??C&3FwPD zjXj)~Cqh%%GY-`p8|Tk@a0yJ-Pai&5nDOiz&$k&0{k*bAEO8`1ex&mqKcxA3kJ#Fc zr%x)}OMaGLP_TQK+;Sw^-%xI@aH3gOTnW)5LF4CP#qxj#xIPm)@y$09|GX9kthFkMyKP581wsnYsFaq z0biLI;c#zv|9`DPB?J^eXV-L0-(tV#n587qC+TUR^qrBE3?4L43uHPj`9UjrzxU4l zs)uN?!9}EM0c~q^-lnS$fy?InaRfl#^FR8pq-GTscG&g)<004A*Y~bCcG*D&sa==! zP~%L{*GkZaH12ClNZa;;x@^Y7{W+O&HQ#%+BR1|B9f`~@1AjubE3bR1d z==$~RxQu8EkV43*P=(sskCeg316FnEJXB}q7_tA1=N9qHHv6~#kp)00ICH@FZ1prB z)kOIhckc+=&tVqJJ4Q9Wob=U~Yjv%652ZOUdW@DPCp$ZsIvXe*@{3Dna_h=r9upQE zbLc@Q5S_TQ=R!pfyD`5W-TnyI)r7cGR-EGpX8+Nu$w2t$O%S3RMYOg>W6QSa+= zvtgqz>vV5WGFDAWCe@Y&_uaHIO~y6%apqrj+JAmrATQMw(bs~@$Au60C)bB=>KPoY z&Kg=d65T6;xkFh{p<&~Jp*v0ueyIxjH&`-ToRN`%k9JZxe*Czu?o+dIlmgO?6l_EY z8u6Mrd}ym+H6cb3`=ajNy$hV;=}8r60CE58*RM0h_wL=3mX>aF%=)8Z68NKe}n7EavOAV=od;zp3H z#R*;X&Du*ew>K>Oj{W~MJn_3s`GrnSS7fFewQ&7r6}%F$3X4k=Bw^~x{B&>mRV33* zu)mJejXEE?tqPujC;V#)<8ONB{}2H+f9pHIDi^GqKig~+DIh3#y(w7_om+D2?%m;! zAAkM!O;uSrFf2?~5-^dE@3A}T4bX_l&F@OB0D)2WJ8!T3cE?ny$_a|5W*3}S+^l^N zf`3v4k8f~}0N8DvobqL292O@V)d*SVg0}V^aw@Jr7+&fh)r#HV0PO~v6wW-j_4tS8 z!i^g#xDU3rtjsx@5q^GjOiT)rSb}HRO}MX+%Pfa1_Kl0)noIv# zs!*p0;?PV^9R#2{@a9J7(Wu+c=BBpsg(g3PKsMCft-?>`A9|=+w^#TC%O9^GfDR1vd+RsUq+MVuZO$_9gbQ=a z$?130l&HfV@ZDONS@B<~#RgR!9T%ubtB$0%8V~u?t6Ube%6{&a{@s1`ecH1k2Mu}Y ztJi@sHxI3*6J%gwXZ;j2RKI6NhaWI!qJWe9;7U%5+2!qUZd-_FsEZr~xjU$WvbXg$B(}r87rdQD;*-oV#l9%uA26~ zp65EJ30GaIt-OFdLv-w+?>qz&Q~<{uCcn1WhIn5ZZz&CJg;QgiDu{8Ge^_7>EjpzL{2?^^Vx;XRYXrW-$KtfZFwEMcDkagd_XRltd@89og(2Rze zoqg0<1^5ysy)9#?Vr+G7Z7)Nn^tLyvnewpfQq|Z>d8{R{gJ$+Q+QN24wy*M|J1U0QW&4}P9gd-=(qBe#n zW&Yy`HK7YOx<%2xx_f4jql{ulkjb4|bJ#?T^9%!@uCv$n?y+Q$n4#$Lpew z&T<)}`J1w`%{%$-y3^mE{TA)Rd9W^Z@YSU_fc48)u6P*Z4I!6n=UTJbwizna2(Mtx zEx*DIw%EkP6v?t~mzaY;$JV1z#3XEocQt|`q>ojAm`0jNN=ZTF9k3Rj&{K}O0gQ&z znun;Bpqj#b@Zi0;)0{c5yPw!$%ex!p$B2!aSf2=%^`>^s!08P%fPuuhu4Sh=n zgz(3YX{TI}l+jREZ|SaBvu?A6S5nbZOGCqvy?dW-t9M3Yfwbr!7|5-jZj1~Ui)~r( z`t|Ff9*J6i+mdAuDHRJ*z`jj6`83^{|78?K?LnU4%ojABScM6FiX zVZDP4wvwpd28%a{2izOw>FHTjCBw|l&8^HH0D3QZAczc_@U^SU<80hVKC04fwtv&p1kXZN zIc^P~Rt%{YT>9_dzi*&pLFXuh(2FfFK0OT`x=#msI15t-RDSFZoje;e`0}!WoL4P9 zV~oqB2z#TiE^@h6WW*B*N{|X{iJdU*a;*A1%STrcPU^dNuWwbc9Xn=UA9ecVxz$$| zA3WMixY=*syusy#YC^q}?*JE9O?f#~9~U@vnjwlB8uPHM&D*k5;^XCF6lr`FWAjlL z#wR9n*y|oc%Du-!k_zg}6#JOu_F}_N@l8jk)7^c&AG)A3B>aWm`r*}1W*;7PKHta) zlt~Z_1Tpz}iixv&xP!;iEKh4&2@A{M8)T!V`y0yj&CSfXTq@O@_S=N_Fznt9?SA}9 zx%c7?j+X^LnFy?_lP6EM>^X0N)xC>X_x7fxAFYp})u1CI>d=D~bkowZ1?T=?8^?Ao zb$wp?nN^(R?~@M9k1O?2N_vEmVDaosq=J>l*_wlE}*(q zPYVkRU(U%C-uj~Q;Q~|z7rE@G*VxW-oS!ls_cG+23z`-)Iviq4c)Wd^YwI_bX15NJJtgQkM#ZL} z*+fP2qtmtob6uamHCntb%dFJ~>lrH%&It7$(cphkD1??q9dM7P+wZg){si}%2yp+c z4Q@1XSG{Xb>SkuM`vnJQV_y?}Bqim>%;=XkA!gPC2b7S%)7MYtWQ5?dV@J6U&rdxv z(Vjg(W;p02_~Rx;G=I7oE|X-d%tHpC!CNWsRc^}vJKWFzN4U>S^nSX+p&cYryxOcQ ziD}5bx8txG_3C#A{v715BphDv>F*3{33QX~y&1rCrR>t5WvD}W4B-3uJ$l4z{BAE2 z&qO*Qqfxudd5#93`LtBPs?}Ui@5^t}end>ljU61gbqd>%`o%NT&N<_W=Sq0k zNiRYad(n;~!JG-Tz!({4EH;7~N1c91V3gzKC5>CM?!iY1p`4eA`TF`o+8+u*?I5M+K~2H~J6K|VFb!RO_?xwQQi!7A>)Wef^M~K4 z>u-25KRwbJ!3H36+bcUaS3ZQV=Y5Rq?(nk%0uvMsjOO`=?Z>;}dZXdd)&rd)J~@ie zNDWI4UUGas7b3m9ytiGaR+OP^2&8(#r$PBqD|E^M3q@*b9H2rzn73H4l6ZlL9{qiD zCxn}JhskO1FPHv;4U85Xzey2)C57p!1-b)ksKl#2JAVl8v}|pCCgE;U1%$3|xlh8w zVWlG&^0D3{UHgcN!AzV2OSa->yzotJYir)~=g*_lj0+59LV!C)hmdSVSBg`51u&9n zrHp6kiWC+W?hZdWAaJoN*lE}SoCz=&*JTOu^p+zWc#5$U{FSn>s3qR1-JKkCyLM?J zuC*r?e<8KS8YWgD@cQ0v0wo>im;=V%dgLJfbUX0cbN`*FH_~-*-wLp{r(_7h?6W-o z#j5p_(lIfzL3>2)9+{NCeH-)Q1>&CneZF?$Jt>*)SPD0EGr87NSkXESF`kw4GQGn; zjDoqf^Wn5H&CSfbTNeMUrKI#*z43=@0yG5x))1_{eSB16mC$m9$*B*wb5)VaR|pN- z;#0hutu-eO@SAWbw?TEM3f~PW6%*);@-H0w!flBtq<+Pg7)7{6)Bo=OM7YD0DCN~$ zK(_-%09=vvB@)g9pSTj+(|R_jJ#Xk=`%_PbbR85F6tLyryX@2uJO4+?!oT4x9=%^5A-_0FB~@o}8vM9D^;Z`Q)G zN>!U4$;7lZAbAV3vk|%$5~rRgpC!}I0y&|L_q0UcJ3EQ2>m8}I);I1Ijg3Og%q99f znE{clSfW!Y%p! z^~U@z3tl747xx*bqj@}fv}G0Z$&LKWjB+f%MCidyuyHdM_96L)D2-sFytFg~+|AhH z6wV}aszX79yFOnt)>=+2ARVH3KwD3q>oPNh z(R9z;%8J;KWf{@T$IDPtFQBl#@DXhBE($a#0f=ld|)YTbiVn2R|2IW@) z1h-&W-+4iP`%z)x6@SizOe*$i+V||P*C*4LECXRSVwa^(rx{$PDusM6b%;~N(Vc?p zgIx0r?yD!G&@en@$l!=UiCTOfC~$_f30ZD$)W3^RWB(*V zecl~`E`KcmFp-t*d+oY}JDYZ|v|3kTHO@*l1icOO(JDpXAuO1_w2@w9ZMQKy^ao zMGghD2I*7l7j7P2UIK-~Cnf*h)c!%kvUNC0>{{kfd)KR|UPK7KK3WO^szQVwko`m- zDhFrJlqQPe>s%BpVz31jq60S`&dW&A@)EM$5FAZg(kp+KWJh#={@EL*W2j*{BZc$G z6{7_2ysw715~BTmy}h5Nk`{^byhXCXoc9*`_`KYUIGNei7bWLf~w6eqLhnM+10ZKfn2_m8(*3&DH>x z0RrZNND+fqZ$egwFrEM{V$GU0*rWxvBih4Kgxo+9);z*g7D(vHmY5U3ZUlL3xRycW zCM_(I%^nlJNOEFK(RO6;Y>}CQ&ID=bvk;5$qn~6Qy+A6IO$Mh5O9ZG!83YA=K-!N5 zch&mGw|ZQ`YC`YkpRXW1BCYhfq>yQhCBuA?dGE^!h@#K z+#!XA7`gN3A4xLrlyF`^l!uO%7I@C|3FKkYaan$?s(9@JVK%l{EH}Yg;;cS<3m9akz@;fk>EsvEC=2PP}jGFghlCAc}zO~PtK{TW}1 zRW>{E4$PnI6RW!4!V5aI-n%NfnV9T4JC;d~*plw7Q*A>kQ z4<>P^U`Ay%H4J1KYOws2Z}Jq;ZVeGE#ZW<;;e`vnXQD3<5d-z;`oWHZFn5$%W#vzI ze%VO0qZCdJRaNXkgmfM%aDz zz_?G)0NYy(Izb?AKp^WpRYRAs;Eu_4&(LDwM*P zNayiUUEw<(U9VZ>to5?g_w4hNuZ@A4^9ZzQ#NOPj-hZ zaljR6&M*l=_#H`?S;aFeu52P#fXq$d-85`SV#vG|Kq?S>Ci?uL_`3r1RBa*`Po@y+ zVz72nR`Hj+n+`qbbB}v_4l`tV=d_!MKNRcoc9K&$15F(7mROoyNoNU)(}F#TCY+a* zB}7v&Ud4gfpsAG62L}M?swA^^d-z&gR@NR82NseV_T6LYg#@WY{w5UczEdsE50VM>S#eHtAkQ`YUB6K7lS% zNW>ci=}aV`DT&Rv;(p?O!#Lc9J_uhOx#(_8lOeK&f1^7NKszit zqVm(USa^hfK00b)Zf*_}?EE1(blG`E#2y(ULgRRAm_hS1Goq6pE~+GI{(S40YP^&9 zJQJ*WB0-4<#(Q%N*x-DCDmne?m9n(V}J|tr{W*Imx zT=-^{E+I34`UGvnXg2y3NRc$;uJkUb&}3#<-i)4e#|$%Gi~ z%KhLrK<6(O_`7gP|99ci%zqcEL*pnkrNX7T0pM#zk9u*yp`0lRVy9tVJW#w`9*?Gw`XJ{{Ahy#WNWRYuOqByzZnx@v5 zdclx_`3$O_p9_OQzJ##i7G#zFdzC7Ts8q+TVUZl#`T#&bDKXJok6uARflzM($vr>Q z8J0Qu@a`Bf?8U*sp$5hCZ;-h408uBSu0ZC#Pt7DRsUSMGwv?BcGx7L6m;p5UvEN$q zw|@hrQ;5PHL+2Y|Z2zUg3VXU_1(m{S+>h`Rkh|!VGx#`}c~4tb6zF<>h@xVNWD}zBPS)g<)${x$3IUyhdl=heVF^H?<~6~Wceg)yyoC_pAwspWr?y@1NshLJK* z5&$`EU{|brGy`csgwqUOXNXAFHLo*ij?>qfksE}Ozi~U~`M8ggZ&FQRG+n+NwIW-S z4yV4ov@={@2vrASC9?zM&YV{<+1aYGO1XJ?biSJ0b(NJKK0d6>3Cd(%Dsrl%5=^RX z+j_o#zs5F>HHxS_x9%(Tgiqo%$M@&q0{Ri(3lI(Ni%ts_m>1rrDY(&XxBZ9Z5W`ql zTs%nYQF$Ap8vKucAi1Tjt*uDZClxu(rvCBd)oa%5ynlG71w=R`?w@UzVh*8PMQjpK zXG;2=@sP>s7#M_ImYj%871kogkC>UmwdOP z`M=wo!Ak6#C@H_TNG<0T4oO=Y1QG#-!_0gxi(iFj|Dn3%d+&=v6L7nK-*O1?E8UvDTb)`M>L*Ja~j!df^{S&atjCq5ThH_WOCR_D*6cEAp;|$ z$IJM5aB(~qF-6dpj1rCg*vctQoX`%$L;kB&^k4Z#f-70gZ%r@#H>`xBQ*S6B;GoHE zyYdJk_n=y97AeQU`_hMaDI+5T&jj4w%#XN^?%vU6o9Sq1^xj7|^#7*F)(F!2mszNo zsHl^#MKND?IkLWm?XbByA=MCe3B-D(*QLJn1aZOGvjxP2ofar`ptXMx7nn1wM~^n? zo8#LW;CQYT-Q|Jk<|YBic=z?>D4rk`1fKKB%CxrPL6O6OKimw@b=LP{lZ)eN zFRbJrNCcG7bM*kB0~xw`hy%|0TLc=EnhY;L6SG!rrl+I3c>erTbZ3WKIB!!^&Z4-? z%*^z3|B(%_8>y%UpYmgwy-vK@bSdPoG5$dZSc2ia?O9DNq_LJBC67$ znwwSt8#_COb%<=EGG>I45Trxg4?9miS@&1<1QzB%10WehoJH7)ZJ2De+vd{q|7JIJ z2g{|WT5b5TsmXX{N8Hx~X>w$eZ@L|2=Z(}+DKE>K9}Z$!$*o=PHrr|f$pJ)WkLP#N zeu!}6wm>;N9Ex0>>zeCdl6|rK{&9BTPnzK)IFG=xQ`26rO~8d_?tXcA3UA3| za{jVU5U+6njy+UIA{$B#GQ4gWpUD2Ht6P7coI{`AT=}A56smfWyB%~f93p;UH99)_ zxxsI+Y>)t|7-*nm(5)od-7@L$7 zDQMP$5&I6z>u0_R;nll?=o^GD2uYX|E-fi(p&bR@!n9{SeEQ|0g87YCUoCf$mc;y? z_w-tGhsFM8&{J`j(?mKWBxb1WPHHv37x#zr&nb2uYPY7N@!t`h`|`lU`wW$@_Spvr zzBpIEzGbxl`vys~M3-DOk)nqa3sW--DXccN(sfQniM7XeOUw_~u+Cc4_5vl;U(0|_ z0ovpI;h4o|(u6Cs?;!-PUcMxz_D#1>ab(K`SnTFhiKYE@-9wx3O+!_5=^WJ(4mXn3 z6A(77t*Kf3(N7m9412&x5ZbsUv`?h91V4gM`Y=gc&rol_K8-;M3?*plL#>QeI z2`+T6T(L$RU9GDPnAhYw1Erw483@m(ZNd0?Y( z0pf$stlx)l(M|@2ufKiJoH-j{LBr`1OIu9w(B^dB_}U@Ljm1$j@p537$WbFnlzF`! z9p)o|J~3~oQZ+Ey+uhCEy7e?72KQ=8AXZ>VsYxkV*3NFG+=prQS^4p0Gg4UG-^pc(Uq$Wgd{ff?(}Blqn5 z(Qx^DCyNIi3OW#N(AU>ryKddQmfzuH$Jm0%YTIXzZN7N$2?bf_m85ZTl-8|xiJ~X+ zN=|M;bW3!PPmQ68sVP75fqt>^@zs}8l6e@nZuJidnMDl|JPp;-JVX5!5k7|Zc{wF` z^7~mRZI>@I&kI|9VY^gvI(Z>RW-TLU%eJAab?F?OTYiL!iUZNW*HL*BdXq?45Lg*HdB2sZ*Gr zn;TlwLQL6fXgJ~s@O>8^l2IS80X==S6)@DR))7C7Z#i*t5)I2(+?5qeEAQGPc!{|i zi-anjL*ZRw^6~Th=jx^zP&G&kTXCK6bMI}vl`k$>ReFe^(5vrXAawb)RMCXLv7Y|S zN)&+ClaF|+F1-Qiu2<9{x6(0=b;s;6W#JnVvQr{(E$KBKo-x{qOk%LqH`L}$n>N)< z0}L!}ouTGNK#*`(J7r0v8C%HoTRw~KQNWZ729F>jU|OTROV4|HauUBfEh$-{pNc3G zw6J5lHb00G77+nx-$r>_TH2#^$WY#Jc;{h-u8Xls)%R-*$<@{V}ZHH%yyFv;-j{d(5OF`?7u?3`AtQ@C7bT2w&hESo~!S^z`;w6@qNqja@!< z%C*@vF)l7l>w&#~So`%CR~>LNFj~;Yk+d~2H^<;-RbAck;s|UeAHTI*1bbIkN;D5m zA>AAL+<;FFAsS%ReZM6n0NT~{TRYE;?h_Q8f=Y|&^}CO-@32guUB)W0r!~hn^snES zkdS~&CI7-N>d=Fz;5&tzg2?!L0uKAgHhd8iOoWN~H@3ASva3kj4?8JS93O?i0@>im zd<8mYh!=AHb&(RF_=YM8%6XcJ_(By7^+pKaWET_DiiQ&#il9LcwyBN?N{x|x2PAoN z4@d*XdFT2bR_XHU@t0AKV-rLbp+a0tELqS$p@;r)5h>^ z8xNu®(f154BxV$}KabZo0#3`?TP7MNTVFQRiw3i zF^ZsGP!U4fhlj5trl!P>k#MwWY-ccdE3346<9w%CJ}Y?@l^tpI&CPhWzf4b&as=`+ zFf72)F|;2U65^rpk;JQG;kse(qYGPsQPeM7xUo2QGxRwJvei{phaTV?lQ5UN#X}Nr z+tt;D6^JH!*;z8F@!{LcS*=>y+S-bWC7NL&32+Obj6>2odUOUC6470hHMrwc`}FPX z>`>*3=FhEu%`CO%_9NeAml)$jR}7sx6o@0nBrKepn)-go=16&@_^r^uz)Vb|-#h6W z7B-Kdd0xBxdO&$;IXUE~IJvmOBO;bGilK<*Xztm*{Y-;3R`SV{cO;q74C~Zsb^Hr}WkF}pk@+fE{FWWvn>aJc<*+~`lX mC-A^)TzBF*|GclKB(mBr{xYBYdK`ZwNuQRNOgyQ3=l=j`RNFiN literal 21029 zcmcJ%2V9T;{yv@=NlBs|p)IMDHc65OX=|dPy_2SoCXuwXkxJT2dnlw`lJ=5Hnxduk zzus}i=X=KYoZs*NyC08p-sk9k-|u_8p3moXUC--z`(02tyOV^Lgoub}=Q$ZEB_g7Y zlSD)tDzU?Ym5hch5fND>;XfOyET3N^BHB-MPU@8Mji~V+r<2Mf!RG**4pl?{yuBn{CtO8@A@V&V65>KgP$WYA`^e)OBg@WmK4l|N9`B zL#{u6I1SztG%+>x5|gT3@-lGRnNziC1Cg+&>si+Q&&<1CQd~4Qp9s@+V-Ks9CpPOX zUc?~@u~FyRwthqGO+{p!KKML$zUf z7GzzUVs%_ySDNF_h8?-=F!u3CCEo=7W?e=iA_30{uA17~iSh9S#n{R5ar%AxjB>(! zB~PDTnjK4Q8{4@wdvm4y)~3^^Pw!0p^tn1nzM<~vnY%w{$Jz>i_h!R$7s!ZW`3&oBjAvGrE)GZbxv%vYmw!mQq!=r%t*L3! z?)2kJGbO7+&h*c!eCt7eTKQx?J3G4^(Z?N^jD;K>9YsVUoo#5m!$lm^6eehx^o9r7ut{QWn^4k9EttD(tVF& z(^k?97az}|OM2A9ul*?R?ma>)dLyH#XzBUIIJboXV%u-#a}LDb`nb<-)BUF^W7byZ z%iNc``nr31EPD#iuvAC(YGm1tG!Qf1ciOH)u# zm~2f}J9+Y?q-4e7_mQ0~g9&f!oRpQ7pCu&BO?0(&bO`O=uU8YyUbgzv^zsZb(U+6a z&w>kXeEan3HZiM0l(CV~J~}#6BO{|9^B%rh+S-)6cfYjg>1=O*H~VGwC+^nUswzQe z!O3V5M>0my6Yi_a)j_P0bU|TZg4f?a%gD$eEJrRbGo0)4ku>5E9b{M_}rEk zaLD-cVZtX)_%n!v_Qki2Ro$a={PyWhN4C*Xt^ACHgyE#bm@Aj(IIqsm&KejPRAb>; zTXS=BYZ;w6^JZnfPghMXEHLnxQA1Q#R@S?B@0i?|Gws78uj&t}pE&3zB`J0Ft^eY; zDy9%w15M4&q)UmDWoxVF!?A4M^6TxW$eh%uf)Uc#VWtvlE5JDasziTwSkG~ z@ooDbB3c#i>gof#@onsOg}yVF*Pl$PJPx7cZU7%}BdN^>RnB%R`cW5)u^+I*JQ<{Kr}y05v^ z`iwnyHaKziK0QK;SME3m$BQRVUTMupTQf5=@8wc2&z-&LDk-^9BF1?sy|_54>$0|X z^rJ`WDk=sC#16)t4H#x>$TBlAF}ZnDxXfvwVhcGrdDr8)A~FyhK<~Kw#_Et+@Q~u_z(ig!FVvWR;-!x^tT(R(@Qvu&}sr z;ewKqQqcD90^6#L3_Xpxx^OjMU=dqIY!H zOY^b5va(VBh|6xdxw$^%OsZ^qyc_qR=Ijb<$Q1W+@akC zTB}$=$crtnUgG9jQZykG`602XSrD+{tPExL!mx)&j zH9%P3zJ1$EcuVEN5kb9jqSAWW;;xFUlx8tDv)bOf*WAH|>Pkv8^JQzUGoP#5(sh{xExO;wpC=}xH$ITxoNe~`)0?}O5*3br z<##z+Z8LmC$aDQl^X*M@3K3`GX|FTKJ9ACbOXfOnZ6fC2t<4DIZC=b6sGHchxAn@SCQMwPha0{l?t_j z5!4MY($kMt@_5Jca2!1Ryd| zrH6UJ8Sj?ynq!XATCJu(4#l7d9G5^AED47Xx!XNn-`Gz$Qgv~S`ttQ%)fT!rOUCHE@sj*Fcjo%k}Js1 z_w@2|ovCJZQFL&adwlBl0-ekj(JecyHBY?n>2dwi^u)4k<)u#gh=^rhY00(fhZp0d zb9rPqGq{Sbytz~9Lyl72Rly@7B2wwBCb2ZmS32?O6Yq`b{-`K=@&32>=oU-V(shu# zQq$55sSV3LHk=RTDzF)nMJ`LGyzlGV-#a)cfK+GI=Qs)EKkzRriq zt-YzKTrA_|%ej*IUgs}Qd?G}5x$mW-qFP&-au4Iu;I;d5VX~zYk9OCzKM_%i+z(40 z2CcOucYTQq5dTEmowwpP-{Uw{wpKdCNxU|-wj$vr85kJYjLO0w;y~>h*7)%7 zc@$<{9UWBOJ9q9hLcL;5>y0{-nafn}{+LV&mE()~Vv}4gIffAJr+Q zrlho;{n`rr6%rQK_~=+%>xRf{>v=vcSO}mE3kp|3M@#$CtmA33am4cVZIwdr2i8lWI^JAiWA9esZpmKC~cYE)o3yq94&A(gMC);u7 z63@Nxz`%iti5}!;L-HySz&8L1KmnjLQLFxw@k&m(43@JmhhFOH0yVs9BmyP4u{ha;1c~ zsZ}nV*8o|1d04Q|rKQY$ElsuRLA6g05m6ymb06m>ZFw7;nF_BR1w{sgrJb%-pcJoU zZ>PjSMBoI(@ua?WDH_?RajO7ZVPRqOV{MA5s)^5@*kI$Q7u_#jzTA~(*~fk4;(=59S!&L9eYf8mKEG(LfUvAyHMF72Kz74>kSKpFa zd`B3^y3CvdjHRn|_#>R+!ey2Xl<#(skVJ?&*%%ue%gU1EEsmv^(UKW2YUNg?+*t|d zjaEF>A5RqFnau0{A~|_!uFDdKsQxxs1v1j+;;yIHPt4@P9<8fb_5cHBf zX7{BD_iL)JEH=QB`*5XW#OiFiyBHD^VOIovr#V^Y*Xe;uMbU4Y%V;PlUbPS}A9`)?6PL@9bno{}1TdvCDvrBx@&>G7LCzMQ(fm2kLN*EyPb z^;*SS>cbr}L6nkGxVy9hX6?8|1Q5mh=$!4~5w2M^9Vf4~DSIWQ_dswWujER9yg%R3 z(IIHr%Rl~E;gwZuu8S+}>Sci_lF0#iZW$AkG|d^gaOV{BPpr3ABZ>=V9cI6(6ljU# zvap6s_-QSQo6o;WjCK17luizCS|4%z+N$oYp|+^K!<$~-_gd>HadyOWsLjG}j01Pr z+aGUZ0=YtUk3nMDzrP6=z z0d!-kWS+6CI%2WSQEjZHyE0PiK}vXm$y|8WwEE@pMpmEL&2#D1k(Vu#l9E7lLKG4? zxwzzHWO)251wWV^ugwCt%9u8(6PS-^scqYFR~rEKj3F|lnFPKfk%(1uUbB?V39xK!Cr+TopcGOna}%l zUB2N_%uqzQl9;*2$W!tO9vB@RFT6lk-RzuVb!wy;yPemghSnY{`3V-qpiXWcuf zrnajDlZeAOYAA9-LtPzG0&7{@t5>)5 zshP9#@>rSE%wIP&++WHeqv$Dhjr8T#Elq)9QN=GHAbV(cnzoKkLxAOW)VU&&`1|{V zs!2#l7V587-AA|!gOc12mO11dWZNhY4vVGzp_;OORXUHB0i#o@5RxVWp=u3fXX{ss!yk>@Ua*5?>)>xN{tnt;AB_s?Dk)j5HHSnRC7b?l6t3SsgA|mia>mmiG3Pxi1 zZVI)Ry5jlwWf|<4m(G2{GSZ^FBeCT1<9@`h8+4d_5uyCBmkNt}9!2K)Fy3V2;j#Ld zqTxfvU{Zaf7Em?Me(WP883F?M;Ad!q8?Jvd0;jlrFj+QY;3>+9fF!>N>X@joEOjewgi$R{b& z($glOyxLUZB(R%`${r}# zdho6Fn*Ibo-{|o0Twd8qeU1d4;D_fIy~XMqx(L+j{rRI}SW&&by$KtzI)<&zTK4d@ zZs*d-`Yf@w*ob8AINqLV+{|3s_v74v#v{%h=|W9H{gv%{Dhu1ZrOEAE9Czv(!p=+zw%EZl4+PyLRuQPkWhFZB*D7s>Tq%3@zEAr z8yj3ny?tnCXu|r&DDLve*$m1JPQUZuIUMoJX3wJrpz4dArs*mwD&NGg=4kIpr>Z8m zn%tAlcAmGejphj9IC${tt3S4wuZGi-no1CATx7RbaXvK@{1Q=k%a$e5M!wM%Gj0IREY2v9D$*f9|U;KA&5z z<05_ZspAw#5MRW@EJ?MR3$Qfj?DM~G~Q z?3?3&Ga!%27udMylfm#H#cGKx7loKBu1=q}-5g+;?MD$fI=0UzRz*L+IQ!B8vnx_| zs8bPS`L-iup{AFg3JD8GOhRT=PfH~;cm)QLsnxZ+zNe>TqWQ5G?yB7A?9I~ptQ4gC zHuj+EkExfd>+?@HAP7b0URtGpNSFN;^)a%!;AB}zfJTiiaw#u_+ z3#qBAlS|Y0QpWl}snwYr+>v>exGz-Z5adGdKK`p|K?lQX7hlS;T+TL>7dcGmLR|5& zT-t)q|7W}a$Nm@5@}Dq~In@(Lrh*^Sw4Fb{qaY^s0m`-N%(+fRMt1KW{$SBv<}N{T zMp~NX@ZpZGt}r}MBO}T{$tT;$$yuL*SU-LG6pTdufFjOg7lWx*$i*aOJRXzWn{Vz= zIXE}~AZ($a+Ox-)pEg$$(RQ4+ezK>iAdrTJX2)Kx3(2igud~eD+}vDTim4tF9>cLL zY4-2He$e0@$3E7#w0!R{itWj>WTK$jySHY@<`)1g&?2C$ogYndp;BX zot^!cqu^meBIv_vyn6L2$U32rLBwNzk&+TD8{bU?_3R%bM5@$o^u5=PefbWayOKhK zgSRo(8&V!*K6*4ArIBvJKx3|Gs&r7Ws6u&LBsGPXk56Q1|42i0i%G6l(Oo&OjOL9S zH%dxM`pDY*$AF*!-l@*zD-J!>0V+yIDcC(Qh?`WoVXP#6~o?cx0S^VwNh>Y?(AiX)RT z$371Xpi2Fydh5PfCRh7u2O>BvEv=qjq5WXzIN?kKOI#_}vcL+y8M*HZCpi^|3S4iO zF2(%H#@v;SnfVI!TRV@iu(sHAa_wszo9_(|3>-Ll!kET1nD_qu`*=?MI46TH13ap+cB)$HXhz`5LqCd~1jph*xlg zz6|}-a&n{;sAo`HM(u>76~ZDT=@=O51JYAdkFc{3I4>_R=YJ)}GAj2yo>n6Vwlh={ z0v#1ikh5A^-Ie4La#DYeajV&#tP&Cu2M*jS8ctH?;N#;f@TO8CgsgR@G4HIUc|Gx zc(FN{{ZdL0E6&dMZb({<3q%75HNEItUb*t=4i%^G^T&@*#x*~0H9<~jHU_1am-?s0 zH&5Xq4zgcZwUA@*(=37_3dE@0vvSUYxYXlNL&_=xSp2P<>(12e^LD~0{dW&+2UZBS?&9rJijvT2nwif!I; zMpDr$ir>CV23vLm8no+A#Zd}14 zErnWbME%yd9P5OZmNx%oeHuxmyuYuOmKN9Yw~hK5Nx^`94V>x46}f=fr+=p(tpH_? z)RdG%%<+hsq9DZBaW0Y%u!%@L$gPDMTNjBkGCN^mM@}rwsvY<2F=0 z5gC3I7q4A=cAee!+ov;=2H|EmRN9d*_Uzuhd(WOjQZmLdA+q7<)=EHBLK@O_TO1;w zZKn|i0*f}#P)%&12tWUfh zr8wvbh!J?R3=#6n3*bkAR!2(-Y2~uhiKkZ+w=5{Ft!-J>$-i)jre{u%|Eb~T?JoDF zq@dm;Y?=ga#dSysm^rMU=G>fou?~b{nug-XXZP3?kkHDvzkc_FgqdP?v;{@_bHL6> zZ7Km|yxX@=cg3CBf&0G*S~A=iI|beM!zD$u$0-5<>r|76R+EC)0R-*+qnw;OcJ7@0 z@k2RDnVp?o>X~XXAfXOC7W=LTvM>cJixZ>lvTR=1W3B>IMH8ipC zbB}~bE2+sc8YCW&Z9i<5V|W^nX~z85nW%?{SS(Fonc(?>gh5=*pE=CIfi8t20g@C# z*ZuOv*v-n^-2B|R?R|qIBO_B&meHc?5F^D-#c*!CBUv>So$j4vWNr{aeA&3U(_Xyb zICA8kL5Hue@1sZ5ZdRzEXx+{CrYa@X)zy8b{dkTFfg|-=Hr`*ELmO02KR}9^pol3b z2rzK{4Wtx}5EC`UsIIV;uc-gdKf+8dT}KI_`v{?n+_T^67IFEuf0r-*VyF;*wV5c| z=Xb*U2)9KFF%$C^idQyUcI_y}-~KlX#y`dU{}#n8M;#)vV_euNsL{(e~SMBQZ_eM$jM8AV1)GsV`55#S!d*L|M3$!M^DNU#3CwQ~% z?{!CEKh@gXgSi8om4b^z<$sE_K5aCF#T#^S;s*AgF$Uow{Qhp{=8KQiuK(&1mQmyZWw? zuuTOlENzxiVhP$#z;JwEPn8?`R@mApwve8Yl5+OC!(w+ueheaYx=zV@+SaGcu6T{k z&7CU+on}{tJv}|AC%Ch;Qm4O?OuW7st0!#zNlH&||C+_`^w9|nQd(N-eY>`%2L2Z@ zF)B_`1}_(sQ*3&fBUEY z{KXDOJAyHcL6KK5KJF5a1KPbCHf_z|GS#mGeRgqmWuT`|2~|0N-}nUDUjPSl(85=g zDpUxbtjw>i$!(~I<`cf&SCP8=vW*%Y7xx4y42`l3>=OUQF!n>llLZ}bUk zW`2IV=BH=Aef!pZb$+62emK$+qOtSp@*>pzb~KRSJa9t?0INYIS(Q+Eb|PZ5gPQ&C zF91w(sb}<~9k_Gn&eJ|*u3*i0O8#%BEqPko+8Uvk!HbiZo$Wl=VT87;Hl!olL5CUHUb%8bR#p~C%g*ixU!y2)0^?++ zZ2SyFX+;2kfswlKY?s9u6zeJI3j-Bi%Lhn(j?>gn`=YZRApY|Up`{F@FXlY=W2(;` zDegzv(>slK@~j3bKtjx67(urhfXW5B_mQYh?RwJnEbm(m+YpP~qmxnuAvMn;S~~7n zVVFbp!^0qLBwl~`LiTb%ip32P`}rkK>QGqiNMo#`RH8yO^HV(C`>@#fLXSyQj4gFp zw3$>Qk*KrbS3vQD6YObRoDV6Dq!ekT%g@oo;fF>VXdSd7^MII3<(Ra-I2Xin^`0~C?(9Tuh*v^-Ns(JS8P}<&OBM{`!ZJ-yjIg}@4^Z6YTl4)C7?(_$)%JpSOVP$Qd zDf&1wGcf()3FsACmEA_ZYJv_e7r}oW1Q{Ff<*?0Qui2-xSJOLJ z^Xp?G3_j*_pjid;$jzHSfq{AX_@=rGPD_DGW9h*1fezYD1qCukaTFnF{Mg_O8D_kE z@nWVy?Osko_1JF$paAqbz7_>L0v1JeAXalfZJ*mxYEe;9Y^*Nl(-pL*z|FbX*)@u9 ze1qc2<-T?gi2?4hC#QY#>#-Q|+*7LuU;Y7V3C|(Q54T3vHRJ|R@<>5TmZyLGvGJaC z96|lcm5xI*Mvx*&`2~DOTXyUPEN8x=As`_UTeN`=;V1{~Sv|RRck}Y%cPbJrT9C1)r%KTN&TbX z#zk>GSJPWR|5I9i{t0I03RHEHbI3Zr4d~%QRc-+x(AE}%`wO`iLAC@D4GEhdY|~j5 zH-C7Vz@mMB(oea$hYTpcd~Z zbXkG*6@?D7u)y-8{`{OCmoCNb*XRxGV`9?1aKQ?w11d5e-VG-wkP~$JgE=puyrG@F z2!BXOXeg8_X51`D6uK4`+-gJN-_ekq+0y?!Yy4&6&xz?hui^+i{`15H16(mVVFn#| zjNc-w3U^Fv?>Oxi%VNf+AGaMM#65bU_c@!_0CKst3t#7&JE&}ne3U^+M@`+1Dj!z@ z>b!i|R6n5IKGYPzf7HDufJtI?B=zyjLJk5EBH6xuI|+%2^T}7apR0CBRne*$ATS7E z;w_!!i4!Nr(c}P!zPs<}$FbREqEG{SVFn5`ktR)@eBsm*Id&{FCx@St6JY4aj~~<1 zR&noukvp5$<;&0|i&GXYzd!&90R-4tJbCg2OZ5C%qXRt9)BFMg5NRvtkCuFBZ$II( zU^Ph>2rm5M#f$gv->Zk-0|W5$8>j+pAc&N0q9L+}=g%ucnmwW#DG=zdw@YZ@1Cjv~H$Ki2XhCAIZoa!+ z*KH#H_4@laxnW?v8F2a8l9lXbM(*$~6*qsH-w^!Iz6R6MU_`$n)EC&E-~)0)-iJFQ zXle8;egr<=I`cAk=FkzMNB0h16majc$;r|yZ%CY-mk2%%;YFYu{_SPYiJ}Z;!vVZa zk#9IvQ}#bazlTt+TVJSPeM%Et-V8hXdfN5^=3^rWXj2gE2u82~(HWVutgW*3#jos8 z-O+WUnS)@VrmUP}B#ZNCnnZYFgQfJ_r@KcRB914=wOlX3?*X?EY>D1t@P3Z=mAN}7 z5SWbWCzx!|0Y!;)v|~Hg%`EqJs@RVT%4aVT5wR#7MA+fEJC{RjmNG%h4!dV z=ZmMfFJ{NfnVF53q3e%=nFd!0bWWJN*8o~zTe6J)O!z`H4{4>~eZ+TWbJvzp$V0hCs@S9HK8pNK!80rR<3*)vEU=_Ngb`CBK;Qh!^;#i9 z_Fsbsh5=8)xV3Kr8@*h=(L_gD<=FY)QjCiMopOX(XCj0QUn%b~P6(#>8YEjAdPL;L z^!~Q{etzfV<;~3q65t@@S3fphUS4+g>fYW`BpftkefN-@xpCtJg^IHB9x5vNaNaWy z_=(JW|WgNkuC(3Fz|?40t*^IzP(DZ|wUmNy|&&%z7b7 zLnT(>XuWJ%@+NB>o=5Qi^$t)hgjsEd9XP?l`w8c1TINIiyIWgnqZQONG#23_)GfYY zjWP%m6Drxiu2Bnr)1#RC2&;CYORLDJmXbF;D@$qG7>Wf25|Y!68|u{i_iWfi5_wtV z@JB?ApVSrperVVgZnm4;U#CiH4ThV2Zwv%)0v2f2!D*ekCvHbaPfN zfkw2#St+m_M3|NlAP%5202+kp+AP=+x_kJ%pDA5Gd9s{|&Y;85nLB~eZ9#v4P+$#9 z>%;XQNsynl8!w~t6n^UQ#Pc2t>h3kos$CZm!SK}Jz; z*TqLWyF<)OOiZb&bh~#;O8w@N#jT9$V{uNtBy`Ogz!Jie@TK- z#K8=Wo`cfgu@Mw1VjODHwjpcdKg)Rg*&GU zcR*46i#q@6Z|Z#a!~l-)_^$Er&IH(|;BlF1&%6pRZ66F)gl0T!w0HtzhX_BUr@^OY z06>TaeE?cY^(aHHh?(F_iVX^Cf!QZDh#q_85Tp9XF;(qNM`0igUKAG>mzKupKY{^? zpmL*YW4_i&pxH#H_*b^J!0PeFy)h2qnwZGiRyq>ne4z?|^O!I$45pEAD^5?J0@s4k z1b8wfil9H8+;LpHCJGLyg9iuU=2R44e1@F}SOO*-h3^Tp*vF0*af~z!3bYFAe0sBS zuhU30LKEVALtmde+!m1Gy8{SgPDFP3hT{Hc31ct;_ya9**g$eMCnyy~DX6K9*9#31 zm+9z~c57>E4>B#NB1jCLa-w!CH;tY?4{wo_O7?YnJ}aCmpj+e z20wbiOd}liI8l_yvgG737^G)W(Ijv~fjv|k$Z@>QZQ-@kt!92`syJ%lf-S-}?u`}7Tfou5CkCbKnDU&is7 zh;h17M;d5^$j<&~QFNbvMXaT$um40T$`hr;l30v)kf*>FrUxN z?B>bp$HWpNC1tjLdxYvZjW{ zIVqSI;+3rLfqp>i;Mha5Lx1+B*nC6q1v3Fnk;4fsqbXJ=^f%r4B=pI|`XCHLhC%z* z|IjujKcB^Q_gC8MqE4+IGPzV!Q}fcYZ*p|>oD^JGKkptbZEvQ@jR76Tu~F_FLHE3) zy%qUtv%33~fr2f1m~=;j{%1$y=8YTq7q1~pU`tEo+_S$G1e@esNTfZ)pI>4qCl6d1~ZsLfKfEC1guG6Y}%(K|uh-LJeSaLA_njMtK33>^3)+jfe0NWNN4U z0*8r~gY_IB)&>d~JU8&5pM|vcg>cQC@paI1^1c7onfRN1;$Fx@p!qMfF*iQ>5fDEh z{>>6`PR=n5QjOxv|77_{K!D zS0tF1`CxeD`(}2WQ2Vamy@-!aX*Ji*h~$dB+hI=L+@QLW|77Bn&M&ru-8TL?S$xE} zA?Vo`Ii38nAeV~gC4`nNA<_JKjP%bk=zs4CpSFD{A5LTUEQ>Si8$6X|d zLz;2TC))<*-1GlaG+8M)(obPNE42H>v8Rx8B0~GY zu4_TN@J;4R2aI$6+9*v;6$7e>?b6og@YG2|!^pwm?OG}Xq!UOl%M|7gutx0t)hInF zWxN4Bl1PjQw5sW*Y8TDH?+fp(i$rafaP)oOYrKT9jr<14hcFSLcBG_mg&MT9v=kH> zk)p}c(z_aP>4bxd2Pt~moGv-M1CrZaBLE*liMKgRMY`ViL=zdBf*djGLQ!F%%>*|u zRfV*ztu0^ASbsmD^VbV-PRYUZyBQO%w|^N*B7A&&eybud$(kY}fPT^PgNYT6R}qTE zg$1;HFeu54_T&8Q>~R+v^rDQ7pC=|J%Em)#KERx-866aKbx%i6PqcH<9bXw=6-;yO zzri0(6xezAm@T#UVlB~z0ORDwKq|u!Uoc5*YlIuwyh_O#C$9UUA;mcHC9%_!i39kW z@WDT4jDI_B{(qY%erqfpmq&Pz0ic&oK<(eVXU{Wb4s_}MPx_t^{wy$i2B5ByZD`(} zp$}^+NCNYJBo#}Di}$XJuO8GIgD>PT`iz7G%eU_r% zx{>kzYaXf!@0r=z5Sc^Lo8WVV1Nz8^0hvRW4(Ra%Q=&-5m0r3cf<^&TgR<&8vXLCA!5#nvKG|8FoOL(R1koj{>+b}hK z16_!9i4_$ZvVApwOMHA96NSwc>xwOPtVPhSF(Ov zDO6<$a@*@SwDENqK19PS;D2$0Y5fd*Sxt@iphWaFf-f1oY>UxNe7=*oYzH~Yz;U!}~Eb`hh)bK@Fb zlKKb6Q6Dg}yQS_sxZ_J2f{WnC4^lERfzH~j@yx4Ln?>pUP}z4LhxmwAY}^KPH%lER zBL1S4fy-~)wCUd5$F?@SpF*j;GLSk!vi-toZ&JKE!MGeYK%^M2zod+*sj0!igM^d; zj}1G_QF;H1HDTQWjRBN~-c|R+ru`>XCw3FerI>vEd#C0o(^h8ulX{xDpCM!>m22Mm z>orxBt4%=K)TTgEWHdtwZ%;Uz-0JP=xeE=2g7ozCf!@EP1tAX~N=ljJ3bV3SvH8Ly z9Tv8)jeGf`N6JF-*}pV7-ddf6GnKQBg94}>n>7Jns6J9BCMM=;Q}xMu4D#SYu(aB< z?Cm`56LRm*y$k8HXTKLgFh4IVyTAzdq`UhXnJl4Pn`!!Jhx}{Xg7#C$itF-D+`7dw z(x6qz5JM?0mze_(v9i*+wU8?QwJSkux~|MHdoB@7fd9(p`0w87^8Ztj{ZFEF>AtYl ze^YfCLRfK8?O9|+9G5U?(QN#I;D!8X%n#cQ3p3=Jz`#tsR~vIR<)yf4het->3i_FYsfw7PVVnf~s_>V!55L{=fpQ!3tI*rAbyw&gW>Bs9)11LS3B-4(ZUh0aO4@Nl z76&^!g*c%H_;;;L3G%;|L}Se4BphCVxO-H)@JE&Ox;+`=sdJ+(ur6t9_keG&c2AOA zI`G5hp1(i;N}My^urq0(v9RuKrab~S%f=?-;oG#)Kf~U!RvuIaDsXqLE7BN-eW9K2 zB)+yjjX)U9K^@|%O-M|%b!?*Hg-uQ!RL72w?#SYhzDqa`cweb%^V4BvJA|6zB?J6{2Mt_!do&U}v zq=KnOilo-B7~GHB4|1f=Iq|Bit0?Z$7f<|#{Mzo*ba*aYZF5bZ-ED}>F8P!M?W3Z? zBs#$@D6EaaFFQN_GE8#3eD=(9>Kmk_`T42G{LrDw6YSgRb!RA(&lM z#4IH&IzX}xmp}P4t*vzxl|4xK$wSs(#%HamFcNEUnIlQV{F-EFu5`TN^`gwjTzv9z zJB|k@o!TlZ*dw)h$V+)&=(Xkx2Q`i#N`F6`!%lnZ@?+`4w@yTk#aeu9aJIfV|8q4{ zP;}&(k(-3tNYwpCx22gwgZKCQqV`j!`F^{$N2b#~{ z?l41nwNp@NzzAu_hYpNWWPihI2Vn)n%}Npw5P+A)I=f@srT|$LvN$>#wO&}f_KuEd z>IV4xXJ~Y#_j9O3wCD-Rh3vhNVcgcylqPzrsN#>y9Du{!MX7dEe-B%A6QtE)$;QxmH3}laSr&g5T z&0DtArw3OJRyQ;lzGS~sXfs3->2)t4z{krgGl?gxsi}#aNqqWZ$K6Wh?TN2u!Z;{2 zGmO=a=5Q)DrDafa;ViH5hRd-`xjzK7#(OOq(=nxq!gSEnWo@-bj|YoNx6tl-?+%P+ zllh!x2|8B97%+mdZV=-Q8#a7Tt9}#}MM_R?r15#=gj|RfE#bVMY`N<&EBWihZ%y^- z*%bBcy$ioiwH^;OsrUQ$NQ zZQK}`nR|QQy^|@>vdC0dx^!veV*TJZdeIvXI@B|-oKaDsip))gYK_+)LCM8yZ{Qm| za%2L1yYFdlx%?MviE&q9UNXpj89OMTQgJ<_J3-cyo~twDmc!8YPO81z?<9rwx3JGbj z1X1nVSER)~d~G;};yb@M=H$%Oxk3@^)0kT6@5f6->fCl6BPzGNeQ|4fRV!X8bnh); z^Z=oTNfLA<4|>9ac+J4T9DV`9t6!MJA$LLFtXl-(ME@9fO*$^~t>;1=%s>;frtxmArdCGQ& z{Y#IPa5VgG_%*>xPxA8AQdRlN6pKfeOZO1zZLc&kAljT>QsN3@Xm&t~c2Q^tH60x+ zQbC%jh7J(^T1IoaCcyt;Pz;uiLnj`an8UcbgM+~L+=KU|E2D}{+qe^3gv7-eX=oOw z_Cb#pj!uII4@C__b#ZaGs~oox@d$S7ZQNB1XwJGEJs(>fcJ7h3;UHRpd(OZk31f?9 za;qlSUW}x7--wVuwEGxq<7^=`N>;@f{66w4%-bW&t{aG!N&I<xr_}UB&$HvBXAkxt^+qNy=VL}rvQkaV2P&vH~eo5GO)_N>= z6NR3jCGzxNUJQ9!K&GImIA$m8h4sn?Azq7npDp3_XNXmBE#xT}0U%@m4SGJnWGweRu>5Vud$+c4e{#LBpg@S5TY))nyd!%AK6Es^QM_!AY$x(yUD!%Vw5*ri zq0B+$#!BRo(VxwWc-yas(CjA$Sa)|xq9fA#R{3k7m*`@fGs2<}xP Z+bt$pyJi&j;$Ml*ol%fVlhpg;{{u(st=|9u diff --git a/man/septic_patients.Rd b/man/septic_patients.Rd index d63b449d..f6921198 100755 --- a/man/septic_patients.Rd +++ b/man/septic_patients.Rd @@ -4,7 +4,7 @@ \name{septic_patients} \alias{septic_patients} \title{Data set with 2000 blood culture isolates of septic patients} -\format{A \code{\link{tibble}} with 2,000 observations and 49 variables: +\format{A \code{\link{data.frame}} with 2,000 observations and 49 variables: \describe{ \item{\code{date}}{date of receipt at the laboratory} \item{\code{hospital_id}}{ID of the hospital, from A to D} diff --git a/tests/testthat/test-count.R b/tests/testthat/test-count.R index 779fc4b8..ae089e3b 100644 --- a/tests/testthat/test-count.R +++ b/tests/testthat/test-count.R @@ -2,18 +2,18 @@ context("count.R") test_that("counts work", { # amox resistance in `septic_patients` - expect_equal(count_R(septic_patients$amox), 662) + expect_equal(count_R(septic_patients$amox), 683) expect_equal(count_I(septic_patients$amox), 3) - expect_equal(count_S(septic_patients$amox), 335) + expect_equal(count_S(septic_patients$amox), 486) expect_equal(count_R(septic_patients$amox) + count_I(septic_patients$amox), count_IR(septic_patients$amox)) expect_equal(count_S(septic_patients$amox) + count_I(septic_patients$amox), count_SI(septic_patients$amox)) library(dplyr) - expect_equal(septic_patients %>% count_S(amcl), 1057) - expect_equal(septic_patients %>% count_S(amcl, gent), 1396) - expect_equal(septic_patients %>% count_all(amcl, gent), 1517) + expect_equal(septic_patients %>% count_S(amcl), 1291) + expect_equal(septic_patients %>% count_S(amcl, gent), 1609) + expect_equal(septic_patients %>% count_all(amcl, gent), 1747) expect_identical(septic_patients %>% count_all(amcl, gent), septic_patients %>% count_S(amcl, gent) + septic_patients %>% count_IR(amcl, gent)) diff --git a/tests/testthat/test-eucast.R b/tests/testthat/test-eucast.R index 2978a093..cd05f7d1 100755 --- a/tests/testthat/test-eucast.R +++ b/tests/testthat/test-eucast.R @@ -8,30 +8,26 @@ test_that("EUCAST rules work", { expect_identical(colnames(septic_patients), colnames(suppressWarnings(EUCAST_rules(septic_patients)))) - a <- data.frame(mo = - c("KLEPNE", # Klebsiella pneumoniae - "PSEAER", # Pseudomonas aeruginosa - "ENTAER"), # Enterobacter aerogenes + a <- data.frame(mo = c("KLEPNE", # Klebsiella pneumoniae + "PSEAER", # Pseudomonas aeruginosa + "ENTAER"), # Enterobacter aerogenes amox = "-", # Amoxicillin stringsAsFactors = FALSE) - b <- data.frame(mo = - c("KLEPNE", # Klebsiella pneumoniae - "PSEAER", # Pseudomonas aeruginosa - "ENTAER"), # Enterobacter aerogenes - amox = "R", # Amoxicillin + b <- data.frame(mo = c("KLEPNE", # Klebsiella pneumoniae + "PSEAER", # Pseudomonas aeruginosa + "ENTAER"), # Enterobacter aerogenes + amox = "R", # Amoxicillin stringsAsFactors = FALSE) expect_identical(suppressWarnings(EUCAST_rules(a, info = FALSE)), b) expect_identical(suppressWarnings(interpretive_reading(a, info = TRUE)), b) - a <- data.frame(mo = - c("STAAUR", # Staphylococcus aureus - "STCGRA"), # Streptococcus pyognenes (Lancefield Group A) - coli = "-", # Colistin + a <- data.frame(mo = c("STAAUR", # Staphylococcus aureus + "STCGRA"), # Streptococcus pyognenes (Lancefield Group A) + coli = "-", # Colistin stringsAsFactors = FALSE) - b <- data.frame(mo = - c("STAAUR", # Staphylococcus aureus - "STCGRA"), # Streptococcus pyognenes (Lancefield Group A) - coli = "R", # Colistin + b <- data.frame(mo = c("STAAUR", # Staphylococcus aureus + "STCGRA"), # Streptococcus pyognenes (Lancefield Group A) + coli = "R", # Colistin stringsAsFactors = FALSE) expect_equal(suppressWarnings(EUCAST_rules(a, info = FALSE)), b) @@ -48,17 +44,35 @@ test_that("EUCAST rules work", { unique() %>% as.character()), "R") + # azit and clar must be equal to eryt - expect_equal(suppressWarnings( + a <- suppressWarnings( septic_patients %>% - mutate(azit = as.rsi("R"), - clar = as.rsi("R")) %>% + transmute(mo, + eryt, + azit = as.rsi("R"), + clar = as.rsi("R")) %>% EUCAST_rules(col_mo = "mo") %>% - pull(clar)), - suppressWarnings( - septic_patients %>% - EUCAST_rules(col_mo = "mo") %>% - left_join_microorganisms() %>% - pull(eryt))) + pull(clar)) + b <- suppressWarnings( + septic_patients %>% + select(mo, eryt) %>% + EUCAST_rules(col_mo = "mo") %>% + pull(eryt)) + + expect_identical(a[!is.na(b)], + b[!is.na(b)]) + + # amox is inferred by benzylpenicillin in Kingella kingae + expect_equal( + as.list(EUCAST_rules( + data.frame(mo = as.mo("Kingella kingae"), + peni = "S", + amox = "-", + stringsAsFactors = FALSE) + , info = FALSE))$amox, + "S") + + expect_message(suppressWarnings(EUCAST_rules(septic_patients, verbose = TRUE))) }) diff --git a/tests/testthat/test-portion.R b/tests/testthat/test-portion.R index a179e93f..8ad11ac5 100755 --- a/tests/testthat/test-portion.R +++ b/tests/testthat/test-portion.R @@ -2,8 +2,8 @@ context("portion.R") test_that("portions works", { # amox resistance in `septic_patients` - expect_equal(portion_R(septic_patients$amox), 0.662, tolerance = 0.0001) - expect_equal(portion_I(septic_patients$amox), 0.003, tolerance = 0.0001) + expect_equal(portion_R(septic_patients$amox), 0.5827645, tolerance = 0.0001) + expect_equal(portion_I(septic_patients$amox), 0.0025597, tolerance = 0.0001) expect_equal(1 - portion_R(septic_patients$amox) - portion_I(septic_patients$amox), portion_S(septic_patients$amox)) expect_equal(portion_R(septic_patients$amox) + portion_I(septic_patients$amox), @@ -12,17 +12,17 @@ test_that("portions works", { portion_SI(septic_patients$amox)) expect_equal(septic_patients %>% portion_S(amcl), - 0.6706853, + 0.7062363, tolerance = 0.001) expect_equal(septic_patients %>% portion_S(amcl, gent), - 0.9202373, + 0.9210074, tolerance = 0.001) # amcl+genta susceptibility around 92.1% expect_equal(suppressWarnings(rsi(septic_patients$amcl, septic_patients$gent, interpretation = "S")), - 0.9202373, + 0.9210074, tolerance = 0.000001) # percentages @@ -57,7 +57,7 @@ test_that("portions works", { septic_patients$gent))) expect_equal(suppressWarnings(n_rsi(as.character(septic_patients$amcl, septic_patients$gent))), - 1576) + 1828) # check for errors expect_error(portion_IR("test", minimum = "test")) @@ -83,16 +83,16 @@ test_that("portions works", { }) test_that("old rsi works", { - # amox resistance in `septic_patients` should be around 66.33% - expect_equal(suppressWarnings(rsi(septic_patients$amox)), 0.665, tolerance = 0.0001) - expect_equal(suppressWarnings(rsi(septic_patients$amox, interpretation = "S")), 1 - 0.665, tolerance = 0.0001) + # amox resistance in `septic_patients` should be around 58.53% + expect_equal(suppressWarnings(rsi(septic_patients$amox)), 0.5853, tolerance = 0.0001) + expect_equal(suppressWarnings(rsi(septic_patients$amox, interpretation = "S")), 1 - 0.5853, tolerance = 0.0001) # pita+genta susceptibility around 98.09% expect_equal(suppressWarnings(rsi(septic_patients$pita, septic_patients$gent, interpretation = "S", info = TRUE)), - 0.9540412, + 0.9498886, tolerance = 0.0001) # count of cases