From 63a17dc3789e97fa12908206ea1d96e068fbdbb7 Mon Sep 17 00:00:00 2001
From: Reinhold Kainhofer <reinhold@kainhofer.com>
Date: Fri, 27 Oct 2023 10:02:30 +0200
Subject: [PATCH] V2.0.5: Update README, use Rmd

---
 .Rbuildignore                     |   1 +
 DESCRIPTION                       |   6 +-
 NEWS.md                           |   1 +
 README.Rmd                        | 145 ++++++++++++++++++
 README.md                         | 247 ++++++++++++++++++++----------
 man/MortalityTables-package.Rd    |   4 +-
 man/figures/README-Plotting-1.png | Bin 0 -> 13296 bytes
 man/figures/README-Plotting-2.png | Bin 0 -> 12672 bytes
 man/figures/README-Plotting-3.png | Bin 0 -> 11647 bytes
 9 files changed, 321 insertions(+), 83 deletions(-)
 create mode 100644 README.Rmd
 create mode 100644 man/figures/README-Plotting-1.png
 create mode 100644 man/figures/README-Plotting-2.png
 create mode 100644 man/figures/README-Plotting-3.png

diff --git a/.Rbuildignore b/.Rbuildignore
index 68081ee..6e9b8ed 100644
--- a/.Rbuildignore
+++ b/.Rbuildignore
@@ -12,3 +12,4 @@ PossibleTables.txt
 ^inst/extdata/Austria_Population_Observation.csv$
 ^revdep$
 ^cran-comments\.md$
+^README\.Rmd$
diff --git a/DESCRIPTION b/DESCRIPTION
index bf8af93..b0a59db 100644
--- a/DESCRIPTION
+++ b/DESCRIPTION
@@ -3,8 +3,8 @@ Type: Package
 Version: 2.0.5
 Date: 2023-10-27
 Title: A Framework for Various Types of Mortality / Life Tables
-Authors@R: c(person("Reinhold", "Kainhofer", role=c("aut", "cre"), email="reinhold@kainhofer.com"))
-Author: Reinhold Kainhofer [aut, cre]
+Authors@R: c(person("Reinhold", "Kainhofer", role=c("aut", "cre", "cph"), email="reinhold@kainhofer.com"))
+Author: Reinhold Kainhofer [aut, cre, cph]
 Maintainer: Reinhold Kainhofer <reinhold@kainhofer.com>
 URL: https://gitlab.open-tools.net/R/r-mortality-tables
 BugReports: https://gitlab.open-tools.net/R/r-mortality-tables/-/issues
@@ -25,7 +25,7 @@ Suggests:
     tidyverse,
     reshape2,
     rmarkdown
-Description: Classes to implement and plot cohort life tables
+Description: Classes to implement, analyze and plot cohort life tables
     for actuarial calculations. Birth-year dependent cohort mortality
     tables using a yearly trend to extrapolate from a base year are implemented,
     as well as period life table, cohort life tables using an age shift, and
diff --git a/NEWS.md b/NEWS.md
index 5ef791b..796ffef 100644
--- a/NEWS.md
+++ b/NEWS.md
@@ -1,6 +1,7 @@
 
 # MortalityTables 2.0.5 (27.10.2023):
   * Fix incorrect ages in Austrian population mortality
+  * Update README with examples
 
 # MortalityTables 2.0.4 (19.10.2023):
   * Add new Austrian population mortality tables (2020/22)
diff --git a/README.Rmd b/README.Rmd
new file mode 100644
index 0000000..88b092a
--- /dev/null
+++ b/README.Rmd
@@ -0,0 +1,145 @@
+---
+output: github_document
+---
+
+<!-- README.md is generated from README.Rmd. Please edit that file -->
+
+```{r, include = FALSE}
+knitr::opts_chunk$set(
+  collapse = TRUE,
+  comment = "#>",
+  fig.path = "man/figures/README-",
+  out.width = "100%"
+)
+library(tidyverse)
+library(reshape2)
+library(pracma)
+```
+
+# MortalityTables
+
+<!-- badges: start -->
+<!-- badges: end -->
+
+The goal of MortalityTables is to provide generic base classes and functions to
+handle all kinds of actuarial actuarial mortality tables (period and cohort life tables).
+Cohort and static life tables are implemented, observed data can be used, and
+existing life tables can be blended or extrapolated to derive new tables.
+
+Furthermore, plotting functions are provided for reports and publications.
+
+## Installation
+
+You can install the development version of MortalityTables from [GitHub](https://github.com/) with:
+
+``` r
+# install.packages("devtools")
+devtools::install_github("kainhofer/MortalityTables")
+```
+
+## About the package
+
+The MortalityTables package provides the `mortalityTable` base class and
+some derived classes to handle different types of mortality tables (also 
+called life tables), mainly
+used for life insurance. Additionally it provides a plot function to compare
+multiple life tables either directly using the absolute mortalities in
+log-linear plots or using relative mortalities as percentages of a given
+reference table.
+
+### Types of Life Tables
+
+Provided types of mortality tables are:
+    
+* Base class
+: Class `mortalityTable`
+* Period life table
+: Class `mortalityTable.period(ages, deathProbs, ..., baseYear=2000)`
+: Death probabilities observed / predicted for one observation year;
+No dependency on the bith year is assumed.
+* Cohort life table using age-specific trends
+: Class `mortalityTable.trendProjection`
+: Death probabilities of a given base year are projected into the future
+using age-specific trends $\lambda_x$. The death probability of an $x$-year old in year
+`baseYear + n` is calculated as:
+    $$q_x^{(baseYear+n)} = q_x^{(baseYear)} \cdot e^{-n\cdot\lambda_x}$$
+    : Consequently, the death probabilities for a person born in year `YOB` can be calculated as
+$$q_x^{YOB} = q_x^{(base)} \cdot e^{-(YOB+x-baseYear)\cdot \lambda_x}$$
+    * Cohort life table approximation using age shift
+: Class `mortalityTable.ageShift`
+: Death probabilities for cohort $YOB$ are obtained by using death probabilities
+for cohort $X$ and modifying the technical age with a birth-year dependent shift:
+    $$q_x^{YOB} = q_{x+shift(YOB)}^{(base)}$$
+    <!-- * Observed life table -->
+    <!--     : Class `mortalityTable.observed` -->
+    <!--     : Death probabilities observed during several years. The probabilities are -->
+    <!--       stored as a matrix with observation year and age as dimensions. -->
+    * Mixed life table
+: Class `mortalityTable.mixed`
+: Arithmetic mean of two life tables with given weights. This approach is
+often used to generate unisex life tables by mixing male and female
+mortalities with given weights (e.g. 70:30 or 40:60)
+* Cohort life table using age-specific improvement factors
+: Class `mortalityTable.improvementFactors`
+: Project base life table using age-specific improvement factors.
+* Pension table
+: Class `pensionTable`
+: Four states: active, early retirement / invalidity, old-age pension, death (with optional widow)
+: All slots describe the corresponding transition probabilities by a 
+: `mortalityTable`-derived object.
+
+## Loading the MortalityTables package
+```{R loading}
+library("MortalityTables")
+```
+
+## Provided Data Sets
+
+The package provides several real-life life tables published by census bureaus 
+and actuarial associations around the world. You can use the function 
+`mortalityTables.list` to list all available datasets (if no argument is given)
+or all datasets that match the given pattern (wildcard character is *). You can 
+then use `mortalityTables.load` to load either one single data set or all 
+datasets that match the pattern.
+
+```{r ListLoadTables}
+# list all datasets for Austria
+mortalityTables.list("Austria_*")
+
+# Load the German annuity table DAV 2004-R
+mortalityTables.load("Germany_Annuities_DAV2004R")
+
+# Load all Austrian data sets
+mortalityTables.load("Austria_*")
+```
+
+## Cohort and Period Mortality Data
+
+Cohort mortality vectors (for a given birth year) or period death probabilities (for a given observation year) can be extracted with the functions `periodDeathProbabilities()` and `deathProbabilities()`:
+    
+```{r deathProbabilities}
+mortalityTables.load("Austria_Annuities")
+deathProbabilities(AVOe2005R.male, YOB = 1977, ages = 35:50)
+deathProbabilities(AVOe2005R.male, YOB = 2023, ages = 35:50)
+
+periodDeathProbabilities(AVOe2005R.male, Period = 2023, ages = 35:50)
+```
+
+If the mortality table is a cohort table, the trend is used to calculate the death probabilities for the given cohort or calendar year. If the table is a static life table, the period and cohort life tables will be identical. If the table is an observed table (i.e. observed death probabilities for each age and year), the data is extracted from the matrix' rows/columns or diagonals. In all cases, the user does not have use different methods for different underlying tables. 
+
+## Plotting and Comparing Mortality Data
+
+There are two plotting functions using ggplot: `plotMortalityTables()` and `plotMortalityTableComparisons()` to plot the absolute and relative mortalities. For absolute mortalities, the `q(x)` axis employs a log10-scale. The returned plot is a normal ggplot2 object, so all features provided by ggplot2 can be adde to the plots.
+
+```{r Plotting, fig.width=8.5, fig.height=5}
+mortalityTables.load("Austria_Annuities")
+plotMortalityTables(AVOe2005R.male, AVOe2005R.male.unloaded, AVOe1996R.male, EROM.G1950.male, 
+                    YOB = 1977, ages = 0:99, legend.position = c(0.5, 0.65))
+plotMortalityTableComparisons(AVOe2005R.male, AVOe2005R.male.unloaded, AVOe1996R.male, EROM.G1950.male, 
+                              YOB = 1977, ages = 0:99, legend.position = c(0.5, 0.65))
+plotMortalityTrend(AVOe2005R.male, AVOe2005R.male.unloaded, AVOe1996R.male, AVOe1996R.male, EROM.G1950.male)
+```
+
+## Further information
+For further information on how to use the package, see the ["Using the MortalityTables Package"](https://cran.r-project.org/package=MortalityTables/vignettes/using-the-mortalityTables-package.html) vignette.
+
diff --git a/README.md b/README.md
index 4441faa..f16573e 100644
--- a/README.md
+++ b/README.md
@@ -1,109 +1,200 @@
+
+<!-- README.md is generated from README.Rmd. Please edit that file -->
+
 # MortalityTables
-## Author: Reinhold Kainhofer, reinhold@kainhofer.com
 
-R package implementing actuarial mortality tables (period and cohort life tables) 
+<!-- badges: start -->
+<!-- badges: end -->
+
+The goal of MortalityTables is to provide generic base classes and
+functions to handle all kinds of actuarial actuarial mortality tables
+(period and cohort life tables). Cohort and static life tables are
+implemented, observed data can be used, and existing life tables can be
+blended or extrapolated to derive new tables.
+
+Furthermore, plotting functions are provided for reports and
+publications.
+
+## Installation
+
+You can install the development version of MortalityTables from
+[GitHub](https://github.com/) with:
+
+``` r
+# install.packages("devtools")
+devtools::install_github("kainhofer/MortalityTables")
+```
 
 ## About the package
 
 The MortalityTables package provides the `mortalityTable` base class and
-some derived classes to handle different types of mortality tables (also 
-called life tables), mainly
-used for life insurance. Additionally it provides a plot function to compare
-multiple life tables either directly using the absolute mortalities in
-log-linear plots or using relative mortalities as percentages of a given
-reference table.
+some derived classes to handle different types of mortality tables (also
+called life tables), mainly used for life insurance. Additionally it
+provides a plot function to compare multiple life tables either directly
+using the absolute mortalities in log-linear plots or using relative
+mortalities as percentages of a given reference table.
 
 ### Types of Life Tables
 
 Provided types of mortality tables are:
 
-* Base class
-    : Class `mortalityTable`
-* Period life table
-    : Class `mortalityTable.period(ages, deathProbs, ..., baseYear=2000)`
-    : Death probabilities observed / predicted for one observation year;
-      No dependency on the bith year is assumed.
-* Cohort life table using age-specific trends
-    : Class `mortalityTable.trendProjection`
-    : Death probabilities of a given base year are projected into the future
-      using age-specific trends $\lambda_x$. The death probability of an $x$-year old in year
-      `baseYear + n` is calculated as:
-          $$q_x^{(baseYear+n)} = q_x^{(baseYear)} \cdot e^{-n\cdot\lambda_x}$$
-    : Consequently, the death probabilities for a person born in year `YOB` can be calculated as
-        $$q_x^{YOB} = q_x^{(base)} \cdot e^{-(YOB+x-baseYear)\cdot \lambda_x}$$
-* Cohort life table approximation using age shift
-    : Class `mortalityTable.ageShift`
-    : Death probabilities for cohort $YOB$ are obtained by using death probabilities
-      for cohort $X$ and modifying the technical age with a birth-year dependent shift:
-          $$q_x^{YOB} = q_{x+shift(YOB)}^{(base)}$$
-<!-- * Observed life table -->
-<!--     : Class `mortalityTable.observed` -->
-<!--     : Death probabilities observed during several years. The probabilities are -->
-<!--       stored as a matrix with observation year and age as dimensions. -->
-* Mixed life table
-    : Class `mortalityTable.mixed`
-    : Arithmetic mean of two life tables with given weights. This approach is
-      often used to generate unisex life tables by mixing male and female
-      mortalities with given weights (e.g. 70:30 or 40:60)
-* Cohort life table using age-specific improvement factors
-    : Class `mortalityTable.improvementFactors`
-    : Project base life table using age-specific improvement factors.
-* Pension table
-    : Class `pensionTable`
-    : Four states: active, early retirement / invalidity, old-age pension, death (with optional widow)
-    : All slots describe the corresponding transition probabilities by a 
-    : `mortalityTable`-derived object.
+-   Base class  
+    Class `mortalityTable`
+
+-   Period life table  
+    Class `mortalityTable.period(ages, deathProbs, ..., baseYear=2000)`
+
+    Death probabilities observed / predicted for one observation year;
+    No dependency on the bith year is assumed.
+
+-   Cohort life table using age-specific trends  
+    Class `mortalityTable.trendProjection`
+
+    Death probabilities of a given base year are projected into the
+    future using age-specific trends $\lambda_x$. The death probability
+    of an $x$-year old in year `baseYear + n` is calculated as:
+    $$q_x^{(baseYear+n)} = q_x^{(baseYear)} \cdot e^{-n\cdot\lambda_x}$$
+
+    Consequently, the death probabilities for a person born in year
+    `YOB` can be calculated as
+    $$q_x^{YOB} = q_x^{(base)} \cdot e^{-(YOB+x-baseYear)\cdot \lambda_x}$$
+
+    -   Cohort life table approximation using age shift
+
+    Class `mortalityTable.ageShift`
+
+    Death probabilities for cohort $YOB$ are obtained by using death
+    probabilities for cohort $X$ and modifying the technical age with a
+    birth-year dependent shift:
+    $$q_x^{YOB} = q_{x+shift(YOB)}^{(base)}$$
+    <!-- * Observed life table -->
+    <!--     : Class `mortalityTable.observed` -->
+    <!--     : Death probabilities observed during several years. The probabilities are -->
+    <!--       stored as a matrix with observation year and age as dimensions. -->
+
+    -   Mixed life table
+
+    Class `mortalityTable.mixed`
+
+    Arithmetic mean of two life tables with given weights. This approach
+    is often used to generate unisex life tables by mixing male and
+    female mortalities with given weights (e.g. 70:30 or 40:60)
+
+-   Cohort life table using age-specific improvement factors  
+    Class `mortalityTable.improvementFactors`
+
+    Project base life table using age-specific improvement factors.
+
+-   Pension table  
+    Class `pensionTable`
+
+    Four states: active, early retirement / invalidity, old-age pension,
+    death (with optional widow)
+
+    All slots describe the corresponding transition probabilities by a
+
+    `mortalityTable`-derived object.
 
 ## Loading the MortalityTables package
-```
+
+``` r
 library("MortalityTables")
 ```
 
 ## Provided Data Sets
 
-The package provides several real-life life tables published by census bureaus 
-and actuarial associations around the world. You can use the function 
-`mortalityTables.list` to list all available datasets (if no argument is given)
-or all datasets that match the given pattern (wildcard character is *). You can 
-then use `mortalityTables.load` to load either one single data set or all 
-datasets that match the pattern.
-
-```
-# list all available data sets
-mortalityTables.list()
+The package provides several real-life life tables published by census
+bureaus and actuarial associations around the world. You can use the
+function `mortalityTables.list` to list all available datasets (if no
+argument is given) or all datasets that match the given pattern
+(wildcard character is \*). You can then use `mortalityTables.load` to
+load either one single data set or all datasets that match the pattern.
 
+``` r
 # list all datasets for Austria
 mortalityTables.list("Austria_*")
+#>  [1] "Austria_Annuities"                  "Austria_Annuities_AVOe1996R"       
+#>  [3] "Austria_Annuities_AVOe2005R"        "Austria_Annuities_EROMF"           
+#>  [5] "Austria_Annuities_RR67"             "Austria_Census"                    
+#>  [7] "Austria_Endowments_ADSt2426_2Lives" "Austria_PopulationForecast"        
+#>  [9] "Austria_PopulationMCMC"             "Austria_PopulationObserved"        
+#> [11] "Austria_VUGesamtbestand_2012-16"
 
 # Load the German annuity table DAV 2004-R
 mortalityTables.load("Germany_Annuities_DAV2004R")
 
 # Load all Austrian data sets
 mortalityTables.load("Austria_*")
+#> Lade nötiges Paket: MortalityLaws
+#> Warning: Paket 'MortalityLaws' wurde unter R Version 4.2.3 erstellt
+```
+
+## Cohort and Period Mortality Data
+
+Cohort mortality vectors (for a given birth year) or period death
+probabilities (for a given observation year) can be extracted with the
+functions `periodDeathProbabilities()` and `deathProbabilities()`:
+
+``` r
+mortalityTables.load("Austria_Annuities")
+deathProbabilities(AVOe2005R.male, YOB = 1977, ages = 35:50)
+#>  [1] 0.0006467352 0.0006741228 0.0007202125 0.0007820113 0.0008524437
+#>  [6] 0.0009260103 0.0009794564 0.0010272832 0.0010731228 0.0011227093
+#> [11] 0.0011784509 0.0012409740 0.0013080864 0.0013817843 0.0014633494
+#> [16] 0.0015513107
+deathProbabilities(AVOe2005R.male, YOB = 2023, ages = 35:50)
+#>  [1] 0.0001941029 0.0002041420 0.0002200821 0.0002411616 0.0002653197
+#>  [6] 0.0002909132 0.0003106056 0.0003288675 0.0003468281 0.0003663459
+#> [11] 0.0003882554 0.0004128296 0.0004394048 0.0004687102 0.0005012581
+#> [16] 0.0005366270
+
+periodDeathProbabilities(AVOe2005R.male, Period = 2023, ages = 35:50)
+#>  [1] 0.0004718782 0.0005066172 0.0005573996 0.0006231746 0.0006993210
+#>  [6] 0.0007819197 0.0008511112 0.0009184673 0.0009869854 0.0010620137
+#> [11] 0.0011462722 0.0012409740 0.0013445246 0.0014595263 0.0015880515
+#> [16] 0.0017292761
+```
+
+If the mortality table is a cohort table, the trend is used to calculate
+the death probabilities for the given cohort or calendar year. If the
+table is a static life table, the period and cohort life tables will be
+identical. If the table is an observed table (i.e. observed death
+probabilities for each age and year), the data is extracted from the
+matrix’ rows/columns or diagonals. In all cases, the user does not have
+use different methods for different underlying tables.
+
+## Plotting and Comparing Mortality Data
+
+There are two plotting functions using ggplot: `plotMortalityTables()`
+and `plotMortalityTableComparisons()` to plot the absolute and relative
+mortalities. For absolute mortalities, the `q(x)` axis employs a
+log10-scale. The returned plot is a normal ggplot2 object, so all
+features provided by ggplot2 can be adde to the plots.
+
+``` r
+mortalityTables.load("Austria_Annuities")
+plotMortalityTables(AVOe2005R.male, AVOe2005R.male.unloaded, AVOe1996R.male, EROM.G1950.male, 
+                    YOB = 1977, ages = 0:99, legend.position = c(0.5, 0.65))
+```
+
+<img src="man/figures/README-Plotting-1.png" width="100%" />
+
+``` r
+plotMortalityTableComparisons(AVOe2005R.male, AVOe2005R.male.unloaded, AVOe1996R.male, EROM.G1950.male, 
+                              YOB = 1977, ages = 0:99, legend.position = c(0.5, 0.65))
 ```
 
+<img src="man/figures/README-Plotting-2.png" width="100%" />
+
+``` r
+plotMortalityTrend(AVOe2005R.male, AVOe2005R.male.unloaded, AVOe1996R.male, AVOe1996R.male, EROM.G1950.male)
+```
+
+<img src="man/figures/README-Plotting-3.png" width="100%" />
+
 ## Further information
-For further information on how to use the package, see the "Using the MortalityTables Package" vignette.
-
-## Changelog
-
-* Version 1.0 (30.3.2018): 
-  * Initial Submission to CRAN
-* Version 2.0 (27.8.2020): 
-  * Add various convenience functions to derive tables from data
-  * implement dimensional information
-  * extend plotting capabilities (more flexible)
-  * Add more international tables / datasets
-* Version 2.0.1 (4.9.2020): 
-  * Fix performance issues with mortalityTables.list and mortalityTables.load 
-* Version 2.0.2 (12.12.2020): 
-  * Add/fix some sample tables
-  * gracefully handle missing suggested packages
-  * First version of vignette about international tables
-* Version 2.0.3 (24.8.2021):
-  * Fix vignette builds
-* Version 2.0.4 (19.10.2023):
-  * Add new Austrian population mortality tables (2020/22)
-* Version 2.0.5 (27.10.2023):
-  * Fix incorrect ages in Austrian population mortality
 
+For further information on how to use the package, see the [“Using the
+MortalityTables
+Package”](https://cran.r-project.org/package=MortalityTables/vignettes/using-the-mortalityTables-package.html)
+vignette.
diff --git a/man/MortalityTables-package.Rd b/man/MortalityTables-package.Rd
index bc1481a..e25fe14 100644
--- a/man/MortalityTables-package.Rd
+++ b/man/MortalityTables-package.Rd
@@ -6,7 +6,7 @@
 \alias{MortalityTables-package}
 \title{Provide life table classes for life insurance purposes}
 \description{
-Classes to implement and plot cohort life tables for actuarial calculations. In particular, birth-year dependent mortality tables using a yearly trend to extrapolate from a base year are implemented, as well as period life table, cohort life tables using an age shift, and merged life tables.
+Classes to implement, analyze and plot cohort life tables for actuarial calculations. Birth-year dependent cohort mortality tables using a yearly trend to extrapolate from a base year are implemented, as well as period life table, cohort life tables using an age shift, and merged life tables. Additionally, several data sets from various countries are included to provide widely-used tables out of the box.
 }
 \seealso{
 Useful links:
@@ -17,6 +17,6 @@ Useful links:
 
 }
 \author{
-\strong{Maintainer}: Reinhold Kainhofer \email{reinhold@kainhofer.com}
+\strong{Maintainer}: Reinhold Kainhofer \email{reinhold@kainhofer.com} [copyright holder]
 
 }
diff --git a/man/figures/README-Plotting-1.png b/man/figures/README-Plotting-1.png
new file mode 100644
index 0000000000000000000000000000000000000000..b3b61fc97f7870e95ae3d353444a9971d2c04e17
GIT binary patch
literal 13296
zcmeAS@N?(olHy`uVBq!ia0y~yU^ZZ2V0^&A%)r3lTVA2hz`&Rt;1lA?00LGF3~3Bj
zX$)2q7}B;e>_1{`Y;48AV8vi%#gJxYHNh%vf>qi!s|gdVCTz2saN8FI@_c>!eDhZO
z_MJ$BYEDZ7t4_0;kd|hZ1_ImCCQL}%_CL?pH_taO&$llxuP-lebzWazUf=4x)hF^+
zKdD*AP+wo)2R5tEw-2nMuP<+P9|)}OTm7W(#QzCa3=<%ZNMo3gHUZ=c5VdW>gxeE9
z#I^~y|F6#TT@5yRHCXfNzSXNwtX_TM|LQ0Ix1}*`OS9URmbPtM+P2#hw%z`}?f<rI
z|8H;m|NnT+{}X+_C;IYE^!1(STYX}6--#0^PCWU4;{X5K6Rd7eNV|P|!tMXtZvVf1
z`~UwZtMi_$?t5~g@5zbPPfnb8^5n#mCr_UIfAZx2|JScy|0v7-zb)<miN620CxFa;
zvKlP2?LXMC|No!-|NsAc>5`)i3=EtF9+AZi419+{nDKc2iWCM01qM$S$B>FSZ|8Q;
zzT;MOquqovaL<jnS0!6y+`p+k-@JHdd%U9R@$}PEYERD0b}zK}^!Uiu(kX9Gw_2a(
z?Z0z$e*PC`2j&;<Uzr_B7r*+wV{bEKS1ViH?bz76S9i~9X<^aXy_Hu%@uVk*gpd%w
zVuFW<O-qBK;zt3dww5E#U_nl{XR<<*bUjTB&Kc_kiBwDx$ql$@KHY_r(U~px=`#+A
zs+Jk0Q!@pK;Z9)KJUPjR`TW^wKRGtO(mJE?b5<}n*qBKgiU}tcti2<{=-e-`d7Tlj
z5-D6K#xv!fe^O&QQ}@m1mJYG>_cS&=R>j6J<HG-%!%hdzELgH>ep6Z&594Ef7N06r
zQ3p=O$twj6PEHLGP-XF1=5%05SWx2>0fU)bjLrupRB$j(j__m+b~=!v#o`mCDjEP$
z?m2Y_vjL0GJ*NXpLLPA(&|n1{!a3D}$v~sA@^iuV+jr}({VA)ox>Qt}Uz1XC?q^>4
zrPVX%M9&d0csZqk$>3ze&W`C~GfvA^Up${@dvVXF-~_hkdnzlEek=?4nb%aM{xIn0
zoSs#!mb*{a#o6zZX6kwAywFM4M@#j<$CQ>>Be$*ztE+e4oh!a(_R(LF`E_sGci*0W
z|M%MJP1jZVP8Xk>#lQTI^W~}8`U(jj_RYV+)6}P~&aCz@=jrKKZ=U+6=V$M`d3EpP
zXU@#WuG;?ew5-vRTKah#zxj`41&RrmG#LBUuS=wBpKfzvP`)$i^zHLM^yf_d6;mhF
zKD)T?ZRd-%y?P1>i@0pOo|$pj&6~5PwQ$};MxV34Qmt<$#F(irZ`}X?P<v({FaPG`
zHU4IM7ZfNa1ZjMf@IS`oqny5|cgK{QIjRQli=^(=8rj^b(Cw{OZj`JE-XUPXIi=^=
z<o@G(8Zy}r&6>6--yrMdg`Oyh${F&xyHgHxbBQyl#huKk`((IXY?-WT_TS0hwoX4#
zAph)K_rZtW&pyVyi;{PPSjSw<qIr<T=kv4sl?UtQar~dlTeZ<(8OyStN0ev(eJFf$
z#~Z(2ft%hn9cpdp3^U?5Ak%N4x}rfaIJx5Zt2MocO?*38+Kwh#aC|bbe?DjKeZxg@
z0XqZ?HhQr!&QK2F)JyO<;B>%6E0EdX&~1AeJ{F&iP6v)?1~M7==D#_xWZieLfQ#l!
zW&`(gT>rPQYbYidi886Vd5SkY<n6ZE(GC@G>Xh(L^X(Q|b*CAU=!DsMvZMO4Ruu6=
z6WxwUtJ3058+_Wtt_3k8!t?0gX^Br#`9mS8a)HppXZ_D2nT}27oUy01fitMc;se8(
zjCralHZvPeMsv(yQ1yL$h}mFq<+KGKQ<&896%%T>?};Zf&iH8KeWRktC?SJ=Q)o-W
zM{O6A`K$?QpLGr%co2QrpGl1A*zyN`cI;`pRtZTocwReXab6+enE(@8T*>8lt+T7V
zG8oz#GN1nX_%gEYbvlPc#znuiDcT9kR%;z(lmOe4;Cfp!d&#9Wt6JC-w(;<sPP?{6
z`)q#reSz0jyTzWp`e!^(?rm9o#}R*>)LA~WmI>C~T;z0sfvZ%n=<w+;JpBx3rZw*T
zGa;4dfv2foL|m`k)Ss!l4@IWkPKY=AyY;lSK8w(s&3+s+W==Ws;?=Jtp&2hF?HFh9
zG8g~-IRF1K?t438>i;}B%l;;Gy8fS=YyD@(-!S)8R^cvevT^>i=iiU^-FHu_o_}0(
z)R=d}<9s<O=>?K44TU0J@jasMzUS=LGw@_3^u2UR4sdq5oMp0M!+pKV*@{*fTNRQx
z&RjMBH>3RI6tT9a&AWD$PnS*JyL(x}{duNqug0FOH}4lPxaRb>d*h=Ox0#p8Bs`nC
zOuno#yyW<i{N6d52R`hZ;o)*wL}zmF;l2-vF8w_lkNx|2=3KA$mxIQgeL20;1elHm
z`D}`mDV?qMlQm%*x6k7v#qa;VlD5x{`{lh;y_bpSb=u!o$Nf_-nwgvx&&@i^XprtB
z$-K;4aBGKv!Lg>TdWV~j7f$jHt6)pm#?7PLuvO#w{F-wS0kt#!iQfz}IXe6Pi-yG6
z>>Czy8Q8?@zMrIfW0!$q0#ECUo|WwV$GOig^W4Wc<1JJ1xydG*?QXUgvGb-Lw!f#E
zE!B5SdLnCbcj?J@_OB=1)H+Zw|M^|@OYJ*Ncov;iVCmU5VPALE1lI4%4^*%xm~o%^
zs$Rn^^=!>&UdD<`{}W}N6{#0r`{dM9cQVju-owbZljgoJ+yCYD@}em@JLM!97i+sQ
zpWKsh*zR)du|LcPvssr3C?=>K%}|&rUNd9MEG@-^ZE7rMHdyqqPulrmg_CKhkibTj
zgim5jZn`D48}lCi6PYoAfroMOb^(Lhg|EA>-aYg;YmtfugY$tWx-34?8NZXnK|-rq
z8g4ESFj!=e8+g(0X*k=I+v^W0O#>I^8<M21Om{V(TF>Q^aAXoF^GL)7#EbnsRBOtl
zT-WBN1I}R=S-z%T)V~wHT~gS-8C(r)Doyypd~(kV@ps|Est>`5|E8HiTVqPt3hwXf
z2V7VZIA-igJ$+yX+oYK*xWBLN6k<|q44Adlv(dfNZF=td$Bwi1eVny%2iWyFq7siC
zjI`M@f2n03d&Fe0@xY(MpQ{!e(D~6|xGYjgQul^St>yapqR(p@mxa$-`dRpI<|Chd
zO}^zbC**xy{w!GkHp?-K31_+!XYJ!OC}f;rk&svS<+dbqve#x6@sk_Mzx>J5<=%Pc
zzWUi9|CWDeic5Fia^aAetoPZ$NZSo;sS>ln!~=W&{H|#<To(E0_3!h3Hx+k2+o5^G
zYvV2bvzKmW?tbHwGU=uCy6F0IeC4ZWPCfmrxbEe3|J%)<Ci`t;?@3jdc~Zl7e%jd^
zSqJ{SQIEg&b<Ke{mphLsM9*64Sf@I1`kROAT$yI1b$(W`+xzoDzJ12|#Q(>i&aF?Y
zx*}tml)Blby*}%o`AYA)ODC^2Y~)edEI)b4AK`=~<!OQk{yciFpU##Rw{dCYt~#Bt
zXXg4FbZ$63W7F$5@t$Pz?`4hpuJ}iDqP7L*&iC1tyjSkqN=ENEUHi=Zq~HTD!rL{E
zs%X}m+NoM4z2rXgI^Voy&)<8^-{ZT^|71$`-h5>4%tY?P{qyHmEs1=z<fOk+euG7O
zwOMk)jr4o3v%h}uTe#zwS8lJ{CdCAq+Kt^O#cFnK+2GCm`PD)5`Pa?o+pgOGZ(7lp
zxo%}$F)f_4OuTh6=f4R0YR9wRje*%`bIH|}xq5#-<lUVgEFCRT>3923iRZjCx;_c9
z>FVvxuX~nRn@!3pI%ju^?Wrg`)90hr_IXh=w%b?eMM=4S%1%6!IgLesPxLYOlNASV
zb-(tXSGgoIt5#y#p*dTVKFNH06@T}C%=^P9ibdqxUMk5iEBkUZ>#SJKWP$xX2XyYM
zR{xzl{p;=b_OdeP`6Rq&EiL|M{-i{z{biB%;Y&Iv12;wcx6J?VH0QG1qs1w;#mekQ
zo>=<UZ?xW;Xa6!q`oNaJ+Ru`gb$={V{CBmX@@pOA0Ud>H7Cge&lz-1YVKXzDVOjqx
zY5zHS2bXt7T+?*=GdnkNnt=C`{bDw;|1+P|2ih5Ah1@TBRKjiNdt_7Z0UiFHYwZhj
zkB3iu)F|ol^{aZ;wg;CPH~W`{$KCET4#>0nonhe>7R<eQnh4*S46jY!Tza?1XDd(B
ze6MA}cbSWEbDs$BnG~;0&s^qikAJN^Z8bx(5L240ri8@VDNkN@TIKIIbJ5|HnAFsG
z(bsd{oE4wHW&1L?#TvJ<NEH1FpBU75as6@`*~`_xk1_bH+Wo2Mm#>rV8LJ=-gSM|z
z4kuUT-<N4Pc=ZstzMEjwXn6KvxV^-lT3LhNU&>t%q-d!!CC4?asWGVdy;YUL`M`uJ
z96hOwMgI>zczb;tC=Z8doV~Op!nsqoI_UesCvUG`W8h(Q4w5ps_Qvxr`{eEMx0wxg
zG@LAmko29Ux>`tanT(MuWAgcVSN@q)|Lz01=+>JJMzc)3%~XTT7<z20gT7yW^L96r
z!Hy`2=aMfP4o*$$G`Fm`33}wWD}=}3o#^jJ%WvK;XG=K6zRXKqs<~ikWK#J3*V8nc
zC+mqa^(a>dEkFI}?dyh%&lI#JW>m6<&RQzA-EK0Q&dVUd13NaUm$n|gz5Xt!*zzh^
z8Y#uZ?7u67!Qfis6UW4l-?AMT+8R2AVlt;~(dAKi8T9YK4faV_A7$7cmTgc>Si}-I
zOLbn^vu#W~HZOy|9XK#YJnTl>aR)|;m;+D5+7C`i>x})YEx+PG!(_cwz8>RGm&CU{
zG>l+SyBeEo#%H`eV3z82$#*Bb!z0>{CooFH==OZ>dCTaWIqgmS!M%UWYR;6f=`c)|
zG<dgP?I`2sh9}%T$+vE7u((xvkja3B$8+0(3Jd*Gd%H9XW{C#H1dk%tV}~mfH|xG-
zb7Tg|&pYtLLO-eEOqzfND4tR{d-^{swIA1EI|!EUJ8-~xst?=c<0k19EC~gSm-Ei1
z*fclHbl${#?EGzcU-{Yd9tt;j7KPVYPng*nHKSC;JYmnCzbC(JJSiE+I3qP`hWY+T
z=SLS=&R9(nH>kU}&&Y<2?U-0YB-@N%pU(O7N>5tlbYP8gB;(`fZ?9jzY4F(i50e2m
z<7Gd;E!+uNJ;hT67$56ff@I?}(hm2W`@nM`<=P<ugJKW60~J-jZ(W^w*tmw-;55VJ
zGwlc2dLnXaUUyEi@Jx$Jdi~|~FP~+b5-$IHUnYK6e5K}-JHKV)U6jLhxLqIb*RAE7
z@o)R<<GUw++_<v#*?N(aY!d$Y@%wibeK=^%usML6c`{GqME#Wc*A|`KQu6g(eMa5S
z{ztz-4Sgviz3EL8g6m$*j7clgnjFV5<ILZ1S*zKM$Ijn2U%M{E{s())Gq$$%isDIL
zG1tA{9VqGU{>ioO|Cc5Eeg!NEdL{JNw5aTL@U~;#I-jOjPX8r(Cdp9E+evwna%|TW
zMjcLu-@WTOAIE=eO-SmDaBtO4o$P7E$TrE@Q&a75a&R*flfmZg1~xaFW467X6xm?8
zWb#Ve$zsb+Zz(DLUqAQS|1T>iHRcpt)Oa5>UD<hy!TpTM${$k<%iZ_)ZZ`aS;6|{S
zq$+p9p0rQbcRk$L>8Qv!<7c$Qz2`eh%=Jw(I*qo8xvBZQ5>hXnIc?p$`hTad&#$T5
ze|GAUxRUs?lX+V!r>BUixhh(}@AYt2Tlb=Va{SkuGp2|go3-hrh9$$}mv3LU9lvvc
zfyrRyyHg@BzcU}JWV1?`BG$HjY3#D4tAGE0zQ6wK>{|QPijM0py`S?h{_l>{yG?Qu
zE5zUVlpK4v)sx}Z{bM(0d^z9)awc=a0?*^O4o#|A^IJfqVdm~u!J94D-b^~H)vPCZ
zUh?v9gY*A>wX27B@n3$X`daVRCH1*|H4^je*Z5AjnO66*ZgxuYCC0_xH&aCZ98i&z
zla>?_YnUl3G0~27Te{b?10Rlf<}O?M>_qDK<MAeTS=@&wA1MKOZ&_I2{G!fUeS??v
z2ot^>SRyGWEhQq+FjHQF|D?c-YNgqe!0GJOX8&!^OZNuVeJEP~B=*vg#FU~XoAajl
z{5fW%-MiVa^nX7n0yi*E&Zx*q2mtj5G@Tb2=_<0TUHvd4E1-a(twGc2k&*60HnqBM
zH?A!B04fNZq-U^fKCZ^*%98MmZP|y!r$#Ks26c~5Zkzif=fD9_#^g*&xOFt?z~{I3
z>e2&z7}DYr&h73@`L<Ish+{@6i>?8?z3R7+$8*=MU^wHX%i{wQ)Hc|=o8R*OKH>QI
zBdiI}*p7MM+gWh>;741=$NKkKul)X0RABpRp-kiR(8<cx>;J1S^l8YPHNC8=UQ7O%
zC1-!bNAW4TXA;bMe%CZ?Ki_?WfoGlAu}U^Z<8}p>v?)@@D)-f@+esVD1C?tGWeUm(
zm$>Z`jvcH${<H6-ftO)t#4omlpsN!sC*J>=S6-Dj|Ic-<tp=|-tP<1?*8cwKkiUPQ
zhd{&3y{(qJKVLl@ypwU2H^|YF2D7dhT>CtCa^fx}M~1Y#gdO+mXXzEZWNSMTe{AXw
zErVTK^|yV#J2|oE01Hb(7jxRm*|FdI3;5VtUtUsg+8V<qE4TVKhflqZ3WKq^!B@-I
zla@vodLBqg4w#^KIHc}#>Vt<H^Ei2m5`HwTlI;*@N-I^(er@FY)O;?#yxeQ{DZ7&$
z8E5=#{3yVbmaF>um63XrX$+gZ-0I~AT3A6%)_W^^cs^ZAJz27FKaZVFn6{uqrH%o}
zs{DUF;@9U-xV+!Axu*1{QEbNkPZDy$(+_maU&uJ)X5+(m|85o)pEUbjx5)TJ@O0D5
zt?y<W|8OILljpyrOv6lRiD{ls?@ZmgL=<H2>X$_-O;=?;OUTV;5|(S2DJwDUDf=#!
zwuZ>)lTo{3{7Z|@q*ttwTPL}@L&|@i{ERk<3wvhFYKV+K>9uRlX{O`H_p}{%%Rct#
z*yME9W7+Gw!BSSc?sO)&gQSjm{)R|}bIjN}b<HB~2^?h=XR<4DHnFJX*;ra9)O_BR
z*~N2zr3`P=t0t8u*_sbha<g?BJ7xUm$x6(uwTPVF({S>r!VJ9|cAl@;_dneDQE0}E
zk56_sGOlY`$<B4g>A;g@0T1yF?RV=x$jC`E3){}KF*m5ooW|fig>yy>Pt%L0XItOc
zRq*xuPWrZx@z@rZ$TzAiB3X&o!ZvNt`(Wq!mi_$0jh>hG{b2ApC3PvEi~CdDt45~H
z0tP=No?KZPubmeB$kN8l^VW0)24ii5;v<P1Gh%p(UVggyt@VFPij=(A;@HVSED33>
z$G~3HS#kQc<)-=j?)@`iXkNRGQ^JU2)#*K9XO^%`%Z$-I#wby;buDY#+j1`1XtjiE
zVVkDt-H)AkaOSb8NkR>d;kSS7N$Hu|Qh5?&iP7s%AHJnNeEZhF;pOq;AFf;wlGYM5
zxG9lx<>}6o*>7zn+r%$3@a(!3$1tO-;p8!e$$IbEE56L(In3?Lz!sbP`tu~ikV#Kf
zl@mT0daOTv`SyB!ragb7<U!VOKY<9ZK7IZ6^n<nc|A$C}g?Y4v4Sq^2x%l+`+w1ox
zC*I(%1(_slkTM}OykUDikKqXcu)3U^?gySEUvQcJf3h{3WD3`T1*>zj5>F^>)~nBt
zFZ{0DFw-aCSg`YH2H^`E7O&m7h*#<r*N1PS<@cZ4%d#ab6Q1(%$_1v)Q#ohU@C22z
zR{#FT#>;Fli}O@PR!5YCk;iK8ZF%(pJ<C2FUN6U%P$HT1;R<M2GqZ%%LVxngKMz*7
zGfL#PN!XZfakw_4*7d-XqzM{)|IT%%Y1w~ymB`>WUy;q9S9gMGTf@oY3Slw|p2v^1
zrfJ!~d6gy6V5qX^K(O=2$mBWcpg2~sPQEw&<+4xB>&(viAB(!pozknA@X2sR+p_>E
zkzcL9C#*jEdGf|<-<TqkIcDVWWVuh;t7p9QC38&f%=tZAw|$M>w4_jiNlm!<*Tj_m
z(`Q~!xEp@^nR@ctx2$bbIcMnb1i4RoI6d;3qV@W1VDnjcB#)$6Oyb#lW>)E$(yg_1
zM%Qk|C2ae|%Gi8&!AB3H4@TA343A%3{BqhimQ$;*2ZXb1GcdRRHFy6iaAH?5&#;=r
zv-{RYzMFMhvv;XpyT!-y?DcZ<`kyrm4(PD(q&4%gpY<?$l9hhV@b%SmFQ-LhNAsTn
zm5O!GU2`XHum4a4Ru|XI6IgrT>bo_`+g9Jbth@2rHoJ-U=dPEVH%t8lxYKA}|8a|)
zh5<KY^Hqi9ko%RUD#v#`)jm+-y=H6f45`Cu$0ZI=-~Z$1>FxXfFa6_iV9i>Ufa%-x
z*{-mjGR*tOWpr04JGZ&9^6%SY>6O3tvcLa4@5cSV=j8tdem-s8`$lBv1+S}rtY7R`
ziuB|&<bNXZH9mamugv}ZLECyX*6*;JDF1pAukg>kRUghi|9UpP|JC~aq5Le@4mE7M
zd-k!v4=3Bsw1}wnZO<gkYo40hw5{9L*!gE)#rxyF+@HU(pLg|M%)z*Mn^1o2w0#l|
z;ugnu{L?=F(6D4HuUuH#f<6Dvo&NRq`+UAWVS{Y#k5^bDSLOdZmF#Z#HhkaV<QG}D
zxo3pG7dDtF%@VyT|Iev(cf-3I4}Q2IX8^M2p!bxOt(pfEUIf)%4v(`uW_tX}L&M`K
z5^J{d#x44D>&an*Ez6c`7b&L2EA6=1%gh|VYW@FH#qJwV8kU-Vx|d&^BC|DDO7*f{
zVA_H^HQxeHXh<?PA5@sX^w+KRHRU4G^1<!L51ixPb&E|uQ0`b_m14rRFs4gSw}-?R
zpQ-=<;i6$`#hJsEj^Vetbpq8A!pu+DPIz<a>Hhj3FJ>6oJbS!n!RoiHK}UrQw56ZS
z|6E$6lj3gp)p;pT|4gI9PXcd$)Yd!s@_255!@27pH#Yn|+%A7;Z*9od+&NN@m9HFH
zv-Zd;ZI$P*e?*-4_pq7&)FZF>eEHbi?8cpSHB5f>o(I;fJ+eq!<N50s&HK082L*jS
zoc!;e-L6~L*0(3FVd!LJ2o^S2Eg>@HbLp3ZQ%ZQ&shqp*9)5e81y9bJo`%TiPRH<w
zbJrKHGkESAD)jp8;?=oK%RHKMRv&(_i)pU7tLK*O{p+@UeVr(wb@;1+8_45ES4HoM
z2bZ#1>+hXZ0dflS^}{n*4c7P^(8&t$iTAlE`fkq_ub_(GE3&FrCZ=v=kK{C+*63JR
zyD=`@V?|NKmwWrJA4z$#)%So%YQO=vby2Z__w4km^6gK7LNF@9Wmm+F79&s{xOd%z
z1^c#jeEt@BvHEu*DE!TiCQ9x9Z<8w1)-dz#f(;Ayt?T&mZRz(z_D8JrUu4}jSaW94
zG|%>_oHKUva`C+K?_OptwtUH}^iS^AAn6&?-?TKGJh{N-oOke%s^6hk@5i{T5X#Pd
zEk0px%)KflwG$St4Uy5D+Ci53y}RX?FL~dy^y9aSSGQ?$9=rSN%)FjGq8>7B=l8i3
zY+lMVS>e+qvEwsVYcDmPcH*{s=<V*Ki5xQ`dA$TH1zn}@@bB6swZzBo$=k)N-?DC#
zRZmC@725K7<30<w8%w_&jhJ}q_VKXW+fGh5P)rB|%Pf3xxAy+(_FBW2dqpB{Z_WIq
zdZtzql+lf6PueiI|7)w%o$tGMN#(Z3I2)^_hu!|Od|#{QY?kJRnVy~(&K++{61eky
zXVn$)*L$a5%DT<dGhM(STT`+%Zc#}uxV-*)^h)Qn)T`eX9k{~cQ=~e%GTCri&+<>s
z>({Ni=xF*SC@A+ktA*rF&t0-7deQ|9UQW$;*6SK!#QE;9UU0E$calJr=JIVn{ZI3y
zTxc<jS<xEl*qL`PVuR|em47Cjp7JztlSFG=*UGn!8&7O7Vw@b(S$8jD0jK-jkh<@w
zp{8~gk*Z-Hxy%ioayvvOpIr3jNN{qtbV}40p_Hb?v`w!!opjigcP~P4tF7iV4>!L9
zOM;W)z6d28x@cm2v+ib!LZp5Enuc4~M7&j$)e|OZZVXwpe%<4XHWx3IeN9ogX_Bw=
z{}vnLV{Mi*MP6&V<NlP~4DXz|e-@9*?BJLuakp7~p7meYm~`KL`bPa{7ffY6w&_%z
z+`Y}$wMGWinw{*_S$xzkV)|PBw5uRVy{eNtx1DWGJo@zO<KPDmj2Jg}2$jEOENu*X
zlMOP|T5NAh%<Xvx3_{NNz4E>=CzUCUQFVgoZ-v-(`({K=KUP_&Q+0CNw&n&)_Vivx
zoj|pOM^hTY-t0cl@a3q_E|YWJ#z$S(ZOzr|@t$(tLU%)`;Q}$YoRuQUdVNyS#}#gL
z)n1phyE)nIc*(hL>!YsAw!YQqv7RvZZJzB)MyCU3*09W)f4+`wgZ{FsOAF%^H1#&E
z$xYvQW`hx<@EVqw+-=4OY7Kk!=6+`KDx8>{+s^p;*+V|NnLIpaT)TAZ1g_jz#8&y_
zxpDo|{TIFeJHFr35ESzy{Pw~FCb32Z5^W7L13SZu3NME%?he@|e`wBhpKR%{8M{-i
z_g`k!<D9{uI`8Dsuko#KqZRF0tn?$VnQbv(EZ)gnb{aI@@Z(p_uH;)s^#WoKp7ZY8
zD$DM3S(RBmiit5;*kGR5pUK_+{jJL%?(Zmy`?UJ4N5ZA`J4AlJKJq5MY56fRLk)$U
zKYq-(@9@bZe9GrZvAMrRe(Bx3DWl87$Q&j#DW>KFquiD2Vuk0t^R~VXol!Gmb+u-#
z1k*8h&l_P$r`k{GPE49ReNWcy%^O(s&L=ER5f@l_qo4W3m9ySCrn3Eo*TZKe^XjR@
z<h)MwW7reGJvqYjLs-%$=a_h(yYn{bA1ZS@wQ$?zEe82=hax0347}NW0<O!%_MXiS
z_z{-$XL)@<eME-X8}|1-Qyg>IMLrgvRJi<`Q)0oS9a3DJuU5D2vP}(VdEe8re_Jj0
zXTFr@yYFfioafF;yrkKA%fiNB#eMNt-=^FRkDEAsPnPwX3+vl=ex7=xQbvKr$4E8s
z^G@gHUz;TII<M4;Ze6SW>6RY{&;7DLCJ(ngX5n%0Jag>f@fVFLYhw#<?^?9(txZE`
zX=dP+8$N8U;b#pK<9)Vjmqmx4*(w_+vF*+8F2l)H5i=VMwK?-@c5hRC@oJS+zW>dC
zJq2+eu9vwiEdQl{Fi}Fm;CENUMh(ty-})Cy?+gn)-F0o9#&g!{TzApapwzm?i)ruQ
zhb<dbmUJY^Ki{LUK9@=Dv%AELxBY+rh%EWA=pd^<@51Uo)AS-wot!Q-qix2UY@Mx+
ziS;haCVzkI`S9qyiMcwTZ}sVY@w1nf_kQ(7*g#Fy@!r0?Lo?pF$OrxKzbSb**!hLr
z{#3@uQ;DfeZtGP}+`jHFAua!S&5z7?R>>7v9CIC6&dl27w5RrRi{aDe#0@tBHRc-H
zn6{i#_&lvvbMyDj4m^y;dQN+4izfvA`SR|t%qAxW1|fOST7Z_5N%k*#5?3m=u<342
zjc51ykansfOK0XfhWz_xi9LV6ylXj`WMj~_q|HET%Y_X_jK+F=|L*O}p1pU$vZZog
zj(V+qTjDkCX4#wuN%4P{%Vi=Hoc4&_6TZyblej{037hVew9W=ek+t8M_Mh4K$s)mF
zP3qD=x8}*tklIm}18TyZS@9xR%~`*Ajm@{0-8VfoH*6EuHeB=ad%-V9?<v*^PS1TG
zuG|<AoArXVY-aXT!!`PBN=tX#@>_LekIPMGo9G#5nT>bUpGaMIRWDa;qso#gVYgpS
z6)@<2CDj_oFx@gt?z`rM()5bSL1DT2>^`4VBv^R#k1Z5`o+|MC=z{Lelm7nhJhz~A
zQo@%5ENUN*2PX^eQd=l~{HMWl*X7>U5qmb?n&*DfDf<_v#9J5d*FOWEr>@anmZ`aX
z+w-7JHU^23$seyotk8>%zfxv*qf+ukS58#d%D1kKGZi`A_P+lwlP4tc*TwtuPq}m6
z%e5UZ2YKY`^ZNW!k<c>uxO;xecMjj(yJwyIUKE$Yx;XmxR@DTXmWD#HXQ4^IKHJWn
zK5M&f>%RFfc%m{GZ!*jfk-o$#`r5|nw8O4%HSy0==PRiP8E*AGkg(d&KlWN^(yZit
z=e%#F9^HBUo790h<=iKNjwP}kVA0ugBse*4m(RIw&(6b@E03M?ewBK(^7=O+uW7UH
z)yIg=aMtE5sg!u)Q)p=QtRU`K@sIR~u%35+UD7WE`PJK&gb2TJ;@9VE_v36&TX@TU
zM>->K|INA6Kg#@zoF=-s+Ww;C62@nLt_j;6wtu<dQ`G^D?8e*Tmafjs%S2Wkd9}yq
zTJX6oYb5T1LRr&bI<J0?T;#0-PdOysTh3TmZrR}6sIhAyV=z}pQgPgy+Kr3u`<Jl!
zHtejcIkYX%u65n+BfLGSX0<8K$-n&%&ic(ijrI4seGwPmt6MdjWKQ#Q)t+1yQOVQu
zUgpe(+txRx9x*XFw!S80o4n4weY^F;zWnYyr(kQar|_h_#EDOnFSH%|Fg5<0%Flyu
z-u5^B+V)dF6%@ReN>2J^Zxnf!b53vOdzmv6Za3@Mb7o~sI&i#x*51F40ryR}ZaVW_
zc&_8D15f9Q-)Y_1^0qvX!NBL1hVKT)g;!=ePt6LDH-M>0d}?gAsOImCorVmYY{&BX
z(hj_>Tz7rd?jOt6J3dql?Ebun?W<$3_URh?i;`P{9uzSqn5;MW@T%FbWLFKtWihws
zuCg9+My5i$KsIVKJvL>({QFytxJ6rl$jVJ-minh0jA~|j&jf{l7wfU&#>ZM)*PqwD
z$Nu$iSb);*ok6@&!V>c>XRtCY{`hTb?BPA(0gra=OyZ5=nXxx5@@>t57p9A=S|;Dv
zXBDrLz^b}xw)XV}p^YDBG)Kx99Dca*VcV3~sjFSS*DW&E5STIh|Hs|&*O*z;A{iyl
z&k<I1T_RNaz3XAflM6Xw9eL|gnwc7ZPG6q?|G`s-#z>t52c9QX-JPEKgX^qvPV?_K
z&o^X7TJF^bdt_nkrrGs>^1nJXM&=x7SUyFR^~}a_A(N(_U(dMAHCSfM|GVU6-{1T8
zUKbCYVd_Z_Tf9N((W`TJ`DGoC)f6w47GXN0U-$3R{dw2xzn3gHp!3My>Q!T-pJq49
zv8k`J58it3!zu50?*b^g4Gh-r|GQ`1{kr!DfA2}G{QKMf*ZMcFKvQWmo<_Xvm)E)8
zaxx_Ov60FDzLWo#3uLZc;ZnO{S*mTaN5Y~#j{*|nY=1oa{Oj3f_pjIQOVu&vCYHSP
zt$b*E{bFcOb>-cfgxh-Gx&Q8bwd~X9TL-4!6TK^6Qo_dA`18?Td2`(}x8-fbb$gXw
zG)VI9Svl7*UFh1(?ETKu*K;49aZePK2Nc%p-F*Fi&zk#n|6e|+FfrJmnY!?Rfz!9&
z$97NK=<qx3`{rx=UhTOe?s)Lz+r9H&@O)x=cJ+5L1M@6J=6wqTb*3CXv?u!*Pqn9P
z<;V2Zf7jV-xE&MvcC@Pwl$c_;H=DofvsE^zHtjffA#=q>b^SK6y65t{XP&%N>G;cU
zAt<vxVePrrp6JYeO?&PEhqMz8`57Gd>vpY{U4G0vwdSq-)Dx#!%i}ie3x09WKZNaP
z&!j@oESg5mlpNNCZ&Tw=7Ft|4T){BE!sgrOV^+^uUt71n`s<PzkRY>6+``~%$?Tom
zKAd&R(P3le`28v)sOU;c{8#M;b-7UC8}&Q*114Qs@U&!V=7prozt<kvk$!@O;c$ha
z*2DOtCMFAn`(G`PVct>-wY-E)m;FqjfU&kgme2B+{gDkXojTU~Pu}&d-+ilo*ym?U
zVXiD;JIc&l`fKe0i{(=)nUyOxY6jMF|DVWkI$T%#)xl%8ufJK-{%)?*_qs(!Cr-aK
z=iJe{)8buj{YhEI`uKz!|DQ6XT}l4*W`X3sM{9icJ>I+V!R{`j4BOaLsVy1?Un}e{
zA330LHbhnI?CvQ&_wy>)eamyMaAtG&es1~-Hq<!7F(K>T5sBQ7cX)%szZ`hecpxLL
z$k6=2O-E_@%jUX1Pi{nry%zyz0#(MvJu)Fir&&Bs9(kB>xg(ahcdpe@A-PpOJG3(z
z{laIm>2mVON1EMEnydJj{meb?8JXwTi1G4XPzb(UwD8>KGmoKG1}5}9zVLg)hdUSR
zVl*zE_nN=$M$y(~y$@=Qw>w_`wo?1Y)9Sg~`(X~;nV9;IFH1N<jXmu>zt7swPC2&5
z%IUEeA5FS!-TLmYOX`I~hflpZevhpux2@-Qo5-CTvtRM^2)`9*IH<6B_I=*K-C}ze
zR4)(MJ70s>iM2=d!Fy(&{Dh|LoHLE<(#<#@^K(_!_03iQC$B9A2Fr51a|P!qdP*8S
z;PnaV<xT#Yb^gr??#J4$*S9>`$q6agSeZ8Wv%4iab2z7UbiLc;)uLg1?=mYWhb&my
zxN%L$GuMnuUaDQnHZ!i6n!TIZdtP9*<@Y-8uNU`%Qf3L8E?-Zo?9Cr%!?`UCepfa~
z_Rr+qH)+F@|Byt!<;{kow`^)T%ej^&KKk{XVVPXd%+lkl%=Wr9c$I)7W2&PzkM{LT
zM`!R$+&pk5{OzePJ~Km=W5jorb6x%2d1--ZL*WxP?i;!J7QU5n2@!#z3tyj`upeqS
zzt3AHwFKrT4^2{&x9u~MR}2Fs7bb(tTfaSa65ii3?|du|6I=5-Bi<;+8Miol)MT6w
zq%2?U(;UWl%%Eeb$mD{aw>3+-k1uzYHtw4aUbuL9foVhHPtBNVy@w5_eZK0*w9l!x
z!ExbgpXO@}%h(u<<zn0B?odzo@IveI0+UAX><>l1?w=CzC_Bx!VYaM^Yt4e|HoZH}
zxOaqxC$d$(b4Z&qLG0LuCv_n_Zqt3$`R2^EWo-5cpUI}k_UzFDo@s&xH(zR9UQpU_
zaXIhihY1$R7XNgXPn6Wx_$-)oHFTNdj>ea^B7Y?hb3C8daBvC8;Y`cUzJ6r#p<u(E
zHyM1qjLlx*GuaZ^mn}VXD5yH%)25vun`g4E<=`o)zt&tQ`YdIsBxAF8_)NC7tUalU
zAGcU!Tsz^TDWrXwLqccQDH9Fu1PP<V^KK?u*%s$VW<`EcKC%jA4fC-%JSPh_w>Rfx
z@afvJ@MM7k_Q$M$2?;Y~RCIP3yL34)vGuO|#1oaD#iQ@T8GAUdEI)d7%p2t+Ye4$h
z*o>Un%Gem2eZyz6i8A+i)Vmyba4~e5qc+pyh__G6H&?&D^<)t=!mJDqG}tpvo(qa6
zVTtNvT>EFU9t?j5amqDzHZ$jAg>A{XMHl-8R)f@tN@UOSVp1!PO_ge4khs7jd0bK{
zTbr@j6XZ>9o`ge7*bUApzJjKQ5H^E#NB_9mJFNlvS8hhP#>yY(ljlrwiSqE6v#E&t
z@;fo%n-)8+sfqtJ=LeggzipFF(3fR%x_@@pwM3LoO}}tz^VC#DvkzTT4<^l<@Oi)X
zd%>h@q01aO8anweS&M%b{|j34dU?Uu#?JX{&(75aLW5C&L3r<!qkGMEzJNqaBEzv=
zpA8u&gKRm(c*ZrfRsT49%6^Sskl5B}NK{UpT033!boj}%f-2F9DG8uNV9~JiMsW(q
zj7cR^GX;baTr8Fu%}?4li(hg{Wb3ow2Z2qY;WOD5GPVgGj+MMW+jmFK<>dz!vw-bj
z_St(s{>t%HpY}ush%AS?LXoM>)X06ZcJdyb)K`-8nfir5A;TeR(EI*;T<u(KXdWqG
zJp3!Q)Ow~+$>t64@Z*p+I5c(UuYb!vUtV_p%qNJue>7O0GEifjymOrq?;&=dT9HJb
z3um`&zK}5MbPXu{G6kFxBp801u}*%R*66JZ3Dishw*);E!&i=fJAY4zohfkD&Z@a<
zpQXwHmvt|%i@Cr1y}GdeZ|8-n$&i>c<~Tm9F85$nWUu<=-~ZAQ9$23i`@v!OTI;gH
zk^>z{`|ocrtbZ$6&BV45<OnVw^Vs_Mx4r7S#Iy1qLR=Zq7%0`ZD$6Q;m+*Jdl545Z
z)a1n7^Xjy5%D2hJHe!cFAQ7ps=K#+kZPENRw)78`e-C)3K-^%$VQA1SsW1L@Mfx+-
z*PEchnaJjLwDE69b=rX`XQC@0{>@4d;dlM>#Mb!Qg*SiGV#T1w-Z}84`Pf}UvD0_n
z+p13#g^E5oP_p>+sf}!sf{)tIcWOct!;QvF_v!4%E9Uvk?|{3N-)HUD;J&)U&_FTa
zus2}pJGgQ2`p-eoBxl6X#=J<zy2@w!okNfew27h3v1khK*)4l-{(^`YF}D5BS-H@C
zM(a8w-cy_sGG1L~D_+c2PIv)H)+{`dTc%RPjTWD=Uj8aGYudr$&8c>foF_8l`hNEV
z3XtT=%2fQ>{{Pel$3@_T%EkCB-TvpN_<8%35+-OI1QkI}4L^^b|9{{9-^2H{&q2-F
z4|j5ALJ9yT=Fh)wpMU-9?RU97`W7oIxj*|UTf6FccyNh46>VoiUcGhg12<@54xB~M
z8;9>FOvv#}IMAVY^YyX(%HMyNuM2j6l-Df4DQP|VNs9K72myoj_tX;%JpGP6OUX7$
zSkZb=)lzcy<h3UoF8(x7QHd52FfgBAYa*$ttax)##qmTBk8L^!FaP%R*rvh4!`az>
zhSkSz?vCsKe;#ahFa7(qnLQ_nxoBe8vw+=aLc%s%hOBv2Zt<#2Eumy`W&xM9Uj5(r
zdDr4?qHYUyaA<E{87p?+^n#?TKjYW!n#(z(hHX*&##28ZT|68AqiyCjfy`9Bt*8G<
zqy}tkhN{>Q@I2~L#4VE}d(zvYmrUJxMen!wT-T#o7c0Z>o@4R3kuqy)OY6*t^*sOO
zoikI_wx0GqvnXjQNb^#$Wk02VO#GwU{I2Zmnlnqv;!DpNf9s0f-+FTC^w`aTo8Dz6
z)vt5fS24x&ZQaMf@6w;TYWMEqpL{+=>LmB??26CRZ`^mxOqJWJZIu)mvc~BD>Co-7
z`wwe8Z2EqoyeLY0^NQG;8&57wy54_y!h|WB;II)eP*IU{IxqpWB;VQTks?%3^2E<~
zOMX^<eK+~n|Nrl|=HA>TVDRJVuaE89=NBeO7^|%2Vr-7r%df9{Kc(TIA`4HQ<?hdy
zkC#gt%)fWrbnfQY$9KnGeiU=}zi`+D9c>n#s>;tFme{4Ybcj8hb+EYZ`O&L;cV|a$
zb5%^Za9Xu_>C4HU2{(?jEebB{NGSw~-Ml-?Tw7>H@y7U*oIj0Mb1*i?-m`hqaHsAX
zQ}J_Fd%pu~lvsGmET7M-z08=sJ7qhI2Fn>OrvnP&?;d|%q`0IocGmq_YReY3HAK2{
zNIbdp>)Z3~cDWpux9>hZe9Bkb8LXYNvmJ-$v4)6>irlC7pRSxdx<zfaENJJBr>mdK
II;Vst0Gi4p+yDRo

literal 0
HcmV?d00001

diff --git a/man/figures/README-Plotting-2.png b/man/figures/README-Plotting-2.png
new file mode 100644
index 0000000000000000000000000000000000000000..4673c97575895456e1ff1fd460c4beb1aee9685e
GIT binary patch
literal 12672
zcmeAS@N?(olHy`uVBq!ia0y~yU^ZZ2V0^&A%)r3lTVA2hz`&Rh;1lA?00LGF3~3Bj
zRt#2Y3|12u(k3vZZDZJf#Ms!_ih;ojB#{P^w6e0YO0%+>V3n3;l{UdDZJX7E304!f
zSxva@3j%q*zJ0!Vt9|=Uq=Ah~V@ON0Vn_q&nE=v}mX?;bEp5WKv~9Q3w*AlZ_099m
z%k%Ba%j?U_Tb;N1NzFQj`uh4luql1MeSILg)qN-aPq1Q`0Je2P8pDJ%s|jfnK-Pk&
zZ4)Nkp0I7ggl)Gc+}<|f_W#v+zN<lI^{wvnU43Hp>L*WDKl#5cjbU4w)wZ;>Z4<1v
zO-S3eEp6Mj+uLqW*mnE&w%h-={ol6j|Ltx6{~xdUf1=O##Qzf~{{O!{!Rq#ewA&LV
z+}@T3GI-mz+qWm&zWx99|82Mb-@g6-|C7~uPyU~H^8f$q*ROw+<^JE61~TSE-~Zba
zK!)AE{r}18|NpoB{|_?k|Nkfd|NmcHW-^n3fq}EYBeIx*f$uN~Gak=hk;1^Bz~JfP
z7*a9k?cDBq75Bp9;q9VxQ`u!Wgl;gk&)9Hm<AXOYn-mod=gd8>+keC`<47(O=d&Z3
z=ITm!<Np7i`EK6Kx$fV6%KhzErM>?C^GDR~%fajBzJ32~chxbesCV^sM*FQTlT?H}
z7e>DRS~ab^LUH1iEM{k=iB&EKCU}UgVk|B<(k^|kG}Bo{C}nHb3|051?^5O+5f|dz
zGwXoJiZv_S6emvk#C+zo%B3SqS(fEYy4k0_-)6?+UGrkJ?@8}_qU@gV`J}AE=Y@IK
z7?htUuGwwC!Xv<bq9!Ndj>`dt!iF=#264p#1}XQn4b0p9J{#!APxhERO=`y3pBJCi
z<k|B(n}U_!k!oAK$s+0XU-dIy5Cduwrm^#VHfXk7_Th|xg~PMQOozpqrm0>v@Q_vb
zJhAblwPB9o?dlV6Ahx)(9Sa2OvtfK}%FgKg>@U;il3R;>z)o;yYZHrqRMv3jIP0;>
z%Kr&`d*kn`@8pP|csN&1z@Y5E_9OvD;hQ#d)Fc@nD>12Us<fC}$8^k<#V6%+LEBVL
z32{YMwbP;(Y7Wfil(^%>;lp^kRP0zyO@iAIRpo>vZdn6Mozy;^j{K0r6RKKxBqFy@
zdH*qd#-8U&2?gAu29ej!O;r3euVH4B0pn!NqLhq1>IrI!E(cOh$*ekP)N$`H+p~Uq
zn>lCqeF*=1`}(!E#>-~*bIyKy73^i+e%bOT8?V9Ke_V`*_b_g@%i+27H*9Zz?#kN_
zuARC+v-#@1j(~`Umwg>m^+gt+ez0e~>fQrS_CG9hJ<V@0`}56z={<kb%&Z@*uUjQ|
z=h@DX&;aZDdGGHXUH0!>lGE`D1;%CVU7C!^y7mXA_^QQinC|Mk`KN2#>zbFwm0zv*
zTh6I{`Yz?0y1o6Jy+`ifj???x?RMAO{@IQb3${lyTU`p^VmH|PR<HIc^O0(v10FmP
zf%m@8zq42Kl<oTWpR(R}&*_{UwR`QZm}mO>=bq}k+1ov<@y}Xj{rO@|0SuSzMcfX2
zImsdscw+w-`A@EKU!E`8^t0!GrNZk8>+J+z{!5?T`eNP{z3xA==U@9=?3HEd!_FPh
z(ZKm`ub_eVPv*H9mHXd(dCsd9Hl^ItH}2KvZC8@Q%x+k4G&TNu8r2^crn>0(qLYpB
z5)G2G=AQYL=l5<eqd}#kw#P=@=zVQd|G!_p`O^;Gz<bl5KHBzIeG&h8m*lq%q5)U*
zrrZAd|L<aSyv>u0lXBfk$4y!oW*q#gf1`2d?`N&gjxPA)8`EWH_5RKL(@~4G-fxNw
z4b+|F+Pu73Ynqk2U!Q_WvCs1J{s&sV?VIcH=CH@fRZDc<hc4Zq7nS0wWu>z9w37Y%
zU-dul*Q?)~W;?B{?<9wvfvim1M5ZUT>Wn*<@7K9=I=6DYDer0f=|$6)Wo!(c?phc5
z`^o<>u;Pve&eyf-j2vfz`kMZJ3otu&YTe(-y+3vz(acYI`*+8IWrddi-4`5Uzi`T~
z-uC#CUw=L{8s7S{C@zid!0)_8Ov_#=MxPI_U|crCNKm%q;!leeF|)!q_gM<pmqn!A
ziqrcvJ$Bk+t$N$zEx-OeXf(VX)+sY%RoljC%a<DN|B)28ZT|<^xC{CBrqoWo|7Yc#
z<@)KeKP?LDa^Guj`X3jk_v!Q3Y5IR#($}VG-eyx%Vp3c3y^AGp`TP{62M1=j?Fz`9
z>iK>ztHGZg-Dh`x^*3Y`j^5B1==afIXhv&<dX6s-qj0n^<FZIm#*g=yB)CMoT^BS4
zuJ2S#*rt?_)ZM`OY%i~YNVH_P0`uZX;l<l7a%xPzRqeY-S~YsNPMBK4qV5LHr+d{F
zCZ^tD;_1or?K$SQZ2y!))v-<o9*8jtpQw&q#JDU%-hXc0ize=#GQpc7jW_4W=bn51
zjXQ;7#*JBg23w^#8@}Iiv0t;tA}Ra!+%OiOoJLl+{T(^04(RY_$g%C?n4xg*wf@WL
z$DVA_S=rX8x8lH;HM_3dI&q*PpPwhbX6J_cnXU(phy^745}W8NB;hV-u#r`G#ywNR
zDrrfc_p%K)|MXdQHgxJT9ozq%?|{ha6K3*p2HJ{jX~lN&3Os#`LNorE8V0kpt^Miu
z!_+sXN!%rYZP}0NoD_yV@;jEiKHTx+*yVeLmEU{Y_r#t2zpK*s*s(QPGiHbDAIWO3
zzMWDWcVx}mNCw5cZtaExJZB^PgeA6Dl&@%r+&{Jcfa?DVKkaK+_TD<Duqw<@eCz)u
z9ufEAqTkz3^mx&Bn^VG!Pr}TinpspruCO#$K1fv9U^ai<r?u*fif-0?2yi>1%k?Me
z{o+6Tb*k%Ix|VRv)Gj_zZ!Z5Q!_0b;phe|bWAXRTLyONC_<d-Q41KndskmH;Kgjb|
zdt~L5LzCyU?74O#@nQW*SBFiF$5aG;6Y}DIH)c$_nk6Ck>A|xP4f~HrmscKIuh;iO
zsxyO${mhOq(Wr!dx|iq28fYi3O8iuI<ClZk@h9;+#Y_`iqI2FSPP`*?&eF;J_JhWr
z&By*f-eMrQZLh;|y@uZwj?8Iq9Ins!7UPr<)5;-H7$(_Y_V3pF&rbS{nO6+<%=~(l
zUrx+3^5PTmYe$(n*bKM}HKO>=oILX_;X+^&tB+aLCOKV$(|dgL_D<muHkiW@w>Zb{
z&y>vp?+@qv*Lc-sv-5WtYY$Jw1%|e8=S`kso68<DvG%m<>P9q1zNxP>%0Hr7{qf_+
z>vD$Q{v7=H+JE(vN&kO8dc4_4SSexJ9wWirP1}z+%#;w<KF;boS!cb)r+Xd~3$|5E
z?qLqLnJ#6p==|qXhZpfD@6}FfQDA(W8olqgil0})r+A-#izDOj)mI*yxA)(a!-Zej
zv?tvzpC31GQ+j^L%nuC8;)WgPerYda-1_d!;Wer0OFf>v2siX9J8^QA`N>aQKbM+6
zKdKRV<}xD#<74%pOCb%F|NcET+FAR&aN?5{F?09*coJADFPE@P$>Kmo*S9WViEU4O
zH&w-Kx?TQ%ruoTFR;{-6?=PC|wArhrJ!5)t?C$P{!i(SCZ3@?)Iv~lVe0fL8_Wb#U
zQJ=yj)t7oy$UozM|Nqy)kC_v@vu5023O-z6z41`#)3jSs%NF}xRcbg{T3S^a^~dwT
z5pj`(KXZ4P3nt9_zt&;N&Gy7a!NrwfrO6yKZZI+RoNt~WYkqkNvs>+(A4@YP?fvm1
zq;FDZ%SW!ZK;Fp#1`RLI&3hwcP?NGnB4MrUf?t0Qe!MQf{dr=FckeHQmo5i-zTeYo
z&wI4VCgiFgC@V9#ZA>ZZsa(z>_3qy7r#EhHO%WDkNeEG#$|0c)%Bc(zsXx^cdRz`1
z39CxD65AK}EOrrtRh9pNH!~(NFP>?pn9$QAA;GmdWn%Jgr|n<58w`b#5+-C#I$+^q
zRQ~y%;_-8N3a>dgt0+f(c)21e*4}?wQuDIV8B3Seh0J?zR{i$mH&=7_t-pgmu3C2F
zK*sm#w^9aoc~jh+SbOx&1a0(en||>rqxPhv-TQrKEY%f!HRtrNvaNjq42$(|ShMvc
zG0&W6z_^%qv&y&c`p^EXO*&sV@59`rGkRw(CB@}gPo9{vP4xOb{~x!nu3CI6_qL7x
zUQ7M^I&qp)MP|&~cg*ASwd2z*E9@;3_B{{e^8a;6$Mli*$sH-`n}s+J8+bRd|9tgs
z_WnO<Gu!{$U;F+4@Y^fNS5C}5>nis#%S=C4bo~^iggJY^bNZAs&zxy+)u1+U+K-PG
za~AGl5a+yqV$R`I!L*eMzI&p?x_eUO!mb3S&R(<P__nei+I7cP?Acwh^q+`k<IC9z
zcT5wkq)(h_;h3?{!28kkMUjU)zKa)k8+bQuc{H_0TH$lYJYQ*ve^Fb0d08(C)Of#d
z<#o4QUlEDh#;0ZXeCO$zEx>qLIIWZY?PT9ox$<szlp76sHkSm?Jeyzhx*_+oK`w9b
z6V2=yS|@~0NG&T5HDpXyaXIkfu#RV(%VwXRNu4d%#b@*D>m1UVS}P%UXwLN{SGl+^
z`Eh?k?zU@wy7J55j@Sh|9>!pgEi6lxS$ka*PRrD^`?bfKKlo^v8TaOpo=I<Qr~Lh+
zZsh-SnuO}@F!Q4g5fjz(^}`|~e|oJfIq)T4^`2^i8wbCE;1zTJ!$+f2wjEq;Jxj}A
z;aThF3JHf+rZ1cCInV6B!MFbtd1hP)WiU#3^5JF6?37?Z#>Z**EZd)nJpHU}=T)4v
zyJmVr=h~11E%P-vt(HBQ=WKoXy-4V6aLsXXPkq9V2rbi-3$z6d1jF1HF}3Nk=w5sM
zn{&pES$YPJ;zB!~Uy$RfJ|gz*xtV~$#;I&GG@_LP86Rsfscqws2>;A-#!rjWVB#Z%
z*4wrQO6+G3KM-SloO4gz;M?rUk%wo+vGl|*Wl#(IknD2chJWOyHq*Tan4A-*`4k_q
zKA;+MqQTJob=Hiz%xo(;B+5VgS(?;Jyw>!-wqcpLLc)QT$XBLHOM4ZC<!5v(-=@Tr
zCT{gN;gHT(Nlg~^84FDfcXRU0-(Di9mXOdIDHM8+Kgx}#NzYemMnECc@jE;_F4x~*
zEHdu^*XASd?bdA5oXsBF#e3$#tQmJ%Kn5*1q%(C#u5zXXTWlAPkJv7z?0pW*J-ZZb
zbzBY{;M#nJ<(SfopqPYB8=mc+e&~pmeDUUWo@QSaBn}+X(ae^ZyujPA@#Llj&qAkf
zV0f(Ma)5zrv&x}!cUChd3zldq8Qh#Pdu@?`L9`<yThI*Ey6^MrH}myWURYXjAmx|$
zK3Ro?ZB0x*EWX-jf|l(U+2qo0AvmFdaTRB4<f%;yo^eX7E#sUa(Z%F*O>Y}Z58I6Y
zy8`yD6=f8T7Hl}VYqR3V2F}7&JL?m~HcQI0@3NlxVZ$dE5t$i2TeVvoG8s1SDOX&!
zD}C35k5PgK8%0HC=!AdZ%6TBflyKzK>97CJr(bK=5H`5@RDMQ|_V3w$pJeO_c-PLx
z+7nS(S)5V-Pl8c6KCV$ylQa6sGOnJ}O!Z7^+x9SC&aD$P2s^MRN&3k8JYRjLW9w}g
z7iZN88nB%C@`PRDwv(i=MCu0#rnZJcVMgO?d-xN|9`u}Ed4k*En)7xR9^GEYRk93j
zqTJ05o%<Voa?I{kM{v&xafy2L`-^0>$X4z6Z}F{+qNhK8w(i>c-FRc?vKi|qwcQHd
zdwcEb+xyL)Z(jVZI`;pWZ+m_*9IM+a#(4SVVG&1pomS2niyZO}M@^YHEidk8(ZA#I
zCtlk)M2kA7>vGQQUeld4`{o{wD#gT0<$pt72p9x2y1h$^zj5y90@h`>Vsy$1{yuds
z`#g<jX$b4D(_3%+?s)%k((FIoJG^hpo+&a`<9AYSR$iNWf<ca@;lJv)mQL>^<r#OB
z!U7FNHhF6EAF#-|q?B;$zzGMZ%>Fm0ZC1VZSl+f$N%!uaU-`w~=F4AInqZojbu@NW
zQpyRbXIqUdCUJ-rU--3Jwl|a8r~ZW6-ZDlB*AEf}2i7n$2#2K}SfW)BB%1m1*;W7j
zn|^)>=JYAPzU0r%^Y#AUPVMk^6<IdRao&5sHpR*1Isdivau*w3&6;s<f^StX`!Uri
zf{d5t!tVWElrib1T-C=<TXzeYopgDyMC;O}v#a<2+I@ci-rV%3DpS(Mr_KGhzAoTs
zY}Pe{MV#9w^lm(C#Bt!;`Z5zWQ-iw`e5-2fj|fjc<rdAM=b^XC{p6?hGmf)vvQuFT
z<_*rD)H%cOw%wVd{`Dm#!LJWbDLlDq_Not_pTp$cj__+Ur%am|ziPkL#Tg+7Rydix
zG~Lx!7&S>|XWPqdQjS**lv_k41T9wfY?-ou^SZh}sZWE~C%R0Sq4h3Euyv)$7T%pl
z)_ePGt1n$-xUwOzHRn=yL+6{n@0gU&tIxR3q%Jyf+O~`8r)xsP{r2pfclD8;=Cj1E
z2Oiy7Q+)m%Ro33R*f8|}{Dl*Iqk377y`7@Zw2br2rU*&nr<D>0QsSAN4V`cHa?L23
zbbFt$^MQ!$lqE|i9<Y#mD=R(Y+#M~Agl*}uK9v!bN=gYz)&2(_T(d~1I`6EOz|)x6
zos`lxE9Jvh<pW!6TUmP~^cMNqbM-PU`)`xNbWB1bUC>~o>j9T<^BNAWH9Wv0qrk@{
z@yt+aSA9Z;99u8Pj1%`R+wkNG8cf`~JTdi-6k|_WtUaUi0iQ5y=APrq7iyTDKO1yB
z;p?fJX~dY!>9eR(Vp2DU1j7M~Y#xJ``zLW)8q^e@H%eV_uiE<9%!ZBU9S;Z?$Tdca
zR4-dp_KUGb^>SfDLnkNC`!DNVGjy5QRx&r6e_#8W{grJ*!jla~@=D4H8>|dm6J9-j
zz|i=xQSlI?aaxDkPh;l?2QHl5`})_yDt^%!MRLa!0y3jPLmeD5W*pei+7o){@f-tf
zK?4Vw87c-_kLDj}D4eEgV5=T=SR>$uti+C;^~yXE?>Qy*#_u?tUBu2I!E`LU?=D+f
zLaaTK@G{Ob+tO4LZgIZ*H0ur{Q(Dl06cev$m;PLElh|>unbnQunp{`&+6jgR&GAwY
zC2Cp*MRIQQ)N)jr*gBYN&H1mrYuJ1K(5!Nnv{=@I8}2%~fyQ1MI@!+ry0`vR@V4&7
ziMrsinubm`pB@DX79Xe2l9l$)(p-5zpT2P5!#Zik$){>QDYf6OcIDm7c~?a_L1>o$
z{S`B13=UfVW#M5o)=XHH_*6Mf6J*~lZ-z9ZV>A72Q!W}8X5Ma0WZ{uu=a{kMz>ZTK
z5*sIVHh3n<9jdy2lCk)E?lUcrj?1iSUk}MWwdwKBUX$pn&!o1rQegKZb@m>IV|MF`
z?#_w>Sz((n!=mL(RZmX?<6{T^NaxqJf1M97yM-8U`#jC<zzKez11bjgoC!kt^{-`B
zxi^`#HF&1VooEycW>w4KHGb6K%5uM=h@E4`jRP&O4+|J{o^iHREowTzBCD#LAT)D6
zmqF&@RV$w-%53{=zUHOtfh9)s7k-m7F}S~Km!AFZgfJt9Wil%j6O?AFCpa+%Yx#Vs
zV^Zt=S*CgTX{~Z2=NY35nx|NNgg(zb-h1kI*rZQy7)=fKT({rMx5?!|12}P=31aye
zEnrX~o3a1;T=ip5YONXBd^Q?e@)%rwBFQLx*@p4)Y4fM^>MqtQCJ0zxsPf<Vnrq_s
zyDASSZhK{S=9x`|{4yVo86D3!CGz)Wx}Ur@H*k}<{CuSDjP|{B-s~zt1I{z)&6Wz)
z{VWoJXHA|ZuIoF`A`_lJ<>cGl{`&qmH=D200VPo>{V7Med%ssSocy|9{PzC*|G)Cj
z-T3@ne)H{eIdRXvQ&(Sh`^$w^a!4rf`N&A5&gEpBF)Oa-)B4J-ldfyN`B~k+?c~#!
zp^*po%z1q)VrFI7B@N$?p38sx96RtN)RXVb=IgAQu7`db)K~n!&fn+noz}MIO2*sx
z2NV97^K56{Dn9FZ&yi|hru}UvwI_?um1>LMVYSyv_n%6_0gDS2XFB#?e<o4<ESVwU
z$fX%>A5O1MUUxZ7Uaj8#|Lad{UL6xKaF9_*c*LY!`n~tqHi@{ydyu;z%;y_lwVIVN
zalQX)>A-aOTCeZlu1blUE{pAWEZ9$p|0-%d_<Ns>@}d<iENT}xQ$T6UGeNBJ+zyol
zrJ3&~eViWHDkXIJ?f-hM4wN__-CvXMB(vxHiiSc_M&=`o|MCy8^E`aGLtj)e;Z5-y
z1_Q<Ga*h=i3mSG>3ugabdAa{;<7=G^oj4ADb_s)|bCVhlzB;gCsq)Fa=DTn1WN2l0
zCe1It*^;sOYGdK)`@z-yf-@#tMxW!$i`$zJrj(Fi;c!5Op-q0Nk13BAyBk}l$G;yu
z`S1SD;A}{oUChL`l$pgRCn3i5fI~q-j>gp|{rwF$SADZD|GS4{Um;UlgP{;3^MS^T
z?0l;AHOtJc_5Ok!DPRz=cl*wn4L8*s_6fD{_1I6d{`puLG=9S&QUC1jHhmU`XYY<Y
zbct{~z)+A-@Ln(D{YIw8WphAgF*2!f8tfEnG@l@7pjec$V(<2SH#51*6cUPboz8s`
zHedva9p^ohl(u(DPlM-chiQr5?mbO2IIv^OaS6uB*BW!qoISa>eD_V&cTo%pUBSQC
zxE@d`QMerM^kDDfvkss@oqVp*r=GL%`;5kutEcDXq#6qvtdz-U4RLz*w_~<!lKXGA
zv=)vTE__?WH6DMeJ9E~cLGzb^<M%JZ2LFmmym+<VyWjOW(D2*qfb{~7l`SWJZ#2Ix
zFY#1%#?v)Z-ky9Mc3_8|nd^sM_tFEuB~PA|mp4mL;?)*5uq#@@tdab&PV2yqu7=LH
z4jsZelkM$x&%WyW`^14eGHvo<Y6-`la}+7We>&dI4;>W0Zy?QjrX}s3lH~&a1w99=
z<ISBJK%?VXvNzKg7#>Iwj=C*)yfNUos%m}BH1pfv9x*X)w&Ac@<8z?rwBcPbUAu%E
zP8T-yL>&ImRcdrPH`&7AVWv*YfhTh%wsGuvyy>Ik(~R@m__<$eGrl-5g}MFKy&Own
zQ6>p@OXkU@leSHMxnHP&uf--_2ONE`*wcRR=6s{w_{`zL=cAMC?NSa*$^NZ;?r_L`
zd&cA`$p$7o8Skwv!(x)pXwP$ZNpL$MIOEpyxo#ru2l#l}+Zx~08oM7nwe?SPLuNL|
zjLajPT(27r_H!k?m$nRBeXP2-icQ?$^v#?++f{Ekd=_(h9pHIlz{Sga?YA4>IrrB=
zfp>4r+J5VS0Mm@4|DLOVK3h5E>EBbLMi%=%vhd9~8|wIV-#q6q^|{`mhk1kzlA`M$
z1W$=P$;OyG@o<4DOThcrC%vjOm+p5tppmvlU7*fx2J<rRki@EZ@2I)cubpj<oq4X>
zZ1xsrhQrhLc&5o8zRx)0U5_c_;@a~TCOjVRvpu(ezO*OuZq#eT`BD<wo?SM$mL7M5
zdGU;mY6&IpQxng+SJyb({?2|{;jsSalLI?C8#rG!xaz1j+{+i<%od)1-~R65i@6Hj
z8<*SvpWtQjLH?4&k;V-BMTuvp@11^dc6GJo-0zo|gw;9NPG3<@V(EFcw}RQx@$C9D
zXTS4I)4bPxCGKk3uiWQ4($~HyCCKFWS<IBZ^e4-}{cUU7GPl2RK?#eFgk5{LQ8i)L
z`=c=vq|epNWmr7BbTRXVhQg_;23GrjnY+JLG6*ymWi#F{b>`yEC6YS9d&Sew%x&<T
zeE8k79gTrZGxN`eO5IyC@1aV96er{58bQk)$r7L6?mF}%E%g5UhD;R}pU19m7`{55
zDX&s~X0H9~->KP)*GPZjIkQzhb>15vXW<H|%EMV#-n#8vWV75Z;oZKu|37c$mQG+R
zp3!(m+9~6D){Ga+Fa0#nzqRU8oKe>KrRx)~{ocQQ_9yj(Kh^^OQ*!S=JNx_XFK;(x
zHp6drU(8SD#ck~NaXU~^en3}FN96tbuctL~&r0`rs<W#_@?Mr^D_!1D*u&0!r26#9
zU;n(>3R9JG+*@z9D<+(J&hYuO<o%rOGC2<}eK2Y~a^OaHgJMFK<*)6bQSnSXJ=r?;
zOvlzUpJSY&SdqV*J?F=z52t(=M;vBsNX(XNxA`IVRBnIOuU)&Dd#V|pe!2JBT3`7L
z|2tj}R-Y-!$2n&-$|y5wEdO>-@k95;r3-J&VCk__OjuC0zlcjWtt8W6M$QL~_FcRw
zGE=AcZkqRVS1e=N8DWp-f3r5|nw_%=NT^tG<K~&F`9_S7&o>5^=19Fieni;(YpzC<
z+lvF29onbfT*2n~iRtOV#=^%foO|RelUg_CGmA<vE<SIVqkQHpi_h=9q04VO9gsMw
zZs6#@l$rm`iK``sd*fH~t>k#|*FogKf%fMD2AM@ZEHm=13O#)I#lJ(y;Fru{v!**T
z2OBq5`z@|mzb0xDv+xfa=K}{?Y$ByC3>Gu{x_;PKze#n)_rI5ISa=wj-+qoYZmxL5
zxc7bZm7RwVSggP58@IsC%D_&hI^zBBTS+e)IjhyIuPilW;kk0&yy{^$|NH9ctKRAv
ztozM7k@@k%3x@*k{f_wY=;-f#T6$Inr?ZTGZa61$N~At|Ec4Rf-tWjCLNYTJJYMbD
zzgwd0rY;LhRszqmRhMh_UH$M+*Pn03ojc)|kFp;NWjPbl_;E+jnaSU650^}A6m-{c
zw|sZ#K<e@pF*6zsBj?Ng{9GBQDJC~#g0RqmY>DkV`a2p8Zy8B^{ahKZ`Rw%Xd7S@a
z*^a4-n8ziYIW*7ZPtCPJZAS*-0;fgk%s21+yR%Q=fQ8IAhXWO#?kQ%ay1cJ`*1U*$
z^Ns(1QubN;+pf_Oe*L)R0#mZYYm-aQi@TyEFIWF<sn1Dp*<U}e?$IWXUwmtrC97{-
zWW4<0bD`b*=qp|l2U=zybY}E9KXHZRi5K7U_$1^Pia!3l(`{|ftG)AHo;a{UHGh(7
zuhiul|LPZIY@hy!sI#BxXYBj%bI#(hV_)N}AIeLEi<oVDTA1A&k8YcA(E8H3qmAEg
zxOpWs>D}vR^4Xx7|Kso}*GmhNxO+D8F81y`)$;4}Qbx5mk80Q7%Ra7JCMS{Fw`O96
zxx4{;LPD7H!A}Z|i|2mm=RR}SzANSPL)Ohf9tk48(^gGzv_5|C9;5GMV@88!#{I{C
ziLuWJ=w4N_IAzc8O$-~Rt(jJ0ee`zx(|wKUJO?t^O&2jIZ&8sHFxd65bH{-VvkxzR
znsfeLgSXf&&uemJYyWG#W}j!sko>ZC$NBL2t6M%5v=zO0WYZeiy5jZWJ9BTihw<HO
z&-8uc%R1xCwmP0~KY94#WZ%y&|2*qyUSZ?O&W*9+hYywilJ<6&D%DF$c(7)wvE{Am
zJ^33OI5+2n@036Gc8{G{;*>S}EH>Ws*!r54fr;&0R?cT%{S6I)em~q<(pnDjYo|Yb
zUwCa*@C2sG2XDT={LXfHy~Qz0ljt(1D|c@+XsUm=W<JT$cyg23*SNFM&tCML7cvk#
za7X4)&ZNTBPwA4<29fTJvK#jAv`+2gkeK_O(X4Gn<Hq}(ho!E4`SkJ373DW!!Sxp#
zGs8PCbj`VImy&Vs^{e9<2O2mxr%YrvGPrw-C1T>`lG)8a!~`W?bLNI8m_29d*)KEm
zePzx2`RB_X+v&V_T_m@ugSF@HHN$HgmR*0xD4Y;=>HG7|cEX%fzQ5uR+_P~0d3Oc|
z{!O5@03Y_XG2OKB@#mXyAVtwF>rb6syN7tgp8IOAGQ;n0wceMQn#(u4&PgSK>FlP8
zzcqRj^&V8jdvi#fmif@YX?pt6=g*dNcd;M)?Y1b6^Lgdt7Pc8@e@;Ao!-z51`^sGL
z1lM!ACOjhVqdSfM6w4%t%@NfoJXydbY!I_@`}yZmQfzJC@4D=?JotWs-5chqZ;B#X
zCVu$doBixf^SQ^rf7P5@nCMWk-h)Hp#sQA7BmZ}9ytXt-nQhOBo$YOn5B3@bz7zi{
z)$cAoy=O6#hThD;z7q#ZR%WahWR88p#($sr?cR5jw3Hlq5)K?yH9jdQK4YJrZIjaV
z>NQ#w@4rqDS<dw<=D7L7#MIgB#{Z<>_ja)DKk-%m4)5J+ren{9I1+vxKX5>N=S1~(
zX12DKi&j<kMCI0`+<$xf`0?}}+xmh(zb<R-eDZ(aj~{E!Y%xB-)6?jvU-b8I@`b(f
zCl=1=;^poMI)A_VNZ$V69ca@iJIh#SES&tHQG93PL&FF6_@4#zr2Vk=I3gn9c=YK_
zc$ekhGf0<ZXBo?kgO15JT=Oz2c(#4dn}7axV5r&Zsh^|N)(6jmcUr90ZsPnK-;_D^
zR^x-98mIjGGhLVeKYG0K^XpPauZbV*&dA^U|F!w?<w-Lgl@sezdTy^uu1hiEHxv5j
z#@{a0{$_6^pR4@Y>n|5RJ77~kA^GB(#2>fAmxnJuI)68#&$EMWhm@8}l^uP&H?!}Z
zMnXcuuE6BH`_GaS&)W6WJO=e)-Y^)reg2WqeaFjGxbIl?XPK_VV*mI#nO7uEc4tiM
z3^bZ(5O>hP!L;XN#)&?rWU(xnRo~4lcL{HHY<%g~yVL5KRrcA#C)A|o*!ff>)Lebz
z*)^wVKZn%&w?!q>|NY4H_E*p93CKv;)9bfPqiEU2pNUoZvlm;}zf9edW)+y+!o>VI
z|DSf<#AwOm&)Q$?b?!S?;^UAY;+@<xMMmPX)`7Eoj*E(2?4IMgqOjqf_0tzR87G<;
zAFs+}eq4Mp`;Ah%aF)!x?|qiH?1fl-%sDxFuGe}LcF#%LETQ!NZt)iP>9%V!jpEkk
zEctRkf-l)}MtiZ|j;)oaPn<lkM}G2R(_J!bGX!TD7!;gi-EO*`kGJ{g?}?UC`$Zp5
zpXtvhv6)jV`!iT7U!Fs3()Y#1ChpS@Gj5)9_Sxyb>Sz2Wv$CDp`QX~K((3qviua1{
zn}3^CJ)f^P;r_qp>cuIIf4Wo{peFP4HXp3Ex0E_~jhRvT*Wcot!joM`QaD?tR$4r7
zik=m}leLNU(cb+sUk`5Dcu<04#z7g7wZ{8j^_DQ+tzK`LbyzO3A<_Gu%3-k+{jCga
z7j`}fdlvq#P?xddy|w$=RkD)u*<Ou*P8~@&J7Hy|$MdG>ClPDEERQ(w-LB>5+s_;<
zJ+sx=e15-3zLC1f>(}k13w!xf>a2em>ZQCCX*7&5PD!%MVE9+ynzuri?e_12XRD73
zvCMcUma3e{sP=l*L}hNdhWp_&BTAoKtx0&lc-DHi>D9Att~+2MV+R`8XGxf%t7~iP
z81p4z-;rb^RjVyOul|kE;V`(Xdn%2I$>+V&ZV8JPec{y&&BrFQv>iU=KD}}lXI>3c
zb6NK%0|Pm+HEMdop@+Gbe)l|cde%~|-E%zi-tC?-|AyF8ql>=tQtZA7EY%i18zy1)
zK6vK&lN#}&_9m_$1upckyGd)6MI<x?`kzm)V`^WbCHyu_LhpU>%zU%`PtN<k{k~;Q
zmP+LJ*ak^Oivt=}-@aN_w;U+3{xM^Zf6Bhw?<OUuuDyTx_xIO#-l!S8{rK(K99y%5
zDTj|{?D0>HyZRuADLFBY`OLFFCsK1HMGV$RDXjCe{+4AIHZ$U-+mV2Z`RDeeY53Tk
z{%1Pl+W{R5ZHw=RO^P#?DO_Z@Y%a`szxw~P_vK4Y-LPg;o36KeUDd0(?FV=6k#DGs
z=d<wN*6`up_Mf*FguM-#EN$y@+vN|7puvPQzY7zNaMd#0t2Vp8#%PzN&abyc1v~RS
zXPO%1oD6i_CC}DSDbLpvwQ&BO>h;fde^ymK``P`qxWtv;iI--}zi+TI6Pj{f{PLbn
z=0?}{C>(qFjFVqGnJw+o^QPM~w$JY}H(wvG>UzM%%>Gj2$LOd6`+cukxBa%e_2-na
zfl<twuT4fw$J&|YwrzP(SMw?U_|=JR&wl<`?7f5SuZ_>W_wkSBw|gen^)RoFwRl$X
zVp3V;68rbzc8xnH2mZ;3u-wJGyC^IB{?dJ`jxPSLy__S;w(w*h$BY|%SHACb_*cVt
zmOn(-Zg2cg=CtCvE%&N5#82GlXpnq*AWzn5WySgx(Mgs2i#W1Y@i!G75YuR$=xp%*
z$$@jSPB(q7aK|62+J9-ygpKUS0$F-CGq3)3h5O0*=Xd{HI5a)r-g+Cx=34*ytk2i@
z-n^PwW%F^*hok3yPknok=W>tK<Xd~zGAEqBa(T^?@81jl=+|tlv8ZcE{Fbh1y5=S8
z5|?Hswrex1Y-juWTss&2X~wUc(etM+U7fgr{h&woy<?4j&r`Sje5a<}JA-NB!>lFg
zkEhN3o+!32qW)*uZ|;?s<+YBR6=mN)Ti4IAc@5LA?z$DTQ-yLKcH0_+{dETop{Dgb
z&R+I(*_n4|8w2L{EcBMjV>`nh^CRj1({wZCDI1$7-oO6)>J7tIff;!lx^8us&G|6z
zhS)bg71{Jvg~?g>+^f$m|1N3V|3l1HV&}J&>!eaSqz&8(C!9K;E|PlxO5>BqK3)aY
zd3<|<&TvYk*<{MpN9^48W8phbPp(6srPe%B`1&RLjqC-zSH9nW{IU*A^KkucXB<CG
zr20{jYIJJu{#R>HEOfZNp}|v>edS%YCMKV!vx|Igb^m0zmwt>pKABzldEDLiKdvUQ
z2pecVQurx#Rd(XxH)&@JOkEO={8@VOTGxw%CsYl6_ebr&m~n1Sw+#Eql0`>uKfkT`
zx#-aSgwJtb5>px7jXkQ;b4qhKIxONn_gHvn)GeMk+njf=Y`vVDP;jy1Mgx|^h6fBE
zDfG^Y<e8D&^=$J&nMe13v>!U9cWRr+iU%AVXC6F^O?!4+?rrSh#EQ3Fvwt>Ns%74L
zV<Pgl@ATQ9cj^jmW-QyE@#DTe_q<c<LqivAnP+Xg`D)gO3J>Mak9S4h3rlX@Ss8vd
zUCsRU^F%TCoZQ`MH`yeP^;ci|dnccJ%K4RTUFY_xYN|bZo2}X1#auY?Hsj~2glPvC
z9SfP-wd|ij$CcTBb!wZXncpt%3pJe;T`Cvi8>d!wZO_ThzF#|1EOoE#PSR<NEPd6#
zO0?|kth4j-T$6vFxfQ%~SL)ZTv)ipD6@SUk=$0w^eDlLuTlERLY1RBQ=f>@myYzk6
zs_8~YpSm5p_u8)H{tf9%EK_;K9;lrD-7VVDyr1dr+K#PV$6mP~+ZPvbd+CA1-Fb1l
zA79EeocXeD#?=QF!5^KjTE5>_&SP<5?R~jB53hQZ*%e64yl!?fW?7<6gW=oaY^&#P
zcUy0D&y#g}rrld^Qy?+(`K#<nx#ybSzT6%W`Y8E)^?$+dY3Wt(%N`gQ*>jw!O1rPa
zz1g+0CS+<|!i@uYp7Y)mJuone_x|E*G~K~_;kPf}kGwUy*_RY{V|MlX=;?3v9FJ8y
zvB%Wl0n^Wyw|t6Lo^Ifs%oaYg#5pYD?eaM;GZj8xJ7BPlA@uMIt<KQMQ+pYeCr5n{
zU;cN>j?*kN%Ng8sBG@jqYo01FKfX=vMYeHezMty<ODAkx5{h&kT=(UCKQ;SrL9Xc|
zd%o;X`n_kGnU~$*FFx`{#B4(R;uqzwM10TNIs8}tIo<8qLdN3qq_bX!XT>eHyRyxB
z;j670$NToO>wTNjd`8){UngXZ%%)2{-Cw^IaYz`+3(a_%W47J?vyxX%>fZyQ<?kjo
zD1NTXzxKBM=Kq*^HhIgh96WKmd+(mMW8Y_i^xrRj^F!w0#>Z!$9%+0QFsVK>WnRO^
z9am;AHoNxbqYh_6ywuEgHlFBDYB%q4u1QSYEOV4+`S#5!hn^^W_Bi|6>TmY+ObLMl
z9js}}O*@o+TsmQ6lW>QHSz`5Dv(BOkl}ny2=k&<}FOc2XDCleC(XIdYnL@&eJ>dz{
zYHE1Wm&-T(e8M;3=Z*s+(kBG?v=1B1zr$$cf1u*5<ADj4^AC80FuA@r|HS>t*!cm&
z%zh4^8_K_V{x<yquZUG<GIj!uvY)7lNjM~HZP%LKc7V}HUR<IeaazrDkS+cRGydM&
z*k-yHzJ@mV8))?S3Rqb<XwpdGGfU5P85W+I-?@1nC`g=~FUiDyq9!F_0^7lcB)gr=
zDRz1W72m(0JIsRppu$8oJyU}|M+2S-pYn}*E?9WY`!&6Bab4TgcGIQlY%Wh$mPax_
z-qm=fTic-JSm38C`xzLWm3*B_6Q*5dGrC<VA(ZL<B)!tUbBl7<)tBlM)fTcDoZj1>
z)LP$=m@1Shw2FE2xypyHPrOmrWB&qPPxW^e&w|_A`}@yJ?6$JA`}gbdm2+QK6$t)I
ze%kk`o$K$+d;31`&|1puzm@IGvp*g3i*3s9m9M<q-T&GBTbqBk;+H>r-QRrM-GAe0
zWR^dhYV47Z5jQvQ`N3Gf?7YR<qmN~(R`nWq7e}7{As1Hn?_cssgACip{x3hhIjY_t
zRBg26kgH7p)c<^p^~<Km|DOKGP^`cB#ma4sf>XQG6Y}oYYR!|bc^dc3bW_Gm#;}J<
zeaBDLuRUlV?C0^(qJ3W0Vo$U5BJDGW@+bF%pZc&r@|d*c@<pL+f5bNy2p&xq<!h>6
zCNtwvA)oElV@IC;6Ta9Qd3%2O#rJ$&^PT=VS490`-E;PAX=U4^jdrW8E=-ueGMabt
zb)6cQ%Hngo4eeSNZ#<iKf8D;I6Y+TqPaBK$fBm%O7xxF_y``@Xvk2$EJRpBgv*MwB
zr~W_A5<{JsBOfACoq7HkKWz~KdBJVw%Xa(315(9o@yz$mX~wvGi0D4X`z8IA8NajA
z#5V9Uais(g6>dQTl}W7}5<(}PSa>>96q(rirzI`EbXJ@Hro6rP+tcT|8XOm&{TW>o
zn8U}D-ZsUJg-2@b``T0CzXT0DT@Ng{nDqa9jqcC0+VZleOzR&l*)co(|Gi%aEGF&d
zkkEM~eSG>Hfyl!hy%I^amPe0tX)>{O|5#_Y@Ao1Gx13MAt!H-gN-oJzO4yK5c)(?A
z5JRv_tj(f-J~4s@9w9OXweJ_PEW07<ec*^FW3!9*#m(oX6H+Iyx$(>$EaH50=i<sq
z!iNq|%{lj3OKo{uL#H+qTl=Yfe~aEPo-^U-8wVck=UaIgg~K5}YjfEo!04<L+0mdl
jQ3rPbw7G1$@SoZI!~Ns?7(}juc2an{`njxgN@xNAx6&P}

literal 0
HcmV?d00001

diff --git a/man/figures/README-Plotting-3.png b/man/figures/README-Plotting-3.png
new file mode 100644
index 0000000000000000000000000000000000000000..b431549fa978b93d1d5c99a8c2501403d039232f
GIT binary patch
literal 11647
zcmeAS@N?(olHy`uVBq!ia0y~yU^ZZ2V0^&A%)r3lTVA2hz`&Rq;1lA?00LGF3~3Bj
zRt#2Y3|12u(k3vZZDZJf#Ms!_ih;ojB#{P^w6e0YO0%+>V3n3;l{UdDZJX7E304!f
zSxva@3j%q*zJ0!Vt9|=Uq=Ah~V@ON0Vn_q&nE=v}mX?+_AuVlN+JtRs+is_A`=96Q
zo9COC=i8T;*O!;KI&bxfywy)?)-lxA*Y|<V>htaE14*y$JMn*l6~hFu-4oInCZt(S
z0GTxbWdDS;2@|$Wm~b0JY`Z<-_O=PP|F6#TT@5m^Z*`yV>JzJ1KY6nH$^UI>4BOJI
zwxy+Qn_#tVLfW=%Y1_8l-gbM!w%fP2-TuGr|F&)aZ*Tkm|9H*+6MeoX{{O!{!Rq#e
zwA<U#Kt^uccKh~(+qeJU{=e<^|J%3!|9`SN@5%rFuV26ZQI`9ETiX8<egAJy02y%m
z_WviV|Nr0i|3Ao#|No!-|Nq~`J##4o0|RG)M`SSr1K(i~W;~w1B87oLfx*+oF{EP7
z+qu27?;a^Vww`m{(ML5Vn%PWxnO>K5JXhp5Txna98zkg>d&8IR3qm_oGlgegt(v^`
z`mf)se_r_BljasKHP`sN?fK@gd6n)`FVFQ~^e8@;!zID<EO+)+ZHDGTBL?PXR*8nj
zgG@XJ4kR$LB_wQMU^Xy_Xn4zfrr6-d!5cCMEJV}Ke#=?U(qVa}yQ5-aFr&n=q*Y&)
zl-LXeKCciLG;C;`;l8({gOTTm%_~<Io&<$wf%-~G49tf8Rf2-d5*?LSx;rEeIGkA=
z=W>LBElG|tt!X?y&%)i!>{$g3uOiH!VQ7#(GhFuO9}$-$A+K?{VurCn(GCA6lP(Je
zuf^%`YX>-zI%0~f@c8kJ^o&UoO4H}`&B(&(abxynC+<u=7sI6lbLw(_pR#F|A})1Y
zN?^17<Rm^`n5J8Q@@2=$Yuz0dr3ot93~kR=T6FDXek`%@#qy0khy5L0e74599LZ!3
zPEX^3>y(-irm*bHngw5i*J%7x%xMy2es<=v(fT!lqHo@`SN{oM&$gfQ{+~OqXm)+(
zojN}2*WX=C{$2NT;Ym=F*eZ8yC4&J&ny)wCj5V_-@QS|P9-@@QV0>@~Q}W+aObL6A
zGNd&vW%GIFWAJ8D-Zh4{DU1^9TU0=zs%$+EIdx{=nm0+Dc?Rb(F^SJd#2JJY*bIbq
zbQ5~=CvNV1t66E-Ff)PSn6{#4A@>aXKTk3?|GX4$uW{^6&1OqU(Tv@{PNo&V-7&SG
zaEs-(jGL122|U5ty1~cKto~D&dCjoFQom5}+Zpvw^Y`zJpOLeDXWF?JFUubV9JgbY
zyyeKa`EK6t$}h7^SrXR0%UxF=BQihV%>2lHyDN9T_^j}W4Tz6_HSgz>Rdb7W8Ol#w
zEX!jM?Rom<w(0KsBi$L6Riy~=RxhufwYpxvdhYtVHAVY>|GfB2x<5bv-;?`&X6L)M
zsO`RVx_wuAy<UM}*(IxnUXy9lgbc#IPxm>nNQj|FQliyy;qBjF+57ja-rid=MXOye
zUeG6I%e>pK-gw2Q&YKe9>HC@?^-`~rXfn^41<r;{%2m_8Y1Q98wB1%P^O|78#NI!v
z_XqvgnEkKwO^%(|Zu1cNPluR)e*bkme0fpDrBl;>t>(X7<>=}C@b{*MR#lcWAGXe{
z;?dsaeJbaA{z{i4e;w<8I)uLXwr+)HbnQ=_(p@X%Zm@7nYAh?uc3Hnm$TDf8#t-TA
zgsS|BzYm1;Co&x4^!a$4|LY0o?ceXZ-Tum6#1ns_-SlIE>cWiFaOGe3|9!c-UWRka
zm5!qeJPu!CTxJ`d7X4k<YN70hdh7eDpT)}UVon+El6Z4Jc(2RddsmaEsyyBCtN7MK
zPuuA)4SVXEFN7{Je)gQ#Ctc0wsLO0oWrL$-Z>M>=-1&WJ{jN!?_FkWRXlI?$<@%=$
zOQ!06O?vVF>;FIYGuOE3)VdlSlb#W_ebJ4Z+vXj%dQ@hS#&DT+S=OE1%l2+>lfC-R
zuXgE0|D4ioS61I!e&?F<w0%mF-W(Elx9(`v{AG0MY*l4K*(==}`F&RoN0@G@FHrri
zJ?B*Wnr!>)H%d00?sak9<FNYJpIq0V<hpkULKJc~zb)HyX>P*I+e!1hpXsh^xH#YE
z2}3NO-Iv`dU;hU7J9w%6`?5mF^k!5%Z)9I~ZS=$oGv?bGFtL1GdQ@_a{DFu@P4++W
znzz4A-={70>*)3?5l=tsuYUjKYPkEyc{|SR{>E!sw|>*sxHH>pzKJ_U)h~S`uORrC
zzh}YG^n)|_g8JTd1a0nP;5l>u2IJ)I{@QN3k-x3~Mfl!ce}%z^F+okzI^o=>S3Swe
zHO@}+o~~_qt26yfG$^CmC#1+<{@M3F_@#}#_NF}>bLX*7NjuEY5P3_2$@ov-`*mC1
z#8?#?Z}Saz-5tp+5p;}C;-HsY#LJjcuemqVZm(KhG>y+nR2`Hb-!x2oeyUmPu1(EW
zS%z)9?iWstgJ=<+vFN{rY1qa+o-d9Zo^a$sJ}AE%vOZh$-NH0zBcI6I3W+3%Deucq
zf=h)$)@9!<o^qdwy#Ldvd`jGYu&rV<^f<nCeLbehz;@tGYE9!y8^1_xvkKvB<@?SY
z_o{xnQ4~~GNX$6&`10cq(cBFyw=<+Q6|x<Be0j0s#m`}E1{(yDd3!!zUc8Y%%QyGl
zwtmMgU~{D<jxTrrtg-z0TAqXi#$z%wKKl1hyUwH=Z^XdNZT#*)Pi@tfy%l-Z@!Ql+
z2;^Qn$y8kW{>ha15}t1dZtP!j!#;Q09DPO}ofAKpldI308dWZPyLJz&!NoTp=ie9q
z>$S7|qp7IO=68vDd8-19&zsb*d-rm|*0YC9nI|7z6vcEP!c8%G^Vz6-r_PG_EIMnY
zm~bxMR<A4e=lmOQ*4b;w-M71D$<%p#yT8k-f5B7EXFtC#uc1;l?Z!-oV=E1=Dw~`9
zy!i7>?Dskb;p6M>{X4o{{=~VbuipOdj~DcfHUDur`~5U)rR8s0zR0Uy;M%&k>i6>5
zXE$;k)U28(JoDd=vNINbo(#q%6Hdy?8S6gxW(bb9oBx$xca6%zH>O?@NAB%>V|;}<
zYGKC<rs9uV<xjhB3ga&>_1BRpa9+~6eD|mR6Slh5t1BAk2r(|ZzR;pwRW`xq&&3@E
z8{`eRqkqbj)j8Ytt=xObFZ#fV^o`lyzs~PoEZlg(RoFIQliEMwEmOk2IZDail|H&5
zq+w#-iM6rUL$~aix}8C->*Uc>E;~N2|GO{e3)c)ker37MaTUM!{R=KNNj<i+&-6Cq
zvygRNVNAu*`Xyq=Co#I&w_WXLW@wW#XkxgyIA-tXi3tmB+cL{a;sgIx{&_1kBWXFC
zrf!0Z`4YL4O5gMj2{E}{dK4PGF}G4X|E}Em7>NZuXZ%XkKF##mqcd6HO8&_!%8@q<
zrz{ry>%Ku%?qpuwA~t<jb_vU8mH+n19iDSMx<O4d!AXe0CnaIsJwe+>nKkzM@(a$f
z-%mVuHNo|NVE+Cu(VG@OUi8~z+wGirf3J1cd5aZRHZ-#?dwP#QA>m%xjsswivOUXW
zShiwOf>16fH^>?otQ9rd&cOC8oxx3_p|SFoBJ<^%_v{7+{?-`@v(8Unca&j=0Ykzx
zGX~}Fj67$~^GVP6_4(;F!OCge%nWIn%mzjB2M+vsbD(kM{_oadolg&evM@u>Ep`I~
zee05hRqy{YsO?fbGs#Y+AyLVV-}oS(+>BS%|9@ybi;-Bs+hclWQdfqe+N;-<e;=Lq
zv&vv=jhrNyxyI||!8EO9Yrg$6`Lo)PfjME(Ox-h+$|ecsmXt5PP`_n&y~m8DZ5*37
zJ>xvUAi;JZ;;@eA|9_W-CoZY&J8gd`cnt^l=8~$QopV=u82KJAeJifC^IKY;Xtv4u
zy4Op*uKYKWY`AEA>XYupG+DtJZ)>jEZ`rWXz<cfwFD<>BZ+%-^(r2iiZ2ooqarnR2
zQ@xbW71sT&KU#RpFl$Qs=4&VFr>0*%e(AqaWKF`nJ%z8A>hG%dzrTC6G2@w82Xu0h
z6Q`|vr+NO*CdSwHhbHc9(N;J!NzM0PwtCgVsNffNtE$v4|BWb?`M6$4CpPN;=?cM%
zje-R>H9L2I|8Q;AffbUe3~8Ct+?!R{jql32Et@}&r6qFGl9%->cQAS>yPMS}9NGUg
zIKEWoXTS=t_$}3o=ee>!I~hG+bo%}OYxb7^Y?fck@57iNwr!$;w^GLZswG*+3^w&J
z9Wy?2$+h;zrU$FdyWD~!swLL0teRnULU^v+vrk|3yVUdRF5IgA^-uq*^3CF<bJr%!
zyfZEKOrzvX1Me>JpAl;JC!Mrkw0}p{^T`bc-d82uS`5VZ&bZdGtiJHG@@EOR?5Jdk
z!ZjNW&(wUs&p*RmKlDIIHUIlH)@>Jq4L+}(Kci&1<BoPo&dn<Oc69tbSU$sQ+ot##
zs(+`wxm9a=u6}_@=%gC&YbEBtT4!9Fa=v@(mKFa}H+`+1@rl2|k|9Cq#*K1`#7CWP
z;=lJy-uX}B*+bpL@~(4+Z?>@*e2Vtb+k4`LX*R>-eC7CG+($28J^#(-C|CZ;cUSUH
zzT0wdy6D{G8@vY?W|-!#eQ&U6vf?M%Wfvy@DP~|UmfH8_^x8K`3_NEt8Qk(z4US&(
zmnlg(1ZpZW^xR>Rm@%JGVkfJCfjzT9mUddgGX}P2MhuI$3C)<d*r+#+H^D=)AuyVO
z`7=n6f$do;gIm5agYZp(G*9_Sx(1(YC3mLH)iJQ)J@7)eA@bgdmPjev4x?xuNrvED
zV}{LJCUR~zDHF(LU^}pemuIbk_omZ73*RfeTj0&G?3P!8)x5tZvr1hOHvL>vpOLub
zkWS|%_pP%xm0wV02+nQ2omzL}fKJYmLpq^5OedQBY0_hyQ8k-!hHG!wjHP-8{~V_?
z`0QmhI4!l-!26ioG36IR4J)?`%}9E!u6BwcHG!iwa#CXYyiCT&@+F)HOgJSQA}?sP
zMhY$c|7NP0!99@f$qWfIq9-LzJC>W8;FT1$F*(Bo6vmouky7Ri%n2FMA_;Q!%Rju~
z4rg6<f`R8uVqw*c&#(7yXK{Wn*}!P9MfZ~O%sRtICQJuR78-!`I-k05c#F^x1-1hR
zj`1YVD05;<NO&y9I%D<re%sZ|2@E{B-Jd<Ko%voU!J3eDzE0|_)PV_`G!FdvcsTj|
zD+UP$=iAfRp7rnlyF0x8oA&!xYj}JD&-N)^S;NSq87(&B{Qp<s^W|$_?*4aGk<sVr
z3ZKQGI(D0eLD7pM(Iy^{i*j$uJv%J^<jckL`*XM_Up8l$tY>iQ=8s!{!yc%}W_td3
zDSmWio=VcK|Gm2|_=?VQI=}b6hq~0;jcfR>{NH!|NJHkgb?-9!Q;S<9(!)+G)xP}y
z_Q#&rx2~}*J8`avVRKI??<UUdK-Z{U75`p8Jr}>?&*yZziFPTM&WS3j2UV@Qd&aNi
z0ypdATE0$BS-k^4q<9myfRfQ%4TG)48^1jGb^7<wqpP*11j)WwzvXiFdoFqXr%%>D
z)-#nmb4oIpWntjKiRVI3FbJ|Zyz!iGFjH0b;FRtN-&XCE$!8gS%pWdj{Q0%!nte&)
zi^NwR-s0x}A20bazdTy-gjH)*;q+G$lB?Q(Mv2OJvUTsgc>A?`a#n*R|IHLrhRePd
z841(2Y9$28TCD8bQd0PNaemC+&lk^Xg$3=t;QQC3Y;D)>C5sKV@@bUxhe{ZQF1mR+
z(${2J7{9U9rjuC=%cf5-efTHC<aJ3y=2ruwf*{$<mye#+|Nr}b-({QhsVW)zf2%J1
zKXkkF&eA-7W%-AGR}bF^6lGa(^R;`j5wkJR&6KUGjT4uLAA71B`FUQ>Kjq27>n+<R
z8Ya&&JfklE@5_%xrfn-9O}g6p>Vv2HUc;Uq`7qWKYn1k1scz2jQA_YqoV{jS3IFEc
zgPFD085s@OnR<BUgt$g&1)qEU|L5v+%kLgOp<q~gM^(0UrB#4%k>?X_pILhyP1J-9
zmQC;ti<Xe+J!LsxZkecco7-kT_8H2ezAHs7Jl&(R7Ws$m+O_w@k<Y%`?<PI8?&0ez
ziQ2CkT&=Vz$X+VARxbR6+HA%dbxkbK&g@%Yl*y*S?0oE7*A|hN6W`p}Y{kHKKqvRN
zYgE)9-J3fze>GiY;AvQxTd~&0V}*0#g$z)&%Q(Z4siE;^Zf3%l)q-x#bqvhX8(SMM
zz80yF=1nNk;DKZSi}h3Y_A(i4O}7V^I5!{J@-!%Fvl$5Iyfp0ju6}w^G0$#B35Lzf
zbpLrA%l)+U#;czxCbLW%6jLkK=6Em|7|dpraCQot^OS)tZPU@lo4ID{yFW@^)?Lif
zle*LU5>E>w^Xvp}=HjZq<=g%L>_2vaVcCguZ(bjsl%{a*t)<OJrRAGy+6Ct)S@^ye
zmuBs$G&C}^|MW{&N!GBTkSRHKZ~xi;J$2n4?lQbHlGNo+M*KY7(aUyhM+nbs`O3dy
z6Z<UW3{J^E+ws9f=|IQNlx<t5-uQFk_4baEBZ7^b#z_ZegzZcCti1ld(j`H6=C-FX
zo17SvBemM#hDuD^JoRXpK=HKaZ9AUi)IIqc?PB#P<ABJ&`#RRgH$?j+obqEk;IQY)
z%1bkAZZZT5IlnAVz6Lf-?aB$p;GEAj_mnS-fCfVfO%j@zf6fiuxaQW)TRCTM9TeK&
zq7?rs_nO~{&vo{}c{(x^f9`+u>p!=zyUfb=n^!OXp6R>q4YRUY<-KFa;;betm;$oe
z<A6ckTAk-Vq(6O1On+=u)IPU4OYmjKVn*StCyf(t+sv<cQdl-ATkvJaV@BoW+SU6*
z)0lcv1B63(lbGdJ=}zsikTY0r?!r)i+-Y{NAd{P4q?~XxyD8&UjyFX!wsw>px!6#-
z=8mr9KGkC8;F1kDcT2tAr?}u&P-jOnlk%KIA+}{18)hz+ntQIT8WQNMtB)t`Jakz^
z{v;cx)U3a&Hy+Y91=}NKpj7q0_tBKdD-wIps>xIyt27CWUm2LY(&fm<22K-(WS@wC
zQ>Cs>^Ky~lmDm@Yd_-+_!IPSQSs}Y0KbCF+M{p$1jHEw{pWQ33TUdS}Bw9<bP$j|Q
zyz1oHIxaD}pE=6wzQKhf&Z{c(`UEB$U!J&fTZq!5i~}uFh6%4MPdmDwn|;^k_PnbS
zCxy=h<bnc*VezwxA4>wS&GtMnCp12J)0$JKjc#ArBKgYZxVtpi?R*BpJyHg)W=~IW
z%~<o>VfxJbLFYr#4=+dqr6`F5I$S+98q%L8&TMnpe68|VxF1-Pl7Y<i_DuB@;YLHh
zHHJ11&&EIZjJE{4rsBYd82PmLgswYADJR+5qhF<S{W;~ib*T_2(Y-7Zf7|j;T5r8_
z`c7Y)Pls~;&Ck4D`O#;|$3hY284QJDN@26tY+$-<f9I2Z@ZU!>Jsv;S=wsu#{5A0#
z%d)P&`C`%c4fMYoPyE#OOrwt-ByPnS`Cww`i~oX!8<wAyd8E2LPffp%!)L})hMr@J
z@`C<_GBaG?*soB$6x7+l=rh5B+p6el{S)P+$Lcd9bPr_*I4=Ra?Ab^AQ}*HS4dlMC
zGX-}aZ<uNIGEL8LcE=o03{E`!H+Wm|$uDM~#kbG9e{69QkNruPJi+Xvw;yQqvH27h
zmh8D5vpc@x79*qaNAB}yl3p)p^YB(x>SOPT2+};D+NNRfHt^Su9iREE$~&F!@7Gl^
z<IU2z(%omFWT0xe?{gB@t^;#^)-B*?T2`kQz2EhX`E|?6LYV}ubctjC49>2*&;Cm;
zeCO{I_iC?i64%%^!(I4$$jg0U(`FxRGGr^PmwC_V^P1PVRjjen<f9*JLR;|c;`Pea
z=cjgFQZndI^G(p}6RK1xUQ>TDtc5B0>#>;it_gC!Ex|LBwb^@qaNjy$vAkjCK3A(|
z-Pf`E{r?w6vpl<~Q@x7iu+G;q*}n(u4s20QI}`Q1);n45Y|?V0?*^KT#&TSj@3^z*
zbXayAb6Em1&L-hc>~T;#(M?RkJMIG4rZ)YVb62Fj-r6CV%vL0FoKbD%dxI=%qe~l1
zv)xNRG0Mw^h&awX|M=D?-K1qR8fA_aHq1=8(zwyzXj@<Yp@z(+)LDyWt-Ys|v3~Bp
zUvC)=4#%GU|JwcD0^iuhd!}!Ab7XVFrFMyaH93Ru?|shqbeU&NY*AI8*E(&R-Q10d
z4H^bTrQYWXPqOWHGoN;`f7arMf0|cqymMsphf9UigjAIJ*m&NvPCZlEcJauMEi->M
zMCLuZx#d#Za$_?dh8Y>tZ8~;8$vRqTpV*)E!zZ)5x_Xy?dXB^bPM?j!D?apjo1J;h
zzdxDjvh2wV8G?)NXRI)C5SbzJXcF(IsslUbp8h4A@@@4oA!F0;Yp4H}<_%?A!6ck!
z)9|wAW9_5v^W0~Ij7`&5TvzJ8DkR7}!}jRf_aEcj&#mpsygH+H*)yN7vuZa+DLt|{
zpt2!lzNvqG=l59U%)ErO`7147zxC8_2$o4ulaNk0H!E{u+@qR*Sv#7Rtgoq_#PxtB
zA*oxOVcGLrJ{w$@2p`boGvGWIHcxMxuEgf+6WyPm64+_$$x_h8e1?VDAkkfJwzl(&
zZ!g+6Z(Z&9<{QI|i#Dg546EfTQ`YgUy?wa)QKU=4lXmZX`&0(unv~Zul3Cl^i;rxs
zIG|!_nl|gko<o=Zxo<l=bzylmn{fumKQC?O$xoh~UYYc`$*@@F=Kr^4PqgJ!3g+J8
zNtncROvb<A$=gJ$t(H;-T%!M9q<AtX#~7r|Q?B;2=%_o|)}q^+C9uQx2j6BngJmaE
zL-Nm?x%ezO2TBl`%*jy(Y1^_Yd}hTx?D9=&3!J@}adO0y)3ryvnI1o!w)v3g?4$qY
z|LeSBDP@p(H0)lyO^iX>u`HG!zt`7RZ;KYXx`5qh<L-Y8I1Csz`<wpx`}g{O+j+&Q
z9U%25e;xJ_<rnMmWSntEW^M7G6KljSb+GxYV4Sgc)x*70Zq5n6^Udf*i(k3S%*pnj
zXC1Jqe0<G2e#>{g_}!(i*PZi`n{lwo@N?K<^F?QJ!smQVuiuq?>)P(yKUYl@FxY+e
z*%I3cmA~%Yef043+P&)ebpbJT@0&p_h>5#WiVpm6n=<oxSMF-Ap5t3`%YN!y72%(8
z`St$YwU_ure?M7!zU%b+`fG1&g}&6R+CAe-<4b)B<8sqK#{`Y%WR={N^0%L>doy11
z*h-!CQ;*JmdM#$t>FfI^%=N1F|6jRo%jPG#@xNGZM#SA$n|~zm(&rPmS3dVY_@|-r
zOHixl=I>wjT3dZ*sFK)S{XgcagqzpuT`do%OT9j=`+KF)<Hk1kZ@W0Ie@Ruc&)g!n
z>_(^irfv2;3)?F{xgF(hn7Lf)@WdY#M|#pW8XuqN{NmH+%MS&Q=*Sr~2W)IM^eOy#
z>#o&zfrgE{zMqfm{kJ<V+-F(iIfZjZx3jZPPu%;b<k<7y!aqHgnJ$}u{1LiWb#irX
z9K)HKs~o>)MW{!-Fse!TxS}n*+{Ehs{1g6Cyb{gKGk^V3+9kI2`-f>84p(}IMcn=U
za!ZHf|0lmQQztwS_AJlYXMggx@ni|P=_eVC3%7OubjUOO%X(Isar0`~6GBm&^7%Ge
z%DENkI_28l;XA>e)W^cJ?E7t@o_BvwZspkfwSqmjbb{y4Zwa4N8w}Me_H5Xudwj~L
zw}uRxcbCPV`(UqU^ERNtaMySB>q@WI9@ok0c8@%@J)PrB<;m_D?rjcr%`JzSj-`uj
zy}4ND>1|_%XRq!R2FA$DW%&^+$77)O{oj))m+aSu-LpO=85K56RIa;t`oY#u1`iK3
z7#^2;qc+3lRM0-#w1kxBObKnA&S2&02Ol^09RwMdT%lsEIYs-7rrb$BIf={e|Ld4;
zK0Wn_LAgrYvc>Xy-1|oj4U%A|RdLE`+w<F;y0)%3CZQ|%qub9{^CXV_kZkZ=>H0<Z
zOr6!-mWh!@C-2JD?BEgke)sp}Y{6!hbeEZp?l*sxvKgctX=m>#URlB*oWaiOV-E_h
zLlYi+5Z3smH$&vro+~REcp3`Tb~JAE)AoM%jbTPYq2FRDLw{4TD2M!7=BdT|Z5h}O
zRH*c@{bV+1EK4|00=D5<%SMIztk;q^=l_1oXuxpH`%T%wFWqm>|NX`=gY(fGH`7P=
z<d$=*HGDK>m>kr-p=++*j5zPag8jA(X<Zilg2vf`Wg9QEUQXBKdAFVY0E0w6h?flE
z`3SY^NE}|{+S3`UH-q8WX$BuJ-K3B=MF&gP%N_<<kol-VblQxq9fccDvu?J(Y`^n1
za{`0Ugd0zrUPf8BfgB`!^dI*zgKR-i-$ChH-2bM??t;!(yVHF~r|q~e$H1JxbX0Ht
z(~l6Iaparb|5!JRJrvtrGtFH*`cYjq15X2|n03uG#-77`A`<smlV@!0_}eHMJGTd9
zdUeO&Yx@(fDb*ZVca*{Tk)GjhTZT0Gjo}vcX}U>#32tHPkL#)#&cr3nfAQo@RLk^=
zJ176=q?8(gy!uA{8^^XYYg~VHy3hT?cxH#Jk%8RC<e6JLDjPob?>+)5t80%|zT;3n
zyvDVn>-eIi6TSHol4;x751dgrSM2F4rF$scMo858ZB^UE#IkCJGck|$H1pmUd#Jn3
z{pf|=b%BO6?#eM3udmp%`QZhnKS!^vkhr=oJcI{if{wzuz3OQ~IfBMak3~hBZ@y(T
z=<d+<PnU^uX}BTg#&)1by1`H_q**FWSIH%ZQ~C0nDwm@PAWIHCI^f8=`F1j&^5t8l
z?nfC6*py38YIm&7zreAr!(gLfk5BZQo-W1&9=BJM!iA-+K&{?@94_U{g1hJZVeC2R
z5&LP^qZ*rU_WN%qcXVA8wT6k_dh~M{>x3Oi48l1KY7sW)w=hVB+wdq~7Vd}HQgWnC
z{Jc#5d4(RIc$-&G_`!Cp>@1Bx{NtNNxVm)lCw8!FM2=Rzd)VprU5P17o!NjPP3~h$
zCS!`;A<i=$lkFP}C02T?>GWA$uk_nkY`H%vyZ9grSlgAOKfgGhtx9@cR2L@h!;owc
zH2sW|O>V&EMK^ZNnSYj5_<%&u71d%vecS7nRt9M>C7yep#5|vQblq3|qt~7^ae^In
zv-2;z>FT(a?7!X{O)I7_N;FU0l`=1Bz2n(k;t!+#2j#TOr7|2#SfV#`?G4)%kw2AU
zPXFvYdtfmS*ow_!>qVK)`oD=f=O5vbQqSQ0aMI82wav4x>L1!VXZ{T~mv8I_B6^mB
z8#4no*X;#qU0c84Q%Iv_^V+0Eiz9dQ)t<gH>1|x7kOTt*_ZHAvfKOW^&RsZcAl9wB
zv(lvR=(Ho(tT)xKvh4|Wd^PE^U^wTJXBR6N9?Ra8KM=6vNy(A5EKZ*@j)kiSN1s3O
zkD=|5>T>0GswMNzg{`^%BFWq8p#CQNhJ^(uUv}^=E&lKD;`G(*oQ+Gh4r;@M&n^|`
z+$5=1X7zLaPgX6kV`Vq){qn}qjQMEZ{8R?xv?Y3$vKtqFnd4~Y3=)|Sv!-lXT;Zdc
z+s_+;qsh<xO=wl?R`aLFuBS_agJ!uhpT=G%8!3KqpKwUXTo!Df*0=TBvU{bw6PP5r
zC+>Pua^&IC$7}XRzTFjTAUp9dBTuWhpS#W4E$6kL&(u5gw#iZs=FjRWWqXR|y;i!T
zH)AnO;hyl97L0S|fQp+GkSjmlTizvb;N;6D%WWcT5MMvHyn2Xnj?r`r6|G~x*0LWk
z5IbMCN|o7yaYiGf#Jd9>Z+DoVm2)rKk<hnR*7?OZh8ZkJHqSrx&Uf?qiN|9N&UZB!
z7`@&u$8b1e&ykhWIx5UwHEEjN3p5PdZ_CiOxng1PS-Foq2TFJkEMfIYtl-{of8z0)
zX-|)t_ni5)9b}n)^(sr{dA&b$R>z(<FnWC-Y|@{VY26iR-y^T>u1ie01~O@*#i^BP
zT@`6xBiEJfJ#=DCeKiA5a^aTXvjQK_aQ1|U^nA_dZ%EYXi&|f+Jn!b5KeJ=|S4coi
zli3~j+tp^X#n0_!cLNO}rd9M-y%qd;=FOA)V%Ce3Af|oH`Z`PE<Czyv?t?P-b+D}!
zN2`3hDxR?&d-`PmzqgDAJx8^#YuBvw4G!S}XQ?@TGo1DwQky5aDCx_Q$1u}pc<gmj
zo5#C2>C4f@e*Yk@@L3VJPx$<u13gwh*Ml8zxUs6z*G9T!qGXqQ%`}L0GvfBzsLiX?
z*_QG>GVcF328m-yv%VJj+I)`8Ir%Jb8^i@6ub<ASc((Dzq_c~2{@!Lzkmz1{%{%Xn
z@cEjCjTKYYLJYrJb#?c&&UCrelcze@Pi}?=cJSJ8^YaED&m@;_GG2@%XrF)Me8n2S
zu#S!Pd!Z(to^pM5#k07%K6%cEPB2M0GaZq6m3lV2_EyPyKeg@A|5walI5vU7u)V7H
z>DBpWcUMnd`SzN5nq-5aio=<Oae5n@j_tLYd9Ui24zocUXw}SV_ZXwcF>}{=8SG1B
zGqB?nC|)srxyAWC%JY7<BrrkMM9-;ow~<CD*dNjN=daSd+*n2<h8{)6B)+d)0<S0T
z4?nW`?T+6@P`eZ#rA_N`Ke9RZ!lcs-prtijLgm-{3SDhp+s|N>5VJP|Es|;Ntk#>c
zt|L9{xe-IMN5c%~y-Y`)#m{`~NWZ=Iev%PHpJ=)p`^=3XA@>#a;I%ug-MV~6$%5y%
zJ$yft@l0d)%4^w8H{K~23w_l2Vr$%BSzvgz%2%-8>O_R{yj=FbJPnOA4y~LfZY`7Y
zM)3T$+h%4AY)M?pyA;mN`TX~|+Pu&k3=$ohbF{i{*xtWy`Z34)R}WhPUyRSzxXDNV
z8f;42nEhzxS4rLjGCO8u?OoPw9A7wZ_aO`Ec^4TVcJmjCm85Jp@BPlr$WY9XwCd|E
z_c^U{HxJKFyM5!H_(RS!lg;z?esQf{@5x}Wx^v~VZ2dy9x)lBVS&Pp1H80rP0B_i<
zErcqtFErcK)brP2=fyiqovY>T6Xxyt8d>=B@A+AK;cDUw)8_R`Ry|qtKJKwVwI$yV
z#^Rs9#E(ukx6k-CtL3?ub@9#hi5m<~hZ&}O+kIw!cF|i@zG}Uv#)ZRc)Rsl*D?M`c
z+gi>a%rN6Bcv;dOB?F1W6Tky*AG;3N)V}xoJMB$hm3J9?{>d<L&^X-3t^+U5>n-v>
zSS|rsffOe^BaqoZ6Eye*jwu?fyYdm2ka&}j!<Jw(Vb%=uoeI-!f~FpHWqHClBlMF;
zD4V$81onimlggozF)j}GHXS&S&?$*!!I&<GkF`?peYtzPN?*^OKl5|S0tfHJndv$;
zKX0v#F4uipGH>G@<*8{p%RlQ(71fr!@k;aanWrVIHZC}4ELQXD-db_{4RZpX&pg#>
zQuuXQQRuw4ZBh9?Qzc_A#I5_g`g`}b&%aztBRrEAXFlik(+t*KyKL@t?Hw`(bEg{q
z`t~w5d#C%Ns%eLe&PPNXS-<zsJ@#WoR_7!9?#%jUB)8WlI#qt!_RD1xmCgtGEuF>v
zO6XWq>Z8Te_idOa9JoHW{A!fn)5!c6&e4{0GxdHPi_LbNo33&F-__r)*1C(rL$-1h
zBipJEvUSBK+v;Ec*taFk-}ggbDQCgP4X2F7>QvT!zq}h{bJe9fjyrMlmfm^FUsrOy
zY@*Tm7{BFG+^=ks9Rm-9`8~g>7x3rHHg1v1V?{<?-=e2UFE)P5djHRXh=Aw3r%UU;
z#$EJ_TfgFzvH2{&xc^hMuHMPAs{Gq@n(=aH^u5iSxToBmyE7p&IyzCd`Etw-d7Zt}
z({;oDoj)42?u_wt&@|=g|N1jeue2$)oSUVy;&TtHe*FLRk2g|vmVeF>*ZB85bGO69
zbe-kag2k3|GgrPa$f?yoAF}T2YW}WmpV(ZZ`(uw4wXVGw(sILZ#phqF)0vlTHgY@f
z5^ny@z9u`dGG3?E^-g-U<-~N&@}E&RujxEZnYZ)KVe3W8=F@{KpA}hMjR<%y$sM;(
zP1AUKaOE`aDMhDQPpK4JevQf3Uhc#(o9oo^b>e5mSA6z)8nyq|f(-5afGw=88)Fi)
zO{^~8$cn1`+w}U2!KEDkJL}|*1^qZFUA{(rYUQ=bR#j@rJ2xE&j^<zddCha-mEU$J
zOCGQI(|^0j>7q=I`LjUVYqE3J=V<ir`#E#xoO34gH^}JxKl^){^{P)kPi?AaI0l}V
zORMnOtJS*k>XuKxSg%VS{*rxhqxWlxG#-hM^^vzdL+AZnGHs*(ZioGIst%SMkMMhb
z^St@f7XN?O>`X3HP7|)v%1W}lzr6g_-hT^zsQ&(G_21j<pZ*E6ADXWir*letmPosy
zq;o*xwCLgk5mCO{>*EVfZciy+lYjCEZ~ZTS<@Hl@TUXC34~U4LyK&Ar<7t=e_il`N
z&3P~+@?!UmSCO{scu&6!dChs+rud-$`&H{smmKnceSB-8<yV_Tz2%?In1_@qJu9-h
z91+l$A7?fnlv}peeRaGTc5gujH&^n`L)S7==BH$uuH932@aw+Adorq{KL6x1)_C)C
zXJSRr+>GBki|q4fXubX{dn_RD73XQDYv-k{&d2zDWqDSlbw1+VMGxE6KGBYsk54I^
zw=m{F`3%2{4et%^2A}F@n-+HY+-uPz)9WO34lwZWh$S$vv2h!qFCLA!kyjj(r$29h
z{GW%9x4tgA!Iofg<Lch<`9EEllxH-q&0uJ2o@@X4;ziDeg$W>b-2cCOrI}`w_nSRE
zeDmtwv&-HT>gD}w{=wXx$<WqlyRSCp4U6Kc_MJi>-mJ6VVX<pt*;&5x3_Q%%;v1%%
zPmz-NcwT6c@I;pG9EP^Wx%V_uwl8YDnY%<b*=BPSqr|UoKen+vndz^Uu+DzMONKO7
zW`i%e>h9m3GDm#%DD!P(N(eJxaK86MBL1Hyr)Im})3}>Qr(9u}A<A=L!uG73{ky;A
zd7gOrtgU8k%r_&jc7uopMhUzj09!r_R`ySRsoc~hTI+YL2Q8%bboFyt=akR{0Bq&z
A#Q*>R

literal 0
HcmV?d00001

-- 
GitLab