From 5aad26035ca021adb9015a8267d2162abbb791cc Mon Sep 17 00:00:00 2001 From: "Matthijs S. Berends" Date: Sat, 12 Jan 2019 11:06:58 +0100 Subject: [PATCH] edited g.test --- DESCRIPTION | 2 +- R/ab_property.R | 0 R/abname.R | 0 R/age.R | 15 +- R/count.R | 0 R/deprecated.R | 0 R/g.test.R | 15 +- R/get_locale.R | 0 R/ggplot_rsi.R | 0 R/guess_ab_col.R | 0 R/itis.R | 2 +- R/key_antibiotics.R | 0 R/kurtosis.R | 0 R/like.R | 0 R/mo.R | 0 R/mo_property.R | 0 R/p.symbol.R | 0 R/read.4d.R | 0 R/resistance_predict.R | 0 R/rsi.R | 0 R/rsi_calc.R | 0 R/skewness.R | 0 docs/articles/AMR.html | 779 +++++++++--------- .../AMR_files/figure-html/plot 1-1.png | Bin 31762 -> 31936 bytes .../AMR_files/figure-html/plot 3-1.png | Bin 24229 -> 24259 bytes .../AMR_files/figure-html/plot 4-1.png | Bin 66607 -> 66594 bytes .../AMR_files/figure-html/plot 5-1.png | Bin 48880 -> 48866 bytes docs/articles/EUCAST.html | 2 +- docs/articles/G_test.html | 2 +- docs/articles/Predict.html | 2 +- docs/articles/benchmarks.html | 236 +++--- docs/articles/freq.html | 70 +- docs/articles/mo_property.html | 2 +- docs/index.html | 31 +- docs/news/index.html | 205 +---- docs/pkgdown.yml | 2 +- docs/reference/ITIS.html | 2 +- docs/reference/age.html | 8 +- docs/reference/age_groups.html | 10 +- docs/reference/as.mo.html | 8 +- docs/reference/as.rsi.html | 4 +- docs/reference/count.html | 14 +- docs/reference/first_isolate.html | 12 +- docs/reference/freq.html | 16 +- docs/reference/g.test.html | 2 +- docs/reference/ggplot_rsi.html | 36 +- docs/reference/like.html | 2 +- docs/reference/microorganisms.html | 2 +- docs/reference/microorganisms.old.html | 2 +- docs/reference/mo_property.html | 2 +- docs/reference/portion.html | 24 +- docs/reference/resistance_predict.html | 8 +- index.md | 5 +- man/ITIS.Rd | 2 +- man/age.Rd | 6 +- man/age_groups.Rd | 2 +- man/as.mo.Rd | 2 +- man/g.test.Rd | 2 +- man/microorganisms.Rd | 2 +- man/microorganisms.old.Rd | 2 +- man/mo_property.Rd | 2 +- tests/testthat/test-g.test.R | 6 +- 62 files changed, 703 insertions(+), 845 deletions(-) mode change 100644 => 100755 R/ab_property.R mode change 100644 => 100755 R/abname.R mode change 100644 => 100755 R/age.R mode change 100644 => 100755 R/count.R mode change 100644 => 100755 R/deprecated.R mode change 100644 => 100755 R/g.test.R mode change 100644 => 100755 R/get_locale.R mode change 100644 => 100755 R/ggplot_rsi.R mode change 100644 => 100755 R/guess_ab_col.R mode change 100644 => 100755 R/itis.R mode change 100644 => 100755 R/key_antibiotics.R mode change 100644 => 100755 R/kurtosis.R mode change 100644 => 100755 R/like.R mode change 100644 => 100755 R/mo.R mode change 100644 => 100755 R/mo_property.R mode change 100644 => 100755 R/p.symbol.R mode change 100644 => 100755 R/read.4d.R mode change 100644 => 100755 R/resistance_predict.R mode change 100644 => 100755 R/rsi.R mode change 100644 => 100755 R/rsi_calc.R mode change 100644 => 100755 R/skewness.R diff --git a/DESCRIPTION b/DESCRIPTION index c9648b26..9a86ca29 100644 --- a/DESCRIPTION +++ b/DESCRIPTION @@ -1,6 +1,6 @@ Package: AMR Version: 0.5.0.9009 -Date: 2019-01-11 +Date: 2019-01-12 Title: Antimicrobial Resistance Analysis Authors@R: c( person( diff --git a/R/ab_property.R b/R/ab_property.R old mode 100644 new mode 100755 diff --git a/R/abname.R b/R/abname.R old mode 100644 new mode 100755 diff --git a/R/age.R b/R/age.R old mode 100644 new mode 100755 index 399e7ea0..265b1c9e --- a/R/age.R +++ b/R/age.R @@ -21,11 +21,11 @@ #' Age in years of individuals #' -#' Calculates age in years based on a reference date, which is the sytem time at default. +#' Calculates age in years based on a reference date, which is the sytem date at default. #' @param x date(s), will be coerced with \code{\link{as.POSIXlt}} -#' @param reference reference date(s) (defaults to today), will be coerced with \code{\link{as.POSIXlt}} +#' @param reference reference date(s) (defaults to today), will be coerced with \code{\link{as.POSIXlt}} and cannot be lower than \code{x} #' @return Integer (no decimals) -#' @seealso \code{\link{age_groups}} to splits age into groups +#' @seealso \code{\link{age_groups}} to split age into age groups #' @importFrom dplyr if_else #' @inheritSection AMR Read more on our website! #' @export @@ -45,8 +45,8 @@ age <- function(x, reference = Sys.Date()) { years_gap <- reference$year - x$year # from https://stackoverflow.com/a/25450756/4575331 ages <- if_else(reference$mon < x$mon | (reference$mon == x$mon & reference$mday < x$mday), - as.integer(years_gap - 1), - as.integer(years_gap)) + as.integer(years_gap - 1), + as.integer(years_gap)) if (any(ages > 120)) { warning("Some ages are > 120.") } @@ -60,7 +60,7 @@ age <- function(x, reference = Sys.Date()) { #' @param split_at values to split \code{x} at, defaults to age groups 0-11, 12-24, 26-54, 55-74 and 75+. See Details. #' @details To split ages, the input can be: #' \itemize{ -#' \item{A numeric vector. A vector of \code{c(10, 20)} will split on 0-9, 10-19 and 20+. A value of only \code{50} will split on 0-49 and 50+. +#' \item{A numeric vector. A vector of e.g. \code{c(10, 20)} will split on 0-9, 10-19 and 20+. A value of only \code{50} will split on 0-49 and 50+. #' The default is to split on young children (0-11), youth (12-24), young adults (26-54), middle-aged adults (55-74) and elderly (75+).} #' \item{A character:} #' \itemize{ @@ -139,8 +139,7 @@ age_groups <- function(x, split_at = c(12, 25, 55, 75)) { for (i in 1:length(split_at)) { y[x >= split_at[i]] <- i # create labels - # when age group consists of only one age - labs[i - 1] <- paste0(unique(c(split_at[i - 1], split_at[i] - 1)), collapse = "-") + labs[i - 1] <- paste0(unique(c(split_at[i - 1], split_at[i] - 1)), collapse = "-") } # last category diff --git a/R/count.R b/R/count.R old mode 100644 new mode 100755 diff --git a/R/deprecated.R b/R/deprecated.R old mode 100644 new mode 100755 diff --git a/R/g.test.R b/R/g.test.R old mode 100644 new mode 100755 index 7a6d05c5..3d05d079 --- a/R/g.test.R +++ b/R/g.test.R @@ -44,7 +44,7 @@ #' #' It is also possible to do a \emph{G}-test of independence with more than two nominal variables. For example, Jackson et al. (2013) also had data for children under 3, so you could do an analysis of old vs. young, thigh vs. arm, and reaction vs. no reaction, all analyzed together. #' -#' Fisher's exact test (\code{\link{fisher.test}}) is more accurate than the \emph{G}-test of independence when the expected numbers are small, so it is recommend to only use the \emph{G}-test if your total sample size is greater than 1000. +#' Fisher's exact test (\code{\link{fisher.test}}) is an \strong{exact} test, where the \emph{G}-test is still only an \strong{approximation}. For any 2x2 table, Fisher's Exact test may be slower but will still run in seconds, even if the sum of your observations is multiple millions. #' #' The \emph{G}-test of independence is an alternative to the chi-square test of independence (\code{\link{chisq.test}}), and they will give approximately the same results. #' @section How the test works: @@ -155,6 +155,9 @@ g.test <- function(x, nc <- as.integer(ncol(x)) if (is.na(nr) || is.na(nc) || is.na(nr * nc)) stop("invalid nrow(x) or ncol(x)", domain = NA) + # add fisher.test suggestion + if (nr == 2 && nc == 2) + warning("`fisher.test()` is always more reliable for 2x2 tables and although must slower, often only takes seconds.") sr <- rowSums(x) sc <- colSums(x) E <- outer(sr, sc, "*")/n @@ -221,15 +224,9 @@ g.test <- function(x, } names(STATISTIC) <- "X-squared" names(PARAMETER) <- "df" - # if (any(E < 5) && is.finite(PARAMETER)) - # warning("G-statistic approximation may be incorrect") + if (any(E < 5) && is.finite(PARAMETER)) + warning("G-statistic approximation may be incorrect due to E < 5") - # suggest fisher.test when total is < 1000 (John McDonald, Handbook of Biological Statistics, 2014) - if (sum(x, na.rm = TRUE) < 1000 && is.finite(PARAMETER)) { - warning("G-statistic approximation may be incorrect, consider Fisher's Exact test") - } else if (any(E < 5) && is.finite(PARAMETER)) { - warning("G-statistic approximation may be incorrect, consider Fisher's Exact test") - } structure(list(statistic = STATISTIC, parameter = PARAMETER, p.value = PVAL, method = METHOD, data.name = DNAME, observed = x, expected = E, residuals = (x - E)/sqrt(E), diff --git a/R/get_locale.R b/R/get_locale.R old mode 100644 new mode 100755 diff --git a/R/ggplot_rsi.R b/R/ggplot_rsi.R old mode 100644 new mode 100755 diff --git a/R/guess_ab_col.R b/R/guess_ab_col.R old mode 100644 new mode 100755 diff --git a/R/itis.R b/R/itis.R old mode 100644 new mode 100755 index e4bc2477..f1e74752 --- a/R/itis.R +++ b/R/itis.R @@ -26,7 +26,7 @@ #' \if{html}{\figure{itis_logo.jpg}{options: height=60px style=margin-bottom:5px} \cr} #' This package contains the \strong{complete microbial taxonomic data} (with all nine taxonomic ranks - from kingdom to subspecies) from the publicly available Integrated Taxonomic Information System (ITIS, \url{https://www.itis.gov}). #' -#' All (sub)species from \strong{the taxonomic kingdoms Bacteria, Fungi and Protozoa are included in this package}, as well as all previously accepted names known to ITIS. Furthermore, the responsible authors and year of publication are available. This allows users to use authoritative taxonomic information for their data analysis on any microorganism, not only human pathogens. It also helps to quickly determine the Gram stain of bacteria, since all bacteria are classified into subkingdom Negibacteria or Posibacteria. +#' All ~20,000 (sub)species from \strong{the taxonomic kingdoms Bacteria, Fungi and Protozoa are included in this package}, as well as all ~2,500 previously accepted names known to ITIS. Furthermore, the responsible authors and year of publication are available. This allows users to use authoritative taxonomic information for their data analysis on any microorganism, not only human pathogens. It also helps to quickly determine the Gram stain of bacteria, since all bacteria are classified into subkingdom Negibacteria or Posibacteria. #' #' ITIS is a partnership of U.S., Canadian, and Mexican agencies and taxonomic specialists [3]. #' @inheritSection AMR Read more on our website! diff --git a/R/key_antibiotics.R b/R/key_antibiotics.R old mode 100644 new mode 100755 diff --git a/R/kurtosis.R b/R/kurtosis.R old mode 100644 new mode 100755 diff --git a/R/like.R b/R/like.R old mode 100644 new mode 100755 diff --git a/R/mo.R b/R/mo.R old mode 100644 new mode 100755 diff --git a/R/mo_property.R b/R/mo_property.R old mode 100644 new mode 100755 diff --git a/R/p.symbol.R b/R/p.symbol.R old mode 100644 new mode 100755 diff --git a/R/read.4d.R b/R/read.4d.R old mode 100644 new mode 100755 diff --git a/R/resistance_predict.R b/R/resistance_predict.R old mode 100644 new mode 100755 diff --git a/R/rsi.R b/R/rsi.R old mode 100644 new mode 100755 diff --git a/R/rsi_calc.R b/R/rsi_calc.R old mode 100644 new mode 100755 diff --git a/R/skewness.R b/R/skewness.R old mode 100644 new mode 100755 diff --git a/docs/articles/AMR.html b/docs/articles/AMR.html index d586dc73..79ab6ab5 100644 --- a/docs/articles/AMR.html +++ b/docs/articles/AMR.html @@ -178,7 +178,7 @@

How to conduct AMR analysis

Matthijs S. Berends

-

11 January 2019

+

12 January 2019

@@ -187,7 +187,7 @@ -

Note: values on this page will change with every website update since they are based on randomly created values and the page was written in RMarkdown. However, the methodology remains unchanged. This page was generated on 11 January 2019.

+

Note: values on this page will change with every website update since they are based on randomly created values and the page was written in RMarkdown. However, the methodology remains unchanged. This page was generated on 12 January 2019.

Introduction

@@ -203,21 +203,21 @@ -2019-01-11 +2019-01-12 abcd Escherichia coli S S -2019-01-11 +2019-01-12 abcd Escherichia coli S R -2019-01-11 +2019-01-12 efgh Escherichia coli R @@ -231,9 +231,9 @@ Needed R packages

As with many uses in R, we need some additional packages for AMR analysis. The most important one is dplyr, which tremendously improves the way we work with data - it allows for a very natural way of writing syntaxes in R. Another important dependency is ggplot2. This package can be used to create beautiful plots in R.

Our AMR package depends on these packages and even extends their use and functions.

-
library(dplyr)   # the data science package
-library(AMR)     # this package, to simplify and automate AMR analysis
-library(ggplot2) # for appealing plots
+
library(dplyr)   # the data science package
+library(AMR)     # this package, to simplify and automate AMR analysis
+library(ggplot2) # for appealing plots

@@ -244,51 +244,51 @@

Patients

To start with patients, we need a unique list of patients.

-
patients <- unlist(lapply(LETTERS, paste0, 1:10))
+
patients <- unlist(lapply(LETTERS, paste0, 1:10))

The LETTERS object is available in R - it’s a vector with 26 characters: A to Z. The patients object we just created is now a vector of length 260, with values (patient IDs) varying from A1 to Z10. Now we we also set the gender of our patients, by putting the ID and the gender in a table:

-
patients_table <- data.frame(patient_id = patients,
-                             gender = c(rep("M", 135),
-                                        rep("F", 125)))
+
patients_table <- data.frame(patient_id = patients,
+                             gender = c(rep("M", 135),
+                                        rep("F", 125)))

The first 135 patient IDs are now male, the other 125 are female.

Dates

Let’s pretend that our data consists of blood cultures isolates from 1 January 2010 until 1 January 2018.

-
dates <- seq(as.Date("2010-01-01"), as.Date("2018-01-01"), by = "day")
+
dates <- seq(as.Date("2010-01-01"), as.Date("2018-01-01"), by = "day")

This dates object now contains all days in our date range.

Microorganisms

For this tutorial, we will uses four different microorganisms: Escherichia coli, Staphylococcus aureus, Streptococcus pneumoniae, and Klebsiella pneumoniae:

-
bacteria <- c("Escherichia coli", "Staphylococcus aureus",
-              "Streptococcus pneumoniae", "Klebsiella pneumoniae")
+
bacteria <- c("Escherichia coli", "Staphylococcus aureus",
+              "Streptococcus pneumoniae", "Klebsiella pneumoniae")

Other variables

For completeness, we can also add the hospital where the patients was admitted and we need to define valid antibmicrobial results for our randomisation:

-
hospitals <- c("Hospital A", "Hospital B", "Hospital C", "Hospital D")
-ab_interpretations <- c("S", "I", "R")
+
hospitals <- c("Hospital A", "Hospital B", "Hospital C", "Hospital D")
+ab_interpretations <- c("S", "I", "R")

Put everything together

-

Using the sample() function, we can randomly select items from all objects we defined earlier. To let our fake data reflect reality a bit, we will also approximately define the probabilities of bacteria and the antibiotic results with the prob parameter.

-
data <- data.frame(date = sample(dates, 5000, replace = TRUE),
-                   patient_id = sample(patients, 5000, replace = TRUE),
-                   hospital = sample(hospitals, 5000, replace = TRUE, prob = c(0.30, 0.35, 0.15, 0.20)),
-                   bacteria = sample(bacteria, 5000, replace = TRUE, prob = c(0.50, 0.25, 0.15, 0.10)),
-                   amox = sample(ab_interpretations, 5000, replace = TRUE, prob = c(0.60, 0.05, 0.35)),
-                   amcl = sample(ab_interpretations, 5000, replace = TRUE, prob = c(0.75, 0.10, 0.15)),
-                   cipr = sample(ab_interpretations, 5000, replace = TRUE, prob = c(0.80, 0.00, 0.20)),
-                   gent = sample(ab_interpretations, 5000, replace = TRUE, prob = c(0.92, 0.00, 0.08))
-                   )
-

Using the left_join() function from the dplyr package, we can ‘map’ the gender to the patient ID using the patients_table object we created earlier:

- +

Using the sample() function, we can randomly select items from all objects we defined earlier. To let our fake data reflect reality a bit, we will also approximately define the probabilities of bacteria and the antibiotic results with the prob parameter.

+
data <- data.frame(date = sample(dates, 5000, replace = TRUE),
+                   patient_id = sample(patients, 5000, replace = TRUE),
+                   hospital = sample(hospitals, 5000, replace = TRUE, prob = c(0.30, 0.35, 0.15, 0.20)),
+                   bacteria = sample(bacteria, 5000, replace = TRUE, prob = c(0.50, 0.25, 0.15, 0.10)),
+                   amox = sample(ab_interpretations, 5000, replace = TRUE, prob = c(0.60, 0.05, 0.35)),
+                   amcl = sample(ab_interpretations, 5000, replace = TRUE, prob = c(0.75, 0.10, 0.15)),
+                   cipr = sample(ab_interpretations, 5000, replace = TRUE, prob = c(0.80, 0.00, 0.20)),
+                   gent = sample(ab_interpretations, 5000, replace = TRUE, prob = c(0.92, 0.00, 0.08))
+                   )
+

Using the left_join() function from the dplyr package, we can ‘map’ the gender to the patient ID using the patients_table object we created earlier:

+
data <- data %>% left_join(patients_table)

The resulting data set contains 5,000 blood culture isolates. With the head() function we can preview the first 6 values of this data set:

-
head(data)
+
head(data)
@@ -303,70 +303,70 @@ - - - + + + - + - - - + + + - - + + - - - + + + - + - - + + - - - + + + - - - - + + + + + - - + - - - - + + + + + + - - - +
date
2014-02-02P8Hospital D2013-07-18Z9Hospital C Escherichia coli SRS S S F
2013-10-26Q1Hospital B2010-02-24P1Hospital D Escherichia coliIR R SSS F
2017-06-12E5Hospital D2014-04-02A10Hospital B Streptococcus pneumoniae SRS S S M
2013-06-16K72016-05-30A7 Hospital B Escherichia coliSISRRR S M
2013-01-11M4Hospital BStaphylococcus aureus2017-11-22O6Hospital DKlebsiella pneumoniaeR I S SSMF
2016-11-18W10Hospital AStaphylococcus aureus2017-03-08L4Hospital BEscherichia coliRR S SSSFM
@@ -377,7 +377,7 @@

Cleaning the data

Use the frequency table function freq() to look specifically for unique values in any variable. For example, for the gender variable:

-
data %>% freq(gender) # this would be the same: freq(data$gender)
+
data %>% freq(gender) # this would be the same: freq(data$gender)
# Frequency table of `gender` 
 # Class:   factor (numeric)  
 # Levels:  F, M  
@@ -386,67 +386,67 @@
 # 
 #      Item    Count   Percent   Cum. Count   Cum. Percent
 # ---  -----  ------  --------  -----------  -------------
-# 1    M       2,598     52.0%        2,598          52.0%
-# 2    F       2,402     48.0%        5,000         100.0%
+# 1 M 2,632 52.6% 2,632 52.6% +# 2 F 2,368 47.4% 5,000 100.0%

So, we can draw at least two conclusions immediately. From a data scientist perspective, the data looks clean: only values M and F. From a researcher perspective: there are slightly more men. Nothing we didn’t already know.

-

The data is already quite clean, but we still need to transform some variables. The bacteria column now consists of text, and we want to add more variables based on microbial IDs later on. So, we will transform this column to valid IDs. The mutate() function of the dplyr package makes this really easy:

-
data <- data %>%
-  mutate(bacteria = as.mo(bacteria))
-

We also want to transform the antibiotics, because in real life data we don’t know if they are really clean. The as.rsi() function ensures reliability and reproducibility in these kind of variables. The mutate_at() will run the as.rsi() function on defined variables:

-
data <- data %>%
-  mutate_at(vars(amox:gent), as.rsi)
+

The data is already quite clean, but we still need to transform some variables. The bacteria column now consists of text, and we want to add more variables based on microbial IDs later on. So, we will transform this column to valid IDs. The mutate() function of the dplyr package makes this really easy:

+
data <- data %>%
+  mutate(bacteria = as.mo(bacteria))
+

We also want to transform the antibiotics, because in real life data we don’t know if they are really clean. The as.rsi() function ensures reliability and reproducibility in these kind of variables. The mutate_at() will run the as.rsi() function on defined variables:

+
data <- data %>%
+  mutate_at(vars(amox:gent), as.rsi)

Finally, we will apply EUCAST rules on our antimicrobial results. In Europe, most medical microbiological laboratories already apply these rules. Our package features their latest insights on intrinsic resistance and exceptional phenotypes. Moreover, the eucast_rules() function can also apply additional rules, like forcing ampicillin = R when amoxicillin/clavulanic acid = R.

Because the amoxicillin (column amox) and amoxicillin/clavulanic acid (column amcl) in our data were generated randomly, some rows will undoubtedly contain amox = S and amcl = R, which is technically impossible. The eucast_rules() fixes this:

-
data <- eucast_rules(data, col_mo = "bacteria")
-# 
-# Rules by the European Committee on Antimicrobial Susceptibility Testing (EUCAST)
-# 
-# EUCAST Clinical Breakpoints (v8.1, 2018)
-# Enterobacteriales (Order) (no changes)
-# Staphylococcus (no changes)
-# Enterococcus (no changes)
-# Streptococcus groups A, B, C, G (no changes)
-# Streptococcus pneumoniae (no changes)
-# Viridans group streptococci (no changes)
-# Haemophilus influenzae (no changes)
-# Moraxella catarrhalis (no changes)
-# Anaerobic Gram positives (no changes)
-# Anaerobic Gram negatives (no changes)
-# Pasteurella multocida (no changes)
-# Campylobacter jejuni and C. coli (no changes)
-# Aerococcus sanguinicola and A. urinae (no changes)
-# Kingella kingae (no changes)
-# 
-# EUCAST Expert Rules, Intrinsic Resistance and Exceptional Phenotypes (v3.1, 2016)
-# Table 1:  Intrinsic resistance in Enterobacteriaceae (333 changes)
-# Table 2:  Intrinsic resistance in non-fermentative Gram-negative bacteria (no changes)
-# Table 3:  Intrinsic resistance in other Gram-negative bacteria (no changes)
-# Table 4:  Intrinsic resistance in Gram-positive bacteria (692 changes)
-# Table 8:  Interpretive rules for B-lactam agents and Gram-positive cocci (no changes)
-# Table 9:  Interpretive rules for B-lactam agents and Gram-negative rods (no changes)
-# Table 10: Interpretive rules for B-lactam agents and other Gram-negative bacteria (no changes)
-# Table 11: Interpretive rules for macrolides, lincosamides, and streptogramins (no changes)
-# Table 12: Interpretive rules for aminoglycosides (no changes)
-# Table 13: Interpretive rules for quinolones (no changes)
-# 
-# Other rules
-# Non-EUCAST: ampicillin = R where amoxicillin/clav acid = R (no changes)
-# Non-EUCAST: piperacillin = R where piperacillin/tazobactam = R (no changes)
-# Non-EUCAST: trimethoprim = R where trimethoprim/sulfa = R (no changes)
-# Non-EUCAST: amoxicillin/clav acid = S where ampicillin = S (no changes)
-# Non-EUCAST: piperacillin/tazobactam = S where piperacillin = S (no changes)
-# Non-EUCAST: trimethoprim/sulfa = S where trimethoprim = S (no changes)
-# 
-# => EUCAST rules affected 1,830 out of 5,000 rows -> changed 1,025 test results.
+
data <- eucast_rules(data, col_mo = "bacteria")
+# 
+# Rules by the European Committee on Antimicrobial Susceptibility Testing (EUCAST)
+# 
+# EUCAST Clinical Breakpoints (v8.1, 2018)
+# Enterobacteriales (Order) (no changes)
+# Staphylococcus (no changes)
+# Enterococcus (no changes)
+# Streptococcus groups A, B, C, G (no changes)
+# Streptococcus pneumoniae (no changes)
+# Viridans group streptococci (no changes)
+# Haemophilus influenzae (no changes)
+# Moraxella catarrhalis (no changes)
+# Anaerobic Gram positives (no changes)
+# Anaerobic Gram negatives (no changes)
+# Pasteurella multocida (no changes)
+# Campylobacter jejuni and C. coli (no changes)
+# Aerococcus sanguinicola and A. urinae (no changes)
+# Kingella kingae (no changes)
+# 
+# EUCAST Expert Rules, Intrinsic Resistance and Exceptional Phenotypes (v3.1, 2016)
+# Table 1:  Intrinsic resistance in Enterobacteriaceae (307 changes)
+# Table 2:  Intrinsic resistance in non-fermentative Gram-negative bacteria (no changes)
+# Table 3:  Intrinsic resistance in other Gram-negative bacteria (no changes)
+# Table 4:  Intrinsic resistance in Gram-positive bacteria (708 changes)
+# Table 8:  Interpretive rules for B-lactam agents and Gram-positive cocci (no changes)
+# Table 9:  Interpretive rules for B-lactam agents and Gram-negative rods (no changes)
+# Table 10: Interpretive rules for B-lactam agents and other Gram-negative bacteria (no changes)
+# Table 11: Interpretive rules for macrolides, lincosamides, and streptogramins (no changes)
+# Table 12: Interpretive rules for aminoglycosides (no changes)
+# Table 13: Interpretive rules for quinolones (no changes)
+# 
+# Other rules
+# Non-EUCAST: ampicillin = R where amoxicillin/clav acid = R (no changes)
+# Non-EUCAST: piperacillin = R where piperacillin/tazobactam = R (no changes)
+# Non-EUCAST: trimethoprim = R where trimethoprim/sulfa = R (no changes)
+# Non-EUCAST: amoxicillin/clav acid = S where ampicillin = S (no changes)
+# Non-EUCAST: piperacillin/tazobactam = S where piperacillin = S (no changes)
+# Non-EUCAST: trimethoprim/sulfa = S where trimethoprim = S (no changes)
+# 
+# => EUCAST rules affected 1,871 out of 5,000 rows -> changed 1,015 test results.

Adding new variables

Now that we have the microbial ID, we can add some taxonomic properties:

-
data <- data %>% 
-  mutate(gramstain = mo_gramstain(bacteria),
-         genus = mo_genus(bacteria),
-         species = mo_species(bacteria))
+
data <- data %>% 
+  mutate(gramstain = mo_gramstain(bacteria),
+         genus = mo_genus(bacteria),
+         species = mo_species(bacteria))

First isolates

@@ -457,18 +457,18 @@

(…) When preparing a cumulative antibiogram to guide clinical decisions about empirical antimicrobial therapy of initial infections, only the first isolate of a given species per patient, per analysis period (eg, one year) should be included, irrespective of body site, antimicrobial susceptibility profile, or other phenotypical characteristics (eg, biotype). The first isolate is easily identified, and cumulative antimicrobial susceptibility test data prepared using the first isolate are generally comparable to cumulative antimicrobial susceptibility test data calculated by other methods, providing duplicate isolates are excluded.
M39-A4 Analysis and Presentation of Cumulative Antimicrobial Susceptibility Test Data, 4th Edition. CLSI, 2014. Chapter 6.4

This AMR package includes this methodology with the first_isolate() function. It adopts the episode of a year (can be changed by user) and it starts counting days after every selected isolate. This new variable can easily be added to our data:

- -

So only 59.2% is suitable for resistance analysis! We can now filter on is with the filter() function, also from the dplyr package:

- +
data <- data %>% 
+  mutate(first = first_isolate(.))
+# NOTE: Using column `bacteria` as input for `col_mo`.
+# NOTE: Using column `date` as input for `col_date`.
+# NOTE: Using column `patient_id` as input for `col_patient_id`.
+# => Found 2,951 first isolates (59.0% of total)
+

So only 59% is suitable for resistance analysis! We can now filter on is with the filter() function, also from the dplyr package:

+
data_1st <- data %>% 
+  filter(first == TRUE)

For future use, the above two syntaxes can be shortened with the filter_first_isolate() function:

- +
data_1st <- data %>% 
+  filter_first_isolate()

@@ -489,19 +489,19 @@ 1 -2010-05-23 -E7 +2010-03-01 +Y4 B_ESCHR_COL -R S -R +S +S S TRUE 2 -2010-08-03 -E7 +2010-11-02 +Y4 B_ESCHR_COL S S @@ -511,30 +511,41 @@ 3 -2011-01-20 -E7 +2011-06-12 +Y4 B_ESCHR_COL R +S R S -S -FALSE +TRUE 4 -2011-02-21 -E7 +2011-09-03 +Y4 B_ESCHR_COL S -R -R +S +S S FALSE 5 -2011-08-04 -E7 +2011-09-07 +Y4 +B_ESCHR_COL +S +S +R +S +FALSE + + +6 +2012-06-11 +Y4 B_ESCHR_COL S S @@ -542,56 +553,45 @@ S TRUE - -6 -2011-11-15 -E7 -B_ESCHR_COL -R -S -S -S -FALSE - 7 -2012-01-13 -E7 +2012-08-16 +Y4 B_ESCHR_COL S S -R -R +S +S FALSE 8 -2012-03-10 -E7 +2012-11-24 +Y4 B_ESCHR_COL S +I S -S -S +R FALSE 9 -2012-11-09 -E7 +2012-12-12 +Y4 B_ESCHR_COL S S +S R -S -TRUE +FALSE 10 -2013-04-06 -E7 +2013-02-02 +Y4 B_ESCHR_COL -S +R S S S @@ -601,21 +601,18 @@

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

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

- +
data <- data %>% 
+  mutate(keyab = key_antibiotics(.)) %>% 
+  mutate(first_weighted = first_isolate(.))
+# NOTE: Using column `bacteria` as input for `col_mo`.
+#   amox   amcl   cipr   gent 
+# "amox" "amcl" "cipr" "gent"
+# NOTE: Using column `bacteria` as input for `col_mo`.
+# NOTE: Using column `date` as input for `col_date`.
+# NOTE: Using column `patient_id` as input for `col_patient_id`.
+# NOTE: Using column `keyab` as input for `col_keyantibiotics`. Use col_keyantibiotics = FALSE to prevent this.
+# [Criterion] Inclusion based on key antibiotics, ignoring I.
+# => Found 4,431 first weighted isolates (88.6% of total)
@@ -632,118 +629,118 @@ - - + + - - + + - - + + - + - - + + + - - + - - + + - - + + - - + + + - - + - - + + - - + + - - + + - - + + + - - - + + + - - + - - + + + - - - + + - - + + - + @@ -752,16 +749,16 @@
isolate
12010-05-23E72010-03-01Y4 B_ESCHR_COLR SRSS S TRUE TRUE
22010-08-03E72010-11-02Y4 B_ESCHR_COL S S S S FALSETRUEFALSE
32011-01-20E72011-06-12Y4 B_ESCHR_COL RS R SSFALSETRUE TRUE
42011-02-21E72011-09-03Y4 B_ESCHR_COL SRRSS S FALSE TRUE
52011-08-04E72011-09-07Y4 B_ESCHR_COL S SR SSTRUEFALSE TRUE
62011-11-15E72012-06-11Y4 B_ESCHR_COLR S S SFALSESTRUE TRUE
72012-01-13E72012-08-16Y4 B_ESCHR_COL S SRRSSFALSE FALSETRUE
82012-03-10E72012-11-24Y4 B_ESCHR_COL SI SSSR FALSE TRUE
92012-11-09E72012-12-12Y4 B_ESCHR_COL S SS RSTRUETRUEFALSEFALSE
102013-04-06E72013-02-02Y4 B_ESCHR_COLSR S S S
-

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

+

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

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

- -

So we end up with 4,399 isolates for analysis.

+
data_1st <- data %>% 
+  filter_first_weighted_isolate()
+

So we end up with 4,431 isolates for analysis.

We can remove unneeded columns:

- +
data_1st <- data_1st %>% 
+  select(-c(first, keyab))

Now our data looks like:

-
head(data_1st)
+
head(data_1st)
@@ -782,12 +779,12 @@ - - - + + + - + @@ -798,14 +795,14 @@ - - - + + + - - + + @@ -814,12 +811,12 @@ - - - + + + - + @@ -830,13 +827,13 @@ - - + + - - - + + + @@ -845,30 +842,30 @@ - - - + + + - - - + + + - - - + + + - - - + + + - - - + + + @@ -886,12 +883,12 @@ Analysing the data

You might want to start by getting an idea of how the data is distributed. It’s an important start, because it also decides how you will continue your analysis. ## Dispersion of species To just get an idea how the species are distributed, create a frequency table with our freq() function. We created the genus and species column earlier based on the microbial ID. With paste(), we can concatenate them together.

The freq() function can be used like the base R language was intended:

-
freq(paste(data_1st$genus, data_1st$species))
+
freq(paste(data_1st$genus, data_1st$species))

Or can be used like the dplyr way, which is easier readable:

-
data_1st %>% freq(genus, species)
+
data_1st %>% freq(genus, species)

Frequency table of genus and species
Columns: 2
-Length: 4,399 (of which NA: 0 = 0.00%)
+Length: 4,431 (of which NA: 0 = 0.00%)
Unique: 4

Shortest: 16
Longest: 24

@@ -908,33 +905,33 @@ Longest: 24

- - - - + + + + - - - - + + + + - - - - + + + + - - - + + + @@ -943,12 +940,12 @@ Longest: 24

Resistance percentages

The functions portion_R, portion_RI, portion_I, portion_IS and portion_S can be used to determine the portion of a specific antimicrobial outcome. They can be used on their own:

- -

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

-
data_1st %>% 
-  group_by(hospital) %>% 
-  summarise(amoxicillin = portion_IR(amox))
+
data_1st %>% portion_IR(amox)
+# [1] 0.460167
+

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

+
data_1st %>% 
+  group_by(hospital) %>% 
+  summarise(amoxicillin = portion_IR(amox))
12014-02-02P8Hospital D2013-07-18Z9Hospital C B_ESCHR_COL SRS S S F
22013-10-26Q1Hospital B2010-02-24P1Hospital D B_ESCHR_COLIR R SSS F Gram negative Escherichia
32017-06-12E5Hospital D2014-04-02A10Hospital B B_STRPTC_PNE SRS S R M
42013-06-16K72016-05-30A7 Hospital B B_ESCHR_COLSISRRR S M Gram negativeTRUE
52013-01-11M462017-03-08L4 Hospital BB_STPHY_AURISB_ESCHR_COLRR S S MGram positiveStaphylococcusaureusGram negativeEscherichiacoli TRUE
72012-01-05S10Hospital D2014-06-24O7Hospital B B_STPHY_AURRIRSSS S F Gram positive
1 Escherichia coli2,13848.6%2,13848.6%2,14348.4%2,14348.4%
2 Staphylococcus aureus1,07024.3%3,20872.9%1,13025.5%3,27373.9%
3 Streptococcus pneumoniae69715.8%3,90588.8%70916.0%3,98289.9%
4 Klebsiella pneumoniae49411.2%4,39944910.1%4,431 100.0%
@@ -957,27 +954,27 @@ Longest: 24

- + - + - + - +
hospital
Hospital A0.45913820.4626060
Hospital B0.50000000.4652956
Hospital C0.46821710.4336283
Hospital D0.49533800.4677778
-

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

-
data_1st %>% 
-  group_by(hospital) %>% 
-  summarise(amoxicillin = portion_IR(amox),
-            available = n_rsi(amox))
+

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

+
data_1st %>% 
+  group_by(hospital) %>% 
+  summarise(amoxicillin = portion_IR(amox),
+            available = n_rsi(amox))
@@ -987,32 +984,32 @@ Longest: 24

- - + + - - + + - - + + - - + +
hospital
Hospital A0.459138213460.46260601297
Hospital B0.500000015500.46529561556
Hospital C0.46821716450.4336283678
Hospital D0.49533808580.4677778900

These functions can also be used to get the portion of multiple antibiotics, to calculate co-resistance very easily:

-
data_1st %>% 
-  group_by(genus) %>% 
-  summarise(amoxicillin = portion_S(amcl),
-            gentamicin = portion_S(gent),
-            "amox + gent" = portion_S(amcl, gent))
+
data_1st %>% 
+  group_by(genus) %>% 
+  summarise(amoxicillin = portion_S(amcl),
+            gentamicin = portion_S(gent),
+            "amox + gent" = portion_S(amcl, gent))
@@ -1023,94 +1020,94 @@ Longest: 24

- - - + + + - - - + + + - - - + + + - + - +
genus
Escherichia0.71936390.91113190.97427500.73121790.90947270.9752683
Klebsiella0.72267210.90283400.97773280.77505570.90645880.9866370
Staphylococcus0.73925230.90841120.98317760.74690270.92477880.9743363
Streptococcus0.75322810.7602257 0.00000000.75322810.7602257

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

-
data_1st %>% 
-  group_by(genus) %>% 
-  summarise("1. Amoxicillin" = portion_S(amcl),
-            "2. Gentamicin" = portion_S(gent),
-            "3. Amox + gent" = portion_S(amcl, gent)) %>% 
-  tidyr::gather("Antibiotic", "S", -genus) %>%
-  ggplot(aes(x = genus,
-             y = S,
-             fill = Antibiotic)) +
-  geom_col(position = "dodge2")
+
data_1st %>% 
+  group_by(genus) %>% 
+  summarise("1. Amoxicillin" = portion_S(amcl),
+            "2. Gentamicin" = portion_S(gent),
+            "3. Amox + gent" = portion_S(amcl, gent)) %>% 
+  tidyr::gather("Antibiotic", "S", -genus) %>%
+  ggplot(aes(x = genus,
+             y = S,
+             fill = Antibiotic)) +
+  geom_col(position = "dodge2")

Plots

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

-
ggplot(data = a_data_set,
-       mapping = aes(x = year,
-                     y = value)) +
-  geom_col() +
-  labs(title = "A title",
-       subtitle = "A subtitle",
-       x = "My X axis",
-       y = "My Y axis")
-
-ggplot(a_data_set,
-       aes(year, value) +
-  geom_bar()
+
ggplot(data = a_data_set,
+       mapping = aes(x = year,
+                     y = value)) +
+  geom_col() +
+  labs(title = "A title",
+       subtitle = "A subtitle",
+       x = "My X axis",
+       y = "My Y axis")
+
+ggplot(a_data_set,
+       aes(year, value) +
+  geom_bar()

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

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

Omit the translate_ab = FALSE to have the antibiotic codes (amox, amcl, cipr, gent) translated to official WHO names (amoxicillin, amoxicillin and betalactamase inhibitor, ciprofloxacin, gentamicin).

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

- +
# group the data on `genus`
+ggplot(data_1st %>% group_by(genus)) + 
+  # create bars with genus on x axis
+  # it looks for variables with class `rsi`,
+  # of which we have 4 (earlier created with `as.rsi`)
+  geom_rsi(x = "genus") + 
+  # split plots on antibiotic
+  facet_rsi(facet = "Antibiotic") +
+  # make R red, I yellow and S green
+  scale_rsi_colours() +
+  # show percentages on y axis
+  scale_y_percent(breaks = 0:4 * 25) +
+  # turn 90 degrees, make it bars instead of columns
+  coord_flip() +
+  # add labels
+  labs(title = "Resistance per genus and antibiotic", 
+       subtitle = "(this is fake data)") +
+  # and print genus in italic to follow our convention
+  # (is now y axis because we turned the plot)
+  theme(axis.text.y = element_text(face = "italic"))

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

- +
data_1st %>% 
+  group_by(genus) %>%
+  ggplot_rsi(x = "genus",
+             facet = "Antibiotic",
+             breaks = 0:4 * 25,
+             datalabels = FALSE) +
+  coord_flip()

@@ -1138,26 +1135,26 @@ Longest: 24

We can transform the data and apply the test in only a couple of lines:

-
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) %>%                # group on the hospitals
-  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()
-  fisher.test()                            # do Fisher's Exact Test
-# 
-#   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
+
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) %>%                # group on the hospitals
+  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()
+  fisher.test()                            # do Fisher's Exact Test
+# 
+#   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

As can be seen, the p value is 0.03, which means that the fosfomycin resistances found in hospital A and D are really different.

diff --git a/docs/articles/AMR_files/figure-html/plot 1-1.png b/docs/articles/AMR_files/figure-html/plot 1-1.png index c9ff2753867a26b3ab53e476e8a256eb71db1348..b7934e121439e12a33dcf958661cd669f5fc68d5 100644 GIT binary patch literal 31936 zcmeFa2UL{lwk?Wn+hBqc1zH8P6eJ35KtNIpA_7W~EJ;xeC_#`U$<|T?6qINnD2N~+ zQ9-gIhy+1Ul4K+)IYa}|%ai=S#II|_oPl98 zgYy1;+D@VU&CaemMX%)+GO6;LkNZ8mobXekV(jOmA){<-wm&;sb>*^QbKDs=O`#V@ zpXzfwzp}Z=So7q_lAj;>XpBGI_@Lv;hO<9w{vNz}^Fx~O(eb8eYvFKTqHE6ckbGyz_e`HvIl!C;|5cH?^0D)PcqD~VrqY2o!5|QciNtXQP4n` z{oLp0XPKySavo#d?`vc@1%*d4eoGcLc>OQE-+$skMPFnwYM89ucIfVo6K?|rv`Sk~ z_SHTM*miiPGeBMU+0mLfo%o6{smZS&`F8EHtBfP}C#JjmCp@l0`2+DJ`NP4Yrn0V6 z!=a&}6nVTaHH~~N&JTICx=l7)Hl{y2BZl`p+!p`UFLvF!b*^(G#g5JPb=OyKENvCU z02JO>BPl7#7vVZ;S1B`DzN_-)Cbd&cwg4Yt#xU5dFuX&dl< zjW;#Dm!r(ff@8ujSyYD0xJ>jL;O!iu%+%0J-=4m(s1X#DZo9lR%W;TXUjL=d@oPUG z*63Et)hH!DZkbEt2VKK=omQLPxGntjSKOV~Xrghp+TGu%DPImu$J0l~=oYiYME%=a z8x@#tZ4eXG4Chzo-0tzBqc*`{m;JX-)m=+}Srx07)Y9Vnz)eW(`(ni6i*t1%dESiv zhg4KlE?v50@As2n>k>xJ+f%oLgLTK(`}-wbxNNIZad|5rA0NAq`N@-k{MH{H?qh22 zOUh5wz?GjFPWGo&28-nPM*3huW>0R7Ir<4VmgUKy!_V$BePv7L^aj4n=*N$zHZb!0 zZOCOT=JqN6V$S)#tSnxGJ~!7@E7&*>-`{PJcIy4aK%;6x#Z>nLYk8)_5B5C6M=;Bb ze@Hn|94sQr&tIQvu4;ZO!YxWIZ135#XQ{NIyjiQBiZHCIX@;~j6Bzc5m~$u!IL%iCKEXW1kbU2L#)rbg~y$G=>!c0};fPF^{=Rvte3H5pC6 zFmwfm`o&_#chZJmGj0mx_gI{tRA6G<eVOWG%BGZ`6ojZ44`u^?v@EaDsiRRcp_m2--tNRt1 z^b21OIPSFlk4B!6bZdWgVRqG=PojSxb9mou6=eAIdq(*|e~pWg_8(3_|Mmu>btf4f3NwmKE84R> zVm;qGV@sxvVROmfr4dY|_Jd9*CLt&0l?<0Ryjt;}&42&)-isDRHw8RI;u7qcbn7^Y;Dw-->_M;Qq{`}LpN!1HDm%Qnfpw@92oA{Il}qd1LC5oxgWtYxccgN`8BDRoOS`LY%VZt2KVb^LHZ;zFIOHe)s@p z;Qy%g&DVw<{V#`F|8T|pGZ^i^;f*F1_AJ3am#nrUmD}8k)gQ_1g~!$Qy+|dx!50yEs^Z^srT{;Afq>)ER`iC z%c;B1R`W=aui4hcg-Kkr8GA-%FdgtuF`_QPAZ_x?&zRykz4xmnM#sjKZvJ{FAi!?4 zgwNEuD`@q`Jxw{zV_W^CQ;)sAa%Zd3LYJtAvU0<~n3&d+Lk;HB{S9dmZW9eFMRSs4 zPk#SaL#3Td%AE+*QWMb3M2-!*z=do79u%MHVk3O?`5C-o;PZ>@k+&N+?m7Rf{FzU& zRogR~s#DF&y2?U4rrJHtpC4`vO3Gij)KTcA#O>TE*%PXzJr z9TP69?R|fvjj&0M1kL8#(-?M-$j-}4nR{DuU6_uy7hGfe_AEKsrt{sMr%#_=Wn>Y_ z8{e98<&DWkypeKNY;p~GG8!ezzE3wY=UiPPAo9WU<(lrIx#LH4b!#8)yLw;joUZoW zkdO@b`I++aazN5^fO+w{&n!O0Y66eWjDP+3R4XPopA6oy*4WG?#eWA3V+!90cyijl zI~xBm4H<6Li+%j~@!U*ZzU=(?$B)(3 z4*m5b)vBV0LnTJ;oer1mzI#F?KR){5!#0#P0&d=cf$LlxlBG&y#PQ*RnzpU{dP=sc zgOazK^z^*qCJ#*S7+CGdGO zIC#6EeCASLK=Jnxa{0&KTrcKwG@4d##-5|di_I(k^lBk`;f9C@~Rw%w@h?7GYMn;kLgVB1dC zBKIn?1L`L&tX|!5`ci_us_VMTx1gY)&eTJO_95+b<DiG73S`ew| z6YkXEl|MgV&0A{fGVp>TU+l{@Y14}fy~@+ETk897u(V45Ds2so->{z)e8$jYAgU3;FV#dqfz2pC^@SJ9nd+8cwn|io3aCu?v;pypVg3$NcTfDix8uen6 zVCHZ5n1`t~O)?T@DfRYs#^M)yKdj$%s{G!r7{pE?y~OhO?=3$(d@WXIq?OaXR$cl| zaByw5;}EM%&g@_|mA2Ja!pt%0Iv{o9bWg-$hmWW)x6BOc59|8m<7#SZ`}XZSaNup* z>#Kcr>i3OP@M)V%YML%@rG5AT+)+54E%E0?kTZxna0}(5`|D*Kh^ddI->+R#tf|DM zb07@SZNQqbYHI2p%g>*l9DYFR>b|-pZ1f;IQb_z>6JNDNiK+eJRpzYr>l;fG zcVSG7gIPB2Nsx}|t&Ua=5iu5&-bo(!Z7jki{=g6z@DI5Si*{O7U#{|-=_uMN-me-sq?k271OM!U^ZU0ogL!c?W3Vbu(zz-DVtJDIPU z=-Zj6n&_*+B`%2YB#Q(v^=H@yp4Ln<$&JjXO{6qgNS-q%tkxh^o2r)~?tkJsoK#9!q`1{$6C?A!&re^w*zKl4%2+eYT5&9yvtFsezVcdto zBoR9T%eB8(ib$Svs#oW8-dR3;%s-^kUGj~B?IGJ;IiVBtJbp!Hh<>Z7ojpC)EjiAc zB4lW{Id@5Gw{mEoI_2N=`whyEt#If6d-`83n7zKTEM+lk;`6!5*XywdSz~5f3cMYT z7{oodo8Tqe0Iw;aEmw@-Qx6Xf3DNTktBjEISeTmzjb+R`VUTIDz|^pjpv%ki^6u^n zoh1Q23wHwo#*#ed<5_3r+G%UmB-&{x^L5Q4g5taVZs$_Ta;z6E2Yj2K`A(%RS^5i) ziiuPEwK&a^#3XvK*>`QxjxczVg z^I$Jzdmmo4s7q`{tOLs?JKY(8pdFnQ9l7;p@s|KTb=faBcM6Qvi9iA|Rl3WBP#0 z0}r5Gx0!Lt$tF7_l}s>KIXO9)6HM9UXql+oNa5N^Tf)qL@GI0gPR=sGkmE z)Uhmhdvms9{^G(cpIWE{QXDhaUK(X##LvSBD7>}N6{Mh7k5!h#z+SMiz@4(gua?pY zF9LS)kOCm@($>8FGNLMy*@-)LVQSAAtJo;z(EsVF*5XvL9J11GnhkR5I*(1O#b{(b zZZ0_-E-g6{@4mP&@3UfUqYZ7yC8QL|>^ERs0j($F1C5h+PxyXq&YpaJ_Tw+ioWIID z&3~_(v^|Clp52$2jpuh9doPYOH&p4dFy_yzT7jHRDJb+>%OR|d# zK}01~4TD%pnqe}-Q(yc%DVHV(-AZ^v)``k>-d0G=o%l>Cm>tT`KT+%}(-$hZg+zmc zr${XXK(D|gw>VviHL0&1?(grfF9Z%D=Fq*=>~0QI*9%`)OBg;sqbYDA`|FbjDvm9v zHum4R9TcQ7gFu#S5^o1SXtQL2*W-*^aSs>3;XJmKys{(;xA;Jc!P9q(G z>+&_~grQpClNsVPs@C$$VZo@*6?l~IC|*~SxiHh`*pP#@tRtR|0?sz13lIet!derG zvUG58U}^`*t?#OO!y+e5OSbJQ#r9arEb&l2sY=op%?!!z^kAGAz)3U36teh<@I?trc`?=ZY z)Y>i-3%K7coP@s?@!K}R=v8FqC9_Yc^VL$8L$2>iN}irEjJrc$&}Z4Uw>k}G_H<;E z0gAle<(hGhccwSW&%q$P{--F+73#|baRe=O2j_9D8fNNqga!P^#-)>c={vJz=k4SN zr%xhsIriX=oO{B&iuGe9e}t~54_*>Pd6+Tx{Lh zi>_2@?8|7aAdJtc@!qQTe5nilYG(EL;AW^pUJ4^luBiVM?I(UWTj>X$`T6)GY_wHa zDL|vBhFa4qo^JV(0mhMf&f(dqG!!IqGBR!<_CUa|{#d#;!Y6%e^Ty1~%&w$4#FM${ zN)M6n3+J1&zN3aS&Ubf1d@bTIH9F9UoJ6DOCg|^Q8g45LUcVeQ5BT#?acdK%_DCO* z&uMG6ZOEJI@Zk+_BBKj(fJ@GiL6cAt3r9N)cNm89?b{|Wyk~- zB$`)96|r!6%#D0}ayVWmzBc?;G8h#6r4Qk;;Mz)T@15qQfgPU6`nBTPlD!0lsSlu(NCTrxQ~C*Qg`d{;%jjodmkC{ zsK0?}*REZy_zPCqc#PcqS&ShneP7v`UJU9nlr$O54u;N&zHa4&F}}?6DZ{#zmE}xe zdmMnkx43wfb-^jG+OfWc+{U3*L`XSWIa{!cp0A25B5LBz^;&O-9U7G7h1vVSUPZ{d zm7d9C+rhruQT`@<7|yY{UBkXj(~ zqy}Gp0n|DOtRE-~{Jy2_hns`Tmnf#e=@j>+iAPi(@`_q7aLY=$s^+b5M4+pB)t|0}j zM%u-}rfKB&y#CZOk?j6dmHs^`u2I%KDG*y50nxF4lk8vtXTU1i>TrXkf_ z!IOFWNJ23nQS&py3=Y&5_@iY@&NR04Zuhw<5#y{w_je0uKEkbI-b>2LvT+mOaMxb* z!$^cm+Eqw=xe4y{lH-?q;8ai!0#apyX%#2Tu+AL@r=q-uy&k>s+@u z2uv@F`PoT1p!Qbe-~AG)Kqe2YvYsjjY*Ux{{%J7ySZ8Oakwb$yG9VtiA#?Yk4GRF&x+z(8|xk^cG0JyO){KDQ4JbqUHpnvkZ0dlTg>g!4^-FEJT-)Z zVY^}astvo(U`c?jrqU48Z*7v3<>l=P(lZed7H%q=4SjxN+4v<1??yT|e<({Yqeir2hiv{$THVd6ScWSssDD7LBx`SLfK1{N16vXt0l z+!2)q`Ad6rFnj1a<(JhPv?Js9D|ejH^z=iDKskftBI`KVguVI_(cRprfR1bNyow_Q z0RA2`Ut{3T5R|>1JMLpT7ujovy=b0WaB35U?DX56rz*qeQTov+%u@Zy^&W62xGqfh zP-&6PJ5*v(Y*qCXX8ApT{v7KhgkRVS>m9T>umNu=y*%bmF?b7XzYFOYBglR6!#)(QemQ zMZJSdW^$s@8vd6O+(L+vZ3(`@$wZBMBMc9Lbhwez`_A~^xuhpIcjBP z1q7fXdgn%w8K9_1{k)bSTMeF(Qh<=98tAuv*OT5e1wbZt_;I>*>jJ4$FE3dtix`L} zakH-EZF!Il1hz0g%d&pwW0DefE*zw*Y!v0KO1`e0ca-unj&@83g6SL_U7bJzzC07^ z*TI+w_pC{U4SO%1IePSSl%MP+L|FJ6u2b-{>_)5XfomKlWVv=k^LP~?&UN?nkiCwW zi|Y~yJcLqq*-G}nDm&C@+?XfC-mab=Ps$#vCZsD4TxTR3_u7Pn1hCtCMk0fOqN<{lAPxkNJXAr}1Ut?p{}P|E5nB$*FDypo;WF6> zR9?0}qQWy^@^$R&$eh!J))f(gw}pUk+HYV)RGb^WnTHssqrf0{fM+Anu^oOTJXapd z01y_3weNz*MqSkes}4eLOl(b(`}cUTCsJ^n_(~1d8&{IZab?-c3c1BO0Lf9>JYYOD+=KqkxnH@E2Yj^#_Zf6+1K)^ zH8p>|1k+QNjxf8+*XWQu$5qDJ4q?EggO@~_9~XLgFQ#1VG7i5Gat$@tzvE3vdSbm3 z<6Mhy>xQIG6fbc0$g;EJUjy#lo6cQLtY2i^g?PU8! zuw-h#t-zcKa7}8W$Qb!jYorA#4FydQ|Ip_beYE9kS+h^|tC^UzVC@qCk6eaOP1IkQ zh)@j@tPLzQ(Y@}0xV2j07G9vrXUNB0**hJMvz$6ed%0IWm9EdV^6DwY`fk*D-YWs0 z*q>A{8?!|E`G(Ok?3i2PE&Oi$+HOJ#GfYIdvw_%>ZqC| z)BMm7-Avo~u7sdxS%WQk?cXL2KodK*VgEg46YlQcFWzhK(!TZaA$G!F)UuzqOeCvc zF)4obXH}s%!KR$+V&i!jD0B}b@@p1j-snnyHZ-uAj@=iSazPLeuh zJap&jBZ7xBjs_PH+e^*lvY@FEo$ODaK3!>N(fz_;G2hy{{*j7~aNAvp3ua7@5LQXq z=XG%_3;`)ZJ)1xcc65=n#O2tO0^pIq@I48z#&o)}=CN`Bvgi5MyxhVSJ}98K(LSIa z-uap6rC5{EWh7Z*G&9dEE9MTx-ea#bb~OGWnBqJHr zXyAoDJNuPK{rY-ts0t0Dr=1S^DqCF-`Ir~c2?W637W-tekm$SLX0OCimneZPR#B%HcT|g%kc`ScFlrkM%z?Lfg@<*#O68FIIKqJyCYnNgA`Q@z~ zHvMV{C_a-0Z1i9;k?Z}eO+U}onF*kdIhy7D194H>2h{BPPsI*yKl+@BnqZWfD&J$# zklF=MD+m6KHR+Pu-#mxwElD&4>Z7Ar5H};Eg+7{uJE8|dSXnhRZbw9z-dcK4Sy>XM z)3^%^{d$7zHZXh$&WR`UCnhHkgKSt$x28rL@&?Om?{1SAc>Zw#usaXo?R2>FDa|uS z^!16h0_qWQ{XioII2RxpXgj~{%1ZB$e7ulK1DqI~7a$?KiZ79a|hhRYx;ChDhj zfH<=P!=d^99^Rp8=o1WM@SFh{vfI;xnyz^T-Z_U}Eh8 zA)vz44kAGg0)k4$QP7K1))GhD|EF$B0h2K=zVL&psvue%HI)%;NXjHUD)=VUIZg;oVEpcPmi#%cR7C8 z$JlK1X0>_UJxJstWuUi+609OgPpAPp=a(sw2Zk$%BHxx+GKHTkCO4ZHpw7(Gepljr;riNqkql#>i>&3V_D+`K>dUK$N7i z(82)itPxD9G*m9h$TmS@XK;zj9fF)T2y~+$2i>rkNKJv@zT4tcFMu*p0lei_rDC&1 zP8QWd+b7Z&yvl->@9<`ZMZIfFeJS#w+dUz?faKiy4eyKv<|TvaKAGM6!n)O6-4hBO z!|?nBPur9Uq%h#$IPY+R5LDvpw?&Z)iQOh_H`LhiQcLcu@$7h)mm2vW)bT3oQ+E9!?m+6@&esamVQC$4k5Anq=?m|fJw6$=Ro zU5xetA(04nNYoHE3EU$#7)Gw{&dyMW&u0w`3@{8_aMy#UyjXwS6Hoz2PKmhD<=p2K zSY$q-RtC;W^G|wwS5-83H#p$7SAXa@dRHfAcHf8YsB0gvp@8o9w78Ak2q2CR{$4D% zZ~+A|b{-@(X_P0xKr)zp_+UO?m4(SBG$`nMK*U_Jr2K~L-bAmBXAU*z-T>1ciRC;}5H0pWwc1k46AG=)%G^`hVuuy(Fd z2-D#0Fa_X)-8u$Q@g6)#C>T}r2!8VeR;NH;TRY)Cr_Dk4DTuu*-sHh4KZRwX4II|d zmFqIeOoi0(IFd{4-cDW`wuv~DPzOi*ZP3V|=$X!SaPXGuB@wYmk7$9YKQQ0}t@(=> zHmyjtA0*P>lQu3xx#FUtqMFn@RWu3;CzEkWSYGmn3s$1+xrCw%^7+vWE4S`@rz^0l zLSp!Zg*nA6v=Q|CK0W;iY~23F6XgVI7(%upl0q*Zg41ba?0R$muURNieMGW)-);3f z4_^vmmjnuTV9vOk+ge@z5TnTuDJ6CvINn`YvgkYrQ#RSlT)y|1k1_{=ekj8r90OsX$x@9(izQ^1bf(hip;aA6+dtNAz zn7=TC>WvH1F|JxsQ9+m*vZT*cMIshugSBSlx~S2SgX95h(KwiR5kV61c?8V{YqK*% zj9v~ugMAM8s@3VsE##}<3qGYUU;S<65{er<&NPGo1F(C^!(b#3D(!0x*an7iqpPT# z4)w>`EMDN@F|hoiqC?nstsvB~$`M)v^mkvV(b3y(ob}wP3uQa0KUcB~JE3NU8;A8l z5Md*|q5x;%8}|sKbZ3A361p&HBtbwX z%eHeRJuun;gOg$&dmFtlLa zcZ}*^neb;EIzyZX05araNWiO5p+~-l-hJ2KzZ&i@)~*y|fxVZ2IeI!fQSX_7)&Y2> z(lGrk4vm)L%@?)y?R$;op`8i1K(au|3?lO}2Xty-tlq00N$7K}N#TBuXQ!301(5uwh_3Bhl`^ zQzW*-4iDG9XBqNLJ)w4LUM({d15##%H!z)P`<+MTrK&%YFQ9&tiB}b50xM;+od|bg za_MVybIs7d!)fJZb9Yz5UGTEQTgaOOF>nrZ@V>HAH0pSL)XJvfA9-Lu8F;X93$=#U z=(}k`eupzc71KNUFhYS@@+5!{loL&_%Ugwn;(P7D$AI91TWloFlfn#s(|95i^*<{w zHbu+T6a?@2p~ZzE)CMnqp@k9(RxAFbo-74{nLID|f^dU<8jGIl{^kqx~s7 zTJ?u7;T{ix9>=l+WH#9G-uD}+rt;gr4MtD^~$LByl zAS;@srSXVb{`7lmEENZ=RbmeWb#QoH@OnVHSRX^L0ePS5TNHV($u#XmWJ4q(m=`;)0aAQJUI2j$qFB#9 zriJmxm~SST2y7=|e#I?5ooP&5SHmf3+X=z^NVqJyKFN}(l_ffEYz5shi;*IU8t@;@ zWhjHHU6s;lz!KO~Wo2bju-gzzxp#QSQeQ{V3UdGZ`6z;VKrx8*Hh|>kOOgz9#*26QnJqXft z6$jWJ0BFOW^G$6Kl|@7b~OX%vnuOPq7JycfoH_Mb~LuvJrrzy2#HrACRt@s zq%9JT6rIRqOf69%8k*TXES}sffGk1eWg!z*pCUX$D=bW`Vkk=R+^s`0MIxg4``bk} zf>^LG4HSqjbF6zD%Ar4y(1yM9FLOiY{7IVYM1p}?+~hLJrLTBza`ocg<+Kkwe%`+? zdg~VN8`jr z;JheN86d9y(+=t%CkuMU^lZZf>dL3zhjzN0N-XIgS6=V1S)j!6Tfa12g!L9c{*;u= zOmJBu)Oti2egf^ZGx)$EyU*)s?74e!>p~pM-{ns)ipHc*86`C%5ru z&i>t2nxtmVft-Q})dL)51cn620%*q;B?_tU(W@v>;{QYYMX3XLl;b{s$?>T+5B-@-@8F_* zG@?7bVU~ia{Tcfg@PoFcaO@XPfM4LfDBMelC&w>G{2fc{F&Ij6Jjok=l1Jpd6vHH$fPn(vX?`S@66eU<>KQJ+Cuy znFnAXq&=ehOyOGf&|SC2j%d0ali1 zt^2P#PrgHY?M8W!G5B%w!y~oc(tmjY_FZKcG19k5McGWcI)DK&B+XdpWc3raru^;> zP{ui^)<+M|0nRXUN+cr>;K3ZtB2Jz<)dHHHN`u@eLHiAb3^ZQibu0R2aUqkgz1hZL z1a;!H&!T4tmB}YeIv9S-$w2z_Is%MNqJj6ZA@YQ!S~MwdqMD+czPh*+FEoz3xmZmiOif|L^RfQZ|`F~Hdpm;<}OMwYLo=U3&D2dTF0kYQN(m=7}f_< zYsq{jqAZn0{_*NnEG9WJc6NrRDni%Gzr>V{Z5OQacM@~_1BY|&1DA4&n@MOelN1cY+&2Ar@U&qQ3gc@vOSuRmM;{Sp+ko&~}xb+m|S9lc3T zfcSlySPgOOt*GNrU%iAE23{Or#Py7qEAL5M=m6^=&qV0B*LtRa4_EH&XL^K1n<>Ya zIE#5dtgKv8cef7y4x}U0rlT)1=&kW!^m;6%K_e3&1bdknDz_Vst%Rs_*7BztGRLew z-BIG6hN0E^+yqEFBs63PKI;=8hei(*W}i}!F2X0^^ty~7DO%o;&5u;z1DpuAUQBc} zQ9P$j_M(Clg@I=vTa|ZYE)c+e2+msPM#MC99nE4?wi~@n)?QGpbP-cBDJdzT(p)PI zODZbD>E=V?Pa(!&aOQHx3$V`-F3I(lv*8Am=(NfOQIDCt7z&Ga~|!)-yBhpc^#KpF@opm znipgD(E-^6!bh>+1k59dkv_(eS$b28`532y(MuvsFA&hU^kcS`U5Hk<* z9J{doFf`mAm$Rs&s5H2IVqcbV;(_7K$78H8*#bWpQVg5C6Y@=ZM%khtP@pH}I?JZ; zqeh3aYv-`LX23;a&n&ZF=6)|`Kmx=mT0?7DF9@CfSa*9NlH{Y@jLcH4$MBW zHFcDTcKtbek;uBF@MdbixvS#tPIHwGUq7(JQ?ygo4n9s_L=~C^^kin z<)Trv8s@e~!VW^E0hO@ld_N&YG7oSr3GG<1$TkKX-2?ai^YRF+Mt-df|u8*>~zxH|#LCC%FSiM!de!ir@7tkO4`P3QVVw9(DO7VDe_YY870n$cYR!2`#|r z>5*t6D`O*)9t?xDZeT70%sG$?Z+I4~JXo`Z9Y8!ni7&T|JPbx{MXEL|Ut(m3%~Yl3 zmSqFHUPSu^iU2g)B_orICTqnj zP>dSXxQRp%aX!8tc$~^-kKI4QM_+54PjO>NwYbcV-@h*f|^W8^U|6tNW< zebG3I=BO}6=`}hsDmv$k4H)Nin0+lU=>w;? z7EJ93-b8lAx&<&xY|4aIY6n;enP?WFSY##(4{#(}CCJQv2n-8ox$`Jv!N+0YeMk7= zv#M5>W)!bOyXiClbts|`xk)@KnoHc!dFTo%ocPjwUS!db^3ZYDiO*JD6_<7OS9+N> zii-;Z+*l5-=4w0=DBVG7!Itc!=@wW;Fz;71rq&#n%E-!kwg>W8dfO}ZOkyOoNz@mf zz#8Xhsl4Ltl35HGgu7BhBMVp}nGBM#S5Y6w#PmFP3Be5#=f(DwP2YS4>+2y9?!TF; zKu04C4$Dc3h7)E257T2A3UYfYt*7k36}n8}upHjQ?0f%80^OxFx@Zz7J#|Hb;aDck3Gj_o# zbMqQVuvoGzAZ)NG?*y)!c6~*6btK0hR8iSW_bU(Oqz)eZy4EJp7waBVywkv5?Owu* z=S1^M$WC6`kmVoyD;sy;JDzL=V8RcOgu?SxkGhO6qoCrps5FVfD0voJ^~#9s6m-QqxNL35dKa~bf zI1{cf^rIp8%%j|EetF?bK@T|*0zeqa?(SVjWO`D&0Ug$XSwI~x?U>4|8r=VGJ1)uK zaD8;6&B@cJS-7Powr(Z#9#LNrLvwMYKNQ13 zNXk?i0Y@-0kg$Q{scfJK@;))jak{|N4yZ1H*fh2s+>4;p`7ij)%hlTM#cgn#eg?by zVE0+u_hNN8lS+!Ffe?>Oo`(R2X0Ju`glWCYAxs8dhv^O!2rEcxHmTe{ZSvt2^|@0?;&fl4LH-7ZL5yZ2NX0 zp>tp`(4lFC!q&?6juTDg$dPKIq=A-zzymrp7l0Q1lpSbGX?$@`Z`fcv;Yz7An`2 z>EetYw%1xwQntenucEGQ4Oc@Xub9|(KvI3kuwZ6QpeGQ|InM(!-u;|d5rlh4Jz0W+ zW6ZdafH8_Z0J%@4`+t?1$&E*nbg0^r#KgwE&bg}J zpN(7az@7NvEuW_qxqXUQGfsgyCWHZB63!ahAt)W#yxbzAS@0b*jY(i=Nip`>=rT^M ze`dv%5|FN^K*6Bw42Awg8aHQ}9pM1OsU-+8%S=_2mCs@$zMg=`0xw#3VS1f*%4GPn zt=i*U=6$jCE+w^VO3jo=HaBunG((P#n)`(lMBp4WkbEF;*Ge1cv(^es;Bl1N)AI2b zVDkjy>E-LYf_WBXvpokVrjBtXPrueE&LVUxhsC={WA*dg-nu{>;+ z3PNz~xgaJSY(gCI`A=pw2OSW?1f;f_(Q zokO7oz)l)ZaKD)}{WGVg%MO zY_EU-Erfim%)OJxh487rOX|53p9^9&_Wle~hZ~XuO2l}rmWfhE0G`4Z4& zOJWC39@z`gj`#<_?<5&z+M;vxY)xDZ%qPb`oWLb-+_vSip-~{e+Cbc9lYLKMUXnSX zE=>vX2Wf(lJ^M8I@JvmFWBh@Ee+!*@{ns`w{omuR{+CY{{r?G!i`TB@irtK4QI@r` zO84mzMG-|qrPyAn(pt@wN&jbC1B-mUi_9|RoF1qYAb@*DD#a*e$}DPh$}Eba z34AhdzQ%Q?(NJ%Vtd--qiyq=+f25+x8bN9P(Z~i~A!+TKTlCr$pO5)Sv-{K#G;up1 zAPsD6SPst5L7}1Hz{mf3MZfD$zSY=&YyFDLvN+cKRg#?NdK5XtZ>Ut%qMGij!7e2@ z`K`@KdeBmExeJQ}*Dvddo$kLx7y7^8{J#;L^R;0b|BL5QN3f51&I?H;4-yKb0vuX~ zM_wF4N6$e_qC(ykqllTUR;0()ANNEnQ z0o~217T9X24K|!O@b28X0E{gIUkjuGcR0<6vyfymc#V-O1*ZRclY3z6K;kz9xjn--F|*Q-L-u1Nw?MLBuT46#~H66P|T?MJ+DaTUCyM&!WtRcny{K zeYn_sib`z;*t~KXvwcyABw|DUn4@IVP8dJPc;*tI&L*oL7Dqs=jdWl-+JVzT&ge-mDP?uPU_NBO?7t*CCoJb@C<(r{~p|`bL%;`sfq7r43^Z^l%BB0I))Nz)VGtZsxyz z8EPJA1Lr|ms>@EF#Hm?KRGef7ECQe188|Ls&4%l()8QaSp^Kq z!5=vB53rxK>Otn62mc1y99t?2+$gJK2u~=Q_5sEqRyX)M`$#lI5P!IHOTc-Z!Oc;y z`0skh&vwMjDGj<1CMDS3^x=3H^UkbO?>Ah%d1R!Mc_-X<#x~^=rE*tq7F6iDC$%wA zag-`g#pDvF*kdJsXYo%qv&D-?MRQ zpT|G!)w6k3p_iD{M#hwX#s3EA$|O2T1CrN{#nlO8wv9w2G} z1m+dgRp{4)NoafD;O_#45I0f#%QK;Wfet!%-3aH@-i4^28Udm7hXF>`EJ|+V5|}xv!0Uvy-a8`95_F)wRHtic^4M~TdMapsgIeRuqvjQ%lB7Wg3I&YA zcOO{2@*Tz?AI34{wA-PfMo>FZr_=i}LM2Hz06L^YM6VM?1-Q-+z1*o^g#yE4wezkr zA1hvCldK>O_Z{MFwIj3_RN|6HRiA|31;qhgBM0RU)Kg=S{#|^{8ZK;=q_YVHG9oN7 zQGv8Sq^8D9CB-9g@IrHmfSC?8H>|kZ9A~gLFj_OFKCwO;T^kHL(LBYeMt(oRL6O))F=_`Uc1Rd7W z7%P0F&``d!#*SE5hAaCHEOCehBM+b6;!&hP5D0_}%Q1@HsC^I-2HqU7{M)Chp>N*1 zdo0Frg@Z&8%kMVJ7|jQ9epCd=8~6uz?c52r9|5)wKH86JQkIaWOQjmXPZdMgN9u;m zNeq2p+y<(miox#(Tc1U-3Yq8|bf63rzhE9nPaA%$)Umh52n^t_5c`P`1-mVPs|(&M z0}+<2PsjT>wS-22X15E1A`$Q*a^Z|2LoVMG?Y+7-xh(Et+Z#kF$F%+#{5q3h4_=k>JjgU4t z7#n6l2p++XM%0`H8w7jBGAZ46XNNIeo1pr@4oD7)$VnqD@T7qdvaK|_J1i}Sa5sD4 z{Dl=l*fh@-?n-ioDdv>)7Ptnmbr~6Z`v|(;w_H7FXv0*q#eF}k%G1$|nXeH}U)9xb zDoSoyVPLOO&Jext)jk6ZAvp~NjR?1Kic)xZcu>#_xX!T(NM|a{Nv8)l{fu*HopJgl z-V|N*Wdx7!hQUEQhWg>d#xHH!!A1oH1=$09b*qu^ z0h23E=n_eZC9N`KR$wO(fiDL1Y)@YcIc5_^D8gi%8~=W!U*80C2joX@x+k7;co?u2 z?vj%(@9lzD-v;gv>$-|lr)M!}jH@?1$LtcTJ}i>T%8FTLiM_mgVbz3R24oIaqX@1H zofu4FE<7?skShFHQ93U@due0j<+57%%Sdu12O)rzgHUS=8O6>N1sl?6>HG^AA*eLs z7!we9ilCD@P;`lr1Z}jbY}524Hki?_GUD>V0b!4E1!q2?x!q0(_;RD~wgN3ymX{|$ zuNyQ1yA9eGlxt({TOv!6;{dP>0s;cSeshQzO<~uORf6AjK#mHsDUrsAj*3E9oO{62&(x%ne*MA-?d-7I0`2_)fBMVfH0jpDYi#&sG>`mU7Zdt-F!Z}NrTSKeNXqbw;D)0*fCeRA+gioIL_;oored53( zwSYF{&l_J4q^Mj3t4V$v1>Bq+E@h-W7;P^EMS&<{HT}reH6^Ibn69`aQ-xS1AQ(JZG18LJB1QIXS*{eO#`HRxabcBZOgc?i)@i z=9U7^##Gsn3DyVXA*YEzokftEDl=X1zsn0I7*0}fx>#$5&D98b5LlrhOoAtcT^DTz z@Lym^(k_QvhZYko>uP zit;ckPSW9yxme(;Mtxw*;qZP8)fSW9leZV19yoMKCtWe8-Jy;nHGzSFh_Xnn1i)h4 zDzjq&6G^LpZ3!<1?ir}r*OtOXzFlZvZ-6le11&U?q{#FLJCd~gFdfHfNY@6PO0NMk zVS}B8VvhG5R#RJmBY-T+$a4JzRvD~za@<^DiWXoj+zrEM@j2AA?DpM<{Kb08dy}`X zczGU1DN@;xzBqDVB>E@tc2N>hkwHI$h9;T}R7a02npy5u(yapSf3)T}4xPrj4Yn>V zP`~P>$tsJi-4qPN4cR2f4kAt;O$)#`-VX|@A+@R7?32fjX%txbiDMXgF8JIWjGI@9 zw{4 zuaM~q)IyvNm9V;ZR zGdOBI(Eo)FRaZ2CKT(e$&h5_JOZg8mz?m8QyHq~4W0Qv_enq^Z9sOV2;j=Ifo^cCulZ`~qV zv`XXX&zynLM8tvB0_XlOUT1q?U+=fP$qlK{rQ zyqy%KFrvCU0wq1Et|z3{4NM6(GxK1D?S^{>^*kBZce%{cb*Q1;!NMEEtqXK#+`dwv zUFvS^8`nP$YN}l&E1q-`KuX($3JR&q8I5TKpEg|*Ib*2zjxUe1qNGH5?&#mfYT4=X zx>N*Fk$7!EIlVmf#UqltIJidzyE_tpI%bFkl?!DUeoK)ZY70o)IDbeSr|*%I+~BQY zruG9@LyR#-3wz#37U>>A*x^FkA26b5hd1he(jH0hDzG~5kb{7Oa0HeK?9fv{Lo#0< z2iPvY6s>)q82HR}@!bIMCj42O;7fmZXDjrW2acUZuHHJ4;G9|@JCCK4z7lS~o>`%s z;V4IVq3gdKy?JOvtfdx4FKA7?RS7-fUYa8Cl;T=JWk|8 z!aX6(MYOsLt=safD`hAoay2Vjwko|z&ubU0rRJ0g29>r3n}z+F zF?2(t{8~TfWwRac_|3n94&67Jd$!ha7x6s9^_iKwzx`Q)bj8ImQ+PjU0$_=SW9& zDN+Ry`v7TVQB8O|y>}gq1lCf*nJQRF+ZKNL4A?`;5*V(5w7M1y^~a-wbc;uo)z$rq zzd(~R=%{m&mIbCohs{>{p$g9yz8{bb2@Jf54MD8+z&W;)Mh_Vu50)2-F3PAf$M#Lz3=z?e4qP%?)(1oF<}54k2oG~N3G>V8bcrtjM8!N zBsXkzH8A|o=SJT*mQk`)IS*fV(?>+CIfT z$9d3-@ZzrPN`@V-!~&(KHVo}i0pK|BVJTtK;_vy~DjVFZTIuc%UwE52>GAC9sk;hL zb#gv+ov1l-=+JGv)|8;DMMX}Ij@%^mU3IEIEW}h#&sPZZYLBOWrXH>}eG^Zs_*A5y zg@xQ9_8USFxv~SS(VBumB+s0yyB2y4PLF)n^q%$96GgV}Qa~-$`fjwDBYN`^syd)d zLsJ7cX#?fl8Pls>{Vf_Dxd zPKVevjpD&O7!7+&DumOtZ)3|>XGiS`DJ^PB`@&+Oh&=e=f2Q92dV&U$73UOkmlzh& zFQbLax7olcf~@8Ncn%UB$J0o|Mw4lVH}v`^45PMDfx&kO7ox6UTJXcqEHmh{Y35~( z)>^SWlVa7sWt;f0^KN#m8}f>x6^wF(a6ga<0fY^7hu+A-Xi7jPSDX6mN=`^~^qCbl zdU{z#b1PvkP>{tXI-B#jy;%t*D!b~t-QNBwS{pqt^!{X*tz`*6MEKgT@xQaPN77uQ z&6`b@acEBZ;TR7fhcd}qRIL~$z|qkeXb(-0$I1ZN#%TfuOG16$qEi)(I&?4Ve_FGb zD+h9!MmlXq;zAUN1INNuJbkoIay8w92BUg`lOkrO5$Hc{@87|=pbtxQD8!CKVg5p1 zji~CuhrDX6dt>Zh+38{MF(QvOpoDRX+AM;{4kTtjCKusQ2?;j2oMbGRWu zCps&BLo1N94XedXBEaf$Sm?qF~*{k1WX@&s^`-o3IJ_g48=hmkqww<)=Hc31>ec z_#o;2>G!SydZpAj5oHmV$0dvv#jYb>&$M~5T}hfRg8Nu~32;E;%rAP|f~=v6?K|>} z!!x=^U6J)kSs>4MC^O1ImDP%Jb9o0|c~>c>3$S4w_zOPjAvyqvctz#FFgNKwDToVV zZ}x~tw_ob;>tnR#^dv5VpRSe@op9?SID z`H@%3!8dlSQjFNEaohmU1aGshgZf*z?|!h}(ljcJ{Ri+`#S2kcfSfjdFV+$U0S-A~ zcHc}@uMS3A2IxJQjzG!`?@f1Sdo_m3S-B?R- z4hV^bgidx9m7Ne1uIRf=fB$S>r6}YWW&t>&;sO6hcwpGr97A9-<%@x z@9gj^KO|P=Lorf@XfAIgSl5BpS@+Jw090Jx$L2e|LBE}nx@1va8`~}KQF#-}OSGH zv!*dIs5%=EOND<&fhr8%obR%7|9hUJiYIW48|-k(u%Ue<6`>jRj`05+B|ipSg8*QH zqSn5lS;*S{2c=J*k+Cv&K6)ZD8E7{pD8ly^ZfgLoP& z;{9K5NVAeNPa@qyUQTX}rq@@~zx!o3`h1|AEJZ zP}B}1269vRdO+_YHf&>0n!8e!9X0n%)+xR#X<^k`x{r$Bmtd*^nL9DitqZnk2@~wu zdMA|zYzD)Y-&FhvQ!^UwY!{ags z^9NZ`2U#Q0>J& z=IG0(VSA~ZiZ?KYle%x{{0w&oHg0<-iNg#TV(EEXd@rOfXTaEXU+sF>cPv|VQ2Rea z(04Mz$RFN@Mp2UWC0tQ@3dXX=WY35s4mdV?;=ILN7IjOe=Vy5*Bkk;&~9TQWyyZZu1bsijrwggedq@*cQ80%Mx-z%`}_ zL?Y{#jkFH#tRmPmUpgY8y4ktZE~;2bPRni3)7xL5yX#KlKoPzemboznX-l1RC0o~^G8+zKfyC%J@-w=$<aOLb`3gLdf2jL-*yzvQ|jfi~s5~)E5LbPqIF~njXpyxpxCx@{l zbQ3|RRRMK!LbZ8IG5{e|J!XL)B2hFAMCArhJ2R07NQ27H8%BNOW_b-dJbCD}O15RQS1 z2P?LlWL;ck`qfB$Ia98`K?VtB$JvDrnIMn&1ujU;_VnKFrJ{w>T2*ODQ zTu^%@$EAo(FDsJ?(14{$YayNfNjVe44=*rh&YS?KTj4W>D!dYzUK{qzi3b})_erCx z;s4Ma0;H!qI@-vqLG@7p>5*nj-lr zorqa&BLemE2Hn5(T<_fWe0SB1J|m6BT-2R&?!wj~1s41KOma#pj?VeLx%|`ch)aH> z$C^etd$&;@yDVnmF06dN-paT|($XBTO*U0vcH zje8c<(!=U`T~N1MiV`@yKli$RJIio$UXuCF(A?aTHJ8hM((Ys}K2cE@lwBIKBt=rCDeZ z@AfIKxJolG%{k8F)t8E`S72V73t=q#>W1JSQ?9Q#`3l|nxxJDCrD!YcMcJY|<1v3K s7Y)R99{#3nYqv9Iqv)^yzkg~{nuj*0jLUQ@l-GBdt<8 literal 31762 zcmeEv2T+vjmM!X4`=DYQz(f!gK@cz@AfXjh1eGK~vZxr443d+_76lX}D-ujd5(!F9 ziXs963L+pmi6|K)hqu1=ocr$Fx-)ak;e95i1*a(UnV6W=Cr_@xkKZhgXjwBcaao5F8Wj|ec|Nbi-9n-U7k@u9$=I^{h?~szLFfeSo z>(C{&Zo$O9{$tzyj{F5TQL|%PR*Fb5^GECFI^Ml|mz!={ zpVnKO{OHN`1?s}Qyu5U(Z;`0!7qzN0SK>nM-qlLf&!rY<8n~ohs(BX5$)c8ga{K4U z@&QyCL&MguW%n*Qim7Q2nH!#ROZokuz8BsW-1YzIL&U_$2W&07v-8ZC7Z+L0Q!fAb zyzRsj=jp+sc+Et!x)h^m#qi0I?tp-R=XTZj7I$rd_4A5+I3&K7hwH>{70`IPR@~~W ztE(&Jfo1z!2gYk|vL?STZ>n!Eo;z(lKBRoFdQ?-bZE#$U%f+Tf&(5?q=|Nip^O7ZU zx7G(mM!LOScV6=6rxR{7KMZ&k!^Ru?UG08+PIx5eE5y$qrzV0c+z*bgo>%n7bJf&n z?^L|O%=fFyrDN1yUt6-~nbz|s7<18PXX{6YZ^=;V>gv)PZFRia1T~(XRB6yz7*D1) zRX2e}O#8(J%g>9saL-%sFTq* z&eYCbEH~EIm~Gb|G3_|oQ^#t4$2l?za~D;TZPUH$V&&rwpAD>ui}2=8R;l}1YA<0) zEag6X{(K0(Qt*~UjT~)x?=`}Cli%Y@gXh}0=8oib$gDPEysAg|?q@xYj+R*G_33kx z;p3T#s<2B?sSgYTPoO$%;l26Q^b;Obokz$W=EaoXYbm)-len0%(X9-k@l>8($%C@XWp>JD()RoFf_*j|*Vn>jSz z?rYwdbvf#fFXlJdHTmt4@8<-abj?KlLZ0N4Jsum()=E2%-(0u*Tt!49$3$MMt>|a{--Uq3AVjoZmrw>_388SxD(OkyphiSK|zA#X_u9kuV-VL>Af?j<>iYPe8)z4a{QjL<96kr_=}nE@rmrKj(*=J zy)`W<>BG)sm5w_nYv)vL7n1O1(L((d$wHX#-JH+V4T^&bt6ye+u1|C509 z-{phrM5LJbDjs;dsaDCx%-@iea}txm#B{_`^0YKT1dyoa{^@ zTSd}%DYkrwer!qq7qY=W9Q>S{p`81@jwmT5c5^E`8J&GR}|NX!z|Mns= zku7ZABF3NiNIFe7Yt*iK{h;!VYSP?qVsVEhIh7bW*f_SJpx|Hmx=ji8mn}B=4Vcc4 zp^$y@pGp1yaGd@b%-}ke-3h*v^ zTB9r6PJe>+TzS~t>9$6@=G@_O2|Jzh)8m7JI%!X*ZzFcP&m?FpX8-q~QqSe|?(XhF zgG9Y-+vcL*utYyS{j$MgH5;4HdJ%paZSLmo@{F&cm)46Izi=4-N}HRg81Aazl5!m3 znj0^A@j@!kV7KX)7mdOBBb7&$q$fHG*BI#PrkpDar560GF>w2O_k3`iE)sd1J(-64 zU#gp=#Mp#%Gw_Zy)A}ao;j&xnMVJY8X|}C5Me047e7bNkm$R~BeOC5xB)T(@qW>~$8w%#qERzrWVsfDckHrjD@&E!(h{PR+9I)sD+K8X^?1 z^|*rBdlgIJoB%!j#Ub@~f8l6$%Qq{|N4nS+4*?AFtn{3oo(5bjI-M-bBHmFdoUe=UljATfls`S> zZ=SMRC(Wepo!{otU|$Z2y#fO9ZL)3ds8HMO+44H-u zYIDmKVXQG?b;G0#Y5!FLvo&j!*%vX39?%HMC ze_g&zp*Pd-i;~>JsL?$~5QaCYIQ{>V6!cpl6JlhQqGGFCd@_E9I;_u+r36e?A6ije+yvL{}u& zKAUg)HwlQSt-up~%&=@nfn(O3m-}gxPh#FAKm7xW9Olv8m%o2HxXH4~p({v=HR@v3 z6Q1-AzR%CkSCH#eDbWO-y6LMF??~90)eYfR6mmsg&oip9e)O;^WAEm{ zEl+cxs}Rr%g;otxRDhCnW?Q-$mJr2o_-mPwa8z_OZ?oSvBV4dkSiE(A@E7aNsgXX+ z3cVL^V+;>H9%aWE#>05--A+KJu|Lgm^yRE;z zPw})Lx)HqDN9?q)2Z6CYZdip!BJ790TuKajulu(cHZS%1!A(2Qmxoac?w*gxtY==b zM#y>Oqnv^3M5k&e0lkz5*hNm_Hn`5IxwzbUasc7=>E@C5?oA<76}1miWh6PdXs**G zK?1(C*>UW{H8o*>;Ni6E)$y8c6P+PiT3UrpH-fEzQ0desh-^-yJr5r~WK^WM=}4!( z%)__V|3nd_&AAj`6=R%gx7_FCcH7s>M3-_&JHNfT4ikt{u`^CR-nOry4yDYGXW7rr zmZ92vVb++H>-dwu`gL}H-Ub=5uXoOrm1)7NEDz#bhucxU^a*hj ze_-N2@*idmcw5K^|D+rA4e%CxF3b)8P z`^ZV%BmNgb?L7|iLcv{?NNHOzIQEx5#ce>3^*Un|lPW~8s z&0%eA9gsftxuC>WRXr}%dX$&&axbr(u6!(CXrL6nFZKTY`^*xNC>oHEjfd-6Q{Cu2 zOBipO_aG_B;`^uALbvx76>~+jS(R%uksvUl!D1jx#U)k5sZYth%VQMJ>{LYO=fD)y zf|pko1n^Wy4j;SRJo0X{Zv$eP$FdE^IRWdt!)D~kez(}q=Snl`c;|<}wUk?OZhE+S zChss_ij3DSJJrqM&uI*nQMGxrw?5Ksc7j?kmOnQGI&1`>k)8y)O6&Q#>X8rkjVUCO zs5XOFNHcHdl*#z^&|8M$GBtWUIAl0jVaUX`PkT(0N8hn$!-^=7wnt7A^f& z9bW^ik(W9FX0Iw*DY7ZosUl2#7zk`TA73rz1&Qog*7vw7MF~@`^lGq7PT*E2$NJ~U z6*k~f$T3}!ZqnfBfGlQe@@Fq^@~aIgk7Z#z!s?KvEHV^=^q!w9lc9iz&Af4@=9wP8 zOE|h0Kz`=a38kOC^>)89P6X~*$!)TVTEKY9GEv?iTUL6u8H^*Zw)?wnH|TH5O*g5l zM6#Lc%QnZLzrMcQygAQ>(%SDfHziV|JDgBkiEX?z{Y5*W%T}!fVlCRtlxTg0d8(+L<9V583PR32 zPC@N-77>M;PU=jaH?CMiS;&k-HAQ zD=QO>HXZtoQU!Bz;=Ag0w(RaF_kiTA2#Lu}C%C95%3!)}4M2?kiwi2+p$0LRLcp=$ zo0+O(#+L>5yYxFnxwg{qWZpj-?Avc;n>JxXe&0}^T*R4OKeS3wjGLb1JTYYT zHL8#J*E@~+QiuYw6l_&~K0dK;_pkDc#9>1R321sqNjiZS_o9g!vy#ZTzeHin%0gks z25dgmPe07!1y3ez6c+ABwA=2qZ6fW6$iUID^rs(!{qKR2mM@%j|D%c#Vxv@}mf_1dV-2a}W> zM7+)y$2~R^cDc8@V|F9iZoC(w*d4z;C>93IEl?l4eoG6kazv}JRFqK7Z~9P2#$=pZ zSYewW!{s{OYE~Mca|+1tL0DSx&#hdjbIcN5frq*28VTCKvWY2=;tcXtP791M$a=!{;xR!qw!`1Jq#ZaCZ0WCI^v#VGn-AZ- z@ZtWe|Gko)xJ|cnAs8>=)#j6{_`^-tG0TiXR_c5qHPI0e zu=CCMV7rpk&re7aU8w$uu2G9Y>ClhE?sUv|of$Qw&rFTc+HdZbp{&ufQNgda9=kIz zJzU|-E}nwNMiFB~X`P+wPkgr^g(iMzArsTag)TEcYl3QUT`PI3P8spI4#6Oxi8!aRzGdt8yelc;cXRu2I$Xle zwLf>vW9hoetjj+ThQxSzyX0t-A5rb>uxxvC^QQUS+~Ch2HIX~dymgx!a~u0!9gjK~ zjL7lOJ>ox}KIepxgOvAtd`BQsfudqL9(&@0?D84pf3c3+vS3r3P~scdd^|*irJ2!s zfgzio^NiBq@qK`pAjbob*Z~6&to3!`lEN0U$Z=d&tBXf9HiDeVuloEfsdkG1AIusu ztUS`|75z~}gFC@gpHLjmU2CX%`0!g~EbB6n8nwsP#$o?b9{A5nr@UlD|5^n7Gv!NZ z3`5dY7KCJo*Ch+4ix)3~nX*{M;=aI(h_)L=SXo&MUF~$1vD_c98)Fu$HP3lSXx{&b zrpw!c5B!@q#Z#Y<%>DXg5sR=?IL-TN;Mf3Ff4<#ys*VDJu)d+5nNG zhh4+plh3S&B%N*B8<)4$>7$zR#xd1;d@ks~(1(9ZU-TAOVNK6`r=^z-U zQCP1RHJg6TH9J7SU6ZQ3AVWVl4goWu=hz*kNpilXzSgzIts&+kKWh2`BNZ313xf{> zty22=eF=H-^YgFYeNLz4>V3=&!wYZ>%p;Ow70|ceW;r%iR>)_=pLNW8zocF|ckUei zwl8mrR7iZZ_6#tf{g;c;VAXoC|M|pwy!tn2r&$ff%2Ip*LO;rJ z=>aiz zT`;|&5*P^C#|5YwH(O+y-blzSOdn)jF56ne(hy-VB=)g(QW5rTo`|v1!|!(k4!!HCdtM(Rm zDk)@G1vK`Uez5_oN|KBcfDlk-^VICb>J4Cov3UdD+sw}NyDjIEo<{NE!a8c;!bpLS z^AII3gTcenLkPzcCZBvdovw!ZW0qtby)2v7f@{SaH`51@X9(5U?n~3purSouZvtY_ zjw8I$@^!l&-@o6IKl>veIV=uxO;OaSE|o-eWVc zNmggD4q03vr}{7ccG%T*77K|mE6|-y8?!`&h0V)CML=-sV&x~g{)~^C47Ba3wM0U$ zh@{P7d6brw5q@2kLNJ>8PlJR%9tkS-H7cQu!ZvPM;KN9}HHpop0UcA@xapv(s*a2D zEa5$N=L59pv#ppk83tA|v%-j?`V}RK0|ciExLv9Y_^QJ`?Bb_hx`V-&RSW4{;B ze?xlU*m?R*Wz^9`6drhDX_PLQ#_@=^bJuCph6KGL^6xr(1mz&*0mAw!Ud3Zak2+z) zczJn^4i3wE6}6+FlmM&he>DfgAwyF8Q|!-sB#ODOPKQX1jC7s4h=u*6?j7f&JeWAE+{pj*}Oo!!>kkQQ}c$Hu>=hIgB;h$x`s`+p5(Glb!MUI;Z0W ztQAc3z1`=_qeAq*pop^KG-M##_{6-dvxX>qpuDA7v=;cEsgBiG z77&xFos0rG@XPl0-E>5Wm)&kH`Vo@*Hg@#>Kd_q%(l0R9UXk~2;d&y+S0YPzbacmAjWR|W&LBMG@ zA-K?Y*blUTps__+0O~i>Ol9>uD zI=Mq70&4`dKjpj4p*kGGS`b6#AlkUcbXgRI=Q8_c)o zmxBrct*)MO7R!S*r_pQ)Vdx>}^mp4Lfb-S!vw7zt1vl^W07r5Rz*I>p#8mbBVV=2@ zX+viH8TAEUiW#f(1s$=Fky!{RB_KCoI76BFEY%x+gFdBKo1mjylpNc@CrJ+hz1m>@pjuKf_4 zJQNo^LPxkt!%fFr1@re;MwLRE z^3OikBY)t)D=a^2D=WfG0Xrq==k9|xh(t-Cac%OMpauddW2E8)T1aKQovpOEc$+KN ztM{JkZZw&Z%rNbpc8K)A>iF8Io4mK(URiXSi`DEsBwPL zn;%au?(9C&t5jUI!g%DW!qKC{reD@bONm+Z9Dk{TaQ6nh4p1KGr0_i#D>J(ybev=F z-#^umVTsM(jQRsn8*(P<0H;#H^ws@8v@9{b2t+*Aun5)T=2|{i;Uj}(xY|{=uS4MAIJ;LBU?73!;1SAB57o&kLRA?mO=}#vd zD;swBFDG2*3xGhR_2Z?%V?A}lSdP=6sKzGQ*T3eaII~XFS{?5f6OP9y)EG`>h{xTN;wu&c&6`#j)>+QVL7&{~K)`w$*%=kxNSFjl~+q8!2 zn`hIoV>IpKN3qP!is} zd9(D;mG$iVC!6|;DNYZpiry$jNQ%=xJk@$$Z=Rp4mgN@`5+bSjlW>>CL#0C5PZ6dE z?Wcv^CXPn+RX;rBO)Z$}&o_v3F81f)roUcJ%Lz+^P73+$TwT&$haDy0bCMZhDy9=F zi6u^D-MZAV7DZL1&iOt@rNMxG;5}`tK0vRdQ?*l#FAo*-hHO{Dt50U~)nYES@A`z~ zrLooSPhXmS9yqvyk z*w{X|F!>)nVr;?0u8f876k%!F{FI6+9tA*dy^I)WgOW4_vvVqS?wi@X8!cWhLv2SG z22>9u%o|t7AyX4}J?qCa0j*(_KG-&9#qN)=$k)I}Ksab18Z6_-_<971L3>F7flJ7$ z;5K6ZdMh%S3;h#9zO7-+O|><5V*GCaHyZ}S$)iorH({xS-BM!J>03ac{c-o0$>FA$7&ND*#x zvr&rijUj&oZcI4HM+D_b+^&H7Y>7Z3o$4b!`3+*mQ_i2ZrU z8R97C)5I5}{<=w=Izb40`N1#m_Ziq5g-?nfQ3ugwkYWdX37y8@P5`f-IpJc zDp98h(?6iXM%D$F)*Jy+w8C}tIaLNyo!h`wuE4l_JP+W{H7e3GK$5|sGvo^6H2(C( zauh>Yh(Ot>0PmW+4&Q4lxXQBc8=M(JO^073B@G}}5#*VyzI_GW%w-t&lx)gO1` zSNpYs>d(Se3fJPwUv5X<7X05Iyb9zysOjJYKicIDha(FSehx|thot=gG_w9sPR+~E zxV#EaS2sQmX2^5OKb#>Z5SuLq4s>cgq6XXuP=j{+9qGAz9pFM7k_eOrX+R&lW*35S zQT*S*@X&u-<+Ja53{ZuG!M?;B`LjP0p#|BbHnlNn3P#7^wqEM%ytwcYCh$~jRH_W% zBS@LO*y@0;`k)h+1CHw3+<{9SHv!nU_hRK);3OhLsK{}sD=QDQUgrXdVB7Y_bGh{R zDL@O7O88y zmI-TrEkgNh?0UAKSNC$09n{Hix zzAQAgUI)f^c(9)Uio0<>}urnsnwHic#Ur4uANa z(jfRohueMuM?heORjBii1)o=r{u;oGjafgT?PS^Y>&Hza^fGe;cRfzw$U`B)O-Edh z4%Dvs}#>ugg2#lbAi1*)W>@y-- z&d<*}SOz1&X&+I}TS-5(;!Fx=_>kSTI|!u>lb0)Mqu}jC?nRLxOCfh=Bry$|UzWia zL}_F4yFtf+t+WSifSnZ_5;6v!o@dQ*U1VD%4M8mjcnrpx-R4k5HDjU?eml-Z5rSvv zJGL)$1FB36vejS>HyueHzMdbrcOB%CP?1Y055Z!KAxKeWtaNVs{~e3v%>9p9to1Sk z+(vK`TP3yv+3R>36i=ZcA?e6N5mHXiK#gkVPpXSY9-df!@+hOCjHxDo5ww;h=tYEn zE)?WO_sknIb_xoTf+4EpO!f)qpMYJZ6%}0YD`WbR++`@J#j*k4%riTK?ImYX%mnxF zbNVjduy=c=pBzNOKbfHIZl?%?28>~i?HdWsu-G30X#@P2-1N@UkdTB(2=5Nw_sp`k zX^|NQFyUPiz*UZldeo+ftbgQtFi`KXOc5VsDB!HZ#Vk()-@}fks;2fL+QVtged?~J z8bU%$6e19@d^wK~V4Z|p6#TaP-1`eCAdDnH?z{r+g2eG$)yZPZ>)%g<-V&H7f@ml} zhhV!V@OuJ)H7Y3dLN zfmD*{ebH8cukfH^FGn~cT!8HkK)dD^O+p)5-1y}9psb0``{uc-Rhybj(_-91B zM3_K8eTEvb7vtIF?dl`eb^}lAGTwSUYQ7IvQClL`ISAx+zC}lyr05p-i~h6gLU<4sJi*%W#+B{x=BfP<*0MXqQ>>l53vU~PU0pNo@@Y} zw1OMSqQTVI0{uoo{B_;~Ji@|>Q0KAt$q(Q`NJ=h9cbB^>c`~Vw_F(`w3knKOSSc9w z>Sew7TP13mKqRZJ_iA(Vfrh$ExP>7dPhHi-5i0IkE?tP2MjPGVU=#9n8XR z7`M^3hG6DN6zO@O>ac73Cx0Z8?@dXX9y>Uyg1rbzWCS=Pc;5~p{{5&)>~GF@v$eJT z*_fMEM>4y+_F0tI`QwGcp?fY4;SzmLSu145o5u2LpaMb`AA@ZI?=TX0A1401Czhvq zqTEh~0s=)hb_mvhHlphT6pgx^g7HAZD*Hp5&1Smtcjw@^Y5*r{!6RR3?Gy{d$-g1J z`ae%yVQ{3{9Z0xMcpnN@zwq!}Q#-FqKAcjdKg#;hq;s1mFAGvOA?WX%@mUAi77Q&s z!vru1YrpvBCGboP>yj|$q{2KKKuTP!643^W*C_GxvB8OLG7|9tpO}N~#kJq5x!zl@ zKKYDX@hx%eue(RKL_l%v;9BMRrWu}zjo+`fCbG)E$(B8v5q=QJ=s4Uj zn1Wt2Y5};Q^*!YPts1)4z})%Mox%c@=h4E3hq%@5BVmT20Jkenl0NcQN{S*-92v+k z>v9Juo=W1KfvU$jA(G#`d6T#cfZA~#S*VA|ta+eaAh|?1e7zgw@(ej0E)!&!HC!J4 zlHV`4yu3m@-LRO}0apu zwuQ4jc&r#i{HINk&O`E-ZR$a-Kw8FTZ3mZiq_3?G8ya}n9P0^5u^HA)f(pPlX&yP4wNGX<`>xexFdyHNbvxLpJ0SIHk&8Efa=SsHqfUbnI=V)N zb@c|-krh3cG&K(C>3yEe*n4mx>%0xNhYqY*;Uuf__@u_dpwkaF1UFUo_4`icO>`dL zxOL0zW8==V3guEr+zq>}1Ny_oPxx@ye{PE zOR*`rnq=?`(a2i|$Z&V}c@L^FEG_pBT7MKJ%fMS^5W8U7O46%oV-UIgx3R6t5iwB#!wz4FoQ_SFZa+vMy#rP? z5$-N(`xLc%y0<^e?lXpnh&9(3rF!=lI@wPYIBEelJ~29<+|DLL*d5dWvJ^N(v@U8# zK;s9VCshORAk1x|8Aqe67`7+nD}>mx>u&;4P;PK1FmSa@E&4n!YAfpISwcmPdi;3H zd>_(fTOFri znq}d{CdCQh8}Yw^of!oH8`jrD9VV3B&nV@)$bW6GJTk zMs7lM!Vut-Tj!+Z-*>HN*qoXw>OIAY8#8AA$~Bidip$FMU|0lcw1MFo+beo6AYd2> z`5JZQ?gKVpCxG`*-<4iU%(VrfV`Aw?P&j;jJs%#t2ACEH_`u4u#Bjl3f{ar^-~cFc zFt$oaHY7MBnhpm$g0LdR2O_Cvtf~>D>2VZ!`GAW=Y9B1(0tl~?rNFM?3h0DrV?nGb zgN19<|kX#EA2)U>nz-@jI7YGHEuBqnDuE^ZSdIE5R#45~92Xn(m z-(mbIrlX^S$W=VwjpZ{*gQ7cg91s|u_)_KLV#q1A`EGNqudkb1pWt$BnEzAbPcOiD zE5H`$2UpnbuTkNq_-GgV6krnEEHN9R{9QHo;yTrXg(C~NtnT@FB}f>k$USR$+?K$l zkOKh@_z%!84KckulI8{>5vidGRU1gzFh4)P7+W-zhe0TZ_?d&v1~mz35W4sY31_RW(&!B?P+CNUPSIQ6(7Sgl?N*&S&jSZaMV0Dzz3a_z3&OR$}1)JqOsH!JU47)ZdGSZ})GD>8$ zEU|DS69aY5Lc**2`UHz6lUjg;J+zX3@Z}&DfqCz|7oJlmh�hdHC3B$kNDT!JY*S z*2oq0e9oahunkxo`oQD>J!g!KjVTWte}2bIPhkX-@kfM}t#Q~#xDmnu!gMhM&_?vD z1VlebeHh33z2>JZmvZdeBOx&rdg)m=Qk*K|1u35J81t)1dIh}Tmh~9vZ>CvVD`V|I zws3|?24qz} z7wQWb!IWjaCLq>9cyZHVL+xVS+NTPuvjb9bdd4TvEJ0(|prd3c_~iueVv@lr+?>8$ zL8QrpZc%3x!g_&U#ot~e@fGMxqjTqooQxRXMB+AhA=BCyEAL9XI8s{4WE$9GX{?Uf z3ub^?K)CPw(=VzNm*|9k{|QCq{ZuAm22bv#Cr|HOC2QI%9{-Q^m5qX!pp)*X5E5rW z@+iu0xC=0XI3`0uK+2Ho&uuALMLv(KoWWA z1E`O>ge5xzPY@8)^Soj&Hq;%v<}gI7i4*?R0)+Nq^H0FKv*^PzH5~+TjyXiV^i|jd zwf_}kP#-MZCcRev1#5D8FgbFMS8qtzHm4;LI@P^w8kiZ zdshX-YvbSE@b*e^&#asx%VYeHCRu9|&!*Z2^tEX$)#j11OtA1BQFy1de`yrbBSJveNcWQ&2 zBZA~RJ3X;bU*XtWm5mShd|)O~3f%)@309c-nevjHP$eda;)`v_b8e|%6sR52rG(o= zQg9g#skpnFmwx-s$ITV^{~6MIhK4HjXY(keE5bY`%dqm^()Y3U$@PHmvu%;^arypGBEO8Ps1piFJ0g}?n z1flfeM;iJFRIe)UmwB_mZ2aO z@;m=1+M5ACHDVDC-T<<-gIp_4PXY@Mew$S5h^C5?hFes`V1B{%G0Qnv{J83VY(EkJ zkZptVmLJMM>5V*1%q}pe<1h)|A_LgM3Z@1~y^B##gsevldJvVk>0x1EL}VB$6`sR7 zCltNu$)8xr%#t_L-v3%3`^kAB3s}Tjz^i@-8UXo-(>k!3Z(*CbVYHDv-DaJR5ywBV z_Z&)3J6r4zzI7wr0>qMea>0Sc9D#Rio*xrxt3}rXaXav<$DyWM2CEba?=4Ky3{Wt-r(uJA zuLGmBE8^}D9v^}DNn2t(b_MdbfXbK|I4Ud%LO!6>L|F?!aiESqXS=VlBz?fzOHGts_ z&bI(n-&zqNyx}(ntyH_sh8+81fd~kfaTmjS0N!!Be{R;CVz^k>FgZ7q7?hc8nTaQc zCq#D$W_i@;ZiFL)gt1a-Z#QPWX*Ku9KfX_k7{dw00A(c%U?aya+m_K&eL-wR7d~9ZnT-xH>7x&ZVN;n^tC@yFzGVAB=3<4N05_n z-98zIem?UP7i*o8hN%{Tw*Uo$G++8@2wf7qgfSNE7c!C4Y0mPOO3FI@rKw-9b8V|3 zFGoj^A${@H9DCc66`cG<8$}DeFBUC_w+pBrA}QduILB$c<@%7s0iGu5Q*vI@QhPB* zOpGD@t0#rAyWQXIF2*Sq`#V>A7jjNUF6*ql@_0*g?DKX;*}@V82Re?hSPS+7?naH@V zQ>LJ3g%M10i~-}DA{gp)4~12<1qL8ahWYa?ObeC>&!1yYoJUk85+aHOqR@hH72b9+ zeyj$_AFv$UaWbMhlIs_wV_6Epj{~i*3Bp3+=tq;%kx#nFgA|fHX$U(@_NZe2^`=?k zIreMCWmsE4x_0^a@DPf#d~jyy`&&iSl0ICn254epxN8p8#kSLRh&`@&ABH3cXdi7@ z*o+`Yh*AzRpH3xS)|^muLqV~>@NrY>?P5 z;ScrireKn%WGQ$INb`=fLuB;nI{@Qy{NJ#$fBk}MxF3nnNRJ`)6*nCaiH(oe;=X{C zJ8#~w>r^47LT~BA&@LL!}dFtK77AX znB~mIteXR;`HKv1hlS~8E^Zw?*Z->gQQIPRbb!E_h3LAlWL1p;@oWpKTteyqR=q!>_`MqPb`+!H6rbP-}2UQdl!+tf8SX zSbrDh1Jql&;QRsTh^?<=i6yDP(R}nIIvQgtsp20R>If`F&L2U71X%vAuBoSfKNaA| z00&Q8tMP|B11RRSZLEoULweGdl1u%)YmqrZC0=mV7md31^A}N;OLT8cT)J6uZAanr z6FvjV;)^m@=pU1Cy^Rwzu;}R2Uy5DE)f!Hj81~JQfz7|gohwsFS->sB-*;UR6$_iN zeh$86{u)aVX&^5EU)%N!A$QW?0tAgHfBbka1PSyg#;Z-tiDoi7boXx0QNw&f>=;Lf z=xWzk{FVUb)*%?>1FIG*#juAo1l2Uv?@Y_P9MpQo+$rBK=nVaOxXo=%j}@FthuZ44 z$=S!SUu~cWKjEOgTgYw{m7}OUpQUz?-|=NKu+jW^MZkNqgY$i0HkU#{1TaT<1l-=r zicmoxaK$3@B)rjoj2wB#w-^BdO4=ZyR}ePX>^**fK3OGGizWdt{b^X~F&t{Zxo`k{ z!o&%Fb^z={ef|N=@^veK~T@ZOELP+?7Edf%8HX^`r9siimxlUu$ z0<=SpfKT}P^{WRJ%sv5#0Fc$OC%WM4XtdNJ>oHKKF!vA-n>RVZgeWZ#b_phh7%>g~ z2@4UN+$g-}q4{44L<*iz_dDmRC51=Z2r>+Z}PTa82{VBKJ{(=ENUx3hWHkq z?rij?#DiFIurriM`4>1ovo8iT{NF(Nz`(#EX0en~qXZ*C9-gS2>?Dr5tV$AB*Dg{y zcYDqCom9QU_B(^xcibpE9ppqcGau#bkwm?42IL)1gVfasXOsb0>D&J(14cN$`1YRp zcf#YJr$-wG ztW=1z>X*`yi|LUl`K*#T=AW=Ru*e6zNN2`q$(yFD;c@`zIO}!=!zFcP=%9RCwW?6| zvUnmR31_tYUeHOff7{j&4s+|wr>Rc~j_qu`*8A>r&|%d2uXfznbu~xq=9O=|3cO?4 zuOA5FSLYww*wEA?RqH@dBwlRZC}ZOHJAek4r4X~((R`DO8Y-4**-rK(OnKSOR9!y$FQBky5kQ{KU@wzHDh`-?wrX{dDyU0%FgY2DAi7c=>=u`RZaX?H9vTqPzK8RWr;_0*xws4^6#^S5 zh8PvV^{z46GBK~`7!fdCOls`Eke?-`6;MJ@dA3ZnnNEd+E4@E-z=;i8vWFi#ihh?G-gy98RfmYE0G>7BstTB?l!~2qMSa(`u>IC|2V%|CV3zpnFYXhLPbzPLI!ZC9kO!OR%_MyHdfw?*IhtaNc z#$Sa$5`P3HTvD-4uJF9S3ea*ND-P=d+rJcTw=m$uB0Z4PdB95oEP{hv!|TZRH6==m zahnI!z6pqJLYb)2!OX%hrD>s@nfd$Gk}~|FiDW=Xdu*ajZ69==v zZ6r;O^2?S`9tEUbEpq|#IWg`vxm-yZ8vwNrZGf8&4UQe4x3iIh?+o#0K~1F?LPmE0 z0a}tR!L*`vb|mjvsFXPg0UCtUT%p zY>Un~Mw^8?WK^U1&AC^ z>H$>YVW2P;p8f{FPZJlPK=VF-WS&f&XURLe5A#fD^I6ioNkd0Yw(_VCBs35j7gCQc z+zDy~^5;b)5SXLLiBJ5BS%y98(nNm13Fn|>T~N=1d;+?HIs*=j=l=Oboc_Ez*X*W4eAK&&e{lMMK{+CWBq-d6J5@~7-MtFU&X!G7`@=|$K{g*i4&B5 zB6Y+ocP|R61bqe&NT~XJ8_WwYf6sv8E8FuO3#huU4rJ=UT-Z?@03|30T0Gn`;CS#H z;owV1Q5%{P<-^3Z;Xe5{0%nb&jjf0A0NH!@u3b3dGYfH}(hN4J?7pnkTpr(k`6v+;PZXN6xig3e$N9jzgLh}W+0D&#~*xe!2 zqDU~e;2QC++8Hcg#GKCVTST@KQI>E#5$VH*Z4ayzphpErtP47$yE-8<@qhvZvGo%j zA=ZVgnyYs=@|9DU5$T>x3u%c@IV(@{3fL6vKd6d(-NI>7d1+#C-gQ?tt$o?ahq@Is z4kS#$9cyJMFz1oek%r$IHU<6#Q9)rkOmwB!Fw56v5u{H8e9jaqThiW!B#3WL#YV6w z@)BE?hpB_R5Zx@pXrS|*_I3vTA+v*&wig!O1k-+GdTBKBAUABsO2I++mvER5W;hK# zS=JbhFzd_f_Nv>2Cmiq7v1hJ6?Rs!!$%PK{!7AEdWn{!!Z|j4rlfR$Zu^@2ayv3at zq5b|cRmdtRC;)$*JNFeqf_TWmQq+9t{508KO%3^YB zo^BqFOCwmc5q?ZyQF1sFX)qbX0Z;Lu%bF6glW|Zzf(HT)a%QQ3@JESpST;z1rl(~F zXgAn4Tp$w@<`Dexu%^J|9((wC2<-~b81Y&`fg1`&yz!Nx5HsZGy`yBW!q^C_3wT!? zSVQnGQ3TQdv_Z_G1uV0lW`bDP_gyA&ces|h8P~J4hHG@oxkeO3&KA;kvbkV7jjyh| ze+*_jAz}~Or0;_3t)!82?6D%rX?U21h|tjWGUHftW@t`E4N3zNh0XgC#Snvu1y@m0 zl7%n@-PA8EEC+*4W&=zLOa;*}AbaGTBf=s`5F9q)jB&qF)DD^44Sx%CcQuEd(6(fk z+1if6`rinC>*V&}yLTsGj3X)*=y3~d1MK|J8f^`Y&(QT7;Ufml#=PVYXapJ-F^?lM zJyD9xLkD34JV-ck^@z^X=t%*YXB zI3!MRFt-zenJ9b)08$T$MJ2J@%i1~U$pW1-Od*L-;;q4t6D0Mk>wxqyvT)#F+YcnQ z7DsZ>sY1CUmDBbSO^uhV7cTDDJiK$?T^u~psI3M zyqt##zJonMPF#Ak3HShCjzeT%5UpzqK6m!)O?L5J=reYko5lW7z&`=-{yjTs$4fp# z&br`;T9#KE)v68B*3W+0%U&SyywZ1?j%nuEN2b}tw0e=XXVWG3O?R$d?LDpH zHxx(O4Y-M6Zi{rU3b4rzPG27$&q7h-Z&&dvcH=AiwQV{g=ml8V;-#xiF@++FjwQ zSqjl&U0I>6uLvvJcA3dliU+;mul*JQTG67rC=$782l z?r)MpM#YH(xM^Xp=chb9z7b6YVUyP<98i`V8OQKQ2)Q4;*2ZoS)&24_B5geUb>vht zoTcDE+$P4Kz5&HJ;3y;_Yr|RuCFV6E{d5(Z!Uzje>;xV}a0d&@Ej0O7&lmBQUbgj| z{5Wh1LkgI*WQ-B!Gil(s+iyrh3MdJ%c}eF2m=~&yf=T?(5bGEq2BY;DP^7^)vRRMbuc5gHtx)F0H&OOfS1n_8N z3rLy9wo!uDa(*>Qq@)uJY_O++_g}Y4_Q~yONK{)m*Cr#b5uE^(dl;fF;;|GO$a<7Sc8i?Y=Xw#LNBakPX~Sa4q2=9U~C7 z2&BenDuYS18gLTIdzXvx)@S2e%YR&D5QJ5V zmi`HZH$>SG5(}V8=_H*x01?Gg`@S==k`lN?c>qTuu;4vthB)|*w8uT1W8eOfY6_yWVew4KGJcG7t_ zv1D#!&q=5~(8;#Wa=1e{BbA6s_YZsY1MT|JNEtaFcA zl}ulAAB!;EF!9?$>6y}w_qr`N_+Fk`#3wMHrQ`%`CPXJfZpJg!5R)Ytd6;vN>s(>5 z$bw6G!=4LN860E=YGGjnJ>?L@HNnX3W1(fF z;UCe#W9#l`Z|+P~1xw690O5;nd%Y|m)* zt($2|SCr;Ay*E1dNQToQzqH!hI#tv!AZNA3Cr8RVbF zxd0~}fF3#Kr&V(mZxk(jC=DqI7;VYZA4s@x`d`a0nmuuy-RcMcK5;9f9hH_#97WUy!3y`9Ac$|OW zJdPjfk?Z-~DYK5F%8PK3Lgo2Yvb*RDO{LygQB=Pq6vO!1q<2T4aW$&N6O zmQ6Yf54)OH&+NX2_H!4!zxczv(960ko8Y5CMi|0H3!n+2eP9}X6V8#&YBL>6=lyPb zI$F*$_@>QQPw5{-od{jRioFBL@Wv1N3txNW(6~p<7FW&@ab62xCV<(AnF=%w>oDh7 z>JR-=JJSR9`(qzF+SQbtHr+MeWq055R7X~{ZizFt6qkFMUlSkIJwK%J!RqiJ`+Md~ zKKMmmLQ2V+tm6>~pOei}%eS_(h+ok2IzB}Vf84<^fn*a_xAB=JGl`Fg+?lmwLXwV- z$o9ZP7iZ^#Xgi^LqaG6nIBIv(_dcSdW}{Bpovu%P4nOpyh0CQMLMG&q+FDybf^A9C z^u|!cIFP`HBt9YN>}wX=J*!N5y690MXirHxhM?+aUi`DE@*#tq1RBOCEL(FTYQ2qA z8b|Y(taT?UBWE|jY#900hHw%HOtS5fm1`5bDo5>2>35a3l|;hKN=Lqy(FRKfYwP96 zwNMy;wAY8)5;EsKlW+(9(f*pwE`nQR=Tu>s z4Z%JPvorJ5{|vV2e}yq_2DXHBoA5EdF+u5C{3G%+#7Ze1G$`JBJ3XNSG2h7yyOo&m!N4lEVL2 z&hrrP1*!z3YCc|-OrA{ZJ?+E7;R8TyqYkv;#Of{=c1S&PoL}z@YN&j5@50U z5P3mnBRU*`4-+0tHsX4$8fn>i#Xw3CH<3H zjQac*LA&Jr@6Qc(FZ$by%8hTW_5naT-rXrg{{R2(eNX!H??cvST4yXQC**H&!eqRi zy3)m7{1%c&ctaSHK^P)2+phe)JTx}F7?S~ltZ2wiv4Ar^G_6X)3t9qBl3Gd%U>#jh z9e`Jx*TkUDd}F3j9>7@0K*4AcA-@68Q0NLFUeh?89QMtN%AO&qpd@WAFDPp!VfHFf zLaj5&z!a|)dV1HTfZicacDf}D=`Rh&GMBxKCK&IzQc5>5mhF}P-Pm$~HN;!Z=tIZ3 z#`6(&^C5}vp%u_Z^1(imwWm&cu>$DsXnw+u%%adQPn}73aD)>wZ;gX;#wAZ39jPcq z`@|4sTc`?Y1{RNE1I70hhYfftxy)P5MbuR&u7^rX{uh1gmJE)ukM;VW5tT)%SBuZ z>ttb1_LC*2_#TM#M6|#gmD_UKW=x|Jaqf^M%}vr#>%_++rLELKP3~9^f_S&$>|NH6 zVrmk}R*31>7I@9DiiFTkGb{LpNCtX|m>RKfGnN{mF*i~iKVhq0aDo|kxYJB>ugD}y zMLA89gWp`t^Ga^UjUWsJ-|(l;%$#^46zUyMI{}aFbiboM@E=oWY$>p{WfDmKnveCM zc_W=35Qd3u47xh}JmR3#w1;l&r-0%+=5_RKuf$q2%Kr*|{(^}m`yCq~pbd3;aI37_ z!ngUE+-+2!xpd-=8otH3!`B!vicdD`t1LIEhB(QsRRh#edjYC<(i_%Pahn%dN7ahE&(KH2z)2vUIY@@cbr9qpC~Mr|+={|Z+( z&I&bJ5-hQ`Hl^0nM(Ym6aIYqiy&6y?_aK~N)|ZJ-1{K-+a^z4o3OWc2|6)HQm1`F_ zj(Qlto*thsPy48U9H)%hb}Q)2wo{hY6-1fLLlj$P0`1`68ucGSi=9`R{ft{qeHB)p z52Xv%UI(+5scPmiUD6muaj-2eP+Vtu9&~GhP-<)`Qmy1yFJ*I}P^TFrr>v~D$tiQY zMyLV6vMs11KJqi-7<{}F)A6fdva+zdNs8y+cGENMDFq4@G3wKbuL}$mGg7%nP|E%N z024-HRg)WrUyzuBKLtu1_;Ur=Axu+2YYF$^QL8V?J{pm?@I?WpNMSdMdZ~J2TF;|e zYTJQ8nMI-K@eF_0LZM}`FCv7*wy4=TQ63>Beya==*U6P8@dpi+%y;Nm0gHQZReZK~ zm(HA>y^NV)lwIfnQERS(9?76dXBfRjOlkDp6?%l7NM-rDq7+W6T6sCEl~-eXU`!eL zPV^|HT`AXRFrO@&8JtD-hWO@W+&Oo(3^wctXa|?kCX;@oodmWBz)_UV6Rn2zwlEen zxNyM29pNOVlA;9wE&xmu{1#|IAdz>Br+$A&WSaF zm>^O#si2qR&(G(}&gJ5_9`pA$ik=I(dq%wa$MpUxz=&qVbVSKOj~49Ah4)PAzJE0L zi!VOrNmh`3eIH&X5zJh7cm9uw_wsLoA3^hzHhM-OCOD`kWmKd8;g=-{E<+WhBS{Zcl)GVEm+5d2 zQ+T;l^-bn-@w8$SttfdSxEOx~2>2@^&-a_#AK}w$nI!#4)q1kaBPU5>zkqs)<*5`s zjB(>1@HO)kDUr6p$g!k)?JV>6eRJnlYj-#F7> z>#6N13W?6Ch~eVwUUj`vfAL;)%juRU+I0I%ZtAOVOk32hckid@*132nQOAoy(i$Ih z_uengICSXKz@=KxIz@>x9j#JgQ@hKrv@aYtd|qpdH-9%dQTiFUJ3H+(=3+{wIL~u=x6tW>PyPf4i7nj# diff --git a/docs/articles/AMR_files/figure-html/plot 3-1.png b/docs/articles/AMR_files/figure-html/plot 3-1.png index 6bc000b5215dec49e4efec9cf303ec65da849676..c742e8ea1f7d5aa4bea46104c5f7acf8140670a1 100644 GIT binary patch literal 24259 zcmeIa2UL{XmNi;NN<9h&KoP;hfP#Vn1Vuy(6a|SA1Ox;Tl&q5T(K4VSDk1^`29PX4 zf)Y)Lh~%6R1SE^(SZ{7TxBK?%`}Yg|-aq>GXvRIGxLEbo_wBIOTyxH~J(U$@moDa7 zOrcPg9y=!VtiD3o>A$$xXa+Xl{3DC;T5WDco0 zJnm^Y@1S0hDfQEq?&0z0{M%cW-k7sIcAoS)%UF+RH!7n?8@WLkf|HDh>R~ydwpe;f|ikp2pUtV7I z`Sa%=)d^>)PeVhEhPx^{g;+|Tt4C|})}^x2Tqb){yDMYm?f2g0k?4t+4%}lwrr)lkunDef8gMmDc&9!LBYgE1Zmp zg4T)b!(lNoJ!MK#ncuFheJHH2HySM`FYi8C*TlijKHT5r{+_Xj^}ty32UaPU;zKO4 zy6JXbAMM0I5AR!wE1YWyuz5T1^8+h$C|oMD<)+|)nXy(UU2*4;o}62poU2yd<`Na) z=jUhK4GeT1Z}aQu=n&RUibzb|7rYQ37rCIYulaLP5wFO(;^uc(SXg;Z#Vu)a9c^HH z|K!jW?WA)mHPwk{^QBoOMHoK|CHl*|MewO7o@S-a*4%Dm->&nzIph?Tg)7BPUS%JB zHPl@dr|sO7<;v?iRC05jSeKi&I@U|nu(5wkOia|)MFVmhSNKXfD4kE)wQI(G%7U-> zvAP?dk&)3Os)&y7%BP2KarjEj6H&ljRh#DIO3y>-{wG-6Jw#FYiayj#QnB7J@}S6P0@aRaN(bMMK0li9K4#slwp z)W~3J@mGtGIl1j8^6uZi?-Zn=ZfV)KT$WqqRc1zpOY0}E;mG9y!afTwds2+&FxW~( zmTRY4HjG`NZ>Yxi-B~9gq?KsYkY-zmO2e`W*PfK+bzMdOQUB&r=D+@PMD^y@3QhgkwEQEEj^nrkIu&#Lvg$l0@!-l- z$@$zq{7S+5Y)va3N{&=Nm-Xfu>?mTk@-k0qXmHTC2nwzhvpi*B@GWbyuP#<6)hX!r znyLG+`T1yry}pJ<<<4C06E*jbZWK!U@vP*ztkh`zC9H=2(y)9^eV2p_t)DQ|A?`Ed z!;-&OYsz(Y?&Pk<%t?eBmZeUICwNy=ICZ0ul;-?TytbiANcx)rO&@{}PiRUfE`_yI!Ni`gZDSdbLsKpb9eO=#G1Ek-#*=I<*uWqR-Wz7yi~Xsc)_G1 zO5MJ}wyMr5ThjRJqdLp=l6|h^nYYx8 z!|p2M3S+>>mHdkJ&i$G0zkEW}g2$1#uCk@s_v;N#$?zq_>Te+Ty8`#?fZQWZy|Qp= zl#}eS{D<3FC5MXH-b?gnoQP}ulAoV@dyS93|K5w=KS#++320bXn~_m}R%v6UqLt<1 zNPViG?N(7cInq1%Ck#bbAfvYjkF^U%yxR(4lvtRi}LX{4|x7l}qmX`r4Kr<0p9a%Y&^&c+}7L zHbm=|K0AEtCL=81*RP8zTgbQk1$jCjQS*#cqu!51buQ#yCt-Ig(I^kmH)?xJ#L0sy zqhY7WI@#sFzwdRcsbVXcrH1>@OYuN^&whD;TghmDIz3X?k9m4oqj&1mskn6GCwq5m ztq--~vpKFVTl`ve^1^98w#cL@-3NYtRRp1(OH)$mBvp?A)_O&)W}M!-E^h0XQ*VC7 zrZ#@b%iG)RF|X^u5K!-_?qW>#!Lo82P3!L+9qzyK__3)XNB*cnk+6kP{N_?en$0i2 z>?s1}fyIly#hy2)QF8MJZ}l5og4a5QY1NAkB_9=bpFcW)Hknxo!~k-(h=hBRO;yE0y*Syra4-!7;B_>CR;6#|CdvG8s?^?HYx*l00=(fD^C!4ckuXE#00 zgt(5>eBB!!?9}Bp**iKlSX2}u<=*zi7eKtbBD(4re^B{T>Febg1kIkVlXsZwD7T7} zQ*6d6@l5ACAcWA5H@}LhR@dbP70Me}6`$MeHho>qwyo9UXxK>WTbcE$kwH}3?>iIB z;{y74xN#AR?Z#&E@{Ip~UjAnYp85Ir%}rTpQJZvZ;|edyuC7l!Y^sLW*V!GlUv$?k z@-g+mvKuFEN-aA+zomT4opX~<-VvVVTwWdgK21kE(j@%6vJWEMS?Q>rzt&RD;G0 zN9VpbCTV6h8mhxwsr^m9vydequED;^b^KRb=S#i?vmYpSIcsce$tx!0czhc^{})T8 zaFp-f(Tyu`t4f=FkS43&{yA^(*RRA^uO^2&FM)pGX7&269pxoy>q~qP-?N z!$W4eG_wOl&Z|-hF~Z*TT~J;ZG!lrKB}58F)*^*g^4o{&QiET2iwf`m`F0+u&4cV}BTdgV zG`+U?I2+AG_KG#wl%2u+m4(cJR+>H^rFdkz7YCp>UeHsv-IYO3U6H)*Qx|gb0-3rM zU6+>#MI05I80nP&79*=LKK>{2)#IIKK4EHh)doVseZo$mnJCO&WQw&|;X(>2YR>~>y1#as(d|H*4@ zh-14yCitZ(^A^W;uKf-_fqv*zvKmm-}1mjoZ*?9QBQ(s$|%qcM*8YzAi; zquuee(CXBenkxXx9-BMvN-v8X*|e8o-R^I4jV%ipW4qn~x2Z9!?CFtGdEwZH>lp-> z&y=4~QlHv?q2;5gEYP$B-Vx;}lN=TGVl9nMRAWP>3C& zcd70Mi3heBQ^M}!^0TWgnWwibyy#_m9~b?RsF_BxG!{X@=dnVoFMhgqS_M%c1l;kx z*Vx(%gLGzZ#dH~%Y&?9!h1_+bteNBOfq~g}x7v$Bcq9HOc*b_dGlsevRdO!)#xu0%272KB06;mr%;T%m5y$m zJvj0*Y=7)l{4i%mvjOY6!S%+rCO4gZcXg6>UkPW|eAYHDG4NF3s3W&JWc|wWKi!@D<9mu(c2+1zdVxT6Zw^ zGgiI&9!$V+Qki1(@XWn5oeYNyV|~7yx@k6x2o~IqDAMM&J~1 z9NA1yo;*5T07^h1jL;Upo4bB&@%^cN}bA zcj@a+T)KYltL~TS8jP(9422^ozpES7_Dk7LjSVF8xVCzUUA#notlqRebh33u-BtN@ zS>;PzorJOu``+RNFH`b2I+gR3^`T^&4UC_7_KL9k1rbzz?BLY%WiL#x-_QFFG%rwe ze&6qGX$9t2ojHhorLb{D*$aiqia0lQJw3hQVkzc$(W}CJW>8UZ-kTU28k#8Se|)CTKAW)k($sJSZH~$F$1PRxyz327;33VskA2`3xP0Y+>jZ;s zr233EvgE|IwU)2Rx{PZSJ zH`FJaRgs#jH1rrdtI}Sitr2`G%_fmOxnhC~;p->9z-#qRLp%zg&B?kH3r?X^V^!HR zWZ=)9J-b~eW!u)Rj+kEA+pAUH>^&MgUEbv}Z&^fjq)q+n3nZ9;xCdWc^#1*OPCbWj z_~OMh?u(ykAFeHpuClVykr$aN+9daX!+ zr#_RWt~)LcO#Ztl7t0> zk7p^``mIQ9Za=T^s`XfDR|uu|{31ygd7KaP1!R>f=&P!$)HDvu8qm6a#jh zl`B}xij+%gBFtV??a3xFp|<*GkRlI$+*+OmBZ(q+OaKAJ z1z4J^xSB-|i}qy<7KXU|%0q^!NVRGLH{T!sVVUd1(3^ozYo(y9%$c{a-l;nl2!)`; zsF#A{FPqe3Yf~&HF;CN-O78pGADsdD^T6N#4HDZjE|DLk7)82`4qL16Cp&kf!2*`@ zAa-uHm}ZKg_l5+W2o0YM01sKCP$JRV{VpDW?> zT5$K`Y@FoMIe)%$pe7vu6uFj%-P+vbuN(S*%##bBos$dMrU;k=wWR>4X$ze{>zuqJ&()>u$c_hfbam{Q^ z4JGen@3jX2!F>t2JTwN9i5bH2Qtl?J!XSy!{w5|E5$x<^_Fe^=((~>h z7)vmUu^-m#HXiD0NUts7o&F)a+xY9}f`X;Adb>J{zpi1K%M=8$*jXADhg<>hWb>JJ z-MltwYr}#)CzdW1Z*&%a1V-5XoVul}YgiL+s$6~7iai&!=1627nP^>@LxzBMRhf|uW zdFnzA5PDUyAxSC?0(+jvL?V`9oO`R{^fy#VU&R>H7dzj_`bT~A zfDN;eXT9jJL2O(k5J#+zJ6vgbKQbH#O)a492E#Fc%wde^Y~B1;qVF}aRs7x$0f|Do zX-MylC^#{W@@Z!0?Xa+VFo#XHKV+pQN{TS+36Oue_x_sbj$@)2D}S4STU_sjT_0Ew zLYVzek&J+p-t7XOGML@vg!==$oW`OvFC%aDFg6S9e+S?N?9D-c-Jdm?GE8>E!NKy? zfw$dI2tYm#l1N?ti3~@;(@#`!AX+*VI=&U-_XQ$$&b$G=k$)aq0FR`T&Ft=_M5u4D*tHL+i1;7= z_J!A8Hb24`wJTuYy-jEs!!dSirZcAp+j z=HY@gjeq1iFduhREF&V)T#XX+gsN;T$98QSz&?%rjIe*_z1aSe1&VxL3J-bSb9^bi zo1ZUL(bk@*Ynn-kh=@Qj3i<(HtPl(gVAIRgCO2pJEg+ug9QoAV7pDa%P5t(Mi7+?V z*koxUcI2_)QU_O-*kr#g0u?*ZlCxmJg6BuPKp`)peQ$5qa~p3PA0I~rI02L(=01)E z3nB(9Ph+X?+UI+$srdX8&xoeQcffCm8O1v_6#W9my~c*1Q;v%9%O@lv9;Y8q!8ZRu z#wbg-?=Lu|mvH%cm)_c~ym%6i*fQKN=bi%(Kh2GDTWU0^ob7Q2QP%YH={%#vK7L{S zto@8)fOOMdu(I%G$O_sOj0tVpv8MuFxPz_)JRCkfl)!DxL zRj1{ngP{R^Qjsk!EkwexOdh%U@aFTTvxw*Tj);hJ7$#4dXZRra0i86PPVh~(s32#) z^Gnrq(H1XRlIzW@|7sdE`B?y&?y*u;uk0@UexfDb9c8AwDkdarc)e zr9fwT?j5J?@6J7$wQbxB3et_u#NE>v?1CER?X@>$Bj6i(Y+I=%%j0MSD*~2yFp{a~ zN`Ba7t^m|TI?%sp{E>hyi_}zZ&Wn}U))?mXBI91}l~u=jjdns%StLu0_rasX zG7+~vO(~{20{F;T?L^S+Q>`f!X+XixOx06WP4s_`aj80WNdZ9r(4j+z&^D}q-GK{+yLL!PF@2N{`0qAROqR`b!88K|J=KGuX>#z z&+Ss|>1(VApcIjHTdCq?e##Ujdhzj^sq+ZW5t^y8+!sC~ZxTWSaCYClqiP}#|4s%e zI3)o~lUS3>B`^j2AubmyMzD=U8O5(mivD)xHA^$xu=}PbN1I&IN`Oc{pv-@IohM4O z$hjv0<`zj*_{?0XnS_{_Z46}%4Mg$RC_XS!sVJv?O%#LoJ7Ol(t>%kXpH7#Kfe)URK9R_J%rW?yDaFRkZRlk%&xNxCWswLvzNEv~i z2SY&&f1S(M)=HsAp+@@63X8_-XCLTQQaO)=%e7>E8&}%pR?uO8&>mm-vUcZ3gUE-7tXXnyv#GYxb^`t3@fL{I^L8U?Q3u!xTT*l zT&Y8f3kcqqP_;nzWP9I|bIU5dHw6eN9^e#-p#W6h3El1F2Dft!J*vhN-vL2V8KVUf zEeog^`TW7Xd&}u3Ut51efOt)O2LKod9fL^os%n3Ibd|MQSN)s8@s1EC@alHmv>|K* z$*zd!yLOXu2oZ+V@7MrWmhB^1ck3Dg%AN$2&*%2FgC4@1DnbGQuRL6(F9jNv>|;21 zrKzM^f(m~^Vs+kma8BjlcJ6y^JKQ$ zG?E+iS`lP9lmHqj{fKB%lQl((d)prH&iuU2&Uz2P-Xp?wut2O+=+FKn-#NL!*e{@4 zK-Iy{N$Fbq7>y9G1?z;?;hC0--{L>0-0R^J?cmpdAE7cMC|*!mgHB3 zyLHF$;_;99iHiQM0{GWrYj6#Zffdegdjj?0Ja>@Ap|=?BgJ%d=m?nSPxs`(*?_2LQ zOQRH5%gM>XG0wFFDdcLpTFUOf2ntZhl>rBEk)&3Bz>eEGYX9r6{!iJ~p73B%W&a=lF8Rh25MhkVIe&6sA%*Gq)Ep4)s|1njZbkm7tfAxgb#Dfn@Oc1EIO1&s1Vk^ zLfTV?4@Ph#rsF5h&obLjEG^;lhMMS(C7sQj?k9i@t4$vyI+zEYY&X|5`QO%6TOS{v z-H?h2*N4!hM^MUF|H1U8>Ar~PcR&_MfFdP64;#+vnAsV7@^XdeM~v8RG+S ztfPrJ-2}Z9zXi`*Cf*Fwl9K(O1%9)mn)1mqz1I#rlal|gHjs%Dphk$E*XFDFB0ZvA zo-8zqjveee>uk$a5GtY_Bc42IMr!+mMhxvqKvBP$DBZ$wF!`-7OqqfZ& zq)=c(1NeblmHq3BAf}M;5#i}y+Xdn1#JwGypJvxPfww=le!pn2y+8siB%O-esCj+i z48do#-McRVn6mJ?Sf}Ox%fbK>M1{+ofwujPL{t1u#ABdT`|iqK;4+?_hBBxjOLb4b z+B`e|Xkaw7nvoGPlWF1TT$J3BZh2=e;l^{Q?cWJuK8be zSjXIZ8ywN{^i-_bb}r-d1B$^4w!;f!Z7J-@^h1YL&a2Br>@OURY}rt&mz?ZfRhRqi zS!U&;q-Q5hUd}zVZ~=R?xW^X7!$}X-)||a2W3(byRk9*t~6Ti7KaE4{;`@s_|7+vy|K055I2&u%|LO{NrbwLzpMW};fF_gFQSYdv}`aZoE#h^G66&r2Rk^m@2P zDY9_OKisxv??oe2^Ro^Mu=@3L zb?>z3fWs7QDaci_K$%wH^l1AYk3{WAHT%)#vF|=g;Kgm>_keLj0bfaDz(=QJ`6dj62_AC%SHAFQ@d#2Pj4tXB zFZ)4lrC8K`GE6wR&F;(A@KY$eX$+)peyvNefzDR)Ch95!iUcV>5sFTqlM6A4i!Kf* z4hx;%HuK^qhk)$pvv8EB_T|Y0zFC40kTk+@oD4qwB&f2)jR}`O%uY1hdD~GAU$_kz zY)&IRT9Fy3$AvR~(hbktX#kw701Efs+x|$d4Ng{8nuuBDwgHP{$MPnIyP@3@5sa`3 z2y{STkcigqcd$mIjh*9nq(4-Nai)&An^J4}{L0!sHdQ`BK|$Z^yO-a1F-s|(ySR6j zQesI-TWbx<^%@(ji~_#=ax3EcNHLG3!mlQ9JGT|7gvLN?*CsiXD{H-Tmn>d<#EXml zRt`G9vMd|YKw}hwFpr9UnFgCc6wf&9(U~Zhq8^5zUIxUC?0XY-^v#mJB@b%z4Efkp zwmzmB&spAfkwU9j`E*~)fW!7tYVwP|h1{T$5>Cc+F_dDm$53Uum6w2oCKLs5EGA~N z&#jLe)OMjss<&yTH|A9#I-3Lp1Ol)^z>5D+3>&PDX$ZSt3kpcVwqlc(mKJoT0g!bBX#<>t1WYI`A#RBe zOU2ZB!_eUbqOO8lHHv%agZdL8xmn6AVm2S$AVZ3Lq(FS7(~3_y${ReM1Gu6xXiTxt z2|LUkC}y>cmSkR&xQ|6E!7v8}=>3q85Wx7nO@5@Pbem>MwjnKI8q-Xpi6}lX)JdFA z6RJQUaj#o$MzvkNdKI)nMB!c4&sQJc_=n#=ciD)htzWl=!vo!R}B1>u`l$`s?aercEG+Y%Vhh~J1HxiFL0LMP)PS|ayKiiJR7 z#pZnV>J{0W7;j5I+eV0^s3u17pX$gx2N`)#)@C+j5)NAA9UZ0EMT51#Mrv|RZ87Es z$3naew8s$NozJDC8wyJDGdK!}W4*7`i|sv1k6+llSs++^zn~UvV56h(Fx%lmw%rIB zQ;ZL3vV(;U9DwfM+Oi<8f#xH8FpB6+W?4W@M0(Ci0gsEGmQH_@;F{25KF@TIsjUT3 zO*Meo8&6^U7ne2UtEuO|-|-@#*i}xwlg=ijfGj^4BP6xZ5ey7GXx->tW=^ozkT;7Rx&gg_LAXqudY zX`vfr$MALSlP6D3O675cNkzBu&^Bd7GY>8H2E_Td+av&f4YTYM5esbXS?{pXI|_ry zz5wxs7%z-o19--;xDf))N}lBeuf<%Y1n8auvPQW4dV9@oh%vCgR}&?(Asy42QxGT? zH}DhD(nDJ{9CGvxSh`$ij9AdxQ5$%?t1fygo6YBrOaS*^+n;oy*M3oCJXG3M zJOwiApZz9gzqHK~v$h{w2OtepTnty1z$aAD%P^@Dv1IS^WN=&m{{3^go6UC-x=Q9B zBdGr-)9@dn#Qz=7=&qYtO`-7Ul5+w6Ek^y{@$LWLeq)8wD8=n9Rx4ab@gSFd1vTx! zl7To!b8ulnfr3F@fDHkcG+_-kK&Q`97qcusPoisP%Pp=HYLV`6+~Cg5}FIl(|`X)%Ux+8o!RIR2?Tvd zf0VQ$F&^y+Q2CJJTyhwa$}@EWnAlI;*H+c8TSu1*bs!qt2?3%XioAh-I4r#+npN8gr;T+*$GwD)HmdEFae-X@ch$fzRh1X7-{nGPQuSuIaZR@d#z{BmV-vBir4(Q)*EfUg)JG2^a7{jsHWm7%xN)<5s9LQDz`A)V** zSI+TB=x_{$i6R39nmlj`Zns4Uik%>*icfga$$!CS zf4>eEazkL0nELr)aBvVyr}HC+J?LeSlvHZ-eW9aZoc{CP|6VX&D&9GFzb^>b&jl9yp*pJ(czJg8LE<)~;e_XXoU+&W56? zRFdOpAQoGWVM6mwip-&}Ru_~@FpTz>&(?z?Ln>8)g z2!fMnh!q8We-H_)pg!nNcWJ^|CZB;?gmj5;qBWOGGzu2CygwTtO2EW54(k|U)GNQR z&a*Qs;%x?_v|T{J32eE5s|4Ja2(6g(ZKy*a`9NgqLKU0yVY9IYL<^{85KiA9nvzoQ zq0-V3a~PSRPJJyZf^}j5La-#dI*ApqW$l5d@$ox^h5Iq%D3J* zw21A2Lr!+WI6>HSVa;m8kYzW=y0fwmYSM~xwX{BZttCURX4c;|C*H^oP1)|qPt(R*dAprN4wEJA8=$ehADDKVIu***Zm zm%vxa^dEaHyk*Nt_}$1|6K4sl)PAk)1J_8<1xEnIf;3jc8iAI3km}rUdCU&8U1#Z8 zoCSn5h&4_2Z&=d0)B5q3uS|bIcm4tBRamg3E6TI!2NXS+7^XljqIH<$Dt1AvPFJYo z?&JCTpk;Wyb924cjzR##y~l#tLx&de-M0>m!95^`Mrc&o{2}9M=!_uoABQYy`RGD?HvY^!r>U5YdGqBsB)2$IXrwso%@D5B)Sk9m=oq7^- z_Ymw+497TRA8?aWk9VE@f=1!WIDIBEj~Ffu(`KyAm7&^h)}KIfSXSpSJ;-xl^GNRv z7^WGt1`NXhR|J5mA-Hwx8ze*`fP?vo2HH!$sHnUh#1Gkd(78$DeF)qEGzM1W0cdr; zDdkAa-5_Pvw6&ee6vT#m>%=&2Argr1@f;)#R}M z0N4X`oT25Q&hzzmaGy(PUmx$?jh_M0gWKa-SSEd;2|@iIOw1ROpUF(avd0zC5Q$); z-VL?50*ntU?W17=gf%G@2lxe&E$a5DIAF6f*f0(u=DV5l?m z7$12ZU>a&0gp9BXi( zon6si0e@Mnp#gd&d}?goqk~YIN@V`9c8pLkdNEomZeq9kPVECzjQ+`ph%Hw?EF4Ri z&)s8%5t_li--b<%E>f~Nv2O*pXU71iE|YT$nvy?^5fWtAfW8;SMsJC$XWt~I#jvTV zvYLS!kZYI_Wi@<-^?}JgL%#m)N%b5y z7yC_=&bAYt(_hdSMY0RB<4g-@_R*f@Y<5hYn#R4L?4g|`A*FxRkM%i#xPjLH83a>D z=np5V*QuT8%@`-PaMIaUZzMF8ojs;L!8-6g&j--k8##wCn$XxmmMULVyDNkxPt@C+ zV%As5*0Z8^$L@V)8x;pO$N8s&5eXZBl z28OvGZ)VGp&WWu(d;_H7WiJsJaO3%1Mv z`<=+9*s?^3ho#HOP+w*3!y`3MwOyR=_#Xz;r zKsa(eAt77v85URx3An}V>oX^+AQjb37_fFBpfnv{X+r+O2aCy0j?wGmH?S=$7y+p_N1RpD0}J` zJmlq}w}7(rA*hkFDPRp5LHB90dCf)ez`*`kXsZvnI7BJVcZ)%YO*O4BMd~9R=;ZVk z7zeOdO)+n%`Y^}bko|u}3X&r$peV8|<9_6zEDz92ninSf(yg%Q;NQOZeDQg*QAs~K zOt~)1tfdCzzQ5V>E>7!y!@@u zBJt`t(jx)b7L1jKTgH;DMPkF>I?y%!2=J1iX&8}_fT}Y50HATAkS(wt0P6N_+sqLL zQ6*kmwyqYUKmafIh$8kLIg? zxNt{~CHg0@zSf|@TfMq;)}I8o<7-Iy1QQ!j;3YJ&;WW2URQbt!%p=}_R#^x0I*x_Y z2X+L=#itz+7o{eCJon{U+z40!90*&`cD)P-RLbB^&_7;I3>#>9uo2#uN%|MDB!N_P z`z|iNdoiKh@(>FpzG?M78-URg^zhy9`}3d|ZvItLk_f_i%LxVnz7S{uR;D0>$+cEf zR6mpM_IRm4AcJ^=4+6dMlW_Q6XM<%m=*6Kqp|b?)h>54(NxolP9Nt@JfsX#+$qekoWicMs#Wc4Lsd60fcMCe-9`w!7b-LnBI!Ln0%lPAC`)*#ify@y9| zbaD7QBpqwyr6pEV& zYFCyBR5HJJ6;|CaqPg8>OVAc)YX04*_D~3oJ@Q^WY1xhaD7>utt>s z80q4V8S7;|@Z1RX*N5w@{kSQ_7f5heeJ0r6Sx~$TgCw~@iYW!{8%D>36>bcG8Niin zC!#r`ZtZ$ARlOXc5v>Sh-QxKyQ7548z1SJ%N8CsD9djwlW`>BJ4QD7GBE%_`B=rpBRFt_F&v8sI^2u*8XHiu-w#Ud$t1@?*Whx@d4ii~*U@ z6oMW$p!6mzA|iQG4Uo);t(J8UF9J4S158=Du&?68N@C?jC!!SNCw4Fn|9FkltNM?u z_Rd8&?-!Z03;1#zxMd8-KIz{ z4bY&0NPITu7gDw!5EG4o>J{8sZv)QlHB}`0&IJ7wD5RIrrhx6x7^nEq#K>r4r5qM0 zwnBqwHc)Al<(>-w7U4$b*^>?ZQ9K#AT~9Wel$1NG#mcxlt9L%bUi8(wnPbSD>1WPd zk*&UhxWLD-MiHg%+KKM#0u)FDe%=0q8HWbH7tq`&l;rK>j~}2z(bZ;*flK_?Fv-@oKhDMe}&%)`&&I5Jg>*A z+5Sf9=%2ct0`*~Wy1xAV*OM=>=ujTQpgy7UoSGzCsTx(D@4I%QIW@uIJ;3xvA7xIzb=&@aBu-s!h)hDT+Iay z5}k#!)$ED;3JfD+Lqj@ZefeWD(x1^#Njx?5)o86j0bsAi&v8o^K-DwOr|w?mM})g* z{c+GQ*@#*K#@s+8Z@QwQNo9TS9!`PK?0MRYGxAo@PlC=v{CQNpYXgnPTM7*p=+U>M zeuKlQDSi27E<$XT;$oU{uyCbIQ>D<%TRYf%bHH(u1v=JW3AuIqE{CnCT!Ic6;;r26xLOIO~ zgkk-pI?L4=?*V)2goR2RwQF>GQ~^RrYbo1%*x7LUlFyc@ggLn|JCXA(Hf1YhBz1VS z5;6l(1Kk(OonwCR(d{nUe*%1Z0=E;vdDSaQ^hA|RY0h#$4&oH!%9n!aVr7Lu^= zG^aX0V*{iQ7D|vth^U~slya`r2;9*lz*N9>X)4n3cyO5)8(pqXbq&Bhj_D~O-O&mG zJ&x|hp#;a1nLv0CR}2E}1FsiB@ z!|=yGutdHE7$>Qj>wB)(ZBkA4Cnse=LP&1b8KWV=VkeQ VTEw%P-cPXKvBQcoFX^W*{~wpP$YcNj literal 24229 zcmeIa2UwNcmMyrIqi_tc6)^yUsDKhgF_49`!H7gjf`AwiBuSR2Zbd{zMMWeTK*>2t z7DXfol93z)1j$h(^;meiUfuVq@2ju7>wDF&i|;#kdtrxvuYayN#~fqK<*BNCXyr2Y zWfTf!<&nb*>J-Y7=M)OVDW=5~3Ptmm&MG|oX?ggBHHEU#gZ#J1yL0#)g|dlqMBy(D zhk(AOiw>IAS+Ya6GXzHYJ8o^RT3oJ0-DMUH-ko!RT+t0i?t9vgL&P1tBUSy#qC z-sRY>&wTcvfq}tj*JpXAVqX#bl-Wpx9Qy08zg{c4o8>KI#y8k>W%2*F9=`hRc%H)L zGFILlJ5`GR=#eT9k9>O&!7D@&LQhMbDd@X&!P7$+%{kS!j){0 zxnkq!=oqL>;)VU~!Ht&EGehrXXM0p))7o!)%g&`KuPc4F*R=fQfg3k&Y&mqVq_}uF z&$sSwL)WR!KuKHOG)toc7Rk~JSMZJ9Hn%+d_?xQ?jLhtNjK4hp%Qk(e$-ZSJ&k9cQ zxD$!z+3tS!7n2?PA}`N0m^rHaFQ1ylSkUId?fSFLubN9L+GpOV)A3nULPFy4@zw2*4{sH49SW*Ad+yxq{Lco3=i4KHDtsy` z5?y7SAizgUJpWn1b*XUxt}4Fz=+UDzrm3kZ&HCfQ;jfZqqZ1^oy8>J$zE(FFUg-&~ zQrdAzEFm$mA=%WoM_|+Y%L_lE`b*C0n46m;082(w2kf@^9Xp@?N1awmnft4>H1P+A zHRi2D%onxDHl>9zN%#L=FScZEuDYy9;=26 zx$#pP2}wyw%5OBE1P8l)SanFl0=RYu0N=>$1&RNolG@o7}E@|7l zhW1p($?oxl_x@ko=wIT`6i5ax#ozZ_#&tia=j*7}HjK_JKIrH;RpPf>p6UA1l@XN} z@dUXosWN|X`tT_|6Fqmd^NGwv-7BZb0c_>z%HTN-Ev>b*ZGwUvQg)Zr)XKA`2e8Vu z|MJf7`Cd&n*&8Y=m+mUyJYN3r@YWsa-(RY|Iw&*QXkGbQ=||(+(RGH-@kZ}&rkFJZ zxy?=e9q`{$JlHt*_SQrDKlqX!nxul%h!JE>SE@S{yEWLq0*nBR=e>1J_MR-e?RO2n4wUf8@%2zx2=*lw?-$ZXECL&ROcPJLx zlvC25QA0tBj+d@nk~{I?A92y$*|m@Nn${c(5Vsm=e2XG|uDdkQX`)Z!?5F$Ju3h_V zXxnI2U^YiT;=>o}>M%b$8Jjcri@j_EQZt_T!$1_@^UD`fF)iEjI4m;bQRe7hvR$U9 zM!U-ZJwD#qAl774X`a!aQr)x<0HVD+-)miMjxt`iDUsbGH~t?0hg5ff^~lJGR?JDq zT7CPh*@=c%hrF`^S`renN9UgL2RXd_II;csYiVGDH$hiS4ivvU;6-CvXW(EoKQ|j0 z(1?_7lSv@oDSy*UC(Dw54n^7uxZN`SOs!24oToum!InaGqlvz+z9%mq8K1yf)CLC^mRo$Sa} z*rdL4-d+tUs&&gsPY&OhJ2`^2UY+s#QT+K0ZxRZLr*+Dr|jh0b5@$I-bMa9KZt?mpavSX!EgC{$_kel66<-l-HIZ*Nj z^?X^7e(3Bg@BPboZ2Icr_XW<3$GQm%3Q7TpCnlQeM2Z3fll{8dr%2t~xThktSnCnN z+j}w*z9B&lBZzISY~kq4Oy{l=KOXvD*O!{bdz=-O!0V_q>?2cYBj7@Std`{>nW~|) zKyfR1#=e)I5maQv`><sXl=+Jds<{0+e&WOlrWa9BmvBJ`4jjN1v8avF z7c33fbFt#l_Tv$gLs*<0`ssVb#8OYQlnX3n;o_t@%nTR2QS#R^FyNxqC0(oxIpPy^ zr8hh?Gm}+W+{iz3Cq8Ra6Z;_FD^G>?mtH&A_nK5$m&u5k)hD3~avRQH$Fc7c`o#XJ z?qI{I5`3r#KY#brGxx$P-cJwaaMOOyP3Fw&XZ$hQ-!S=sRmFLvkbe*u7(pW@A`+XH zmKGHyBqnD6;npg=<=2BEWRVWXVv*?7blV^M&X+v(WaW27m@Z!{^r@_jG$Jbdr@mFq zz0!NMOnd?x_j7=CZ}^*m)D~BS!Az#(s8*CtIYK8$#wp0A;z)mevSOJj-j$M)g;t49 zwflO`S8>PNv!mU|p6v<$IAJ*3tDU^zrFN_Vn%W3!wEq;jSLF_qt>iUfyo<zrS++*E9d0vMaxd6u`mNo(l5b=@Bm& z=}Cko0k%AAAjyBto1y(tmp23JRq?$uEe8tECR{y4U%I9Bu=iSF-Lsoo-NloQ%Qsi@ z%60iMomwmR>4So?#-akm@I<|7?3YgwCf8E@#b^Mc_ym)mZp->P9HbBXunB6NP5m9ifIz2VoRoATHu>tp}4J#Q;Q*!{IBY3x!iop>F2m|@`sd-T74{n}7) zSCNZ#IiB$wQORvV&$rt111|Mp;kPs1GW$;Dx+C*9Ha0eAIT50PmzP(w^w?}>t$~x~ zT-h>YBrp+;_AM?bR1L3{{9PuSCIhTX9Z@~@?KZ!7u_w9KU^;8iMMP?PzGZBuMRVru zQtc=mtMO{>!MEK(pbw<_lPaJ8b)8Q+Kxg&^tA9_la?)9xE`ST%T_$afOgETNyaT+}_b)Hr#JlQ4SO+je2?6!X8CE)Ym{4 zKeI_*BH2H2o6OK`JhqaZ9ji2)|5eM%ue^e1k7KsjOdAUbiB$Zi*3fMhL=;Gt{_r)qllT>+A%XwtCiXQ&G* zJ2*DfK!+~B3-_c3(u!t9PNrFcMgs-7f@h}R!tF;(j$5ZI_DY%C+-QS&Ml@osT5%;$ zqviXR+WNMd2Q&f6B|7fx4gv{C&EpStPMBf&Mam9Mo zx50o@Z>|``pFZH~I@jf_mm4Nc6)^ z3uSns>bOd%YtT+3+T&LMC>zAgPj*VbJgWJ)@-CHz9mM6(dR61n7%0lx*W|L(ahDAo z+HPo8+@uRsHnl2*Ul*F znz0dR{Yf9fWKQM8Pe1m+gzFGI}u!byd}$9y#3baV6BrUPlkrJYdvDuY`m(T z?>gPTj;0fL>Mye^4ZZc*#bCp`OZ<*&ke@Mcx0y45bzpTb3dhdwKpV!w<2*mz5<6_% zYwLoo1D^e{n90g<*N$F!(xA${I$oAVL(6r-zfvpKKtJ>xL4GAuE#uVtXc=x&_s`Fa z){muBCu>duPt9TloB+Rp@AS&+&`?w=OGSU2K4fBnt=pENZD2FdC_z`%(n0i z|4zx^55kx2k=(n#CTZfbwKcfJ@ozpV1Bqq(ZPVk5uFwTgku=Vne{h?D0HoiaH9R*x z$Zc0=gvMY1lpWxF6$sv}iTcR6xH!#7tv0EBpTe?$h=s8d!|nNqjd0gJ$^Hj7KM0$9 z?sp~IYJ7p8JLPm-M+ZzXH|ak2mB~kEfyk{|Z&?x~BUSZl;EqkTT|S$36aZLVoDq_O z>f?gsn)&U)8H3r=*On~rLOWctt3X5cS^ARm=t-4sY`;raI*4_vYYqttmPEj^duM}h z2Um=r)W*w-f$3SOf{_;(@qtJB$ENh9Y%aa3Z@%&)nwp0$PnEZciN_h}F**F~ZuPd} zy7)85QaYWgqJErU*YhRrdbpDv^4+X1?!|~33guf*h10!N;W=~TvBky3g4_tnIop~O z7owqupwP-re=Y0XQ)C*OWe2WEyHp(D-5P%u2HvJye%x@O>b1|pekNS}eB#rWNBQ61 zT&XyFvP1ozz--mFYI(4%w^nUAs;DSf?^F0~&~1L&*U%L^v;N{6v-sef-`29>{%wBp z__3ye!5p&YE;i1wfhH+>TmhHUNtf|zG2|25TK&nA-DRAP-yVQ^R^s!)`VGuZwglIA zjjqf2nGXs;>rFgp@)&G&UxO<>e`jBk-;p3*a|K;)cI@uQvM2YP6*P$)-a9eaGLLST zB;<-vMHZ>PIAmZEWN8bx=?0`|&}h%ZEKt*aVe_+a@6SAKeV=_gynGQO=l%L{(i@Rf zLK1MJbs0&(NDHWe%Xm01f8vq%V2-Y|u+USinlI&~F#$2GocF(!)6)u)uHv-g1jog` z{%_3Pq48qIJ6W^m&ZMW0Sb?4Y-N=n8({+nl<#$9p#pm~4e5ILvEYvPMK+4{HTxyd^ z=2`G0ZYaM3bBXP$;JzPg8%#B{%%yxRCtZTnU}oaTy{E|=CU2}WSTB0^6S@bzPCBcK zwAIYdVPUYN>lu8Z5?W4vIcN7rK1ien-=g($cE2a2@rB z#M9cBST=y);jIWrdZQA&yHxxPDzbf(ZLOB{V8{1Y-soy3{4NB2g=Ev$*9XMKJ^!;n z1puPMTh>6LsqSTZjaG+gqhoiV?9?}($e8p9mEiqIi%kHfKnE@zcg0*0_p{TJIoKd5 zG=o~vx|#;sBl1!}-Uw->pqM0NRXlD~N2u|F<3t>|PW6`n>RKn$;QTXG@opG5|V4REKhr zzm@#y1@24F&&JB#I=PR=y_bon>^4^;^x;317rM6#$ThB=X=?%Ir%>)YYLOB~DQErt zps1INYIkR}RLUY4%GEhvece=Z8K7Hgo^Wd8Nd7v*5K|^R-<>^_r*)gKundS9lzB_! z|1y*~gkOv6v{~<$&tfenb#xq%CP8BVV)+9vQGK=N4^DvUOzd)XSyB}>@A3H*w#-eW z61+0YNLD&b&4u9}WV|Ls1P|T3DcuEmSkwHlpXj+FE~ma#w6q^F8K_mq%i{6uP1jKx zSoiiIALh8u4ge;B2|HF>XHzZKnug|Ho(W=L@P3yoXqF>5XUn}^_aNtk7^CKyr8a5( zevb~jnH&&^PlQg40CnlxlppZGZeNg#PqAvYxOd>Ytl$Z-tG@{7v^VGr>KCBqZu$_A zLbbIJF5^>L`@AV6uOGFsZUb+-C2hVBfrV*A_V(Km=NVyssaPJe%m&$vKT8@DE)XmUTH%(+b!8=g;p$tREzRBJ!j zJWHU!P}_UA5uf0bsM_I6HuBKHj+_OJ42Z5`VpYJVeKH;aRGmsL;!{%9`A5~sm%d&u zdbAw{!mRbm;c$yw#K6yXFSHgnS-4$`5tWyVg~LB07w#ID-~1r0>zQdx#z6Y-nA=dB zc%e){SWqkKCvt(Y zUP&7+4GPr@q?h-G-CaPhjy<8iqWX#ms|7p&?G%x@P)huEgm|tddr*!Y1nEsGU{zob z?O7O>-&41^u<(dtKK}THG~lN@5S;rieX`+EdaxiX-sgf$zKn-3oOqk<5um@UyGx_v zvqD11+IAFp2V+yaFJb^2c@Ma$Y9VTkOC;?FPHJe_U^!Z_hJG=jg;?HrKyugG7u>Vo z56R9?l@;9Cup6NF2l!g-g|I6^~ICy zj;m_Z#c@tr_<_yVEO2_3diT;`$bd#m;yigjjbUleu<7>Sc zjEBtDtV6Sg!d*)_vq}Bs!Mk}+r~g&QR4J3-eTiakr~%udZCwUzH%qo6JP!? zgTe}?+NJd>;{YgmYM!_2*ef&1g+HGCy_=FHqJf`Z9lRT{5aX1+CeM`);F`-gQ=n{NXBEu26a`{xcud4JZG^u z*&pT46x{2_A7{xur?7kC#sP+1(CrN?&%3eQ0{)6Bc^xptzr7XRWlwi?y!JP*Z@+RM z>W0M+9=yo?;7cAZ)(l%j-dIM_G}t`*(;LQ^h%Gq^LA>t(POh>((a+$&+tz zSD{JE5=ka@|Mlt~*C${?#OOOMTXV4*ntS$HG|zmIXMySDPzy3Okg!?TNY%1?MNVcR zE~GxBD0{6HHmDoYS-L!IX7Bxe`KHD92oT?Yo!6(ZJ~$K35h@L2c4X3IPh~eUsZ#&5 zVST_!XhlB&6Ch)BfB={uDHa(W9bLYBITkzt&@trP!n^C**>yDSyn1+Vvzt0_7!Mse zU7$bwNmcn^!v9RdAnE7QI28;J_EBW>T(RL?g6)r*WH14VF9{)L43SkbWB00C$H9o5 zkPC3;lsi1F;Ql(=e9@u6C#R~8TUl9ce(>q@=je)N;2vt;NN2H_wOQ{f0Z`f(0&QzR z^ZWVuB)ZQ2x)AJQmq-5-VCmFgbJlT{!(VUnplu?wd2c_7#JY^6caOw|9Pab=1PXx` zJKCYJbNQ`D-V97VK}^Zz_gi}QS>Q7Lg!!bT8uSGk{61z}J2N_8qo}ATW}OrlH-v1r zecQHeLPE!qzkT}_00tQ?grBtI2&qxnxL265+j6xUK$h>HoZEGMNr}|p=0yc|uZNd% z!s=s~=`dWMY#JFA2al93lM%pEV@Wb%AEcA~_yqRx<&kfN!Ei)qv6Lg10uX9jwBXGU zj$-q-D`LzTycsV(Y%V+vu>u5NqWj?~argTJo~nw~78M@-^74OhDn1eVigG)F77>-b zdM-laR~+)IK+k*deR)q7-y2K--tag&&x+Ln+|ch(j>Jtxqh5de;qyO5Pi%Th*hZ#z z3hqfq^>X7+=if#R*0NCH^I?&l8M?WWg8+gz%u=?!V}<;|=+ZKZUKz+jEThs2?rjva z?jP%^tc}(a1Lp^&pr}8b@fC=o(7E4neu#bXJ%VPFDwU_vV(xR(og8TTQPscd5a%vb zV{Jp1aR6E6t*gU70ww_DptoPip5$kG;q$X`6fc3o{Qv^N3AB5fK)iOZ7vx{Y?RgVC*Ls}=z^iQk^d9uvknj#3emEhtW4HZ>3WpcSOd^A|2m4z{?V!d?N_L}T()czK~L z2t~&R*!U*%#&jg8bh~C;K58B@g(2q?G3N8a_gc%wrkON0*dj|G!gc+IlBo~UsS-z?W|g!fcT-(w6t6niZD>MyvG9W90J`8f^bW90&ahj zdD9hSr||B?n^bkDdlTQwUj;1`=c=&mMFr@r8W7t^jVsshY;E@vVdhCPE^mj3ryqCf z9f>0Ze>3XB{A|noMw&SGTcxT9zUA4&@UtO7+OSncWiLA9!MqWstw;5q9jKGadkx%X z$I-U{ejZ}Rt^=Xtgj*gcWzQvX`K*fYc!$jB_vaO6h$`V-<*>_smjJmx~F-NC=RNJ%md-H7fm;v>~?) zP>K$5IiCIeY;Qx@8vMpR`gp2)2bR7cM0=U*MBeEp$OO1B2|9 z0^|znuB9*G)CQXi#WCm9yK8#pZ#$n~XFj_3$)iV&Xj>VUuBZbwB9b*$fqaR2X{IWG zm&tuj>Dn%UwVKWsaUBL3Ka0K>^v@WN2Pf1G8WSpRI(!ez(nGmiGFMJof8Gm%|A>7u zUQ5{j~#$qBkC-?67V(VrIeW9{7P7lNDV;tFw)0^=k|p6)b4Y``19){lh(NJfHt4`$Ra zhO~++3OpsuxW%eqquWGcaNy;l?S!g7&hh|Z=pOdlM|E{D>G7fh zKyC=n`>fhOVDqJna0K}HSd)E^mmoKrgUEb#d*S8=;O622cH@?V#|@sJ=_Zm#68~yX z;#noQ{XP!}4kh~s7z1!d8C%3mlJ0>WQ=M zO<5+NPF}c&X1<#|zT|Jk|Ni$6+Np2C@LRdry%x>R&5rBN#knJ+p0l(`S+YQUtc-?( z#c#*e{=0e_c%J)rNDz3syr8f!7`zQa&k?f&>R(Hl#PL^SV^GHukxm!l+?D!eS6N=V z(D;&E&3}Z?$#w|r&`OSdQD`-ZI8OqvAHoiTOb-^~*FQ{p7f5AQJ(yPtK^4yw6a#qTEzg5UiD^XIZ<%fLUxBO9`@u@S~CB;?yo4)eo& zK7^QrRdu)inM&SPvLd>UXhLXAsPJ`wBaJBW8fRcvj|GWI2z_`cz%yg?mEot25ptAJA)D8bYdS62E zYvsUn?1^K(Hy7wD6Mhj93sA=(Ok2QWWD>_lkPP^@`B}9?8#Pr`EkSX(Lfrwk@%J|{ zgCa3EJME2R2j4h=HM;q-ocZY--zQIqsK&@?nTzBBqnrPZ-{jfdCcB1y(1$?)sstnF zE@BiyN-7eJEwNEk@?E%)l)exjWy#*KS2d6gW>t-h+TbgPur$@_%aJbh_xhyt5$YMJ z1VHdTyLVT2w+9tHPfgr`;hcr_i93f(zMSVIv@_)JSXUbmrfl8!S1p+Q>kh1l1a4*XmWUkc<5j|A-i$m-umrG?D^fDw93&}Koa zhz2(KF@4w`NI;k}0bwqitB9eLxV4zXE4Co=9vt2?^t{uQ!$Iz_H{f_kycp}%!=YB2 zpDs}-Dp*9fQK8pUE#o$_T80#$A>eTRl6jMRb%hZS&c(jZ@PAzlU^>6(!H5-wr-}8& z6EqsN#K}ap3_0ZJ_;%YGlW^E+{>4sUT+hlQC}`@^z_MFM&Pzy7-P~f~7Vb#`v^?gU zJ8|$VK?na4x#Pdy^FQyh=FXcAmcEaSV9r_;%eqP7^&d<=?%PC-qZz`&*p><0J{q~1 z)@hZk!p2=b5fSZ@*}R{5U4OFjbGCd*Yc?j)ZDBh3ixjK`UM7bWZQH$dv-KyNY}wMu zK!1@%cfQ^CSvfeZolvUl6uq%j(tjplqMqvbd;Di)A@tJ}|Mo30z(Vv55bD%oHs)}Y>oQ$GK4}Z`RdJ;8C zGAUAX-MLXTC`7a1y+EpQ-*H>XRvoYx$l}YFEu%5P`Jn^AjXevu0ZNlS_m%H2oXj)u zD-c#@=xjYxkZZxv4E^_Z}luEZBbcHaOda;s^PP{E-as~~gc-PZ2 z@FVzyy)~(hpyrL&8qNcQW>);gzVA|6nKH>uheOjd7z>Ci08ar9?*qxT029GZ5T=%J z4)~Hl^=~~=fO?4Mhh5Cv87ft>S;M}yUiqivk1I=bqL*e~z=ws;Kxq8QLnPwJ+qdl# z@EH`_6HP0{NpnEWLmy%Q4)v@NDQ@FG*3o|c?C_raVzFk%#^T#KzH1AZd62)~)8S?o&qJ3>Sj~QE>&pQaLfb0IKn{Ak#0g zhQa>+)9)C$(MFvC=?|w5+$?pi@2;a&N-5s5ZtYr9tu>3$E&ATn(@m+d^SHkn%uu*= zfT!G^(90xw`V=psKT`QaJg&OQ{Z(AtPWpWxpX1@uY7ZT3?Ums+ft&G#x{)+j85xBd z>#Y`4BMqH{w1KMXPPCaiLN!1Yz#`EYb%QDd_+3q8;_**F@BQ$*98aFPv%Az79jI-Y z@PQ)zPoA%+yW@Jri#8JNO@n5tKK7nr_16t>q^tQ8#6t^CuP{LZIm^U>2y zzPbko0dWCC`cA@)@jJPd>&3$d4~8w~CoDj6p>5ED28>4Rqc`_FN;wzWVA-Ehgm8Vn zBP?T4L6A@W!-o%hxxuhX5D^o1hhVAsnX-98UbKgj=pfbubMpbHYfrYp^_vd(l8VYi zl=e3jyVTq!SQsugi3_W_kfOpjzS+iY^yAP_TwkQBlNQIn?@Y{Kx#@ zc95XxA8R!AK;xZ&UDy!TvT9$DQZA6PG=xQjgc{?|9J0Onh_>UKg2un~`KvACaw2{# zDu5-)aC<9Es>j0&a)%Ml`^T$}qcO;t=@dar{LG=|k}Xz`k3IzYeg3B!0~YS0sy)L! zFaz@)KnCcz1!UgaqBY~8r-7b{3eH#|hpaw&(&& z=)7Vjo5V!%U^-)*9;8zi9^yb}6YC&C&+ZG#Ol?rz8|54Ba)|98{=ka1#^w794?ACT zIu%}3A8g(cxZ5H%<_0nbZ&K6k`gO0jk;_YdgEhta5Zf?VSuzC(u7^rHapEiX!jm2P zSHK6`_f~B`F$(?K5g1W0g($e7b<3njOTYrG=|B3i9zq0-3EnYunPM;}ER1oI#{OHO zPhw)CNaj#py_6n4?)lQwwo|)4fj)c-?bp7qt{gZBf|!tDwlgLP(7$J3qrn^>97RMI ztSthBS8)I+nb1M@9??3E2nJASN7sNgTDNA+qsNc;Uaa_LpEIowOdBa%1!ARs{z%F; z7|JJ^wh!yivZy=k`5(5)BY%Ir=|GxrScVe>9;hZ{U%>lcf@uZVNRR=@;N!kaI_SVB z8ZE)xRrj^SyC;Qoi8k;-aBz-Q$4B^1Y$1Z-wwhzh-t}O?SFCy{nRRUoEvnVMca&cW z7A|*0F%|#!Q3O5#~IV{a#Pijl&L^Pn_tw@b%sWO?=eJTW_^2TaH~rfP>VKEp@Xt`<|N8G3 zV#}LGp>WBPa{)-^{?DC0VqMc2hZs^2twwqD8_UVfT{(kFgEm4OWb!a*@|u}e95?{OM)JJRCAD9P zx&y1!+cSP~|62iGXlVV_u)0Z419fT;W-`1fhOO>!hz(#|!v&(cieyg+Hpd~dB~d!g^_l;_6~bW zlh=;hUS6!x0su@APajr2tf(KLs&CHs$yeC)OkD!Q;4ce1DYPQ~#hi7d1JKb~Py19@ z7_Jet?MSBX`xK}0e27}MD9_r$!Fx@$+WCCzHL_ElNYSf^#b}xL`OQ?d?WA*G)p?o1 zQ_cE9vUlV--}9T~%~VyXUir`VTvQLw1SIC6f9Oy)sY~J0uUfLfEJqnRX?9_H^(hmj zs?+^US>b6+n|*E=IIs>VqrW<`c862r=>1#wp`g*J?ZXZi!>eOBpNoo$t`3?=FKD>g$e}Q;= zEi&Li>8Usekgiz_`4|&G8iAuP?-hUgL|Q7Q7fDG~IolbdN=iyT=%yf(nKz^eH@&|) zX55%I{1@ZKHMF`EGd&2s=^hL{4*~-Ne>RjsDcb5XeHYr64a=el&-Cdvk3Wd`!2sYA zI`UyKKz6;Q#v3yw40lo}z4y{NER!r+_S1*ZoM{Lc!gNmI6zxg~ zDmneNk;UGB8KBj|bXYpr`-6AcZNGmZBX=03xKtDM71D`+TE^Bk@S|9E43IT=rBp{v zT*qA8j}euJy^7|dy6WnuebktB3Y885ei{A!PfQ+O`um?b(*siecLu~Ri5AU848*iD zkv`24vK9$%P+^#AXvB=xB8H{p%!g`Eu86OQ6|zFM3V{aiR`FlW{-YuZaQ-{X*=lfV{{0{Hr`7r zUSlYNOu541{A3_ruKp5&ZLQZ5?LRgxJMHRq{WeKoiKUW)3!Nw?RyUJKbb!WUo;}q? z&4Vk->itTw5GV2bT;z^J+GnMuA=N2k#>9q&vEmG9LkI&WnA*^!!{&JoQ5(nq+YI>c zS~BD+r?<rNTDnmOR>Jh#?4w_1L#?Bfx-`0Z-9Ew< zBK%;D7zG=TYzhj5HQCuD?gE^7{u0*bU0q#qb0Guwy}QmxSR}TVp+8YE;Wfn_|BMzH zhn0|F0y202iHhyV)|Md)1SHsY6fCeH4LNS}-!!+pJz=4yrq=%BXcnb!`8e^I*?2Ef z=i~DB=9CyA6GS*r1i1i?Jy6I=aBqA~ypRfZ2tKRAXXwtB@mxZi2Cjmb)4x1_2cm$? zFT;Kfw_#bJRO$h*weYO#;ikb|k5gYPF~q~$K&CA1(f5HMyM6mM+!fh)YoLd0h>Ao( z0~%np1vvrt#Vn?vt437Z8MOK{r&{34#E=k%n$LnjArt}L_#v-iGrlzXY~J=eNR_y| zs3?tz2qLdlf}24Wk>RI!ov0eOeM32}Lk!Nib_54;$XBU2H$b2Uv*!%P z4tE4IZiJJGI*~|>=fm3BA4()gK5Zd51=xEZx>4VpnRB|OtL!d<6d`^V$QS6UfklX| z0;4jnxV5-7Jalraz?XE$!j|`;+ZhTEM%T$zqcCy7rCn&^Ddvoe07uY(zku0*^#JDg zOgG(=6Kvl;H9EZpAge>*uMgy{gi2B-9Bwt8i$})?SZw69BeXkP+MJH6w}IN z2njR!s8z8#Z^OdA6Y(3KsS40C4$@@$1_Btlb})Nx@MqMgm~nU)1jG9Vm6c3POqJBa zg-i4qn0nrOu#j2qAJviI7GJ}vUtbOvM5G1z>f4mo$srzY#kB=~d_9 z;Uz90uY8i`y$dG$H{_XD<@wKJj|%MA!3B3vtm}9rAQ6>z{(KjH3%g&A45S zUn6aoS_7U8_;>OKXDgq{ss}v}_)mlhoadQ|AsaZnRMy`SHzAfUHn>+)I?D8`RZq zoiW?q7H$qH&UPIIH7>cVC8n7R)g9nAyMn2==tC9ap|G2KMZt~9I9{pt9 z_N5;q1a7uw2rfD-5`45z8@VbGpN;A`f+3;ZKA_&rkIs7ZjrmyuzCX3Bu>u80~ z;9v!%>}PTKA~4>inl(%y90qG+TTrgyjk%xqAh(%ZS5M^|ZGj_~M0AID#jE;m#3l34 zQ7qq_ZUguc)KtvGm{9BWqn#F*JL85S0GqAvJ0?A_@w)T$%2?_AL%RL`AU-US`Qz(iUrqhQv0 z2*MZQ`i9--x9;EsJB*CVC1ux#rO&V*%wDIDOKNaj6SmiN!BBzv3xb*>{7=O9P7XtXx&R&+b1`P+FY__# zaNKtD(3$Ey{~YX0ls-})$?0MksCa?jz>t7r*(~bf+AvD@P(|Mnke0ZE;j;d4T^BgO z?(^PSGJ}qw!$}s8I5ZEx!bX*aBmDI-KT()d(TjquK;Qx6AU^g%fvj1|vbP)yg^6tk zcpb=)^y<`L_^r?3&)ZL7Td zNsWfsNruFI{QaGf^+Ja3Q0$K6zH{xwF#JXI%1{*{g1$w_qOjq268r&{c>xmE1WiNk zN0rLz$^w9X4ud7Io^HC$MI$34q(QjYcR~GxC{Q)i8fTBa=Z2|XyB{^eSQ1<QWN|VQ}{GEnU7ns&Y?^YTMBCI73iNtK6u8$Fj3#^;%*4s4jfD-^~tOQ zO3Zr}S!cMe(B;P@8_9nLts;xa()gZV5h zER=u^h0MAH!>sF6-a`f#5t3`ytm(V#d))nzSE$``Ns9aIN2E}IQ8K7)!}5p8SzJ6| z4AMDU@MZ#hQ7btCR>;UGd%@ECv<1eC z91@OrbIB0RcA$Jw$Q@`2r)rn3Sbxe|VS)um9hjl>AQKQs=+|L}{e+s19Z-gO7)aFv zFYt=rb1I(_85hnK`KRJIKfcYsDL*hKA?~(K%%6nyGx^IIG#)QAxP@lo8IL@6xnfCi zcTvb)l)I=OvyF#cW$@il9@cO@?i%Jg>yjt^M_huQ_Z(<8`{7N*uHVUvjh4{NbPk9 z5aOG~_C`))`_b3732iMrTksUQ;=@3XVKT-A+lgq7h(OJ<&VqYLjVb}+!-!j=apKF9 zz88K@Fg9;9q}IW=#_Cnj(Zj_+33-=$m4R%dJ9qA&g&-~fE^kDWBeo?VDt0CYlEUk^ z4ol4wcYF&Bz+{wS%mjTXv5AzQ{A7m}O$V%r$Nb z343+VL2Rvq_c+OsPAF1nhUa+bVtEeIuJEYyRoo>X4l2@zUnLvIJ|U%U zp#3DrRt`Jvf$B?TbZ02T)_a)7OqQ=Oj}$UB2aI9&C1{THNvLN~f8l5ZC{A89*Y^t7!vDDADCB`qvZtFOv~VbVNA3mt-_4|2ppT7zTfjNLOy1s`J&q0vcVO z39JS?sG9TV&nHN)^=g8=4`Nrb=Ie5|*&l}TOz_7d6AKDH0ogc=c|8^$9I){mgvcN> zGey;!>^pHBP#T0rnyHOoJ3BkO1nDhXw!~{~=JM|D?Cg)30#~MHo9GE(A1Ku9AptlM>alB^ELe_*wyt0V1`-@$e4cEoy9cYH{u6HNl3hG>600m` z>x6aJ(0+nSODNW6oxZulFgr6OBm}LBtceCTCARd+42ek?1;3T8q-@ehw&&DAB#s>P zZkZ>?P|Xh7pXeuZ(%_VU_#?6(rRkmJJ|ayIjrfhyk=JCB^pj0A>t=NyerOUy(4mDG zs0y$2W+%QH5PB1q$gfF>kJh*|6hq9Ih;^Hdl-$dI>}g!_h|8~?RSJjWGe%&KD&NYzJA`;GLUMaIv zdI9Fy#JAH^cqj0Bx<`uVI3FALC-riIt*Lpir(ee8>ujAG4&w^LPB#*p{1k=h5|ZpX z?n$jqg*Q9ohC72h!(o)l)A|ST35=MqDV7A%lWxDYW#Lp^%y5KN58to^EY()h!~j}= zLyXyJ{(DVFRybj6q04)0aJ!%bQ0XWF%2QaH%+id9La+h32uf%Wok~yhMo!A}F0#^c zXmOIUm8f}`_J;u}vsf}-rw>3?$vLp`UJ{?(K;wzoB0$eMVyD^FK~8?v)Yd1p1X)oq zChatfnFzWXY98o3GTry#$%a3X&aYyRVR}ZM3E+6D`R>kgOOQj4@n)bKk%>0ae&XPo zbQODk5R-{I{UX^*+-=^r-xegWkeY`}t;8TslO|HciPNcGuwvoBAfc(T$`1n^u;fRj zGjEoam5u-SqWwlPG9}VKU?q0A0|a4dle4~ieQp5e5ZWL1=Y0T@@Jo>3hTY<1rh^qz z+Y^)*G_sRl^z&Ist!KoUI5;3!2nXW8^8un&i|GY6G3gI+#S^FL2&y-McJ+XCG$umL z;#4E>8>8q$?sCaU#_uYCD+LqaL)YhFf1kcZZeurVRugp9&? z=0Q%QYrQl#qEQnM!1gB0@qT znTyQRd)(T4uXlax|E~4D@A|*r`mAT~-G2PKfA@Xe=XIXPah%6_`Cq&syL0=2?IaRu zr`)--DkRe8coJ#jC9;1=B$E1~)*k%NHrsRB*GVM0yTpGs+#mdHLLwa|$(=o|=JI6h ztJ$S}ZC$T_=MCQ$P%(dc`_#{;j}#Ps{=+0qM)pt3*{hlqXO)$!(zIAxd~ckS-Arz) zzEA2Q(}_P6=P1Y+8S^)_Re~qzczQ3|N4(c{G;d;8zY<$$}ER_ zz)uJNR^6?C|9FXQ@1gZSy`Bi^`}?n)?r-}0%WQY%lk5NL#@8cnHmv_?jDFj$^*>yi zJ7@d%<0Z1UHm?7vL;QdHQXMRYhKAwFyLRmwY`EX?_xE_THwg^+)AG=_Nd94jwEqt_yt^d{8M$fQ^Tz zx&8F|&Bjt6!&7QKmk(!Oq-2q+udQ{N8t~^c>C80|78Xv^%;J9YL0-zu?G>|}lpo(O z^5ZvJ(yg9ctC!&*kxpGcXZyOGg@uLo3HQ*+T?`Up?z3YZ9a@Z4Q70@7+=dgK#=F9; zZYXKajI_13w%(?g(sUxZ$k)H?OtQ+y3*UE#xV>=s!T$bMeA9&(k=u9g9%E)EV|B86&>eYSi}Z?d?=n zbpMdFI$KZXh5zUIPs=FJ7FczvtlADW(S4C2q6~NN(r2TIVK}?`lbD$4>FE;(f-|n< z95nQt319As+(vn{Lxftvb7An26xsg$k3J^IJ{oY_X?;d6G&e6#Tue-!FZ4URLYa+! zZV_F*K_D);dUsO?BLf3Nt8-s|zCf|<`=}G-9M`{B`PV%>_BqS2x27gpuh>5Lz=;DQ z4nNC1mjn(3|E|x=%hOEP`iSRVoEdd@aZ!75@#*o)lSsbz2%QI(WijV03hJaIh_1 zJMR%*z|>&FJE11r#j*2IYDL!iJUl$k&T|hQJis;WK4b z>qD<^ZcNk2V6W-MO@1wLKB(8w>Q|~&W>cS&(t1QBz+Ex2@{a7y+1W>*MUATb#NB6W zuLs)%sI)MtHVNLIDRJ7^W-*g=KKhl@xK56dw3*pZeK^P5Sm$*FjjO9`(%H1h@700) zW=&Q-rLLDQ#Xo$gdhz1LKx!`2rYEl7DmSlGM&wIf?h)QeB8AcHJ(R6bEpI#4nJ3HL zUE%G$Qry|uDdW{)^QG{by}kYA6Kk_yY;KF^WvHYWxDJNjy7f=%5gv_eNgmpdn6Kh9 z^#^8zPo7ka7CfJ!F}gK@ZfN3b$;$Hb4(`>DvJAA{e8t7Z{WbS_tja<{LQ+yv+Q-R{ z3{-o1czm*$X^iCGsnPS&u7C7%)1cfi-{@-2X0Z(FFF|y8pV@0 zkZ$aixwX-$?$0J!FE6h=)As|Fy8`n;yNT;f*UCag|Iw*4I9+|5#gFPo@7{`;a+Z8*-$} z@Xa8Di>Sj-ioJWEiLW&9R0!nWUR$14GBYz{JZo$F>w2@eko`a{HJ6S#&nkZXlT-KN z#duGa{+~Z-=;?cs&L2d6Gcj6OoZ;u^&uH8Ku8w%x#u!n}6n0L|bc?psuAM151*xkn z0W8XFUw*YDDr9D6%Dc8w9@5sj{t^~!N{QDQVjsV>A!lS)PyLj0r3Nu+sTAbr_n};NeZ+d^&W?}T?V&HiuCeaE{v|>7{%NL<>TNOeW)a1XFDIK{47pp!1PZ!%eGz9_x|a(a@?mF$tOJ=g@B2Z^fr)K zGZ%>B(9HbV-Ec8|)7=am<5IKWV<(N-!!0Jdi@Rid)3VA_8^?RfO8gzmXWDh^Rfv0# zh{rGatvZgIOke|Nv}~Vlx=JF&4}|pH&{rwHbB9W5h)kDejt)X6``W;-*YZYiBuwsSw1j#~O-7CCu2xe)Iw`=yrW z`|mGqF1+?7>8rrFwnh-LB9C@N-|{p( z(DabL<1T-=3`(`wY^Mh5m_`*96jUdqqJ(T>z1%J&eDuI;w%>q6?mjo6-SKyoULQp% z=B9OB)r*UZGt|?2;>8l@IUA{WiuRXMZ>~v0SlYfA?Wvik2?+^r$ZOBs-8J5g)ZG-b zn?XW=Wg`o`&mCW>Y~YD$w9Cmrnk1 zm$cjViK!|n^pakjO8MD5L8`O92$q981LW5+IQ-Q8J&r^e7;_ zk3#C@%a_EPOy0Y|Z5J*d9ulJ55x}kY^6=*msp=dt+DPD2>3H8g#n+QxhDf$`Dehrl z$g*NMa$;?%ca1xJi_d4w}PCpJ*k{5P4_NNLg8# zy0EhJ`T-Itd)u)M9sDT|a(p&5c_Tn}t|S5uYQED_<4RKL2PQ`tV_v zVFmrcgYJE=Z{lI1a@Dl7v~t?*C%T0f&LBsVbF{{v-WbD%ZQy@E&`PT#{pk6qS_W?Y zSH?3h!fsv)s1D=O)|%AfSTAn%jmoxz^;8RIfEa@JwMx)MW*F-j3#;BMN15EO-3&w< zn10bcb9T=)`t|MpTF@%WU_+x?deIBtyLTII6B|QZVaai?^wjipYu0j=KjnB=K`Yzv z=%}d6ufF%uLI+DVJI@WYXPl3C_%QGC+dKHDEk#w9c3X4U^bM8ksC}2i8#X(54Xev! z33$eDsypC$*|#*z$L9>n*ku!dxhzE-&wTh$DMH$MBBK zr)N3~)l=1SvZ;Q=w30|S&f9L?T7UA`v1I37PiHKzl%LPm-4@L%X>C$u;qr-M8P|OI zx)TafC=ZD^unG#!_O7kYHA}8}U{Bty(dr}iug5P*9b1%+3xGjku<4}mXuOe zRaHR;PK>l?=+=h;eBZfqrybS8`s*u%t@+nijxsWLe#?jD>^&bA7suoM!Hd@-gmaQy zwRXSq7GV()k&`E1v{|rtamc8rJNQW5t2);xqhXOz8~9}@>A@8a#mW3g1 zYM~`(m%;WqWGSjnncHnkQqlIWTD{H$>>7-`1-7Ei!LA^4E+pS8<-)mhtm%!zt;suM z8x;=Q`v7|8`uqFe=1OZ0OL$GDOSc&>AtV`vsi!tq_TC|0Pt}e>X=!fV0h&WH_sUq9XVI*bGGa}p!J^wn?9|^e=&+Ji~YlbdLBx$6q#Ho zc1uPs6H@UmI+4a$@g;!3$?~O43Mpji`EPdxQ^x!6OE%Tj?U8DX79v0>0J3IJZpwr0 zv~Q~RK7IOhYAcILybZP$;*ljJ^Omru;Zh`Vd7##b2{DO1V#pQUv; zWqA2uXJN>}WWD!Ml^5>+V?y#%O};?OMt$(0Zg>2$(oN#d0u^ zM;xDgvV}ylx&^8wF}Q2_&mV{JVLDN#FiG=@0I8bgg=wGlA8?VU{AqYIxG8?q#t(+_ zi7I8YU6xa3{k@fOD%Yg^D34vJWq5a=!6y5Zj*d>qTu$_9S8v}{>W6Zn0)SoNsP}rs zDqdVKvS0Ej{#h7`J6Jl~YA%38^hnbA=ZDjg27Jm?N12$UR)1CRH>BY_EY|{lva>1o z+5q49@6-9$zP>8RmPW#ew_4jRF@IP{=<}t>?ry!o^RJWg)B`y+yA!gG*VFz$D&rXY z{SdTd@O)jpow4A*^TzdlvP+TQdzQ1tes%SqV6R|anxEGzby48Ep@#9LSqHMunnS{J^s6PYRzkmN;q)KfY*>B+Trq=cK zm~Q98(9p1&rJd!y4%kgo-3Lxsuu=k3^yfFb;LW!4#Fu8MlGzQnuvki)d^^H!XJ=Q> zx^au)$N~a@+KG?nX6??|a%QdJG|as5wy+&M14ja)Mm60WGIsDwBsB_*-%9wxxRB9%pN zfB%mkPJlGzx_`M)$EIz&IugGdh_D;_P4-q~iFQ!7_Q+S=dK) z*8w9k42KZ#gT;8Z65DUL`1CV0))q&z>T?m6$64&jElWHWaxdIQx{5FppKjzI9v<$> z+eI(dk!zwbPJSO{@F%Br-R%$0@&xP+fwX(8u|B&!Aam$7XF5t7KrlzUtiq+g7bem;5ez872Y4=R!y0P&9 z0M7R9+nMEB%mqN3##@u`Q%JeaWejiIb+E9uw)5S&_g%kVsHGCwNVYdd)EPT4zR`0q zTvIV!Ra8j8WBylI*gg{td;2Nyv9MyBvY7~VoqsV+v2~_d=Aib@GAJ;xHFovq$0LLO z){MSDUrV#&U_D*UU_r<7fn1 zNVKLd#DM{A5U>Nt*DsV4!n8psl)cvGW@o)7iifc4dP|%qA3UINH3Iq%FBG!)^z*$? z@2Bz$*#lCn{QP;^d8YCm7cN}*_U+r+e2wHk|NIl?k88HL4kohzuau_Wy(Z%i9pVaSvT{U*&8Si-KQ6Cp+Eh)t}aFH;Zdj;s01smTImgM>>$&eqpZH+t5q{$p_MfG$Rue6A(Um+HAB<`R})|hvZG*IjAwz?GYdqM~@vF zC5Y1Fy+bQYbKy0^j``*vpJg|g<|X8cy!H|+$)wzssllDj8lMUfJ%hnvN}U{Ib-A3-?xU{V0&)nadVd z5jH8p3`1p9Rh@Tt*F?jz*DA{ropv)_ijVOUcqZ!L5GB= zY8br3CfkH+L(7k|Tqw{f0~`TC+`46ph^VM$s#=QkWDhcjz~0bKWo?!>j9Dwmab5?G zUpiGCKot`cgR+E&ar<7iO)hlr-n|3rn>K9k9 z%n3Nt)%xPa2We@R`0qC+f$sbE)fLLV!8?8zL`!+#zzEXTw{Lr>sRdo9j7=_uG41CO z=i>7!WaGmN4wXq*K$yq6{)j|Y6viE9>MeAd#jX5^w)s=T%FEk@N>;JDI0}(&W^T?I zX<=^8raiqgh?alHJ<%(29Q#b40Og&MQ;|!Y^0X&i;+kqMg|Jq?vdiQhGXCIAVXz6y zfor*t3}5%&RQ)Io4S`!w&p+koZJbp_rOyAhB5qhvQzV_~J22*3>Lx`ou$Gk^m?}ZIH;a-&!WC{cK z5#K>YW4!MatyzUnP*QR-biUQf+vGC!kSxDp51p`V=gfIQ+--}$=t)wT9r739apeMBvM-cF5Jra>hg3mit-68lZ1pp=yOCMfon(F6ue|P ziO-$>muw!kLG0POcuV?k7T1X{A^k6O`s^zQg0Ue4cODc}OKX#+)<{uf4`=7*ZVHR) z|Neboin>P2{zQYof%gGa8~_9Z6B7ncr8e_hxODA_I*q7h{vy*-;l0+^*LO@QwnLD3 zTckx~w0jx)C9|k+%Y8n(QTW6CYmk7P#?^3{21`_#YaAEFMQ%-Be342g@YaGSAUV2G3OToemljCt||#c3?fH1f$mh+!AEwCtxX5Bji~al5~f z;p0L>RiFdw-X;1aeQS1Gw~nE=%S2wm%P_|X_SH}SQV zTeTzlEVEn}!n*H`522wC4pLE2e0U}u2<1FlBKK`;TBpl2mH?8^94J>?hVJM0?=z4k zfEC^5zB)gA`0#xC+NTs%a7_dVC#Rx!3h1p;v>>sCfKZSvvC;=5y_Qo{lNHnTG%jAu zMvnFKBlGt5Mq(Cm98rvu(06~K7PINDe=xg!4eP`^TBw8+Od=v(KWrR{SM$qo?=?(*Ln9`TGa9LCE)ArpE@4Zf*g;uN`e z8IN&pdN-YjTDga-&t|kxnx6=(8v7zP|IEx#N!51lj8XT701Z5~Wi*b@MBcz4mhCry zM;4-K@x-PrTf9I&r-ncw5=)1J`EpGHO6>N5FG%@;L#algNRi?<9pAEbtQi~%iCL%6 zDrMRu0G%VUg_;H2*5?deP47;CYDPA;tH7f^TXt?ICol0_ngwSqwCaSY_w}=Z`*_J@ zIe%`?9E$2)1}_S!Kj3ysaS~t{O^uCWo{J6+4u60jffHjNJh<4Am}{qzQk?z6%*13T zgT(S1pRM%t^a(P-z$+PXalP0aXc3iSXEZi8qVe$?oJYn&!f`|mFoHqc4ULhnj~_qA z>%7{mkJN?knlA;R_H^c%5m-o76=HTXa=^gQ5V1T^d#C7xWT0@K_Sr&*zfblN8xKVW zi!a2@ZHEV;#T)=-=>GbZ?$9Bx z#o=Qy+S|5mV`OBsSKqqp&~f@%-1%T=Yts3K=4Q>Lp@D(YKP?LKyhr+1#0pq(bn~B$41u0|fzDH;83*{sH5y5_bG(y%-nyMJj-0?u;47mQ?qx16e zd!-yk+s~W10hd5{yl!ugqHiQ~PN~3DTTM;v(xpr2F*qbif>2D|1=bc0eA+)y_Yfom zttVv!2Wkg&4~OmPdc}OAqVA~T2$i--s=a%2@ds???Tm<;7N~7U_IRz#e3tS<8uVNo zPTsX^jqYG=Tbm==m;gx;ci(=X_jx-eGkiRY-gQou?;@UoWQFeN*!?H|$0tn)o&GaJ zU!K(M?Ma+pAd&TYui<)zYXc9J&>~6pq?15?=D)>uGwL=4q(l5{F{``pyYC0|DBQ1t zlG1*uAbN2f$r482d1y525p-PZ44OSCg-%!iXs)!or=V3z`5~`fEz!9LG9%Po8{f z)*K6A+6wOt!M>wBGg07EIu{QQ(Jn*Ru>t|#mZpjQ&YVoO{fLp{wvU~A?{YFT58%>B!CfdpXq|$1l_C8zo(1(;oSP)t zZ=*rw+6OEm^o#9Hnw|)kIE~jgHmV)f$k1`D^4o*7$zzrB=g%LAllN$NzZVb1;-Mdl zIHs;1PQTBn{2E{S*9$-|&c|{iC}_u#>w~+(&+uuTip-4ZJD#Py*qA1J!Iq41qNhwZ zL1t&GCefzvV`IdPf+9yedh{qd+VY{gQY4>AeHhz)NT%58fM>f8our_o%tI4lX7n?I zn9D_a`)6ux9*cj5vFJfTLFk$yx&tpVrin}&d!5T`(r7d*$>v=yLZo`K!lAg1+BQmI9vBw3^#{6g#e0t)AaG9vU|ky8GBk!fNTeQ`@K@=R{Z>I=zU&EDek15(b=WoD{W)Zpux#z1IN_ zHPajAC0!Lipm7lP%k3bvV7yGURAYvrav&-xrJjhp7v{Hd`kr(edrV;j6;ovYFDXB$ zF-OSjJ9jdk1<)UAj^put2@a0Tmfzqo(XCCEV?QYGa{^$r>ND{(hn^EJ{qyB#-4MG+ z@8^a<=C$hNTgc=4Ol;^9df_*FC@A8sScp|Cl)klbHW{^5YBXoFPwcymoB)={^ABZf zJ{*;60l4&~Fzv1W^~WNDW515jX;yHO6GY2N`W*)?dKZ$bzjrfMq4ZyflgLo?MlMrl zZv%EhMo)Vf{Swj<057}@{Cs>{cGFvxuA+soo$*4f*uuMmHs;6NQ1u{(BkOT3D49^< zoto9)4i^dvrZUNJd+`E&MY0`n!1`A3aUgeW8LGEg(aJHp?J@rKxg4csMiDkHG)gq5 zHOp6KznH~&7UF5x!$-2fJtj&f2Q&jf;KB=$hkzNoQF(wn@N?wI5qJ~8lXe|CnT-W3 z&_R#u3BVW906>REx>ioMJW>EEOK1MoR-{$L{2ElcDX!h18?LDAlJk8&!q1)`XIyxmUhZ*L3>3qv>dr>1U>Q8k2O#BZ(lt5>fM z_+OlD*R`q3gKqv@5kTFh^ta6AHx+=;N4I!m!yvT`f4+zu>Fc{`;kt)MscUfPc9i88 zvP8vZtU_mY|Zpm->A zO54czmm>HS^0131CMN!6%|Sn0DMrM^=$BHKY2+JI33PX7$2tkhI6FK0=Z{s(^E$jT zK0ZEXIT4Uh)HqaS-F)-QVp8yzEJI3UBpexu-kY=bDiPW zK%;7l!*~xjl4V(_hJrVqV&iq48o*QH@$8r9e;3}{>@AA@JcghGECSvG+$MNe-x_Z% z>sX8LHcDTLXu)f_j)&((L!C=C4P2}LjlC!OZj_C5z)=a6#u7h*RGB5#T?BIH1Yk%2oQNOl|UEa%yRm#9E5Ry zNXU@sUrG}t~rqkoNIPc%zr3o_dmnKxe(K8FhnoIwcfT-vaB;q_r&iRrKs2D(v z)I0`?PDD{%Vru#Rnaf^zuN_f&vQwaE&gIw^?jj5!%`9z_T(k5&(N!)&vr~USF{L z6s=$Jepo;@PG2CkR^#;!Q|B_auTNEr{YP^H%l6Edpk~K&mY_BO#|$>}^70n$+;VDL z-wWBCWr))iYpW$03CF`drI&=xZrva_WIRd~`mQ{)`xMV~3M}AUS%&zIW^#9Tw-sI3 zWpr5paJ}6EA1g~z2mq+9-{TU`~5>V6tcR`JifH@8y?u#^w^$!TJhgNQ| zjB3#ZUyqbjC4_Bu&CEjw4v4^gh5T82ee!F`T#EvaiJ6(KtnBA>ZPi#-xfXP;lu*T* zy;rA!xgK7D^w3#k6X*0^PEHP`-S7VW3iml{@F5^H0ze{Lb6g(fQK4C>v`-`IWE{LG zP-5}%Z98_1wWU4s+PJ~}jdE723@C)+tue{gFA(4X(L$3N!wY`*S9r+=J>!T^kgp2SNeKR2mMpTV+J>YsM*{P~sP zl3g>^)wCiPm!1F<^?yzV@KS`g$bgem+O`DB)2aaIe8k2yS#iogZJ{s zJToPqKu+W|ur#n{Dt5J(NPL>`9fI@_-Lsdri~<7rK%iJe_^b{Do6i6GRxc>X=QxV^Zpr0ehL9hN(`Vw$`28ZmUX>qqh-2X(r44sxeTfdTH?hbNaF;r>6n@( z!N3T13AY2vs7+64F{n~?;C{#tpR2ssxGCp`lq4360Szu+zKq%pwsimAy{7l?J%CY z+sBV-d>)CQV}*y*h2oBtXOYu^@eV|lz;e(55%YM@+M&-8H+3gi4VR#*p*p2&q@n)N zQBe(k{|=?9#16{_FP~O+Jaz>Dtdt+@74QW7gg^zxM=RmsVqr1z$k1zeaBv2|^Mx9_ z&+p{qWN%Pk=ssu)d(L*6AzBy!K;T@A0o=#k5S|tFLKVDMf~O$Pva^rNg+eG^1J%W9 zM1v3Sku76u6deJGafB|6UEUlgDJdYJmT87&8zJ~XBX`Jr7N{qUI{;2bL5{^PfzIXX z=4NVUhQ81Q(g1G`6%ymT$_NK?}vAZIf7 z4zb-Ii+=og9@PQ9x?gaaErP%+jy*EEW`LIt4+98nra{>&?DJ4&G@Ko=DuiR~_a@np zlE}hJk=iQ$J1tMpIh_5gIjyd)R(I_q83&;hS%prjK|@Wm=lYnUdW^9OpTPQ>+lHWN zrkUMUc`8usvwEI|o9`+m^Pz`F{$;E!bl0rQYO4cpO;oFnXN6$8iPA*T!tu@xxg67@z z7*?lQ(11sHr$;)m{$9pRz85vKn60JcgKRD<{_XP$8 zb%RdbCf^^VW^HsuHi+iw$`HPnE9L!I50CZd$LouT@U2to+<}4xu5TZegjMV+DPvht zp`n~Ji!p*bR(fJqdcrj6_(~9CtGD^)Q#lX%NEZpUQh=Xd^{3~C@an26n$l0dfBm{B z(NIAW#gDM?u;M4QeYnss^-i;}waunrVq=qYHv-u!aU7k6as;C01xMn$=)*i|Yh;;J zac>`~zqt7371ck2ZQ~7a=R_o-C^Jtl#?D?lA69{OT3j-08q1P@$34oGwp_^OkQvcI=ps=Eo_1@*m1Xqo}^E zO?_2$V%=%N!ABqKAAI7szTnYzQ>V%OMV5`1zO$E>l@aE>e<1+Ws50c_^$^nk5`Wsq zxyMyjVv%$BQRU;@Fz8E{uk`K>^19K#2DAEH%ce(a~^aCL+&0dSK`#8XmGBEUn3N@q{UJ~rOW;ndj7XeACzu!-- zF^xY!DR%Ih6$ZY*(}_4wq_1@;^w|U^tX|d4zH}P06D-_>w|;P>X)M_kif(9ZtXKcL zoiRc_aOk&I9kA{x?SyzZ&PJGPndMg1^~jW=t3&_i(JgHJ@}=bEH|?UF^@Y$C(rM8A zHaXdguc8-sgKCF5fKm!+gH!J%0cNNpW)$i;?1lKHbDC&KoHd6NNcB;W^pPjgLYAX< zRE(BS3}x6N`1?^2Q(bS9_wsMqnBl2?|pSj2V zfp;T;4j{0HF?N&4?ky%0(&^N%hg}u=4L#?(eg#PRf#*kSy+vy(i{Atg9?gu+ zBK7RhS>jd4P=h1ITyyna9&f*v?q3l3b*VkLJyg9EkPUvRPq8W~Dv8Kh0c$~L7&%8D zg=!91n{IDyrXi&h%p%tmB|*xsw)ULQT!M^@%y!1_{r&H0b{O`O^OW{||DKC%0tC~r zn|bKRk4yw#bF6r5Y-~M+8{`wjLc=!Cg||7x1ldn&0HZ6mmj7aAvMXuiPYg3~oXl&=2sI_ojuHYwR=&UN(`8a0q1P>hm& zABBVv5+LJQq|-sR>XH4?#QQ&&?4u}lg_KQQ&a{zLm0rxn_D3VF^8CpGU^qZ&fcjv6 ze_CPt=eN_+EAP^I>UZM5Zk;%z824Tx2q4Y-AwKYzNB(vYH|p21hOh-+e{ z@EcFW7TCm8Finy>VDFhTXDV=aAd?WXK4t2Qva_=@F;!M=s(~7mN=zypk&J@7%Ql8C z9{UTHBwdK4C@nU<<>Ny`pYbW^WQ32sqywEtf_;IzvS)41vA%LX>wQ>{ch^Uq7T*sa zJ|J0IcjgWfTVUerbtfkvOE)A45JmS(@Ac}9~+(H!lq{m4>EJbOu}a*i)=t!IDNx30jD{y!Wq{C`S5gpP8VQv0drlc z$=9!6p-lKvpvD{sewS*e9gOj>)2B~cTW4l$4 zb0u9gGoZfX$BNGHG9VB)H}@^?Th!Ts-na1oKpqljo=EPachk=2Cr8`;V*b7dl;sf&P7H*2w@x{sqw-`70_U^n^3X z-PN^IMC9++n3x=Y6A}?Io8`U2L16aQw{MSNTn(ZmFRvY{I9#e^+qbK19~v5hH1Glb z5a2?VL&-ZeiDp0P6s>Ce-a{4zi(tI+=gz_I!oX)tc#Xl0F+7M&g2s$1a5IE~GH3YZ4>4HHG}gFgL3ao%tf=s;iv#XBfq-uL6jQD1C^bi;~ONJ+OT zK$age%dvSQEw5Km1qro-nV24d@Xwc&&T{hJAz>z88UgbM@`){x>ID|+jK1)&%yJ4h zP*78A+~V!>YFq!hFkX}KJyfngcOrsUw6URxPNMDn+LI>eKoACayfH19NkM1}s6=SJ zV2mrppp0-G3flB|z+eN~n1v~v3xTlpJL9&XNMV`@QkLb1_%~Q~j39;;VBV5oPDq_4 zs3a(wl$4a}?CR#`KLdHnwcsl3Pm4%K@^^=X0LOsaufCf_Mb27U9k@W6TFSH5CrG)I z-Ni&J3{#od>R3gBR=T*nbfV?ZFez089!6f5l9D2tL}i~KG8BPG>^UMM26M;MKDeQg z{h{Z0qG3OJBa%>eC2QzMjMQ^o;pPs z>*1vYV1xrp3-S`g5{CA#+nO!7BuF(<5$ux1kv49*^nw03AL$-sn{IUBk0K{_O=wL!=$?J*P-?|A>x0 zJ^%~Rmr~d3;IgG{CSd-PWplA1>NW4)ack#Rb#}U<84XqPqd_&CM?Ic%`o$eE%t)*) zUzZDg_UsuPi{qoC7*ov#jDg+=N~7I$QY(jDwZ7Ir2n5~2=CWKUx@-dnwFcNgbSnT@ z(ar>D{5~{vOs)lO;UCR$-UGFJVm8(MRsB+WE6|y|10(kDS^qU#dv;5AQIb|>RZpyS zUBDj((akq1gyGfND|&OI)AMxwsoTE35FI>_TcGgx1qO=ZsUX&34-lme5XBkI@{(U@ zJl>|jH++s|-5tDV?_NH*F;PiepE1kfz8*0TL)+7wu>3VObpV(KJONT7vs@@h(<4WF z`$bp~Q!(VfpM1xTL-3~^v?;Yi)+m1bMqME^->zRqE)<9}vn&8Hi7vM=H}?etK}kt( z_-aC#F>h85UzR;DZX5SQ>_F(2?HTo9e9s<;p2TnrBzC;l3^WGH9Dr=)C1UrpfiorEHEr4 zAt70J;TCB&R}5o3b?&|Cks$%O zi3P@-lW-?ux!%5g8}4yak^bZvVcFUS!faY+U2D;v&gM%TeGuCB!Egq_3nqrXhq*14 zMS;%hG%^jun-_>fypMuFS9f=@ z1;Qxl^6Qdt%D1sGG5djY>y`Y5N&Tf;XTD8L^Z-v|1%hdKiR?+ZwqcD4-*gum-u?T| zc6Pvs%G5x$#ZXCrxL~I!NE5+q0L6C%0YGn?p)yW97|6f9?9zaCXPRmsnr%{K(7Igx zRDIGUZ2N9dJcD{J($G`ltVH%y%;@^;m^Nb-hOv{cS7gd3Zr`=5&`mulOiob|&Ow5h zU7!_y^R)CRl(%5;Z`>7<;WD@eENevQ07=IfKj7r#w8C~;B!-#?g0F6YR(OYRGl|YL zPVF`Yy38zjOe+UhNPRZk#Gvi?2eE1qBA&;XPf~MgJqQWmz4C4c{!WZGWbG^Of`lD@ zKA6=$j3SEch>YBor6+gp98e&HPLci-dKF&!WXfnE`%IdJ*i^YJ&)dn%2doC~_%3dw@x|IzlG4>gsX9bL|TVMh2R1V=L zl=NN&ZpXBCn^#Rh<=eMsylYh$tKgW#a|La>vPr0a!wrc%rPM?xY0@v}!*Y9v)K3}G z%GsU^b@*l&@L@1YRQ>-*1gz|G#BxQqKDAE09tiot#kl4u4!UF5+$Okhx>c3+tkm8Y>>|h5rQkRZE8V(VP zYPxvzuYg{dmX_AE^8l6_`JPA!s1VSg%JHqZK2(VZ8wS?vRfKJ}BdHyl^g!b+kIy&m z0gZ#?1g?2nyghg8jBBb?ik??R`m*0$CSlhr3RPbw+4TjaT6ZQCF3XwmJ>(Jv>+Ab2d-dwbX<92=R5q2p*Y}1aQ>D&Rk%1adE+;*6z+g zI>cEfI}QpemUw7rL{NOky=H0Ud`Bk*SqWxH00RiJtKyq^%Ko(cZB2;dOa*i%b|d<<>liKMp| ze0NY#T;_jWM#w>Kz@wpN$8!?rb#!!e;N{*sZ~|vmu!@W8XI{gnfm?Hl+>rtwI})lS z+Hxq8scNaHI2i9Jv}hYaV^IFqnM9QWn_e%dR?t5%c2s~F6&;-@W;x8S9zY|a*mM1y zoY!mDJy4&m=zJVcii$dqwgbILLUl^`2!+Yb%?)ozoQcT@rUyLZgWgNeV35(nXaRnO zwjf-_Y`!P)>QRE=r1^;RBx34OLoiYlhTaNp1i)v0VW9xx7$8f%v=_n(a0fn;`7X;W z93Q}P>=@cb*$`jR^@@`4bVGs*&e9?KhI45kIS|7Url$32KR>0kLZrx7-77`L!;=Ni zK2j?WR9_4a!;Xno9TD75%yNjO*|vMPl7a$!q4=4bn|t)x5t|jk0bs!1`3%AZW?&@U z{+y#9DFEih#2jI{frCqNa&Tdc=m>>yrNx%F#FOyN1+2D`3pO>MJSh_##EH@az8#~!Mzi0lB^ zPYGizM#)9y{9nI9wX~U~9~~bb|NebSdQ72x=eF!4s!>7trF&;?sYhtuQmM4-GL89` z7*O5!vg>w^u{1hi3QhL}-R($;k?N~LR4G9#)Ammag?V_CyqtReo#unyT-KfHqZ2u@ z4hTs%LQmg%D>5MD|0z|y;jd8$+4StKx7)G1;qC>H`Df$CYjou68OvK1g9Lqm5J-UN z4V6w1vnP;ASVgn^3!cINgR;~i^4FQOS`N$4`mg^FPE=a|d;jOm@jvH0#ma{=>(-DS zkHFY%I+@ec(*uqq<%fX53rKrsasrzJBIx_Z#(c-acYxdRL&k_>6Q00>3bAB*b`~=w zm`Wma1b{Xh8ym*6PP1z{&O>(UZ43Q1y<1;$YJR(Q*j#?QbxLtGzmAAWV#LD*_11cO zLmkEQ(UHqZ*IETsd-Xmz$g~LP$ynBh*~>AjDmR>!R@OUZciL%F*kI-0^6JToiT-fbh9MuW*pKFo_4W2nhpDdH*Nvdhg=>b8ovfAQ{Kml*!i~TTf5&7QK?5-;B!@B3G z79c};8&e)*qOGW?$PZ+kxC?;;*kqV_h@m@Io!=vKw$b$Zd3uL%5!+L;H2-pFIsBXB zfB5$iTc`eW{MLVt=5lC$-?@S0Xz}~w@1|W(RUXCAktU9|mfXu2_^QjDWvxwN5dBf@ zb|J5SpkG`blkE-Zs+vw-wI-(TB9>)&3ASpUlV#G(ot+!hF6^%`bl77ot~ojRbT+NV zd|yJ&y-cm(UJZ+~wUuWHJqKT03F=#qGt#SnpZ)do-{*qG|L4rG|C}fG|AP-%H|=_@ zOdZGqUUu~84?qiSL%1VQKY&JPd5wHQy6Lt;DBuSpLk5E`UV2Aen==A@uK49ktB&k9 z)wew;*B`p=>HSTzGBWQlzX4YLq6|k~0YaXGe@R}R=y2WIOpcA8aa%!N9(l2Ucz6Ls zq$kM*2j_4wp}Tt`i(Oc_(@M~J-pnGNyILhomO98&ETW= z#inY}t{_hBK(^jv=jb^8;ptm6$ZD< zi-EQL&0-0x0bg}tdS?3m=|LaU z682s#eZ~p|8jUgOI^&jrGJF`_Bpl7smV5kwy87DGqY7qb=2B=J_!I{_`zstrR%g7O zj4V3>>AD`$i8BN<6e%=Lz>do>X$4zY-qIN4Tv&sV{4OXc@YC$TdNhmA=|N+#YWQTN z9{xy9K_Obq)gH1Ad?QxP&@-~&V8CGmkD_ctTsH`ogR2Y$jBH#RtE;;Env+H2g5aO2-PohKd=)r>z zcpNx7{LdK~Jxfi6$Ex7oDfsjjha}guRaCws`=iqn8%vKa_sJ-t zqNm5ngzX1^5=MRopsGRVXhkzZCu=0aB;Sq|oyj71Cs0Kreu-);!3rFu1Zv}i1m68J z2VKFx9koXh5rP<+`a;P?-9QZgTkRg)Iz=L-W;BVYyV;OlNC!OokoC{t@ZmSVVG9JG znuPwdwmc+B;5uS55tJ895&@C*wPFO`r0RF?0J@!rTTB4S3T+T-Bf!VNuQLPLWb^g>XO`B0rXO)?8y%-H z@SJIrW$^q2PllxA8ajCx*y#WZAx=xl=zu2~a!gk02;9?fV~j!D(b0JY84j}@2r^6B zyE^IhA$&Sa{pCv&d1XVXsc2-GCtS)uvS-g8Ea}9@gc>9m90jMQj{6(q-uo{|(Nf%;L&!6L^*#U8wG6X&y%LOv7 z&yaj)(a$b`X`t&35EI5(q}@Mv?J?hW4{xj-r$@B&d_iL^WGz-UVJCeZ5C}ctLPARZ z@bnBE+!ngwg_SQ-Q=wU^s}tB1vhA!r&{Lm1hnS4`BH_7&eKQ+58XiJo#*VOv%E@Wxn}?*P-j`T>QGk^_me_sq zA8F-PgyR=_-stz}U{XX+4s>b$ITq)Uiw#)Faz;w(>;OD6T_1J?R)>a#F*D)RitO`d z=KeuQhPqqBJ6KLaCnCE4=zyEWy1sLZ7^fzV=)kch#cQie8I)%Px(+Z=2THrsQc^yQ ziTR2I1vc@8diwWo?Lw=_+3Q>ygXbb))~l*Ii)&!PzeMCj$1yQ=r9Z?$jHUy%Av)Hz zmyQR~iE7mUo}HZl(_ZLLO^pDElAItbsW#t0Vp18upnf(r-$NxvpNurI1;34m&{)#L z=`mfwTVEXe6VjKB?iKbPF*HSVaOvsGF(OZ#J1PlkNzv1 zPZSXq74_svx@U9I(UTZj;bKw}p9%Zw53zu957eM*Y^~5K@;W_`i?x#VJ7TR%90McH zXCFO@E-q$&(e^bNJ-~ztaP{g{IPh`v)FE+Ri*jeT?4Y@{|AvN-qeK%T_3QvFvxQ5U znXH7)SrBKL!!BFT%)$~L5m9K<+mjg-(U;vrDXom@7j#ePX=#gLs6g1>ucxZJCNt=u}i(X_do)27$jXv?utqE>&SfIsmoLKhnkeFs-hAKxAb^x+NYZv zMO3mV523kI+t9Go8n^lh#*&gE#iOm5oq?cZS+dUr;b&*}8-&@WXs{mpgAhpd^x%3y zWgkK!#aT!)XU|r>duOrj9zZNyrBhcZo_F)nb~Qkw@AQo1iR&ZVu_LV4emfczIKIIe z#T!+{N;6N;f2 zN74F+CXc2Ek*^WoR&!c^6%Mx%n_Fkp+X&S^Jp60=DX3U}ucHj=L8KZuy45cH;NN zn4K-OcR1Lt%57Mu6yXfDf8)lD1qJ*k;FAQ^ynXvN)JHLxny=g!Hx=4dX>H|4 z?H^H)v-7Zo#43@bf7sz}&oZAl(e^)>d-J%Q+qLccbeS?l8A8NWrb-zb$ec1nh)PN_ zrFlRDg}6)!A<8@^>TEzWNtr2As5EB?mCT_~@AoL{TI+s3_p{#nzCX|VeBS<8%f;Dw zp1Ci_Rn0vov7oMejImV&;jY z_Uxrk0iMm}u)M5_3F&pTp@%8NzDz)lIC3_qSRNP_3PZFi&K|;79oOT z!zBm_^L1 zD+T}fR5HOb23;A15tx}Sqffnk`&Jn889+bH_|Vv&l+7+tQ&$-Z)W#2AQ8R0Smg2U6 zfcPl`0!{)fv<_GjPBQKKKcnkkS}rds{V#6gK2T{YNzV{efvg8eW3rEB_BLpq|!-6 zbYgq;vN1K)TKjWl!4)NyAo9z7`?}yWD!W^5H)+68{0g~1fMgPdj5~MKG&Im<9vkiJ zMY0jyKd{@dSA;Dn7QnQ0IKTn3$5g|+jVcHvB@Nt5_ID2{(wLf;dmv#Mnur{auLjI7 zEK(9*%@gN`r{rp9p^1lAd;~7pV=Pk6!k2N&jLbe}^od}&gcXxNt zIfUT$zSRv`5OnPMWcu7*D!d*YI(!;i|9LE29t$Gjl?CTCzmg@AoLA+=fqbQMcPOh! zHM)&jc~1LA<913=lS=hQw&-6#NU#4@Qjgvv!*$f;dw9mE>gmy^fa&X>l*jIPXx5^%) zH13zlHJj1d?vv^gm-7;5oj7BSne$WUZwPg@-=O9^=UsSb7==3m1IgT4<~1yFiK}jh z9`$~IO`-4Nc>X?-nQT8LB_%Fh=vgHa&*SsYUNLFOmM5Zs0J`Yzj@}CV>;vzUhobU{ zdPUGa&7}>ch$J|GEh=-apM>aSkB2vs$rl`Q^|o49l5PXA5{3ONNWt0=~_ z6ysuJ4+GV3jA4w@M+MSs_1E#;+qT$q$Ml$Q_pxKgBJq$XD~R)7ASNv5Etw#-YT^RNTcT5K3^Kq8l!k#SgQ`VC&+hM(50#Rn0u zO3TXnssLFmjmyh>CZMMXDHfrx-;Ps%1<$XlN>fEtlzfXF6X6k2zuL8&H6%JoUOp~w z-kz4$VeNW6l%M!pLibO+=)VCfWyF@Q>ScFpW-GJn*4K;j7Mki8e0-$3$Yc4RNu{sf zO4LsjUGu3sp83VSy>-Q!UDX%(=xzR$QPuYYubOPz8R+dLlN9up*Lj044cG57K4*pZ z_0flmJ)MtOXU6_{>F4-_;`+5&ChujR4EY~^&;QcJ{GWW$q$0tvMVkQ~WL{l#P*4yV zyKJ|iOX$K;x^$M`c4H__20-x;mSMR%ZO-oSV$99WWkWU9)qOy$g<`_YOlfT9z_*Tm zjo7dBIv`%5COOj3E-v};=Y69d{xtsw7hnM8AKBaXojcph%8J(gxN+yP3bfB1-~E-$sSyK>Qo;yGx&$VI4|t-Hd&|6Xh_<|ne8qO?~RuQ>n7kN z!n1rOIx62tPoW3=LSy3V6P4bbZ6~OcL5(mogM1jdH#mG(Qqni@e0bJ#!{Xjv zjVV6Uu-lJIC%Zq9clkaM&S;ccTluX!cM4@6beLn zn6Y#F_MbHHLf;3}>=CVGLlyjMW0o*0z^TKh` zWG_~0fKCGW$&Xi~zY16t{p&|Vw=3CcS7|t%w|S~+YLxXfa$(9CPo6Bd8}f_k{-Rwa zpW5UcP$FsJMU>=+v>YD6dMU@e;@GiznytMc$3vWfW0Mu&u)zRCbuE-&600#E(whdH zJcSPI!+61D;*>=d=@wGzK9~!rnjdf* zP6Fl5aF`Wndb;ko$$ll3K{ccS?}IJUcQT<-becbTFC`z$?pcZ8$1=5JlhSrM2o`Gn zP8>XYSXScQ6*;=&w@9fp$93?yU*rD@9cXV;otl~|utmOJ{e$|S!iW9qyP_YgDX#C- z>QyN<8elC_slYCHcsZ?C`uf7qUq!M7X)OM9i}*;mPrs_%{NiHTD|YQFoT>rDkhbYZ zYNGTo;0;g9zM0u6jJ1cIi|&DG+HH@2(lj+S<0PpdC1pbg317CfEa6EyXBp>AcG%P|PRqxK+D>#%>92WW@RHkdDMbK<`UV_DlYCd9 zmyqYT+-NvQ^wnjDw&hl>! zCqZ)G4m~`_PaVzeTY~Vy^6N7ybYVDv4+$&}yOf`2{9nF$ggse<{;$r`19>8&Gk+83alge0$MbG`vGgz1BUWI@EZUdgHezOLc{_Eo?9SJtupQx zXb(&Z;OloQC0+{)QlF5gzb#3tXIGObMMOl96#=HG8@W?U2)9dBzY!oaBoA4mFKgq( zs;jFwO7e4`qqkILQNgv`V{MwG7ad3Xd+yvhAF#KI7cXX~e3Vo-EBWS{Ld66&z4dm1 zTUrr>uBruM0|F5pJ}mH1_GDg2Qupu2qo?P?ZEC%5*SUA;CvE!z@B&s3A5 z_;_j$j0M3}5C}60#TTywnE9@N%fj$(;`Z<f%3e26c3SF*^`3Fohi02)v+4bBLmpAD zUmJ5IJ9*jS6mTSH=7t8;BFdHHu~($DkX6*W?W`j-9-J}79I$|FF1er14NNx)lei{c zeIphMRv#2MWSf>7OwF{149R-%;Qi8V(G4(M>7QNfTDrfEi%D=u3S0^So-Ut>Nfx9f zH{U`X?c=HeI%_qC4SSq84fQgm9%s`M>pv!>7~z9CckTg~J1mWUefxs*#t>wr(&@1N zg6GW7>bKe7KPAPNH+-4aB`L|+eR$7tWvv1m5Db9MrHB3+;a)n9a}>&xMbBPhCC{87 zZqKJZ+FGnAgt@2u@d;4q+}WWe`(ec^{8gvg+lPCd;-gePfpuW%@6a6XojCV<^+Gz- z-pR3)q?+HR1;HU=S$C4w2~orw0_d4DuSL^7NLV7Ru33)n6id_}hPu#K=9|U;K@E*t zG{2k^Y^2nRp!8`_!W6yy+S4kFbPgr)#TQ)pqsB$nv|-aZ{-vg#bfn0lh1Cp7Hk4bz z`}QUAWX~M+F)|>?0N}C7qdt$vE1*|*@dIG_v@se$0hLEAv>Z8h!ch8bj4a^R(J?M* z1!UoXCb z#$gGxFJPj(zyH~@@5v>4@Sc>${g1A^O7~jt*bU2@1qHs4fp`QvAc$mSIAYeDaU{ofwW|K%oF8(?}t9UFbq%!%^Lbl$wx z#2ZoW06b|a8ukIgPELL*swCK#CVN?!;vYf8=%C4ip+qIM&j)+3*IH_8J7VOn0J^(c zj!!0wRHLG510Y4eJrQHR=>X{`-kZapD|z?-CY_N zcP(Q7oh7r(2pJFZ)|=jixGBOIs!j1N6nD`0#f(AOBRAt=ZUzDKGL3`5{{Kk;_{Si#f07c!t?_svHeT zoo=YwDA$k#&)=4vucoffO4|#+ivdw5RTH{eXgdlkAIWjW$?n4|AQPz2>2w&}Rb8X> z*|RM0!h&U4NT~9obEX6L(-+N;UpA`cvjq#X!@G&!Tj%)am1n9|1Aak)6Un^ZE^j7iCKAqompm5Z27m+e_X3LrUr7AK6gGiTA(hO?y>(FR`^XoH!9d z+i*?IdkY3PYuR!vU17m4FE%zdrV&QU{kgh&2jvtrP$0&$szxAz{iYwbA9}z!(&#_0 zw4m5nw6V|#5hMqS=3c8mT%pH>?>Tu?8l6joBaDI=Iehp^fTx7+Pl?1Cx$|bu6izX3 zi&Auf=FXjaNH6kRTKzBDp4%seZuq9qaBFeZ9)8NG)&FaC6MaJvOqm+@{P`kzTwR2R zCLK9UI&|qp0ZC@MJswBY60WrLxoMgKy7yOBUPzpwW+p5qm?uz93BcD`C*{J0=FOU+ zt}vK135g7K*d~C(?2LIAJt8=b9zTYloJa01+pb+tq$wv=^UVa%TDd;>>HUj8|fMShl3q@etdp|UJ@FLEB0D+58qNV!?mZ(&xzCGf9Vcs_#G3iO!7eW zvHJ4z3;TDGs6HquNvpH*Z`VWemY&X>6dS&h*M=q)?Q=?#6F@rgV-aZErR5!SWEYv4 zp_G;1O@OB0XP=(d4Oafw9Yy!Z?V(jE~ z&8M@btjV_ZdD&5$EU8myt&^cTcAQ14oRrbv6e+z|{i*~Dja8kwS`%rc;?ACucPq2s znMUTH&B@y&DIGXIt@YkpGJ#f)XEo)k{DcnlZgLI6B>&sEnhb+zU-cvH$^xXWQ3>Ow zO`8VmmAXab556aN?tCCv3CA=A#v9}>?y`>4ahF$*E_ymeFBXjqz6~ZACwD}jbA*EP z)7#5@sxH2s`D7M8GrJ#tUQr>fdTA*xKtm2TcKfwS8VK?vga5$qz z^tK|a1W2Vmu)njr;z%2bx0GtOwEjW5dUNxnjs~%DAf$A8tCa5Lpi(Xa9wyf%-dky^BGMwl}DoFtG{S#tBs3dev&ITTMuSt-5cz5x4syFel|;SRVP{Ba*8N!9Lt^8f zn)laYS_~LKK>>bD9m867jvmoau08NFmJcX}asMAGp!$K0}|!5eI@3J2PThGY1nN3#S4w2lUpp(x@kWdlwM+bV;QK{iJZ z9U7qWAG?^DZc~?b-7&E;qsu`KNvYKF(7ZRe?)a}p+nwKIl$jac>;F>v-Sz5z(4H<5 zvmm(ZuuzL5esz>dV6kY!WtrHO`!OmM|1`rkN;+P%p)X^n$Sl?TCiStsUI~9`_$Q z6zMWyB=8Y!!>u4>WHZF1W7g(|hgvKeImZ#Kf%V1@-9Fj2ZDGGYT;37%f#EY}&0lfA zGiHvEnxtf?qQXZaS9dJAoa*^2Fu(QPn5Bj$Nbo#3fKkw)aLHIO7zAlRz$1=M5Gc32 z*c&tnBhDOM{_}*muH+34Ho5|U;;4WtSOO=K-pnB06Rsnj$T}c6i`-+0zZNaB&VS%K zU>BY!!b||_17)IA3PDLUuOK2+!FjqDBZe5J)m5LR!#{b(jNCd8my`#Sr%%7n_N&J! z2hXxA1qCTQRqQT$P;1nrD!Q6m1use|v%^IPP__o{6}*%+jOqm1MFa?R@g{8F{MaM@ zGpCFWetYtyw1PxNC_kayVLw}to14U~7nFEFu}rsHFTQU`F($D8rIUS<`KsXiOKsn! zew$zU05QZY%t9e~;Id1zntVZMdjy;nvpb9b08kP>`!GT1Dv=Kg1Ek^Z$32^DJ9JMq zOW{+zwGk!7|E98?S+J|e+;yQ|O$XR~W?SNTwv2BCe*`8vrST#R*jj8*#sm#>Ht(0U zsp9rKax^;gD*A-ydvZJr=Q@Zs7?2kN`%F^jPTwJ?g7z9UX*$#qs1RJJGm-Sz>Q7tg zu8uS`%SIywFKWDczH}5mydb{0UcPd>K|JWS^3zD0x&nIrF<&ZgwTi>T7c2vIbo3i#&Kjh!D>obMoZLpzHkZB`h&CqX$E!LF=F5BZ#633KWo7KXmWfmFd7n z1v6oZU~ltHWW6-;dBmg*HgKBg1^6?Q(v~AA@QHcV)3;+5<61zL7jN5)>@b(DL)3$V z06iIW5BdlU;Ci?OW$&Y{N9+2^!6CCqa10il5EuBa5Om-c{{&VGJ$cgL6l!4%o5(~C&M-3afdZRQH572Fzl)8G)98ScVkqO4znT{p7ne=wyj$!= zF^Nc9O5zRrxdy?c%5s*GkfX#VI^J6Pts5RVxJLfib{kqn{f8}MpXPMz)-59Y@SZ&{ zAU@WlNL?D*7&qnDD5nLS59AO3u3M`G*aWo*F|N8b{&Y0(?vv zbVp?92`QKdN9c`(#yGw4znXW)+Q(=3|v(@Ol zW`4xS4Uw%Hr)RJ8v14nMeT$8^){a|_?coOhw)h@j^~Ql(syQ#&`~CcsBnV6Io-cpw zmLUv*Yr+u>(IV)lLSv10c*K4++x zzYHffKu*=uYwpQP4Su})^>p!0v-wd!`xsT4?rlBS?)cMktc(2Zw=F9aPr+;0 z(zp>Yl{h9b9~z5Nk8+82MtSK4-4%2S<;$UAZhG%{Y`};S7Z6Lh4tb(DCi&o>jar6q zZ^vZw+oUc%)Xdjv?}5cQXI9ia4vfCUS(ip5LL?=$@}gQ2{4kQ4 z{p_dwEjF5=>zGd`$$(SlDyAGnrXH=O@_AbG`+Pmg;@PXWxq{KJ7V8~&V4SjPb+ zhpQpYc7CN1?=g;O*CQf2|9l>FqBSpfPZHSXgb7eN^8~ratz=A}KGy+jTw}*=eu0WQ zgq;)=^axz|(|gBA2i1TMUAx+UGnef(&zQX-ehM83z{m=LgdCH+on>#_x;1BiDO$je zTkPzfm^%w5<^1`@Fm_dhF0_slG+to*^TIVU1tz{#uM{fQRUs{HfP0Um{?pV9$PRS`-pYp)3g zRFy9#_X&O&G>DGSutWE}+#;kG?Xy&z4%BXF9PmEwTfnw$E;fWzGn2g(9G4)BlCUJY zQQ$j3C*%G>I$*L*)FU%ahi~{J=D!+Fi=_Xw{kt&mQGt52;#5$>#x(A?=cms8t1&_3 z4^Cs}4BvY#=4fjNZ8Ugd9_S!7wevman0c~j=%A_$<-D`XnZ0j+EHNL=G9F0}4(>Z*_Wm-MFX?FR(o7xfnG7ck^ItJ0fGVLkAPQ$_dU1j+@o z@^?k9M)&MqNj&@g3uL(lK~6&V4##H;EzX_tkmk=4I=4D}8xZ%_w_^j&8abWHeW@=b zXo1GzU&|$jPi{`Lm%biYQ~eTQPM)*Z62BdXmOby+#jAs_M!(E|Z~;1Wh%cI0Rk!DC z^sH4-)jtjUQ+-qzryLrE#LMxQ&CJcerq%yQ6XR?)&GEyC6z<>bg3d#fF1%yU@v8Y2 z7WQ+5u`bEi4irhf6U=%iwjR3}IVMO#e6_I)y|pDg;rEw5-{-~~UcYuNln@={W0Eazb?Pj(#Ja%fxpA+cWa1Alx={q_s9V4yXU66~Tt#)c^FfGbM{KxqJ_rjSNkENLs}@1YQ|M5EShMLYzxn z_axKor|Lhq6Zo(YSXmjJ#8!g2!vNO}q=#$i5|i+k)1eo51?m@Ca|O%#>ZZ);Oz$1% z)H>{dhhYSlo<0t*ZPGWQ3bIs{e*JC^Ofl&-_^+luS7q8APvj5$KXI@3aMxoa9hz+k zd~#3H?1^0O;o=%4>;4HS{wGo>WJis!@)4XlK|}ZIl-#`WoR^sP1K=XTxgYpPQo7Fh zhkFjXbsX@2m8BGs_b%G=f^pPIRa!O}9pncWnuB?OeRId*HQf&kThwpQodtvaCj&Lm z8WX5>TAClEOuU7lM_EuhQuZ294L@+!842WlU|K&jGpAVJH!fxWo|%-mwYmCr#fCan z@}G&>{@DfieY^hsiyB)6Pd0TMwv+?a|29?BA#JBuZ{0oA;L?s7HP2wo&kxstpN5a@ zVI8n_>j6O?0R0eg-P>#UMX0X{w|e?c6TH!ji*B^G+Y&m5GvN!&VLI4UhLrZv48FMK ztW!bY%rEjUQAab;=dFhhlv21A(dD_K)Able4OCP0?itT70*%c$;a)b zAf<0EFX*J`OO7bDoB5uV*05Oqg)R4w_2Zrk2u&Mg#UcsKJXhD%y)TD;7~T-IJ)@(d z?!K_ubGYj|+kD6V^OcgC&Tj1I{mat4rE@;niZRc^A=9Ae>JQ`D4P4<=%$WI60eLus z)r0sOys$uwJMSh8iT>dIc9Zs@9ij>mU_lb+3x9JKbt@*7Y-Jdm@84RuYNANuTTrY) zhxg#Vc#>6O#w^eNJ0@s|*RsN>cL7_rO@_jbG0tJ7K!L#E&Nt71z{}4O{swIfGv56D zSz;hU5aEnF(>qxc(AxUB(&omHbv$Nw>A2{{0garW|E!M`d8FASbMqYGX&8O@4Dns? z&jIggkV9lmH)`n1N=m;*Y-)Ck7l{cEuy}W}5g!LagZ@H%poj5FrfF78N3_W z*l_+E)vT~>=7@q^QQ-0{XH-tR_O@SYFr*II;Sp>kF6jkARIWn-Y*NJ83`(T??+Z|lA3Kl&H7@ZZQcY*54woyUKD5L*#3&^{QJi`lM~ggrIR%5K@GB zAlWc?&35Pkac+Dg)~(Ev+YUJu1h&`TNRM{Yn`B24GOn zYyrq`SzgH+##y)|Ql-n2g`ZCNxcBvf$jJ6P;>KJ*KFFgq;jiM9S8viIE8112E-b4r zfh>ZF0!KH)+7h<(^nr^qa%6gnDO(|b&oIRuIlVa;I_&;bzknpjai!+*ORRk}1CBzs zk$oO57(9wNqXNS|&7wW>T2s?gzoLFEIByZZkCT>FC~&qT*H%vgiVyOScgnp_Gx}@t z*Y-MqqCN&cBDYmJzieHU;GMnu$AlMAL2Pwa65%+Nqb0xBaV;&wNNz0t(Sj}~s$nPGV0rAvsZppjh2vK*zbr?#4rQOhUyVr2C=|6KSA{hEGJq`9f6_e=G;Fr=zw;RFVNnjl`mgqE#D2RD9%{X69w6KRCC#L zM{DWbuJX7BFQ7?g1Il<&ws3@x=pWk6NZA02``N*_x*|+zim|bonf9<@D==ybIEj?D zvBx0%TshTqvd(x{S$lq{dpKO_%nldGuWO-OIq!VjDKg_fJix%>A701VkaX3TO{Ig^ zWjDip>{>40CoPu=MCLr#K&5x@5&|?uDQ%(I2F!KsR#n92^7~b3L(a0t-@cpNaWAan z)dL=#TR0)*MSe*v(YbFRZ( z-U}5Mlbb5*b>fEzi#*nDJ`xhqC2%eL&N;vBHh&(31ySb|r}xqg-?rQ=7jvXg2Qd}r zzSrI8hn*tt|9x@q*<}I$dT~-|fPayP{*wa-154jPvI92|txcg=E-1gqy5|EQ6$`;S z8I-{iOtF#*wYrD5h;Dh|Ku}PJ$_HGJU+v>#Z(GBvx|p2Yw&y4d1B8E6iyq9@l`m&x z5B#xF11w+F2A+^sumpOmsDP)Ez99>nSD79O-U*ICbz#wRJ}&^rQ;_|EwM zeCM6E!s|~KW53~@3~PX1igCn-CHxgaQQD89_w)!{i)!vrR^c>;iOCUwhN^=T#<}28 zVFERc6ZmaV9u>IC^Y`ysDo9=ynrN8Akzca%g>0qcQ1o~uPzb4uTO&Mr? zF`lM23xeeL&E2_rN!vn_4A&03oaI~$HNj9Lvm@!)SNo#s$tuJZ!r8s*+%lX?pp7>rfs&Q+v;Tb-M zD7+luXp;rntktx5B0JG+TnT7TgEfNJt({EHR-uibnz!}0$u`2wgtQSo#;mq5pwnK= zR)GCR3crn6B9mNgUfvhep2+ZY?H`t+BomGRoAwL_RHgH9@>gtpSoD32m{!MSybnsL zDE)O}ncj0u5Rkv32)5s3^TtYCCRK2?2)3amIUwJs~WIKX}{gj1Dy=P zV=t#>Tav$d|A7{1-p$$exz3y7nJ z#xOmR3pW;_6uA*gX9h44M~w2NR;z_xnqY~l_i*)X;T9zoo<{Nen36LGruN{U(_?8j zL6{=|UIOMb?3@*V-QG+C9nx@;#Ms!O@@krzh>|k#=yGXLW1BB5^M25{Z<3`BEq&n9?}24xWyNyss#_a>09|ZQ&Y`j7*gPz zlFQ>XiGv4+*-gj9BFo+xwlWRqWy{Xfk4H&=O7>+On7Ghajj4V@x>LQkdI4_yOq>%f zf)f*38kz_9v1ha-D9B&F5q9*U8+yJ^1_T!oQsEdmj0Aw{-ogRrfF4-PGigtKzLU zE)y|P{(8(f^7VAt@}({badDAVbJ{pH(xc1 zIcH$@Jnx-MUnMDLQ_{|WhBvLeP4aHU6yzkw^gPuu0Ktuxo*rYkw#T-gZA$?mW}9LW zwm5!?)_?)Rc$K2nZ0K830bgI=+^IFyuStlf85^f&g-%Rc2KEQC*`<4TIDC&-Fboeu zTLC8`HDiU_wK)l!&$b_XIC~|X2*_EY+!r|C}W%FkrQy@wvGH3=!e_0~FoDrE6`~a3 zwc^B}hWB#sKGd_tEsi3oTPdCAXU`TcYWxRD_F(N&oXPggt!Q|mBs{Lx;`gX@_o?!~ z$*hrfo7ahygd@QPmWao&)886Jj57~J_`2h=n92fR+boS}Ani$xx0@zAoX{I{syltK zmG3URrYW;9P}=wrj^l%D^Y(rwS0*O^A_o#2tXEPokX-UG8FiIKqC{tw{px8)t}v)d zb)y*HIwGLqmKQ2GJ13VlzkBydFExe~C^s9>C~I2R{D9tuP};tnpmgvsJz1(I24+eg zzQJL@(knRN$dMyPwiW#sX{nyRd;}U4BW}bz%$tEqP9cAZS4wuwH#FR|=W&UG#<HG=@uZ`%G3NKPr8a<2a}YD6h2Za(SOgHJk}`qgsPsv7cCq2fUE+M-!A zbS7pOy1USmoc6X|(gi#pj!d^JSC>fiWwPk!9@NF6GtD!YZf}@*)8PvYxmOKyGW4Kt z4;>nN@aD9S4PQu-^oQ=N#*Z_9z{gF?X#8u1TWuR5&jr;ozY)^xVOHrZv5&}MXgGoi zFGZOPWkBDbu&3I$?~QrZjlXMpr)`rh=8;H}Y6)J#p@qX7RWc+m)%GmsC?bdOOtkWB zc>Ox7TWy<6LUBdwYwuZ98@6Az1O#j>{ho3d+C=YAmPDX)>)D$v^zCWey!KYms zK40Mp6uv1z8rIFFOC8fiH727B@$o6KO1(STzwyygb7kZ^c3k|gZ=SrmCRXk_4>#tt zG0cIDa>T)YUw<#yzO$RQvt7;;nBlqR=~EeHhP4>KZP==k<3^`j^vH0Tz5T0#HZ9Rs z%GZ^=3m5+V&a)1ztfK~kfLTw-prd~#qXq1FDluH-kxq$^XpIvz1sIq;FxStYt2uY6 z3QMT3!CXuu>K>e9HpWB3D!ww&M+e-!bBFIXf>OQD6ae3hE7a!cSFS7sD6gJ3?cUsq zvOgrs*Fg?BKlfqOaqys{on0N(`(ZD-e31;q+hrlWha9332nU27^l2`HEm;MzgV)Db{2)#T>=`_mo9lCegcTh)6W)$=rxIZwh}S-W%6 z)YN$rS39zM5+BqXv1kuaaUm)f_PO*UIWUl+zb1qE#d0~Qml+b1)&d`_!IMJRbqXQj!H5ZMS;qHUx}dM6YhdPnX*GD{DlL`MFgO(RXWc;&U? z;^Ge{NCin?nTxJrac%*qW{7mANtxr`&1nYB!-FYxaxN`fz4~W#WHWOYxSFgdSeupT zm8xJoe|bYeMZGy&`8sG$Z_^X9#M`6a1&n}_!Avg^-U+(Von zA0B>N<5=iIuUD;<#AG!tQ5eDt_a!F0MMp>DsbTG1)ER>lcn@F!dt4=ht;wfMP518E z^LW77ON;ip$|wWpA6@yJEkGRAG*OZq&w(H%ER4+~VSddUQ6#4?JO?Na_5FE3*}j|? z0~S|w=scQ27rO(Bq$l&bG?VnsNOZ*fiq=L<>=o)n5eJeVglDaFu7z{2BE*0Y{qV3M zJ08Vs&xwa@RacDTH0VX@r>N-YN&IplzTr{p+%rTK-$s-aqv z{a2lvw3HM&f;cMZH*3+NID9=Y4Nh1qA6E+EFTby&qk|?9k1*COp^>}L9V0%IO!hk@ z_;L@uUzgsHRh+d^CB`IODbrY8HvUFQE#4xL)AG&iJ+rsbE0;~J!pE)j)OH3<&-=aPw$o;2}m zY3JZRl#iGCs#Q3GF$v%u0RZAt#M-mF#9<^n6bcfnKYj%B!S6Pds0GK)*v65=F7~`V z_-v%Zid#zFraePhMQ6ndhq2C%W4tyvK8iN1rjS6#jQVOm%)iL~VNA_KshBY?_~e(@ zF!s0v@tc?|1Pn|lCxvl=I0tI;$j#932FIM+mucO?nxq>v>mi9^yb|NazGy$?d9-WY znzJH^nQ)+f0O$e*Mnzpn%bJg`U1}Nq6?H9^hdjjId$&G@8HFFI-Vs+2Ihv_#1{eUq zXoB4ZT>@YWnG4DY4KeX^c4T%&u9@^s*hV?9u|N)IfB)~)HUM_VcJKa(fDMvc8Xh^d z-CGL=*v_$ah%GH3)39`dGsN6#;y4ukIrVc^LWkfXL}feD82AC@BriYz)vH&ca|@_} zzM5nY)e*TMMmc##<>VJE5bEE?ML=n?A3&Y!;VbX8S)UUBLhi2>_ zJU%Zdqqul2?fv$nzs%%$3b^mHqT@=nDM5P2R+EPODVbt0-c%S}aa`c0H55HI2613@ zM`8T0y%;Me_{^lTf}2&>tcw^~MSWu_v#czm^O`t86$uZw2W~nbh4vH++oO8O29OgK29eOTtP!R+v_lFQwE;+7dBR(=VL1S@#N-E%7*flLw{|F85^8ms6VA4d;`+esXZ4IeanMHibJ2HaE-VL5CNqe-XH7o znM#cBD+4UG@;6Lq)#l6gp__P!jGsz*KPEJCG}#wHow*HBSs(S?n()~5Quj<*Q=WO@3kUXXYhIgv0tLx2v;Ncw_wFfF z|A>#tlJS4K2s*)m!bbYZp+y|zLVe(NIqK~FL(-e`m1rS6*G$rtGe1#9azesHw7B;{ z=mJ7}6O-lj=iy#m8v^*YyHCU?{WlyMt(8IGoW5u|`b7YrzvrFDto(4C1DvF2fQ|8) z$IKZc2g20|+Ccw){g@*Vs*|BTAk8EDY^6CSTgCCRk|*m)WZ9HN-0dx@xRCO+9LEF# zvi7AJt1$@+SC2MF#I2|lQShhvo)cyd?%bJDpAfroX0&;CSD$E`IV*c_e{DBp3SS88dWiAEd)G6#hS_39c0nyCkO@PrC(=;zK+s_)-eyL4LDj9JTf;DjeU z)gVP?HG~O2!Vi1dy=n!y<@FqwLco>LlPQ39D=Aw(0O}T;TPU{vy=^TeD+HFo7r?2f z#HTWvR60YJlsS=UAE6sE)(M->&=(vj)T81)7!MMsU$-GfP1luEc3>xV<6d3V94}9u z!eM90Av3z5`0S@3DNX#8G2m?S#fySC2TzS#d;9L)y|!>EUy_9oP4N0+J5^EsOVb4O zEM~jdHcf;@O+rTw`LwvWj#wOBcOASu=l*?H@)2^2Svhe8L_m@n-Ub6NA#=QUY%&Kk zWHC;>N{@@|CJLLo2emOLav`))0X?+g%$OQdMpbBBV;)jQZskjZOJ641JTlAv%V_E} z(bFKR%0inMvnf;NH9!3=Q3b zmj*+>Wk?tqkOw3IvJib4b{@yC;Nfuaz#fR1(9JSB$9?hrf7vck#8wRwZzCh=X=9u{ zf2p5pZm|+Gt~tS z2*@(xd4mNDj>}!m&h~_YDcEx&7p3YeJ0LJ%k=L@yC?m16U=)!r z`v=Q02Z$ArhUl=S!VlrOGOTcP+^=?>u+_rYZ%v zrT{hAvBf+twYC1>->a37b)OYbC8!>_ss;ZTbthKTE^U;{i_U0meNkTS! z70w(Xi6N^Oq7OB-3oimk62J1Owpgw?OH8p&nm=w_IxhwN7K9l7Bx+~Qihil>yX!=; z2T4L1d&CS#R5xOZ4A_dr9_x2bz7gV7q7lvX^BVd>)pkO5K}yZX(byBrF1baBN?74F ztZJIR$Vy2b2cv;Q2DbC zKNjPu<#%l?y3GDoy7JWlJ8CxdjVpo7d#x;8&s|Z&`I#Dvxo;d9r1<8Kb`XgMl;31w zi8BkDQ1q2Qp^`b z@)~KS-hg0B3jHGl+6)pXk|P9XGiT1^rao~@sQZpo=@Uma_o6-X&N8lm7CG|_;B%V1 z>(mH`EzpZAT2?`{K|0)WlN^aB)+}GYex<|-es5nb0F%f`lJICuE!i9JiPR2s{&A7pl|M|? z?+Enu&rQ27LuZSQ7`D$1sq~7$mfkX2LCkiv@H%g! zefY=`#zaEN3TqQ_Ff}!ma3lv4$|5q`^5S7BVxTEOFtwJH>r0tONiC?dQI$r>ZMXQ; z)HSSL@mqbSP$B61a{{!eo2dICi$s26NSTjsC~sG}I)({0eWm~(BBfiZac8@;vooKG z28lqRX+1TY_dFRj4CnQ;pWPl=-NQbL8Uy~{qfMswP^lCb&zH$cFR`B+!ux1iPtN9{ zatU$>oZ^+!vK$jGuHUJ1a$$XkW*YwMn&udsd7NGIVCa+}K4v36lbr#pqC5}mn6+?& z=8T_nPH1GxCQhCb)Mtw0xiU&b^|L4J)7|1VGAUAI6GxG0m1#S3akG|8=;`uh!lG0& zd!tGGTTmZuGJBbYn(tRa|Jrb`=zCv#y(vKkP1nkrsdr9mW}N%MW%O zo6WU+bj_)4(BH_5S!AU1cu2l^(zu%Xhj6q2N5(4={Vxp&OP&( z>P_$|`Nho)+a6{Y7?ycyO@zkpZj5<4iMr4`(8#AbhvI0U7{tlQ?8xwNIkB=xN(2ol zWZ>tohK)O9+>S!306^G607#H`9M_PLGOX}3q(|{u!Xr3xSXi4&(Z6@s%-Qr+gyuKd z{X|%s^+Uck-W-Yf@5_@|q~5$>U`WZ?@MC>x-n9}hA~$~RENH{G2Q@{wwhY*O;)t~jFbwsC;y#M9@S_s~1? z4w#b60}1hJw1))=POnQ#ft5(FNwhyRQUP-h+^s4LsDGJcD00)f*)7_5HM$M=e*E-n zsqp)U$kvmnN&d5w)vnDrVH~A;jviGoL z*dGKK0C;%KY2<#}k4^_zL@-Dbk~Sg%ftlzG7wHJg@9E9$`=pnRaqlOW`}OM=Xobtl z93h(pvE}uF-G)sZG0Vi{BVC70Teh4D3oCp5`UgJVT?a3qL?oO9BsC0XS$ELExyd9N z%ZnB-7WEjImar1b$}*|n)e!J%-OzTIR#hqW>{$%I1==tWAz(#oWg#arH-A-HI+%`8 zgAO;1eQ7#H7vMY=0_Bd0q0B+Obcy?dpi}TuV6bT8`zZtGgF=pxTw*W@=`EwLMvfQ( z_3r4XRYUdk#I$vzo6ACDHp!8}=2JVGM|#q-{PG37h&Hddzmq5XFC0vR^gPc8>WcEl zM%aX8kZMMmVcbaR@3S7c_C3Ijx2ZR3c3BWY*dJ z{X-`Bjlv#LEY@;*J)(_VYZZg>oGU3g1rntSNcijsQ;u|@G$LJR1WLnXH|F6yD)->; zX^V&kNp|GEK2vH_E;_SjqLYfHrz^qv0j2>YNy8iv9B;N3>=|lmqd1lgS{(h5GKRnb zg<`LQ7a1TxU&Ix}C!^;JZcfcUwWGrl4;p|UI)~Vf(9tnJkbbg9UZRVjj8im$feF{& z%unFhw9MABokG|3#=wO>VsJ?bQ3`p}DX*~|>rEmQ3ucUz?7yF#o$$=tbXA_3r0^9p zypG&5yQb7?J%_@Ym!H3VqoDo8cftQ246Zw4d^>iG<6QuonT+t2R8-4(H9~M@142RD z_UcxP={5^6m4%-%er^bAihh}&2u3H5<(4uvlM;`@?Z{Za`60Gbg7&W9xrw>1pmJdc zXy8y<)iXVVL)dVHl(8tfdkq1#1L9)ftNLrlgnTwLwHRx1Csl$2IUl@% z?g|PaK|za(#a&9i(l$`EzdLn`M`I7j7C~NWBr}9zs@P&F)81vHt)bc&u=768iv!%d z?Ax56J_>P?b=|THj%U1)l`LJ7VRNHd511-e&{~+^rbJXA*GKG4jr*D0g5JtY4g$`A z5ZhHe&Ds!1b6tX8DXAXI#!TSM4Bd@#B={HMgHRoh88lP1yWN{xGG&FJndOgV4XK(o z$q~3~*M%<6rE5eN{5?S<*!qo!URePV5_pCG7KFxg2k4ce8o0MM;$XZQL)xZI!x{bC z*RMLxi{r-_%9xm%_SyIp!3jN#;F%Mm&1W3cn$i$*7aW|})%^{PV|vu0)khZjum6hcrCWxSw5jQ%`&o6ZFBq`&T(@A)GKkJnxT_ZjpSKm1E^o#5XlL)AuW4cHb`_go_u&{Xj*hza`iJp3J zMa}f?8W!V%znxxZ<}|8_Xz$?OBrv}WUoG$^VuAM1p|cK*KhEYwZ3H}a=-EzY*`3tL zL=ie9|162mTp8hTrCu+q+HnX3c*wK^W-O7b*YwSLU>hD=3H@SQ{m7Cl9|}=DsFkQk z>LUo4d2i~%#tmC(TDMMoGe>?r(71P$eUAZ5gYf``5B;_l!{s6n69}r9q>jLb~{TqAc;O-$qvD zmOB5~Hk-2&ki?;r%tnG-!Bo6&B`@V0mq+p!>7&X-4c_@@%5@ zfMXwm|GfF3kfaJ_(Ue~IR9j7@{kt$uP#^mAc}aq6B;(j{<3C-eJ%7TDEQaQp`bHX* zsY9n4hLpjKzeM1wJ(VY}Xne)$IgN7(zbH;&pU?EVCwh{sW-!)Ga2TkD@SuzS?by}C4SZpQQ|W~+QQzHKOrjqE zCW$}L=}zvP5~SQR${f|9$NnGw=)QgZ zH*yd#V7|SmZAL*5TAKF6xWK=D`7wf)dI?T@QBeG$zdWzMzX>HCG{4a-zg4R)$f@-2 zZ^uo|aLWABkf*KNdTL_aknv0bV!Fi_-GK~@R@c-tQ;41%^aYSx_$RqP*hc&z)1mc) zJH9jgZ+(Gsd(+?t{C-l>%i!$s;|qwMu? zeEoW#Ar5M4CXv}3P1u0V)V6LTGLKJiQk=9DK@#Ztva4aXj~tl-3@@ZFwJR{C#nO%H zd#@3@9>{8w+~$#U_kZN{_)LUQTQQ5~5G!i>bnp+?tdloHC!2pjB4Xq472n*RdLENy zpclTcs5lrL+&6PM#UX|g9qsI1D_+iIi+R><^@On+7xzQUXL-@|mJ4>wZ#^i^qm}GI zmk$F&?`%z&RVKaLeMneuIOPFmFDh2+NwkJ0UP-|=|I^sBp0gvH^f;%ID4ZL@oCdc~ zu>3`t=Ii5wH_;qZQye};pe0Dr_nbB6=>YG+Sx)2)SQb!diPkSpTN{Oc88&=?=|8F~ z?L3zG`u-q2!zh)gMZ!&AQaAySgc7RE6yXo9hL%UU*ushPZI-iX$Kq_Ej04;65eS}5F z;-~%`3(?V4Hsxl8hntUEoUNNzp}Qa@%=z7_SzDtkVaX(KRl4K%F5+{!fONsetlS@aIw_OAbnvA_OF^+1OWq-EF`7@?OInL z-(*WSdMY%n{QUe}y&HhCb%x;@*5ekJzJFg2#bjv z|CcYC5@I_wSMtP^r0R&@A{3}VEgR*~9sCB3m_W}n<6#Sw3(%3I&%0hy<`Dckx9cb+9*dGzoZ zvj-32h2_hougc32L^1!)8H6qec@30AWdne@iJ|8`MwqSe^bEGe6tF~~X*{UByty(a z=;9ZY*wbpIWJOmizP>GuTOQi%;y0GEUy4^{{eufox~}uW7XK|MOMPk=$&<(#q5Z8c zZgdQ@yeLUmpQrP=dVXu&dh7Kb`pNr$om?8$@v6?sePNN|5u3;Ov{9bL@~Dn_{%xCC zr@Zu!iaKqRp63P}_1sZBZuH{+-iQB>z&1(be*uyEFTUtZtVa{=u*cZ=+C{BkX{Nm3(1N+gCCm3O6C5k`eOM9oEVE{nv`SbX9Chd@2)i@c{bD>fbp*`j- zp%WkM#)^WVKmg$fo1{x98gZdrvzP|Ay!^A$(uZk&^;V`2sHiu|VE}R3MjdifXqLzO z;v*i7$e3Q-U+X5Ec`S6a(D*o!M0bn>jMkHf9?QQ_#6?zwqM|UnS@VOPjG~E>&eAYl zzE`h70$JElzOMmzE={y;9@j$n>C-}h%vma+O5Dc;ek?F0k|Y9?f$D`5~O}@%ii06{`qIALU!-W*gQLT z4|JDbrZyZ$?gg=b^;OTv>CV;(?!^WxIKOzy+HV1L^&efEnT`4kI0oiJ{WdD?6^(c;vm09@PN|GVp0i(7TJ3F?3BXUc9J&56bi|oUL7p^!jcxxgGnHSP94LvJjpX zdCtKZlfE|ved?u4UtGi(&Bi)GM4{wlu$S$<#?}Rnd^gzV9ibEY8K@^^M1v{nc2GclBa(h-8iv$>*u#&_lQVp)|wc}#6;>fCN-0CVpZjN7 z`+4?0j(t3Pzk46=AMfvv^@mlzzQcWA_jR4ud7fAQ{zqus96gG+%LKSUBwKO$mDx4l zDez+*+Wog64K*1K&fzwf-qW|)qteva2%{h51bvXsPd}AYf6Eg*!g(~1{)9%Dq!}2E z!;9V&65E|YL3Y@~O@2A|{>_c&B|CtixBNgOhk)|HoWHv(aHA8Uf=Y6Z^pWBqS`k+4b6XdYNw6Z{a+NS{$%^ zMqEC=FzaEQWH&4Afur~nCjtyiB%07)a7Z!Qqw)=da-i8i2foOVspHgvZPWrSdEYQa zGQ@73I_(GwGCwn9D?a?Y=)vB*S5O#{=R~?5YkEoy%Is%yLH^sTmVb|$Kz5FZD2v)X z8B>cV0Ig6GLL6al+4KH}=fLP=UWBK+yZXqHr3`5Tf}=># zV^|<3^|aexkV#dS&4xESHCP^J@UjmO|_g_&`}3VxN*%i86#CL zu;?kbyH7=Sq}I;qAF&ig9pgTQ^VRaX@84vzPj_HP4{^ON?YJ7Jv-pSz!0|a=cb8fQ z1q8@X6?_Rn-WxQ-l(s4L-faQ08tO@sDXFJ^J?@mrPNl$xS}KZpRtLSzCgL3Mq8mjC zy@8wy6VVrM6pfa^ne#fS%&kU56ecLJ2y8h z92Np+%T`$&ZAa}Ky>DO?`SIr&Kk=p@qq8Avs;irkoxQoQb>+8g$`bT7scYY!wC^1` zw?Q`VjYoDeO>?Rj8uqN;ON&Nh#00FbZVwq~?DBccD?f1HHF-}}mFwf1P8$PcBN-jo zQOq|2R#SWOJADJlrZM>9R>As<-Ebu`a;oL9c^yc3GHkm@O)+`(vze$pN~I>W_ACAw z5sP_TeBGO!aZaaC4=&4f_waZp0b(|a?pfcyeaUy>XS{CH?XWTP4>*S{nwp1DRDpD+ za(Z$uFfJPISnYWG0jsayxY21)f1h`wqPjzLjBssND<>x>_7#9#KUvvazKf=U;!iUJs2VplKHna)8;x5p1%>&O z?YaYslew;)05}t;D-#O0`z1Gy+2soua?XOl%8C9PYwfJnA!Q#1A-%>C#dwVjFD zAZI+AQ?okH6>~{LLI}loUx%s-S_>7XVIdb+5QFE_j{R#$Qm= z_caf>vmT_)imS6O^plfg zeXWUVPe|=PmFt`4tN+CBn$u8!;bX|Q6gobgRYxXg{JzxE((KrE+3cad*L)Hyt4cHM zJFcO2Q!iE1klxbOpuD^{$?zT(c=W_1l+m3Bp&;6b^Ts~auf zr!>vM()^Du-<~b{IAFQBMpHvvMjc$yp*|7T-GqkT4TA0gGO~AyI#2DoA@8wFaWN{&QHzg~t;TJct}GT1H%t(JGrO9{?_+ zc<&w)qV%ZJh0pSaGv*ZoL2mlQJAC0^d2ZCF$F{b9krA)Evvm-FJ&*cJW236iGPU_? zA<@yxz#n=ZNRYjvuVrZTtgu>+nMzM7D*SnN`PmQMzrUh*UQx$E zWJV(fT?e^^9*Omr+Sc4R9-N`V9ER7*oO!18y5qoBS*-q0wX059?){y)XC0We0DNYD z+3iH*sx~Gc> z&D!udVfo&usF(DQx(?X06hpxhNC>CQ_oyu0aZ4z=@;yGcrVxWQcHE)ozkmUSK0m~o zZ%P7@0pcgX%C&gTG$KL6%>!}_+=bs{iF5)9pZXLb{;X2TV>l4=e1wVIRF3hVU=0vE zI`suDMF=O5WRgh5v&Cno>HjhK)t1=@6 zqCYnFwN%Z3%t5_JDRWzBNr{(&B<}q&COO%YENjM$9aiyl1ep{W?e-1Ajb-Qr{8h?V zh8rH7+i?(twfl!BU@)WWRqJr=w$fC8=oRd6B1)xBV;H8ntTrIi(Q97l|08B3kdLY& zGhgtj?om-ue21`5Cj0xdynNVwZ~mD@G4{&|=LaVtlG1Z+gd9tn`~y7_-8;}D*KvB~ z7|YWv6aIv-W&ZpJp6HKXVSfJOI`PWs)ftVWilnCS&V4Dcy~VfyOX zTVGs$bp$WJW#BA}3N#^Y(He&h%djkZBI_tn$WSce@>z6rP9Rg`t(!&bS)BEOj4sV$ zEDXUBs?Tb8+}n!h%)dO@;A^sBRPD(l*_TO3V>Y<=EH~X2XwDN718#x#Z{4^7e^B^2 zU?+|U;gXw9&otQm+qZ5-3ebyACXfO7I*k-BSR!40bYAjM96_LkqQ$3S1(SeiNE}`N zVh4t`H2v);*|ZOicRvZ^ADoKfghfqOi&t+6O`(h1M~lUj>9J>cPUxAde_+rdLNlIP zQB4C+TBmuh#g>-LjFiN+M7=bLGU)Bs?r~3tG(3ELyF#PWl)>*!*N2@jI@cBY$LHd( z!kJrp#HdlW5>|6=#ChaW~^!eDVlbTO2UmMOC zIOd2T*)T|v)LxnKhM6B)dL9rqGdl~fAoa(n1;pg>Ldh%i^UjU#PD0{se;cB?e70v9se(V)6m-&R=nx!7oJUn zp>ED;HZ{^)S!Ep^i|B`8i6bt4c>f-*l)9Q4%4##X#C+rh?+V(iCEO~g7{Ba+Pqqx? z#t~fL#S6Gq!-g$Cw<>|{2Ewy$U6KHvcI^^|in3GV^0go9K>xzpOZ(5fn^dI*1?C;s zP$lTvV=o$4v1|65tcMTh?NK>wEXK&Z3VdoxnM}R~t-6&BQ^-(-5zzu~x-c9Xu64@qu}_MNLAkmN;)fOADOOR! zmX-a!ckdEG4cnG&~6{3z`P;f-y#c*lNsBWZe7&Z&?TXP*P;5xQ}A@ zlV{?2q=ojvdq*keQFz54nX^&|BU zwC8)JrM^&nK^&+0OLpHwWH5>ct+vj^VF=v@`R}PQ5@U~&Nx2vhtS5 z87-FTbu%DTlbq|deBB!o!dSl&>P3jgirTX6TQT3R5#Aex{8FU6$SF{4KcS8*JxwU_q74Xw22w~da+>T5 zPZ6hoiwuF2e%dzGJSq>2O=6RA8aW;J;tu_Sm}*hP!4B613cgrVv^RKLd;oEf7mi1n z2`PKu&T0QSR$?;3%xn3K*_}1jQfn`&s;Vwvjwle=Pcv#ie84fr*vLo>BgK!%dR5xe z=0YWLE31nKmc__$UO#Y71RqB%!1|PE`dJVbVJrPxYTJFw4x%#|k9_llDM!957O?*a zRv=j3h^1R8c%EJH+*4yzF9FiC8c8$6a&Zuz6&13074c(8vdUC4?*K-&yNe+euyq4XZ3l0 z4+5iJwiK2e-ag%={L6qAbL|ViPueC~M#b7z43?U%Y#FdeY#6hStuTw&D^9moQ=CuU8j7PF{7?U)Z{CE0JL7W$7Kq_1)5Q z5+oRB{+`ump$DL-0$mXC%B^XR914j0Sy@gLzRAhS{{8eYCxzY8y+;qTrYzC$J+m>_ zw3C4e=Fq3b&fDRi^dLG?mC$I7`~8X)@4(&3rg4T7qBF3*lBbhF84wN;(C9%X^;&3_ zl)pcmP{BVCy3uox1xKGe89r;sDYdfo_`#v~ux;`fvUeCVgxJaHdH@yGrmdvZ6OYU{ zxL*4}@78!ZsWI)~yB8hRaM|wFLq>g5smp4+}p*A?&Vt!9?gtAAx}e3tuV7yb~vGfOJ-&%vZzXz<74;UqeI}4j$^$ z>;3!DXA_qv233G}P?T|YGrl>)dS&v?_6i0_@#TVnzH_vp64?PbL2PhrjtX5D`thSj z+*<`63+1ysljEc33@|eT!Vy!XoOGBX3MZCt)F%hbiIvhQJD27c-X@4=8j!^mTjzAF zK(T`j9nXD<*9H-9rzpv-9&;&M$Hj?!+m5l}av0k(-6&r>HdY*VoL@YDCu^p6YbcAc z;`lQc3?wyWr31|f;>g{+Orkn{5sDA8)x@u82G$cTIY4Px3eS{+S{4h5I;uY4;$DoQ zJp`y_Ga;}bf&&q#gf(0dGShWfX6(CcduN?D2UaPJ>D^U$E-@};c#BmViCV%hrL1R2 z`(UE&>l%^*w=O61_D~bpW$<0%yLsiMYI%>jEljSsg+MB zjtZLv6}0MM^lq#l2sWtE-qzF{4GUX7rZ4k-spg_3Q$#WRW7`>*r4G(7=DbWsi6quUcZ-Vdl zA)<-XGV{*S<${=?Zf1LRkTTmvwBW$O!O;zO_I?hpJpJg6r(%dGf=*5k?7%25AYvFG zD7L47n%>{*`qK)omm#9twxxf3U_@3xlSTL?bGCuI2>muVoV&0qOC#l@AHb;Ym0UZE z261w4MxouCr)IxuvA6?^W{W%2Q!EaG^Ncxjkjg8KT1-{Cm4VLCXu)qa)Z2b{`!X1z+a#`#mmSmC^-1MOgW^=Ogs~Xy|?#K z?7iJGMipe(*S7^P9)_3JSjAQ_+@Z2kO?be=d}*MXqvK1rfFr75#Bpcxe_Bw==(@<4C=Q+rX`~%)-vcGgp(Z?TL0GfUi-su$46n*w=62~w%GW(#b{`G~L zkIEIlP3g`!QJe2mIi&uzw`cRtRw_5f{LqobHS*3L4@=rfrL2BAx#qsEQ%m&M1Ns}@ z*-pDVOZi@1Mv`ZbB)5-Gto2Q+Y^U7y_)uri%RqPB=W}^uo9Fb~c(-KA;Fq1hQ}+K~ zt&RWMYQ6k8Rq7e7py`NB@46CfddSP0?jFjj!1u!xtQg0+dAqkK!sye*%6hJw5Qs^^o6SxPU*`oId{#7sIsBgEr|KEXCNca6-P*P^K!bX&pqaO8rq( zQqu58|BqSXE2SQFvsnFDzsoo>n-weULGuNrpo0vYRXpP(h*t1iy`W*m7t~~7c1L#@ zBojjtg3&L(WO0xQZ``zlM~*OX;&n|;&8t_q?R~)!x(?7;GQ0UzVxb*FL=z`Iq8)%N zU2sB);_M7SMBy1iysT(HWbbm2Sin7d&~*ak;R6RCw_bui4DJVLrKh6eKv`68y?}jE zJ{WFK3p_OHpv#0(9xYO!vzzMUD9ULe6+KRt+}wP_%td=UbRLJtKkRFtHxKYLh=$Tl z4;1Jgsr2~4gO`v4RyY!q?dZ!e1i_yvsHOA<5V2#XD-M1tfk7=P($@jJzypnpjfLQv zqX1<9Ckk~7(w9kf$B??}QM+xqTK3`v5n*3gm>^2SK^~5`866#~gDB)s0KjEVF7Xz= zWJrw!II3VU!HAQfGVNUU^bx~{+wdpJqZJG=kfEcLPBP75gkuAGf!eZC30Xs`S+8}_ zm(iuc!a+i4xU#kRF-(I38+3JbKZ8YrT{Kclef{>0QRLK8-yH@yikg8BSq8mc znu)N@1gDP6gxf7TqX@zA0s8`9-f7tt;ekyJ~OI9W`L zD$7sqLqkKsgUuw+2VRY=i|s@AAZh$F&7%f^gDTH!#tn8k0q=v^Osm<*Mbg8F3G5`f zV9?YL{Vc`moMOAW-K}rS^QMscv|xf?^dOz?t3KL}@eoL=KKVl4n6YKK|5j4v$I9?R)K@*~X3bvnO4UFfy2C^&b7uTd zGr2s|wbLhvA|*C9eAY>;8ka<^f$ww6x?kf?GM7M>H(Fv~Lh+EqjWV+U^$7y!dX#B+ zT_6rgyA1PSnZ5%gd-IG{3v;{a3zK?s!whG9Yl*9wxuE95ZBDr#K{Xm+xSipnAGh|oX=dKd>JA@~@ZTU~$7=1`v7Qi$P+S1UDpH#a0_;7hQE6G}MzC@_H!cDDa7 zHWf_haY@BG(^go$KcU9&TbZZT*L9>(=qUY3 zJ%@y}4#Hc5i>W6OqKhjUk4;(JLj9*t$u`|3xu>7i!r;6w!h#F-HO)=JVRi8WvwV7H z=^t(?R!n%oCQVp72Ab8Ky9t`gIE%TJf?}Lv(aAj0X?bQU{8bN@-pgmGD%(KO+ z<&SslWriz!#-{O(%j)@`4p_(aj!f?yx8cvfD=7DrLCSDoDCg0TC>kx1Jf}*3zn7B} zN?)-moL-K6&ZbKBs&lllIg}J`Wo&$pUiJuOzM&u}LUkqv6b2614N`^IePX%$CY}_UKFU4p6@1Ve~Nr= zqiBhfV4f|^l#=_NXF&HeKNYY}(cf#Sv>ej}XOap`o%#oI7eO}<3`|_H81_CVeZgNS zV-nC$t(v^t3?n0TES_NwdVLG}tj4VbMB>3u-XOw0$Oe%No^(JYW9u}5G?}QxkY6pW z2Mw#f6JpFej;o%QnjZ;s3~VGt8@a!KQ$2K;5{Q#5TtOt@BqR|+_lm>VIh(;z9FH6@ zEl}l!pTog}it_Tcj0WhYsD0;(pTSzseNJ7xtVW!8UR9Nbmoz9IY4g%$%aRd6`nEJP zOmolD8A-!4O)`Enn_T-{kLpR>#Yz}qBxNe)69gSc2M1O?7I#r8>5`6DX3qexu=bfB z_$o>$=iNJO*LctT7TPwm)m_~Mjy3WhuZsF9Zrr5bJ9uX=v^7>>c4O_GM^-i6q@-_+ z&|7opm9ML2@Ab2W&+X&#SI_Hzv*7u!CAI%a3HJYE<@7&ZE&az@*ZsU_t0{xUET>_^ z~}?m@?CrL1h)YJ zOImcmR8krTwt5`6a`IEDwPPp{peqH4S(*ZNt8w#K&bAf|iQtyznihm3F=;t@C-@l- z1PguPHH=QKD7Bw0YziN;bc5r>Eus$PviDfvRL-xnbw73u;LYg_D{=&Cp z;?i^LAn`DDakw(Dk~a*2ceX(zkf6HENfjDZewcr-gTH+8^yyh9`yhN3r-pv{g4kxh z*;;q^w{REIT=L?`o1Uh6&e121f}lH#I{}Tv@lyE#dMER|vlRW46+c~ieHkod@nTfW|JNyy2F%(J2G z1BFyWY&>uu{HNf`^Pzs^oX>eGvWicW=Fh7(v;I82_o2jctbjJ%oqPIpLc&L~r2I6O zoS2K}EvI>&9{ea`mp+rvwC(F#j&6jDHbfZk%<#>1IIrh!+efnI6n!aZy(Ii28_GJs#Hv`%)lUDn5&=Iy|XxcF? zg_g4{V_`3h0|39uK0fm_^QOtGj$0neIp_8o^4|OEJ6q3LWr^=K@0R#&St8x-b+JG< z+0mSeG^~)>2Z(%9nDHmM9^A9Xt>K+z{1ckJ3I?O1AMu^aZp~l4>ejG$6#%+3d|M1# zdX0(YZ_*p(jl9LjX9YcnNai;QPhPT;UcqpW!mPm$rt4GOmD%lRn)>?W)3~IMGFvXT z5BYLef>kXeLj?^;zG4%4%&Di6(l;#8u0YYRxH>OvSJXYZ_R-&8L;bH$QmYSS4tO+8 z+ow&pAip-B8<0*1W?j5L*~M$d@wm9RRI?h&Eni>h-BkoE12VUB898gn-iD>%w9xHD z!sI1WH;sW2v-R01fWO0&UG$#A{C6&KgYhnR{)*z|nX{85&-Yaunij$!9Fe&&SRNYf z+p=P@YIve+F~&|ug_(%m`scq@7CjzU*>BNm-Ko-_|7dGB@<5tm>+b9C_P_8%arNr9 z{c@9mH{{+hh9|!PuPJ~3bz36+1v^r|;H>>Bt+1Vj*c~Z~>$N4+z^)P;S^wXPr<3-w zBhl_VCZ^%|qfe!hFp|QUCj}%96I2`j0vJoUV!Yh#`}HL`tHvki3u(?vS~SNE$ik;- z|Di(@v1%$STUckfE%F3C%If46Q(HyF>4yh*HJ%>xv;Be0w?R)*H*0P#d^hM|TB{DX zl%sN!*$i^$ZAQubdsl= z8@yi8dlnN#08mQ5R_G{SU}zh6TWy;o zzQ6Uf+`MRv4pdiy`_JgmI}bi z1&qep?0cs=-%JQDJUqnI3!yKjHGUt-gO55MH1u~s$BrF4R@4*Nh$|E`6mQ-XgK!~I zKT6WMYnOQ5xA!6K6e=+mErC+KWo`IBKGAQBTc1^Otl^UF?7u%zc2Q3vE@c?lc${Wx zM8p(*8Urqmbw-X{MIgYIjAjjSw*>9%9hnu(fL?)1_|fK%L+hsB+&&9`34%324aO6r zf;H*A_1f=yzde;mXmVb-w36-^ZS8`u7W>u4{`S}9@v!NSaG-=(Ojx2iS@rMr7)^}b z^(3`q)aJroN+L?V?AhbB^^_@o{&Zk1T`BSQf0_M}en_`2T^=@9yf4gXt|ycWdj-@7 zoar3$AxDn%S5kVm@VDZJr8Mw(#C9nj!?d(&sn~i?Sa-U7`^&yK{+h;Cx*D<3Pnfb> zT!RlD^ucJKj#3Bj1xnM->uLw-axetV-O_*5W}UW+l{bwDXz$<={0+UwsF_L^z97w8C)5pKYXVQ{GT3x{#JpAvp)-;kLmHQC7~Mw93XuzW|$_JG--( zh#L@jVB{S@SThA-=Cvqpl?Mz-GC^kd+9j>9q`r-FX&{u6M~D%Q=Ea<~2FEGU%&PM} zyz_51FIru)KQ)l*6ZJ`EZRD~+}O zz(H$=|7`~=y0B~lOjhE2u7AQ909q{@bydj&W?7k;v3lb+Hu13HVq+(1eqD5d1CS$* zn0pLIs}p9dEiqw{jhjRkNq#K{uYNa!sPO#TxN)PfuThgJ`Ek94P-sSLX@P&QwEOiQ z`}gO+_pgZBo_9*>{X1RR^u~#V7&Srp7#$>Fjjxqx&#gly^T$|FG z$%WIKDimF#;F+46hu(H@F1gagCWCBm?NxfRAWpl1Q_>Oi*^bpsqaM*qT4j-@LL55l zrA-40_Wb?K2hS=KhhsW{{NA-uK5c^Tc#)wsoM{!)9b}!8uNS}J=y)uuKLspuovCeNNRV;FIZk;-t#>fYb2B@#R=cyeYBZX8gf z5({~EmB10K0Z>7N{=&yE&i-5Fr;L`3aAjkkCZDR8MEBEA;ELfKfrW1Y@+ismCtyL8 z({e8K??A7__Ugqe_^s2Gb^U`_$PWM3s~Y=b`0{^J!v2rd!vFk5G8Z2_FeP<2FhRt= zL@UgBF(({V3K!&Kh54(Aai4NnpuvC zw#ZHUMsXv4pQquTl{u{%2km@2$QFs)9PtT2@2O0V_Xa1q-XXAR9}N(E#r|%TNr=Vd zg5f>&?z*iqeEI%W{#lpSyzF~Q>)*Z$s{t{3o_Ect=+PbRCYN73A`hP`0(Vig!m)&pW=jYeP3!IQY zO6e4``%QUyJ^ver-D0<>o@Tgyp9k713MH=46$$ty1{VNj6gboxpTT@Nt~ zJx;fk)RgY87T1VZwWK#=A4zk~%%}t7%re)IvP)`XR(8CpU>JZBkCjlF+&S+tdEH9( z0&Iw06E+3*49#ydn%`n=Qg0_}=vQ~b1}oFTP(&4oK8UtF!Hiy(dQ{#ehK(TF;)xV| z@oFXIw`ol~^xCs;kn8wzSl|K$F9=(z@MLU^yon~twd8V380Qt5D(E@nnLUCV8yhiI z&aRCILZ{szSW@+Mb)#3E{nDc!OnMRm2=D}`2gZvq0;*;94zZ7w>p|8ENlUfu&_{b*=J-)!O4fz=K7-cPbq1gS(v_}|wM=%4=*jP3> zfy}Oo(DiM6-a)R9_KF1|HN3ko!PEQ8L7@#AGneH#W%u`M`~#CWH8p1v5%?qb@7!4d z&@5Sqz#Yn3ip z2y6ek#!C$B_8Z~=uaP!AOef4|y|7pWN`Lv{g}wtbKZ{;On9Iw{GoUjJ)(c$%T+GjK zW|0=)@KgW(y=*Xg&XoQ19$XVoaD)NWGU9$VoRG>*5Px#@MFh#+3UOmspV1Y*j2lK? zA`Co;0-^i&8`Xb`7F7{25VNcr-`clSlBqYDZ=B>`1rhmv+wOCvq}q6h83E?jQ>RU% zH&P|)+HO#AGdHdg5X$Vpb^8NiV?~95Fxwv>mqRNp`zBzqY%rO#m68NQWLKW+2W)CQmLwHh z?nVDI{OD2pxpOsPR)^o`2Er9y;Vtu65;fK<7%*u~_{egi-FA=Yfrbe)0s|QBe9&K-d(QlYwpV$D?loa}SDNym@n( zz8X0ZPn@&TXZ?Eg0Bl1iGH=i;-^x?bBmoB3zlN!3YUVmP*BMq7jiG7XQ`Capb;dX#zi>x7UcU_D4{_OHa{vGU literal 66607 zcmd43c{JAh`#$G)@-PirTqotv;lX5>LiA36| zdg`P$iL@<=MA~wJVl#uYMPd28n4~KM6Ya^GWm}t|wHt>DUfZoT5!Jt-0~^>FslQTF+={MwPU-zPPJs zt^I7D7X>Fp-~$??&7)oM3$+#Qll^_omkY`-75v^Kz!#Qyc zc#X#dWN-QRx4CrNssH}&!on%1fB&dl<;K5%*(tY&`R^aSnhYEK_wU^9ZzccxyIgNh z$-lq3-p5h1>F@8xS^tMWYCJqAC#R8@ocz|zNRxzp_qCbfh9517C9V}4DJLDqj*&VO ze8i{c=89YoM)8lozpT1Neci5MX&;H?jf=E=$f>&PfPBckd#0sM=0k7q@o2<7ijKA# zOZs~~n!yiomxr}e)acjlgmYS6x+Lp4b2291c0HHCqzoWZcI0va%*TcyKWA zc4%m^=Z&Gp$U{DPWLj@!?}-{WBnn6=Y$08kI^~oUGW+Mx>bGFQ<%KE1KuMS3+u60d z>G^eYT`5QxEH#JT>(5xJe`q0*I%UZADRq6xw^U!MjhAt^W7YU&7Iy$oGv zH@6QhEnlp~ibLxhd}f;^X1uN5-ap_tW^lO3u1kb1FgUm=?QF7|OC?#!6He8xt}a$q zR<3=j&XFnoB`3Rjs4a7p@PQjAHjh8JfB*idjFXYkW0TU$&5wg3r95YbpQ%3l^(AL& zXh`RUNtyD!{X6%GT-sP)+kfw^#|S=5J^IK*SAo^q@|>KkEWd8r$LD8ag)hD}sqknG zsXvp`{D(tYPHt^1r+Tt2RdeoFyPTX{UtgbXdq(?{6Sv&^J%7Bt#}rhg&hx>z#G!Jb z-}~PFqcd}Jb2BqG9a&vXg4I4tGnPY4KR&1H(DGj*c!b_da#1UR|)V(0jpQ z$hdvHiZ`T}=D>jiOD(mxcBv>SwWpn}t*c9M8ENb*cQ-4t(ev}G`mOf$A-=vqRA9)cMiB0t0@nYo4$@5wL5+j|TM|ZQ-$vr=9 zUYmT(d!=cNMc!wzztVf8?5%_n-<2>vtJv4erse5~SjvqfRU{vTamR)khq%_H_GhCndy-eyR z()B$jZftQ&H`pFp>Albxv@$oAsvsdF(^J1|#lENbjE2UMtnX(2Yel(M#d`ehnK@NP zT3Q#phU+q#BLv67If?feCd=cTrR$_-wA-v*C>-i7u)3d^m{?P%u=YnMz?fS?!o9cD zIVf8~L`3B1(e{_V=7ANZ*m|REKU~fZ{r*ztp|LMHOeVeKX@w zurp`9jC4EiQf34>6pt*QcCb9f?U8tZ!*??8u5S@fhpKmcBYWGb8Q#>zR-0P6`T-?=e=7 z#qEDhPQEyurJwz{Mt$Jwj}M-no_uw`KBu=~A-*@q+A8=a`H$!r4A*4~NE5H_=H@dA z^lJyYU0LP4bXN|Qu5NK$nV&eJs92aPXk7fho?(6HzCv7ld=O1dO-+l!#_H|e97cuK zPbwGjKUoEK$B+Lr9~qLIe9^Y+=?Pd>uvBf?-RXTf7Q6i#&x)Ux24zd<2Aq9Gb3}FTI5%< z)>-OL+}siNqu8!Xd*%7$tz8E~nWeN7^s zvhVE|Ci_b4d)%=5JtdB@dzX+sA_srGk4d&`$jZvX_Vw0$^;f>*w?8blbtQ^Z^1TdY zNJ0BqAX+rwOJ6ZSjdXu{wFT%uvY!9=uC`D56S-+o+TA?UkwROcD;C1%>?AeNtYbyk*lz&Wpz>`1|Eq zL~-(QaVf3eGo`?Bq+Z+HQ*7Vn@Ob|4A!TI6=)>wxkKF0@nr9{tB6~NQijyTWoXu=^ ztXg`mT{gO%+PLUczVeOQ!Pb%sHJejj;Q-#v5)}|QQ$}@Ve!OdWRO+7c>}YCYi4=RVW>fj4;iap-etv$=&d$q`K1(CfE}JZ0Dfk963hKYmzIM6c%dODR zP%^=TzylSwUtXA&yUF=1e!MWOStPC+&MNC6Wd1sEJ1zI#rL$)}nUDELY0m}=R#`h4 zj>MNsf4O|<+>40R66@C2gV_v?kr`?!UaO0FvaPSHgfzNnQ3$MrIE#$>N}Vs3y+@Fx zoh}jLw`6j|!7$j=RJHhx%JcV!cp0X{Nv+lqiDRzPtwv#tB@0|ldzinoY*X(1#k)9N zyK7_=G2YnFAY5wa=2jg3QCP0VJd;6{fk*PR)bceqr2tp{?O}*AI&tYM=g*&ymv$Yt z2xbt-&!zt!-$o)`Kl1=bl3)ME35u`ZzU5;l}_B#Lg5dTeiUDsAr$;YQ6-#6s*>XiRRdG7ul=PCFWZsiyjJkQ-GXj1Al z-ihrD<@=JyFdyWsCR)9*zVf;;3rF!tvTtHV&{@77E&pjoojOB~{B zGz#^H>n3~~^0(gdRQZQ1;nUfVc^6eYmrDlxY%fhvF&;T=r}Jon54$c|W8T>M1rUIJ zYKK%W2Z-%IgS3E5eDUJNU97UDjsx;KQIu3vhdPX~cRc=SX4QV?mixu5lSJ#V z?`KiBsbbrosnRahrl?0}u||r}oX&fc&qX!HVyi?HH?0^cN+beyf9w8=vM`J8RE~nk z)4_+W8e81~d)UXye3o3o=xtis<)1cR?3daJ%y#ok+o9_*cjp))r>C9Drehte(&f}w zT=yu=%+9vutPVFkY>}M}(NHxr8#o?7X5U-dI#}7L%#O^Nk7|f~xsye@P$OQt@s!8& zIP!?cv$L~QnI=b)X4P{1(IFql~f{6w`G1N3Pg&M0{l}Dza|*Lz_S zzkaB%7dn4OME~g>tm4S7Zb4;%@DX2g$|d&3gDNU2(cHFhl~=VBMc$E5Pl!-o&&Loa39Sc+c>8^K|`>-tH^&zjdW@y3nKZDV5f6<7C@ zNVz+Wtqe$4>1@aEAip#O;g@VV({(Pb6zzRW!UYET`T5i=(qi88b|VS90kj7EH~K2- z1+oOh#r6H}-=whsnDm|>Z$0q1wf@`X4eFfUWxvVZGWMRdTrV?g9S!$x$5X9OWOcOC zwYhASEE_2J!aD@pw{PDLynXe1NX198g=|iaN;?-Reo6TO&Qzp2?#r>$h4Orq8V4XL6(?>G&2Z zWAlIGGSD@_hD=R#L~omPwN1whQ)3D?Rc#lSd_Dc)$;tjI-xbvS)ukVa2Yjagp;1h3 z^_gkl5l^2eXpwJfXxOdz9@rSApzo!tPJe#-1Im3hZ}vQS@??gb%QDGvqPu7a=uW|J z6=Nk|Q=9bZ%aByjzaN$@_Mn z%Ioax{MKQY$zb>)BDrNTcYpp%*D(geC-Wvt2DyQr1QxtN%PFZf&*wgvnwn~>IrZ^L z!0Pc8Jv!;{?_+2Y?99v+*G9GD4Vz;ncJ18h3o0}ht(~r$Q@#FjwQI3tI#oB8<{OUQ z%q`@YeTPwk^@n}OFKhK5cv4+=DV(!8PU`9s3NX@@85RHGNh(_3x%P8pIcsA3iN6|d zndm7w_dNQvZqS|Ew;w3@tj&EPqdFB{c&TAeK!F`o*=cVd8v9rY$0K%OB3J2ndp3X{ zKQuQVH2~s1=SiD8YS+%*M8EL!P>9RTrI{u{D(_WJ1qCxtoqQMOnCAb)UQe&&W`pOY z5*vqPD&{@zH3~M!%gZwgp8ssdFE8KU)TDl7_KTVS=zDBJ5e>VfWapsdjg^I|XvWW; zN1o>*49_ID{yeOmsW0HEk7D2#WK*))CtI_svrrOt7fVw*^t~MU`IEQB3(L}OQ}jW5|Gn=MB?IF5d}_wQoXJ*997k=Z zo|3uW*+#`sf0c!W;;k?jt-z;yZrvqlYeojn>x5xmSF*y180kxs;cKi(U*v_0J5E*3_HTp z4xe^96)tAiDP*bchX87fdf(6xBjf%eIXQV=D~yZT)4Vb#g!F4_%Ky*LvlE8k4m0!f zZfqCpa76a5KUvbBX~n+u9ETx zab=s1P?Z$z<^(xosb!=YQNL9W%SnJ@8;khvvM1)XH&dQH<1Gk(_>g=TYu0<;g+BM} z{|ENxpG-*>Ie!sbJ^u&Tkx%m)72E3SDzMO(DqrsrZ8eJB3=Eg2eFKro8}An?-sacK zD0CcHKd`ZQEB^>vU{1~ya`Wjsy%pUypVQb{uv#6^8{W<%#)Z*Vaxf;cumKC1KD&BcXs*RG9s3hTRRXp&Cb zeNGGea7aO5lxk?$5)uO{LW-_li9;XA2$jH5o6jHpcRu4fYnU+T@#kmQJjG^k>obqV zu7E1eeAc^mt#I{tigu*aaM0ZPE``;kNy=f={15y}UNcP6;*^_UMs; zL6LE>-S343LA$Q$>FLf+gEkI{B?9xkYAlX5s))|?dsLw&`|wf5~W%DRQ_=mm!oDITpV;fb7;Q4N&ORIJ|mu_(I@Tin!o>D1yn*f5C;}G6s@8(8SCn|59EL^aH zpO1z{==zQCMT#N|1b9%}yPdi-<=c5_{w*_}9v(ki+O1JY$M*?aoIG{v_N`mDprXxw zZ@#r--%O8V^*$dBV`DF`WmJ%IWcG45d!&a~uU_H2Dk~|i0Wa2hY4=rh=NA+VAg~`i zpkZW;PD)Aw{`^H(>NWQZa2NS_a%^mDa*}ob{^ehpISEo%l?{CWgg0&41n`Y5`N$ev z^IBcT@bu~T(3?za1z-lk6tY*?;$0}qOyx3};U~uDZ_@QMzhoH_io&Z`$E>V= zpd^E1*#ZSBD~ibQXL3po7i}yK-N)kR{Hp^wIZZ!cJE4&v%crWXsCc8|?)B@}_k{L( zOeM;=J1kCr#S2$~7cieMGG`8OX3I`WN*7mG{3=pv=Y0PLd)GW~XSM$Z*7d}R6A;jF z3|_x}&3)$avmGJY!{1U;mEN|9D{)J5s(!K-Q&^p@MZGo#y1*4eeNTOGa<^g4vVK)kB_>AF>#)TAt>^_Va3 z-l>!gJb5qa{4G#c$O_f}Ud0&(Xoib2PW&$^NJ($%-oAB!@I=vyQ#ILF&U84rBH|g~ zD;FaKT#^<)MCI$B>KhtV{dz1@HR37NowCkX8m-f?vYvMdBQ)id@V`3sUae|BU(eEJ z06`WRx1Wp#2&@=UtKk+%1d4aa2thhR9&&V&n2VE>$7o9Qa0{0D07O^t8diCqM`2;k zI1sJLD);vaD<w&9||$vxlBn3`a~B zyKQqI*R%2P{6I_;Q@?9GtmtCTSB*acfj9Hm5cbe1hPHMx#vLD9?AQ9;q*g= z%ap4G)5AZN&O*M3KFu5l7%N-?(f+9EPv84;; ztJ>P3(d^eZ)lS^tkd-CaEBJt~nwnbOU3z;KqT_OX;~figt~!GBl&b1JNvEXP*x2lg z#~b)|Zl`8@lWSf}NlA%FvqTdFuT@4OL((78r(iqp^IK`+PWRM$+PR$b<~f@inw#TA ztu)%6pQ-%&0&rOFFm{9nq*;F2+;LAB=M@O^Kq08ZVbRg&jvYG&SpjL{(sDhuX3piI zW=(bVSUK-`6k{`Jgh-}DEw^d^6|hVGl!k_Q-a0h;m8B&FNN%psS_(jxyz8&eI6|J@ z-rk;`s6W;~NvWEN;(0EHKt@;;4tDm{wY9$9UWjd?2(yVN+OB(;xy3W;S&~bctm+@I zDc=71(>k`geH-rXmA~rs%7(^97pObvTYUJ?k>KF7D|$l~>ZFH9sb3zlH>e?Bkf2#r zmjCtPA3qkLs16!|6hnluSDVIda5O9UEII+G?_`)p3k5e595M}sud1p_kwU8cNx?55 z{%*wKg*8;m4^2&?TYJz@Kr4-jZEbClGtVU&>!bK4-<}P;d6Sau+qZA0 zuORn9f`7G_IadK(rlqOLwktp7!z^Do=XSQ?13z$CCRn*OOEaI}bb;0;46*V!MJr$};_=)I6Dd*A+4nJ`t*xz)()Wwo z87L|$nnyRjHB9;b`f*}p0U{1E9r4g$p#cO=lD%BSo@7LK zj3-bjgJ?vpK72M@#g4g{>o^p7cpYu}6MKM`mP1q4Y4EznS2VdA3y{nW3<7yH6C$Si zAlR(q53kwa{5ZS2yE{28{(g7B^)eSHXCT0&9y$#lJvve7qtsDzj)GFfBs_dL3x;*b z*Bz{3cE6=l)1!0u?P_jpQ@mXhK+fdI_;;IYaV`~REd7&}@4Yt=XJ@wnERd$f+E>_h zx*^Q*EY+ysFh4)PkWenFhjd$_@4VsC2{pC5 zadjV^aTHKqjkq@~K z0&i}dK5s}|pOcf*M{BVIzJFQ=YXYFrZ_I3HuQ8K2k=P zy5Yhm%a?BG_b88w=CDfDumzT)zln7@ZN`G@yq+3}3%ws3YYe#P;PB#%z8u=K;0Q$F z1=2-NT+(Cu0$^-7mpZf^@1GypJnQdh>&@a4vFM^ABFHpkyI6aHbx^zkdD{B=OexHV z_sgSxB7-0wpFMjPSg{MG7d4xZ-AtdGl(`@>0I*G=lr~doQk+E}33^+RQG7&%ZmI^$ z+U63+fhYyu?SF%F+$*9_^M{^1v9xwU#L@y!;2tLjsvT?hVrx;w3H=YfUO_&-Q6!@Q zd>if~nAz^>ux$b`fU@#ibWnh_hkpJ{lT-iXRTfeOJy%9bYCGHamc$Lf^k=E5nvaCo z*x8@r^3-B*WZu4gi>}^&AHJMBP%ksV(H=eWnCz7b*iJoiWj9xixm)tJN2d2HR?>C( z)hD+TQ161$%b}%BDT%V&KLf~jsd-fHWD?JUpn%Tahd&5T;CxE94`9~aHVle{m_{LN z{(5UXl?U5NNGoC6M#gW_JhiC1i`La{#oh`}{5PiC63Ra3-{e=bA6W4h$j8{&3N$sQ zUD|$UCm|&LQRxB}Hbi4=)iB2P-^+>{q@bYCD&9k^S`T~8rWKt^FV`n?oi~na4sBvU z-;|IdlP_97~(VtsYV3RaNk z)iaHU_#^X=kye`}Xa_`4Bn3fyQPa4RE;^5=IfN96G1ywO6=~ zMXjdhQzGFMT*Shyb{lz~BjAQAEyVwj&~!mX>hu@gkN4qN2)tQ&VG(+K+@Gz{|T=!lCzo|0>(Sj212* z5jBM>2Zr|@RR1Gl3{+V){2J0RuzbUb2USboW0k0DyTGOD>+8WB`~llh&wc{-ApD1h zhR`)+U}7=`3y~s!g1(@2L=8*r_&ts(KU74C5@TX}3}Ux-GA*?~149s%EJ0ZyTX0%x z!S#*_y1=Xu|9V-6QI4 zQ&ZD>CwaZ0%#0YKuAk%1X#a)QN_p;}nfJs|+JI{Jsq?@Ve{2a^1tfA+3QAywvTD%y z-pijk#=46#X}$qXi>08Si=0bB&OLBXnPVd^AucXUVc}DXI;!XV%nU!k2eh%s(V55$ zuI<#S;h$~hP=e4!Ig3;5?!NFJYtEb7y9tOVyqJ2f;Qa;B1M)tS7vF|}RC@shdU>Hw zeF<$mL{B&;dRG~!ag&piAkspt@Rt}G8X^nsQH(frZW3+x?t*n7G_W%yq@LQ^+Mb?r z1Tcq6sI2>>N!|?rEaR8gu7KvDeU5b)1Bmop{)2up|HR$kV9}hj+FxaqoyWpBRkQV1 zmY3lVKzXLi{EN;LSR-}gB&bO#Z{Sg3zy-i70{q=2&9FLwonbwOitv3!Rpe0E%O<`bhvMz~)z9hp}ioVvM{{CfU4P6BXDq{6#5Z#u>I zlDMuXv(^EhRCHAb$M z{r3Z;Ztc~g{C%79y2u#t55yt>4`kJ-9H-$!2S}FmDsm)}zZJGD>3#T=?){LEYc4L( z+=g(sKzQq@=>Sfn5fQfztSnS-tkv#P0Kn$p;!43m1vO{I88ym2k8}Zmg7yJD4b3!G z7Sf)Sw6u-jI{F;;ow;nN2k6_v#Yeq!CyTs~2lD4|85|zoNZthn1yI#(JF@sRBREI1 zOZriKKPzl3wE%OS4~6t#1xDO`l!uE8*L_4@ejTU=dhTt2|$b$X^&n@0@^7)s`&lUvkcZB=)ztMa4 z{5iCj`@nnzMg&9D($XS+l$zNfS$SvMN{SG}WD87b@Jhn<)rMMkNH;C1O*ueCKdd}v zURzoE6rJnak5@DR7vTwk!3)Lwf=?{zBb+M7x}NE0j!ZG2CekVf1_kM583=Q6jUW)G zT9a?pC=t1qaJhW^2(Hl!%@6%;0*YdfU}mG)zu&0JX9WHZkuuf9a!Lonwg&fKux%z9z z?tD#?2-~Mp$*Brs&VvE9p{XgeJd3)*!a{(ZIB1)Qo=^TtN@1Cchy+OZ##&lQ+Uc9O zY;o)@&4ZN`0$EIFAi7uMy=84RHEahD9t0bdl3J<{Cuac z63+C$fB)7=)o6bI{+hG%_8mLkH#H$LaH1p-^5qw5ZU8<%?i8%E{04ycBXO#yMDXz8 z_kDc?RRTXPD=R}*$q##crmLAQ$n}BH*N`V@OwXHbEJqtVu_I>%~dVXU* z1qFZnsCv}l?Nn62#DFyeek&7bPorVT>ijwObw%#3Jnaf32-0_i$iYU50~m6fYX(im04cC`~v+e z;9f#1ZF_z%Zo3zPJ~h!VLqF5%{i9YyG3)@ny}iJ=lL%|{{2ZV#!pJJ+`b(GX4Kx8T zlaZFoV#TMpJM=G28FLxU&U@0HL$7h>{rmU8gM@6&+9e?@{QDl5I~Ge~z-JcQ9E%2b*&sy&q(G#ONu|k>YJgF|u$^4YCvFT5L6qVv06jb<62k@iXi6N-5eqnI*L- z!otI!9?nN65x0f~sQmLu{m79ciWHD0ptQS>e&P}py^18}A{?nU2Z#>^G25`QQ;FpNY(f=Em?r z{5OyW(UYe(a%}rhnnaMNiZ7rTcAaSQnn5SQVj>?L4lH#Y(|10X2j~ZOiBbV#Sku;~ zL-BQTQXbS8eX&QKcLDhEhK6&k2?+_f*${N_6OTWjvcomW$@xOLhLGm$PqKHF0Cr%Gx>&rrc56O-X~) zIF4H9&-WwFf@r#PY;-2iDS*jio#vu#z^G=rzI-`H@%86VoS74rPgm_vz~tVDhC~p} za?8Dii5_B`XG~IFgRoY?)3vesLji36rTf$oGcS7OD!p=mk8WB}lxnvLBba1Z0)h$? zliaQnFBm)W^hf@t$M}6JYp}b|z87t=)@*2MT3K5dXf`H1Wi%Eala5QP@7yai2xiV* zc zY-`yovUW?KL`OxWEjZ8KiHM2@^)qUrV;54R&Vp{;NWm&qF0cUnJs(cmgASv|v0Rct zMovz}25WyIPcbMY{;6J@HwJm+fh1nBeI|eT{-DusDIY@!6j{b>7igL1o{LVUfp((R zjohVq`gDcgnioV9*vCCHANbGboUeTO;o2HsP^%!{hGdT22Kv|(Y&$|D4+ip%hq4Co z-8;JGK&@j_@N6Nt{pjClu>ku-5`zke*#bTQd1M5LzMZIP(AZNns8;F@>dafA7Kl3B z=5>(}Rm%IYm+Ty6k^!bPcmpgfECOjz-lcOifFi)F<>A(}vB}UoGETLkcV>MgBPr>a z_fw;6w7nS=k-rAup4#W!oCMoBIXU@+V7#X4_N>jkn}~b6NRJO71Qu=W@XSnGqzJfz zh0ra4tjjpxPdk+94X16=A?e z!vGiGv5)c0dYGEu2g5wjNQi{u4!w&2R#09HAvdo|I+!0dD|6w3dG&`?A}Wm>L|By5 z<($f`>&2445{m)CAnH~^6d}&$i^=zXHqSxHA%_5xeDoCkiO@Zh^%XS>m;W)rW$5ir z)$n1nx*!^WkV+(KSk};e31&)gWwIp}qRKV7$cKJ?ef{5TTTb&0DF_l|KfVdsS$<_) z)ZDN-q5{cThi)un(<_%9B9uv4Qs{VKU*XIiKKrf^n$(i{1zLa4L*c6vKB!vKZ6kc$ z1ASmeh}j;X@0J+RRMZ_b7QUc7-Ocg@9O$M6&JaQW9KJ>V6Q!GInCCPHz$r(*@)Y@( zN0CR01@vmif29wifg&T3cXO(Gk8Dn~}`}X+Vw0 zrc~~QgwQFzdG{_>cyCn|qnS@@U7aPa6Q?BNz$sXvOo8DaExGzbqsT}g5J_cm_@O48e?5g)YOiu#7Y|)d z6*zeCSU4w_DjMH+XnEkzVGG2V07QjD`u6arqs7#Zpuvt6!oR#Lovo`z>BetuEFqQxT<1f zarbQzY|T%TlO6jjKrpIdFl7t8f4>E6%c}YD9DGemDk@ABmX!cYXaglE_^%@jqYfMH zp`m&3_%X&s2B)SJ;B=>|C2QOhy1YloY4Fw3><@of{g8^M=jS!l)V!t#kK+`70B`~l zR(;5QZ=dLM%cdyq4p=zFu6%k17;Fc19AF4w9$T!F*$%}ITrQID=nhN>VG(f#<`)*w za(u|yfH*)NoUuI~NCV#m6wDP^G0-C}z0?p6{PH|C6<2hULKx=IGM!8P{ry-!d>%C= zCEBb}!lf#3z%>il965`S{*dq?(;-xCzPv!| z!D&S57gC7*KvgAi65fUCMcuu9yAwYNv#Ng1`D~xrHln+SJ%oO20xb()hGb#il|O^ginOEXa(poq{T5nJ(bafb(Po4*7sEVH$fuN;jjzu3ag%zpGuyFQ(ngZz%ZD8;g zHzH4h(vE{XG}<1=32(C%O<72ED~u9j!?&Osq6Gyj(kBpd04m}$u&n63Y$GG%FN*0D zO!{qgYeS#1m6O42&KW8N;B7@rxiql{&6w&8zKCl)N8=XPra?cyx<^tt_N?TKMrAIJKJX)S4=o% z*9yN!Ua753j!3kJ2^HdRUMM10#JdacLT10GjOuo!?m<>P>R4Nw=%GXE+4?=w47IYd zvLN1nJ5s_c3ZrfM;Ai+Qlx|~ki$|H6nUDnr6O*=$e@jfl|6!~weT|1V(LRs{vsWp_ z$(xwaDe%_D0NDH&kw`Tz{}LR-lzFN&3?<=MrmuAmfBVMnctSN?&He#DQP3m1r*VbD z_Pl|-MaQLOWSYvKW^WNb-F0*Sz2~3F_!6DeX1kQTLb!@|3K)h#Sy4;L&kav)#O<}V z=KYy^s7O&{WNI_(z*V8i5Df@1s<2dlr%9VB!ROiSPisoA>+0YrfAaZes@)0VjR9Nj zZma12-OT@`>Cyj$17XJCJ!|%^%5ID%L@nQy#Cw%nVxM{cjZK>r<=lf@1M(P(XcQ^P z*;ehCZwuS7RoJrxINPu>r#ck6(mm&&uySO3v(uRTLY(QUe_rrG0Ftho4`V~7r+HhC zGK?ua*8R0n-Pzj3#B2V4h79@t;S|K#vAoiGqMv!6SqlDuFdW~@moA}!zjfO-Oi@%% zzotT3EDrs5^4Gv{-)X03DJg4XW*cg!PCeN8Gd*4Z{{88{uU;fHAgO>GHzHm`H9L+)rWb@Sf^=Qvc@~!>x(499kKwjsWtI1s9)u$k)jPfY7n-JrLAJsB4(Vrk zOjRyK%)mHB#c{~RCi*=*dB$j)8H`#wrD2AQbh`!)(JzG zC^n?ltrrW|GKda2iT7e-HwXXBM<&4Vycl-vP1+7-HB2k)P=N zqUVHNnCvb(BrJS3MLX!`%_sd)owjfMHB=PR>ive!A5OFE3~}6DCrr1S<|| zwpxq934Z_19UxB)%nE_l0N;PC_VE{3I3{{f$as;4 z{E>~AAzLayCBcX)2n(9qWAJ?k1f0Mp1=4_4H8wZ9UcHKf(T$E$21KD`m0eQh&V#T1 zQ3_@l85se>+O~BoBCPJs8}v(kp!h)v-J^&$g=w{4-@A7|Ad5(OOebN8_tvdy5w$k~w0KdrU^y8GdbOec!)-r({F% zPmuL=8U2(32C@)Ki~&k=gdWgyBx8sH_{)~9uVD3M@$6&}u51duZz=+Ul%)Q1n-(0{@(>1=^j z%L`3)OP~Mp0>EwnT%&mV&6|^e#Q1u=!4D%g;3MbKbsLRMp}sAAy>(!}p(~WT*FjYA z@$s-;d@Q?aHK7OXhA?qG2#&|(JIvqVoP7NJXu6(qkbZ&rJSS?mDYoc*mNM%;#V@Pop-!O4!=Hp&S{^-cMJ3EK*sD&3ovQQ0&jb-OZ z6`7!54iFIJ+TVzga849gPeUG_)cXqSgx%LA5B4r#pGr_BqTLd_&!mV`6*6Qr=M^Z9 z-I;qK{i0V0)p*zv5eARRVO63*3tOK6BQ6_5VIOe<(fl#*%Q(%)L0J~S0f84DCLqU$ zI(x7rQZ9h0X!0p2D6j>pr6BFJL->X2e{K0U)G$~k+NTCE*Z!`(UC&>d^h%b?O?zZ~ zCrN*JaPY#sr`}2=)v_*XSzVeXv}4FAu|J$Nwq;|Js3y=kV(KbGkJ z;w74ID^t}6FfbAK*~!g~RoEhsNFtXVGq}N7qIA-381*E3(oQTeJ<@fUGQQh>LUJd-isTy}~ zldmNwMgcy-c>!O7`8I@G5Dh#S`p@f=FZ?u7YHE4(^BEbZD#3pPY2c9-n@Nj}lmF;v zne`1FG6qHX0AJ?nsfQzZ3a|xMS66??NA&GhM5#G`gque&qT~f{FdCgm`sjTFM|a)T zqc?n8SEtl(Eqx+}AV^3DFJ8Qmmatx2UM9u`kYQjtLFQjaZoyK>UU)?!d+_(!BnGc* zIyM>HQcDRJrJ6C_B8}D$U^3tOLi$b)ID675Q(TtT@@F_$?+yfI+03S47ZcO1QdbIp1{X%YIM9FoO`03KKzH6Cr3{uh-UviZf@?&e+`g?F7pdJqP)s81>J1l zQVZd9jh9(K3i{?h6@*TnsJPi#6?F=D2E(3xCGCm|cttg^rjEafngaW&djxHi0;m8+pycR+HvP+&kT4X|fwN=gdmEmKohR`B=}X^g!hIN%tIusaJK z2OtEl7tURCMnKF^E*zj)K}dVP;DXWj(I8iJQ{c*551UEuI!c;PbFJf6V&o6JHeN{2 zahz}XqucekVsXtpjX{PNKTq;oIVO$g4*Ng!Z0z(GyH&j9vrUmtOR48w*UjYPx9^@) zH>g90gy;{ZrSZnEoV;L)L?_{We-6`g&dy8H^Oj>bw??>t(Fu7Q&h^skhipxGF!cGJ zbgeplaE)^j)y0OpK$MILESB@%NNP;#>k=`kA!{mE<6a623Tpbf^~=^t|FgyI*?35e zx$(>(i!_H9aj;3(!;jynl^&M3^EpGW>0fsZY1;kdjao`5004mShoVjVugM6G2o+Ar zEaJfkNNGSa6_aqg;1$a&lXIu&392lxbGP)rgCOfwa2);p>;L~B!SwfQ{@;8%32Nb- z#_vdvegTbKp2~yzMzr^C!vmGkZj<@e@+ih8Tbi5Ek}ib!fw3*TDA+LX5l1K}PCI7j z=aGY;pc8@#CXpQ-9e?|e_j#J=xvnq%Uf6V`Nw4%E#pCcB#x|4RL!vYc(?>4(wHN01 zMl*N-$%Kz|fSz4@F`Cf3Fj-I}~hkRmW#8PZObmMrIQzPJcn3v;ZNA%9k zA7|P@_OL-W(VGdd?cBL@yI}y%aN~j$8On$WZv+LsQl7zK(Af4D!^N1rLTj=KDzbop ztJ~p7(U{X@0mn}w$2B%J#j|LP;QhgO@8XdH#1{cG4vvg)v4b;TF6ip|s{7%RNP5QO z#KfubWBfmW(k3PZ*n@(Ch^x4#3i&uD+{R-AKpcjeM?E6r3ncSN}jwaxWY;eJ6ds)4|iV>Bh8C z=yS5dd#WZUSL2xLn+;C-#Ie*i8=f?=%65073(c6SEV<1oBXd2rt!|3ZbgN-Ydy}`p z?~?niyvjrN6&5@Ft+;t@P= z!@QP^k#XkC-`ml>CBKImgQ)~lwy=0QkMTOV(&Yf&`1p`hO`&a2?ATGra6~|$4-Z*N zP5l89<`Mf%%6mTRHik+%Dl&$LFBNq4!W!_`6-XlK#!~NLW(Xd^13J8sIsoqzeCNAR ziafo%j1EVE_h80k6{Q%F1FTsTrKzTdNE_>~EI+b`83l897-010ihsR*lSa~ekLJQq zjkn6p)N=qg_@R4*YNPa~y}byOfp|*I?KgFG=@~WxIhF?;Y#WmpXqjDU1peNjyDST* zb0~&C2fz0s+qEKUj?mh(q zwa0^~xF4z>n#Y?lhbsUVa?@*TUA?s?v-R)?52j%WChX>=rHkkSaX;icc<`0ccNBZr z+51pT!1+MkaQO?bsRYGrJKj$gKr2yER>u5^B%V}uL1-&EIWa(q#!jAqPOx5I#c2$r z0*_%5lTpCvl6S{BGv6X;K6vIC8aIkE+UL&`&y7-6Q6c(}xMp5n;(;URhluXoL7yo2 zcLAwC9lwzbM2Cky5MB|Kd}4(J1qH{9?>@y8p@CU3WP8vR$gU{xtF;H#2fuyWLr3?l zQcp`u2vLC6C;#0&d-oa`7TSAf~>(T`q);2<|ng zK=3L;`-o0J=X&{C53K-069C#F`(5#(jW**k^ZwvSIuoC*v2;H|99T$Ht8H^>IWpa44`Ow)<`wWi^J0 z7_ko_s0u27WMpu2a#|-}DC9u53zqK5*5r3EMXjx_>gvJ7xPfmf^xyC+->PC_(u)(#l z9ELqBL2?kVZb883T69@1`vnxA81lOH zm~e`dND@f_yP4T7L}EbqVduzw`t&J;Jsi0f&{&N#XG{yN!!k19R!b|w%JQVV*4nIe zb{*l^!zvux3|2}LJ2l*W?hj9*Pd>!cVlFf$PYxp!b${FuTo)b@!O2d`eLDAymGzwv zM87e4WG9y-AV}5vvMq#Xs|3%tUQrVa{8(O`rZRM@vuRI=b?;|q2v+jmM@tJp-v%0r z9&-=F?C;-(#db0CR|WJ(PQ~E)HP9IG8CdY1sJz%jcJ}V9hmKWCmmv=sIn-Ye!Vrl* zKN`W4uo%@1Wn@I*Nhz|E6yFaGYWmQ<4q|@lVteY$Vj~v6O0dZ-y=`s z`4cvnJ2Nu_xf~Kx<=c>bw5+UEpiYFH{qbO~!C_o2hWK(yt5wa-zXEaU;Mjnoe)bZ7}(?=5O!Vs&ew= zNoVKZuu|KZp5R2v0-M6dqsFt(;GrUS>LJdJZ~kbL`{A9G+xVl~vM|HC4YboMUBR=Q z{<9!(s$xw*%6cMO_b_*OKjm$NNC;IIOd!Au(0E!Uyn-9w-6I2QD%e>2HVO`Q<2Gkv`xrJatc{Bpf<5$qcv(SNxu z5t#A9LR7=0$FQ9uE7?asJ*}q3&&Nk><3zDZ7f2W)L0wG^;Yc`#fns2`y^XGOr-4At zS!i|G5$7E@bPc#qcoXi~a=}@8T4u=hGsYTUp&#HFqPOA=Iyzy~antd3J(z1s{+dOR z1(E;ewPWcmB;wQRo%05A^1m2TZUY`Wy4Q znrmmA(lTD+xMGW$=ue$FLm!5vF}`n2<!kx^q0^<14}NPYVY0~2$`j`nMNL#38ZfjjAvZihD%bU z$M-O!`=KM7nWStn$fEFumKQ;uV0|z2=DW9V z<$@rSimlL6bm-8bIBDfhtu~Q8VmF-J}yNL{sg!a$!9&*9u8#nbb3gt!ZEW z99o*=CBQJ!NFHTt1e-Oc;}GJi1Wn2n?OEdMB$M5Vg6${ zr3tjfAqb|s2Z?>aK>+}k=MSG(jfk5}lvo;kWjVd@rro0uXK<94C0p<2ThUW@6SxYA zj|=o2w?lZTlAe%2`uqELY7O=o?@*>=4o}GJ|N;qNQ7jW@IfXM|IFOfso#~d2_Fl z_J~oVMuAm)%O~ATTBm2cTQc65&MYlhlm_Hcw0SB_8;?YgOWRyuQ_s2hIB?#ksuMf8 zXXxTHtgipI|Mr2yhbad@Z&GvYn<&!gT^`{TZ{NSSNL>CqIUUq2AlWu{4E&~0`yhWI zFG>vWcA_^bIRJS`G^;TCLo}Yini8ss5IwqfeSfXnJd8LWFCT>vQRqJ@p(#Z~xFW#! z7)ttu=TaA0*{bqOjRbIqgU6zsxA}k9njZNy;%HGidG@^PIg3)HYlp^@cOxlvhjJrv z$-R5`<7dF0OO2fA@pU(>3Q$3zw}G4e&ZehsM_B=a)(3Zmx&r$o)#-PHRT+t~Xpq1< z1{SLE`@Kft=kg@kx~=z>w8uzux_9rM!j+M=f@M-wksH|nH5PX7(zKciPLbZc>UCr- znPcN;&qi&GCNkd*(8NA6qN=J&wCM5Msf#~Ys_E%v7HOCk4{?2$_byeb>+yjPGXvv4 zrH8cnJGEE)n)Z(t)y5YeHk%sk+B>cZZaCN{Y<}It7CL5gwtX|X*SAqG+ojOs?324% zNmHiPdvprSIML};qGfudDI~Wb9|6c$H81h=r8AtqH?|)_x+=Y{yKvz`xS}_&U+1>$ z)^yGJ+dZ<{PVY;c1=S`qNhvi*8$!-d3-JtwxBC|4U=eH8B1Rav$jFpjD?M5vydT1H z6toRv(&!?C!k`=tz2>GRGbdh=S5(ZPYO#oO5(+Gv+_>w%H7%dZ8c9vw zEHX0xGpynt*YN)k(D<*uXqrS~b5lkK_gWr6;mw;j>1Z}UxS-KvR{RZ#Jtwq@u`w1; zE&_7F&~=>Rw3B#DoIH6=AT=1~vDQo!hzM#R!4JRH@wZ$bItJ$>UK{VE3_# z*Uis0?oU*gb-R#g@y7E~RrKe!HN6J@(u@6n5>5KY4xf7&`T8!BMhs2(XTld#iVE^; zl>cKW(MZtz{jOUSW=E z!n}Z|FJ8&K?je=>{vwjw@gl9~FZig_Qaf8)+u-D`!I;w>)pfB$j~MIxKfYr`r*aO% z9hy6oRk#EJV&DoRS_pts9uVUV?}CN6-ohUA~l-BQgdmW|2(SmAi@Wa@o?m^>jR*{?=c!Cg#d= zczd{wb=2H`!gub$E8p)S%Mx>6`R(0HHgE#*GIiC_E$?UYJz(omZ3y2AfKK58XgXVI zkg&Be%EfH^2MffdiibsfZ6SFt~2ZgycT*;T?P z^Dgu=)r8B+xFwSHtx0rtFLuCYnViZ8?8?m2`!ScDepENdcJ( zFc{5*lCTadNA+S!;**{Xpi=zfr6!XWNWY`qZK%7SRaQ!_7k804e?qs`q&lm`@g5k? z^Gya{*{;{CePG7%sD5P7dkmlHy}9rZWQ-jE==nvoa-#fSXR>rwC!r~%coEp=ke=f# zR$oio{GjV^2Zz&}86ESF zm>oK9I0W^WF&ik{sflYT$XHU3Bc^q*|N8OcN7f-rB|S4!ub-FYW7m_22K}&m{sBv9`7b z=q}JRlSmNxG~ps&F1i&f^z3>1(Dm`VZBMK!$?<1(4*EkaJ33j>pd} zVxJft{4??OUc|b$1|#=NcgBJD$~N)bc5SD@Y7_DJgB{z(O6j4mJ4QL!+Vo zqi4!!_rIvDLYP{LWg=e$*BmMqL>j#n6%~O3akv%8RZ)3&eUd zx@?z>Q@dE#)2foYdil@wNg?AtrOP-?S4Da?^U`l6F*BS>TzR*Jk^;OOVBrhB{UZdb z!uk=)ahTz?jkT*YwN6W=Jx45&3&N$Kty1-Z|8DtN6QIW*8<7?6DjOJ>< z*(cvi-OA$u9{|c>s?S+wU(Jx29^CSL-fxjqu3+iHIB<3Dku{x+B?Zm+m6AqU6N~EQ zz2r#W%i;Gj3Qv{lh5|4`*datlzL!VtM)(Ug{jlHKHbn!d zmR+~NHNh-mgTWWj`J$#lN{_>eBQ4l)ZU+w^USwgRC?_`xwTS~Z4-S`K0=IS$P=5^QS0U=SgfWjys2VTeB4T;hs>_5?=$CMIdSvketeAAn$A=craRUZaAbPq8{6Z`isvJZW zPu2zffMS3PVDimSB0aK3GA?lH-l%0Xj~TDO@J}4Qi$)9G7snkZNr(3BH*u#y?$?g$ zMbO2Oe}3JZ3r!`|{b7Zg-Mtz{{#zYWnq2X=b(PURy}Nv5hHUcDjWrXUzkd!y6Rgb$8n@*w zc+)9=^nXsV@LydL|JN-pZJTz-m0&A9aXMJHbTyO^pi!!O9(V`m8abS3hDtS$4=2S! z;)k*mZef_e@$T)C$kpO-myvF7y)zQ!s+tP5cU$ih4_YF10-?(6+p|-rPVuF7b-07X zNQ+L*QM$QNu5(+{fY4@m4TICb2Nxe);&epwe&*Tkve&J5;)+dj#UWPxW%z&p+RiwA z=G?i{HHee6u+pWLDy2`KB?X5y|NUh>db`{rq8JR)(K*kdEr^dRy~Iq zhmz^kb}IJ88}ChggkwNm>Hm_2znvxpN)rUV=MPP&V;a%W`U>mbDO0>sy{=nr`t-zR zafAE{M-&()cJEuwyRE!GCam=bO1fRA<_@lk<)r%J)`}QRh&&l!l+r_)Zlrjn- zepKMi-AM(>n#j5xQMi--hLoS$4!WB|k*%zJ0!B`Nk^1_7A&vu;C*iS=w{_K6o{c}D8buc?{MrACCf?LqBNl@3V}*B@ZMfbP-SQ(H;cg@MH-Xx> z-$y2brZR(;+|Y5=w}&2sQB@l@>d6Nbo_v}7 zz~U%nyU~gM?E_JTThjZ$C=6K4QHlY`uuw$ei@XS<`Fiy^5Y7~sYGp5lSL>rk=kDyC zZ(#8Fb{iSh_n$wXY3v!%s-27;$ydQ^a_IQdnRiT ziOc0Q7SvwYOHJkHM~_|o2J&O6R8Y^Nf%q4d41v4*7XOI^Kp$)Ccdh%8Uf_$MWu%KIGca@=2yzx{L^)eFMJUPJD`qjZl}J$rVR z`B-%}|Hc*PDB6alqt3RdJ;XGw4O|U?zwJu3IPCCM8pFd29&}>OxRM?A%Wr#{y4FrF zy-<9C-F^|nJb!*T<`ApdOic#~GPHCmdUE^RTc#8_*R5jQOXMv!ob-6v@^ZMeC|vs8 z%{a5U*nt5C-~6_u?p{Rw@6`UEEWOqb&ULvt!LQ*#a_v|R&HG5!r~jtrKL#d&5`zN* zGbZ84fM^N5#BxlEu7vi>HQkGHQ z^CLvlya5ffPbnQq^LoQUIWX!NSbm(uOrh%>j9P}}r z5>~q+Q)k+=qQoFl+b5NZuindo;P(td6K>M*NTW7+0J*eO>RNUG%7{hw=Vlvfv^9mF zMb9Fd%g{z~+zYYS=1(0vbqatI4hV=pRMB+Iw_Ee<3DOJeA8nmq#>C%qw<%ZS3_)6b zD(99H_Wvq01JM>t!S&~pwLckIM)PtOp@Y+2%|Aj~!K)0++DEOMPVD?BfIOSkt9AAKEiS7>o^v7>Pfi{andg3Q;^&g&M5&Y$ zLzoZ5jSXN@WU9+JCD?L}Q-cRGGhyw$Qi?%y^T#Zglr`Oh*Uesx01BK3KmOYHQK+fk z7dP}Y{kJ-=WkEn%dMZ2Bl*6|y%^}S10^0q;SH6BMrU4YSsFl5CUVR#b}0J%6=Y!im%(Bd1_uctNL5X(n`mcYothX3Ti}A@!;FXx(^io>00yX_{_4kU zg&sYIsK8BK_@1`PH_tXDVao}j2$V|GZttMT^uJ|uZ0o6BSr{UU7%9{t;8E^ z&z;zH3OZu+=)BU>i9Bf6R%c@uNeZwc{_5~mB9Cx{DnxiK`60;C*|4(dvd_0a6i){b~FiQb@ z_x9Ibw`BS9>gQ8#Ek{G&9ZsN0ggA++l3+rRf z;_NxIF=pbSTO3C50kz4tDsk<;%MVq>KlR+U=?-mHo1KjqhC_%hZK{HQO0}~d)r**? zFpVH~k0=X_#g?M>oHzdGe6gNOuB4n%qUfg!zf=eYQ6aLTN-baRQi6bFo{5w31taTdXeRS>5?aGF?)&D z&XG^%8l0awQTxd>;5pH)0B<_E@%u)s+s>SEWZ?*br%*|i1m1kt&MoZEit}w8q|-3U z1S=1?Q$o>McuaVD!%MNPxi)d%s97PP0eRCb2S)OT6)RTYq4t&5PCz#@CBEHwv zduWF)h|qYxCi8$V86}wr#Jv)&SK;A|v3u68pZjt;CexJ1C(BH)YipYHf}D}^`zgRH z@CW+zc@y4U!wZjO4`Cx=|Mji<&0<~U8*JM2l~-ZIyK>@&=E-r>3=H}JM}qnUnk1v_ zBc(bR5@NAe*rx$rqK|q)vL#$Syss>G^Os6F_MRXhF-enbva))Lo-Lv7(*PBYV|<4B zX;MzDp!@3dvsB5zG=IX*XM_tcpFcO>OH(F4cm&#_n*nEdX!yfy-hu^rEOCazt(piz z5wo?7ctTE;>)O6$ti>j$g2<|^#}=1J7zh$uYL)6>)w6%!Wtqw?>I*+6tc-Pwu>Re> z&hQV9rh-~>M0(O_tc(2yWrT}^Zw@i}<}Bk9S#-(Gu4=^h)Jk3ZtS4(Pj!oN@m3O&? z!+^`c(qzdE@&IhTMn{k^p)>&#kNRXS+EeLoOHo_4-sVrPhXv<<3tuBLzwW3IjvoEV z?=pkWaF!ZdW&DH*B?(9AJjPe=@a$7ypdc#H=?}E>VO?%szdn(iciyD0s{rjtl4z7U zeCW_Hm4&Bf3xk`1sS-V{%zLOl5d*e!=)Ii-R#<-CyEl^F=OIIeV2B(YUG?+Z8%&|y zuWz>ab1bO(CU&ugL%xEGbdHe@pBZ>b>g5wZ247S+yWqu zpNzLNF71!fvcJP!q-<4=t4D&tG68~upD^nvG5Fc==+Z?fiNa_mARtEjOw!|bi`|E? z&^^0I+BdA!hL%XoBj1cv5zS%9V3#kR#{e7Cjrd=K@8rCZM0HU?ClWS%ETjQ`4ldUs*1aX}0zD1h8Zc_u2U?lyk z?;UkG_`6&XVk`1ei*H}c8-JcF&E&o<=H@$0`fG%0F_DAoKVy+Nan}i66_)%{uig<=z7*9c-TLU8kZV+ynt7D6*JWAB+O}FJa81xE`5& zJ*uSm^9Q5qq=&UX16lcr)uXoc92rv4Upo*@q;9syL~Fzd?eC|)GrYxQ&z+k$ZOD05 zy7uq?W`;vSU{3D9y%U5(8(^!+mRf#Yd-CUyl=wly+qSsPU`_uBkf?_iH|BQYa}#e3 z6Q6s$EarUr@4>d^S^YP^N($>4tF!BYu0oV?VeetCD6-X6imdvai;FKxD)oD^HgNA= zjAT$r9aDX~BnG9IGb5G2Nrr$n{#-?IREr}#?h;; z-EUJKkh#z@5!{Px&TV+AGV<48^7^^g*L0RV;9^5c%I~H=rU}eG|Iqf^X}MpOj%t0!BEY)pxj;-E%9&wyc+?7glx|!zbvg7k z$HP|9&Ne;}vIE5#lAhhSh$wwxPI4Q!8t%V6=n^88*i`@yMfZX`S0=`uHn!*_hIz8i zfji@GqPU&xxs4fIe!{dTq&|P}sc5nCWSs9Zof{nDSmXE8Av#q!So@_guNOJGC*Bld z9dNc_Hg}xGFO>@0aCCS1Az!~gJoYmmMYgIXU5y)gIW?sRC_C{G!`X|pZa926z>%5G z4GuIh4tT8kV-N5>ranKo0wCA^o1V)@=J9a9ASBXQcCo}NsaHo|5=#V@jI^Wj$i~j|@r7E?r(Le;$x7;%!LNz{UX_HW7g(xu-qB0?pzCEWa77C4j``#~{D($E{E zM~K*z zW-n;UM5`Y2&i%H2T!8u-Jc%BL8y+RsuU88399~I7P?G|UF`w|+vxjUgVi#{uZknR_ zZ7W$wH<(!}CNbq3ZW=q-{j7Lm!dk|oYGtmUB?*XsaIaVQ?#|>IVwO7I@+AD!Gc2Im zcKx>qRT3e3D+>Y={Nwxg$$iZ>L~fQ0kIXv{zb1MC$fr7Y>>>NFESD2y&inTpY<4ajPkw}Y@UOr0kx8YK^SW=^v}*>Ih~QwZI-)yH zDlJ^~`F`=8|5%~4wp#}if6f2P#6Dz~xq&UBI{=IM?b;jGS;JfMOgPtnusbG&Rt>!!xxe^O2OOp{st_KFs7=4Al8xUGQ4l#2o%#CEP_FEB--;gOYw7|#}XkN zzMth!l1eO`ot?P~gt2hxRos^v+9Qx*syq;uzi#NpB4?qEoP#N45EXCR)~$8)`dAvx zn@3uDUUbIsqs!kgLC2qmC(jZC!5Oc2Bve&h-MOK=LdG>cX2*y-F~xG=mF*TcyEnI< z{m+^Y&Ggy_Vwev*w{-FNdDzJa!WiBiHd(_w(JQ!_AG}<*utWPmUUZQZ#Pj>J{`jVz z?mKhNoH|CjkcN|k;uI^U5sCovqGxlPNA!Wko$g%%qoDT7hHSltv8>(~0Br0~ejKI? zgII?EqLH(fpuGjm&F!+OVe~QHjjj+U{tO1G3A;Dod7TeofHb;OTQ?ktKr6!eeXv6;N6rDKD?GoNf{BeSO{MfcP$>t2*>`&&k_d zzRtNqd;QIiWmC4AK5Q)vR}5CMsVzvLaKt|v67mV0o0DWV8N1N)(Luw9+PP~Sk6^1b ze!JAjI;f#&0#%+pBFj(_Gz9<7MsOu-x0uLA z5j~7bju-xZVfxUsd;MXll*D=@Q+U8SXqrQ7X7HS%TxcqoDGI{WM6_Sn@-CB>t6 za}DNm91yV)~q-4T%K> zJ8vxNZ*{+??purB-&k&Rt|)LCT3;p?M7*Z8HS6g+fJiW857HaX2+dv{UHbPr`NG}_ z$b7e-W~QOF6r!#F#L=5qt0o&rR(?GGK@6P_)%nf*; zJ!^lLNNA2oJ(k*Ey~plPV<3Zcbv=ON(l#D?GlM^=JV>zAqf4pyS<&Rjs90*{>&}cw zI~%0t@~BKQ{dJdsvqq3%G?qT6Gmf;^-qY*B{qFIEm%>Y)jnH0s^GR{L85 z?U0AiTZ!|LgGOXP>3NQSd$Gn*NXl22Wo4GGcbK-=;g1Nv63@mTD#=iVyRRe9%RmVs zzNHx>0WfKaA6@QmBvEKAHD*CWL{~U$HL_oN|hepKH+Ve5Byd-*$cYMO6ak&k0-WTt0f7B=I zvx9!SZ5!Rp-voq#vh*6W>K5|EX{#Vkay!4|%dIg(pR`$1^NeQ*!Xtm zWGeQ>*|zq>cl!9`zqOb$jqWWKtIXB=4D}+i)Ko}1Cj(1@g77_l*NAc$a~QaOpjhhk zWi`-BYd+hY$H4==OSlGnQp_! zgsj-kW&IUTKTAo6pB5&b^Cz8#{U))+sLfNs3kE>uEmY7tGq_5miY;YoTe?nUE0=d z$+yL(0Fa-?3>dH+c$~bXo|}f#J~N}_d?hsiNTYBM+NrhCsZVL8WGD4e)q*}ri8pq7mNZsa@qtB|^p5Jdy*}c{{IrUY zu+^;!j@J*+X7$^)_#-{z2+i%^P0m{kgyn6<{H3HH;qNA)r;?KC|LpIjgOUg&n z<(lc{2#b#y9>ts>ar?R}bnQBZckG{f%^OTu z4r>X(TYt~+Q^QSz|FtByBA! z5LbR+s2?Nqs@*PqD+P~;*PD!mhLA9U%K{=NTW*w%*1*l*XwIChZ9g(B$LJvnGl1=O z+#nh-X}F1Y2x7QPDiZ;&W`y1awE};cNRv9)&l8w>pl|alJa;ZM7l9Vumi=Z9jfci8|b;H<~k4j&%p4G#p%BGe}NJvh84rq}`h?0T1QTG~SzP!?ZS6--T9if2aGFw{GFSj`4tm3r zE?n3`Z<5M}$R9USHIm7SY)e&QQ&LP8bg#WUVgK!u!@zZJ*9Bb6#X8D&=T1^cG-ruq zCfceHj3;11)|O@zy#7KKHti%CUhq+u&&}8QA;d%y;P2lxh=N*T;dRPf(m5@o;l9qV zoN?pFvQ)p$7hJ2OKl@7b+n~#3bJe2LX9>`d72dbPQhKU==j$ut7JC<;fHg$DhvVoM z+M_jk?DjKP5223;MCBqmhIY}@Z)og<>oo0-anoP({3Q}5v7O2)xwthGiJcI*=n%wX1ty_?4H|WvV zL%%!Bh<-qbSd1}LE&I>9R7QkFGE;B(#>2ydG~!^I&I4dV?!pP$SAOB=pV{`7jn0BKEQ(YaR7eBr^=8;zRogF2=Y367Yr~I{d*6`sz!Kb#X4cI;G&Ja1hyQ50V z`+qL}{$lKamSe|soYdd*O8CY%o9=b&cj(~DBiVbcqEJ_?`_iRwzNTkQ&DAb8TcfY| zkMas@6L~Iul-HxVS9@jUAo0BQ^K6VuNsMyoo_GXBniFGrObAT0zxA=iewnS48) zFzLHf;ZDW4Hm%O5kMam>)5^VW+@ZYUC5o#q3j;T>z(C359xLoFFVI{R0yep9b6qND znDA>YIQF^;Dzm+;Xm@#qqvM%8TfD|!)z!^WlhbtFtlc|!&>9*)Q4AC#pC_4JXTMBT z!7}C{$xEsTA0Z>2&vh<-6QMHGc=__Ma<2E?!GC zu6Izz9c@{=txccn6h>=@N$CL0S=OokKJDDrwmapXa;)k50rBWoi7|OFuiI->D!zcC z?~tRjA;$Y+)8Ah1TlHzg0#xzkAh7((4mnQ5^!VoY_0kK8X)#^%&38LTM~H$g-M;;* zpG_>)7YIi?qA*IYn&Zuv>eOzGOWT{^AhGKzm~rs;-z%(||AUNVlx9U0uCt43nm$w} zIyJ+*X)e2rjMHNIUwYP98(*(yu<|ej9M>_#|irMVM=r(jN{d)KAy*j4J zv`*%DkJ+7c7{HrwQi)v8^Y0x!$w^lSN}E5zZpuFECkH+-m2{XLuU&h-vd!JQ`Td7uOsCvhZDG@UdbK&M z>m3OS#9Rc*bd07}50@4H<$eVSyt!+zKWp2_x@M?VzS^ma;q>1yJ?%SL5P@%H$RADb z(P=3N%l?P$JM=i7H^KHw*?PT083xu6v3!L_TmUJe?VoOoYI?0q>dKmqfhbPM5hCN_ z)`EmGI4B3=k31sl!UfgRfHYX9A+9_1mLSoYd-|+1c#5(QL11dV60BqCMI#v*P2|@F?mfgu3>&AI zLt%#E726&LZ9$NQGButSJDO{jL^T{+;eba1d_3cx?faS?3J<5F4HRqm%zf0^!QMhf z!h9y)qUQXenzQ-YZDjQQIE6QZm{HF1!}*Q^mXxBD2&Y)%xv#+Lmi2+QUQ(_ddC5xh zRwiy>8q=3a=hxc`z{?l!{pbZeRi)Iv-e7c5@NRR)lu7lrne0&`U z!nSW2(5)>9IS6YJL0ECp!sok#WO0qreI^4}aVFu!B6u|)Ve*>kQoGtNN#?aX6(fKt z|0Ll%Hg1hEWhdn`LIW|E41^^=Kc6%lWy_7++_`HeTV0clH(mVM9@-i#Ek`XM9=UdOAA! z>n|_Zt$c8SqKtIN?c}u$3}MiRv9`n?X=b~9qT`M$7`8Z|<*6AnX56oK4oPSklEUgh za0k9AnD$SfKKXV*@ivd?xq5n=ksgtTB%AE;H!_RNZyc;TC4eS~6Ab|XUh9?(P82<# z-zpC-BR_vHOrJeG6enVGP$uM0vPqn7v}=~0QtWkX{ppxInQh;Ih{ul)XHcnPj(0<& zLhMDJP|qGcLMu0pyPG@V#8rCJ+!0ENf)AKbl**~8_=(pd@kNA;M<ahhG%08mtN4O~`WGf-jon_{)#J37l)!odGJnyvPy7N@o(Hox6@bvUlzJ{Ew z_JXdASMX?;UH(T=2>=sN@~%zj(9%oZda;PaOd>KXS`O06(j8l3lW#j&>&H3r4ze)( z93wI_HArg~-$N>QA z`CMWo0+V-_TXpGGe+U6Hg*)9Ptb9aseBxI)I12gbkCkJ#^rhpmkp@N#I>~Yn4<_nIiaB{^4x`7N+~8a*{)nkS7I=&n4zJHy?c+R(Fv`xV(K1$ zf0V(8=bnCeZ?~{k!BaZLBAy@SVbY@rL+9@P1th$Gl)ZIk<^B8f7cVa6$TM4TLt`W= zOilI-&CHEZGNAHV?@!mT+{ImHU5R5ZJy1OxW0Nmz#T{}e_fa+9zI%5NfNP9 zD9WidK-&rE-#~An4y;zLqz9Hi>mk97D(6%ufi8V@Sls4avN|&60Utj)EBjR2CpM#e zqWGRZ{U!wkCKy{F^{F4yIchQZuFpxar~`!Y`gpv5L)Y-K$rW zD{jpKFAgP&y|n;NFsV$N3>=K6wXf|Lhq#83>Jo_+W|y_wiTZ2J&3*Jj2)T7Vqwf-@&V5AGXOo%(3$ zMmM)cutC=2B&uT4ceH^ur`0+r^EjyqHHAy?JZ3{##BZbTVuu`lTm{-BDMTPJ=by?i&P(^qVrqXt9l}T2!nCZgE(7U|A?f-m0+U@l!bt3v~{HR=FQ(&r~Fcla|S}l!nek$O4p?0Q)+S!jmBYCC7H()0mAzXCDPfW-Tmb- zuF=S;sEDu4?9(uLVm%kSmuTJ9q!>KsU%a&Oo|9TG~przdvy8b$TveUjDRFmfU; zj%J%}l8z%e8^-BAkV@2)uaO!{*KI2jztqb%k{zBovi=FWb+J&ELX zZUUu*!kJSKt65+`QKXS9INX&upcg1rhAJ$}kUnxzgYj{E(pJXq%FUanF)k#JG4%e# z!~3|*KD7vJtasVaNoem)LQK^}(|KV2I=R@~`%;9SCmSsm=`(btlXh0&8MO<&f8CPl z1VU8CO7Qla?)0|YdaLypu=-IVCoxng*U_Jn{zjWf0Ys1Kxh0@M1}haq;+P@aty>2f zrT%|uBx=6s`S<5`v=mm!Fm?FNisb6 zpxRk(YhKyaNhbOt@LU~-E7XMOo%nl5caJ;I z|E6v-ZHQjFVMFrYDJv@d)U(f(R3@;PSV_FY*piELzkl=GW!O!c;~pdQa>)7sWA%Wv zcyJ9qzTyN!-?#zX90rahbDdr&h zdR)P&%@Q508{N^CqF}7^Zp| zFHBEvv6!!nS`r4`%F$7HPnvCg3KQ*UW5W};$U!r_b`jA)=mvNj>IpH%uVLQF(1WTP z8e7Q|$O70+j07V}{r%#Fz}U!@YeZHxIQu;pCEcQy{T@kf4|VeaKKJcX6$1>*BQ4^^ zoCfUWhFT}PEnQj$?R=)dPT=;Zv|A+}5IhB~AspJUzJjpi#BkQNB&jFGr~XgD(2c~W z_nf5+qd!7<34tX%1+kG;_L+NH4=Rqo@!(F=MN$yaG2Ybv{Ainh+b*V9%7@^PIb?`w z-jGR?mdfVg3Hn2RYXV-|4o$a{Y)WvYf3)d9=9z}NK-q^>?ERy7IR=()Mic3qt*xrb zO(D8?vaid^%8U#cf=xL^inlSljLXS_9V2t!23x_~k?iP(=U%z8g3G$o`D=lvN4B^S-OKMy^wJbdhiJi z=Rkv$AYd0@`hd1Vm>{4JVQS51Bw2Jcsi}RSp-|J_v|g>94C(26G29%TKX;XP*6>M8 zP1P7V(yY+?V@-iQ+YH7jm!qlEyu)M`uq*HzXE`R|^*PQ|_unA7i0F7ole%Qz!GnS* zMJhwP-Y&Z?@vAp0_$+Tak`$e=-Ixd}P%C;a(VQB6-n7qp6O^~U?A7uX;6nO-ykp`a zxhZo}9m|C>QaIv4QN}6`!#HBdV1SKvn7oR2y1M%Br9zx#`9X(^b8<{XB)ZCptFj#l)parfaw6c$T z`?oMR87qr4cgT-K`~^y z<^UoiO9Yp!reM?f?GPUVwj2@^bfVlLqhV@n@6jTKAJollmS`#(qx7A^;|Pu?3vMW9 zzvu0tCMPHx*xHI@eTN)9B3!>G^A!=B&_TM&=*{_uP<_4XB0J~bqV0{k@#Dh47Kb7X zzva@3`7adj`zOeW4I6Y7({uJ2lQu@; zAvI%$m}p7&+5zX4aIi)hVkkK;A3A9gn`7zWrOmp=n5dF@IrN;72NLR&b@Ka?Urwtp52wv1fOuiC0)3vJ38&+b#;BheF+QMkRwg_zH3nG=xmLlxLTkadfX%#J0w+t=0X!S``|c zept|OZ_Lbne2kAApUS}+=W;l}ctw`Ryzh%osAt!w&6v4w&`jyM$|prds%K6_-*ik- z&(_k?s!yAsq@+}-8ON71UbVHK!^f#s;SyV;>HN2Sg9=^-O_yDv@dknFrmUROFN1A$ zXYMnYxUG{!RpCgm>OMN5; zGe7#~gEnR9hpsezvni=tz~*^&=t3z((P46w+`(Clq!>KXdeKpgycjtfWq)Dgue&mz z`eCiS{wolp^p{7OGA$Y`d@8}<6Q4-if83Y(1WmLv zsy={=v9-x>NB;Wi>ojm*=KKc)51v%>;>8dV;^T`W-ZuVv5>EEy7m0FDal6AbI_66i zTCRGBOo=fCk6Tty5)tvR z8qYp{Mp|azmC00wm(QMc!%YZHGk=(6*1UP|#gvrCO(&3- z!60nivgKm{=O>bIMp@!TUvqwL2iH#GD^F?l@P5nA;d4I&M-x_Cw{ATFxe3wS#mNZ( zouZCBdlSJ7K!}X1zK&LA4qxiO1)qm|x5;c`7msgWW4qbu6>a8|CjAT|s?t6o`ok+K z28ahI9H6l}*dYh_5M;fm{3rH8`hGmIM_XfhylS4S+V<3mHhoY8_td95W9+^`y(eZ)K}+X)cVzl$Iw9w%MB@uG1|IGuI)PMCge zXqvZ0hcMQ?oV64AN&*%Hk|gV{XUDvJ`O@)8^0Zykz*$(XjXHWdM3W|yzD4@YAQ!VOVzQj@E9^*lKrHy_TC0)n7DKY$-tR`-0R?*uy(K*YT(frL! zuapfZX%Av3cBc*b~4efl)TpH{+v}wf_@c04=?#R=b(&@}_7nZM^ zvvdCBK{NMpJwJ=N&!}EV83ldYaiJ$q4#F!CGfzQBjSKd^ z^(ArkO+*BCk;e<{;M6#_z_nP>&_%ub^jX_$Hlwv@3O$8dNA~Y$&zQdmQ?mo#k(^_b z8!ivtYLQbAz_Pbg&8Qm~N=#RHTQQ`FH~ zW?wtkPuv`*q4u^d#JC64qz6JnGw2SanqdY`6x=wfZsFUR7ZHqU;orOnVJjpx<^H~( z3`>iXd&-hU?YJa))vli*YV6fzjCMDQ3MJb`mkirRpBTAVcbeV1b`|n%QKm=CJ)M2; z-rm4KjGNz~hEkik?`OgYp~lZ}UZY?+ecH5m+F;{NFX1&tW5%dgR${z;&yl8~j4j&O4Or8=TJvRtLLkWWT2zS|#Fe!it{Aq$m_uGnHaPf@!Sfxpm>{*<$?> zC4yJ02HU~3a;Gpydy!@0QsftQx8nS^A0Bw3p!Yp;Z@DGjFq1KJvdKE=I*Tnm;Br7-1pK<@tP|8cTJ5h;0)9m zAj&Zo2FV2j{i;wj0V{K@6b>IX5SI;5y{k8WQY=0(rpMOFD*vQt;{ntEQT3taj^y>e z+xE=QWxhb-q|*7qsYI4p2FJVTsJd>YKBO=dTd!!x+|vs$(rI=VZ?-4Nm47Nv?HESy z0VrnKtAoer>-eI8Se-`J18j6qj);t; z1#oH7Kspo#r_B#J$HeEm(O1Z>2KqQ{+_*4JCqAW?W!YX?2=JU=v&($s8U|}IgF)X9 z3D_OmiwT2f!Zc`qi;_MZGI}&#gmFAjLx%%iQ$53a&D_Uu6h#VO+_gO$w|O?T!qitk zyg96+v2*oZRW_X|jSkx)E+S7QsU*yt%MV`w)q`ZwhR)$T6$gJ_qFzt_gA?abJM z9^Jd=H+)p=RB>*vQItp0v$h?2%&*QGzPvzj?&TzmIY^;|HecbhEz_GAh+;&NH^zHP z(4j--78ac6W>@>ya(5SnP`R#6SvJ+!c%NJZLaN}OO7n+U5tg7EB}Z-z_-Xkm;#l_l zHILvCb*VINkm8mnK#hQB^*#f@2#(*a#;O-j6;q5m;_*}0ESBIL0Eu7%|T zVrmXN@E4`BmD4agOn6$l)JIgj4ZVkHUSBmqCOW#%+b*jPKh4(3>e^oH%{vp8_vkdJ z;!kUu==mPsS9ikscZ3fpZ`e=2MtNxUWAlEY*JNUx=a+hhI9_HqU3?qAwT23ve z^^B8Pu=<1DyNaVoC6d=X9P;i`td>+(=VPqu$DU@dN5-nZyPwHn0}dM;Kk?e7ZoNrG zA>LM;CA&7%?1DB0<3Lh!sVMsh3NUz0tF(s}Rd13rT_G;$Kfkjx$kH>&O{4{ohV zbbV;J=_%*bLv6Ac@CXI{6xg`KQ7YMxJp0A4>a7pfa!Oqoka|(AsZy5l;Ks`756fH~ zXPNnlum((}FB?9WsY~17$$4P73&3DD2qNR0nXBKZk~UMnD><1g2|96vn16%JT-irG zn!5s;WbEv+nh=L;m(uTXNx_axSYiEb`t)ki zyGt8az?^b}J45-Jnhx=~m77ax6aT(w%+{uaez{7_m9?|yFIh4HjO9nbtned8sCf=d zQ`Z z17lez>@1nWH+1ODt5+k*=^)xDwd@NlJ1Eo3+8_RkkVm^})Nb|^NWDw-gX?dX@a=&V z%g_drzOixPLxdolMro@h2KWuCR%l)AsLQSYOWEz^66ZT7dA5_V(XwECy@aw19mIUsb<2`EXE9 zt9fckwEEe~XeSN)x_4sgq`oqWy~5fZEv$CFbL3qS+L_MgLB3}wr6PrX|qBV*6MRIFCa?bjzHYHityl*r~1C|ap?pBE=eW}c*O2^rB^ zQX8SUITo!S;6NPt{mP6BpPp^O#aRHaESL#OwhEGbzstEVxVA3e;2lo=Pb zK5J_vi7N*Hsf56*0HP4N_{dqrrif|Fli#2MQc~c!wrNv9 zz&mHK$SjsUPfJF_Bi`pf?a$x@xwQzk!VUgVHP89u5}<{2`VRhNveer0yG z=4rnvy2?vxjw^Mm@=5GeWL>Q)jlHF*RkmLg$VH1cRX35R#Oz4<>L?;R3CBd}q z5{xhy7S$t(b6S$JV-v7@Tq|y11ul?Fur)+g`#zq-fI zh*1U7jJYwaCY^Q{xd@`(sb#8=;*ohJ=!;G&HSMDOP=(fgbi-fMR*i^HR#w)X;7K7- zTTyZRVKtQwY3B!ERdQGgiJD@fa@%(8KzXjJwhSbbRW=|EnRBUm=!2WO+9AzE&&Hqh zRtmHqT!8X#w}6lTDlAOn+$5ASb$a|p!w~DOn+I<_A0M>6cdJ0%=%&NMtL?qtS_YzX zA@Xi|(R=2;J^i3ckja{;Ufp@%*5&f@My-N@*~w3AoDdgX`8ccTEOEM-{KsI`JB3PY z9fke~B*jFlZJ+)Br|86ZV-u5)1X#wn@iYj8n>{>4I|TQdqT0wC;)!c#cHDbV6Dk~_ z)qR5yFRUY4bKDiUg;K>cYL}ggcN=g6r3}aW%zeldCqZp7>o@8N#LmWz8zIq8pB(ku zq7WP(186xwg_ub}K%UdAgsaC&`kWXrMU;Sd3=R*k<5Yk1W-`D*=Ie~?s&rZucKG@- z3qy6{L`y_UU%vwVZlrAXb-3#uBQ3@ug+w5p2TN+HHKA76yz^#=u!Z|%pW!1%3b`Jt zBC0AMK&T9f$dsZ|?eCSf*8A+wv-i87XMf(k z_xs20kG0lk(S84h>pHLVJkH}dPINTfF*F^)9U@@VjoaOe8t6^h!lFwTIredYqCrwy z`EEX(ItJto-y0S-3ep-h*@?SffhRz+rRXQ$W+k)8e^Jv{o<(1XDD>V zV;qYkohTZRw}h?tr0<4G$0f;5PEHPq9bW>ti(?Q=Ri#A-h?elvU}|+5%gZG}oC$@K zo-FB>4{G4s>rTu_ws;+}tSsl&n~VO~1GK2HgrP$-m-P<=309j#D;H^;pkRU`Av3<# zfzAVNa@zH}d}Op$(vOHZqoyro%-@YkDqPV_W~J<;-AdEfZ;vf@O#crckqLQ!2Z=l% z2l9~$?yoBsKSsZ_d!wJv zsN3w*s<#hIVZfRnTR^snjiV8m`?&+{ujc0urZ=OlZR)sjeAMIf%VU69P#Aa`-w1{W27*zh3QVQl6Mi}Td(m?J%vZvH?afXxcLn(mC?H$VAa!rTwP>9z>ZD!H zt7+QfbGK=C#?WEIu*j6OROrwlsw2=GQK3)P7ha1IZA|BxmM5&}-71XLJkyOWU6!aY zIP}UA64M_))-uYs#9*KE5IwzVErD^`fIp~h>NN>a0n?DNFc;xJL(T-Hrbg zW@6TRS1$;Ns~eeUbTBtvneSQBvj(J%h3EPx0oKY`Kj!B-yKVXHxT%?0$FVrcJ=VQz zzF`Le>usN4rRJ(2!BmSE;qwV`@Tja$owX>&&^5lJ#lFtTZ|vi7fWdu>(84m;iZ|m4 z2Vu({GLyV`$N04iMY%qO;(&vUaoK0jo^?`*s_Z+~k3?GSI>kE5l&HDmXd4h>BV|dT zZ+7#FeSrbLr}I&>e$lyZbt{-DZ4xIZ5nK!J5${FePCY>ci>u?rE9$}Gq^%~lM?dY z>}{NaJKN*vKc#vBc^KI&#LZ)lE1XuHe;zkuul|_sVoXEakt465ujhSKqmVjy_;4XQ z6vCd`bp*Ye+Cv`G*BX6p!@3c_A=qgD0;Qgw-Qk{-rm?Gn>f`>%cWleTB4ksLJIg+SB5j2EtTjph8{gs0N{$%^pVziCSKa zkkM$aNo>JP3lP+8SynKlmL-sksHXV>@zu0fAVmOzuBiFy+PgRdmZhm_jFH?Jt4A8+ zs;elP3~O{92Nr+&{8^!4-Y;krNl>_KaPqKywMU#3=+P&LIvqO^|=&TnMBu@JAaqN!CP22X4 z*gs_HvFGo1u;)gw8OWtFOWmB?j&*aBW=~H38{9^-NBuMDHO*p8Ev@sYo#`betUN}S zmU-_W4T8aoIAJYBk{z$dDBY2_(6X4Oa!nS=UJ=e8-hokOeR%zY76?)^AP9o_iJ{ls z8?m)7W!OTP6~TYz+9fTsp^G~k2IypQ(5}Nj_vX;mk0w5dIi zo8s7i2<16up|t37L|B&y$6JxvE&{*92IBL_7LhNCVk77*#dVMB(zJsWmEtbdkgx@*_W>syJ+Lxv6&#t5I(Y(r?0Qg-ci>pf{&$SUz^63sYP?OYJ(z;^HdPX9)q{S9ZDkcNmbR-M@(e zwSNI@@!`*qc{v;>nAzx@sLt1-y@65GdY|9u<~ z&N$LL0hRTE9R@j;;AOR&8lo2v5urHDXvtNNb(!PZjaWwB#!)5{$zhZcJ*TQ-wS2vRB#e+b^DGy()G8?+2u^&1J2e7>bFRyH=2m~?jmAc)<|_!&X4gmgd$P%y;+eity)Wf_cr zBoCypu%AJA#TaNh<4*17i#_H0wwG;4Kl_cFahnmgNz^UlE5?|erTx!>CEbC#{xEg= zr8$CGT+_$;+?4mnE%w}=@vBTs1w0UlAp^kG-Y%Z+&^mb0UGG81mc4rW_MFBV&$y{_ zzE5tdr&%__ZU=Zec8(E^xLa9eH`V3iLd~2~mTt8*HZcKjdxm7=kNWZHqGqZMXDW{dwb9#n2ZS5RRpDH;`qsoP@vUcwCl1|AQuwVD_}FRC4#eLveL zl9Y!{1F=&M7;pLchGvrRHs-wLya~k7QM4(u3>stQ=-dxqeWTdnumJaT8DK=}0kLua z=buv6;*du_NmBm{ApOq*NdI}z=r3jO2_1VG^W!4}4$OV~t90+|x3V%Z9wiMv)owN; zF3vgqTT8{C)TQJx7j*1Rmgj!Up3yRB!CP7ByiRG3v5^^T0`pIuwE1*)=kkEU(Ov%y z8r#ML*}NxEoX7E9&bE{K6P_1;HK(gi)h!Nx z0xtm1n$@dYsZrM&DBt1uSvbdXV|yt{EtxSTBV8el&WCV^&hi9E=sii=_}L%+_-xB& zs>@%Ig@MWgnPA2F<~uU5r4%!Gf)@+@kcWqPAkyz`nGbeJv9HZaz@77;^3h*|Jy)z) z2OkQLc1hHk9hoPeooT$>@MA5F%KY@aqd>oFT9P^92h4xcyBP&*1vp}mS?@)L&!XHW zhtJv@krT*t#;`EQDfjfWF08oM2$=aEP%n<|*{M{I91SV}Bt#}&M*~m=Cx4`s9k9ki zw)vT6st}(NbVQjjetwr=`wR1bMwlrI9ytove8+{9K(zHnvrC$ctWTH)SiB@S1AQ>l zLaTO(=D$O0IkjH5r4brA#J#IXdO<&EHwz=-3SDg+ED52-u^C4=d<*x5Hr6(^IdqcVoKo^a>AcEOk|5BNbYja)1W4 zKR(?&I=b^;K7T&(Xr!9jn2-|KX>Szc09$aR6hwP+#MP^DZrieXa~&Kv$Zc+z9X!w& zJecvKv|U6p4yBE^#n0W04D24?kP#tTjGC*e954?vIv7k~mL$Ad!DTEOatO1jQ^W8# z_B^rO)KqH8eRK*lVbzg1z+_jSw42m{$M5D=MrHt*E}A^``Hh~G9yfawN4LiIJkKo& zi2Tl-h4gPpp~m_Ny~%+^em)h=>oNmDafCVc(P>ml!pu-BSZma%22SPefq`vXwX%g# z^1v*#S7ff6peM4%tIBdscOT(^73~-VD4?C9vC@7v|H1W(|I3jNEahw~^f3Glynff6 z@r^prTq$_r*SPkxA!UH!buscNrn?EMkKz&Zm9o|cEvjvZ{MjDoIFLEKwJ+&`B__ZI zxKq?b4Sv;kS2>wEoP#GDx`tj_YABnubPCV@V7tupFGd{TdxVj-}W$AMZtLpljX~6+HbK5xuD7C-Z z*>L?Z_2Rp;7j5X7An#ykyLM9(<1GrEoY#K3n|rfMvrWT#wCpgZvqG=XCP6Y?b}ii7 z>}u!svT8c59(PDse%vx`RN3GW-osi?N&cYzG2ij`GE0f$Z*BYhK2`eLYBX$OT0F3w z?u4cVwzM)v*1YLiQ4KV}}+bwX@TT&=f2Q$w7MD3fa~*Rvn#5 zEQP;gK)|yz^QVHvf>Q||088xP6O=oQoq=bX%@nUH+1SkFnrS%AtVO#6XPR|Rwwse< zg@3lBxhjTmkJy;nVRz^15lE-!-uzZtQj%`3B{S=2-X5u+jYCbTQ6E{~W8tZ(Gi%Q{ zm+QvAa7zE^C4Vw8QNLfmDaHaV=LNZ{2n7jfGd=_qc(BYKCtS?k+^(SP2=_*aIJwrN zqJvGMmAaA9BU-G|JAe+xN8kn&>?0_3)tx1V&_Y6CyqVx-V9zYt%2+6zFl}Ps$T(4o z{X)`sA{np^_Y3x%4^+h@Vwi@RO~g1eNI+U){f7;E;-YU|xClgcdja%~cBk#8N&{A_ zpFGw=Mw{MkfZ_V4L&sjuE@tWh)35=v**|wwI+=7~+${6}R&qtAcDzl0g}LX%6w$`{ zvRthppz)S7E?!A4*;n1Lg(CE*>oGgDVm$pm3KFE=PiN^0tI;PA5|Cd^2vBxD7qWGA zlR!DG@bjIs9mn8j#@XI8{v)U>})44 zC%UI>V2kP1^W+17Du6yT)rp26KLz6@5-i6+p>v=EE;QwwGE8+G zxEZDlQBJ`!6cPak1Q=I{BOMl)pU#{wbWCWz=h+qVUJ>fh6a}kOC)KDxz3x6gTbUN* zOq58h;nZm-`Zc!+wy!oV*XUXiu%X39C%#i~j7uE`CWS`m?VKYSppu z@L2$4xHyPWqPFJd?Uj|?E_D}9t2j6CL!J9e+qPsed3mk}nZ5c`|05;h+*J& z^=zY~Qf(vS>lB#)yn+7yPv|@`-xkR9_O~xJ6-e8FU%}7b6s0wo!lD%R zD^Kv2V%QGU*?kUc`f6&v;c((W7v3M)Q8yu>zsL4yQ8naSz}PS3l58*{u&@NCjAqE& z?bVY@-c1pA@IJF)J7p@H@&mycP?S~}#wD=WAaUKv$bjs3-g$H58qV2pHS^W|ATTex zoi>cL0-Ne|{CLjdNiy%<^RDQ5?F*lCw<0asZuZ;tF70}pwXpxKqmoj}m)kjZAKS`Q z-n}%+`%tORLS3cA+MDjB>oq(^Pq6u;bbIrsVB-FtB!Fwey2wU)~lTA)ZSn+WaVnN$Le*F->9WXn#CN8EBiZ?cLM4`tQc1eNY z_}M-YNYvIg^kUYD1N{9+O^$@B{zu$sbcyZGetvPP$OR(?I$8AMy%eVzkUApxQy8cm z(6%;U#q#Bqm6gk1J-$&?R7Ce)Os8}6-i4>+6P5fDV<3U;k^9Y#p+dLoeq;1%p@ zQa9l&VKC#vpg*|)txpI|Abl~DBPl75oYJykl_>HluqD z1%;AFnc4H1BAT?aiNVA4dy4iQ-xj|a=jC!gOe6TMdsPeNF4Oo_@8@^~8dYr(}97Ny^~>b7LA_`5Q0>wT|jkTP*Jt3M!W-Wb04 zWiwTr0otvZ9}w_27vsO9;1%h!I>-D2V(Iu{C#2GV4jzX_dJkpfSXEWBVpaHrpPGgh zDI2b7*j-lW+kCL&Hm>!6ak1vTpC=HRl7GRgDa5c5Hgu%Mp>5lTh z{GvBlH`I)}(!JT^R@M0nd(cb~{a$Ph$UdJWy6!o2NVR)+$C)#K zP`HG)>(sq_11G9Vn-&n@z<+^tg^hvHlG&WY1oXUuBS()02M0r47dBY5v^gBRFl39V z<+iZxtv+s+jP!JJdd^o;bC8NM7z)E%juFznV0!%cAjmZ&H?9Ps5PBL`9k>Jdk2_l_ zNe=x95GUrtMy8fq14dcesKkwzma%39*$fyuv}qum)wfeI)@5eb%|PY~eyXU@9x$Nj zl+!p~E<%jBl9qN-s_ZZL6Eu2M1}i|PwYjvmnvzo@$?Z19^Cuj@JHVp6JYCUo*^(uF zb##943xI)VxLRS>GVCR61mj-FmSFA)F%hD*_Kv=C zJK7EuA;8rY4hMMseBJa9rL>D|?9a=}M7Pdzuj>}rp~+~=V#YYWTg|1^^lRav8hd4l z4;zOBqjL~^>lwMaqk33NashX@XMm%VR+t!D?4?Vz1F|AQWIN`Pq`2j3NhI?j)8pqv zzgK~*h^a6;{Fp`Nb|+Ca0-^(mgKmTMC`PX-ELpL_Fs%R3p>~p7$Spvz+`6A1ozsxE zFdD85_X(YTM|2SGyxmf*W7o!F=Vsfkw%SRFiOX;ZU?b-&nur4v#xH(;WGjKC89&vc z8?=o+O!aR8cccF1sQT=Xs=qCS(i$$DKQAzgr^OU=tXo7eJN^7lJ{++k)YGyjvu0vQyj&j;qFqku!-OFLpN z`{vFsQHgiVckA6czGh`VJKD9Q8Ek3w4BD^!Q2#y;HiYgR{gkLr=kwM}R+lYqw zmbWze5JgRRq35+K-*LupLckkGuKn(@@ye&OX>|(;o0Jk=4czudYBI$!Wyv^WJhoiV z`AenPn&agx>{H2&I=8o4x5yN$5I?LfY@d{X7z(%dOpdl(^PM5tE?%|?JJiZf>z?T7 zA)KYS7*e6I!HXRze{N5>#4X^_T5_OAV*tvL_1{r=lOl^IFeBjzhf9lYNTu+pDsivX zEmD9zax5ld9}9JWHmB)HwNe*ODjqTfqkSY17h6t+6Q zMsXf{*#TlX`pJ0?8>7zOd}^28zEWaS((~i93)79))jlaY@K9c12vhIqjH9ZwQEnuC zn@?z_`Yobvq-dt9__RvnaG?uL?=dkqhmbuIvlE54OaNQa%*0|%)%(8c6q&-xDTp(V zI4#UTjMr5hEXqg=x&7(uSN-_45w!Ijtt3fp6rm>fQ+HhZdGm^Phow?#0F*8x;b39h zvgqXFvh^AV_zj~Bp1B&+gq#sg0=1xI_sAuwIXXeeB&lviXbEoX# zpXu$AeVN`7-8*ypgDiy+z^e>5&P4DJB@HkmiGfbwHi-5Zb9r{r2s{y%)>6M8rjVla zqXFEuZQHx|?&WtICtS){rhXF}^9)3CrzcAipNzh(?e3R>sQ{?}KOk8hnJ_+cW~_4u z+WXxR=;UcIreM&ZGhnSD(}VmbvWH+|aC+Z)w=!qCxRs8*0h$I56euv}%*&Q9XBeQQ zqcgD$mI1{%@HFLLvX5os$~ZOl@{;Zaah-oM#B-BYGlcCn2whzz=pl@C;X%!ICJ|Dm zCF*IkU+B`5S=YUYWljlj`Tv5@r;azo_*!%V*=F>UC5iUVZ8uU z55K_&2wTTA!MRCbO~2SLL8W&N3Zr`BE$5%=Qj=x%TNZd^XZV%DtU z%t4m!7l+B{N8f00eKEYjedCqOb7rs4{NLK?|I6Cxzp!5V`)c>F|Hala%9B9Vad7Yh zR(W(G#Er~bD!mvJZSCrMBHN`S6LvhQ2K!C;Fj`cVRG=>&y);+7prWm%l{j+QEA{l} zS%@R7I;LOo*Jl=c`>h|R$qk5ylxfj%$@`&Q8@7fsvrA#mt+^lVq$S1PE)?*so(9#L ztJbD%yEXSgx?HQv4$CT@w}_6SK!Af_Wy~@2jA6oF`=U%a+}Y-Fem}nXG<+lXDz^{p z&oFr5b)>F`U``A?FD!Y(aN|O<^a1L`Ee9ls7qhZsz}XAWFVD)&t>kR3I$2ULG;q2~ z;G;;T=X|vL>IQF&bE|P+7RC3Y3##^Z>}iZRdaHxms}O4VoTKbl=I2Z_7DI2BzBUtA zMZ`x>`)d&9v)E%@Ei92~yLEYH}Ae}XS zg%{Mzz8jPF?Ax~zLV|)TN`6e-W`Fctc7h|;tH7C>KsdpE^!!=|07EmM(KJlLDolD> z1Yrmy5sZyvyWHO2!9K;~Ifa54^wpipUfc<`WKbFugQ%V$4U2C^BM*yWyB~f5$9VKr z{U_|p%*<@efsiMIM^yEf^Dz3WT1_$e*^U3lkdt$dF35y;1A`{qRf7GazhA%`CN)C9 zNg|{3WUjL_dVP_!(At2G3)}4Tw{K?`%+gij(R5N!_zWx4U{Q5IKlqg3Wsn8Hw5TbY@7UEF02k|C4&b%WZme}4+hq^#0MH?Lne8ZxA=)TjQqeSN2Z z*A#DpMk+R*Kz>3(G-$^5?oIu;09Ng5kyTv!7;(TezTm;AtHrVXVCq!3Z<+1PNkoHWD4(CxHKK*LlWhF3c^|jjXy&kS>%6KKst0~~6PoR^mQEx#1qiJ6&>xUU zpqf)?347C(A7(Ox!Jw7`hz4O=UDb^8EEp0dLk;#mJ>A3SPWD#2FMEG#0DTr)4anKtMextpIW z(ue4J>b-n$#CIPY%LNx4w*R&rJ48FNq=jMN&p4Gvy2vM)qWcJ>0^S=yvD+OM?{UrTLyiXS*wHbFCf~uGXIQ+j zT;LK8u1O2G_?_=$JMl`ykXx$qjwTizOSbhnynm$kc|WL88Bf3PA?go6t-npatvGgY zi9^y+AEiSE(N7ouM5{nk#q6Pyl7u!UXXq?UcUWD*^c2H(hcg$bE)Uc-`r|by-Y#5z zvsrz3w}i(k9v;n9@1La)YirD)ZQCqUblZJ+ zFn(v~kh@#|Z%k%c+Nq1|rd@$UQzKdHTZl-CG2h>*}MM?ZcZKriwI{N0OZ)osjsb-wzs?c z*IOT^@kuVd@vXnx95`?B~(>WsGV9OdP6lT$8S z*h%{uQ&dC46$E+FdP%7KZ1m_N^jXHe5X!lEF?{st;>e=Z)l1Q7 zR}J2pR$m!UDF1-0oJ<~0e?Esi;3FZVh4$0K_1Ia{0RIMtNJT=$mQG~tH%c`>oU&n> zWbq6(x>j(_)+?_56d9Nney^z+dH-6O()QfbOLB%>Enc=s`Kw>6R5c!0+YYNnJjfPX zM7Hgl89Wygu&i5dwKR>5#c=D~@>Lv?z*DJJ1?~k!s+7LH)d3S-5xBrbgcWDp3k!hf zT4(nO!$g)T0n_LEweDm-4kc6e136JU6|^%oEhu{mx|!QGb=x10D;?LLS$d(u#7)a* z(j3i^nko~1@7d4ufBW#ReRlAK9mw15;y$(_vx5etQZ^ZZTe-)@XFV|de=8(2b->YfcK;Nb{ zd8D5p>Kc9eh_x<;1u{dCo*%ZXox62&c-He0t?N)kw`|mk5E9jBsaU<`Sv)KUiKKk} z^LBg00l05p8Znnren8yzyakOz7R8pW{Wjgo%5Neo76BCsFUDur!mysc`qN+6i`i{x zP>>iVUh(TPv41oF+P_5Y^K+_BPB1I3G@U>~QoQ$o;>+f$jyPk1zJk=_7C;Yh-+=>m z*4D3IzN~<)H9Xs?Fr-Bl4hLa}|$B$_WZ&4<2Fnz?Kq{gPE5{-8~ z#FyNQ?>>AW!mlW=Bp0q^zLtxMx3@Q8(oDmW5TmGLbDt%hS!lD{Rw=4f=ZW>&+gkiVXJS8@~%$I8vEQde{fBv8)1ONMrOrTpmMzt`5{5ud_u z&`%vP;u&}$0ubE0a;#5Fbu=_yBcW!UF7d4S*2#=D31!WS78rLe;?}x4VQaZ{aYzyD zoaDPJf&mMJs_o(jazE;7Msw1u!daRL+d+N zI-9HZV_IKRUEO#40|r>{xn;HVB`jlVFB1#H#f3B94RV_>@weYjRtl#>x-m^s%J?1|Zz0JoG@#qn;u{V2`VTA9Is}1dyWf+X)@KqUVwZus zx}xU<(=TLk9XKIhdYew^S~IMf_+z0Z3Q|kYify7w)Bgf*|1*(U& z@8Ztx7(b`P9)Fn%zQitvVpYb$(OB+S=kGNl_5(A zry@Xh+NnZR@nTyavKO4Xg_VETuJ&kG9UCegfwAMhF}c-#*!;Vy3SF4{OT98~+&I!4 zeC@00WdR^FYmH1A*+p_8^BH8m`fIbUT(rn_#1I#KG>koaUdzwVPxS`HCz|{kByu^J z=BJ;QkaLk|#`>XO5%W_+7N_IhXkxN$A|!t(maDy<#TQc;Fl2?{!XiMe_~i^=hK^AU zQ}0Z-CNiTfZzwaGN550Sv?xM7nUesW+HD<45F_z zbcn5w?kc=*nR|iiB{OrvFamnh+-mGj{W4BDU6Zao%excfW&BV>9$7C$L~E}9yhgh2 zfF&d%MQC5=&6@|%+_(^9qNCdfk(=e7ioY@o!}TA)=_F58^db3-R|t~it>z0PdpOKO zgTbVSZsD|4e7li`$;eE}U>1Rvy2hScYooSSMbhPh3LE3Ok7|<~uYZpo;nafo_1m4A zb%pyTl#%B?8f}6y>+yqFI(L6uV<+(()r8q;n>N^h6mn4Ff_nJiK@~;CKI#z2@;l2V zF~9TE?Lqg@w$deVqP@hKMOxtQ;t~zh#E(94{>3AZ31a$jgh9t@psawsY4PnPu|s2n zh#(r6U@fE-B_GrZMP;1SZaQKBm9uc^uCp{tG!HPd_K#og_Vy@tbpryJfk!(E6$#cIO%arDD4 z*E>w*p2rwp`tilIe06UFodIR<-f61`=XaQ5YWlF-P;JARnGtdGwA2xHB|beVEraq^ z|9Pj6O;Q+&sz^;9R4wy~lA4?MyN9z}4wWdF1th?nwGPbBI$|`yHsN|>)VL9)IeEp3 zDyUzaXj3%y_z~z7X~%LO{2u8kt-~JbbO71GfEcw|j`eyBWMPwI_(Yxne+S`w6a_>< zf02P1&xLx%VOP)@rU!8dy*E8?UCv5;MvyzP4avL(B5gT!1f5qc_1E`$LGOUI#D@O~ zdb1$2Zr!5ve@b+wlepwvUOxp|Y0vp0mBc7k<0Z|?mr6O#?0)5udTlAQ%0$c-qWFTXT}Nplnczx-Gx4M7BoxY zMMfKq+d$J<_UwYlmMJBNGbdD7%dtlE%#=@fv0!qUOT~iMGE)e6 zqd(B89jx=lSK0TS!Ks( zBW*6)%630je^(yo|1Z%O8zP572e6v%F%D3 z0^bS*`nlO812*AqNJu;be(+4K|48!c!n+M?zue>RNxJsKk%Jq^)_zbB+PGuwhv$x) z_OJbL<~KS2+7F&TcUi9eK=S!;=lT!#CH~7^C@gn;+|q$~%`Pv_@=a+cbq@~@|N3>~ zDiwaGr`I7h*6`Bf%nQfH#<#1Rjj{!(j~Yaqwr;HxOK~V<&j0wzhT@Cjr{rC8(TtrW zRZp&7x$;cdMYSj*B&6we;0A@Aj*ZK9H;~L7 z#%id#QfibWasE7yS%b_;- z%FCynmrsusP#rw@tGl~4UOq}CSv4p)IE=U0vg-qTT0u>*hX(^g)CSVcOQRMZ<=?*X zh&WI7RlIxm&hNnKm5Fk$5;4gD7MYOFU%!f+Ca-nxXG>MFpP%S0ULLhrUYMSoon<&- z@ag4+2NM$$GV$i~6W6HO%e6SXnzGHcI*Qy13kp7b_`ue7=FCyY#&C1P14YBklFfNG z{a#zB#Kgn|9e%ZD7*$FJvZ!d6)K4(FFAT=-<-X?S?d{~`Bs}?zd*7++N7&gjENk&3 zeCEwl-?%Fs@y>itU~QbNw7h(p`e(a6CLvu1L$I@qHWCZiGb3gy_BS*e|`4Vr@QIuA+Fyu`^`z=YO zSTD(-cQ`LIbE?~4G`L^SY9G6sQT^OWZgZ829lLoCocMN%_2|(=wKQFMk@+jWm0LWe zE|OI3!LV*7BQwit?*8I09iXhM+n%h(m7=&CrPXt-PE=w|Q5_x}+`D`C&#tZ)^`?b|g;Z2j zzIOH_P52kt&V$#F)AaiWd zW@&{p&1Pw(-V>u_ZB0obH@tfbRf=a*qRdnDCTVv3##GKNE|yR3+`fIZy)a)p-lqS1 zyj;W^*J9<^hBTx3(Y;hu-GhSy*PC9uFE5nVi_CT2P7=%+zk01XDd_-{hW)4GH@-hU zEYY*I&}BAtWy=PIqX@pTN}8Hss>$28Y&qfn)UiLpAyab{OOj1BSTx$p%L@VHA~AzS zS4wx!*UG4?t6#eor+s9$Dosz+@Z)e}nv0W@-9S}Ww7&=&CucCz;L7si>f9I6OwE+y zVvnjxI4?NacOC3Wh!2@x34d(;=N!*bl9rN^3g*&F#iH0wKlS|F6(b{TD~;rOA~fNr$4rC2+VVYC7dv|UI|4k< z;f>jLthTm5rorzKrzvPTpA-x0=2>4zooTTs7G4;LMyNV%KZ1>iPvFVeRbL^9&yJ7t zJN(jCk?$lmzpf&)nE9GddZs8SBW2pG{R896moG7dh%|@CXe9&OSLXY%=vt?QjpyAH z6EIIs`)=R9T^S|HrKXi-8l;*$TA!?@5}`GBGWqxN5e?T*k6b3Frd*ePf9bD`@|YR< zfq1Gid7UI->jpB{+fBD9{MkNTbIzr4 ztR-hGuRpRS+dSMv-^$ABbDB-?wi6cZLfG*Lo8i7E&6{~BNc{$D$K{eBC3TJldDErZ{z-!S(IWezPygUH+;Fcr8n*<_ouVAnC!1in>b2x zc|!vd#-^YrPhw(X$Qi|b>8~Cesfm4X_pXG7#t*CqcJumt2a9fVT3T90FU^!+KQiLe ztLp1j$QeVI=IZ=KSB`jv2-+oSsBsmH-}-&Y@UHYzPF}igh9wUL9LGDG(hV_2niVWx zX%|FhTW#XJZ``FwCL$z`@PY(ee8Ak-6X9 zzRY+n&Wt9vQBGuFbhtvZoPU3&HG6h%gveqVrBj2o-jt%NOBt@SpYBmjWL6|yIDej; z(T_n?SGJ$##)#5tMOnLP;Vgq~W8F_;u&h~;Nkp8d608J*^grHN9$Q_pkdb-l+8DO1 zNKK(v8CM_1XK|x6O`>t`WQJF-#I_$kyAB^4+kfUl_IBY7Bnd8yvtwLrY`evj7hZ55 zJu10!SwHT=1DcW+wje2TeIujBR~p zw1j_qx}ik)Df4!x{)i#IE<{{0A7s(6Acvv4#DzOM%O?JyxLNYhp|ICBGtwelJ)yY?F77`ULURdGy zq3*O6dG77ow}OI#VZl#>g05b>=DxZ- zDi=L*50mL#6CvO#g!&SmgMeCbK|<4oF6k)#_Jr-v1PJ0-mJ@Al!%GC8P_VbEDDis z?U8(x;^o}ty6!T#&*>wi0g15}FTVQ0rIH>KBp#h;`-$x8%*l*Tqz6uTQGWmaJuC7c z$=P=so(~>nV+-)ezX7OoO^=mHa_g2YrQg4|BUC@!%l(QWnMgA7QAO6hQfJP1nmCDz z-=X}_($bP?SrNv|DjzvgpWK*k_~lw5{$LaPl=^wW;B>V%-AA-|1fta&tV5 zIwy_vgD3l#+4I4hB7muMm6}$}(ZwZ7(9RUkhY@hE8mu2J(QML6nRRdb-mt*foNbPP zjZOJwE909tZyGTFSIdJN^*r2$8&W>JT~=H*bq&?{dDD-M5$nk+J{XPdv(^YiD=Sm~#~TJth6QWK_Eth>I2a!X4~KjqNs>+F1O zTz!a^_9?Gf1M*E$Qly?!FSW0D1`q~@KR7seE8|uQ3Zw7O5*vrfw$Z(_WA;4SKD|>5 z0gYKwN=`0#Oe$b%G^e9%m}O{sAs`@tY=}cpP&2xkiG`(Td8P%+gIcT=(7QB%xn#xc z$&)8j{vJ!+$hBfV$fU?aHkfG+&CKJGF#vttot@()`z)@v=BDT7s*_(*RSgaa$-Vsk z7LaDR+gXmIN2>>IcbXV-j8se%t|}OrRj}l~eH#}a&!tz?%3lZsj_e^%{u`UGjCp6K z9=*0NSB6yR=${n+bRTSF zWW*@f2}wkuAa=D=7VS$!KISyZcKrSG;lqcCO7Ugoji*naE?)eV-`m@ZO`0@R8xQoC zKUT!<<+wcExV*f4?%X-RNoPM_J%1l}M4 z&dwNXKe`i#czNq5+SdVwp_y4e;=8A(Cu^kRhmH=9`Xm(umN0MO^AZxP9jnVxfMAu8 z!lb06qRUfC*qoT>GEs^{UdD~7ZHr^Y7Px?Aml&R-s;WwY!Hq{yZ~-HaP(T4VXkY)< zZWwzAj0mBiPyhNW??R2-S%#VGDL=fhqjaLHk7;EeJAV8%CK0=6$BrF-4<6W9TRUT0 z_oN={;PO3-(Y??1>tBrSRm>*Fq`kfU=FOWystSq91iKT%YG^1`DWhVMY09zaKso{+ zdKMlIHh22kw-7Mq@>L!hv6$FcH}Im!$VlXNzHE9CS7cE~aq$u|23G}@N-9=4fB)*JOYy){NMa5ohdQu|O>*Chpo@g_rm%*OXQ!yY zDkLm?_|PHXG;Zsji?xD}A3xUfSe_0!VTeUy(VAPGq>_C0_GWW1z`k#xarMERIzxkl zPRk2+P6ADW9qQ#S8CS+cM}BB#Y&m=O?9rn~kvwO{$G?`B=esRtr=?lg+D>6guwZ;K z_Ob===O*9Ympuz>V$ z48)MSxVX5YqN1v516DH+y(|JsL1E$H!-rdte5;h!wYHtofm``cU2l5y?Ab9dkWNlc z&d;Ae({gI(LibS9bK|ues`K$7uPr0nu^(?EE!i$tW^A~-nfS)%lBR+iz90$*K6}=R zrChu+o%Z6z3($4)OUlZb*!box*~Fg2hQ|6WSpY+Nos(nn=*f$JaRoEWk&a?L^4~+r zX(H2gO4e@~y^OKxa;>^q@1(l*NTeK$x2bRMCA#cZiD@JwuwlF^&+bRWAkx z25yp)g=M!Dxh)2BXeqM=J$N7uzIWrsFOQYUC~&pAckil+60rvn+w3?UB%0)8GgVd9 zYuEa48-@l33sZxJuk3riJ_fSLMK+Esg^=U{b60d;XgkKV|@{%**dL zM##li8*A(60OH%Py-ZDqetv%7yMc1;VY7&b1u79?W$g#$kz9L0z}t$vg4foqZ!$8t zQ|7@a*B%(x>S>AFw)rCvKj@Z_an+v$f&0{!?;r}|UQ<&eVAD4>+M*V#I5@rV>C-1* zbHw(=`FXpMrs^hFz(LF^63(N_BlmoLW##1BU+bR(aMsb$Nv0PR74?7^5gQweq=KAY zXUyYVh=qWcJJe2aiN~a209dcI^J*?1F92=BDpO6aNAl7wa-9bR04xylSXp{IS{5Kk z0{|E(7r&3!v<`%Cbad345=#qmLxJ0(Jy;+_!($_?$j=1@trJ!oNb0|qmA#2`!gl7N z_hsgVa9I(~m$H|FXwp{xN~=R*zxXtehGW!E(BKmJ)tvXW@dr|fV1Gm!op(8 z69$wf3{HAYO;R-^cfz{}a+AHiD9p62KYg zz%eg^593iqT<5A@oa;69^YcSWjy!p_3}eD1shFs2*A&ETcg#uZ^O!`}3B!`FgLf!j z;+Xxrf6pq~4DFChtX>XFo^`J?o*VDFRxj?i-w9g-s)Q;x0g1gROZLAv#%~f66DOj@ zd;mHq7<-a+9zJ{atRY29O;weJb;sJ{B>gy|1Uw_*w_hXO0POs{g2E$TUth{YJj4qy ze{F>)h$9lqWSP{m2(7*N_+|kdi-8)k19jb|RivB4I9x&_A~?K4PF|IY4T2VH?wn&l z55#cP3(-=X_pmOAY^#y1q3_Kksggx4_9Q5%)B&?86|0zBKV6I2Pck)DtwCIZ@>DeU z^8xs!h|A2#{A7P^ZEg3@pBp!B?E4-u+}C$azmmE(n5;zN3dvj>DF>~&@3o3Bjngy| z79?{zg$D{Zd^S0>K|)UMJMu-EcHV9}I`!Yx5(k~mtM5{Io1d?T42J;*zPsuhl#!89 z(Puf@%qtm?RQz2wxn39VLidUr4!YkVfAGXLcFmMiNS%CqjU&$qI^E&EIGPwA>D=>J zVkkSAepvaffJ#K_&yf+Zl~sgA3Pvn^s@=PhfWa~s`@$_$CwtcBSs|Lm+PNlbWr~&Y z6J~bG+3m9g)GIAUuYyw&9LPuzZ}tlqs21Tmpm5lDAv7$ktl=sxc{cIsfk|Mv2ywsK z%v6hvDi3x?m+aGXn+`IG$affX2f^RRcjJl2vAFLp4d2D1vDp3>|5K_xGND+dfW;1J)tM#u|0S^z4+A@G+BCxfN5*4i*ts%j| zan;5p5BDlnR6!i8Hs%2dY$CH7==79ZG$p}2eRz?Fu!(Iv}FUk(L*)}lwZ>kNJ*4Baut9bXJmJSdI zDlv>+PoJv!=C2LC=TKsj=9{xtMEQhSI=D5@MxqF*Z`T6)@xj=o!z}c^C7(a{B8(u%K#n1lWn0@TTcU^%FB^^$ zoGRmaSJ#5pN-TCn)q zJwTp@-rZJZldx~1GEQjX>tRTen{U6sLn7!x@EEC$uS|x-3=$MtZvj96j03o5VloJ- z*7Jc-)QMEdB6B>s6>%PrEkX|A5s%&o(D?lM^QU_5dC=fWl&E{M%Y!*=Y-}LIyWhBx z3e@qGQwQ=<8yF=0T}Wg*wrt6BnZ2Q*q2cacl%MYcS%g^D_E&xV{VS>Dg@8L_8i&EL z)KXMi()5ZEM8Y^9YTnhUSO0=nTU#N%@Ad0(OvCi}IEa`y$TX;2z3DWBz+O|ZIN~et z^^%gMsF!J?JOvPB6zPPV8AnrGYT#?g7dT|Y|NPQmJ!jK`Tud};%Gf4fFWE7aL;sMr zn%W$eBskxq9L+NGMf$9S#q&ts2yT9QZ51Pr=a;%XJm(H~Z`%=ascMx(z?oE*+Q_o* z)-7-nVY5SK>jiC3(UbqW>V18m^F~<-N5|aX@rrBP_Ke%1&IE3*qB(x9Hph5z<{$_9{OKCp#k+O&5t5%cgo z-DgXrf$Zd)-r-?W7ULsB0#<*Uoz3j4Q*~m2OJ=dpqxlpn|C8VLU%_-xnf-!QAp`gn zI~5@SnZcMR46(<_#YI9~Jlm`>b%m8`*Diev3zS?t65bMq5t7cGsp(|%6s->#Bezoyn<3*SJztd$p?#y;M<^<;xyx`B6Lq3~aB4-Xz+=k0#T78HztJM~De zQgVD=lpI>w`;k9TV?{+ArI_1t>x_VBtFK^ZuIv08saWTc^e=28$XP6E3A2*x+d(}3 zlHN-L3yZYc!ILLXLXD|7h>W}lZB~UX$h9$-PQuD6-PHxr%K9FYq=|_M2yU+Xva`Pa z3+S|9T>z-ag(f2$Y-~xnxsLeY-JJ|_GBQx?ZLO^*e*eDr@Zr?tWHNs`R50LP#GFQG zapujLPJN+9pmx1BGBaZx#n!!L(9e*`Lr={^e{Xl}_62-S(aw95G>S~{@9{;I^3u|K zh-qKHeyyxTAr4IR4D@ag69z@K`oQ(Dh=hVitsVM+ekp#C+TqXMQv_ zZKLP;s?I4{13A)VY0iq#DOdJ^<9X36A zCb}kp^q=z3lNCF>D7lK4-cTAq)uZeKTorG;Y#jFAFMxSjm>Ja?4DRdiPt(dt&CIm@`RN`=Ep92T zk;sK#zNG0EzD0ty4nr9y0-^=|wmVOColUS9OtbLEE#*(SM4|uS%TR6B%hAzL{33>> zP%~%?CkDN!dx5J^#kX%nT)8(MX*yvRMyS95 zA;EQZgSM=4&t6|U=GVT?SQ{Eti`p5Co$06P_k+qm04aHMr4&AuX5cL_;gFCy6x@j? z1h>WxLI|Fz|I;K z;Cf}WstL+T`XBEkDkl{b2z5tK{QimEP!a&pJ7D`3NG@DwSw9oZyHJ-Bvhgx#dTPhZHswb|d=LnQ~ zfa2=at6LZWD-C5HoVFX{aa)+Gj+P(OFgyR%xySZ2%z^ zt*$IiO-*4HO`t?X6qE~Z#JW~oDm4xwh(qZEdb#*1U*Y~R3u zx~l5T8QE`EHz`P#Qj?n6#Im!4-S0y&RP`eW`NLO2FX=rZcVm`a-svaFhM$65g;!o) z-dOSK3Zx-~k_jk)svSwMUX6_W$iT$II8;$q_7=rOl}3KsfvWefKGoJLky~|_Y_AnV zXu!8t_+Z6AiV3_O^61ecFwp~|?yc~995X#(2NgX?O2ulIf>Q)VcPR_Xv|>KUexWMd z=IVFX)-s4H7JBFV+mPeTs$Y6XMd=~R0#ZVq=a855qHKuz_1L+&YzN8n!2u{q%iHP- zoNWH0!PE9roA<>3)_pngo{XUYp(oBrobE3MEaro9;EM%0Xn()U*wc<-iy&}A{=xd1 z-Dgpd4!lm$f7#G5S~2n4#>e2T^>Y!eQ*1#{@SX+-&kWW|h=fNgs_6V;j2gTwWQ3YB zR_zdXqu>Yvn+h)vy9pFh@E3T!;BtF~XGe5_xLLR`lnlz24`6~b>21~<1;bjh;2#CL+Lyv_-!^fBhnBF?Ty z=1bkbPm*zq|51`mqny?lu3P_eXoyV`1;V>M`2kF^@$p2xPmKKb`^z*D`?2ewmswB3 zN`WfS2@Vd~=xS8a;%FwHrYX*kWK=Rq4mGCfO{-<$x8l*&BhZpTmnWtVI2XEOB_V@h z-6NP=XQ7sT%Bo48hw+0$aWv9=G&S+HrYpyJ$pQR}b3Xj57XhRgg zl>wx5tQ%;z$itBMAVi=v=tX((;K3BlthZ~Js_XgL+uxrF1g@3cgrPfQZHcex={xtH zgs^xaRuNnqsY*KFikTT<4BAO|{2f2EGOxlysP6@Xxz>}=?L%p3XldoccqG3oG^FY2 zStZJ4q!vMZ0$e}^G^yScGC3qZpb_Y$f58PUH>l1N{vpOZ^uV&%ClI*>PoGYMg)n!@ zSXp5ubiwvPjm{3*#e^7ZNlL!!`~)@{6e@TS?d+(l0Imqv%h~!%F0%J{c7BjosyF? z3;1Z}=6(}HiGuG=29f=H_9&ldOE5-#8N~<`JP>UWiZNpl`B5zATPzKLBN@hHg1iHG z96fRb*0!glVMxwG4B z|I$@Y_{SB}%7R5vPbBdy`K!j77!)6WYHANjU0_J((dkpF*b(^u1M7?b+52^o;=hyI z-*Et#2#O(_+W;`>!PEBF&!7JUFv={Ml(-Tv{`KUxdT;M+qCA8J4F5%M3%1WFaC?UjeaK_2W$!X`p@Nlim zmpf5Q#dhl1ij)Dgf~=ABc~cT74YXtI{8YVSU3GO79|vGm2H=YncF}C#vUYbWjGYOh zpiUGt$BrC3<~o!ZZ(v|>{rWLMw>~HX5DoL;S_aLtw=V*=!sU>7Uq(lR)EjHs03aei z!Z`;`6=Vj1QV1@v2V6z`@Ji)<0360MKd&7`Jq>(IH?0z!^80r=Sy{pi8x<85M3r!# zNph@c@fT>EH{p*1%STAOC{Min@7>#b{IVx=#CnL>zR}M)AS$XDwj%^?Mz55V6z{>3 z|5)KsU4WVSDyj=WCmA_8jf1v-aY4QtBOnf#6mQD^iGQKgO?il$+Xm%dfJ;ALU!6?j z$GF=v#3ndE+mVNJ+MUbG%caTnkJI6qchS=3AP$pl<(G>R(LuS^Y5D%G6q9WvvgM_L ztSKf3>F5SJJ1@2Yn1!5U`r2TStkw#mR&o>iCPI>Fal4 zy0T#rwCR&!JP&D@(g5{G!U-@?mspE>FZaolNef;JXQ&cT6p#c$hgYk|_8fUNK|2hPL+uaak}LTT_g@+iCB$Z-)YQ91sjq8K0WkBSu#l;N$0q>M>ErwjWUk zKZZ>nRWM9$ANpD9c@7$HtcMBxw9CwOl;80T8E@Xey`-2=bwcdiIkW1a;%fm#?PUi^ zo|hhvjF^3$WnBHCEZv>IFwd`VBguU=3ki!eR^Is410)xZ89u*mR5QQR2 z%Hy!Y1Ct3xd5!?&5NHAxFqlyw>pRc>5{3W-uz;Z19?-Y8ed>HXqeVg@7`hMvOlo34 z6x}9DS^b4)Lf|h@*^W*MF74d$mBlge#Wy9FtgWpv5;D?|;Fu&&K46850hk&pk_Y2? zEKV#rDXB8(2pz7Ivh1u1L3k=~p@Q)b6fl-?$8iKO)xSNr_Ql^`Z41ux5=L^QhIqqf*X%;lc%kIT|rKkB(1aTa-V;upSTt^i}Er-=(~~$84K}H|6HrXMfSG zJ-nIaJ*nH^!tk(vz+}VHnt>>gqN|)W~kEuZ?6)Tb9@CtL!QG}B&7kK7KNU; zAgq%@sE1x&n~aS5Z{6A`8GtE9I{}nbZGC(QKoq*$Ab!31zQNF>GK&H_gWMVMh zsB+K8M;)6QMc<#@-DrFOcb~=%2g8UEuwmijbATfl=Dc6<-rN>)TD#>X+Kqm9c#tH3 zI$@OdN9)dS(Uspj_k~NzB@9BSfjbUX9K?2z@UEVoJ$v@>7<}@9kFo9*kutE7FppS_ zAV-9e5Wx|$>|S=XO>yWIxngrd@rLx;Xv_mxjPOlJCA`C)>LNFjV6p`gKPZXX^7rpW zNIcMKp;y7CZUyZO{X!iDPD=5$8coz|w;H6F-f(zD;opEs?4q@lXKJaagksxE*tCj@ z+DnqoZ54DToqovs-`B49{{n(WnxB&=Nl-&6(|q74iLaQ<_#U&cryP2EYTRc@6)W$V z4IEX!AI&6QjaMD{yZYeg9i_I>3uUYCjVFCT0>L#KPhfJw3CYz z%0qU74pOEA=*f;Kj$#tTMpVpr!rPG{VV+lo)C&GxI5@p z9nQlXST;^45pE$mwxA?P`p15V4=A?;HIEzb6331PJ9;7;zd&=%8YPa?q!g@crh2{5D=(H_XU$YXbkXu4%)uOc%Y0L5<+L#3$Ovm zM^t2Z=LMgIgkt1ww7o@TqLgr}A+Mu4a{s}Dd?;Vj@`<6aV3~PDeJ)LEKx_6_k8INl zygqn-ynI|;fG{hez~p0UW+wgaX54*D?llS(W#;3@$3c|Uscrn6hBc^M36X`@0u_ufq z97x{FdHS>#`H8D#Pox-t39>cr{Sb@4He_i)jWQnWr>D5NC-K!l0Fadu+wReUECPkS zd{Mpg*`e(u#W2mo+z1hl|EjyevSj=&g<&I}GCn3E7fIw>ci8+9v z1VwBk6ySq6bu>TvL74sc@gvZTvAKDQ zTa(~68Cg_0P{>A5f`N;Qo0~gPq5K}*T0TfPS>r(R`F>PX2V#SYG>So+cOE?E<@502 z6R9M%G)^yU8ZXl<=$7dDGjGkk^s%j(i9p&uC>ACMMF}}sW03)adn9+-(S?LnRVjqZ zG!(ixT(v)ET*$Y3?MssIOaUn=gfq-xv^lobid#Uy34l z;}B}pr%$&uH#avnswH&~4DbU!V$Y;$W|@LKK&!>lD=#Z!Q%h~dUhQCGgX9b~9`3)lP|N6B8 zHYqM4A?mTxT3?@q3*pg02%THrY2xXA{Q||O+q-ujkpOLuAYX{>SXhhZ;Wg%$lTf`> zerr3}+1dHUp8>=qH!lwb;6zYttRMA!dvibq)C*6I5)k3|c?1^hu011F@fM%^$QZe& zc9IkXUFCC|KCn@NNoM@};+9(aGTj1IwZ~`tA1>Puo!%sS!kKilM7bW%Se)0A^U3Gc zi@vtg4$~+;dr@LwYL|BPZI)1rI#FqVU-s7Rzu+1vW}BPwys>dYe0+S7p_88N^xg-v zS%=o8#51Mn7bjY5+$3I*GOgq0BY841GRh9VJlaAm>lBAhX!n}f>3QfpOJM1hH*leO zi=`vd!(@k!MW7PcV&ub5jbbU8^2Rpexs=_K;g%ik?^gp;fk#@{ME({p^ zbGlwn z>Q!pX4IOj0UF03_ZQvCVkOJ$mV2JL7V!8)^hm zNMUeqni`?_33ONi8mOVxhkn?h1701_cF$tfotH)7F)TDEW-E7cRn2VcmFC=j{}*5=1GL z?$V5iC3i~LYJda;(d7J#DxAl}dTv}FMT2^=3J=S%EiUVRxBJf!?ZKvr6FIQ@e~*v* z+`IP!iyET<_zJB9b9;DY@wWCtzTj-&S=eb$>wnn9=;iM(50-{Fj zNY%&?|JcCepW;~=5*8+ikbnnN*VKd@lZnI*1B2V|pPxZ0vv0I5fGNZ43FpVY}yh{mow%4bMc+?xPmEeU3aG?iI+5$#TL($#mU~k@j}wP^D-yT+m6XDPfNv zTcLo1z>%2EKuukbNlHjK!uSap5FskI*-wTA_0}dtKuC}_ciFt=Ae#Von_X3gzXW1H zTd_wmZSrGPEVlU=kz#;l|yqXZ~S67zn>1pX#J8k`h*Ei$^IV`fem5VfD za|;Vw86z>(CAA3Ifx*G2oF=YhZM#MJ5_gU12-HQ3jr6E7#u4vFhxsc!kmAi}^m?70 z-3~wT)Sdv`muXG&=`X=r_?|B~oFKT3QVhsY(s|dueTyaH6HIQwWkKv*I&YOj@y^#P zZ(w+av0l7q+R3{?l;8YO=UN)tBLF#S)!Jeo66njWLAX*ViBoWToa$Oy@)cvH#C)L7 zCma}R%g=dysmSA~eCSDL2W3RHvj3&M=% zMR(f%70PPOjG;0!7#_Cagz5>h`0X=)`+5iq&CfWON0*@_(rR;{*&yY7-X3Q8GU_9y zLk%gY*`l{3Cd;Z@$hurL$IXoZ>^JdkV!R1)G$h$l~!Q6z>n z8byoeuo&Rj9S)VGCtrvB>7*1jlr->M3u{?jNd=pG%>&~#XLHsM4|BORggrLuJ z>QqCIQ$iR>mu}=1Kkyq0Up1ovwrm`egZlDzdLCl{3{!uz`W2@{;1v)~bgF@@l)5Qv zZd6KCWIh_Ic>Z$(9%0 z!k_JX%cvPYVei+!*(c_Ms;TUuqn=M(w~&*6{q{}ybd180;A0vuUn$xCwd&{!9zNVw zpMwVOC#6@AWmge!A!91itD493kP38iICa{So+7Ri;#QJ?A7o2J5g|@aIr0;> z0}8VAPW?@FBGHgx=PXWoYaT|N4bbfu2s)P%AtcFx7GI)D&iRzRoO-Kwaq%jUvNvUv z+su!BEk|XJts8~ujvqc84TOg=m%K+x7$(kxN8+)k(H8-5v-s{NDUPSX#M~5nkqgEE zB|OGlgploGrGj#X%0GNCKxW3jhY$om-=`i!6i0d(>>~P9Qwcz6`-!?-D?^j`8X$Vnl{vz_ zh`wHs5pZ(>IIJi!4>W*}9?8kGMWvZ~p`>(={((DIqE5vdap@)}Uwkf6;(mJiz^ypC z!VR~hd%40Kl*HVH_f`!oiz8jv)QZ=y91F5f+_rstMd8Lnl}hxyrncw;>DB6efq{Xi z-SqvfKb&Sn&}NLiknqbVQL-4fFo^7pgK;#y5p&^bt!Qo44s2*=%oY+ggc%a(Fm_p1 z1n%_~m zNEA)*FE=+gw5!R=$iTaZ(p-VZ>WZ+-Ou{w3_5pLl@=0z%0Rh5SkDZFbn|mmlik@;p zJt9tp^16FB$F$xQ=0fBKOtxZ#T0louSzv7JRRx7AL_RdX{{$oecEyPw&@pfidT(td zIr1;<`6sE(!Ag;zit;)0we{3ba$90OK#}|nosqoje7qhVNjCe-imxN!uUJiYb~1o_ z*pGx18J;b=__sg*vU^=&y*&Q+U;Wc7ZdyNA?zrP$Fwyh<;lIk!+YWA7uipO$FI9QI zW9{Zhq+X7Ejv7jLFf5L69yu^Z`nNvo|MZpR`L_7MmUGw3s}(A;hBfjaDlEaMFkz(- z-DgMk2oA1yfd0vMfQcV9j@H&z!c2lUrI_U-g-q&`>Vd-`Z?7&4r=hL~vZ%S}M?^Lf zl8GxXd*@*RAqt9wdIAkjjBN?VWb}@;p@@htA+{=ZGidW()I;$7S-!MirQvx-l7r!o zLDXIQh1efBm<;n*IH`mM-XKtQ9g&fyle@-2P9 zX2`&jYe%~pa5lm!HJkDP_C3hm)svxbzGE5ne+v!lAKb8E1KxV1`?M)JscU*y>$7>{ zWACW}#Fz>@Rln83J_`@cMpDvAp`=osc>SzdH~j}<+wOR8(3XDK-fT$HD4xEz@a7@u zmQ7!vhk*g14F`h*WO;6lG6G&A2B9y97JWK#vf)J10%|~#?8vo><}}#6;tv58q!B#u zEcqoA)S$)Sg+9N^aK1FDAU4Gah(cSaSfC4`Y5)}m^2Q9*1Y9B~D@!HYW}u1@5f+D^ zo#%>rSp_qbD?H-B#9}@$g~JjCDht5Vg0@kNl8UMe9K8F&*-F(^0*4Rh3Umaa`a8j! zV{iklis*v-K9<1Z5OJrzeb$>}>j^rV&6cAloQo~Cb^dYW6gnB6n1pxEA#i(B!Y}uT z$VJ%mpGrzlR&8H9uPCq-%-p88EC|Wb><8^5Ep&z>r96A|s0xJ_oWX(~*aFvi+*%N7 zDPM4s1r3+(^($AHyfC>+sG|{%_~{{LqKWehR2QON3wvy01lnhTp|LEGa8=>W z6KQ?+$Jep)WE7Jj%AwYBUgJYb0@(E;&xLM%?PG6WTH4Tf(`}<5&6PXu zZ05gV>A;@&>V0D5?Ci;~&-HUUtU0QNJBnAq(2-;)M30k?&UVhB;OIqJHgbpZCuUsC z2P=zRI_COIWvZ$a0AzM_`T$j+PKEP!#K^U@T42H=z{rIQZ3Ni22fPoJiTkDq@j`{% zYOG!O>S>HA4*oK3&9!>raZAh&+zakAtb3x;h9c3)P#Km$P|EAjEW~`Eh#oNm0#+u! zl%mP|K>G>R3+V}!`kn+>_BDy(eE@#WU+Z02omv%rra{3^5y<(W7( zQhSGI9Qkxv9cQZCs@8JZ)@hL(;@ht9X0aFy9gT5lVCQ#VnuA^I%C&1lr{C?CYT0ym zDlj86Q#qJu8WZzrUHupn7iWrv&;nJ%n-ZFZQp9c(Q`6=+*?o+kqC8d-k0~G7gSA&< zHh96_K6~mE8`}_S@p`Vmy@%-g3^m!cauhU+;~>wPIGYWO;{_4PlQ9Nnd(w&%w8mz1~l^+_7Hh>y+Q z+)!}&^Yy7aiXT>|p=Ckcg9!x(Hi@n-*&rz`?0D@}bL#yipw|~~KH;#)eymAgOgO=n z8XouEP)<^oEHCnG#VTd-BJhi5US@Pk=9x?6a4MQJegcpI>Hy?`8zjhktG5Ay9FWeV z8+|`3-oJl=`YraPX|Li+I?`*6R-X1j1_t0GkNJtKXr}`jMN!uPsv{iCNk&0yA*!p- zl^qrOZ4?xf)6;ggw#qct>`8EX`*X6a+CgZ* zEVmGccBPJ4N*ytOs#E_;V-i$?K;mek^P+_O0$L2UHw&*fewk0Lp$27*P<$oy3Ni9} z;Xo$Ed$!8tUBkmJ*i%?x+Bm6B$^@FZ>&y?MHR}R|Y}qK0LQB#{f1+SuT6Zx;;f2D* zVG~gELqP}?YN+3Rdh5{zAn29Ofp0<-OzAq-Pf?x&!rYhxm z)E&Wh9CR+_3j7s)T^_cNkzzyARSo#^;UK06%0tJF$#mR&qR{-klTO$8wV}#bpu01o^k7 zwY5MwQ4uB_4IKFgcB{?Vf&2rw8f*8ESplL6(eu7I$_FcaZ}F)Z0SzooEZfgm4=9)y z0FS|%qD-C+lw~s+U#9r*B6S#W&|EekcYgk;Jg-5Ks&bqep%XIEmrVAu)0s|9F>A zglC^4Sq*srL!Nf3tGR^*+AEZ^w!*NE8w45IB?g-|1HWY_GOZYKz!#E|Mo(6SUHS`! zBWS>S4PQ4HDw|5uH+0Af{7yocg0;aHl8g1vAaC!_o*PKPO>l(ZP8`{3Qp1#3aOJN_ zyK@ld;XrM~MO!=MY}ku9{t-WEN$2wQry2w{Tk4#6UcJv^3jLm27}48J>PDt0hP?8q z^a@e0L-K|PWe%ql>=c>1jLlZYDjFId?t!*rJp1_Mq*9v=c~uZXJz?=hE;lV5iHTui z^ooek+0YM@r!`nb&EYqoH?aS_Y?Vdp=4njE^z5vf&UKY%Le5i!c^Sx@hK2@&hG5=9 zHXrsMIH2;hnhgg@GD3`)Pmzw4`ta9$8RLRmy2t?H`vkBxR@^SDFFK#I+_ z&bJ1bu8F{)plL)eV9D<|+MurPiQSonm$zeXBQU|(fdQXISpr=k3BR(eK(!GAWFrJs z%xmbMvm+x?i6J#ArYs>;{*)zM2Kqp9iy7OGQYx}`AT$vR2(btw5HTP4`l2c`>_VX( z1#re9_skJG1)_N>+Hiou=|%o%D=n4mvCC3H=wP$fVYneDizAMRjaE|9mvT_`OG*gC zKW1ka>D=PGf#n+r^3Esm6~a49L(0)P1K7l3TXi<22gbj$z>7xddpIK2Uu5A(rDzSd%RfTF z=DTY^?Cocg)N`A8oX?dWrZs6$#A!?bmk>#(4_w}I;TGu~+2%KkSXN07cEgH+75=B! z*DR z7NXWYKAQ6&UEY+xe*JQaRIyG?y3=?!e9{-HDuA#zCB%lZjEy-zTWZEr*|+i;UGjPV z`nac=f3?XhD;aBcyxf}TPwFCE*}0sJJPtXzkH6vT|W4In!lGC}QdhRPt|?%c*Dhfp6G6a>xA z1z2UO;9@JTnqD>JFA!Pi76)<%`dJ8kVBX>JrRFs+YizQG}c8|r4 zf-wK{!h4;W$s;XY4uJ>WXHi5!C|w$_FW=;OEbpt$$pBX?LG)nRJoeDvAHM&e7;s=W z=0L)+q=u>iWYNAn(crEHC>p7{g<&0+C@3Dhdv|7V8dTODE!l}U{DEb?tWs8HTK43q z6X(%mCTc1lhd)+myoLe`U6BW_FHZ}BTPVm>l@D zki4-$h;!diMM1$kyvTD284zdTEMihoch1hvMvkQCw|t(tQ|ShLq zJgAbOaF#q>|Kn!lhTXltn@l5;Rg#0(00KXYb9AZI^* z^yp8oi?XsDUPWu4IkQEXZi^rI&lX0Q%T&qT*6!JJ_rNmerF*ajAfK;wkq{NFIe} zyI3OVLa~G|T9>u@uZxhHQ|*U68Pp4{8hZt86JQ|W{Ohug6eqpKUR2B@JK*Ft6eS9g zVv>_X*8jBqKCXCPTzo4dVszYt%YXgWJA2Cx%pKz<_I0z4=Ru_6gtfs26M9R&b_N$o zr;c%c=|IAzXu{coHHrHjWcri1#FoJF$#<^_P;ysxVZZQ@*krPgXQQ&V+sPOtr`XKSXL z%=O5750{RAUK5(fqcWUF3w?E6?*1~#U)Qln&WvU1y!;TeZS60fJACV0`vLOK-^Ca~ zX-jw-+)?gDtOR4r&ddairV>Nj+&E}RwaWUcB5|sjIm#wRo~KR7aoFm~H1I<>J3FI9 z%fieItEf44wZ(M7nkIC{%Hi)1f8bju0Zy**0XW6jE5A@UrvCae48P3|>#ZA)STS`( z|2D?OixR*(-)S|6D|=tp z``qt)Pw(+u$MZZL$9>&6>V>-YN(=Xrk5?|uq_*3#)SW&kOeMK2l~7sNpw4^&N7 zQd&y)W?uE~gDpIsQ(_(aEuE}rjm zQ|h_(&k0R7tLmw2c1|M>@TE83;>nqH~KMpx zg(z0%rN4Y>F)$~S>XQKB?BqmQJI$=9q@?82r$t|HSk1KbX)SS8qNZ0Jx^g;Iw3wQC z9wn^ih>O6{rK8VP7k2-Bq5f)##xb5BB?pte-Nrf%8!=);nj(Wn!p6!?NqEEXa+G9D zI|T6BFt^Es>_B)6S_9lT0NK(b-2(h#OXxpq+fjpa8a5!$2C$_nC>^aL(I}w<#^gH# z0}!$bI0$b}_-#?9K{}AMGAYt237p$vwZ5JCY56zadtF@})5bBRY}Owf z>SL!MB`v6_s$OAQfAz+DNP~E1kv8WghKW25?%SPv_ehP-5as##`5a&ds-PF~{BPis zBn|ZF+YjH+dGuVHy#oEsO(*a}Rp{=P0!8|5>p+yT{VVssDNE2c<|95u#_*$U;xh^dI*7=1opbQU-@qunCDj@<^K?-QMc{7UVz1FYzr7hZZ z69_7q5X)a4`VEHYAHG~h4auj-kuAmM9^4da_wK!W@9h(eqi=D+5p-Bk&;s(DogcHa z?~bNVTCMIB&;2w#JAZKUC`wZ3uyqC3lFS|Pk>lJV?|6$=f`MhG6{^Vm)|>N3xGN8` zS~DWn&;p8yOn;42!LeM;=rWA}Rr!#iLz5fooe^OoQRF5-=g6uc8zp zJ(ntkE`mdZ@Y+lvhK`V!0dD1sd++7Tz>8S*`)HY@78E2yt;^gYvsz1mAJ;Je6l~7y z&M$G{!<*N7&X6C0@!(#R4(yolJ9ccUHn3R|afFA6>_evDCKL2oals4D2ZxkD1s7D7 z^iEn<#4qjAtAngewd!!30{w4fQNtt2ScU$4b<|?Cw7bkjG1l2RoCBR zCo-Jl?oIOp=bX`$T-V$B=Z%(_Vu0>veCw>Mt4kXb7Y~g7m4cj}yR+hC2C@*Fl)io~ zd_Op2Vb9M3q!3g1oE#}hc=Vc`J@^A-bQLl;MH~pGIXPXCot`>vT3vCdKkOELFM`o? zV_t#|J$f`lyGy35tzRnHgryh!F=l!ZMjA||8l!^bIPhJXeq+%hQVlVQN(2k`B9as8 zu3o;3e1C$OK(JuKy|qk)U)aI{rW&2;>eZ;cG2CUv$D#LyUWP*G#0)WNRm0Ehx!`Aq z+2k63@&8HkHk4kBcO9|Jw-0Qs82}$k7$_`PtXkEtvj?_^gaBOI=W!>74Kp^Iduu}f z>VT+MPa?kBzFo_&gg?)?gZqI6uYTb|^H?kC_s8P>pqAi2F&+@PC9qsOXqaKdP^a%@ z7Ds@sl7sg4xA6(PKWs7g>g`)&C{TJ}QC*R1@H|PMys?E|N_lzVH0h*Mdt(bA)-3SF zQ7iU292Zwf2TXWIz7d1PcBVB20?s8r2#TgBPoK`tF(!Od5rxe1|Adu^_p#&0 z4Q9PNdhOm}Oeu#Tx1$sQ`vAzy+C< zmGI=-Ys0NiW1UIiLFVY(eC9=Ci`sQCH>+1`K1y#P(MDNW%lje3Sv#+vn(|Zd{rgih z#fw#zg|*!#b4QdzU@pNxY)-!&yC+P)b=o8x{ZOhXZ)FP0mJtus`n3*LpV?#=Cre^A zE3erUD=X;K*J6NFMP(k>lk&#d!NEApND2+nzyDh5QdFLl0gEmy7Y!DN6)qM%H^CKm z5j);Ec<0HjZ6v*aL$ywc0OWVfa_7X;MmVC+9^hk7o9ObrWTWl&g+cmlrIYOJ>~81; z1qLo3ay(Ya+=O3QJ|;Mw}Iv{Xp&lg|=VAAr(m=dk3nMGP=(fV-=+vEw4~e zCl1ct8E@F!#s1yv*X0B&6cBL}>bOs-S&#B+ois3 zq6~?@saelj7{L7yZ>`;$FFw*j@=-K7bAnU3?QoNzXE;;HXoCt*6ILl)wsU2%vO5mf z#uI|wrrFxa5kX^sS0dxI!V<^4g(TpuRc>rCpQmW@iKAos32R1>O=TIUwKU3n_>du9 zDa#WY3eC?g9GMwkv+cK)-`Puby%O*B!m8d8uX!k_~sBs zqkuCagICIXBYdeGD~b-8*Kl{ib%dVC@lQ!Wzd7TaI5#zIKgitqxd`v6y993d_z_sHC-Dm7aNPZoryEah^ljN*a^)F^QJk;dy&-;N36_2l0L4?6UDaBB8MnaM{R%FwngzqnC}M1T zao2Zu38t0>F+3C9Gq|v{22rC@Lv_D&@}a>%kv&&PB!)skjqddm<$*9VZq@2gj}Jmq zC`v7>3w{9(?OKq;(v0Jw>%=xWudI{Y%HDHf14o?WR6rRofVfh?3ZTdo}#Lz-! zp5}Gx)HOzr`Ad+iPE*TTGxb&oL)aA6{@&h&Wo5RjSC3>S6Rk4kE)9l;pO)pdMA>PD zcI}SlLjb`XP0jN`)Tb5dyblv!%517zsweQZj>3r_Jue*CvqIt`TwZw*UuI+dg;euI3qmD*ZMhi!uBGWa93I&m9pzM}J6Y{RYl|~KJsV2%Q9N0EL3FFe@ef31 zsu8Y_;55K_=ObeXpA)PyVBxX4!Mk&HD|y@clO~~IG_3pL!-vO0712p!SmND~NW8tQ zBt91EO|iHM3Ip~03ql2GJ@Euu_&Z5f<_^wKj|N!gPMyn+0^wpq8%Y%b^6Qn_L~r1U zlP6(X7=y3jFd{>W;63seG8lu#>I*a$p@rosi{iddVrW-r`N$g^zME&+f+=V^^9jCzwl z7qS#k6vR$e&xD-p07KFuI+#R4E~06wE>3?hhB2>fcFt>Gem4ZjFqy$t9+yF#iUAFG z$(uJ=6n-WIPU|h?Ydkqj>`@AlxH z#ef0lh%w0R#sG0I2wo}Cdyiy)D;J9z6p@pm>LHjA^iyIl8rR5&I*N+YI<(?L&KFTE z^SG{F73kQ5Bbw=iG+zI;4IM2{(RUc38!Vn+F=x-aA2Iysa`R6IF3`*}y4p&nMCcKOI_!B_$>bIb;*`M;5540769T3TvejloeJVuVOf zY@lph)6l3^lEj|8Ar&y}cODwXNQW)m=-QZnxRsl0F07wfgrm*wMSwX}F zsv`ubP!wlhbgJFautxZ>=;y!nT7N;eZF>BB+Na`gnu2S@h z6_A`ac~>ArIYa}1H6bW1D>59`X`L05B@gDsjB0f(d-^4zLg@t+bX|ljHWyR5bzU}_&Q^Y5e z_(ITqu#Ni8kRA^a;ha}fnz#D#Q4V`X8kJ5WPm}E7M0#dUgz3o7&&P{n*6H7V{5`(M zb!`{%J#**GLA(Vl5P>_HEo2fYPVD=$xB8(+cA=bGOSan15u{Qi-+u@3VDyH%BQ`$1 zCnl0yYKX|c-@pv!LP+!Yp`+CTvt$UhiuwCP4+^Qd7~aD&q$Bh8K4T9TnjMZhKK zy#0jJ2UYopzBK%+x^PeF-mTk0R1E0mNZ&75GpGOpy%ijqRBe-e{xnGk+$Ob_M;dqj z{F7-%CmgVl9~-0o%Kpvn$=PV|<gsR(Y_9>h3$PZuiSmQf`}D(%rQC*Q z#7&9+!8)b{tm9J%Abx3Cng8L#L0hX*dDmzZi6Qi|0FR`?i;%-~1{;`$6}ZD#Q1v8q zCG-f5h(4GD=esL-2!lsAEX1TE9r?xtKKktZ{CXggZ6LqISP(h{mD5(l0pkobyP!UH ztcAy0+H|08P&UD+1BE^Idv<1j9};&mbQ~}-4KDH~UJOx80GO1CLiawTNrgTtP+%F~ z>edpC>ooPTBVVEy;zthqZcO+_ZqKbKJo6|;Vw7k#(n+mr*U#<-olWoby)hVbIOt0d zvlcA1Y2MrJ$<_} zbL!OjNlu%Qn^NENjjLC#JbL_iSLP7AbP>8xZi+!GU$848TuNa%eI*^|)9mc8RJ>@K zuR#?7JFjGmTwchq@SxN1M4=%eRVA5g2(3V4GIuzZ?M$kplE|fVPYv~dB`eMu7!NI~*QMXf_Ls#%pS(WM#!u(>)vY^U$GU z1zsic13U%siK?tXXjn(nu;bPOhRJ%4OQiP$9YI#05s*%Tr{Ajm`n7@>z(i}wQerEG zEe2F$A;FBrdNA;Gv1owJq!q`y;2wian`9;Wx6X<$hX)&UZ~L9$E}1*3(y6BU3L-H9 zj8(!IQKI|C%L9+zDUY-^_}5ME^QFAptA}^To;`N}M4_qtLIKLbOXicnFxfaOs?PU zsNV(*mpeIy(HRIuKp;goS)aqj=QU@PbpG?Su@E?tGWfBN+pEu1Kh#dzQ;duKU+cvfpY7N!f;N;A zlrP2x>DWXx6HoE@kjaNPWnN06-+~WeNy&SBKh))lJ4S zYQ%78VSY2?-1oAC)B%0^=qns@)<0gdXVhB5!=qGHndgd$`7CCyzP@RXaEBW}q#SPb z=l0vSSx*2L`y5tI+%#$XgRy5SthZD( z)Y+e0IKU@m`7`T7GAmwM&B?HNXkNwwfY3fsV#oz;7$I>C0WwH#VoHbgh?gwn)owt< zG4&C!sW@}tl7`a%c%2o|-A!dv%s-Edf4`ebI5HbDddy#1fO&ggQA;7Y`y*UX4G3VV zB~4yN8-LSvoOFBvK@u+?tR3b$?@STE7auVd6>zC}{EVcSnWuX8O)l2rvlYYa98Fgx zeu8Q7@f;|s3E|-V(}2d(#MXHFb4xDRGzHvpp9{!w3Vw9Ix*n{0=g<;Z@!w3Gn`*ad z*KS^9ADe+%I$r)%%B{sBmB4vDI(7^k6R{QfPOHpO#58gz@Iz3niurqyd<06LISOWS zZt2UkG+Xj(L~pnu5}iuJ$MJH;-(|Rm!OkEGNP-PWBXZeigeFvM%8HZuRyY9O3`Cao z+O;Q~>tH4yB3RZPo*!>(i2@2Bt=qV*^9=*2sD#b|B9PHD7>@{VRN9x>Q4*d5O95~} z7S4b8P*ms5?Ouk?>PZ+8;}fW>%nJ_T&`HflYiVX~&KSkqu6x46R|5d^aRlG#11L_Y zJo=!JzvigQgCcRwMvNTUN=hh|YQOCu!=1W{G-y3~O?GZBXx9!tfYezhPn<}k3^-lc z$3T8A6r{^-E6=9|GSll!KAdG}=#}q#{CG;?#^Q8HD^lzK$(zu$bIaD;Ywozl8{h?Y|+@iWFr`7v9u2{lgunCiN+y( z*vjDDxh0pvb)O%4eoR5iya)UZN&vF@V06?xJ$dO9yoE#0Vp%Pp2Tac~@Z_e1*q8uC zQNw#4_;8!o(U%q4vDYL;FSFCT*0wu6b!b&yc$v~L@1(DDx9yflCc8E9%-53+J%!8O zwPjD*7RP9k_aEQC4|Xhca}SO}MQjufSJRKr37y$Ju9gu1DpQQnP}r1U>u&s&sjHPM zRu^uNl7&&#!-rcxzjnjT3n-6R5OHO2 zL_0sHW!<3(fzU{KeObARkNDC%9!O-xq6QK@&j%tv+oT`kJp2wuI@qNEt1)$9NJV`j_AhXsS>uUcZolaT+@Kaaotr@#jR zYZ!%bUNh|#BpxSXLWfp#-?_a@-Ny`j1>dC=Ef(wLS4S&1RZaR$cDK!cX~OM4_b&c- zdbX$bTx;rZk@SP+2RRYgVkj|!`$DjWI}K%##jBR-s7mFs)a$)68{4Pe3un(-e|ACq z0L0}AOTY{e8(?23|JqK{KwTnc?B|VR?v$n+IJKfvX+u{2$$OJc%64>XXt%3rVEATYD>e0!w9d$~5gU2Rrt_(eTM9pUEX#+zoW$)2pleIo2 z>}nm^CNSXFhl5TO^nAbJy>9Z74eOQOT`#T4TK~BE#FtkUA6s9mIaSsO+{N8K*K|K2 z{Pw+j?D$B6Mg`$F7MoQd$q>moay{7{wL*X=-@niJXc}c+_~FC!>++x0+qNu=Et`zh zD-4F>z_dW@)w`LQxfyRh`eYyVVvy5wnLo+D+r{F1smrhUK?Khs@kV_(2bP)A);h7V z^IB~Gp|*oE%`^_7R16ds3qFAN<`A=Sg?c-1#@-FciBtUP5u~<<)HMeW7HWEGU3{R? zg)p;0FNmLcbn#lUAU=gmbcv}6dI(1BUZZoNPo?4)wj*no;OI&irSN@7YR*rrnLBGN z3pGbL?oT1(0)C>K83E++Wg?ziHK-i;TZRiO-m+>+ERqK-1QphSG3D;j(PhjZ^}zgo z?@D4ce+DPd5-nm_7;ZO^1-`>pmmi#I;;5D$b#cU|oZiOpOsG~5dU*x19m;7NxECU4 z*s%Gy&wH#>kYCt&7fM~0(T1=>IUU3tMjUyNudeO7+~7Ik@NUyB_p9m{DtyMu8=V`L z3D06Jyv{IUBT51VTrP8{)fn@F*x~EXKiNgG+s|?xZyGhZmUjg3F}RYT7zE*xcB;FQ z(&GH-US~MvU@mBwMvNYf*h_59j?NOkjWTzTHyWW@Cf?9qP@aSY0ekgz1!tZ=xjaY{)2H4pj zUDHG|eQkqx_S2{58oDZs8FckiPTJV&g-i#4fkDlSxkx@rAP90%4`~c>EH(N2N855KcCHjqENn+Q zQMf%6J9t1MC_#|7?ifPwzDg@OR(ydt0XAGc@eb2TfW$71YgOnM8`rA9;tKy^(pJ9X z`;#SO#pC481g96@rP{^~gWDy&4K+v;BMeID;-M-QIG$qr0s8~KZ+`G#rZZCEiX+iS>*Jh`oA@+<5!w8a#Gf_IL(~h4bGM#~W2=<9$xCPJvj@K$`x69>Qsp zSAk=S4Ma9?z=HmK`}X>6X-3#f@$%oFa-JzxtKgf^g*`9AWH>$WGaxVshGxT;ygPSR z!12%&KP#;iyB;S$V7wr;z1Xe7sx%fnzP!BQR;+1{fe->#x$F(;aB^lA%bWIwj-L*t z%!(RrN}n0NXP#QQDye#|gwCR_%q+GOGA%!*9ZguS!j-}$sl3x*;)bxcX1NLj;OYjM z&RT17=L7hxk-3YNF7c)cPdP0>A+wGRI?aK8?k}J7cG;LyDf(T*;PUEfpMvIMFphfq zd(C@)0c`-h05yo^pY<;c&8T0gQT=OFk{0=&II(cu8wL*dYV+-5Q3mq(wJ(9kya`F; zLh(i13eg7OvbVDvv-RtF`GOVxwYBsV2Cg0@%nDsl>NRN4lcmmRskxAaNk0~Z_U~~V zG8pXfIQ7Wd=q|l_1vfS%f-|o$P2(33&_tWCnrOXC@sa{g+L!$-ew5g--5m) zO{GVhxQsd%nElf5dD?nhfrl^J%YK#VYrzboLz|WKaBe^1p$<&uFY>RxeOICBw(&uhJ11)+F4RzH6}mSm{6q zvw0Zw-cfOMd`ez14qne5Zf4rxTKN&-8qT>9uFITL?^t4Vl9CWBUCOR!qucQ+-*Mkq zuJFzVvgINxGvFx{ETy64{DL7YNc(Aji(&kJp#t2DC2w`~-z1PB$9O_S;W43HI6c{5-t%){3W7 zfM?5n*pjh$(EaATNA_VlLL|KVNTbI7s%+3?`avN$RuD`$>%3+vyh65yHk`uB-=DF! z`@9wK1wNPUDBLI%u{2?Go$6R8I}}$$!18j69WV8fqefjTPwfYhrE9?)Zgx)2NSt%N zT`7M>9X6<7zOk_&sYgy^xn2LO#-Vq@xA1{-mb|<=#+ko_{^t_ln~rse+wR>+6te9y z5V>h3-^M6Y{3H@#vVMB{CXkzu;8~HMjjL@?0Q@q3nJDe39{4PQq#vUkUsQCv;$?71 z$YVd1TH_2Vb)6T9=_>Q#_>CS)JhtYM`-pKD@1AR}r+KrgbJmttaTCX`T4v+3 zSi}g$^7A{+YFJgYus&vyJo!#R!485rtvr`t6<{-XDIyO);1`;6qIpe0%DY95h29*F zsCjFAXAA;!;Qb1Y)9T z+Cc1#KIO%iQ8!U^KL}A4?q>;dcM?)w;b73Kd za}S!#ATn~BKjp2YJ|MJ~cL(-GG9!*|T}APim-Yq6EgxiM*#nw!kCN8E+DX*68b%jP zIBwUbP5-(A`5khJxKP@)n@-3J%`TU)FE8YPE^_`D2R~(8cKq}8uWG-zTsU@PNdrze z8VYpZxl5DRtk+=e`e-m4{h+Rh3v9CFUA12KDc3(6P4%kace5Q`R6o41IE%*iaq|g_ z=o_a619ipW^HN9+ssL_@_0`4>wq%@Gk)oiWFeqx8^;LW|>KV<1P!U#JpWeKgYY{4+ zi;*Zx|4@Q}UgU6EHLWUlO>`3flj$InM+2jg&;OABgXF)m%Jg5ozI0Y^gE=-?jjwZY zr@t(1?)>`Sd+FWQT$KdqPwwV#me*SnCSBs}vF2(s=g?CZV=hfQuM(sy8Ew2^yj5pF z5}kej_qkaAw0}44_Xrs17Zzy2OkoOH_71V2ZcuGwd59rC{OA|7j{9h=vSR#odwHLF zz3H!igy{%hN?5xM8$OeU#=;0vl;kPPzahYQf1HKh*v)h*)%niQdCn-4u|W3u(D$VS zK1yv{Otdj=Y>+dR*uzU@a*b~sb#fiSSL`VJeg+p6fclIrjY~+3yB-M3hy~kaSrMwi zKUn~-*t+$_NIQ9+mAEZ!F~u`AHPsxYF(-a^TQza8&5p0bSXdY-AeE-bq?pB7MBus% zV@)1v;I$p81Fd^+>aO(ki=g5RkqRd*M?YdMbA}LOR&nM@iwcOoXqK7Wcz*BRlyyp~ zs^+Y?<}Yfg5zx^~y?38JG##U%N5+pYz~`3CL-kDJimO+bA5vpim!Nm_HOsKHq8VpM zu~qx__Uq4E*FL1pVq|0k3SyeM;$mj{8J%z-ks>Q6fEdF^N^wt9t zmDpRTdzpm)*P_kOB%0DnTtoN**l$4QM&Y-7Srg?$>Z{q91*N7U6Ql_>DgmGVi7%=b zxYOq+tt*VZZ>wE9wr^(^QWXD?`121&=4j`rqJFX>5a z62$F2mOa9W%r534Ob5GIV6EJW_l>{c!;}=P;vSTVu2_&Q@|O}z(*A6W@srJ9pWznH>SOt`j0m68-*&zr_A|s0mGKE@Z>lx!( zf+kJNcv4zPE`8puwK&HvI#bK6?_W$CHyVEn>22g1jMOl}5Q}pGAk@|J&HBI)Zb~7J zT~+$`@)C{BFt+V^D%~75O*oN6&FjmP@7ouc;4-P2yGVmm0_{C{g>krxVV8f~A32}j z(}l{y*(K=V$uUVc?hcjcos@=Vwx1q#sVd3O$$iD@&* z{GhunOuP;6NZLs<-8v|TDKyw-G}~L#0RZkeTTz)TBNnkI@?Bw}$NVQ>9w!I+d}XfE$BtpksGm*(H|=bu+y z8$51Yeqat|?k}#)qFnq|CzU|6cP)Na&E4&bRHM=}@{5e-0FBtb%yN^8s-FUM)P`tlrHl|rihvghbcmNy~z z+q!%URyW|IVlbhDtV^2~HL>!Sl)ZC`vGoiD?2M>(z;u~XsG9zaBfla~RLlMQl8>oNZ*Z9&;(_ZDs+*%4#(LjV1IZq&GeR)?az4voi+kV!(ie8+;Q%Du$Pa z`lu$M3svnfRUH3>%4FRk6Rm(=2t`0}1sAt=?O8?{fx|(0Kn9s_g~J)jNGu?^5Wi^Y zHf{@T*zFQD93_t!^Pu~v<-oE6uVKW9BSTNG1o%S9hR0hHRxYq}D2RLY) z#^0PHDqfBPWwMZxkjFuEX0&CYDg|)@(UXuzHY3fvd6Q0*!8pwDd6SrHE*|^f7LhFQ z<75s1$KofaZ}F_Cf!UJSxog+sCr?JD7oQ!|==fJCcB+(kyT2(+GihQ}?fOyk+{ca| zPC7lln>*l!`M!L~2P2#B0kfYJwapmxe?l>Nz@@Q<(CG1F8@kb$|IDtDxdvXwc{=j5 zCdqdF@70B;mf8F)$p~|QGn9%`(%vHb)a%><6S`(>8vcAstLK74^0zMRyML#?ZNTq? zHHTYdOC&w!8%&yD{6oa|Uwp~`&HDIXv1jG|{JiGbS1~`YyOe{D=+@Tr4V_1CV+2qp_U?)K0$wnO?(OT>y=-%?Y>u26%5DzDHf@f? zU%q-(Ec_EnCa#IP!JKg8kWTDXG1-2JMZRO%=L2~~eKqK#=ia^jG&CG|#{LekTRHC4 z4{Fu6EigX`jlrz;?c3|>3|IB!14W*)W%3=ZmtICW40aTw2j zJ8F&(aYR(vs?X<(tt4U77!0!+nTQzfdCPA9K*HHW(rSc}X@~Xm?<_s-;el?okOxf~ zR&3XzMx;><24la1eoB zpjdnivzFrgsBMoim%Uy`#tdrxKd}b}gXNdRxD}U#4smW|CXPasu(S@J(C;FrgrO5F za|~O)P5EVo=?w?=iS@q(2F7JG902`1z}11a@WD&xx+!(X>UIV^s7ouA9=vuKI4UTv_{odGl`` zZ6pmVuDMi9WX!ASg6KO%Z6ysR%fyndX5BK=fDFYZi{IOJl7VC1zH^6R&a>$6ldAJO z$%NYn*c()?O4D>?Wnu?5EcP(#jQgprfzd44MG4OVY=yBbvw3}$xl50!) zQSX)x%px{PZ_{@6zl1&g8jxL%u!+_+)z%l+|6PrKi7Q&W@S8k2NH+1NQf}RPLkW*! zU`W(uoHj1wnk02CZZ1}f(0Z}g0XTmrL{J_>+0Paasvwkn*wot_uZw@DWL=BAD$;nX zj>^g#EcWy|!|l0mY3Oyt%j?4Ol#Wu@8;cM2lk;EKRmKD^^`Ib*@}{MUi3|8T*dQwY@$7mK zb8H*s(2CyJDc6@k7|GW7*3{MtMw(BUj^v4T9I!YDEoyAgjE(uy)(Q#~mcmNMpVRN- z^Zw(l1&z6ngp6G@}-kCp_aUcE$mw zW`~;B>KnSXBs{?N}BN^k>YPWy?|K&S91K2eN^D{m4wr?6T;N=0s-lM}8wWtwfFY zP_3x47QBp(hNSp>ZHT?JG=DKaSl;r=(gbw60`yT+TkvVo8mE)qk9t&j#_d);;@0Ga{=WQ6 z%OvrWPj*dea&_|cCU>T>v>3PDd6CKjWLtz_g}6z#+fZMfOefYao-Ln;2LZ&c0OdC4) zA{V>vRK&OflQo|X1Z*0oLE%|D-L!vXSeUTpRQ?zjl4X|jVM)P!=dcN8U9Q{QEBbzZ zu#0KnV-}uR9G3JR+NBM*x1FM*SW3uKP&Y_TOS8n_0A(u@N#M1@l{`Z#k6cQSZ-pQ{ zYMnb*U`68lcoVq_eGciuw?V~v4hz1vUd2(=kI_`jFU-xI=vNuDY1zCv*r=~L_L~DV zG>RYqlT7vb<`*IIm)-v4#f~e={MPbY-q}wK>{q{oct?Jy$x5zQM!?arsDWb3;|9t9a=CIlGWRgb$-YD*cyxwpVJsqo{+ zlfJ%Aj1eW|&}j3qYXy6FXoUiNfw!GUR%-PL$@X^k9-6akhzn8kI&k( z_DR4Ew#i9dzd|<7Q0r}=rKROH{z1=u`a$1TSX-A6w(CD1*l}$9t%ZGAyKJHGl$sV) z#Mjnm$4v&bb7Ffl!mY5Re%Qu@l8+W~@9Lk7j64$?TLJ6J9zH}ly4}0gm#yk#@$`0H zo-=75$8sE^CQY_E`(bm{laU`!w^*@660Nc?zkSoD4uvJzMQyW3{?txm!Mb(llmdkg zI}c7y)Ae9aqs}t+HJB)TW(plu(5@RwxHIHx7(Bx_W-zQM>t179w2to16>Ht5O&bM; z^V#Rpi(Qq_#g_ZD*!7B>!H^a$k?+t|Gx2J`vG*$|GKzv5-@=@nO`{UW+dbA|cWoYT zkqH#kTAR}KuLLH9o^mRQYlsN*{O6N#X<5bgsa>x3Grfn{|8dNHjU#M3oTaej+DfnK z`Mt`NWe?%DK}Gl^ztaP}otpRZC26o&=1%R7;%+l#h0X$pk42&=8@H|ha6>Qk=y%@% zn;$Gd+{>0o>o_(9?_o%t(Hy!}t>mMrGcDyk+m8GWx!I}N{ik!S!YOfO{*XwWX@2$lQrNKh-I z)&}GkB4Z8%|4!IoiTE{SGfYU|PaFJvqEpg#xD_N3Vs5lJzO7@PH*Nuvt2M^Y;3|OTt*_#PGCfVGS5aXahy2S-^ zQzF-co#OkxU7>egYXejnUJN*(fpG|(Enb#S*_zRII zpDIVDrY>5=Gwxw+ga>lVyG0fsyIhal3x0F`@n?6%Bad*tRM^0r_uh{Lf0b&rBAVM# z_MiGUJQDRciUQ;VLS~nY%9OeeH5$9K#>d`V1H<;cf|U}YVIYzc9sGx__Np0p&zmC9 zO`~j`Uu3+!$&rNdb~D!?^=V*A7`DsA$*j9YOs~I>VaLHP^@;yvr%J2WG-2K?mqnEfWVhL@%-z{o1HziIXmsy+v2ZzgYFT?iH<+D!->zTT8-2Q@>A9 zwTOxMJM`RHB8l%1WM8>d60I-4CKM1W4*PsyoWs9n;vUdrnmIfi@^uF!_v-h{FV`zP z`tP~{hCjX27nZV^XqiAp-io?*xA6V@Df;?YPi<#%8-v%dupAPFc&g}ha+cP?(7P%D zsP?Z8tKHNXYU%)Z5oO8T>28kXx%}JPdsUU}Ik36NJiq?oazUtMNgq@vbtRF}1Zbt3 zR>N3g)<;{LWV%i{>Gf!uCL#;-(IMJ!i{9#*th1;uM`ChF-C+9?2a9sjEG8}l;6PBN z$%Tjfn15D~3ZHaNp;-DpiQW~-76UGrJ&t2IapSB-J3d8tlX)C10c-gU#E;?H6IT89 z@4n!-cTCpdxwfbCNzFl2uupk9SB}XuDrpe(8?|S@S&TUTE89jsE4khlyVHh$3reB;nfN8 z8$EYwj|ByduiPwwTZezN53ImfyxbPdR-@Ena`92aZk>NbBZa08af>U?4Itl#tfOWb zI~SZjj7oSd5%@5|4@7Z{Q0THL^3fw348UxYDvu_5n3y4_!85J3U|7Eno#oWG2lP9e4Styuyukc5U#08BeG4J?37I^kO^gEwu1`B78K|e+Q;0 zW39@kn97gm%pG?Wo$$sYcP>0EjwavUAN z?fk00>{mVRsW$30^gjQ~YjBq*Sg? z9BJo2hSG41kq98XWC+OM!GlWDNti}a5Epuir_&Q>oQ0k4faV$Zlz-P{I@Xk)*N^}j z`XVh7hT94qI(L3sQexi8`=7pz53cU(R|RRK7PX&spIHS;!ox4&cP()EuyM_JI2ju- zc7`FuP@SyL>rvJ@+_W8dZ>azFEAKqS_w|u~-?oj{rCQq!3nA3Ncx3KeBZ7CQ-1HM4fzFseF;T)gms&w>ov_mYwKatH8UGh8VQ5-XoC@KP6k zZz@e#F!Y=!?WP3Yp%VVv%uuS+Tu=tavLM6;LtDbG^Kic~sR?4p$=~)V;k^J7KW6F! zNbcULUb3CWor}#Z~)(Lxx<)jfNFIvR6VUiz$>= zWPFfFY=BzUbnL_QEhVaOuZ{;jHS&*X0l-q}mY88hs3(0tihocxi%I?-!>o*Qf_PIE zL}PQI9^u1z(39FNGG6R9DuD6wZ}=8E8HDxE%1WK2$6L7Fna&Jl23X0@($AgxOg~s~ zaA}XWR&lvR_Eu8bV9*);5@h6=_vW`;I>|Y6nX$q?7dY^b(w%`Sir* zmPt(8P1NG!(CDy+?%c?d9j+MU-NW4cMZ!?@d5qG_+|f;VA3drlWk1itlo+J#AV9+2 zZuM%!!qW{6$@0lP=A7izcapJeEU|p0c~q5DaBoN4<#*#T8 z!>H{MGmxxWNriNOU^{D=kwWZz`fF(L)KJrHB$SKRmQz9Bp(v%qvl*y4aA4ZfX`q-W z55B{I=8eX{We@PAC+iJ@}E~pgd#8Zlgb?(+hn4er`TKv5aj{iV2lw)I7hk zh;u*3oa7cPoyIvp=5dbkg|a0Ckjn#musknd`yu~147Us)zJ)eTZueJHSLc)Wm3yls zgPbrEpFLEkapg0zqsjtxgId(F+QU-^hR`u>OXxci(H-y{+~(zK|HkNmdH{;1mdt<6}9h-`QiS(&&|1qN*NJFu-8Wq)E3?XKUvs zS3H}hecw6G6ozbrZI$a(o0^Xt5hr)(a!4M$m zsfOGSmx+ow>)xP*JT+>wHM2W11za5{U3-wfKrlf4x5E9JM-9-{-n@A;B7ikK^TLU8 zdc*L*yuBBBIiOU@3Y4c+f?+`CfA=;n) zfEa%sAz2?%=EF)+kAD4=drx|xy^9u_t=zxTj-I1re9Q67eyoRHfuT)1|_DIzw6 zbr`YXbwgS+O>OP(H2-lNu#J&Uh2Ey)n5)@nI++7osd6BUJ5`23TLQ zC>`6P^NT0&c5&Jl%XN5wh>{nAOj8wL1%bD+SP>%9R`OER2=r0WLjFk6!-yJFnq3JV zykjoN$@&M0N!U;BfO<#YMZFuz|KpKTBT<{5KvNE`K_5Kh3P-a4Ulv9he;XkEABxN6 bH~iG}UR`92#>Smo2#LYunUl`R7VrEY{Vo5;QnGTWqQ3Zz=dTR2^})y7=r6 zZ5Xo@;l7B7&Q(~@7H<4RL}b3tdh@5x$9gw^@RfYGW#gxVLEhUoemHq}%dU+d6h*e~ z-S{ESc{}~a59g+c1vh^1?)z{1LEbE!A|jn#gv+C+)Pqb{#=+gg1OLj<`Go&(Y00lI z%B5jcJlQ>$d${a<#4Y(tzOBi$`CD@p$8@bKesR-vesDO|*F?NhM`2B5Qpv-^^DRb{ ztw&x~)}qybsBv5Oob!>XsVQN{ag$+I_Jnk^b??^m=k8?R8s19O%hX(>*< zj`gQyl@@xfd(Ql21;d3b-3tP*~dhMyNuOBTR9vZ4*Wp2T2C^jA(^-4>` zG}klY^&Rh>UyrjAMW*u_f72;(ZK|k9@mgQIaDOl5v#h;*4#i_zi2fYI8v1^t!Z=m( z;zd65X4$pWY`jL;>6hyG$Qa?$*3(<7^;*kTh!u+#au{vP9;ysutE#G+b6xGQDq}c& z_*Z{_Ly|&lkoel$oSa6BDH3YV;^|7Z)#ZhSsi{NU*WUH4&F5EF%l5|$Sap+RROmIQ+>BXEq)B7Ty0PfMoaXk)drWzE)ULWW7=L_zo4lZaW_g`Pp{OpA<;O-xp`;bBJ4Kkxq}iyX+HkVtAcWF`Lni&pt` zU25BMvxa$%dG`mk8^*?5nr{Z$jAP06?3tdL8tKTN#JzCoyuH?(v9zj8$);bMkdVOW zF&nJo_4!u%Y_wW`RkeMJnd776kq6iF&Pqv1mAKBiPFI{Tcb6wpmDuW?n4FWtCn$I| zt?971r%uSr>FH^`5?9mQcCXbjeM;fwKZJ{2=k51~2D{(A?-j%rU#h1yndSOXa~(cw z`?9mO$jPd}X0S3WvC4DmGc_i$-YhpJCWeWL>G0vhS{cn99m1zi*R>jd4P?;DaQq&3 ze&?O@mTiR&Y3gYV;-2m?Eb3prT^2>YW~}V(fjmla{P|uKt2sOL%y=!ZSgo zU!A$;En*%^<#)_;+qp{ryr4>J&AX+Io5HL z-Ivb`{Raz|@o@%yB>IuVX|0uhG@_hvtCc8`0yd;QJ zeZ9AxYk2(RNn(@P1qliNp5xt~%eOMrg)KYZVq9uZV#E&}Iuybj79P%}Td2CmcYuoO zNkqgcfy!gEV=c9Bd*{YlN{Wl|*uQ_=XQZO0mI<+6Ut9HB>1V_=_4Jg*#hv?w1-lkr zw(|K;@Kk%Qxu>V6*HS~Qt({$s8Fx3w$&i6&A=8TS!hNQuxm^)5!a`I`}Z2>zbT}PgmjH#%oFZoeb^c>F8DLCr1JdxjX*ke{nU%!Vz*zs{#7+!%V3uDtL#8f*wKNEJ!Og-`Y zuQQk@LoLC`<8D2bX6CDr`PP(5N=jN8^LYQ01wUpf@%5FN{vdJ7rNcSyWvZ%UE!o8Z z@87>4s*MdV@>rSrs+Ezak)@|bX8EHk{mVl9jj4SX4%aj^%uIb{)PHsDJ)X*{t5B^b zdrKTE(qUwxX0{P_(n7aeZL95Qr$PwIy@IstoP?0dj%+{~&_j+IbeI$5_1FVtI`NUnlg@a`d#OKAq38=98H(4Qpy%;3$XQwLkF`2Gau-Mi)wE>t()325jTh&a1x0?SEKwsrUUI!!Q1acy3(b zk2<11y!?TL>*<-of&vB+XKRFW<*rqt=ImNA^WuqK!lkHjY}?#Jr;D48C=Nnuy533J~Se zrArbIq{Z!7jvudJWUtOKsr%rpouIs%X?%P%r>t}Pmu=;;@!=@i;a5&sw(GH&LqeP!~{S9Gv$U`UaeXiXt`^#l z7|=IVt}36B(W}kN%d@qfIcMe`q1pFWAWc~2!FSu3fGoCGh?9#sR zZp5~noSb;cpcufNJLF=2dhd`II!%^3PG~K58P|BG_#T%r<%^VV`4d;IXY|B5?$|ww z4{dD)&4XJg2r(t*#fzhh`D16Sx-I4%Btl+3dh`f$jBx`1=~{AdK$@8yY0${j*-cE$ zeXF*-oI=9c%`NIore^lffr?OMe<8>5R;)P0R&!%xjiz#}2IFtf3LGaQ+sZruCRG#_ zx!wQ#R?pDV)EEEG_dC<8^=ECY*W&bGi@ui!_SP3Gr`%GrM3p4@vbCi#07gc)@zV{C zi)V8#UcP)8i$hkMQ|IjwsgM;#mhLf^NQ!&&9(C_DVrz4moxxi_LJLxBDyB}6Eoh3JD1FAadUNb z9I5|2&J-qnTz^~as9m>36?2{EFS^K2RP^&8c(s zwZWx;V_!dijyTg@>LDy752{EIpv=TK37gjl#e!BDjS;_s%^34TNGa( zYtG;`U!QGI;Gn+_0BFQv-jYcvVL#SfV^68?xtO4tPrypYF8g22Hj?AN(=zczOAtHU zvrFB)h7|x$#G;kEfl5K4c5!Bigo#iINKw_1O4WC>^FxQ%kGR zebIK;uKSpeqPK6;G2MV0Y5^;iY*{9Jk;wf>O}W?x#7bAM3fldYEzuLd_Kql%ZHw#_ zp1eKZic3n_*7l9NM##%;yY`mPu#CieS4Ky z348SE)3???KJPg&WmjyzjoqC=BQuG~nK zOrO}YitDrV%Yu(dI*v8p`rxzs`t|Doz`)@j?~^OY$>qB9WvDODcUX0_w_CQpVmfl9 z_u+{cAgOi46Mc_4H4@1Ofq`pf>&xQ!o)}TLojZ4WE{!BPIyzQ8;RyAjx=37yuO^^~ z=4Qvb7ngv_fGQD>OziDvQ3wH^Fz(-PK%eR`)_n8k&250jqOP+aTd$HxW?N5+kDFz* z`LyV{$;H>P>z9gfbHBnQmbfjTXbkl8L!@$Doog9<&fdcna6W)5+n4p%5t1MpqR~BD zc6qbh#B2@@4t95U|Mk~jVUCI^s)Pbh0;{39Lah?Jp#yjVr4$zLv#2N(bizQ-sGus= z`KTmbCM0;^K`)C@8?UpmduC z9Q-4){b`@BJ~@m0vp-n%yLRpBd27>;(h$4i&l3*qZm;##9VAq5-@ZlVskXM8u1fAH zH`D3UHsy~9Wyg*kJAy>#TM=;l#aXoC@k%^-=LW=m*U-Rw^k`odR~h|j10U1a^73-4 z(nX`$;kwe&QUS|OlcvGDY zBm@o!l*?*A>Hk3LWaHWX7gi{bOqWP8OFcTK^ZRk4IaU^D<&1C+?boGy+0Gw(8FQfJ z`|+#3@dDo;U!BQMag1!$=i9+h@|WwEL;rKgq`ya`;~r;R;LRI1n2#UF9_@N-b0NMi z$Gqhm%3~g$H^|>)y0jZFb-o&@`VOV%y@7!nOg<<8Y-~<(a+V@y-X)<%;V@PadID_9 zQ^)QyuQII+LZlcg`?gbuf8*V9$_={(OIPPR1_lO@!B^+9yvWGN)Y6(Z!n3H`yhTUe z1n7#n`T4zj_VCQ>7uY70lz7~ENlNzCY~vFmUncVI`daF->_Y*t=rNj-G+=*$xbDr( zDr8b5NTraM_!vHuzcyaod)-uM%h$oGa5dH@!yr-hspqd=aTi=Dq296a=g|ud1s6Ye zck3lJ;MxByFGqRRhfe#n&`+E=y-+;e?vS%c@@YYymR|@ z02okW?Kuhzd(}J``_-cY==bfrZe_*D$Y^DOOe2G;1c|)1wqpnAsu^0jJlza@CXXl#5P#2{IfFEtF4%~o z5rr~9nB~euSm+4_PW{pqP$9GdU)tIhn=`acO-(@(_yz`g&bJxMg?C|Q5CBzK!~FbY z2=B7|<+U~wi*oJm{rehaqlly#x<$>`xRaaAG&EY$)6=V~tC5Jle)3M@8>DfZW2F4MsXjlhp92HW#5{yf5iTG-dBAI2=g*%<0!tJ%u71ko1Cl7~ za(u8=6b}t40xBJ!$#=xqjS>#IXcb%ustVB34f$63VbTdLV}K3-=cu(OhK5>DiuCsZ z4+i-A(}Qntzbs{8VPR`KeUFR|$obdks8&@F>UbY*u8tV)3445F^|G2Cj~xQIaSri@<}pRu3V9p_I>#9wBuefvS<;P zH?Ln}{Hds@4hz|v03Kp4GRzV>@~yB~@9ZR_1#MtMd4NT>yrxDDm#pkFL7Nv82H?bm zq5({wutuh>-h=xfP`@C+6ciNJ!K)$2ytZiLX&6&az3$3zpP~;Gr^JItk0`P&0j)3= z)A5%--Xr53J7e(a0pN&kvGeOlemz1JdcAs||2@(}A(4@+;;cS`UTeh^5~b~*%PT5O zy9yl;cy0R>?_bcYPl^oSp`@X4MpXco=<>yj+js0}Yi%WFlDI&)IOsP74{tNR6z`9! zQD<&__(-_y?Cg5nCQA^DEZg4P{MA|Tgx&ni#7#%XJPHF0SePUBW*%5d)8wS2B#OQ- z0d!62Q%iGWsJr`^Y`V`xzNUo zTLS^E)`9P`O6IjblWPO5M)RAi11XY=uUz|KlE@pfhe=vS<}L-O@i51{+>9S*b2h5j zCjF~SQp##odzdOKD+h`|(tADstgfR<1lHiM+$J6`6(B{Gl)n6-bK`F%^h5} zj*iZ`bMJ~>W;#1N+35=m+NadT! z|7c&TJhfbL?2E;vv?ik)HxSn&85#pYNr1i(ooiGH5}CfzwO7qBR$3q_wL$G!bTla3 z9+WIh7ZI{0BqRXZz-{(8_Xn88Y~l>F#*6X_AUfBWeOlk#^wZ1A`ZEj^>O(QzNuS%> z-+#BgMjm-} z`M_?$%YpQ!R#xlC)ip7q%by+|xO?~R2D#f)>|zI*0wthQS`%f`dgIvK=g*({_lg-+ z)3~`UgQ35H@3r+-*3*l5@?@SMItV*`>*?vqnR$NUKC%%rxf|Hg06Kxhgal9x;9E4Z zNAdsWe33|AfU&xzr5CaY^&&q%f7AQ-OgudGSEaIzYETX;D=QE9$@%*Fs-r;Trg5Dg zKc&yEvazMG(j*?Vwq9M7IL!3PsmCMVyoED6f*(otTdX*$rZfHO)RdIBx{Ec5e+&+) z^>c1KYn*FpYNCbWvslk1Q`D3QbHS5le6)AoAF+zo%7_7lk4z!A9KroRpcF z2_`a_F8;*}Uq3&miT0akoXyNeL62@yIt`!{P>pmJIVljIzW%`nu%hASF7m_ALPB0B zr=Yq-syHt7CO0=4#Dn*iZK?Wm0zK~8h~4$|${<01{(KT1u7SXAY)p+Tw3Nn)8ZB() z7z;A;=g))4$f)d)4Y7Rf?d{WNo|}yy(>FZoV{K~-lut`@(P*x4qF1w%UTZ}VAg(N@p(xoeS5$o zS9zTa;nz+Db|a$J^dz>M8hF(mw4dEM8nKj--wj!B^xjJLDZ+}El6v_5+R0O=2yqT! zWO;Uk7lZKiuv>My7f3ZokbCy*!M+FG%qg(8+_TQf!NGuRsyT#Mj-`ck2Z9wGGEgJR zr<$jy^o8(^f4^fq7@oZG6VZQ8OZWP6m;E1Jfd9?9y25cO z@A>1Gv>VQc@qKOf4vAuZF$8-o>P+HSyQmkj; zb+gU-i|nP+F8UtmgtoS}Y3dnkOD$#h?%hjmGGoH7tOL$Nu$&)Bigk5!+qGlIp=HQv z_1)bun>G(`@yN@f|M^ldPRXS4KPUxhqc3|r^erhVkx!~BF9-c4;07Q%F;gq9k)k@S z+kb-|S!{X&5x#;Wgc&h*qNi*f;0dt_!T>lVz|)bo>?E5U`qvF^@4hhiWDqyBRd5UT(0`Q?p2s2lRUpr0ep?Cliq3t*>0|Ba zXxWe`2lNc|g-cep8hK1sBOlcaDB)yPR;&=*2JqPW%8)o-N?^bp0o z*y2Fw^ikK6HB{ZG0wC3eS(I57|t@`QHr~GbL^OZkS@U3vNv!~nm z02;zdRPv|K&$f`s$D}#E4NrWR0tJu27(FemkjwOq#j$+&iy%sT{P1DcbrnvJ8duDM zUg;}|1Z6S?A=LzBFwKV;!-A*@ns^?nQ`le}CcC@FN6F*C*o@6BfocH@1$@Zlb2&bO z`?>_QPX{4g1A`Zxw>Ik7Uj;)kbUZg6xL@**kMDGpqreqmQOWGw}zPpBni>0k=NxAL3YTU)~d z5=H;X$HxaKeDcp!KcogDCBGCnuhLXgeM7w~XLM*3&LC*-lOS-Q=}{xM9RvxB`5*&B zhI$$#GiQ)=R2*7=78iGH-%gO)T3TABA73QCzB+O^B`E`Q6&VN|+F0uwDPU!}Sp_SV zFqCZhY+4+iT)e)vY*jM%WF%tW<;?>42}K`beX{2xc;5*AG3?TIY(lIm1cghs+!H-tGNn$>{40_se*8WJZKFQVE<5D$b*1jCd%|E45CWmdf9YwX(W2_~Nvl5|Q&QR`lB3W=Dgcv=Fj zl%fhgQ9#s9BIfs-7htKgsa#x@7#U-Cozfv@!gO@wOHpzobF5%*9 z7=Se}njna#Q%d~-S!HYOIkhl#h(iU(8mcT~R~bSsl|+qP7BL^p%b;TSvpNFBgsBWF zUij^fc*c5d-xx%545A_E8<2D2tFsOGB0}!EdiA7~GBiAheEFF8n^jb~TDmq`iY0nh zu4;a$y_lsyriM&PhdhpnS=-R}NO#`Rw6}%v0uxu^N8kw%^})>11`tG{++_Vy=|L#U zq0A|$hnn=8cn~}SE@y+c#Nw%HaT=am!rUe%CJG4(5~(I6DE zC@4l6(tChgm7ygYbed^LUIxX{GiUN3$R1uqrtQcz4{w_nI(rst#S_o^r9?$lHOFPf zh{T1_%*m1NQ1kXpi^n(nmM4nLb(N05p&j#ML?jXqr(l^3V15O*O!%(6PwQ( zyrOi1Ei!#=Z8&oUWJf#{bVcsWqeqW^=b5VL?jsbIx7ay3W4N#1e)c?FzpS)R zHQMNc2h63=$T>JTAUuF`LFz_i2OW$x=dm<Hfwf2SL>U59IIxb6Ic)Ia(70#TFn9;kxobG)?|5I9Wi}^3sr+<+e99sSyW*FH=`< z20aDhx-zt&IY=$(L`z4Z_ZOCbqc=VOr`{B&)4Vd563wzMAafoiUkv}KzS8bJdzJ=5 z74XHSh#m+Noh5E903S6q9NgU2i0#u0H&l3ys#|kRRXjaQrz~zms1TnnKZY=dmtj53 z!H|lvg8^diVUf3N zK}(YxCetpH((;vqclW%Wa8I=}Xk&qiBwzN}DOr*-dysT2lf<3D~VX?)x$kGxYUtl_VEd`e~1ItRe++q1LTdv|RHi6+Cn{|z)&)evTW zd$Nu3B2owYu<_G>)leTpFoiXyy`kjdv)@hh{c7^iCw}|gPqZ9dZ9z-K8J&I~N?Yht z8J2Oi=lk)-Bd{t`F84L@2$Gm$b_o$63)Mar8sGL(5N}LI(~;if6Cfu+nN-)-QcJY9w`)Bm#P@}drKH@9ecYEp7bnq$?Y zNBsJKt-v7F=n)4;L=>3Ry#Q_S^~)Ddz2er&t*N#^GH^X%D3)pjdS<7m_e%g1z_0x2 z^XG}~lI6d)2BOg+JSyxQ8cYW^O zJ;caQD`cOnnZNJYWn!jGSipP8NJ$S$r0Wz+LkD2z;tHpOigyC-GSEcENRp+q^h&y2 z$2b~z`B8bIf@IgE+E^JfkGh*esr8(%quh{q01bpu*pVHcFaU9ael|DbZ)9vt!sI`6 z^XX~7E3nRAYkrU31mf!=GDl&H%TQ+&asG{J8iu#uGczQ_#DvNxE6YmlrikK}CKQ{( za9kJ}{Y0Gzz6E!xTy)?xG)D8+jb3UYrQMbLh~g@^W1<&c<-)RC>9A_;YRAyDmB@Ef zEF%^iy#s>8z3(1{M231T@?&$lCN$X9UqzFI!m;KyhD(AN6uLBH#?&|u9UUFy^E#7( zBJe=Zu&1z}KvWQ1ohT+zz{2^6da61~pthza;~U8%_)z*Mz1H32FmDR?Y zVV2_YJMkYVaAa&G$(494yhYD-Bmw#qZ3C55h?(e-jp;FZdMEz6Kh5c*M~<9JYJh5ce|4Vn0ks%D`3mRl= z5lju~Tyd=bDqs@n`W6l;Y=pAp1Ka7zK7RRPgyE$P_z8Ivu}RH=j@QV)q+}J|!8c%q zO7ysVPI7T6$jB@MCt^1l%W~czkRoqx!WQz7(6e)^_0L2cT~ zfN@2nyG!wmW7|to{@RP!d56CPqsJ(B^^>^zqpa zLhknMtx_Ry4%pl0#K*^XLKoW&q|^o(5ek*Nt}N^_Af!?8pHPU=F%2eHJ*S5Bi3&E~ zeR2BFpFbcab;~?UUcIvJefJmM33`-J)k2m;4X|`X;qb5*IXCgbqGca5i52Iec zB%CI&hkpE$7;?aDX&&~tF*-&@f_D`78lwZDiHuQf1@sI5*jbyti&)6;Edlj|mR?#~ z3OvM1a2bEu3!e*{dOG&mS0uvenHhfCfcy6)!NwsYDc6V`c|xri_Mb%KB=;vhjh4lU77qUE?>f^y6Ucu3;*eM{VAqt>G)ys0Svjg`+FuLBqf8R9!-}Sp$ z}0T^oZ#KTmza>#)k;c>b-vXof1J&&awU>5iOqtMnG40 z&ea2C0WRqJA;)Fl&Ks~qX}LHY9|XxCn?E~y=KpS8qm>M0Hifio^ zEk?5*#1`|36JH}8wh;NJi@0{Qw%Vge3N+h7OTBfk-_<{_+5bVYpGC2QznOwthU5tj z*tQB^fsp~{2$R;)e8K;R*X+*g!W)J>0b{j)5DPOiJYdEcVg>QloKEmY zSa|kAy1=&JYk=5a+hMvl-Eyg{rF%(u0ov=4ykJHp+yz>XEx;8bZz5r4t)1cz4GlG% zn9LT`%;h8EJ3bwop#^VOHg_*K4XJvjU%UW8V*)D8J>Gjx<36;kt}k_s5H zl*B(m?A5YBsjhRQH`^h~18RmGSq3U~C5QwtprYvs-yIni=72`t_UH#c zCMVGi!a>Ei^q0!ZExk^_6VQv`J0fv|;RDbehQ4bz2KP11_B=Uv-~x8=-{kixl|*Wu)V@PRo+s9?r|yDg z)l8T<@Aa?U9$zjw6bJRhCiopWsrHKGw!wSa0N>+E?5`J+7p476E{#8Y82O1NfQD_p z`ytsr?Qss4*Wun*PAeUxxU^;D)xw>b+U{lT_R&mslGp_{az_|b3+AnP%5!<`e#aiA zE7?+V;r4}PR@LP1s7s);kuaf?j2sm{iU-pz;VOWG{vP=i&XY*S(z7#V{8p*hOoaLNKyRwkY;1jPx5|uAUf`w zl{E>i@39O$Jw0Lf_&j*<;E}XhbNVSCL6_;5wz)t~2#QwiIZ`!U?aZ8qfH4MHT-LFEl@0i(D7zyWyZj$NA0iy}8Y%}ogbLO&Tf z-+?wa3;1tOPxli@i`G}qS#&pUQ~KFauB6HQ#`l!G`|x$N9j4P>4EM zzi+{SR~8w+uJ{W zM4^2ck=dgoF^BHy8#L>KsfhvWI2;OM-tJu4mZPLSb%`S|;4vtdfa| z2{e}-!m}e<4;Rmu&#rDGvbwp*!Kizm=wR@}7#Hyig^F!5&87nT4{F~lEwX30T}V^% zSKnl`*Q81E!L|1K__`v+_NAgFBoT=R@C_%g6Wf)3x{sRNaVW zU0u2@uZy|bm;8?}YX$dij8NRHt&NS#+DbuY{P(TK6bdT0-x1m2Z60j?SZfF^xRwq z_7f%x^vzgP8bSVsx=8)q3Yj*)$8!v_)Q#D7Dp8+%_gHBau3UKvs|zw1It1X_h6IF) zIMmJU+g2^NwAMYV{*yCGbpGER0G9;)#;R;}9&PMqdGRYFs^x>z*ckJ}bsyo? zh5X&!T?*qd7I1ZCC2Q|is--(_3eLWJq^akBNRGT$QB^!C+I~N_j_%}|v#)e;9brTl zMT;*i$t=UhM$oIUsMWsNT3bUVD9p~zev!Cmuo;%h(>E(0gZS@kLgUk0-~^c9!#p8J zOrnk25=wytF?fv;E|*Km;CKLFFciwB8CWfD^W*Trs3hg)`)2gkI-|k@J5}ty$m0|Z zUZ=BZZuQ_u_$mioHgQI-u3->}(ZI)%9HqF|Rf)Z*i>=DDOZ9 z0$5-d=wl1xfC^}IP=~nBoM~=p0l8PwS0-MbP?lyVe&`1Hp93f44-%S9oqz|B#{gix z&@+$sBfS87#lYoZ8EqD5fz^rIef{Q*89EYS2&$}u6+!aSrCe081Vbd7MycJ9JRH#2 z64$QvzLW}W&eTmaG9Ue_{?1rdN(vp^>X_&HPDd2^aI90!~-<#kkW9UOR#x9PcA>!x>?~Vj>GpP zJs5;eqoAN5iaub0yD_DR+Kr8k$mPj5D10dR%^F+LYBcMLdYe@eKD4(0xr6RL(yEnh zWK2E@2?YK&A?Xo1i{zqlyLp{xK;-sZaSj{5NAUvkcfB9zSP8m{&{<8Gn+jp=N8%x7 z3awyKi0K3a5!^CFNxR<5cmDPUoK_rP0VP#ca?1xOEix%q#6_9-$HYYRkP9(e_beBUvqmu zM8(R-r%HUMnIG<0uHuw^|@b zq#qibl8!mZrl{JOrLRwn!tS}e`6RuzCv3H731y@tTytnbBKV$Q6)}s6iv9iDn&~1M z8>U5AJuRZ~JJjtUDeBV^SZYkdE` zD{1#;*!4CzQTsJAwf4h@K5+R2|17p@&*;UlMPk+$@$oa&npZ}MBqb#swA_YTRk2y( zF>bgUOgoLB^)SB%Zhw!3)o6Y3JIg{RBOIZ^jyS*lj!4v~3T zM;`fm5KU7xvOLF{IS{TKV(zDwVpfJCdf(a&1uD8Z+{-h7uxMmp&ehlsY{q?AsJ0%m2bE~DQ28W#bygkZ)gS3&R9a&64TCJHG#&l!l<3gX+ta=Sr zgrL)}BRDmpeT27+L8x2B0_lNL!k1Xe%88JzS1PEzyw?5wNy9GK7Puow z`U-vCwV8svyJZv7>!5Nt!NM{>*|VPES^z|f zPSoUQ{pi41LMIP){#^?6q^KkXI|a%O@@i>nK3r!}N#^5m{(Wu4Ax7n_YI{X!qXc3P zIDN!J%0b(L&f40^>Ihzm2bjzB?~cCvWmGqEr)%}QcSlZ~Fot@h+=qTu6=EfLH?cJl zCl+9cIE&AOGC{|0#vEQnIK;`O|FUURExb%vHWL|31Ym~Uj+Fo}nKIT2;L|U(&AU2R zLUu-0Pm(`2NueDRTZd*i%xx%(oNqwDt(MH_f&v%JECLmN8wJCOg~c-{83@Z#p)9A) z?5fC)7U93uuG*f`*weF)0T^yb3c?91cq&lm*pD1OCQYeLFe7%4j+R*Q)M)%9a=q~{ z=&|mWe;_+Ny}^?CWFD!9(}>V^htsaxKKBT(ch@PNTFFh2jCXntc03^|AazBPbwc?N zfQ!o~ATYild?Fq!2jRy%upf*%G&GlJ;}A8vkrIT;zYxabv63b4K?l1caM zsbsj03I(o4SRs>i{^W@ZW*9!);91TE!4|rT(;(j97zfay4i0LM>1b$Ha6AC`b^_G` zmkGuZ!%lm~LJ<9b0J7;?xuXm*3w7u~!@oeM3JMF;AvLtO;}nBIG&sP7r1s77;OH&G zsu^AwNeDLxNsxdP@j;bOIL1as79mza{6G!C0YwS9K{kS?az=W(NZo};KmcbHbs|q= z;wC00&?yHe6MFi~koJ%&({2d(ZZoouv;QG{?(yO3-gD1qhlS5wwu<{>xKnZio-m(^ z+)ezQg7@#U+q#c!?qi~VAT*-5g)4ub3s>@$C4OU_9vna(h2M=rf}p{*ygs7;cU<%C z{(G>9zPtVNSO3u`N^VAeqG8d$q2js8zi}jyYtZ&h5B`7hql{mUZQLADg3^45fFVNw6AG}%M&NvkL_EcIFrTEL}rdMom{;L=b#S?AWC*U_jbr8m?hQpf1 zuq_c9ZKJW$@a`TMS-yXN1#$t*7qLR5Lxs_cakgcp0_M4nj{urpJtW*B_u`7ihh&zyB@; zC95iE7hGlNkj61aX=-UKO%H>DVg+psaGV8X0$78v@9;?l2A}tso10$}CfG~4x&J`L zv7bKWE9>n12kGP#r7B&ygmvMWW2i7fn7!q-vdq{wfvJKn6PL{26`p`gz ze+)JX!m|JiOCkygNaGU3sKqhzgbKF6PV!@^cPF@5g7S&UgZ_d7x4yEHU^GPzSOOw} z^$TX{{oA&|)ePVTj6^`eIE9Vr6XF>#S`obI*qAaC%*@Q&w{Mq?7HTTL(y)HYm$yLY z*U(USWaQ}2pJ#4X9>l2%OrP+<1YQ&g5AhYbSS$4q0|SQ-4QM!!g3`xeY^(RHcUNmF z5bJ!lqkOU|4M!t^Swlyws?vvyWOiTgp22=H_Eaaq!kkUcQV1LL(Ktg=mCqV!5)@ShF0l z&H9?hC1IRwWNl|>4hk~Z>-JFxl-(#}P!V}9bUC4|fG0whB^1&t8cFv_Jb=lS)lAH7 zUX~d9i!58`;DP5dGiqu>OL&|k3l2!zZg4eVghfR}9w$}Vvatg5X26#XGF7!xq#(tm zh4Ow>_U3BOy}76how^a+%5%E`x7gW$RA%||Yw_jL9Q z56?7k1dc7bJ5Bp@{|F{uf*1uG0?f&9ne~roZ^bZL=|0vtHk8t+r{<7JE-<7GB0;mz zJ|#G~4uK4Kd2jGS{y#7ZzYGkrpaMlpmy84Ae^!YzPlm~uOoaID9C#KuZTrvZ$GC)?jS!~dvMD1lQ0 z6@(%I0C5`|Ui6ow#BsV%dw3$MKYWl#&{^UfLprI~*4FO8e-S)THs%1805Iy7x)>bs^ew2y_0*tJJ0{Ud0PCwIrpYdnDv3Sh)V~r-g!FMO@GCxGzYgnVAv?WR> z3v@Vr6gA}^9E~3#4Mf?z0Q&>hG)mF17<=7ZvnCt}DIuf<8_PzK1}shDVRGj8-k1BB z#laBywt!5A$w4KB;^4s>*RFjBA;okNX#sI=va9HX4~X62uA+QRy$+pl8ry=EzR!Lj z9{l|L5Te^L!;}ZIQ2wmJ<^!h@D~ldJ69zDDBz|ysD0$G2@uX5_NKI`9ktKBm*crDn z{rh+M>I7eYUx)HcCfi;CW8@OA)81utm#s1kiCU-#PnL{UE;-_<_q!N}H|A~oeOZ=e zL=7<1c5pC5yLbQnei!nkn#f{BW8*9kBW@=tD=TX{=7M*gYO>-FgiM&!m86VN%dBE<7LaT_4jh!|~3n2hK2=K&YWc<9mbnv*sQ}Q_W zfRU9|RncK!Lf*pa45qG zWdV!SmoHz^x7AZ}Ff-s>4#K%(2-zsT2rPh0RscQ~E6WApoHewW=vIp2^V<}CxP8_^ zoWMkNmuwcx#NN&>wA7Ap_|ImE3X97ZGP*Nx>K$QWF~USma#-u`*}FFeMFlu8yekSIId-oG&6PTRUv1L=&|2A1uxY0zmTOdyS(_B;e73~X^& z%>C_b^hZ?ZcPS8Qau5RZ^MPMpQ1oH*Omf-ko`t6y+$ZcA!k9d`o(2ktXMmXiWS)3x zvW7Yi0T$YN284&CrT(1z@l*9HupmB09AQpm{Yt;OyS7=k!{;AA+4r6vX4q*>cG}gP zdfQv7k-A~B9r-#hHD%yG0dIx|mG2JT2?uxY9TqUH`h^X1ic1=eRRzvdFDQ+x+%3>~1mpcz^DU!63E>>4zLAj#{aga!fWjCQrP?WR zg8KELsfoWfTe^00^;1c6hC`r`CbWcy8SnUi30nD7r@hU?4bde(hco;zja~@4j*eookpOX!hN(+%Dg;~-Cd8*@gsnls(G7rS zdl|)wz1BVPIslKMHs_H70vNXZCL!uF%?x(*!v_r313R`-j(-D&e$tfWKG>pDG;1<@ z`8|}I0#IR0pRgkx7-UWzXLIK5{!m++o1o|^Dl7sMM!9)i!4t%%FAm9Yz{^TrAX8ZZca|f0#aBbFv|zZvcNFviIXaz9y}RZySg+6 zM>p&`TAq?M)zz?Qy==i+Bs69xNZ?VBp&;!5qT#(i3tqm;(N*KmA{Q`zzjfO-=ozi3 za<-NZ_NrH_0Az-(-&afgXL>oj0S~NhT_^GqIBq!GoH>3xmdYb(59EdJAMAglz6B?H z0CEWLXn{gH;rH7+DbcW95^_b%AcPU(-MibMr@`QZ-JK1n4h>8|KtOJ3>ok4>G>d^M z&cec?rL8SsT7Lt2cD?+QIY1~qFxdDA{|6u{MY5qn5W7ZrVx!sS7a`&38Y{oSgL_q99rj7w9eBH9a2h#HE=B~t ztZoQ}Dqe*frEJ^{w&2}+Ra6=f;c)mes7SIGAB&vJqWmjwya52fTuy)!0CaWE^4PT6 zYS-I7#}*n9dQ?ALB7W%-ODGw*Tw=m8Q43u-1QeGLz}4{$2<5 zqSWX0H(parkdJm~plw*9?&9sv?q$-w8%GpS96f$Kfp}@tlboQa#4HG&i^~V#{PMop zO>eaH^M#^|*nf@)69lD2BFCa_x@7+EKXS+&pf?j+Y-((@Cs^qI{`I4z7gt{pdNENp zt0Oo5^BW!|@(Mz`-;;UG%1Zya#11mIP2) zDkj0xVkJrtt0!*$hJgTjljIqgJ|Usx>?7Uy?YpAy_Mvr1?pRwcuot5{yXF7t?oHrw zUfXv6+p<^*t;{p)Hm1RtIch~HA!$++5tW&e6tyUlWl96hG^tdE%q5l*WvV0@LrKaM zN`u

&{xw`tSGoKl^?6e)s$T?|pxs&+}PpRrme7f4}QGuj4$<<2+71E%77w+~>iw zTvo^DJw3cR@ODvG)-doy^teE4+Mlx;{Qd8999m}bhD$w%&Y(S@X-2@!gZN~QB86~w zcZWBmN95N1`z8Yqlq6QXdzZM#N%p6b^LDidA82&wR=60STb)*tTvFosN{-K!A|E$SJ$1ntd?2VK2OgUkA`-%V0BQQ zcao-~urz_^)=)7@oL`ukIZbYDUDZmUyzITNA7D#Ez?#b7S4RWUI;!mje*F6{DA=vr zgVO8Q&0V|7&I$F3?<;dQ9}<}veY8R??ge?awj6?xzyIML>PYfZx?w}DJcEOSWiSuZ z#|h$hbT@6Pg$ST3^dS7#ZM1NYMg>eS8Z}b7u#I9dz>PalVNb`PSG#_QDa!A~MkqOu zE;%}?)h@gj6QA8eqU{9>$WeEO8$rYaYP`p#o1~GW(VY{;<*Y*;Pw-35V7(HMHE*c#f0&v2uy0 zqBVGqsCA3U02XHx6Bjpge=!6IMsbY20AZPes+KQDbbyRHfyR62&?KlDqyg34DgRxj zR{Cst7m0h{g^|x|&^~|u^eIT)&X77NF-3XiYgv_SX#f7A_?TO~2Tjv`$}@QjoB3`+ z>ceLsKZ&AR+;(ngvN zc!EYU`J9?Ia>0TjlBhy%-cR_=_wH?Z$+f22$ffElAKuHz7(gp5DFM#`ru7+*m4>$% z{X>-v)(0`;;=~3eKeg&|KK1IpY^Ao676TPT_8lea zA31FV>I1&>d1C-rlR9?kQu_97FaE!@bj+F}tpz$tkYc09jB)$=VbNhvi9yy(@Cpc- zoN*q&i;nlK98x&$kcFHuZ&14scS% zs13lG)i7!gA3W&Vy}LMJS3I~&s~O*paNqA@Gp+SBb1L~t0fNr>c8FScqvAgKZ%qXw# z_?V6reag|CP2Ib9j}wdoMrrFdY`_{Ie%*7vKB?p1}YVCd=*~ z-lpe_c>^new58(3i%JqZDpv2{@su6qd!@^FP0sIW9yJ6p&1fD7AP*Xv&W64q!yx6k;jLHd$*n~;PSu?9siu+=2z;D)A&G+ zA3q-M`2PJWj!rVbJDbmUELem>5Zm7nYEtIr=1Z1DDq2(fhA>?HDX+P^235Nf=m1iZ z_;tPK^`fHMjc!@c3~(4-P-HVw2jR1+Y`1Do(J%hb!V?5gXyt(kzL?)9_h6N^d2jweDUE&IjX3e@y@8$F2V&K|{ z^Ya@B?z8}7i7;sNXp@`@N_`>Z{1Yb%Uc)akCWi4M>4a;}ac_H}R$9M4-Y_bQ@Bk^t z@eFQfNAO{vaoi|&J|F2L#7_42XnV0R)S!ug4=4VZHpWOKHFkHye}kT`JQ%$Pt|~vl zq98wCFtGG-L1>K{<;XIIab#^Nv}!fyp3!>6?1{GVEH?v{P&a+H+m_cd8((HS>oJAm|{d|3s$*jICHaIo-kbV`eZP1c*Uz2DE zc`UG-Xm#@JSyOetz(9IZ9&w6n+_-W20B~gPf%8%CKlUdGA>F2ENYU?VD zmJn`Xg*X{a2AisO+E3NPR8G3mCQf`mf{gE;INfj25Kut#vG~oC`yum%b4=m@%!)xr z#7iZBH92GNYm*IdIMQ^ijpF9pE?edV*L>`ls`GDos(t~Nke2eA@hQ2P)?^mJ=5Mu* zw7F#U?rC^ZOWL=ucFkKEk*+*BOz{YNiAqZYwN<06XNwf)uD3O&QP1D{|Qja12i zb>7;8ch0@MP@LI;dFodXB>3#x_kq)S$M)?eNtT;$9vlvaVi)4Q*{W?@v=NRxN(e)Q zje)_zJ?X+iDG47(=0GSH<+q%iIVydcYuOdOe*G0V3@9oIDB71@(uCnEI7ph+<(E9I zKgTN9_QK$3>vEx$TQb55Ie8~Y|tfKyK>sh@P?oJp^eg>VOh4%Zk4uI`l!0!=E-Vs6{1-$*pxKm zY~bXGL#owj^Hq$FhS!fy8+w<5o2N)G-c)}znTflTuEqV-jUR;<0qO|a0;cWdv$}Wd zX18?deISpx9_)G8%K%-|ME}sxRSOsXGSg*?MONd~pCoGb03iI11hS>|sKk`w>6CF7 zr42p$FQ+E4?EWv+`@Se_I~X`QzVmRs=I*c5pKQB|R)gvUTg3vm(RCXpqp}C0XpX^y zgG7V9>m$z*JYo5LRcSi7VN^vgt=PV5w{Q!{BWQj)w&q28E2+>1RCexkesJjGBlG(P zWaEGV8_Cl^4>pOj0 z@$;)Yh87DK&%mFeU)_z<`90VD(!SAg1&$rB2a)Db{*;#@_X@GPRCxXRQG&O&7tc&Z zK5Ci<%W{NSbAvFN39(7!h^E`o(9kCl3_2AzE#ik@4B@(vTF z>6{V9Sy3Nnj*lDoCFlZDAQZQ(Q>TgtImjJ2^eLh%g{{Nm(HzqiqOTzSlO`s zz5n(&XReuUrKy))@ag5NR|6Z~n?|D`+i!`>k+xW#%B<8xgTsH2PKq%?ruw(l`;-J=wN)8>M zrnZvk%9~I$^BtXNdLVEnS%9#u2gcwi{rIsf%MyYUbV!lZNZlB6Uvnl;^$M>sVgJCR%nAIoNrqiDoCPQ3ufqL!?9BWynUM zmZ0fUb&NmYo950nZ9R;>a5pzMDwY(Q&R@KkWO4TPg9jVAvz&UKRg*aWCQrU9?EWuY zKo7A4{9+EJ0`NpY?^`!~N8p$*6vnsj*a7D^z3!7KWe&`K*bg<_g-(qry;0>TT8nf5 zt8hvZKywuI!VL{M;Sw90FW6*29cp_4W*TLRbe=tffled!1e8M214{R0HPaeIt36%O z#qZuV5Ku{gWfToE%H%{0dTZ{xbKHj&S;d z6{n?4m{=R$fHygVbqnfDRuGej@{_FGxDUYMPjJSZ@X*$MGS-EPbn2&{+!#KG9}bn0 z1ZI>#F=97eXA;{@a`yr^DHPcTke_rV*9(7RyuUN4-9X?*P~ec!IZ*@?ft6v@xX`eP zEZ+CIVBZVLr1`Ujr=2AVR zu*q{IT+RI8mBSQ0#AE?N7C9Y3{^81=67}IMEp$l0{_^p{x=?QE8m)`TVMQ`VOsnnR zc)a#awil8oegC2nzpEJ$gNcjf_0JSsq5Bh?%YNuPHG6f<>*LisLxUV2OnCa!(m&N^ z|B2eL|M#~lQk$Q)Wi!MS;%$F_e{KN*zt6~}`s9#_FO}bZ*S>`(g8KzUPZfo+oR?rI z6kni&6r3Z60;hvxuLZG7k)XNvJzej=H*vBge8$V$k>%q(tkds01td;3Fcqq_UOz}W zcA*X*FrBBd05>^GB2?Ykb<0<*Q1#eYQyG<()=0}6bW$$$OHR)6@iz^ANFEem$E{I2agnu(r?6Gx1#;SK|- zm|^)6pMR24lmwhLARPUIzkPuK{ejr<0gA}O_Ii6`hWCV?d>@nvL?W6kCm|K!_btDF z;f-BD6+MPqPhmidnVA{D9EC<&?HiQ^KN)ZOvp;1GRUeRB9*O3?*we%W#C_)Jg zeslaopYNC2@f|S>+Up!%&Y{zI+MbF~8#+BYHn@HNET#FNK2Jq4#s|jXT?FMN(|f#5USsg}L-Foy8)@22Y{4J+mkhQ}|Bohsg zeFAH#J7TXKNk*jYg`9_Eh~Z|q$0LCI_D!??!{h}!=KcAVwA7GgZ6RzyAs|nwM3G0o zC@CwC;tNWEV5n1Shz`9L#!mfSN^yh~|L!V5WQ+UW6!4!R!~Dlq>$l*ia2vW+n3W+K zSt#Vexp9s{Y!t?u4&@|cX~-7Z(}4DVMP}?n1A~1c7rT4y+CV5(Rq?8z$cK87!`n2` zwf3_efPf^r^XB036|%7@?(JiX`;W!@sRKq@90-hVz}+%@-Lr18+GJ~Ds&xo87#tYa{wF9Y6?mY zwns{rF4*DTKB{=d2-1$h2X1iB1L_PwH<9u>y*tXjj*|Rfb$5VC+bJr3;7M{oTg;mW zI3mF3Wn}2&%peKO%gu!>MG#a%xtftr*J&Qh$Pfo45J@?CxilT^I@Ulm%hE|ijns@q z$kAYQ%xq4{ON@qo`te6P!!t88O%u%XpFBzBFQH{k6C*OBm-cwcsKtH*8Qx*S> zIqflY;UK2zDLpfD*^(txSMxbi1u#`H?JWDsw$VHU^JLq0J$u%JdPFY}){Re}TCSZw z@BqIx>!T<@XnS#4q{t2x4~9F5Vls~G**9*?(QqjNRY4+wrlCbpb_xtgL0E|9$aN^* zDTRTqE&*ui7Q=^!oC94q2|YWD#?*^NiL~{cCZD3CkQ|k0A|&$w8zC0}S+G|-<+D0Y z!US^j2m5eVv!O{5Hh|4Ro93(aLdL%#Z~sce9zDb?RRZ0}5hFs8-?9Wr<%ER5`$vPr zi1{F+?!E6KF>nVV+ONBSQwz$h@knGwhH1Jb>RKrT2Dgz6*tI?4>~Fs{+k0?|uJO9| zJ$Y2S_w2dEQ(h>0@u=Y6#7jeiy1(CYu#Ab^+WN0+$*s#ypXB`I7Hj~GLCTRHXnR4w z(bYrsAsfvbITy(?lcG7`VUgz}y%RnuCJAw4MRO{ln-P!u)FYM1L@jk@w$RB4?z!QS7kt6XF5xgNg4+cq$A%+#? z_+q+*|ArvLm_31PIQrE^t1jMx=*C(}=|L0d7v5B)pd4CrPla%Ec{*R}Zf!d~by;&Q z-S(Y3N8c#p(6t{pHa9PCRK+d?-%7S)kFc@!7in?Ns)~k<852fM#AsA9vI;m9m@Mw& zEnpXy&aTs&KHcC{2!jxb;;e-Wu%tpG>P3)eR9WrUuZ&nQF)!tr<)*ncqJ&1t!SD&? zu&0=}U_xKEdgJ=_pCIUIhf?Nd!f~{4xWH1QSA;qTdxjRK=?iE_jpT-d1<^ znORtfr$1qW#gKsPB_q^EN6iZPVUq7jxG07~*}%;bF{?j(phTc3iv3hk{q4{E63gP+ zKEvo;%Dv(h5~VpPoetk9Q|{2e^+HT|7g@d7E_9*TS)mGDgV7t)Bw zLGF5W^OZ~rb*4>gEnRm0afRkYFIuYV1__y6x+b_C7^lx!<$}k3`U&AurbgpF*(S zI>a?#;5ny8mGsi}R7C6~O1GsNDm}V&TGtlSDVkQVOqf=D_VHxBq@~Lm)7%PdmM#^% z-RbG=)VZVevy28ad^8xIhG#Bk6A0ndDVIl0wR8g$?e;xMG^ns3 z4uiM6y;ziI3XQBcLjKGjGIZk`NcXvBX3QhG z<6EuLsc~lSImIRvl`&Ezxib!3Sc!f$ZPS;m?Cf~n`r*pByW^d=1lLE$qYpeRf`-tB zreC|(d+eGbJa+_Nij`RFb4|S=9pgNXrNtpHl9h-A zom%q!Amwv=iYe-3Ia01o%DwpCwZ1nz`fdU{(|6yG)3~A3Z)n5QBt)~&2lVexF^MnC zmKBHoqcfCshE-REajmGPJx4#K2sLu#DQ+&tcvJMkiKjT}FM=Fkgf`4>mLFRv8SmKG zLP|~S_XX$HTuD!lBpkGGc)~`e-Q62D_}=VhoJm^A$>d+qc6^z{A|iEAA=!I1Bkkt47BCh+Qj0my5C z0>U85P;{C%;e=zkUxDa6oI^4`lzQ5}g9pF9y46FPjwefP_4_2(RYYkah?Bv4_#v9q z(1)`IgqhRUiw!uOLx6|)`Prb_Vm=B!^B8H^+mEOCRT6VSICgLHqIVF-^nWzsAE)wE zcKD2Jo#l4#AoajkgB42QlRRVE?_EXVUphrg%l+Og%Bt|C^snJ!O@84itYu)SIUJ}} zDrIf<@qbo1_~a!?$I1U9scNosa}C`a7xw%*Au==Cm(F?4R?e@96H|do#LJcN!f>{< zjmH>1qmrnhQ4cx7-sZI0Cog0;C{l$bi%}xbnbU>B213G@FJ8b8l|Fwy9HT<2PlKbC zr`A-~@VEh9s8@J5#s>Dz!8z;Fyc=GRY15eeS$@yqWNr<}rii zK_@u>vL08#hiCPOus;#2T`uZ`6DDBs*cb0UP#N&4H|Y|YCpc({t?h%D*?nTo!G2^g zv{nb=XUsXxvIp^R`J6KiC8_I^*q-NQHvd+B{Y7%(eB6ZOlLCILf{8X}n}r zAcaFXJPi+~biLbc6hg9BSN-JOiOf5y=g6_XWjRjnH;W{a7HC_4>uaK2#XpNzRJW#% z$-lRRiLNU>h1IK9XG9pvL_S(``d&FaiazH8$EN-!UqjV7vY-5iJG%anO8hT3hyDBB ziaKdxdDo^dtByiR_D_H7fBW~ni^%1a3TGY#1oz;m60gKF(UX8EmJ zy0o*RqQS91S9tfKjEmZ^1JifTE{CK3Ga7vSn#txrE5#aq%B&zM)B44@|uD* zx2uCcJ^%c+^`)B7_p;?2?)|{=@(I!;tX^QS(W<4A5!s(Mm)jo@a2Ci8ed$UP0tZvg z%#+ii@1GWzW=)h>{_X`yS56>=n7w1({6JKJtdQwyd_q2pz4;$EgoInw0Fuoki(*3y`_ zjN;^wj~*(zQam2Ov0->BW{fdnMVQy~N1lq%fc!32GqXtE_4Js~g0d;Cri6H&LYW`u zf3AV#hgxK>aqE_lobds#ZuQsoCcQy{N=X@yGL8Y^Tv1SN3MUIuyzq`Hc82=H}F#-`;xhuXJ?mFY~;2J%Uo*9K%AMkNcHQXi%LpMnXv-d&Tm@* zTj0R~A42o$8I~0|`u;i6UrrVWVV(Q2vNE^)3tiB>$P$F8YKA_T+|11On@%%{&8f8p zIJ8Hnsr%0K>5tP=_GyV^;F(6fir2OUjctDH9kigj!qjT>C^faWpfm_X{%64f#$}Oi z{zTE{Q-zk?$NLtmTS@WWWRgkoos(qvy>P~*R?SSeSb9%{?~}+Mpct9%yi4cu31~ZL z50HjQ=(zS+C-mq+`S%&`P?(*aeeYO!co84RDuVIx>7S9F&i7f$Jy>^n4#yw)ac|0M zRN36>9z83bjH4@WW~^+?otRNSixF;|fDHc0zs+Y#vu$CHIpJY#NGvghdY??$l`N|_1Wy`8t?_rV=a zt$h>&oow2BsK5{p*Kt)LvkGul+ZCg!&)Pm#P%fOL_x4W6vGq`70s=KNz-@k+18dzc zXl3C^otV7T`pRs`yvh#4$zF)&m-M2*e;)mHo9{6qnWCFJfSfqAF)S061K;H1ep{E&%c>_%zV2O7yXWfJwIj=zcQsWHgX3aj6D)) zIlGm{=8B0$!%QjaBirUh?4zDJpDHF<2W?72>y#pLgvkr5YXQH-J%nV4n)vcAdEzcL z*vYVt`kDio<1eeH(_goY*>#(EF^K{;vtqQDhC z{{90!Y_YD=8TqNX$_JzS$tMiyjx@0giE+*1nWJ>kn*|hr5ohuJnWgK`y;A0S~IPqKr8u==S>67P)C!IB%s=?Qo5 zO!8V8+DCR;wyx^2h5__gQ%5n0GC&c+V2Pp!t{QOVCpo8IC0Pxp zH`@M$u(R>$-zlu{<8*clweM@9=eD4{PmQa$;t>|MPyc!Pore1rzkR#%DQ1V+M+#vb z7#&p&YcyzW+{s72N5AIVaD))>n7n0$e;t-oV!c9T(rJ>C{7H6&3kTG-9UJQMZX8oq zTHb%*QvLSPAdh_ouavHmr!lvP5PNIc?CY&9JL5UN{Dh9BWiqoKO2m{EnuiMEomiI` zdk6y~P{s-ZbGNr-14BH>*mh)8iGhmA1)rZI5*xF6J$WEJBAxW+TTbbFhQ(EkK1r$> zc$O(E>-ozdw3{{lsC9p5BvZZ9x27reD;A|S%OubQhlJdrxg7pp7-VCM;u8s}3^mE; zvV=?$OuATgHcBc8(#(HRQZhi-r%XrB2WNr-z@FJ+xR&aX1LzNgrfG*JL774`sT~1^ zV{7l6w0hqxRJ*_E<}$3ptZJ?rG7huFjxJcs>Fvha==>}Rx|?JVee=TF zqyr$drMH+RRn}sR?1^ZMHa>4zHSY$ht!g1~eDx~Js%aQ$7q;{>*H57p1_<7{`@T-S$s$g@r536ueXhCrS}Wb$92Xlp)z!h%-gTHgoF2P0Ns-@Y1#bdCW4 z7Le{yyUVwC1VXdTjE#(7G8j7k6w)Ja4skT7zI}(?Q|EH)0DWCLcg7YLNn(2PXS)`m zZ}zVgw{Dp}wQdAvzK0Gull-?Jsa)&i{&YgJj7WjZ=S3H5# zx}v;XxavEV<=Q|wzAC_mjzL);A)P5vMCRLLO$!9&KBC3k)#xNcqTwkOn_5nb8oXA1 z`&-s1eS-~7Po0-tc5l|nWvRyKhL&>f-Fgm`ukG;*=S5w58->e>58ik0sTY%12I4!G zV=LTp^8seOKKS-4+Ss?h?nBg79Pp2xHM~MolV9@vho{O%jqPYp5e#H_8+MOaMUXcR zkX6_(=gG#YP-N0C_j#Def`REU1&uRKCJo_?(LKAS%-v3IENU58j7}TRaHUKgd>VVX zgDfL+KY8MNE#E-n|KkCr|7rlKvaV0ug{GRKBnT%r+3oocdRg}?lKqv$yVNYdg~U(! zMR8=@kY-vs@{cSG@&_m#-1M+EZpan$-=9h<^zs`%&$;`$tM{6p|6PcY+wRf+0nc#8&d@U$+14j1II-^z6A}`QbAm zSw|`|zc!KB8&~|;)A*HuuBErtl$68>Lxc=WUyi%bS9Vu@vrfddJ{rwoRLgj3F-Q^( z4Oo2px5yqsVR2>Q(KpIXPp!`ndz9C3kTObfifoR`2MS8bVGfh!hOd2*&La`O=DzM_ zJHIUdz(CQ!P+C%w%7_)X@(q5gWN#8~aI@&B5%e$3!LSShFR-qAspRb@(2{VHNx}T* zF*S{Z6Lm6C<+v^5GKtsZB*d)eWo3orAfi5m$wA63s9Az1#ja%Y1crr^h?Cz687&Pl zW9X7+Y!s37rbe-9cBp$~I zGSr4B%1#(-Hfr-Lk{n2WAvGbH`}{cts+1{_ki59Z;ADQ>PV_o~l6V6Yvb@Mf zs0S!85U_`6{-Duge8?=&rL%L{ms$vIUO-}3L|GIHPo8kko$iC=DTQ2FUP>jBY*b9; zBtb{D!C{i-=C*uR6A9f-ZmjZ7lXy|_Gl}n{jeWEEp;eD5sG&8aMo*E$oUbh#qw?&6 z<8p+5tO59fFBPZm1a@ck#BOAoB>Uu1<3olpf`@iekN}=Y!fxC{5iWgv$SSN@KzQ^y zb=ICwE(9nhH5SvMCO9STZsGe1>Xur3!rYkKMC>=^#W?@mPf{Khgaq*(0Y_ zZPfsSM-J)|jhQsot;&85Nx-c-5gj!vW`bKoidum+^DaB|5K~m1ppNoZZh2hg$DV$N zarNRu;e*NPfk@&wzCu)pEm_P}e4H%)sGE;aIe0#V& z=|&jp-e~zSPgd?BtRg$RHW@Uc8%B$Mx;$0$O%g3=LNY6$dduwMM_KEGM(Qbwakw%(i__ z^bxZaSxKF>fA2m@dHC>;d^5BYb%-jnEtk=9Z7jDaFksP@zJ0OfJfX7<)=5sPf2u!( z-aUIq-k%CB84+s+nnO%{<7o9anR;GcXWTC|@|9SgnL%DTY{ks6S&z$3 zEnlJ0T%s|mIJx#jZ2tX8W00Dv{o|%wp8LCd#0VO1Zgd#qp=f`)HkJJ0eQLGfrchI- zVM1cl6S0tz$A_w_A#30FTNW@*mZt2U+Ru#+OObRSkHdzd60}XJN?%WpsT`?cVb7>? zq5d#^-r_p`CX?zaV6oJ9Pt9ZhQ~su%>o%$>c$?F&K4hNjE4kd=Z}ibPBjuKBBuABg zKdNQ-)h%L#+0DJS*!i;Ckp)qqDTMh!HlM5TxvJ_CS_KN<*y8tb_T#NJH8nq}!3^x{ zf1_{chtHoYsK&GMJw$O5R~S|};j9sFs}-u@>fC!2grfI@5|6&!uKv1vH*3qDmg@1A z)AGB*nPKrUD`uCMm(t6yS^^(tZnSq=*RkM5e^iGKi!Tkw(cnno9nD5n4_h2t>q|)L z8Pm4tDafcLg|IH##F_l6AN1BY)I0m>je@h9dqLW8@kLV~bEmED5%%PKDco^}tFSk@ z#;8$1c=ouk@MY8Dc&?oCkzSTuiC z(evkP=>j4DC@w9{7B=w&x_%zRQlF*!|Dg9$Bq6!P$&#T1@M+cqfQJei>UxZmD`sIn!vr)7lBBSKpw7n27*VWYp zjiGWV^bdpsLMEgupJuDhkwbF6ZX3UZr-eQF0hQd!^~22*?%S$gxNu=spn7b2-)v(o zJ51zEkC~l-Ql+aJ+E_-z29sQbj(1c>kU`^Yhk^Q7A1!uX^?kI;&&{S8%eQG$PZ|xv z`^1X+R;t;!c8$^^?U_Vf0wBg+n+c~#7SPGj0z^zBCfz?$f>=EzHI?Eog+PIm$$-Jh z#Gb(JUu$d890`3BCD;ixETh+z9fGkOE}#%wb=u| zxNl_<;fxJja_qZS^#5FNB-={vFWP+kw@Gi>A0yny>CN?)NO~{To${;EUt{$D5azuDTs$tc@OxLBf{z@ub^#&`fSbJLDP1bjNXDFZosB-8Ibo#ij_=*= zepMOGw(<8VdrF;}?J$O~h`Zq7T}?|sk2WoBLYl^pv~Rb@$O`h&=OcLtI2Ct zl7Tg5i;Kv#Nd9PWF^SJF|HAHCo)>+K{ygN|H-qTkK#D?ks}r9u0zcP5#WM-MGo$eL zsV|8SPH!LjQR^l?2Uu>hqn5!yhLoAei?RBLyaaZY5iw})rYVkQhJ$D6C+nn*GLM!d z0Oz$USHuPzFrxpJ7>Q9NnvL6m zqh`nktuxewbD9cqVBjXYaEaq7guHd9xKuIE8p@PSpO^OuI-$#u`41q}kN{&YyJUP& ze_cp;K9X|*-}+1RY>^dz+4M~%DaG1;J>)Qa)RQzft4aCL6r|Mf8eKbg9=-6gWLG7! z{)@ynUI1f%Gq)C*LN2gE$*L(du<*mW6@A8d6&ZW~2Jj z6_fAy5yN~f=k8epLne|B;2&jpmYH#^(WX>Pj1%CH(0HxPkINTh0LBMhS$I&>twEfA z%(sVKdGSn#Z}aqk2DH>FNO zi|W6;nM8j@&s2o|-C>yKWJor6vXDV=_tg(%1`0}DU_x4SV185Al~4oQmBJ^e0j3!U zIc%80(-(B6K+>gEJzS1#d7mJ%56v2jiDgY;XHMoN*Y^RSXl~C=#(|RAzt!Ah*XN#H ziq*RB9*8$~Odi!13aM(0n!WeHRvjF?9-1YplhtpY^Z1O{d`D4rB>m!Yc9Rg{L@^0v zMTLd^bHtlxE`?<@)j)iLgI8pW(%p$kMaMsiJb9t@ORqPtUr)dMTa4I`s-5GMpw?G% znx`ze;lqSO%1J+ANjXJEtykFD<0z;j6Nc3MM(G&&>agy+JCFN=7Kzoh6%bU##lB%- zs~@fdb;ycqYFV$rVN8QbDVR^SC|l{$53Nt#1t5ylXmw8c7cwK8jQfKHBOsWA zvjde9j~_P>7U>IKSWcUk-FS}jrcH1HUml;=kIXkBPT8pkqU)-DowFF_84dBGcj?QZ z{eEXO?8kjj86l|;sQDpxwh{ewD^f+_qTV!W_fz*5+$9ZSjpz=*3{Vd1nNFxuyL35= zl160Yaye9@Kx{No&1<7C?EcAo+KS* zb}My#RwT%@7VeGKn+$aV5y}CmZ=MxO8Ul>A7ojZ60{k|_<0~Dmw}OZ_ZisdH&l|9l zYFPKrFzejJ7b?exwMO!28fyd#ILd0*?Q0ofvIswH+T}U>Aw7lEdePOEdEP;guw>rt zv=3VTf)|A$>zY~>#guNlr=Gt>yH(qklL@f9G))b+Gt7jO2fDF=Exjq#Qf`isk*K8O z$VCxWEVTI!bQp)6#`z>%h3rmgk$soUFLgPuYa>-u!MZ7_b!o z42TwbIRYgNC7iN{;@=>n?kaJ9AS~ESt}n1X8=Roz0-ucwBTt7Bvk~)+>8~F{2_|T|ZGrQ^q4qNjtIOxXb!;E9_0ayN0%a&QrI}nM7vvHVi zF&D&*F)4yi8pY9Ji=x)kKg1*nkSE7B&u;0GCDgUKEHPx1+g&ozIHU8@RV2z>JZ|Ll zN2R(oZh`!uW$Q7e4xm4$7UD`KYFpg?SzMaC_vzkq5~c(P8|4p>9PhHor8NhY;hn(X%euU`@4qm3QEkB=TLYYgL! z|L?(me-Wpli;cTTjNI8;9G*DHPQt(qL_&Ng8H)@E2ypI^U{WUC7YZtF+D>)1ngCVv>NpuQI~hbmgXH!FnUoVPLnYPG7@;_j-eK3 zj`0zdrS>kS2`QReZ_o2)|D5cx;@PDI4O*tE?EZVCSZvxEkC)F(I(4$}z@-ya2HQ>! zbARNO^JqhxqB9%qr>?%ds@)o`j}Sqnw}N8w?Pc;3vV2lsJ=i?Fhu)KmWvxs$U&)q$ zjli-H!iLg^8*&7!!kGwk)gcs!HDT;nAwk!>v`bGIy`qYk==zn=kJDmUm>Ye6l#)eH zho|SEKx`~DD~q zHDT)eLA#r!w3&VDb=wD{S{aPkc4ZhhFFZV)_$|yEd?FzyInNl{nOgVm;?#&atIp6@ z$}bQRu3HHv1&Iws$J1pRRPLC{s!M&je)ZuIC_HYQUC!k}!II?jqHrn1j5KJ`P90l< zU;}*vra)(RWH2D{#>%))3r@dkxH~S}p#IVggb6FQjOl;jMWd;i*+!(DZr{qS_$avO zj2>o%#U}4}#K*LPmsM z^xy~^Olru#qy71E+H$y=m0Ig}I2`}CFM#~>85#@d02-cO<=K>Z59ED&F<^r(W!pCz z8T0<_cd)dajWGSexE~ahgc`y_krQ}iSo?V#PJ(!p`$%&@;AlM`5YSLJf6cDDr`BWx zDi8xSyzJ9B%x!y3tOHF5(kYx29By{3*H%vWnCAIIAxS-I@~#hvJL8leSU0&;H2{nb z9>~hc`N#?DwB~DC*h~kV4)i^6?&C9v|4p-~(J8s+kJW2^8^0!@6!xUS7 zI62WKV$8x)vn3s~{6j+2Jce0~)E&5bf3>`rj_1I31NWoonzAREY5-1jzj)BXJAK_c zVX&=o_Cs8btlQ&)*$PA=mbdDVtOT50vUI7Q57j@>Vu&(~gA{oOwQ;KGOO0Ke4Ry~oE)yce!Yq*(lUOZ%>uRXnzeTZ$w!D>~mERTFfm z+L>&(Y+;yCABE=vQ;|To*!Ca-sQIJyQ2w2xlv(0p8YJSf%JskJ@1tT)(;-C${A6rv zS5CI9dVJ-|^FEDVGua1y`}M=k>T{M#lAM%(rX)IWOgyV0i`9_K7vEe+(G_)E=`deG6@q$CK_x>2Pq8)n&*jKq`CprAN`SSlr+m`39Q@5Q$}l#)?c z=#20Rghn}76QK{e&Cu0Jq2I4n*!N)4{g$Bw^+|aS8I>phTBN(0)qfne$#iVX58g*0 zn~tylv8Takz!FRwh{(*NkU8nvUUXUeuSIs^#Qji5x-xBACYn4ZnLPRYM-@gU73c<- zsUB_BEo=nZzgW!lap8|;cuqc(oV&bX@!PFE7Y z5}-;4>iR(U?Mm7()l_w;ic82uhgmL1e?8pwa-SX%PM(V;NlMhpn@z~ex}EkVar^vFOBtQ%8`PjTX-Leg!RM;{Fl5 zRL{V2TFK=AR@?85o7A+{T>I<#u+)fgoUuFGzVBB1iN@K@9 zsCP44Z&Eeh<#jL+YwIv~Q@N?{z5kFjYz*DQ24D7u)WyiLt@}*gEsts)+x+pR%@ZJ2 zn03#V?&JF5w-j&VwP3&5y1K1?{#l%K-So*f#N=JXgS2y!Idi@=d`WVfxH+PpP+9DF zW=8Sr*InDU@9V}9_ig>1i3l^^JxvYbY@(9OLIy+R(TJJ8IQ~)73eG+QuS5KIcb8~t zrsY1o+i6BJndYa)MYsNnrSgAB1X@v%Z~pbA^LQeDC=p+l5GeIt{%_di|FRS%bSdx< zvW0pw{La*f6BXBlJcN?2UKEwUO%*Cx%Y-HDVv$Q14Oiq!Kd7(YumJ-%nLv@w;D9Hh znoucZ0)BH4HfUu?i}>BaW0(k6a}{A@wyl3~Fhbi_QX2I4#m6tVF@p3nSS!R28?(N= zd-6zluby!Jv^3Sy%6z1AEuMm$0e(g>wtv1^X;INISS{HYWdfkF`N(lajAGi1(m*AN z_i>lkMtE^KZ??kNDP^-`k&%rYK75YcaFhn*?^*FU^oDPhUH#|fEI0O$ry|Q4p=(AD zIuow7)Jt$z+DXoW>12FJ^ShneCa-`1jDDPh&9pBf$Bm) zFMK7|wI%Wz@_LK)bNF&kj`r7$dqb!CCrYQ9KQj3o3ukZmmyTwV%8v?f>E!IeRy8kwY`1Z zu&1Y^3%Zm+ml4#ZiPz&$dJ{sBFn@RxpA?Fu|BrYkC>YbwuGsgNUlyX=M zCai{BS%?6BBSbghRk{8GPwc!f7S?jiK_);MnF=hLdHUFc&X8Oo8qk+nL!x;&*ykh- zb|B7HQp~5H(PsB)0f#=zNZX4R1xi|Z8y+oN1JfjQ5=g{(68=LM!82+AP{F?KENVEf zaWjvk0Rt4DSH1#L-rz(5Z|Xgj#iZpp93)uNcJQklcawNns5C`u-c3QlKdoyD^=)6h0ku2;Roe>^W008fX3+OOdm{V-_KK|)6o`#a0WvH$ zTG9r2Fu7p42<~Fh+w`P+0Oe%>S`#0ib##027UE&I%6ESLM+@l`IP2_H0L3r^Hl)^0 z*}Wb$f~_Ww8}*5=rEa#kN)glaG>W0JsA3}{5xy5#GSQlG3F3-`8fQ+8!+k-O%V(Z~ zGWvdvLd|5b8+9D5%3~%>a3O(#c*f1QFxBO(qP2jUFTy)>T|!*_`0;!zt7pR(UlVqR z@VcxDuw1mFDCeIE@MW0Xi70j|q-h=YJDhjR>uR{Eqka{)c2tv&LUifF#xf@q)dk$v zoZ3%=1*l!M>YXq_IW{lCB>t9@@x5ISXbW9^A_}aC-xreT=<4I#RgLz0k8;JS*JsDl z-_omBDj`HVMI4>qzRg(ST712obPCdE@$Anr7|(gAXk6<$)r{{tDRpakdDYt^F=FCiPe$fl-+1U3zF1>zK^olwR@TO=Q@`A&elhn&9M3)c z;fr>d5XFUHmP6UixIu$9%@O9KZSNLwr}&m{XpjvGvY?brY#j#uLrq7xDT2_*%Lytg zpeYMYD=@}}#GsMC7@$Q9rjVha@FHRgoK-vYQx#N^2o6^)ITe_xJX+zp;pot*^eWi+6b# RepY-7U7cA|615j@{co0b=l%cy diff --git a/docs/articles/EUCAST.html b/docs/articles/EUCAST.html index 48d7603c..b736e229 100644 --- a/docs/articles/EUCAST.html +++ b/docs/articles/EUCAST.html @@ -178,7 +178,7 @@

How to apply EUCAST rules

Matthijs S. Berends

-

11 January 2019

+

12 January 2019

diff --git a/docs/articles/G_test.html b/docs/articles/G_test.html index fb6b4173..c7c88ea3 100644 --- a/docs/articles/G_test.html +++ b/docs/articles/G_test.html @@ -178,7 +178,7 @@

How to use the G-test

Matthijs S. Berends

-

11 January 2019

+

12 January 2019

diff --git a/docs/articles/Predict.html b/docs/articles/Predict.html index 7cbb6fbd..fd98e68b 100644 --- a/docs/articles/Predict.html +++ b/docs/articles/Predict.html @@ -178,7 +178,7 @@

How to predict antimicrobial resistance

Matthijs S. Berends

-

11 January 2019

+

12 January 2019

diff --git a/docs/articles/benchmarks.html b/docs/articles/benchmarks.html index a3249e69..8e87d706 100644 --- a/docs/articles/benchmarks.html +++ b/docs/articles/benchmarks.html @@ -178,7 +178,7 @@

Benchmarks

Matthijs S. Berends

-

11 January 2019

+

12 January 2019

@@ -189,148 +189,148 @@

Using the microbenchmark package, we can review the calculation performance of this function.

-
library(microbenchmark)
+
library(microbenchmark)

In the next test, we try to ‘coerce’ different input values for Staphylococcus aureus. The actual result is the same every time: it returns its MO code B_STPHY_AUR (B stands for Bacteria, the taxonomic kingdom).

But the calculation time differs a lot. Here, the AI effect can be reviewed best:

- +
microbenchmark(A = as.mo("stau"),
+               B = as.mo("staaur"),
+               C = as.mo("S. aureus"),
+               D = as.mo("S.  aureus"),
+               E = as.mo("STAAUR"),
+               F = as.mo("Staphylococcus aureus"),
+               G = as.mo("B_STPHY_AUR"),
+               times = 10,
+               unit = "ms")
+# Unit: milliseconds
+#  expr       min        lq       mean     median        uq       max neval
+#     A 34.745551 34.798630 35.2596102 34.8994810 35.258325 38.067062    10
+#     B  7.095386  7.125348  7.2219948  7.1613865  7.240377  7.495857    10
+#     C 11.677114 11.733826 11.8304789 11.7715050 11.843756 12.317559    10
+#     D 11.694435 11.730054 11.9859313 11.8775585 12.206371 12.750016    10
+#     E  7.044402  7.117387  7.2271630  7.1923610  7.246104  7.742396    10
+#     F  6.642326  6.778446  6.8988042  6.8753165  6.923577  7.513945    10
+#     G  0.106788  0.131023  0.1351229  0.1357725  0.144014  0.146458    10

In the table above, all measurements are shown in milliseconds (thousands of seconds), tested on a quite regular Linux server from 2007 (Core 2 Duo 2.7 GHz, 2 GB DDR2 RAM). A value of 6.9 milliseconds means it will roughly determine 144 input values per second. It case of 39.2 milliseconds, this is only 26 input values per second. The more an input value resembles a full name (like C, D and F), the faster the result will be found. In case of G, the input is already a valid MO code, so it only almost takes no time at all (0.0001 seconds on our server).

To achieve this speed, the as.mo function also takes into account the prevalence of human pathogenic microorganisms. The downside is of course that less prevalent microorganisms will be determined far less faster. See this example for the ID of Burkholderia nodosa (B_BRKHL_NOD):

- +
microbenchmark(A = as.mo("buno"),
+               B = as.mo("burnod"),
+               C = as.mo("B. nodosa"),
+               D = as.mo("B.  nodosa"),
+               E = as.mo("BURNOD"),
+               F = as.mo("Burkholderia nodosa"),
+               G = as.mo("B_BRKHL_NOD"),
+               times = 10,
+               unit = "ms")
+# Unit: milliseconds
+#  expr        min         lq        mean      median         uq        max neval
+#     A 124.175427 124.474837 125.8610536 125.3750560 126.160945 131.485994    10
+#     B 154.249713 155.364729 160.9077032 156.8738940 157.136183 197.315105    10
+#     C  66.066571  66.162393  66.5538611  66.4488130  66.698077  67.623404    10
+#     D  86.747693  86.918665  90.7831016  87.8149725  89.440982 116.767991    10
+#     E 154.863827 155.208563 162.6535954 158.4062465 168.593785 187.378088    10
+#     F  32.427028  32.638648  32.9929454  32.7860475  32.992813  34.674241    10
+#     G   0.213155   0.216578   0.2369226   0.2338985   0.253734   0.285581    10

That takes up to 11 times as much time! A value of 158.4 milliseconds means it can only determine ~6 different input values per second. We can conclude that looking up arbitrary codes of less prevalent microorganisms is the worst way to go, in terms of calculation performance.

To relieve this pitfall and further improve performance, two important calculations take almost no time at all: repetitive results and already precalculated results.

Repetitive results

Repetitive results mean that unique values are present more than once. Unique values will only be calculated once by as.mo(). We will use mo_fullname() for this test - a helper function that returns the full microbial name (genus, species and possibly subspecies) and uses as.mo() internally.

- +
library(dplyr)
+# take 500,000 random MO codes from the septic_patients data set
+x = septic_patients %>%
+  sample_n(500000, replace = TRUE) %>%
+  pull(mo)
+  
+# got the right length?
+length(x)
+# [1] 500000
+
+# and how many unique values do we have?
+n_distinct(x)
+# [1] 96
+
+# only 96, but distributed in 500,000 results. now let's see:
+microbenchmark(X = mo_fullname(x),
+               times = 10,
+               unit = "ms")
+# Unit: milliseconds
+#  expr      min       lq     mean   median       uq      max neval
+#     X 114.9342 117.1076 129.6448 120.2047 131.5005 168.6371    10

So transforming 500,000 values (!) of 96 unique values only takes 0.12 seconds (120 ms). You only lose time on your unique input values.

Results of a tenfold - 5,000,000 values:

- +
# Unit: milliseconds
+#  expr      min       lq     mean   median       uq      max neval
+#     X 882.9045 901.3011 1001.677 940.3421 1168.088 1226.846    10

Even the full names of 5 Million values are calculated within a second.

Precalculated results

What about precalculated results? If the input is an already precalculated result of a helper function like mo_fullname(), it almost doesn’t take any time at all (see ‘C’ below):

- +
microbenchmark(A = mo_fullname("B_STPHY_AUR"),
+               B = mo_fullname("S. aureus"),
+               C = mo_fullname("Staphylococcus aureus"),
+               times = 10,
+               unit = "ms")
+# Unit: milliseconds
+#  expr       min        lq       mean     median        uq       max neval
+#     A 11.364086 11.460537 11.5104799 11.4795330 11.524860 11.818263    10
+#     B 11.976454 12.012352 12.1704592 12.0853020 12.210004 12.881737    10
+#     C  0.095823  0.102528  0.1167754  0.1153785  0.132629  0.140661    10

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

- +
microbenchmark(A = mo_species("aureus"),
+               B = mo_genus("Staphylococcus"),
+               C = mo_fullname("Staphylococcus aureus"),
+               D = mo_family("Staphylococcaceae"),
+               E = mo_order("Bacillales"),
+               F = mo_class("Bacilli"),
+               G = mo_phylum("Firmicutes"),
+               H = mo_subkingdom("Posibacteria"),
+               I = mo_kingdom("Bacteria"),
+               times = 10,
+               unit = "ms")
+# Unit: milliseconds
+#  expr      min       lq      mean    median       uq      max neval
+#     A 0.105181 0.121314 0.1478538 0.1465265 0.166711 0.211409    10
+#     B 0.132558 0.146388 0.1584278 0.1499835 0.164895 0.208477    10
+#     C 0.135492 0.160355 0.2341847 0.1884665 0.348857 0.395931    10
+#     D 0.109650 0.115727 0.1270481 0.1264130 0.128648 0.168317    10
+#     E 0.081574 0.096940 0.0992582 0.0980915 0.101479 0.120477    10
+#     F 0.081575 0.088489 0.0988463 0.0989650 0.103365 0.126482    10
+#     G 0.091981 0.095333 0.1043568 0.1001530 0.111327 0.129625    10
+#     H 0.092610 0.093169 0.1009135 0.0985455 0.101828 0.120406    10
+#     I 0.087371 0.091213 0.1069758 0.0941815 0.109302 0.192831    10

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

Results in other languages

When the system language is non-English and supported by this AMR package, some functions take a little while longer:

- +
mo_fullname("CoNS", language = "en") # or just mo_fullname("CoNS") on an English system
+# "Coagulase Negative Staphylococcus (CoNS)"
+
+mo_fullname("CoNS", language = "fr") # or just mo_fullname("CoNS") on a French system
+# "Staphylococcus à coagulase négative (CoNS)"
+
+microbenchmark(en = mo_fullname("CoNS", language = "en"),
+               de = mo_fullname("CoNS", language = "de"),
+               nl = mo_fullname("CoNS", language = "nl"),
+               es = mo_fullname("CoNS", language = "es"),
+               it = mo_fullname("CoNS", language = "it"),
+               fr = mo_fullname("CoNS", language = "fr"),
+               pt = mo_fullname("CoNS", language = "pt"),
+               times = 10,
+               unit = "ms")
+# Unit: milliseconds
+#  expr       min       lq      mean    median        uq      max neval
+#    en  6.093583  6.51724  6.555105  6.562986  6.630663  6.99698   100
+#    de 13.934874 14.35137 16.891587 14.462210 14.764658 43.63956   100
+#    nl 13.900092 14.34729 15.943268 14.424565 14.581535 43.76283   100
+#    es 13.833813 14.34596 14.574783 14.439757 14.653994 17.49168   100
+#    it 13.811883 14.36621 15.179060 14.453515 14.812359 43.64284   100
+#    fr 13.798683 14.37019 16.344731 14.468775 14.697610 48.62923   100
+#    pt 13.789674 14.36244 15.706321 14.443772 14.679905 44.76701   100

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

diff --git a/docs/articles/freq.html b/docs/articles/freq.html index 656b19d0..a294b649 100644 --- a/docs/articles/freq.html +++ b/docs/articles/freq.html @@ -178,7 +178,7 @@

How to create frequency tables

Matthijs S. Berends

-

11 January 2019

+

12 January 2019

@@ -196,7 +196,7 @@

Frequencies of one variable

To only show and quickly review the content of one variable, you can just select this variable in various ways. Let’s say we want to get the frequencies of the gender variable of the septic_patients dataset:

- +
septic_patients %>% freq(gender)

Frequency table of gender

@@ -233,21 +233,21 @@ Frequencies of more than one variable

Multiple variables will be pasted into one variable to review individual cases, keeping a univariate frequency table.

For illustration, we could add some more variables to the septic_patients dataset to learn about bacterial properties:

- +
my_patients <- septic_patients %>% left_join_microorganisms()
+# Joining, by = "mo"

Now all variables of the microorganisms dataset have been joined to the septic_patients dataset. The microorganisms dataset consists of the following variables:

- +
colnames(microorganisms)
+#  [1] "mo"         "tsn"        "genus"      "species"    "subspecies"
+#  [6] "fullname"   "family"     "order"      "class"      "phylum"    
+# [11] "subkingdom" "kingdom"    "gramstain"  "prevalence" "ref"

If we compare the dimensions between the old and new dataset, we can see that these 14 variables were added:

-
dim(septic_patients)
-# [1] 2000   49
-dim(my_patients)
-# [1] 2000   63
+
dim(septic_patients)
+# [1] 2000   49
+dim(my_patients)
+# [1] 2000   63

So now the genus and species variables are available. A frequency table of these combined variables can be created like this:

-
my_patients %>%
-  freq(genus, species, nmax = 15)
+
my_patients %>%
+  freq(genus, species, nmax = 15)

Frequency table of genus and species

@@ -388,10 +388,10 @@ Frequencies of numeric values

Frequency tables can be created of any input.

In case of numeric values (like integers, doubles, etc.) additional descriptive statistics will be calculated and shown into the header:

- +
# # get age distribution of unique patients
+septic_patients %>% 
+  distinct(patient_id, .keep_all = TRUE) %>% 
+  freq(age, nmax = 5, header = TRUE)

Frequency table of age
Class: numeric
Length: 981 (of which NA: 0 = 0.00%)
@@ -469,8 +469,8 @@ Outliers: 15 (unique count: 12)

Frequencies of factors

To sort frequencies of factors on factor level instead of item count, use the sort.count parameter.

sort.count is TRUE by default. Compare this default behaviour…

- +
septic_patients %>%
+  freq(hospital_id)

Frequency table of hospital_id

@@ -517,8 +517,8 @@ Outliers: 15 (unique count: 12)

… with this, where items are now sorted on count:

-
septic_patients %>%
-  freq(hospital_id, sort.count = FALSE)
+
septic_patients %>%
+  freq(hospital_id, sort.count = FALSE)

Frequency table of hospital_id

@@ -565,8 +565,8 @@ Outliers: 15 (unique count: 12)

All classes will be printed into the header (default is FALSE when using markdown like this document). Variables with the new rsi class of this AMR package are actually ordered factors and have three classes (look at Class in the header):

-
septic_patients %>%
-  freq(amox, header = TRUE)
+
septic_patients %>%
+  freq(amox, header = TRUE)

Frequency table of amox
Class: factor > ordered > rsi (numeric)
Levels: S < I < R
@@ -614,8 +614,8 @@ Unique: 3

Frequencies of dates

Frequencies of dates will show the oldest and newest date in the data, and the amount of days between them:

-
septic_patients %>%
-  freq(date, nmax = 5, header = TRUE)
+
septic_patients %>%
+  freq(date, nmax = 5, header = TRUE)

Frequency table of date
Class: Date (numeric)
Length: 2,000 (of which NA: 0 = 0.00%)
@@ -681,11 +681,11 @@ Median: 31 July 2009 (47.39%)

Assigning a frequency table to an object

A frequency table is actaually a regular data.frame, with the exception that it contains an additional class.

- +
my_df <- septic_patients %>% freq(age)
+class(my_df)

[1] “frequency_tbl” “data.frame”

Because of this additional class, a frequency table prints like the examples above. But the object itself contains the complete table without a row limitation:

-
dim(my_df)
+
dim(my_df)

[1] 74 5

@@ -696,8 +696,8 @@ Median: 31 July 2009 (47.39%)

Parameter na.rm

With the na.rm parameter (defaults to TRUE, but they will always be shown into the header), you can include NA values in the frequency table:

-
septic_patients %>%
-  freq(amox, na.rm = FALSE)
+
septic_patients %>%
+  freq(amox, na.rm = FALSE)

Frequency table of amox

@@ -749,8 +749,8 @@ Median: 31 July 2009 (47.39%)

Parameter row.names

The default frequency tables shows row indices. To remove them, use row.names = FALSE:

-
septic_patients %>%
-  freq(hospital_id, row.names = FALSE)
+
septic_patients %>%
+  freq(hospital_id, row.names = FALSE)

Frequency table of hospital_id

@@ -797,8 +797,8 @@ Median: 31 July 2009 (47.39%)

Parameter markdown

The markdown parameter is TRUE at default in non-interactive sessions, like in reports created with R Markdown. This will always print all rows, unless nmax is set.

-
septic_patients %>%
-  freq(hospital_id, markdown = TRUE)
+
septic_patients %>%
+  freq(hospital_id, markdown = TRUE)

Frequency table of hospital_id

diff --git a/docs/articles/mo_property.html b/docs/articles/mo_property.html index 8c22946d..97ba39c2 100644 --- a/docs/articles/mo_property.html +++ b/docs/articles/mo_property.html @@ -178,7 +178,7 @@

How to get properties of a microorganism

Matthijs S. Berends

-

11 January 2019

+

12 January 2019

diff --git a/docs/index.html b/docs/index.html index 66eca03e..347bc253 100644 --- a/docs/index.html +++ b/docs/index.html @@ -196,7 +196,6 @@
  • Research Veterinarians
  • Veterinary Epidemiologists
    • -
  • Biomedical Researchers

Microbial Ecology:

    @@ -216,13 +215,13 @@
    • Package developers for R
    • Software developers
      • -
    • Web application developers
      • +
    • Web application / Shiny developers

    Get this package

    This package is available on the official R network (CRAN). Install this package in R with:

    - +
    install.packages("AMR")

    It will be downloaded and installed automatically.

    @@ -235,21 +234,21 @@ Short introduction

    This package contains the complete microbial taxonomic data (with all nine taxonomic ranks - from kingdom to subspecies) from the publicly available Integrated Taxonomic Information System (ITIS, https://www.itis.gov).

    -

    All (sub)species from the taxonomic kingdoms Bacteria, Fungi and Protozoa are included in this package, as well as all previously accepted names known to ITIS. Furthermore, the responsible authors and year of publication are available. This allows users to use authoritative taxonomic information for their data analysis on any microorganism, not only human pathogens. It also helps to quickly determine the Gram stain of bacteria, since all bacteria are classified into subkingdom Negibacteria or Posibacteria.

    +

    All ~20,000 (sub)species from the taxonomic kingdoms Bacteria, Fungi and Protozoa are included in this package, as well as all ~2,500 previously accepted names known to ITIS. Furthermore, the responsible authors and year of publication are available. This allows users to use authoritative taxonomic information for their data analysis on any microorganism, not only human pathogens. It also helps to quickly determine the Gram stain of bacteria, since all bacteria are classified into subkingdom Negibacteria or Posibacteria.

    Read more about ITIS in our manual.

    The AMR package basically does four important things:

      -
    1. -

      It cleanses existing data, by transforming it to reproducible and profound classes, making the most efficient use of R. These functions all use artificial intelligence to guess results that you would expect:

      +
    2. It cleanses existing data, by transforming it to reproducible and profound classes, making the most efficient use of R. These functions all use artificial intelligence to guess results that you would expect:
      3. +
    • Use as.mo() to get an ID of a microorganism. The IDs are human readable for the trained eye - the ID of Klebsiella pneumoniae is “B_KLBSL_PNE” (B stands for Bacteria) and the ID of S. aureus is “B_STPHY_AUR”. The function takes almost any text as input that looks like the name or code of a microorganism like “E. coli”, “esco” and “esccol”. Even as.mo("MRSA") will return the ID of S. aureus. Moreover, it can group all coagulase negative and positive Staphylococci, and can transform Streptococci into Lancefield groups. To find bacteria based on your input, it uses Artificial Intelligence to look up values in the included ITIS data, consisting of more than 18,000 microorganisms.
    • Use as.rsi() to transform values to valid antimicrobial results. It produces just S, I or R based on your input and warns about invalid values. Even values like “<=0.002; S” (combined MIC/RSI) will result in “S”.
    • Use as.mic() to cleanse your MIC values. It produces a so-called factor (called ordinal in SPSS) with valid MIC values as levels. A value like “<=0.002; S” (combined MIC/RSI) will result in “<=0.002”.
    • Use as.atc() to get the ATC code of an antibiotic as defined by the WHO. This package contains a database with most LIS codes, official names, DDDs and even trade names of antibiotics. For example, the values “Furabid”, “Furadantin”, “nitro” all return the ATC code of Nitrofurantoine.
    - -
  • -

    It enhances existing data and adds new data from data sets included in this package.

    +
      +
    1. It enhances existing data and adds new data from data sets included in this package.
      2. +
    • Use eucast_rules() to apply EUCAST expert rules to isolates.
    • Use first_isolate() to identify the first isolates of every patient using guidelines from the CLSI (Clinical and Laboratory Standards Institute). @@ -261,9 +260,9 @@
    • The data set microorganisms contains the complete taxonomic tree of more than 18,000 microorganisms (bacteria, fungi/yeasts and protozoa). Furthermore, the colloquial name and Gram stain are available, which enables resistance analysis of e.g. different antibiotics per Gram stain. The package also contains functions to look up values in this data set like mo_genus(), mo_family(), mo_gramstain() or even mo_phylum(). As they use as.mo() internally, they also use artificial intelligence. For example, mo_genus("MRSA") and mo_genus("S. aureus") will both return "Staphylococcus". They also come with support for German, Dutch, Spanish, Italian, French and Portuguese. These functions can be used to add new variables to your data.
    • The data set antibiotics contains the ATC code, LIS codes, official name, trivial name and DDD of both oral and parenteral administration. It also contains a total of 298 trade names. Use functions like ab_name() and ab_tradenames() to look up values. The ab_* functions use as.atc() internally so they support AI to guess your expected result. For example, ab_name("Fluclox"), ab_name("Floxapen") and ab_name("J01CF05") will all return "Flucloxacillin". These functions can again be used to add new variables to your data.
    -
    • -
  • -

    It analyses the data with convenient functions that use well-known methods.

    +
      +
    1. It analyses the data with convenient functions that use well-known methods.
      2. +
    -
    • -
  • -

    It teaches the user how to use all the above actions.

    +
      +
    1. It teaches the user how to use all the above actions.
      2. +
    • The package contains extensive help pages with many examples.
    • It also contains an example data set called septic_patients. This data set contains: @@ -284,8 +283,6 @@
- -

diff --git a/docs/news/index.html b/docs/news/index.html index 49aaec0b..384d2edc 100644 --- a/docs/news/index.html +++ b/docs/news/index.html @@ -229,47 +229,31 @@
  • BREAKING: removed deprecated functions, parameters and references to ‘bactid’. Use as.mo() to identify an MO code.
    • -
  • New website: https://msberends.gitlab.io/AMR (built with the great pkgdown) -
      +
    • New website: https://msberends.gitlab.io/AMR (built with the great pkgdown)
    • Contains the complete manual of this package and all of its functions with an explanation of their parameters
    • Contains a comprehensive tutorial about how to conduct antimicrobial resistance analysis
      • -
    -
  • Support for dplyr version 0.8.0
  • Function guess_ab_col to find an antibiotic column in a table
  • Function mo_failures() to review values that could not be coerced to a valid MO code, using as.mo(). This latter function will now only show a maximum of 25 uncoerced values.
  • Function mo_renamed() to get a list of all returned values from as.mo() that have had taxonomic renaming
  • Function age() to calculate the (patients) age in years
  • Function age_groups() to split ages into custom or predefined groups (like children or elderly). This allows for easier demographic antimicrobial resistance analysis per age group.
    • -
  • -

    Functions filter_first_isolate() and filter_first_weighted_isolate() to shorten and fasten filtering on data sets with antimicrobial results, e.g.:

    - -

    is equal to:

    -
    septic_patients %>%
-  mutate(only_firsts = first_isolate(septic_patients, ...)) %>%
-  filter(only_firsts == TRUE) %>%
-  select(-only_firsts)
    +
  • Functions filter_first_isolate() and filter_first_weighted_isolate() to shorten and fasten filtering on data sets with antimicrobial results, e.g.: r septic_patients %>% filter_first_isolate() # or filter_first_isolate(septic_patients) is equal to: r septic_patients %>% mutate(only_firsts = first_isolate(septic_patients, ...)) %>% filter(only_firsts == TRUE) %>% select(-only_firsts)
    • -

  • New vignettes about how to conduct AMR analysis, predict antimicrobial resistance, use the G-test and more. These are also available (and even easier readable) on our website: https://msberends.gitlab.io/AMR.

    • +
  • New vignettes about how to conduct AMR analysis, predict antimicrobial resistance, use the G-test and more. These are also available (and even easier readable) on our website: https://msberends.gitlab.io/AMR.

Changed

    -
  • Function eucast_rules(): -
      +
    • Function eucast_rules():
    • Updated EUCAST Clinical breakpoints to version 9.0 of 1 January 2019
    • Fixed a critical bug where some rules that depend on previous applied rules would not be applied adequately
    • Emphasised in manual that penicillin is meant as benzylpenicillin (ATC J01CE01)
      • -
    -
  • Function guess_mo() is now deprecated in favour of as.mo() and will be removed in future versions
    • -
  • Improvements for as.mo(): -
      +
    • Improvements for as.mo():
    • Fix for vector containing only empty values
    • Finds better results when input is in other languages
    • Better handling for subspecies
      • @@ -279,17 +263,12 @@
    • Manual now contains more info about the algorithms
    • Progress bar will be shown when it takes more than 3 seconds to get results
    • Support for formatted console text
      • -
    -
    • -
  • Function first_isolate(): -
      +
    • Function first_isolate():
    • Fixed a bug where distances between dates would not be calculated right - in the septic_patients data set this yielded a difference of 0.15% more isolates
    • Will now use a column named like “patid” for the patient ID (parameter col_patientid), when this parameter was left blank
    • Will now use a column named like “key(…)ab” or “key(…)antibiotics” for the key antibiotics (parameter col_keyantibiotics()), when this parameter was left blank
    • Removed parameter output_logical, the function will now always return a logical value
    • Renamed parameter filter_specimen to specimen_group, although using filter_specimen will still work
      • -
    -
  • A note to the manual pages of the portion functions, that low counts can influence the outcome and that the portion functions may camouflage this, since they only return the portion (albeit being dependent on the minimum parameter)
  • Function mo_taxonomy() now contains the kingdom too
  • Reduce false positives for is.rsi.eligible() @@ -298,8 +277,7 @@
  • Small text updates to summaries of class rsi and mic
    • -
  • Frequency tables (freq() function): -
      +
    • Frequency tables (freq() function):
    • Header info is now available as a list, with the header function
    • Added header info for class mo to show unique count of families, genera and species
    • Now honours the decimal.mark setting, which just like format defaults to getOption("OutDec") @@ -309,8 +287,6 @@
    • New parameter droplevels to exclude empty factor levels when input is a factor
    • Factor levels will be in header when present in input data
      • -
    -
  • Function scale_y_percent() now contains the limits parameter
  • Automatic parameter filling for mdro(), key_antibiotics() and eucast_rules()
    • @@ -352,8 +328,7 @@
  • EUCAST_rules was renamed to eucast_rules, the old function still exists as a deprecated function
    • -
  • Big changes to the eucast_rules function: -
      +
    • Big changes to the eucast_rules function:
    • 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)
    • New parameter rules to specify which rules should be applied (expert rules, breakpoints, others or all)
    • New parameter verbose which can be set to TRUE to get very specific messages about which columns and rows were affected
      • @@ -362,18 +337,11 @@
    • Data set septic_patients now reflects these changes
    • Added parameter pipe for piperacillin (J01CA12), also to the mdro function
    • Small fixes to EUCAST clinical breakpoint rules
      • -
    -
  • Added column kingdom to the microorganisms data set, and function mo_kingdom to look up values
  • Tremendous speed improvement for as.mo (and subsequently all mo_* functions), as empty values wil be ignored a priori
  • Fewer than 3 characters as input for as.mo will return NA
    • -
  • -

    Function as.mo (and all mo_* wrappers) now supports genus abbreviations with “species” attached

    -
    as.mo("E. species")        # B_ESCHR
-mo_fullname("E. spp.")     # "Escherichia species"
-as.mo("S. spp")            # B_STPHY
-mo_fullname("S. species")  # "Staphylococcus species"
    +
  • Function as.mo (and all mo_* wrappers) now supports genus abbreviations with “species” attached r as.mo("E. species") # B_ESCHR mo_fullname("E. spp.") # "Escherichia species" as.mo("S. spp") # B_STPHY mo_fullname("S. species") # "Staphylococcus species"
  • 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 number of isolates would not be met
    • @@ -382,19 +350,18 @@
  • Using portion_* functions now throws a warning when total available isolate is below parameter minimum
  • Functions as.mo, as.rsi, as.mic, as.atc and freq will not set package name as attribute anymore
    • -
  • Frequency tables - freq(): - -
  • first_isolate now tries to find columns to use as input when parameters are left blank
  • Improvements for MDRO algorithm (function mdro)
    • @@ -418,8 +383,7 @@
  • ggplot_rsi and scale_y_percent have breaks parameter
    • -
  • AI improvements for as.mo: -
      +
    • AI improvements for as.mo:
    • "CRS" -> Stenotrophomonas maltophilia
      • @@ -432,8 +396,6 @@
    • "MSSE" -> Staphylococcus epidermidis
      • -
    -
  • Fix for join functions
  • Speed improvement for is.rsi.eligible, now 15-20 times faster
  • In g.test, when sum(x) is below 1000 or any of the expected values is below 5, Fisher’s Exact Test will be suggested
    • @@ -462,8 +424,7 @@ New
    • The data set microorganisms now contains all microbial taxonomic data from ITIS (kingdoms Bacteria, Fungi and Protozoa), the Integrated Taxonomy Information System, available via https://itis.gov. The data set now contains more than 18,000 microorganisms with all known bacteria, fungi and protozoa according ITIS with genus, species, subspecies, family, order, class, phylum and subkingdom. The new data set microorganisms.old contains all previously known taxonomic names from those kingdoms.
      • -
    • New functions based on the existing function mo_property: -
        +
      • New functions based on the existing function mo_property:
      • Taxonomic names: mo_phylum, mo_class, mo_order, mo_family, mo_genus, mo_species, mo_subspecies
      • Semantic names: mo_fullname, mo_shortname @@ -473,52 +434,22 @@
      • Author and year: mo_ref
      -

      They also come with support for German, Dutch, French, Italian, Spanish and Portuguese:

      -
      mo_gramstain("E. coli")
-# [1] "Gram negative"
-mo_gramstain("E. coli", language = "de") # German
-# [1] "Gramnegativ"
-mo_gramstain("E. coli", language = "es") # Spanish
-# [1] "Gram negativo"
-mo_fullname("S. group A", language = "pt") # Portuguese
-# [1] "Streptococcus grupo A"
      -

      Furthermore, former taxonomic names will give a note about the current taxonomic name:

      - -
      • -
    • Functions count_R, count_IR, count_I, count_SI and count_S to selectively count resistant or susceptible isolates +

      They also come with support for German, Dutch, French, Italian, Spanish and Portuguese: r mo_gramstain("E. coli") # [1] "Gram negative" mo_gramstain("E. coli", language = "de") # German # [1] "Gramnegativ" mo_gramstain("E. coli", language = "es") # Spanish # [1] "Gram negativo" mo_fullname("S. group A", language = "pt") # Portuguese # [1] "Streptococcus grupo A"

      +

      Furthermore, former taxonomic names will give a note about the current taxonomic name: r mo_gramstain("Esc blattae") # Note: 'Escherichia blattae' (Burgess et al., 1973) was renamed 'Shimwellia blattae' (Priest and Barker, 2010) # [1] "Gram negative"

        +
      • Functions count_R, count_IR, count_I, count_SI and count_S to selectively count resistant or susceptible isolates
      • Extra function count_df (which works like portion_df) to get all counts of S, I and R of a data set with antibiotic columns, with support for grouped variables
        • -
      -
    • Function is.rsi.eligible to check for columns that have valid antimicrobial results, but do not have the rsi class yet. Transform the columns of your raw data with: data %>% mutate_if(is.rsi.eligible, as.rsi)
      • -
    • -

      Functions as.mo and is.mo as replacements for as.bactid and is.bactid (since the microoganisms data set not only contains bacteria). These last two functions are deprecated and will be removed in a future release. The as.mo function determines microbial IDs using Artificial Intelligence (AI):

      - -

      And with great speed too - on a quite regular Linux server from 2007 it takes us less than 0.02 seconds to transform 25,000 items:

      - +
    • Functions as.mo and is.mo as replacements for as.bactid and is.bactid (since the microoganisms data set not only contains bacteria). These last two functions are deprecated and will be removed in a future release. The as.mo function determines microbial IDs using Artificial Intelligence (AI): r as.mo("E. coli") # [1] B_ESCHR_COL as.mo("MRSA") # [1] B_STPHY_AUR as.mo("S group A") # [1] B_STRPTC_GRA And with great speed too - on a quite regular Linux server from 2007 it takes us less than 0.02 seconds to transform 25,000 items: r thousands_of_E_colis <- rep("E. coli", 25000) microbenchmark::microbenchmark(as.mo(thousands_of_E_colis), unit = "s") # Unit: seconds # min median max neval # 0.01817717 0.01843957 0.03878077 100
    • Added parameter reference_df for as.mo, so users can supply their own microbial IDs, name or codes as a reference table
      • -
    • Renamed all previous references to bactid to mo, like: -
        +
      • Renamed all previous references to bactid to mo, like:
      • Column names inputs of EUCAST_rules, first_isolate and key_antibiotics
      • Column names of datasets microorganisms and septic_patients
      • All old syntaxes will still work with this version, but will throw warnings
        • -
      -
    • Function labels_rsi_count to print datalabels on a RSI ggplot2 model

    • Functions as.atc and is.atc to transform/look up antibiotic ATC codes as defined by the WHO. The existing function guess_atc is now an alias of as.atc.

    • Function ab_property and its aliases: ab_name, ab_tradenames, ab_certe, ab_umcg and ab_trivial_nl @@ -533,14 +464,7 @@ Changed
      • Added three antimicrobial agents to the antibiotics data set: Terbinafine (D01BA02), Rifaximin (A07AA11) and Isoconazole (D01AC05)
        • -
      • -

        Added 163 trade names to the antibiotics data set, it now contains 298 different trade names in total, e.g.:

        -
        ab_official("Bactroban")
-# [1] "Mupirocin"
-ab_name(c("Bactroban", "Amoxil", "Zithromax", "Floxapen"))
-# [1] "Mupirocin" "Amoxicillin" "Azithromycin" "Flucloxacillin"
-ab_atc(c("Bactroban", "Amoxil", "Zithromax", "Floxapen"))
-# [1] "R01AX06" "J01CA04" "J01FA10" "J01CF05"
        +
      • Added 163 trade names to the antibiotics data set, it now contains 298 different trade names in total, e.g.: r ab_official("Bactroban") # [1] "Mupirocin" ab_name(c("Bactroban", "Amoxil", "Zithromax", "Floxapen")) # [1] "Mupirocin" "Amoxicillin" "Azithromycin" "Flucloxacillin" ab_atc(c("Bactroban", "Amoxil", "Zithromax", "Floxapen")) # [1] "R01AX06" "J01CA04" "J01FA10" "J01CF05"
      • For first_isolate, rows will be ignored when there’s no species available
      • Function ratio is now deprecated and will be removed in a future release, as it is not really the scope of this package
        • @@ -549,36 +473,9 @@
      • Added prevalence column to the microorganisms data set
      • Added parameters minimum and as_percent to portion_df
        • -
      • -

        Support for quasiquotation in the functions series count_* and portions_*, and n_rsi. This allows to check for more than 2 vectors or columns.

        - -
        • -
      • Edited ggplot_rsi and geom_rsi so they can cope with count_df. The new fun parameter has value portion_df at default, but can be set to count_df.
        • -
      • Fix for ggplot_rsi when the ggplot2 package was not loaded
        • -
      • Added datalabels function labels_rsi_count to ggplot_rsi -
        • -
      • Added possibility to set any parameter to geom_rsi (and ggplot_rsi) so you can set your own preferences
        • -
      • Fix for joins, where predefined suffices would not be honoured
        • -
      • Added parameter quote to the freq function
        • -
      • Added generic function diff for frequency tables
        • -
      • Added longest en shortest character length in the frequency table (freq) header of class character -
        • -
      • -

        Support for types (classes) list and matrix for freq

        -
        my_matrix = with(septic_patients, matrix(c(age, gender), ncol = 2))
-freq(my_matrix)
        -

        For lists, subsetting is possible:

        -
        my_list = list(age = septic_patients$age, gender = septic_patients$gender)
-my_list %>% freq(age)
-my_list %>% freq(gender)
        -
        • +
      • Support for quasiquotation in the functions series count_* and portions_*, and n_rsi. This allows to check for more than 2 vectors or columns. ```r septic_patients %>% select(amox, cipr) %>% count_IR() # which is the same as: septic_patients %>% count_IR(amox, cipr)
      +

      septic_patients %>% portion_S(amcl) septic_patients %>% portion_S(amcl, gent) septic_patients %>% portion_S(amcl, gent, pita) * Edited `ggplot_rsi` and `geom_rsi` so they can cope with `count_df`. The new `fun` parameter has value `portion_df` at default, but can be set to `count_df`. * Fix for `ggplot_rsi` when the `ggplot2` package was not loaded * Added datalabels function `labels_rsi_count` to `ggplot_rsi` * Added possibility to set any parameter to `geom_rsi` (and `ggplot_rsi`) so you can set your own preferences * Fix for joins, where predefined suffices would not be honoured * Added parameter `quote` to the `freq` function * Added generic function `diff` for frequency tables * Added longest en shortest character length in the frequency table (`freq`) header of class `character` * Support for types (classes) list and matrix for `freq`r my_matrix = with(septic_patients, matrix(c(age, gender), ncol = 2)) freq(my_matrix) For lists, subsetting is possible:r my_list = list(age = septic_patients$age, gender = septic_patients$gender) my_list %>% freq(age) my_list %>% freq(gender) ```

@@ -597,21 +494,15 @@ New

  • -BREAKING: rsi_df was removed in favour of new functions portion_R, portion_IR, portion_I, portion_SI and portion_S to selectively calculate resistance or susceptibility. These functions are 20 to 30 times faster than the old rsi function. The old function still works, but is deprecated. -
      +BREAKING: rsi_df was removed in favour of new functions portion_R, portion_IR, portion_I, portion_SI and portion_S to selectively calculate resistance or susceptibility. These functions are 20 to 30 times faster than the old rsi function. The old function still works, but is deprecated.
    • New function portion_df to get all portions of S, I and R of a data set with antibiotic columns, with support for grouped variables
      • -
    -
  • -BREAKING: the methodology for determining first weighted isolates was changed. The antibiotics that are compared between isolates (call key antibiotics) to include more first isolates (afterwards called first weighted isolates) are now as follows: -
      +BREAKING: the methodology for determining first weighted isolates was changed. The antibiotics that are compared between isolates (call key antibiotics) to include more first isolates (afterwards called first weighted isolates) are now as follows:
    • Universal: amoxicillin, amoxicillin/clavlanic acid, cefuroxime, piperacillin/tazobactam, ciprofloxacin, trimethoprim/sulfamethoxazole
    • Gram-positive: vancomycin, teicoplanin, tetracycline, erythromycin, oxacillin, rifampicin
    • Gram-negative: gentamicin, tobramycin, colistin, cefotaxime, ceftazidime, meropenem
      • -
    -
  • Support for ggplot2 -
      +
    • New functions geom_rsi, facet_rsi, scale_y_percent, scale_rsi_colours and theme_rsi
    • New wrapper function ggplot_rsi to apply all above functions on a data set: @@ -622,32 +513,22 @@
    • -
- -
  • Determining bacterial ID: -
      +
    • Determining bacterial ID:
    • New functions as.bactid and is.bactid to transform/ look up microbial ID’s.
    • The existing function guess_bactid is now an alias of as.bactid
    • New Becker classification for Staphylococcus to categorise them into Coagulase Negative Staphylococci (CoNS) and Coagulase Positve Staphylococci (CoPS)
    • New Lancefield classification for Streptococcus to categorise them into Lancefield groups
      • -
    -
  • For convience, new descriptive statistical functions kurtosis and skewness that are lacking in base R - they are generic functions and have support for vectors, data.frames and matrices
  • Function g.test to perform the Χ2 distributed G-test, which use is the same as chisq.test
    • -
  • -Function ratio to transform a vector of values to a preset ratio - -
  • Support for Addins menu in RStudio to quickly insert %in% or %like% (and give them keyboard shortcuts), or to view the datasets that come with this package
  • Function p.symbol to transform p values to their related symbols: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
  • Functions clipboard_import and clipboard_export as helper functions to quickly copy and paste from/to software like Excel and SPSS. These functions use the clipr package, but are a little altered to also support headless Linux servers (so you can use it in RStudio Server)
    • -
  • New for frequency tables (function freq): -
      +
    • New for frequency tables (function freq):
    • A vignette to explain its usage
    • Support for rsi (antimicrobial resistance) to use as input
    • Support for table to use as input: freq(table(x, y)) @@ -662,8 +543,6 @@
    • Header of frequency tables now also show Mean Absolute Deviaton (MAD) and Interquartile Range (IQR)
    • Possibility to globally set the default for the amount of items to print, with options(max.print.freq = n) where n is your preset value
    -
    • -

    @@ -685,27 +564,21 @@
  • Small improvements to the microorganisms dataset (especially for Salmonella) and the column bactid now has the new class "bactid"
    • -
  • Combined MIC/RSI values will now be coerced by the rsi and mic functions: - -
  • Now possible to coerce MIC values with a space between operator and value, i.e. as.mic("<= 0.002") now works
  • Classes rsi and mic do not add the attribute package.version anymore
  • Added "groups" option for atc_property(..., property). It will return a vector of the ATC hierarchy as defined by the WHO. The new function atc_groups is a convenient wrapper around this.
  • Build-in host check for atc_property as it requires the host set by url to be responsive
  • Improved first_isolate algorithm to exclude isolates where bacteria ID or genus is unavailable
  • Fix for warning hybrid evaluation forced for row_number (924b62) from the dplyr package v0.7.5 and above
    • -
  • Support for empty values and for 1 or 2 columns as input for guess_bactid (now called as.bactid) -
      +
    • Support for empty values and for 1 or 2 columns as input for guess_bactid (now called as.bactid)
    • So yourdata %>% select(genus, species) %>% as.bactid() now also works
      • -
    -
  • Other small fixes

    • @@ -713,14 +586,11 @@

    Other

    @@ -739,13 +609,10 @@
  • Function guess_bactid to determine the ID of a microorganism based on genus/species or known abbreviations like MRSA
  • Function guess_atc to determine the ATC of an antibiotic based on name, trade name, or known abbreviations
  • Function freq to create frequency tables, with additional info in a header
    • -
  • Function MDRO to determine Multi Drug Resistant Organisms (MDRO) with support for country-specific guidelines. -
      +
    • Function MDRO to determine Multi Drug Resistant Organisms (MDRO) with support for country-specific guidelines.
    • Exceptional resistances defined by EUCAST are also supported instead of countries alone
    • Functions BRMO and MRGN are wrappers for Dutch and German guidelines, respectively
      • -
    -
  • New algorithm to determine weighted isolates, can now be "points" or "keyantibiotics", see ?first_isolate
  • New print format for tibbles and data.tables
    • diff --git a/docs/pkgdown.yml b/docs/pkgdown.yml index 31227eab..3c396dbb 100644 --- a/docs/pkgdown.yml +++ b/docs/pkgdown.yml @@ -1,4 +1,4 @@ -pandoc: 2.3.1 +pandoc: 1.17.2 pkgdown: 1.3.0 pkgdown_sha: ~ articles: diff --git a/docs/reference/ITIS.html b/docs/reference/ITIS.html index 8463d5f7..43278681 100644 --- a/docs/reference/ITIS.html +++ b/docs/reference/ITIS.html @@ -233,7 +233,7 @@


    This package contains the complete microbial taxonomic data (with all nine taxonomic ranks - from kingdom to subspecies) from the publicly available Integrated Taxonomic Information System (ITIS, https://www.itis.gov).

    -

    All (sub)species from the taxonomic kingdoms Bacteria, Fungi and Protozoa are included in this package, as well as all previously accepted names known to ITIS. Furthermore, the responsible authors and year of publication are available. This allows users to use authoritative taxonomic information for their data analysis on any microorganism, not only human pathogens. It also helps to quickly determine the Gram stain of bacteria, since all bacteria are classified into subkingdom Negibacteria or Posibacteria.

    +

    All ~20,000 (sub)species from the taxonomic kingdoms Bacteria, Fungi and Protozoa are included in this package, as well as all ~2,500 previously accepted names known to ITIS. Furthermore, the responsible authors and year of publication are available. This allows users to use authoritative taxonomic information for their data analysis on any microorganism, not only human pathogens. It also helps to quickly determine the Gram stain of bacteria, since all bacteria are classified into subkingdom Negibacteria or Posibacteria.

    ITIS is a partnership of U.S., Canadian, and Mexican agencies and taxonomic specialists [3].

    Read more on our website!

    diff --git a/docs/reference/age.html b/docs/reference/age.html index f3b014a1..b7d10a4c 100644 --- a/docs/reference/age.html +++ b/docs/reference/age.html @@ -47,7 +47,7 @@ - + @@ -223,7 +223,7 @@
    -

    Calculates age in years based on a reference date, which is the sytem time at default.

    +

    Calculates age in years based on a reference date, which is the sytem date at default.

    @@ -238,7 +238,7 @@ - +
    reference

    reference date(s) (defaults to today), will be coerced with as.POSIXlt

    reference date(s) (defaults to today), will be coerced with as.POSIXlt and cannot be lower than x
    @@ -254,7 +254,7 @@ On our website https://msberends.gitla

    See also

    -

    age_groups to splits age into groups

    +

    age_groups to split age into age groups

    diff --git a/docs/reference/age_groups.html b/docs/reference/age_groups.html index 7ab69c23..82a47bf0 100644 --- a/docs/reference/age_groups.html +++ b/docs/reference/age_groups.html @@ -249,7 +249,7 @@

    Details

    To split ages, the input can be:

      -

    • A numeric vector. A vector of c(10, 20) will split on 0-9, 10-19 and 20+. A value of only 50 will split on 0-49 and 50+. +

    • A numeric vector. A vector of e.g. c(10, 20) will split on 0-9, 10-19 and 20+. A value of only 50 will split on 0-49 and 50+. The default is to split on young children (0-11), youth (12-24), young adults (26-54), middle-aged adults (55-74) and elderly (75+).

    • A character:

      • "children", equivalent of: c(0, 1, 2, 4, 6, 13, 18). This will split on 0, 1, 2-3, 4-5, 6-12, 13-17 and 18+.

        • @@ -296,11 +296,11 @@ On our website https://msberends.gitla # resistance of ciprofloxacine per age group library(dplyr) septic_patients %>% - mutate(first_isolate = first_isolate(.)) %>% - filter(first_isolate == TRUE, + mutate(first_isolate = first_isolate(.)) %>% + filter(first_isolate == TRUE, mo == as.mo("E. coli")) %>% - group_by(age_group = age_groups(age)) %>% - select(age_group, + group_by(age_group = age_groups(age)) %>% + select(age_group, cipr) %>% ggplot_rsi(x = "age_group") # } diff --git a/docs/reference/as.mo.html b/docs/reference/as.mo.html index e3a5f22d..2097430a 100644 --- a/docs/reference/as.mo.html +++ b/docs/reference/as.mo.html @@ -309,7 +309,7 @@


        This package contains the complete microbial taxonomic data (with all nine taxonomic ranks - from kingdom to subspecies) from the publicly available Integrated Taxonomic Information System (ITIS, https://www.itis.gov).

        -

        All (sub)species from the taxonomic kingdoms Bacteria, Fungi and Protozoa are included in this package, as well as all previously accepted names known to ITIS. Furthermore, the responsible authors and year of publication are available. This allows users to use authoritative taxonomic information for their data analysis on any microorganism, not only human pathogens. It also helps to quickly determine the Gram stain of bacteria, since all bacteria are classified into subkingdom Negibacteria or Posibacteria.

        +

        All ~20,000 (sub)species from the taxonomic kingdoms Bacteria, Fungi and Protozoa are included in this package, as well as all ~2,500 previously accepted names known to ITIS. Furthermore, the responsible authors and year of publication are available. This allows users to use authoritative taxonomic information for their data analysis on any microorganism, not only human pathogens. It also helps to quickly determine the Gram stain of bacteria, since all bacteria are classified into subkingdom Negibacteria or Posibacteria.

        ITIS is a partnership of U.S., Canadian, and Mexican agencies and taxonomic specialists [3].

        Read more on our website!

        @@ -364,16 +364,16 @@ The mo_property functions (like # the select function of tidyverse is also supported: library(dplyr) df$mo <- df %>% - select(microorganism_name) %>% + select(microorganism_name) %>% as.mo() # and can even contain 2 columns, which is convenient for genus/species combinations: df$mo <- df %>% - select(genus, species) %>% + select(genus, species) %>% as.mo() # although this works easier and does the same: df <- df %>% - mutate(mo = as.mo(paste(genus, species))) + mutate(mo = as.mo(paste(genus, species))) # } diff --git a/docs/reference/count.html b/docs/reference/count.html index 0b1af0a6..4b430fc3 100644 --- a/docs/reference/count.html +++ b/docs/reference/count.html @@ -282,7 +282,7 @@ count_R and count_IR can be used to count resistant isolates, count_S and count_

        Details

        These functions are meant to count isolates. Use the portion_* functions to calculate microbial resistance.

        -

        n_rsi is an alias of count_all. They can be used to count all available isolates, i.e. where all input antibiotics have an available result (S, I or R). Their use is equal to n_distinct. Their function is equal to count_S(...) + count_IR(...).

        +

        n_rsi is an alias of count_all. They can be used to count all available isolates, i.e. where all input antibiotics have an available result (S, I or R). Their use is equal to n_distinct. Their function is equal to count_S(...) + count_IR(...).

        count_df takes any variable from data that has an "rsi" class (created with as.rsi) and counts the amounts of R, I and S. The resulting tidy data (see Source) data.frame will have three rows (S/I/R) and a column for each variable with class "rsi".

        Read more on our website!

        @@ -321,13 +321,13 @@ On our website https://msberends.gitla library(dplyr) septic_patients %>% - group_by(hospital_id) %>% - summarise(R = count_R(cipr), + group_by(hospital_id) %>% + summarise(R = count_R(cipr), I = count_I(cipr), S = count_S(cipr), n1 = count_all(cipr), # the actual total; sum of all three n2 = n_rsi(cipr), # same - analogous to n_distinct - total = n()) # NOT the amount of tested isolates! + total = n()) # NOT the amount of tested isolates! # Count co-resistance between amoxicillin/clav acid and gentamicin, # so we can see that combination therapy does a lot more than mono therapy. @@ -345,13 +345,13 @@ On our website https://msberends.gitla # Get portions S/I/R immediately of all rsi columns septic_patients %>% - select(amox, cipr) %>% + select(amox, cipr) %>% count_df(translate = FALSE) # It also supports grouping variables septic_patients %>% - select(hospital_id, amox, cipr) %>% - group_by(hospital_id) %>% + select(hospital_id, amox, cipr) %>% + group_by(hospital_id) %>% count_df(translate = FALSE) # } diff --git a/docs/reference/first_isolate.html b/docs/reference/first_isolate.html index 679cb3a7..a45519bf 100644 --- a/docs/reference/first_isolate.html +++ b/docs/reference/first_isolate.html @@ -368,11 +368,11 @@ On our website https://msberends.gitla library(dplyr) # Filter on first isolates: septic_patients %>% - mutate(first_isolate = first_isolate(., + mutate(first_isolate = first_isolate(., col_date = "date", col_patient_id = "patient_id", col_mo = "mo")) %>% - filter(first_isolate == TRUE) + filter(first_isolate == TRUE) # Which can be shortened to: septic_patients %>% @@ -383,14 +383,14 @@ On our website https://msberends.gitla # Now let's see if first isolates matter: A <- septic_patients %>% - group_by(hospital_id) %>% - summarise(count = n_rsi(gent), # gentamicin availability + group_by(hospital_id) %>% + summarise(count = n_rsi(gent), # gentamicin availability resistance = portion_IR(gent)) # gentamicin resistance B <- septic_patients %>% filter_first_weighted_isolate() %>% # the 1st isolate filter - group_by(hospital_id) %>% - summarise(count = n_rsi(gent), # gentamicin availability + group_by(hospital_id) %>% + summarise(count = n_rsi(gent), # gentamicin availability resistance = portion_IR(gent)) # gentamicin resistance # Have a look at A and B. diff --git a/docs/reference/freq.html b/docs/reference/freq.html index 5d8ea29b..1cf1f0f8 100644 --- a/docs/reference/freq.html +++ b/docs/reference/freq.html @@ -385,34 +385,34 @@ On our website https://msberends.gitla # you could also use `select` or `pull` to get your variables septic_patients %>% - filter(hospital_id == "A") %>% - select(mo) %>% + filter(hospital_id == "A") %>% + select(mo) %>% freq() # multiple selected variables will be pasted together septic_patients %>% left_join_microorganisms %>% - filter(hospital_id == "A") %>% + filter(hospital_id == "A") %>% freq(genus, species) # group a variable and analyse another septic_patients %>% - group_by(hospital_id) %>% + group_by(hospital_id) %>% freq(gender) # get top 10 bugs of hospital A as a vector septic_patients %>% - filter(hospital_id == "A") %>% + filter(hospital_id == "A") %>% freq(mo) %>% top_freq(10) # save frequency table to an object years <- septic_patients %>% - mutate(year = format(date, "%Y")) %>% + mutate(year = format(date, "%Y")) %>% freq(year) @@ -463,11 +463,11 @@ On our website https://msberends.gitla # only get selected columns septic_patients %>% freq(hospital_id) %>% - select(item, percent) + select(item, percent) septic_patients %>% freq(hospital_id) %>% - select(-count, -cum_count) + select(-count, -cum_count) # check differences between frequency tables diff --git a/docs/reference/g.test.html b/docs/reference/g.test.html index 3d59d670..e11fbfef 100644 --- a/docs/reference/g.test.html +++ b/docs/reference/g.test.html @@ -306,7 +306,7 @@

        Use the G-test of independence when you have two nominal variables, each with two or more possible values. You want to know whether the proportions for one variable are different among values of the other variable.

        It is also possible to do a G-test of independence with more than two nominal variables. For example, Jackson et al. (2013) also had data for children under 3, so you could do an analysis of old vs. young, thigh vs. arm, and reaction vs. no reaction, all analyzed together.

        -

        Fisher's exact test (fisher.test) is more accurate than the G-test of independence when the expected numbers are small, so it is recommend to only use the G-test if your total sample size is greater than 1000.

        +

        Fisher's exact test (fisher.test) is an exact test, where the G-test is still only an approximation. For any 2x2 table, Fisher's Exact test may be slower but will still run in seconds, even if the sum of your observations is multiple millions.

        The G-test of independence is an alternative to the chi-square test of independence (chisq.test), and they will give approximately the same results.

        How the test works

        diff --git a/docs/reference/ggplot_rsi.html b/docs/reference/ggplot_rsi.html index b1fad1b3..6e55fe3c 100644 --- a/docs/reference/ggplot_rsi.html +++ b/docs/reference/ggplot_rsi.html @@ -334,7 +334,7 @@ On our website https://msberends.gitla library(ggplot2) # get antimicrobial results for drugs against a UTI: -ggplot(septic_patients %>% select(amox, nitr, fosf, trim, cipr)) + +ggplot(septic_patients %>% select(amox, nitr, fosf, trim, cipr)) + geom_rsi() # prettify the plot using some additional functions: @@ -348,17 +348,17 @@ On our website https://msberends.gitla # or better yet, simplify this using the wrapper function - a single command: septic_patients %>% - select(amox, nitr, fosf, trim, cipr) %>% + select(amox, nitr, fosf, trim, cipr) %>% ggplot_rsi() # get only portions and no counts: septic_patients %>% - select(amox, nitr, fosf, trim, cipr) %>% + select(amox, nitr, fosf, trim, cipr) %>% ggplot_rsi(fun = portion_df) # add other ggplot2 parameters as you like: septic_patients %>% - select(amox, nitr, fosf, trim, cipr) %>% + select(amox, nitr, fosf, trim, cipr) %>% ggplot_rsi(width = 0.5, colour = "black", size = 1, @@ -367,25 +367,25 @@ On our website https://msberends.gitla # resistance of ciprofloxacine per age group septic_patients %>% - mutate(first_isolate = first_isolate(.)) %>% - filter(first_isolate == TRUE, + mutate(first_isolate = first_isolate(.)) %>% + filter(first_isolate == TRUE, mo == as.mo("E. coli")) %>% # `age_group` is also a function of this package: - group_by(age_group = age_groups(age)) %>% - select(age_group, + group_by(age_group = age_groups(age)) %>% + select(age_group, cipr) %>% ggplot_rsi(x = "age_group") # }# NOT RUN { # for colourblind mode, use divergent colours from the viridis package: septic_patients %>% - select(amox, nitr, fosf, trim, cipr) %>% + select(amox, nitr, fosf, trim, cipr) %>% ggplot_rsi() + scale_fill_viridis_d() # it also supports groups (don't forget to use the group var on `x` or `facet`): septic_patients %>% - select(hospital_id, amox, nitr, fosf, trim, cipr) %>% - group_by(hospital_id) %>% + select(hospital_id, amox, nitr, fosf, trim, cipr) %>% + group_by(hospital_id) %>% ggplot_rsi(x = hospital_id, facet = Antibiotic, nrow = 1) + @@ -395,22 +395,22 @@ On our website https://msberends.gitla # genuine analysis: check 2 most prevalent microorganisms septic_patients %>% # create new bacterial ID's, with all CoNS under the same group (Becker et al.) - mutate(mo = as.mo(mo, Becker = TRUE)) %>% + mutate(mo = as.mo(mo, Becker = TRUE)) %>% # filter on top three bacterial ID's - filter(mo %in% top_freq(freq(.$mo), 3)) %>% + filter(mo %in% top_freq(freq(.$mo), 3)) %>% # determine first isolates - mutate(first_isolate = first_isolate(., + mutate(first_isolate = first_isolate(., col_date = "date", col_patient_id = "patient_id", col_mo = "mo")) %>% # filter on first isolates - filter(first_isolate == TRUE) %>% + filter(first_isolate == TRUE) %>% # get short MO names (like "E. coli") - mutate(mo = mo_shortname(mo, Becker = TRUE)) %>% + mutate(mo = mo_shortname(mo, Becker = TRUE)) %>% # select this short name and some antiseptic drugs - select(mo, cfur, gent, cipr) %>% + select(mo, cfur, gent, cipr) %>% # group by MO - group_by(mo) %>% + group_by(mo) %>% # plot the thing, putting MOs on the facet ggplot_rsi(x = Antibiotic, facet = mo, diff --git a/docs/reference/like.html b/docs/reference/like.html index 8d733814..eb0bf08d 100644 --- a/docs/reference/like.html +++ b/docs/reference/like.html @@ -295,7 +295,7 @@ On our website https://msberends.gitla library(dplyr) septic_patients %>% left_join_microorganisms() %>% - filter(genus %like% '^ent') %>% + filter(genus %like% '^ent') %>% freq(genus, species) # } diff --git a/docs/reference/microorganisms.html b/docs/reference/microorganisms.html index 377e80a3..0a1d0742 100644 --- a/docs/reference/microorganisms.html +++ b/docs/reference/microorganisms.html @@ -258,7 +258,7 @@


        This package contains the complete microbial taxonomic data (with all nine taxonomic ranks - from kingdom to subspecies) from the publicly available Integrated Taxonomic Information System (ITIS, https://www.itis.gov).

        -

        All (sub)species from the taxonomic kingdoms Bacteria, Fungi and Protozoa are included in this package, as well as all previously accepted names known to ITIS. Furthermore, the responsible authors and year of publication are available. This allows users to use authoritative taxonomic information for their data analysis on any microorganism, not only human pathogens. It also helps to quickly determine the Gram stain of bacteria, since all bacteria are classified into subkingdom Negibacteria or Posibacteria.

        +

        All ~20,000 (sub)species from the taxonomic kingdoms Bacteria, Fungi and Protozoa are included in this package, as well as all ~2,500 previously accepted names known to ITIS. Furthermore, the responsible authors and year of publication are available. This allows users to use authoritative taxonomic information for their data analysis on any microorganism, not only human pathogens. It also helps to quickly determine the Gram stain of bacteria, since all bacteria are classified into subkingdom Negibacteria or Posibacteria.

        ITIS is a partnership of U.S., Canadian, and Mexican agencies and taxonomic specialists [3].

        Read more on our website!

        diff --git a/docs/reference/microorganisms.old.html b/docs/reference/microorganisms.old.html index cdf8bbb8..c4c2548c 100644 --- a/docs/reference/microorganisms.old.html +++ b/docs/reference/microorganisms.old.html @@ -247,7 +247,7 @@


        This package contains the complete microbial taxonomic data (with all nine taxonomic ranks - from kingdom to subspecies) from the publicly available Integrated Taxonomic Information System (ITIS, https://www.itis.gov).

        -

        All (sub)species from the taxonomic kingdoms Bacteria, Fungi and Protozoa are included in this package, as well as all previously accepted names known to ITIS. Furthermore, the responsible authors and year of publication are available. This allows users to use authoritative taxonomic information for their data analysis on any microorganism, not only human pathogens. It also helps to quickly determine the Gram stain of bacteria, since all bacteria are classified into subkingdom Negibacteria or Posibacteria.

        +

        All ~20,000 (sub)species from the taxonomic kingdoms Bacteria, Fungi and Protozoa are included in this package, as well as all ~2,500 previously accepted names known to ITIS. Furthermore, the responsible authors and year of publication are available. This allows users to use authoritative taxonomic information for their data analysis on any microorganism, not only human pathogens. It also helps to quickly determine the Gram stain of bacteria, since all bacteria are classified into subkingdom Negibacteria or Posibacteria.

        ITIS is a partnership of U.S., Canadian, and Mexican agencies and taxonomic specialists [3].

        Read more on our website!

        diff --git a/docs/reference/mo_property.html b/docs/reference/mo_property.html index 9992a80c..93e6eb5b 100644 --- a/docs/reference/mo_property.html +++ b/docs/reference/mo_property.html @@ -314,7 +314,7 @@


        This package contains the complete microbial taxonomic data (with all nine taxonomic ranks - from kingdom to subspecies) from the publicly available Integrated Taxonomic Information System (ITIS, https://www.itis.gov).

        -

        All (sub)species from the taxonomic kingdoms Bacteria, Fungi and Protozoa are included in this package, as well as all previously accepted names known to ITIS. Furthermore, the responsible authors and year of publication are available. This allows users to use authoritative taxonomic information for their data analysis on any microorganism, not only human pathogens. It also helps to quickly determine the Gram stain of bacteria, since all bacteria are classified into subkingdom Negibacteria or Posibacteria.

        +

        All ~20,000 (sub)species from the taxonomic kingdoms Bacteria, Fungi and Protozoa are included in this package, as well as all ~2,500 previously accepted names known to ITIS. Furthermore, the responsible authors and year of publication are available. This allows users to use authoritative taxonomic information for their data analysis on any microorganism, not only human pathogens. It also helps to quickly determine the Gram stain of bacteria, since all bacteria are classified into subkingdom Negibacteria or Posibacteria.

        ITIS is a partnership of U.S., Canadian, and Mexican agencies and taxonomic specialists [3].

        Source

        diff --git a/docs/reference/portion.html b/docs/reference/portion.html index 54e8cb51..38753337 100644 --- a/docs/reference/portion.html +++ b/docs/reference/portion.html @@ -340,17 +340,17 @@ On our website https://msberends.gitla septic_patients %>% portion_SI(amox) septic_patients %>% - group_by(hospital_id) %>% - summarise(p = portion_S(cipr), + group_by(hospital_id) %>% + summarise(p = portion_S(cipr), n = n_rsi(cipr)) # n_rsi works like n_distinct in dplyr septic_patients %>% - group_by(hospital_id) %>% - summarise(R = portion_R(cipr, as_percent = TRUE), + group_by(hospital_id) %>% + summarise(R = portion_R(cipr, as_percent = TRUE), I = portion_I(cipr, as_percent = TRUE), S = portion_S(cipr, as_percent = TRUE), n = n_rsi(cipr), # works like n_distinct in dplyr - total = n()) # NOT the amount of tested isolates! + total = n()) # NOT the amount of tested isolates! # Calculate co-resistance between amoxicillin/clav acid and gentamicin, # so we can see that combination therapy does a lot more than mono therapy: @@ -365,8 +365,8 @@ On our website https://msberends.gitla septic_patients %>% - group_by(hospital_id) %>% - summarise(cipro_p = portion_S(cipr, as_percent = TRUE), + group_by(hospital_id) %>% + summarise(cipro_p = portion_S(cipr, as_percent = TRUE), cipro_n = count_all(cipr), genta_p = portion_S(gent, as_percent = TRUE), genta_n = count_all(gent), @@ -375,22 +375,22 @@ On our website https://msberends.gitla # Get portions S/I/R immediately of all rsi columns septic_patients %>% - select(amox, cipr) %>% + select(amox, cipr) %>% portion_df(translate = FALSE) # It also supports grouping variables septic_patients %>% - select(hospital_id, amox, cipr) %>% - group_by(hospital_id) %>% + select(hospital_id, amox, cipr) %>% + group_by(hospital_id) %>% portion_df(translate = FALSE) # }# NOT RUN { # calculate current empiric combination therapy of Helicobacter gastritis: my_table %>% - filter(first_isolate == TRUE, + filter(first_isolate == TRUE, genus == "Helicobacter") %>% - summarise(p = portion_S(amox, metr), # amoxicillin with metronidazole + summarise(p = portion_S(amox, metr), # amoxicillin with metronidazole n = count_all(amox, metr)) # } diff --git a/docs/reference/resistance_predict.html b/docs/reference/resistance_predict.html index 0249e17f..68a49c10 100644 --- a/docs/reference/resistance_predict.html +++ b/docs/reference/resistance_predict.html @@ -318,7 +318,7 @@ On our website https://msberends.gitla # or use dplyr so you can actually read it: library(dplyr) tbl %>% - filter(first_isolate == TRUE, + filter(first_isolate == TRUE, genus == "Haemophilus") %>% resistance_predict(amcl, date) # }# NOT RUN { @@ -329,9 +329,9 @@ On our website https://msberends.gitla # get bacteria properties like genus and species left_join_microorganisms("mo") %>% # calculate first isolates - mutate(first_isolate = first_isolate(.)) %>% + mutate(first_isolate = first_isolate(.)) %>% # filter on first E. coli isolates - filter(genus == "Escherichia", + filter(genus == "Escherichia", species == "coli", first_isolate == TRUE) %>% # predict resistance of cefotaxime for next years @@ -345,7 +345,7 @@ On our website https://msberends.gitla if (!require(ggplot2)) { data <- septic_patients %>% - filter(mo == as.mo("E. coli")) %>% + filter(mo == as.mo("E. coli")) %>% resistance_predict(col_ab = "amox", col_date = "date", info = FALSE, diff --git a/index.md b/index.md index b33a556b..9cb3cbff 100644 --- a/index.md +++ b/index.md @@ -22,7 +22,6 @@ Veterinary Microbiology: * Research Veterinarians * Veterinary Epidemiologists - * Biomedical Researchers Microbial Ecology: @@ -42,7 +41,7 @@ Developers: * Package developers for R * Software developers - * Web application developers + * Web application / Shiny developers ### Get this package @@ -64,7 +63,7 @@ To find out how to conduct AMR analysis, please [continue reading here to get st This package contains the **complete microbial taxonomic data** (with all nine taxonomic ranks - from kingdom to subspecies) from the publicly available Integrated Taxonomic Information System (ITIS, https://www.itis.gov). -All (sub)species from **the taxonomic kingdoms Bacteria, Fungi and Protozoa are included in this package**, as well as all previously accepted names known to ITIS. Furthermore, the responsible authors and year of publication are available. This allows users to use authoritative taxonomic information for their data analysis on any microorganism, not only human pathogens. It also helps to quickly determine the Gram stain of bacteria, since all bacteria are classified into subkingdom Negibacteria or Posibacteria. +All ~20,000 (sub)species from **the taxonomic kingdoms Bacteria, Fungi and Protozoa are included in this package**, as well as all ~2,500 previously accepted names known to ITIS. Furthermore, the responsible authors and year of publication are available. This allows users to use authoritative taxonomic information for their data analysis on any microorganism, not only human pathogens. It also helps to quickly determine the Gram stain of bacteria, since all bacteria are classified into subkingdom Negibacteria or Posibacteria. Read more about ITIS [in our manual](./reference/ITIS.html). diff --git a/man/ITIS.Rd b/man/ITIS.Rd index 2b859cba..1da178e2 100644 --- a/man/ITIS.Rd +++ b/man/ITIS.Rd @@ -11,7 +11,7 @@ All taxonomic names of all microorganisms are included in this package, using th \if{html}{\figure{itis_logo.jpg}{options: height=60px style=margin-bottom:5px} \cr} This package contains the \strong{complete microbial taxonomic data} (with all nine taxonomic ranks - from kingdom to subspecies) from the publicly available Integrated Taxonomic Information System (ITIS, \url{https://www.itis.gov}). -All (sub)species from \strong{the taxonomic kingdoms Bacteria, Fungi and Protozoa are included in this package}, as well as all previously accepted names known to ITIS. Furthermore, the responsible authors and year of publication are available. This allows users to use authoritative taxonomic information for their data analysis on any microorganism, not only human pathogens. It also helps to quickly determine the Gram stain of bacteria, since all bacteria are classified into subkingdom Negibacteria or Posibacteria. +All ~20,000 (sub)species from \strong{the taxonomic kingdoms Bacteria, Fungi and Protozoa are included in this package}, as well as all ~2,500 previously accepted names known to ITIS. Furthermore, the responsible authors and year of publication are available. This allows users to use authoritative taxonomic information for their data analysis on any microorganism, not only human pathogens. It also helps to quickly determine the Gram stain of bacteria, since all bacteria are classified into subkingdom Negibacteria or Posibacteria. ITIS is a partnership of U.S., Canadian, and Mexican agencies and taxonomic specialists [3]. } diff --git a/man/age.Rd b/man/age.Rd index 13c33254..062d18d9 100644 --- a/man/age.Rd +++ b/man/age.Rd @@ -9,13 +9,13 @@ age(x, reference = Sys.Date()) \arguments{ \item{x}{date(s), will be coerced with \code{\link{as.POSIXlt}}} -\item{reference}{reference date(s) (defaults to today), will be coerced with \code{\link{as.POSIXlt}}} +\item{reference}{reference date(s) (defaults to today), will be coerced with \code{\link{as.POSIXlt}} and cannot be lower than \code{x}} } \value{ Integer (no decimals) } \description{ -Calculates age in years based on a reference date, which is the sytem time at default. +Calculates age in years based on a reference date, which is the sytem date at default. } \section{Read more on our website!}{ @@ -24,5 +24,5 @@ On our website \url{https://msberends.gitlab.io/AMR} you can find \href{https:// } \seealso{ -\code{\link{age_groups}} to splits age into groups +\code{\link{age_groups}} to split age into age groups } diff --git a/man/age_groups.Rd b/man/age_groups.Rd index 1fe95599..96cfd279 100644 --- a/man/age_groups.Rd +++ b/man/age_groups.Rd @@ -20,7 +20,7 @@ Split ages into age groups defined by the \code{split} parameter. This allows fo \details{ To split ages, the input can be: \itemize{ - \item{A numeric vector. A vector of \code{c(10, 20)} will split on 0-9, 10-19 and 20+. A value of only \code{50} will split on 0-49 and 50+. + \item{A numeric vector. A vector of e.g. \code{c(10, 20)} will split on 0-9, 10-19 and 20+. A value of only \code{50} will split on 0-49 and 50+. The default is to split on young children (0-11), youth (12-24), young adults (26-54), middle-aged adults (55-74) and elderly (75+).} \item{A character:} \itemize{ diff --git a/man/as.mo.Rd b/man/as.mo.Rd index 2f2dc2d7..a8bcc27e 100644 --- a/man/as.mo.Rd +++ b/man/as.mo.Rd @@ -88,7 +88,7 @@ When using \code{allow_uncertain = TRUE} (which is the default setting), it will \if{html}{\figure{itis_logo.jpg}{options: height=60px style=margin-bottom:5px} \cr} This package contains the \strong{complete microbial taxonomic data} (with all nine taxonomic ranks - from kingdom to subspecies) from the publicly available Integrated Taxonomic Information System (ITIS, \url{https://www.itis.gov}). -All (sub)species from \strong{the taxonomic kingdoms Bacteria, Fungi and Protozoa are included in this package}, as well as all previously accepted names known to ITIS. Furthermore, the responsible authors and year of publication are available. This allows users to use authoritative taxonomic information for their data analysis on any microorganism, not only human pathogens. It also helps to quickly determine the Gram stain of bacteria, since all bacteria are classified into subkingdom Negibacteria or Posibacteria. +All ~20,000 (sub)species from \strong{the taxonomic kingdoms Bacteria, Fungi and Protozoa are included in this package}, as well as all ~2,500 previously accepted names known to ITIS. Furthermore, the responsible authors and year of publication are available. This allows users to use authoritative taxonomic information for their data analysis on any microorganism, not only human pathogens. It also helps to quickly determine the Gram stain of bacteria, since all bacteria are classified into subkingdom Negibacteria or Posibacteria. ITIS is a partnership of U.S., Canadian, and Mexican agencies and taxonomic specialists [3]. } diff --git a/man/g.test.Rd b/man/g.test.Rd index 7fd3ea24..be5ec92d 100644 --- a/man/g.test.Rd +++ b/man/g.test.Rd @@ -78,7 +78,7 @@ Use the \emph{G}-test of independence when you have two nominal variables, each It is also possible to do a \emph{G}-test of independence with more than two nominal variables. For example, Jackson et al. (2013) also had data for children under 3, so you could do an analysis of old vs. young, thigh vs. arm, and reaction vs. no reaction, all analyzed together. -Fisher's exact test (\code{\link{fisher.test}}) is more accurate than the \emph{G}-test of independence when the expected numbers are small, so it is recommend to only use the \emph{G}-test if your total sample size is greater than 1000. +Fisher's exact test (\code{\link{fisher.test}}) is an \strong{exact} test, where the \emph{G}-test is still only an \strong{approximation}. For any 2x2 table, Fisher's Exact test may be slower but will still run in seconds, even if the sum of your observations is multiple millions. The \emph{G}-test of independence is an alternative to the chi-square test of independence (\code{\link{chisq.test}}), and they will give approximately the same results. } diff --git a/man/microorganisms.Rd b/man/microorganisms.Rd index 605d690c..dd54e519 100755 --- a/man/microorganisms.Rd +++ b/man/microorganisms.Rd @@ -36,7 +36,7 @@ A data set containing the complete microbial taxonomy of the kingdoms Bacteria, \if{html}{\figure{itis_logo.jpg}{options: height=60px style=margin-bottom:5px} \cr} This package contains the \strong{complete microbial taxonomic data} (with all nine taxonomic ranks - from kingdom to subspecies) from the publicly available Integrated Taxonomic Information System (ITIS, \url{https://www.itis.gov}). -All (sub)species from \strong{the taxonomic kingdoms Bacteria, Fungi and Protozoa are included in this package}, as well as all previously accepted names known to ITIS. Furthermore, the responsible authors and year of publication are available. This allows users to use authoritative taxonomic information for their data analysis on any microorganism, not only human pathogens. It also helps to quickly determine the Gram stain of bacteria, since all bacteria are classified into subkingdom Negibacteria or Posibacteria. +All ~20,000 (sub)species from \strong{the taxonomic kingdoms Bacteria, Fungi and Protozoa are included in this package}, as well as all ~2,500 previously accepted names known to ITIS. Furthermore, the responsible authors and year of publication are available. This allows users to use authoritative taxonomic information for their data analysis on any microorganism, not only human pathogens. It also helps to quickly determine the Gram stain of bacteria, since all bacteria are classified into subkingdom Negibacteria or Posibacteria. ITIS is a partnership of U.S., Canadian, and Mexican agencies and taxonomic specialists [3]. } diff --git a/man/microorganisms.old.Rd b/man/microorganisms.old.Rd index e26a19b0..fc532222 100644 --- a/man/microorganisms.old.Rd +++ b/man/microorganisms.old.Rd @@ -25,7 +25,7 @@ A data set containing old (previously valid or accepted) taxonomic names accordi \if{html}{\figure{itis_logo.jpg}{options: height=60px style=margin-bottom:5px} \cr} This package contains the \strong{complete microbial taxonomic data} (with all nine taxonomic ranks - from kingdom to subspecies) from the publicly available Integrated Taxonomic Information System (ITIS, \url{https://www.itis.gov}). -All (sub)species from \strong{the taxonomic kingdoms Bacteria, Fungi and Protozoa are included in this package}, as well as all previously accepted names known to ITIS. Furthermore, the responsible authors and year of publication are available. This allows users to use authoritative taxonomic information for their data analysis on any microorganism, not only human pathogens. It also helps to quickly determine the Gram stain of bacteria, since all bacteria are classified into subkingdom Negibacteria or Posibacteria. +All ~20,000 (sub)species from \strong{the taxonomic kingdoms Bacteria, Fungi and Protozoa are included in this package}, as well as all ~2,500 previously accepted names known to ITIS. Furthermore, the responsible authors and year of publication are available. This allows users to use authoritative taxonomic information for their data analysis on any microorganism, not only human pathogens. It also helps to quickly determine the Gram stain of bacteria, since all bacteria are classified into subkingdom Negibacteria or Posibacteria. ITIS is a partnership of U.S., Canadian, and Mexican agencies and taxonomic specialists [3]. } diff --git a/man/mo_property.Rd b/man/mo_property.Rd index 70771176..786c8ea2 100644 --- a/man/mo_property.Rd +++ b/man/mo_property.Rd @@ -97,7 +97,7 @@ Supported languages are \code{"en"} (English), \code{"de"} (German), \code{"nl"} \if{html}{\figure{itis_logo.jpg}{options: height=60px style=margin-bottom:5px} \cr} This package contains the \strong{complete microbial taxonomic data} (with all nine taxonomic ranks - from kingdom to subspecies) from the publicly available Integrated Taxonomic Information System (ITIS, \url{https://www.itis.gov}). -All (sub)species from \strong{the taxonomic kingdoms Bacteria, Fungi and Protozoa are included in this package}, as well as all previously accepted names known to ITIS. Furthermore, the responsible authors and year of publication are available. This allows users to use authoritative taxonomic information for their data analysis on any microorganism, not only human pathogens. It also helps to quickly determine the Gram stain of bacteria, since all bacteria are classified into subkingdom Negibacteria or Posibacteria. +All ~20,000 (sub)species from \strong{the taxonomic kingdoms Bacteria, Fungi and Protozoa are included in this package}, as well as all ~2,500 previously accepted names known to ITIS. Furthermore, the responsible authors and year of publication are available. This allows users to use authoritative taxonomic information for their data analysis on any microorganism, not only human pathogens. It also helps to quickly determine the Gram stain of bacteria, since all bacteria are classified into subkingdom Negibacteria or Posibacteria. ITIS is a partnership of U.S., Canadian, and Mexican agencies and taxonomic specialists [3]. } diff --git a/tests/testthat/test-g.test.R b/tests/testthat/test-g.test.R index a46a1ac5..080aa69b 100644 --- a/tests/testthat/test-g.test.R +++ b/tests/testthat/test-g.test.R @@ -48,10 +48,12 @@ test_that("G-test works", { x <- as.data.frame( matrix(data = round(runif(4) * 100000, 0), ncol = 2, - byrow = TRUE) ) - expect_lt(g.test(x)$p.value, + + # fisher.test() is always better for 2x2 tables: + expect_warning(g.test(x)) + expect_lt(suppressWarnings(g.test(x)$p.value), 1) expect_warning(g.test(x = c(772, 1611, 737),

    One of the most important features of this package is the complete microbial taxonomic database, supplied by ITIS (https://www.itis.gov). We created a function as.mo() that transforms any user input value to a valid microbial ID by using AI (Artificial Intelligence) and based on the taxonomic tree of ITIS.