From c976a89d7bf580968f74aaba917853dbde0d85d0 Mon Sep 17 00:00:00 2001
From: Laura DeCicco <ldecicco@usgs.gov>
Date: Fri, 28 Dec 2012 15:36:43 -0600
Subject: [PATCH] Improved help files.
---
R/getDVData.r | 2 +-
R/getMetaData.r | 4 +--
R/getParameterInfo.r | 4 +--
R/getPreLoadedDailyData.r | 2 +-
R/getPreLoadedData.r | 2 +-
R/getQWData.r | 6 ++--
R/getQWDataFromFile.r | 4 +--
R/getSampleData.r | 8 +++--
R/getSampleDataFromFile.r | 4 +--
R/getSiteFileData.r | 2 +-
R/mergeReport.r | 6 ++--
R/populateConcentrations.r | 2 +-
R/populateDaily.r | 2 +-
R/populateDateColumns.r | 2 +-
R/populateParameterINFO.r | 52 +++++++++++++++---------------
R/populateSampleColumns.r | 2 +-
R/populateSiteINFO.r | 4 +--
R/retrieveNWISData.r | 4 +--
R/retrieveUnitNWISData.r | 4 +--
R/tabbedDataRetrievals.R | 8 +++--
inst/doc/dataRetrieval.log | 21 ++++++------
inst/doc/dataRetrieval.pdf | Bin 163040 -> 163149 bytes
inst/doc/dataRetrieval.synctex.gz | Bin 26154 -> 26168 bytes
man/dataRetrieval-package.Rd | 10 ++++--
man/getDVData.Rd | 2 +-
man/getMetaData.Rd | 2 +-
man/getParameterInfo.Rd | 4 +--
man/getPreLoadedDailyData.Rd | 2 +-
man/getPreLoadedData.Rd | 2 +-
man/getQWData.Rd | 6 ++--
man/getQWDataFromFile.Rd | 4 +--
man/getSampleData.Rd | 9 ++++--
man/getSampleDataFromFile.Rd | 4 +--
man/getSiteFileData.Rd | 2 +-
man/mergeReport.Rd | 6 ++--
man/populateConcentrations.Rd | 2 +-
man/populateDaily.Rd | 2 +-
man/populateDateColumns.Rd | 2 +-
man/populateParameterINFO.Rd | 19 +++++------
man/populateSampleColumns.Rd | 2 +-
man/populateSiteINFO.Rd | 4 +--
man/retrieveNWISData.Rd | 4 +--
man/retrieveUnitNWISData.Rd | 6 ++--
43 files changed, 128 insertions(+), 111 deletions(-)
diff --git a/R/getDVData.r b/R/getDVData.r
index 73db3b14..ff8ffd4a 100644
--- a/R/getDVData.r
+++ b/R/getDVData.r
@@ -15,7 +15,7 @@
#' @seealso \code{\link{retrieveNWISData}}, \code{\link{populateDaily}}
#' @examples
#' # These examples require an internet connection to run
-#' getDVData('01594440','00060', '1985-01-01', '1985-03-31', interactive=FALSE)
+#' Daily <- getDVData('01594440','00060', '1985-01-01', '1985-03-31', interactive=FALSE)
getDVData <- function (siteNumber,ParameterCd,StartDate,EndDate,interactive=TRUE){
data <- retrieveNWISData(siteNumber,ParameterCd,StartDate,EndDate,interactive=interactive)
# need to setup conversion factor because the NWIS data are in cfs but we store in cms
diff --git a/R/getMetaData.r b/R/getMetaData.r
index 0ae856e9..1d5d3951 100644
--- a/R/getMetaData.r
+++ b/R/getMetaData.r
@@ -17,7 +17,7 @@
#' @examples
#' # These examples require an internet connection to run
#' # Automatically gets information about site 05114000 and temperature, no interaction with user
-#' getMetaData('05114000','00010',interactive=FALSE)
+#' INFO <- getMetaData('05114000','00010',interactive=FALSE)
getMetaData <- function(siteNumber="", parameterCd="",interactive=TRUE){
if (nzchar(siteNumber)){
INFO <- getSiteFileData(siteNumber,interactive=interactive)
@@ -35,7 +35,7 @@ getMetaData <- function(siteNumber="", parameterCd="",interactive=TRUE){
INFO$paramNumber <- parameterData$parameter_cd
}
- INFO <- populateParameterINFO(INFO, parameterCd, interactive=interactive)
+ INFO <- populateParameterINFO(parameterCd, INFO, interactive=interactive)
return(INFO)
}
\ No newline at end of file
diff --git a/R/getParameterInfo.r b/R/getParameterInfo.r
index 6dcff534..2dd76230 100644
--- a/R/getParameterInfo.r
+++ b/R/getParameterInfo.r
@@ -10,8 +10,8 @@
#' @export
#' @examples
#' # These examples require an internet connection to run
-#' getParameterInfo('01075')
-#' getParameterInfo('00931',interactive=FALSE)
+#' paramINFO <- getParameterInfo('01075')
+#' paramINFO2 <- getParameterInfo('00931',interactive=FALSE)
getParameterInfo <- function(parameterCd,interactive=TRUE){
parameterCd <- formatCheckParameterCd(parameterCd, interactive=interactive)
urlParameterCd <- paste("http://nwis.waterdata.usgs.gov/nwis/pmcodes/?radio_pm_search=pm_search&pm_search=",parameterCd,"&casrn_search=&srsname_search=&format=rdb_file&show=parameter_group_nm&show=parameter_nm&show=casrn&show=srsname&show=parameter_units",sep="")
diff --git a/R/getPreLoadedDailyData.r b/R/getPreLoadedDailyData.r
index ce008449..d8d275d1 100644
--- a/R/getPreLoadedDailyData.r
+++ b/R/getPreLoadedDailyData.r
@@ -9,7 +9,7 @@
#' @export
#' @return Daily dataframe
#' @examples
-#' getPreLoadedDailyData(ChoptankRiverFlow, interactive=FALSE)
+#' Daily <- getPreLoadedDailyData(ChoptankRiverFlow, interactive=FALSE)
getPreLoadedDailyData <- function (loadedData,qUnit=1,interactive=TRUE){
data <- getPreLoadedData(loadedData)
convertQ<-c(35.314667,1)
diff --git a/R/getPreLoadedData.r b/R/getPreLoadedData.r
index 61ce0db1..3ad1fde9 100644
--- a/R/getPreLoadedData.r
+++ b/R/getPreLoadedData.r
@@ -9,7 +9,7 @@
#' @return retval dataframe with dateTime, value, and code columns
#' @export
#' @examples
-#' getPreLoadedData(ChoptankRiverFlow)
+#' rawData <- getPreLoadedData(ChoptankRiverFlow)
getPreLoadedData <- function (rawData){
retval <- as.data.frame(rawData, stringsAsFactors=FALSE)
if(ncol(retval) == 2){
diff --git a/R/getQWData.r b/R/getQWData.r
index 6e760763..da2029e1 100644
--- a/R/getQWData.r
+++ b/R/getQWData.r
@@ -15,9 +15,9 @@
#' @export
#' @examples
#' # These examples require an internet connection to run
-#' getQWData('01594440','01075', '1985-01-01', '1985-03-31')
-#' getQWData('05114000','', '1985-01-01', '1985-03-31')
-#' getQWData('05114000','00915;00931', '1985-01-01', '1985-04-30', interactive=FALSE)
+#' rawSample <- getQWData('01594440','01075', '1985-01-01', '1985-03-31')
+#' rawSampleAll <- getQWData('05114000','', '1985-01-01', '1985-03-31')
+#' rawSampleSelect <- getQWData('05114000','00915;00931', '1985-01-01', '1985-04-30', interactive=FALSE)
getQWData <- function(siteNumber,ParameterCd,StartDate,EndDate,interactive=TRUE){
siteNumber <- formatCheckSiteNumber(siteNumber, interactive=interactive)
StartDate <- formatCheckDate(StartDate, "StartDate", interactive=interactive)
diff --git a/R/getQWDataFromFile.r b/R/getQWDataFromFile.r
index de4ba97a..f9fb2723 100644
--- a/R/getQWDataFromFile.r
+++ b/R/getQWDataFromFile.r
@@ -15,9 +15,9 @@
#' @examples
#' # Examples of how to use getQWDataFromFile:
#' # Change the file path and file name to something meaningful:
-#' #filePath <- '~/RData/' # Sample format
+#' filePath <- '~/RData/' # Sample format
#' fileName <- 'ChoptankRiverNitrate.csv'
-#' #getQWDataFromFile(filePath,fileName, separator=";")
+#' #rawSampleData <- getQWDataFromFile(filePath,fileName, separator=";")
getQWDataFromFile <- function (filePath,fileName,hasHeader=TRUE,separator=","){
totalPath <- paste(filePath,fileName,sep="");
tmp <- read.delim(
diff --git a/R/getSampleData.r b/R/getSampleData.r
index 7058961b..a9a49273 100644
--- a/R/getSampleData.r
+++ b/R/getSampleData.r
@@ -3,6 +3,8 @@
#' Imports data from NWIS web service. This function gets the data from here: \url{http://qwwebservices.usgs.gov/}
#' A list of parameter codes can be found here: \url{http://nwis.waterdata.usgs.gov/nwis/pmcodes/}
#' A list of statistic codes can be found here: \url{http://nwis.waterdata.usgs.gov/nwis/help/?read_file=stat&format=table}
+#' For raw data, use getQWData. This function will retrieve the raw data, and compress it (summing constituents). See
+#' chapter 7 of the EGRET user guide for more details.
#'
#' @param siteNumber string USGS site number. This is usually an 8 digit number
#' @param ParameterCd string USGS parameter code. This is usually an 5 digit number.
@@ -15,9 +17,9 @@
#' @seealso \code{\link{compressData}}, \code{\link{populateSampleColumns}}
#' @examples
#' # These examples require an internet connection to run
-#' getSampleData('01594440','01075', '1985-01-01', '1985-03-31', interactive=FALSE)
-#' getSampleData('05114000','00915;00931', '1985-01-01', '1985-03-31', interactive=FALSE)
-#' getSampleData('05114000','00915;00931', '', '', interactive=FALSE)
+#' Sample_01075 <- getSampleData('01594440','01075', '1985-01-01', '1985-03-31', interactive=FALSE)
+#' Sample_All <- getSampleData('05114000','00915;00931', '1985-01-01', '1985-03-31', interactive=FALSE)
+#' Sample_Select <- getSampleData('05114000','00915;00931', '', '', interactive=FALSE)
getSampleData <- function(siteNumber,ParameterCd,StartDate,EndDate,interactive=TRUE){
data <- getQWData(siteNumber,ParameterCd,StartDate,EndDate,interactive=interactive)
compressedData <- compressData(data, interactive=interactive)
diff --git a/R/getSampleDataFromFile.r b/R/getSampleDataFromFile.r
index d53e5eea..c08e175f 100644
--- a/R/getSampleDataFromFile.r
+++ b/R/getSampleDataFromFile.r
@@ -14,9 +14,9 @@
#' @examples
#' # Examples of how to use getSampleDataFromFile:
#' # Change the file path and file name to something meaningful:
-#' #filePath <- '~/RData/' # Sample format
+#' filePath <- '~/RData/' # Sample format
#' fileName <- 'ChoptankRiverNitrate.csv'
-#' #getSampleDataFromFile(filePath,fileName, separator=";",interactive=FALSE)
+#' #Sample <- getSampleDataFromFile(filePath,fileName, separator=";",interactive=FALSE)
getSampleDataFromFile <- function (filePath,fileName,hasHeader=TRUE,separator=",", interactive=TRUE){
data <- getQWDataFromFile(filePath,fileName,hasHeader=hasHeader,separator=separator)
compressedData <- compressData(data, interactive=interactive)
diff --git a/R/getSiteFileData.r b/R/getSiteFileData.r
index b15f9edb..cae4cec1 100644
--- a/R/getSiteFileData.r
+++ b/R/getSiteFileData.r
@@ -9,7 +9,7 @@
#' @export
#' @examples
#' # These examples require an internet connection to run
-#' getSiteFileData('05114000',interactive=FALSE)
+#' siteINFO <- getSiteFileData('05114000',interactive=FALSE)
getSiteFileData <- function(siteNumber="",interactive=TRUE){
siteNumber <- formatCheckSiteNumber(siteNumber, interactive=interactive)
urlSitefile <- paste("http://waterservices.usgs.gov/nwis/site?format=rdb&siteOutput=Expanded&sites=",siteNumber,sep = "")
diff --git a/R/mergeReport.r b/R/mergeReport.r
index d9d25ab7..f8256544 100644
--- a/R/mergeReport.r
+++ b/R/mergeReport.r
@@ -11,9 +11,9 @@
#' @seealso \code{\link{getDVData}}, \code{\link{populateSampleColumns}}
#' @examples
#' # These examples require an internet connection to run
-#' exDaily <- getDVData('01594440','00060', '1985-01-01', '1985-03-31', interactive=FALSE)
-#' exSample <- getSampleData('01594440','01075', '1985-01-01', '1985-03-31', interactive=FALSE)
-#' mergeReport(localDaily = exDaily, localSample = exSample, interactive=FALSE)
+#' Daily <- getDVData('01594440','00060', '1985-01-01', '1985-03-31', interactive=FALSE)
+#' Sample <- getSampleData('01594440','01075', '1985-01-01', '1985-03-31', interactive=FALSE)
+#' Sample <- mergeReport(interactive=FALSE)
mergeReport<-function(localDaily = Daily, localSample = Sample, interactive=TRUE){
if (interactive){
dataOverview(localDaily, localSample)
diff --git a/R/populateConcentrations.r b/R/populateConcentrations.r
index 5724033d..ea540063 100644
--- a/R/populateConcentrations.r
+++ b/R/populateConcentrations.r
@@ -9,7 +9,7 @@
#' code <- c("","<","")
#' value <- c(1,2,3)
#' dataInput <- data.frame(value, code, stringsAsFactors=FALSE)
-#' populateConcentrations(dataInput)
+#' concentrationDF <- populateConcentrations(dataInput)
populateConcentrations <- function(rawData){ # rawData is a dataframe with value, code
concentrationColumns <- as.data.frame(matrix(ncol=3,nrow=length(rawData$value)))
colnames(concentrationColumns) <- c('ConcLow','ConcHigh','Uncen')
diff --git a/R/populateDaily.r b/R/populateDaily.r
index 43118f4c..fa9bac2a 100644
--- a/R/populateDaily.r
+++ b/R/populateDaily.r
@@ -15,7 +15,7 @@
#' value <- c(1,2,3)
#' code <- c("","","")
#' dataInput <- data.frame(dateTime, value, code, stringsAsFactors=FALSE)
-#' populateDaily(dataInput, 2, interactive=FALSE)
+#' Daily <- populateDaily(dataInput, 2, interactive=FALSE)
populateDaily <- function(rawData,qConvert,interactive=TRUE){ # rawData is a dataframe with at least dateTime, value, code
localDaily <- as.data.frame(matrix(ncol=2,nrow=length(rawData$value)))
colnames(localDaily) <- c('Date','Q')
diff --git a/R/populateDateColumns.r b/R/populateDateColumns.r
index 591cf82d..76b956c2 100644
--- a/R/populateDateColumns.r
+++ b/R/populateDateColumns.r
@@ -7,7 +7,7 @@
#' @export
#' @examples
#' dateTime <- c('1985-01-01', '1985-01-02', '1985-01-03')
-#' populateDateColumns(dateTime)
+#' expandedDateDF <- populateDateColumns(dateTime)
populateDateColumns <- function(rawData){ # rawData is a vector of dates
DateFrame <- as.data.frame(matrix(ncol=1,nrow=length(rawData)))
colnames(DateFrame) <- c('Date')
diff --git a/R/populateParameterINFO.r b/R/populateParameterINFO.r
index d61d1fc4..557cacf0 100644
--- a/R/populateParameterINFO.r
+++ b/R/populateParameterINFO.r
@@ -2,54 +2,54 @@
#'
#' Populates INFO data frame with additional user-supplied information concerning the measured parameter.
#'
-#' @param INFO dataframe with value and code columns
+#' @param localINFO dataframe with value and code columns. Default is INFO
#' @param parameterCd string USGS parameter code
#' @param interactive logical Option for interactive mode. If true, there is user interaction for error handling and data checks.
-#' @return INFO dataframe
+#' @return localINFO dataframe
#' @export
#' @examples
#' #This example requires an internet connection to run
-#' exINFO <- getSiteFileData('01594440')
+#' INFO <- getSiteFileData('01594440')
#' parameterCd <- "00175"
#' parameterData <- getParameterInfo(parameterCd,interactive=interactive)
-#' exINFO$param.nm <- parameterData$parameter_nm
-#' exINFO$param.units <- parameterData$parameter_units
-#' exINFO$paramShortName <- parameterData$srsname
-#' exINFO$paramNumber <- parameterData$parameter_cd
-#' populateParameterINFO(exINFO, parameterCd,interactive=FALSE)
-populateParameterINFO <- function(INFO, parameterCd, interactive=TRUE){
+#' INFO$param.nm <- parameterData$parameter_nm
+#' INFO$param.units <- parameterData$parameter_units
+#' INFO$paramShortName <- parameterData$srsname
+#' INFO$paramNumber <- parameterData$parameter_cd
+#' INFO <- populateParameterINFO(parameterCd,interactive=FALSE)
+populateParameterINFO <- function(parameterCd, localINFO=INFO, interactive=TRUE){
if (nzchar(parameterCd)){
if(interactive){
- cat("Your water quality data are for parameter number", INFO$paramNumber, "which has the name:'", INFO$param.nm, "'.\n")
- cat("Typically you will want a shorter name to be used in graphs and tables. The suggested short name is:'", INFO$paramShortName, "'.\n")
+ cat("Your water quality data are for parameter number", localINFO$paramNumber, "which has the name:'", localINFO$param.nm, "'.\n")
+ cat("Typically you will want a shorter name to be used in graphs and tables. The suggested short name is:'", localINFO$paramShortName, "'.\n")
cat("If you would like to change the short name, enter it here, otherwise just hit enter (no quotes):")
shortNameTemp <- readline()
- if (nchar(shortNameTemp)>0) INFO$paramShortName <- shortNameTemp
- cat("The units for the water quality data are: ", INFO$param.units, ".\n")
+ if (nchar(shortNameTemp)>0) localINFO$paramShortName <- shortNameTemp
+ cat("The units for the water quality data are: ", localINFO$param.units, ".\n")
cat("It is helpful to set up a constiuent abbreviation when doing multi-constituent studies, enter a unique id (three or four characters should work something like tn or tp or NO3).\nIt is case sensitive. Even if you don't feel you need an abbreviation you need to enter something (no quotes):\n")
- INFO$constitAbbrev <- readline()
+ localINFO$constitAbbrev <- readline()
} else {
- INFO$constitAbbrev <- INFO$paramShortName
+ localINFO$constitAbbrev <- localINFO$paramShortName
}
} else {
if (interactive){
- INFO$paramNumber <- NA
+ localINFO$paramNumber <- NA
cat("Enter a long name for the water quality data (no quotes):\n")
- INFO$param.nm <- readline()
+ localINFO$param.nm <- readline()
cat("Enter a short name to be used in graphs and tables(no quotes):\n")
- INFO$paramShortName <- readline()
+ localINFO$paramShortName <- readline()
cat("It is helpful to set up a constiuent abbreviation when doing multi-constituent studies, enter a unique id (three or four characters should work something like tn or tp or NO3).\nIt is case sensitive. Even if you don't feel you need an abbreviation you need to enter something (no quotes):\n")
- INFO$constitAbbrev <- readline()
+ localINFO$constitAbbrev <- readline()
cat("Enter the units of the water quality data(no quotes):\n")
- INFO$param.units <- readline()
+ localINFO$param.units <- readline()
} else {
- INFO$paramNumber <- NA
- INFO$param.nm <- NA
- INFO$paramShortName <- NA
- INFO$constitAbbrev <- NA
- INFO$param.units <- NA
+ localINFO$paramNumber <- NA
+ localINFO$param.nm <- NA
+ localINFO$paramShortName <- NA
+ localINFO$constitAbbrev <- NA
+ localINFO$param.units <- NA
}
}
- return(INFO)
+ return(localINFO)
}
\ No newline at end of file
diff --git a/R/populateSampleColumns.r b/R/populateSampleColumns.r
index 8571df6a..7e7cabb7 100644
--- a/R/populateSampleColumns.r
+++ b/R/populateSampleColumns.r
@@ -11,7 +11,7 @@
#' ConcHigh <- c(1,2,3)
#' Uncen <- c(1,1,0)
#' dataInput <- data.frame(dateTime, ConcLow, ConcHigh, Uncen, stringsAsFactors=FALSE)
-#' populateSampleColumns(dataInput)
+#' Sample <- populateSampleColumns(dataInput)
populateSampleColumns <- function(rawData){ # rawData is a dataframe with dateTime, ConcLow, ConcHigh, Uncen
Sample <- as.data.frame(matrix(ncol=3,nrow=length(rawData$dateTime)))
colnames(Sample) <- c('Date', 'ConcLow','ConcHigh')
diff --git a/R/populateSiteINFO.r b/R/populateSiteINFO.r
index 53fae27e..5ec04b2c 100644
--- a/R/populateSiteINFO.r
+++ b/R/populateSiteINFO.r
@@ -9,9 +9,9 @@
#' @export
#' @examples
#' #This example requires an internet connection to run
-#' exINFO <- getSiteFileData('01594440')
+#' INFO <- getSiteFileData('01594440')
#' siteNumber <- "01594440"
-#' populateSiteINFO(exINFO, siteNumber,interactive=FALSE)
+#' siteINFO <- populateSiteINFO(INFO, siteNumber,interactive=FALSE)
populateSiteINFO <- function(INFO, siteNumber,interactive=TRUE){
if (nzchar(siteNumber)){
diff --git a/R/retrieveNWISData.r b/R/retrieveNWISData.r
index 1b4d3105..0035a85c 100644
--- a/R/retrieveNWISData.r
+++ b/R/retrieveNWISData.r
@@ -15,8 +15,8 @@
#' @export
#' @examples
#' # These examples require an internet connection to run
-#' retrieveNWISData('01594440','00060', '1985-01-01', '1985-01-31')
-#' retrieveNWISData('05114000','00010', '1985-01-01', '1985-01-31', StatCd='00001',interactive=FALSE)
+#' rawDailyFlowData <- retrieveNWISData('01594440','00060', '1985-01-01', '1985-01-31')
+#' rawDailyTemperatureData <- retrieveNWISData('05114000','00010', '1985-01-01', '1985-01-31', StatCd='00001',interactive=FALSE)
retrieveNWISData <- function (siteNumber,ParameterCd,StartDate,EndDate,StatCd="00003",interactive=TRUE){
siteNumber <- formatCheckSiteNumber(siteNumber, interactive=interactive)
ParameterCd <- formatCheckParameterCd(ParameterCd, interactive=interactive)
diff --git a/R/retrieveUnitNWISData.r b/R/retrieveUnitNWISData.r
index ccac4fa6..6a708da4 100644
--- a/R/retrieveUnitNWISData.r
+++ b/R/retrieveUnitNWISData.r
@@ -11,7 +11,7 @@
#' @param StatCd string USGS statistic code. This is usually 5 digits. Daily mean (00003) is the default.
#' @param interactive logical Option for interactive mode. If true, there is user interaction for error handling and data checks.
#' @keywords data import USGS web service
-#' @return retval dataframe with agency, site, dateTime, value, and code columns
+#' @return retval dataframe with agency, site, dateTime, time zone, value, and code columns
#' @export
#' @examples
#' siteNumber <- '05114000'
@@ -19,7 +19,7 @@
#' StartDate <- '2012-05-01'
#' EndDate <- '2012-05-02'
#' # These examples require an internet connection to run
-#' retrieveUnitNWISData(siteNumber,ParameterCd,StartDate,EndDate,interactive=FALSE)
+#' rawData <- retrieveUnitNWISData(siteNumber,ParameterCd,StartDate,EndDate,interactive=FALSE)
retrieveUnitNWISData <- function (siteNumber,ParameterCd,StartDate,EndDate,interactive=TRUE){
siteNumber <- formatCheckSiteNumber(siteNumber, interactive=interactive)
ParameterCd <- formatCheckParameterCd(ParameterCd, interactive=interactive)
diff --git a/R/tabbedDataRetrievals.R b/R/tabbedDataRetrievals.R
index 55b16856..61cc7d14 100644
--- a/R/tabbedDataRetrievals.R
+++ b/R/tabbedDataRetrievals.R
@@ -4,8 +4,12 @@
#' Package: \tab dataRetrieval\cr
#' Type: \tab Package\cr
#' Version: \tab 1.0.4\cr
-#' Date: \tab 2012-06-19\cr
-#' License: \tab GPL (>= 2)\cr
+#' Date: \tab 2012-12-31\cr
+#' License: \tab This software is in the public domain because it contains materials
+#' that originally came from the United States Geological Survey, an agency of
+#' the United States Department of Interior. For more information, see the
+#' official USGS copyright policy at
+#' http://www.usgs.gov/visual-id/credit_usgs.html#copyright\cr
#' LazyLoad: \tab yes\cr
#' }
#'
diff --git a/inst/doc/dataRetrieval.log b/inst/doc/dataRetrieval.log
index b1d63356..0247f4f4 100644
--- a/inst/doc/dataRetrieval.log
+++ b/inst/doc/dataRetrieval.log
@@ -1,7 +1,7 @@
-This is pdfTeX, Version 3.1415926-2.3-1.40.12 (MiKTeX 2.9) (preloaded format=pdflatex 2012.1.6) 29 OCT 2012 09:14
+This is pdfTeX, Version 3.1415926-2.3-1.40.12 (MiKTeX 2.9) (preloaded format=pdflatex 2012.1.6) 28 DEC 2012 15:13
entering extended mode
**dataRetrieval.tex
-(D:\LADData\RCode\dataRetrieval\master\inst\doc\dataRetrieval.tex
+(D:\LADData\RCode\dataRetrievalGitorious\inst\doc\dataRetrieval.tex
LaTeX2e <2011/06/27>
Babel <v3.8m> and hyphenation patterns for english, afrikaans, ancientgreek, ar
abic, armenian, assamese, basque, bengali, bokmal, bulgarian, catalan, coptic,
@@ -384,7 +384,7 @@ LaTeX Font Info: Try loading font information for T1+aer on input line 100.
("C:\Program Files (x86)\MiKTeX 2.9\tex\latex\ae\t1aer.fd"
File: t1aer.fd 1997/11/16 Font definitions for T1/aer.
))))
-(D:\LADData\RCode\dataRetrieval\master\inst\doc\dataRetrieval.aux)
+(D:\LADData\RCode\dataRetrievalGitorious\inst\doc\dataRetrieval.aux)
LaTeX Font Info: Checking defaults for OML/cmm/m/it on input line 42.
LaTeX Font Info: ... okay on input line 42.
LaTeX Font Info: Checking defaults for T1/cmr/m/n on input line 42.
@@ -421,8 +421,8 @@ LaTeX Info: Redefining \ref on input line 42.
LaTeX Info: Redefining \pageref on input line 42.
LaTeX Info: Redefining \nameref on input line 42.
-(D:\LADData\RCode\dataRetrieval\master\inst\doc\dataRetrieval.out)
-(D:\LADData\RCode\dataRetrieval\master\inst\doc\dataRetrieval.out)
+(D:\LADData\RCode\dataRetrievalGitorious\inst\doc\dataRetrieval.out)
+(D:\LADData\RCode\dataRetrievalGitorious\inst\doc\dataRetrieval.out)
\@outlinefile=\write4
(C:\Users\ldecicco\AppData\Roaming\MiKTeX\2.9\tex\context\base\supp-pdf.mkii
@@ -438,8 +438,9 @@ LaTeX Info: Redefining \nameref on input line 42.
\MPnumerator=\count123
\makeMPintoPDFobject=\count124
\everyMPtoPDFconversion=\toks21
-) (D:\LADData\RCode\dataRetrieval\master\inst\doc\dataRetrieval-concordance.tex
-) (D:\LADData\RCode\dataRetrieval\master\inst\doc\dataRetrieval.toc)
+)
+(D:\LADData\RCode\dataRetrievalGitorious\inst\doc\dataRetrieval-concordance.tex
+) (D:\LADData\RCode\dataRetrievalGitorious\inst\doc\dataRetrieval.toc)
\tf@toc=\write5
Overfull \vbox (21.68121pt too high) has occurred while \output is active []
@@ -483,7 +484,7 @@ Overfull \vbox (21.68121pt too high) has occurred while \output is active []
[8]
Package atveryend Info: Empty hook `AfterLastShipout' on input line 265.
- (D:\LADData\RCode\dataRetrieval\master\inst\doc\dataRetrieval.aux)
+ (D:\LADData\RCode\dataRetrievalGitorious\inst\doc\dataRetrieval.aux)
Package atveryend Info: Executing hook `AtVeryEndDocument' on input line 265.
Package atveryend Info: Executing hook `AtEndAfterFileList' on input line 265.
Package rerunfilecheck Info: File `dataRetrieval.out' has not changed.
@@ -491,7 +492,7 @@ Package rerunfilecheck Info: File `dataRetrieval.out' has not changed.
)
Here is how much of TeX's memory you used:
7314 strings out of 494045
- 104581 string characters out of 3145961
+ 104611 string characters out of 3145961
185875 words of memory out of 3000000
10453 multiletter control sequences out of 15000+200000
39706 words of font info for 81 fonts, out of 3000000 for 9000
@@ -507,7 +508,7 @@ es (x86)/MiKTeX 2.9/fonts/type1/public/amsfonts/cm/cmr8.pfb><C:/Program Files (
x86)/MiKTeX 2.9/fonts/type1/public/amsfonts/cm/cmsltt10.pfb><C:/Program Files (
x86)/MiKTeX 2.9/fonts/type1/public/amsfonts/cm/cmti10.pfb><C:/Program Files (x8
6)/MiKTeX 2.9/fonts/type1/public/amsfonts/cm/cmtt10.pfb>
-Output written on dataRetrieval.pdf (8 pages, 163040 bytes).
+Output written on dataRetrieval.pdf (8 pages, 163149 bytes).
PDF statistics:
155 PDF objects out of 1000 (max. 8388607)
25 named destinations out of 1000 (max. 500000)
diff --git a/inst/doc/dataRetrieval.pdf b/inst/doc/dataRetrieval.pdf
index 991c0f887101f2ae4a948b14d00af698efdc90f9..26f94d65157c123e9753d80dc282d9a323255f5e 100644
GIT binary patch
delta 14970
zcmaibbyO7W7be|E3rM3h!py)hGk_r7(xG&VNOun14T5w@N_U4e(hbtxsf5(>?f!nd
z`@x>G`~jT%-uK4yJomnH4u|C{%)!5yWyYvTT;LcwX85FrjNO_je#@5nHnVEx`$4x(
zf1j>d+%D9fHt&rLXhm^|MLj!=?%wknc#6C~r=lp+D-=JGw6k;dcQ4KI9#HS<WZ_QV
ztT2{j1d{oNE9{zBrxZHYU}T$q6TN5z(l+hSyR8|t-57Jj-(ODpF$sC?G3225%_Gza
z-{+%ZB^(D`-2=7Nux{7$*YW|dl2>dc#`Lo_aRJIL-fx?TwF*Hd!RAIaF?t3vBa#<p
z*qLGPY%Tm)_<vn;4M`-|d}E&O&lQY8a<<=b)3OgauTjjFZDRJIQ_SQPW418xoARFQ
zv)e;kQIR~&)+e#h{y}Zl4ivVLz@PjmF}xaCcL}dqTez~f>Gm1JC><hOCPFt<fXdkJ
z=&dcsX_@K!3X*>mQ3@Gj34Do2ir!IWJ$9O}JKCRH%JschV{hzNi;q*H<IP|1HlN{x
ziY|(*CE1gL58ar^O_AIxxx-s;V}zJdhk)X7Aj<$sV6l247Bc_05UuQGVA~&D-yAIG
z_z<`%U!o*J7qkn(8974Q78}x6xWskM?WKK`-T?i@P=Rl(NZ5&rkcFRxSli^cVW}5@
zWI)8_6^w346GTN!#FsB=azj4NT~L6DpNGkqBeRB<fN(DHQ--OEYnhJ$>w7jX(nZon
zg#zy_m0_-Mzn74leb`i<j5r<+-MY1Eq9+`k4Lv!89b)WqVnRoDe;cK)#OND?!_Iq3
zLtDt{1@)0Ix^(8&Z!$uZ+S*IHf%{M`v!Usv1&9gY$NIc9D1<@<Cf<Nb+Sh?w2z6am
zYKpesfzib6*DB3%$GcyTA^9~gO<o2k$jRoO^<I1bCQoOQ80~J#Q>?tq(LT9u3Wj$G
z9v&`VXh!i~GYb1?eH#L5QE}aT&v2CA!5hlW1G8GN5l6x4!VUu%dJl#X3aU53241#p
z#(wsq+ir{Fuala6%qznjyt;4jai|2GZamuxf&*VH8@+rNGS;nIcQ&abWo-o@$FKbz
z+M#QAscV`e<7Cc@6D=;WMVGqm;V+l*8rb!GDsiHj8+Ut++pADxl*{){^Er2{o0Ii?
zS0$dB)46Kd?XZ^gqTQBrsr<0OGLJvJ+4vQF7T3(Dl0Hs%nBd*%QsT{sK1=3e>?j5m
zTnUNpQ#@l6Ccdt#K>eA6OPEczXqls~u1qlMc?+vVltFkipB(d|t@pv8wWof88jaot
zQgTBV7fS%!wVr{o;QO+pxCD_im*_+OkR<utL260<$jWpD6^9#8__+DAa<{nWRcxO_
znxz{haRu0p&BWyh2XiAX^`;qp5dSJ#!54tq$I5(b*C{yEm(L@ewM^S>aFVlMrab%1
z>Xysown>_H4Iwf>k^J~lt}i3p2Isf2xys!Pj$e<lI(z3%FWPUj$n4iDb5!!7a@ud$
zH^(eHvdpUPmFWiKDn@M){O=|5(PuXIlK9MSDgq}fiF&^V<|n0;edu=HYiJfv7Jw`6
zb6n;uAs^NulC2&2p;Fj8zYWy1g-(T-T4!SEi425Bsoc`tWx{lNSTP$zEvkdbV)+_G
z$|t+S_`C5UvuAF7^n3!TMnmo-wl)41l+B<;))@<B3;kG#RPqN<zxa%OwYM(s^?h`G
zm+PC{GM2HWk)6G*vA)GWzgZc4@-@e*HOE54#lr((ampH7n%aK^(ZZlSkOXfMBoY(=
z3<8Wrq+^1ISD~s<%sl4^Yjhh`m|s{Zt|MV46!xO^&T3y+SO_H!X(VBO7fs(4YL1;l
zobV%?%g%Ij@m_bY`Ac<-yW7!O>a7I~r|LrkB}naEyq*|SJ_R}+Q!Vq`ciMr0q-}$P
zJ$-|Nq3vxM=r(o;_r~3N0EEUm;gpQ5d#orsMC1i{+UL`^wRunnCg!)33y5tU=*tAe
z8w7+Kn`p<jcA+;+BYk4Tw0OV0G!Q3Xh=uPI%Gl6+Q(`L<usge_4tA36Z%_fg8VLOK
z^uqgaO7vc+k2WnWEpf&(`$|+kfdvdCUIhEpxA<kr({M#V=&y!)Sg5Uyi>s?G5|uVA
zRqHeS)%zL5G<=Ar*RvUt{Z+&oq?_kBBM7`c_bT1N?Fb{4{&ja|(+(AmXDAI`i1KLY
z7#KJX9=t2hs*xHI(m2q!3!4x=^7>}N(ONILyr_=VEfDxq_~GNX4u2s8D1UqOX))H<
zw{iSjg)(>$%!820G72tz#&I{hpCJerd!i%3skBnlhLGQQ;iG44D7VohA|r-?<`9-+
z+gjJ_eY9wYEK5>K@B^0!>pjQ$Ro^3iV%S>W#t3MrH@F#+r(Q)ud-G)>bZ>ZQP9&8-
zQvi-=jxo{yw-$rV$&|x`dA*uXL+q|JiixOOkcXm-;;mP5vZkaT4T2{wLdV-0t=64C
z@TQb@IMl^6Ii2|O3d#pVE=m{mx}}|3&ZEJhQO`gpTi#rKc7AqMyVgp8hKJXNg=CAY
z;bTFo5C)$~AJE$qJW)Q=rUiImUX1UbAk@L(cXy_LxpmauDWI3af81|#Cd^~Q!V_#i
z!&&csF|qBTAYWP^pCCh>QJoR!fBZmz(;-@VEx{{qith#I?#n(Q(!n>nZ}Bp*Cgw0{
zPxJip=58eddUTcBZ>GD;5bmzgaP#sM(U8C1C*G*fBh6>zai-mGUEQzs-Y?DEn_RWZ
z-Q6>O+df=A4otqnyT9+jwfBQM-;x}2_Z?cwYi1t)uA&&Z#|5L@*Z1w}u?024*X~_a
z=e^{A(IHpcTsDT`tBYaae9l3&L7u&X3E%JhAZkWN!J4wQ^}q2nN1)`NpTA#on}bB%
zj=Qb?o%k-OwVdbh_lS)ogO=(0l3NcOEe1kE9YQmpF1<Tc{Vl?B$5~Z|n%)deEbj8E
zA8-8|Dn$OiGh_|EdcB*&{EU%tIN+A&HrNkQ>lFTyP6r|3R8SJX?a!*!tDE)lD~e$L
za)f&!dG`2wS^@;pZL7}Vd%rZttMu)q!up~+R2KxT<<^y0<`O}fJNY&u|AW>H1TXAU
z&P)5$HNmK@V9LLom!gNi<w5f0^22{x=jA6j?tSDZN*=z|-^BJPOVrK7`BU#UJXw9N
z1?T0(j?o%#cJ52#z2~*H($Xpf<97?v@7v)`$$9`BoF5uVPDsK2b6`J5?dd)RXWRXE
z(gUFV7bX?fm+bZSjZ3Q;x#bg^Xr+x>{olep+cX!{^je~Ha<4YdikmUPSue#J&xS4*
z`K3%<Yl#d`i26n*lC41Sa9@?}I7-(sx0Y6&>lY}qFKaq3@<GHcj-=hAtc*?PlnOrJ
zXKE#3fx}0ijwZ1R^%vELtUGslTCiBt4Vfzju4T_DyTX03!oMt|<2W6z+Qw(-?M91(
zgK;~Km?KIjdYpYBcbk<L2~Ms}CC$Uz>EyABbUOH9@?3v=slR=P$8cP##FaFLnYuIX
zq|MmNZrDKe&KD;~>K$P>X5GC2hW?wdFzjea21dtb5!h^b3J<xz;89QEF0brHo<d^|
zTcZhRU2$9}U-2!vvQh0(O~&Xo!k5Il6$W#^h}SkBUgB2i()wVvWJD7%RTxd1Tna?k
zA4~$af6kC*ZSoMnDX~!t&kx&PC(ok|XLNA7R%L%LBluFUta_9v8QEc>hMq;Ul|h-8
znbwS{&emgUa%_e(IM_~z?m%URdiwP<G4NHmi^^dF{Q+_Bx{bYA{jC3i`{0MK9h<qh
zjZ1*{wx95L(cb_|UZS^J5~=R03-nK@kz#GFwhF0>%LTQX!Nr1RQmmO2|5mZEwu<AI
z7rY?9Z==+4H_^CV`Mi2N8*GM&UJEtN2`^#ihz}59&9rGTSq+Vy&2mP>;)>4o%t9Zv
zt$wCvv~(0g)}9$DaI5IG5!BZ2f_nbP^vbEU5nqy_@t|%Hq_;FiQH4(PRp*?B8l5sg
z%t0tkKRo2k85~4C*<fuhGRGlK8|_}CtL3nmw~09h&iB2LA$$IMPy0Jc+IyQ{&)6?f
zP=fff+&BO5Q*%nT;xav}Bp^GLz<Eal^X{m_%>0J0h*g6d_9vZJAlZ;$Ydn>)<5}fy
zfw00sU^0`3&}|ZUGb_-W{<G$MY;fKPczZxrWHI|20}q^rGeOxbLyB|`l}q62jxn**
zjb|%@OCG`~cAFBw;4bD~1wL==;Vgdt>n*PhH3_fWnf5fN6)(Ctap~vzy}z}QQtXg@
zwV8Q^AEh+PF`=IG`lQfLs^x88Eo+I$Tu?pOQ;N4NY_cUwa}Q4x)@UVLKff!O_@1ld
z@F}B(uLB0pDM<kJmVBl2A6#!jfuk!zMf$rZ%KlbZ<8k?^2}+uof@0Q>U*eGA4U`-4
zH|f8Ow4I>VqbDYq*HR%6W<kR`0`+at%L?YX^l97jPQ`n4oICXIh8FDW^N!-wOjuXQ
z!A8Dsh~^gQ&wb9T9z$YS5%znf>2-!5)BT+AT89Kqt`^ELr(RLZ>tL{+S1D-B)x@@{
zd%ZJqFd}pxKa*TD7RT~KZ1-KrWRl749OUF|gWInBN4?ULLL|2>({q6dfu5yn1otM&
zHyT+kEVHdO#Yr^3n3daN1QXwr=!3i>#;zimlcfa<byrC%rllwo+fd8xb|ZOGk#4`&
zr2B=zJLa{iNc@7^Wp^kkU{(}<nB%z%D%8e$MQaSdldHb-aPtNk^?Ns1$Eh0ddZ1bN
z{H5@gP^x-nY_ltKl<Q)F0mf5<2LJet=BLzasmY(GgrxCpjzDH(WD0v6mp#~Tpl09h
zbV(;aq#0S?@Z;~?iZp%BE*8b}_~u!S(?O{;_+DPb1pEvmDgQmEKpT0n^;hf}S%Q@E
z!RMkpLR;D&tnO5zB;^d7Rx;sf%^M>*8$a6&0P_KBm)VAytdSvJZ+*(KgUatC*0sPb
zOJJ^vltQB>IvDmWn}A;M{Imp99rT@b1`C{Bgy*GD@4Jl<N^lT2z4fbDi0_U1%P8hu
zcuNZ69#Hv15RLL*f{05tK|7E!X&%arQyWUS*j?D`*t5n&3m%Q6o=%z8W3+;=Htsnt
z0`4xXqhWfL@qU|Gvp%9~-Hvz4TVe^XHRf+~5y+w&0PO?MAw4>ORi@qfJrl%-+6Qoq
z=dJ4f*Q$f;dw%m?+Tdz8w47z)RF_Rc;B(4v<`_^#UsaTd4K&4aT5`?@e_)GOW8p3u
z_@Xq{pPpG+Bs;}&+~UfEZ|tewn&|AU9X;mc;{bleLmYjq%^hVj4Z{j#7ZoAhi^Y6x
z2nOlXZyeHkcpYuANuZ%fH6OBEH^^0qkY1GWzBF_AX#f5CTPCV6F|4EpFj=2R2v5gV
zUG~)=%~fTQ{#DrVmFO>u3*QlE5%KL{CH93*d$DZ&6&c#8(933Q#?-SJecMLzI;1=o
zYSur}`AeaJC_HsEELll-gIa6P)yL?rD^V*?8au5!vu`X;<WvjEpqUjKz_pjZRmIze
z9r`=BK~ji3^RHOv3WkR|r#lruhj4!Pu1HkHt+;r{ZwsqBtvHci<|*Z@)#!>%@(pu6
zT@IspYM9o0#$O>FDKIF1uhAmHkbkKW5*eRnnKTyI6YtTecob!C$sy_99e20?i>XBw
z+fD6F(euru+T5$#Iv*t7P)bIR0jx<0P+^sONmj3(TH<QycZM~M-fp}vFR|byaxccq
zBjhsVzvQK)ut8!p2x#a{;hWN*E<^z}%HQxhJ~_6A*Sd*t*|^eo9Bi=e7U@#hvgh1l
z5x7%r`1L3440OAg8E)xmZ3|oMiAMuix|sSkcWdk$*1IG#zl!a#cwQxKqHNWbC`T)M
zJnsqIKgiXn!GZjq0@aK68+yS<Bn@Naz=j_i<E<5<%A@X>w>T6j$3vIdQn?N%RjBCW
z_}Ax4B9yI|aET7-efGV|u>^&kol4poJpuB4EK1*;+z;!?&Hl(`JX@p?*6=F@7SGZi
zy2+z1`#9VVT#Tv(tr=QU3JRho7>9SS5fHgdF=Wm4qqi(r-i)UQ{t<$!Ce<hxf;!&M
zhHJ-|Y@pCnqgDp%6cOjkvPM{1RD!eAUf45{w=)!Qny{RE@s|DYoGWu<o3o^ny_`t#
z>fJY)8W)bsNTZ5w7FJqF5^`Y^zV7loHIn(;py@llaxBeNYwszjiD*5RR3ZNDr<ZND
zG)toiTOsYZ_)g^@i+dn^RXpjKGHj&B8h5bN=%+n^mh$h{TpfX=b`A+9JGSCacHd9j
zN)z_B7f7mds~54qk71|0_O`MLDo2UPUe1LQDy{2sV}5O9XE~x)YpucLDBZ|%oaMyp
z<||9gpEQsR_C{QM?{Oe?<WDlxcZ1|XF+jQZm6f#xQt|f(Wj|{Y9DYD-YE1B6i#^-(
zyD|9-iXlXgSYjKEy@0sS($iWm!0UP)P+shk-u&)2lC{KT^eHBjDsM?8J4>dgE1Nye
zyV|oQzQz7XLA^6MoP{=5YP~xjfw1z|*lhCrasEB5{qutp8n7>ENX)Rqk`@*kG3>87
z4?97|^#=byItnxT3P(?T7W>jgr4snQtk)b<*_5F>LkVl><RrOm`m$@Z^pjN!sN9`<
zOE=5)D9=Pi<>%CAFsB*X2d*FjO8R9r0JW_l&6SwwW!MJQIw1ii!pJwXqO{leUaJX;
zZ~cr>sWmPFgt_!6Ml8*e1pN6>T#6<7B7^~NqWio0qu*257r;q_%v4yU+_hCc%hxKd
zu}p5wx6b~CMvvW_j~Bxt{XXR+Or@ZYfcf+`#+H>`t^B_<4W@x!-j2svlrt3YeXvBG
zZoEYbIr6pdEw=lnJD%<MLZ)x%687;b$|v`b<VwL|b$2MwAdR%bK~)*WzK{?1cu>%F
znEJ2$uly7#sd{)Y6N0F9EN6!b=5g$VUzl#MAbR|_RL!G;V-*GI!P)vhT;W)uw!ogk
zbv6<b_Ux>-a4@zw-pe<ky`9hT^w~Z+@7ZG34f$_y&Y^n51%1ZKKOo+j{d1`9A|I;4
zGqLJ}r#80jQn12K^kpbA>*&)b7L!;Md8(chVSB;zkkCu`g6&`(7o9bb3Rm6!nh0;-
z1o~&IH$sdsM96B6CEEu{SSU&b8zU0O^ezcQ#*)DhDkGWi-C^JyOkGg(VZo5<58I?V
z;Ziq1eA;_Ps^~>~LKQNPy~6hbj96m%o753nX1n}JCHH{w6rw@ZdY2i+LL$zgn#+VC
zX?wq3*M5EYzJM0WF2+~aEa^yc@e7w~%;qmmi|T7GO%z3mo{ip9;mgE9rHorGK0$do
z9KwNn8SI5ltDElUl0+7EJf(wpevq>ZQ6Ca#3O1tneA)!rr1Nw(sepBUC?aThI+HWB
zN8TlAh3~2(LrUnAibs+y<*OGUD+q(Aqy@^W2;4!q9?{xBZ&^mJch82qKf-Q9i!nrB
ziC-|>=gj4c^HurC#QH#fTH(G@67^h$XoaF5c)e{a*Yo&wi0B*NW+@pgSHGs05xn>|
zzbo)K+}{!&u2}h2O-yO_b)fgAjyBYX1#}9a5uaIunb|fYXTCrwkT(Xk$lnLhhSBb8
zr^SiEy^%^^t%zfB6h*iY`$inhou1{Kp5LVlwYxYMnS^+*bK5Ivd?0o^vGAs3zF@lB
zS&z8Aa}-pviyb9?!;Bk%z^(X6@Hy;6K^I6)qWi2XodR8g6u(<hOl;`-kRS+<wdshr
zTJ*jVW5u!t<&)Euh$aky6D6w((=oDMHjAJE&eA8V<bw=$m~Y?sb`jGkjja4NXVJR0
z+VKO8`RoDCg|Cv7eZ2X+f0B+Njf2iF7_Xk6gy|W{NXeZu<7y1$-*EnCKAu6QD+08#
zzi8jeFJcH6){RaNH%wC!on2@av{`ht*2Lh1Q`1RMbdbxpw&#}bI7f!y9A&_d))oJ<
z!5h4ATTkkFd}})qJp2VHn;M<j$_q0hl)5)G#&@0l0@vo=y=3X=l7pKHt>HxP@L|4&
zwT@h?+AU75z^-*kMg78-0`LKNU2T7)g|Yj3b69t#%NOS7raZK$q!PAAow$dm<ZVye
zs~R+0nod|k(mPi-i84FA-Lpug9fJwf;p}(kX0vNDyRsnQ1{-gTZ5-9!u8C)D?ur_x
z(Za8<Z@47T$Pv@OsJyq4-(1}5wz(#x>TM55ah0ZfQSSX|?8R7O`BD(5w8$LYv1Q)x
zxMZ^V3L(*ng)m9{nP~<)qo0_({BZ(S7bQ0Q^P6Y5MUiAI&&w|E+5e8DG9B&QG{L0@
z4y)dw?bN*R7!y|CQVk^_eD`K6EUz1FhqM0gt7~n}AFTIaC*uYY6a5qx+)QyV^h4eR
zEEaHX_>2%%Z3DP|*x)pko`%F#S}Uj|4>U0=-;#Ds_UHUp{dCu}k-u`1dSWFw>2W`d
z`SYIXc(Xsd;XSofKm&c0UQ$0ZMb(5i3Xpij{;cX$5>+w4MddzGA8+yMa{hpM-OV^X
zkH<v{L}amzF7KkLi<zr`fi2yQKN01$r(Q3`L%uRZD6mqwS@-h&yj?$0%m7XDJZ__@
zOtXjG@9yLpT$PDh^Wyi@GQy~W_}LM@=jQQ)om{pKD2)72esc|{NgGlkdaEJ$n2Qf?
z$j>rb0wun#_QHxOegEOp7R8-7x(s1=$GDxOOABCP$1*m{XSCZ!fZvkcKo6%o?p_*g
zOpD1mUq4-A<lM{ApJJmOD#N|FlZ7RCHBg(hQ1*)Bh(9iR{e9tn`eLd0mBvhl?ypGh
zISy;0*t4RWCm=0{8CkNbmtA0ZsqShgNth<21soyjN`4$5;ZSk<+I(JEd-xYA<NIP{
zo01~hWb7R=xP+T|Bo=Ii)3C!Yb7f|R-gT&Z4AbP2ZcQX;Bhw$BZflBlF}_OgfK)YH
z7}qMrtz1*8=-b76d)aGhi=22l%8rzr?Fc;v^7(zqG&iMpi{XNHAJj+TDmC+9qc1jz
z5z7?t&e&%!$kYgX##)F|kWE|n`PZ<H?V8V%dVdO-=$sI(1oIwl9xm8u_lHrwt+$nk
znB!wwD7B;FQ2cQo;{GQ<<uH#`i%tfA&9yY!l^7Xy%yGpT@6$QktHiVx`87fRl#NA_
z_$Fp1X4NkiTP<~+t-Yfs@KzQZcVc4f;8O96kvRi8mBQww#YuX@Hj6SIW62SFY%Ix-
zOACy4Wrs245(}*KQIx5i7{5N}o|s2RaHoH=nDG?#bTg6ctkZ4xk#*v#$Ja=p;)D07
ziAoD5^){jdhh5o{w+_7R4TQ{CouHqw4EQi`k|GW;EQC#P$s5f|;IpcE%a%u2t*jrM
z!N60mRc_Hr+vo7j8GWyl_-2*iZ+kd7MrPDxu0Oc930rSG3mlYuilfd(2Af<0Qd!FO
zeV_k4oy|LSC!KnKBj?!x*h2j)EGz9n!x}LYAF`u2%N)Y>R_HVIYH#C5kpWJI|7P9M
z-U0J>+4ZdIL8%rITX^T}-Lt=grCO#fT)Vur#gxy>i7Bczth!JxCagTrvHx1!z|nNb
z5$D<DcBwo;d=9VQWDTIsMw!Bxm#JNHt7`rX23DYUqe0U(Uqf2#X{Dp!JMTnPQcC@1
z-&yp1k3cBtUJN%t<z&|?6|q;-`Qi7=_!)>eqXEUN)IKOw0Sn#?A~u28_}U84ns{Jj
zmL)e#6RptkjY_jP6<ECIg-o7NeRbR#I$Z>)L{2Rv<jcqk@%t*Z!Rhc4%ZKaxT*!h%
zkcYd<X*zM;TXLgW64eJZtE^Tl+#Sk2MwT;AH$GVrXOa+=OD5}uFSFz6w0Iuw&8FT~
zo4b}58_Cp&X~2~b0f)tERF$n%zG`yLzk2guafnyOWQxp%W|*<~6*UE=Zqh)E6C`zG
z7D4A?zZ!JgfR4&P+XBbey3l$Cf%Dy=UOHy_Z`2JuTLQp!sxD`HSupoA4410fNM;K(
zydgfEU{DRM?}1DIJ6bV{QCm&Poc4HId$rT9)5=XKH9Tj-hs{{ycRYdRbf!*6r|cwi
zlR3RaYo#T-v}(GRp~#B4Vwj#N0Rb7ApFttl-r8&RNU~A7jhxv`zTx_wnoJ2(8><s{
z0(?IKqx3lQVYb+p^*<%a4W^DamJ=f`s{Fv76Z*VAtHV<V5{MZ!{Bnxozc?Q_7R<`>
zU$eiqgu|nIwzPZ1WL4+BxvHHcxpFL^`9<Sl5bmzgdvX@Ys@Y%iSQ$Idatjx=yjeQ+
zQYIEvuao3~t#rOlN&!!eV8rKT%-xmA8_I}NYOczN9E(`!D(Nu>D0{uPIE!~yi@^o+
z`-QiT?^W8Pp1iQtxnY_eUXly@IM<-WIkKc^qXC~^>&X?%VN8AZYBWCH?y{wM1gPLd
zAX=N%Qybb?cv^%QOKPvuL&e2q{lQx2uG4W(uDy(wj|wwrK(Ow!wAbnW9FleB;y9aL
zYE$@I-tF+UXQN3bR6jbDpov@P@^VgU;Vb5pZcs92Ue3MI45JeH_0-eA=^qYF*;cv7
zSMT7VOz=A`jLQ@|9m*f%-;%?B@CdUG2K}N+{ryRAt_m_dX5AcAqhVM);Sx+XbDzpL
z%bWR=ZUwu_?zxDNz_agt<bU1{iT$oR48wvu9ZFK*No5(KbL@D1H0K{KOGJtmoeAXa
zQ+x+6S1nTgb>MBlH~fup&bc`TVabxYv2Pj!u9%!|VkG}AWrmEu`Z9IG%=AJ{ASx;C
zHB&u(vLsrLRC%5`b@po3iU<3F@S8I<-YLa_n&D+%fLnnxdTgeAj$RKchpN$PX-)eY
zWzVvR30ln5+kuemLxfKyg;0-^ikdC^bd1+1c-hSe#W**6;~c7-MJ-|ZIT<;MHqx|~
z@FDtij?OK+d8TyCKa{Dv$1A~oAH}ilL<3)z?jjHhMt@)I>z}`tbDY0QJ2Cg+U#bq0
z+#uSQZ!;#vOaE@K!jI2}@%iU-+_3Q+^Q`Itoy_A?m=YRUGHv2#h**fv{@`xpkl3dx
z<m0N4+G<kynh;vQDKHML&d;3D39}$FbGYuV<@C==>4=nJwHipu2^T#*u6eKTdrM<C
zlcwtgjXap;K_EBADV=mfF!$ziU4@m_=hT_+&c3DihYh9vbNOnoG7kEw(_+NeYaCNv
z?eB!2kOc)e1<&v!x|ySaq>t(>d|HJ)k`@U$vsunt=J50!u&GF{SHBQ%v_|<_{e~Ae
zs42M2CuV1WvIm%Ku6oXYt6Xoq&74haAZOtmHvOEoScJ3K(*Rz|9gAptNB&0X`6;@>
z0m4a5?;OPEvJX>y%Q70O%})PDH>JDKT%@1{Il;)Zjdg`!-TThS=`vxzpO)IdqO11`
z*`I!6i}uDioz=d!bL(e8ELUkfqddIz*T$-a!KxcUv*scf8|Qvji$VNbpQ@Rv*vyYR
z#~+ySrE*hruT$}h)s(C#a(P&6LVmAdkr*31*ZOnq$5QRew#i!G`XxIk56AfZ$Jcin
zys)Mysi2W?!0wxqOwlfxnkCgK&!fqh=)_Fay89ort-oJ{j~vpTNKp4yT^FOkZMfO{
zS`)6To)L4r+<HqkeFz$=b*M|{>^yd;hzTm)@!B_M>GLXe43s9-E{+X+{RTy+lIL0D
zt5|Q1g=vNct|g~9vOuQ<BGfFapViGqTR@(s_*^;^ky<te4>I9=?oeV5H;20xtt^5{
zti>o0>9t3FT3B*V83^$@9(%GHuCRZeMy%z6{b3@pT+-hnlC0@N%**tZg(@Xp`{V&*
zA0_~{+HET8Ub0U5$Pg>G`3*8L3DnPsCe2RjQyzORD9Gg8Wq*)q-Y_-1Fbg@0I<8MA
z-awoFnWIlC&B*e0H2RM%rT&AW++Eh%^itwW)eiKsZOp>6X9t?N0na)-;R3CWQEJM|
zRWS#K2{h*Ka>xo(^AcB(jxwAE=GV-Q7>7rT-Koz&lw%@^2@#+-%M@1}nW{-F3XBP_
zKZ6`ji)JsNBz8E;xszcnNpopb<TV=+5$?B}C3>@a??puJ=%(`aWChmKcgpt3fgU{k
zEr-s8n~g|}EY`&p25aZ8aNq`BY|LxB`0CqRmk9U2cp(pe4lO;)iWGZIY;nc*CAu!~
z3-4b%2t|anQ=?X2j}*Fhce-?Zr)w_kus=<{YMs*V&ucx*X$i{uw{DkVtWJ5%0!3lG
zDj(d}h24GaxjBSvhl+3SGBPWjSN(0SL4&d}tmZh^JPhsT>ZOX*-{A5Ws<>H|f+9iM
z9X(g7F}325ChD(DP}AJ&+nY3);XdFsx>$586>pD-Vc;7pQ2`UBhOG_H^KK*ART9@%
zk(D0G(3lg;GzJsI^h;`?G56%tT(_BouUjNHadOBxlnU-O4(B~S5-EY^gtAiQZEDIu
z-sue55@9ArPASN0FI=<uj0XRE<YaA!R_~?cwJ3pgo^s<K6AiM`)-DNJr4R6SmCKOs
z_NAh8vprR@8Ir?x8C{rXOB_jNjsO>5rL|bPr#&m%=J!&T`QY-H7t(n$d}mp?QW~}u
zZ<LGF$4*2q_r#AyWe&RZ=L;cWqn279)+icAb!OXw9RO#qKycdR6i7(8U;6rB7n79a
zE+5UWa4r5xR3S_>Tkj}Zs>UW#rWuOospH#P{F)p2PAQqEGl_&<o9c$VyLy2)<Pa3w
zmtapntxNPAN1(JoiY|8dP{XDP=0JzF5u4(t@C#Y>$?20B#oI*VO{Y}zvq=N0rp^L?
zNE~cr(|;o)8NM3?wdgId5%^-%>!eN00y9gF|7s(=nB@JM#&MXlOuA2hP1jL-#aOK=
z>ZQNo!Qzw)HhE8`Tftmxv>$kxWb0<*4>sYajPGUUm~ofyeKDU~<(6x^VF-EWA-@=|
zU}!DCGWjEu5<w1|a;VS!n*JQ$sTES1>!tFW%rCMj><Z4<7#hR!W>)H>ct43`hhNsx
zrCO}*fFL#sS_!9Dt7flZ?;lLMWp`#b&tl!;-*(yslC;F=S7>(p1b=?wHK1OIQ%!Zb
zlz8Qnlk(W<Bnq?mNr3|{o@e}yoKmUS@1MH*NQ(Eu3t-WzI^Oc}$Rk^LVMbxok#}uH
z)7_wayNei3S&BT@whVyy=1-q?;hBVQhsxR8Y!ZY1B988g{qAkZ=ZOMN%gbG8jvG`f
zEpjdWuI9!(*5v&WJ+}Cc!rnM;q=J?8`&7Wu&sn!!JZmLr5c4~a*e;mmzy^eef;P2;
zOiivqJUxgIbH?iJSxF7buF8~uOT`aHbHO(Y`5)fH`=q{H@Mzt?Hv|}c+8H{&eY2tQ
zRj5|OjIyMo$dFU4)%&-Z?-DCx>tOY-5*pk;DA#tJ@T=nPTTZqY2^BFhlMu1SvPiZV
zx9SBQituMK<y|*}hcJ3pn-U6;C=J!Q!tQ*pI-&7NOS3vJ1Dmb~thZd2W*1q~*FW%h
zJX;bM&XCEqyVJHsUK6OQxT(_;<=oWRD~3Hkfccp$I9+bU()ptL=Mn51#a|iAwY&3k
zgsN7Ks7%`RBgyoD@f>&e2}`?U<NbN+u#$<m%fAkCh}W<zz01*={m7t~#h}-o<@E~w
z!UO7q2u{Mf%B2gzUv!Z%G563oDN3a^OX`)S;e@+R&$PBc;XPV-gaTu#hnifUuw0uJ
z$*C%m!^Q1qs)W-NcN2(Ev>L|jdE1}Gd}j6e8PL!&p7HM4#;Z1xaZ(3C1DZ<DUSWbM
z_0cViY4pUdG5jE8aN@EkqtB<|y8Q?yj{Zf#zw(AEJ!0ucDRxT)znbbh3Tao+Bpf(u
zQQ@Xv_d#*|O?=E|l6613Kd98?>V{z*VS|E3CgT+i45(;klde&)eml|G=NNK-;>w#B
z9(}{~@m|OC{S4ur++y2Gm-2g+_K4DRsgJ71ZOG)9-2}QE+vUGBeKX|n8^3HKnD1%h
zunR`67aKg^J0|Zxk96VGdGF5p^VJk~o?!<(X<qHpCLlAYBX{3u^2|I^G&lisuJVUt
zW@+s!6w@9&$|It9LLCRA6<jDQ^6f2+w&8m9q?Y;3J8S#tAEQ(by5F+5!xWwL3%RLE
zK+U;(d8$J1AfMMSQTl(OSmwxQd#t7tkd`uMszeBBQu}H)!1&!dQ`$uMF5<Pb_Qspx
zKRy<rv9t>1HM0GFsU%JLQ?M?bJtJgYco#>id?BqKag;>~r;2i+WS}XfWV<7H*XA^`
zBNu)nYSR}|K8>43W)=rebL99VYawc__i?XNAMrS1b}1@ZsO+sI|4LT@s;AHAP)L-A
zsn-_`t5|{0uGt(its0wYe-iveJjwD*;Ogz)L_iv?^ntt`u_7+(B4)CUOgZ<S!1+JJ
zDvU2aG_538Yl&{~ZLsz}mz^O5^4YR$G(j$~O3%sL#}bZC<6YkF8*F}+TeE7u2Hv(V
z|6(}H|Hc2DyuMWQ{TIA=Y=K2}b)1f}VnG}LM2bkXJO6&$Q=YFpAW0>2lrmUz2p-|O
zSj_VwD3j?J+f_TFCcljD_Rf<@oDuEnP+x<(z+kT}-sVGoABn<+!#1rxk_)T*QOAA`
z$LPrrHcWiw-4gF;?Kvo5|1?Q#b@1E91?M(~a%c3dD2qjYk&e}6!RvKdkeqa3jk|#3
zZ+Xceq7D?_rY&4GgTkzx+G1)>09@w77(%eKQm1%)0+q#|PhpZ}${Y33N@UNO7b%UL
z)DOwRDQ91+VTSXk{Ax>?IP*Cgc0RlwzgX9-Ud&=Oque;q3?HIRbl2kuS*5la;N4Fv
z@Bex&@sle7TsafroKj;oK_-ZOg{AaSQN4OoK^XO<L?=~vF79`yJJPEP9Vs|m#h_UC
zt08|yHpr=(%<l_=<Y#7qX1ENrcZ@fJ5~efX)_6;V;p+JDt=ne&aT>PZZxc0TA1}*X
z#@Dmkjcg3Bv#%vW)0uuU7!TwV2L?@2#<hIxs*{dFM3d|28}@7coc2A@OnU=SL=`hy
z-@dl|JXx&vD2L56*b>`w-uN9{wXIp6BrG6wRF~k=|4W@jwWY`pMo<6imB9R!hF}Kp
zNYWyzE(1P?KK=;*&uD+1Rc^ekkG6LV4wFo=%BJsucE7f97F(VResAYK+2-mw{v2mV
z0T0cVdOt`n0z4ocK$m!)6kj)<W+%!Q`g7f>V&(^udZ+7gt#rlwmras3cs-uqD?-mW
zwDGs5F_>eV#Rh3Ecsk7i+dN7fS`94HGiRXGVtq$)2BWN<^vbfFqPk??mSmY`mDg<c
z&x>r2qer*OleL*K?>({E)Q(`yF9zdfA-q9qaq^SfVT2BaiDy?|OKRVnax2%N1lrHJ
z>F~&rQ0+Dfi0upt9Yjns!RO7b5-w~e`mH~tM~@?Zl9|ySOyBk=@KX6?6k)G*vzYtM
zO2sxvc^|yv^2W5~Ds-z|pV-Wal!JYG+OcCSeg9@vhj+7va1xu26pW%B$kRo^s7`;3
zpc)}+lDwnkC^CSo<0v2eXS`S!4WV;)=0;c>H$xatO1bJy>5@SA6<mTkBMj%80)S^-
z{oU*PkC>*+%0+j6v6Ce{z7#0^LGYK9{rI(!9m{T3OyU9kGOA=5yCq#oDuiJSwaX64
zV)gpqlkkMKFUQXa{VU2*+%Wi}W1`>D2SgaFQl;ecMHlM#G!0$4UEd|f&~n7bQhe}!
z3s9V97?Of7{K@VW9)K?zmacN>?@dHS$iTihMy0iBx>Kl8T@>T0iXS7lN}asH7Hcz-
zS6gFgZNEFtzOb2FC&a;n06T6%kUcs2gmw9U%hp=;lGl2Md-;Y~%!=lTerTP{v9(mv
zT;`*?G4ENhnUr0BQQ(439}whJ9+^EG9*vc-1L^tp^Ka@M3=IEOkr9>K4SHVdpCno^
z^1<qG1nY+Qs<P}=1!#AwLGD9JyEjH6-UQ@8h?O%--f|HZ9pCY5=#HM=xzc|jOLrj1
zPyuch{K;&Quqy01DB`LmB4%yHG&}Cc*`<^h&JR<S^yKfRvW4H`LPWkM#&ve@$FJwc
zm6mPY{MxboPTmhM-;0oawm_pH%|7PkjaSN9f^~3GyIunPhUs6JF#Y{~!#0*{`xn9A
z3s^ki3VJ*t`WVF!rPj}Xwd->+m5CUoHz9id&|!IysPdPut(O%+wT)ISgXf|^=nP=)
zV+s+!16*WJiXiH|Pp9h2X0szq!P2si_&)ddkC1-xpfL@2{s=FBSV9IE@!MpEB1Tfq
zg!x{9C=b3XumI>3<Au{XKsogJ8Ic+r(L4pg+KS=I{kd#TL_G^j88tsBbYx3<N|)Ni
zfk*d?Tsul;VritY0DsgpvAFN`)DA<))!ax=_)3XJ;B=(Ag)f1Vg=*NYBvy5~<odoj
zu;(YS9dH)TP~zRLKBZBA$@5D6;Fmy@N$tSrs4j|viVFr|{<Ou9hT$veJI$J^DMATM
zuR5y*Y-bcrBMbt}W;@xdi#i+$I(DHBj{Z&sp9&X`lBQ+6fz-oRf+fc1NF8WP3N9%t
zN8H{dbc^vsg=z*gj6ppUVAI^2CN*&PK?sL`c`}4E>#gQEmF=gGR4ti#ana4Gj+0HI
zL2gtxIDw}I=0{C21B1j1(J7SdTK9O`Tx@^@Yf?nw1UXSeb~F)Lk#`y*32;%wNE#(h
zeNF>TLrz003k!WtBTi#ZV>8o__M9I%%{VPMEd$xb5Np}RkXR}IbE{TMABpK14hRGV
zf`ME>$ZG&kLZlTE>Ax)%R!Cooz_fsWzGy9JvHtl91Vcdy`Zh>J3D(v~EYCrJC&xfA
zPeQ3R5+4cAlOq5WoN#ZA#QPi!dVB_f@c<L#Z62<{o*Y4;kc9Mqj-Et>KmmY+qlcrX
zWkMkTt4sykhcaPL^YH+=6C!Q@pZUPtfP|%gj-KY@26H8F+C6l@!}X+0E(k0E{&0o_
z;Yw(<Lt=tM{_O$)Z~;J1Z9wRw;vW3CxSslPLm!p%;K#%L2>%Bg1oj`wbpFfPgAoRP
z;>ZnrVD%qL|2MY)05=Hyi0=p6gX0rF2n?9eYX8vVQ+FQFqkbL)0fapY@n8dRL;oH2
z!Nv`FdY6mqsSN`D4?gh!(<3(z<cV~^kf%I>d7g?E3<Ep@7YK#`xF2y00Dxg!|F*#&
z;Cm?hQ6~?e!MM5q-Q9!VlVSh>2n6`V56T7lcan!34-G%D@jMJ8{BaT};J@_$7nuiG
zd4NwLggs>+0s}mz6Zp{Gqq_j$Kl=PnUig330ssKz20eoR!IAq3GC&abla7HP5ckt0
zJUow41%kN#%lm(ug9CsMLj`<<0uTh{eo_nw40sw4#`73{AQ$wpJ|1##1E1XG0>FT@
z|M35R4G@qE%=IYXgOGsW|HAcOv>q%^;0J=apKJmk81}R|9-jZx2=)Kk$`48aK82qP
zmJscXM63XKyi9;RTs)8T4gm5z4F6*sAC-EMyDiIva{WL7_DYrZjz?1GF0LT+K
zArGtdae62K@@Q`WfKYD8|IGV<{C`F8V1$95)Cqe~%j19#ZchTjK+vatJP+JHq80}G
z7d`)zd9DW$JQmtN%lmOL56l7|2jqr=xgMkNAQkZAco5LTo_|yflnV%d@{~ZixF2sZ
z0E`O^eVhcw1%3Q%JUj)^$J-A0FuzZ>Cjbig&pv?vZ}@=#DCl3%JOKAF=3LN6`gpKG
zABz;o#lr=C)bWFjhx-vF54ZsT-N*y}52FQo{7^pFxE^n@htDirPsb7pemv(7emswb
z`Cx-S7U9EG0$_@dg!Ewif4p+ACv*Pb$Mu-^2iwD-CkVPD3F(Om17V_&2cdF9MIJU0
zgd6stcrkG?fS3r7>){`$1ZesHzb@Le0s>fe_WHK=&bG!TSP$VJ8pC2>5R(_j`X6K%
BKz#rJ
delta 14932
zcmaibWmuchvNi5nin|skKtc%aZUu_FyF>98Xeq@h?plhJ;_g!13KVxMP$=F4#Xiox
z_ndnU+~@i7BY84=_N>`!&CI)hB%^=P*RIejEs+s;U@706;F*DG9YyC&KD_oF?Oi!|
zLT&$upM^FJV@?qW(v%It9)4;R^F(I)?-*Z<b{q*Yi|Ub+=gxhC4aCcAxm=Dydq@Fj
zlkaQCNGU>fHtU2z_LrP;uZq8>$Rv-wNVwj5?V7+^rQ%8Z*D=FtA<_@;U@g6S8p;tc
zrj#Ao-YbYEURw<4zI*ezJ!F;Jz_Y{g_)n?;y;|cIDLI8StN1-)K;~xSdF&wWQMqR}
zGcpP+TBg~+&OUxb$M!75@dkgVKv`csk@VNsi;r+rZQikwDibSwcAE0E!*trkmCTmR
zhGvD_!P6z~`zU*!a@7T<gpP(?RJL8*60Wj%(>Ai>8?lYRW&P$dp_yx6$mEbj4tK7c
zP?Y#O`(R>N^cxKx$B&r3gJQ(->d8ia6zGlKBvv1_V`OhbwD<zD1eE&(xSXyrR+4rv
ze<KDX=PX)ALZv#=HZ<y@2vEGKZHu3c?}$z6q0~<3>6SL8<+$t*gnQxQz!!*X26}pr
zt*fWk`6e*~ojtyzeyG$iY?aqqD7|*8yk}T&hDSNg{L3#`Q!I_1wZek(@U!7-%HA?M
zo4i9&CtwQ-MKz+9qXZ`i?8;f(kj{cjO3<;K(dZl%_EBHM9m)=~aYZ+*K{?#5^Rb^n
zGptx=Wp3V`sM8vD<}wNNrcN=^|CPM-Hh2~8Y_h!uyj9}WPbPN8K{#2(^<lJRwdw85
zr@x2Kzr%V@?=9sOD@)L)xE<%xUN(6DVh+CDe{I`V#{!X?g`e(I`kPJ3W%^ArB?@<(
zAbllULdJTs1Uae*iQSZEM$`m%DAQhF9T-lk!^1tOd_?0!wrjSS7g8_4c0?VuY=JpY
z*USE8fbu2~Tm5K7N-i$)9QJPC{2hS*{gCChtLeN}rqD4I;gsv`#BwE4(=92D=UBT8
zmKsiDR9rY(z_4Glbd9!)V{#P=D3v;-(0xB<6_+1!B8Hf0@Ks)8;gaBW`vM#K9X1o<
zMzW9VB{|Ohe(kwg0~OBU=2_fOX}iR?<Ww_vVCTy*monlHe(YRUt@DxG`*f6^trbd&
z*Cz*WrrZ1o9qxHk;xBGsD;ZNYxQ)u|s&#}kS7%Og1et`Mc;omgr>ki<-%MHZR&RV>
z!vKRm*8%E=9(;A)2&lbM3I|;so%e}f%bfuNtz9x-D>|OBugKL|s85t@q-V$C?5u(*
z5ZqQVg#S^;{78jBVZE`F^S~w0v_y;AWE&wvpqH2B9ow~uxuvLX<&j6;yS_8JWuNDe
z?C&YUao$wcqItzXFD=Q6W+}`rm`823=kSR2JU)>5YpqR1kujtzFCTZ6D<dJE7pyd!
zH?I|W^<BV7g^oF>P8!ETHc9woW%()R0L?#2s((hfgf5(!zM`pplURrsC*LI59hxb=
zsUk&-9WK{-KlK57cZy0@u((z*n@GReS7#*BsVCpI_Fkj>AhCMF4KDOvvKV#l$9{T?
z%}sS!oym(hZrqm;m}y<q$&9C8w2IKn1J29BRm8(4c#_Sdx5(rk-eO^bZu~P5)|xJP
z7$%Y<k#U;0w0C*jM*XblEs>6O;Uo!y&5~8qeNjSvxUuy4&(N8?=kUMmioT60%yA0~
zIDW5B1SVrxy0ytt)Hfl(y4v5u4f;H>^^@z2YgO=#F-C(i20RrmGYErA$<oQ%!-j_j
z2IYhO^BXVCzZPh?LHvCDDHH#gg|*0P6mvuz5q>VSO#Dc%!{Ee2T96#cY(Cm9EiW%~
z;4NjXk)d^QAfY{@!CU(EA+3qm{pkMH(JO7wi-qbxy4FVlyTz{{I*g;gM#Y>DXvfMj
z9VjH=SQtH3IN?xHq2#Ej#AK9NOmp)@=P9JoD&$+cNcCZ8w`^iV_!d8J9DoEq&%hXs
z>M*$H1`hC<OK>V8v?_tLI5=>`s9|dW!Y|5DxXDlDChkGc$i=#-5ZojR5~{;|`9nCq
zWabRt>~IC)4<M~Qf4&9$mK6}2#MweaNtb|A_%x<P)3OsGrlBA7P8bi%?aw6_h73NN
zwRJI`U`s{@c}7VVK}K6aAqg<W7DPTbkCBVxh5&008G-LWMod)xB?hpXOBNv7=mlrp
z)!NVL^S7i4gusoX=!5W(Tz$t}f>Ym6z>oLBlbuGu5i+BlT32r5z*oQl%h*8)(Pz%h
z9n}CqFfG84fe`%1OHJcFDv23-CEQ{N9INy5`OM`kV|XRnA03FwjzHEy&Y7~Ia##H)
zt8sWBbLsi9j5@Z-U-n}z9~CiK(D(W9QFMoEeY$Js^d0@=;8ex=#ra^GF%_GR@fX-$
zNboro%WrPS#}>p6mT8OtcudgOrHuwOcVgxiBBX;gg!q&@wypWMe_}_UZDFl#udS^S
zZ@~vqz|p+UCA@a_RR(aGcX40rIG@!ZP;(UvKQ}pHN7zEFhZDZf^?{`|hro@+aMDm$
z0D^bqd9H2<BVA(FL8JrEu*9#!Zs)P8F9}4UtM~^vpf&GoVHLRkqw&>ytepPgB`UN1
z6V*%VTTAVkgzuAy=2sdgtL?KDzn0;R%9e!Sv^b4af^vi4f`FV9#I>_kc3}TL_K#>;
z>8G`hvAz@BJfW}MR5X`GZ+BX*W3gsCK82iAM4KYqyhgUX-g$`vPja7j^O~ZSqH~99
z?0)C!o__n@`2eW7S!KEhaL@aCXa3+qH>vOLV;8^UIP9Njcb+k{@QXT!#^0VfiQPdp
zQO|dn*n&s8I03Kw{iN4?0V_E2?+bse&Z2qwB6^{weGbVA)&gR_0nNus&Y16lG=F7v
zcC3=YvAsa;zrW1Bz_vNN$>tZn_=!ur>yvfY@(~Nk#`(_gsL}fh?o&+6Cn_6?@y*`e
zVa($Ve<L;bxNGVJY!mA@bAqBpaM{~eaO?+^6M?T2W2u2o&fkmYFP_0wD&9w5Ho+aZ
z-P4G`wQPvW;dPduLZ5lZXx@{fi@2xXy~&1+-ieR<bavq5j`RAi902*iDtyaT2hEEh
z%5$#EOq1VS1DGbL_lU3@cUnMlWyf4Bo9o2*&YI^Mh!Cajz3W&S--@{p8Q)TQc>9}m
zPYZBv0|!?3To>+;6reFj+AoCS{`_9MCx|m9W*m2(n(g<}=>3|gkuu%@C6bhWdIKs3
zs{SnMYol3(_@*i+fG8_(aYo+S?6;oVfm>6rl!|HTAdZ21YoZeAub#VRmL6}~Dy83R
zziYnW!^(u^zif_Oukecp*tH-!o?xzjvp7*51m1~bXu4@Bhf^M*qB{SABfsREb3$(R
zM<s?=nwDs_Z-Cdmc-M8Bbn@-Wu`Y|Oy<zuad#a3EZ{i3+!Fms4#O=p>V>(!kdM;>_
zs>OWN$Y5;khqA~^7KX~)D~hi!Dc*Y(?!7A`KIK|=Zm{2R-{N-(G&+sfVpJ#m+E$cb
z(ExhKtZcgO6sj5Y2kCQ_ia%<XEzg&<v^u<&1R?oF8PClaXsyEfQ(_~G>{AqL*$P#p
zHU?pLrIkN8fuU8aALj~;_%|QThF3d3$8a_-`(@0oHARldsZ|V9d~%YGn-oLd+rcgf
z8nw^u$KqP3r)ZC*{rks>q*0(gV)Z-gds~1`a$;utewn9bg~P=8Rf6yN=j-=32jL+*
z9*z4eOf?*LCos@(V6mTd_ux{@S2VuR@)8y`kA`|-Mpd$`Q1*yQ+OY0z^~z|h58!u9
zjDox!(Jk_X0dsSef!8ktG_*#Y`g6$_JTKSom;#%$t`aPiU$u+zsc@H4xEUNMV;TT+
zeQz=I4pOjb_naF|$uZWeVx#gxtp#2MSQAi>$6!V3z@+AeI3Pymrp${>n|nK@U)iWe
zpMO1#Cq?J`vnh&^)b404bAI<5g#&as_*oR8lH!N42-lfiG{ePM9zl#;*>HLf^XRR$
zUE9JM{TrwImAq9WIjI+^NamWUUnK!R^LKX>p=k|XjM_no(+S%-Dx-DKJ1>qh)uqaB
z*V)e7pR9jSXdz-61qRZ2$+;Uig>CwjG~^-CCbvqq9|xDv%Ytm6;#(FW)xlbK6YU9M
z)-_6WOJo{fxg<tf*w&u^HT@C(oP{#AfU|jTK!Q(tiG=?w3t=oOvCuFwy}-Q+sF}Aw
zC4<mp9sZT=h#){0wyr*$a|7qcCyte*N@z>T=;s4XBE@4mS5xm@hNg;1oCUuSy~c`a
zZL0Pt`L!y<0M>6XGIf=~XbV(OVCQf5`(Rz9*R?g~(n2ab-n(OoP?y@!9YNEa-r6q{
z15YocldZ=5N~wKcO{QF^M<}lhAebFv&tP)P8Jk4DMTi&gI_h6BJGV0VRd@pYBG6VW
zdNHyQO#Y2J)l$Ka-HJB4QiI&2lVEF6CviuX6-+p16*u-S!&km=_@xKWOuA1`wWw{o
z-K8%VA@Dc!(k0)rq(t`Y!`Ag*mVz(IZUi42F~z%;jOvA5Fcj6!Ws#*W05Yt+mHe!V
z1X*8^pQ210VGYOu_U#9-qj|gKXWr^5<UDU-5v$?6`f6Vc{rblZRk(?UGKc@*cq-C(
znXHL9RQn6R77rW#@J5<7#q4&KkI=1voZ&3hO|(e+Eh$zmou}r8wYrV;d87!9FGVlj
znGv2?LahGuS#7zV>d9^x3=mixKHfkiRo9)Z5&4d}R;UCU7L{-2jU}FNQUmHfs)xNu
zKAR1qt-#YdntliSu6H4dS5zNBT~MnD>$MCos&46iN1YGr%#re6Jm5>)>StI%F{TTx
zPR=QHd^hfVzRbjS(Gwct!g!3F?xxCfHXm6?qI;Ts(Yvp>q8naw3nZ@V^{RG;|E%ja
z9GT!*)a{67Xt({WBqD{VSzcK8iOc6CQS<M9x!z9Ns-xhmw!PHaFn#V{F^j~kZp<#O
z(tCo+6M>q~ve~}=5iCR{*LWU1`@)LG_v>Gd559gSs6>6o*x(;Ag>5R4n+?ewbkaC9
z7-!V-I|}pxHlW_vMlPVR$6Fy~ZAU!CJA`&_$5e^o$bumB7CAMSXE3YYEJ#bmxw^5a
zQDyh<+nGq&=*@vK_f0tsv_fPuNI!&dWUH5Vs^KJ4jF_^crGLr!IAo3GY%{8?vf6<`
z1sv6H-ca(<Av!9qFCaNXmlBC_p=d@-bybb=rvTL|{Z50oY%{<jEx-hSf;_8<PSW5e
z?SLc@Xa81X=qhY`E+InCd-8kA_Ip8ZQLWKS`cY?l2tIqOujHX{*A0YOfP|`oXEM=_
zoGe(L;$vCxNpDbkI|e>iw!dH8%(&m-Pz;WWQjPuOCoe?H@d?I{TB;K0&*nEyb^G6{
zWIk6^4%%2!PF@7!yYF8%5-hhOmHhtvD^>U>k}dfxqD=fu-+ZVd?&^g{$rZD}q`2@X
zCd%)#T~qaa+f<=z9~F#3xA(Cd<`kGCuJLh0<^<P`gGo}~V$)jF<{S}7LSAOi%=KX)
zgGbh8NnUQ!*An`Ea<6kkDvn1FOs05yYB$JWO}F~?!{ng>&?b#@6=!XkQqPcSPT?V0
z(90*YnR_br%A+nSv3aMQ#a!@4Br`gsvYs#=;+*pN*0khO!9`7713SUDN|(oZcHe<u
zEcyy<j6_{NFmV0O&a9^_d}2iBwhPoi9T}?~@L@VP<>jZJV(P)^i}GmrU)gmV@9S(R
z5MSO``AhYc055%57s~N33vb>=J8sKh(U)=g{{ZVNeG!amk7oCrYxBL{@y>X`Kv^Rw
z^j)U3Y^Ga0%#&rC_Wd|*H&q&pa;V$O*4FWJ&XJt$wi3~WZl?bG&tHA^EC%0XA1I^L
zWegM|PUHVDb?hhSD<oCo+Q236PK&3A)35nz=Q;~7Bn)hivt!swW<b2(_@7_ZqUydr
zq1&Zuyaub4eIC^FMzj6a<jIloLkmM-M4IG;GXPm7weycdw)L_}Oj$sq$@t}gB7J@-
zIpBF<CUgOE4zMc_FN<~J`GiU2In^Pf-|3|~&n+ZmabPt)q>765ku>GlS^IBeLyL=w
z%EeCvR!yLciI5?Tmxo-SH%h@3+3?J2LpXIXj&$o+roMG)=tz=n%p^i&JfZb~m(uj|
z*>#EJ;b=+A_X*R4nwxIkj8xUr4+zZ-NUu-B!KJ8$qbCkT*YX6THulbSs_!I+qcb&p
z{L8$>(O0(;dni%2O1Bh^N@{7&xXV)F9F#WZi1+}tP^&y-(NNaU2LxPGjTzm!F(o!X
z@@<@Jyg>D8Y~Z?G;QX7R<S*6&zOoa8OV+B+nS=ZFcW`emKnPax5Kei$st>bsuJTTP
z6+>M-m9_7(CQoE-Y5tUNOGUF9swWEOPWpEU*7XYmTBq=r?x29Ofa=_1qjCQv?o?go
ziv>WWZ;7F`QcZnNYnq*3Adyf#6R%!-Gb+wTZc6hRw}rjDr~o3X;^*!KWymI^Kf_Gx
zgZOqd@Up1T)>E<CZhwJePTXn)$&Xi&M+Gx!Xo%vkeDEmG*j(xJNP*d=GT$P~q+$dP
z5^^sTg|yo7ZD400g0lFcf@tl__XG<Hi#b3MYe#cH%DS88OP69cKINPD!(!&<P$fzi
z4EojSr2}420M8HI{L9@lt%}@tg@gV^BWRb(f)UPWDUve4z}55sq6ihb2IJ*3sx4Ht
zJiFrb!OhUM))$DFtv>=RR!A{a+>OIL<kfx;Ep^F%774H0d1G_3&83ACrAMnM{Am~P
z-8Ms-MGoZy?@v2zw0*ma?kfuaco&Af^NB(tB8ke*Tt#eWB&f-}O?$8nCbRM5^GDlo
z4awx*A8*U$N(kA<>oL({h`Xu6{swD#UMwcqoNAxD!w>seXx1Icg_Uk}I0dk5Y5E)L
zbB8MyRKCJp^jLELGY3p6z%$Zq(4@ivYd!um*e^SK<-Lb1DwuC4Yniu~%w)4`q73|J
z7MgNQHO1a%aqEd_*V8zYlA>Fcg>$))1T(PThRWe7ir=F4D|UL;`yJ+ccD|T6mgz{x
z={j^A54?)~j&>B5PU$LEJ+$0Bq&E0olZt`kg(R=(Fp|y?iI#L8^@R2TQqu4=u&E|A
z)vNiOJ#UmN^AOrISVXVSgf6!r%<|%#hsVVSeq&V3!EEHp-XE(ZsdgPJ@Xl8&VVzO$
zZ8|ICEMzMnB0%Ek9iDGd@a{Otw14w=#AGnu*&yf*12pr?8XTH=<(0Za`fZu;^s5rr
z0r6^K;vb&|>||lA2Huoc$B{<t0RIr^b)ol_6Mb#@87rcmyX|Pet<M2@)L!6zaPsd?
zhROzvMO;#GC@*%SS5epOK=ujwSsH!xcjYvL<bIdlvx`fA%ej3v0;>VBevi`nsU##y
zbrmJi!4!ME<?a)LF{U}3Y&<!MPW=cYLKZCv%RyZ7{1B<+*8DI5nL~n2AnN@gd^Do!
za1&2pVqM$t7=qNC$dJ#@*=g0JdDme09{w_68l&d&cleX91um<2x5i|DJNY`gj;Idg
zb>b(!Zjx1Lpho7lAGvSwF>aCE!Q_-}PlR2)iL2<<=`)PNIu$b<s6LU|_FnEu!+!h~
zvnBA;dxwL^vDV9HJxS-B4akOwA(9HpTnoi}U0W&dU8&pZ-`k3r;PBN<kW;I(lDT5N
zs?M6z0<=C})30i(w*(sRZ*Cn(B|^)$79`<H-#7F}I?N3mk(^_2g_({2Mx;MGHe;si
z-f4U7g1q;krUiw&Lzn;5+!1{J+4HZ2o(_COE52RhV%P!72N%PwuK<dC@Ez+<&Rq3;
zzbeQ1VEOZBs;P@)_S346iZahYBnE;~F71|Ms6Z?KZex9YjWlNT$ktfFov#wzZYs%5
z0vIK#Im~f`hephBTv2fWPKvo@VsfZao0Q<sZ(WuiyWS=~V$2u{T4~ZA3e`3ram)ET
zd{X=wt^Jjix-D9sSOB?by^t)cXcx{gjR>nOQVug1A*b14VOwW&_5`He;;fG?<v|R+
zrS!p`x_p<EU#c$BbzvOc)Q&U0AY`z%IdM-BBDqR{GCg?8#Xy%lP-G<g+O=5syt?6q
zLB7n&%MWFgmfIo4kaj=!UZ%DyItpHDT-xIuqUN}|7~B@KQ=m?MkiuBqEG~-G@Fj5q
zowKn9&uJ3`3!?4+YjS8eS%gOpH#OmvNuNOaZ83h&dUOZdwur^5A%a%SAAl{7{R7o4
zf#~f}zLkmnZ>IPA`i`#D-YZo>00wtrOe@~Fu$x^-(Oc1<YHJ$9rj>x<oE&XM^ik$F
zbM2T~@^j13O5nHr7lv*}!k^Xz*uP(o`l6+JI!rkY?MvaRd!q9#Qh5`$uNrLG{2@UG
zy-2zuhbz~yKRA_2+)eIok*81~`e+mx{@S^bMJ>TB1iZ9Gqei_a5F@#@n6pDgtpACq
zSNzU$K7MI~C#A~a=bTRkx9Kci1L7oJaDv_nYmp_pqaN_QHabQlU(po*WZEL`GOUlf
zm1&bjx?%=8XB`_&5$e+`kK9ibTlMvObrP|~@2&yyBzx_7^kmySwU-s&NX^SWV8!S*
zp>y}CMso@n@-k+x=%#N*XDpm5WI%{U?4`T>1CRzbJE^CKW$0|@f3^~ompM(3EGp<k
zx~@a5OEQ7rh0r7JPSXwj&|r)T4vABFw?Oscjxb3SKgYod@TpE7@4L<)3A#9cz4Foh
zEwW+_=WzGZJ5w61&S3*|?Xh#T-$!I7rL+}>akRdaVuE2IWABJly=DA_c`Pi$TFj*=
z@GC8t@&o9eT`_L7#xWOXHhmXtw_@Xx{m}6<af%D@-9qXvrMwr35%bv79w|9)x<Paw
zk#M{~m3|YI98B`UDt9~dYkoymbf|q=V&~5}kde!7BymW(T0l5IeP-?n?d9Z}KS;E;
zFyu3gQBAojKe(fvWZ^77^qav3YC^N=Q9{yXb+93tX6BF1Hs<I}!jQ$7#y0C7TdiU3
z=T}Dn=TOCVB?*oRd5n2DN}cBrdVY!Lm6do}Go|%Gpoq#W6#*<QEQ(DeBojZ(kV05r
zMR9K(QBIrlJ-*<Ml&D?SyGRRT@3$RnOz{G*f(ETIa*g+^G$L~8CFe${k7UOD!)WH0
zuPtv9saap88GqD?(9b_^j^5mOwnL}5eDP@jI1E?iXRgPXe)U_BAlqT|_D4M{H>Flv
zD6L^;gnN*&!QvmLsxQ(-AF)p_5Dcm&u3F=wnOJkI!d*58lmCvs_=;;SaCt5|l!|BT
zB*Jw$Yb7(jTJ;=nBBsy%S5P#sNbA^%hcrJAEi`d~oDZq`;4i9@bOS1sjt4b*8T`tb
z4fx<%>-o-zki9j7#7C-{I$sYKDO_VeD|3BZDm9gRhE-x?y8^y^Z~Bef>uOVd*!pF%
zf4#8v=BGVvth=LY&9vn4_QW3oJmYH)$GdOEh;7a$2J2dxbqX?uKOq>)#$~~u=1a;`
zCZF+QOeiU9_O(&+(T_~wW41f`|5%|9%>nkDi<alCMbEOe)H@taA>mB=6<wD!BMk)}
z`@*TS&U=18fkIRl7HDyeux0I$fv-e5b|u4TWm1=bi=v(FuPj`vlh{9RvNO1#y9*or
z^83wd>%>2X@*7^JyRvizml`?9g5D4jmCttmWNSV|aEx!U<-x;VN__nj30dxn$`;_^
zCD(!14LBwZ5Vx2~xJVDl{3=^2Ul;=!Ror=(zJjR1NkN*uFQD*&OjOE#GhuC<#-j4`
zNAW2>U8rs>A~$pHe5!T}H=_HjX1w&7vm22k+5G5=p~K-!%TR^Uuc+?2+#cfM^}rtC
z;ozk5jAhZ5nkFv=j@oDTV_<ao0bU^bDpzlK*Iv0uk8(kPhxJ|P48v#hjC>LhBTmW(
zg8FF>|FgSirjT{S0OyZM!^l_x#DxqF%p6`GCL`?2j%75*S*(4Ex_v3DAe4@jRUrd#
zs1pTE%%Ag(A|>-4?{_qDvO9%Utx5~0FYJ4bov>MF?>LFmK6qCtO+N2oX~_g$Gwx7b
z8RC9+SFH&&Yc_j6!;)P`U5X#AIl(rqmUBe&mI#fDc^3zPj<j^#+ecx#E37WkuejEJ
zq~=#;nf+wyQbwx*5>hVCJcGrei@a61<5U7F>2$?me6gQOxZax7K_QQ!zMf(^6L(`+
zTALPxxMZH4J3S@<A{jkxye0rNI5xa57t2!XXID4uFMo*(okV?63g+A`P&BQ~A8T`E
z8|=-eu(&(heyyDf^)Kcj4o8u7&_T|zK2J(QEF5I!yAD*-#V3#=_R(0U>bRxt6Qu0z
z8@}|~Og52;LWY6ghZgmitK>(mk(;R;q|CZ^V4WB12_|r<v9ahVAG!kh8g%glDooFc
z6%};bL=B4V*<h!6=~Ejz{RXcZU%in#Tlj2-L%KJoG{>oG%zwd<mxh-Ubs4&IXvEhi
z&fo9_P6uzigfPx`tXUL$tIrAZK0|?HX;YoKN<Swf0<-4y81e}_N)W{JVpG1wre3>J
zy?k6eH`%_{`&roa$Kx|#Z!cukV8+K3Pd`Y8>De&a2P9!FZHw-fV3wY23f`<bgr5@I
z&Wzs}5vJ~pDZ+_dv+7+x$HkC>N%u&iWSCFO6AQk{{~|>m`*RRX#us8UL8R2pd3SL_
zk;TO0EdkFpge1uFrI%=(2(lwvJxcNBr`&Cwn*qgs-iVB|us4JXDE&amf{zgJZEJ&z
z?)u9w{k>gPF@X*S(af;zzsuwS<!^;WXQ{kV{G-i>UZE$*IvKv%JogcVEA%Ija1L#x
zCAV~X<N4Fx;Q4Bsi!a{zMnY?>RqiDCGL<tGnQh&T?PkB7a360mHGj_bok8F^|F`h{
zZDKa#YMzqz-!!LP6M#j&&9-XqX6dZ=a{-;Af^?Eq1C6!e%z|5@{x?H}Z8ge@XxqRs
zo)by*AJgrXTL04m8sFjMOuBM;P70x6L7X=ZGMM=`{lz=q!aYR>(EP%YRuu~Ff|5_;
z4V7BwCf(hA?`@DNuk7vUt}%0B*5jaO0ydttd$(ugncC{#T>u~NOdAOjwX~a_Kb!<w
zZTsGY2zq2f;;C|rSJ>_lE&3uRiKM^2yus1Ao#<P`%_*kSZZi~A7ul9K3D+Nxrv^we
zKPvwER=xiG%X?bJ9gcYDmbnhE21c)YrNn#Pw=pscQKCZ>R9tF~p7^5rF>7JK0U9$`
zwhFsf)puUR-f;kbw*$+I239>~7fwM)lS~+BbGMZiM!Mt(?^@-}5EonH*Y?*jU%B}e
zpyqzrvxrK|=U6T|^~&-3)nBZ`=SFWQO%hs|CI<41Itb8Gg=uUZw8Brc^Z(2XV9Z0=
zSu)Y5A%dZMEo9?g(6hzWs~mpdZYjJGwd5{Mk3DCo<Vyp>Uz2LMC3MK}isXxVlsL6Z
ztqVY_SM6T^?uqJBvQ1FbKtH>@sOuQqEi3nVMa{%m3dz5yBBK+W(D|v%K|v-nRn_e?
zcKl;GM7<xP{X<Nv&Qw&TMAu$%AVO61Q1^6f+e9%;;ELNKYjiSh2+ULws9Zn);?)l!
z^)X=w_loy`iPfTZU_sC=L{^h0y_I9p&4*Az;*vze_XtVXT#|3wek7`wtJo~;g$5;Y
zy6Ck^d`6i-5z%^*(OgYbP6p-H2CFQFZT(*Qk<2X1L27b(C_jWfF0)l{?epo<1Un<%
zsh+6n)(T^osfn}xNYWR|ks}#wRi@d@?As*CpjWrRRGPf(9EmL*<-7EN+j682HNR_P
zc|s(vP>T8fDjwR^GGcnxRA%fh%WR2st?hNLjd3|`S~iy2tib3QCtPM@U*?QS?yKtm
zBt@G$4=Rq%>&oETcrEKSd@3qS_C~=!{!lIb^wW(xZvn47)tC0;^E6e*^FEt0Nf#*#
z(`tAH0Hg6dK;(*NI%n47IIUK%;8SBbwQzUQdVW#d5L4NAtbm?3l!&g29NFMOXe{{i
zjY#TOnd%shAH*X*v4&z^?z$<g?Z&mVlpH+F5amNdDsby4tIGJuPDz8{Z!q1bDs^H2
zvqb@ge#Z`<I!wwaWqR3&+B1$N{__Vtwgy5nK(_PrjGR6ukrWna-2sQ2Ez~wTp+{I!
z*#|lvxV3sEoBm11f*q!%*xBR#dr~9KMAq!;<VwDJt;}fXx&3J&1&Q(}+CFbWe5W2d
z*KZ^P@|tVMB8OEZq{bp%EQTLBvNJpj`Z6i}-1(Dau>ZIy%DbJm)$WO*L39i=-=?g{
z0S((j;%+*jYmr51dIWfWdKJ|Ml0IhzLsND!K`Sdt2(Yn<kJ#<!%jSm8-C?rZIpCjq
z){cir463o}ayYma3Q-@9ULHOB*auN+K|E}{z9MH$KN7D+8#UP7`*4CsNy_(`n%FMF
z_wQWoLTK)Bw%j-mD1!L8&f4E<<0`(lVBjv4?IiCDyW%>fSp^{uy57*fhtRl3dWjy+
z-nZ!#^xo6Ho&*$A57%-Y5a{*g=baRtGUDihjUVYHq(9DH?rM?jB^#WxYf;CAZzCJ9
zp%>F@h%kB=27lY}a$7UTUz9F>`{xi8%^$=V6)I$F-E;EmM8i+v&z@Z<w_#R@aW~LF
z(Pmk<O6JqW#i?76T-N<@g0ql>+q(SH$yUInQ~#5(px5MUZh>qYg+~22ahL1iv|niN
zr(4XoScUH_=KDkTPx}3mtoC>y<2GdGW}k&Hz6{h(L?!V3un)y4DU%GOzz}aar#D%o
zkJnD%EQwmfyMI-lCJNdOqu}@Y?dk&XjN@-l%nwR!SvejWxjq+6fYr5asC}aMp_I$%
zymICJZm2h6Vn;HYYr4-uiyfc%nyB9n<tW{=hV!JrYV~mP!p166YwmP~OzL2=>&L~4
z+ivl!NVv7~b$vjQYP?ql>ktcg>s_j@#{&G!AE8mkw~ZmUT4EF@+A(vnafWMvS29+@
zTmWLs$5Q#XbCVLIFtIP8r|T$H*=;|!M&k!xXH87sSjivyYYcXMz#LQY#Pt@M@J!=>
z%Z!RC>n!~pZR%^%K9>{n;vRm;R)D5Jzjt6)oOB+NY0jZPv%#tVUi=Ei-Y!@@5yQi`
zg8Mnv;&%Agjx87DCi9JfFQ(Y6!1`y?{R!o&Nr<&*uG!98?J_SLXb}IcnQ+QHdU4Ku
zFK-;rXWQu}q2^09XEbTB7y49gE<Z`&3qv;JAST|)uD1N@mrc_sz<zZtwX^5I<$E=D
z{^5SbqRZzhltnojq4K^p6F%Q&czu+Y0weZrN@SxF?IzMc{8Fk$*pl_B2dLTeaoRZu
zX~Dsk+Q@aKWZ#UahAWK^dU}w6OtiXi2sOTdO$d)atD0VXzTg0}&Cb`?u;hxFjK&Y2
zf@Ij-FO-)%sO98oKeo&sSAD(IV|ccH{6Tr~&T2m8*F^O6fsv&$(?miD`d!u1l!>sp
z5)d4AEjWKG3u@3e>gkSD1+t%K%?S?+G_Av{gt+*Fm)|7iRA5ved|qI-lx{i^WLUAR
zJBM3NnH;v(7b2fQ;#aTZm6ejvNu(X(#X-~_xRDl<9pwvTU-8EBNh>rsUz-%HE@tpe
z-BKPN@Or0?0@8|bIFlN_x*RFd@3B2B7*X|V9wpFl?pcw7NxrOE0<uFD&Pn@^W^fDj
zn=Jo&9;m5qoog&8MU3q;S5mPoV+JH@-5P&Xd-*4@4>V7F&X2PiisUbs1#wHz={e-y
zmpS2=`OPmz5#O<5UTl}wXgN1I$4L2ZWb75r63r{!jcCEiK+2|p8s|TVSa|RSP}2iw
zxyfGlo2#ah89k4gXds+xd3S%|<8s^TiJ5kvgI+7PRr1M6UPghmOe>XQLi3U^F~3=~
zF$p|w^iYn5>+6>;dR_`3>ATAVi_i#t-5(X{q}hQMTAEZaILq)n)th=NYjgIqIjyqJ
zva_iR5vo0Ss-vU|F!;r_c<84o8#(LPxHNqayA#D>R^l`6KY()KmO=*0*>7UubBLpX
z-{%ymQzL~c;_|9Y8MRfGLjMc6#Moz8``<anR*m^O>LXiI@8UbMzYzZpu5si$;j0}8
zrpR|snS!=@%?81l>mqwjolL1JgJv^7hyOk1o3Z)WLc?mb`SL=3f?dc&e4^><J4akH
zoAt+}Yhlr<+62IEg(0JqS=DUlnwM4A(eb2dv)#r+)q4k2vs`SNzrk1F%Q+vw6ZYLg
zlqOiN-|x33H+{%*<>}0bJ4T{&ezbk|04w*;QY24>IxfrHEYs$ntA_2BjI-2fTgAk|
zPMqwVSu@)UqOIKE!F!534)_){{6(U|6mXe}t+9%PBNX`D%v|bdkDM+(JL=f0++a3l
zJJDu|H+up3Wnp^y-7CIQ;e@IAD3o9y5k5gH!Qiv!>DvgXBGmlFslf@hbBJEC1PN4u
zLuL}C4{LWJ>Gw#muS@qX$9xFB#Kp6;I!J^;OzMu?{SD!V%9(PzGK05?e#X@8iP_Ar
zuwLSpd=~~FZ;A(55y0~Ih6WCJm^rjwL`EF1{lC)CF5Ox8+@@j`yKS^rT6lIaaOHcO
zp0<!@qUD~=ehW9Q<qP;#P`Na^MSZFUbRE8GH_zbX+YC~tdVXYsYY_m)Z1pp6%A-0*
zq730%@u$o0Ssx4+QlL`Rhvq@Cl7vA*NZUBrNkO;3&==pyA%@jfi{Ia#Y2?p)uOP2B
zjaVA0OuGrkw$!6wK(s9vBcJ_zt|=mp?>02n-6WG*4<Dn4rUhXnP?rmgZGUn2vvo4L
z;6RKa0#JXSY!x+*QTe(|-L~P^l=rfj!U0oWPSRR1UE7yny~qwugCDxz250!~zTl+y
z!<DEi0AK6cigc*P)lR2_(POBa71p?hzIV$|+-<PQK=)FkAnLX5oDmXOFEx{w$Hj*A
z{OAv#D=K)C7+*&Tpc9Q!F0<M=oWI}Ug0n0mV<ewDFzhOGhi|Bepw&{O{>`lFGP$vZ
zx3EHM?)6piPpfoOxi%$pF;x|s2j@aXzS6Zm4UiWJvjWRyp8Y|WwYKRRqn*XF{zz+{
zBZOn|k-fr@5`NwvOYvt9Gk@dtOERiH{G4go-$(Rue(RSI;5!0!&EF6HF)_e4TA}2p
zw<dTwb9S+9A5L2tQYL|Ff(hnf{|?A1{P+3X%E1m!j+B7|HU~W#Q%4Y5Qg(_|woXoh
zD4>XYyoZs3B+DeYgoP4UKr{B;?DoB51L(PMA!hBD&ZA%7z4dQG#p{2P_-8E!kN+|_
zDen;ZgnJP^HB!!?&f(pW%Djk^ZQ$3jTT?qrKxP=4WXd~u$d*__|5@8=YnlUhByI33
z|KWk(30K#34KbTw=3c66<Cjz~@bqfSEfVl?I7H_Q|7U2_>jAjh>Ra_+$_WWSMY5ID
zGPHydAQUyxuO-m+tX<@bx49f{;``R-4$OH~WZL3H04`jhb(RLtzF*SB@69c17O%we
zZZhgNUT)0-^T+Fe_>+W=OmAKussp~!t`nL2cr-+BIHp&BOphB8>is+{U&J+&)n@{U
zE9mvCBW34@<u1{_M{C!zYq27Ob2**K$|q*M?ai2mV5RDMb#Z2K1J5Bfjiz@h2^l@E
z<q~mn%7M?9il7`<qO!lRjD`9LStHF+&jPdf!o$nU%AEksP6hO2O)nb8_#DZvZ!o7i
z^oy_#*KaJ7N%w8?@HqeY1e)kq8&3ez!R4mXX0@2nLTyf!>^8x+l}Mz4=HFS+Yu43d
zuAW(@)tOc+Ah`(6)Uq>Is^i7y+d3`1IVCHkv&_^tYvf(~wLA{3JV##>TWaqg>{I`_
zIU7NtC5PZUwBu-L@uesJFA1u$fc<Ar6if@>iC)Z*3ru+D-QDBB@FJb=$&(@g5A)AU
zJQB_Ml7k3`^@TiD%DW}f!73rSzgO~BLi`xgbk{@|mSaN)t)y1M>zm0U6(*6=*WO<0
z-LbYN^z-V`%(r6^#~&8#R}jXFBWw_ZnXCk|a70*MR%?T(P^+rUsGX|*B49?KsPwy(
z4rJV_b}iOI6)(gp*SGsSCF2!<WQG`06k!g^0!}s}D?`!Xv?=tDVZSN!wBk9(e=(V6
zV(XX&YaPg;lGb|lh4%(`Dt*VQ3x{XKaoe9g$it95?X89@n<#=NwJ=@>FD(kFZnPTn
zQA=pOQ%Q`tNkz~g8rl3N&|(yLV0ufnA}Xh3u4ff#74^xMwc&7P=Hz`Kp!$0_upWB2
zZb1AcPckocPk0a};RU_L%qt2j&sn6f{bcPmD$`SUYgKT1{i_xW&BM(gt2zIRHvNoK
zDW<c?R3LUdokx?^rI{B_sVjJ~$W`aHo$IrktFO-Cgdi#dYo@?qwfVi)pzLi9LX(QI
zZw^VDu2+uhDmYh>YudNuGBbgW#bHQyYs#ZNg$8L`_1KmTy=>TAs4LItqy!PuzYmXK
zCjQ17?>8bz4?N$djc1O&F`R$CNM$UiKj-Z`yM7PfEqvXVAl^!l(kKPbfuf=-{z_9W
zWnT(DmP(aNoy(NVjLV$M+}Y95l*@w4lFNq6mdlCD$=1m-EKM4|Ax#>Al>+0xH?c`7
ztEW_%AUtnaH$}k3;R5l%Krn7F1j+$|ya0h-uwZa0J6lMZdRWphO9}9RxOuq$-6e(E
z1tFCXL<9QAi^hot;~$^g5PoiMXv&BSf&dXW<jEQc3{9bMMGz$9e!K*I`0Z|rgX_aK
zF!ae9KZGZx^&i{7PnMui{uC^?|1%;Vj622PA4^Yigz`P)SmyQs#{U!y0)nL6{A1fw
zFfcE7ijw>P3C0Tsr)0W6M1=4^$&m*NN;!B~LwNWRGP4K53xMZ8T|gjS5YJN^H}p|*
z4}QG7PyN9BkJx<h<Kulq{(}t)`yV2V{;Af35e9zZ2nNBP+IS$3SOkH<V9--PC_i5c
zyXV6hpSnMg{-5XOhVX$N=gtj*z<6O#{2mVU#Kyz()W!$?ANqm+JtLS8`b0_yALOYG
z!u^QIhh!e=@(D1E_t9Pu2m<5zPu+osW`OX4A7%JJ+LO~g_(2~R4G08<f*!E|0`c>5
z|0l=;1{A{g#Ks5W1_A$>^}}Y+Kjr@?GY|AbK#vl9ut8yuSa<+|J#_d#+WTL9{($hn
z%@Z5%zgPhNXCOQPgLxj)#r;q_kANSh%R}8g4)`GPQxLw#weYZ)7xJht01!7Xh@0<8
zKz{I(WFAWUX)-X#lVo`LA5XLg3^4bTy}S?qHlX>3{{K$bLxPV2azmgGG(1l5!R>KV
zaYMjQCIL4D_VjRkeE)k8;J@eb!$5u@_Av-A|KqBDpz2`;J@(_{<$GKU+<ai3C$;d<
zb&vgkhf4ZCKp^0!Aly%N=i`Gtu4-;52>OI-DEOcK{?DQYar1-t9vJ*D{{PJghCTu2
zhw(hlnj6N$`{Z;m9>^0(9@_n>AK!!S|CAm0ug4*X8wPu#9WO5k_E?gK!47?#449t>
z^uGcBJ06%H!uyy7=);(L91jZcfOsDV<bUXhM@9HBQ+S@p^f2F`kNsf0(8uw(9|ptY
zN%&xc{Z}&o;QycWb3Y6a$fK+u{*uG}SkH$_<$*rZ{lNx(TyWgHd{5|qut9kLjjjLE
z|ACkX=znSQKQ|O8_rIppzius1ZrHzV{)dPUHyIwDN4h`Qz)znM{127>7=z#X;g0dd
z2z%Tn4{iK^JON?ck4Nx>AJ5bI0R!{%rj+?3h?_w8B)KJ|C8VWzz>;8b2?(zw<l*)J
udFTWv^kJYwL}-Nmzb=L}A|e>>9;R*{-fosw7!QySk0lI7Mrl<UjQ<A{0~c2S
diff --git a/inst/doc/dataRetrieval.synctex.gz b/inst/doc/dataRetrieval.synctex.gz
index 44800ef46cf07c651539fa1fe017fe1b769388a1..5eb48d840aebb1f18ba16e610b06b3c2fffce070 100644
GIT binary patch
literal 26168
zcmc$_bx<7L*DV~}2X}&dkO6|bI|R4j1OmZB!r<=iE`bEM;4;BIXz<_=ECdT4?CT-V
z?|I+)Zr%I-bE_^@4c+_fwa(hB_vvn$fhr31$>SHs!55=A6Zu%`t143sq$^4ImsQQC
zXR{^U&&haV9H&RvJSTsm7^oG8jHf~qmu_bG?0jz$cMwTk1_hY7m*1FCHokme{TnZu
zoRnVu<^7GRIP``J`{8%n!{++b&Lx#Nw2||Ey=T0`+rz>1;rcx5;lkbT{&bPkY4vtX
zovOnNa{Bc4Pg)pf-ir9`%_7yq{aspI-iqJt)@jxym6)H$>GFWP{4KvJ<zXfB<sbFx
z)!WnJI3VNxtnK0V{Xp1whnENE-b|LC_k*cM{Y_Cj+)sY-_CCK3pPTFT(M5IBm5!T}
z^(=RBU&oNE9pc~DcMqp#?8zseQ*d*2`WN%WI<EH)(x{G!Z?8vpIQ<-u`b>>+Ztq?(
zGvECTq@)tV-1=c^Jl2%=Ae5}-`%aL`k8)otPiJgAPu%<A`ZSC4$j|digur67PU(8R
zT3p=w&)Ko)12@sDJbePU{hs2>qZRMli}fk@BPvHH->a*G9n<!^o{Ev;vHd!3a&NZZ
z9(5EYzW3{QZR1Xk*nYAp<mjG1wToN7Jlx;=`!(fRYK&+7S{hvJ@VmXn&`<6O7jtSq
z4Zpw5@wqxa%sQfMFAmJ*Uyr%oyK`VW$#P#6*8~8k;=U~pXZNRV{2ksxXP2jp-g#x>
zewU)}-JLSLRzB_=-k%-srD3lkT(?nCt}KU^wK)8I7#}xVUA?_p?r8%w`*@$ai$6fg
zFXEj1JRjCSr`&DpUxYQ8w);Fd+;F8{Ek!&WEILv7E<HSr@>sFj;kvz8q%ybmp$wf6
zb#FW(^t?L0+PoPT_deZpU%FP$*{@5*vP}1NNPD>5Ti;PX68H8vy-4E}_rBRQr*Ij5
zILUkXt?u`b)^THc5$AWkX?nkAe`|U{emO8M4!t`&mS20=^SZr^^D=n2d+>$a9AR6c
zjc4sGlKr{A;S{IPCA)-Xj4_toaT^jnKubBI$graP%6y1r1L}SY5S@zXg%s1zm5eJs
zKo`C&28eq%kqVpRd0#b5?cFp{t=yfjiu-)+h<1qSXq-0nz3=e7zS;`#jeR9H-tNSM
zDO%u8<@d*fZQEnkhjY75pZ2yo{b1Ga_83W-wCp!@uU$`enqI^yw*%?Y{nzv{w8iIJ
z{P8oW^Gy8C=w6e4_hOj(s`tZFLY(_LjlM-w<}%drQ{~r*&>P!|@#-^qG3edi`YvW@
zv6{garkI%b_3wL(32A)s=ziwp2YVZz+bxU~orjKR&oXz&W8DR)j!X?-UVI%Fe}Jo4
z;ul|D=_r<Zs5{xFlIU%V%WFrFz6AH?PTm!7&c_{@+)i<t)__Y+qx`&YuGa4^k5<3j
z)yjVDPbYpj?eRK(VtV`a=zj0!2<Tf62b0^pyE$=(%&V>QsMQ;?ji`qj&ifhP9CQ_u
zyqAimVH=iJ6W)4JoI@Ga2-NmUCvQ$SR^vY2jL&VqxjGW;yWN-N;>2#&FZevkzvK{k
zBMol(akeoN<>%$gP{7lGES~s>zz#kfql+|)*S2J`lWZ{AuSP;2YxXz{;Z+6SYyzI*
zy(&?fcLPIQVoVgn6*P?)A*l#22!%7m%dT_gSEYJUTH;&P8Q%l8TZQ>|685TK8u_o&
zld~^WY+tdQaqPN8z6?+e=XE>A);ewo*5f=B?*6lzxFv@-&p@KSPcM*>95YlaXPd>O
zt7&uO>a3=@lZ-w_BWYZz2tJ^Hhb6F6kpG@0Ek2rHkG8&lfE7JJQhh;iL8&6gz3hZT
znm;w0q4|%63VW?R+R9E4HdmNkVkUNV@2^@SUn~5ZGo?lXs`jG9it!iFhMd}9L*<Rq
zPsd>iY4Z$A^65$lw_$?bG$Bm-h%>*zuRc;_mzSPhoDu{@{0P)Kdont~6WKmZ@S#xn
zwjBRT87+*}i<~CE=0!&JmrEM6>M1w3t~84bkl`7jxfya;nVmkJJ`V9Ktel|*wcQ-v
zs*zn|u-V6oKrie_{76<5%xV-ySt=hkMm?<Yp)}n48MNC^!KN4K%E-y0<ja=+LuPaD
zMhRc;#%7)<d3cvF417yL>F<<Xb0e*fea<XYGqdu}HG8NrRVm2`_gB(QxnOFMW|*`x
zYjD7esAvr7kiOoFQUYnX7gnueDHioyZ7ZP0?4oH+MrZvAZ_KA-jD&KF$g<eo_7Sp^
zbLkeJWxok;c3Jmyv#r19`JPE>Z;07?4<>g23;4^ofKmzdg_8=fxmtvVeMADjq7@)(
zkH!;7V2=n$=R4vevv*r)*oJ<zM~K#B3L^#Wm+p`jpk9!Ei+O?cwQqjq;e|SuJF*ZN
za&3>17uGa)0V&}bIERj7HIXv=c`u76xVgW$VwdpcMX}xeN?yVZei@~5rK5gTem56?
zwXM|r99oPBXS=Y4x=eRLMi(6>);0RQaEiw&j@c(XwzH?7gOqzYobfOb5Q>=J9XlYr
zojZ?(t20}xW;DSy%QC-jG2yzR5<m+ILURO@VEt-{!4Y*#=Tw>ROnj)&f8&Z?<u7c{
zGf$9SFZ}dse`0pbHw)bh>y2?e3BoUXv)C@7kg>)f42TmUTg($9EfMYF;np7Xz^H7!
zGotQ@-N*tI{2xB=BPm~cV_Pftyy0N<SP;^GDnXS*?#UDoG1Abul7%C{j5aHH*shD$
z%n1@|#ZN_yt$#zf+oMJZnaPANXVl*(dxdX9q0h7`PoPcgGwM>{kFvffb5bn{hnG&v
z=zY>dFv4RIRnC`am+#dTW|mmgK%Q8PNO<Fl9$FQRT)}#l9MoK?`Wy%QXZ&aRh&#S&
zoluVR530{g@H}zfnJqp;5QT%=n&{6VqoqKV)k^#UW;b8|EjKCcjbBiT9vda3EyG8&
zHc=sjDHZ)Xsbg%?No_*!Ew?rHTI%$NAoGUd1s-8VbsX}b0P73Am(FnNXsL;Cr>?OH
zymZ{*)5c}xWd3mn`JD2CY%G#0B;6iVI0l$zG^q}%Yoq>ZqYOG2TCNL>(L#a7jVx`M
z4mnLMVc8pf&3FdzPUfP%EuE|h+YW)|-SIXIrJc7?`!0d+h5fkI7y_s2DVdmOzn=?y
zc&nw}U;6z?)qSn1Ss_h@QDdnb>X3Rr+6Y{F)T^vc2jn}W2DI4?yixD$PD6%?E}bk1
zMQVwcu}M5;wo~5O*(__UYy(3d-jb(oBF5%(If|))KXo3N#NuBi;Z8d)Fk(PG#MDS|
zyA(JV5%&d4mTOf(8w!914hiRGN~Sb!SOhF-zB01-!`$F>-{tp<MJS+cs5i;wHxBje
zxxh7MSq&u<_IES2ezZS`ZVn4YPgax+;_!n5xN@Sk20=iC@z_V=Ak`sq7UIsWwkBY)
z;mW|$jps1CiHOC$WtH9Oj$~}q$P&Q)38<Ip5Gan~<wV1)EWFnrjpMY21!t37;2)mC
zcu-$T0zAVj(!I}}@Plisss_+L3Up91O(3B%Z9A~y9QU6K5T^UQ6IENA_V3GULQ8!L
zBa)zj!OHsSf$7bt%<MQ85f6D`h4C_)s`Zx!;;#czB-uGKFceoLaEP}zf5e0ldI+km
zAcniAZvHTTHK5?dQ7SXhpp!*?`#b;rSH1x3)D7=!k>`A~TLNA1dNBIhD;*0lwHiDt
z*o<Z#C=Eu9Lmv7$fGbnc??u(j=wTKF+L|m63AiMW$m;LfzwvTw2}@W*Fw%eS_0DvM
z-A|fZpzM&FvNVxqx`MW!6lJz_hrk>QXq6Eb%8la*=|#C_qy@4HV0Y7*cFzT}3&#&z
z2)P669|qQYeY56%;)I1!hT$)okjD0)LA5RgZWUHGoh6UxNUk-l3MD+uY6iw~dl&J!
ztx>RI&36ZfFlB1P^H^PN{Q8ij-_^0xZEsQVOu^9yr7snLUd~Zl3`8&AlqqjmbvMwD
zv9r-@IGQs?xT0bxCQCP`_6i0^(2vo)RNkQImcrY@u})+Tb7qfti#nGm5C%>FhC}Fw
zX#fz&oc5pS<1i0^)>kO_3t|Lv{|l5P^B43|>8Btfd+81i2gCXQNDfm3oAQwcUorcC
zBL6=q0;;4@p?3kT8{+NY5CQdoVT#@Wod1^lh^7Iigq86ag$<`G{A0o+2v+;Qpp1V^
zc;x)IT$qLFivO4Zt1>Wk`Ymc&q9@4we<1(gE5cXw0-0kr+Xx0r2nK&pk_H7d4Nw@K
zDx~yMbo+aVY;_7@wP}EJpKxk8{HZbPb(kNH5UqEbHcFKU3S$dMb!LRLveREU&;Xqj
zC1Q^eQC%KjK7;@?liPQGrl3w?-qs9iVFebSOC)z}eGlTdwv`izQwO9j^SP42Jr~g~
zdLW%OopKj-k*7x7o1H?RR_c&8B#yPT4PTRdo1S8i@g(rx)L{Z?A$o4n}x$p;Hl
zwXV~p7e8BQEILNtyc@(?r(k7a;yFHO=sFNJn+nzC^Q`}}w#x$PRTUX3ccn$d&$o&c
z+q@38A`rbL>ldT_lbOwF>0`ntAR9d0shDaj)&Glt#r4vTJS9{iVcxVM&?|eMi*qME
zBSl3Tv84n~Hr`k*O$PTz1AQ!YHG>PHU_vkM4=Fs^cnn1X$uW8jL=W}|y1_S!6q0K6
zE{HAhKq_n$9|)KzZ=n7*#FLNb0a7`D)W=a7AOQ4UAT$*qQu&7nmg-9T4-qU?FzNr&
zoR9J%{t^Eu;NLlwe&T*iou(U9Rum0<sZfCG${0cWSjoR?Lg*u@i4&OvvlR>eRss{A
ztpI4H0a9V3Oo;*{YqZw5R%Go`b;V0`gU=DMjr-|zYJEb)JZpJC6<XWQ2-dDhDQJ4@
za@N?nB~AKLK|0L|f=gzJl#W)h&zk4cw2noV1}PlDHx4G{(#;88&0XGJ4gyPNkiueT
z>28*#_^lVsG<(3$GXh72KNb~Oax(+#X=jGXFGWm|4r3Dcp<yg$wZE+2Pc#=Yntu(B
zUdY;<4O4t3cNj}v*HI8S<UkIFol(2(!wGgf3D7civ9cX#SxNKlE>Ys(hb%?fFh`mQ
ziq@2m+Y_n`ynhcu=v{ZMfl(vHe^QGQGo_p2WkAbPc!F*`ia#bQ>48*+(!U4n^a+1Q
zwE<S$|D>t_sTluBWd%~7DUN<<OYH?M%isyS%_YwNrH5f)N{kc$C5-<ld8CJ7U<5FF
z{v=>>m}nS1?7*1QVtZoiaN?cmM`5>?Hk+Vm`LZ8}6A`?={Q>WO&ZR)03{P0!ZcU^d
z(((QrHJUPm?M~n-y6-AoE|tK1U;6ND`2*d>B2*V8tP08jVTs_)ai~@qS`*zenUcdg
zq=F!RR&YJL_jXg845G3=j?N2~W+Bxz)B#oKl#;L$J5l+EK7&LP2@RIJn*EduJIv1K
zgp=nRQrrHbyQGTm?g*?d2W(v``bwftM_m>ddfMQFPO`_7VUgO-|3(Ahdlv8DUZP>7
z4@2pzC18E^`_M-4>;r99*Pb}dy|1OnUe_KklW`8*7b?c-HLPKIvwDe!);_Gj4$zx_
zhk+|*MKyiH$R8!muYdDsBDnW~E2cr7QbD*qO$2;>2tE1)a4p3F><^f4pa=B=Hy<1$
zg#w9RhIl9zz<LcgR^E_+rGCz!NAIm-aG`$B9)a*V0!Rfe(T}P2jKC<c*8ir`0;2%y
z<7k$`#$O^pI!=~i!CxX+sw(|IM6lF<=hW21?ydhw8E&lfGhki{56J?!Mm)0qtA?Fk
zgSs(ZCSYC#7=^Ju3YP)20#}}J*eG8@ZvY7~7e?<ePPhx^B*JIzV4cUchh!mt<PG#d
znJCUF(ws;6h4n#~=7EL=-4Z+-79~8J@m0piUSq}ZVr}{zAF;=LD$*5v6&7QBgae8m
zba4#()4{t6h^=8&;&-9rT%}P>$YM0F0*W5dmDcN+Da5H|!<6@Lu$IBUX3L&iN&A>K
zkTuy7SSecrkK}JW<K)xOdo%Rb`QqQAE)F(*&h6Cc#ClHQg0Gr~1Nn>>^EBnw6_huy
zq>qH&TI#>3I0Mq)pM7Qy763Pr&ERz%P<{Wt+ocbWfjoj|j&JhghmN9|bV1iM6G9Xc
zRaD(!M7YThrzY=E@&Y%vRSGsqjXCpk;`X1GRnExGfd*aRsy!DDyqEkvJpwZ`Mq;XR
za*SpILE~5jtzaS1COo-;oz(8{*DWnI@BJMaqSYoUgC}uYOTj|YO$4)`N%oKiEjKN5
zw`gE&Y!VogY;6H6Emj0;kl8Rq{}$je&#o~*-HaZUA}O{n>Sng7!;@3YdSfp7h6i_c
zif^vlbH$n=8joMgJh=tPn+EcB9Id+rJb=7~tQ4@)s!E8)y){iVz5s@Kc2@@4Cc&5z
z$(FNjH**9Je!oF>2v}{CE!c(9hBX>b@R@n?kO5ku_LvIEjw?~OKt>%-|3Y>tSZN0k
zBxVD!2myj7fr*k~EN+0HQXs`32VmJB33f37G~)>aEDIUvh0|kzmiGWl3oy|_4xr@-
zVDYtKjK&uMw5$Ux1moHyTM$6Y5R4@^1FUumXvu}KhyoSu!L*Dw)a34GpzaUl0#z>p
zW$opbf`>1Gyly}cj~F26H;|V-u0+D%0|?p&sBH5>z+*RnpbdbETO1Jd2dI1ro0$9S
z9W?`!pFr}#P#%_gOE$-L!kh2k#A%=BoY)iAiSovCw|C`pet)Wk&^WLV<Bfg8`?46>
zUL6Z(G@h(R6iI@iBfCdk6QQvfxdhfov88Y$ZB{B+@A{Fe*D`FNXL)OtMQcyeBK78#
zk&huX!`-4u=(xA<4O&^zRbG8wu?3L~v|fwj;qu72%ARXs50~cDWp@Qv5lc)8U7lIx
zF47nl!<)D)P?Wn*f5o5HUi^jAUu`F8?oG^#S_t-~iSD@y0fRPex&@+5(SQI$boW&T
z5FmyHP&dK8tUw?IjJ~PY%^aPF1_b^CDFy;C$i1OH_9j!eCy5_>McBzRbAo>L5Dk(J
zoPP6LDUz@g9&?KR>R=#%Cue@EO%if~0R%XMT}Z_7fea-e0E3JJfqx-dK;U193c&F%
zgb?6>L12M@A+P`p0waCofI(oSFb;7T1g7I(2uueI0u%Nx1SSjyfdw9g!65(E0)sTv
zQ1+__pZ_iQ(G2weoqwf(UH|&W2sr#-{uS=O^Q4&quUy=`^PCq9K4~;f;|cfpk$K4f
zYw)#8f1OT6hyM=@0lLY&<tdD03K0LWsL-7A)2=qkF8ooPu1lNb<{xQquM`oFJQ3BA
zmek7LN3VS_nU&Vt8Jo95^ls??AQwY9$RoB^N|NufhQEy_uR`J?6r*6KvcY`AK*Nmu
z$#8t*1nnttXBW%mqE&Y*jlieJ_Q-ty*d7i`I1N>Hk{WM_XF^=2TXFg|_N7SVD*<~O
zs)9A9Tk+&H_EmrY;AR6yu*<X%ArMd^k*x$S8`DC#vxT$3lCm>KD=c}(8eK3O0**BV
zoUqG5+bns<00dINk%mCy*cqb&0h;K-*$f~9aPu#O5eWPXK?gYg0|DCezaXUm$0G#B
z@gE2*kOPCjNMRh05SR`a2Mhw!@i;9E0@LvbfeHH$<WU$5@*iQ3kpI*IgH(r{m%O8`
zkbf-q(F|>%_J7U52ke5G0W?m7S_oj*fBXY_?Z5ly=e;deq)|>TCib?3SEjNjs4^&B
zzRLFIip`>o6uaGWNj(4s)veQ(s__#QrG73>H^k}Cf}3<?W$vb@C)3eufTUB<KQb7!
zQmWNuxmOxw%KImK5-ezdDU$(ms=zhd2PfBS5ILQ2=<ce>Vt-HaQHm7vj|gmdF**0r
z+qFyxRGr5z5RTa4;Cy(rV$_9bX=fiu&?QD)>V%A%4>40#A4gl_x2rK~4#+9h@a-N*
z^6A6yZpP7fpb1?{Z}d5*%#NRKK{d%26i^uWRv}wXxNqRHws#|vPf8gnT}QiKL#cOE
zj<<Q@<%(rvK@CDdSuWi$dlLApwK?1ivD?;#boL9kc~HJc|64v12N9Km`N**I$pL&m
zn@*gd$y9sryr6*T*nB4o0zVTA9~jq+G22YJcRMFw!Vs$lgSuRfx06GHxv_KzN`%W<
z%ic;f8Ptby5zRhe@nJcVJ;*4`BO9MjM9@+tIVEgn1d({gKLD$8O*IFLMBgL)=8Gn7
zO$tMrYZ2WV=0*dWU8lrbXX<g}iv0$&q~kgK7<v5lpHiD2cJlR}Y4OA18Z+weHse4K
z5c1mWE}js!xfMN)KE!8KL!7r*0?j0IgG=C69ZOh{qbjYlt`)@8=h+~^FLErGr4F`x
z1bDP_=Bb-`CmI4P!A5~P^ZUa=EWd~3bSPB3ZTg3)qA(^18NGB~VtxvKO+e9&lw95G
zf41TBDV=YYRHR%t$toyiT3aP}^bLy2iw+9{@_Bu5ZS5OjqkanQ#1!`$v!3QsG1s*h
zdMf_e+F}OIUV&sR>3F0K8x=&P1+=DaSv<Y(`|=uF{L$xk34pg{6!c!2iX(43%Syf@
zS1}|%y^9F#T<fu*oVf~m+Bw~%<E;CdMy|U!(nQn|Za)$fTN36dKQ|v=kY;D$nnNav
zGHsB~kiKsXW}#{pN@v9T0a2;?buReLvZqt*nP-g?i{rBUM{GEer)OA*KK`=gQ^tvu
z=v@f$k(8kn-n_=X$VcGV(NE{^F-nqHQLF<nW)(b9bP+nGeH@LPK%3u$Rs)IBUw+kH
z3w{!Mu-X_v?)|;i;Nc{gL->gNLtkM9I6;U(>>TAigVW5SWB5>G^Dtt}XJx%;{g}Is
z)f;W7-wFTC#^o&Z3OlUf>*2d6>hFzmybjPy$Y<eki0s9uk4*h|_wMU_tc8@K88)y|
zu-vmY?w`a8Hq#pM<Qhjr#mbu^>tV^F-`AY<oPYH5hvTmKvB6Xi`~d`~J33k6w^Oaa
z@yD(dG6r&$vTGtzhVhT35<h;*SAxt)4+L`p@}E#7y-rj#$IgGgz~^%NMn6XamsQ&R
zJLc3Esa~ZCy%@3))Ycz?WZsI-o^{Nm>?jq#ba8^#{hMWGdN!7|^1bk~j~As5&f6T!
z?hTb3kog52bT3^Zor-G39pQLTvg@b5S|5>fAxXwSlAd<$1VlU`+@htXR1j8PiY4k1
zqR0sAB(#9vm({>23;K$Z`wPlOg7{iK_0@;Xy(ql(lOVYf&ENr<$~q=m>RM(J?ugnN
zehVkM6vC4>iK>BG5w0y%o_VApM70*_f%hhG6BCBd@gd$g9l2mZ6&DiD@*TD^LFON5
zT58CFZzr{h^A{77mXT?!{ar-%_>Of&Z;ctW(3>ll^1uN}PiR^a2unD+tr}|CqU*GN
z`5e&b*M8#i(CS3~NSjWbTneJgw?#60rS^K40UttxRxO>*GYL<dj(F9e`#H1GsbP+l
zh|3U}vjms_15S_}rXAX!c>+!({aYmViX%#>gk)BiobDzfd+hVGGXL)6QXF=2w8k3n
zJpCIubEMsjq?sqGtf05Wi0uvsn^EM={Lz(Hk>7MP`<qODRl$WLV3CeHQdB%dJ6qrL
z8o#9&yyt-w7a{p~Rg;NUJ_*cCeWD>$4HuYA45t|9CEhu?=e*vJS&1kwkTHR-jp!x6
zeMli)?C(-`-z_+{EXeqC^csA_NRSpP^)lF_iOWHZn~|{cNB1udk}KzaWUkt--XN>f
zN%`=6BqQoZ|I??ml0!sz`l!U?A0-QExLG5yF3Aln$LDLM%Z0RSySkEP-85dg)J%|K
zCT;f#hN&f~CSr9Y)1y><hmM*#VtCF(Vp+^tR9IQsf}iCl%IU835vXQ#;-|xdH_&q@
zX+aHiC#2$j!h)J3$SLJDtt^d!CpLlybm91BcIAqwlFzG7u0O_6<5c35%MNXupN9?R
zXDgh7SvHD(24YR)@Fd#US2)vU%{Uv9g33@Iq=J1vKevMZDYjpg3~!ym$bPm2<swKt
zHvg?#8C^&3j*ErqdW=xUh9MIqkE1pWzZEP|N;33H)&IWiB6_rd+`6m+q4jNg?Tfzk
zxmo>0<}tT-O^d`51~2^?8H%G8IbNM#SG-4?#^$eAXhdXfRBvS=H*p{@)M)TG3E3L7
zg`8V^JsdIjOX6SziOhn!Z%4GKgeaCN`x;*n)>6Fd@jU#}Gpdz{mED#(y6~h&$o|w(
z5j$nT2a!@s2oE&IIv-QAE_jszaV8jPf#_?R-A1#5QW+*f^W}&*uZGwB@(6b(W~c~@
zy1HH`3)R?SiA5$HXCMc;hvptyaD~_!IdeHpH|rM8N|L)OJza9E*LQA>`iOjld278-
z-_l2jIxeK-Ibuvyz2`I79HP`k_dQfoM-Vr(NUnNUOKlD7bxVyLi9Qa2Pv3aXYj#AR
zbKG}I--PvfIu+-f^=-KsD@Zu7IAS6~5(a4;VppU6@m|b%#M8i~EYkv;2(W44y{I<1
zr3_{4xXSW6!KU)P-}<`0Yx=Nvp5=Fcc5*VcnCE+Gy7F*!eC^J8#PG%QH16nO{{eE9
zw%X$KGm8`Z^6}#qt76b=i&fZPuSYLezg+pma^Ck?o>r8rtD)W58D{j7C9p>EN=H7Q
zef#Y9w9IV4g-{Z2Vs3FQ2#Leh0OulmyY{=I{{c_2C{6AG>V(yz3?`JuY)}X;`2v9g
z&yaK#?f332i6qE+(Q~QoEgN}L1<BGVpH-pj!~(O3)YF$NmGvHcte5GSvk~#*)rW0P
zy=a+nVa4Ppy6*!+kzN~_@A?FFn{6=s4s2}oXH=RnRDp+62z)9dHKgc4)UjnIB>%!G
zOIu<TsUZ&RQI{|cQG3c3`7sm%YNb~CiRic4C?*-x^ix_fQD_tHo?3Qe=W~1%0or82
ziJ(Hl)v#utc4B_NQxJ(ZhF$oq*;XPUA|cr9^DCsM(P=&B>Mw!{{i&WI^7;w~ca$MY
z=M!&&Q{%8OpS>(`W&45<Hm%l42rVib23-|&f~Oo8Z!MM8>Ie@Y-|<NCD>66Vmm3bV
zCcu4o5q+NQnK+t0kr4ZW5B9>?h6nYwY%<6uhLasKWM+=VJ1cJ>CUimC0k0^4itMh2
zhHQCoe8MIh*N;1_dB)(iv`o9#^;3EzJW9N)FWuSCfJ9@&ZP=VN6C`SktOpWblP+;L
z_eMWNfu9O8_bQaTesyynx1z+^8_03cfXwDQt%}gd^=fG>^h0lQ=|)U7NjpVGr|^>K
zH4FaLiP+j5QQ%h#p@J*7eq_04zp9g|7QlyJ$8tX-9lO%CehkEF#UAk%wT#*g?EipI
zE@HIAQ2Gqp;rph)hl>Zs5A93Cr5li?Z})bm#D=w~0mf}-MkB$>X8~|XO?z)$E{c6U
zavdlTOB}iLm$+pRT8J<*A^8Y1YNXl%dQkvW$G&+@cEm+xA^#N)Im3+3T7Ti4_&zJP
zvB9wz(GYS~Fv9q5^r%gZt?s$=oUBH6uvRCpoo(k$@PU%DafEHYV<5ioV5Dv!O+CV9
zo)DxO<c8MUj*@W9U(Qsq{pu?R#V~vrT3j@u0g3NbnWHj(<2SQETX(|!MR}A2j6!|Z
zC!t2!A5j{s4r`nbT1qY1k6%QwD0U&>gt2?M5Fjikp8Wc*ctG1Pf!~Ol6T5?=W|zi8
zR6*YG)O2WDCX)weo5+cQ{Es;!vVo#5T2S6Z<MiN%QINY{R>>cDY<47k?StcZyk>^t
zh90(L(l+R44^$o37@LNkI>x@z>y6F~BvXBUz7`VasCh+pI~6dq-I$}-?|lJV?1m>#
zQHWXf3^4R-yHc>q1g@}BcL>z%*13?S^;AC-ig3DT6H6%CgB)^CBe9|>b3ceA&7N|}
z^P%Ns#JoP~8~wEKWJWc$bkbd-4o<gc{Spy=HOof<xx){`4$QcQP9mElNe=E54rJff
z-B7rnUo&%_yi7jB@f5s`X5V8+j+fQJoBOVv$iW2ftUMIuis##ctvI=96CtWhw}wQ(
z=7AK}FynBos^Qz0#6QFOCvp|FHtlSTWND=0&uD<(PGf^?r+NN`PR?4B!|Sjg>RD(I
zfhSG64uOn_4xsa6vRS?~=^;;0A3FM3mgcIv-K~B)f|ipGigQRr)Sedn(ey+o2`%Fj
zG~dOwFQ3>5?!zXjDBaSNelf8>A@)k?lG*&&Znrj7dL+!tTchDL6Y(Vgaix?!xXCEJ
zVr^0MN|6Y`!~(0qS{D0_M{i6#JV*;o_ieT^@GH&nitse^zRK_}In=IzKykl4_gVL7
z{2H-|&yD2IMt1)aesHimjzEvlbXS}(2_`dU+Q<F_d^2AL-imG{{FK1fH3LYwjBbUl
zF0Bg&OY@sVGIx5Wmw%819nE7%c4NTR$v=qZjwB>Z$!>wHiYftSkUmUtB+iDKP@
zK_S{_LoE)xdd@f)D!>i-Lj%H{19|a%1wYoaGr}V8#_73evpk%J;@q4dYR1r^t>g;z
z4$^a<V#n|D)B5ia`423Q)v(IhIoMlzoXE42yp5SXpPHG!KPZvr$TrCGD7_<fBR1}L
zm?pMOWI3l-<^HhvJzh|?do3sP8$G7)%&wp+Es20C?eNa?h+wTunN(?8JVo_?HtbpK
z&~FL?z7V80hgO0h&X4|s5|d0$nC+0E<3;2n1cf_LmBW*SN|BJ&u(`~8l_-P(4kGcP
z^WVubuJ!^#1~TnB6@k395E+ett{-dfI567}*6efoGKRUi=8VbleKSWUWrmPwjJmN<
z>5S}ikqbV2VIbB)Ii_+g>o4CpR=j=<WsY4i<B}d%Ak=%=nY3Bf97wf_(##CXW_cks
z8rt>+f6U*bZ~`;Py~<AGgpk-+7#!MFTtXIAMf&=}z_RHeDP17Zp0a<&&_LK419_@R
zat5CNDWP-0E0-5_B8}Vg`u^MgVR{VYy)XI~E9_2YC{+8_->1aCE2O`DxASC9<Y#HY
z+Q|CJvHO{%EAv$+T!Oxe-TP;d9p}=Gn=g^l-NFNnMjuL2fe0$ZPkFW>@i-tz1>MEF
z!3Z^`Ift5=LnNI>|E^0Y+t>AvotoM<%jS-hn>y;fYq>qjrf)+1Qwp^kcCBhdFLVKg
zhRiXKtiYDL7u1e2iD!5tXGEu8%p&N60^LDNFJj^%6+vi66g2A}QY8EJn4AkZNfh)L
zXb$B&+YpzY;NlrgThMa+OvI{IMq`W#BDrnHe^*yhw4saAmwM8vHX1luw-x+-2X6E@
zkhoq34dtj`Uu1{5*T1mI;f)|}5Jza&bdJ^AD+ZqLJbWeaBzYzC`KoI%DLi~vq6=l8
zx(uHbU1=Mh)wmkY5JP^FbQm*3x~EViFJ+|$`W3kXus-*o%GRw*n%@R{XbRVuLbjSM
zda$?_EqHCpeLF~0wJB36!I6rk=>tJ8AkmH{+1PMjn5rW!Pw66)j#~@@8K~#WIoB0p
zuWLtt^8X&a>z;%AFxS}Sxb{V^<?3bQq0kFyUcAFY{AogUk9AFN#7ope{m4G)Unazs
z2)_E?i+U3%83pqz3gXOITyBy+hI!=KoOjiYu<ZY_5-Ff^^I;t;RgH-|TjTUlp+NHl
zd+R^d@e|R`lGZ*)8AmyP3qRm6q>+Ywh!4r@At~F6+79e{8ik{1j#WhPJnj!EQ(PNy
zXHGLJzMu4OFFGd|hJ>T@OA38%=;UU3G7cA6OlRG8I-5<egFL2_Un7~Mgtd#&0_9sZ
zTjt$hk3}Oy@vh2_L;vEWRdT_15_GHO)A;Uqph=qc&-v@kQwY@wxX!Np1R@`;jAxE(
zjROkS%syZo#=dageYcYxDjgo7)*h?}jrz2EF$-P(RkQ{<MwENWPjY7sZfNa;B!zY%
zT%w!1pnREgXq+$$w|ZB|z9Nbj<H)<CPC6NiPc?wKSgC*xhmSd4QC`rQ7nTlY2GtNX
z|H3?IJ_r{xvW;9<bkl#0KDvvBHM+BYy|5<gYcFmj@0^vzlDV|ujtp+x{k-Cy>9dn=
znfav%iIJ+JVFjz;m`AYA{Qan0;XL|b1NU}x<pw0?8`;u^2eAl<@oU{{ih@!bBtvYM
z`cV@e3ptdwAJMpM2?Ix+kzAb=ms{Cf>kKrGnll9G?Gdh4m?@+u^UsB<BDo3?GJ8sU
zElyacK9ZgkYCqqL#w~(xUn19b7rxD>%61faZ{T`ee{x0I?}SbM6^~})VnN2(0#WPr
zlD<4NdXU?)e<b8<CT`Lt&CXQWT0iD3cR7hN@)1`rj~r?R#d8zovlkjAL!~lKC&>AV
z)$6erX5(I1kYibja?-u2T~fL%_#tN8<wc4L#MhlfMY%^7^1s=MiSd%^Sa-s0COo-(
zvq~z4tAv*7pDi2{=|hk6l`kh#JCjIP*KE~04!rH*CFo8<5e)J}j_LaET*^N5jzmwa
z#CuOf<LY9HJUCmi<+unFle+2Dc7d|A8HAVA*VUETnrpFqW^utoTG`2{TrmzuovP$|
zP0Bvm*1@gv#3KeeW@xUs9TduPVV{e}i}7*>raW}8E2O7PE}HU-@$fy})#4Cx`6F<g
za+P}TWFTaQTpOFZjKx|JW>L^;{0Ihzr(TS>*#gfW3~5Usq3P#?sIAkyf{t_3c5+Jr
zNr~B{#<anG9Ir%UDUa^i_S`52F2`e|@wj;5(1@3sx#8-i0|(vpJ{}XHg*GWkQt2!$
zQ?El>32vQrK=YB|MvDx0jlWQeNu7(62HKnmP!4S_c|fKYmPnBZDk!`0GvSD0AZv)W
zMmi3=OSc9OWy!a@V2`t4DlB@GL!sX{(sc5m2`P~sz2_(<%|^dplrM_O`9N(|PTEV+
zA6CC+zo@@<ZnmUyuNcoA-Vc~?lJ|A`LBP-ZyYjx#FTn~@ctj~o<0x#=oST41)hME3
zD<D=c-D`C6Jfh8UXKLsuCj0xs;3X>-T&@3GZ{~FZDm-XPTw3I-CH-<-h}5^tSYQdP
zkWRyo#Llz7_7$P|u<~==rPHZk(&Ta$28W&#B^(j{oU9Mla$<q(vxheQ7Tlc<CvqE3
z6xh|KAi&|?Xr#MpMR4SC{M^SmH{B%-85pSy3PX@z<Lv%MS=}vc^t=W0h%M9|P5m8s
z)C8kuZPwrLok;;FL?79kUD5Pd*9H1QV`A~ZM*;d#4Q$4CV7B`lWo4n!n1BVBa_Kr)
zPja~6xK^|zWgE37)+w!@CAgaMbhV7xnZTIh70$r>@M#dRjxE21MR}2mU_gIbalVzB
zM4paGd&U6Wcwejj`OV0qX&=pEyvsZGt<%<Haz{DnV4nSsLZli!j1C>G+JFCC1{3u4
zop7ES;P3R9T)SRrmNA-*H0`>T0_w`Jd-Eph5>-g2Dj{jyckYc@oF%|B{U2Hl8GqhL
zNqym+*YLsA`0H4<XF1>)*+`ZDTPH<<bD}Pz>*Zgph#AHjn*42vL8BbN=_<%FwyOiT
zIX-XeU5Z8HjLiV;1SkCdlMmKZQAelSu$2!vDYW%C;qO@0A#NnwzB-ex>qynjIeQxa
z=i?C~i~1k2I$CwHJ>hR0YJWf<iJ5!`;9=id3S$5K<o!-4%bxa{ddP_0Prxl|Es#IH
z`}^#cRo&`*;JhJqky<3$(KafC&2}s#FSGGdCG>3v`BJOBg&P^=iA;%(g}vh9J`IzF
z$XQ{v+-Hwp<s0MkQZ*2rLJJJiBWX1odqD@3Spsr+u0e70p6a3IO5IvX1^tthOu?+4
z9KTXlK4=CO{IwQe*y?3W89k+P58^H9;`_zd^6mmA%x@9{gN7yD2^kp4^d@M8a1j!m
z-ArP57|kf!GvD{8p7@?t*ae)3Ros*{lb!H2*PUEKGLf+{Q2CZ#S*i$;`(fWRwZG?h
z({-Us#I%;pPns;e8PIfkAU!(0De2;D6Ol<srrnbQYEQ`BbR3`m+JCf@kd98-4{xIk
zCiEUg`srzgZk$Ia)|JXYTv0h@*=WmwG5Zvn+cO-w7_LU4PiR1q&g8Y5YROJ}xOgV{
z*+Ef2Yuqj%E(s}(z-XCoGM&d3d_@%Zl7$bNx|rQSdaH%)r?+4|vH0s4O-LiVE<Ib_
zMid+5gvKJ@7n;_#8TL8J(Ek<YRaJb2Y#=WPyKQ(w6Fy`Yf$dE|o=d;n=aoRI&5(1Z
zhEAKCk&mN<*qXVG3r=%BuXsOy=~M9%$XcMxeidXBB$FlSH1*y@g-9OTBYQe<TJQ7I
zb)E)}p`iAP>CD&+K07>>0Trb5*bKaM0%A_5u$d59A(4!cukJDF_em->-ZtJ}KfUdu
z)umAP3FG8rET3Q6?z!RNyS1=kw1-n~$gPt_U9UStA)oyIGq$ss3&EE%$pY^X8+@Xo
z(uH9YQ}vYctO-KCUymZWd}95XZJ|@^4AS^Z=6mBxx7!Q*#Q{9vBc1kFKN*7wYDcf$
z@fa;Pa99Ks8}H-gBK-Q++Pdixgf}*SjK&3J*Pn&=MDIW>-{?fEgT!Bc6o7_Pb=08q
z?S4R4?lmCZFt&Q%#;;%FQ9^b#Z)4vTFhEvU;oV`UL%_7g<5P9TxO6oeb>ABBhvMWt
zRA!o<dYuV#d~J?0k7&P+)N~U8JD>$}u{qiTF^}-y6zy1HL>nM*=p6lqm%Fb1a!aPt
z`R$L37f4O)mTztdo;;w5n<zJGHWu4q+e<S^`w=c>QO`q{+dpsN+fwRDLer#c*He9{
zrZS#GACN`@EP8~uyLtqY`rRu~`QY+K5iuC%Ug&AT75``)Pu-Pod*Wik`5KIg<GF@r
zn))PZ=$t`dZSoD2O`1E@p{e63iHo!~m7+e}aaK(gdhYpq$gN>&c)4e|iT0<q%^JR&
z>`Lq2XF-kSJUb4ZDAG!0t*l@ZNNE2X#P+X0T(t`tdzxMsjLEEjs-eW@P?qzg-i}U)
zGf|R@NLRzguy|`wc?)4KUdu^}@m8la*M+7>>&4<^r@DC8;UD!TIeXh8s9!4!RD46)
zN%VI@QB<l@0v|eeEe`XB^<i(CMEQ%ma0nX{m;@haW;#!|vin3L;D0yoha(~tNhuK2
z41OiJ3+locN9dP{EVQ>-4%~3IUL_KiT-#Tay-Y!fD|h54Q;NM)BB>TUo^*un8@hCs
zrH{@taEA@xmsyJ>5MIzSAv$pUIgz6^3pc-NEsT{I8)CAdwh1<(doq?Liwm7Rb<jZc
zlcl(7Wpva`pg;=6rlL>6J08Y_ddhL>L%D6*)O1|eYCNHN5;VgXG@8Unr-BZ8nu;Lk
z2uV|yolM~TEUB?}nb{tc2sD)s5r4l9Jc#Pe)l1Hsv_{>){a`_gxpYR87`alK{BdK`
zB&q<~Keg5%zcxX6AWP=k=x;T_WTd|={dvL?wb9h(iAcVJ6UViHMt*3`-)x}&+W?=3
z&(2I`Wo9HgT{_xQloZZ0Lj7q8UQ>CCr9dURNvd|E@H0fZEBOT@_u+8d)@6=SoM_5a
zT@@QjQg)tghc_iN4ufl09?zF*dogKD#?C8PK}6Q5i0|B64+yJ2<T22RT~a!)01r4G
zl4)wB#xWjkUktbd2SSfzvbmA7Ym!Lo`ncD<hx1Ei#%0bkrBBIRC&B~y?}VylyIlQu
zRL78CYfWXICm%!BeZj?A-J7v<A|oc&^^1$0*U6t(@o7mI0+*vS`tVIY8R@cudS20*
zIIj#UBKyCgT)TqOgrH|BZSb-~S|Zna-0gfwaT0OaihFGM2<c2XbtW+^<-#utk1|8t
z&o+4361nWhg{QS5aMf?O@=58$*0Oq7=-R2sx`RIl+N6VgFp*!UTjn!BeyDM6@F95n
zuc^?sCkLbvtCMu)HC@!}JsnvI9Ec;N^ZlxP!aQl6J97oSCZc{O7p_xwUYvt)m->a%
zQ{ecDWn^<|T>>GKjSOu_ziG#Cgp_XAfD7$Ttt%XxYg1OCINGdUD}6)<we`4L=b4aA
zfq$X~Z4o-E?>nUylMp`%HBL(0>-I=5Xq2C@%iytYDLnFsg#^RyGs=@wjmga%_2$!;
zlR-)0f(VLn#0mXBo+Gq>BWVmsp`a8eCS(7O+$odirg5dflKy@);LtkP#op_s4FysX
z)%$L^uT6`N19%iyGtbf-C}JsgJ(!r)-maB@Y)+7%IgXOc!3+)B;++|KZKhz_Z6%OB
zfWgDKxqdvU1bt#a)A?ck8wWaEdHMo}TN3w#@sm7-w`*;F5R{k=iJEu#vG5>pJ6efA
zej~36V-Ww9%GO8sFK{=>OgZ5#K3PmTyC)4uJhYB&95HE%2d#RdPMhiLif?Wj*ojgh
z-YMsH@?RgHble1W=vMdhZVt2&ozC2b)xJ%!0RNUy{EGmZQ=7Ck0UV5njS>VNwcw$O
zg%shqt!dIo_16)#PJ%dhJN2Lh@S@@(vh27}(n#E<&@~Uq&9_UKymafMmgWM=Sd+Bv
z1tOT7CV^!A3&)EItM0DtxCIGL>=F>+f}vwM^(4t}Q&#cLnV7W{D|8H`S0W!bI)$B%
zV+{M&Pv*%e|D;h|DWQ7Cp-ZAL=xEeSD!WX~I79{=I%<UnlBXMM$aZxH@YDXR>ONCP
zwlR7;;o}qyJfZqdWFp@{))$kD)cbNh;Nozq<63i#)R{Vteuy-YU7Ij0?htj6i;lBP
zj=xpz^l*%D-4&?*xU&gO{4g#!Bx&PJhywgvKbcGtNPw#vz3>%zeExH*IA;}e$9|a1
zy&%QHT6a##9MIccKF1Nuxm_9Di){d&0tZhRl|uPF4W;Qtu`Ba;KH#1ClpsnsktYTX
zyl|~qj;9a_O$;Jp?UN)HW{pie*~%-!B{b!!mLm?)MbHvYEHr}a3b?5gX<p0>8V&l9
ze}hgSFL7DsIU3Nkxxqe}Sy)*fNw;zHQx=<mvpJH^OXYUArE@Wn0j0V(5#iFozW6gC
zildb5s*a04kLk-9pDl!W-=lY?*TGECNXM1|l$~QN-M$3#++Gn|`PemuOhsXI${?<!
z_u2?6RdWZZj%|KwZxO@zi^9<4pI-^u;rJG&COOa~9iw<lVDU@E!)4+m!2L8*KPjVd
z8>`M<T#bblUN$J#KG(52J$x*;dVu-(+XYKJVwk_pJl4D6;3CdSpH(&!&g3|!J=?b1
ztORjB*Pp3!W6nQ`;A~Dg)*a%Y!Ixfrh}pWHXihZY!Kc3^k8eObucRg}*R{eMZB6OE
z7x{#&g~-ypHrGIP1<?nN<-A5T>CS`NnVJ^Tqf~1o2Kg8bb+uRiFjLoYttn;|gv2CL
z5Y#BjTsp{V_^<%`Lo6U6@)Chv`}`lfUxU{=RiD7ciM)<w|4>OjPfQe&50Fzk*GR_Y
z5BQ|=?YFcU=d7uGYuNY{j>9i?{6$H1AHnyRg}95<B>Ok#p0|DSRJDzy+oZ{ta*Cm!
zG!6+%muqmKlXa3f&KKB7*@ULatAwUtH`PRn3Pp5D$~Lx09TnG_NEXBppp7X%$<)ZR
zgw!=Efo64wy1ugt>Kh@+>nU|jrfAZ1VqhvZLA{b;X;Sg>EN}WEIR*7k7y^w|L#Xw%
zXj~inRLYbWsAIy%oYGRBAs(_+DbkgFg}C|!Qj6==L&?EilUV5+)Ci1%^Ztq;K91mK
z+&~o+mb=Mj73NIa2+=)6c7JMyoQ%|BjTLf+r(#aYM!Yy`VdH2kyVsgra68J~h}oQX
zcw3js9f$~7M17J)vUHiY8nOwt8Wi3kX;Kq}Cg_rS5JkicB8F_0s153=0)fGLW)L@f
zVxegYlfWMx5A;cuD5-ec$#84K=LH!=I?vjjBwUYu5b*wT!QupgDp7LJrwVXK>zM(j
znAb(JjoGSEKg^~I1cBKotPBZIGKl1sP$l`f<G)d<e2oSGPci!&oA#&cMIwH$FfY{q
zO7`OYWoAeQophga4gP0i^8>TXhj!JY#yT3(2dYLfmt_%kO{zx8)YvAV^0C7MyErSV
zQER(Jvd(T(v;wWRg07fFTZ3HbL=k3Fv^dN43W!;cyLK~w)2Le?k$7E2vj6MuKq~fM
z@DMQk520;1InBKD^H1WLsc1+Usq3>;P<%9BK^}JX0w}*yyVm>SrE;#9STe_Q<3+Na
z3-zc1SwtGX{Oo}rvWQ?bG=uen1@rX^AU<|<z%k$uCW+;*J+y*<M*=OI*DeRSULHTg
zwR$WRFkAzbo4r=o-jE*Uv4R2|z(v3|pmf*>jEi>u(eBCLj)sWx{OplIDlp4ooH!eD
zsO@PjK%dmBFb~#a5<7HFAnmBDeobONib-^Ov%+#|huP!;Ja}CirN$lmzWI&2;v^}S
zD!vrxZ3UR=`gf9AW<H<~R&CjEy^BA~9Ov}I0|lYmJWc^CC^6_??_u&_XXyWiaO$>y
zg}Xy<(k<MIi?$SDi?aw=oHHaGflQD>K*XB8AtGQSa|h596Mwr65Mib9*Rl|xmH*L1
zF!oqc0>$4ESOdX2=ATpXPoh=j-%|nW3}6J-$3P4H|6DKFT7K+BSUbZ`F5nYQZw!u=
zfWlr}(JLv*qECMImyig#&)?0a?XtZX&n*iX@ux~i)fhw9E}xFMhoXD>YDrC;lH($F
z960-4eAdHfWJ?}1=Jp=6*`8&vZH}bK%i}4Yy?89wc#`?j?&As}a2H=949snl>K+n`
za&3-6^<7;564m^(AnMzMZ0}NQiId*N(E2BXV&gOVVXwlE9CpB3`jcx7+_w&CCC82F
z*QaF*C=O`@SKmX9XscRx3(TiDd73!LRz7#OU4FA_3-v(W`l6vp%sc#r%tsxihg{S>
zA%BM>(fKE>2FM+^%SjmOj;m+vHVN6{=K^pXw;cUl+|J)+|E_^z4`2;wgn4C>Lnq%7
zqXCnm6?5QiITPdFHuiWCyUfTE$GDr}pRUN-UcJ{nhKro4wpT9%R?lHUj%&FbS$i$4
z5jljuU2@<#9~M{&eu*LjkYOAJWmIj<F{T*dE$=3evGR%VH}>WNAFp()fnT(MR%j;z
zuG5!`RdHuavUqC7^uy~Mv{w#cmmC{qQ5<A-xqvyZn@wg&ooR=i3qP*-Ujh#-<buX4
z-v=-MV5c?VK_|8H6g<&I2z(ZWIM#ppDhKzR+Cru}q~gabaDKo&L-goGmsBf}I_`tQ
zcP++}xV#DXefM_XDQ+%P`+KV(-MXlxZ8JYX=uj8%Pn3s`uiNC^nO4gQ!X_Pnn`iZR
z2H=hO*^P?<xVeE*$nza*-{+i|mIl{m8xg~BF3?<J`DjYV(`!q*oy8n?*U;00F?mSG
zvO(wd`yIOMk?25vp29T;&Z6MDGThtt9+uR!Gm5Xu$Sdb10?dPY6a*R1K<yF+t~FxH
zpzj%+f~^G@ARC@}<s@Ddq=CqwK+C=^A_><Qm=yxd1v(T2lXi%t_!<NQv5AG`_(QlB
z{uz9j*D<(mO~7Zm6qKAu#!y>hNDqtD7}w1M>UghVEjX0sdz9=Y`_p;PJ&4~k_ZEI^
zKh*z}o_On0u?ojqxmo6zeI0(%2~B+X@DHt^z9~TgL*H{?BY;2BReYtn9M5L*Q2C}$
zh(++vr)|8++E?h33*0fUi+?>Y_%x|qsei<Pvj0V9B7!33bp$_bV}WMj0P8bcW+FgW
zhhPy{WR1XTJcvgXN+`sgh_qsAh`f3wqGH!~q3l|7mq=mXL65S?*)=(uytZqtMDtzu
zO-O#_EZJnE;j>_Vl8Swg8C4n@$LM^ctE?EI^lmgb(<wh6`CEvp_zRAzz44PDnfD?>
zQhIY|n=Yxh8&2jOMdB7%U6i8N{Wqqn&#L#R5`JdhlWM-4dRU4SInTUDI5_9MquaaY
zy$gc}P&<@8`)~dX=$tABU&_rBskW-!ehyg76kHL@_4>ilS#N<3W=}7$H{m3NvZtZ1
z=qjTX_i2W2HE4dD(kxwb_@sT@_(DmbG6{VpRndUTkbyyzJrR9nRspS;L9=TS9Y_gC
zKL2p8@onli^Lo7yE5wL`5Ly`{#laa9n5!p;Rve;{D!pIuvG|on*J2rv!VIL~e|l+n
zO)tvsotQf-s;K@oH-AS*ed4sBc+Fun$=UEX0kjf=r-qSRfnDjosfFO7(2(Fls@I0r
z?s3<$Gj}G9h;n*P(CtNMza3Sj>Sw=Z-QNFo;q7=C8aRU!j`5UX*!uL-+Nd`RgvS(5
zZCg3~)hWZ?(BmQc%1Byp(zWKXb-R_%ptqtYx9NWi5kNCI4XC(H6LbH~f`w?(M$__b
zP8rs%+N}hw+UZ3zIFX#TmAn5^YI0<7DynZQe@nVfJhN&?6wTt49N$*%%DPT;{+B)R
zoaU5QtTaCCxd3Te(DgS6x2exSwXgHKS$nP^{xdy@Sm4r^&-4pQoUcoT?}K9cq%
z=^F1<-J@2R3N)ruhThu8IbetXO+l^L{~`)jR0Z~5VgKlah2p<%D^Jut3ah2~TW28u
zV_`5#mb8(ykH9Q|S1@A&b05owIjJb{?}S5t;;+d};|F_?Ex9>RPCuPkwg0KIIB)Nr
z^cD>{UO~;eE-1#LByY~BK5+?Ox}?PTe{oLGSALfQuFL|biWjXID*-6h9XP2u`8IEv
zb{Cd_#&8E3L#->TCCQoF9mqWFx6%AvvzI|tPdb{@pVUI`IH?m?LUFMC_&8EE^KnOr
zl03U=hQgF!$Va_C`1CvjUQJFtbzE1SE^}cj-1`6P>bt|?h~Bn^#aeB5MOZ{{(V};v
ztWFR$qAU?ai$sYocD2=s7QF>QM2QljY?SCVLZU4Z5t3M)1o>w3{@(9<-|vsT?wRMA
zYi7=w^W5h?&p9)Dd>KtslrffN{4n)9u=_{46mcV(bGs5YcJ{(1?c9vbnM4L%cR3R*
z8Obu`S*$J1Q{}E@Y4R`?VGeG@uuRdEXiw5sX~^ek0EA+~buw;#`|@qge)SC#o=r&$
zEGMQ4HpcCal)_e9Ix{d*BDA9MdA9dVov$!bI_wI`&x`BRwIs4k8J20JdVPp<VPizs
zmQ^!8d*7?69`rUfCvgs^b`w0Padh4I>EkH6D|>nwDM{%f>nB1+zZODx^8*?M0~dz4
zS6@HX!VOL9%iDP>tHzM|w7f=l-LZ-0G^l|(-{(V%zSMZV&?{ZK#Ln-rK)ZF~H*sS3
zDuqUM=^MA5o?KZ8VzOK1cBo?C`V4~bub)Ru0{Y;f;0Miv17$e6D<ulGS)d-bki1Fz
zRX=__XVS!##>x{@aHLugFz~OY70ZbF>DMZMVA;2E=s~B{Wpu@J!57DH;utS*G1mQh
z@O=%<PV<-+D>rxLpU(w|gNoznn{TYjXgWXOle&(l)516Tuy}jLEa`(=nu`H_lVs*0
zQw9tyThCXqEhHmuw3VIzB|_}~iI59^q6pzrUkTCUs>(*{b!LMfF2Fh|+m1@J`K4cG
z>;KjF;t@Iibr5niLzJe$FHF5>1<w;&qV`FV1WUT(!s4CIO6Z4>((>hyC?FHC%UJla
z`tHt{Th(!l!1OJ&Y*F~l5Ei0(*&(Wzb4+fO?+)y3W^bp!X2{Mp&|x7^KK6g*(}=d=
z3w{8UPYx7D{?X04`c;6!-+=XF?VC%>L_P434@e<|D4`2Guc}W>$b$n@GI`M$`bhkO
z@^iPYGMk5!dPdrd0Z0zEE#6QB0<F)|O+~fCC5kb#DWk`2swQXJvxh1kcAD=0K`0&C
zm*A54fa$p|;>FSQE`D#=-?@O%FEY!3RmCrpdJDQ_HR5cpAFlzokdl-ycI3Gp@+Fq_
z2{3Z|qXgIay;=~<(@Pk~03Q-)hvVk9gg|yR!m#rpFcvSs!;2Op%LEU*xFJVe+(4?<
zZ2Y3%vPmwZS8AYf7xvMcc3t~sj|c@tq!MpcxnO6%qtpnU`;e(e3@pG8qW*>|3C|?P
zi>?#Q1b3C1b8W`o!s3PX836;3Q7bj)KA8@YU_W;^)&QO`0it8p{Up1AvW12r-TQA0
zYtZguLWgSfA<f=<?VH0u)omQ?rvh#8+%bjcoRB<_<`}4>$!T55i1xGLCPLAADmXm-
zzfD}am3*b$zqnxKGjN=us8U){Vk%qh4~Y7(7}V|)BRa#5+xj1H>3-rvXW9YqKaBs|
zM`PX%&w;jHm3aGc`or~San}@X9Z~6-9V#m0*E=IW`M%hi;EeEGFW*WE^)USTEf}%9
zd3%=poUk~YR#MZBtgjXZy=X@sWZ&UMJ9wvoZ~0?U7FGa6b6RABE&m&)u)R;kbdu}5
zAnKp_VYOZm+^b$)P&XY96xb%3&Q%at{IN4HdgUoB?xJwC;ni=8xu`Z7WJGTHeUbw^
z!L+?KDfo2Ds-AEtQ%kvrSBT<in1Jg`_w|tInCu4d@@7XeIHryVsE<-;IS)i#ksDS^
z1mfO*i~w-Amm7QHrUY6vCi}9$h4T<~hCAGWPQoA~&*);TC``FQi|mgQ6u2;G!Y0>~
zq~F!(zLT-8n-e{Kn3mbQaEGbWzHs7|zhRdKk0EbV8;Fgqnv?l=q7^uI7mky%=W-hm
z28{(`@rYMY=`W0Em$yj5|8*WQcKD*pI(#AOzw(g;(lY4l9zl?(I2;#T1uc(-s0Rze
zYX1iijet+Ey|a5x4WK3F!XWo{n4PG92>sD+RMf#FeY}M)&8iJOFz325)WQA>sExDY
zSX!Vq7WkPd$Qk46is3kj5Y$ec56x)KZLLmTDqMxEN9%)xtJM6+Gr^W7k(&@9#WWu2
zAsj4Mqh6l_hS4_w)x1{o%gh2>-p8Ucuf)|&!*N2Qu-a+TDGQ)IJ|{1&d5x_9@55B-
z%p>HYp{+5@_TCG#BJ-a5C9Hlfyyep>t2^Rlh3C!sHww<Wo;K;r?R9FD)JWr4!y+Jh
z;s<h*m(j~=Pr)}o0#m!R(VR_OFi+Xb=+PKt{U;N!Br8PSMU#8p6BtJRe@-abEU?ne
zZ_ENbZHq<ygJ{mNOz=nB{|Eo^Wrp=*&4Ca^S{Y1N+~xMy*2q<Q%m2(5G&@s0e}hM*
z;CGi<)3WSVr(zfrLoaLC927SxgXFf>yo{Dca_MUFqGgCc-20Ca0OxGNJ0PRxXaTmd
zCNI5S3sI-8LDmNgfnHQ<qz3DQYKTDG`;YN|`<SaPHW2`!m2R_tH#9_iq)fgoz*}Az
z_64EcIJ>YNefWL-xZv##`}U_hjQYJ_o&ygvRt}j$)5}^)I<*4L1cz$^>_TfAx%nVY
zAJoky1U;uU#p30VeCS#XvfkeW+(-ve|ESJAuP6w*fdbr@X1)aaeTA|0egV$F!ITNU
z#g0XNH3cA=^J^N|l6@+9Rbe`Y7;K$QMsBN_H+6M`ers!4@fiC0zG+c;My#YQX`qtM
zgY9DEeyi${_Y#yVk%awxIBvoh0y4f8U949PmDb}!3%t-EFcgzc6_Kd4ga&@x8=R`d
ztZzOrl_jog+7WG$&{u15=sXM5(3o*-)17}pnz8+pYl0KVLWjP;&$A*dZOd;6<bfD8
zBx$Y}>4CaK`C(^!&(tQPCgWteq)Uy!(Zy6Hu(S4DwS&3YWKmZKwMX>|GvIK%A?I&0
zS2&J7p9&cP%$S@+N@4Mo;~@0LD|b``bM3$GE2w7d+G;fr&KGp8%6E3&b}sJ{X!icx
z9N%vxt~c-wCid!?c9MkQI+)izE3nNc8MGgg`!|C<9A^w<_-?H7LH{?YoEhe*9k{+r
z?i?9!Uq`vxaSh&{i`%I6K>B`U1OkprR~_JPDu%cV!yF_*$`Pm+s;A&^e&GI|iASQy
zGdmYnmfVSfz5L2up9j9ckZz~G>*Es92B8qN{bd$NM<h9NuXSs#s3tTp)^0KuL$q%Q
zf$rC7q;BYgJpKVPg3EyWBw7TEXKDnYWvsY#eHqcxR@~MAIIP0sE+BIa3mxo`<huVw
zEoT*3Y6o)70OfuFj;Y8(67p=|xCic3pzV^)n$?1;e=Xw2i|;Y?EtltHb&U0N>0=Xq
zoF7e&G_wQweITUSWr2|Hy>|qpSL}j7npXcBRNMtc29m&P0-Q^Y3M8DOk-8@cx|V{h
z2cTPu4|-nk;;w_g1t+mZ7$3Y=Z>)QgVj(;h2P_?nTU~ku#(;bQF?KdqwUd<V(EjPg
z@i6^PJdoaaoM-rt0*kob)VY|9BUL0zN@!n?(-==UlOefkg7;^%|E+1QxGRn9w2BCP
z7X!$x?lgX8`5VvWt!H^DYjW37KpMOj$c`tkdw@FA_!HLTrg<rEL~9dIY@cxds)ys}
zCn{pnn+z=Meo7~7vpug54u_>Lh!SUfBJRif9qJ#1X$X<QF23kaJousa`{+Y-lvR#W
zo!gr;{-WX?{<MF6>9uJV8g{35nboxK6D#O-Ru-VB4T}0-OglnnF+{E6o%&!sWIrrI
zA_|{W*ls%AG?Y&B7A{2BwPN>(aQ+LJ58>%oPe@zCcg*oou5^kioV@eH;;CounT9&H
z<2R2>sguL6x36<D0dhW}QvO5%80O2pFre%Dnh#umYG<V4nc1yN^y!s{QRT+lt3#~R
z=PZkd%3+GcL`e`pEo0x`lLB4&sRF(F%D2O`u8D1)u!!$!;s@DuygG9r+?0&E&%t+L
z`N8a4Y-i9X>-bm_UY(*YbeZuA59NDl2(I<m0MyTVYe3w9oN{IPy28m(_z=$OmjPWn
zz1BlQ=AU#-5ltFf#x)bRGx0S1Ch_o<{_8O4f*MlwvcE@M-CZLIl*XI&+q3}tMSU4T
z;s>2WUPc)U0Ak}Tb?Ro9Tt&pbD-e%zfuOL6<SpF^eZkF+4KPK(?q$mE6)uH9+BCMa
z`dHx3RDee~!=+%YL{9l_ml+Vpy=6vToT%RzZ*!e8)shlZj$bp!Csh5mDZgiiI9L^u
zf_YZ%%-rCW0w&F?sDs)4)hEitHaoZ&X~GnB=>o3tQg&QU$9%)C<Ab;r0u^;Z#*|o8
zw#G0jPefiGCZg~gl+O0!7LdLDn2zykTt`i)KO#s8{@X70CB$P^bbvf*Fdt=}J&=ca
zg{=Rc36||7N(v9=Ycb-T4Deg;*e_yI4gC*osETf0%n#~Ov7RpHEM~?6jlsbiez4>u
z1p1yV_+mSG9krCkR;vV@yLKJ*9B8}T>6j%Te{X^G@r%%YR6i%GFu$F}_M-&~tRee-
zP;B}V-*xJCpTbDjjUws#rdC{3LLppbY0q!#z4q9|&z~Pc%!UbKOk6CQ5!nWh2zP;i
zPq{x-8d$2Ee9=>Y$DeX4%n$0*+53{~6w#y0CMbt+`#|YJQ`ye-lyOr<eGF`8V8;I%
z3)ImHyFhJAGQK57xlEos$`7{Isq`)+mgltjO+n}b!=JKo#0X@6T+YFcRg$Dh>7$~v
z-v#PLYG{hXhk?yApI0X$*~sVM+dN1oLKE1K`;g2QCJ9MaMeylFzyJf&6yP~A^f`!~
z05%2;eS8f0fSy-?$Q={m&DZ?f@Gklq*D<1n&spp#G>5mdaj8zfC7HPkPb95lyn}XI
z+q!A8F8*fYE*=LXXgm-4F%Dyarw}ujY>vy#<jrUqZ-$5!J-Eon@WA!07EBYFadU?H
zO}+=yt14y+8>?T72F$q?&rhSM+;8;^WgA}ka@F;WD%*cZt+&>R>^kYdz|kC*Q@m+W
zWKxyhWsl%CPdCA?QCk{MT}+M7%b(>gZ2`?XB~)U18jBkE&aP|qXAz=%E;6#6F@sc2
z<ds77X}XEMBj)C|6d0MF<26OrTD>8y*?p8S3Clz<`)Cs;xT^3y9zs*1bk6{BFgiS}
z#C%uW$Q{`;-vJL1wWgurd@Y-gy~KJa-PCRy1=(;OZ@*IEPj`QsiJV_s@h3HXg7u+&
z64)Fj5^t9Ip1w)k<9z6cxv}fg24U_ecZccz;ho!*W8FI+6qw?k)2EPlu|PBxyACz0
zpY<#}x_N7EtKlhMGkG>2hAV9yf1u=}R$59Al_R-1MfsM$acj>^hJ7t|SBt}wVWmOa
z?#XY|UBi&bTztfg)<?9?`Pzf;{X5$Ue+TcJYlQ!HKlHdi3s>Sige$2J^Bp~74BCSO
z%kQ%0BM+RgSE+5q8oq{Njix>as)HGQDE`VKx}P)$)omW#2H_Ju##e9O09BG+xFQ^8
zJq}Q<#lQ5fV0Os_-7|sDY|&G9SUGw1a4tf6Z@2IHbR_jRsU|}*Kx5LU;gQH_`HJLY
zojyEVWa*0Kvz8=hZ7-i)e+M1wi0|>cR7;i-Bm(p?bR2&7@!Cm_R{h7<SWXzHtY}bS
zz-ud_YCqEMeXrlp!n~2EYOSw}DvfUtUlX*RirsSRd2A0-z5<^2crfb~+dBSr&!JcM
z+x)Mke3;1&eXBXEHMp2ntRq5O^=E`pn;h3ZiTK;88L;>n<HIMh&qj{yaSi3UiA}OE
z(zmi?uE(=;8xxiY%VyC%Uz}B|(|b~NtT0!S2Dm>;r$we*J8k#`(E5Xu^5iCFk^YuX
z9@<j_f(LJC?1c?;cE6{|YH#E}l2vAS_wrK7HgWQSo*w4_)45c1^+)X*i4yg|(lx4&
znEu3TLKHN-#Z65cx(aWe%$*t_V;G%7mM}n<ftxA#gR4O2RkBf;U4Hx7;kxV>_mqYB
zI;)VyDH*$;n&Ixcw7zHkD|;=UvtNc^Qw>`^YkuwC%#j-0T*Ud+{qJbJa!@nJeWsdo
zwcv)&DdcsQe>Mx-J{yCNmqYTo^VW(UsZb&qM9%tU)@!oNa);mUfIWN~gjVa{=~R|c
zGgHMq%x%txnn+D=gNChk8@fo+Sbn`4evVG7anMQO@Y*E}1Y;g=6;~y3hUBNinAv`(
zbHSgYf<2oefp41Sti?g?sj;ovKd47@r?D_rL<d!Xj)<JTQ!H+4kY*&3DuB5*#G~f%
zRPOReE7yV^HWVXu+m*z5p*LPURdpDNP%+UDDGS?tQ;|i2Z$zSA)v?Gm;=odQq9tuP
zjCs90RVRX9^T!yeA7*96aLgJiW^PCr=f8eUQm8LkIV~>G*s1(!9$cs_e`lb2?N*;i
zoXWNkI8cJ$%JbyvHBiJY>MHrDMy=*gpWtBuM}r$Vv~o-HPR?Jiij_-Tv9J}SSPTxa
zqz>gD44jQFuEBjdiezX38MrYIJj3T$?%5m3X8VpII8+L*d~*y?o1+|xk!#c8*hl0o
z2_f!@zV)SRw!)phFyPYeaWJO25?-O_EpDxNhxEfIz7Cb&ZDvnN467C1qX>*nd&-gV
zFE4G47}DDA)@TehilB@Tp-T-SRvr9&^+va6Nu+6*`kREF2)GoN=zYYkc^YsD22#w?
zQfOi?b&&IX^oTVzGP1M4zd|)LTidB$^M5#t8FARYeV5BtwAp$nrcjLkLvr(=vYyd=
zm)?*~4;XhKW5L+!#k}{m{0hFI(!6u)5h0zSdP*<5SMfHkzG{~|3DogpoMJxnhfi;r
zlklwN>$kr5tG?t6r+W?fa<pWXuAYRASJfTL^Tf*uG-Gs`nFKAA=w});9@!{`XPDMg
zoft}RO&-1ZjCJ`{<k0;&A${HM6k;v8u$ltA+wwjd!BLrd0Ka*_I7jj7J70b?`&@MK
zCSyL6``HzEg3~0}zD(3`^p;GlM!o3}#cvHc4W4=LoWz8p4HNJh3B3xk2yls0Mr}zL
z+0;Sb_OMz%tzlPALM1=ZYttKHM0>&IKS3b@eO9h<3#w_cl*gY9W1f$oY#f<nOE^WV
z!fX~iaiR&?bp9XL%~EV;VEMN0<ll}jSkAt(g@3hhJ*rkZ#9O)^C8fA|=V{O<A3h;(
z9;^@6n^0_W9rFtG|I9i{mIXZ?@*lOFE&X#!U!U>Zg@43DJQ@{{;M6<8yHJ+YN3ko8
zeAefp{s}Foz3W8@X+an#vfr3xba@TM#{5jvz`5<-y<B~UMOxQ6o>5?<o>bMzJ4lm;
zetF&5Eu^KccIn=GGgExyoQ*)@CZWywCTq5GMiRf4<XWR$t<t?wa+Mdghy={?-fjlW
zOYX$1eV1|OX<4{*6ec-}Z&cWnj)Lt5bI~CL=|<;L^NaDDWNq`W*H%7qh#Z+E`B<e%
zeLA#+)LqFEmm7|Tm-2B=H*4atIQakpF37JJ!ol#8>&)mHo6Fv31~Nr5bc!MxSj)_~
z<A^86<=c1_5grM5S_0m2W6k-opXs@TAr5%0LIE)<8UFs@=!3}0<2^X;_NVl0C4~jD
zxPY}Rd9QxtsPP<*z1XRI{5?1^vB4C+$|nE0MM#f1vP{1yp47Fayu1cX24)zhO{`CS
zr~KXhsv|iE!OrXMVt{fLT&ng_{U8=jCUs@h*`h`tbmP)~n_eb30Xj-8V33GOSI@s+
z;1cENyTIcskf{0&rM*-DWqGz0dnq*$WpTIRsccU<DaJ*bn>^>9ga<MvZsL#L)t-YO
z*YRx=$*N%S+y=$&FcW12NgOSwHQSxBIJcIaeaNN1Pg-lf@zkmy*siL)EY^Zje44rc
zwUx}>!nkI&)6%pQX?V!Eh7y#sk2z(O)54FF@_+NcO5=oE`UZN?XzJUtV`+QVQVYMc
zw2ZB*mZ$ma`_6SmD+sT3uQg2m851~d!7{>*+q~DSCPqXeC-=*d^!@9w2T9xRG_<nX
z**T;elVxHO_a+~(l{{5+p<ljPDDI*x<T!zNST=eTQ|{c?^h{<>N}IA~AWJO6%csq^
zg<?sblFMIT{c(0LjhV=Wc}5M4=4UxFF*#wD=L=_Id|m>-R>{b>k)WC$6W6>$XV4!n
zM{uJUOo)VHFh9#0?#2<^+=%>vvKEyoRh)b&`Te%-;QqXjJ?`Oy&+=aLF}$IzwvXSu
zkLsIe8)dO9qBJ8t+}Dy?!wtJp-ixG5Qt(K4h^l3gXlBNJq1c~=6bZWxsf}mh*5+qR
zn8l5M^6Ysd(v5Rpq9^VUFmes*38>xen}LMlkgok*Lpg+Tc@^o^Uj-v=h6(YZ{^%Vc
z(w}0R#lvvEwdU`i9VM==%cLL^l_l^qd<^W7%t1oQ8u<ipUk@33=x4Oa5D$#ZxM7pu
ze2fQHK<RnSMc+T<veUY{gYfqw!M+~Ms#$!y3PfV>1BqC@cZvp$^0KqF-+{78TpA^f
zeM2xia14XE-7|qOP8bh;x8PD>S2|0$peH(~I=pYb+b}<xYrksf)Avdm9vsIIFIZlI
zDZ?>?$Y1|pyrtqEGkGW4_g3U|bX4FA=*g$Wdy7lC`XjCN3Fz&Jsj)fmkzMU20mH{n
zwCfR3@qd24^v0DyM=$lZA#D4(U_bt5n3v^!(C3=peaN+@daobwrA;nOYL>x9O+9Wd
zc&w*ua?AT)@>pzv!`5n~qNZWfWC=RmJ-E-&MuNF?d~=!H>L+UiG;aUxJ;~hAtk(QV
zSpI$%e4M^O?qo#ajQauhLq@CfR$;62>doReUJ#WZ&4~I2XBr``W%z<&kb!$|&CD{Y
z5Rydj?(wu}Zi`UrP=39@N}xR!<XkP=M&;c75PBthz;j@?mZE}8%El)~Ggtg``uP$0
zDv~=Ua+y9ciX_jKM(j^xA6_bO#Ug|G8O$~;$5l%T-7M+CraeV*=6z}RiHl*I0e{Dg
ztTXt^QhDpHH-C4x<Bd%4GRr}WaP=-!jO9*@YygtfcxGEsgV)Sfu+qPeXKB;ZUEAuR
zu)Xp}2|uiAq*N|{BKsHrJb)2>ChY5SCCC>GnT%^7QWVBNJhYV?Lr|CD9*rlaVeh~d
z0#4@24|v$kX!^IWVI1_x!c|n#=4p$aGr&jJwHLsGK9gG(lB9zQh^aw6c>x~qvU4^w
zmw8QRAfYhn-g#A<+<=GdCeLDU(142sBf^9V#8Ep2y_6L?99OAGI7_PSriGa$n`XBy
z{fxxPJcgc(R%GW861W2DoDI9ss-I@6oiRGmjV^s30@zsu5Y*ldf|gR2i*D=FCKfqE
zOU#be76#(+FdGv??5-hqo09B<qT9$<Z(cqgEl1|{$j<M>ck^O!Z$uCech)z=i3H%1
z>i1YF^fj4ZtJFIVlyE!u7p_G&bJn-yWen4xRl?$G`NL&(63+?NxkDpK{XTP;0g^0Y
zt2~vvokY7#QemhEGl0O@h*g{%fetEC+7$Zd$F&Jjl^c!dJBy8uoi1wKtW0hekv|Kc
zBo2kuT@v|=^*~)6?HxNY(6*LzYP2-(oCr}Cwp)vW#TzdKLV02Y8?0oWJyEb;ilIsP
zo+Y2n_pUu_ri3=uK593{<wVcI9m!LWY@rus5l1(mz|_Cl!z6d5y9<nUD8P4U<S_e0
zGzpn<+aKFFkM7a>zT5}*4Qe8&`gx#a^sc<TDag0%b4J!fNps5Zsi5F1ngn7n?=!W^
zUSr2H2MH#W1cIFK52;jGYJzy3@T(#*>uGV3u~P7K9d3JLWs0>^cR4YZhf3;(qRg90
z{O>b`8&+Qbna$6oy@Pv+s_5m&bA0O4Xq$n99zcLtP9sVZF~~h$P$#<SfySK@5b&{?
z3O{2<UApMaW&H&|WZbK9s5{=x$Fsk9Cfja43T<3r%aO=zTv6Vp_$+;GXedM4J})4M
z&OhPRg{A#jZ){P->7HWDTtxW!M)&zr(ciP9kp;Pk)0y`>?8~8)-4|b1M=Fo$|6Uxu
z?~eHU^-JY3N5tvb#(C_7!*b~H?h@?p*n-2a>){U52@w}3ry~nRUFW;2hY2@;f12pc
mp2J`J%+&o@Y2$IxN?7pU{cMNu;PbV=<lav476NCNNd6B?x<Ew$
literal 26154
zcmc$_Wl&se6eUV<cXyZI?hxD?3n91$f;)5w+PDXIC%8j^;Ee_d79<b|ZXv-TXyBbD
z_uiRTQ*Y+aR6VMi>a+J=>sx!B{hdB^9cW@u;U0f54!VpIOqJqkuWHS-k*;LmjceP?
z&gaYfILP_q>}Ef6_)hPm7=X&cCeu2TjL+tT>;rC-b`i<kK8djKeRnXYZZX!fImM5q
zAY;@tzF%6E>byO|c{uHOI9s3Dy`+)uY~j8?>7VTJd*fvGaD9>eaEcRnf40Q!vU<0z
zNz?Ndd`5M5lODmHzao8iagg8=;Cp*L)?X%kB<**9y3>(x6u;ooEwOAQb9j+&+H<|D
zNkb#u_2-Ar!;e1+IQfB>r>0-3gdfiDrHjokHT)4~T>|`K9s+KEpY><A=681nUT*da
z9|hbkqn}K2Z=Kyf>_QD$H?7ziB&uRtrTxR11FoM0Li1OF#adrz-OV9ESIxp9U+TE_
zPS*RiK=*Uoez(^ya-!S%>1QXq4N?~d+jn=@{g?UDJ=drAWf7Bdbn_BbDKz)Mf@PXG
zt7qI++P|X|WLl;Cd>;<Shh1o-{4ej<fA2&jtOnd~FG+tM_1o{1VsC;D)8`A11@G_D
ztn}R8?fgC#e*UqrpbX?yxpaGUgmdL{D@uIPIWiH~`R8JD(yTX+Qt|xFS+3Ig?$NLQ
z2%lBI%VSBR^G-CE&zeUrR#B^+xA%$BzAHHoCu4ugF7sEruD53jd-8?XZ=e6U?l@}b
zcssUy#w_V`Sr(z$<99{<Y4y+X@uAT3aVOn}KtJT4_dCN!)GJ+qmxr6#fmheN->U=t
zZf9<B5^8=44>wA8{y9Ckby-Si7}y2fxvU1<9&g?sz5IN}ES|95x_Xbw|MQF|^zdVo
zf8A7n#4ycj;Qe|wP0!{;;J$JG2S?KWbBB(*T}>S6K;MV;vFz3!zw7lS8l25Y-TQ=x
zyYz>fz`Jdl`}9AXX7^X=(jpWO>3@d)oSfmfNK4+~T?O7yKm6G=oe#Xt$8mYM;YmC0
z%<QfyJnDHk?YDUEHktjyvFICj@vD=`?ES{_>H4d(Z$8?DBJ2rPyptY!U{&|Ho1F8>
z?C%{^SN%TO4Ft^42s82A?!epi@2mGWKaB2QIXc{Zcz=I-_V8zHm>cKZgX8SYZ~ttI
zJ-n{ltC>lFrs?o4Z~h?udf=er!~JFi_sdbO)Lo6suBS!J>u=8PINN%x%EEWY50b+}
z&DO)J!X;clJ%jiwQhql(w@2kc$22i)EBCUz3gA3_S>3JgnpRE$?}bm-4>WO<^m!z_
z`kv|^pRA9iUz!C`XI)tcC=}iex9@Lqo0XT`Jm{%RORQRV_Gf}0zR)+C1>9fbn6GwU
z|M-0`NpwRK!~XyWzv6#)PDR=lLAMioC{5ZG;CH#vbAO5y1G(wGDr-%kSqXf&|Gva+
z6zUlJ=0sYm6Q$>9u;=cuC*a}FZUlGTc+5l9!%dmSLw9Gu$y>9oz>}ljgFWBsbc3Td
zlG%U!)bjgGlyzu-!X$d;1sAHp7T{!hccI+=;OEpG{*b5pxyO|7>@+BbiJZc}|9feh
zG-9$Eh}*R5s&!YNUQE~Fn4v<mkU6LgH>bfMIh-7;+E4u&1tWCM94k;nYslV;iY;+#
z)!J=D-{_QevF#;f^6eX59=oT!;A4%pGGycNl^bhcHqo!o557+HC4`!w49p`ExHqd)
zIbjW^yhxKhf>4)zB3cN2DTngFgJh-#zS!tys7~NAaApiPft)mhAjv9=85|BNEpIHD
zynb_`>@s?RD%L3RXXmmIXFxh%gFLv<?Md9xMwAn|WF7pfi*QNLQ*x7Q2EM&1BR}Hv
zv>GvhRB;c@(vPLB`Ac2ldXzI)Tpz1`=5kn95^B(_vsOD<cX&E-gE?rl#HLpMficez
zJ&^QGlu4g|XoWy;U`9WQ4j7`K#fhV<I12rkrRpNB$(y0fC8B^cg(+FQr>21?*52PE
z7TlBKTHe@-*N2Lcdj0J!4g7C04J8skwzMAw3TAl7Hm>EB;erq(H|_bU%$$SJ6@$&u
z*cBuM#nGp2mjxn)<?g-5zUDgT)5DhTbH_P;Wb0<Ry=JOcuM$35KU-{?mPF3L^fviw
z3=KOhC#y>tjxcoRFnME+X^aR;m-(q2QiNc1V8Sw->F7`)@R0~A^|2?*%I>L`NHb!Z
zU$w$eSYe-~<?Zw6LO51FlYCX)Zy6>oC`KS%do}_Qj@MG**tW^&#ZDnbC>AXPMSBkF
z4GZ)?a!<^gEG*JoJII_gaD+IKO#(CGgh(lSi;Ypn(5rJ*rXw<pskWu^dbbg^5h`tz
z(F;&)a_F>LQA3C=8p;La8lQYnG+}gih^eR*$)bxk&!?N6WX{GLbKL`(nMCM5^zZFF
zXOx^3l~ao@@gXK0OE1`i;>+M5Db%esu0H3#42W5FnFzwGoWmN^L9Ce^7tg}|eesN8
zGUf>TD?wtth|TextXwzb0rYA`81ZE>B8IQhuQmJzj2uM$sX9!Pfwd*%o!XyN2>UK;
zb<C!C=Ghi`A5D29ieIBB;V+x;U@tgO(D}|&FSF7+nvVp&s1_7O((gU^K<0>|K9P%k
z=l<HkwnrnZD_oG%@chC@h^NCmOxAV@iqzSRPOK1A!$w`H`|7*J``*FN?7kQla-Is)
zAr&W5;tDvmohWA|>w+Z7osLx1@PabNeCHr|-3$k(E@3)XE&OWRW&avRS6xa^PZka|
zN}I1wry_En9#;w?y-=zj6&z)r5UB@sCzNZF`H#941(mHW$)D88Ji))>RlnMZV9T%_
zAeMGwoO^Z&u`o|6{XmgahDdbljvihci(Jieo)U6Zts#Jmv;VF^De8|<onAQCMWKd3
zIleE3m-!Mqg5;Cn&8eYWa(XgUQQf319!`tkQ^jdHN`j&a^!OOz=kh|tYg5%?n6j~C
z_qSq7J)+`f<0Bc8LATlw*x`C?wv)dYsj5AcKQ{GjKrq1a^#Yg~=^nAwWQj8JhdL&6
zaDH|u{-UE6DrlBHxD&TQpDf`p8XO(q>ySL{xhnd;*`+)6?a?p1%5Ds~Xqs3`L8y)*
z*;KVg>x5ifZNpc|XSJe*qse8bmcXBJ*AAn7JGdJWNkyHQ_RT4H>F{+EQPuG0h=?9V
z?|ZWrG)I9@mocF^)WXXVkzi3cj|N8q5v_v2Dj}$$aZzRh!OJQ{u{L`GRy0J&n43E?
zhf`KUGCz`W*tUqMr)9r;PA{3j(D*P~DdE*uAdd?U`o_6r9V|RKjK)Ai`r}o$xg^R5
zqm~hw&OObc5hPUjubW#s$Up>*ne}t_n`{XVhX6^?+Dr%lLuASX^MR=0q3zTx`7%WF
zn_DszpGQPw@`GwQmk4`}*nYY}T)9h=-Ov|<fe2zZPWksnjcM{D&=4A>lDbwcqr%Ig
zaiB?=(wta=tJ(sGF(D?c(q?Lw^MOA=cOe+<EsnbIam_#7R7Hn<`9NzuAplPbRC4sE
z+vtkifPjl`{QTU7NHF0p;8Hu>`aq`!68v!+bs2n99bjY*dHvOy5VR2i;2~gTgsnc8
zu?4LD3qgJSRd#O|tg(urtueq|SNdh&9NO|hCJ(w13e=50znspKdV22Rk!-k=3HKa{
z>R+UGlT4|o?Jf2Mp=Q*x&Wp^)P@SBF<cJ{%tU37t?=c~RyBi)FmW1n)HcA$pF>%;}
z6aD+1e4q>v&;&fg6Z=+20`;?f&`?ydHCLakt<h5Pm}D#>%|c(%V%4pf%QZz3RNE{4
zL^&0+(1wT?wkafiP#ti=7*>bJxDgT5--P-&Kh2vH0dFG+R1*5-aM~&s(shp|uyG`@
zS$;2dzK9T!I2XxT_&w@M30li-A6{2FrH;VxrGb7*r>8&~MF^4f{>`|O_l{TmwJWBa
z63B)&N#Tw$QT&#ji?lM^iHw(fHzO09mTX{)*lVpF8Bg5i*NVOgJ_|uDlbf>zU6eZp
zze<YSOXVWUz7LEObn1+5*z1P)yST(jtPwoP@}i**Dmij(X#=96Q9zo5Q5zcuLM8Y&
z3QK3G0BBkK?Z2Qzp!PpdCgbQMXkABVlJ2#NWP~eQ#s85Urs#3WM{?zj{}cKDMiI~@
zwgr8Z2kO@(k%;<tKtC`=#%ciPzwJJvF@Pl>+kizM)AIkA@CbtS{vYV`zb3#qdH!wp
z(L(iqOnB_Fxg<}nEoIgN_5VQrzfq+8%>&h{S8|LFag+{IkK7%#Q*vi2OR17^2N(JC
zCL7AU-9jAX1Q8r%KNEq(;N1TL^sCUnc%>1MT*4ZyIg}qd<3!isf<gCt$#~1cNZHQ>
z3sa367^Z@mZc#GCm5S+c#6=m^A06CnZ+k~OGSnQxm@}LwBl~}2(o?qB#&)=u!`B(c
zz1{e+kVJ+u&vuc=iHicsFZv?e|E@I8*=}~}oqhc%*84mP`Xs6SiUb_kMLcgeTxSvs
z@7Bq*O3oQ|S4%}SGuWjL%lYU@wor59bnyX_k|vbFc|*lCm4Ge-j!E~NY?6+#cyIkH
z&u_fxuUmd(KhGMWZ1g3_phk59KASS-#18$Xasm11f%{6L<;{WkH=@IztF6iDKPh0b
zLVmfoGe*<aF}WeW;f!MV6vY@%OOnJ2F;*@@b!U#E|Ky-TDPyX(f$B~VWW#_`ST;v_
z1NGDpU+Eoi3L!ZvKq(zi3d^zpfzGr6ysZxak?lW3kEI0v62VF{|8K1clLun_M?6fx
ze{1UKB+z~+p_VaK-N)OK#aDR8uR{3P$$x6N7_|{UzLUq>QU|iIP9BBJ18rddrLe4M
z;s6wmgg1tE=9nl;a+_MFln%VdM_rM0z<xfRoa<(u%NIexlgwVO-i9vB_x4!6YY?Bj
zx-ahYI&$*4D}#qIbg(-Ivb(Oh;~KK)a%M=?7q{GxwX@{VzmD8bAsI%24_XiBi0H#o
z(OeHNDRY(kLSp5_Qz?brQ}VTFYeV#@t4oUUuB7^t<X6H?AwyJxXhzJ|pI0bbrPK|1
z-F=ob{tywVJ1+&n&ggS~p9p7d1ou5;Q4<}Hy%$MYa;@*=vA?V1i+W<HY)#cL3Pw0T
zt@wMu$(Sf7oD5`D|0xwtouzCKV|3pmPWn`stwJB+%mkFOtBn6Wpo{vOErqcr{ZncK
zlo~1jQ>qJ;8mZW0fB(Sfy~muiP}q?+@R$A(15+XkDB=HC35@;`10#UZX99~qiiXj{
z4t(+WBe;AbYH#Vk7mj_Gq_CFIVe*LpRiE%<SL^nq4Qx8WX=SoU)OylXXuGUrA;aEA
z#4ESU>9_AHKKhPr@&lWyVRh$&n26`L7j#Ui`iJA&SE|TIY?oO=_O1`T43P>+#h1Iq
z9?{fyJR!DsjFhS)^<OI8&1+N#Uw;IT!3h{ct(vD~Oj8kbg~dE~5&h9b8dbdcjy`NS
zXSI0%yUXQm{SB?%2UdR^;-;P=h#kuO<H;awI`1-wA)i{QmI0;D>il9?;oJ=1jN(58
zF8l_7_RNdak~D*SRr}0~FvihpZboezf95E@pFmwxchW51PhHrXck+MJldv>X#jAP!
zB*VXTz$MYZOu6Xu&2xMOYhYRnI2pBrgc1jW7d|jz4**wfTA^h5;00NHBuikhakG^-
zp8Yb!N3jG-BgYxFX}vk45E_8J6RE-IM%(i4pHg6lM4G7mQwr?YNPzWkRvy5@h=7wC
zyr2%S!iZp{j`aT!!Ak#IGd;<dwv_4O*)JU(oB`mY5I0+;=&yi()i}~c!8e34q7T>r
z*+*8GaAsf$BjuuJkJ%_7&=zSx`y%{VtW_j+WGY?tK5XxC;)?t3!e-zgID@-w!svsr
z15TQKLNxh0vANwbuKAC?No!E+E4`Jp!C$Q(KlQh8^pdzb@dT?oinnc0c?YmM)maUW
zO}nSg&IeyUw@>R^vZ<C4YisPymvzWt&N!T}Y&LS(3%6)}@t%%i|F&|jO{19Bh;Or3
z%wXoNMEi5viB9y^;2gOH#qPKZ#9Dagg7wJk*EgZPF{!VAm2ahcTuJN<J=L1hKw1V>
zdPlZ5n4*P1gB#|`(@>osrsfrKhVWnVn5Us;AJencslrp>W0`JOiuAsgt=C~jjl|Bq
ztQ5Z@q!hNrr<&aJeRAMue5B=6Bh>EwEFJ?qH|D&%i99<-F#Fls+4JDnawV}R*co>&
zZ2HH?R30&@R>Jv-$?>oc2%hW~o)BlI*!U@puxYaP_x0Y9&TQ4WMcL@ZR<K+=ki-5m
z9;W@xhAH-o2)jkfa3<Pj=(sGYts`-t$SZy#MbYe39@THg7(WfNqw4coJ`&HL2?2F&
zndrrzfx0qhpw5S%U}yxW8(pam)xNQL8ha{?VUg2ofVzn}p-x)n`l63Dq6uG7B`1?-
zVuK^pjog+l_Dn?ABIT0-TCw_sD(QQ7n?8~BCfuQsoG_k=9rZA6F<YkCQ&E6r3J?@K
z0W9PRu#^FURC0lmeSpQ#mO1uJ4A8Owuza3)PWs*((9#NH$pscV1hn|VSj71)a@Js4
zCIJ?3X&>t_OiLcXa{4*cEeoba0$|w#I#QnmwD{JBT^LWwztsE<biJ4dw0{W*>IUiv
zqyRxDfS?qhZrcwK^aBuNkRQeax&;KS0D=gl0jg_2(Cnl->25&VJA*?MHqq<;LPyPe
zNAT#jCvSrBOxitO;g49`s*Hn*;FOaZB>(Bd4Dx!(3Foc13w7&ag641SgI<Tv1|6`$
zJ-yzh3`hc!g3lfYNgd04g~`gkoL>lxG%2yUeUIoOIOs6KZmP#k*1H+TigBs_RQ}it
zquW~B{AtVu$fH+ee*7UZGJ`jXy)xfd3v`gPjmhlU1s6U4v5e(x8GBlc=s0?8=Ve#1
zX<k9;H=78a06h%!&5m*z(y$W@3(6txP&ZO(f+34LRUp7_K{zxC1bT3RfGlami7pVR
z3)Lp=!B@1nQwIY7L5P3=4Dz+lmsA>WzW>U>LNeA2t(Yg^X>8wB7!UR)NuNk;KH4Tv
z022^M<w4&p>tl^ILj?kKvHe$>K!rXm0D~|Cf&U=rK;U19Ex_>~qypf0gupodg}?&&
zFbIqk#_<S&k-|7&5SWff4j2Tc;}HTA_Alg77!2~Sut&(hy}%%KVHZ3B^wklM?LM0E
z{Qt{8%`m{OfBoYJ9R8pDGpU=w$P7PeS*@GtpP-9v{nMT!^O@nRXOD%FVhn#?jpZLC
zMzdbBsQX`erUhHBZQ6&^AH#p5u3Vtzy$(n1mM$J(>dEQXqz8Xx06$&x*7;zCh;z|M
z-7e-c^nzinN)TJn{`^_qNg-$uZX6+>M^nVIFLK6C9^MLHX^|UEhL?5DmpDOluMG|x
z^l_D$U>*y~_Bb9>&5z?@zZqWcrH2u1*ip_ETRb1e6K@DOVV{d$T<*mbTQr}_6Kx3C
zYj1+OS?)y#R8#-~z)kxu;`!qFsCw!TrWil9f2xuy)BuC?fh*K)wjFm!`=>goQVlR#
zA8JFjXT^vVwSUS20br6oOu#DefdC8wc=bOZ&w;>y5CVYXUkE5n`!56*_zwc(fI(oS
zuw}(y5Ev<p;}HVW@h=3X<8fJ-u>T-1VKB&l!eEepdx1fGIjfaw2rMN3whJ=@7@YrM
zMkZhv%nTDWz^<o&UH|!q2H5pK{JYxZC*g}T{C<3rDOW>hPetuWH6Y=xu{3Opr#lWl
zrrHcZmv~ly0J^Q`{BzuU8j3sg)`KK@#Qb;n3JvwV=aTpk+{BaTjGo7!Ty$zRO{%-f
z>D}1ykr7MUQBSZ{9Gp=^VM$ygIL4<z*7m9IRNgOLo%1K^gw<iu-8&n}x^r&eKaNlt
z#w(`~kHE_nbY@arD}oZ#-%nKh`JcfJA{hDlg4VjVL%#Q6{ZfxRC6LPd#csORAJ%J+
z!Miood{A|{7Fsf)a11{Vl@Uv`;WVsyIT?+hxw`vg{8)=JiwG^^qRrPVl{8^B*+GN=
z!A(SD4@885fNMNGsIbg{3yK-5KTJiVK-}idYl6Psw7?&HAyJ(ml~*r{5KbD~V%^U&
zA9A)Gi<QIY>XBrLK=8z-53NPsafJ-EW)7|cuF?KE!Y}wx%j~Sr4tOW@OGOTNk}o^W
zCl}l~h`-e=@U?km42xRyC-V=<8@zcruI{RhMY=GBzB0QQ6r38-w#rWQ#K^#%%~lM4
zg4Q&<02xyN1?AMSx7`#&2rW=@8Z3ZU%OybVi|zY?&x-(e`V}NB9s{~0b^Ni)21lzw
z&Gs8~Ps(CLK8SPZKud!SA%y(+AUw;me!;#aGhyp2bR43DIwv~MIqNJH%P%(<g#|G}
zFkxRnZ(@2G)>SK!L7(sVd=NU|V^e+C&<1B>(WpN-sHGaI2&FTAcCCu3%uTHyZD*AW
zZL$|s5qhbjF(|*#>D`NX!LHa49EZff-qF(Z>az@!!5b6|q1fzw1{7?sLBvlg+sR0+
zEaiz1wnT0A3HwC4r>6?7qH>P<cXrtr<w0?v2EFWFnMRh>0ST1q=t`$GL)pdY{MV?M
zQXD(lancJ<)cuW+Y{Q5x8T~5v<~E7zYxmY7efPXQ<FMF#E0~$TR!n<5%MCMtd~`-m
zJ`Ju4v7?uXAKn@@&1aAl!u-`#gmRm<G4HQ*gWEeJv-)fb<z+MPccveOxDs#`dlsLd
z`ZL?M$Jm<-#)dAfL1Go|=EQC0aV0+Hf^ZVEyDb+xJX|$roUemNJ~$$QP|X+aohaI%
zWt`a;G@5&jXWe*)5~Jt@6}lU`f#&+BFS-uGGaO^8)Tc;0JO?A^79MW9P<%diUv>DO
zymc_W>*)XX>QXF-rK4t|%NuDH%i#$sMhngUWnE8}=fk2DKNZsu{z>>~c!!2tAlxve
zabgYGWbJ^$a4~mCRX9CT;KJ3q?-%J_II@@SCj{Su`Cgz}D5^4E3mZ^^zpSaoC1Eko
z`NhO0*?xIW>wZ!E0;N9och1B!Ex33UfsvAW6s;`BY>|7xYES`cYN5DO_zzP$OQyXl
zMJyXc6L%S`Zbp$VgOu1bgcsiIkx<uX#zp%UCx>iPl4zhSr^4Si--UPrIo}I~WakJ~
z-HHqf>n_r?24y0EzWsRBbQzZcDNyVjiC;VGl@E$`$HT=b$z^g@im{-I|17tL&KrDD
z#ELox-A2&#HYLV{Z)O;4oH{vIh&sNKVX$HAvnrZjB*4QpAjHg+H&~!(XiXfAzA~Zx
zYGsg@;T}r%3t|mlwp?f>UI+L3HD?x@gjA%NW(H-cNNoC?2k{&w;b|xv3j*}x>q?9%
zr;!oo5M2IVkvvZda254^Z4w*O@{2>wj9!(Xcgvs9pOaWL8X6D}EwcUY{*BAA_$8y0
z%^X1oPaSvkc?8~6GkiTCLQHxxZh_Fc7pe!d;WNZ!xSsi^FJ^w%{5Bk<R~%bI65L=W
zw492R;gq4t-gple(^C+3@jZlu^)>&(C;Oa&!NhP=BCQNQqM}y}P-0@_Y->*1YB))c
zM)CrcL5stb-qsp_KR1NS@CG6??Qg0xSMxF71>xKZ=r$MQLN4<0CO-F+I>aL^1|lEL
zHpB5;=@pj|J)4@rr&Zk*eD>~)p7w{^5sHWy71we`Vd@$x3xQ#9wE5Ae<y@;hLLShZ
znaJ=*@nQKcQ5u`o(2Xxzkuf|+LZ#zMLnTG2#u?v{5NIYAXcdJr!0#NTZcy=>%`pau
zUAyHNSr=vDG1fOS1zrotD=IXs2QWDNA~W)StrwvxB$Ck>$yLdLO)M5-@ugE_cgn6&
zrExtyX{%Q+yOr#-lT4jqgUm0(*i=UjEE}ZfUp@ifMisFUfZ=uF6pf+$h69D(j8dDs
zE-XsXiv{jPFN6nQ@Z58h`6If)t2+sz(M1jkO68y9Ar=u?eqddcsJ_P~OChkMW>#2!
zZc-miZmD=08%N}9-9!#z@0TH3H;bI&P79CKe@HnHN7Zii4fY7j77mximr`G;Om$1!
z;wlQ3!47zq`YQPKF>0TRK|u~KD-pxTYP2b{xx5Ag&wlk(uV+5ky2O<tci+g>@CP$%
z54~^USz|D!O13=RmflxO<<D^i->iodkEA^t{H-GVs=vy~N}!T>s;Zt+6svB<@#ukS
zPz2S|;@$8!nT-55`*IP*OT`N<)v{^D&MzmseA?cqHU@j>H;Gc1zl?BN;rvl}+Lq93
zrK;2iH9+dX6O=%aCcue@h?3x_p~vQH4?-Iezv0e)+CVZRyE|&yplrV>?h_CpjnhF9
zs(~u;;!Dk#A5Topm~fQxIAL(@#F2lspA~y82dW6kjwi+d`6SM+<p!@h<}$Xn!LJ)A
zsU&<H+Ys!+A#2rQ1IsUIRX%0uo0{Dt@*hR(e8NdGkBWc+DXP2rNKg}2P$yLcQt?G`
zKo<Eyj?Jzy6iU?p9{QfQfd^l-Wc(x>PYZru42O@gpwS3;WwR7CzEy?apNm=TpV}e`
z^!fMs45~jrrMm*oCiA7FfQK+<j_zk}X=tP#4!65X^j+?M{0Y2=J=h@*JY{jVy$(Ds
z(0X;W6d`Q(Ybk=;to!=DgQREjWU%M0W1iQ=2wS0<27B^L2Ax+8Hp+=ZzRn7HS)atF
zOl=z#znndvFYHy|!syGJF@CXxRqwyk%rekK^#r)MMFtBaVj8dneF+GXlV#r&m!Zz3
zVfX}fG)j2u6aQ*6jVPpJG2HPvwird2Qh5mb`&6Mx#ck?js2JYq^_>4@oQTZX$+0KH
z$|z{69?pp!v&%(`RJ~K)bm|4klsuYYj0!EBN_~hjt0>##Mk}TIF6zEhGJ5&Pg5P+|
zE<#D<lNBKfiL<zqG9>aUxoa-V^DN~jFZ@|mbZjMhX-bsuB#7M;>FEpwq)^!K%?v6t
zRPkr8oNz<zWw55ntBo5W1@OomE!71fC+=<cX!fpz$5vqlLoN}=`l;rq=a!U1rwzdt
zVHkSx?|s(ZeM4)5e0{FB_{5Bm)aIL0cA(>kT}u&_rV+grM9*W{Sx?P?iI0{rx*<<T
zvyqHI><iwg4KBEB#}PT$OwjkZ`s6(lHyKBD;m{51n9{J+ramni3UqCP4QgIZC6)Jn
zZ(2mwAiCQ+p~Hw#@}++yncE3V8!5pdHwHs=CP<V+Zl<toY;ANM#Sis@D^?Tw=b5=L
zkE6>hYmejV!?e+lu$NQsyXJ!i6WZ;1g-T<W7I{)K`1CqYi2BnR2*42?EYh#wrB_fo
zS7lud)RhSHCl-2Nhy6)CWuO@HUtHvGfircMPk&x7a~YgjXX}V(G9}_^8DbmL!RWPJ
zsPUGPhnveKIA`B9=IyG*XUzplQsw1p7KdOOk(snUablEG-1&6y{8>=ky!pIL{rWIm
z#vfZpo<i5*0?QCGB$;V8BdEZ;)@Uq}&PdUCHi~9U%i@xD^ks1KgRRMSAv?y(F#Te0
zs_PnAZo@UE(0C>FVLNMdvMYL<A}1C&zuv^If}Iy@R>QRq$6#8OC)C^gP8a29E|@EL
z;gS~r-sU27uG4WbOwM49XFV~I7NZ}>Y|hE9?*+MfPiNrp!ud={pM2Q@$BJuA@_Fz4
z92Ie`q_9^t616=q6B`(Aqy80lyk&tAU!IA0g~<Tv>ptSbnUlL-l>_%7h*xpTCi`NJ
zvIlbC@<xrdob=}bTK18r7RLnN(#S=d7uOH%3G~d?3g4SUDygV-;9Iwvy)(l2tkQ*r
za0*pxPpZAa^CcpJW|SgLYZyO=m`M<v@x&_>;?R&4#uuG51E^RI3W*Cg*JQV!Iy_Mm
zYHO4sLg|5?=Jcs>N(`CrRkF1}cDLit;8~-_3&%Z78-l0%`BQAa_)6`3VqWKO!sG02
z`zSzB&_2Q^c!T{~sMlWPF7Mge+a{cmwM!QntRY0>C&lIbuMv>JO7(-ws+1!%6qJ};
zH+f0avfL5*4NP5waE;}v8;04cU$*7poY~%JgZj8H>DYYlI2vs25Ich)Om%DZE$y5=
zY@>DH(^5kPvl9xL-$^TEA=#OFJ)*})%PlRaBABz?l>~P!SO@R!?D(JHpsdYTYD|R|
zj2BXy_J7-PXEm5Cd?^zgpu2wyilf2sFyF7)hpXjr<Mmfv%Oxi#l^Z~$g}P95wx)#j
zJ@DN0hhTdo{V73Ov#jIGc%3t=kL4$J;a^sYEVN%E)*$?@SNucRu{TCCkzWUj^oV7z
zT6N)k^_~T1LK~h=uf<cSeY{81S}WGd+X(VkxhiD-A^I9A^mgCBdMLD!;otRDxkxL2
zZ$ZMnKn_2~hPQngA$H}467nQ$J!!VhAO3S)Nw{8{d6AA5i3EmA>Zj<rQB_7~IwT(r
zoz3{IP_-V~Vb0HZn=C2`6jpBB389<0D0`Em?kz{OBW%8|R_c&cr7udPZ|dJgONqAD
z?4V;?2CG2%#hSefdYm?A^Djy*!n*rXCev=R@O}{#{hn>|z#SOi`IwV*@k6+{`)F3<
zHj=z5ey!9WbEU%K!{B=+AJ|`KNp%<sbqE}vYpJ|Gh4DM^bAONyIV>7$i@TxM;Cr7}
zqQdNHM8Q|4LfWaTn-vPJBbO{wK}0B1k-yGiPIOgG{^ZW8LH~p8pBMB7szr`Aj8kVm
zp35=39!7{u#(J|A2PNSq3s_q7hpSkHe!!w_Of5UUJvN-lw{u%t7~Ej_XquO#9FL{M
z67#7wTCZM_IDz#kPX=Y@L>RP{DyODNMAv|Mr`^G-PcvCGi}fR|wOZQ~3+tHinP&pc
zty@L=aQAYcIj|n36dO$($sjKUhs_>Y#YQv+*xi^&|9JBjj$|;HA4#=*(Y4j5kBrBK
zFw5e2LXY!l_ePNe$`H>Lp`O*WAi}tm!><;9d;+DU@%}bLc86g{sQHahx#3!AF+8Z5
z1KU1rc%G61V~X<lxY9a=bQGMe$Jw1#Tp_Yti{I#+654Y}xt66QsYjS2DnWf8FQtr)
zL?c3rAEPqvjC4fFrRUe9@1_jiUGQcnoO1^vPmWwh+F#&HxxQ1Oi?8#>D8y?eKpYH1
z;YX~Jei<>N2?Cy#7?F5&XB>Hm1~qd|JuqM9PHGA1x9fSeujioo1f}A|jHrt)Pb&@j
zK%8=tDI{~nvYUh>(OT<xBABA`M4NYnZatTQQKFge)73sA=o|^*M<wIHA5?I95CyHQ
zWsITvfPzWmx)&R?#0@uO)u+grc<%Y~e!&7C^+JU~{hO8?ty_r#GSg#78teMnchZ<$
z$}m#b^A;yg7R#wYo{aWnN9-PJ#kWJqdT^TrL=??voel0o$UQ7Z9|T@v^b+Q)#!$Zi
zRo%dAQf;<kAZdbcX!p96_ZCFhnCt1hNef>KNdRA~@o3tk{KlxG)OT#7voWgPahy9M
zDUKTL|AL^%%SLnt#zjw<9*;SrE4bX!b8`%kcf*$wR;x!ue0#w}Il^n!V(>??`=i;F
z814Btp#`kYudF2bWAi2`_T`Fw-~A!&8*JRh(FtqRP%5<saOC%&mX5tRYD+01U-}tQ
zQuNO8IGCIRlg@dL&Z?!rX`-)8@?(|GLuxe#ML$%WBvRioB}6gE;DqB;74IiR*n31)
z-mhI31c27sI7RnQq5kkk9;9*~{HBfT+pO^D*{Y!_kR5I5%`LY}_%;F(iwzg$0GBP!
zTE^3^`#c1-aA9A+RD62HVm$CXW%71x+d<^|!Q=}D)K47F>`PV?Y*<LSJT7lz)>zsu
zzET}~p1x%$!+yQ>Hr00n)JG>aAWSSk>EpX5$OjKP42MLdR9BIkwy<jvQgV1gzvH1}
zcOB-;xT5k-kE9<*`!o=KU&(6C{!U1Vlh+&h6S;U5v-CwPsmm80@R}(d$6>)``#3Q<
zW@5E-^I(Tk(R9tu9UH?p*Nx2#iw+_cI&;W+rk5V!)fp}U^5Bzs`1IUDs#dCLTXqdz
zi70FgjY2ZX!oq6_32BPX;e-R*pQz3r{0hlNcN1_!#FF#3pr#{A5A~+6&AnS8ALct`
z2m_dHg+A9Vz9uw+cD)$NY0#sr(>4q-k~o44L#^Ks$H@s?R6qMk7vHkzp!j*uJUxdO
z!gP8?^^zAkW3xMlpShE9K%+8C7AmYAA6v-BK%K2PtjBBP`OHHk^(BYtt1JPAfRt$F
zT;9Itz3Fd5_MIbW&O>J6hPl+Z@`b3S`>zfxtPJSom!-1H)nd)j<0yVcrsEmde9rjj
zYQS%KDz)WjNVJ?0Y-U4bHL@ld4jw`cP7N7yh@yUqE-0G1$GHM0@I!EUn)=t9x+gf@
zkye5X{^XKY*1EK0Ohs?ALsH?e7W!t-OnxbMZ*Rz2y1&?_Ji#>N9&#Z_)mzky$o6KU
zSb>irq4xYC^$j1)w@D#!@S`<1K?CkJ<BBUSMl)`}K$|p3FeM`s?;AxDP8M%pbnq@s
zeC&IE=Uw`cT2-M1i{wh{h+DQhyC@|6mcmIfc;+|J$@p}o4F^<hcANX&6$vx3T9<ne
z(JFKf8Lo|VtC2mP`Sa`NMQ32Ky8U3U*WbqOiO-)~${tPpaO*u|#@iUzjcUtB)s$mb
z^jjX?@_dTtn0V<$-%wIxHOUAeh}bbxLnNBSZK5WVNpEK!KFBg0j}&*+N#ZY73$0&x
zUp+j%`8}U0H-7W#elby-zLc4E9YUec9OSKxdwm#9xIzy-e!;d^9Nj^|NU50)p{X5x
zVua`B&{49Q_Ge81;n4FGd>OaV`{!4{(E3<F^)t7iA8=HS<cYn*P|Sp<=mbSfAQAf^
z1ikiro`k&P;^3`b6QzK_*IS>S7)I{iMep=t_^46ado2x@CkV%}tqAL_KfKK(h!
z_W89Lf3c|hMiTet;L}lD&PJ(X_uT4l?j%f?^Y2zH15QeqU-^^P`qLuVu!bYNBf;!>
z%x+%~{KT%i5_QEXu1(+5JtKCF$6?CZkb|_Ip6E2hQaA|0YbqPg-~n4eJj5_)5w8Pj
zJb{IA)<{wU`$|LL+s_qW7`%0b{<KS0GAqq>pA*TYYw-Am6iP1nGz4UTkCGc50xzq$
z?2TyV)9W<E*>bg=B?d-4%J}GY?7D_}r||OIrXJWfhB<vbckq~Ny#l**(cua4GPzdO
zgxWb0&R9?#(+`Z5r|~3D(S19*aH7&@(U4=`Q(@-r^olRF#LzSKg^1@LKUFp$G;Klo
z@P+cp{K>%=k+9=At9v6Nr1+wkV$6*N?8I-tKK56?adqPku?^PG{q+jO`Yova#QlA!
z{xaw{n|IvxqiKZIi7ppD-+%FSPB$&Sf_bJNkhoU7m^)p+==D85JQ8a0(Rp`f1n~FU
z;-|}}UQO)lj>?QVm}pR=Yiu9N;M-!{whH=9Z6n2HatPoVT#R3(kZz!ca(OGVcx3|J
z{$Iy*T?7HgLKcZ!4>{4wR_MX(J=rE<v`y@)`!@RS^@~iv(w<FfPQ*4}<80D1mU!0(
zd1uyhcyvr@2o<A$s94BL9F+3}2yk-WA6|Cs_r2(+%nx||`|Fp=<Zc9={PSGeZIxBq
z7h5AN{z~5lRaS$~H%g9Pt^vP9^k=orx)eK#%D3^c7~jNf;Y2v&86P9-yj*I}ar{kT
zglmK`Fss75{+;qk0@L`%W8InGc_XfeJ|RZw8nK{$hCI{{s<E7QZzZ?nV<Q62=U9aj
z{Pph0j8J<Qr#}<(twiKZEVzHeu4WTLw0sxX7jBm9W>jMx@~(b^UC=`)Li|BT&k@W|
zfp}U5e2yMb=&4Agg`-{Zw;Z%g#~-?OYRxkup`?Z!K2=p0s4bB5q(`P--|Hl|Rqqw?
z6Fi9J-2Ag+FbBWs|MF7LO>o1>)pqmfL;#DL7}v3FY$(H1=$`sc)9=7|9&%8_0qPZX
z;bZj~LU7q#ipZ)M4%t|nz!zi}C=X|+@?(%3{+`#69=AHlz)K_%i!_mD{`4vZWA>t#
zuw6>Y55lR&_0lMJ*m1^~xLO=68IelVikB-=|FltrNAvd-=dhvta_f%}%cUgO(!4o%
z8Ws#Lww89MB3|1s=Et1WA9WnToUNh`{8webS9p!%1+9zg1fE4Aw!EVG6TZ}xEBHF`
z(OBF*!#GwfAK=DFk4@+dVh|lDsl8JN-y@<=qr9Alm)?wxv+P0&8^ZXhX&*fKJ5wc_
zow`KAscE(LcGTYTZA|8GSD_|Jkul^+<S3z#mC}RG432o}Q;`a!iaJa2K3jW}Bou#x
z3PCD<r&-2~_)K&jDt;y&HZIc@>?({HPcUC*`Vl$rAC^q>>xrv0wOxopwMgC#wwa^)
zi-wQm5tp`(SA!Gk3-EdNlD09peYW3mgo-}QQ3Y#SA>T<b4>B&(m~UieKu9LYO~fVk
zTuy}M?QkINo8y)SjlpGmCyt9z%}!lmKMEFF5}3>-K?}!o8mMg6*(X13TG|~<2H-V2
z=9wf=7T$Y#4WA)1<ut4lSb~k}tC7wL1JGU!1{2tv&>pF{f$^jREQlPZ<cQKDo45u#
zKK=4`sW(5<5<G60T!0`X2-+B22h3Hnf_iOlj88P$PHIU0cp+SfZXAH4%2l5AX_Dqa
z>m;Q(=WY4Bhft{DJx+cNXM3FV;XfIE8_=bJAJ6tJDEmE=M1OwUXq4gl&ZmPybZ4WX
z`QL1C_XGi*X^!t5HRq@o!a?EpPuqlL>fdzuTaB@Nk*I}$xg)ImId7#(`R%|D7#RqI
z;Xa>3BHWncj$Yz9!b@eN5v$e~)|SG9Mx63FrxU!NY;>AVnUm6<_Y!n-JYi1$spi^S
z{1t2vZjHI*94OAS5&l^!sUCh!*usQJ;^)Ef)dvnd{R`Z#a#f#U3#Z?rM&ptC$WHpU
z6H7rj;VI9(^vpYtG2_0X`lXL-m&-dvxJ=9EM)j##NKzZ8#hyR=OvXUdl@g23n@deR
zu+wOGeWC?|inCB$=SlQcgL%p7DCtBvH?M41R-#zeuf8DXou<3Ke2+1~^kfw~DaAO|
ze0d$xn(BZZLo?Jx{3LM0*t?yz6Lsmmz<Rlt(G4LAb8~+z0tX-Xse(rd>X`c!6@(-Y
zB{qssX>p<*X>k2>H>WqG_iJ+WAv+4S{A6w2FF9#fCC;_u+EA2x#Yc(WVStg#bV
zo{xj+*?%d3P`??UZ^p^@;`SeVDNzOIBx_DQn?P+<gv;TMp$8Z5E)}8PM~fVLX)Kq}
zi=t!FNGUTjt)-HIFJdk0!LKH~b1S!cEiS;)!Llg_awS~oJ09O^OOhzTnY_*+bCHM*
zHT>=6&!J!5a8j1aoCN&pTZ$*Gt+flO@A4$MMEInOPJXnGACz&DS~PMw>HPK`<^1k=
zk<e)u_Prph(?Fb87pc1Pq3+zKF7cp?&jqSbCmpp_BZ1KJxU*|h{Z<pRjpJ-@MrTzf
z8E*tB@O&}+IexyF7L&8S$FQp*Q71=*qt6Re#p8s=*25G$2G0(YEILw2j+%@K2|h!c
z&r9=KRZH)n6sND-UPY0~cINyv(4*w|jElN|=()shDkrU`=yxc&)|noQeFovm<!dKD
z^M2c8jhKM78YS`yQ^bOW-zMf&-*t+NZd6{>zF@?T;8p=1lFN;kX$)i=ZZbOuYpS$V
z@F&~)N#7rHP+90ORo$D6uFtPqTZ7Nota@1Fc~lWQNQ$FbI#pY%pHqg9$#<@GCMILT
zeU<1vc_W8TB$PVfV0i3K1dTYFz2T!}WOxaRm~?!q*lAi>L^2eMd!V!`h;g(x=<t%!
zY9Y_3ybPZq?`lkjU(v5uI6_y^Pg)=p%?fFfhw6qDbBbs9ncDHET+0C`<SRI6ro0~;
z0ylRa4@BDKz^+a#qYEj4hF$S4Eqz0~Xk4P|<joo9vlp?rRnLEFilf|czBM~{T|3du
z7%uA%Miwv-z)xy$p8Sx(uQ=6YiGPy|!K1Mpig^bjgT5}~$*jWl1pXuGh3AC)6Q*K$
zbt2rm{S@~u^oO7vQwjQ0f1*n;$%FUCyY(6!B+QJ#Ak`^-iH+UjqG9oT*WHgrC@gp$
z$Vt@P^l>A0$bRp69TC_?B?7nv44binqNIKl9VhDW9AqJUAD7r%_}w-kg3c`cD-<Ek
zrS*F}lgM$EKG%{6rRdZdNGoTjS6{`AAy{^eBu<PB6J^YyGI_f9U3ch+t4IQgjrvgk
zdT}cFNuz9#T*G@4LiiWFO(uKHuL?Tgq!M>}eIAan$p?eYe=<`dQJVV^Xt_Oea>!6e
zb~(-*RXOrS_|2v%hUalBq$xJN>40G)zwB*7&Yk?ttIl_2h_^p^{<nh>2gk|P)1Pzk
zX{+&fE1!P2S1NXYmA+i6Kwa7Uk&;_drt6)Q2U=tUi@#zSD}){3WV0czdNASop=;3X
z^}d%4jkV?UET%G@3a$gQA^HY@qYdf7{Dch7SkN=b&~6)<y<%VXaGz@$d69yj!W&Z4
zPDH`jru9~ao}(>426={6!=Pht`Q-JuJm!#+vJu*K0WxdRP9;^o<2TBK!9FW%6d$7d
zHyZ>c&bdX8Q*qC!i6Gdjl|`>Z(l!dJmIzV4e=o&F66WbBiiU(CxX90%g#F0JoM_o8
zxLqN2Tf+NOAc*z*q_34tBR^X544#_Kl*UW4H4hZ9I`YODxZ6@~ndF2B`{o%z@^;gL
z&X)1Fr`$|cCWqfJ$>n<_g-onH#m@6c>fbD8aid2t&OZ192JTu1Tz|a$spoe{eP1kj
zz)w!zxBgTxp>C?<C*9+H^9+?koL}9$O^p=bCc8OY*_YZ-W>Su6?^X*f+*z0rC82Q3
zyn{{@jLC$;`8+y=%lkPc)8?489>dda8`C&0^cv*S07j)&cnHF!?HkutL6mHi5t&OO
z*7%@9y^Aaam*GL9B0(i1eIliS%efe8R#R6ZrQaD>(;mUCOlsJsQA{X@OA8<?cI@TQ
z=<ccwINR>F%G*(t`adf_yHC+H!9?HP6L2QhDXOCx`X!>?e2J%oCJH2b6G|XkF&~s8
zcbe2K;VpYV<m{kgyQt$3#J@iFn5Df_<YZZrWnRa*3L<w7r9}{+qeqx+&D+ou-ODi(
zZSA1~?)Yc)5`o48dn!`b<GPo~WMNL}(xPEMnXISSPeIc#Gra9K=rm=eS^YBOeJ#uo
z=(sh@8JDv@%LzZRW74-o{RZvmG8#>!<{W=T78h-IJ7n#WYGN$3;HbY0*J-9(v0395
z9f}bnJJnZ&yG5ytm@7Vw+8HYSX0E$iQ3czym=Wc+B`L(;Xat&9xn-`Y=YCAiB+6=@
z9C^4DU38<vD9V}y{CAL$mfO_gvytg^G-z-(96a@#DM}+*BjI{(4s;oS{Mnj$2(?VY
zEr-**hfjwXG_%BEPz{gHIdtu9YSui;-NInNMre^y$$I#1bb^$%6aQy^)}y#2Ots==
zcAX9jI&iUV2<_T08gvo%Zq^?5Zu7k?M$wnagb)dD1H!6|EpsAWRCF35h=gjCd4dkQ
zty3yxbxl&p2R--t7WDYq6i6}qd)Xio(j@0Mm#na|Fxmv2`Dh|D_xcSr#EvX<nc7m>
zEytM5=jn|y<aoKOT<rR&%euzNiqF$ew(b#S0%~8s5jKYuQ}7JRAgjCAKS`!^G)8q}
zK+MF}xhZzb)DoD%fBOZ^5Kcx_jGt4pxKmhF%x{IY)t)v7JD;F)`s}?W{6u;vnuysA
z)96up02;CoXLN{qjH19yQ8fKbk;oM~cUS>?Cn2QvI0==HQ&l9Bcu=NP!R?)$Hl?*8
zqf*aPP1p0PQ^KN5;xO8oBE0eD*Yf<Fl`s5OgSOUgkr^R>xqvt;VkU9i>rw@VEIVz0
ziF{f;#!)nzcm!Ii-~p^A@~N2>n~yWL4G-dMP5WLtBaI9xlUSTI*2(2-h20zc?Jn&`
zyG6E3`vqvT0J!+5bQ|@b*UNiz!+6XPJ3Pwo&B}<`#M;k=IU&W_#8Kum^mvYjh(+1N
zbe-A6&}ogBwY^dWSI-&uEmHNdL@ORnd|+|fcDqDWp~ttgm4C~gc|IZ;AsR9N>)Uuv
zn!n(rkpBq3;0nvuufJ9e6yPL4=i}_Jkp{Ei-?`fu=E=WtN%1TD1^TFO)kYq<7MG_H
z6Vzmf=PJZmbmwe{C@0Jbqmg}Qm#ENSmq_VoNC-FvI|L-@i2Sw3z5X$SIP3~NO0;TQ
z)2ILR*eJ|!Tx&z?nuTU%?7tn*0WJbQ1Fgd{FfRG}N4tx*zc-`CI~x+BWIkFBaMBIL
z;relV=-w3DWoo^%Bjfr8Da4q_&q`y_UZG%Go$u5=oFjGK1a7>JS~+Oe|IBYObgn}D
zI0D;{u0Ks_#BBXt#9G@CHU~2=>90UmQETFHNPumG6Qv6O$Yw<OAKnA<U}xz6hHx40
z|AZfcFL?*|KpJDou+6CsY|biPV?@nk#mQ2I-o<8Az((x=U?vLx+6jpGRP@&}bYPVK
z(ZrVX*b%+x-wbSkU=#DtsraYxli}Z!1e**X1Dj*m2>riZmmlkRoJH6;!%i;XlWZgf
z-6z*~UuZPOLLusE4-1DU_;HpWpyhKSm+Je&iW<zN+Wa}{n9w8foFh!4^Sjc}f?Z*H
z)PSY+yI)py%<3;$b33fB-c5e4QTyUbBq}9s3#vJIY`48g`*2RViyinB|HzIg=@S;3
z>_xooN`iOS(*KskZBBvYePK-GM=$Nw+F!~2YE7VyJ(ZM8MHQ1-)=T?y$#LLwYgqx3
z*P+~35hE|Utbo{aaJ-^m>@}^>UutIKY$DKU73_2Le#9H=40H5taS4}w%3HykJZ#`g
z-9vhrNfXBPS%o6XLwd-nH~5IYwtcVYWYonHz!_he#D=_DYmWK52Q<%sJy48&DIg5o
z$aCQXi{gV!7)RH+=&zh2F1a=;W4OqVdYN~+V!j+7RIecrmYFT)DFVA^SwVdJMVx@&
zD+XW?O*~7EOc>Xe6^7k?Ndy5Tj)}aUw6`{S4>7LC&!TmTXPnFfGj&LhSGsPbw`IU6
z_;J$0M%aYr$Hy4PoOb1ueiQlQCF~=U0X-5E0UODvk6zQRU6uT6@+s?zDqT;GfEyNJ
z_x8>YiANVSTrN!D;xehkb3!odO^cUt-{PM%)QH`g<I=z|+I$1LPY5qiPlJdcIa*<B
zF>jC{tyH`l^SFQZcji~A>jW#By*w2A-a@{(y0Bs<hXl7#elJU2r4UUx1a<4PVHYp0
z#dVu~P>WoO-@DvwG<S8-@I2pt9&IH~;o-3DItgyZwW6$L($8iO6h9qSoM;t4+QQsj
z%1t;9=x7Q$JD5-s$s|K^u~CFBnX04N>M>mTN9b~J{}4?}$L##6?WXmvPK1?DpVBY5
zam(C4jk1~F%-vIggmS{BKAqVC8$F%~1!*`sgfnQXfb^xCmVA{6YtbAkA9E3FJQb6Y
zFmn>a035#)=_v)np7W8=U}DM&PY#|Z1^==}u6kcTysg9O;|Oy9Sz)`3o?ZWPgzR!I
zagCJo73;~a3fJgSvN7FNnrqaWQ6Ey#Dt<u9_Y2^n(9J5Z7HtQ-*brB0l159~=?psW
zjlM>E>A0V(jWZR!8Y6@>z9OFnEdoWw6^0EfYS{B{qY4N_$*1vMU@sl8FdeWzaia<l
zYARV<fKBEE?8YTJJWqNhh617ykUi1K7&v1#`XGJF{FX^{AwUJY#SB2OL8r%4WSeW|
z(PfNk1dE(Lyg+r~dHMCMGFw)5nN+6rSeU|#CyW5TyY%5E{^}$vpupI8CVz88@Xs61
z(AwG`!<!t}gRA`k8i51k5J}(DxXYfb7p61P^mBrL_)FSKA3hSj*%$nS^6jU?jnbDh
zhZ`Iu05vHY{`Kp5Le)+(>QP)hXO?H~l@&s(phu^_#N{WGAiF_Ab3-15#ZJ?wU?VP~
z&YCoQP|SPWF^BghW$$&MOR5!XPK7D1hAc##oXL$+&8n)thKxX2B0fm11ky?bl)$t7
zl>1p+Qnsz#XXo|&xJ3kDq6jlKB}bC1i^T_F6mvw(E2wCW6+v3{fD&z>gjw}t^Qnrj
z;T5A~&D*5BG)bAss=R_-1x@Hu7R!3`78}^;gfWL$!hpu`Xs8VN^qoD!CSR>Lf#2DU
z$7J1)2vqEypKPI*iVL4fOtSA6ddL0Z(wlbk^a#xP%;42`)KbQG)S%hdI>$EMj5(jv
zamRMlz9c^$5_V>Cqp_U5UmN!uxp{Y;bZ*`KKZV%9{AP_(*4>Pf|5d?4vRv8RGLt)M
zeItG&?w|ZreEH1KS3akQ{-rE2<}*vm`<!0Fa>n#y#1G9^$PAJ<o(>T{V_N@@o$06C
zj)R{L9gdwV9~a8m`xEQ#n|QN7Ykg2Z$*|)U)a>gbqYWC0w#>Q{o$KXGBn+NR?kCJ=
zOrtiBT45^iK|5-ZuO8Qc9sW-Wto{ENQLv^AX#NWOM<*;qmp-0eVEZV{TJ&$9NG^|!
z!6<dOGPzYWAH9MZgDCm8ZNSMS*Z*2hx}ZA~?50hOz#6hP#@<oe9Pzs_8Qk}eD!%qb
zU+=;bI#bZ3kPvd^H{0CA{dgov{Qt)}A?)1NedYhD8aP!B_#g`USEAO3z)2Mc&LU{4
z>7(wk%^@%txe#FwmUZhxz`y0V$&xLL8Gh;4{8{30EFQwkMOD<=qTf0mZ%0h3R3^P7
zghWiLM7vp&Zu4HF?f&FP%8AYUf6DsqsHTE$U%>#OC!tFX5J5ukNRtqnbd@SdReF_<
zpoCtfN)ZCmL4+t$q=zD)fS@2q4Imw)OA+uLyx)EA-u3>-+GqAYYv#<H*=2rv=0q_6
z4OU&UwhTJ>>jsEL>BdW;`~|LWK=HQ|S|XG}<-0yl&dJ?6?muO+eOH`8mNx{T_QX<!
zKW-&DsvC^ORTV67Nt8qE$)pNdP>BVs29ci9k$^#Yh1$uhc*p-PDlUBBmHP0*N|*|%
zAy1ClXv`y+(VM>O0yN@r6nL2rp9=c~1!&q9j688R>1?hnQia*-kz7;d&_P)NkeP-N
zQv7*zG-fXV4xnw}VY!gx$W1Hk^=&Y_;LkLEPF93j->y;4bi<LR?3TUZPJNnMrxRa1
zCaomHvuPsW2^AT^)rlme;XQ@Q3uAcS*V~}`=8=vK(N5@QMV;^UtfRYY*xlv_oGee8
zzNj^&x~r>76g&-nckC0>UnW8L=jSB~fcRil{s+tKY9KEtgp(XUEFTU5@;R)ZGU)Tf
zUcDM(uAU&3-wL_8mGEz*ebq1Hr|B+TAb!e&uLe8tgLJhG?`$J3*LXXPv||qrzD7g^
zRZzLr437p(YU>vQi;7<*dEPbZEI}1`){yNIp7UXC7{1j<&}p?K3dr`pA}jx0n0Z}t
zRJ)7Ljp)V5HND`qe-GFCF9<o;y$nLMF>ObwC<Bq$)F2V)LOo9qt>>1Sh_0i#NXA9R
zq`K*^nYE+Mvdhr)@J`WmrQs=)8~F-J4B-viFGZEPV10P`5n8MD2n-+ri%5kxM!mBy
zM+~;9^@~eDZc695za=lDmsyv~=!Hy*d}Wp=02v*uKYTQM7rd?r^iT0${~{>rZXe77
z{qq2yQdEuL?pbYlU;N7qHML&G0}HnS2;sLMNHJI*gU$DX>~J8pKxCZ6_=dpSBTqEy
z77EgGE)(2JvZGqZ;^LqT$xu4jtg1O_*?V<P%t#0uvQ^>OXFa%R`AEWV9moK&YVWAe
zg<Lic;v87@R*V>gfbJqS$P%;evqsB@xJ5wf9{lS0yVb|ZDrdO~q?|s|%3J|fZb$yS
zNe5l>v>H+Kd1SE#F1`p%&6p9m$=HPZGz|*F>#J*mEJ+2R>4U>DF9wIfPjIq2=0hSx
z{GfIdIOM#QVx;-WO4(0>yfTSxKnRNa_>eq|5WK=rxO80-_|ap$>8{~LEPzT31)xvV
zDp11=B`~~6x&Xkag!rgcpm$1+Y!yz&uo0K}e1@dbP$CgKT343qyfYWnGJ6XjnEXR1
zHduZ>Ps~jRhHh|e1rE%?KV2Ler}ONIJY73UQMYh<NYL7Q^d(X5heOYJqyNJ~CF^OU
zpU$XqYnCA}zUF@1$}Dg>(;p0&bW5(LcSz8UW;E^}K_$P_1|gdP@;{jWTgF@-iV%gn
z%i9LLDXFj$hu-xr-lR({UH1*>=nuYHyK-kNU*%$=Piu_z<a^fSm&41{UnS+~{D%x4
zRTJM>Ya<iz9pBhhkp@jr`!qMScpZkXtcDb?Q>au5L#zIq6w*cWSthYrPSIoD>vEd{
z#40)k9LlcFb$Jc2PJ_i^`0ak65<VWtxnj1R)#2-Eaxa&d3rVeSS5})1xR-hyc#GY-
z(u|LVUA4w1fBWqH(Hk-!>pP;L7O{i2jQF!dsVp^kF}`THrUpI62hDBzj{v3rFfWOZ
zR{jL0NZ&QGAXW&f@Rk8{y&k>OZ4AztpirT^&mCYJPx{-R3+&|r#@0#xxDxjz=W91M
zdAOT{<20@`;=HYJKlc1z%XG~t+YH_zwwII5NJaF3r3NCoh`>0spoSAnz&X1xyu<^z
z<3}WDFd&xje}$V!zZH;%{|Y^3S}vAAq7HWqGX$Gk^I{GS;F`1ym;(cD)Bi~TCIXQ8
z1V60_1I&_`!v3faPm}rjZ;s7Ha`LrTob<1knLFz^l=9Bn()<;t`;RD2RA^a&(P+>W
zrJ@jkSgIf}4EMO2Ft<U-ax@M@fi^LSwI;~`8ykeJQV2k+3W!G-?g62pV`?~$WTbV5
z5;tka3$U?M*s6dKwCXDiFCYZ5EJ0w5%(+cVND5yA^YJz%+Qcc=`oC`rVJp9Ir+~Xt
zi?vMGzc$1DNJq)64rpqY1b5Eas4M<)$q2o962j+@0h~gNM432YWKJ*WQ>|A$3T}W}
z!>&VftBk<ntQ0DbRJkWyf%Q3ctaa@xh`lsDW*`cU`(g0^3E`xbF4ct9oY#=z4>0^c
zLZOm_gjRj{f8;+h<exaYic1x&eo?I3i(XHNkn|7G6<+~YmKnW$svdN?(eF{K+i0-w
zsqpnEnbT@G=9Nnf8W+V6a*9DEM`?mwF3Dx-KTLr13C~9Yh+1bQ<UNi8ZDq=UVKk1l
zKD-CMqaVq2m<~3+B$uWCF#oqq%;0=P0x)RkamBCMS>jc+Y_)otnu>ouN+j67ZWyQB
z0Mh63flpg}_~wx5QN7y0%cS*);b4i9L6a1=!v&ycQRV0z)<WWuIY<ULRP`R$DQh7N
z?-6qwWJVTiy-@(MXQ#(hg`;u42H?;RKzy~dcX#y@k8D)08cCtDumH4J0fzrn1SwXa
zQ2E3Itx_mt?|NKJeW`3g4ljp0k$K6<dk2Ye)#_Qx%ieCm;+KOo=5#qohfRPp3Q47i
znh(^AC9KFHF!?L=U~DmkO4>cRW9n^?{+&ny-z}gSq9E6kovNjjB7L&{k-0)wU=_za
zd*9VA{h4cf(8+E@L}{023XX_`e|$<6s{)|VCrRJb+e{oAb+P~)h%dsP`GHazIP^q^
z`*=wrtbqI#)D7i`ehC586vcDwD;2g{^P2tsP}{Sg){je}XC2wM4#<XhF`Tk=F&7=#
z=$)$$Fg$H8IcU&otm8t|RQ1w5?-{?m+i8@aJbcFP9#}sc7~Hxz&+_vqFL%X*XAUVj
zeV_w)b!4+WA;Xeq@>4bB{W}-XS`7MtuZ0(r4<LM@o!VUg+o%ACNyApZM6d^E=K1#H
zhni5ywbjr;v+<baDkPwAsAP-)NSW?B<UCt6mf+9{Dg+A9Go38-j)V;{o<bnFp}l$R
zQn6dC#?sY!>-l(_F$?np7oH4M2948YJ8YLmj$*R!Eeh;F0<5(i@-4)D293a9Eh4!F
zGr-^fk(dkA3-k`984NFCPY!aaMkOx`fSjt)IDoWwA|U4s)pia3iu7!j|I4%->k5Uf
zdN^x=+ADy2bcJFGGIhL|xltJSyXuHZm%QP>88LD98#SlvjcT_fY-%zG4bzW5Tdy)*
z6ajo6P-#V1K&7KTZ<5chHt&I>s{d<3om2Azbrk@0J%fRbIU>2148eCeVyyuZ>TsLu
zRQ_&n+j`}#%Nc=Pbqcq)B;tH+oCBr1mILi-2EJrQz6=Co$1e@%Sf$#1YVU4maLzJZ
z!W+`r|4g8=s<-7}L2hi2JxZ0;F^>g{?I(>v86Pf}C5B1>TYhzW9b<xOE_NcQfpF_7
zkFKa^=xr}tr525`R6ibo!A${loV|Y>9K@pwq$-QGXhJCx|GfgnZ#Tbpz9$N{a2)27
zR9N-fk*f@ITHDBQI{O#m<U@b-H!x1jmoQvfu(RG2?A%1!!Bzz&d5x&Q#fbNbu9C`}
zF84oQdbe1LS)n@uX~deuqRW}o)&TDqpthb7nKe451~x^@&2Y{29WDR4um$5;6@80}
z9nugi0f>8SPuiOSV0Z?|hp5MeGxGG{{cE&o+JY^;cOutdc&5_Ng~y#f_>pY@rZ|7#
z)2||oUEpHU_u6?Zm>TYJCzI{TXE~t#!nsUciLzp14qp8Ya;^ODU1>6mr&5g@fu}x~
zK*>H}T3&v8P6D{{{l^@bwl5nzA^GDPrx#zttXD<YHIu5zF-0yI!s<5@&t#Dj*<<*X
zempIaW|C3}iAH{#22GL^J;q}@6C5W~oM7{Uf~Kw2%6n()JT<&#I+M+ZGj4%^JVKBu
zvvAAt-z|_mw&BK)T;ARmZ^g}39~Se3fBieevNy-JBf`5MIP;^aN#2_o+mX`$+nhXK
z4+u6+;6-^)Jaqmpe*yH-V+VYC!8VqH%`h1DAB0kEF5I9AZC3>{8r*WnHnhN#1#8lT
zma2N={3vLK7R7+zI7;K?<gJbavYGNE^$?V5k<xV8_AXuA2adzCG-YY;YlrG>4W&;t
z9|2gKA=81vItHs@Iqa`0z<lbH%(i()lg94`FWDEme*8Y#d&egkjHQ9$g(K7P(q^8X
z+@{_K<h*hdCCO~ARS2>vdmzOU{*&Nfz<YVEvO)lM)ISGs(u3PH(yaih@&G`akx<tl
zAeI4t7rjGe6U4_`9HDqd4bNU*uY&=O`)x`Z49KI4eL&Izlc9Z@ceT0a9{4M};hk~z
zetZ*;oT)!hw`o8AHZXV9c*&Xp{Qh+eVf7;6r*+MJZ``<$+=Lq(*b#NGrcz{%57{62
zN|lp5Om)p_I37aIq=*P=T3Q=@o|uzAHC1s`nm%tSjFODH5YGHb=zR}Z%x|e`yXX|Q
z^DucleqY5Kmy*HOvP_Yr#0k>Kr%erC0eW}BC3l(@fGJXr<&!;z3jEhvz=G9yfU6O8
z;|mM<V8QN^>>(~mZ${y=Kl?6^<xgg_Cfy*H8mRb7Q&|D#Z_msTOUKr-piLv~kXocn
zxGp;(tCe)Y_L8vr<t=&AMN|%9)uWtU?$n;1Ekyiw(giob5Ge#CJK2O)+I-+5A)7$R
zx(#?<y??gj-1+XhCw?$J;sNP>1#PJos;KmFk#Km=!9!8B!tO&H)y&?)w%1b@!SlZ&
z;pf{2;>;7P@nr2eyL$|!1H#Ju&Xmq1F4Na9+R}JUtIl`&#@xsp$gs{g!gFuW7Iy`g
zdJlAcR!*!y`<(8R(~TBCOB2Z!{3t(kOeegN8Wv^NL;3)ekhoPtr(*r+gIPfc$H33|
z5ga>KF~U@hf$0`ghm727HMARfWe=l1S=d8mJMCkuxHzGC%CPerBK@Q(blntsMjYHJ
z%+Z+@<&9LNF3+}me5Fm(QsXOE@Wxjpv4;v-4rGT0iqG*3%qag)FT_`~Gcx=|KU(LE
z#yorLkN9nlV`jeP=mwm1magY5YWj|+AL!5Z71G&Y`&ukQp_AY<$;83<cD?l)w4B?N
zzD(db=Odf%r)fVbutQCQ^EFdyenrb04ew}jp3YS~7KUhZau7{Q(nt9`*@(U;5!SGj
zTU<S6$EWQ~DXdMZ%H5A&^Cvt*t8sF<U&$?`4bZh8TPkx_=%!taSDLuqW|!D><q-cd
z>o>6!{%>h~70L6{p1E)FbK^{Zu??q@X9r{J!2Uag->r3oA0}OUQv$j76X92EDfss4
zS`SQ~vC+cz^9k%_VcjkUB0!+Ja1#$Da@n^S*{TJ1u#D$+)rNxgNY1{9w^fd>;@wqd
z(gaBt$qYsXK8N{oF#6SWPd-y=WQeNuS(^7_jduuPW8f#xaoRg4j-~L@Vc&ipgGZP)
z2~~-^vGylS5*9Yvl5iJa85Zf9-dtSK<Dg<!TK(FQc&)2CZu_p}4zjR@x#N_74Q~Ey
zg6H#Bo56U}$6hdZ8%uIE20NQ>LtG*4SkJTV7I1(d1UEigIYr}<_j##3DrM;HOtTzM
z!7QhHg)|OwOUA<QZ^Dzwzd4>BsAVE+04s-DA0rp8&`M-(wPNhFq*xr>?jXj5TprLX
zqOpYL`PMRuu-^VB_Yh(5=hdV_*AmsLoVc%Y-rcjS^#IKJjuyLvm}#6_?RY|AqT%Xe
zmKNhI(Zz2(ZV3Z&ORfReBko^Cjne|j2M!KQJ9iSXlKg~O50M{ZLi1f%6<IvX-FsBb
znztMr22;GfiE8#UW2lgQznjPamw_phKML0+k<pifmGTGFwLftEIL6VyU|I9KvB;%q
zGWu*Z`P%YveEW)9oyh(3J5NqKPh6bFoRzr_ot0HSja_6j1nxO2e-$?V6Lw%*$4P1N
z=J$xAS6x2jSL>0inskryQV@;!b<^W`mp&7rGRcg<Ip}wStx=~<<a0d@CQ%q<QPM>Y
zUht@RoIJf|!7hY|TWZ=WLz{%hq&<m4d2)ed2Lc?IRWSrk1IZ$IL}d>Us=U|n2NRF3
zw&!BRdZ6$YMwmz91XGq&2_28LxF6kSlBs)oH%<6h3d@VDbep24N8gRN3#D4$)C}DW
zlj{&*^b}%#YvetpZeU4fcWhx^&e<@oU3gX5(Ax}bWhv!u9}ayaeIMl|hLn!hFxWNx
zB=-`@xF9G*tz4PyBQR)(m349=Qpm8^E3whD4-S0y7OD{FS)X9kQxana3I1*b*|F8B
zp4gGU1HLF`H1GmHjCZcBMVxMKrVNU)x;MS;>H8#ap=l>r*=Ru3c=)@D@mME$w~|uD
zB)oU)DxWL)i(%0O3B1^wpRGBr!YervN<lY;hPpPNRnw+Ydw4!qT9%M*HWL429<ajZ
zT!Y!an~6$z){bQsJkv>=w#NC?gUV~Q{elm?%B~Y--FuvbCm_3j1`;#ezdD+keXVi9
zBr^4(Sx1ieag&`{wV&>7>zD5;i5!`Q;~b2x=nvddO{)s;`SAi}utQbNN)-jW>PM+w
zHBM8Mlhah$VTE@V!!=><tS?lOWww8>{fKHbcYd2nt!SxJ&hC;Dn3{tNNlUGJ2F0wo
zR0_CHiT?boCDdW3UlBC6L_qM}D@qfN_I-!3F<hj)M(+0`j~a*kF(0MTV_f;hF>vLp
zL9bW_Vk%)p$yG?LYxhsCq2-2`I=zRUGg*qLutB9CN9n^GOYi;8_=~LRcCu|z1zV5n
z=mw{i+e7P^5dF=23^@DxE>3*{`Z=Y9k{)~wk-Lhlrhf2ETh>Lfno?y1DJwF1EX2#$
zQvhvIzn_&=;!G21U6e|F5a}MFj++r>VNxD^1?eW@2#Qg10Yo(5F}s}i7Vv;D8QgUf
z#ei#gHlj4ov=>Ow6tCwyIQ?c!%@Cv^gqxQ3S6w!hb|(IPr?4wZ#oXY}`}!Z4`-~#&
z>s9?_9Cf8UvL8k%hPKb8jz7zteR@5#Y2?3-e>1en$~iJE9m&DAK}6}CVsn^^^?mdu
zXKH8ty-XIFApBR_M%J53wWEDb>l@mGIxohpDe#+&JyH2u^%|_P)C)E-;<1C6cO)JO
z3sW@ot`b;g#n4LRfFm46J;f7=8CmG%zjs0xi?irDriPId8CrU^If9NqIt4#9io-l3
z{*+W!*zvHYPLFwH-m5=XS~!rORX5JQ`(d-G|EDa<pgU#~jAX4#i@-4u_nk7IMPw<T
z#<?SyjGbIN%cPKvN;XtfX@enVm~Fs#208T5)Mdu0hTtwP>eA#z<6n@$2C{qf(H=Dz
z+L=Wx8{U&^%s?0JwW)`qpT28yz>BgH1)0?GPakJGE4i@wm`1?f2tc?0UfI?f#|N9L
z+m2o%;JXHT`hTq!p4w$$47r;gi)TGNOIq8iFl*cXiNMspLx}i$*ONiEx`n(Z<6^V&
ztHTv<^=RfjhcdI+74de;dA@fuN);v6$WUS+8FJOqGJ%ppuBWpy+rT3OzmDDPq);L>
zPkwCN3NS!CGF`Gxp+k^963ptaGzQkz#LHf30#HVH7L(o!W->&$?6;eP;I8F*jb%ON
zkO+K2lRR8fe2n%g7Yn}fqb;A?Gc6L*K}R%&=x5vSF;vj}qqLjP*7k>T$6whS99m1-
z`G)=}2oS#lVZDWut<QmuxX!IG5MK~^n0(PN4HlQZ8Dy>!&qejF?As>~ve8PcaaZu0
zLUe4_I<gyY;NC*Dk93dg$Rp7i+PKNwjcNWuK5JjJ>^k?R@z~7_QQy=`XKCcce6bSo
zr7eE1BmR^7A5U=+2zSGqizak=)RZx`nXRZ)@0Qco2i&vQ#>beixh4pUkqo@ju(bVD
zFei)R^Bv%5$y2Zy2)NgYl~_>E-lEp(k8zN2sdh-9F-{b+<ewsVuDDVIFBY|)j`<}V
z%~EQ5R>5z=!#t@K%goO7TH~V%GlLA1ZX7D}OXj|D*sCGwjehX&sZNN!CHK86RLOEe
zZ+VB64xAsxPT+Co&S>9)`wzd?HYTsUHEO{u&c64W#8GP<yMOrQ{hU1Ztz4E=l@e_!
zXniIAQFnO82+b#A_G^#7GcI<RO4&M#VS1^TUo$9~45x<W3WfK)eXS~Hjh)o^IU~-S
zFL|FNzkxvJVH?hfUl`BZA*dWZSy{|>7sqNElH8n@&-BV>WH?y|%^86vEr(Sy5VyNs
zzSVWv-t2SXh-D76?I_c}u0SldcaJSnb{-lNMy7E5p5#@k1~)0zc0{*4M}zw&?Zlmd
z^!4BT-F@M0#$UG#ft$L@=zW9fZGTn}Sy<0-L^21o^y5}n0}CKLw9GBGhYAKUVSLt2
z;`*nzxYapA4V!kKAf(O=CO~3F=P_@eX3J8lE*qxRe$!`B$0(<2K|H;M`MdZp?bnTe
z#7+0JC`Ay-N-=Q>CHd|h_)hJI&yCGe8819+m`KL|7QU>3ZZ?}<)yw*ICDB>}%y2Yy
ze+Hup&$=4rCD9lMplg3`RH(~TWT0@1i>U69PjP^Z=T*b2Xmy^fqVKu&<9&!|wC6hU
z_eM7acejZHxP+&ejPZGBSa==fO9M&v+to-l%udfdN%%_OXM4#LK@YiCJhCf7h+NK_
z9y`E?>C|Rn6*oNkM-@H#JM(Tmo}v$$aFMXK>u0_f*Mg|e-g_|`Wm49PS75j{KlAKI
zrL)&xKfgf71{nhDFT-1%8sm7;-trSc;lv*ai)Pe1WRKnxsG=op-Xs2OQFg|nsjjwi
zGLsWYe_^)x{V*2qu+#RMUrd~*@l^Cn+#`_7!vWcZLh9og;sv6?EYD0GzcRNzh+vbJ
z$Ks4m=+mxH0ceZVs+-BZMYx4zJ(b&L3<z5~?i-<5+GwD+5u?#G@?$iidcn9QpvrC)
z7DDVGsmrYRaYH&!T6iAYY9VDu(WoebHD-83g`F5r2(Ulu;OG5rzgu(~0oBp(E)SSh
zS14tU8^251o=SQa6vX|O^;SPWbki!K9%?`+7<+9GN`5R}n3CqHrw(c97ZyX68wc+a
z6j?u?8hUvojJpnNG#>6H4B85a7r?+urZ3^df+y)veP6-}tJzal?ozfQVXx+?tKlxc
zxOTF2Ma1TrR5va9v!0NIyel*6Cw)%wa4@D~OF>dkoN>C%pz2Xo<49l0t4h(dX0c9O
z<qK<ip7#Y=u*Gb&r@!m0Qf<tG$M?6hv|^>h+;A(11sUq_$7bRSv;BiMmj+;fYwefc
zu_M{4yF-L>hp~^^N7crWa_Im{b-rTq&iM~rT8k~=S0=DB)f+GE(_<>QU&N4JjB3Hv
ze25a%A9|;TktIry)>-K6ZjrC*a(X?Edz+U?AlDy!NYc>wuq$ZrS*VQga3%4SA`wg4
zAB(G|7j)wtH?yK&?q(+7?7QvXln3P>1sFGVlk?E$*Y9$vQyJRUIExcK#x+s1Fn$yA
z64s9J6)IC@rD+8(QV;H=RgT7}-(-KCdRhr#Pk1aGHxee|E*KgDg|*+r`$vk35iTAX
z6{1^y)%9g9u`ZjhKx0y(#bI$8T%;UBnwlK30gBZxajC2|fxLzL2ZB+AOJ!aWad*3;
z02A9YU{u`&cXuqpf+UUiHM={y%&7W#pjT-fczK_rTd)CC-TPzi7Lp5om@ISAVSk+@
zq={|2)6r`=Db{+-eY{SzvUJz=dHWCi;qX-kK$m$gLlO)6PnzH$5{J2ndK5WnBD2mK
zwlkTHVx%>rek}%Kl?NZ~7$Ho=sg#K{<H$+!bv`IDi(z%NynMwGJ!xq-oLZ!}_Sn`L
zt<GCpj(cg9|L!gMQq}xDI~{y_60Q9AWGl15<6^Ju`J7_Q2~Ftv=dMisZO)6+-@P)x
z-=mx@&3}7&#HsW&aDS%PUt?3o<LQU?W5tOdPcM#7K2PPho$t;c#w&-MEp=s%6Zj^X
h+Wnon&VKDT>u*23*!!$sV|CX4;m`UbqBEi^{|CWZWPktw
diff --git a/man/dataRetrieval-package.Rd b/man/dataRetrieval-package.Rd
index 17b2b6e8..76f6c23e 100644
--- a/man/dataRetrieval-package.Rd
+++ b/man/dataRetrieval-package.Rd
@@ -5,8 +5,14 @@
\description{
\tabular{ll}{ Package: \tab dataRetrieval\cr Type: \tab
Package\cr Version: \tab 1.0.4\cr Date: \tab
- 2012-06-19\cr License: \tab GPL (>= 2)\cr LazyLoad: \tab
- yes\cr }
+ 2012-12-31\cr License: \tab This software is in the
+ public domain because it contains materials that
+ originally came from the United States Geological Survey,
+ an agency of the United States Department of Interior.
+ For more information, see the official USGS copyright
+ policy at
+ http://www.usgs.gov/visual-id/credit_usgs.html#copyright\cr
+ LazyLoad: \tab yes\cr }
}
\details{
Collection of functions to help retrieve USGS data from
diff --git a/man/getDVData.Rd b/man/getDVData.Rd
index a35048ca..1af0f45a 100644
--- a/man/getDVData.Rd
+++ b/man/getDVData.Rd
@@ -35,7 +35,7 @@
}
\examples{
# These examples require an internet connection to run
-getDVData('01594440','00060', '1985-01-01', '1985-03-31', interactive=FALSE)
+Daily <- getDVData('01594440','00060', '1985-01-01', '1985-03-31', interactive=FALSE)
}
\seealso{
\code{\link{retrieveNWISData}},
diff --git a/man/getMetaData.Rd b/man/getMetaData.Rd
index 6edd4a42..fb57f7d8 100644
--- a/man/getMetaData.Rd
+++ b/man/getMetaData.Rd
@@ -37,7 +37,7 @@
\examples{
# These examples require an internet connection to run
# Automatically gets information about site 05114000 and temperature, no interaction with user
-getMetaData('05114000','00010',interactive=FALSE)
+INFO <- getMetaData('05114000','00010',interactive=FALSE)
}
\keyword{USGS}
\keyword{WRTDS}
diff --git a/man/getParameterInfo.Rd b/man/getParameterInfo.Rd
index d3dccffd..fb9df676 100644
--- a/man/getParameterInfo.Rd
+++ b/man/getParameterInfo.Rd
@@ -25,8 +25,8 @@
}
\examples{
# These examples require an internet connection to run
-getParameterInfo('01075')
-getParameterInfo('00931',interactive=FALSE)
+paramINFO <- getParameterInfo('01075')
+paramINFO2 <- getParameterInfo('00931',interactive=FALSE)
}
\keyword{USGS}
\keyword{data}
diff --git a/man/getPreLoadedDailyData.Rd b/man/getPreLoadedDailyData.Rd
index b3906c03..8be9941c 100644
--- a/man/getPreLoadedDailyData.Rd
+++ b/man/getPreLoadedDailyData.Rd
@@ -26,7 +26,7 @@
data frame.
}
\examples{
-getPreLoadedDailyData(ChoptankRiverFlow, interactive=FALSE)
+Daily <- getPreLoadedDailyData(ChoptankRiverFlow, interactive=FALSE)
}
\keyword{WRTDS}
\keyword{data}
diff --git a/man/getPreLoadedData.Rd b/man/getPreLoadedData.Rd
index c9cb6072..8236b50a 100644
--- a/man/getPreLoadedData.Rd
+++ b/man/getPreLoadedData.Rd
@@ -20,7 +20,7 @@
contains any remark codes.
}
\examples{
-getPreLoadedData(ChoptankRiverFlow)
+rawData <- getPreLoadedData(ChoptankRiverFlow)
}
\keyword{data}
\keyword{import}
diff --git a/man/getQWData.Rd b/man/getQWData.Rd
index 1f6db6ec..395be7e9 100644
--- a/man/getQWData.Rd
+++ b/man/getQWData.Rd
@@ -41,9 +41,9 @@
}
\examples{
# These examples require an internet connection to run
-getQWData('01594440','01075', '1985-01-01', '1985-03-31')
-getQWData('05114000','', '1985-01-01', '1985-03-31')
-getQWData('05114000','00915;00931', '1985-01-01', '1985-04-30', interactive=FALSE)
+rawSample <- getQWData('01594440','01075', '1985-01-01', '1985-03-31')
+rawSampleAll <- getQWData('05114000','', '1985-01-01', '1985-03-31')
+rawSampleSelect <- getQWData('05114000','00915;00931', '1985-01-01', '1985-04-30', interactive=FALSE)
}
\keyword{USGS}
\keyword{data}
diff --git a/man/getQWDataFromFile.Rd b/man/getQWDataFromFile.Rd
index d5a84b99..c25fa7a4 100644
--- a/man/getQWDataFromFile.Rd
+++ b/man/getQWDataFromFile.Rd
@@ -31,9 +31,9 @@
\examples{
# Examples of how to use getQWDataFromFile:
# Change the file path and file name to something meaningful:
-#filePath <- '~/RData/' # Sample format
+filePath <- '~/RData/' # Sample format
fileName <- 'ChoptankRiverNitrate.csv'
-#getQWDataFromFile(filePath,fileName, separator=";")
+#rawSampleData <- getQWDataFromFile(filePath,fileName, separator=";")
}
\keyword{data}
\keyword{file}
diff --git a/man/getSampleData.Rd b/man/getSampleData.Rd
index d374952d..f8fc6db8 100644
--- a/man/getSampleData.Rd
+++ b/man/getSampleData.Rd
@@ -32,12 +32,15 @@
\url{http://nwis.waterdata.usgs.gov/nwis/pmcodes/} A list
of statistic codes can be found here:
\url{http://nwis.waterdata.usgs.gov/nwis/help/?read_file=stat&format=table}
+ For raw data, use getQWData. This function will retrieve
+ the raw data, and compress it (summing constituents). See
+ chapter 7 of the EGRET user guide for more details.
}
\examples{
# These examples require an internet connection to run
-getSampleData('01594440','01075', '1985-01-01', '1985-03-31', interactive=FALSE)
-getSampleData('05114000','00915;00931', '1985-01-01', '1985-03-31', interactive=FALSE)
-getSampleData('05114000','00915;00931', '', '', interactive=FALSE)
+Sample_01075 <- getSampleData('01594440','01075', '1985-01-01', '1985-03-31', interactive=FALSE)
+Sample_All <- getSampleData('05114000','00915;00931', '1985-01-01', '1985-03-31', interactive=FALSE)
+Sample_Select <- getSampleData('05114000','00915;00931', '', '', interactive=FALSE)
}
\seealso{
\code{\link{compressData}},
diff --git a/man/getSampleDataFromFile.Rd b/man/getSampleDataFromFile.Rd
index a7a70dc7..f295b54c 100644
--- a/man/getSampleDataFromFile.Rd
+++ b/man/getSampleDataFromFile.Rd
@@ -31,9 +31,9 @@
\examples{
# Examples of how to use getSampleDataFromFile:
# Change the file path and file name to something meaningful:
-#filePath <- '~/RData/' # Sample format
+filePath <- '~/RData/' # Sample format
fileName <- 'ChoptankRiverNitrate.csv'
-#getSampleDataFromFile(filePath,fileName, separator=";",interactive=FALSE)
+#Sample <- getSampleDataFromFile(filePath,fileName, separator=";",interactive=FALSE)
}
\keyword{USGS}
\keyword{WRTDS}
diff --git a/man/getSiteFileData.Rd b/man/getSiteFileData.Rd
index 6e7c520c..37a7d14a 100644
--- a/man/getSiteFileData.Rd
+++ b/man/getSiteFileData.Rd
@@ -22,7 +22,7 @@
}
\examples{
# These examples require an internet connection to run
-getSiteFileData('05114000',interactive=FALSE)
+siteINFO <- getSiteFileData('05114000',interactive=FALSE)
}
\keyword{USGS}
\keyword{data}
diff --git a/man/mergeReport.Rd b/man/mergeReport.Rd
index 4a1c5688..5efff9d3 100644
--- a/man/mergeReport.Rd
+++ b/man/mergeReport.Rd
@@ -25,9 +25,9 @@
}
\examples{
# These examples require an internet connection to run
-exDaily <- getDVData('01594440','00060', '1985-01-01', '1985-03-31', interactive=FALSE)
-exSample <- getSampleData('01594440','01075', '1985-01-01', '1985-03-31', interactive=FALSE)
-mergeReport(localDaily = exDaily, localSample = exSample, interactive=FALSE)
+Daily <- getDVData('01594440','00060', '1985-01-01', '1985-03-31', interactive=FALSE)
+Sample <- getSampleData('01594440','01075', '1985-01-01', '1985-03-31', interactive=FALSE)
+Sample <- mergeReport(interactive=FALSE)
}
\seealso{
\code{\link{getDVData}},
diff --git a/man/populateConcentrations.Rd b/man/populateConcentrations.Rd
index 13b7e4d7..14b30908 100644
--- a/man/populateConcentrations.Rd
+++ b/man/populateConcentrations.Rd
@@ -19,6 +19,6 @@
code <- c("","<","")
value <- c(1,2,3)
dataInput <- data.frame(value, code, stringsAsFactors=FALSE)
-populateConcentrations(dataInput)
+concentrationDF <- populateConcentrations(dataInput)
}
diff --git a/man/populateDaily.Rd b/man/populateDaily.Rd
index b3adf526..5722f563 100644
--- a/man/populateDaily.Rd
+++ b/man/populateDaily.Rd
@@ -28,7 +28,7 @@ dateTime <- c('1985-01-01', '1985-01-02', '1985-01-03')
value <- c(1,2,3)
code <- c("","","")
dataInput <- data.frame(dateTime, value, code, stringsAsFactors=FALSE)
-populateDaily(dataInput, 2, interactive=FALSE)
+Daily <- populateDaily(dataInput, 2, interactive=FALSE)
}
\author{
Robert M. Hirsch \email{rhirsch@usgs.gov}
diff --git a/man/populateDateColumns.Rd b/man/populateDateColumns.Rd
index 1de8264d..7473c89d 100644
--- a/man/populateDateColumns.Rd
+++ b/man/populateDateColumns.Rd
@@ -15,6 +15,6 @@
}
\examples{
dateTime <- c('1985-01-01', '1985-01-02', '1985-01-03')
-populateDateColumns(dateTime)
+expandedDateDF <- populateDateColumns(dateTime)
}
diff --git a/man/populateParameterINFO.Rd b/man/populateParameterINFO.Rd
index 56126c57..452eefbe 100644
--- a/man/populateParameterINFO.Rd
+++ b/man/populateParameterINFO.Rd
@@ -2,11 +2,12 @@
\alias{populateParameterINFO}
\title{Populate Parameter Information Columns}
\usage{
- populateParameterINFO(INFO, parameterCd,
+ populateParameterINFO(parameterCd, localINFO = INFO,
interactive = TRUE)
}
\arguments{
- \item{INFO}{dataframe with value and code columns}
+ \item{localINFO}{dataframe with value and code columns.
+ Default is INFO}
\item{parameterCd}{string USGS parameter code}
@@ -15,7 +16,7 @@
data checks.}
}
\value{
- INFO dataframe
+ localINFO dataframe
}
\description{
Populates INFO data frame with additional user-supplied
@@ -23,13 +24,13 @@
}
\examples{
#This example requires an internet connection to run
-exINFO <- getSiteFileData('01594440')
+INFO <- getSiteFileData('01594440')
parameterCd <- "00175"
parameterData <- getParameterInfo(parameterCd,interactive=interactive)
-exINFO$param.nm <- parameterData$parameter_nm
-exINFO$param.units <- parameterData$parameter_units
-exINFO$paramShortName <- parameterData$srsname
-exINFO$paramNumber <- parameterData$parameter_cd
-populateParameterINFO(exINFO, parameterCd,interactive=FALSE)
+INFO$param.nm <- parameterData$parameter_nm
+INFO$param.units <- parameterData$parameter_units
+INFO$paramShortName <- parameterData$srsname
+INFO$paramNumber <- parameterData$parameter_cd
+INFO <- populateParameterINFO(parameterCd,interactive=FALSE)
}
diff --git a/man/populateSampleColumns.Rd b/man/populateSampleColumns.Rd
index a9be6136..e7a10161 100644
--- a/man/populateSampleColumns.Rd
+++ b/man/populateSampleColumns.Rd
@@ -21,6 +21,6 @@ ConcLow <- c(1,2,0)
ConcHigh <- c(1,2,3)
Uncen <- c(1,1,0)
dataInput <- data.frame(dateTime, ConcLow, ConcHigh, Uncen, stringsAsFactors=FALSE)
-populateSampleColumns(dataInput)
+Sample <- populateSampleColumns(dataInput)
}
diff --git a/man/populateSiteINFO.Rd b/man/populateSiteINFO.Rd
index 8d96f7e7..7603aa96 100644
--- a/man/populateSiteINFO.Rd
+++ b/man/populateSiteINFO.Rd
@@ -23,8 +23,8 @@
}
\examples{
#This example requires an internet connection to run
-exINFO <- getSiteFileData('01594440')
+INFO <- getSiteFileData('01594440')
siteNumber <- "01594440"
-populateSiteINFO(exINFO, siteNumber,interactive=FALSE)
+siteINFO <- populateSiteINFO(INFO, siteNumber,interactive=FALSE)
}
diff --git a/man/retrieveNWISData.Rd b/man/retrieveNWISData.Rd
index 5bb61a10..ae1547e6 100644
--- a/man/retrieveNWISData.Rd
+++ b/man/retrieveNWISData.Rd
@@ -39,8 +39,8 @@
}
\examples{
# These examples require an internet connection to run
-retrieveNWISData('01594440','00060', '1985-01-01', '1985-01-31')
-retrieveNWISData('05114000','00010', '1985-01-01', '1985-01-31', StatCd='00001',interactive=FALSE)
+rawDailyFlowData <- retrieveNWISData('01594440','00060', '1985-01-01', '1985-01-31')
+rawDailyTemperatureData <- retrieveNWISData('05114000','00010', '1985-01-01', '1985-01-31', StatCd='00001',interactive=FALSE)
}
\keyword{USGS}
\keyword{data}
diff --git a/man/retrieveUnitNWISData.Rd b/man/retrieveUnitNWISData.Rd
index a555593f..79001197 100644
--- a/man/retrieveUnitNWISData.Rd
+++ b/man/retrieveUnitNWISData.Rd
@@ -26,8 +26,8 @@
data checks.}
}
\value{
- retval dataframe with agency, site, dateTime, value, and
- code columns
+ retval dataframe with agency, site, dateTime, time zone,
+ value, and code columns
}
\description{
Imports data from NWIS web service. This function gets
@@ -43,7 +43,7 @@ ParameterCd <- '00060'
StartDate <- '2012-05-01'
EndDate <- '2012-05-02'
# These examples require an internet connection to run
-retrieveUnitNWISData(siteNumber,ParameterCd,StartDate,EndDate,interactive=FALSE)
+rawData <- retrieveUnitNWISData(siteNumber,ParameterCd,StartDate,EndDate,interactive=FALSE)
}
\keyword{USGS}
\keyword{data}
--
GitLab