From c3bdf53d21a9dd012b8ec945c098fdf4d908c292 Mon Sep 17 00:00:00 2001
From: Walmes Zeviani <walmes@ufpr.br>
Date: Mon, 22 Aug 2016 00:04:21 -0300
Subject: [PATCH 01/10] =?UTF-8?q?Revis=C3=A3o=20das=20tags,=20t=C3=ADtulo?=
 =?UTF-8?q?=20e=20refer=C3=AAncia:?=
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

  - Elimina ou substituí tags reduntantes;
  - Quebra linha do título quando passa de 72;
  - Substituí referência completa por chamada curta.
---
 R/Banzatto.R |  204 ++++---
 R/Barbin.R   |  132 ++---
 R/Costa.R    |   33 +-
 R/Dias.R     |  115 ++--
 R/Faria.R    |   43 +-
 R/Ferreira.R |   23 +-
 R/Manly.R    |  541 ++++++++++---------
 R/Mingoti.R  |   14 +-
 R/Paula.R    | 1443 +++++++++++++++++++++++++-------------------------
 R/Pimentel.R |  188 +++----
 R/Ramalho.R  |  193 +++----
 R/Storck.R   |   43 +-
 R/Vieira.R   |   56 +-
 13 files changed, 1420 insertions(+), 1608 deletions(-)

diff --git a/R/Banzatto.R b/R/Banzatto.R
index 691c75b4..dcadb17e 100644
--- a/R/Banzatto.R
+++ b/R/Banzatto.R
@@ -1,13 +1,14 @@
 #' @name BanzattoQd1.2.3
-#' @title Di\enc{â}{a}metro \enc{à}{a} Altura do Peito de \emph{Eucalyptus saligna}
+#' @title Di\enc{â}{a}metro \enc{à}{a} Altura do Peito de
+#'     \emph{Eucalyptus saligna}
 #' @description Valores de diâmetro à altura do peito (DAP, cm) de uma
 #'     amostra aleatória de árvores de \emph{Eucalyptus saligna} de um
 #'     povoamento com 15 anos de idade.
 #' @format Um vetor numérico com 20 elementos.
-#' @keywords amostra
-#' @source Banzatto, D. A., Kronka, S. D. (2013). Experimentação
-#'     Agrícola (4th ed.). Jaboticabal, SP: Funep. (Quadro 1.2.3 pág. 3)
+#' @keywords AAS
+#' @source BANZATTO; KRONKA (2013), Quadro 1.2.3, pág. 3.
 #' @examples
+#'
 #' data(BanzattoQd1.2.3)
 #'
 #' hist(BanzattoQd1.2.3, prob = TRUE,
@@ -26,7 +27,7 @@
 NULL
 
 #' @name BanzattoQd3.2.1
-#' @title Controle de pulg\enc{ã}{a}o na cultura de pepino
+#' @title Controle de Pulg\enc{ã}{a}o na Cultura de Pepino
 #' @description Dados de um experimento visando controle de pulgão
 #'     (\emph{Aphis gossypii} Glover) em cultura de pepino, instalado em
 #'     delineamento inteiramente casualizado com 6 repetições. A
@@ -47,9 +48,7 @@ NULL
 #'
 #' }
 #' @keywords DIC contagem
-#' @source Banzatto, D. A., Kronka, S. D. (2013). Experimentação
-#'     Agrícola (4th ed.). Jaboticabal, SP: Funep. (Quadro 3.2.1 pág.
-#'     44)
+#' @source BANZATTO; KRONKA (2013), Quadro 3.2.1, pág. 44.
 #' @examples
 #'
 #' library(lattice)
@@ -70,7 +69,7 @@ NULL
 #'     cultivares de mandioca. O experimento foi instalado em
 #'     delineamento inteiramente casualizado devido a área ser homogênea
 #'     quanto às condições experimentais.
-#' @format Um \code{data.frame} com 25 observações e 3 variáveis.
+#' @format Um \code{data.frame} com 25 observações e 3 variáveis, em que
 #'
 #' \describe{
 #'
@@ -85,9 +84,7 @@ NULL
 #'
 #' }
 #' @keywords DIC
-#' @source Banzatto, D. A., Kronka, S. D. (2013). Experimentação
-#'     Agrícola (4th ed.). Jaboticabal, SP: Funep. (Quadro 3.4.1 pág.
-#'     50)
+#' @source BANZATTO; KRONKA (2013), Quadro 3.4.1, pág. 50.
 #' @examples
 #'
 #' library(lattice)
@@ -104,12 +101,13 @@ NULL
 NULL
 
 #' @name BanzattoQd3.6.1
-#' @title Produ\enc{çã}{ca}o de Mat\enc{é}{e}ria Seca em Cultivares de Sorgo
+#' @title Produ\enc{çã}{ca}o de Mat\enc{é}{e}ria Seca em Cultivares de
+#'     Sorgo
 #' @description Experimento em delineamento inteiramente casualizado
 #'     avaliando a produção de matéria de cultivares de sorgo. O
 #'     experimento é desbalanceado no número de repetições das
 #'     cultivares.
-#' @format Um \code{data.frame} com 30 observações e 3 variáveis.
+#' @format Um \code{data.frame} com 30 observações e 3 variáveis, em que
 #'
 #' \describe{
 #'
@@ -123,9 +121,7 @@ NULL
 #'
 #' }
 #' @keywords DIC desbalanceado
-#' @source Banzatto, D. A., Kronka, S. D. (2013). Experimentação
-#'     Agrícola (4th ed.). Jaboticabal, SP: Funep. (Quadro 3.6.1 pág.
-#'     57)
+#' @source BANZATTO; KRONKA (2013), Quadro 3.6.1, pág. 57.
 #' @examples
 #' library(lattice)
 #'
@@ -141,12 +137,13 @@ NULL
 NULL
 
 #' @name BanzattoQd3.7.1
-#' @title Composi\enc{çã}{ca}o do Substrato na Altura de \emph{Pinus oocarpa}
+#' @title Composi\enc{çã}{ca}o do Substrato na Altura de \emph{Pinus
+#'     oocarpa}
 #' @description Dados de experimento para estudo do efeito de 5
 #'     composições de substrato para o desenvolvimento de \emph{Pinus
 #'     oocarpa}. Experimento realizado em delineamento inteiramente
 #'     casualizado.
-#' @format Um \code{data.frame} com 20 observações e 3 variáveis.
+#' @format Um \code{data.frame} com 20 observações e 3 variáveis, em que
 #'
 #' \describe{
 #'
@@ -163,9 +160,7 @@ NULL
 #'
 #' }
 #' @keywords DIC contrastes
-#' @source Banzatto, D. A., Kronka, S. D. (2013). Experimentação
-#'     Agrícola (4th ed.). Jaboticabal, SP: Funep. (Quadro 3.7.1 pág.
-#'     64)
+#' @source BANZATTO; KRONKA (2013), Quadro 3.7.1, pág. 64.
 #' @examples
 #'
 #' library(lattice)
@@ -183,13 +178,13 @@ NULL
 NULL
 
 #' @name BanzattoQd4.5.2
-#' @title Efeito do Promalin sobre Furtos de Macieira
+#' @title Efeito do Promalin sobre a Produçaõ de Frutos de Macieira
 #' @description Resultados de um experimento instalado na Fazenda
 #'     Chapadão, no município de Angatuba - SP. O delineamento
 #'     experimental foi o de blocos casualizados, sendo as parcelas
 #'     constituídas de 4 plantas espaçadas de 6 x 7 metros, com 12 anos
 #'     de idade na época da instalação do experimento.
-#' @format Um \code{data.frame} com 20 observações e 3 variáveis.
+#' @format Um \code{data.frame} com 20 observações e 3 variáveis, em que
 #'
 #' \describe{
 #'
@@ -206,9 +201,7 @@ NULL
 #'
 #' }
 #' @keywords DBC
-#' @source Banzatto, D. A., Kronka, S. D. (2013). Experimentação
-#'     Agrícola (4th ed.). Jaboticabal, SP: Funep. (Quadro 4.5.2
-#'     pág. 84)
+#' @source BANZATTO; KRONKA (2013), Quadro 4.5.2, pág. 84.
 #'
 #' Mestriner,  J. C. (1980). Estudos dos efeitos do promalin sobre
 #'     frutos de macieiras (\emph{Malus} ssp) cultivares Brasil e
@@ -235,13 +228,14 @@ NULL
 NULL
 
 #' @name BanzattoQd4.7.1
-#' @title Compara\enc{çã}{ca}o de M\enc{é}{e}todos de Semeadura do Mamoeiro
+#' @title Compara\enc{çã}{ca}o de M\enc{é}{e}todos de Semeadura do
+#'     Mamoeiro
 #' @description Estudo realizado em Jaboticabal - SP por Ruiz (1977)
 #'     que comparou métodos de semeadura no mamoeiro. O experimento foi
 #'     instalado em delineamento de blocos casualizados, com 4
 #'     repetições, avaliando 3 métodos de semeadura. Foram avaliadas
 #'     duas unidades experimentais por método em cada bloco.
-#' @format Um \code{data.frame} com 24 observações e 3 variáveis.
+#' @format Um \code{data.frame} com 24 observações e 3 variáveis, em que
 #'
 #' \describe{
 #'
@@ -256,9 +250,7 @@ NULL
 #'
 #' }
 #' @keywords DBC
-#' @source Banzatto, D. A., Kronka, S. D. (2013). Experimentação
-#'     Agrícola (4th ed.). Jaboticabal, SP: Funep. (Quadro 4.7.1
-#'     pág. 93)
+#' @source BANZATTO; KRONKA (2013), Quadro 4.7.1, pág. 93.
 #'
 #' Ruiz, P. R. N. (1977). Estudo comparativo entre diferentes métodos de
 #'     semeadura na cultura do mamoeiro (\emph{Carica papaya}
@@ -285,7 +277,8 @@ NULL
 NULL
 
 #' @name BanzattoQd5.2.1
-#' @title Peneira e Densidade de Plantio na Produ\enc{çã}{ca}o de Amendoim
+#' @title Peneira e Densidade de Plantio na Produ\enc{çã}{ca}o de
+#'     Amendoim
 #' @description Dados de um experimento fatorial que estudou o efeito de
 #'     densidade de plantio e tamanho da peneiras comerciais, de crivos
 #'     circulares, para classificação das sementes da produção de
@@ -315,9 +308,7 @@ NULL
 #' avaliações apenas no comprimento restante das duas linhas centrais, o
 #' que resultou em uma área útil de 6 m\eqn{^2}.
 #' @keywords DBC FAT2
-#' @source Banzatto, D. A., Kronka, S. D. (2013). Experimentação
-#'     Agrícola (4th ed.). Jaboticabal, SP: Funep. (Quadro 5.2.1,
-#'     pág. 102)
+#' @source BANZATTO; KRONKA (2013), Quadro 5.2.1, pág. 102.
 #' @examples
 #'
 #' library(lattice)
@@ -363,9 +354,7 @@ NULL
 #'
 #' }
 #' @keywords DIC FAT2
-#' @source Banzatto, D. A., Kronka, S. D. (2013). Experimentação
-#'     Agrícola (4th ed.). Jaboticabal, SP: Funep. (Quadro 5.2.4,
-#'     pág. 107)
+#' @source BANZATTO; KRONKA (2013), Quadro 5.2.4, pág. 107.
 #' @examples
 #'
 #' library(lattice)
@@ -382,12 +371,14 @@ NULL
 NULL
 
 #' @name BanzattoQd5.3.1
-#' @title Produ\enc{çã}{ca}o de Caf\enc{é}{e} em Fun\enc{çã}{ca}o de Aduba\enc{çã}{ca}o NPK
+#' @title Produ\enc{çã}{ca}o de Caf\enc{é}{e} em Fun\enc{çã}{ca}o de
+#'     Aduba\enc{çã}{ca}o NPK
 #' @description Resultados de um experimento em arranjo fatorial triplo
 #'     2 \eqn{\times} 2 \eqn{\times} 2, instalado em delineamento de
 #'     blocos casualizados, para estudar o efeito da combinação de
 #'     nitrogênio, fósforo e potássio na produção de café coco.
-#' @format Um \code{data.frame} com 48 observações e 5 variáveis.
+#' @format Um \code{data.frame} com 48 observações e 5 variáveis, em que
+#'
 #' \describe{
 #'
 #' \item{\code{N}}{Variável numérica que indica ausência (0) ou
@@ -408,9 +399,7 @@ NULL
 #'
 #' }
 #' @keywords DBC FAT3
-#' @source Banzatto, D. A., Kronka, S. D. (2013). Experimentação
-#'     Agrícola (4th ed.). Jaboticabal, SP: Funep. (Quadro 5.3.1,
-#'     pág. 113)
+#' @source BANZATTO; KRONKA (2013), Quadro 5.3.1, pág. 113.
 #' @examples
 #'
 #' library(lattice)
@@ -437,11 +426,13 @@ NULL
 NULL
 
 #' @name BanzattoQd5.3.7
-#' @title Efici\enc{ê}{e}ncia na Utiliza\enc{çã}{ca}o de P por Cultivares de trigo
+#' @title Efici\enc{ê}{e}ncia na Utiliza\enc{çã}{ca}o de P por
+#'     Cultivares de Trigo
 #' @description Experimento em delineamento inteiramente casualizado que
 #'     avaliou o efeito a eficiência na utilização de fósforo por três
 #'     cultivares de trigo cultivadas em solo com e sem calagem.
-#' @format Um \code{data.frame} com 48 observações e 5 variáveis.
+#' @format Um \code{data.frame} com 48 observações e 5 variáveis, em que
+#'
 #' \describe{
 #'
 #' \item{\code{cult}}{Cultivares de trigo usadas no experimento: BR 20
@@ -462,9 +453,7 @@ NULL
 #'
 #' }
 #' @keywords DIC FAT3
-#' @source Banzatto, D. A., Kronka, S. D. (2013). Experimentação
-#'     Agrícola (4th ed.). Jaboticabal, SP: Funep. (Quadro 5.3.7,
-#'     pág. 120)
+#' @source BANZATTO; KRONKA (2013), Quadro 5.3.7, pág. 120.
 #' @examples
 #'
 #' library(lattice)
@@ -500,7 +489,8 @@ NULL
 #'     graus de liberdade da interação tripla com o efeito dos blocos. O
 #'     grupo de confundimento adotado foi o W.
 #' @format Um \code{data.frame} com 27 observações e 4 variáveis, em que
-#'     \describe{
+#'
+#' \describe{
 #'
 #' \item{\code{N}}{Níveis codificados de nitrogênio (N) que representam
 #'     0, 30 e 60 kg ha\eqn{^{-1}}. A fonte do N é o sulfato de amônio
@@ -529,9 +519,7 @@ NULL
 #' híbrido de milho utilizado foi o HMD-7974.
 #'
 #' @keywords DBC FAT3 confundimento
-#' @source Banzatto, D. A., Kronka, S. D. (2013). Experimentação
-#'     Agrícola (4th ed.). Jaboticabal, SP: Funep. (Quadro 5.5.1,
-#'     pág. 131)
+#' @source BANZATTO; KRONKA (2013), Quadro 5.5.1, pág. 131.
 #'
 #' Vilalta, O. A. (1972). Avaliação da produção de milho (\emph{Zea
 #'     mays} L.) em função da adubação NPK em um latossolo
@@ -563,14 +551,15 @@ NULL
 NULL
 
 #' @name BanzattoQd6.2.2
-#' @title Espa\enc{ç}{c}amento de Plantio na Produ\enc{çã}{ca}o de Cana-de-a\enc{çú}{cu}car
+#' @title Espa\enc{ç}{c}amento de Plantio na Produ\enc{çã}{ca}o de
+#'     Cana-de-a\enc{çú}{cu}car
 #' @description O experimento avaliou o efeito do espaçamento de plantio
 #'     na produção de variedades de cana-de-açúcar. Para estudar os dois
 #'     fatores, espaçamento e variedades, considerou-se o delineamento
 #'     de blocos casualizados com arranjo de tratamentos de parcelas
 #'     subdivididas com o espaçamento sendo casualizado dentro dos
 #'     níveis de variedade.
-#' @format Um \code{data.frame} com 40 observações e 4 variáveis.
+#' @format Um \code{data.frame} com 40 observações e 4 variáveis, em que
 #'
 #' \describe{
 #'
@@ -587,9 +576,7 @@ NULL
 #'
 #' }
 #' @keywords DBC PS
-#' @source Banzatto, D. A., Kronka, S. D. (2013). Experimentação
-#'     Agrícola (4th ed.). Jaboticabal, SP: Funep. (Quadro 6.2.2,
-#'     pág. 138)
+#' @source BANZATTO; KRONKA (2013), Quadro 6.2.2, pág. 138.
 #' @examples
 #'
 #' library(lattice)
@@ -622,7 +609,7 @@ NULL
 #'     instalado em delineamento de blocos casualizados com arranjo de
 #'     tratamento em parcela subdividida, sendo as doses casualizadas
 #'     dentro dos níveis de adubo.
-#' @format Um \code{data.frame} com 48 observações e 4 variáveis.
+#' @format Um \code{data.frame} com 48 observações e 4 variáveis, em que
 #'
 #' \describe{
 #'
@@ -639,9 +626,7 @@ NULL
 #'
 #' }
 #' @keywords DBC PS
-#' @source Banzatto, D. A., Kronka, S. D. (2013). Experimentação
-#'     Agrícola (4th ed.). Jaboticabal, SP: Funep. (Quadro 6.2.5,
-#'     pág. 144)
+#' @source BANZATTO; KRONKA (2013), Quadro 6.2.5, pág. 144.
 #' @examples
 #'
 #' library(lattice)
@@ -679,13 +664,15 @@ NULL
 NULL
 
 #' @name BanzattoQd6.3.4
-#' @title \enc{É}{E}pocas de Plantio e Colheita na Produ\enc{çã}{ca}o de Beterraba
+#' @title \enc{É}{E}pocas de Plantio e Colheita na Produ\enc{çã}{ca}o de
+#'     Beterraba
 #' @description Experimento estudar o efeito de datas de plantio, épocas
 #'     de colheita e aplicação de inseticidas na produção de
 #'     beterraba. Os tratamentos foi arranjados em parcelas
 #'     sub-subdivididas no delineamento de blocos casualizados.
-#' @format Um \code{data.frame} com 72 observações e 5 variáveis.
-#'     \describe{
+#' @format Um \code{data.frame} com 72 observações e 5 variáveis, em que
+#'
+#' \describe{
 #'
 #' \item{\code{data}}{Fator de níveis ordinais que representa as datas
 #'     de plantio de beterraba. Os níveis do fator data foram
@@ -707,9 +694,7 @@ NULL
 #'
 #' }
 #' @keywords DBC PSS
-#' @source Banzatto, D. A., Kronka, S. D. (2013). Experimentação
-#'     Agrícola (4th ed.). Jaboticabal, SP: Funep. (Quadro 6.3.4,
-#'     pág. 156)
+#' @source BANZATTO; KRONKA (2013), Quadro 6.3.4, pág. 156.
 #' @examples
 #'
 #' library(lattice)
@@ -738,13 +723,15 @@ NULL
 NULL
 
 #' @name BanzattoQd6.4.2
-#' @title \enc{É}{E}poca de Plantio e Aduba\enc{çã}{ca}o Nitrogenada em Beterraba
+#' @title \enc{É}{E}poca de Plantio e Aduba\enc{çã}{ca}o Nitrogenada em
+#'     Beterraba
 #' @description Experimento em delineamento de blocos casualizados cujos
 #'     níveis dos fatores, época de plantio e nitrogênio, foram
 #'     casualizados em faixas. A variável reposta observada foi a
 #'     produção de beterraba.
-#' @format Um \code{data.frame} com 80 observações e 4 variáveis.
-#'     \describe{
+#' @format Um \code{data.frame} com 80 observações e 4 variáveis, em que
+#'
+#' \describe{
 #'
 #' \item{\code{nitro}}{Fator de níveis métricos que correspondem à
 #'     quantidade de nitrogênio aplicada, em libras por acre.}
@@ -771,9 +758,7 @@ NULL
 #' \if{latex}{\figure{BanzattoQd6-4-2.png}{options: width=1.75in}}
 #'
 #' @keywords DBC EF
-#' @source Banzatto, D. A., Kronka, S. D. (2013). Experimentação
-#'     Agrícola (4th ed.). Jaboticabal, SP: Funep. (Quadro 6.4.2,
-#'     pág. 163)
+#' @source BANZATTO; KRONKA (2013), Quadro 6.4.2, pág. 163.
 #' @examples
 #'
 #' library(lattice)
@@ -807,7 +792,7 @@ NULL
 #'     experimento foi instalado em delineamento inteiramente
 #'     casualizado e foram estudados 7 níveis de gesso, de 0 a 300,
 #'     igualmente espaçados em 50 kg ha\eqn{^{-1}}.
-#' @format Um \code{data.frame} com 28 observações e 3 variáveis.
+#' @format Um \code{data.frame} com 28 observações e 3 variáveis, em que
 #'
 #' \describe{
 #'
@@ -818,10 +803,8 @@ NULL
 #' \item{\code{peso}}{Peso de 1000 sementes de feijão, em gramas.}
 #'
 #' }
-#' @keywords DIC
-#' @source Banzatto, D. A., Kronka, S. D. (2013). Experimentação
-#'     Agrícola (4th ed.). Jaboticabal, SP: Funep. (Quadro 7.2.1,
-#'     pág. 170)
+#' @keywords DIC REG
+#' @source BANZATTO; KRONKA (2013), Quadro 7.2.1, pág. 170.
 #'
 #' Ragazzi, D. (1979). Efeito de doses de gesso na cultura do feijoeiro
 #'     (\emph{Phaseolus vulgaris} L.). Trabalho de Conclusão de Curso
@@ -843,13 +826,14 @@ NULL
 NULL
 
 #' @name BanzattoQd7.3.1
-#' @title Di\enc{â}{a}metro e Altura de Tubetes na Forma\enc{çã}{ca}o de Mudas de Eucalipto
+#' @title Di\enc{â}{a}metro e Altura de Tubetes na Forma\enc{çã}{ca}o de
+#'     Mudas de Eucalipto
 #' @description Experimento fatorial 3 \eqn{\times} 3 que avaliou o
 #'     efeito das dimensões do tubete (diâmetro e altura, 3 níveis cada)
 #'     na produção de mudas de eucalipto. O experimento foi instalado em
 #'     delineamento de blocos casualizados e a resposta medida foi a
 #'     altura das mudas 75 dias após a semeadura.
-#' @format Um \code{data.frame} com 27 observações e 4 variáveis.
+#' @format Um \code{data.frame} com 27 observações e 4 variáveis, em que
 #'
 #' \describe{
 #'
@@ -864,9 +848,7 @@ NULL
 #'
 #' }
 #' @keywords DBC FAT2
-#' @source Banzatto, D. A., Kronka, S. D. (2013). Experimentação
-#'     Agrícola (4th ed.). Jaboticabal, SP: Funep. (Quadro 7.3.1,
-#'     pág. 177)
+#' @source BANZATTO; KRONKA (2013), Quadro 7.3.1, pág. 177.
 #' @examples
 #'
 #' library(lattice)
@@ -877,7 +859,8 @@ NULL
 #'
 #' xtabs(~at + dt, data = BanzattoQd7.3.1)
 #'
-#' with(BanzattoQd7.3.1, addmargins(tapply(alt, list(at, dt), FUN = mean)))
+#' with(BanzattoQd7.3.1,
+#'      addmargins(tapply(alt, list(at, dt), FUN = mean)))
 #'
 #' xyplot(alt ~ at, data = BanzattoQd7.3.1,
 #'        groups = dt, type = c("p", "a", "g"),
@@ -894,7 +877,7 @@ NULL
 #'     fator qualitativo e outro quantitativo. O experimento está em
 #'     delineamento de blocos casualizados e a resposta é a produção da
 #'     cultura.
-#' @format Um \code{data.frame} com 32 observações e 4 variáveis.
+#' @format Um \code{data.frame} com 32 observações e 4 variáveis, em que
 #'
 #' \describe{
 #'
@@ -909,9 +892,7 @@ NULL
 #'
 #' }
 #' @keywords DBC FAT2
-#' @source Banzatto, D. A., Kronka, S. D. (2013). Experimentação
-#'     Agrícola (4th ed.). Jaboticabal, SP: Funep. (Quadro 7.3.3,
-#'     pág. 182)
+#' @source BANZATTO; KRONKA (2013), Quadro 7.3.3, pág. 182.
 #' @examples
 #'
 #' library(lattice)
@@ -941,7 +922,8 @@ NULL
 #'     Guaíra - SP. Os ensaios foram instalados no delineamento de
 #'     blocos casualizados com 4 repetições. A variável resposta é a
 #'     produção de tubérculos, em t ha\eqn{^{-1}}.
-#' @format Um \code{data.frame} com 160 observações e 4 variáveis.
+#' @format Um \code{data.frame} com 160 observações e 4 variáveis, em
+#'     que
 #'
 #' \describe{
 #'
@@ -957,10 +939,8 @@ NULL
 #' \item{\code{prod}}{Produção de tubérculos, em tom ha\eqn{^{-1}}.}
 #'
 #' }
-#' @keywords DBC GE
-#' @source Banzatto, D. A., Kronka, S. D. (2013). Experimentação
-#'     Agrícola (4th ed.). Jaboticabal, SP: Funep. (Quadro 8.2.1,
-#'     pág. 190)
+#' @keywords GE
+#' @source BANZATTO; KRONKA (2013), Quadro 8.2.1, pág. 190.
 #'
 #' Filgueira, F. A. R. (1991). Interação genótipo ambiente em batata
 #'     (\emph{Solanum tuberosum} L. spp \emph{tuberosum}). Tese
@@ -990,13 +970,14 @@ NULL
 NULL
 
 #' @name BanzattoQd8.3.1
-#' @title Grupo de Ensaios de Competi\enc{çã}{ca}o de Gen\enc{ó}{o}tipos de Batata
+#' @title Grupo de Ensaios de Competi\enc{çã}{ca}o de Gen\enc{ó}{o}tipos
+#'     de Batata
 #' @description Grupo de ensaios de competição de genótipos de batata
 #'     realizado por Filgueira (1991) em Anápolis - GO. Cada experimento
 #'     foi instalado em delineamento de blocos casualizados com 4
 #'     repetições. A variável resposta foi a produção, em t
 #'     ha\eqn{^{-1}}, de batata.
-#' @format Um \code{data.frame} com 40 observações e 3 variáveis.
+#' @format Um \code{data.frame} com 40 observações e 3 variáveis, em que
 #'
 #' \describe{
 #'
@@ -1017,10 +998,8 @@ NULL
 #'     em cada um dos experimentos. As estimativas dos quadrados médios
 #'     residuais em cada experimento estão disponíveis no atributo
 #'     \code{"qmr"} do objeto.
-#' @keywords GE DBC
-#' @source Banzatto, D. A., Kronka, S. D. (2013). Experimentação
-#'     Agrícola (4th ed.). Jaboticabal, SP: Funep. (Quadro 8.3.1,
-#'     pág. 196)
+#' @keywords GE
+#' @source BANZATTO; KRONKA (2013), Quadro 8.3.1, pág. 196.
 #'
 #' Filgueira, F. A. R. (1991). Interação genótipo ambiente em batata
 #'     (\emph{Solanum tuberosum} L. spp \emph{tuberosum}). Tese
@@ -1051,11 +1030,12 @@ NULL
 NULL
 
 #' @name BanzattoQd8.4.1
-#' @title Grupo de Ensaios de Competi\enc{çã}{ca}o de Gen\enc{ó}{o}tipos de Cebola
+#' @title Grupo de Ensaios de Competi\enc{çã}{ca}o de Gen\enc{ó}{o}tipos
+#'     de Cebola
 #' @description Grupo de experimentos de competição de genótipos de
 #'     cebola realizado por Santos (2003). O delineamento considerado em
 #'     cada ensaio não foi informado.
-#' @format Um \code{data.frame} com 60 observações e 3 variáveis.
+#' @format Um \code{data.frame} com 60 observações e 3 variáveis, em que
 #'
 #' \describe{
 #'
@@ -1070,9 +1050,7 @@ NULL
 #'
 #' }
 #' @keywords GE
-#' @source Banzatto, D. A., Kronka, S. D. (2013). Experimentação
-#'     Agrícola (4th ed.). Jaboticabal, SP: Funep. (Quadro 8.4.1,
-#'     pág. 200)
+#' @source BANZATTO; KRONKA (2013), Quadro 8.4.1, pág. 200.
 #'
 #' Santos, G. M. (2003). Adaptabilidade e estabilidade de genótipos de
 #'     cebola. Tese (Doutorado em Genética e Melhoramento de
@@ -1101,12 +1079,13 @@ NULL
 NULL
 
 #' @name BanzattoQd8.4.3
-#' @title Grupo de Experimentos de Aduba\enc{çã}{ca}o Nitrogenada em Milho
+#' @title Grupo de Experimentos de Aduba\enc{çã}{ca}o Nitrogenada em
+#'     Milho
 #' @description Dados referentes à produção de milho em grãos de ensaios
 #'     fatoriais \eqn{3^3} de adubação NPK na cultura do milho. Os
 #'     experimentos foram realizados em 8 locais. O delineamento
 #'     experimental não foi informado.
-#' @format Um \code{data.frame} com 24 observações e 3 variáveis.
+#' @format Um \code{data.frame} com 24 observações e 3 variáveis, em que
 #'
 #' \describe{
 #'
@@ -1126,9 +1105,7 @@ NULL
 #' O \code{data.frame} possui um atributo com os quadrados médios
 #'     residuais em cada experimento.
 #' @keywords GE
-#' @source Banzatto, D. A., Kronka, S. D. (2013). Experimentação
-#'     Agrícola (4th ed.). Jaboticabal, SP: Funep. (Quadro 8.4.3,
-#'     pág. 202)
+#' @source BANZATTO; KRONKA (2013), Quadro 8.4.3, pág. 202.
 #' @examples
 #'
 #' library(lattice)
@@ -1156,7 +1133,7 @@ NULL
 #'     de cultivares de milho. O experimento foi instalado em
 #'     delineamento de blocos casualizados. Além da produção em cada
 #'     parcela, contou-se o número de plantas por parcela (stand)
-#' @format Um \code{data.frame} com 24 observações e 6 variáveis.
+#' @format Um \code{data.frame} com 24 observações e 6 variáveis, em que
 #'
 #' \describe{
 #'
@@ -1184,9 +1161,7 @@ NULL
 #'     níveis.
 #'
 #' @keywords DBC COV
-#' @source Banzatto, D. A., Kronka, S. D. (2013). Experimentação
-#'     Agrícola (4th ed.). Jaboticabal, SP: Funep. (Quadro 9.2.1,
-#'     pág. 206)
+#' @source BANZATTO; KRONKA (2013), Quadro 9.2.1, pág. 206.
 #' @examples
 #'
 #' library(lattice)
@@ -1205,4 +1180,3 @@ NULL
 #'        ylab = expression("Produção"~(g~parcela^{-1})))
 #'
 NULL
-
diff --git a/R/Barbin.R b/R/Barbin.R
index 1dd3be55..f66c20b5 100644
--- a/R/Barbin.R
+++ b/R/Barbin.R
@@ -5,9 +5,7 @@
 #'     no espaçamento 2\eqn{\times}2,5 metros.
 #' @format Um vetor com 50 elementos de valor numérico.
 #' @keywords AAS
-#' @source Barbin, D. (2013). Planejamento e Análise Estatística de
-#'     Experimentos Agronômicos (2nd ed.). Londrina, PR:
-#'     Mecenas. (Exercício 1, pág. 199)
+#' @source BARBIN (2013), Exercício 1, pág. 199.
 #' @examples
 #'
 #' library(latticeExtra)
@@ -56,12 +54,13 @@
 NULL
 
 #' @name BarbinEx13
-#' @title Di\enc{â}{a}metro M\enc{é}{e}dio do Tronco de Esp\enc{é}{e}cies de Eucalipto
+#' @title Di\enc{â}{a}metro M\enc{é}{e}dio do Tronco de
+#'     Esp\enc{é}{e}cies de Eucalipto
 #' @description Diâmetro médio (cm), aos 5 anos de idade, de plantas
 #'     úteis da parcela de um ensaio fatorial 2 \eqn{\times} 4, em
 #'     blocos casualizados com 3 repetições, conduzido por H. A. Mello e
 #'     outros, Mogi-Guaçu (1966-1971).
-#' @format Um \code{data.frame} com 24 observações e 4 variáveis.
+#' @format Um \code{data.frame} com 24 observações e 4 variáveis, em que
 #'
 #' \describe{
 #'
@@ -77,9 +76,7 @@ NULL
 #'
 #' }
 #' @keywords DBC FAT2
-#' @source Barbin, D. (2013). Planejamento e Análise Estatística de
-#'     Experimentos Agronômicos (2nd ed.). Londrina, PR:
-#'     Mecenas. (Exercício 13, pág. 206)
+#' @source BARBIN (2013), Exercício 13, pág. 206.
 #' @examples
 #'
 #' library(lattice)
@@ -103,7 +100,7 @@ NULL
 #' @description Ensaio fatorial de adubação NPK, fatorial \eqn{2^3}, com
 #'     resultados referentes à produção de milho (kg ha\eqn{^{-1}}),
 #'     conduzido em delineamento de blocos casualizados em Limoeiro, PE.
-#' @format Um \code{data.frame} com 24 observações e 5 variáveis.
+#' @format Um \code{data.frame} com 24 observações e 5 variáveis, em que
 #'
 #' \describe{
 #'
@@ -122,9 +119,7 @@ NULL
 #'
 #' }
 #' @keywords DBC FAT3
-#' @source Barbin, D. (2013). Planejamento e Análise Estatística de
-#'     Experimentos Agronômicos (2nd ed.). Londrina, PR:
-#'     Mecenas. (Exercício 14, pág. 206)
+#' @source BARBIN (2013), Exercício 14, pág. 206.
 #' @examples
 #'
 #' library(lattice)
@@ -154,7 +149,7 @@ NULL
 #'     delineamento inteiramente casualizado, portanto este é o fator da
 #'     parcela. O corte é o fator da subparcela porque são medidas
 #'     repetidas (no tempo, inclusive) na mesma unidade experimental.
-#' @format Um \code{data.frame} com 40 observações e 4 variáveis.
+#' @format Um \code{data.frame} com 40 observações e 4 variáveis, em que
 #'
 #' \describe{
 #'
@@ -174,9 +169,7 @@ NULL
 #'
 #' }
 #' @keywords PS FAT2
-#' @source Barbin, D. (2013). Planejamento e Análise Estatística de
-#'     Experimentos Agronômicos (2nd ed.). Londrina, PR:
-#'     Mecenas. (Exercício 16, pág. 208)
+#' @source BARBIN (2013), Exercício 16, pág. 208.
 #' @examples
 #'
 #' library(lattice)
@@ -200,7 +193,8 @@ NULL
 NULL
 
 #' @name BarbinEx17
-#' @title Efeito do Espa\enc{ç}{c}amento na Produtividade de Laranjeira Val\enc{ê}{e}ncia
+#' @title Efeito do Espa\enc{ç}{c}amento na Produtividade de Laranjeira
+#'     Val\enc{ê}{e}ncia
 #' @description Dados de produtividade de laranja, em kg por planta, de
 #'     um ensaio em blocos casualizados estudando o efeito do
 #'     espaçamento de plantio de laranjeira Valência (clone novo) sobre
@@ -225,9 +219,7 @@ NULL
 #'
 #' }
 #' @keywords DBC PS FAT2
-#' @source Barbin, D. (2013). Planejamento e Análise Estatística de
-#'     Experimentos Agronômicos (2nd ed.). Londrina, PR:
-#'     Mecenas. (Exercício 17, pág. 209)
+#' @source BARBIN (2013), Exercício 17, pág. 209.
 #' @examples
 #'
 #' library(lattice)
@@ -257,7 +249,8 @@ NULL
 NULL
 
 #' @name BarbinEx18
-#' @title Altura de Plantas de Esp\enc{é}{e}cies de Eucalipto em V\enc{á}{a}rios Locais
+#' @title Altura de Plantas de Esp\enc{é}{e}cies de Eucalipto em
+#'     V\enc{á}{a}rios Locais
 #' @description Dados referentes à altura de plantas de eucalipto, com 3
 #'     anos de idade, em ensaios inteiramente casualizados estudando o
 #'     efeito da espécie de eucalipto em vários municípios (grupo de
@@ -283,9 +276,7 @@ NULL
 #'
 #' }
 #' @keywords GE DIC
-#' @source Barbin, D. (2013). Planejamento e Análise Estatística de
-#'     Experimentos Agronômicos (2nd ed.). Londrina, PR:
-#'     Mecenas. (Exercício 18, pág. 210)
+#' @source BARBIN (2013), Exercício 18, pág. 210.
 #' @examples
 #'
 #' library(lattice)
@@ -304,25 +295,25 @@ NULL
 NULL
 
 #' @name BarbinEx3
-#' @title Podrid\enc{ã}{a}o Mole de Manga em Fun\enc{çã}{ca}o do Tratamento T\enc{é}{e}rmico
+#' @title Podrid\enc{ã}{a}o Mole de Manga em Fun\enc{çã}{ca}o do
+#'     Tratamento T\enc{é}{e}rmico
 #' @description Os dados referem-se as notas (médias de 6 frutos)
 #'     atribuídas a podridão mole de manga (fruto) sob diferentes
 #'     tratamentos térmicos, de um experimento inteiramente ao acaso
 #'     realizado pelo Prof. Vladimir R. Sampaio, do Departamento de
 #'     Horticultura, ESALQ-USP.
-#' @format Um \code{data.frame} com 28 observações e 2 variáveis.
+#' @format Um \code{data.frame} com 28 observações e 2 variáveis, em que
 #' \describe{
 #'
-#' \item{\code{tterm}}{Fator categórico que indica o tratamento térmico.}
+#' \item{\code{tterm}}{Fator categórico que indica o tratamento
+#'     térmico.}
 #'
 #' \item{\code{nota}}{Nota atribuída a podridão mole de manga, valor
 #'     resultante da média de 6 frutos avaliados.}
 #'
 #' }
 #' @keywords DIC
-#' @source Barbin, D. (2013). Planejamento e Análise Estatística de
-#'     Experimentos Agronômicos (2nd ed.). Londrina, PR:
-#'     Mecenas. (Exercício 3, pág. 119)
+#' @source BARBIN (2013), Exercício 3, pág. 119.
 #' @examples
 #'
 #' library(lattice)
@@ -344,7 +335,7 @@ NULL
 #'     \emph{E. saligna} Sm., de um ensaio inteiramente casualizado, de
 #'     controle químico de "Damping-off" conduzido por Krugner (1971).
 #'
-#' @format Um \code{data.frame} com 45 observações e 3 variáveis.
+#' @format Um \code{data.frame} com 45 observações e 3 variáveis, em que
 #'
 #' \describe{
 #'
@@ -360,9 +351,7 @@ NULL
 #'
 #' }
 #' @keywords DBC
-#' @source Barbin, D. (2013). Planejamento e Análise Estatística de
-#'     Experimentos Agronômicos (2nd ed.). Londrina, PR:
-#'     Mecenas. (Exercício 8, pág. 202)
+#' @source BARBIN (2013), Exercício 8, pág. 202.
 #'
 #'  Krugner, T. L. Controle químico do "damping-off" em
 #'     eucalipto. Piracicaba, 1971. 60p. Dissertação (Mestrado) - Escola
@@ -387,14 +376,15 @@ NULL
 
 #' @name BarbinEx9
 #' @aliases BarbinEx10
-#' @title Ensaio de Competi\enc{çã}{ca}o de Clones de Laranja Pera-do-Rio
+#' @title Ensaio de Competi\enc{çã}{ca}o de Clones de Laranja
+#'     Pera-do-Rio
 #' @description Ensaio de competição de 13 clones de laranja Pera-do-Rio
 #'     onde foram obtidos os resultados de produção, em kg de frutos
 #'     planta, para o ano de 1987, em que as plantas estavam com 16 anos
 #'     de idade. O ensaio foi conduzido pelo Dr. Joaquim Teófilo Sobrino
 #'     em delineamento de blocos ao acaso na Estação Experimental de
 #'     Limeira, do IAC.
-#' @format Um \code{data.frame} com 78 observações e 4 variáveis.
+#' @format Um \code{data.frame} com 78 observações e 4 variáveis, em que
 #'
 #' \describe{
 #'
@@ -413,9 +403,7 @@ NULL
 #' @details O dataset \code{BarbinEx10} resulta de uma agregação dos
 #'     dados do \code{BarbinEx9} que está disponível na seção Examples.
 #' @keywords DBC
-#' @source Barbin, D. (2013). Planejamento e Análise Estatística de
-#'     Experimentos Agronômicos (2nd ed.). Londrina, PR:
-#'     Mecenas. (Exercício 9, pág. 203)
+#' @source BARBIN (2013), Exercício 9, pág. 203.
 #' @examples
 #'
 #' library(latticeExtra)
@@ -469,9 +457,7 @@ NULL
 #'
 #' }
 #' @keywords DQL
-#' @source Barbin, D. (2013). Planejamento e Análise Estatística de
-#'     Experimentos Agronômicos (2nd ed.). Londrina, PR:
-#'     Mecenas. (pág. 104)
+#' @source BARBIN (2013), pág. 104.
 #' @examples
 #'
 #' library(lattice)
@@ -503,7 +489,8 @@ NULL
 NULL
 
 #' @name BarbinPg114
-#' @title Influ\enc{ê}{e}ncia do Aparelho e Operador na Medi\enc{çã}{ca}o de \enc{Á}{A}rvores
+#' @title Influ\enc{ê}{e}ncia do Aparelho e Operador na
+#'     Medi\enc{çã}{ca}o de \enc{Á}{A}rvores
 #' @description Dados de um experimento fatorial 5 \eqn{\times} 4, em
 #'     delineamento de blocos casualizados, sobre e influência do
 #'     aparelho e do operador na determinação de altura de árvores, aos
@@ -520,7 +507,8 @@ NULL
 #'     sorteio continuava até as combinações fossem realizadas na
 #'     árvore, então passava-se para a próxima árvore. Evidentemente, a
 #'     medida feita com o trena ficava sempre para o final (testemunha).
-#' @format Um \code{data.frame} com 200 observações e 4 variáveis.
+#' @format Um \code{data.frame} com 200 observações e 4 variáveis, em
+#'     que
 #'
 #' \describe{
 #'
@@ -541,9 +529,7 @@ NULL
 #'
 #' }
 #' @keywords DBC FAT2
-#' @source Barbin, D. (2013). Planejamento e Análise Estatística de
-#'     Experimentos Agronômicos (2nd ed.). Londrina, PR:
-#'     Mecenas. (pág. 114)
+#' @source BARBIN (2013), pág. 114.
 #'
 #' Simões, J. W., Mello, H. A., Barbin, D. (1967). Eficiência dos
 #'     aparelhos e e influência do operador na medição de altura total
@@ -584,7 +570,7 @@ NULL
 #'     com dois níveis (fatorial \eqn{2^3}), na produção de café
 #'     coco. Os níveis dos fertilizantes foram codificados para 0 e 1 e
 #'     não foi informada as doses reais de cada um deles.
-#' @format Um \code{data.frame} com 48 observações e 5 variáveis.
+#' @format Um \code{data.frame} com 48 observações e 5 variáveis, em que
 #'
 #' \describe{
 #'
@@ -593,7 +579,8 @@ NULL
 #'
 #' \item{\code{P}}{Inteiro que codifica dois níveis de fósforo (0 e 1).}
 #'
-#' \item{\code{K}}{Inteiro que codifica dois níveis de potássio (0 e 1).}
+#' \item{\code{K}}{Inteiro que codifica dois níveis de potássio (0 e
+#'     1).}
 #'
 #' \item{\code{bloc}}{Fator de níveis categóricos considerado para
 #'     controle local.}
@@ -604,9 +591,7 @@ NULL
 #'
 #' }
 #' @keywords DBC FAT3
-#' @source Barbin, D. (2013). Planejamento e Análise Estatística de
-#'     Experimentos Agronômicos (2nd ed.). Londrina, PR:
-#'     Mecenas. (pág. 125)
+#' @source BARBIN (2013), pág. 125).
 #' @examples
 #'
 #' library(lattice)
@@ -627,13 +612,14 @@ NULL
 NULL
 
 #' @name BarbinPg137
-#' @title Aduba\enc{çã}{ca}o NPK na Produ\enc{çã}{ca}o de Algod\enc{ã}{a}o Herb\enc{á}{a}ceo
+#' @title Aduba\enc{çã}{ca}o NPK na Produ\enc{çã}{ca}o de
+#'     Algod\enc{ã}{a}o Herb\enc{á}{a}ceo
 #' @description Produção de algodão herbáceo de um ensaio de adubação
 #'     NPK \eqn{3^3} com confundimento (grupo W) de dois graus de
 #'     liberdade da interação tripla. Cada combinação NPK teve duas
 #'     repetições por bloco e o ensaio foi conduzido por Cavalcanti
 #'     (1977) em Pernambuco.
-#' @format Um \code{data.frame} com 54 observações e 6 variáveis.
+#' @format Um \code{data.frame} com 54 observações e 6 variáveis, em que
 #'     \describe{
 #'
 #' \item{\code{N}}{Dose de nitrogênio (kg ha\eqn{^{-1}}) usada na
@@ -656,9 +642,7 @@ NULL
 #'
 #' }
 #' @keywords DBC FAT3 confundimento
-#' @source Barbin, D. (2013). Planejamento e Análise Estatística de
-#'     Experimentos Agronômicos (2nd ed.). Londrina, PR:
-#'     Mecenas. (pág. 137)
+#' @source BARBIN (2013), pág. 137.
 #'
 #' Cavalcanti, F. B. (1977). A adubação mineral na cultura do algodão
 #'     (\emph{Gossypium hirsutum} L.) no Estado de
@@ -703,7 +687,8 @@ NULL
 NULL
 
 #' @name BarbinPg156
-#' @title Aplica\enc{çã}{ca}o de Aduba\enc{çã}{ca}o Fosfatada na Produ\enc{çã}{ca}o de Milho
+#' @title Aplica\enc{çã}{ca}o de Aduba\enc{çã}{ca}o Fosfatada na
+#'     Produ\enc{çã}{ca}o de Milho
 #' @description Dados de um ensaio de adubação fosfatada em milho,
 #'     realizado no esquema de parcelas subdivididas em delineamento de
 #'     blocos ao acaso, que avaliou o efeito da forma de aplicação da
@@ -727,9 +712,7 @@ NULL
 #'
 #' }
 #' @keywords PS DBC
-#' @source Barbin, D. (2013). Planejamento e Análise Estatística de
-#'     Experimentos Agronômicos (2nd ed.). Londrina, PR:
-#'     Mecenas. (pág. 156)
+#' @source BARBIN (2013), pág. 156.
 #' @examples
 #'
 #' library(lattice)
@@ -748,7 +731,8 @@ NULL
 NULL
 
 #' @name BarbinPg167
-#' @title Produ\enc{çã}{ca}o de Porta-enxertos para Laranjeira em V\enc{á}{a}rias Safras
+#' @title Produ\enc{çã}{ca}o de Porta-enxertos para Laranjeira em
+#'     V\enc{á}{a}rias Safras
 #' @description Dados de produção de laranja de um ensaio de competição
 #'     de porta-enxertos para laranjeira Valência realizado na Estação
 #'     Experimental de Limeira, em delineamento de blocos casualizados.
@@ -770,9 +754,7 @@ NULL
 #'
 #' }
 #' @keywords PS DBC
-#' @source Barbin, D. (2013). Planejamento e Análise Estatística de
-#'     Experimentos Agronômicos (2nd ed.). Londrina, PR:
-#'     Mecenas. (pág. 167)
+#' @source BARBIN (2013), pág. 167.
 #' @examples
 #'
 #' library(latticeExtra)
@@ -796,7 +778,8 @@ NULL
 NULL
 
 #' @name BarbinPg177
-#' @title Altura de Prog\enc{ê}{e}nies de \emph{E. grandis} em Tr\enc{ê}{e}s Locais
+#' @title Altura de Prog\enc{ê}{e}nies de \emph{E. grandis} em
+#'     Tr\enc{ê}{e}s Locais
 #' @description Dados de experimento que mediu a altura (m) de árvores
 #'     seis progênies de \emph{Eucaliptus grandis} em experimentos
 #'     instalados em 3 locais sob o delineamento de blocos casualizados.
@@ -818,9 +801,7 @@ NULL
 #'
 #' }
 #' @keywords GE DBC
-#' @source Barbin, D. (2013). Planejamento e Análise Estatística de
-#'     Experimentos Agronômicos (2nd ed.). Londrina, PR:
-#'     Mecenas. (pág. 177)
+#' @source BARBIN (2013), pág. 177.
 #' @examples
 #'
 #' library(latticeExtra)
@@ -843,7 +824,7 @@ NULL
 #'     foram comparadas quatro cultivares de pêssego quando ao
 #'     enraizamento de estacas. Experimento foi instalado em
 #'     delineamento inteiramente casualizado.
-#' @format Um \code{data.frame} com 20 observações e 2 variáveis.
+#' @format Um \code{data.frame} com 20 observações e 2 variáveis, em que
 #'
 #' \describe{
 #'
@@ -859,9 +840,7 @@ NULL
 #'     posição das observações consideradas perdidas para se ilustrar a
 #'     análise do experimento com número não igual de repetições.
 #' @keywords DIC
-#' @source Barbin, D. (2013). Planejamento e Análise Estatística de
-#'     Experimentos Agronômicos (2nd ed.). Londrina, PR:
-#'     Mecenas. (pág. 25)
+#' @source BARBIN (2013), pág. 25.
 #'
 #' Sambão, J. C., Sampaio, V. R., Barbin, D. (1982). Enraizamento de
 #'     estacas herbáceas de pessegueiro (\emph{Prunus persica}
@@ -886,7 +865,7 @@ NULL
 #' @description Dados de produção de laranjeira aos 12 anos de idade sob
 #'     diferentes porta-enxertos. O experimento foi instalado em
 #'     delineamento de blocos casualizados.
-#' @format Um \code{data.frame} com 27 observações e 3 variáveis.
+#' @format Um \code{data.frame} com 27 observações e 3 variáveis, em que
 #'
 #' \describe{
 #'
@@ -904,9 +883,7 @@ NULL
 #'     consideradas como perdidas para ilustrar como fazer a análise do
 #'     experimento desbalanceado.
 #' @keywords DBC
-#' @source Barbin, D. (2013). Planejamento e Análise Estatística de
-#'     Experimentos Agronômicos (2nd ed.). Londrina, PR:
-#'     Mecenas. (pág. 72)
+#' @source BARBIN (2013), pág. 72.
 #'
 #' Teófilo Sobrinho, J. (1972). Comportamento da laranjeira valência
 #'     (\emph{Citrus sinensis} L., Osbeck) sob diferentes
@@ -926,4 +903,3 @@ NULL
 #'        ylab = "Número médio de frutos por planta")
 #'
 NULL
-
diff --git a/R/Costa.R b/R/Costa.R
index 26153fe2..1c9e6ff2 100644
--- a/R/Costa.R
+++ b/R/Costa.R
@@ -1,5 +1,6 @@
 #' @name CostaEx5.7.2
-#' @title Densidade do Solo ao Longo do Perfil em Zonas de Compacta\enc{çã}{ca}o
+#' @title Densidade do Solo ao Longo do Perfil em Zonas de
+#'     Compacta\enc{çã}{ca}o
 #' @description Os dados são resultados de um estudo feito em zonas de
 #'     compactação e referem-se a valores de densidade do solo em
 #'     amostras retiradas de diferentes profundidades no perfil do solo.
@@ -14,10 +15,8 @@
 #'     amostra retirada do perfil do solo.}
 #'
 #' }
-#' @keywords TODO
-#' @source Costa, J. R. (2003). Técnicas experimentais aplicadas às
-#'     ciências agrárias (Documentos 163). Seropédica, RJ: Embrapa
-#'     Agrobiologia. (Exemplo 5.7.2.1, pág. 90)
+#' @keywords RL
+#' @source Costa (2013), Exemplo 5.7.2.1, pág. 90.
 #' @examples
 #'
 #' library(lattice)
@@ -51,9 +50,7 @@ NULL
 #'
 #' }
 #' @keywords DIC RegSeg
-#' @source Costa, J. R. (2003). Técnicas experimentais aplicadas às
-#'     ciências agrárias (Documentos 163). Seropédica, RJ: Embrapa
-#'     Agrobiologia. (Exemplo 5.7.3.1, pág. 95)
+#' @source Costa (2013), Exemplo 5.7.3.1, pág. 95.
 #' @examples
 #'
 #' library(lattice)
@@ -90,9 +87,7 @@ NULL
 #'
 #' }
 #' @keywords DIC
-#' @source Costa, J. R. (2003). Técnicas experimentais aplicadas às
-#'     ciências agrárias (Documentos 163). Seropédica, RJ: Embrapa
-#'     Agrobiologia. (Tabela 4, pág. 58)
+#' @source Costa (2013), Tabela 4, pág. 58.
 #' @examples
 #'
 #' library(lattice)
@@ -130,9 +125,7 @@ NULL
 #'
 #' }
 #' @keywords DBC
-#' @source Costa, J. R. (2003). Técnicas experimentais aplicadas às
-#'     ciências agrárias (Documentos 163). Seropédica, RJ: Embrapa
-#'     Agrobiologia. (Tabela 6 pág. 63)
+#' @source Costa (2013), Tabela 6 pág. 63.
 #' @examples
 #'
 #' library(lattice)
@@ -176,9 +169,7 @@ NULL
 #'
 #' }
 #' @keywords DBC FAT2
-#' @source Costa, J. R. (2003). Técnicas experimentais aplicadas às
-#'     ciências agrárias (Documentos 163). Seropédica, RJ: Embrapa
-#'     Agrobiologia. (Tabela 7, pág. 68)
+#' @source Costa (2013), Tabela 7, pág. 68.
 #' @examples
 #'
 #' library(lattice)
@@ -205,7 +196,8 @@ NULL
 NULL
 
 #' @name CostaTb8
-#' @title Irriga\enc{çã}{ca}o no Tamanho de Frutos de Variedades de Banana
+#' @title Irriga\enc{çã}{ca}o no Tamanho de Frutos de Variedades de
+#'     Banana
 #' @description Experimento em parcelas subdivididas que estudou o
 #'     comprimento de frutos de variedades de banana em função do nível
 #'     de irrigação fornecido.
@@ -231,9 +223,7 @@ NULL
 #'
 #' }
 #' @keywords DBC PS
-#' @source Costa, J. R. (2003). Técnicas experimentais aplicadas às
-#'     ciências agrárias (Documentos 163). Seropédica, RJ: Embrapa
-#'     Agrobiologia. (Tabela 8, pág. 76)
+#' @source Costa (2013), Tabela 8, pág. 76.
 #' @examples
 #'
 #' library(lattice)
@@ -258,4 +248,3 @@ NULL
 #'        ylab = expression("Comprimento do fruto"~(cm)))
 #'
 NULL
-
diff --git a/R/Dias.R b/R/Dias.R
index a85fdb7a..3a630036 100644
--- a/R/Dias.R
+++ b/R/Dias.R
@@ -1,6 +1,6 @@
 #' @name DiasEg10.1
-#' @title Subst\enc{â}{a}ncias Alelo\enc{á}{a}ticas no Percentual de Germina\enc{çã}{ca}o de
-#'     Sementes
+#' @title Subst\enc{â}{a}ncias Alelo\enc{á}{a}ticas no Percentual de
+#'     Germina\enc{çã}{ca}o de Sementes
 #' @description Experimento em delineamento inteiramente casualizado
 #'     onde foram avaliados os percentuais de germinação de sementes de
 #'     2 cultivares, submetidas a 5 tratamentos com substâncias
@@ -22,8 +22,7 @@
 #'
 #' }
 #' @keywords DIC FAT2
-#' @source Dias, L. A. S., Barros, W. S. (2009). Biometria
-#'      Experimental. Viçosa, MG: UFV. (Exemplo 10.1, pág. 269)
+#' @source BARROS; DIAS (2009), Exemplo 10.1, pág. 269.
 #' @examples
 #'
 #' library(lattice)
@@ -65,8 +64,7 @@ NULL
 #'
 #' }
 #' @keywords DIC PS
-#' @source Dias, L. A. S., Barros, W. S. (2009). Biometria
-#'     Experimental. Viçosa, MG: UFV. (Exemplo 10.2, pág. 286)
+#' @source BARROS; DIAS (2009), Exemplo 10.2, pág. 286.
 #' @examples
 #'
 #' library(lattice)
@@ -108,8 +106,7 @@ NULL
 #' }
 #'
 #' @keywords DBC GE
-#' @source Dias, L. A. S., Barros, W. S. (2009). Biometria
-#'     Experimental. Viçosa, MG: UFV. (Exemplo 11.1, pág. 305)
+#' @source BARROS; DIAS (2009), Exemplo 11.1, pág. 305.
 #' @examples
 #'
 #' library(lattice)
@@ -138,8 +135,7 @@ NULL
 #' @format Vetor com 43 observações que são o número de frutos
 #'     produzidos por plantas de cacaueiro.
 #' @keywords AAS
-#' @source Dias, L. A. S., Barros, W. S. (2009). Biometria
-#'     Experimental. Viçosa, MG: UFV.
+#' @source BARROS; DIAS (2009), Exemplo 3.2.
 #' @examples
 #'
 #' stem(DiasEg3.2)
@@ -160,8 +156,7 @@ NULL
 #' @description Amostras aleatória da alturas de plantas de milho.
 #' @format Vetor com 100 observações da altura (cm).
 #' @keywords AAS
-#' @source Dias, L. A. S., Barros, W. S. (2009). Biometria
-#'     Experimental. Viçosa, MG: UFV.
+#' @source BARROS; DIAS (2009), Exemplo 3.6.
 #' @examples
 #'
 #' stem(DiasEg3.6)
@@ -180,8 +175,8 @@ NULL
 NULL
 
 #' @name DiasEg5.1
-#' @title N\enc{ú}{u}mero de Ovos Eclodidos de Nemat\enc{ó}{o}ides Ap\enc{ó}{o}s Aplica\enc{çã}{ca}o de
-#'     Nematicidas Naturais
+#' @title N\enc{ú}{u}mero de Ovos Eclodidos de Nemat\enc{ó}{o}ides
+#'     Ap\enc{ó}{o}s Aplica\enc{çã}{ca}o de Nematicidas Naturais
 #' @description Resultados de um experimento em delineamento
 #'     inteiramente casualizado que avaliou o efeito de 5 nematicidas
 #'     naturais na eclosão de ovos de nematoides.
@@ -197,8 +192,7 @@ NULL
 #'
 #' }
 #' @keywords DIC contagem
-#' @source Dias, L. A. S., Barros, W. S. (2009). Biometria
-#'     Experimental. Viçosa, MG: UFV. (Exemplo 5.1, pág. 130)
+#' @source BARROS; DIAS (2009), Exemplo 5.1, pág. 130.
 #' @examples
 #'
 #' library(lattice)
@@ -233,8 +227,7 @@ NULL
 #'
 #' }
 #' @keywords DIC
-#' @source Dias, L. A. S., Barros, W. S. (2009). Biometria
-#'     Experimental. Viçosa, MG: UFV. (Exercício 9, Cap. 11, pág. 321)
+#' @source BARROS; DIAS (2009), Exercício 9, Cap. 11, pág. 321.
 #' @examples
 #'
 #' library(lattice)
@@ -252,7 +245,8 @@ NULL
 NULL
 
 #' @name DiasEg6.1
-#' @title Ganhos de Produ\enc{çã}{ca}o de Arroz nos Ciclos de Sele\enc{çã}{ca}o
+#' @title Ganhos de Produ\enc{çã}{ca}o de Arroz nos Ciclos de
+#'     Sele\enc{çã}{ca}o
 #' @description Amostra com 6 pares de observações representanto os
 #'     ciclos de seleção e ganhos percentuais de produção
 #'     correspondentes em arroz.
@@ -267,8 +261,7 @@ NULL
 #'
 #' }
 #' @keywords DIC
-#' @source Dias, L. A. S., Barros, W. S. (2009). Biometria
-#'     Experimental. Viçosa, MG: UFV. (Exemplo 6.1, pág. 157)
+#' @source BARROS; DIAS (2009), Exemplo 6.1, pág. 157.
 #' @examples
 #'
 #' library(lattice)
@@ -283,7 +276,8 @@ NULL
 NULL
 
 #' @name DiasEg6.2
-#' @title Aduba\enc{çã}{ca}o NPK na Produ\enc{çã}{ca}o de Feij\enc{ã}{a}o
+#' @title Aduba\enc{çã}{ca}o NPK na Produ\enc{çã}{ca}o de
+#'     Feij\enc{ã}{a}o
 #' @description Experimento instalado em delineamento de blocos
 #'     casualizados para estudar o efeito da adubação NPK na
 #'     produtividade do feijoeiro.
@@ -302,8 +296,7 @@ NULL
 #'
 #' }
 #' @keywords DBC RP
-#' @source Dias, L. A. S., Barros, W. S. (2009). Biometria
-#'     Experimental. Viçosa, MG: UFV. (Exemplo 6.2, pág. 164)
+#' @source BARROS; DIAS (2009), Exemplo 6.2, pág. 164.
 #' @examples
 #'
 #' library(lattice)
@@ -340,8 +333,7 @@ NULL
 #'
 #' }
 #' @keywords AAS
-#' @source Dias, L. A. S., Barros, W. S. (2009). Biometria
-#'     Experimental. Viçosa, MG: UFV. (Exemplo 6.3, pág. 173)
+#' @source BARROS; DIAS (2009), Exemplo 6.3, pág. 173.
 #' @examples
 #'
 #' library(lattice)
@@ -366,15 +358,14 @@ NULL
 #' \item{\code{luz}}{Fator métrico que identifica, em escala codificada,
 #'     a quantidade de luz aplicada.}
 #'
-#' \item{\code{agua}}{Fator métrico que identifica, em escala codificada,
-#'     a quantidade de água aplicada.}
+#' \item{\code{agua}}{Fator métrico que identifica, em escala
+#'     codificada, a quantidade de água aplicada.}
 #'
 #' \item{\code{prod}}{Produção de tomateiros.}
 #'
 #' }
 #' @keywords DIC RM
-#' @source Dias, L. A. S., Barros, W. S. (2009). Biometria
-#'     Experimental. Viçosa, MG: UFV. (Exemplo 7.1, pág. 187)
+#' @source BARROS; DIAS (2009), Exemplo 7.1, pág. 187.
 #' @examples
 #'
 #' library(lattice)
@@ -411,8 +402,7 @@ NULL
 #'
 #' }
 #' @keywords DIC
-#' @source Dias, L. A. S., Barros, W. S. (2009). Biometria
-#'     Experimental. Viçosa, MG: UFV. (Exemplo 9.1, pág. 222)
+#' @source BARROS; DIAS (2009), Exemplo 9.1, pág. 222.
 #' @examples
 #'
 #' library(lattice)
@@ -450,8 +440,7 @@ NULL
 #'
 #' }
 #' @keywords ClaHier
-#' @source Dias, L. A. S., Barros, W. S. (2009). Biometria
-#'     Experimental. Viçosa, MG: UFV. (Exemplo 9.2, pág. 231)
+#' @source BARROS; DIAS (2009), Exemplo 9.2, pág. 231.
 #' @examples
 #'
 #' library(lattice)
@@ -490,8 +479,7 @@ NULL
 #'
 #' }
 #' @keywords DQL
-#' @source Dias, L. A. S., Barros, W. S. (2009). Biometria
-#'     Experimental. Viçosa, MG: UFV. (Exemplo 9.4, pág.247)
+#' @source BARROS; DIAS (2009), Exemplo 9.4, pág. 247.
 #' @examples
 #'
 #' library(lattice)
@@ -538,8 +526,7 @@ NULL
 #'
 #' }
 #' @keywords DBC FAT2
-#' @source Dias, L. A. S., Barros, W. S. (2009). Biometria
-#'     Experimental. Viçosa, MG: UFV. (Exercício 10, Cap. 10, pág. 296)
+#' @source BARROS; DIAS (2009), Exercício 10, Cap. 10, pág. 296.
 #' @examples
 #'
 #' library(lattice)
@@ -580,9 +567,7 @@ NULL
 #' }
 #'
 #' @keywords DBC
-#' @source Dias, L. A. S., Barros, W. S. (2009). Biometria
-#'     Experimental. Viçosa, MG: UFV. (Exercício 10.4, Cap. 10,
-#'     pág. 294)
+#' @source BARROS; DIAS (2009), Exercício 10.4, Cap. 10, pág. 294.
 #' @examples
 #'
 #' library(lattice)
@@ -629,8 +614,7 @@ NULL
 #'
 #' }
 #' @keywords DIC FAT3
-#' @source Dias, L. A. S., Barros, W. S. (2009). Biometria
-#'     Experimental. Viçosa, MG: UFV. (Exercício 7, Cap. 10, pág. 295)
+#' @source BARROS; DIAS (2009), Exercício 7, Cap. 10, pág. 295.
 #' @examples
 #'
 #' library(lattice)
@@ -651,7 +635,8 @@ NULL
 NULL
 
 #' @name DiasEx10.4.8
-#' @title Teores de Mat\enc{é}{e}ria Seca de Gramineas em Fun\enc{çã}{ca}o da Calagem
+#' @title Teores de Mat\enc{é}{e}ria Seca de Gramineas em
+#'     Fun\enc{çã}{ca}o da Calagem
 #' @description Em um ensaio em delineamento de blocos casualizados foi
 #'     analisado o efeito de doses de calcário no teor de matéria seca
 #'     de gramíneas forrageiras. Foi utilizado esquema fatorial 3
@@ -674,8 +659,7 @@ NULL
 #'
 #' }
 #' @keywords DBC FAT2
-#' @source Dias, L. A. S., Barros, W. S. (2009). Biometria
-#'     Experimental. Viçosa, MG: UFV. (Exercício 8, Cap. 10, pág. 295)
+#' @source BARROS; DIAS (2009), Exercício 8, Cap. 10, pág. 295.
 #' @examples
 #'
 #' library(lattice)
@@ -712,8 +696,7 @@ NULL
 #'
 #' }
 #' @keywords DBC
-#' @source Dias, L. A. S., Barros, W. S. (2009). Biometria
-#'     Experimental. Viçosa, MG: UFV. (Exercício 8, Cap. 11, pág. 321
+#' @source BARROS; DIAS (2009), Exercício 8, Cap. 11, pág. 321.
 #' @examples
 #'
 #' library(lattice)
@@ -760,8 +743,7 @@ NULL
 #'
 #' }
 #' @keywords GE DIC
-#' @source Dias, L. A. S., Barros, W. S. (2009). Biometria
-#'     Experimental. Viçosa, MG: UFV. (Exercício 9, Cap. 11, pág. 321)
+#' @source BARROS; DIAS (2009), Exercício 9, Cap. 11, pág. 321.
 #' @examples
 #'
 #' library(lattice)
@@ -782,7 +764,8 @@ NULL
 NULL
 
 #' @name DiasEx3.6.7
-#' @title Percentual de Germina\enc{çã}{ca}o de Lotes de Sementes de Tomate
+#' @title Percentual de Germina\enc{çã}{ca}o de Lotes de Sementes de
+#'     Tomate
 #' @description Percentuais de germinação de 2 lotes de sementes de
 #'      tomate com 5 repetições com 100 sementes em cada repetição.
 #' @format Um \code{data.frame} com 2 observações e 1 variável, em que
@@ -796,8 +779,7 @@ NULL
 #'
 #' }
 #' @keywords AAS
-#' @source Dias, L. A. S., Barros, W. S. (2009). Biometria
-#'     Experimental. Viçosa, MG: UFV. (Exercício 7, Cap. 7.6, pág.102)
+#' @source BARROS; DIAS (2009), (Exercício 7, Cap. 7.6, pág. 102.
 #' @examples
 #'
 #' library(lattice)
@@ -825,8 +807,7 @@ NULL
 #'
 #' }
 #' @keywords RL
-#' @source Dias, L. A. S., Barros, W. S. (2009). Biometria
-#'     Experimental. Viçosa, MG: UFV. (Exercício 1, Cap. 6, pág. 179)
+#' @source BARROS; DIAS (2009), Exercício 1, Cap. 6, pág. 179.
 #' @examples
 #'
 #' library(lattice)
@@ -852,9 +833,8 @@ NULL
 #' \item{\code{diam}}{Diãmetro em centimetros.}
 #'
 #' }
-#' @keywords ASS RL
-#' @source Dias, L. A. S., Barros, W. S. (2009). Biometria
-#'     Experimental. Viçosa, MG: UFV. (Exercício 10, Cap. 7, pág. 181)
+#' @keywords AAS RL
+#' @source BARROS; DIAS (2009), Exercício 10, Cap. 7, pág. 181.
 #' @examples
 #'
 #' library(lattice)
@@ -880,8 +860,7 @@ NULL
 #'
 #' }
 #' @keywords AAS RL
-#' @source Dias, L. A. S., Barros, W. S. (2009). Biometria
-#'     Experimental. Viçosa, MG: UFV. (Exercício 9, Cap. 6, pág. 181)
+#' @source BARROS; DIAS (2009), Exercício 9, Cap. 6, pág. 181.
 #'
 #' library(lattice)
 #'
@@ -913,8 +892,7 @@ NULL
 #' }
 #'
 #' @keywords DQL
-#' @source Dias, L. A. S., Barros, W. S. (2009). Biometria
-#'     Experimental. Viçosa, MG: UFV. (Exercício 10, Cap. 9, pág. 261)
+#' @source BARROS; DIAS (2009), Exercício 10, Cap. 9, pág. 261.
 #' @examples
 #'
 #' library(lattice)
@@ -954,8 +932,7 @@ NULL
 #'
 #' }
 #' @keywords DIC contagem
-#' @source Dias, L. A. S., Barros, W. S. (2009). Biometria
-#'      Experimental. Viçosa, MG: UFV. (Exercício 4, Cap. 9, pág. 260)
+#' @source BARROS; DIAS (2009), Exercício 4, Cap. 9, pág. 260.
 #' @examples
 #'
 #' library(lattice)
@@ -973,7 +950,8 @@ NULL
 NULL
 
 #' @name DiasEx9.6.6
-#' @title Teores de S\enc{ó}{o}lidos Sol\enc{ú}{u}veis Totais da Poupa de Frutos
+#' @title Teores de S\enc{ó}{o}lidos Sol\enc{ú}{u}veis Totais da Poupa
+#'     de Frutos
 #' @description Experimento em delineamento inteiramente casualizado,
 #'     com 5 repetições e 4 cultivares de tomateiro onde os totais de
 #'     sólidos solúveis na poupa dos frutos foram avaliados.
@@ -990,8 +968,7 @@ NULL
 #'
 #' }
 #' @keywords DIC
-#' @source Dias, L. A. S., Barros, W. S. (2009). Biometria
-#'     Experimental. Viçosa, MG: UFV. (Exercício 6, Cap. 9, pág. 260)
+#' @source BARROS; DIAS (2009), Exercício 6, Cap. 9, pág. 260.
 #' @examples
 #'
 #' library(lattice)
@@ -1031,8 +1008,7 @@ NULL
 #'
 #' }
 #' @keywords DBC
-#' @source Dias, L. A. S., Barros, W. S. (2009). Biometria
-#'     Experimental. Viçosa, MG: UFV. (Exercício 7, Cap. 9, pág. 261)
+#' @source BARROS; DIAS (2009), Exercício 7, Cap. 9, pág. 261.
 #' @examples
 #'
 #' library(lattice)
@@ -1048,4 +1024,3 @@ NULL
 #'        ylab = "Número de frutos na primeira colheita")
 #'
 NULL
-
diff --git a/R/Faria.R b/R/Faria.R
index 33dec29e..c3785fb0 100644
--- a/R/Faria.R
+++ b/R/Faria.R
@@ -1,5 +1,6 @@
 #' @name FariaEg2.9.5
-#' @title Varia\enc{çã}{ca}o de M\enc{é}{e}todos para a Determina\enc{çã}{ca}o da CTC do Solo
+#' @title Varia\enc{çã}{ca}o de M\enc{é}{e}todos para a
+#'     Determina\enc{çã}{ca}o da CTC do Solo
 #' @description Dois métodos de CTC do solo são usados em uma amostra de
 #'     controle e fornecem os resultados em cmol kg\eqn{^{-1}}.
 #' @format Um \code{data.frame} com 20 observações e 3 variáveis, em que
@@ -12,9 +13,8 @@
 #' \item{\code{ctc}}{CTC da amostra de solo, em cmol kg\eqn{^{-1}}.}
 #'
 #' }
-#' @keywords ASS
-#' @source Faria, J. C. (2009). Notas de aulas expandidas (10th ed.)
-#'     Ilhéus - BA: UESC. (Exemplo 2.9.5, pág 39)
+#' @keywords AAS
+#' @source FARIA (2009), Exemplo 2.9.5, pág 39.
 #' @examples
 #'
 #' library(lattice)
@@ -49,8 +49,7 @@ NULL
 #'
 #' }
 #' @keywords DIC
-#' @source Faria, J. C. (2009). Notas de aulas expandidas (10th ed.)
-#'     Ilhéus, BA: UESC. (Tabela 3.2.4, pág 46)
+#' @source FARIA (2009), Tabela 3.2.4, pág 46.
 #' @examples
 #'
 #' library(lattice)
@@ -68,12 +67,12 @@ NULL
 NULL
 
 #' @name FariaQd11.4
-#' @title Produ\enc{çã}{ca}o de Batatas em Fun\enc{çã}{ca}o da Calagem e Aduba\enc{çã}{ca}o
+#' @title Produ\enc{çã}{ca}o de Batatas em Fun\enc{çã}{ca}o da Calagem e
+#'     Aduba\enc{çã}{ca}o
 #' @description Experimento montado em delineamento inteiramente
 #'     casualizado para estudar o efeito da combibação dos fatores
 #'     irrigação e calagem da produção de batata.
-#' @format Um \code{data.frame} com 16 observações e 4 variáveis, em
-#'     que
+#' @format Um \code{data.frame} com 16 observações e 4 variáveis, em que
 #'
 #' \describe{
 #'
@@ -90,8 +89,7 @@ NULL
 #'
 #' }
 #' @keywords DIC FAT2
-#' @source Faria, J. C. (2009). Notas de aulas expandidas (10th ed.)
-#'     Ilhéus - BA: UESC. (Quadro 11.4, pág. 134)
+#' @source FARIA (2009), Quadro 11.4, pág. 134.
 #' @examples
 #'
 #' library(lattice)
@@ -111,7 +109,8 @@ NULL
 NULL
 
 #' @name FariaQd11.9
-#' @title Qualidade de Mudas em Fun\enc{çã}{ca}o do Recipiente da Esp\enc{é}{e}cie
+#' @title Qualidade de Mudas em Fun\enc{çã}{ca}o do Recipiente da
+#'     Esp\enc{é}{e}cie
 #' @description Experimento montado no delineamento inteiramente
 #'     casualizado cujo resultado é a qualidade de mudas em função do
 #'     recipiente utilizado e para cada espécie cultiavda.
@@ -132,8 +131,7 @@ NULL
 #'
 #' }
 #' @keywords DIC FAT2
-#' @source Faria, J. C. (2009). Notas de aulas expandidas (10th ed.)
-#'     Ilhéus - BA: UESC. (Quadro 11.9, pág 145)
+#' @source FARIA (2009), Quadro 11.9, pág 145.
 #' @examples
 #'
 #' library(lattice)
@@ -182,8 +180,7 @@ NULL
 #' As parcelas da testemunha, que não receberam aplicação de TVC,
 #'     exibiram um valor 0 para a colonização das vassouras-de-bruxa.
 #' @keywords DBC PS
-#' @source Faria, J. C. (2009). Notas de aulas expandidas (10th ed.)
-#'     Ilhéus - BA: UESC. ( Quadro 12.5, pág. 159)
+#' @source FARIA (2009), Quadro 12.5, pág. 159.
 #' @examples
 #'
 #' library(lattice)
@@ -221,8 +218,7 @@ NULL
 #'
 #' }
 #' @keywords DIC RL
-#' @source Faria, J. C. (2009). Notas de aulas expandidas (10th ed.)
-#'     Ilhéus - BA: UESC. (Quadro 14.2 pág. 198)
+#' @source FARIA (2009), Quadro 14.2 pág. 198.
 #' @examples
 #'
 #' library(lattice)
@@ -238,8 +234,8 @@ NULL
 NULL
 
 #' @name FariaQd14.3
-#' @title Aduba\enc{çã}{ca}o com F\enc{ó}{o}sforo na Produ\enc{çã}{ca}o de Mat\enc{é}{e}ria Seca de Parte
-#'     A\enc{é}{e}rea de Milho
+#' @title Aduba\enc{çã}{ca}o com F\enc{ó}{o}sforo na Produ\enc{çã}{ca}o
+#'     de Mat\enc{é}{e}ria Seca de Parte A\enc{é}{e}rea de Milho
 #' @description Os dados abaixo são provenientes de um ensaio
 #'     experimental realizado em casa de vegetação, montado no
 #'     delineamento em blocos casualizados, com 5 repetições, para
@@ -260,8 +256,7 @@ NULL
 #'
 #' }
 #' @keywords DBC
-#' @source Faria, J. C. (2009). Notas de aulas expandidas (10th ed.)
-#'     Ilhéus - BA: UESC. (Quadro 14.3 pág. 200)
+#' @source FARIA (2009), Quadro 14.3 pág. 200.
 #' @examples
 #'
 #' library(lattice)
@@ -295,8 +290,7 @@ NULL
 #'
 #' }
 #' @keywords DIC
-#' @source Faria, J. C. (2009). Notas de aulas expandidas (10th ed.)
-#'     Ilhéus, BA: UESC. (Tabela 6.1 pág 76)
+#' @source FARIA (2009), Tabela 6.1 pág 76.
 #' @examples
 #'
 #' library(lattice)
@@ -307,4 +301,3 @@ NULL
 #' xyplot(prod ~ varied, data = FariaQd6.1)
 #'
 NULL
-
diff --git a/R/Ferreira.R b/R/Ferreira.R
index 49dff9f9..13cf31c9 100644
--- a/R/Ferreira.R
+++ b/R/Ferreira.R
@@ -256,7 +256,7 @@ NULL
 #'
 #' aggregate(peroxido ~ amostra, data = FerreiraEg7.1, summary)
 #' aggregate(proteina ~ amostra, data = FerreiraEg7.1, summary)
-#' 
+#'
 #' par(mar = c(4, 5, 4, 5))
 #' boxplot(proteina ~ amostra, data = FerreiraEg7.1,
 #'         xlim = c(0.5, 2.5), border = 4,
@@ -264,7 +264,7 @@ NULL
 #'         axes = FALSE)
 #' box()
 #' axis(side = 2, col.axis = 4)
-#' mtext(side = 2, text = "Proteínas em g/dl", line = 3, col = 4) 
+#' mtext(side = 2, text = "Proteínas em g/dl", line = 3, col = 4)
 #' par(new = TRUE, mar = c(4, 5, 4, 5))
 #' boxplot(peroxido ~ amostra, data = FerreiraEg7.1,
 #'         xlim = c(0.5, 2.5), border = 2,
@@ -274,7 +274,7 @@ NULL
 #' axis(side = 1, at = 1:2, labels = c("antes", "depois"))
 #' mtext(side = 4, text = "Peróxidos em nmol/g de proteína",
 #'       line = 3, col = 2)
-#' 
+#'
 NULL
 
 #' @name FerreiraEg7.4
@@ -282,7 +282,7 @@ NULL
 #' @description Com o interesse de testar a hipótese de igualdade entre
 #'     duas variedades de milho, foram mensuradas as variáveis aleatórias
 #'     produtividade e altura das plantas em cada uma das variedades.
-#'     
+#'
 #' @format Um \code{data.frame} com 11 observações e 3 variáveis.
 #'
 #' \describe{
@@ -306,7 +306,7 @@ NULL
 #' aggregate(prod ~ varie, data = FerreiraEg7.4, summary)
 #' aggregate(altura ~ varie, data = FerreiraEg7.4, summary)
 #' by(FerreiraEg7.4[2:3], FerreiraEg7.4[1], cov)
-#' 
+#'
 #' with(FerreiraEg7.4, {
 #'      par(mar = c(4, 5, 4, 5))
 #'      plot.default(y = prod, xlab = "", ylab = "",
@@ -317,7 +317,7 @@ NULL
 #'      box()
 #'      axis(side = 2, col.axis = 4)
 #'      mtext(side = 2, text = "Produtividade em t/ha",
-#'            line = 3, col = 4) 
+#'            line = 3, col = 4)
 #'      par(new = TRUE, mar = c(4, 5, 4, 5))
 #'      plot.default(y = altura, xlab = "", ylab = "",
 #'                   x = jitter(as.numeric(varie), factor = 0.5) + 0.1,
@@ -533,7 +533,7 @@ NULL
 #'     e depois de terem sido submetidos a uma dieta balanceada. O
 #'     interesse do estudo é avaliar se houve efeito significativo da
 #'     dieta nas variáveis peso e teor de proteína.
-#'     
+#'
 #' @format Um \code{data.frame} com 12 observações e 3 variáveis.
 #'
 #' \describe{
@@ -555,9 +555,9 @@ NULL
 #'
 #' aggregate(peso ~ fase, data = FerreiraEx7.4.1, summary)
 #' aggregate(teor ~ fase, data = FerreiraEx7.4.1, summary)
-#' 
+#'
 #' by(FerreiraEx7.4.1[2:3], FerreiraEx7.4.1[1], cov)
-#' 
+#'
 #' with(FerreiraEx7.4.1, {
 #'      par(mar = c(4, 5, 4, 5))
 #'      plot.default(y = peso, xlab = "", ylab = "",
@@ -567,7 +567,7 @@ NULL
 #'                   axes = FALSE)
 #'      box()
 #'      axis(side = 2, col.axis = 4)
-#'      mtext(side = 2, text = "Peso", line = 3, col = 4) 
+#'      mtext(side = 2, text = "Peso", line = 3, col = 4)
 #'      par(new = TRUE, mar = c(4, 5, 4, 5))
 #'      plot.default(y = teor, xlab = "", ylab = "",
 #'                   x = jitter(as.numeric(fase), factor = 0.5) + 0.15,
@@ -661,7 +661,7 @@ NULL
 #' O tipo de carne é indicado conforme nomenclatura das linhas do
 #'     \code{data.frame}. Os tipos de carne marisco, siri e camarão são
 #'     todos enlatados.
-#' @keywords agrupamento
+#' @keywords AnaAgrup
 #' @source Ferreira, D. F. (2011). Estatística Multivariada (2nd
 #'     ed.). Lavras, MG: Editora UFLA. (Exercício 9.7.2, pág. 409)
 #' @references Bussab, W. O., Miazaki, É. S., Andrade,
@@ -685,4 +685,3 @@ NULL
 #'        legend = c("2 grupos (k=2)", "3 grupos (k=3)"))
 #'
 NULL
-
diff --git a/R/Manly.R b/R/Manly.R
index c0712a15..090d74f0 100644
--- a/R/Manly.R
+++ b/R/Manly.R
@@ -1,44 +1,44 @@
 #' @name ManlyTb6.7
-#' @title Consumo de prote\enc{í}{i}na  
+#' @title Consumo de prote\enc{í}{i}na
 #'
 #' @description Estimativas do consumo médio de proteínas de diferentes fontes de alimentos para os habitantes de 25 países europeus. Medida em gramas por pessoa por dia
 #'
 #' @format Um \code{data.frame} com 25 países em 9 variáveis.
-#' 
+#'
 #' \describe{
 #'
 #' \item{\code{pais}}{Identificação do país.}
-#' 
+#'
 #' \item{\code{cv}}{Consumo de carne vermelha medida em gramas por pessoa por dia.}
-#' 
+#'
 #' \item{\code{cb}}{Consumo de carne branca.}
 #'
 #' \item{\code{ovo}}{Consumo de ovos.}
-#' 
+#'
 #' \item{\code{leite}}{Consumo de leite.}
-#' 
+#'
 #' \item{\code{peixe}}{Consumo de peixe.}
-#' 
+#'
 #' \item{\code{cere}}{Consumo por cereais.}
-#'  
+#'
 #' \item{\code{carb}}{Consumo de carboidratos.}
-#' 
+#'
 #' \item{\code{gnso}}{Consumo de grãos, nozes e sementes oleaginosas.}
-#'  
+#'
 #' \item{\code{fv}}{Consumo de frutas e vegetais.}
-#'  
+#'
 #' \item{\code{total}}{Total de consumo do país.}
-#' 
+#'
 #' }
-#' @keywords CP
+#' @keywords AnaComPrin
 #' @source Manly, B. J. F. (2005). Métodos Estatísticos Multivariados - uma introdução.
 #'      Porto Alegre, RS: Bookman (pg 103)
 #' @examples
 #'
 #' data(ManlyTb6.7)
-#' 
+#'
 #' pairs(~ cv + cb + ovo + leite + peixe + cere + carb + gnso + fv,
-#'       data = ManlyTb6.7, 
+#'       data = ManlyTb6.7,
 #'       main="Matriz das variáveis de consumo de proteína")
 NULL
 
@@ -81,32 +81,32 @@ NULL
 #' @name ManlyTb1.2
 #' @title Cr\enc{â}{a}nios eg\enc{í}{i}pcios
 #'
-#' @description Medidas de crânios egípcios masculinos em cinco períodos 
+#' @description Medidas de crânios egípcios masculinos em cinco períodos
 #' de tempo. Medidas tomadas em milímetros.
 #'
-#' @format Um \code{data.frame} com os tamanhos de 30 crânios para cada 
+#' @format Um \code{data.frame} com os tamanhos de 30 crânios para cada
 #' período de tempo, com quatro variáveis.
-#' 
+#'
 #' \describe{
-#' 
+#'
 #' \item{\code{grup}}{Identificação do período}
 #'
 #' \item{\code{x1}}{Largura máxima.}
-#' 
+#'
 #' \item{\code{x2}}{Altura basibregamática.}
 #'
 #' \item{\code{x3}}{Comprimento basialveolar.}
 #'
 #' \item{\code{x4}}{Altura nasal.}
-#' 
+#'
 #' }
-#' 
+#'
 #' A figura abaixo descreve as medidas do crânio.
 #' \if{html}{\figure{ManlyTb1-2.jpg}{options: width="250px"}}
-#' \if{latex}{\figure{ManlyTb1-2.jpg}{options: width=1.75in}} 
-#' 
-#' @keywords Afd
-#' @source Manly, B. J. F. (2005). Métodos Estatísticos Multivariados - 
+#' \if{latex}{\figure{ManlyTb1-2.jpg}{options: width=1.75in}}
+#'
+#' @keywords AnaFat
+#' @source Manly, B. J. F. (2005). Métodos Estatísticos Multivariados -
 #'      uma introdução. Porto Alegre, RS: Bookman (pg 16)
 #' @examples
 #'
@@ -114,64 +114,64 @@ NULL
 #' require(lattice)
 #' require(reshape2)
 #'
-#' splom(~ManlyTb1.2[2:5] | grup, data = ManlyTb1.2, 
-#'     layout=c(3,2), 
+#' splom(~ManlyTb1.2[2:5] | grup, data = ManlyTb1.2,
+#'     layout=c(3,2),
 #'     pscales = 0,
 #'     varnames = c("x1", "x2","x3", "x4"),
 #'     main = "Gráfico de dispersão das medidas de crânio para cada período")
-#'     
+#'
 #' ManlyTb1.2long <- melt(ManlyTb1.2, id.vars = "grup")
-#'  
+#'
 #' bwplot(value ~grup | variable, data = ManlyTb1.2long,
-#'        scales = list(relation = "free"), 
-#'        ylab = "", 
+#'        scales = list(relation = "free"),
+#'        ylab = "",
 #'        main = "Boxplot das medições de crânio em cada período" )
 #'
-#'             
+#'
 NULL
 
 #' @name ManlyTb1.3
 #' @title Distribui\enc{ç}{c}ao de uma esp\enc{é}{e}cie de borboletas
 #'
-#' @description Estudo de colônias de borboletas do tipo \emph{Euphydryas 
-#' editha} na Califórnia e em Oregon, EUA, com variáveis ambientais e 
+#' @description Estudo de colônias de borboletas do tipo \emph{Euphydryas
+#' editha} na Califórnia e em Oregon, EUA, com variáveis ambientais e
 #' frequências gênicas.
 #'
 #' @format Um \code{data.frame} com 16 colônias de borboletas com 11 variáveis.
-#' 
+#'
 #' \describe{
 #'
 #' \item{\code{colo}}{Identificação da colônia.}
-#' 
+#'
 #' \item{\code{alt}}{Altitude (em pés).}
-#' 
+#'
 #' \item{\code{precip}}{Precipitação anual (em polegadas).}
 #'
 #' \item{\code{tempmax}}{Temperatura máxima.}
-#' 
+#'
 #' \item{\code{tempmin}}{Temperatura mínima.}
-#' 
+#'
 #' \item{\code{dg0.4}}{Frequência 0.4 em demobilidade gênica PGi (porcentagem).}
-#' 
+#'
 #' \item{\code{dg0.6}}{Frequência 0.6 em demobilidade gênica PGi.}
-#'  
+#'
 #' \item{\code{dg0.8}}{Frequência 0.8 em demobilidade gênica PGi.}
-#' 
+#'
 #' \item{\code{dg1}}{Frequência 1 em demobilidade gênica PGi.}
-#'  
+#'
 #' \item{\code{dg1.16}}{Frequência 1.16 em demobilidade gênica PGi.}
-#' 
+#'
 #'\item{\code{dg1.3}}{Frequência 1.3 em demobilidade gênica PGi.}
-#'  
+#'
 #' }
-#' @keywords CP
-#' @source Manly, B. J. F. (2005). Métodos Estatísticos Multivariados 
+#' @keywords AnaComPrin
+#' @source Manly, B. J. F. (2005). Métodos Estatísticos Multivariados
 #'      - uma introdução. Porto Alegre, RS: Bookman (pg 19)
 #' @examples
 #'
 #' data(ManlyTb1.3)
-#' 
-#' pairs(~ alt + precip + tempmax + tempmin + dg0.4 + dg0.6 + dg0.8 + 
+#'
+#' pairs(~ alt + precip + tempmax + tempmin + dg0.4 + dg0.6 + dg0.8 +
 #'       dg1 + dg1.16 + dg1.3, data = ManlyTb1.3, cex.labels = 1.4,
 #'       main="Matriz de gráficos de dispersão")
 NULL
@@ -179,90 +179,90 @@ NULL
 #' @name ManlyTb1.4
 #' @title C\enc{ã}{a}es pr\enc{é}{e}-hist\enc{ó}{o}ricos da Tail\enc{â}{a}ndia
 #'
-#' @description Estudo em ancestrais de cães da Tailândia, 
+#' @description Estudo em ancestrais de cães da Tailândia,
 #' através de medições das mandíbulas.
 #'
-#' @format Um \code{data.frame} com 7 grupos caninos e 6 variáveis. 
-#' 
+#' @format Um \code{data.frame} com 7 grupos caninos e 6 variáveis.
+#'
 #' \describe{
 #'
 #' \item{\code{grup}}{Grupo canino}
-#' 
+#'
 #' \item{\code{largm}}{Largura da mandíbula (mm)}
-#' 
+#'
 #' \item{\code{altm}}{Altura da mandíbula abaixo do primeiro molar (mm).}
 #'
 #' \item{\code{comppm}}{Comprimento do primeiro molar (mm).}
-#' 
+#'
 #' \item{\code{largpm}}{Largura do primeiro molar (mm).}
-#' 
+#'
 #' \item{\code{comppt}}{Comprimento do primeiro ao terceiro molar (mm).}
-#' 
+#'
 #'  \item{\code{comppq}}{Comprimento do primeiro ao quarto molar (mm).}
 #' }
 #'
-#' @keywords AnaClust
+#' @keywords AnaAgrup
 #' @source Manly, B. J. F. (2005). Métodos Estatísticos Multivariados- uma introdução.
 #'      Porto Alegre, RS: Bookman (pg 21)
 #' @examples
 #'
 #'
 #' data(ManlyTb1.4)
-#' 
+#'
 #' pairs(~largm + altm + comppm + largpm + comppt + comppq,
-#'       data = ManlyTb1.4, 
+#'       data = ManlyTb1.4,
 #'       main="Gráfico de dispersão para as medições da mandíbula")
 NULL
 
 #' @name ManlyTb1.5
 #' @title Emprego em paises europeus
 #'
-#' @description Porcentagens da força de trabalho de empregados para nove 
+#' @description Porcentagens da força de trabalho de empregados para nove
 #' diferentes campos de trabalho em 30 países europeus
 #'
 #' @format Um \code{data.frame} com 30 registros em 11 variáveis.
-#' 
+#'
 #' \describe{
 #'
 #' \item{\code{pais}}{Identificação do país.}
-#' 
-#' \item{\code{grup}}{Grupo econômico ao qual pertencente o país: União 
+#'
+#' \item{\code{grup}}{Grupo econômico ao qual pertencente o país: União
 #'      Europeia (UE); Área europeia de livre comércio (AELC); Leste; Outro}
-#' 
-#' \item{\code{afp}}{Porcentagem da população ativa empregada na agricultura, 
+#'
+#' \item{\code{afp}}{Porcentagem da população ativa empregada na agricultura,
 #'      florestal e pesca.}
 #'
 #' \item{\code{mep}}{Porcentagem empregada na mineração e exploração de pedreiras.}
-#' 
+#'
 #' \item{\code{fab}}{Porcentagem empregada nas fábricas.}
-#' 
-#' \item{\code{fea}}{Porcentagem empregada nas áreas de fornecimento de 
+#'
+#' \item{\code{fea}}{Porcentagem empregada nas áreas de fornecimento de
 #'      energia e água.}
-#' 
+#'
 #' \item{\code{con}}{Porcentagem empregada na construção.}
-#'  
+#'
 #' \item{\code{ser}}{Porcentagem empregada na área de serviços.}
-#'  
+#'
 #' \item{\code{fin}}{Porcentagem empregada na área de finanças.}
-#'  
+#'
 #' \item{\code{ssp}}{Porcentagem empregada na área de serviços sociais e
 #'     pessoais.}
-#' 
-#' \item{\code{tc}}{Porcentagem empregada nas áreas de transportes e 
+#'
+#' \item{\code{tc}}{Porcentagem empregada nas áreas de transportes e
 #'      comunicações.}
-#' 
+#'
 #' }
 #'
-#' @keywords AnaClust
-#' @source Manly, B. J. F. (2005). Métodos Estatísticos Multivariados- 
+#' @keywords AnaAgrup
+#' @source Manly, B. J. F. (2005). Métodos Estatísticos Multivariados-
 #'      uma introdução. Porto Alegre, RS: Bookman (pg 22)
 #' @examples
 #'
 #
 #' data(ManlyTb1.5)
-#' 
+#'
 #' pairs(~afp + mep + fab + fea + con + ser + fin + ssp + tc,
-#'       data = ManlyTb1.5, 
+#'       data = ManlyTb1.5,
 #'       main="Matriz das variáveis de força de trabalho"
 #'       )
 NULL
@@ -270,111 +270,111 @@ NULL
 #' @name ManlyTb10.2
 #' @title Vari\enc{á}{a}veis solo e vegeta\enc{çã}{ca}o em Belize
 #'
-#' @description Estudo no distrito de Corozal, em Belize, com 4 variáveis 
-#' de solo e 4 variáveis de vegetação registradas para quadrados 
+#' @description Estudo no distrito de Corozal, em Belize, com 4 variáveis
+#' de solo e 4 variáveis de vegetação registradas para quadrados
 #' de 2,5 x 2,5 km.
 #'
 #' @format Um \code{data.frame} com 151 linhas e 8 variáveis.
-#' 
+#'
 #' \describe{
-#' \item{\code{ser}}{Porcentagem de solo com enriquecimento constante de 
+#' \item{\code{ser}}{Porcentagem de solo com enriquecimento constante de
 #' calcário.}
 #'
-#' \item{\code{spc}}{Porcentagem de solo de prado com cálcio na água 
+#' \item{\code{spc}}{Porcentagem de solo de prado com cálcio na água
 #' subterrânea.}
-#' 
-#' \item{\code{smc}}{Porcentagem de solo com matriz de coral sob 
+#'
+#' \item{\code{smc}}{Porcentagem de solo com matriz de coral sob
 #' condições de enriquecimento constante de calcário.}
-#' 
-#' \item{\code{sao}}{Porcentagem de solos aluvial e orgânico adjacentes 
+#'
+#' \item{\code{sao}}{Porcentagem de solos aluvial e orgânico adjacentes
 #' a rios e solo orgânico salino na costa.}
 #'
-#' \item{\code{dfe}}{Porcentagem de floresta decídua estacional com 
+#' \item{\code{dfe}}{Porcentagem de floresta decídua estacional com
 #' ervas de folhas largas.}
-#' 
-#' \item{\code{flab}}{Porcentagem de floresta de locais altos e baixos 
+#'
+#' \item{\code{flab}}{Porcentagem de floresta de locais altos e baixos
 #' coberta com água e plantas herbáceas em lugares úmidos e pântano.}
-#' 
+#'
 #' \item{\code{fpc}}{Porcentagem de floresta palma de cohune.}
-#' 
+#'
 #' \item{\code{fm}}{Porcentagem de floresta mista.}
 #' }
-#'  
-#' @keywords ACC
-#' @source Manly, B. J. F. (2005). Métodos Estatísticos Multivariados - 
+#'
+#' @keywords AnaCorCan
+#' @source Manly, B. J. F. (2005). Métodos Estatísticos Multivariados -
 #' uma introdução.Porto Alegre, RS: Bookman (pg 167 à 170)
 #' @examples
 #'
 #' data(ManlyTb10.2)
 #' pairs(~ ser + spc + smc + sao + fde + flab + fpc + fm,
-#'       data = ManlyTb10.2, 
+#'       data = ManlyTb10.2,
 #'       main="Matriz de gráficos para as variáveis de solo")
 #'
-#'             
+#'
 NULL
 
 #' @name ManlyTb10.4
 #' @title Combina\enc{çã}{ca}o de tabelas 1.5 e 6.7
 #'
-#' @description Dados referentes a consumo de proteína e força de trabalho 
+#' @description Dados referentes a consumo de proteína e força de trabalho
 #' em países europeus.
 #'
 #' @format Um \code{data.frame} com 22 países e 18 variáveis.
-#' 
+#'
 #' \describe{
 #' \item{\code{pais}}{Identificação do país.}
-#' 
-#' \item{\code{cv}}{Consumo de carne vermelha medida em gramas por 
+#'
+#' \item{\code{cv}}{Consumo de carne vermelha medida em gramas por
 #' pessoa por dia.}
-#' 
+#'
 #' \item{\code{cb}}{Consumo de carne branca.}
 #'
 #' \item{\code{ovo}}{Consumo de ovos.}
-#' 
+#'
 #' \item{\code{leite}}{Consumo de leite.}
-#' 
+#'
 #' \item{\code{peixe}}{Consumo de peixe.}
-#' 
+#'
 #' \item{\code{cere}}{Consumo por cereais.}
-#'  
+#'
 #' \item{\code{carb}}{Consumo de carboidratos.}
-#' 
+#'
 #' \item{\code{gnl}}{Consumo de grãos, nozes e sementes oleaginosas.}
-#'  
+#'
 #' \item{\code{fv}}{Consumo de frutas e vegetais.}
-#' 
-#' \item{\code{agr}}{Porcentagem da população ativa empregada na 
+#'
+#' \item{\code{agr}}{Porcentagem da população ativa empregada na
 #' agricultura, florestal e pesca.}
 #'
 #' \item{\code{min}}{Mineração e exploração de pedreiras.}
-#' 
+#'
 #' \item{\code{fab}}{Fabricação.}
-#' 
+#'
 #' \item{\code{fea}}{Fornecimento de energia e água.}
-#' 
+#'
 #' \item{\code{con}}{Construção.}
-#'  
+#'
 #' \item{\code{ser}}{Serviços.}
-#'  
+#'
 #' \item{\code{fin}}{Finanças.}
-#'  
+#'
 #' \item{\code{ssp}}{Serviços sociais e pessoais.}
-#' 
+#'
 #' \item{\code{tc}}{Transportes e comunicações.}
-#' 
+#'
 #' }
 #'
-#' @keywords ACC
-#' @source Manly, B. J. F. (2005). Métodos Estatísticos Multivariados- 
+#' @keywords AnaCorCan
+#' @source Manly, B. J. F. (2005). Métodos Estatísticos Multivariados-
 #' uma introdução. Porto Alegre, RS: Bookman (pg 175)
 #' @examples
 #'
 #' data(ManlyTb10.4)
-#' 
-#' pairs(~ cv + cb + ovo + leite + peixe + cere + carb + gnl+ agr + 
+#'
+#' pairs(~ cv + cb + ovo + leite + peixe + cere + carb + gnl+ agr +
 #' min + fab + fea + con + ser + fin + ssp + tc,
-#'       data = ManlyTb10.4, 
-#'       main = "Matriz de gráficos para as variáveis de força de trabalho 
+#'       data = ManlyTb10.4,
+#'       main = "Matriz de gráficos para as variáveis de força de trabalho
 #'       e consumo de proteínas diárias"
 #'       )
 NULL
@@ -385,43 +385,43 @@ NULL
 #' @description Distâncias rodoviárias (em milhas) entre cidades na ilha
 #' Sul da Nova Zelândia
 #'
-#' @format Uma matriz (13x13) com as distâncias rodoviárias entre as 
+#' @format Uma matriz (13x13) com as distâncias rodoviárias entre as
 #' cidades da ilha Sul da Nova Zelândia.
-#' 
-#' @keywords EM
-#' @source Manly, B. J. F. (2005). Métodos Estatísticos Multivariados - 
+#'
+#' @keywords TODO
+#' @source Manly, B. J. F. (2005). Métodos Estatísticos Multivariados -
 #'      uma introdução. Porto Alegre, RS: Bookman (pg 182)
-#'      
+#'
 #' @examples
 #'
 #' data(ManlyTb11.3)
-#' 
+#'
 #' require(lattice)
-#' 
-#' levelplot(ManlyTb11.3, xlab = "", ylab = "", main = "Gráfico das 
+#'
+#' levelplot(ManlyTb11.3, xlab = "", ylab = "", main = "Gráfico das
 #' distâncias rodoviárias", scales = list(x = list(rot=90)))
 NULL
 
 #' @name ManlyTb11.5
 #' @title Vota\enc{çõ}{co}es de parlamentares
 #'
-#' @description Número de votos discordantes entre os parlamentares de 
+#' @description Número de votos discordantes entre os parlamentares de
 #' Nova Jersey em leis referentes a problemas ambientais
 #'
 #' @format Uma matriz com os números de votos discordantes entre 15
 #' parlamentares de Nova Jersey.
-#' 
-#' @keywords EM
-#' @source Manly, B. J. F. (2005). Métodos Estatísticos Multivariados 
+#'
+#' @keywords TODO
+#' @source Manly, B. J. F. (2005). Métodos Estatísticos Multivariados
 #'      - uma introdução. Porto Alegre, RS: Bookman (pg 185)
-#'      
+#'
 #' @examples
 #'
 #' data(ManlyTb11.5)
-#' 
+#'
 #' require(lattice)
-#' 
-#' levelplot(ManlyTb11.5, xlab = "", ylab = "", main = "Gráfico das 
+#'
+#' levelplot(ManlyTb11.5, xlab = "", ylab = "", main = "Gráfico das
 #' distâncias entre parlamentares", scales = list(x = list(rot=90)))
 NULL
 
@@ -430,137 +430,137 @@ NULL
 #'
 #' @title Cães pré-históricos da Tailândia
 #'
-#' @description Estudo em ancestrais de cães da Tailândia, 
-#' através de medições da mandíbula.  
+#' @description Estudo em ancestrais de cães da Tailândia,
+#' através de medições da mandíbula.
 #'
 #' @format Um \code{data.frame} com 5 grupo caninos e 10 variáveis.
-#' 
+#'
 #' \describe{
 #'
 #' \item{\code{grup}}{Grupo canino}
-#' 
+#'
 #' \item{\code{compm}}{Comprimento da mandíbula (mm)}
-#' 
+#'
 #'\item{\code{largmapm}}{Largura da mandíbula, abaixo do primeiro molar (mm)}
-#' 
+#'
 #'\item{\code{largca}}{Largura do côndilo aricular (mm)}
 #'
 #' \item{\code{altmapm}}{Altura da mandíbula, abaixo do primeiro molar (mm)}
-#' 
+#'
 #' \item{\code{comppm}}{Comprimento do primeiro molar (mm).}
-#' 
+#'
 #' \item{\code{largpm}}{Largura do primeiro molar (mm).}
-#' 
+#'
 #' \item{\code{compptm}}{Comprimento do primeiro ao terceiro molar (mm).}
-#' 
+#'
 #'\item{\code{comppqp}}{Comprimento do primeiro ao quarto pré-molar (mm).}
-#'  
+#'
 #'\item{\code{largci}}{Largura do canino inferior (mm).}
 #'
-#'\item{\code{sexo}}{Código para sexo, (1 para masculino, 2 para feminino 
+#'\item{\code{sexo}}{Código para sexo, (1 para masculino, 2 para feminino
 #'e caso contrário é desconhecido}
 #'
 #' }
-#' 
+#'
 #' @keywords TS
-#' @source Manly, B. J. F. (2005). Métodos Estatísticos Multivariados - 
+#' @source Manly, B. J. F. (2005). Métodos Estatísticos Multivariados -
 #'      uma introdução. Porto Alegre, RS: Bookman (pg 67 à 69)
 #' @examples
 #'
 #' data(ManlyTb4.5)
 #' require(lattice)
 #' require(reshape2)
-#' 
+#'
 #' ManlyTb4.5long <- melt(ManlyTb4.5[,-11], id.vars = "grup")
 #'
 #' bwplot(value ~grup | variable, data = ManlyTb4.5long,
 #'         scales = c(list(relation = "free"), list(x=list(draw=FALSE))),
 #'       ylab = "",
 #'        main = "Boxplot de entre os grupo das medições da mandíbula",
-#'        par.settings = list( box.umbrella=list(col = c(1,2,3,4,6)), 
-#'                             box.dot=list(col = c(1,2,3,4,6)), 
+#'        par.settings = list( box.umbrella=list(col = c(1,2,3,4,6)),
+#'                             box.dot=list(col = c(1,2,3,4,6)),
 #'                             box.rectangle = list(col = c(1,2,3,4,6))),
 #'        key = list(points = list(col=c(1,2,3,4,6), pch=19),
 #'                   space = "top",
 #'                   columns=2,
-#'                   text=list(c("Caes modernos da Tailandia", "Chacais dourados", "Cuons", 
+#'                   text=list(c("Caes modernos da Tailandia", "Chacais dourados", "Cuons",
 #'                               "Lobos indianos", "Caes pre-historicos tailandeses"))))
 NULL
 
 #' @name ManlyTb6.6
 #' @title Ta\enc{ç}{c}as de cer\enc{â}{a}micas pr\enc{é}{e}-hist\enc{ó}{o}ricas
 #'
-#' @description Dimensões de 25 taças de cerâmicas escavadas de lugares 
+#' @description Dimensões de 25 taças de cerâmicas escavadas de lugares
 #' pré-históricos na Tailândia.
 #'
 #' @format Um \code{data.frame} com 25 registros em 6 variáveis.
-#' 
+#'
 #' \describe{
 #'
 #' A figura apresentada descreve as cinco variáveis, correspondentes às
 #' dimensões das taças.
-#' 
+#'
 #' \if{html}{\figure{ManlyTb6-6.jpg}{options: width="250px"}}
-#' \if{latex}{\figure{ManlyTb6-6.jpg}{options: width=1.75in}} 
+#' \if{latex}{\figure{ManlyTb6-6.jpg}{options: width=1.75in}}
 #'}
-#' @keywords AnaComp
-#' 
-#' @source Manly, B. J. F. (2005). Métodos Estatísticos Multivariados- 
+#' @keywords AnaComPrin
+#'
+#' @source Manly, B. J. F. (2005). Métodos Estatísticos Multivariados-
 #'      uma introdução. Porto Alegre, RS: Bookman (pg 101)
-#'      
+#'
 #' @examples
 #'
 #' data(ManlyTb6.6)
 #'
 #' pairs(~ x1 + x2 + x3 + x4 + x5 + x6,
-#'       data = ManlyTb6.6, 
+#'       data = ManlyTb6.6,
 #'       main="Matriz de diapersão para as variáveis de medida das taças")
 NULL
 
 #' @name ManlyTb6.7
-#' @title Consumo de prote\enc{í}{i}na por habitantes de pa\enc{í}{i}ses europeus 
+#' @title Consumo de prote\enc{í}{i}na por habitantes de pa\enc{í}{i}ses europeus
 #'
-#' @description Estimativas dos consumos médios de proteínas de diferentes 
-#' fontes de alimentos para habitantes de 25 países europeus. 
+#' @description Estimativas dos consumos médios de proteínas de diferentes
+#' fontes de alimentos para habitantes de 25 países europeus.
 #' Consumos registrados em gramas por pessoa por dia.
 #'
 #' @format Um \code{data.frame} com 25 países e 9 variáveis.
-#' 
+#'
 #' \describe{
 #'
 #' \item{\code{pais}}{Identificação do país.}
-#' 
+#'
 #' \item{\code{cv}}{Consumo de carne vermelha.}
-#' 
+#'
 #' \item{\code{cb}}{Consumo de carne branca.}
 #'
 #' \item{\code{ovo}}{Consumo de ovos.}
-#' 
+#'
 #' \item{\code{leite}}{Consumo de leite.}
-#' 
+#'
 #' \item{\code{peixe}}{Consumo de peixe.}
-#' 
+#'
 #' \item{\code{cere}}{Consumo por cereais.}
-#'  
+#'
 #' \item{\code{carb}}{Consumo de carboidratos.}
-#' 
+#'
 #' \item{\code{gnso}}{Consumo de grãos, nozes e sementes oleaginosas.}
-#'  
+#'
 #' \item{\code{fv}}{Consumo de frutas e vegetais.}
-#'  
+#'
 #' \item{\code{total}}{Total de consumo do país.}
-#' 
+#'
 #' }
-#' @keywords AnaComp
-#' @source Manly, B. J. F. (2005). Métodos Estatísticos Multivariados - 
+#' @keywords AnaComPrin
+#' @source Manly, B. J. F. (2005). Métodos Estatísticos Multivariados -
 #'      uma introdução. Porto Alegre, RS: Bookman (pg 103)
-#'      
+#'
 #' @examples
 #'
 #' data(ManlyTb6.7)
-#' 
+#'
 #' pairs(~ cv + cb + ovo + leite + peixe + cere + carb + gnso + fv,
-#'       data = ManlyTb6.7, 
+#'       data = ManlyTb6.7,
 #'       main="Matriz das variáveis de consumo de proteína")
 NULL
 
@@ -568,65 +568,65 @@ NULL
 #' @title Esp\enc{é}{e}cies de plantas em lotes
 #'
 #' @description Estudo de 25 espécies de plantas em 17 lotes de um prado
-#' de pastagem na Reserva Natural em Steneryd na Suécia. Cada valor na 
-#' tabela é a soma dos valores cobertos em um intervalo de 0 a 5 por 
-#' nove quadrantes de amostra, de modo que um valor 45 corresponde à 
-#' completa cobertura pela espécie. 
+#' de pastagem na Reserva Natural em Steneryd na Suécia. Cada valor na
+#' tabela é a soma dos valores cobertos em um intervalo de 0 a 5 por
+#' nove quadrantes de amostra, de modo que um valor 45 corresponde à
+#' completa cobertura pela espécie.
 #'
-#' @format Um \code{data.frame} com 25 espécie de plantas com 18 
+#' @format Um \code{data.frame} com 25 espécie de plantas com 18
 #' variáveis
-#' 
+#'
 #' \describe{
 #'
 #' \item{\code{esp}}{Espécie}
-#' 
+#'
 #' \item{\code{l1}}{Medidas de abundância das espécies no lote 1.}
-#' 
+#'
 #' \item{\code{l2}}{Medidas de abundância das espécies no lote 2.}
-#' 
+#'
 #' \item{\code{l3}}{Medidas de abundância das espécies no lote 3.}
-#' 
+#'
 #' \item{\code{l4}}{Medidas de abundância das espécies no lote 4.}
-#' 
+#'
 #' \item{\code{l5}}{Medidas de abundância das espécies no lote 5.}
-#' 
+#'
 #' \item{\code{l6}}{Medidas de abundância das espécies no lote 6.}
-#' 
+#'
 #' \item{\code{l7}}{Medidas de abundância das espécies no lote 7.}
-#' 
+#'
 #' \item{\code{l8}}{Medidas de abundância das espécies no lote 8.}
-#' 
+#'
 #' \item{\code{l9}}{Medidas de abundância das espécies no lote 9.}
-#' 
+#'
 #' \item{\code{l10}}{Medidas de abundância das espécies no lote 10.}
-#' 
+#'
 #' \item{\code{l11}}{Medidas de abundância das espécies no lote 11.}
-#' 
+#'
 #' \item{\code{l12}}{Medidas de abundância das espécies no lote 12.}
-#' 
+#'
 #' \item{\code{l13}}{Medidas de abundância das espécies no lote 13.}
-#' 
+#'
 #' \item{\code{l14}}{Medidas de abundância das espécies no lote 14.}
-#' 
+#'
 #' \item{\code{l15}}{Medidas de abundância das espécies no lote 15.}
-#' 
+#'
 #' \item{\code{l16}}{Medidas de abundância das espécies no lote 16.}
-#' 
+#'
 #' \item{\code{l17}}{Medidas de abundância das espécies no lote 17.}
 #' }
 #'
-#' @keywords AnaClust
-#' @source Manly, B. J. F. (2005). Métodos Estatísticos Multivariados- 
+#' @keywords AnaAgrup
+#' @source Manly, B. J. F. (2005). Métodos Estatísticos Multivariados-
 #' uma introdução. Porto Alegre, RS: Bookman (pg 152)
 #' @examples
 #'
 #' data(ManlyTb9.7)
-#' 
+#'
 #' euclid <- as.matrix(dist(ManlyTb9.7[,-1]))
-#' 
-#' heatmap(euclid, 
-#'        margins= c(6,6), 
-#'        labRow = ManlyTb9.7$esp, 
+#'
+#' heatmap(euclid,
+#'        margins= c(6,6),
+#'        labRow = ManlyTb9.7$esp,
 #'        labCol = ManlyTb9.7$esp,
 #'        main = "Heatmap para a matriz de distâncias para as 25 espécies")
 NULL
@@ -634,114 +634,113 @@ NULL
 #' @name ManlyTb9.8
 #' @title Bens de t\enc{ú}{u}mulos
 #'
-#' @description Conjunto de dados referentes a bens de túmulos de um 
-#' cemitério em Bannadi, nordeste da Tailândia. São registros de 
-#' presença ou ausência de 38 diferentes artigos em cada um dos 46 
+#' @description Conjunto de dados referentes a bens de túmulos de um
+#' cemitério em Bannadi, nordeste da Tailândia. São registros de
+#' presença ou ausência de 38 diferentes artigos em cada um dos 46
 #' túmulos, com informação adicional sobre se os restos mortais eram de
-#' um adulto masculino, feminino ou criança. Os sepultamentos estão na 
+#' um adulto masculino, feminino ou criança. Os sepultamentos estão na
 #' ordem de riqueza de diferentes bens (totais variando de 0 a 11), e os
-#' bens estão na ordem de frequência de ocorrência (totais variando de 
+#' bens estão na ordem de frequência de ocorrência (totais variando de
 #' 1 a 18).
-#' 
+#'
 #' @format Um \code{data.frame} com 45 linhas e 38 colunas.
-#' 
+#'
 #' \describe{
 #'
 #' \item{\code{sep}}{Identifica o sepultamento}
-#' 
+#'
 #' \item{\code{tipo}}{Identifica os restos Mortais (1 = Adulto masculino;
 #'  2 = Adulto Feminino; 3 = Criança}
-#' 
+#'
 #' \item{\code{obj1}}{Presença (1) ou ausência (0) do objeto 1}
-#' 
+#'
 #' \item{\code{obj2}}{Presença (1) ou ausência (0) do objeto 2.}
-#' 
+#'
 #' \item{\code{obj3}}{Presença (1) ou ausência (0) do objeto 3.}
-#' 
+#'
 #' \item{\code{obj4}}{Presença (1) ou ausência (0) do objeto 4.}
-#' 
+#'
 #' \item{\code{obj5}}{Presença (1) ou ausência (0) do objeto 5.}
-#' 
+#'
 #' \item{\code{obj6}}{Presença (1) ou ausência (0) do objeto 6.}
-#' 
+#'
 #' \item{\code{obj7}}{Presença (1) ou ausência (0) do objeto 7.}
-#' 
+#'
 #' \item{\code{obj8}}{Presença (1) ou ausência (0) do objeto 8.}
-#' 
+#'
 #' \item{\code{obj9}}{Presença (1) ou ausência (0) do objeto 9.}
-#' 
+#'
 #' \item{\code{obj10}}{Presença (1) ou ausência (0) do objeto 10.}
-#' 
+#'
 #' \item{\code{obj11}}{Presença (1) ou ausência (0) do objeto 11.}
-#' 
+#'
 #' \item{\code{obj12}}{Presença (1) ou ausência (0) do objeto 12.}
-#' 
+#'
 #' \item{\code{obj13}}{Presença (1) ou ausência (0) do objeto 13.}
-#' 
+#'
 #' \item{\code{obj14}}{Presença (1) ou ausência (0) do objeto 14.}
-#' 
+#'
 #' \item{\code{obj15}}{Presença (1) ou ausência (0) do objeto 15.}
-#' 
+#'
 #' \item{\code{obj16}}{Presença (1) ou ausência (0) do objeto 16.}
-#' 
+#'
 #' \item{\code{obj17}}{Presença (1) ou ausência (0) do objeto 17.}
-#' 
+#'
 #' \item{\code{obj18}}{Presença (1) ou ausência (0) do objeto 18.}
 #'
 #' \item{\code{obj19}}{Presença (1) ou ausência (0) do objeto 19.}
-#' 
+#'
 #' \item{\code{obj20}}{Presença (1) ou ausência (0) do objeto 20.}
 #'
 #' \item{\code{obj21}}{Presença (1) ou ausência (0) do objeto 21.}
-#' 
+#'
 #' \item{\code{obj22}}{Presença (1) ou ausência (0) do objeto 22.}
-#' 
+#'
 #' \item{\code{obj23}}{Presença (1) ou ausência (0) do objeto 23.}
-#' 
+#'
 #' \item{\code{obj24}}{Presença (1) ou ausência (0) do objeto 24.}
-#' 
+#'
 #' \item{\code{obj25}}{Presença (1) ou ausência (0) do objeto 25.}
-#' 
+#'
 #' \item{\code{obj26}}{Presença (1) ou ausência (0) do objeto 26.}
-#' 
+#'
 #' \item{\code{obj27}}{Presença (1) ou ausência (0) do objeto 27.}
-#' 
+#'
 #' \item{\code{obj28}}{Presença (1) ou ausência (0) do objeto 28.}
-#' 
+#'
 #' \item{\code{obj29}}{Presença (1) ou ausência (0) do objeto 29.}
-#' 
+#'
 #' \item{\code{obj30}}{Presença (1) ou ausência (0) do objeto 30.}
-#' 
+#'
 #' \item{\code{obj31}}{Presença (1) ou ausência (0) do objeto 31.}
-#' 
+#'
 #' \item{\code{obj32}}{Presença (1) ou ausência (0) do objeto 32.}
-#' 
+#'
 #' \item{\code{obj33}}{Presença (1) ou ausência (0) do objeto 33.}
-#' 
+#'
 #' \item{\code{obj34}}{Presença (1) ou ausência (0) do objeto 34.}
-#' 
+#'
 #' \item{\code{obj35}}{Presença (1) ou ausência (0) do objeto 35.}
-#' 
+#'
 #' \item{\code{obj36}}{Presença (1) ou ausência (0) do objeto 36.}
-#' 
+#'
 #' \item{\code{obj37}}{Presença (1) ou ausência (0) do objeto 37.}
-#' 
+#'
 #' \item{\code{obj38}}{Presença (1) ou ausência (0) do objeto 38.}
-#'  
+#'
 #' }
 #'
-#' @keywords AnaClust
-#' @source Manly, B. J. F. (2005). Métodos Estatísticos Multivariados- 
+#' @keywords AnaAgrup
+#' @source Manly, B. J. F. (2005). Métodos Estatísticos Multivariados-
 #' uma introdução. Porto Alegre, RS: Bookman (pg 153 e 154)
 #' @examples
 #'
 #' data(ManlyTb9.8)
-#' 
+#'
 #' matdist <- as.matrix(dist(ManlyTb9.8[,-c(1,2)], method = "binary"))
 #' ### Mapa de calor para a matriz de dissimilaridades.
-#' heatmap(matdist, 
-#'        margins= c(6,6), 
-#'        labRow = ManlyTb9.8$sep, 
+#' heatmap(matdist,
+#'        margins= c(6,6),
+#'        labRow = ManlyTb9.8$sep,
 #'        labCol = ManlyTb9.8$sep)
 NULL
-
diff --git a/R/Mingoti.R b/R/Mingoti.R
index 76ea5b3f..bae0e87e 100644
--- a/R/Mingoti.R
+++ b/R/Mingoti.R
@@ -131,7 +131,7 @@ NULL
 #' 
 #' }
 #'
-#' @keywords AnaComp
+#' @keywords AnaComPrin
 #' @source Mingoti, S.A. (2005). Análise de dados através de métodos de 
 #'      estatística multivariada - uma abordagem aplicada. 
 #'      Belo Horizonte, MG: Editora UFMG. (pg 287).
@@ -174,7 +174,7 @@ NULL
 #' 
 #' }
 #'
-#' @keywords AnaComp
+#' @keywords AnaComPrin
 #' @source Mingoti, S.A. (2005). Análise de dados através de métodos de 
 #'      estatística multivariada - uma abordagem aplicada. 
 #'      Belo Horizonte, MG: Editora UFMG. (pg 290).
@@ -267,7 +267,7 @@ NULL
 #' 
 #' }
 #'
-#' @keywords AnaComp
+#' @keywords AnaComPrin
 #' @source Mingoti, S.A. (2005). Análise de dados através de métodos de 
 #'      estatística multivariada - uma abordagem aplicada. 
 #'      Belo Horizonte, MG: Editora UFMG. (pg 292).
@@ -401,7 +401,7 @@ NULL
 #' 
 #' }
 #'
-#' @keywords AnaComp
+#' @keywords AnaComPrin
 #' @source Mingoti, S.A. (2005). Análise de dados através de métodos de 
 #'      estatística multivariada - uma abordagem aplicada. 
 #'      Belo Horizonte, MG: Editora UFMG. (pg 75).
@@ -480,7 +480,7 @@ NULL
 #' 
 #' }
 #'
-#' @keywords AnaComp
+#' @keywords AnaComPrin
 #' @source Mingoti, S.A. (2005). Análise de dados através de métodos de 
 #'      estatística multivariada - uma abordagem aplicada. 
 #'      Belo Horizonte, MG: Editora UFMG. (pg 73).
@@ -513,7 +513,7 @@ NULL
 #' \item{\code{idade}}{Idade do indivíduo.}
 #'
 #' }
-#' @keywords AnaClust
+#' @keywords AnaAgrup
 #' @source Mingoti, S.A. (2005). Análise de dados através de métodos de 
 #'     estatística multivariada - uma abordagem aplicada. 
 #'     Belo Horizonte, MG: Editora UFMG. (pg 159).
@@ -558,7 +558,7 @@ NULL
 #'     desestabilização (tensões étnicas, conflito armado, etc).}
 #'
 #' }
-#' @keywords AnaClust
+#' @keywords AnaAgrup
 #' @source Mingoti, S.A. (2005). Análise de dados através de métodos de 
 #'     estatística multivariada - uma abordagem aplicada. 
 #'     Belo Horizonte, MG: Editora UFMG. (pg 184).
diff --git a/R/Paula.R b/R/Paula.R
index 1e1ba461..eaa2412b 100644
--- a/R/Paula.R
+++ b/R/Paula.R
@@ -1,24 +1,24 @@
 #' @name PaulaEg1.12.2
 #' @title Pacientes com Processo Infecioso Pulmonar
-#' @description Um total de 175 pacientes com processo infecioso 
+#' @description Um total de 175 pacientes com processo infecioso
 #'     pulmonar atendidos no hospital no período acima foram classificados
-#'     por algumas variáveis. 
-#'      
+#'     por algumas variáveis.
+#'
 #' @format Um \code{data.frame} com 175 observações e 5 variáveis.
 #' \describe{
-#' 
+#'
 #' \item{\code{tipo}}{Tipo de tumor (maligno, benigno).}
-#' 
+#'
 #' \item{\code{idade}}{Idade do paciente (em anos).}
-#' 
+#'
 #' \item{\code{sexo}}{Sexo do paciente (masculino, feminino).}
-#' 
-#' \item{\code{hl}}{Intensidade da célula histiócitos-linfócitos (ausente, 
+#'
+#' \item{\code{hl}}{Intensidade da célula histiócitos-linfócitos (ausente,
 #'     discreta, moderada, intensa).}
-#' 
-#' \item{\code{ff}}{Intensidade da célula fibrose-frouxa (ausente, 
+#'
+#' \item{\code{ff}}{Intensidade da célula fibrose-frouxa (ausente,
 #'     discreta, moderada, intensa).}
-#' 
+#'
 #' }
 #' @keywords MLG
 #' @source Paula, G. A. (2004). Modelos de regressão: com apoio
@@ -27,24 +27,24 @@
 #' @examples
 #'
 #' data(PaulaEg1.12.2)
-#' 
+#'
 #' str(PaulaEg1.12.2)
-#' 
+#'
 #' library(lattice)
-#' bwplot(idade ~ hl | tipo, 
+#' bwplot(idade ~ hl | tipo,
 #'        data = PaulaEg1.12.2,
 #'        ylab = "Idade",
 #'        xlab = "Intensidade da célula histiócitos-linfócitos")
-#' 
-#' bwplot(idade ~ ff | tipo, 
+#'
+#' bwplot(idade ~ ff | tipo,
 #'        data = PaulaEg1.12.2,
 #'        ylab = "Idade",
 #'        xlab = "Intensidade da célula fibrose-frouxa")
-#'        
-#' barchart(table(PaulaEg1.12.2$tipo,PaulaEg1.12.2$hl), 
-#' auto.key=list(space="top", columns=2, 
+#'
+#' barchart(table(PaulaEg1.12.2$tipo,PaulaEg1.12.2$hl),
+#' auto.key=list(space="top", columns=2,
 #'               cex.title=1,
-#'               rectangles = TRUE, 
+#'               rectangles = TRUE,
 #'               points=FALSE))
 #'
 NULL
@@ -104,25 +104,25 @@ NULL
 
 #' @name PaulaEg1.12.5
 #' @title Consumo de Combust\enc{í}{i}vel
-#' @description Dados referentes ao consumo de combustível em 48 estados 
-#'     norte-americanos. O interesse nesse estudo é tentar explicar o 
+#' @description Dados referentes ao consumo de combustível em 48 estados
+#'     norte-americanos. O interesse nesse estudo é tentar explicar o
 #'     consumo de combustível com base em variáveis econômicas.
-#'      
+#'
 #' @format Um \code{data.frame} com 48 observações e 6 variáveis.
 #' \describe{
-#' 
+#'
 #' \item{\code{est}}{Estado.}
-#' 
+#'
 #' \item{\code{taxa}}{Taxa do combustível no estado (em USD).}
-#' 
+#'
 #' \item{\code{licen}}{Proporção de motoristas licenciados.}
-#' 
+#'
 #' \item{\code{renda}}{Renda percapita (em USD).}
-#' 
+#'
 #' \item{\code{estr}}{Ajuda federal para as estradas (em 1000 USD).}
-#' 
+#'
 #' \item{\code{cons}}{Consumo de combustível por habitante.}
-#' 
+#'
 #' }
 #' @keywords MLG
 #' @source Paula, G. A. (2004). Modelos de regressão: com apoio
@@ -131,16 +131,16 @@ NULL
 #' @examples
 #'
 #' data(PaulaEg1.12.5)
-#' 
+#'
 #' str(PaulaEg1.12.5)
-#' 
+#'
 #' library(lattice)
-#' 
+#'
 #' library(car)
-#' 
+#'
 #' scatterplotMatrix( ~ cons + taxa + licen + renda + estr,
 #'                   data = PaulaEg1.12.5)
-#' 
+#'
 #' xyplot(cons ~ est,
 #'        ylab = "Consumo",
 #'        xlab = "Estados",
@@ -153,23 +153,23 @@ NULL
 
 #' @name PaulaEg1.12.6
 #' @title Sal\enc{á}{a}rio de Executivos
-#' @description Dados referentes ao salário anual de uma 
-#'     amostra aleatória de 220 executivos (145 homens e 75 mulheres). O 
-#'     salário será relacionado com as variáveis: sexo, anos de experiência 
+#' @description Dados referentes ao salário anual de uma
+#'     amostra aleatória de 220 executivos (145 homens e 75 mulheres). O
+#'     salário será relacionado com as variáveis: sexo, anos de experiência
 #'     no cargo e posição na empresa.
-#'      
+#'
 #' @format Um \code{data.frame} com 220 observações e 4 variáveis.
 #' \describe{
-#' 
+#'
 #' \item{\code{sal}}{Salário anual (em mil USD).}
-#' 
+#'
 #' \item{\code{sexo}}{Sexo (masculino, feminino).}
-#' 
+#'
 #' \item{\code{pos}}{Posição na empresa (escore de 1 a 9).}
-#' 
+#'
 #' \item{\code{aexp}}{Experiência (em anos).}
-#' 
-#' 
+#'
+#'
 #' }
 #' @keywords MLG
 #' @source Paula, G. A. (2004). Modelos de regressão: com apoio
@@ -178,11 +178,11 @@ NULL
 #' @examples
 #'
 #' data(PaulaEg1.12.6)
-#' 
+#'
 #' str(PaulaEg1.12.6)
-#' 
+#'
 #' library(lattice)
-#' 
+#'
 #' xyplot(sal ~ aexp | sexo,
 #'        data = PaulaEg1.12.6,
 #'        type = c("p", "smooth"),
@@ -203,33 +203,33 @@ NULL
 #'     trimestre, latitude, longitude, dias de pesca, quantidade de
 #'     peixes capturados e a captura por unidade de esforço (definida
 #'     como divisão da quantidade de peixe capturado pelos dias de
-#'     pesca). 
+#'     pesca).
 #' @format Um \code{data.frame} com 156 observações e 8 variáveis.
 #'     \describe{
-#' 
+#'
 #' \item{\code{frota}}{Fator com dois níveis que indica de qual frota é
 #'     a embarcação, \code{Santos} ou \code{Ubatuba}.}
-#' 
+#'
 #' \item{\code{ano}}{Fator com cinco níveis que representa o ano, de
 #'     \code{1995} a \code{1996}.}
-#' 
+#'
 #' \item{\code{trim}}{Fator com quatro níveis que representa o trimestre
 #'     em estudo, de \code{1} a \code{4}.}
-#' 
+#'
 #' \item{\code{lat}}{Latitude, definida como distância ao Equador medida
 #'     ao longo do meridiano de Greenwich.}
-#' 
+#'
 #' \item{\code{long}}{Longitude, definida como distância ao meridiano de
 #'     Greenwich medida ao longo do Equador.}
-#' 
+#'
 #' \item{\code{dias}}{Dias de pesca.}
-#' 
+#'
 #' \item{\code{captura}}{Quantidade de peixes-batata capturados, em kg.}
-#' 
+#'
 #' \item{\code{cpue}}{Captura por unidade de esforço, calculada como
 #'     razão da quantidade de peixes-batata capturados (\code{captura})
 #'     pelo número de dias de pesca \code{dias}.}
-#' 
+#'
 #' }
 #' @keywords positivo-assimétrico
 #' @source Paula, G. A. (2004). Modelos de regressão: com apoio
@@ -240,30 +240,30 @@ NULL
 #'     Esforço de Peixe-Batata na Frota Paulista. RAE-CEA0102, IME-USP.
 #' @examples
 #' data(PaulaEg2.4.2)
-#' 
+#'
 #' str(PaulaEg2.4.2)
-#' 
+#'
 #' # Separando as covariáveis numéricas
 #' index <- sapply(PaulaEg2.4.2, is.numeric)
-#' 
+#'
 #' # Número de observações em cada combinação das covariáveis
 #' # não numéricas
 #' ftable(table(PaulaEg2.4.2[, !index]))
-#' 
+#'
 #' library(lattice)
-#' 
+#'
 #' # Relação marginal da variável resposta com as covariáveis
 #' # não numéricas
 #' bwplot(cpue ~ frota, data = PaulaEg2.4.2)
 #' bwplot(cpue ~ ano, data = PaulaEg2.4.2)
 #' bwplot(cpue ~ trim, data = PaulaEg2.4.2)
-#' 
+#'
 #' # Relação da variável resposta com as combinações das
 #' # covariáveis não numéricas
 #' ue <- with(PaulaEg2.4.2, paste(ano, trim, sep = "-"))
 #' bwplot(cpue ~ ue | frota, data = PaulaEg2.4.2,
 #'        scales = list(x = list(rot = 90)))
-#' 
+#'
 #' # Verificando a suposição de coeficiente de variação constante,
 #' # desconsiderando as covariáveis tri e numéricas
 #' resumo <- aggregate(cpue ~ frota + ano, data = PaulaEg2.4.2,
@@ -274,7 +274,7 @@ NULL
 #'                           "n" = length(x))
 #'                     })
 #' ftable(xtabs(cpue ~ frota + ano, data = resumo))
-#' 
+#'
 #' # Relação das covariáveis numéricas
 #' splom(~PaulaEg2.4.2[, index], groups = frota,
 #'       data = PaulaEg2.4.2,
@@ -288,26 +288,26 @@ NULL
 #'     individuais por danos com acidentes pessoais no período de
 #'     janeiro de 1998 a junho de 1999 (18 meses). O estudo completo
 #'     (Jong e Heller, 2008) contém o acompanhamento dos seguros desde
-#'     1989. No período considerado aqui foram pagos 769 seguros, sendo 
+#'     1989. No período considerado aqui foram pagos 769 seguros, sendo
 #'     armazenadas as informações: se houve representação
 #'     legal, tempo operacional para pagamento e mês em que ocorreu o
 #'     acidente.
 #' @format Um \code{data.frame} com 769 observações e 4 variáveis.
 #'     \describe{
-#' 
+#'
 #' \item{\code{valor}}{Valor pago do seguro, em dólares australianos.}
-#' 
+#'
 #' \item{\code{rl}}{Fator com dois níveis que indica, se no seguro em
 #'     análise, há representação legal do indivíduo.}
-#' 
+#'
 #' \item{\code{mes}}{Fator com 15 níveis que indica o mês de ocorrência
 #'     do acidente. Os níveis deste fator são codificados e não
 #'     informou-se quais os meses que eles representam.}
-#' 
+#'
 #' \item{\code{to}}{Tempo operacional para pagamento do seguro. Essa
 #'     variável assume valores de 0,1 a 31,9, pois são considerados
 #'     apenas os 18 últimos meses do estudo.}
-#' 
+#'
 #' }
 #' @keywords positivo-assimétrico
 #' @source Paula, G. A. (2004). Modelos de regressão: com apoio
@@ -315,19 +315,19 @@ NULL
 #'
 #' @references De Jong, P., Heller, G. Z. (2008). Generalized linear
 #'     models for insurance data (Vol. 136). Cambridge: Cambridge
-#'     University Press. 
+#'     University Press.
 #' @examples
 #' data(PaulaEg2.4.3)
-#' 
+#'
 #' str(PaulaEg2.4.3)
-#' 
+#'
 #' # Número de seguros pagos em cada combinação de mês e
 #' # representação legal
 #' ftable(table(PaulaEg2.4.3[, c("mes", "rl")]))
 #' table(PaulaEg2.4.3[, c("rl")])
-#' 
+#'
 #' library(lattice)
-#' 
+#'
 #' xyplot(log(valor) ~ to | rl,
 #'        data = PaulaEg2.4.3,
 #'        type = c("p", "g", "smooth"),
@@ -336,7 +336,7 @@ NULL
 #'            strip.names = TRUE,
 #'            var.name = "Representação Legal",
 #'            sep = ": "))
-#' 
+#'
 #' densityplot(~valor | rl,
 #'             data = PaulaEg2.4.3,
 #'             grid = TRUE,
@@ -399,23 +399,23 @@ NULL
 #'     ácidos graxos, foram comparados ao longo de 20 semanas. Nesse
 #'     novo produto a gordura vegetal hidrogenada, responsável pela
 #'     fixação do aroma do produto, foi substituída, totalmente ou
-#'     parcialmente, por óleo de canola. Ao todo foram produzidas 750 
-#'     observações, referentes a 15 avaliações para cada tipo de snack 
+#'     parcialmente, por óleo de canola. Ao todo foram produzidas 750
+#'     observações, referentes a 15 avaliações para cada tipo de snack
 #'     a cada 2 semanas.
 #' @format Um \code{data.frame} com 750 observações e 3 variáveis.
 #'     \describe{
-#' 
+#'
 #' \item{\code{semana}}{Semana da avaliação.}
-#' 
-#' \item{\code{tipo}}{Tipo de snack avaliado. Os níveis representam as 
+#'
+#' \item{\code{tipo}}{Tipo de snack avaliado. Os níveis representam as
 #'     seguintes configurações:
 #'     \code{A}: 22\% de gordura, 0\% de óleo de canola, \code{B}: 0\%
 #'     de gordura, 22\% de óleo de canola, \code{C}: 17\% de gordura,
 #'     5\% de óleo de canola, \code{D}: 11\% de gordura, 11\% de óleo de
 #'     canola e \code{E}: 5\% de gordura, 17\% de óleo de canola.}
-#' 
+#'
 #' \item{\code{fnpc}}{Força necessária para o cisalhamento.}
-#' 
+#'
 #' }
 #' @keywords positivo-assimétrico
 #' @source Paula, G. A. (2004). Modelos de regressão: com apoio
@@ -424,21 +424,21 @@ NULL
 #'
 #' @examples
 #' data(PaulaEg2.8.1)
-#' 
+#'
 #' str(PaulaEg2.8.1)
-#' 
+#'
 #' # Experimento balanceado, 15 observações para cada tipo em cada
 #' # semana
 #' ftable(PaulaEg2.8.1[, c("tipo", "semana")])
 #' xtabs(fnpc ~ tipo + semana, data = PaulaEg2.8.1)
-#' 
+#'
 #' library(lattice)
 #' bwplot(fnpc ~ tipo | factor(semana),
 #'        data =  PaulaEg2.8.1,
 #'        as.table = TRUE,
 #'        strip = strip.custom(strip.names = TRUE,
 #'                             var.name = "semana"))
-#' 
+#'
 #' # Estatísticas descritivas
 #' resumo <- aggregate(fnpc ~ tipo + semana,
 #'                     data = PaulaEg2.8.1,
@@ -449,7 +449,7 @@ NULL
 #'                           "n" = length(x))
 #'                     })
 #' ftable(xtabs(fnpc ~ tipo + semana, data = resumo))
-#' 
+#'
 #' xyplot(fnpc[, "Média"] ~ semana,
 #'        groups = tipo,
 #'        data = resumo,
@@ -465,18 +465,18 @@ NULL
 #' @name PaulaEg3.5.1
 #' @title Associa\enc{çã}{ca}o entre fungicida e desenvolvimento de tumor
 #' @description Dados de um experimento realizado para avaliar
-#'    o possível efeito cancerígeno do fungicida Avadex. Foram utilizados 
-#'    403 camundongos. Desses, 65 receberam o fungicida e foram acompanhados 
-#'    durante 85 semanas, verificando-se o desenvolvimento ou não de tumor 
-#'    cancerígeno. Os demais animais não receberam o fungicida (grupo controle) 
+#'    o possível efeito cancerígeno do fungicida Avadex. Foram utilizados
+#'    403 camundongos. Desses, 65 receberam o fungicida e foram acompanhados
+#'    durante 85 semanas, verificando-se o desenvolvimento ou não de tumor
+#'    cancerígeno. Os demais animais não receberam o fungicida (grupo controle)
 #'    e também foram acompanhados pelo mesmo período.
-#'    
+#'
 #' @format Um \code{data.frame} com 4 observações e 4 variáveis, em que
 #'
 #' \describe{
 #'
 #' \item{sexo}{Sexo do camundongo (macho = 1 e fêmea = 0).}
-#'     
+#'
 #' \item{trat}{Identifica a presença ou não do tratamento (sim = 1 e não = 0).}
 #'
 #' \item{casos}{Número inteiro que identifica a quantidade de casos
@@ -485,9 +485,9 @@ NULL
 #' \item{exp}{Quantidade de camundongos expostos.}
 #'
 #' }
-#' 
-#' @keywords GLM binarios
-#' @source Paula, G. A. (2004). Modelos de regressão: com apoio computacional. 
+#'
+#' @keywords MLG binarios
+#' @source Paula, G. A. (2004). Modelos de regressão: com apoio computacional.
 #'    São Paulo, SP: IME-USP. (Eg 3.5.1 pág. 201)
 #' @examples
 #'
@@ -498,9 +498,9 @@ NULL
 #' barchart(casos/exp ~ trat | sexo,  data = PaulaEg3.5.1,
 #'          xlab="Grupo", ylab="Proporção de casos",
 #'          scales=list(x=list(labels=c("Controle","Tratado"))),
-#'          strip=strip.custom(var.name="Sexo", 
+#'          strip=strip.custom(var.name="Sexo",
 #'          factor.levels=c(" Fêmea", "Macho"),
-#'          strip.levels=rep(TRUE,2)), 
+#'          strip.levels=rep(TRUE,2)),
 #'          main="Associação entre fungicida e desenvolvimento de tumor")
 NULL
 
@@ -509,14 +509,14 @@ NULL
 
 #' @name PaulaEg3.5.2
 #' @title Efeito de extrato vegetal
-#' @description Dados de um experimento conduzido para avaliar o efeito de 
-#'    diversos extratos vegetais na mortalidade de embriões de 
-#'    \emph{Biomphalaria Glabrata}. Para o extrato vegetal aquoso frio de 
+#' @description Dados de um experimento conduzido para avaliar o efeito de
+#'    diversos extratos vegetais na mortalidade de embriões de
+#'    \emph{Biomphalaria Glabrata}. Para o extrato vegetal aquoso frio de
 #'    folhas de \emph{P. Hyrsiflora} foram consideradas 7 amostras, sendo
-#'    que em cada uma delas 50 embriões foram submetidos a uma particular 
-#'    dose do extrato vegetal, registrando-se, após o vigésimo dia, o 
+#'    que em cada uma delas 50 embriões foram submetidos a uma particular
+#'    dose do extrato vegetal, registrando-se, após o vigésimo dia, o
 #'    número de embriões mortos.
-#'    
+#'
 #' @format Um \code{data.frame} com 2 observações e 3 variáveis, em que
 #'
 #' \describe{
@@ -524,10 +524,10 @@ NULL
 #' \item{dose}{Dose de extrato vegetal aplicada (em partes por milhão).}
 #'
 #' \item{emb}{Número observado de embriões mortos.}
-#'     
+#'
 #' }
-#' @keywords GLM binarios
-#' @source Paula, G. A. (2004). Modelos de regressão: com apoio computacional. 
+#' @keywords MLG binarios
+#' @source Paula, G. A. (2004). Modelos de regressão: com apoio computacional.
 #'    São Paulo, SP: IME-USP. (Eg 3.5.2 pág. 203)
 #' @examples
 #'
@@ -536,72 +536,72 @@ NULL
 #' data(PaulaEg3.5.2)
 #'
 #' str(PaulaEg3.5.2)
-#' 
-#' barchart(emb/(sum(emb)) ~ dose,  data = PaulaEg3.5.2, 
+#'
+#' barchart(emb/(sum(emb)) ~ dose,  data = PaulaEg3.5.2,
 #'          stack=TRUE, col= "lightblue",
-#'          xlab="Dose (em ppm)", ylab="Proporção de embriões mortos", 
+#'          xlab="Dose (em ppm)", ylab="Proporção de embriões mortos",
 #'          main="Efeito de extrato vegetal")
-#' 
+#'
 NULL
 
 #' @name PaulaEg3.6.11a
 #' @title Exposi\enc{çã}{ca}o de besouros
-#' @description Dados de  um estudo sobre o efeito da exposição de  
-#'     besouros adultos a diferentes doses de disulfeto de carbono gasoso 
-#'     \emph{(CS2)}, durante cinco horas. Foram registrados os números 
-#'     de besouros mortos.  
-#' 
+#' @description Dados de  um estudo sobre o efeito da exposição de
+#'     besouros adultos a diferentes doses de disulfeto de carbono gasoso
+#'     \emph{(CS2)}, durante cinco horas. Foram registrados os números
+#'     de besouros mortos.
+#'
 #' @format Um \code{data.frame} com 8 observações e 3 variáveis, em que
 #'
 #' \describe{
 #'
 #' \item{mortos}{Quantidade observada de besouros mortos.}
-#'     
+#'
 #' \item{exp}{Quantidade de besouros expostos a cada dose.}
 #'
 #' \item{dose}{Dose de disulfeto de carbono gasoso à qual os besouros
 #'    foram expostos.}
-#'     
+#'
 #' }
-#' @keywords GLM binarios
-#' @source Paula, G. A. (2004). Modelos de regressão: com apoio computacional. 
+#' @keywords MLG binarios
+#' @source Paula, G. A. (2004). Modelos de regressão: com apoio computacional.
 #'    São Paulo, SP: IME-USP. (Eg 3.6.11a pág. 237)
 #' @examples
 #'
 #' library(lattice)
 #'
 #' data(PaulaEg3.6.11a)
-#' 
+#'
 #' str(PaulaEg3.6.11a)
 #'
-#' xyplot(mortos/(sum(mortos)) ~ dose,  data = PaulaEg3.6.11a, 
+#' xyplot(mortos/(sum(mortos)) ~ dose,  data = PaulaEg3.6.11a,
 #'          type = "o",
-#'          xlab = "Dose de disulfeto de carbono gasoso", 
-#'          ylab = "Proporção de besouros mortos", 
+#'          xlab = "Dose de disulfeto de carbono gasoso",
+#'          ylab = "Proporção de besouros mortos",
 #'          main = expression("Exposição de besouros a"~CS[2]))
-#' 
+#'
 NULL
 
 #' @name PaulaEg3.6.11b
 #' @title Idade do in\enc{í}{i}cio da menstrua\enc{çã}{ca}o em garotas de Vars\enc{ó}{o}via
-#' @description Dados de  um estudo em que se investigou a idade do início 
-#'     da menstruação em 3918 garotas de Varsóvia. Para 25 médias de 
+#' @description Dados de  um estudo em que se investigou a idade do início
+#'     da menstruação em 3918 garotas de Varsóvia. Para 25 médias de
 #'     idade foram observadas a ocorrência  ou não  do início de períodos
-#'     de menstruação nas adolescentes. 
-#'     
+#'     de menstruação nas adolescentes.
+#'
 #' @format Um \code{data.frame} com 25 observações e 3 variáveis, em que
 #'
 #' \describe{
 #'
 #' \item{menst}{Número de garotas menstruando.}
-#'     
+#'
 #' \item{entre}{Número de garotas entrevistadas.}
 #'
 #' \item{idade}{Idade media.}
-#'     
+#'
 #' }
-#' @keywords GLM
-#' @source Paula, G. A. (2004). Modelos de regressão: com apoio computacional. 
+#' @keywords MLG
+#' @source Paula, G. A. (2004). Modelos de regressão: com apoio computacional.
 #'    São Paulo, SP: IME-USP. (Eg 3.6.11b pág. 241)
 #' @examples
 #'
@@ -609,29 +609,29 @@ NULL
 #'
 #' data(PaulaEg3.6.11b)
 #'
-#'        
-#' xyplot((menst/entre) ~ idade,  data = PaulaEg3.6.11b, 
+#'
+#' xyplot((menst/entre) ~ idade,  data = PaulaEg3.6.11b,
 #'        type = c("p","a"),
-#'        xlab = "Idade média", 
-#'        ylab = "Meninas menstruando/Entrevistadas", 
+#'        xlab = "Idade média",
+#'        ylab = "Meninas menstruando/Entrevistadas",
 #'        main = "Idade do início da menstruação em garotas de Varsóvia.")
 NULL
 
 #' @name PaulaEg3.6.9c
 #' @title Prefer\enc{ê}{e}ncia de consumidores
 #' @description Dados sobre a preferência de consumidores americanos com
-#'    relação a automóveis. Uma amostra aleatória de 263 consumidores foi 
-#'    considerada. As seguintes variáveis foram observadas para cada 
-#'    comprador: preferência quanto ao tipo de automóvel, idade, sexo e 
-#'    estado civil. 
-#'     
+#'    relação a automóveis. Uma amostra aleatória de 263 consumidores foi
+#'    considerada. As seguintes variáveis foram observadas para cada
+#'    comprador: preferência quanto ao tipo de automóvel, idade, sexo e
+#'    estado civil.
+#'
 #' @format Um \code{data.frame} com 263 observações e 4 variáveis, em que
 #'
 #' \describe{
 #'
-#' \item{pref}{Preferência do comprador por um tipo de automóvel (1 = americano, 
+#' \item{pref}{Preferência do comprador por um tipo de automóvel (1 = americano,
 #'    0 = japonês).}
-#'     
+#'
 #' \item{idade}{Idade do comprador (em anos).}
 #'
 #' \item{sexo}{Sexo do comprador (0 =  masculino; 1 = feminino).}
@@ -639,8 +639,8 @@ NULL
 #' \item{est}{Estado civil do comprador (0 = casado, 1 = solteiro).}
 #'
 #' }
-#' @keywords GLM binarios 
-#' @source Paula, G. A. (2004). Modelos de regressão: com apoio computacional. 
+#' @keywords MLG binarios
+#' @source Paula, G. A. (2004). Modelos de regressão: com apoio computacional.
 #'    São Paulo, SP: IME-USP. (Eg 3.6.9c pág. 231)
 #' @examples
 #'
@@ -649,13 +649,13 @@ NULL
 #' data(PaulaEg3.6.9c)
 #'
 #' str(PaulaEg3.6.9c)
-#' 
-#' bwplot(idade ~ pref,  data = PaulaEg3.6.9c, 
+#'
+#' bwplot(idade ~ pref,  data = PaulaEg3.6.9c,
 #'        type="p",
-#'        xlab="Preferência - Japonês e Americano", 
-#'        ylab="Idade do Comprador", 
+#'        xlab="Preferência - Japonês e Americano",
+#'        ylab="Idade do Comprador",
 #'        main="Preferência")
-#' 
+#'
 NULL
 
 #' @name PaulaEg4.2.6
@@ -667,18 +667,18 @@ NULL
 #'     explicativas registradas
 #' @format Um \code{data.frame} com 110 observações e 6 variáveis.
 #'     \describe{
-#' 
+#'
 #' \item{\code{nclien}}{Número de clientes da loja na área.}
-#' 
+#'
 #' \item{\code{ndomic}}{Número de domicílios na área (em mil).}
-#' 
+#'
 #' \item{\code{renda}}{Renda média anual da área (em mil USD).}
-#' 
+#'
 #' \item{\code{idade}}{Idade média dos domicílios (em anos).}
-#' 
+#'
 #' \item{\code{distac}}{Distância entre a área e o concorrente mais
 #'     próximo (em milhas).}
-#' 
+#'
 #' \item{\code{distal}}{Distância entre a área e a loja (em milhas).}
 #'
 #' }
@@ -692,9 +692,9 @@ NULL
 #' @examples
 #'
 #' data(PaulaEg4.2.6)
-#' 
+#'
 #' str(PaulaEg4.2.6)
-#' 
+#'
 #' library(lattice)
 #' splom(PaulaEg4.2.6, type = c("p", "smooth"), lwd = 2)
 #'
@@ -709,22 +709,22 @@ NULL
 #'     o aluno está cursando e desempenho escolar.
 #' @format Um \code{data.frame} com 146 observações e 5 variáveis.
 #'     \describe{
-#' 
+#'
 #' \item{\code{etnia}}{Fator com dois níveis que indica se o aluno é
 #'     aborígene da própria região (A) ou não aborígene (N).}
-#' 
+#'
 #' \item{\code{sexo}}{Fator com dois níveis que indica o sexo do
 #'     aluno: masculino (M) ou feminino (F).}
-#' 
+#'
 #' \item{\code{ano}}{Fator com quatro níveis que indica o ano que o aluno
 #'     está cursando: 8ª série (F0), 1º ano do ensino médio (F1), 2º ano
 #'     do ensino médio (F2) ou 3º ano do ensino médio (F3).}
-#' 
+#'
 #' \item{\code{desemp}}{Fator com dois níveis que indica o desempenho do
 #'     aluno: baixo (SL) ou normal (AL).}
-#' 
+#'
 #' \item{\code{ndias}}{Número de dias ausentes no ano letivo.}
-#' 
+#'
 #' }
 #' @keywords contagem superdispersão
 #' @source Paula, G. A. (2004). Modelos de regressão: com apoio
@@ -735,20 +735,20 @@ NULL
 #' @examples
 #'
 #' data(PaulaEg4.3.6)
-#' 
+#'
 #' str(PaulaEg4.3.6)
-#' 
+#'
 #' # Número de observações em cada combinação. Para modelagem não será
 #' # possível a estimação de algumas interações
 #' ftable(PaulaEg4.3.6[, -5])
-#' 
+#'
 #' # Ausência escolar seccionadas pelas variáveis explicativas
 #' xtabs(ndias ~ ., data = PaulaEg4.3.6)
-#' 
+#'
 #' # Relação média-variância
 #' aggregate(ndias ~ ., FUN = function(x) c(mean(x), var(x)),
 #'           data = PaulaEg4.3.6)
-#' 
+#'
 #' library(latticeExtra)
 #' fl1 <- c("Aborígene", "Não Aborígene")
 #' fl2 <- c("Feminino", "Masculino")
@@ -768,48 +768,48 @@ NULL
 
 #' @name PaulaEg5.2.8a
 #' @title N\enc{ú}{u}mero de \enc{Á}{A}caros em Placas de Esterco de Gado
-#' @description Dados de um experimento desenvolvido para estudar  
-#'     a distribuição do número de ácaros em placas de esterco de gado 
-#'     bovino no estado de São Paulo, obtidos por Paula e Tavares, 1992. 
-#'     Essas placas são depósitos de ovos da mosca do chifre 
-#'     (\emph{Haematobia irritans}), uma das pragas mais importantes da 
-#'     pecuária brasileira. Os ácaros são inimigos naturais da mosca do 
+#' @description Dados de um experimento desenvolvido para estudar
+#'     a distribuição do número de ácaros em placas de esterco de gado
+#'     bovino no estado de São Paulo, obtidos por Paula e Tavares, 1992.
+#'     Essas placas são depósitos de ovos da mosca do chifre
+#'     (\emph{Haematobia irritans}), uma das pragas mais importantes da
+#'     pecuária brasileira. Os ácaros são inimigos naturais da mosca do
 #'     chifre, uma vez que se alimentam de ovos e larvas dessas moscas.
-#'     
+#'
 #' @format Um \code{data.frame} com 102 observações e 8 variáveis.
 #' \describe{
-#' 
+#'
 #' \item{\code{esp2}}{Número de ácaros coletados da espécie 2.}
-#' 
+#'
 #' \item{\code{esp3}}{Número de ácaros coletados da espécie 3.}
-#' 
+#'
 #' \item{\code{esp6}}{Número de ácaros coletados da espécie 6.}
-#' 
+#'
 #' \item{\code{esp14}}{Número de ácaros coletados da espécie 14.}
-#' 
-#' \item{\code{placa}}{Número de partes da placa de esterco onde 
+#'
+#' \item{\code{placa}}{Número de partes da placa de esterco onde
 #'     foram coletados os ácaros. (1 ou 6)}
-#' 
-#' \item{\code{posic}}{Posição na placa de esterco onde foram coletados 
+#'
+#' \item{\code{posic}}{Posição na placa de esterco onde foram coletados
 #' os ácaros (central ou lateral).}
-#' 
+#'
 #' \item{\code{reg}}{Região onde a placa de esterco foi coletada (São
 #'      Roque, Pindamonhangaba, Nova Odessa ou Ribeirão Preto).}
-#' 
+#'
 #' \item{\code{temp}}{Temperatura no local da coleta, medida
 #'     \eqn{C^{\circ}}.}
-#' 
+#'
 #' }
 #' @keywords quase-verossimilhança
 #' @source Paula, G. A. (2004). Modelos de regressão: com apoio
 #'     computacional. São Paulo, SP: IME-USP. (Exemplo 5.2.8a, pág. 359)
-#' 
+#'
 #' @references Paula, G. A. e Tavares, H. R. (1992). Relatório de
 #'     Análise Estatística sobre o Projeto: Ácaros Associados ao Esterco
 #'     Bovino. Subsídios para Controle Biológico da Mosca do Chifre.
 #'     RAECEA 9206, IME-USP
 #' @examples
-#' 
+#'
 #' data(PaulaEg5.2.8a)
 #'
 #' str(PaulaEg5.2.8a)
@@ -832,19 +832,19 @@ NULL
 #'
 #' @format Um \code{data.frame} com 90 observações e 3 variáveis.
 #' \describe{
-#' 
+#'
 #' \item{\code{incid}}{Proporção da área afetada na folha de cevada.}
-#' 
+#'
 #' \item{\code{local}}{Local onde foi realizado o experimento (1-9).}
-#' 
+#'
 #' \item{\code{varied}}{Variedade de cevada (1-10).}
-#' 
+#'
 #' }
-#' 
+#'
 #' @keywords quase-verossimilhança
 #' @source Paula, G. A. (2004). Modelos de regressão: com apoio
 #'     computacional. São Paulo, SP: IME-USP. (Exemplo 5.2.8a, pág. 367)
-#' 
+#'
 #' @references McCullagh, P. e Nelder, J. A. (1989). Generalized Linear
 #'     Models, 2nd. Edition. Chapman and Hall, London. Tabela 9.2.
 #' @examples
@@ -865,42 +865,42 @@ NULL
 
 #' @name PaulaEg5.5.1
 #' @title Ensaio Cl\enc{í}{i}nico com Indiv\enc{í}{i}duos Epil\enc{é}{e}pticos
-#' @description Dados apresentados em Diggle, Liang e Zeger (1994), 
+#' @description Dados apresentados em Diggle, Liang e Zeger (1994),
 #'     referentes a um ensaio clínico com 59 indivíduos epilépticos,
 #'     aleatorizados de modo que cada um recebesse uma droga
 #'     antiepiléptica (progabide) ou placebo.
-#'     Os dados de cada indivíduo consistem do número de ataques 
+#'     Os dados de cada indivíduo consistem do número de ataques
 #'     epilépticos num período de oito semanas antes do tratamento, além
 #'     do número de ataques em cada período de duas semanas, num total
 #'     de quatro períodos após o tratamento. O interesse do estudo é
 #'     verificar possível diminuição na taxa de ataques epilépticos.
-#'     
+#'
 #' @format Um \code{data.frame} com 295 observações e 5 variáveis.
 #' \describe{
-#' 
+#'
 #' \item{\code{indiv}}{Identificação do indivíduo.}
-#' 
-#' \item{\code{period}}{Período de observação (1 = antes do tratamento, 
-#'     2 = primeiro período após o tratamento, 3 = segundo período após 
+#'
+#' \item{\code{period}}{Período de observação (1 = antes do tratamento,
+#'     2 = primeiro período após o tratamento, 3 = segundo período após
 #'     o tratamento e 4 = terceiro período após o tratamento).}
-#' 
+#'
 #' \item{\code{seman}}{Número de semanas em cada período.}
-#' 
+#'
 #' \item{\code{ataq}}{Número de ataques em cada período.}
-#' 
+#'
 #' \item{\code{trat}}{Tratamento aplicado a cada indivíduo (placebo ou
 #'     progabide).}
-#' 
+#'
 #' }
 #' @keywords quase-verossimilhança
 #' @source Paula, G. A. (2004). Modelos de regressão: com apoio
 #'     computacional. São Paulo, SP: IME-USP. (Exemplo 5.5.1, pág. 379)
-#' 
+#'
 #' @references Diggle, P. J.; Liang, K. Y. e Zeger, S. L. (1994).
 #'     Analysis of Longitudinal Data. Oxford University Press.
 #'     Seção 8.4.
 #' @examples
-#' 
+#'
 #' data(PaulaEg5.5.1)
 #'
 #' str(PaulaEg5.5.1)
@@ -911,7 +911,7 @@ NULL
 #'        type = c("p", "a"),
 #'        xlab = "Período",
 #'        ylab = "Número de ataques epilépticos")
-#'        
+#'
 NULL
 
 #' @name PaulaEg5.5.2
@@ -927,26 +927,26 @@ NULL
 
 #' @format Um \code{data.frame} com 224 observações e 6 variáveis.
 #' \describe{
-#' 
+#'
 #' \item{\code{paci}}{Identificação do paciente.}
-#' 
+#'
 #' \item{\code{trat}}{Tratamento aplicado ao paciente (droga ativa ou
 #'     placebo).}
-#' 
+#'
 #' \item{\code{sexo}}{Sexo do paciente.}
-#' 
+#'
 #' \item{\code{idade}}{Idade (em anos).}
-#' 
+#'
 #' \item{\code{nivel}}{Pré-existência de um nível base (ausência ou
 #'     presença).}
-#' 
+#'
 #' \item{\code{cond}}{Condição respiratória do paciente (boa ou ruim).}
-#' 
+#'
 #' }
 #' @keywords quase-verossimilhança
 #' @source Paula, G. A. (2004). Modelos de regressão: com apoio
 #'     computacional. São Paulo, SP: IME-USP. (Exemplo 5.5.2, pág. 385)
-#' 
+#'
 #' @references Myers, R.H.; Montgomery, D. C.; Vining, G. G. (2002).
 #'     Generalized Linear Models: With Applications in Engineering and
 #'     the Sciences. John Wiley, New York. Seção 6.5.
@@ -955,7 +955,7 @@ NULL
 #' data(PaulaEg5.5.2)
 #'
 #' str(PaulaEg5.5.2)
-#'            
+#'
 #' library(latticeExtra)
 #'
 #' tb <- with(PaulaEg5.5.2, table(nivel, trat, sexo, cond))
@@ -972,50 +972,50 @@ NULL
 #'                  columns = 2, cex.title = 1)
 #'     )
 #' )
-#'            
+#'
 NULL
 
 #' @name PaulaEg5.5.3
 #' @title Ensaio cl\enc{í}{i}nico da pr\enc{é}{e}-exist\enc{ê}{e}ncia de placa dent\enc{á}{a}ria
-#' @description Dados de um ensaio clínico realizado com 109 indivíduos, 
+#' @description Dados de um ensaio clínico realizado com 109 indivíduos,
 #'     distribuídos de forma aleatória para receberem um líquido
 #'     tipo A (34 indivíduos), um líquido tipo B (36 indivíduos) ou um
-#'     líquido controle (39 indivíduos). Placas dentárias foram 
-#'     avaliadas e classificadas segundo um escore no início do 
+#'     líquido controle (39 indivíduos). Placas dentárias foram
+#'     avaliadas e classificadas segundo um escore no início do
 #'     tratamento, após 3 e 6 meses.
-#'     
+#'
 #' @format Um \code{data.frame} com 323 observações e 4 variáveis.
 #' \describe{
-#' 
+#'
 #' \item{\code{volunt}}{Identificação do paciente voluntário.}
-#' 
+#'
 #' \item{\code{period}}{Momento de avaliação: (1 = início do tratamento,
 #'    2 = após 3 meses e 3 = após 6 meses.}
-#' 
+#'
 #' \item{\code{trat}}{Tipo de tratamento (1 = placebo, 2 = líquido A e
 #'     3 = líquido B.}
-#' 
+#'
 #' \item{\code{escore}}{Escore atribuído às placas dentárias.}
-#' 
+#'
 #' }
 #' @keywords quase-verossimilhança
 #' @source Paula, G. A. (2004). Modelos de regressão: com apoio
 #' computacional. São Paulo, SP: IME-USP. (Exemplo 5.5.3, pág. 390)
-#' 
-#' @references Hadgu, A. e Koch, G. (1999). Application of generalized 
-#' estimating equations to a dental randomized clinical trial. Journal 
+#'
+#' @references Hadgu, A. e Koch, G. (1999). Application of generalized
+#' estimating equations to a dental randomized clinical trial. Journal
 #' of Biopharmaceutical Statistics 9, 161-178.
-#' 
+#'
 #' @examples
-#' 
+#'
 #' data(PaulaEg5.5.3)
-#' 
+#'
 #' require(lattice)
-#' 
+#'
 #' xyplot(escore ~ period | trat, groups = volunt,
-#'       xlab = 'Período', ylab = 'Escore', type = c("p", "a"), 
+#'       xlab = 'Período', ylab = 'Escore', type = c("p", "a"),
 #'       data = PaulaEg5.5.3)
-#'       
+#'
 NULL
 
 #' @name PaulaEx1.13.19
@@ -1071,28 +1071,28 @@ NULL
 
 #' @name PaulaEx1.13.20
 #' @title Vendas de Telhados de Madeira
-#' @description Dados referentes a vendas de um tipo de telhado de madeira 
+#' @description Dados referentes a vendas de um tipo de telhado de madeira
 #'     em 26 filiais de uma rede de lojas de construção. Um dos objetivos do
 #'     estudo é tentar prever o número esperado de telhados vendidos
 #'     dadas as demais variáveis registradas.
-#'     
+#'
 #' @format Um \code{data.frame} com 26 observações e 5 variáveis.
 #'     \describe{
-#' 
+#'
 #' \item{\code{gasto}}{Gasto com publicidade do produto (em mil
 #'     dólares).}
-#' 
+#'
 #' \item{\code{ncli}}{Número de clientes cadastrados (em milhares).}
-#' 
+#'
 #' \item{\code{nmar}}{Número de marcas concorrentes do produto}
-#' 
+#'
 #' \item{\code{poten}}{Potencial da loja, informação advinda da rede de
 #'     lojas de construção (quanto maior o valor maior o potencial de
 #'     venda da filial).}
-#' 
+#'
 #' \item{\code{telha}}{Total de telhados vendidos (em mil metros
 #'     quadrados).}
-#' 
+#'
 #' }
 #' @keywords TODO
 #' @source Paula, G. A. (2004). Modelos de regressão: com apoio
@@ -1100,9 +1100,9 @@ NULL
 #'     pág. 110)
 #' @examples
 #' data(PaulaEx1.13.20)
-#' 
+#'
 #' str(PaulaEx1.13.20)
-#' 
+#'
 #' library(lattice)
 #' splom(PaulaEx1.13.20,
 #'       type = c("p", "g", "smooth"),
@@ -1119,21 +1119,21 @@ NULL
 #'     produzida.
 #' @format Um \code{data.frame} com 82 observações e 5 variáveis.
 #'     \describe{
-#' 
+#'
 #' \item{\code{x1}}{Variável não nomeada. Imagina-se que se tenha
 #'     relação com o número de octanas da gasolina.}
-#' 
+#'
 #' \item{\code{x2}}{Variável não nomeada. Imagina-se que se tenha
 #'     relação com o número de octanas da gasolina.}
 #'
 #' \item{\code{x3}}{Variável não nomeada. Imagina-se que se tenha
 #'     relação com o número de octanas da gasolina.}
-#' 
+#'
 #' \item{\code{x4}}{Valores de uma combinação (não informada) das
 #'     variável \code{x1}, \code{x2} e \code{x3}.}
-#' 
+#'
 #' \item{\code{nocta}}{Número de octanas da gasolina produzida.}
-#' 
+#'
 #' }
 #' @keywords TODO
 #' @source Paula, G. A. (2004). Modelos de regressão: com apoio
@@ -1141,9 +1141,9 @@ NULL
 #'     pág. 110)
 #' @examples
 #' data(PaulaEx1.13.21)
-#' 
+#'
 #' str(PaulaEx1.13.21)
-#' 
+#'
 #' library(lattice)
 #' splom(PaulaEx1.13.21,
 #'       type = c("p", "g", "smooth"),
@@ -1158,17 +1158,17 @@ NULL
 #'     no preço de venda de um imóvel.
 #' @format Um \code{data.frame} com 27 observações e 5 variáveis.
 #'     \describe{
-#' 
+#'
 #' \item{\code{impos}}{Valor cobrado de imposto, em 100 dólares.}
-#' 
+#'
 #' \item{\code{areat}}{Área do terreno, em 1000 pés quadrados.}
-#' 
+#'
 #' \item{\code{areac}}{Área construída, em 1000 pés quadrados.}
-#' 
+#'
 #' \item{\code{idade}}{Idade da residência, em anos.}
-#' 
+#'
 #' \item{\code{preco}}{Preço de venda do imóvel, em 1000 dólares.}
-#' 
+#'
 #' }
 #' @keywords TODO
 #' @source Paula, G. A. (2004). Modelos de regressão: com apoio
@@ -1176,9 +1176,9 @@ NULL
 #'     pág. 111)
 #' @examples
 #' data(PaulaEx1.13.22)
-#' 
+#'
 #' str(PaulaEx1.13.22)
-#' 
+#'
 #' library(lattice)
 #' splom(PaulaEx1.13.22,
 #'       type = c("p", "g", "smooth"),
@@ -1194,15 +1194,15 @@ NULL
 #'     árvore a partir de sua altura e diâmetro.
 #' @format Um \code{data.frame} com 31 observações e 3 variáveis.
 #'     \describe{
-#' 
+#'
 #' \item{\code{diam}}{Diâmetro da cerejeira, em polegadas. Provavelmente
 #'     o diâmetro foi calculado à altura do peito (\eqn{\approx}
 #'     1.30m).}
-#' 
+#'
 #' \item{\code{alt}}{Altura da cerejeira, em pés.}
-#' 
+#'
 #' \item{\code{vol}}{Volume da cerejeira, em pés cúbicos.}
-#' 
+#'
 #' }
 #' @keywords TODO
 #' @source Paula, G. A. (2004). Modelos de regressão: com apoio
@@ -1210,9 +1210,9 @@ NULL
 #'     pág. 111)
 #' @examples
 #' data(PaulaEx1.13.23)
-#' 
+#'
 #' str(PaulaEx1.13.23)
-#' 
+#'
 #' library(lattice)
 #' splom(PaulaEx1.13.23,
 #'       type = c("p", "g", "smooth"),
@@ -1221,7 +1221,7 @@ NULL
 NULL
 
 #' @name PaulaEx1.13.24
-#' @title Porcentagens de Retorno de A\enc{çõ}{co}es 
+#' @title Porcentagens de Retorno de A\enc{çõ}{co}es
 #' @description Dados referentes aos retornos diários das ações das
 #'     empresas Microsoft, General Eletric (GE) e Ford no período de
 #'     janeiro de 2002 a abril de 2003. No registro dessas ações também
@@ -1229,19 +1229,19 @@ NULL
 #'     mercado, para padronizar as comparações.
 #' @format Um \code{data.frame} com 311 observações e 5 variáveis.
 #' \describe{
-#' 
+#'
 #' \item{\code{tbill}}{Taxa de retorno livre de risco.}
-#' 
+#'
 #' \item{\code{sp500}}{Porcentagem de retorno do mercado.}
-#' 
+#'
 #' \item{\code{micro}}{Porcentagem de retorno das ações da empresa
 #'     Microsoft.}
-#' 
+#'
 #' \item{\code{ge}}{Porcentagem de retorno das ações da empresa General
 #'     Eletric (GE).}
-#' 
+#'
 #' \item{\code{ford}}{Porcentagem de retorno das ações da empresa Ford.}
-#' 
+#'
 #' }
 #' @keywords TODO
 #' @source Paula, G. A. (2004). Modelos de regressão: com apoio
@@ -1249,17 +1249,17 @@ NULL
 #'     pág. 112)
 #' @examples
 #' data(PaulaEx1.13.24)
-#' 
+#'
 #' str(PaulaEx1.13.24)
-#' 
+#'
 #' library(reshape)
 #' da <- melt(PaulaEx1.13.24, measure.vars = c("micro", "ge", "ford"),
 #'            variable_name = "empresa")
-#' 
+#'
 #' library(lattice)
 #' densityplot(~value, groups = empresa, data = da,
 #'             auto.key = list(corner = c(0.9, 0.9)))
-#' 
+#'
 #' xyplot((sp500 - tbill) ~ (value - tbill) | empresa,
 #'        data = da, type = c("p", "smooth", "g"))
 #'
@@ -1273,11 +1273,11 @@ NULL
 #'     de venda registrados.
 #' @format Um \code{data.frame} com 50 observações e 2 variáveis.
 #'     \describe{
-#' 
+#'
 #' \item{\code{area}}{Área total do imóvel, em pés quadrados.}
-#' 
+#'
 #' \item{\code{preco}}{Preço de venda do imóvel, em mil dólares.}
-#' 
+#'
 #' }
 #' @keywords TODO
 #' @source Paula, G. A. (2004). Modelos de regressão: com apoio
@@ -1285,9 +1285,9 @@ NULL
 #'     pág. 112)
 #' @examples
 #' data(PaulaEx1.13.25)
-#' 
+#'
 #' str(PaulaEx1.13.25)
-#' 
+#'
 #' library(lattice)
 #' xyplot(preco ~ area, data = PaulaEx1.13.25,
 #'        type = c("p", "smooth", "g"))
@@ -1298,16 +1298,16 @@ NULL
 #' @title Consumo de Energia em Domic\enc{í}{i}lios
 #' @description Dados referentes ao consumo de energia em 53 domicílios
 #'     e demanda de energia no horário de pico.
-#'     
+#'
 #' @format Um \code{data.frame} com 53 observações e 2 variáveis.
 #' \describe{
-#' 
+#'
 #' \item{\code{consu}}{Consumo de energia num determinado mês, em
 #'     quilowatts-hora.}
-#' 
+#'
 #' \item{\code{deman}}{Demanda de energia no horário de pico (unidade de
 #'     medida não informada).}
-#' 
+#'
 #' }
 #' @keywords positivo-assimétrico
 #' @source Paula, G. A. (2004). Modelos de regressão: com apoio
@@ -1320,9 +1320,9 @@ NULL
 #'
 #' @examples
 #' data(PaulaEx2.10.15)
-#' 
+#'
 #' str(PaulaEx2.10.15)
-#' 
+#'
 #' library(lattice)
 #' xyplot(deman ~ consu, data = PaulaEx2.10.15,
 #'        pch = 19, lwd = 2, type = c("p", "g", "smooth"))
@@ -1337,13 +1337,13 @@ NULL
 #'     publicidade.
 #' @format Um \code{data.frame} com 30 observações e 2 variáveis.
 #' \describe{
-#' 
+#'
 #' \item{\code{fatura}}{Faturamento anual do restaurante, em mil
 #'     dólares.}
-#' 
+#'
 #' \item{\code{gastos}}{Gastos do restaurante com publicidade, em mil
 #'     dólares.}
-#' 
+#'
 #' }
 #' @keywords positivo-assimétrico RS
 #' @source Paula, G. A. (2004). Modelos de regressão: com apoio
@@ -1356,9 +1356,9 @@ NULL
 #'
 #' @examples
 #' data(PaulaEx2.10.16)
-#' 
+#'
 #' str(PaulaEx2.10.16)
-#' 
+#'
 #' library(lattice)
 #' xyplot(fatura ~ gastos,
 #'        data = PaulaEx2.10.16,
@@ -1420,7 +1420,7 @@ NULL
 
 #' @name PaulaEx2.10.19
 #' @title Estudo Sobre Leucemia e Caracter\enc{í}{i}stica Morfol\enc{ó}{o}gica nas C\enc{é}{e}lulas
-#'     Brancas 
+#'     Brancas
 #' @description Dados provenientes de um estudo em que pacientes com
 #'     leucemia foram classificados segundo a ausência ou presença de
 #'     uma característica morfológica nas células brancas. O objetivo do
@@ -1428,16 +1428,16 @@ NULL
 #'     tempo de sobrevivência dos pacientes.
 #' @format Um \code{data.frame} com 32 observações e 3 variáveis.
 #' \describe{
-#' 
+#'
 #' \item{\code{ncel}}{Número de células brancas
 #'     na amostra do paciente.}
-#' 
+#'
 #' \item{\code{carac}}{Fator com dois níveis que representa a presença
 #'     (\code{AG positivo}) ou ausência (\code{AG negativo}) da
 #'     característica morfológica.}
-#' 
+#'
 #' \item{\code{tempo}}{Tempo de sobrevivência do paciente, em semanas.}
-#' 
+#'
 #' }
 #' @keywords positivo-assimétrico
 #' @source Paula, G. A. (2004). Modelos de regressão: com apoio
@@ -1450,9 +1450,9 @@ NULL
 #'
 #' @examples
 #' data(PaulaEx2.10.19)
-#' 
+#'
 #' str(PaulaEx2.10.19)
-#' 
+#'
 #' library(latticeExtra)
 #' xyplot(tempo ~ ncel,
 #'        groups = carac,
@@ -1482,31 +1482,31 @@ NULL
 #'     informações do veículo e do principal condutor).
 #' @format Um \code{data.frame} com 996 observações e 9 variáveis.
 #'     \describe{
-#' 
+#'
 #' \item{\code{valorv}}{Valor do veículo, em dez mil dólares
 #'     australianos.}
-#' 
+#'
 #' \item{\code{expos}}{Exposição do veículo (unidade de medida não
 #'     informada).}
-#' 
+#'
 #' \item{\code{tipov}}{Tipo de veículo (fator com onze níveis).}
-#' 
+#'
 #' \item{\code{idadev}}{Idade do veículo (fator com quatro níveis).}
-#' 
+#'
 #' \item{\code{sexoc}}{Sexo do principal condutor, fator com dois níveis
 #'     \code{M} masculino e \code{F} feminino.}
-#' 
+#'
 #' \item{\code{areac}}{Área de residência do principal condutor (fator
 #'     com seis níveis).}
-#' 
+#'
 #' \item{\code{idadec}}{Idade do principal condutor (fator com seis
 #'     níveis).}
-#' 
+#'
 #' \item{\code{nsinis}}{Número de sinistros no período.}
-#' 
+#'
 #' \item{\code{csinis}}{Custo total dos sinistros, em dólares
 #'     australianos.}
-#' 
+#'
 #' }
 #' @keywords positivo-assimétrico quase-verossimilhança
 #' @source Paula, G. A. (2004). Modelos de regressão: com apoio
@@ -1519,20 +1519,20 @@ NULL
 #'
 #' @examples
 #' data(PaulaEx2.10.20)
-#' 
+#'
 #' str(PaulaEx2.10.20)
-#' 
+#'
 #' # Variável de interesse - custo médio de um sinistro
 #' PaulaEx2.10.20$cmsinis <- with(PaulaEx2.10.20, csinis/nsinis)
 #' PaulaEx2.10.20 <- PaulaEx2.10.20[, -c(8:9)]
-#' 
+#'
 #' # Separando as covariáveis numéricas
 #' index <- sapply(PaulaEx2.10.20, is.numeric)
-#' 
+#'
 #' # Frequências dos níveis das variáveis categóricas
 #' par(mfrow = c(2, 3), las = 2, mar = c(4, 3, 3, 1))
 #' sapply(PaulaEx2.10.20[, !index], function(x) plot(table(x)))
-#' 
+#'
 #' # Dispersão das variáveis numéricas
 #' library(lattice)
 #' splom(PaulaEx2.10.20[, index],
@@ -1550,18 +1550,18 @@ NULL
 #'     e temperatura.)
 #' @format Um \code{data.frame} com 32 observações e 3 variáveis.
 #'     \describe{
-#' 
+#'
 #' \item{\code{tempo}}{Tempo de resistência do vidro, mensurado em
 #'      horas.}
-#' 
+#'
 #' \item{\code{volt}}{Fator com quatro níveis de voltagem considerados,
 #'     valores em quilovolts (kV).}
-#' 
+#'
 #' \item{\code{temp}}{Fator com dois níveis de temperatura considerados,
 #'     valores em graus Celsius.}
-#' 
+#'
 #' }
-#' @keywords positivos-assimétricos
+#' @keywords positivo-assimétrico
 #' @source Paula, G. A. (2004). Modelos de regressão: com apoio
 #'     computacional. São Paulo, SP: IME-USP. (Exercício 2.10.7,
 #'     pág. 175)
@@ -1571,13 +1571,13 @@ NULL
 #'
 #' @examples
 #' data(PaulaEx2.10.7)
-#' 
+#'
 #' str(PaulaEx2.10.7)
-#' 
+#'
 #' library(lattice)
 #' xyplot(tempo ~ volt,
 #'        groups = temp,
-#'        data = PaulaEx2.10.7, 
+#'        data = PaulaEx2.10.7,
 #'        type = c("p", "g", "a"),
 #'        auto.key = list(
 #'            corner = c(0.9, 0.9),
@@ -1585,7 +1585,7 @@ NULL
 #'            cex.title = 1,
 #'            title = "Temperatura"
 #'            ))
-#' 
+#'
 #' resumo <- aggregate(tempo ~ temp + volt,
 #'                     data = PaulaEx2.10.7,
 #'                     FUN = function(x) {
@@ -1595,7 +1595,7 @@ NULL
 #'                           "n" = length(x))
 #'                     })
 #' ftable(xtabs(tempo ~ temp + volt, data = resumo))
-#' 
+#'
 #' trat <- with(resumo, paste(temp, volt, sep = "-"))
 #' xyplot(tempo[, "C.Variação"] ~ factor(trat),
 #'        data = resumo,
@@ -1613,43 +1613,43 @@ NULL
 #' @title Confiabilidade de equipamentos
 #'
 #' @description Dados referentes aos tempos de falhas de equipamentos.
-#' 
+#'
 #' @format Um \code{data.frame} com 4 variáveis.
-#' 
+#'
 #' \describe{
 #'
 #' \item{\code{temp}}{Tempo de operação (1 a 5).}
-#' 
+#'
 #' \item{\code{equip}}{Tipo de equipamento (A, B ou C).}
-#' 
+#'
 #' \item{\code{nit}}{Número de equipamentos que não falharam até o tempo t,
 #' t = 1,2,3,4,5.}
 #'
 #' \item{\code{yit}}{Número de falhas no intervalo entre os tempos t-1 e t.}
 #'
 #' }
-#' @keywords RLAS
+#' @keywords sobrevivencia
 #' @source Paula, G. A. (2004). Modelos de regressão: com apoio
-#'     computacional. São Paulo, SP: IME-USP. 
+#'     computacional. São Paulo, SP: IME-USP.
 #'     (Exercício 3.7.14, página 272)
-#'     
-#' @references Lawless, J. F. (1982). Statistical Models and Methods for 
+#'
+#' @references Lawless, J. F. (1982). Statistical Models and Methods for
 #'     Lifetime Data. John Wiley & Sons, New York. (Página 389)
-#' 
-#' @references Efron, B. (1988). Logistic regression, survival analysis, 
+#'
+#' @references Efron, B. (1988). Logistic regression, survival analysis,
 #'     and the Kaplan-Meier curve. J. Amer. Stat. Assoc., 83.
 #'     (Páginas 414-425)
-#' 
+#'
 #' @examples
-#' 
+#'
 #' require(lattice)
-#' 
+#'
 #' data(PaulaEx3.7.14)
-#' 
+#'
 #' PaulaEx3.7.14$temp <- as.factor(PaulaEx3.7.14$temp)
-#' 
-#' xyplot(nit~temp, groups = equip, data = PaulaEx3.7.14, type = "o", 
-#'        auto.key = TRUE, xlab = "Tempos", 
+#'
+#' xyplot(nit~temp, groups = equip, data = PaulaEx3.7.14, type = "o",
+#'        auto.key = TRUE, xlab = "Tempos",
 #'        ylab = "N° de equipamentos operantes",
 #'        main = "Confiabilidade dos equipamentos")
 NULL
@@ -1660,73 +1660,73 @@ NULL
 #' @description Estudo de caso-controle com emparelhamentos do tipo 1:1,
 #' em que os casos foram mulheres com diagnóstico confirmado de tumor
 #' benigno na mama. Os controles foram mulheres sadias diagnosticadas no
-#' mesmo hospital e período dos casos. 
-#' 
+#' mesmo hospital e período dos casos.
+#'
 #' @format Um \code{data.frame} com 100 observações e 14 variáveis.
 #'
 #' \describe{
 #'
 #' \item{\code{est}}{Identificação do estrato (par).}
-#' 
+#'
 #' \item{\code{obs}}{Observação (1 = caso, 2 = controle).}
-#' 
+#'
 #' \item{\code{idade}}{Idade do paciente no momento da entrevista (em anos).}
 #'
 #' \item{\code{diag}}{Diagnóstico (1:caso, 0:controle).}
-#' 
+#'
 #' \item{\code{tesc}}{Tempo de escolaridade (em anos).}
 #'
-#' \item{\code{gesc}}{Grau de escolaridade (0 = nenhum, 1 = segundo grau, 
+#' \item{\code{gesc}}{Grau de escolaridade (0 = nenhum, 1 = segundo grau,
 #' 2 = técnico, 3 = universitário, 4 = mestrado, 5 = doutorado).}
-#' 
+#'
 #' \item{\code{cur}}{Checkup Regular (1 = sim, 2 = não).}
-#' 
+#'
 #' \item{\code{ipg}}{Idade da primeira gravidez.}
-#' 
+#'
 #' \item{\code{iim}}{Idade do início da menstruação.}
-#' 
+#'
 #' \item{\code{numab}}{Número de abortos}
-#' 
+#'
 #' \item{\code{numfi}}{Número de filhos.}
-#' 
+#'
 #' \item{\code{peso}}{Peso (em libras).}
-#' 
+#'
 #' \item{\code{iupmen}}{Idade do último período menstrual.}
-#' 
-#' \item{\code{ec}}{Estado civil (1 = casada, 2 = divorciada, 3 = separada, 
+#'
+#' \item{\code{ec}}{Estado civil (1 = casada, 2 = divorciada, 3 = separada,
 #' 4 = viúva, 5 = solteira).}
-#' 
+#'
 #' }
-#' 
+#'
 #' @keywords RL
 #' @source Paula, G. A. (2004). Modelos de regressão: com apoio
 #'     computacional. São Paulo, SP: IME-USP. (Exercício 3.7.14, pág. 273)
-#'     
-#'     
-#' @references Hosmer, D. W. e Lemeshow, S. (1989). 
+#'
+#'
+#' @references Hosmer, D. W. e Lemeshow, S. (1989).
 #' Applied Logistic Regression. John Wiley, New York. (Capítulo.7)
-#' 
+#'
 #' @examples
 #'
 #' data(PaulaEx3.7.15)
-#' 
+#'
 #' # Transformar variáveis
-#' 
+#'
 #' str(PaulaEx3.7.15)
-#' 
+#'
 #' PaulaEx3.7.15 <- transform(
-#'                  PaulaEx3.7.15, 
+#'                  PaulaEx3.7.15,
 #'                  PaulaEx3.7.15$est <- as.factor(PaulaEx3.7.15$est),
 #'                  PaulaEx3.7.15$diag <- as.factor(PaulaEx3.7.15$diag),
 #'                  PaulaEx3.7.15$cur <- as.factor(PaulaEx3.7.15$cur),
 #'                  PaulaEx3.7.15$ec <- as.factor(PaulaEx3.7.15$ec)
 #'                   )
 #' # Libra para Kg
-#' PaulaEx3.7.15$peso <- PaulaEx3.7.15$peso*0.453592 
-#' 
-#' pairs(~ idade + diag + tesc + gesc + cur + ipg + idmens 
+#' PaulaEx3.7.15$peso <- PaulaEx3.7.15$peso*0.453592
+#'
+#' pairs(~ idade + diag + tesc + gesc + cur + ipg + idmens
 #'       + numab + numfi + peso + idupmens + ec,
-#'       data = PaulaEx3.7.15, 
+#'       data = PaulaEx3.7.15,
 #'       main = "Matriz de gráficos de dispersão - tumor benigno na mama")
 NULL
 
@@ -1738,36 +1738,36 @@ NULL
 #' deguelin e mistura, essa última como uma mistura das duas pri-
 #' meiras) é investigada. As concentrações foram testadas em insetos e
 #' observado, para cada dose, o número de insetos mortos.
-#' 
-#' @format Um \code{data.frame} com 4 variáveis. 
+#'
+#' @format Um \code{data.frame} com 4 variáveis.
 #'
 #' \describe{
 #'
-#' \item{\code{conc}}{Concentração (R = rotenine, 
+#' \item{\code{conc}}{Concentração (R = rotenine,
 #' D = deguelin e M = mistura).}
-#' 
+#'
 #' \item{\code{dose}}{Dose aplicada da concentração.}
-#' 
+#'
 #' \item{\code{exp}}{Número de insetos expostos.}
 #'
 #' \item{\code{mort}}{Número de insetos mortos.}
-#' 
+#'
 #' }
-#' 
+#'
 #' @keywords binomial
 #' @source Paula, G. A. (2004). Modelos de regressão: com apoio
-#'     computacional. São Paulo, SP: IME-USP. 
+#'     computacional. São Paulo, SP: IME-USP.
 #'     (Exercício 3.7.14, pág. 274 e 275)
-#'     
-#' @references Morgan, B. J. T. (1992). Analysis of Quantal Response Data. 
+#'
+#' @references Morgan, B. J. T. (1992). Analysis of Quantal Response Data.
 #' Chapman and Hall, London. (Página 90)
-#' 
+#'
 #' @examples
-#' 
+#'
 #' data(PaulaEx3.7.16)
-#' 
+#'
 #' require(lattice)
-#' 
+#'
 #' xyplot(mort/exp ~ dose, groups = conc, data = PaulaEx3.7.16, type = 'o',
 #' auto.key = TRUE, ylab = "Proporção de insetos mortos",
 #' xlab = "Dose", main = "Sobrevivência dos insetos expostos a toxina")
@@ -1776,54 +1776,54 @@ NULL
 #' @name PaulaEx3.7.19
 #' @title Gestantes fumantes
 #'
-#' @description Estudo com gestantes fumantes, no qual as participantes   
-#' foram classificadas segundo os fatores de idade, número de cigarros  
+#' @description Estudo com gestantes fumantes, no qual as participantes
+#' foram classificadas segundo os fatores de idade, número de cigarros
 #' consumidos, tempo de gestação, e a condição (sobrevivência) da criança.
-#' 
+#'
 #' @format Um \code{data.frame} com 5 variáveis.
 #'
 #' \describe{
 #'
 #' \item{\code{idade}}{Idade (<30 anos ou +30).}
-#' 
-#' \item{\code{ncigar}}{Número de cigarros consumidos por dia 
+#'
+#' \item{\code{ncigar}}{Número de cigarros consumidos por dia
 #' (< 5 ou +5).}
-#' 
+#'
 #' \item{\code{tgest}}{Tempo de gestação (<= 260 dias ou >260).}
 #'
 #' \item{\code{sobres}}{Número de crianças que sobreviveram.}
-#' 
+#'
 #' \item{\code{sobren}}{Número de crianças que não sobreviveram.}
-#' 
+#'
 #' }
-#' 
+#'
 #' @keywords ML
 #' @source Paula, G. A. (2004). Modelos de regressão: com apoio
-#'     computacional. São Paulo, SP: IME-USP. 
+#'     computacional. São Paulo, SP: IME-USP.
 #'     (Exercício 3.7.19, página 276)
-#'     
-#'     
-#' @references Agresti A. (1990). Categorical Data Analysis. John Wiley, 
+#'
+#'
+#' @references Agresti A. (1990). Categorical Data Analysis. John Wiley,
 #' New York. (página 253))
-#' 
+#'
 #' @examples
 #'
 #' data(PaulaEx3.7.19)
-#' 
+#'
 #' require(vcd)
-#' 
-#' # Paciente que sobreviveram 
+#'
+#' # Paciente que sobreviveram
 #' ss <- xtabs(sobres ~ idade + ncigar + tgest, PaulaEx3.7.19)
-#' 
+#'
 #' # Paciente que não sobreviveram
 #' ns <- xtabs(sobren ~ idade + ncigar + tgest, PaulaEx3.7.19)
-#' 
+#'
 #' mosaic(ss,
 #'        main = "Crianças que sobreviveram",
 #'        labeling_args = list(
 #'          set_varnames = c(ncigar = "Número de cigarros",
 #'                           tgest = "Tempo de gestação")))
-#' 
+#'
 #' mosaic(ns,
 #'        main = "Crianças que não sobreviveram",
 #'        labeling_args = list(
@@ -1834,67 +1834,67 @@ NULL
 #' @name PaulaEx3.7.20
 #' @title Pacientes com leucemia
 #'
-#' @description Estudo com 51 pacientes adultos, 
-#' previamente diagnosticados com um tipo agudo de leucemia, que 
-#' receberam um tipo de tratamento sendo verificada, após  certo 
+#' @description Estudo com 51 pacientes adultos,
+#' previamente diagnosticados com um tipo agudo de leucemia, que
+#' receberam um tipo de tratamento sendo verificada, após  certo
 #' período, a eficiência ou não do tratamento.
-#' 
-#' @format Um \code{data.frame} com 51 pacientes e 
+#'
+#' @format Um \code{data.frame} com 51 pacientes e
 #'
 #' \describe{
 #'
 #' \item{\code{idade}}{Idade do paciente (em anos).}
 #'
-#' \item{\code{mdd}}{Mancha diferencial da doença (em porcentagem).} 
-#' 
+#' \item{\code{mdd}}{Mancha diferencial da doença (em porcentagem).}
+#'
 #' \item{\code{if}}{Infiltração na medula (em porcentagem).}
 #'
 #' \item{\code{cl}}{Células com leucemia (em porcentagem).}
-#' 
+#'
 #' \item{\code{md}}{Malignidade da doença (*10^3).}
-#' 
+#'
 #' \item{\code{tmax}}{Temperatura máxima antes do tratamento (*10 F°).}
-#' 
+#'
 #' \item{\code{trat}}{Tratamento (1 = satisfatório, 0 = não satisfatório).}
-#' 
-#' \item{\code{tsobre}}{Tempo de sobrevivência  (em meses).} 
 #'
-#' \item{\code{sit}}{Situação (1 = sobrevivente, 0 = não sobrevivente).} 
+#' \item{\code{tsobre}}{Tempo de sobrevivência  (em meses).}
+#'
+#' \item{\code{sit}}{Situação (1 = sobrevivente, 0 = não sobrevivente).}
 #' }
-#' 
+#'
 #' @keywords ML
 #' @source Paula, G. A. (2004). Modelos de regressão: com apoio
-#'     computacional. São Paulo, SP: IME-USP. 
+#'     computacional. São Paulo, SP: IME-USP.
 #'     (Exercício 3.7.19, página 276)
-#'     
-#' @references Everitt, B. S. (1994). 
-#' A Handbook of Statistical Analysis using S-Plus. 
+#'
+#' @references Everitt, B. S. (1994).
+#' A Handbook of Statistical Analysis using S-Plus.
 #' Chapman and Hall, London. (Página 253)
-#' 
+#'
 #' @examples
 #'
 #' data(PaulaEx3.7.20)
-#' 
+#'
 #' # Transformar variáveis
-#' 
+#'
 #' str(PaulaEx3.7.20)
-#' 
+#'
 #' PaulaEx3.7.20 <- transform(
 #'                  PaulaEx3.7.20,
 #'                  PaulaEx3.7.20$trat <- as.factor(PaulaEx3.7.20$trat),
 #'                  PaulaEx3.7.20$sit <- as.factor(PaulaEx3.7.20$sit)
 #'                  )
-#' 
-#' 
+#'
+#'
 #' require(car)
-#' 
-#' scatterplotMatrix(~ idade + mdd + im + cl + md + tmax + trat 
+#'
+#' scatterplotMatrix(~ idade + mdd + im + cl + md + tmax + trat
 #'                   + tsobre + sit,
-#'                   spread = FALSE, 
-#'                   pch = 20, 
+#'                   spread = FALSE,
+#'                   pch = 20,
 #'                   lwd = 2,
-#'                  smooth = TRUE, 
-#'                   data = PaulaEx3.7.20, 
+#'                  smooth = TRUE,
+#'                   data = PaulaEx3.7.20,
 #'                   cex = 1.5,
 #'                   main = "Matriz de gráficos de dispersão - Leucemia")
 NULL
@@ -2128,20 +2128,20 @@ NULL
 
 #' @name PaulaEx3.7.7a
 #' @title Influ\enc{ê}{e}ncia de Extrato Vegetal e Qu\enc{í}{i}mico
-#' @description Experimento de dose-resposta conduzido para avaliar a 
+#' @description Experimento de dose-resposta conduzido para avaliar a
 #'     influência dos extratos vegetais "aquoso frio de folhas", "aquoso
-#'     frio de frutos" e de um extrato químico, respectivamente, na morte 
-#'     de um determinado tipo de caramujo. 
-#'      
+#'     frio de frutos" e de um extrato químico, respectivamente, na morte
+#'     de um determinado tipo de caramujo.
+#'
 #' @format Um \code{data.frame} com 7 observações e 3 variáveis.
 #' \describe{
-#' 
+#'
 #' \item{\code{dose}}{Dose.}
-#' 
+#'
 #' \item{\code{cexp}}{Caramujos expostos.}
-#' 
+#'
 #' \item{\code{cmort}}{Caramujos mortos.}
-#' 
+#'
 #' }
 #' @keywords MLG
 #' @source Paula, G. A. (2004). Modelos de regressão: com apoio
@@ -2150,17 +2150,17 @@ NULL
 #' @examples
 #'
 #' data(PaulaEx3.7.7a)
-#' 
+#'
 #' str(PaulaEx3.7.7a)
-#' 
+#'
 #' library(lattice)
-#' 
+#'
 #' xyplot(PaulaEx3.7.7a$cmort/PaulaEx3.7.7a$cexp ~ dose,
 #' data = PaulaEx3.7.7a,
 #' xlab = "Dose",
 #' type = c("o"),
 #' ylab = "Proporção de mortos",
-#' auto.key = list(space="top", columns=2, 
+#' auto.key = list(space="top", columns=2,
 #'                 title="Caramujos", cex.title=1,
 #'                 lines=TRUE, points=FALSE))
 #'
@@ -2168,20 +2168,20 @@ NULL
 
 #' @name PaulaEx3.7.7b
 #' @title Influ\enc{ê}{e}ncia de Extrato Vegetal e Qu\enc{í}{i}mico
-#' @description Experimento de dose-resposta conduzido para avaliar a 
+#' @description Experimento de dose-resposta conduzido para avaliar a
 #'     influência dos extratos vegetais "aquoso frio de folhas", "aquoso
-#'     frio de frutos" e de um extrato químico, respectivamente, na morte 
-#'     de um determinado tipo de caramujo. 
-#'      
+#'     frio de frutos" e de um extrato químico, respectivamente, na morte
+#'     de um determinado tipo de caramujo.
+#'
 #' @format Um \code{data.frame} com 7 observações e 3 variáveis.
 #' \describe{
-#' 
+#'
 #' \item{\code{dose}}{Dose.}
-#' 
+#'
 #' \item{\code{cexp}}{Caramujos expostos.}
-#' 
+#'
 #' \item{\code{cmort}}{Caramujos mortos.}
-#' 
+#'
 #' }
 #' @keywords MLG
 #' @source Paula, G. A. (2004). Modelos de regressão: com apoio
@@ -2190,17 +2190,17 @@ NULL
 #' @examples
 #'
 #' data(PaulaEx3.7.7b)
-#' 
+#'
 #' str(PaulaEx3.7.7b)
-#' 
+#'
 #' library(lattice)
-#'                        
+#'
 #' xyplot(PaulaEx3.7.7b$cmort/PaulaEx3.7.7b$cexp ~ dose,
 #'      data = PaulaEx3.7.7b,
 #'      xlab = "Dose",
 #'      type = c("o"),
 #'      ylab = "Proporção de mortos",
-#'      auto.key = list(space="top", columns=2, 
+#'      auto.key = list(space="top", columns=2,
 #'                      title="Caramujos", cex.title=1,
 #'                      lines=TRUE, points=FALSE))
 #'
@@ -2209,20 +2209,20 @@ NULL
 
 #' @name PaulaEx3.7.7c
 #' @title Influ\enc{ê}{e}ncia de Extrato Vegetal e Qu\enc{í}{i}mico
-#' @description Experimento de dose-resposta conduzido para avaliar a 
+#' @description Experimento de dose-resposta conduzido para avaliar a
 #'     influência dos extratos vegetais "aquoso frio de folhas", "aquoso
-#'     frio de frutos" e de um extrato químico, respectivamente, na morte 
-#'     de um determinado tipo de caramujo. 
-#'      
+#'     frio de frutos" e de um extrato químico, respectivamente, na morte
+#'     de um determinado tipo de caramujo.
+#'
 #' @format Um \code{data.frame} com 7 observações e 3 variáveis.
 #' \describe{
-#' 
+#'
 #' \item{\code{dose}}{Dose.}
-#' 
+#'
 #' \item{\code{cexp}}{Caramujos expostos.}
-#' 
+#'
 #' \item{\code{cmort}}{Caramujos mortos.}
-#' 
+#'
 #' }
 #' @keywords MLG
 #' @source Paula, G. A. (2004). Modelos de regressão: com apoio
@@ -2231,43 +2231,43 @@ NULL
 #' @examples
 #'
 #' data(PaulaEx3.7.7c)
-#' 
+#'
 #' str(PaulaEx3.7.7c)
-#' 
+#'
 #' library(lattice)
-#' 
+#'
 #' xyplot(PaulaEx3.7.7c$cmort/PaulaEx3.7.7c$cexp ~ dose,
 #'      data = PaulaEx3.7.7c,
 #'      xlab = "Dose",
 #'      type = c("o"),
 #'      ylab = "Proporção de mortos",
-#'      auto.key = list(space="top", columns=2, 
+#'      auto.key = list(space="top", columns=2,
 #'                   title="Caramujos", cex.title=1,
 #'                   lines=TRUE, points=FALSE))
 #'
-#' 
+#'
 #'
 NULL
 
 #' @name PaulaEx3.7.8
 #' @title Sal\enc{á}{a}rio de Executivos
 #' @description Dados referentes a um experimento desenvolvido para avaliar
-#'      a germinação de um determinado tipo de semente. A tabela abaixo 
-#'      apresenta o número de sementes que germinaram após cinco dias para 
+#'      a germinação de um determinado tipo de semente. A tabela abaixo
+#'      apresenta o número de sementes que germinaram após cinco dias para
 #'      cada 100 sementes submetidas a cada condição experimental.
-#'      
+#'
 #' @format Um \code{data.frame} com 18 observações e 4 variáveis.
 #' \describe{
-#' 
+#'
 #' \item{\code{temp}}{Temperatura da germinação.}
-#' 
+#'
 #' \item{\code{numid}}{Nível da umidade.}
-#' 
+#'
 #' \item{\code{ntemp}}{Nível da temperatura.}
-#' 
+#'
 #' \item{\code{sgerm}}{Número de sementes que germinaram.}
-#' 
-#' 
+#'
+#'
 #' }
 #' @keywords MLG
 #' @source Paula, G. A. (2004). Modelos de regressão: com apoio
@@ -2276,13 +2276,13 @@ NULL
 #' @examples
 #'
 #' data(PaulaEx3.7.8)
-#' 
+#'
 #' str(PaulaEx3.7.8)
-#' 
+#'
 #' library(lattice)
-#' 
+#'
 #' PaulaEx3.7.8$ntemp <- as.factor(PaulaEx3.7.8$ntemp)
-#' 
+#'
 #' PaulaEx3.7.8$numid <- as.factor(PaulaEx3.7.8$numid)
 #' xyplot(sgerm ~ numid | ntemp,
 #'        data = PaulaEx3.7.8,
@@ -2295,27 +2295,27 @@ NULL
 #' @title N\enc{ú}{u}mero de Infec\enc{çõ}{co}es de Ouvido em Recrutas Americanos
 #' @description Dados referentes a um estudo realizado em 1990 com
 #'     recrutas americanos em que a variável de interesse era o número de
-#'     infecções de ouvido. Além disso, foram coletadas as seguintes 
-#'     informações sobre os recrutas: hábito de nadar, local em que 
+#'     infecções de ouvido. Além disso, foram coletadas as seguintes
+#'     informações sobre os recrutas: hábito de nadar, local em que
 #'     costuma nadar, idade e sexo.
-#'     
+#'
 #' @format Um \code{data.frame} com 287 observações e 5 variáveis.
 #'     \describe{
-#' 
+#'
 #' \item{\code{habito}}{Fator com dois níveis que indica o hábito em
 #'     nadar do recruta (\code{ocasional} ou \code{frequente}).}
-#' 
+#'
 #' \item{\code{local}}{Fator com dois níveis que indica o local onde o
 #'     recruta costuma nadar, (\code{praia} ou \code{piscina}).}
-#' 
+#'
 #' \item{\code{idade}}{Idade do recruta, em anos categorizados em três
 #'     níveis (\code{15-19}, \code{20-24} e \code{25-29}).}
-#' 
+#'
 #' \item{\code{sexo}}{Sexo (\code{F} para feminino e \code{M} para masculino).}
-#' 
+#'
 #' \item{\code{ninfec}}{Número de infecções de ouvido diagnosticadas
 #'     pelo próprio recruta.}
-#' 
+#'
 #' }
 #' @keywords contagem superdispersão
 #' @source Paula, G. A. (2004). Modelos de regressão: com apoio
@@ -2328,18 +2328,18 @@ NULL
 #' @examples
 #'
 #' data(PaulaEx4.6.15)
-#' 
+#'
 #' str(PaulaEx4.6.15)
-#' 
+#'
 #' xt <- xtabs(ninfec ~ ., data = PaulaEx4.6.15)
 #' ftable(prop.table(xt))
 #' plot(xt, xlab = "Hábito", main = "")
-#' 
+#'
 #' mv <- aggregate(ninfec ~ ., FUN = function(x)
 #'     c(mu = mean(x), var = var(x)), data = PaulaEx4.6.15)
-#' 
+#'
 #' library(lattice)
-#' 
+#'
 #' # Relação Média Variância
 #' xyplot(ninfec[, "var"] ~ ninfec[, "mu"],
 #'         data = mv,
@@ -2349,9 +2349,9 @@ NULL
 #'             panel.xyplot(x, y, type = c("p", "r"), grid = TRUE)
 #'             panel.abline(a = 0, b = 1, lty = 2)
 #'         })
-#' 
+#'
 #' library(latticeExtra)
-#' useOuterStrips(    
+#' useOuterStrips(
 #'     xyplot(ninfec ~ idade | habito + local,
 #'            groups = sexo,
 #'            data = PaulaEx4.6.15,
@@ -2373,22 +2373,22 @@ NULL
 #'     preferência e maciez da água.
 #' @format Um \code{data.frame} com 24 observações e 5 variáveis.
 #'     \describe{
-#' 
+#'
 #' \item{\code{temp}}{Temperatura da água, mensurada em dois níveis
 #'     (\code{alta} e \code{baixa}).}
-#' 
+#'
 #' \item{\code{usom}}{Uso anterior do detergente da marca \code{M}
 #'     (\code{sim} ou \code{não}).}
-#' 
+#'
 #' \item{\code{prefer}}{Detergente de preferência (\code{M} ou
 #'     \code{X}).}
-#' 
+#'
 #' \item{\code{maciez}}{Maciez da água, mensurada em três níveis
 #'     (\code{forte}, code{leve} e \code{média}).}
-#' 
+#'
 #' \item{\code{nind}}{Número de pessoas que tiveram respostas conforme
 #'     combinação de \code{temp}, \code{usom}, \code{prefer} e \code{maciez}.}
-#' 
+#'
 #' }
 #' @keywords contagem
 #' @source Paula, G. A. (2004). Modelos de regressão: com apoio
@@ -2401,15 +2401,15 @@ NULL
 #' @examples
 #'
 #' data(PaulaEx4.6.17)
-#' 
+#'
 #' str(PaulaEx4.6.17)
-#' 
+#'
 #' xt <- xtabs(nind ~ ., data = PaulaEx4.6.17)
 #' ftable(xt)
 #' plot(xt)
-#' 
+#'
 #' library(latticeExtra)
-#' useOuterStrips(    
+#' useOuterStrips(
 #'     xyplot(nind ~ maciez | prefer + usom,
 #'            groups = temp,
 #'            data = PaulaEx4.6.17,
@@ -2432,11 +2432,11 @@ NULL
 #'     de ovos eclodidos.
 #' @format Um \code{data.frame} com 50 observações e 2 variáveis.
 #'     \describe{
-#' 
+#'
 #' \item{\code{dose}}{Dosagem de \emph{Nitrofen} aplicada, em mg/l.}
-#' 
+#'
 #' \item{\code{novos}}{Número de ovos de \emph{Ceriodaphnia dubia}
-#'     eclodidos após 3 ninhadas.} 
+#'     eclodidos após 3 ninhadas.}
 #'
 #' }
 #'
@@ -2454,12 +2454,12 @@ NULL
 #' @examples
 #'
 #' data(PaulaEx4.6.20)
-#' 
+#'
 #' str(PaulaEx4.6.20)
-#' 
+#'
 #' aggregate(novos ~ dose, FUN = function(x) c(mean(x), var(x)),
 #'           data = PaulaEx4.6.20)
-#' 
+#'
 #' library(lattice)
 #' xyplot(novos ~ dose,
 #'        data = PaulaEx4.6.20,
@@ -2478,23 +2478,23 @@ NULL
 #'     realizada, sexo e escores de balanço e força. O objetivo do
 #'     estudo é relacionar o número médio de quedas com o tipo de intervenção
 #'     e as demais variáveis explicativas coletadas.
-#'     
+#'
 #' @format Um \code{data.frame} com 100 observações e 5 variáveis.
 #'     \describe{
-#' 
+#'
 #' \item{\code{nquedas}}{Número de quedas no período de seis meses.}
-#' 
+#'
 #' \item{\code{interv}}{Fator com dois níveis que indica a intervenção
 #'     realizada (\code{E}: somente educação, \code{EF}: educação e
 #'     exercícios físicos.)}
-#' 
+#'
 #' \item{\code{sexo}}{Fator com dois níveis que indica o sexo do
 #'     indivíduo (\code{F}: feminino e \code{M}: masculino).}
-#' 
+#'
 #' \item{\code{balan}}{Escore do balanço do indivíduo, escala de 0 a 100.}
-#' 
+#'
 #' \item{\code{forca}}{Escore da força do indivíduo, escala de 0 a 100.}
-#' 
+#'
 #' }
 #' @keywords contagem
 #' @source Paula, G. A. (2004). Modelos de regressão: com apoio
@@ -2506,11 +2506,11 @@ NULL
 #' @examples
 #'
 #' data(PaulaEx4.6.5)
-#' 
+#'
 #' str(PaulaEx4.6.5)
-#' 
+#'
 #' library(lattice)
-#' 
+#'
 #' xyplot(nquedas ~ balan + forca | interv,
 #'        groups = sexo,
 #'        data = PaulaEx4.6.5,
@@ -2520,7 +2520,7 @@ NULL
 #'        scales = list(x = list(rot = 45, relation = "free")),
 #'        auto.key = list(cex.title = 1, columns = 2,
 #'                        title = "Sexo"))
-#' 
+#'
 #' splom(~ PaulaEx4.6.5[, c("nquedas", "balan", "forca")],
 #'       type = c("p", "smooth"))
 #'
@@ -2537,24 +2537,24 @@ NULL
 #'     desde o primeiro emprego.
 #' @format Um \code{data.frame} com 72 observações e 5 variáveis.
 #'     \describe{
-#' 
+#'
 #' \item{\code{idade}}{Fator com quatro níveis referente à idade (em anos)
 #'     do trabalhador no seu primeiro emprego, com níveis
 #'     \code{<20}, \code{20-27}, \code{27.5-34.9} e \code{>35}.}
-#' 
+#'
 #' \item{\code{ano}}{Fator com quatro níveis referente ao ano do
 #'     primeiro emprego (\code{<1910}, \code{1910-1914},
 #'     \code{1915-1919} e \code{1920-1924}).}
-#' 
+#'
 #' \item{\code{tempo}}{Fator com cinco níveis que indica o tempo
 #'     decorrido desde o primeiro emprego, em anos, categorizados nos
 #'     níveis \code{0-19}, \code{20-39}, \code{30-39}, \code{40-49} e
 #'     \code{>50}.}
-#' 
+#'
 #' \item{\code{ncasos}}{Número de casos de câncer nasal.}
-#' 
+#'
 #' \item{\code{tpessoas}}{Total de pessoas|ano de observação.}
-#' 
+#'
 #' }
 #' @keywords contagem
 #' @source Paula, G. A. (2004). Modelos de regressão: com apoio
@@ -2566,28 +2566,28 @@ NULL
 #' @examples
 #'
 #' data(PaulaEx4.6.6)
-#' 
+#'
 #' str(PaulaEx4.6.6)
-#' 
+#'
 #' # Número de observações em cada combinação das variáveis explicativas
 #' # Para modelagem não será possível a estimação de algumas interações
 #' ftable(PaulaEx4.6.6[, c("idade", "ano", "tempo")])
-#' 
+#'
 #' # Casos de câncer seccionados pelas variáveis explicativas
 #' ftable(xtabs(ncasos ~ idade + ano + tempo, data = PaulaEx4.6.6))
 #' xt <- xtabs((ncasos/tpessoas)*100 ~ ., data = PaulaEx4.6.6)
 #' ftable(xt)
 #' plot(xt)
-#' 
+#'
 #' library(lattice)
-#' 
+#'
 #' xyplot((ncasos/tpessoas) ~ tempo | ano,
 #'        groups = idade,
 #'        data = PaulaEx4.6.6,
 #'        type = c("p", "g", "a"),
 #'        auto.key = list(space = "right", cex.title = 1,
 #'                        title = "Idade"))
-#' 
+#'
 #' # Retirando a observação que domina a escala do eixo y
 #' index <- with(PaulaEx4.6.6, which.max(ncasos/tpessoas))
 #' xyplot((ncasos/tpessoas) ~ tempo | ano,
@@ -2606,11 +2606,11 @@ NULL
 #'     produzida e o número de falhas encontradas.
 #' @format Um \code{data.frame} com 32 observações e 2 variáveis.
 #' \describe{
-#' 
+#'
 #' \item{\code{comp}}{Comprimento da peça de tecido produzida, em metros.}
-#' 
+#'
 #' \item{\code{nfalhas}}{Número de falhas encontradas na peça.}
-#' 
+#'
 #' }
 #' @keywords contagem superdispersão
 #' @source Paula, G. A. (2004). Modelos de regressão: com apoio
@@ -2621,52 +2621,52 @@ NULL
 #' @examples
 #'
 #' data(PaulaEx4.6.7)
-#' 
+#'
 #' str(PaulaEx4.6.7)
 #'
 #' library(lattice)
 #' xyplot(nfalhas ~ comp, data = PaulaEx4.6.7,
-#'        type = c("p", "g", "smooth"), xlab = "Comprimento", ylab = 
+#'        type = c("p", "g", "smooth"), xlab = "Comprimento", ylab =
 #'        "Número de falhas")
-#' 
-#' histogram( ~nfalhas/comp, data = PaulaEx4.6.7, 
+#'
+#' histogram( ~nfalhas/comp, data = PaulaEx4.6.7,
 #'       xlab = "Número de falhas por metro de tecido", ylab = "Frequência")
 #'
 NULL
 
 #' @name PaulaEx5.6.13
 #' @title An\enc{á}{a}lise da dispers\enc{ã}{a}o de um pigmento na pintura
-#' @description Um experimento foi conduzido para avaliar a dispersão 
-#'     de quatro diferentes pigmentos numa pintura. O procedimento 
-#'     consistiu em preparar cada mistura e aplicá-las num painel usando 
-#'     três métodos diferentes. O experimento é repetido em três dias distintos 
+#' @description Um experimento foi conduzido para avaliar a dispersão
+#'     de quatro diferentes pigmentos numa pintura. O procedimento
+#'     consistiu em preparar cada mistura e aplicá-las num painel usando
+#'     três métodos diferentes. O experimento é repetido em três dias distintos
 #'     e a resposta é a porcentagem de reflectância do pigmento.
-#'     
+#'
 #' @format Um \code{data.frame} com 36 observações e 5 variáveis.
 #' \describe{
-#' 
+#'
 #' \item{\code{painel}}{Número do painel.}
-#' 
+#'
 #' \item{\code{dia}}{Dia de aplicação (1, 2 ou 3).}
-#' 
-#' \item{\code{metod}}{Método utilizado: (1 = pincel, 2 = rolo e 
+#'
+#' \item{\code{metod}}{Método utilizado: (1 = pincel, 2 = rolo e
 #'     3 = spray.}
-#' 
+#'
 #' \item{\code{mistur}}{Tipo de mistura do pigmento (1, 2, 3 ou 4).}
-#' 
+#'
 #' \item{\code{reflec}}{Porcetagem de reflectância do pigmento.}
-#' 
+#'
 #' }
 #' @keywords quase-verossimilhança
 #' @source Paula, G. A. (2004). Modelos de regressão: com apoio
 #' computacional. São Paulo, SP: IME-USP. (Exercício 5.6.13, pág. 400)
-#' 
+#'
 #' @references Myers, R.H.; Montgomery, D. C. e Vining, G. G. (2002).
-#' Generalized Linear Models: With Applications in Engineering and the 
+#' Generalized Linear Models: With Applications in Engineering and the
 #' Sciences. John Wiley, New York.
-#' 
+#'
 #' @examples
-#' 
+#'
 #' library(lattice)
 #'
 #' data(PaulaEx5.6.13)
@@ -2680,93 +2680,93 @@ NULL
 #' @name PaulaEx5.6.14
 #' @title Compara\enc{çã}{ca}o de drogas para tratamento de leucemia
 #' @description Dados referentes a um experimento em que 30 ratos tiveram
-#'     uma condição de leucemia induzida, sendo submetidos, posteriormente, 
-#'     a três drogas quimioterápicas. Foram coletadas de cada animal a 
-#'     quantidade de células brancas, a quantidade de células vermelhas 
+#'     uma condição de leucemia induzida, sendo submetidos, posteriormente,
+#'     a três drogas quimioterápicas. Foram coletadas de cada animal a
+#'     quantidade de células brancas, a quantidade de células vermelhas
 #'     e o número de colônias de células cancerosas, em três períodos diferentes.
-#'     
+#'
 #' @format Um \code{data.frame} com 120 observações e 5 variáveis.
 #' \describe{
-#' 
+#'
 #' \item{\code{rato}}{Número de identificação do rato.}
-#' 
+#'
 #' \item{\code{period}}{Período de avaliação (1, 2, 3 ou 4).}
-#' 
+#'
 #' \item{\code{trat}}{Droga quimioterápica utilizada (1, 2 ou 3).}
-#' 
+#'
 #' \item{\code{celubran}}{Quantidade de células brancas.}
-#' 
+#'
 #' \item{\code{celuverm}}{Quantidade de células vermelhas.}
-#' 
+#'
 #' \item{\code{celucanc}}{Número de colônias de células cancerosas.}
-#' 
+#'
 #' }
 #' @keywords quase-verossimilhança
 #' @source Paula, G. A. (2004). Modelos de regressão: com apoio
 #' computacional. São Paulo, SP: IME-USP. (Exercício 5.6.14, pág. 401)
-#' 
+#'
 #' @references Myers, R.H.; Montgomery, D. C. e Vining, G. G. (2002).
-#' Generalized Linear Models: With Applications in Engineering and the 
+#' Generalized Linear Models: With Applications in Engineering and the
 #' Sciences. John Wiley, New York.
-#' 
+#'
 #' @examples
-#' 
+#'
 #' library(lattice)
 #'
 #' data(PaulaEx5.6.14)
-#' 
+#'
 #' xyplot(celucanc ~ period, groups = rato,
 #'        type = c("p", "g", "a"), data = PaulaEx5.6.14)
-#'        
+#'
 NULL
 
 #' @name PaulaEx5.6.15
 #' @title Ensaio cl\enc{í}{i}nico em pacientes com artrite
-#' @description Ensaio clínico em que 20 pacientes com artrite 
+#' @description Ensaio clínico em que 20 pacientes com artrite
 #'     foram aleatorizados, de modo que 10 receberam o medicamento
 #'     auronofin e os outros 10 receberam placebo. São consideradas como
-#'     variáveis explicativas sexo e idade, além do tipo do tratamento. Os 
+#'     variáveis explicativas sexo e idade, além do tipo do tratamento. Os
 #'     pacientes foram consultados e avaliados em 4 ocasiões.
-#'     
+#'
 #' @format Um \code{data.frame} com 80 observações e 6 variáveis.
 #' \describe{
-#' 
+#'
 #' \item{\code{pacient}}{Identificação do paciente.}
-#' 
-#' \item{\code{period}}{Momento em que o paciente foi avaliado (1 = início 
+#'
+#' \item{\code{period}}{Momento em que o paciente foi avaliado (1 = início
 #' do mês, 2 = após 1 mês, 3 = após 2 meses e 4 = após 3 meses.}
-#' 
+#'
 #' \item{\code{sexo}}{Sexo (1 = masculino e 0 = feminino).}
-#' 
+#'
 #' \item{\code{idade}}{Idade (em anos).}
-#' 
+#'
 #' \item{\code{trat}}{Tratamento aplicado placebo ou Auronofin).}
-#' 
-#' \item{\code{result}}{Avaliação do paciente classificada em 
+#'
+#' \item{\code{result}}{Avaliação do paciente classificada em
 #' bom e regular ou ruim.}
-#' 
+#'
 #' }
 #' @keywords quase-verossimilhança
 #' @source Paula, G. A. (2004). Modelos de regressão: com apoio
 #' computacional. São Paulo, SP: IME-USP. (Exercício 5.6.14, pág. 401)
-#' 
+#'
 #' @references Myers, R.H.; Montgomery, D. C. e Vining, G. G. (2002).
-#' Generalized Linear Models: With Applications in Engineering and the 
+#' Generalized Linear Models: With Applications in Engineering and the
 #' Sciences. John Wiley, New York.
-#' 
+#'
 #' @examples
-#' 
+#'
 #' library(lattice)
-#' 
+#'
 #' data(PaulaEx5.6.15)
-#' 
-#' barchart(table(PaulaEx5.6.15$result,PaulaEx5.6.15$trat, PaulaEx5.6.15$period), 
-#'          auto.key = list(space="top", 
-#'          columns = 4, cex.title = 1, rectangles = TRUE, points=FALSE, 
+#'
+#' barchart(table(PaulaEx5.6.15$result,PaulaEx5.6.15$trat, PaulaEx5.6.15$period),
+#'          auto.key = list(space="top",
+#'          columns = 4, cex.title = 1, rectangles = TRUE, points=FALSE,
 #'          title = "Período"),
 #'          scales = list(y = list(relation = "free"),
 #'          x = list(alternating = FALSE)),
-#'          horizontal = FALSE, beside = FALSE, stack = FALSE, 
+#'          horizontal = FALSE, beside = FALSE, stack = FALSE,
 #'          xlab = "Resultado", ylab = "Frequência absoluta")
 #'
 NULL
@@ -2776,16 +2776,16 @@ NULL
 #' @description Conjunto de dados que apresenta para  cada unidade da
 #'     federação o número médio de anos de estudo e a renda média mensal
 #'     do chefe ou chefes de domicílio.
-#'      
+#'
 #' @format Um \code{data.frame} com 27 observações e 3 variáveis.
 #' \describe{
-#' 
+#'
 #' \item{\code{est}}{Estado (unidade da federação).}
-#' 
+#'
 #' \item{\code{esc}}{Número médio de anos de estudo.}
-#' 
+#'
 #' \item{\code{rendm}}{Renda média mensal (em reais).}
-#' 
+#'
 #' }
 #' @keywords MLG
 #' @source Paula, G. A. (2004). Modelos de regressão: com apoio
@@ -2794,11 +2794,11 @@ NULL
 #' @examples
 #'
 #' data(PaulaTb1.6)
-#' 
+#'
 #' str(PaulaTb1.6)
-#' 
+#'
 #' library(lattice)
-#' 
+#'
 #' xyplot(rendm ~ est,
 #'         ylab = "Renda",
 #'         xlab = "Estados",
@@ -2806,7 +2806,7 @@ NULL
 #'         type = 'h',
 #'         main = "Renda Média Mensal em Estado",
 #'         grid = TRUE)
-#' 
+#'
 #' xyplot(rendm ~ esc,
 #'        ylab = "Renda",
 #'        xlab = "Número médio de anos de estudo",
@@ -2818,17 +2818,17 @@ NULL
 
 #' @name PaulaTb1.9
 #' @title Bact\enc{é}{e}rias Sobreviventes em Amostras
-#' @description Número de bactérias sobreviventes em amostras de um 
+#' @description Número de bactérias sobreviventes em amostras de um
 #'     produto alimentício segundo o tempo de exposição do produto a uma
 #'     temperatura de 300°F.
-#'      
+#'
 #' @format Um \code{data.frame} com 12 observações e 2 variáveis.
 #' \describe{
-#' 
+#'
 #' \item{\code{num}}{Número de bactérias sobreviventes.}
-#' 
+#'
 #' \item{\code{temp}}{Tempo de exposição (em minutos).}
-#' 
+#'
 #' }
 #' @keywords MLG
 #' @source Paula, G. A. (2004). Modelos de regressão: com apoio
@@ -2837,11 +2837,11 @@ NULL
 #' @examples
 #'
 #' data(PaulaTb1.9)
-#' 
+#'
 #' str(PaulaTb1.9)
-#' 
+#'
 #' library(lattice)
-#' 
+#'
 #' xyplot(num ~ temp,
 #'        ylab = "Número de bactérias",
 #'        xlab = "Tempo de exposição",
@@ -2861,13 +2861,13 @@ NULL
 #'     equivalentemente, a duração do motor.
 #' @format Um \code{data.frame} com 50 observações e 2 variáveis.
 #'     \describe{
-#' 
+#'
 #' \item{\code{turb}}{Fator com cinco níveis que indica o tipo de
 #'     turbina.}
-#' 
+#'
 #' \item{\code{tempo}}{Tempo até a perda de velocidade, ou seja, duração
 #'     do motor, mensurado em unidades de milhões de ciclos.}
-#' 
+#'
 #' }
 #' @keywords positivo-assimétrico
 #' @source Paula, G. A. (2004). Modelos de regressão: com apoio
@@ -2877,19 +2877,19 @@ NULL
 #'     Lifetime Data. John Wiley, New York.
 #' @examples
 #' data(PaulaTb2.1)
-#' 
+#'
 #' str(PaulaTb2.1)
-#' 
+#'
 #' # Dados no formato "largo", conforme tabela 2.1 (Paula, 2004)
 #' unstack(PaulaTb2.1, tempo ~ turb)
-#' 
+#'
 #' aggregate(tempo ~ turb, summary, data = PaulaTb2.1)
-#' 
+#'
 #' library(lattice)
 #' xyplot(tempo ~ turb,
 #'        data = PaulaTb2.1,
 #'        type = c("p", "g", "smooth"))
-#' 
+#'
 #' densityplot(~tempo, groups = turb, data = PaulaTb2.1,
 #'             auto.key = list(corner = c(0.9, 0.9),
 #'                             title = "Tipos de turbina",
@@ -2904,11 +2904,11 @@ NULL
 #'     obtidos.
 #' @format Um \code{data.frame} com 20 observações e 2 variáveis.
 #' \describe{
-#' 
+#'
 #' \item{\code{proj}}{Valor projetado de venda.}
-#' 
+#'
 #' \item{\code{real}}{Valor real de venda.}
-#' 
+#'
 #' }
 #' @keywords positivo-assimétrico
 #' @source Paula, G. A. (2004). Modelos de regressão: com apoio
@@ -2916,9 +2916,9 @@ NULL
 #'
 #' @examples
 #' data(PaulaTb2.6)
-#' 
+#'
 #' str(PaulaTb2.6)
-#' 
+#'
 #' library(lattice)
 #' xyplot(real ~ proj, data = PaulaTb2.6,
 #'        grid = TRUE, pch = 19, cex = 1.2,
@@ -2931,26 +2931,26 @@ NULL
 
 #' @name PaulaTb3.12
 #' @title Ocorr\enc{ê}{e}ncia de vaso-constri\enc{çã}{ca}o
-#' @description Dados de um experimento desenvolvido para 
+#' @description Dados de um experimento desenvolvido para
 #'    avaliar a influência da quantidade de ar inspirado na ocorrência
 #'    de vaso-constrição na pele dos dedos da mão.  A resposta é a ocorrência
-#'    (1) ou ausência (0) de compressão de vasos e as covariáveis são o 
-#'    volume e a razão de ar inspirado. 
-#'    
+#'    (1) ou ausência (0) de compressão de vasos e as covariáveis são o
+#'    volume e a razão de ar inspirado.
+#'
 #' @format Um \code{data.frame} com 39 observações e 3 variáveis, em que
 #'
 #' \describe{
 #'
 #' \item{vol}{Logaritmo do volume de ar inspirado.}
-#'     
+#'
 #' \item{razao}{Logaritmo da razão de ar inspirado.}
 #'
 #' \item{resp}{Ocorrência ou não de compressão de vaso (ocorrência = 1
 #'    e ausência = 0).}
-#'     
+#'
 #' }
-#' @keywords GLM binarios
-#' @source Paula, G. A. (2004). Modelos de regressão: com apoio computacional. 
+#' @keywords MLG binarios
+#' @source Paula, G. A. (2004). Modelos de regressão: com apoio computacional.
 #'    São Paulo, SP: IME-USP. (Tb 3.12 pág. 227)
 #' @examples
 #'
@@ -2959,17 +2959,17 @@ NULL
 #' data(PaulaTb3.12)
 #'
 #' str(PaulaTb3.12)
-#' 
-#' bwplot(vol ~ resp,  data = PaulaTb3.12, 
+#'
+#' bwplot(vol ~ resp,  data = PaulaTb3.12,
 #'        type=c("p","a"),
 #'        xlab="Vaso-constrição", ylab="Volume de ar inspirado",
-#'        scales=list(x=list(labels=c("Ausência","Ocorrência"))), 
+#'        scales=list(x=list(labels=c("Ausência","Ocorrência"))),
 #'        main="Ocorrência de vaso-constrição")
-#' 
-#' bwplot(razao ~ resp,  data = PaulaTb3.12, 
+#'
+#' bwplot(razao ~ resp,  data = PaulaTb3.12,
 #'        type=c("p","a"),
 #'        xlab=" Vaso-constrição", ylab="Razão de ar inspirado",
-#'        scales=list(x=list(labels=c("Ausência","Ocorrência"))), 
+#'        scales=list(x=list(labels=c("Ausência","Ocorrência"))),
 #'      main="Ocorrência de vaso-constrição")
 NULL
 
@@ -2977,23 +2977,23 @@ NULL
 #' @title Aplica\enc{çã}{ca}o de inseticidas em insetos
 #' @description Dados de um experimento em que três
 #'    inseticidas foram aplicados em determinada espécie de inseto, sendo
-#'    verificado o número de sobreviventes para cada dose aplicada. 
-#'    
+#'    verificado o número de sobreviventes para cada dose aplicada.
+#'
 #' @format Um \code{data.frame} com 18 observações e 7 variáveis, em que
 #'
 #' \describe{
 #'
 #' \item{mortos}{Número de insetos mortos.}
-#'     
+#'
 #' \item{exp}{Número de insetos expostos aos inseticidas.}
 #'
 #' \item{dose}{Dose aplicada dos inseticidas.}
-#' 
+#'
 #' \item{inset}{Tipo de inseticida.}
 #'
 #' }
-#' @keywords GLM
-#' @source Paula, G. A. (2004). Modelos de regressão: com apoio computacional. 
+#' @keywords MLG
+#' @source Paula, G. A. (2004). Modelos de regressão: com apoio computacional.
 #'    São Paulo, SP: IME-USP. (Tb 3.20 pág. 246)
 #' @examples
 #'
@@ -3002,32 +3002,32 @@ NULL
 #' data(PaulaTb3.20)
 #'
 #' str(PaulaTb3.20)
-#' 
+#'
 #' xyplot(mortos/(sum(mortos)) ~ dose,  data = PaulaTb3.20, auto.key = TRUE,
 #'          type = c("p","a"), groups= inset,
-#'          xlab = "Dose de inseticida aplicada", 
-#'          ylab = "Proporção de insetos mortos", 
+#'          xlab = "Dose de inseticida aplicada",
+#'          ylab = "Proporção de insetos mortos",
 #'          main = "Aplicações de inseticidas")
 NULL
 
 #' @name PaulaTb3.21
 #' @title Distribui\enc{çã}{ca}o de Rotifers das Duas Esp\enc{é}{e}cies
-#' @description Experimento com duas espécies de *rotifers*, um tipo  
-#'     microscópio de invertebrado aquático. São apresentados pra cada 
+#' @description Experimento com duas espécies de *rotifers*, um tipo
+#'     microscópio de invertebrado aquático. São apresentados pra cada
 #'     espécie a densidade relativa da substância, o número de *rotifers*
 #'     expostos e o número de *rotifers* em suspensão.
-#'      
+#'
 #' @format Um \code{data.frame} com 40 observações e 4 variáveis.
 #' \describe{
-#' 
+#'
 #' \item{\code{dens}}{Densidade.}
-#' 
+#'
 #' \item{\code{susp}}{Rotifers suspensos.}
-#' 
+#'
 #' \item{\code{exp}}{Rotifers expostos.}
-#' 
+#'
 #' \item{\code{esp}}{Espécie (Polyarthra, Keratella).}
-#' 
+#'
 #' }
 #' @keywords MLG
 #' @source Paula, G. A. (2004). Modelos de regressão: com apoio
@@ -3036,11 +3036,11 @@ NULL
 #' @examples
 #'
 #' data(PaulaTb3.21)
-#' 
+#'
 #' str(PaulaTb3.21)
-#' 
+#'
 #' library(lattice)
-#' 
+#'
 #' xyplot(PaulaTb3.21$susp/PaulaTb3.21$exp ~ dens,
 #'        groups = esp,
 #'        data = PaulaTb3.21,
@@ -3048,7 +3048,7 @@ NULL
 #'        ylab = "Proporção de rotifers suspensos",
 #'        type = c("p"),
 #'        auto.key = TRUE)
-#' 
+#'
 NULL
 
 #' @name PaulaTb4.12
@@ -3057,22 +3057,22 @@ NULL
 #'     classificados segundo sua renda anual e grau informado de
 #'     satisfação no emprego. O interesse no estudo é relacionar a renda
 #'     anual e satisfação no emprego.
-#'     
+#'
 #' @format Um \code{data.frame} com 16 observações e 3 variáveis.
 #' \describe{
-#' 
+#'
 #' \item{\code{renda}}{Fator com quatro níveis representando a renda do
 #'     indivíduo. Expressos em mil USD os níveis são: menor que 6
 #'     (\code{<6}), entre 6 e 12 (\code{6-15}), entre 15 e 25
 #'     (\code{15-25}) e maior que 25 (\code{>25}).}
-#' 
+#'
 #' \item{\code{satis}}{Fator com quatro níveis que representa o grau de
 #'     satisfação do indivíduo no emprego (\code{alto}, \code{bom},
 #'     \code{médio} e \code{baixo}).}
-#' 
+#'
 #' \item{\code{nind}}{Número de indivíduos na combinação das variáveis
 #'     \code{renda} e \code{satis}.}
-#' 
+#'
 #' }
 #' @keywords contagem
 #' @source Paula, G. A. (2004). Modelos de regressão: com apoio
@@ -3083,12 +3083,12 @@ NULL
 #' @examples
 #'
 #' data(PaulaTb4.12)
-#' 
+#'
 #' str(PaulaTb4.12)
-#' 
+#'
 #' (xt <- xtabs(nind ~ ., data = PaulaTb4.12))
 #' plot(xt)
-#' 
+#'
 #' library(lattice)
 #' xyplot(nind ~ renda,
 #'        groups = satis,
@@ -3107,27 +3107,27 @@ NULL
 #'     pacientes segundo três fatores: ocorrência de doença das
 #'     coronárias, nível de colesterol e pressão arterial. O interesse
 #'     é analisar a associação entre essas variáveis.
-#'     
+#'
 #' @format Um \code{data.frame} com 32 observações e 4 variáveis.
 #'     \describe{
-#' 
+#'
 #' \item{\code{doenca}}{Fator com dois níveis que indica a ocorrência
 #'     (\code{sim}) ou não ocorrência (\code{não}) de doença das
 #'     coronárias.}
-#' 
+#'
 #' \item{\code{colest}}{Fator com quatro níveis que indica o nível de
 #'     colesterol do paciente. A unidade de medida adotada é
 #'     \eqn{mg/100cm^3} com classes \code{<200}, \code{200-219},
 #'     \code{220-259} e \code{>259}.}
-#' 
+#'
 #' \item{\code{pa}}{Fator com quatro níveis referente à pressão
 #'     arterial do paciente. A unidade de medida adotada é mm Hg
 #'     (milímetro-mercúrio) com classes \code{<127}, \code{127-146},
 #'     \code{147-166} e \code{>166}.}
-#' 
+#'
 #' \item{\code{nind}}{Número de indivíduos para cada combinação das categorias
 #'     das variáveis \code{doenca}, \code{colest} e \code{pa}.}
-#' 
+#'
 #' }
 #' @keywords contagem
 #' @source Paula, G. A. (2004). Modelos de regressão: com apoio
@@ -3138,13 +3138,13 @@ NULL
 #' @examples
 #'
 #' data(PaulaTb4.14)
-#' 
+#'
 #' str(PaulaTb4.14)
-#' 
+#'
 #' xt <- xtabs(nind ~ ., data = PaulaTb4.14)
 #' ftable(xt)
 #' plot(xt)
-#' 
+#'
 #' library(lattice)
 #' xyplot(nind ~ colest | doenca,
 #'        groups = pa,
@@ -3167,19 +3167,19 @@ NULL
 #'     consumo médio diário de cigarro e a faixa-etária.
 #' @format Um \code{data.frame} com 16 observações e 4 variáveis.
 #'     \describe{
-#' 
+#'
 #' \item{\code{nmortes}}{Número de casos de morte por câncer de
 #'     pulmão.}
-#' 
-#' \item{\code{tpessoas}}{Total de anos de exposição (somado para toda a 
+#'
+#' \item{\code{tpessoas}}{Total de anos de exposição (somado para toda a
 #'     amostra).}
-#' 
+#'
 #' \item{\code{cmdc}}{Consumo médio diário de cigarros, dividido em
 #'     quatro níveis 0, 1-9, 10-30 ou +30 cigarros consumidos.}
-#' 
+#'
 #' \item{\code{idade}}{Idade, registrada em faixas-etárias de 40- 49,
 #'     50-59, 60-79 e 70-80 anos.}
-#' 
+#'
 #' }
 #' @keywords contagem
 #' @source Paula, G. A. (2004). Modelos de regressão: com apoio
@@ -3187,13 +3187,13 @@ NULL
 #' @examples
 #'
 #' data(PaulaTb4.2)
-#' 
+#'
 #' str(PaulaTb4.2)
-#' 
+#'
 #' xtabs(nmortes ~ cmdc + idade, data = PaulaTb4.2)
 #' (xt <- xtabs((nmortes/tpessoas)*100 ~ cmdc + idade, data = PaulaTb4.2))
 #' plot(xt)
-#' 
+#'
 #' library(lattice)
 #' xyplot((nmortes/tpessoas)*100 ~ cmdc,
 #'        xlab = "Consumo médio de cigarros",
@@ -3213,27 +3213,27 @@ NULL
 #'     variáveis registradas tem por objetivo explicar esta contagem.
 #' @format Um \code{data.frame} com 40 observações e 8 variáveis.
 #' \describe{
-#' 
+#'
 #' \item{\code{nass}}{Número de assinantes de TV a cabo (em milhares).}
-#' 
+#'
 #' \item{\code{domic}}{Número de domicílios na área (em milhares).}
-#' 
+#'
 #' \item{\code{perc}}{Percentagem de domicílios com TV a cabo.}
-#' 
+#'
 #' \item{\code{renda}}{Renda per capita por domicílio com TV a cabo (em
 #'     USD).}
-#' 
+#'
 #' \item{\code{taxa}}{Valor da taxa de instalação de TV a cabo (em
 #'     USD).}
-#' 
+#'
 #' \item{\code{custo}}{Custo médio mensal de manutenção de TV a cabo (em
 #'     USD).}
-#' 
+#'
 #' \item{\code{ncabo}}{Número de canais a cabo disponíveis na área.}
-#' 
+#'
 #' \item{\code{ntv}}{Número de canais não pagos com sinal de boa
 #'     qualidade na área.}
-#' 
+#'
 #' }
 #' @keywords contagem superdispersão
 #' @source Paula, G. A. (2004). Modelos de regressão: com apoio
@@ -3241,9 +3241,9 @@ NULL
 #' @examples
 #'
 #' data(PaulaTb4.7)
-#' 
+#'
 #' str(PaulaTb4.7)
-#' 
+#'
 #' library(lattice)
 #' splom(PaulaTb4.7, type = c("p", "smooth"), lwd = 2)
 #'
@@ -3259,23 +3259,23 @@ NULL
 #'     navios com um maior tempo em operação).
 #' @format Um \code{data.frame} com 34 observações e 5 variáveis.
 #'     \describe{
-#' 
+#'
 #' \item{\code{tipo}}{Fator com cinco níveis que representa o tipo de
 #'     navio (A, B, C, D e E).}
-#' 
+#'
 #' \item{\code{ano}}{Fator com quatro níveis que representa o ano de
 #'     fabricação do navio (entre 1960 e 1964 (\code{60-64}), entre 1965
-#'     e 1969 (\code{65-69}), entre 1970 e 1974 (\code{70-74}) e 
+#'     e 1969 (\code{65-69}), entre 1970 e 1974 (\code{70-74}) e
 #'     entre 1975 e 1979 (\code{75-79})).}
-#' 
+#'
 #' \item{\code{peri}}{Fator com dois níveis que representa o período de
 #'     operação do navio (entre 1960 e 1974 (\code{60-74}) e entre 1975
 #'     e 1979 (\code{75-79})).}
-#' 
+#'
 #' \item{\code{meses}}{Tempo, em meses, em que o navio esteve em operação.}
-#' 
+#'
 #' \item{\code{avarias}}{Número de avarias no navio.}
-#' 
+#'
 #' }
 #' @keywords contagem superdispersão
 #' @source Paula, G. A. (2004). Modelos de regressão: com apoio
@@ -3283,18 +3283,18 @@ NULL
 #' @examples
 #'
 #' data(PaulaTb4.9)
-#' 
+#'
 #' str(PaulaTb4.9)
-#' 
+#'
 #' # Número de observações em cada combinação das variáveis explicativas
 #' ftable(PaulaTb4.9[, c("tipo", "ano", "peri")])
-#' 
+#'
 #' # Número de avarias e número de avarias por mês observada em cada
 #' # combinação das variáveis explicativas
 #' xtabs(avarias ~ tipo + ano + peri, data = PaulaTb4.9)
 #' xt <- xtabs(avarias/meses ~ ., data = PaulaTb4.9)
 #' plot(xt)
-#' 
+#'
 #' library(lattice)
 #' xyplot(avarias/meses ~ tipo | peri,
 #'        groups = ano,
@@ -3305,4 +3305,3 @@ NULL
 #'            title = "Ano de\nfabricação"))
 #'
 NULL
-
diff --git a/R/Pimentel.R b/R/Pimentel.R
index b4d51f8c..af3bef96 100644
--- a/R/Pimentel.R
+++ b/R/Pimentel.R
@@ -1,5 +1,5 @@
 #' @name PimentelEg4.2
-#' @title Alimenta\enc{çã}{ca}o de porcos
+#' @title Alimenta\enc{çã}{ca}o de Porcos
 #' @description Experimento (fictício) de alimentação de porcos em que
 #'     se usaram quatro rações (A, B, C, D), cada uma fornecida a cinco
 #'     animais escolhidos ao acaso. A tabela apresenta os aumentos de
@@ -16,8 +16,7 @@
 #'
 #' }
 #' @keywords DIC
-#' @source Pimentel-Gomes, F. (2009). Curso de Estatística Experimental
-#'     (15th ed.). Piracicaba, SP: FEALQ.
+#' @source PIMENTEL-GOMES (2009).
 #' @examples
 #'
 #' plot(PimentelEg4.2,
@@ -62,7 +61,8 @@ NULL
 NULL
 
 #' @name PimentelEg6.2
-#' @title Ensaio de Competi\enc{çã}{ca}o de Variedades de Cana-de-a\enc{çú}{cu}car
+#' @title Ensaio de Competi\enc{çã}{ca}o de Variedades de
+#'     Cana-de-a\enc{çú}{cu}car
 #' @description Experimento de competição de variedades de
 #'     cana-de-açúcar no qual foram usadas cinco variedades dispostas
 #'     em um delineamento quadrado latino 5 \eqn{\times} 5.
@@ -84,8 +84,7 @@ NULL
 #'
 #' }
 #' @keywords DQL
-#' @source Pimentel-Gomes, F. (2009). Curso de Estatística Experimental
-#'     (15th ed.). Piracicaba, SP: FEALQ. (Exemplo 6.2, pág. 96)
+#' @source PIMENTEL-GOMES (2009), Exemplo 6.2, pág. 96.
 #' @examples
 #'
 #' data(PimentelEg6.2)
@@ -111,7 +110,8 @@ NULL
 NULL
 
 #' @name PimentelEg7.3
-#' @title Experimento Fatorial de Aduba\enc{çã}{ca}o Mineral e com Vinha\enc{ç}{c}a
+#' @title Experimento Fatorial de Aduba\enc{çã}{ca}o Mineral e com
+#'     Vinha\enc{ç}{c}a
 #' @description Experimento fatorial, \eqn{2^{2}}, em que os fatores
 #'     eram adubação mineral completa e adubação com vinhaça. As
 #'     parcelas foram dispostas em blocos ao acaso.
@@ -134,8 +134,7 @@ NULL
 #'
 #' }
 #' @keywords FAT2
-#' @source Pimentel-Gomes, F. (2009). Curso de Estatística Experimental
-#'     (15th ed.). Piracicaba, SP: FEALQ. (Exemplo 7.3, pág. 119)
+#' @source PIMENTEL-GOMES (2009), Exemplo 7.3, pág. 119.
 #' @examples
 #'
 #' library(lattice)
@@ -157,7 +156,8 @@ NULL
 NULL
 
 #' @name PimentelEg7.4
-#' @title Experimento de Aduba\enc{çã}{ca}o com Torta de Filtro e Adubo Mineral
+#' @title Experimento de Aduba\enc{çã}{ca}o com Torta de Filtro e Adubo
+#'     Mineral
 #' @description Experimento fatorial 2\eqn{^{2}} em que os fatores eram
 #'     adubo mineral e torta dos filtros de Oliver de usinas de açúcar.
 #' @format Um \code{data.frame} com 16 observações e 4 variáveis, em que
@@ -181,8 +181,7 @@ NULL
 #'
 #' }
 #' @keywords FAT2
-#' @source Pimentel-Gomes, F. (2009). Curso de Estatística Experimental
-#'     (15th ed.). Piracicaba, SP: FEALQ. (Exemplo 7.4, pág. 120)
+#' @source PIMENTEL-GOMES (2009), Exemplo 7.4, pág. 120.
 #' @examples
 #'
 #' library(lattice)
@@ -202,7 +201,8 @@ NULL
 NULL
 
 #' @name PimentelEx5.8.4
-#' @title Dados de Produ\enc{çã}{ca}o de Cana-planta em Ensaio de Variedades
+#' @title Dados de Produ\enc{çã}{ca}o de Cana-planta em Ensaio de
+#'     Variedades
 #' @description Experimento em blocos casualizados realizado pela
 #'     Cooperativa dos Usineiros do Oeste do Estado de São Paulo,
 #'     referente à produção de cana-planta de um ensaio de variedades
@@ -216,13 +216,12 @@ NULL
 #'
 #' \item{\code{variedade}}{Fator de 7 níveis qualitativos, que são as
 #'     variedades cana-de-açúcar.}
-#'     
+#'
 #' \item{\code{prod}}{Dados de produção de cana-planta.}
 #'
 #' }
 #' @keywords DBC
-#' @source Pimentel-Gomes, F. (2009). Curso de Estatística Experimental
-#'     (15th ed.). Piracicaba, SP: FEALQ.
+#' @source PIMENTEL-GOMES (2009).
 #' @examples
 #'
 #' library(lattice)
@@ -251,13 +250,12 @@ NULL
 #'
 #' \item{\code{variedade}}{Fator de 6 níveis qualitativos, que são os
 #'     diferentes tipos de mandioca.}
-#'     
+#'
 #' \item{\code{prod}}{Produção de mandioca, em t ha\eqn{^{-1}}.}
 #'
 #' }
 #' @keywords DBC
-#' @source Pimentel-Gomes, F. (2009). Curso de Estatística Experimental
-#'     (15th ed.). Piracicaba, SP: FEALQ.
+#' @source PIMENTEL-GOMES (2009).
 #' @examples
 #'
 #' library(lattice)
@@ -271,7 +269,8 @@ NULL
 NULL
 
 #' @name PimentelEx6.6.3
-#' @title Efeito da Idade de Castra\enc{çã}{ca}o no Ganho de Peso de Su\enc{í}{i}nos
+#' @title Efeito da Idade de Castra\enc{çã}{ca}o no Ganho de Peso de
+#'     Su\enc{í}{i}nos
 #' @description Ensaio de alimentação de suínos, no qual foi usado um
 #'     quadrado latino de 4 x 4, com os resultados referentes aos ganhos
 #'     de peso ao fim de 252 dias.
@@ -296,8 +295,7 @@ NULL
 #'
 #' }
 #' @keywords DQL
-#' @source Pimentel-Gomes, F. (2009). Curso de Estatística Experimental
-#'     (15th ed.). Piracicaba, SP: FEALQ. (Exercício 6.6.3, página 110)
+#' @source PIMENTEL-GOMES (2009), Exercício 6.6.3, página 110.
 #' @examples
 #'
 #' data(PimentelEx6.6.3)
@@ -324,7 +322,8 @@ NULL
 NULL
 
 #' @name PimentelPg142
-#' @title Grupo de Experimentos Fatoriais de Aduba\enc{çã}{ca}o de Algod\enc{ã}{a}o
+#' @title Grupo de Experimentos Fatoriais de Aduba\enc{çã}{ca}o de
+#'     Algod\enc{ã}{a}o
 #' @description Grupo de experimentos de adubação de algodão, todos em
 #'     delineamento inteiramente casualiado com 4 repetições cada. As
 #'     combinações de NPK formam em ensaio fatorial com um tratamento
@@ -362,8 +361,7 @@ NULL
 #'     e a porção fatorial é a combinação das doses 1 e 2 de NK tendo o
 #'     P fixo em 1.
 #' @keywords GE DIC FATADI
-#' @source Pimentel-Gomes, F. (2009). Curso de Estatística Experimental
-#'     (15th ed.). Piracicaba, SP: FEALQ. (Página 142)
+#' @source PIMENTEL-GOMES (2009), página 142.
 #' @examples
 #'
 #' library(lattice)
@@ -425,7 +423,8 @@ NULL
 NULL
 
 #' @name PimentelPg267
-#' @title Percentual de Sorgo na Ra\enc{çã}{ca}o para Desenvolvimento de Pintos
+#' @title Percentual de Sorgo na Ra\enc{çã}{ca}o para Desenvolvimento de
+#'     Pintos
 #' @description Ensaio de Torres e Pimentel-Gomes (1959) em que foram
 #'     estudadas 4 rações para pintos dos dois sexos (machos e fêmeas),
 #'     instalado um delineamento inteiramente casualizado com duas
@@ -472,7 +471,8 @@ NULL
 NULL
 
 #' @name PimentelPg269
-#' @title Influ\enc{ê}{e}ncia da Case\enc{í}{i}na Iodada na Nutri\enc{çã}{ca}o de Vacas Leiteiras
+#' @title Influ\enc{ê}{e}ncia da Case\enc{í}{i}na Iodada na
+#'     Nutri\enc{çã}{ca}o de Vacas Leiteiras
 #' @description Ensaio realizado pelo Departamento de Produção Animal da
 #'     Secretaria de Agricultura paulista, que teve por objetivo estudar
 #'     a influência da caseína iodada na nutrição de vacas leiteiras.
@@ -503,10 +503,9 @@ NULL
 #'
 #' A observação da testemunha (0 de caseina) no bloco 3 foi perdida. O
 #'     valor correspondente foi estimado por métodos de imputação de
-#'     parcela perdida discutido na seção 5.4 de Pimentel-Gomes (2009).
+#'     parcela perdida discutido na seção 5.4 de PIMENTEL-GOMES (2009).
 #' @keywords DBC
-#' @source Pimentel-Gomes, F. (2009). Curso de Estatística Experimental
-#'     (15th ed.). Piracicaba, SP: FEALQ. (Página 269)
+#' @source PIMENTEL-GOMES (2009), página 269.
 #' @examples
 #'
 #' library(lattice)
@@ -550,8 +549,7 @@ NULL
 #'
 #' }
 #' @keywords DIC
-#' @source Pimentel-Gomes, F. (2009). Curso de Estatística Experimental
-#'     (15th ed.). Piracicaba, SP: FEALQ. (Página 382)
+#' @source PIMENTEL-GOMES (2009), página 382.
 #' @examples
 #'
 #' library(lattice)
@@ -580,16 +578,15 @@ NULL
 #'
 #' \describe{
 #'
-#' \item{\code{feno}}{Fator de 2 níveis qualitativos, que são os diferentes
-#'     tipos de feno.}
+#' \item{\code{feno}}{Fator de 2 níveis qualitativos, que são os
+#'     diferentes tipos de feno.}
 #'
 #' \item{\code{ganhopeso}}{Aumento do peso das leitoas, observado em
 #'     quilogramas.}
 #'
 #' }
 #' @keywords DIC
-#' @source Pimentel-Gomes, F. (2009). Curso de Estatística Experimental
-#'     (15th ed.). Piracicaba, SP: FEALQ.
+#' @source PIMENTEL-GOMES (2009).
 #' @examples
 #'
 #' library(lattice)
@@ -615,14 +612,13 @@ NULL
 #'
 #' \item{\code{bloco}}{Fator de 6 níveis qualitativos, usado para
 #'     controle local.}
-#'     
+#'
 #' \item{\code{prod}}{Produção de milho, em kg por parcela de
 #'     200\eqn{m^{2}}.}
 #'
 #' }
 #' @keywords DBC
-#' @source Pimentel-Gomes, F. (2009). Curso de Estatística Experimental
-#'     (15th ed.). Piracicaba, SP: FEALQ.
+#' @source PIMENTEL-GOMES (2009).
 #' @examples
 #'
 #' library(lattice)
@@ -662,8 +658,7 @@ NULL
 #'
 #' }
 #' @keywords DBI
-#' @source Pimentel-Gomes, F. (2009). Curso de Estatística Experimental
-#'     (15th ed.). Piracicaba, SP: FEALQ. (Tabela 10.3.1, pág. 190)
+#' @source PIMENTEL-GOMES (2009), Tabela 10.3.1, pág. 190.
 #' @examples
 #'
 #' data(PimentelTb10.3.1)
@@ -708,8 +703,7 @@ NULL
 #'
 #' }
 #' @keywords DBI
-#' @source Pimentel-Gomes, F. (2009). Curso de Estatística Experimental
-#'     (15th ed.). Piracicaba, SP: FEALQ. (Tabela 10.4.1, pág. 192)
+#' @source PIMENTEL-GOMES (2009), Tabela 10.4.1, pág. 192.
 #' @examples
 #'
 #' data(PimentelTb10.4.1)
@@ -731,8 +725,8 @@ NULL
 NULL
 
 #' @name PimentelTb10.6.1
-#' @title Experimento do Tipo III com recupera\enc{çã}{ca}o da informa\enc{çã}{ca}o
-#'     interblocos
+#' @title Experimento do Tipo III com recupera\enc{çã}{ca}o da
+#'     informa\enc{çã}{ca}o interblocos
 #' @description Experimento em blocos incompletos equilibrados do Tipo
 #'     III com recuperação da informação interblocos, conduzido por
 #'     Fraga e Costa (1950). Neste experimento temos \eqn{b = v = 13},
@@ -784,7 +778,8 @@ NULL
 NULL
 
 #' @name PimentelTb11.3.1
-#' @title Experimento de Produ\enc{çã}{ca}o de Milho em L\enc{á}{a}tice Quadrado
+#' @title Experimento de Produ\enc{çã}{ca}o de Milho em L\enc{á}{a}tice
+#'     Quadrado
 #' @description Produção de milho em um experimento em delineamento
 #'     reticulado quadrado triplo de 4 \eqn{times} 4 avaliando a 16
 #'     híbridos de milho, em que \eqn{m = 3} repetições ortogonais e
@@ -833,7 +828,8 @@ NULL
 NULL
 
 #' @name PimentelTb12.2.1
-#' @title Experimento de Aduba\enc{çã}{ca}o com P\eqn{_2}O\eqn{_5} em Milho
+#' @title Experimento de Aduba\enc{çã}{ca}o com P\eqn{_2}O\eqn{_5} em
+#'     Milho
 #' @description Experimento de adubação de milho feito pelos engenheiros
 #'     agrônomos Glauco Pinto Viegas e Erik Smith, em blocos ao acaso,
 #'     para estudar o efeito da adubação na produtividade da cultura.
@@ -897,8 +893,7 @@ NULL
 #'
 #' }
 #' @keywords RP
-#' @source Pimentel-Gomes, F. (2009). Curso de Estatística Experimental
-#'     (15th ed.). Piracicaba, SP: FEALQ. (Tabela 12.3.1, pág. 236)
+#' @source PIMENTEL-GOMES (2009), Tabela 12.3.1, pág. 236.
 #' @examples
 #'
 #' library(lattice)
@@ -914,7 +909,8 @@ NULL
 NULL
 
 #' @name PimentelTb12.4.1
-#' @title Produ\enc{çã}{ca}o de Cana em Fun\enc{çã}{ca}o do Teor de K do Solo
+#' @title Produ\enc{çã}{ca}o de Cana em Fun\enc{çã}{ca}o do Teor de K do
+#'     Solo
 #' @description Experimento de produção de cana-de-açúcar em função do
 #'     teor de K trocável do solo, em miliequivalentes de terra fina
 #'     seca na estufa, onde a nutrição com potássio foi feita com
@@ -930,8 +926,7 @@ NULL
 #'
 #' }
 #' @keywords RP
-#' @source Pimentel-Gomes, F. (2009). Curso de Estatística Experimental
-#'     (15th ed.). Piracicaba, SP: FEALQ. (Tabela 12.4.1, pág. 238)
+#' @source PIMENTEL-GOMES (2009), Tabela 12.4.1, pág. 238.
 #' @examples
 #'
 #' library(lattice)
@@ -948,7 +943,8 @@ NULL
 NULL
 
 #' @name PimentelTb13.5.1
-#' @title Grupo de Experimentos de Aduba\enc{çã}{ca}o de Cana-de-a\enc{çú}{cu}car
+#' @title Grupo de Experimentos de Aduba\enc{çã}{ca}o de
+#'     Cana-de-a\enc{çú}{cu}car
 #' @description Conjunto de 38 ensaios fatoriais de \eqn{3^{3}} com N, P
 #'     e K, em cana-de-açúçar, com dados de cana-planta e soca, obtidos
 #'     por Strauss (1951). O nutriente foi aplicado nas doses de zero,
@@ -972,8 +968,7 @@ NULL
 #'
 #' }
 #' @keywords GE
-#' @source Pimentel-Gomes, F. (2009). Curso de Estatística Experimental
-#'     (15th ed.). Piracicaba, SP: FEALQ. (Tabela 13.5.1, pág. 259)
+#' @source PIMENTEL-GOMES (2009), Tabela 13.5.1, pág. 259.
 #' @examples
 #'
 #' library(lattice)
@@ -1008,7 +1003,8 @@ NULL
 NULL
 
 #' @name PimentelTb14.4.1
-#' @title Produ\enc{çã}{ca}o de Leite em um Ensaio de Alimenta\enc{çã}{ca}o de Vacas
+#' @title Produ\enc{çã}{ca}o de Leite em um Ensaio de
+#'     Alimenta\enc{çã}{ca}o de Vacas
 #' @description Experimento de nutrição de vacas, conduzido em períodos
 #'     com 12 vacas distribuídas em 4 grupos de 3 vacas. Foram estudados
 #'     3 tipos de alimentação para as vacas em um delineamento quadrado
@@ -1036,9 +1032,8 @@ NULL
 #' \item{\code{prod}}{Produções de leite, em kg.}
 #'
 #' }
-#' @keywords SQL
-#' @source Pimentel-Gomes, F. (2009). Curso de Estatística Experimental
-#'     (15th ed.). Piracicaba, SP: FEALQ. (Tabela 14.4.1, pág. 272)
+#' @keywords DQL
+#' @source PIMENTEL-GOMES (2009), Tabela 14.4.1, pág. 272.
 #' @examples
 #'
 #' library(lattice)
@@ -1091,8 +1086,7 @@ NULL
 #'
 #' }
 #' @keywords ER
-#' @source Pimentel-Gomes, F. (2009). Curso de Estatística Experimental
-#'     (15th ed.). Piracicaba, SP: FEALQ. (Tabela 14.5.1, pág. 278)
+#' @source PIMENTEL-GOMES (2009), Tabela 14.5.1, pág. 278.
 #' @examples
 #'
 #' library(lattice)
@@ -1139,8 +1133,7 @@ NULL
 #'
 #' }
 #' @keywords DBC FAT2
-#' @source Pimentel-Gomes, F. (2009). Curso de Estatística Experimental
-#'     (15th ed.). Piracicaba, SP: FEALQ. (Tabela 14.7.1, pág. 283)
+#' @source PIMENTEL-GOMES (2009), Tabela 14.7.1, pág. 283.
 #'
 #' Pimentel-Gomes, F.; Nunes, S. G.; Gomes, M. de B; Curvo,
 #'     J. B. E. Modificação na análise de variância de ensaions de
@@ -1191,8 +1184,7 @@ NULL
 #'
 #' }
 #' @keywords DBC COV
-#' @source Pimentel-Gomes, F. (2009). Curso de Estatística Experimental
-#'     (15th ed.). Piracicaba, SP: FEALQ. (Tabela 16.2.1, pág. 300)
+#' @source PIMENTEL-GOMES (2009), Tabela 16.2.1, pág. 300.
 #' @examples
 #'
 #' library(lattice)
@@ -1229,7 +1221,8 @@ NULL
 NULL
 
 #' @name PimentelTb16.3.1
-#' @title Suscetibilidade de Variedades de Soja ao Ataque de Nemat\enc{ó}{o}ides
+#' @title Suscetibilidade de Variedades de Soja ao Ataque de
+#'     Nemat\enc{ó}{o}ides
 #' @description Experimento de Arruda (1952), em blocos casualizados, em
 #'     que se compararam 21 variedades de soja para estudar sua
 #'     suscetibilidade ao ataque de nematóides. Em cada parcela foram
@@ -1258,8 +1251,7 @@ NULL
 #'
 #' }
 #' @keywords DBC COV
-#' @source Pimentel-Gomes, F. (2009). Curso de Estatística Experimental
-#'     (15th ed.). Piracicaba, SP: FEALQ. (Tabela 16.3.1, pág. 306)
+#' @source PIMENTEL-GOMES (2009), Tabela 16.3.1, pág. 306.
 #' @examples
 #'
 #' library(lattice)
@@ -1317,8 +1309,7 @@ NULL
 #'
 #' }
 #' @keywords DBC GE
-#' @source Pimentel-Gomes, F. (2009). Curso de Estatística Experimental
-#'     (15th ed.). Piracicaba, SP: FEALQ. (Tabela 17.3.1, pág. 317)
+#' @source PIMENTEL-GOMES (2009), Tabela 17.3.1, pág. 317.
 #' @examples
 #'
 #' library(lattice)
@@ -1358,8 +1349,7 @@ NULL
 #'
 #' }
 #' @keywords GE
-#' @source Pimentel-Gomes, F. (2009). Curso de Estatística Experimental
-#'     (15th ed.). Piracicaba, SP: FEALQ. (Tabela 17.4.1, pág. 322)
+#' @source PIMENTEL-GOMES (2009), Tabela 17.4.1, pág. 322.
 #' @examples
 #'
 #' library(lattice)
@@ -1383,8 +1373,8 @@ NULL
 NULL
 
 #' @name PimentelTb18.2.1
-#' @title Ensaio Fatorial com Tratamentos Adicionais de Aduba\enc{çã}{ca}o de
-#'     Milho
+#' @title Ensaio Fatorial com Tratamentos Adicionais de
+#'     Aduba\enc{çã}{ca}o de Milho
 #' @description Ensaio de adubação NPK de milho, fatorial de
 #'     \eqn{3^{3}}, com confundimento de 2 graus de liberdade da
 #'     interação tripla. A cada três blocos de 9 parcelas juntaram-se
@@ -1424,8 +1414,7 @@ NULL
 #'
 #' }
 #' @keywords FAT3 FATADI
-#' @source Pimentel-Gomes, F. (2009). Curso de Estatística Experimental
-#'     (15th ed.). Piracicaba, SP: FEALQ. (Tabela 18.2.1, pág. 330)
+#' @source PIMENTEL-GOMES (2009), Tabela 18.2.1, pág. 330.
 #' @examples
 #'
 #' library(lattice)
@@ -1465,8 +1454,7 @@ NULL
 #'
 #' }
 #' @keywords FAT2
-#' @source Pimentel-Gomes, F. (2009). Curso de Estatística Experimental
-#'     (15th ed.). Piracicaba, SP: FEALQ. (Tabela 20.2.1, pág. 369)
+#' @source PIMENTEL-GOMES (2009), Tabela 20.2.1, pág. 369.
 #' @examples
 #'
 #' library(lattice)
@@ -1501,8 +1489,7 @@ NULL
 #'
 #' }
 #' @keywords DIC
-#' @source Pimentel-Gomes, F. (2009). Curso de Estatística Experimental
-#'     (15th ed.). Piracicaba, SP: FEALQ. (Tabela 21.5.1, pág. 384)
+#' @source PIMENTEL-GOMES (2009), Tabela 21.5.1, pág. 384.
 #' @examples
 #'
 #' library(lattice)
@@ -1540,8 +1527,7 @@ NULL
 #'
 #' }
 #' @keywords DBC
-#' @source Pimentel-Gomes, F. (2009). Curso de Estatística Experimental
-#'     (15th ed.). Piracicaba, SP: FEALQ.
+#' @source PIMENTEL-GOMES (2009).
 #' @examples
 #'
 #' library(lattice)
@@ -1556,7 +1542,8 @@ NULL
 NULL
 
 #' @name PimentelTb6.3.1
-#' @title Experimento de Aduba\enc{çã}{ca}o Mineral e Verde em Cana-de-a\enc{çú}{cu}car
+#' @title Experimento de Aduba\enc{çã}{ca}o Mineral e Verde em
+#'     Cana-de-a\enc{çú}{cu}car
 #' @description Experimento de adubação de cana da Usina Monte Alegre,
 #'     com fertilizantes minerais e adubos verdes. O delineamento
 #'     utilizado foi um quadrado latino de 6 x 6.
@@ -1589,8 +1576,7 @@ NULL
 #'     realidade um experimento fatorial incompleto no qual não existem
 #'     os níveis de de adução mineral para o nível sem crotalária.
 #' @keywords DQL
-#' @source Pimentel-Gomes, F. (2009). Curso de Estatística Experimental
-#'     (15th ed.). Piracicaba, SP: FEALQ. (Tabela 6.3.1, página 99)
+#' @source PIMENTEL-GOMES (2009), Tabela 6.3.1, página 99.
 #' @examples
 #'
 #' data(PimentelTb6.3.1)
@@ -1626,7 +1612,8 @@ NULL
 NULL
 
 #' @name PimentelTb7.2.1
-#' @title Experimento Fatorial Sobre Aduba\enc{çã}{ca}o NPK na Produ\enc{çã}{ca}o de Milho
+#' @title Experimento Fatorial Sobre Aduba\enc{çã}{ca}o NPK na
+#'     Produ\enc{çã}{ca}o de Milho
 #' @description Resultados da produção de milho em um experimento
 #'     com fatorial \eqn{2^{3}} dos fatores presentes na adubação
 #'     minenal (NPK) em delineamento de blocos casualizados.
@@ -1650,8 +1637,7 @@ NULL
 #'
 #' }
 #' @keywords FAT3
-#' @source Pimentel-Gomes, F. (2009). Curso de Estatística Experimental
-#'     (15th ed.). Piracicaba, SP: FEALQ. (Tabela 7.2.1, página 115)
+#' @source PIMENTEL-GOMES (2009), Tabela 7.2.1, página 115.
 #' @examples
 #'
 #' data(PimentelTb7.2.1)
@@ -1671,8 +1657,8 @@ NULL
 NULL
 
 #' @name PimentelTb7.6.1
-#' @title Experimento Fatorial Com Confunfimento de Aduba\enc{çã}{ca}o em
-#'     Cana-de-a\enc{çú}{cu}car
+#' @title Experimento Fatorial Com Confunfimento de Aduba\enc{çã}{ca}o
+#'     em Cana-de-a\enc{çú}{cu}car
 #' @description Experimento fatorial, de 3\eqn{^{3}}, de adubação de
 #'     cana com NPK, feito por Strauss (1951), com confundimento (grupo
 #'     W) de dois graus de liberdade da interação tripla N \eqn{\times}
@@ -1706,8 +1692,7 @@ NULL
 #'     tratamento 202 sendo que a última deveria ser 220. Foi feita a
 #'     inclusão desses dados no pacote com essa correção.
 #' @keywords FAT3 confundimento
-#' @source Pimentel-Gomes, F. (2009). Curso de Estatística Experimental
-#'     (15th ed.). Piracicaba, SP: FEALQ. (Tabela 7.6.1, pág. 126)
+#' @source PIMENTEL-GOMES (2009), Tabela 7.6.1, pág. 126.
 #'
 #' Straus, F. Esperimentos de adubação na zona canavieira de
 #'     Pernambuco. In: Terceira Reunião Brasileira de Ciência do
@@ -1733,7 +1718,8 @@ NULL
 NULL
 
 #' @name PimentelTb7.8.1
-#' @title Acidez de Variedades de Mangas em Fun\enc{çã}{ca}o da \enc{É}{E}poca
+#' @title Acidez de Variedades de Mangas em Fun\enc{çã}{ca}o da
+#'     \enc{É}{E}poca
 #' @description Experimento fatorial, de 6 \eqn{\times} 3 \eqn{\times}
 #'     3, referente a acidez de 6 variedades de mangas, em 3 meses do
 #'     ano e em 3 anos agrícolas sucessivos reproduzidos de um trabalho
@@ -1840,7 +1826,8 @@ NULL
 NULL
 
 #' @name PimentelTb8.3.1
-#' @title Grupo de Ensaios de Batatinha na Prov\enc{í}{i}ncia de Buenos Aires
+#' @title Grupo de Ensaios de Batatinha na Prov\enc{í}{i}ncia de Buenos
+#'     Aires
 #' @description Grupo de ensaios de competição de variedades de
 #'     batatinha, realizados pelo engenheiro agrônomo Oscar A. Garay, da
 #'     Estação Experimental de Balcarce, Argentina, instalados em
@@ -1875,8 +1862,7 @@ NULL
 #'     refere-se ao experimento número 3 com todas as observações.
 #' @keywords GE
 #' @seealso \code{\link{PimentelEg5.2}}.
-#' @source Pimentel-Gomes, F. (2009). Curso de Estatística Experimental
-#'     (15th ed.). Piracicaba, SP: FEALQ. (Tabela 8.3.1, pág. 147)
+#' @source PIMENTEL-GOMES (2009), Tabela 8.3.1, pág. 147.
 #' @examples
 #'
 #' library(lattice)
@@ -1922,8 +1908,7 @@ NULL
 #'
 #' }
 #' @keywords PSS
-#' @source Pimentel-Gomes, F. (2009). Curso de Estatística Experimental
-#'     (15th ed.). Piracicaba, SP: FEALQ. (Tabela 9.2.1, pág. 166)
+#' @source PIMENTEL-GOMES (2009), Tabela 9.2.1, pág. 166.
 #' @examples
 #'
 #' library(lattice)
@@ -1943,7 +1928,8 @@ NULL
 NULL
 
 #' @name PimentelTb9.3.1
-#' @title Experimento de Aduba\enc{çã}{ca}o de Variedades de Cana-de-a\enc{çú}{cu}car
+#' @title Experimento de Aduba\enc{çã}{ca}o de Variedades de
+#'     Cana-de-a\enc{çú}{cu}car
 #' @description Experimento com 5 variedades de cana-de-açúcar, em
 #'     delineamento quadrado latino de 5 x 5, sendo cada parcela
 #'     dividida em duas subparcelas, uma sem adubo e outra com adubação
@@ -2013,8 +1999,7 @@ NULL
 #'
 #' }
 #' @keywords PS
-#' @source Pimentel-Gomes, F. (2009). Curso de Estatística Experimental
-#'     (15th ed.). Piracicaba, SP: FEALQ. (Tabela 9.4.1, pág. 175)
+#' @source PIMENTEL-GOMES (2009), Tabela 9.4.1, pág. 175.
 #' @examples
 #'
 #' library(lattice)
@@ -2031,4 +2016,3 @@ NULL
 #'                        columns = 2))
 #'
 NULL
-
diff --git a/R/Ramalho.R b/R/Ramalho.R
index d46db168..6e2366ed 100644
--- a/R/Ramalho.R
+++ b/R/Ramalho.R
@@ -1,7 +1,7 @@
 #' @name RamalhoEg11.10
 #' @title Produ\enc{çã}{ca}o de Gr\enc{ã}{a}os de Sorgo
-#' @description Experimento da avaliação da produção de 40 cultivares de sorgo
-#'     conduzido no delineamento alfa-látice.
+#' @description Experimento da avaliação da produção de 40 cultivares de
+#'     sorgo conduzido no delineamento alfa-látice.
 #' @format Um \code{data.frame} com 120 observações e 3 variáveis, em
 #'     que
 #'
@@ -19,9 +19,7 @@
 #'
 #' }
 #' @keywords DBI
-#' @source Ramalho, M. A. P., Ferreira, D. F., Oliveira, A. C. (2005).
-#'     Experimentação em Genética e Melhoramento de Plantas (2th ed.).
-#'     Lavras: UFLA. (pág. 181)
+#' @source RAMALHO et al. (2005), pág. 181.
 #' @examples
 #'
 #' library(lattice)
@@ -59,7 +57,8 @@
 NULL
 
 #' @name RamalhoEg11.13
-#' @title Produ\enc{çã}{ca}o de Gr\enc{ã}{a}os de Milho em Diferentes Popula\enc{çõ}{co}es
+#' @title Produ\enc{çã}{ca}o de Gr\enc{ã}{a}os de Milho em Diferentes
+#'     Popula\enc{çõ}{co}es
 #' @description Experimento envolvendo populações de milho no
 #'     delinemanto em blocos aumentados com 4 populações comuns e 25
 #'     populações regulares.
@@ -80,9 +79,7 @@ NULL
 #'
 #' }
 #' @keywords DBI
-#' @source Ramalho, M. A. P., Ferreira, D. F., Oliveira, A. C. (2005).
-#'     Experimentação em Genética e Melhoramento de Plantas (2th ed.).
-#'     Lavras: UFLA. (Exemplo 11.13, pág. 188)
+#' @source RAMALHO et al. (2005), Exemplo 11.13, pág. 188.
 #' @examples
 #'
 #' library(lattice)
@@ -117,9 +114,7 @@ NULL
 #'
 #' }
 #' @keywords DBI
-#' @source Ramalho, M. A. P., Ferreira, D. F., Oliveira, A. C. (2005).
-#'     Experimentação em Genética e Melhoramento de Plantas (2th ed.).
-#'     Lavras: UFLA. (pág. 171)
+#' @source RAMALHO et al. (2005), pág. 171.
 #' @examples
 #'
 #' library(lattice)
@@ -157,7 +152,8 @@ NULL
 NULL
 
 #' @name RamalhoEg12.10
-#' @title Ensaio Dialelo para o Tempo At\enc{é}{e} o Florescimento do Feijoeiro
+#' @title Ensaio Dialelo para o Tempo At\enc{é}{e} o Florescimento do
+#'     Feijoeiro
 #' @description Dados referentes ao cruzamento dialelo realizado por
 #'     Arriel et al. (1993), em que foi avaliado o número de dias para o
 #'     florescimento do feijoeiro para cada progenie.
@@ -174,9 +170,7 @@ NULL
 #'
 #' }
 #' @keywords Dialelo
-#' @source Ramalho, M. A. P., Ferreira, D. F., Oliveira, A. C. (2005).
-#'     Experimentação em Genética e Melhoramento de Plantas (2th ed.).
-#'     Lavras: UFLA. (Exemplo 12.10, pág. 227)
+#' @source RAMALHO et al. (2005), Exemplo 12.10, pág. 227.
 #'
 #'     Arriel, E., Ramalho, M. A. P., Pacheco, C. A. P. Expected and
 #'     Realized Gains in the CMS-39 Maize Population after three Cycles
@@ -202,7 +196,8 @@ NULL
 NULL
 
 #' @name RamalhoEg13.2
-#' @title Produ\enc{çã}{ca}o de Gr\enc{ã}{a}os de Milho em Cons\enc{ó}{o}rcio com Feij\enc{ã}{a}o.
+#' @title Produ\enc{çã}{ca}o de Gr\enc{ã}{a}os de Milho em
+#'     Cons\enc{ó}{o}rcio com Feij\enc{ã}{a}o.
 #' @description Dados referente ao experimento conduzido por Rezende et
 #'     al. (1994), envolvendo 4 cultivares de milho consorciadas com 3
 #'     de feijão.
@@ -225,9 +220,7 @@ NULL
 #'
 #' }
 #' @keywords COV FAT2 DBC
-#' @source Ramalho, M. A. P., Ferreira, D. F., Oliveira, A. C. (2005).
-#'     Experimentação em Genética e Melhoramento de Plantas (2th ed.).
-#'     Lavras: UFLA. (Exemplo 13.2, pág. 237)
+#' @source RAMALHO et al. (2005), Exemplo 13.2, pág. 237.
 #'
 #'     Rezende, G. D. S. P.; Ramalho, M. A. P. Competitive Ability of
 #'     Maize and Commom Bean (Phaseolus Vulgaris L.) Cultivars
@@ -256,7 +249,8 @@ NULL
 NULL
 
 #' @name RamalhoEg4.3
-#' @title Porcentagem de absor\enc{çã}{ca}o de \enc{á}{a}gua de feij\enc{ã}{a}o
+#' @title Porcentagem de absor\enc{çã}{ca}o de \enc{á}{a}gua de
+#'     feij\enc{ã}{a}o
 #' @description Experimento conduzido na Universidade Federal de Lavras,
 #'     avaliando a porcentagem de absorção de água de 10 linhares de
 #'     feijão. O delineamento é inteiramente ao acaso com 3 repetições.
@@ -275,9 +269,7 @@ NULL
 #'
 #' }
 #' @keywords DIC
-#' @source Ramalho, M. A. P., Ferreira, D. F., Oliveira, A. C. (2005).
-#'     Experimentação em Genética e Melhoramento de Plantas (2th ed.).
-#'     Lavras, MG: UFLA. (Exemplo 4.3, pág 56)
+#' @source RAMALHO et al. (2005), Exemplo 4.3, pág 56.
 #' @examples
 #'
 #' library(lattice)
@@ -307,9 +299,7 @@ NULL
 #'
 #' }
 #' @keywords DBC
-#' @source Ramalho, M. A. P., Ferreira, D. F., Oliveira, A. C. (2005).
-#'     Experimentação em Genética e Melhoramento de Plantas (2th ed.).
-#'     Lavras: UFLA. (pg 62)
+#' @source RAMALHO et al. (2005), pág. 62.
 #' @examples
 #'
 #' library(lattice)
@@ -323,7 +313,8 @@ NULL
 NULL
 
 #' @name RamalhoEg7.8
-#' @title Produ\enc{çã}{ca}o de Gr\enc{ã}{a}os de Cruzamentos Feij\enc{ã}{a}o
+#' @title Produ\enc{çã}{ca}o de Gr\enc{ã}{a}os de Cruzamentos
+#'     Feij\enc{ã}{a}o
 #' @description Experimento referente à produção de grãos de feijão
 #'     obtida na avaliação de 24 famílias \eqn{F_{5}} do cruzamento
 #'     Jalo x Small White, cujos dados foram obtidos por Souza (1991).
@@ -346,9 +337,7 @@ NULL
 #'
 #' }
 #' @keywords DBC
-#' @source Ramalho, M. A. P., Ferreira, D. F., Oliveira, A. C. (2005).
-#'     Experimentação em Genética e Melhoramento de Plantas (2th ed.).
-#'     Lavras, MG: UFLA. (Exemplo 7.8, pág 110).
+#' @source RAMALHO et al. (2005), Exemplo 7.8, pág. 110.
 #' @examples
 #'
 #' library(lattice)
@@ -372,7 +361,8 @@ NULL
 NULL
 
 #' @name RamalhoEg8.1
-#' @title Produ\enc{çã}{ca}o de Gr\enc{ã}{a}os em Cultivares de Feij\enc{ã}{a}o
+#' @title Produ\enc{çã}{ca}o de Gr\enc{ã}{a}os em Cultivares de
+#'     Feij\enc{ã}{a}o
 #' @description Experimentos para medir a produção de grãos de
 #'     cultivares de feijão, conduzidos em Lavras e Patos de Minas/MG
 #'     durante o ano de 1990 em delineamento em blocos casualizados.
@@ -394,9 +384,7 @@ NULL
 #'
 #' }
 #' @keywords DBC GE
-#' @source Ramalho, M. A. P., Ferreira, D. F., Oliveira, A. C. (2005).
-#'     Experimentação em Genética e Melhoramento de Plantas (2th ed.).
-#'     Lavras: UFLA. (Exemplo 8.1, pág. 115)
+#' @source RAMALHO et al. (2005), Exemplo 8.1, pág. 115.
 #' @examples
 #'
 #' library(lattice)
@@ -423,7 +411,8 @@ NULL
 NULL
 
 #' @name RamalhoEg8.8
-#' @title Produ\enc{çã}{ca}o de Gr\enc{ã}{a}os de Feij\enc{ã}{a}o de Popula\enc{çõ}{co}es Segregantes
+#' @title Produ\enc{çã}{ca}o de Gr\enc{ã}{a}os de Feij\enc{ã}{a}o de
+#'     Popula\enc{çõ}{co}es Segregantes
 #' @description Dados da produção de grãos de feijão obtidos por Corte
 #'     et al. (2002) relativos à avaliação de 6 populações segregantes
 #'     avaliadas nas gerações F\eqn{_{2}}, F\eqn{_{3}} e F\eqn{_{4}} com
@@ -448,9 +437,7 @@ NULL
 #'
 #' }
 #' @keywords DBC GE
-#' @source Ramalho, M. A. P., Ferreira, D. F., Oliveira, A. C. (2005).
-#'     Experimentação em Genética e Melhoramento de Plantas (2th ed.).
-#'     Lavras: UFLA. (Tabela 8.8, pág. 123)
+#' @source RAMALHO et al. (2005), Tabela 8.8, pág. 123.
 #'
 #'     Corte, H. R., Ramalho, M. A. P., Gonçalves, F. M. A., Abreu. A de
 #'     F. B. Natural Selection for Grain Yield in Dry Bean Population
@@ -486,9 +473,7 @@ NULL
 #'     Gerais.
 #' @format Vetor com 100 observações altura das plantas em metros.
 #' @keywords AAS
-#' @source Ramalho, M. A. P., Ferreira, D. F., Oliveira, A. C. (2005).
-#'     Experimentação em Genética e Melhoramento de Plantas (2th ed.).
-#'     Lavras, MG: UFLA. (pg 26)
+#' @source RAMALHO et al. (2005), pág. 26.
 #'
 #'     Castro, N. H. A., Andrade, H. B., Ramalho, m A. P. (1993).
 #'     Revista Árvore. Viçosa, v. 17, n.2.
@@ -507,7 +492,8 @@ NULL
 NULL
 
 #' @name RamalhoEx12.2
-#' @title Dados Gen\enc{é}{e}ricos para Regress\enc{ã}{a}o M\enc{ú}{u}ltipla
+#' @title Dados Gen\enc{é}{e}ricos para Regress\enc{ã}{a}o
+#'     M\enc{ú}{u}ltipla
 #' @description Conjunto de dados apresentados para exercício. Objetivo
 #'     do exercício é estimar a equação de regressão múltipla.
 #' @format Um \code{data.frame} com 8 observações e 4 variáveis, em que
@@ -524,9 +510,7 @@ NULL
 #'
 #' }
 #' @keywords RM
-#' @source Ramalho, M. A. P., Ferreira, D. F., Oliveira, A. C. (2005).
-#'     Experimentação em Genética e Melhoramento de Plantas (2th ed.).
-#'     Lavras: UFLA. (Exercício 12.2, pág. 231)
+#' @source RAMALHO et al. (2005), Exercício 12.2, pág. 231.
 #' @examples
 #'
 #' data(RamalhoEx12.2)
@@ -562,9 +546,7 @@ NULL
 #'
 #' }
 #' @keywords COV
-#' @source Ramalho, M. A. P., Ferreira, D. F., Oliveira, A. C. (2005).
-#'     Experimentação em Genética e Melhoramento de Plantas (2th ed.).
-#'     Lavras: UFLA. (Exercício 13.1, pág. 255)
+#' @source RAMALHO et al. (2005), Exercício 13.1, pág. 255.
 #' @examples
 #'
 #' data(RamalhoEx13.1)
@@ -599,9 +581,7 @@ NULL
 #'
 #' }
 #' @keywords COV DBC
-#' @source Ramalho, M. A. P., Ferreira, D. F., Oliveira, A. C. (2005).
-#'     Experimentação em Genética e Melhoramento de Plantas (2th ed.).
-#'     Lavras: UFLA. (Exercício 13.2, pág. 256)
+#' @source RAMALHO et al. (2005), Exercício 13.2, pág. 256.
 #' @examples
 #'
 #' data(RamalhoEx13.2)
@@ -630,7 +610,8 @@ NULL
 NULL
 
 #' @name RamalhoEx13.3
-#' @title Avalia\enc{çã}{ca}o do Stay Green em Fam\enc{í}{i}lias de Feijoeiro
+#' @title Avalia\enc{çã}{ca}o do Stay Green em Fam\enc{í}{i}lias de
+#'     Feijoeiro
 #' @description Notas da avaliação do "stay green" obtidos de famílias
 #'     de feijoeiro, avaliados nas gerações \eqn{F_{2:3}}, \eqn{F_{2:4}}
 #'     e \eqn{F_{2:5}}.
@@ -648,9 +629,7 @@ NULL
 #'
 #' }
 #' @keywords COV DBC
-#' @source Ramalho, M. A. P., Ferreira, D. F., Oliveira, A. C. (2005).
-#'     Experimentação em Genética e Melhoramento de Plantas (2th ed.).
-#'     Lavras: UFLA. (Exercício 13.3, pág. 257)
+#' @source RAMALHO et al. (2005), Exercício 13.3, pág. 257.
 #' @examples
 #'
 #' data(RamalhoEx13.3)
@@ -675,7 +654,8 @@ NULL
 NULL
 
 #' @name RamalhoEx3.1
-#' @title N\enc{ú}{u}mero de plantas de milho ap\enc{ó}{o}s inocula\enc{çã}{ca}o
+#' @title N\enc{ú}{u}mero de plantas de milho ap\enc{ó}{o}s
+#'     inocula\enc{çã}{ca}o
 #' @description Experimento referente ao número de plantas de milho,
 #'     por parcela, após a inoculação com Diploidia. Experimento para
 #'     avaliação de fungicidas para tratamento de sementes.
@@ -692,9 +672,7 @@ NULL
 #'
 #' }
 #' @keywords contagem
-#' @source Ramalho, M. A. P., Ferreira, D. F., Oliveira, A. C. (2005).
-#'     Experimentação em Genética e Melhoramento de Plantas (2th ed.).
-#'     Lavras, MG: UFLA. (pg 50)
+#' @source RAMALHO et al. (2005), pág. 50.
 #'
 #' @examples
 #'
@@ -729,9 +707,7 @@ NULL
 #'
 #' }
 #' @keywords DIC desbalanceado
-#' @source Ramalho, M. A. P., Ferreira, D. F., Oliveira, A. C. (2005).
-#'     Experimentação em Genética e Melhoramento de Plantas (2th ed.).
-#'     Lavras, MG: UFLA. (Exercício 4.1, pág 66)
+#' @source RAMALHO et al. (2005), Exercício 4.1, pág. 66.
 #' @examples
 #'
 #' library(lattice)
@@ -762,9 +738,7 @@ NULL
 #'
 #' }
 #' @keywords DBC contagem
-#' @source Ramalho, M. A. P., Ferreira, D. F., Oliveira, A. C. (2005).
-#'     Experimentação em Genética e Melhoramento de Plantas (2th ed.).
-#'     Lavras, MG: UFLA. (Execício 4.2, pág 66)
+#' @source RAMALHO et al. (2005), Execício 4.2, pág. 66.
 #' @examples
 #'
 #' library(lattice)
@@ -806,9 +780,7 @@ NULL
 #'
 #' }
 #' @keywords DBC
-#' @source Ramalho, M. A. P., Ferreira, D. F., Oliveira, A. C. (2005).
-#'     Experimentação em Genética e Melhoramento de Plantas (2th ed.).
-#'     Lavras, MG: UFLA. (pg 112).
+#' @source RAMALHO et al. (2005), pág. 112.
 #' @examples
 #'
 #' library(lattice)
@@ -832,7 +804,8 @@ NULL
 NULL
 
 #' @name RamalhoEx8.1
-#' @title Produ\enc{çã}{ca}o de Gr\enc{ã}{a}os de Arroz em Munic\enc{í}{i}pios de Minas Gerais
+#' @title Produ\enc{çã}{ca}o de Gr\enc{ã}{a}os de Arroz em
+#'     Munic\enc{í}{i}pios de Minas Gerais
 #' @description Experimentos para avaliar a produção de grãos de
 #'     cultivares de arroz, conduzidos em três locais do Estado de Minas
 #'     Gerais (Lambari, Lavras e Felixlândia) em delineamento
@@ -854,9 +827,7 @@ NULL
 #'
 #' }
 #' @keywords DIC GE
-#' @source Ramalho, M. A. P., Ferreira, D. F., Oliveira, A. C. (2005).
-#'     Experimentação em Genética e Melhoramento de Plantas (2th ed.).
-#'     Lavras: UFLA. (Exercício 8.1, pág. 132)
+#' @source RAMALHO et al. (2005), Exercício 8.1, pág. 132.
 #' @examples
 #'
 #' data(RamalhoEx8.1)
@@ -928,9 +899,7 @@ NULL
 #'
 #' }
 #' @keywords DBC GE
-#' @source Ramalho, M. A. P., Ferreira, D. F., Oliveira, A. C. (2005).
-#'     Experimentação em Genética e Melhoramento de Plantas (2th ed.).
-#'     Lavras: UFLA. (Exercício 8.2, pág. 133)
+#' @source RAMALHO et al. (2005), Exercício 8.2, pág. 133.
 #' @examples
 #'
 #' library(latticeExtra)
@@ -970,10 +939,8 @@ NULL
 #'     ha\eqn{^{-1}}).}
 #'
 #' }
-#' @keywords ASS
-#' @source Ramalho, M. A. P., Ferreira, D. F., Oliveira, A. C. (2005).
-#'     Experimentação em Genética e Melhoramento de Plantas (2th ed.).
-#'     Lavras, MG: UFLA. (pg 15)
+#' @keywords AAS
+#' @source RAMALHO et al. (2005), pág 15.
 #'
 #' @examples
 #'
@@ -1015,9 +982,7 @@ NULL
 #'
 #' }
 #' @keywords DBI
-#' @source Ramalho, M. A. P., Ferreira, D. F., Oliveira, A. C. (2005).
-#'     Experimentação em Genética e Melhoramento de Plantas (2th ed.).
-#'     Lavras: UFLA. (pág. 165)
+#' @source RAMALHO et al. (2005), pág. 165.
 #' @examples
 #'
 #' library(lattice)
@@ -1079,9 +1044,7 @@ NULL
 #'
 #' }
 #' @keywords DBI
-#' @source Ramalho, M. A. P., Ferreira, D. F., Oliveira, A. C. (2005).
-#'     Experimentação em Genética e Melhoramento de Plantas (2th ed.).
-#'     Lavras: UFLA. (Tabela 11.17, pág. 193)
+#' @source RAMALHO et al. (2005), Tabela 11.17, pág. 193.
 #' @examples
 #'
 #' library(lattice)
@@ -1100,7 +1063,8 @@ NULL
 NULL
 
 #' @name RamalhoTb12.8
-#' @title Componentes da Produ\enc{çã}{ca}o de Linhagens de Feij\enc{ã}{a}o
+#' @title Componentes da Produ\enc{çã}{ca}o de Linhagens de
+#'     Feij\enc{ã}{a}o
 #' @description Dados obtidos por Perreira Filho et al. (1987),
 #'     referentes ao número médio de vagens por planta, número de
 #'     sementes por vagem, peso de 100 sementes e produção de grãos,
@@ -1125,9 +1089,7 @@ NULL
 #'
 #' }
 #' @keywords RM
-#' @source Ramalho, M. A. P., Ferreira, D. F., Oliveira, A. C. (2005).
-#'     Experimentação em Genética e Melhoramento de Plantas (2th ed.).
-#'     Lavras: UFLA. (Tabela 12.8, pág. 225)
+#' @source RAMALHO et al. (2005), Tabela 12.8, pág. 225.
 #'
 #'     Pereira Filho, I. A., Ramalho, M. A. P., Ferreira, S. Avaliação
 #'     de Progênies de Feijão e Estimativas de Parâmetros Genéticos na
@@ -1164,9 +1126,7 @@ NULL
 #'
 #' }
 #' @keywords COV
-#' @source Ramalho, M. A. P., Ferreira, D. F., Oliveira, A. C. (2005).
-#'     Experimentação em Genética e Melhoramento de Plantas (2th ed.).
-#'     Lavras: UFLA. (Tabela 13.1, pág. 233)
+#' @source RAMALHO et al. (2005), Tabela 13.1, pág. 233.
 #' @examples
 #'
 #' data(RamalhoTb13.1)
@@ -1200,9 +1160,7 @@ NULL
 #'
 #' }
 #' @keywords COV RS
-#' @source Ramalho, M. A. P., Ferreira, D. F., Oliveira, A. C. (2005).
-#'     Experimentação em Genética e Melhoramento de Plantas (2th ed.).
-#'     Lavras: UFLA. (Tabela 13.11, pág. 248)
+#' @source RAMALHO et al. (2005), Tabela 13.11, pág. 248.
 #' @examples
 #'
 #' data(RamalhoTb13.11)
@@ -1219,7 +1177,8 @@ NULL
 NULL
 
 #' @name RamalhoTb13.13
-#' @title Produ\enc{çã}{ca}o de Gr\enc{ã}{a}os de Prog\enc{ê}{e}nies de Feij\enc{ã}{a}o
+#' @title Produ\enc{çã}{ca}o de Gr\enc{ã}{a}os de Prog\enc{ê}{e}nies de
+#'     Feij\enc{ã}{a}o
 #' @description Experimento referente a avaliação de progênies
 #'     provenientes do cruzamento (ESAL 501 x Rio Tibagi), obtidos em 3
 #'     gerações (F3, F4 e F5). Foi utilizado o delineamento de blocos
@@ -1238,9 +1197,7 @@ NULL
 #'
 #' }
 #' @keywords COV DBC
-#' @source Ramalho, M. A. P., Ferreira, D. F., Oliveira, A. C. (2005).
-#'     Experimentação em Genética e Melhoramento de Plantas (2th ed.).
-#'     Lavras: UFLA. (Tabela 13.13, pág. 251)
+#' @source RAMALHO et al. (2005), Tabela 13.13, pág. 251.
 #' @examples
 #'
 #' data(RamalhoTb13.13)
@@ -1281,9 +1238,7 @@ NULL
 #'
 #' }
 #' @keywords COV RS
-#' @source Ramalho, M. A. P., Ferreira, D. F., Oliveira, A. C. (2005).
-#'     Experimentação em Genética e Melhoramento de Plantas (2th ed.).
-#'     Lavras: UFLA. (Tabela 13.15, pág. 252)
+#' @source RAMALHO et al. (2005), Tabela 13.15, pág. 252.
 #' @examples
 #'
 #' data(RamalhoTb13.15)
@@ -1302,7 +1257,8 @@ NULL
 NULL
 
 #' @name RamalhoTb13.6
-#' @title Produ\enc{çã}{ca}o de Gr\enc{ã}{a}os de Feij\enc{ã}{a}o e Teor de \eqn{P_{2}O_{5}}
+#' @title Produ\enc{çã}{ca}o de Gr\enc{ã}{a}os de Feij\enc{ã}{a}o e Teor
+#'     de \eqn{P_{2}O_{5}}
 #' @description Experimento apresentado por Pereira (1993) referente a
 #'     avaliação da produção de feijão e teor de \eqn{P_{2}O_{5}} em
 #'     cada parcela, cujos dados foram obtidos de 10 cultivares de
@@ -1325,9 +1281,8 @@ NULL
 #'
 #' }
 #' @keywords COV DBC
-#' @source Ramalho, M. A. P., Ferreira, D. F., Oliveira, A. C. (2005).
-#'     Experimentação em Genética e Melhoramento de Plantas (2th ed.).
-#'     Lavras: UFLA. (Tabela 13.6, pág. 243 e tabela 13.9, pág. 246)
+#' @source RAMALHO et al. (2005), Tabela 13.6, pág. 243 e tabela 13.9,
+#'     pág. 246.
 #'
 #'     Pereira, A. F. Emprego de Covariância visando reduzir o efeito da
 #'     heterogeneidade Ambiental nos Experimentos com a Cultura do
@@ -1395,9 +1350,7 @@ NULL
 #'
 #' }
 #' @keywords DIC contagem
-#' @source Ramalho, M. A. P., Ferreira, D. F., Oliveira, A. C. (2005).
-#'     Experimentação em Genética e Melhoramento de Plantas (2th ed.).
-#'     Lavras, MG: UFLA. (pg 43)
+#' @source RAMALHO et al. (2005), pág. 43.
 #'
 #' @examples
 #'
@@ -1464,9 +1417,7 @@ NULL
 #'
 #' }
 #' @keywords DBC
-#' @source Ramalho, M. A. P., Ferreira, D. F., Oliveira, A. C. (2005).
-#'     Experimentação em Genética e Melhoramento de Plantas (2th ed.).
-#'     Lavras, MG: UFLA. (pg 45)
+#' @source RAMALHO et al. (2005), pág 45.
 #'
 #' @examples
 #'
@@ -1497,9 +1448,7 @@ NULL
 #'
 #' }
 #' @keywords DBC
-#' @source Ramalho, M. A. P., Ferreira, D. F., Oliveira, A. C. (2005).
-#'     Experimentação em Genética e Melhoramento de Plantas (2th ed.).
-#'     Lavras, MG: UFLA. (pg 48)
+#' @source RAMALHO et al. (2005), pág. 48.
 #'
 #' @examples
 #'
@@ -1533,9 +1482,7 @@ NULL
 #'
 #' }
 #' @keywords DBC
-#' @source Ramalho, M. A. P., Ferreira, D. F., Oliveira, A. C. (2005).
-#'     Experimentação em Genética e Melhoramento de Plantas (2th ed.).
-#'     Lavras, MG: UFLA. (Tabela 7.1, pág 102).
+#' @source RAMALHO et al. (2005), Tabela 7.1, pág 102.
 #' @examples
 #'
 #' library(lattice)
@@ -1554,7 +1501,8 @@ NULL
 NULL
 
 #' @name RamalhoTb8.12
-#' @title Produ\enc{çã}{ca}o M\enc{é}{e}dia de Gr\enc{ã}{a}os de Caf\enc{é}{e}-cereja
+#' @title Produ\enc{çã}{ca}o M\enc{é}{e}dia de Gr\enc{ã}{a}os de
+#'     Caf\enc{é}{e}-cereja
 #' @description Experimento que estudou a produção média de grãos de
 #'     café-cereja, obtidos por Mendes (1994), em função da progênie em
 #'     3 anos. Foi utilizado o delineamento de blocos casualizados.
@@ -1578,9 +1526,7 @@ NULL
 #'
 #' }
 #' @keywords DBC GE
-#' @source Ramalho, M. A. P., Ferreira, D. F., Oliveira, A. C. (2005).
-#'     Experimentação em Genética e Melhoramento de Plantas (2th ed.).
-#'     Lavras: UFLA. (pág. 128)
+#' @source RAMALHO et al. (2005), pág. 128.
 #'
 #'     Mendes, A. N. G. Avaliação de Metodologias Empregadas na Seleção
 #'     de Progênies do Cafeeiro (Coffea arabica L.) no estado de Minas
@@ -1610,4 +1556,3 @@ NULL
 #'           FUN = function(x) { c(mean = mean(x), var = var(x)) })
 #'
 NULL
-
diff --git a/R/Storck.R b/R/Storck.R
index 98d7b456..59ef5d36 100644
--- a/R/Storck.R
+++ b/R/Storck.R
@@ -25,9 +25,7 @@
 #'
 #' }
 #' @keywords DQL
-#' @source Storck, L., Garcia, B. C., Lopes, S. J., Estefanel,
-#'     V. (2011). Experimentação Vegetal (3th ed.). Santa Maria, RS:
-#'     UFSM. (Tabela 2.3.5, pág 63)
+#' @source STORCK et al. (2011), Tabela 2.3.5, pág. 63.
 #' @examples
 #'
 #' library(lattice)
@@ -41,7 +39,8 @@
 NULL
 
 #' @name StorckTb101
-#' @title Grupo de Experimentos de Competi\enc{çã}{ca}o de Cultivares de Milho
+#' @title Grupo de Experimentos de Competi\enc{çã}{ca}o de Cultivares de
+#'     Milho
 #' @description Grupo de experimentos, avaliando 6 cultivres de milho,
 #'     conduzidos em 4 locais (4 ambientes) da região central d Rio
 #'     Grande do Sul, no delineamento de blocos ao acaso com 4
@@ -63,9 +62,7 @@ NULL
 #'
 #' }
 #' @keywords GE DBC
-#' @source Storck, L., Garcia, B. C., Lopes, S. J., Estefanel,
-#'     V. (2011). Experimentação Vegetal (3th ed.). Santa Maria, RS:
-#'     UFSM. (Tabela 101, pág. 182)
+#' @source STORCK et al. (2011), Tabela 101, pág. 182.
 #' @examples
 #'
 #' library(lattice)
@@ -98,9 +95,7 @@ NULL
 #'
 #' }
 #' @keywords DIC
-#' @source Storck, L., Garcia, B. C., Lopes, S. J., Estefanel,
-#'     V. (2011). Experimentação Vegetal (3th ed.). Santa Maria, RS:
-#'     UFMS. (Tabela 2, pág. 21)
+#' @source STORCK et al. (2011), Tabela 2, pág. 21.
 #' @examples
 #'
 #' library(lattice)
@@ -134,9 +129,7 @@ NULL
 #'
 #' }
 #' @keywords DBC FAT2
-#' @source Storck, L., Garcia, B. C., Lopes, S. J., Estefanel,
-#'     V. (2011). Experimentação Vegetal (3th ed.). Santa Maria, RS:
-#'     UFSM.  (Tabela 56, pg 134)
+#' @source STORCK et al. (2011), Tabela 56, pg 134.
 #' @examples
 #'
 #' library(lattice)
@@ -174,9 +167,7 @@ NULL
 #'
 #' }
 #' @keywords DBC FAT2
-#' @source Storck, L., Garcia, B. C., Lopes, S. J., Estefanel,
-#'     V. (2011). Experimentação Vegetal (3th ed.). Santa Maria, RS:
-#'     UFSM. (Tabela 60, pág. 138)
+#' @source STORCK et al. (2011), Tabela 60, pág. 138.
 #' @examples
 #'
 #' library(lattice)
@@ -194,7 +185,8 @@ NULL
 NULL
 
 #' @name StorckTb67
-#' @title Efeito da Dose de NPK na Produ\enc{çã}{ca}o de Cultivares de Milho
+#' @title Efeito da Dose de NPK na Produ\enc{çã}{ca}o de Cultivares de
+#'     Milho
 #' @description Resultados ficitícios (kg/parcela) de um experimento
 #'     bifatorial 3 \eqn{\times} 5 no delineamento de blocos ao acaso
 #'     com 4 repetições.
@@ -215,9 +207,7 @@ NULL
 #'
 #' }
 #' @keywords DBC FAT2
-#' @source Storck, L., Garcia, B. C., Lopes, S. J., Estefanel,
-#'     V. (2011). Experimentação Vegetal (3th ed.). Santa Maria, RS:
-#'     UFSM. (Tabela 67, pág. 144)
+#' @source STORCK et al. (2011), Tabela 67, pág. 144.
 #' @examples
 #'
 #' library(lattice)
@@ -236,7 +226,8 @@ NULL
 
 #' @name StorckTb74
 #' @aliases StorckTb88
-#' @title \enc{É}{E}poca e Densidade de Semeadura na Produ\enc{çã}{ca}o de Milho
+#' @title \enc{É}{E}poca e Densidade de Semeadura na Produ\enc{çã}{ca}o
+#'     de Milho
 #' @description Resultados ficitícios de um experimento fatorial 3
 #'     \eqn{\times} 5 no delineamento de blocos ao acaso, com arranjo
 #'     dos fatores em parcela subdividida, que estudou o efeito da época
@@ -270,9 +261,8 @@ NULL
 #'     portanto uma verdadeira restrição de casualização (como acontece
 #'     com camadas do solo ou tempo) mas sim uma dificuldade logística.
 #' @keywords DIC FAT2 PS
-#' @source Storck, L., Garcia, B. C., Lopes, S. J., Estefanel,
-#'     V. (2011). Experimentação Vegetal (3th ed.). Santa Maria, RS:
-#'     UFSM. (Tabela 74, pág. 150 e Tabela 88, pág. 168)
+#' @source STORCK et al. (2011), Tabela 74, pág. 150 e Tabela 88,
+#'     pág. 168.
 #' @examples
 #'
 #' library(lattice)
@@ -310,9 +300,7 @@ NULL
 #'
 #' }
 #' @keywords DIC
-#' @source Storck, L., Garcia, B. C., Lopes, S. J., Estefanel,
-#'     V. (2011). Experimentação Vegetal (3th ed.). Santa Maria, RS:
-#'     UFSM. (Tabela 8, pág. 33)
+#' @source STORCK et al. (2011), Tabela 8, pág. 33.
 #' @examples
 #'
 #' library(lattice)
@@ -324,4 +312,3 @@ NULL
 #'        xlab = "Tratamentos", ylab = "Resposta")
 #'
 NULL
-
diff --git a/R/Vieira.R b/R/Vieira.R
index 6458fb82..59da02e5 100644
--- a/R/Vieira.R
+++ b/R/Vieira.R
@@ -1,6 +1,6 @@
 #' @name VieiraEx7.3
-#' @title Experimento de um Fator em DIC com N\enc{ú}{u}mero Diferente de
-#'     Repeti\enc{çõ}{co}es
+#' @title Experimento de um Fator em DIC com N\enc{ú}{u}mero Diferente
+#'     de Repeti\enc{çõ}{co}es
 #' @description Dados de um experimento inteiramente ao acaso com número
 #'     diferente de repetições.
 #' @format Um \code{data.frame} com 18 observações e 2 variáveis, em que
@@ -15,8 +15,7 @@
 #'
 #' }
 #' @keywords DIC
-#' @source Vieira, S. (1999). Estatística experimental (2th ed.).
-#'     São Paulo, SP: Atlas. (Exercício 7.3, pág. 85).
+#' @source VIEIRA (1999), Exercício 7.3, pág. 85.
 #' @examples
 #'
 #' data(VieiraEx7.3)
@@ -32,7 +31,8 @@
 NULL
 
 #' @name VieiraEx7.5
-#' @title Experimento Com Um Fator e Repeti\enc{çã}{ca}o Dentro dos Blocos
+#' @title Experimento Com Um Fator e Repeti\enc{çã}{ca}o Dentro dos
+#'     Blocos
 #' @description Dados de um experimento em delineamento de blocos
 #'     casualizados com repetição de tratamentos dentro dos blocos.
 #' @format Um \code{data.frame} com 12 observações e 3 variáveis, em que
@@ -49,8 +49,7 @@ NULL
 #'
 #' }
 #' @keywords DBC
-#' @source Vieira, S. (1999). Estatística experimental (2th ed.).  São
-#'     Paulo, SP: Atlas. (Exercício 7.5, pág. 85).
+#' @source VIEIRA (1999), Exercício 7.5, pág. 85.
 #' @examples
 #'
 #' library(lattice)
@@ -67,7 +66,8 @@ NULL
 NULL
 
 #' @name VieiraEx8.3
-#' @title Experimento Em Blocos Casualizados Com Repeti\enc{çõ}{co}es Nos Blocos
+#' @title Experimento Em Blocos Casualizados Com Repeti\enc{çõ}{co}es
+#'     Nos Blocos
 #' @description Dados de um experimento em delineamento em blocos
 #'     casualizados com repetições dos tratamentos dentro dos blocos.
 #' @format Um \code{data.frame} com 24 observações e 3 variáveis, em que
@@ -85,8 +85,7 @@ NULL
 #'
 #' }
 #' @keywords DBC
-#' @source Vieira, S. (1999). Estatística experimental (2th ed.).
-#'     São Paulo, SP: Atlas. (Exercício 8.3, pág. 102).
+#' @source VIEIRA (1999), Exercício 8.3, pág. 102.
 #' @examples
 #'
 #' library(lattice)
@@ -117,8 +116,7 @@ NULL
 #'
 #' }
 #' @keywords DIC
-#' @source Vieira, S. (1999). Estatística experimental (2th ed.). São
-#'     Paulo, SP: Atlas. (pág. 50, exercício 2).
+#' @source VIEIRA (1999), pág. 50, exercício 2.
 #' @examples
 #'
 #' data(VieiraPg50.1)
@@ -152,8 +150,7 @@ NULL
 #'
 #' }
 #' @keywords DIC
-#' @source Vieira, S. (1999).  Estatística experimental (2th ed.).  São
-#'     Paulo, SP: Atlas. (pág. 50, Exercício 4).
+#' @source VIEIRA (1999), pág. 50, Exercício 4.
 #' @examples
 #'
 #' data(VieiraPg50.2)
@@ -186,8 +183,7 @@ NULL
 #'
 #' }
 #' @keywords DBC
-#' @source Vieira, S. (1999).  Estatística experimental (2th ed.).  São
-#'     Paulo, SP: Atlas. (pág. 57, exercício 3).
+#' @source VIEIRA (1999), pág. 57, exercício 3 .
 #' @examples
 #'
 #' data(VieiraPg57.1)
@@ -219,8 +215,7 @@ NULL
 #'
 #' }
 #' @keywords DBC
-#' @source Vieira, S. (1999). Estatística experimental (2th ed.).  São
-#'     Paulo, SP: Atlas. (pág. 57, exercício 4).
+#' @source VIEIRA (1999), pág. 57, exercício 4 .
 #' @examples
 #'
 #' data(VieiraPg57.2)
@@ -252,8 +247,7 @@ NULL
 #'
 #' }
 #' @keywords DIC
-#' @source Vieira, S. (1999). Estatística experimental (2th ed.). São
-#'     Paulo, SP: Atlas. (pág 44, tabela 4.1).
+#' @source VIEIRA (1999), pág 44, tabela 4.1.
 #' @examples
 #'
 #' data(VieiraTb4.1)
@@ -285,8 +279,7 @@ NULL
 #'
 #' }
 #' @keywords DBC
-#' @source Vieira, S. (1999).  Estatística experimental (2th ed.).  São
-#'     Paulo, SP: Atlas. (pág. 53, tabela 5.3).
+#' @source VIEIRA (1999), pág. 53, tabela 5.3 .
 #' @examples
 #'
 #' data(VieiraTb5.3)
@@ -303,7 +296,8 @@ NULL
 NULL
 
 #' @name VieiraTb7.2
-#' @title N\enc{ú}{u}meros de Ovos de Poedeiras em Fun\enc{çã}{ca}o do Estilo Musical
+#' @title N\enc{ú}{u}meros de Ovos de Poedeiras em Fun\enc{çã}{ca}o do
+#'     Estilo Musical
 #' @description Dados que refere-se ao número de ovos por poedeira 35
 #'     dias após o início do experimento em função do estilo musical do
 #'     som ambiente: música sertaneja (a), música clássica (b) e música
@@ -320,8 +314,7 @@ NULL
 #'
 #' }
 #' @keywords DIC
-#' @source Vieira, S. (1999). Estatística experimental (2th ed.).
-#'     São Paulo, SP: Atlas. (Tabela 7.2, pág. 74).
+#' @source VIEIRA (1999), Tabela 7.2, pág. 74 .
 #' @examples
 #'
 #' data(VieiraTb7.2)
@@ -336,7 +329,8 @@ NULL
 NULL
 
 #' @name VieiraTb7.7
-#' @title Teste Sobre Conhecimento em Fun\enc{çã}{ca}o da Fonte de Informa\enc{çã}{ca}o
+#' @title Teste Sobre Conhecimento em Fun\enc{çã}{ca}o da Fonte de
+#'     Informa\enc{çã}{ca}o
 #' @description Dados referentes às notas dos alunos em um teste de
 #'      conhecimento segundo a fonte de informação (tratamento).
 #' @format Um \code{data.frame} com 24 observações e 3 variáveis, em que
@@ -354,8 +348,7 @@ NULL
 #'
 #' }
 #' @keywords DBC
-#' @source Vieira, S. (1999). Estatística experimental (2th ed.).
-#'     São Paulo, SP: Atlas. (Tabela 7.7, pág. 81; Tabela 8.2, pág. 94).
+#' @source VIEIRA (1999), Tabela 7.7, pág. 81; Tabela 8.2, pág. 94 .
 #' @examples
 #'
 #' library(lattice)
@@ -371,7 +364,8 @@ NULL
 NULL
 
 #' @name VieiraTb8.5
-#' @title N\enc{ú}{u}mero de Itens Produzidos Em Fun\enc{çã}{ca}o do Tipo de M\enc{á}{a}quina
+#' @title N\enc{ú}{u}mero de Itens Produzidos Em Fun\enc{çã}{ca}o do
+#'     Tipo de M\enc{á}{a}quina
 #' @description Os dados advém de um experimento no qual foram
 #'     comparados cinco tipos de máquinas, operadas por três diferentes
 #'     operadores (blocos).  O objetivo era verificar a suspeita de que
@@ -397,8 +391,7 @@ NULL
 #'
 #' }
 #' @keywords DBC
-#' @source Vieira, S. (1999). Estatística experimental (2th ed.).
-#'     São Paulo, SP: Atlas. (Tabela 8.5, pág. 98).
+#' @source VIEIRA (1999), Tabela 8.5, pág. 98 .
 #' @examples
 #'
 #' library(lattice)
@@ -414,4 +407,3 @@ NULL
 #'        xlab = "Tipo de máquina")
 #'
 NULL
-
-- 
GitLab


From 75b0efd57483fe32fa626f85385a10ff05c124ad Mon Sep 17 00:00:00 2001
From: Walmes Zeviani <walmes@ufpr.br>
Date: Mon, 22 Aug 2016 00:05:18 -0300
Subject: [PATCH 02/10] =?UTF-8?q?Adiciona=20documenta=C3=A7=C3=A3o=20da=20?=
 =?UTF-8?q?tabela=20de=20keywords.?=
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

---
 R/keywords.R      |  34 ++++++++++++++++++++++++++++++++++
 data/keywords.rda | Bin 0 -> 2784 bytes
 2 files changed, 34 insertions(+)
 create mode 100644 R/keywords.R
 create mode 100644 data/keywords.rda

diff --git a/R/keywords.R b/R/keywords.R
new file mode 100644
index 00000000..fdd702bc
--- /dev/null
+++ b/R/keywords.R
@@ -0,0 +1,34 @@
+#' @name keywords
+#' @title Keywords para Classificar os Conjuntos de Dados
+#' @description As keywords servem para classificar os conjuntos de
+#'     dados por características que definem, geralmente, o tipo de
+#'     análise a ser aplicada aos dados. Isso orienta os estudantes e
+#'     professores a escolherem os conjuntos de dados para listas de
+#'     exercício, por exemplo.
+#' @format Um \code{data.frame} com 596 observações e 2 variáveis, em
+#'     que
+#'
+#' \describe{
+#'
+#' \item{\code{name}}{Nome do conjunto de dados no pacote labestData.}
+#'
+#' \item{\code{keyword}}{Keyword atribuída ao conjunto de dados.}
+#'
+#' }
+#' @examples
+#'
+#' data(keywords)
+#' str(keywords)
+#'
+#' library(lattice)
+#'
+#' tb <- table(keywords$keyword)
+#'
+#' barchart(sort(tb),
+#'          ylab = "Keyword",
+#'          xlab = "Frequência absoluta")
+#'
+#' subset(keywords, keyword == c("DBI"))
+#' subset(keywords, keyword %in% c("proporção", "contagem"))
+#'
+NULL
diff --git a/data/keywords.rda b/data/keywords.rda
new file mode 100644
index 0000000000000000000000000000000000000000..aad0d2e90dd696b5e7aa19a85b8e26f7935b28b0
GIT binary patch
literal 2784
zcmZ>Y%CIzaj8qGb%z1Yxm_hXB|11At;N9N~_V53HaA4qA!ok46{D4<qL2mo@72)gq
z4lo}0#qYp#)<18%+~f1nH;h7gO*~tKeWlc9&30S9(BIcT@Tu*}CCR~G{Wa=*0~i<>
znB5#sWSE>_^;C9XT)>dQz{|kazyJb_lYJ&vH5wW)%n)W^VDMoOY<9?CU|?YKRhlqs
z7FSw8Rl|iZ4h+1!AhjUe<?FU=rdGA9`2sal<;$8|O+L*Fe9Gg#;=*MI#swL?3=Ae2
z9Ft~=oSMI?ex;3Pm)TWY1vbZ5nalbE7uY&5FkE0@U^r0_n^!aU<N{rd%p2LVNi5qh
zg*aI1ty1e1Tditc;nc>l=U&S>sZTA}QskB}y;jlMxhK~%uyTP*J)g^>Rqra)&S^y`
z#pSS+DSCYjI^n!DRN(NjgmRe%2IIyv9w8iTzA@hv&f2O>c{=$%ldO53lTEvUvbDzQ
z`gNPmeS9wO@^sxkjZ0h{UsemX8P1%0>1n#RcJqY(ChuF!^Okq&)#NgS2rQ3%Cv|XE
z(&^MGc8iS!&&%W=-tz9n+qo=uKcn6UyDY4qoprNS_K>*WWz)k&SGO}ii1`{O8+OFk
zYTus_)6?Gqs~z7RmwVJwQ}BkJcb{BuO|ilY^Hm`dUQ*#X8_g`EIn%hG&fF$ax?8`y
zeM;anwzNR+nUmQU-nx8>Q>4VZx_q79%lVsnlfH_WDosAKQSlmA!Vdm~2bTGo3W*cu
z^eJ&KH+gvV$%ofXuOA$_@#JUI`4)qp(@#$MwykE4WrbDYp3MjM>G7L<40f#!3ZI?J
zb>vZ$^yPVbqEDEAb@yJKBCZ*rY4SRR@5=5w6OPV*`M%=+{#Zfbt}Qk5-MZvLl6Oz5
zoA*^f&{;hD&f9-st4ba+t7tN`zc4+v;FyG~t4v|*0}rMg2395cuaD9hVst_$Cj9WK
zWoUdpp~s;s`oZtDzjhzY+SIqMBY*CmOY0xkbUmEZF2=QDUFf{bI~R^z6wnAbWXF}O
z_VDgImss|g9kUlomWyfm@I}mMzP~ff|JvIVOAo3n5Gh>fbMUByk0#63(zdYTJBl8M
zmdw3YRJlBNiZRQFTiaK!6h9~@?WrjB^3#g68QY)#h)H#G3(ah^)nR(KSzUE)8k4L^
z6i1MZR~)b8_NAs}@ADL{Xa+a_m}(^=XyVEtq^0QMa#pF^YMy-U7a5Cn&$}x4WWuWt
z_Z({Yet?x#=H;D-*3*g}^-3u{Uq5sDiKDJTlf9PCz3TYmg2kh}Pss)u&+-}PFuj>H
zbHf%U9kD_su9OEJFT2mZJea|}-6~S?(wrW-i7$3IcW|wdaCT+tnX#8m_|%M-*O*?e
z$k6BU$v;2q^@d41AFU5yoFL>N;-tmVepYOfkw)327hPOml(bZunkBe@IEHg{EM2sq
zr-|ctyW2#8+|;`XLc7+t?$V#la+vjWuG4obH=h$O=eb1OWQxNMUD|B2S4&(e@(6cI
zBa4@wj7_%;izD0BOHJQ=Is{nM4t!d3_^yE`Yq(y*Stp;#8#pdZf2hl(Vz<R&o7$B<
zC$49*&boGYhwFtMR~OB3Rrs0u)zA4Nzta-8m;Al`()oHkd$z3<Z+z9VymljtYxISQ
zIxWj@3Yoho3omk8xViDzf{(%*8jd`eyim#0PwusWi*)ctr?}4TtF#_+XRH*_(TFhH
z=Gx$Nu#vN2!t%S;W@_eI6B@;GB5t4FeRumd0cEzsw@-8IOr5bhIYC=U>#K;y>29$}
zV$7G%bX6JhInSJu=-pYQazZh~ndy3F4$}iA9|h;lJC1LP@m|fXAhxQ|$6=4p5wS%s
zo8R8(F_3kWWWBXv$LSe`!UE5F!&)>#`P#ofV@Q`!5#UU56cy}}?P<Eka``;-?eF%-
z1is6BXP9#_Az|939uEClMJ<=lY+-T^&I`EC2G`7<Wu2vaC}!oHcY2dHC-S-76*x4-
zbCTf}qZ3oabY`qq)<`*Al4!Qj?d}2XrPDH(Ia#otZ1&8abSj<6Po1IAVA7;HLX&hR
zo$^+hta358K-{Ly!|U**wH$KtT9ZZBth}A`>9K0a5tj6JTlciZ4Cg*iV_FgD%B9Am
zyZ6Z|lhX#p+|yp=&D=Rjl$GhFQ-6i^^+^TByIK=;tZr%D3V3yD!<#2YGaRxE+mrl$
z&UkdVtsv%(MN#5mqlbCZ@>{=8(`j^l`}4x#eC;!;QW-l+Tvlv$j`q|%w>OnzDUa2=
z-P4)guGQQ+vwC`i$#Us~$L2`#J-0PnY-KFrE_~p@qX02&Yc5%<G|xr3vXQ$rbM`h)
zdiSzpj<n{nBWHv(5Bdl<&25~0`(XMM9_yaDk*j*VPcOcnczDXDB{$pJ(!<_!9&CFz
zE7wBpX;`m!vy0}5*Sks|m6yzmyx(WZ9GLCWeR)U8>$^KXid>VPId`YSIql_!n#ZMX
zSRT-m^h!8uRCbu>(Y<>rT0XZ=EcTi7ATFIvCUNJCw8ZR#w@)`ODoQclnbD+FwD^p7
z7ca-GrAlf(4w`#^_uUss`}E^;M1haV-}VJIcZ)ZkoGLE%@QhNq-BZQ4+)m44*Xr3C
zZf0(O@u0O$kYkf!*URTqUdyt}U7S_%dFK2TvnM=Ru(OI$;B-N`>#uV`9{B<-jn%79
z+&PthZtBAgwJ)lsCH{@ba&7zhy`^OLmSaZSHS@v_h6iRZJ#wjU5sODb-1Z$jstMZ-
zcO7P9%ix^YW@_%B$K%DSDl~a!SyqfsnR&O1yWly+I`jU^W%H6B+8CHAN30c=J0X2F
zI;1#F@8yGI%XqI%-ue5>5A~@}#1ANPcn8P$?kneyH%>cZ$XvQ;hFj~>EEbOEJdZig
zGv_vTv<E0n%*xuZqxYz%xLK~w_l1lqF59gyJk7i*>lS3m$fnY%C6MT$T%-Dc?P;as
z<?ht0mKD!$iUc%B_p>a`UUkV)Wy(kWo-><|_lkV>-5{2?r8TL$YspG4o+gcnZ6Dw6
zc^7o~oasH+<!p0~oGH}HUUU1>3_jmyvCmtsyvQrL+`i<rL%^}4Sx$To(;TjH@*4X&
zPt#4Fd_1p%X^vD`x#!u47LG|OPJ%5=#aV7F{;yXrpS=9?N8YNtiH*!cD<p+fB1Kh#
z&hoBXuwe@8x}{SN3BBGw&+5tHI6ZZlFClUd9XInUaf(mpmyPjQcuJ|P+9dQbd)RMB
zxt}cW?th+{clK|`91YI3>yId{``_9de#ZRGmrq9%>kAZ|>k2wQYZqO<!PnXLu0cTA
z*F>3(Ez-a>@5zdO{YF=90Y{F!E|Z(*PhJ+#tYgr<y_C`Ej?&%2`ML^yz2Y50JNl-(
zz1NpZ7m!`!;V5CyDRD@Xk%dv9_seb-=k+0it?Uu*S{tjZ1eYo025j5<jq%^QhZjVO
zv%fn!aWn9>b8R{GLPO@ERBXrd7c*TyR#~MPx;HqODn_|nGuu{ts#(-9N84LORv=(4
zSC^qw!$PNv%ymZs4joO|b~r~O^ca^2-?G}<dHbe6VJVoJ8|cAVdx3SzqTE-n-ra6n
z6J6fP^HJewkH<--L#m=|%uGhEegD?Q$4Dlpalf7szgOb@6|uvzFZ@33h_u={M}6*x
z@8&H<9G||uUO#)k;Pj=|T$|QzEa>anD|<Stw~$F>LO_GN)Te~)=VHTFZcgo9^j2X4
z*QvK_qR;)V=h5YTrReeM#mmTk2KOAdRPL)1JEQZJ4tu!Vyx-ls>lhPTqVQS)VcF=L
yY34@P=jZpW*gmCziF4l5tW1u%^`Z6`|L=LT_2QoYdbL`?|HX@3EdnNhTC@P5r|=*E

literal 0
HcmV?d00001

-- 
GitLab


From 3e435f207cdc99313120ed805ab41e2e44c5faec Mon Sep 17 00:00:00 2001
From: Walmes Zeviani <walmes@ufpr.br>
Date: Mon, 22 Aug 2016 00:25:02 -0300
Subject: [PATCH 03/10] Atualiza todos os Rd.

---
 man/BanzattoQd1.2.3.Rd  |  9 +++++----
 man/BanzattoQd3.2.1.Rd  |  6 ++----
 man/BanzattoQd3.4.1.Rd  |  6 ++----
 man/BanzattoQd3.6.1.Rd  |  9 ++++-----
 man/BanzattoQd3.7.1.Rd  |  9 ++++-----
 man/BanzattoQd4.5.2.Rd  |  8 +++-----
 man/BanzattoQd4.7.1.Rd  |  9 ++++-----
 man/BanzattoQd5.2.1.Rd  |  7 +++----
 man/BanzattoQd5.2.4.Rd  |  4 +---
 man/BanzattoQd5.3.1.Rd  | 10 +++++-----
 man/BanzattoQd5.3.7.Rd  | 10 +++++-----
 man/BanzattoQd5.5.1.Rd  |  7 +++----
 man/BanzattoQd6.2.2.Rd  |  9 ++++-----
 man/BanzattoQd6.2.5.Rd  |  6 ++----
 man/BanzattoQd6.3.4.Rd  | 12 ++++++------
 man/BanzattoQd6.4.2.Rd  | 12 ++++++------
 man/BanzattoQd7.2.1.Rd  |  7 +++----
 man/BanzattoQd7.3.1.Rd  | 12 ++++++------
 man/BanzattoQd7.3.3.Rd  |  6 ++----
 man/BanzattoQd8.2.1.Rd  |  8 +++-----
 man/BanzattoQd8.3.1.Rd  | 10 ++++------
 man/BanzattoQd8.4.1.Rd  |  9 ++++-----
 man/BanzattoQd8.4.3.Rd  |  9 ++++-----
 man/BanzattoQd9.2.1.Rd  |  6 ++----
 man/BarbinEx1.Rd        |  4 +---
 man/BarbinEx13.Rd       |  9 ++++-----
 man/BarbinEx14.Rd       |  6 ++----
 man/BarbinEx16.Rd       |  6 ++----
 man/BarbinEx17.Rd       |  7 +++----
 man/BarbinEx18.Rd       |  7 +++----
 man/BarbinEx3.Rd        | 12 ++++++------
 man/BarbinEx8.Rd        |  6 ++----
 man/BarbinEx9.Rd        |  9 ++++-----
 man/BarbinPg104.Rd      |  4 +---
 man/BarbinPg114.Rd      | 10 +++++-----
 man/BarbinPg125.Rd      |  9 ++++-----
 man/BarbinPg137.Rd      |  9 ++++-----
 man/BarbinPg156.Rd      |  7 +++----
 man/BarbinPg167.Rd      |  7 +++----
 man/BarbinPg177.Rd      |  7 +++----
 man/BarbinPg25.Rd       |  6 ++----
 man/BarbinPg72.Rd       |  6 ++----
 man/CostaEx5.7.2.Rd     |  9 ++++-----
 man/CostaEx5.7.3.Rd     |  4 +---
 man/CostaTb4.Rd         |  4 +---
 man/CostaTb6.Rd         |  4 +---
 man/CostaTb7.Rd         |  4 +---
 man/CostaTb8.Rd         |  7 +++----
 man/DiasEg10.1.Rd       |  7 +++----
 man/DiasEg10.2.Rd       |  3 +--
 man/DiasEg11.1.Rd       |  3 +--
 man/DiasEg3.2.Rd        |  3 +--
 man/DiasEg3.6.Rd        |  3 +--
 man/DiasEg5.1.Rd        |  7 +++----
 man/DiasEg5.3.Rd        |  3 +--
 man/DiasEg6.1.Rd        |  6 +++---
 man/DiasEg6.2.Rd        |  6 +++---
 man/DiasEg6.3.Rd        |  3 +--
 man/DiasEg7.1.Rd        |  7 +++----
 man/DiasEg9.1.Rd        |  3 +--
 man/DiasEg9.2.Rd        |  3 +--
 man/DiasEg9.4.Rd        |  3 +--
 man/DiasEx10.4.10.Rd    |  3 +--
 man/DiasEx10.4.6.Rd     |  4 +---
 man/DiasEx10.4.7.Rd     |  3 +--
 man/DiasEx10.4.8.Rd     |  6 +++---
 man/DiasEx11.7.8.Rd     |  3 +--
 man/DiasEx11.7.9.Rd     |  3 +--
 man/DiasEx3.6.7.Rd      |  6 +++---
 man/DiasEx6.5.1.Rd      |  3 +--
 man/DiasEx6.5.10.Rd     |  5 ++---
 man/DiasEx6.5.9.Rd      |  3 +--
 man/DiasEx9.6.10.Rd     |  3 +--
 man/DiasEx9.6.4.Rd      |  3 +--
 man/DiasEx9.6.6.Rd      |  6 +++---
 man/DiasEx9.6.7.Rd      |  3 +--
 man/FariaEg2.9.5.Rd     |  8 ++++----
 man/FariaEg3.2.4.Rd     |  3 +--
 man/FariaQd11.4.Rd      |  9 ++++-----
 man/FariaQd11.9.Rd      |  6 +++---
 man/FariaQd12.5.Rd      |  3 +--
 man/FariaQd14.2.Rd      |  3 +--
 man/FariaQd14.3.Rd      |  7 +++----
 man/FariaQd6.1.Rd       |  3 +--
 man/FerreiraEg7.1.Rd    |  2 +-
 man/FerreiraEg7.4.Rd    |  2 +-
 man/FerreiraEx7.4.1.Rd  |  2 +-
 man/FerreiraEx9.7.2.Rd  |  2 +-
 man/ManlyTb1.2.Rd       | 22 +++++++++++-----------
 man/ManlyTb1.3.Rd       | 16 ++++++++--------
 man/ManlyTb1.4.Rd       |  8 ++++----
 man/ManlyTb1.5.Rd       | 22 +++++++++++-----------
 man/ManlyTb10.2.Rd      | 24 ++++++++++++------------
 man/ManlyTb10.4.Rd      | 26 +++++++++++++-------------
 man/ManlyTb11.3.Rd      |  8 ++++----
 man/ManlyTb11.5.Rd      |  8 ++++----
 man/ManlyTb4.5.Rd       | 14 +++++++-------
 man/ManlyTb6.6.Rd       | 10 +++++-----
 man/ManlyTb6.7.Rd       | 19 +++++++++----------
 man/ManlyTb9.7.Rd       | 18 +++++++++---------
 man/ManlyTb9.8.Rd       | 22 +++++++++++-----------
 man/MingotiAnA3.Rd      |  2 +-
 man/MingotiAnA4.Rd      |  2 +-
 man/MingotiAnA6.Rd      |  2 +-
 man/MingotiTb3.10.Rd    |  2 +-
 man/MingotiTb3.7.Rd     |  2 +-
 man/MingotiTb6.1.Rd     |  2 +-
 man/MingotiTb6.8.Rd     |  2 +-
 man/PaulaEg1.12.2.Rd    | 18 +++++++++---------
 man/PaulaEg1.12.5.Rd    |  4 ++--
 man/PaulaEg1.12.6.Rd    |  6 +++---
 man/PaulaEg2.4.3.Rd     |  2 +-
 man/PaulaEg2.8.1.Rd     |  6 +++---
 man/PaulaEg3.5.1.Rd     | 18 +++++++++---------
 man/PaulaEg3.5.2.Rd     | 20 ++++++++++----------
 man/PaulaEg3.6.11a.Rd   | 20 ++++++++++----------
 man/PaulaEg3.6.11b.Rd   | 20 ++++++++++----------
 man/PaulaEg3.6.9c.Rd    | 20 ++++++++++----------
 man/PaulaEg5.2.8a.Rd    | 16 ++++++++--------
 man/PaulaEg5.5.1.Rd     | 10 +++++-----
 man/PaulaEg5.5.2.Rd     |  4 ++--
 man/PaulaEg5.5.3.Rd     | 14 +++++++-------
 man/PaulaEx1.13.20.Rd   |  2 +-
 man/PaulaEx2.10.7.Rd    |  4 ++--
 man/PaulaEx3.7.14.Rd    | 12 ++++++------
 man/PaulaEx3.7.15.Rd    | 14 +++++++-------
 man/PaulaEx3.7.16.Rd    |  8 ++++----
 man/PaulaEx3.7.19.Rd    | 12 ++++++------
 man/PaulaEx3.7.20.Rd    | 30 +++++++++++++++---------------
 man/PaulaEx3.7.7a.Rd    |  6 +++---
 man/PaulaEx3.7.7b.Rd    |  8 ++++----
 man/PaulaEx3.7.7c.Rd    |  6 +++---
 man/PaulaEx3.7.8.Rd     |  4 ++--
 man/PaulaEx4.6.15.Rd    |  6 +++---
 man/PaulaEx4.6.17.Rd    |  2 +-
 man/PaulaEx4.6.20.Rd    |  2 +-
 man/PaulaEx4.6.7.Rd     |  4 ++--
 man/PaulaEx5.6.13.Rd    | 12 ++++++------
 man/PaulaEx5.6.14.Rd    | 10 +++++-----
 man/PaulaEx5.6.15.Rd    | 18 +++++++++---------
 man/PaulaTb1.9.Rd       |  2 +-
 man/PaulaTb3.12.Rd      | 20 ++++++++++----------
 man/PaulaTb3.20.Rd      | 10 +++++-----
 man/PaulaTb3.21.Rd      |  4 ++--
 man/PaulaTb4.2.Rd       |  2 +-
 man/PaulaTb4.9.Rd       |  2 +-
 man/PimentelEg4.2.Rd    |  5 ++---
 man/PimentelEg6.2.Rd    |  6 +++---
 man/PimentelEg7.3.Rd    |  6 +++---
 man/PimentelEg7.4.Rd    |  6 +++---
 man/PimentelEx5.8.4.Rd  |  8 ++++----
 man/PimentelEx5.8.5.Rd  |  5 ++---
 man/PimentelEx6.6.3.Rd  |  6 +++---
 man/PimentelPg142.Rd    |  6 +++---
 man/PimentelPg267.Rd    |  3 ++-
 man/PimentelPg269.Rd    |  8 ++++----
 man/PimentelPg382.Rd    |  3 +--
 man/PimentelPg72.Rd     |  7 +++----
 man/PimentelPg91.Rd     |  5 ++---
 man/PimentelTb10.3.1.Rd |  3 +--
 man/PimentelTb10.4.1.Rd |  3 +--
 man/PimentelTb10.6.1.Rd |  4 ++--
 man/PimentelTb11.3.1.Rd |  3 ++-
 man/PimentelTb12.2.1.Rd |  3 ++-
 man/PimentelTb12.3.1.Rd |  3 +--
 man/PimentelTb12.4.1.Rd |  6 +++---
 man/PimentelTb13.5.1.Rd |  6 +++---
 man/PimentelTb14.4.1.Rd |  8 ++++----
 man/PimentelTb14.5.1.Rd |  3 +--
 man/PimentelTb14.7.1.Rd |  3 +--
 man/PimentelTb16.2.1.Rd |  3 +--
 man/PimentelTb16.3.1.Rd |  6 +++---
 man/PimentelTb17.3.1.Rd |  3 +--
 man/PimentelTb17.4.1.Rd |  3 +--
 man/PimentelTb18.2.1.Rd |  7 +++----
 man/PimentelTb20.2.1.Rd |  3 +--
 man/PimentelTb21.5.1.Rd |  3 +--
 man/PimentelTb5.3.1.Rd  |  3 +--
 man/PimentelTb6.3.1.Rd  |  6 +++---
 man/PimentelTb7.2.1.Rd  |  6 +++---
 man/PimentelTb7.6.1.Rd  |  7 +++----
 man/PimentelTb7.8.1.Rd  |  3 ++-
 man/PimentelTb8.3.1.Rd  |  6 +++---
 man/PimentelTb9.2.1.Rd  |  3 +--
 man/PimentelTb9.3.1.Rd  |  3 ++-
 man/PimentelTb9.4.1.Rd  |  3 +--
 man/RamalhoEg11.10.Rd   |  8 +++-----
 man/RamalhoEg11.13.Rd   |  7 +++----
 man/RamalhoEg11.4.Rd    |  4 +---
 man/RamalhoEg12.10.Rd   |  7 +++----
 man/RamalhoEg13.2.Rd    |  7 +++----
 man/RamalhoEg4.3.Rd     |  7 +++----
 man/RamalhoEg4.7.Rd     |  4 +---
 man/RamalhoEg7.8.Rd     |  7 +++----
 man/RamalhoEg8.1.Rd     |  7 +++----
 man/RamalhoEg8.8.Rd     |  7 +++----
 man/RamalhoEx1.7.Rd     |  4 +---
 man/RamalhoEx12.2.Rd    |  7 +++----
 man/RamalhoEx13.1.Rd    |  4 +---
 man/RamalhoEx13.2.Rd    |  4 +---
 man/RamalhoEx13.3.Rd    |  7 +++----
 man/RamalhoEx3.1.Rd     |  7 +++----
 man/RamalhoEx4.1.Rd     |  4 +---
 man/RamalhoEx4.2.Rd     |  4 +---
 man/RamalhoEx7.10.Rd    |  4 +---
 man/RamalhoEx8.1.Rd     |  7 +++----
 man/RamalhoEx8.2.Rd     |  4 +---
 man/RamalhoTb1.2.Rd     |  6 ++----
 man/RamalhoTb11.1.Rd    |  4 +---
 man/RamalhoTb11.17.Rd   |  4 +---
 man/RamalhoTb12.8.Rd    |  7 +++----
 man/RamalhoTb13.1.Rd    |  4 +---
 man/RamalhoTb13.11.Rd   |  4 +---
 man/RamalhoTb13.13.Rd   |  7 +++----
 man/RamalhoTb13.15.Rd   |  4 +---
 man/RamalhoTb13.6.Rd    |  8 ++++----
 man/RamalhoTb3.1.Rd     |  4 +---
 man/RamalhoTb3.4.Rd     |  4 +---
 man/RamalhoTb3.6.Rd     |  4 +---
 man/RamalhoTb7.1.Rd     |  4 +---
 man/RamalhoTb8.12.Rd    |  7 +++----
 man/StorckEg2.3.5.Rd    |  4 +---
 man/StorckTb101.Rd      |  7 +++----
 man/StorckTb2.Rd        |  4 +---
 man/StorckTb56.Rd       |  4 +---
 man/StorckTb60.Rd       |  4 +---
 man/StorckTb67.Rd       |  7 +++----
 man/StorckTb74.Rd       |  8 ++++----
 man/StorckTb8.Rd        |  4 +---
 man/VieiraEx7.3.Rd      |  7 +++----
 man/VieiraEx7.5.Rd      |  6 +++---
 man/VieiraEx8.3.Rd      |  6 +++---
 man/VieiraPg50.1.Rd     |  3 +--
 man/VieiraPg50.2.Rd     |  3 +--
 man/VieiraPg57.1.Rd     |  3 +--
 man/VieiraPg57.2.Rd     |  3 +--
 man/VieiraTb4.1.Rd      |  3 +--
 man/VieiraTb5.3.Rd      |  3 +--
 man/VieiraTb7.2.Rd      |  6 +++---
 man/VieiraTb7.7.Rd      |  6 +++---
 man/VieiraTb8.5.Rd      |  6 +++---
 man/keywords.Rd         | 40 ++++++++++++++++++++++++++++++++++++++++
 242 files changed, 757 insertions(+), 895 deletions(-)
 create mode 100644 man/keywords.Rd

diff --git a/man/BanzattoQd1.2.3.Rd b/man/BanzattoQd1.2.3.Rd
index c18969b7..a4e09994 100644
--- a/man/BanzattoQd1.2.3.Rd
+++ b/man/BanzattoQd1.2.3.Rd
@@ -2,11 +2,11 @@
 % Please edit documentation in R/Banzatto.R
 \name{BanzattoQd1.2.3}
 \alias{BanzattoQd1.2.3}
-\title{Di\enc{â}{a}metro \enc{à}{a} Altura do Peito de \emph{Eucalyptus saligna}}
+\title{Di\enc{â}{a}metro \enc{à}{a} Altura do Peito de
+    \emph{Eucalyptus saligna}}
 \format{Um vetor numérico com 20 elementos.}
 \source{
-Banzatto, D. A., Kronka, S. D. (2013). Experimentação
-    Agrícola (4th ed.). Jaboticabal, SP: Funep. (Quadro 1.2.3 pág. 3)
+BANZATTO; KRONKA (2013), Quadro 1.2.3, pág. 3.
 }
 \description{
 Valores de diâmetro à altura do peito (DAP, cm) de uma
@@ -14,6 +14,7 @@ Valores de diâmetro à altura do peito (DAP, cm) de uma
     povoamento com 15 anos de idade.
 }
 \examples{
+
 data(BanzattoQd1.2.3)
 
 hist(BanzattoQd1.2.3, prob = TRUE,
@@ -30,5 +31,5 @@ sd(BanzattoQd1.2.3)
 fivenum(BanzattoQd1.2.3)
 
 }
-\keyword{amostra}
+\keyword{AAS}
 
diff --git a/man/BanzattoQd3.2.1.Rd b/man/BanzattoQd3.2.1.Rd
index bed7c762..b9847b73 100644
--- a/man/BanzattoQd3.2.1.Rd
+++ b/man/BanzattoQd3.2.1.Rd
@@ -2,7 +2,7 @@
 % Please edit documentation in R/Banzatto.R
 \name{BanzattoQd3.2.1}
 \alias{BanzattoQd3.2.1}
-\title{Controle de pulg\enc{ã}{a}o na cultura de pepino}
+\title{Controle de Pulg\enc{ã}{a}o na Cultura de Pepino}
 \format{Um \code{data.frame} com 30 observações e 3 variáveis, em que
 
 \describe{
@@ -18,9 +18,7 @@
 
 }}
 \source{
-Banzatto, D. A., Kronka, S. D. (2013). Experimentação
-    Agrícola (4th ed.). Jaboticabal, SP: Funep. (Quadro 3.2.1 pág.
-    44)
+BANZATTO; KRONKA (2013), Quadro 3.2.1, pág. 44.
 }
 \description{
 Dados de um experimento visando controle de pulgão
diff --git a/man/BanzattoQd3.4.1.Rd b/man/BanzattoQd3.4.1.Rd
index e02b60f9..2b07d020 100644
--- a/man/BanzattoQd3.4.1.Rd
+++ b/man/BanzattoQd3.4.1.Rd
@@ -3,7 +3,7 @@
 \name{BanzattoQd3.4.1}
 \alias{BanzattoQd3.4.1}
 \title{Produtividades de Cultivares de Mandioca}
-\format{Um \code{data.frame} com 25 observações e 3 variáveis.
+\format{Um \code{data.frame} com 25 observações e 3 variáveis, em que
 
 \describe{
 
@@ -18,9 +18,7 @@
 
 }}
 \source{
-Banzatto, D. A., Kronka, S. D. (2013). Experimentação
-    Agrícola (4th ed.). Jaboticabal, SP: Funep. (Quadro 3.4.1 pág.
-    50)
+BANZATTO; KRONKA (2013), Quadro 3.4.1, pág. 50.
 }
 \description{
 Produção de mandioca em experimento de competição de
diff --git a/man/BanzattoQd3.6.1.Rd b/man/BanzattoQd3.6.1.Rd
index 0e9561a7..6fe0ef49 100644
--- a/man/BanzattoQd3.6.1.Rd
+++ b/man/BanzattoQd3.6.1.Rd
@@ -2,8 +2,9 @@
 % Please edit documentation in R/Banzatto.R
 \name{BanzattoQd3.6.1}
 \alias{BanzattoQd3.6.1}
-\title{Produ\enc{çã}{ca}o de Mat\enc{é}{e}ria Seca em Cultivares de Sorgo}
-\format{Um \code{data.frame} com 30 observações e 3 variáveis.
+\title{Produ\enc{çã}{ca}o de Mat\enc{é}{e}ria Seca em Cultivares de
+    Sorgo}
+\format{Um \code{data.frame} com 30 observações e 3 variáveis, em que
 
 \describe{
 
@@ -17,9 +18,7 @@
 
 }}
 \source{
-Banzatto, D. A., Kronka, S. D. (2013). Experimentação
-    Agrícola (4th ed.). Jaboticabal, SP: Funep. (Quadro 3.6.1 pág.
-    57)
+BANZATTO; KRONKA (2013), Quadro 3.6.1, pág. 57.
 }
 \description{
 Experimento em delineamento inteiramente casualizado
diff --git a/man/BanzattoQd3.7.1.Rd b/man/BanzattoQd3.7.1.Rd
index e642fcee..d5d774c8 100644
--- a/man/BanzattoQd3.7.1.Rd
+++ b/man/BanzattoQd3.7.1.Rd
@@ -2,8 +2,9 @@
 % Please edit documentation in R/Banzatto.R
 \name{BanzattoQd3.7.1}
 \alias{BanzattoQd3.7.1}
-\title{Composi\enc{çã}{ca}o do Substrato na Altura de \emph{Pinus oocarpa}}
-\format{Um \code{data.frame} com 20 observações e 3 variáveis.
+\title{Composi\enc{çã}{ca}o do Substrato na Altura de \emph{Pinus
+    oocarpa}}
+\format{Um \code{data.frame} com 20 observações e 3 variáveis, em que
 
 \describe{
 
@@ -20,9 +21,7 @@
 
 }}
 \source{
-Banzatto, D. A., Kronka, S. D. (2013). Experimentação
-    Agrícola (4th ed.). Jaboticabal, SP: Funep. (Quadro 3.7.1 pág.
-    64)
+BANZATTO; KRONKA (2013), Quadro 3.7.1, pág. 64.
 }
 \description{
 Dados de experimento para estudo do efeito de 5
diff --git a/man/BanzattoQd4.5.2.Rd b/man/BanzattoQd4.5.2.Rd
index 81bfd57e..08d36f27 100644
--- a/man/BanzattoQd4.5.2.Rd
+++ b/man/BanzattoQd4.5.2.Rd
@@ -2,8 +2,8 @@
 % Please edit documentation in R/Banzatto.R
 \name{BanzattoQd4.5.2}
 \alias{BanzattoQd4.5.2}
-\title{Efeito do Promalin sobre Furtos de Macieira}
-\format{Um \code{data.frame} com 20 observações e 3 variáveis.
+\title{Efeito do Promalin sobre a Produçaõ de Frutos de Macieira}
+\format{Um \code{data.frame} com 20 observações e 3 variáveis, em que
 
 \describe{
 
@@ -20,9 +20,7 @@
 
 }}
 \source{
-Banzatto, D. A., Kronka, S. D. (2013). Experimentação
-    Agrícola (4th ed.). Jaboticabal, SP: Funep. (Quadro 4.5.2
-    pág. 84)
+BANZATTO; KRONKA (2013), Quadro 4.5.2, pág. 84.
 
 Mestriner,  J. C. (1980). Estudos dos efeitos do promalin sobre
     frutos de macieiras (\emph{Malus} ssp) cultivares Brasil e
diff --git a/man/BanzattoQd4.7.1.Rd b/man/BanzattoQd4.7.1.Rd
index 987c5aa8..3cbf9bf8 100644
--- a/man/BanzattoQd4.7.1.Rd
+++ b/man/BanzattoQd4.7.1.Rd
@@ -2,8 +2,9 @@
 % Please edit documentation in R/Banzatto.R
 \name{BanzattoQd4.7.1}
 \alias{BanzattoQd4.7.1}
-\title{Compara\enc{çã}{ca}o de M\enc{é}{e}todos de Semeadura do Mamoeiro}
-\format{Um \code{data.frame} com 24 observações e 3 variáveis.
+\title{Compara\enc{çã}{ca}o de M\enc{é}{e}todos de Semeadura do
+    Mamoeiro}
+\format{Um \code{data.frame} com 24 observações e 3 variáveis, em que
 
 \describe{
 
@@ -18,9 +19,7 @@
 
 }}
 \source{
-Banzatto, D. A., Kronka, S. D. (2013). Experimentação
-    Agrícola (4th ed.). Jaboticabal, SP: Funep. (Quadro 4.7.1
-    pág. 93)
+BANZATTO; KRONKA (2013), Quadro 4.7.1, pág. 93.
 
 Ruiz, P. R. N. (1977). Estudo comparativo entre diferentes métodos de
     semeadura na cultura do mamoeiro (\emph{Carica papaya}
diff --git a/man/BanzattoQd5.2.1.Rd b/man/BanzattoQd5.2.1.Rd
index 8a32295a..1b8af3f2 100644
--- a/man/BanzattoQd5.2.1.Rd
+++ b/man/BanzattoQd5.2.1.Rd
@@ -2,7 +2,8 @@
 % Please edit documentation in R/Banzatto.R
 \name{BanzattoQd5.2.1}
 \alias{BanzattoQd5.2.1}
-\title{Peneira e Densidade de Plantio na Produ\enc{çã}{ca}o de Amendoim}
+\title{Peneira e Densidade de Plantio na Produ\enc{çã}{ca}o de
+    Amendoim}
 \format{Um \code{data.frame} com 27 observações e 4 variáveis, em que
 
 \describe{
@@ -27,9 +28,7 @@ das linhas centrais foram consideradas como bordadura, fazendo-se as
 avaliações apenas no comprimento restante das duas linhas centrais, o
 que resultou em uma área útil de 6 m\eqn{^2}.}
 \source{
-Banzatto, D. A., Kronka, S. D. (2013). Experimentação
-    Agrícola (4th ed.). Jaboticabal, SP: Funep. (Quadro 5.2.1,
-    pág. 102)
+BANZATTO; KRONKA (2013), Quadro 5.2.1, pág. 102.
 }
 \description{
 Dados de um experimento fatorial que estudou o efeito de
diff --git a/man/BanzattoQd5.2.4.Rd b/man/BanzattoQd5.2.4.Rd
index f19ed67b..e7350398 100644
--- a/man/BanzattoQd5.2.4.Rd
+++ b/man/BanzattoQd5.2.4.Rd
@@ -21,9 +21,7 @@
 
 }}
 \source{
-Banzatto, D. A., Kronka, S. D. (2013). Experimentação
-    Agrícola (4th ed.). Jaboticabal, SP: Funep. (Quadro 5.2.4,
-    pág. 107)
+BANZATTO; KRONKA (2013), Quadro 5.2.4, pág. 107.
 }
 \description{
 Experimento em esquema fatorial 3 \eqn{\times} 2 para
diff --git a/man/BanzattoQd5.3.1.Rd b/man/BanzattoQd5.3.1.Rd
index 52661b26..8253665c 100644
--- a/man/BanzattoQd5.3.1.Rd
+++ b/man/BanzattoQd5.3.1.Rd
@@ -2,8 +2,10 @@
 % Please edit documentation in R/Banzatto.R
 \name{BanzattoQd5.3.1}
 \alias{BanzattoQd5.3.1}
-\title{Produ\enc{çã}{ca}o de Caf\enc{é}{e} em Fun\enc{çã}{ca}o de Aduba\enc{çã}{ca}o NPK}
-\format{Um \code{data.frame} com 48 observações e 5 variáveis.
+\title{Produ\enc{çã}{ca}o de Caf\enc{é}{e} em Fun\enc{çã}{ca}o de
+    Aduba\enc{çã}{ca}o NPK}
+\format{Um \code{data.frame} com 48 observações e 5 variáveis, em que
+
 \describe{
 
 \item{\code{N}}{Variável numérica que indica ausência (0) ou
@@ -24,9 +26,7 @@
 
 }}
 \source{
-Banzatto, D. A., Kronka, S. D. (2013). Experimentação
-    Agrícola (4th ed.). Jaboticabal, SP: Funep. (Quadro 5.3.1,
-    pág. 113)
+BANZATTO; KRONKA (2013), Quadro 5.3.1, pág. 113.
 }
 \description{
 Resultados de um experimento em arranjo fatorial triplo
diff --git a/man/BanzattoQd5.3.7.Rd b/man/BanzattoQd5.3.7.Rd
index 5d172acd..abc5aa6a 100644
--- a/man/BanzattoQd5.3.7.Rd
+++ b/man/BanzattoQd5.3.7.Rd
@@ -2,8 +2,10 @@
 % Please edit documentation in R/Banzatto.R
 \name{BanzattoQd5.3.7}
 \alias{BanzattoQd5.3.7}
-\title{Efici\enc{ê}{e}ncia na Utiliza\enc{çã}{ca}o de P por Cultivares de trigo}
-\format{Um \code{data.frame} com 48 observações e 5 variáveis.
+\title{Efici\enc{ê}{e}ncia na Utiliza\enc{çã}{ca}o de P por
+    Cultivares de Trigo}
+\format{Um \code{data.frame} com 48 observações e 5 variáveis, em que
+
 \describe{
 
 \item{\code{cult}}{Cultivares de trigo usadas no experimento: BR 20
@@ -24,9 +26,7 @@
 
 }}
 \source{
-Banzatto, D. A., Kronka, S. D. (2013). Experimentação
-    Agrícola (4th ed.). Jaboticabal, SP: Funep. (Quadro 5.3.7,
-    pág. 120)
+BANZATTO; KRONKA (2013), Quadro 5.3.7, pág. 120.
 }
 \description{
 Experimento em delineamento inteiramente casualizado que
diff --git a/man/BanzattoQd5.5.1.Rd b/man/BanzattoQd5.5.1.Rd
index 59236ded..3d9be148 100644
--- a/man/BanzattoQd5.5.1.Rd
+++ b/man/BanzattoQd5.5.1.Rd
@@ -4,7 +4,8 @@
 \alias{BanzattoQd5.5.1}
 \title{Aduba\enc{çã}{ca}o Mineral no Milho com Uso de Confundimento}
 \format{Um \code{data.frame} com 27 observações e 4 variáveis, em que
-    \describe{
+
+\describe{
 
 \item{\code{N}}{Níveis codificados de nitrogênio (N) que representam
     0, 30 e 60 kg ha\eqn{^{-1}}. A fonte do N é o sulfato de amônio
@@ -32,9 +33,7 @@ consideradas as 4 linhas centrais com 8 metros de comprimento (por
 desconsiderar 1 m em cada extremidade), perfazendo 32 m\eqn{^{2}}. O
 híbrido de milho utilizado foi o HMD-7974.}
 \source{
-Banzatto, D. A., Kronka, S. D. (2013). Experimentação
-    Agrícola (4th ed.). Jaboticabal, SP: Funep. (Quadro 5.5.1,
-    pág. 131)
+BANZATTO; KRONKA (2013), Quadro 5.5.1, pág. 131.
 
 Vilalta, O. A. (1972). Avaliação da produção de milho (\emph{Zea
     mays} L.) em função da adubação NPK em um latossolo
diff --git a/man/BanzattoQd6.2.2.Rd b/man/BanzattoQd6.2.2.Rd
index 376679fe..bd7dc1cb 100644
--- a/man/BanzattoQd6.2.2.Rd
+++ b/man/BanzattoQd6.2.2.Rd
@@ -2,8 +2,9 @@
 % Please edit documentation in R/Banzatto.R
 \name{BanzattoQd6.2.2}
 \alias{BanzattoQd6.2.2}
-\title{Espa\enc{ç}{c}amento de Plantio na Produ\enc{çã}{ca}o de Cana-de-a\enc{çú}{cu}car}
-\format{Um \code{data.frame} com 40 observações e 4 variáveis.
+\title{Espa\enc{ç}{c}amento de Plantio na Produ\enc{çã}{ca}o de
+    Cana-de-a\enc{çú}{cu}car}
+\format{Um \code{data.frame} com 40 observações e 4 variáveis, em que
 
 \describe{
 
@@ -20,9 +21,7 @@
 
 }}
 \source{
-Banzatto, D. A., Kronka, S. D. (2013). Experimentação
-    Agrícola (4th ed.). Jaboticabal, SP: Funep. (Quadro 6.2.2,
-    pág. 138)
+BANZATTO; KRONKA (2013), Quadro 6.2.2, pág. 138.
 }
 \description{
 O experimento avaliou o efeito do espaçamento de plantio
diff --git a/man/BanzattoQd6.2.5.Rd b/man/BanzattoQd6.2.5.Rd
index a7ae695f..63020df6 100644
--- a/man/BanzattoQd6.2.5.Rd
+++ b/man/BanzattoQd6.2.5.Rd
@@ -3,7 +3,7 @@
 \name{BanzattoQd6.2.5}
 \alias{BanzattoQd6.2.5}
 \title{Fontes e Doses para Aduba\enc{çã}{ca}o Nitrogenada no Milho}
-\format{Um \code{data.frame} com 48 observações e 4 variáveis.
+\format{Um \code{data.frame} com 48 observações e 4 variáveis, em que
 
 \describe{
 
@@ -20,9 +20,7 @@
 
 }}
 \source{
-Banzatto, D. A., Kronka, S. D. (2013). Experimentação
-    Agrícola (4th ed.). Jaboticabal, SP: Funep. (Quadro 6.2.5,
-    pág. 144)
+BANZATTO; KRONKA (2013), Quadro 6.2.5, pág. 144.
 }
 \description{
 Experimento que estudou a produção de milho como função
diff --git a/man/BanzattoQd6.3.4.Rd b/man/BanzattoQd6.3.4.Rd
index f6359ac8..9d5153f0 100644
--- a/man/BanzattoQd6.3.4.Rd
+++ b/man/BanzattoQd6.3.4.Rd
@@ -2,9 +2,11 @@
 % Please edit documentation in R/Banzatto.R
 \name{BanzattoQd6.3.4}
 \alias{BanzattoQd6.3.4}
-\title{\enc{É}{E}pocas de Plantio e Colheita na Produ\enc{çã}{ca}o de Beterraba}
-\format{Um \code{data.frame} com 72 observações e 5 variáveis.
-    \describe{
+\title{\enc{É}{E}pocas de Plantio e Colheita na Produ\enc{çã}{ca}o de
+    Beterraba}
+\format{Um \code{data.frame} com 72 observações e 5 variáveis, em que
+
+\describe{
 
 \item{\code{data}}{Fator de níveis ordinais que representa as datas
     de plantio de beterraba. Os níveis do fator data foram
@@ -26,9 +28,7 @@
 
 }}
 \source{
-Banzatto, D. A., Kronka, S. D. (2013). Experimentação
-    Agrícola (4th ed.). Jaboticabal, SP: Funep. (Quadro 6.3.4,
-    pág. 156)
+BANZATTO; KRONKA (2013), Quadro 6.3.4, pág. 156.
 }
 \description{
 Experimento estudar o efeito de datas de plantio, épocas
diff --git a/man/BanzattoQd6.4.2.Rd b/man/BanzattoQd6.4.2.Rd
index e236ce70..259e19e4 100644
--- a/man/BanzattoQd6.4.2.Rd
+++ b/man/BanzattoQd6.4.2.Rd
@@ -2,9 +2,11 @@
 % Please edit documentation in R/Banzatto.R
 \name{BanzattoQd6.4.2}
 \alias{BanzattoQd6.4.2}
-\title{\enc{É}{E}poca de Plantio e Aduba\enc{çã}{ca}o Nitrogenada em Beterraba}
-\format{Um \code{data.frame} com 80 observações e 4 variáveis.
-    \describe{
+\title{\enc{É}{E}poca de Plantio e Aduba\enc{çã}{ca}o Nitrogenada em
+    Beterraba}
+\format{Um \code{data.frame} com 80 observações e 4 variáveis, em que
+
+\describe{
 
 \item{\code{nitro}}{Fator de níveis métricos que correspondem à
     quantidade de nitrogênio aplicada, em libras por acre.}
@@ -30,9 +32,7 @@ Na figura abaixo, tem-se a organização dos 4 blocos, bem como dos
 \if{html}{\figure{BanzattoQd6-4-2.png}{options: width="250px"}}
 \if{latex}{\figure{BanzattoQd6-4-2.png}{options: width=1.75in}}}
 \source{
-Banzatto, D. A., Kronka, S. D. (2013). Experimentação
-    Agrícola (4th ed.). Jaboticabal, SP: Funep. (Quadro 6.4.2,
-    pág. 163)
+BANZATTO; KRONKA (2013), Quadro 6.4.2, pág. 163.
 }
 \description{
 Experimento em delineamento de blocos casualizados cujos
diff --git a/man/BanzattoQd7.2.1.Rd b/man/BanzattoQd7.2.1.Rd
index c9a529d3..95f9e4cf 100644
--- a/man/BanzattoQd7.2.1.Rd
+++ b/man/BanzattoQd7.2.1.Rd
@@ -3,7 +3,7 @@
 \name{BanzattoQd7.2.1}
 \alias{BanzattoQd7.2.1}
 \title{Efeito do Gesso no Peso de Gr\enc{ã}{a}os de Feij\enc{ã}{a}o}
-\format{Um \code{data.frame} com 28 observações e 3 variáveis.
+\format{Um \code{data.frame} com 28 observações e 3 variáveis, em que
 
 \describe{
 
@@ -15,9 +15,7 @@
 
 }}
 \source{
-Banzatto, D. A., Kronka, S. D. (2013). Experimentação
-    Agrícola (4th ed.). Jaboticabal, SP: Funep. (Quadro 7.2.1,
-    pág. 170)
+BANZATTO; KRONKA (2013), Quadro 7.2.1, pág. 170.
 
 Ragazzi, D. (1979). Efeito de doses de gesso na cultura do feijoeiro
     (\emph{Phaseolus vulgaris} L.). Trabalho de Conclusão de Curso
@@ -46,4 +44,5 @@ xyplot(peso ~ gesso, data = BanzattoQd7.2.1,
 
 }
 \keyword{DIC}
+\keyword{REG}
 
diff --git a/man/BanzattoQd7.3.1.Rd b/man/BanzattoQd7.3.1.Rd
index 43eae95b..2fa01d66 100644
--- a/man/BanzattoQd7.3.1.Rd
+++ b/man/BanzattoQd7.3.1.Rd
@@ -2,8 +2,9 @@
 % Please edit documentation in R/Banzatto.R
 \name{BanzattoQd7.3.1}
 \alias{BanzattoQd7.3.1}
-\title{Di\enc{â}{a}metro e Altura de Tubetes na Forma\enc{çã}{ca}o de Mudas de Eucalipto}
-\format{Um \code{data.frame} com 27 observações e 4 variáveis.
+\title{Di\enc{â}{a}metro e Altura de Tubetes na Forma\enc{çã}{ca}o de
+    Mudas de Eucalipto}
+\format{Um \code{data.frame} com 27 observações e 4 variáveis, em que
 
 \describe{
 
@@ -18,9 +19,7 @@
 
 }}
 \source{
-Banzatto, D. A., Kronka, S. D. (2013). Experimentação
-    Agrícola (4th ed.). Jaboticabal, SP: Funep. (Quadro 7.3.1,
-    pág. 177)
+BANZATTO; KRONKA (2013), Quadro 7.3.1, pág. 177.
 }
 \description{
 Experimento fatorial 3 \eqn{\times} 3 que avaliou o
@@ -39,7 +38,8 @@ str(BanzattoQd7.3.1)
 
 xtabs(~at + dt, data = BanzattoQd7.3.1)
 
-with(BanzattoQd7.3.1, addmargins(tapply(alt, list(at, dt), FUN = mean)))
+with(BanzattoQd7.3.1,
+     addmargins(tapply(alt, list(at, dt), FUN = mean)))
 
 xyplot(alt ~ at, data = BanzattoQd7.3.1,
        groups = dt, type = c("p", "a", "g"),
diff --git a/man/BanzattoQd7.3.3.Rd b/man/BanzattoQd7.3.3.Rd
index 3b20eb68..893359d2 100644
--- a/man/BanzattoQd7.3.3.Rd
+++ b/man/BanzattoQd7.3.3.Rd
@@ -3,7 +3,7 @@
 \name{BanzattoQd7.3.3}
 \alias{BanzattoQd7.3.3}
 \title{Experimento Fatorial com Fatores Qualitativos e Quantitativos}
-\format{Um \code{data.frame} com 32 observações e 4 variáveis.
+\format{Um \code{data.frame} com 32 observações e 4 variáveis, em que
 
 \describe{
 
@@ -18,9 +18,7 @@
 
 }}
 \source{
-Banzatto, D. A., Kronka, S. D. (2013). Experimentação
-    Agrícola (4th ed.). Jaboticabal, SP: Funep. (Quadro 7.3.3,
-    pág. 182)
+BANZATTO; KRONKA (2013), Quadro 7.3.3, pág. 182.
 }
 \description{
 Dados fictícios de um experimento fatorial duplo com um
diff --git a/man/BanzattoQd8.2.1.Rd b/man/BanzattoQd8.2.1.Rd
index fc662485..184659d3 100644
--- a/man/BanzattoQd8.2.1.Rd
+++ b/man/BanzattoQd8.2.1.Rd
@@ -3,7 +3,8 @@
 \name{BanzattoQd8.2.1}
 \alias{BanzattoQd8.2.1}
 \title{Grupo de Ensaios de Competi\enc{çã}{ca}o de Batata}
-\format{Um \code{data.frame} com 160 observações e 4 variáveis.
+\format{Um \code{data.frame} com 160 observações e 4 variáveis, em
+    que
 
 \describe{
 
@@ -20,9 +21,7 @@
 
 }}
 \source{
-Banzatto, D. A., Kronka, S. D. (2013). Experimentação
-    Agrícola (4th ed.). Jaboticabal, SP: Funep. (Quadro 8.2.1,
-    pág. 190)
+BANZATTO; KRONKA (2013), Quadro 8.2.1, pág. 190.
 
 Filgueira, F. A. R. (1991). Interação genótipo ambiente em batata
     (\emph{Solanum tuberosum} L. spp \emph{tuberosum}). Tese
@@ -58,6 +57,5 @@ xyplot(prod ~ cult | exper, data = BanzattoQd8.2.1,
        ylab = expression("Produção de tubérculos"~(t~ha^{-1})))
 
 }
-\keyword{DBC}
 \keyword{GE}
 
diff --git a/man/BanzattoQd8.3.1.Rd b/man/BanzattoQd8.3.1.Rd
index 02ae4151..f38b3003 100644
--- a/man/BanzattoQd8.3.1.Rd
+++ b/man/BanzattoQd8.3.1.Rd
@@ -2,8 +2,9 @@
 % Please edit documentation in R/Banzatto.R
 \name{BanzattoQd8.3.1}
 \alias{BanzattoQd8.3.1}
-\title{Grupo de Ensaios de Competi\enc{çã}{ca}o de Gen\enc{ó}{o}tipos de Batata}
-\format{Um \code{data.frame} com 40 observações e 3 variáveis.
+\title{Grupo de Ensaios de Competi\enc{çã}{ca}o de Gen\enc{ó}{o}tipos
+    de Batata}
+\format{Um \code{data.frame} com 40 observações e 3 variáveis, em que
 
 \describe{
 
@@ -25,9 +26,7 @@ Esse \code{data.frame} não possuí o valor individual de cada parcelas
     residuais em cada experimento estão disponíveis no atributo
     \code{"qmr"} do objeto.}
 \source{
-Banzatto, D. A., Kronka, S. D. (2013). Experimentação
-    Agrícola (4th ed.). Jaboticabal, SP: Funep. (Quadro 8.3.1,
-    pág. 196)
+BANZATTO; KRONKA (2013), Quadro 8.3.1, pág. 196.
 
 Filgueira, F. A. R. (1991). Interação genótipo ambiente em batata
     (\emph{Solanum tuberosum} L. spp \emph{tuberosum}). Tese
@@ -64,6 +63,5 @@ xyplot(prod ~ genot, groups = exper, data = BanzattoQd8.3.1,
            "Produção total de tubérculos de 4 parcelas"~(t~ha^{-1})))
 
 }
-\keyword{DBC}
 \keyword{GE}
 
diff --git a/man/BanzattoQd8.4.1.Rd b/man/BanzattoQd8.4.1.Rd
index 8fda9435..5d0d88fa 100644
--- a/man/BanzattoQd8.4.1.Rd
+++ b/man/BanzattoQd8.4.1.Rd
@@ -2,8 +2,9 @@
 % Please edit documentation in R/Banzatto.R
 \name{BanzattoQd8.4.1}
 \alias{BanzattoQd8.4.1}
-\title{Grupo de Ensaios de Competi\enc{çã}{ca}o de Gen\enc{ó}{o}tipos de Cebola}
-\format{Um \code{data.frame} com 60 observações e 3 variáveis.
+\title{Grupo de Ensaios de Competi\enc{çã}{ca}o de Gen\enc{ó}{o}tipos
+    de Cebola}
+\format{Um \code{data.frame} com 60 observações e 3 variáveis, em que
 
 \describe{
 
@@ -18,9 +19,7 @@
 
 }}
 \source{
-Banzatto, D. A., Kronka, S. D. (2013). Experimentação
-    Agrícola (4th ed.). Jaboticabal, SP: Funep. (Quadro 8.4.1,
-    pág. 200)
+BANZATTO; KRONKA (2013), Quadro 8.4.1, pág. 200.
 
 Santos, G. M. (2003). Adaptabilidade e estabilidade de genótipos de
     cebola. Tese (Doutorado em Genética e Melhoramento de
diff --git a/man/BanzattoQd8.4.3.Rd b/man/BanzattoQd8.4.3.Rd
index eee482c8..9dd5a1fe 100644
--- a/man/BanzattoQd8.4.3.Rd
+++ b/man/BanzattoQd8.4.3.Rd
@@ -2,8 +2,9 @@
 % Please edit documentation in R/Banzatto.R
 \name{BanzattoQd8.4.3}
 \alias{BanzattoQd8.4.3}
-\title{Grupo de Experimentos de Aduba\enc{çã}{ca}o Nitrogenada em Milho}
-\format{Um \code{data.frame} com 24 observações e 3 variáveis.
+\title{Grupo de Experimentos de Aduba\enc{çã}{ca}o Nitrogenada em
+    Milho}
+\format{Um \code{data.frame} com 24 observações e 3 variáveis, em que
 
 \describe{
 
@@ -23,9 +24,7 @@
 O \code{data.frame} possui um atributo com os quadrados médios
     residuais em cada experimento.}
 \source{
-Banzatto, D. A., Kronka, S. D. (2013). Experimentação
-    Agrícola (4th ed.). Jaboticabal, SP: Funep. (Quadro 8.4.3,
-    pág. 202)
+BANZATTO; KRONKA (2013), Quadro 8.4.3, pág. 202.
 }
 \description{
 Dados referentes à produção de milho em grãos de ensaios
diff --git a/man/BanzattoQd9.2.1.Rd b/man/BanzattoQd9.2.1.Rd
index 5cc1aecd..2957946e 100644
--- a/man/BanzattoQd9.2.1.Rd
+++ b/man/BanzattoQd9.2.1.Rd
@@ -3,7 +3,7 @@
 \name{BanzattoQd9.2.1}
 \alias{BanzattoQd9.2.1}
 \title{Produ\enc{çã}{ca}o de Variedades de Milho}
-\format{Um \code{data.frame} com 24 observações e 6 variáveis.
+\format{Um \code{data.frame} com 24 observações e 6 variáveis, em que
 
 \describe{
 
@@ -30,9 +30,7 @@ Os fatores A e B são fictícios pois foram criados apenas para
     fatorial 3 \eqn{\times} 2 ao invés de ter um único fator de 6
     níveis.}
 \source{
-Banzatto, D. A., Kronka, S. D. (2013). Experimentação
-    Agrícola (4th ed.). Jaboticabal, SP: Funep. (Quadro 9.2.1,
-    pág. 206)
+BANZATTO; KRONKA (2013), Quadro 9.2.1, pág. 206.
 }
 \description{
 Resultados de um experimento para avaliação da produção
diff --git a/man/BarbinEx1.Rd b/man/BarbinEx1.Rd
index 01a918ed..80fb90c1 100644
--- a/man/BarbinEx1.Rd
+++ b/man/BarbinEx1.Rd
@@ -5,9 +5,7 @@
 \title{Altura de \emph{Pinus elliottii} aos 10 anos de idade}
 \format{Um vetor com 50 elementos de valor numérico.}
 \source{
-Barbin, D. (2013). Planejamento e Análise Estatística de
-    Experimentos Agronômicos (2nd ed.). Londrina, PR:
-    Mecenas. (Exercício 1, pág. 199)
+BARBIN (2013), Exercício 1, pág. 199.
 }
 \description{
 Os dados referem-se à altura (m) de \emph{Pinus
diff --git a/man/BarbinEx13.Rd b/man/BarbinEx13.Rd
index 48bc4f38..ff07a2f9 100644
--- a/man/BarbinEx13.Rd
+++ b/man/BarbinEx13.Rd
@@ -2,8 +2,9 @@
 % Please edit documentation in R/Barbin.R
 \name{BarbinEx13}
 \alias{BarbinEx13}
-\title{Di\enc{â}{a}metro M\enc{é}{e}dio do Tronco de Esp\enc{é}{e}cies de Eucalipto}
-\format{Um \code{data.frame} com 24 observações e 4 variáveis.
+\title{Di\enc{â}{a}metro M\enc{é}{e}dio do Tronco de
+    Esp\enc{é}{e}cies de Eucalipto}
+\format{Um \code{data.frame} com 24 observações e 4 variáveis, em que
 
 \describe{
 
@@ -19,9 +20,7 @@
 
 }}
 \source{
-Barbin, D. (2013). Planejamento e Análise Estatística de
-    Experimentos Agronômicos (2nd ed.). Londrina, PR:
-    Mecenas. (Exercício 13, pág. 206)
+BARBIN (2013), Exercício 13, pág. 206.
 }
 \description{
 Diâmetro médio (cm), aos 5 anos de idade, de plantas
diff --git a/man/BarbinEx14.Rd b/man/BarbinEx14.Rd
index e42ab786..9853be60 100644
--- a/man/BarbinEx14.Rd
+++ b/man/BarbinEx14.Rd
@@ -3,7 +3,7 @@
 \name{BarbinEx14}
 \alias{BarbinEx14}
 \title{Produ\enc{çã}{ca}o de Milho em Ensaio Fatorial de NPK}
-\format{Um \code{data.frame} com 24 observações e 5 variáveis.
+\format{Um \code{data.frame} com 24 observações e 5 variáveis, em que
 
 \describe{
 
@@ -22,9 +22,7 @@
 
 }}
 \source{
-Barbin, D. (2013). Planejamento e Análise Estatística de
-    Experimentos Agronômicos (2nd ed.). Londrina, PR:
-    Mecenas. (Exercício 14, pág. 206)
+BARBIN (2013), Exercício 14, pág. 206.
 }
 \description{
 Ensaio fatorial de adubação NPK, fatorial \eqn{2^3}, com
diff --git a/man/BarbinEx16.Rd b/man/BarbinEx16.Rd
index 33d70c91..f68382d5 100644
--- a/man/BarbinEx16.Rd
+++ b/man/BarbinEx16.Rd
@@ -4,7 +4,7 @@
 \alias{BarbinEx16}
 \title{Efeito de Sistemas de Plantio na Produtividade de
     Cana-de-a\enc{çú}{cu}car}
-\format{Um \code{data.frame} com 40 observações e 4 variáveis.
+\format{Um \code{data.frame} com 40 observações e 4 variáveis, em que
 
 \describe{
 
@@ -24,9 +24,7 @@
 
 }}
 \source{
-Barbin, D. (2013). Planejamento e Análise Estatística de
-    Experimentos Agronômicos (2nd ed.). Londrina, PR:
-    Mecenas. (Exercício 16, pág. 208)
+BARBIN (2013), Exercício 16, pág. 208.
 }
 \description{
 Produtividade de cana-de-açúcar, cultivar CB-43-5,
diff --git a/man/BarbinEx17.Rd b/man/BarbinEx17.Rd
index ebbcba16..8a36ec11 100644
--- a/man/BarbinEx17.Rd
+++ b/man/BarbinEx17.Rd
@@ -2,7 +2,8 @@
 % Please edit documentation in R/Barbin.R
 \name{BarbinEx17}
 \alias{BarbinEx17}
-\title{Efeito do Espa\enc{ç}{c}amento na Produtividade de Laranjeira Val\enc{ê}{e}ncia}
+\title{Efeito do Espa\enc{ç}{c}amento na Produtividade de Laranjeira
+    Val\enc{ê}{e}ncia}
 \format{Um \code{data.frame} com 100 observações e 4 variáveis, em
     que
 
@@ -21,9 +22,7 @@
 
 }}
 \source{
-Barbin, D. (2013). Planejamento e Análise Estatística de
-    Experimentos Agronômicos (2nd ed.). Londrina, PR:
-    Mecenas. (Exercício 17, pág. 209)
+BARBIN (2013), Exercício 17, pág. 209.
 }
 \description{
 Dados de produtividade de laranja, em kg por planta, de
diff --git a/man/BarbinEx18.Rd b/man/BarbinEx18.Rd
index 878fd0c5..4ce0df12 100644
--- a/man/BarbinEx18.Rd
+++ b/man/BarbinEx18.Rd
@@ -2,7 +2,8 @@
 % Please edit documentation in R/Barbin.R
 \name{BarbinEx18}
 \alias{BarbinEx18}
-\title{Altura de Plantas de Esp\enc{é}{e}cies de Eucalipto em V\enc{á}{a}rios Locais}
+\title{Altura de Plantas de Esp\enc{é}{e}cies de Eucalipto em
+    V\enc{á}{a}rios Locais}
 \format{Um \code{data.frame} com 100 observações e 4 variáveis, em
     que
 
@@ -22,9 +23,7 @@
 
 }}
 \source{
-Barbin, D. (2013). Planejamento e Análise Estatística de
-    Experimentos Agronômicos (2nd ed.). Londrina, PR:
-    Mecenas. (Exercício 18, pág. 210)
+BARBIN (2013), Exercício 18, pág. 210.
 }
 \description{
 Dados referentes à altura de plantas de eucalipto, com 3
diff --git a/man/BarbinEx3.Rd b/man/BarbinEx3.Rd
index ee51ead2..d99c5d07 100644
--- a/man/BarbinEx3.Rd
+++ b/man/BarbinEx3.Rd
@@ -2,20 +2,20 @@
 % Please edit documentation in R/Barbin.R
 \name{BarbinEx3}
 \alias{BarbinEx3}
-\title{Podrid\enc{ã}{a}o Mole de Manga em Fun\enc{çã}{ca}o do Tratamento T\enc{é}{e}rmico}
-\format{Um \code{data.frame} com 28 observações e 2 variáveis.
+\title{Podrid\enc{ã}{a}o Mole de Manga em Fun\enc{çã}{ca}o do
+    Tratamento T\enc{é}{e}rmico}
+\format{Um \code{data.frame} com 28 observações e 2 variáveis, em que
 \describe{
 
-\item{\code{tterm}}{Fator categórico que indica o tratamento térmico.}
+\item{\code{tterm}}{Fator categórico que indica o tratamento
+    térmico.}
 
 \item{\code{nota}}{Nota atribuída a podridão mole de manga, valor
     resultante da média de 6 frutos avaliados.}
 
 }}
 \source{
-Barbin, D. (2013). Planejamento e Análise Estatística de
-    Experimentos Agronômicos (2nd ed.). Londrina, PR:
-    Mecenas. (Exercício 3, pág. 119)
+BARBIN (2013), Exercício 3, pág. 119.
 }
 \description{
 Os dados referem-se as notas (médias de 6 frutos)
diff --git a/man/BarbinEx8.Rd b/man/BarbinEx8.Rd
index 3406d049..36509af2 100644
--- a/man/BarbinEx8.Rd
+++ b/man/BarbinEx8.Rd
@@ -3,7 +3,7 @@
 \name{BarbinEx8}
 \alias{BarbinEx8}
 \title{Controle Qu\enc{í}{i}mico do Damping-off em Eucalipto}
-\format{Um \code{data.frame} com 45 observações e 3 variáveis.
+\format{Um \code{data.frame} com 45 observações e 3 variáveis, em que
 
 \describe{
 
@@ -19,9 +19,7 @@
 
 }}
 \source{
-Barbin, D. (2013). Planejamento e Análise Estatística de
-    Experimentos Agronômicos (2nd ed.). Londrina, PR:
-    Mecenas. (Exercício 8, pág. 202)
+BARBIN (2013), Exercício 8, pág. 202.
 
  Krugner, T. L. Controle químico do "damping-off" em
     eucalipto. Piracicaba, 1971. 60p. Dissertação (Mestrado) - Escola
diff --git a/man/BarbinEx9.Rd b/man/BarbinEx9.Rd
index d053f44c..f34ad3e9 100644
--- a/man/BarbinEx9.Rd
+++ b/man/BarbinEx9.Rd
@@ -3,8 +3,9 @@
 \name{BarbinEx9}
 \alias{BarbinEx10}
 \alias{BarbinEx9}
-\title{Ensaio de Competi\enc{çã}{ca}o de Clones de Laranja Pera-do-Rio}
-\format{Um \code{data.frame} com 78 observações e 4 variáveis.
+\title{Ensaio de Competi\enc{çã}{ca}o de Clones de Laranja
+    Pera-do-Rio}
+\format{Um \code{data.frame} com 78 observações e 4 variáveis, em que
 
 \describe{
 
@@ -21,9 +22,7 @@
 
 }}
 \source{
-Barbin, D. (2013). Planejamento e Análise Estatística de
-    Experimentos Agronômicos (2nd ed.). Londrina, PR:
-    Mecenas. (Exercício 9, pág. 203)
+BARBIN (2013), Exercício 9, pág. 203.
 }
 \description{
 Ensaio de competição de 13 clones de laranja Pera-do-Rio
diff --git a/man/BarbinPg104.Rd b/man/BarbinPg104.Rd
index df6f1787..fd9ddac5 100644
--- a/man/BarbinPg104.Rd
+++ b/man/BarbinPg104.Rd
@@ -21,9 +21,7 @@
 
 }}
 \source{
-Barbin, D. (2013). Planejamento e Análise Estatística de
-    Experimentos Agronômicos (2nd ed.). Londrina, PR:
-    Mecenas. (pág. 104)
+BARBIN (2013), pág. 104.
 }
 \description{
 Experimento em delineamento quadrado latino que avaliou
diff --git a/man/BarbinPg114.Rd b/man/BarbinPg114.Rd
index eb275e4d..45311904 100644
--- a/man/BarbinPg114.Rd
+++ b/man/BarbinPg114.Rd
@@ -2,8 +2,10 @@
 % Please edit documentation in R/Barbin.R
 \name{BarbinPg114}
 \alias{BarbinPg114}
-\title{Influ\enc{ê}{e}ncia do Aparelho e Operador na Medi\enc{çã}{ca}o de \enc{Á}{A}rvores}
-\format{Um \code{data.frame} com 200 observações e 4 variáveis.
+\title{Influ\enc{ê}{e}ncia do Aparelho e Operador na
+    Medi\enc{çã}{ca}o de \enc{Á}{A}rvores}
+\format{Um \code{data.frame} com 200 observações e 4 variáveis, em
+    que
 
 \describe{
 
@@ -24,9 +26,7 @@
 
 }}
 \source{
-Barbin, D. (2013). Planejamento e Análise Estatística de
-    Experimentos Agronômicos (2nd ed.). Londrina, PR:
-    Mecenas. (pág. 114)
+BARBIN (2013), pág. 114.
 
 Simões, J. W., Mello, H. A., Barbin, D. (1967). Eficiência dos
     aparelhos e e influência do operador na medição de altura total
diff --git a/man/BarbinPg125.Rd b/man/BarbinPg125.Rd
index 14e22854..c0f2ea00 100644
--- a/man/BarbinPg125.Rd
+++ b/man/BarbinPg125.Rd
@@ -3,7 +3,7 @@
 \name{BarbinPg125}
 \alias{BarbinPg125}
 \title{Aduba\enc{çã}{ca}o NPK no Cafeeiro}
-\format{Um \code{data.frame} com 48 observações e 5 variáveis.
+\format{Um \code{data.frame} com 48 observações e 5 variáveis, em que
 
 \describe{
 
@@ -12,7 +12,8 @@
 
 \item{\code{P}}{Inteiro que codifica dois níveis de fósforo (0 e 1).}
 
-\item{\code{K}}{Inteiro que codifica dois níveis de potássio (0 e 1).}
+\item{\code{K}}{Inteiro que codifica dois níveis de potássio (0 e
+    1).}
 
 \item{\code{bloc}}{Fator de níveis categóricos considerado para
     controle local.}
@@ -23,9 +24,7 @@
 
 }}
 \source{
-Barbin, D. (2013). Planejamento e Análise Estatística de
-    Experimentos Agronômicos (2nd ed.). Londrina, PR:
-    Mecenas. (pág. 125)
+BARBIN (2013), pág. 125).
 }
 \description{
 Experimento no o delineamento de blocos casualizados que
diff --git a/man/BarbinPg137.Rd b/man/BarbinPg137.Rd
index 50cc02ed..09567b9e 100644
--- a/man/BarbinPg137.Rd
+++ b/man/BarbinPg137.Rd
@@ -2,8 +2,9 @@
 % Please edit documentation in R/Barbin.R
 \name{BarbinPg137}
 \alias{BarbinPg137}
-\title{Aduba\enc{çã}{ca}o NPK na Produ\enc{çã}{ca}o de Algod\enc{ã}{a}o Herb\enc{á}{a}ceo}
-\format{Um \code{data.frame} com 54 observações e 6 variáveis.
+\title{Aduba\enc{çã}{ca}o NPK na Produ\enc{çã}{ca}o de
+    Algod\enc{ã}{a}o Herb\enc{á}{a}ceo}
+\format{Um \code{data.frame} com 54 observações e 6 variáveis, em que
     \describe{
 
 \item{\code{N}}{Dose de nitrogênio (kg ha\eqn{^{-1}}) usada na
@@ -26,9 +27,7 @@
 
 }}
 \source{
-Barbin, D. (2013). Planejamento e Análise Estatística de
-    Experimentos Agronômicos (2nd ed.). Londrina, PR:
-    Mecenas. (pág. 137)
+BARBIN (2013), pág. 137.
 
 Cavalcanti, F. B. (1977). A adubação mineral na cultura do algodão
     (\emph{Gossypium hirsutum} L.) no Estado de
diff --git a/man/BarbinPg156.Rd b/man/BarbinPg156.Rd
index 2a3da52f..b5394f90 100644
--- a/man/BarbinPg156.Rd
+++ b/man/BarbinPg156.Rd
@@ -2,7 +2,8 @@
 % Please edit documentation in R/Barbin.R
 \name{BarbinPg156}
 \alias{BarbinPg156}
-\title{Aplica\enc{çã}{ca}o de Aduba\enc{çã}{ca}o Fosfatada na Produ\enc{çã}{ca}o de Milho}
+\title{Aplica\enc{çã}{ca}o de Aduba\enc{çã}{ca}o Fosfatada na
+    Produ\enc{çã}{ca}o de Milho}
 \format{Um \code{data.frame} com 48 observações e 4 variáveis, em que
 
 \describe{
@@ -21,9 +22,7 @@
 
 }}
 \source{
-Barbin, D. (2013). Planejamento e Análise Estatística de
-    Experimentos Agronômicos (2nd ed.). Londrina, PR:
-    Mecenas. (pág. 156)
+BARBIN (2013), pág. 156.
 }
 \description{
 Dados de um ensaio de adubação fosfatada em milho,
diff --git a/man/BarbinPg167.Rd b/man/BarbinPg167.Rd
index b985fd41..20948f97 100644
--- a/man/BarbinPg167.Rd
+++ b/man/BarbinPg167.Rd
@@ -2,7 +2,8 @@
 % Please edit documentation in R/Barbin.R
 \name{BarbinPg167}
 \alias{BarbinPg167}
-\title{Produ\enc{çã}{ca}o de Porta-enxertos para Laranjeira em V\enc{á}{a}rias Safras}
+\title{Produ\enc{çã}{ca}o de Porta-enxertos para Laranjeira em
+    V\enc{á}{a}rias Safras}
 \format{Um \code{data.frame} com 90 observações e 4 variáveis, em que
 
 \describe{
@@ -21,9 +22,7 @@
 
 }}
 \source{
-Barbin, D. (2013). Planejamento e Análise Estatística de
-    Experimentos Agronômicos (2nd ed.). Londrina, PR:
-    Mecenas. (pág. 167)
+BARBIN (2013), pág. 167.
 }
 \description{
 Dados de produção de laranja de um ensaio de competição
diff --git a/man/BarbinPg177.Rd b/man/BarbinPg177.Rd
index e2499146..116d6e2a 100644
--- a/man/BarbinPg177.Rd
+++ b/man/BarbinPg177.Rd
@@ -2,7 +2,8 @@
 % Please edit documentation in R/Barbin.R
 \name{BarbinPg177}
 \alias{BarbinPg177}
-\title{Altura de Prog\enc{ê}{e}nies de \emph{E. grandis} em Tr\enc{ê}{e}s Locais}
+\title{Altura de Prog\enc{ê}{e}nies de \emph{E. grandis} em
+    Tr\enc{ê}{e}s Locais}
 \format{Um \code{data.frame} com 72 observações e 4 variáveis, em que
 
 \describe{
@@ -21,9 +22,7 @@
 
 }}
 \source{
-Barbin, D. (2013). Planejamento e Análise Estatística de
-    Experimentos Agronômicos (2nd ed.). Londrina, PR:
-    Mecenas. (pág. 177)
+BARBIN (2013), pág. 177.
 }
 \description{
 Dados de experimento que mediu a altura (m) de árvores
diff --git a/man/BarbinPg25.Rd b/man/BarbinPg25.Rd
index 86265ff6..685e9679 100644
--- a/man/BarbinPg25.Rd
+++ b/man/BarbinPg25.Rd
@@ -3,7 +3,7 @@
 \name{BarbinPg25}
 \alias{BarbinPg25}
 \title{Enraizamento de Estacas de P\enc{ê}{e}ssego}
-\format{Um \code{data.frame} com 20 observações e 2 variáveis.
+\format{Um \code{data.frame} com 20 observações e 2 variáveis, em que
 
 \describe{
 
@@ -19,9 +19,7 @@ O atributo \code{missings} é um vetor com números que indicam a
     posição das observações consideradas perdidas para se ilustrar a
     análise do experimento com número não igual de repetições.}
 \source{
-Barbin, D. (2013). Planejamento e Análise Estatística de
-    Experimentos Agronômicos (2nd ed.). Londrina, PR:
-    Mecenas. (pág. 25)
+BARBIN (2013), pág. 25.
 
 Sambão, J. C., Sampaio, V. R., Barbin, D. (1982). Enraizamento de
     estacas herbáceas de pessegueiro (\emph{Prunus persica}
diff --git a/man/BarbinPg72.Rd b/man/BarbinPg72.Rd
index 854d2655..9b4a0ce1 100644
--- a/man/BarbinPg72.Rd
+++ b/man/BarbinPg72.Rd
@@ -3,7 +3,7 @@
 \name{BarbinPg72}
 \alias{BarbinPg72}
 \title{Produ\enc{çã}{ca}o de Laranjeira sob Diferentes Porta-enxertos}
-\format{Um \code{data.frame} com 27 observações e 3 variáveis.
+\format{Um \code{data.frame} com 27 observações e 3 variáveis, em que
 
 \describe{
 
@@ -21,9 +21,7 @@ O atributo \code{missings} é um vetor com o número das observações
     consideradas como perdidas para ilustrar como fazer a análise do
     experimento desbalanceado.}
 \source{
-Barbin, D. (2013). Planejamento e Análise Estatística de
-    Experimentos Agronômicos (2nd ed.). Londrina, PR:
-    Mecenas. (pág. 72)
+BARBIN (2013), pág. 72.
 
 Teófilo Sobrinho, J. (1972). Comportamento da laranjeira valência
     (\emph{Citrus sinensis} L., Osbeck) sob diferentes
diff --git a/man/CostaEx5.7.2.Rd b/man/CostaEx5.7.2.Rd
index 4ab2a807..285097f9 100644
--- a/man/CostaEx5.7.2.Rd
+++ b/man/CostaEx5.7.2.Rd
@@ -2,7 +2,8 @@
 % Please edit documentation in R/Costa.R
 \name{CostaEx5.7.2}
 \alias{CostaEx5.7.2}
-\title{Densidade do Solo ao Longo do Perfil em Zonas de Compacta\enc{çã}{ca}o}
+\title{Densidade do Solo ao Longo do Perfil em Zonas de
+    Compacta\enc{çã}{ca}o}
 \format{Um \code{data.frame} com 10 observações e 2 variáveis.
 
 \describe{
@@ -15,9 +16,7 @@
 
 }}
 \source{
-Costa, J. R. (2003). Técnicas experimentais aplicadas às
-    ciências agrárias (Documentos 163). Seropédica, RJ: Embrapa
-    Agrobiologia. (Exemplo 5.7.2.1, pág. 90)
+Costa (2013), Exemplo 5.7.2.1, pág. 90.
 }
 \description{
 Os dados são resultados de um estudo feito em zonas de
@@ -38,5 +37,5 @@ xyplot(dens ~ prof, data = CostaEx5.7.2,
        ylab = expression("Densidade do solo"~(g~cm^{-3})))
 
 }
-\keyword{TODO}
+\keyword{RL}
 
diff --git a/man/CostaEx5.7.3.Rd b/man/CostaEx5.7.3.Rd
index 2d67d759..e8faaf98 100644
--- a/man/CostaEx5.7.3.Rd
+++ b/man/CostaEx5.7.3.Rd
@@ -16,9 +16,7 @@
 
 }}
 \source{
-Costa, J. R. (2003). Técnicas experimentais aplicadas às
-    ciências agrárias (Documentos 163). Seropédica, RJ: Embrapa
-    Agrobiologia. (Exemplo 5.7.3.1, pág. 95)
+Costa (2013), Exemplo 5.7.3.1, pág. 95.
 }
 \description{
 Experimento instalado em delineamento inteiramente
diff --git a/man/CostaTb4.Rd b/man/CostaTb4.Rd
index f29c7d88..cfe304d4 100644
--- a/man/CostaTb4.Rd
+++ b/man/CostaTb4.Rd
@@ -18,9 +18,7 @@
 
 }}
 \source{
-Costa, J. R. (2003). Técnicas experimentais aplicadas às
-    ciências agrárias (Documentos 163). Seropédica, RJ: Embrapa
-    Agrobiologia. (Tabela 4, pág. 58)
+Costa (2013), Tabela 4, pág. 58.
 }
 \description{
 Resultados de um experimento conduzido em casa de
diff --git a/man/CostaTb6.Rd b/man/CostaTb6.Rd
index ecc865f2..50d57d8d 100644
--- a/man/CostaTb6.Rd
+++ b/man/CostaTb6.Rd
@@ -20,9 +20,7 @@
 
 }}
 \source{
-Costa, J. R. (2003). Técnicas experimentais aplicadas às
-    ciências agrárias (Documentos 163). Seropédica, RJ: Embrapa
-    Agrobiologia. (Tabela 6 pág. 63)
+Costa (2013), Tabela 6 pág. 63.
 }
 \description{
 Experimento instalado em delineamento de blocos
diff --git a/man/CostaTb7.Rd b/man/CostaTb7.Rd
index 1b3c53f4..253b9965 100644
--- a/man/CostaTb7.Rd
+++ b/man/CostaTb7.Rd
@@ -22,9 +22,7 @@
 
 }}
 \source{
-Costa, J. R. (2003). Técnicas experimentais aplicadas às
-    ciências agrárias (Documentos 163). Seropédica, RJ: Embrapa
-    Agrobiologia. (Tabela 7, pág. 68)
+Costa (2013), Tabela 7, pág. 68.
 }
 \description{
 Experimento fatorial que avaliou o peso do colmo de duas
diff --git a/man/CostaTb8.Rd b/man/CostaTb8.Rd
index 2755356e..45c8d175 100644
--- a/man/CostaTb8.Rd
+++ b/man/CostaTb8.Rd
@@ -2,7 +2,8 @@
 % Please edit documentation in R/Costa.R
 \name{CostaTb8}
 \alias{CostaTb8}
-\title{Irriga\enc{çã}{ca}o no Tamanho de Frutos de Variedades de Banana}
+\title{Irriga\enc{çã}{ca}o no Tamanho de Frutos de Variedades de
+    Banana}
 \format{Um \code{data.frame} com 32 observações e 4 variáveis.
 
 \describe{
@@ -25,9 +26,7 @@
 
 }}
 \source{
-Costa, J. R. (2003). Técnicas experimentais aplicadas às
-    ciências agrárias (Documentos 163). Seropédica, RJ: Embrapa
-    Agrobiologia. (Tabela 8, pág. 76)
+Costa (2013), Tabela 8, pág. 76.
 }
 \description{
 Experimento em parcelas subdivididas que estudou o
diff --git a/man/DiasEg10.1.Rd b/man/DiasEg10.1.Rd
index eb13d7e3..0e11eda6 100644
--- a/man/DiasEg10.1.Rd
+++ b/man/DiasEg10.1.Rd
@@ -2,8 +2,8 @@
 % Please edit documentation in R/Dias.R
 \name{DiasEg10.1}
 \alias{DiasEg10.1}
-\title{Subst\enc{â}{a}ncias Alelo\enc{á}{a}ticas no Percentual de Germina\enc{çã}{ca}o de
-    Sementes}
+\title{Subst\enc{â}{a}ncias Alelo\enc{á}{a}ticas no Percentual de
+    Germina\enc{çã}{ca}o de Sementes}
 \format{Um \code{data.frame} com 40 observações e 4 variáveis, em que
 
 \describe{
@@ -20,8 +20,7 @@
 
 }}
 \source{
-Dias, L. A. S., Barros, W. S. (2009). Biometria
-     Experimental. Viçosa, MG: UFV. (Exemplo 10.1, pág. 269)
+BARROS; DIAS (2009), Exemplo 10.1, pág. 269.
 }
 \description{
 Experimento em delineamento inteiramente casualizado
diff --git a/man/DiasEg10.2.Rd b/man/DiasEg10.2.Rd
index 5ca57903..73571962 100644
--- a/man/DiasEg10.2.Rd
+++ b/man/DiasEg10.2.Rd
@@ -20,8 +20,7 @@
 
 }}
 \source{
-Dias, L. A. S., Barros, W. S. (2009). Biometria
-    Experimental. Viçosa, MG: UFV. (Exemplo 10.2, pág. 286)
+BARROS; DIAS (2009), Exemplo 10.2, pág. 286.
 }
 \description{
 Experimento em delineamento inteiramente casualizado
diff --git a/man/DiasEg11.1.Rd b/man/DiasEg11.1.Rd
index 65ca0575..37dad19c 100644
--- a/man/DiasEg11.1.Rd
+++ b/man/DiasEg11.1.Rd
@@ -20,8 +20,7 @@
 
 }}
 \source{
-Dias, L. A. S., Barros, W. S. (2009). Biometria
-    Experimental. Viçosa, MG: UFV. (Exemplo 11.1, pág. 305)
+BARROS; DIAS (2009), Exemplo 11.1, pág. 305.
 }
 \description{
 Resultados de experimentos em 3 sítios, em delineamento
diff --git a/man/DiasEg3.2.Rd b/man/DiasEg3.2.Rd
index 59449008..d7f755fe 100644
--- a/man/DiasEg3.2.Rd
+++ b/man/DiasEg3.2.Rd
@@ -6,8 +6,7 @@
 \format{Vetor com 43 observações que são o número de frutos
     produzidos por plantas de cacaueiro.}
 \source{
-Dias, L. A. S., Barros, W. S. (2009). Biometria
-    Experimental. Viçosa, MG: UFV.
+BARROS; DIAS (2009), Exemplo 3.2.
 }
 \description{
 Amostra aleatória do número de frutos produzidos por
diff --git a/man/DiasEg3.6.Rd b/man/DiasEg3.6.Rd
index 1d78070c..b1b3b258 100644
--- a/man/DiasEg3.6.Rd
+++ b/man/DiasEg3.6.Rd
@@ -5,8 +5,7 @@
 \title{Alturas de plantas de milho}
 \format{Vetor com 100 observações da altura (cm).}
 \source{
-Dias, L. A. S., Barros, W. S. (2009). Biometria
-    Experimental. Viçosa, MG: UFV.
+BARROS; DIAS (2009), Exemplo 3.6.
 }
 \description{
 Amostras aleatória da alturas de plantas de milho.
diff --git a/man/DiasEg5.1.Rd b/man/DiasEg5.1.Rd
index f7ed1156..2feb77b3 100644
--- a/man/DiasEg5.1.Rd
+++ b/man/DiasEg5.1.Rd
@@ -2,8 +2,8 @@
 % Please edit documentation in R/Dias.R
 \name{DiasEg5.1}
 \alias{DiasEg5.1}
-\title{N\enc{ú}{u}mero de Ovos Eclodidos de Nemat\enc{ó}{o}ides Ap\enc{ó}{o}s Aplica\enc{çã}{ca}o de
-    Nematicidas Naturais}
+\title{N\enc{ú}{u}mero de Ovos Eclodidos de Nemat\enc{ó}{o}ides
+    Ap\enc{ó}{o}s Aplica\enc{çã}{ca}o de Nematicidas Naturais}
 \format{Um \code{data.frame} com 20 observações e 3 variáveis, em que
 
 \describe{
@@ -16,8 +16,7 @@
 
 }}
 \source{
-Dias, L. A. S., Barros, W. S. (2009). Biometria
-    Experimental. Viçosa, MG: UFV. (Exemplo 5.1, pág. 130)
+BARROS; DIAS (2009), Exemplo 5.1, pág. 130.
 }
 \description{
 Resultados de um experimento em delineamento
diff --git a/man/DiasEg5.3.Rd b/man/DiasEg5.3.Rd
index 0ba9144a..7803af7d 100644
--- a/man/DiasEg5.3.Rd
+++ b/man/DiasEg5.3.Rd
@@ -16,8 +16,7 @@
 
 }}
 \source{
-Dias, L. A. S., Barros, W. S. (2009). Biometria
-    Experimental. Viçosa, MG: UFV. (Exercício 9, Cap. 11, pág. 321)
+BARROS; DIAS (2009), Exercício 9, Cap. 11, pág. 321.
 }
 \description{
 Resultados de um experimento em delineamento
diff --git a/man/DiasEg6.1.Rd b/man/DiasEg6.1.Rd
index aa4be4ac..23243474 100644
--- a/man/DiasEg6.1.Rd
+++ b/man/DiasEg6.1.Rd
@@ -2,7 +2,8 @@
 % Please edit documentation in R/Dias.R
 \name{DiasEg6.1}
 \alias{DiasEg6.1}
-\title{Ganhos de Produ\enc{çã}{ca}o de Arroz nos Ciclos de Sele\enc{çã}{ca}o}
+\title{Ganhos de Produ\enc{çã}{ca}o de Arroz nos Ciclos de
+    Sele\enc{çã}{ca}o}
 \format{Um \code{data.frame} com 6 observações e 2 variáveis, em que
 
 \describe{
@@ -14,8 +15,7 @@
 
 }}
 \source{
-Dias, L. A. S., Barros, W. S. (2009). Biometria
-    Experimental. Viçosa, MG: UFV. (Exemplo 6.1, pág. 157)
+BARROS; DIAS (2009), Exemplo 6.1, pág. 157.
 }
 \description{
 Amostra com 6 pares de observações representanto os
diff --git a/man/DiasEg6.2.Rd b/man/DiasEg6.2.Rd
index 9032e163..c5fc4334 100644
--- a/man/DiasEg6.2.Rd
+++ b/man/DiasEg6.2.Rd
@@ -2,7 +2,8 @@
 % Please edit documentation in R/Dias.R
 \name{DiasEg6.2}
 \alias{DiasEg6.2}
-\title{Aduba\enc{çã}{ca}o NPK na Produ\enc{çã}{ca}o de Feij\enc{ã}{a}o}
+\title{Aduba\enc{çã}{ca}o NPK na Produ\enc{çã}{ca}o de
+    Feij\enc{ã}{a}o}
 \format{Um \code{data.frame} com 20 observações e 3 variáveis, em que
 
 \describe{
@@ -18,8 +19,7 @@
 
 }}
 \source{
-Dias, L. A. S., Barros, W. S. (2009). Biometria
-    Experimental. Viçosa, MG: UFV. (Exemplo 6.2, pág. 164)
+BARROS; DIAS (2009), Exemplo 6.2, pág. 164.
 }
 \description{
 Experimento instalado em delineamento de blocos
diff --git a/man/DiasEg6.3.Rd b/man/DiasEg6.3.Rd
index 1c8dc243..622a3863 100644
--- a/man/DiasEg6.3.Rd
+++ b/man/DiasEg6.3.Rd
@@ -16,8 +16,7 @@
 
 }}
 \source{
-Dias, L. A. S., Barros, W. S. (2009). Biometria
-    Experimental. Viçosa, MG: UFV. (Exemplo 6.3, pág. 173)
+BARROS; DIAS (2009), Exemplo 6.3, pág. 173.
 }
 \description{
 Foram avaliados 7 clones de cacaueiros a fim determinar
diff --git a/man/DiasEg7.1.Rd b/man/DiasEg7.1.Rd
index 851dce4f..37f89d45 100644
--- a/man/DiasEg7.1.Rd
+++ b/man/DiasEg7.1.Rd
@@ -10,15 +10,14 @@
 \item{\code{luz}}{Fator métrico que identifica, em escala codificada,
     a quantidade de luz aplicada.}
 
-\item{\code{agua}}{Fator métrico que identifica, em escala codificada,
-    a quantidade de água aplicada.}
+\item{\code{agua}}{Fator métrico que identifica, em escala
+    codificada, a quantidade de água aplicada.}
 
 \item{\code{prod}}{Produção de tomateiros.}
 
 }}
 \source{
-Dias, L. A. S., Barros, W. S. (2009). Biometria
-    Experimental. Viçosa, MG: UFV. (Exemplo 7.1, pág. 187)
+BARROS; DIAS (2009), Exemplo 7.1, pág. 187.
 }
 \description{
 Resultados de um experimento que avaliou o efeito da
diff --git a/man/DiasEg9.1.Rd b/man/DiasEg9.1.Rd
index f5f60817..d8194539 100644
--- a/man/DiasEg9.1.Rd
+++ b/man/DiasEg9.1.Rd
@@ -16,8 +16,7 @@
 
 }}
 \source{
-Dias, L. A. S., Barros, W. S. (2009). Biometria
-    Experimental. Viçosa, MG: UFV. (Exemplo 9.1, pág. 222)
+BARROS; DIAS (2009), Exemplo 9.1, pág. 222.
 }
 \description{
 Em um ensaio em delineamento inteiramente casualizado
diff --git a/man/DiasEg9.2.Rd b/man/DiasEg9.2.Rd
index 7ea9501f..44d4fc78 100644
--- a/man/DiasEg9.2.Rd
+++ b/man/DiasEg9.2.Rd
@@ -20,8 +20,7 @@
 
 }}
 \source{
-Dias, L. A. S., Barros, W. S. (2009). Biometria
-    Experimental. Viçosa, MG: UFV. (Exemplo 9.2, pág. 231)
+BARROS; DIAS (2009), Exemplo 9.2, pág. 231.
 }
 \description{
 Dados de produção de cacau úmido (kg/planta) obtidos de
diff --git a/man/DiasEg9.4.Rd b/man/DiasEg9.4.Rd
index 2b9c8a34..7f16f691 100644
--- a/man/DiasEg9.4.Rd
+++ b/man/DiasEg9.4.Rd
@@ -20,8 +20,7 @@
 
 }}
 \source{
-Dias, L. A. S., Barros, W. S. (2009). Biometria
-    Experimental. Viçosa, MG: UFV. (Exemplo 9.4, pág.247)
+BARROS; DIAS (2009), Exemplo 9.4, pág. 247.
 }
 \description{
 Dados de produção de cacau de 5 cultivares em um
diff --git a/man/DiasEx10.4.10.Rd b/man/DiasEx10.4.10.Rd
index 6f69e85d..4a7f3756 100644
--- a/man/DiasEx10.4.10.Rd
+++ b/man/DiasEx10.4.10.Rd
@@ -22,8 +22,7 @@
 
 }}
 \source{
-Dias, L. A. S., Barros, W. S. (2009). Biometria
-    Experimental. Viçosa, MG: UFV. (Exercício 10, Cap. 10, pág. 296)
+BARROS; DIAS (2009), Exercício 10, Cap. 10, pág. 296.
 }
 \description{
 Dados refentes à produção de 3 clones
diff --git a/man/DiasEx10.4.6.Rd b/man/DiasEx10.4.6.Rd
index a27f287e..9bb9bedf 100644
--- a/man/DiasEx10.4.6.Rd
+++ b/man/DiasEx10.4.6.Rd
@@ -15,9 +15,7 @@
 \item{\code{prod}}{Produtividade.}
 }}
 \source{
-Dias, L. A. S., Barros, W. S. (2009). Biometria
-    Experimental. Viçosa, MG: UFV. (Exercício 10.4, Cap. 10,
-    pág. 294)
+BARROS; DIAS (2009), Exercício 10.4, Cap. 10, pág. 294.
 }
 \description{
 Ensaio de competição de batata doce, instalado em
diff --git a/man/DiasEx10.4.7.Rd b/man/DiasEx10.4.7.Rd
index dd135f51..617177c5 100644
--- a/man/DiasEx10.4.7.Rd
+++ b/man/DiasEx10.4.7.Rd
@@ -24,8 +24,7 @@
 
 }}
 \source{
-Dias, L. A. S., Barros, W. S. (2009). Biometria
-    Experimental. Viçosa, MG: UFV. (Exercício 7, Cap. 10, pág. 295)
+BARROS; DIAS (2009), Exercício 7, Cap. 10, pág. 295.
 }
 \description{
 Em um experimento em delineamento inteiramente
diff --git a/man/DiasEx10.4.8.Rd b/man/DiasEx10.4.8.Rd
index f56e043f..e7d25912 100644
--- a/man/DiasEx10.4.8.Rd
+++ b/man/DiasEx10.4.8.Rd
@@ -2,7 +2,8 @@
 % Please edit documentation in R/Dias.R
 \name{DiasEx10.4.8}
 \alias{DiasEx10.4.8}
-\title{Teores de Mat\enc{é}{e}ria Seca de Gramineas em Fun\enc{çã}{ca}o da Calagem}
+\title{Teores de Mat\enc{é}{e}ria Seca de Gramineas em
+    Fun\enc{çã}{ca}o da Calagem}
 \format{Um \code{data.frame} com 36 observações e 4 variáveis, em que
 
 \describe{
@@ -20,8 +21,7 @@
 
 }}
 \source{
-Dias, L. A. S., Barros, W. S. (2009). Biometria
-    Experimental. Viçosa, MG: UFV. (Exercício 8, Cap. 10, pág. 295)
+BARROS; DIAS (2009), Exercício 8, Cap. 10, pág. 295.
 }
 \description{
 Em um ensaio em delineamento de blocos casualizados foi
diff --git a/man/DiasEx11.7.8.Rd b/man/DiasEx11.7.8.Rd
index 2c229485..2cf522fb 100644
--- a/man/DiasEx11.7.8.Rd
+++ b/man/DiasEx11.7.8.Rd
@@ -16,8 +16,7 @@
 
 }}
 \source{
-Dias, L. A. S., Barros, W. S. (2009). Biometria
-    Experimental. Viçosa, MG: UFV. (Exercício 8, Cap. 11, pág. 321
+BARROS; DIAS (2009), Exercício 8, Cap. 11, pág. 321.
 }
 \description{
 Resultados de um grupo de experimento de competiação de
diff --git a/man/DiasEx11.7.9.Rd b/man/DiasEx11.7.9.Rd
index 3003a5c8..d75af191 100644
--- a/man/DiasEx11.7.9.Rd
+++ b/man/DiasEx11.7.9.Rd
@@ -20,8 +20,7 @@
 
 }}
 \source{
-Dias, L. A. S., Barros, W. S. (2009). Biometria
-    Experimental. Viçosa, MG: UFV. (Exercício 9, Cap. 11, pág. 321)
+BARROS; DIAS (2009), Exercício 9, Cap. 11, pág. 321.
 }
 \description{
 Resultados de ensaio de competição de cultivares de
diff --git a/man/DiasEx3.6.7.Rd b/man/DiasEx3.6.7.Rd
index cce46aa4..eb78a06f 100644
--- a/man/DiasEx3.6.7.Rd
+++ b/man/DiasEx3.6.7.Rd
@@ -2,7 +2,8 @@
 % Please edit documentation in R/Dias.R
 \name{DiasEx3.6.7}
 \alias{DiasEx3.6.7}
-\title{Percentual de Germina\enc{çã}{ca}o de Lotes de Sementes de Tomate}
+\title{Percentual de Germina\enc{çã}{ca}o de Lotes de Sementes de
+    Tomate}
 \format{Um \code{data.frame} com 2 observações e 1 variável, em que
 
 \describe{
@@ -14,8 +15,7 @@
 
 }}
 \source{
-Dias, L. A. S., Barros, W. S. (2009). Biometria
-    Experimental. Viçosa, MG: UFV. (Exercício 7, Cap. 7.6, pág.102)
+BARROS; DIAS (2009), (Exercício 7, Cap. 7.6, pág. 102.
 }
 \description{
 Percentuais de germinação de 2 lotes de sementes de
diff --git a/man/DiasEx6.5.1.Rd b/man/DiasEx6.5.1.Rd
index db169588..b9d14579 100644
--- a/man/DiasEx6.5.1.Rd
+++ b/man/DiasEx6.5.1.Rd
@@ -13,8 +13,7 @@
 
 }}
 \source{
-Dias, L. A. S., Barros, W. S. (2009). Biometria
-    Experimental. Viçosa, MG: UFV. (Exercício 1, Cap. 6, pág. 179)
+BARROS; DIAS (2009), Exercício 1, Cap. 6, pág. 179.
 }
 \description{
 Dados referentes ao peso em função da idade de codornas.
diff --git a/man/DiasEx6.5.10.Rd b/man/DiasEx6.5.10.Rd
index ad801bd8..868f3bf2 100644
--- a/man/DiasEx6.5.10.Rd
+++ b/man/DiasEx6.5.10.Rd
@@ -13,8 +13,7 @@
 
 }}
 \source{
-Dias, L. A. S., Barros, W. S. (2009). Biometria
-    Experimental. Viçosa, MG: UFV. (Exercício 10, Cap. 7, pág. 181)
+BARROS; DIAS (2009), Exercício 10, Cap. 7, pág. 181.
 }
 \description{
 Dados referentes a 8 pares de valores de produção
@@ -31,6 +30,6 @@ xyplot(prod ~ diam, data = DiasEx6.5.10, type = c("p", "r"),
        xlab = "Produção (gramas)", ylab = "Diâmetro (cm)")
 
 }
-\keyword{ASS}
+\keyword{AAS}
 \keyword{RL}
 
diff --git a/man/DiasEx6.5.9.Rd b/man/DiasEx6.5.9.Rd
index da23792e..1fd961f0 100644
--- a/man/DiasEx6.5.9.Rd
+++ b/man/DiasEx6.5.9.Rd
@@ -13,8 +13,7 @@
 
 }}
 \source{
-Dias, L. A. S., Barros, W. S. (2009). Biometria
-    Experimental. Viçosa, MG: UFV. (Exercício 9, Cap. 6, pág. 181)
+BARROS; DIAS (2009), Exercício 9, Cap. 6, pág. 181.
 
 library(lattice)
 
diff --git a/man/DiasEx9.6.10.Rd b/man/DiasEx9.6.10.Rd
index ce92dff1..08dd9c13 100644
--- a/man/DiasEx9.6.10.Rd
+++ b/man/DiasEx9.6.10.Rd
@@ -18,8 +18,7 @@
 \item{\code{prod}}{Produtividade em sacas beneficiadas.}
 }}
 \source{
-Dias, L. A. S., Barros, W. S. (2009). Biometria
-    Experimental. Viçosa, MG: UFV. (Exercício 10, Cap. 9, pág. 261)
+BARROS; DIAS (2009), Exercício 10, Cap. 9, pág. 261.
 }
 \description{
 Experimento de competição de cultivares de café
diff --git a/man/DiasEx9.6.4.Rd b/man/DiasEx9.6.4.Rd
index 00af1293..8bd31d46 100644
--- a/man/DiasEx9.6.4.Rd
+++ b/man/DiasEx9.6.4.Rd
@@ -17,8 +17,7 @@
 
 }}
 \source{
-Dias, L. A. S., Barros, W. S. (2009). Biometria
-     Experimental. Viçosa, MG: UFV. (Exercício 4, Cap. 9, pág. 260)
+BARROS; DIAS (2009), Exercício 4, Cap. 9, pág. 260.
 }
 \description{
 Experimento instalado em delineamento inteiramente
diff --git a/man/DiasEx9.6.6.Rd b/man/DiasEx9.6.6.Rd
index fc5a8512..7b1fb3db 100644
--- a/man/DiasEx9.6.6.Rd
+++ b/man/DiasEx9.6.6.Rd
@@ -2,7 +2,8 @@
 % Please edit documentation in R/Dias.R
 \name{DiasEx9.6.6}
 \alias{DiasEx9.6.6}
-\title{Teores de S\enc{ó}{o}lidos Sol\enc{ú}{u}veis Totais da Poupa de Frutos}
+\title{Teores de S\enc{ó}{o}lidos Sol\enc{ú}{u}veis Totais da Poupa
+    de Frutos}
 \format{Um \code{data.frame} com 20 observações e 3 variáveis, em que
 
 \describe{
@@ -16,8 +17,7 @@
 
 }}
 \source{
-Dias, L. A. S., Barros, W. S. (2009). Biometria
-    Experimental. Viçosa, MG: UFV. (Exercício 6, Cap. 9, pág. 260)
+BARROS; DIAS (2009), Exercício 6, Cap. 9, pág. 260.
 }
 \description{
 Experimento em delineamento inteiramente casualizado,
diff --git a/man/DiasEx9.6.7.Rd b/man/DiasEx9.6.7.Rd
index 74547ce5..4483c980 100644
--- a/man/DiasEx9.6.7.Rd
+++ b/man/DiasEx9.6.7.Rd
@@ -18,8 +18,7 @@
 
 }}
 \source{
-Dias, L. A. S., Barros, W. S. (2009). Biometria
-    Experimental. Viçosa, MG: UFV. (Exercício 7, Cap. 9, pág. 261)
+BARROS; DIAS (2009), Exercício 7, Cap. 9, pág. 261.
 }
 \description{
 Resultados de um experimento em delineamento de blocos
diff --git a/man/FariaEg2.9.5.Rd b/man/FariaEg2.9.5.Rd
index 3dbe708e..add9ffac 100644
--- a/man/FariaEg2.9.5.Rd
+++ b/man/FariaEg2.9.5.Rd
@@ -2,7 +2,8 @@
 % Please edit documentation in R/Faria.R
 \name{FariaEg2.9.5}
 \alias{FariaEg2.9.5}
-\title{Varia\enc{çã}{ca}o de M\enc{é}{e}todos para a Determina\enc{çã}{ca}o da CTC do Solo}
+\title{Varia\enc{çã}{ca}o de M\enc{é}{e}todos para a
+    Determina\enc{çã}{ca}o da CTC do Solo}
 \format{Um \code{data.frame} com 20 observações e 3 variáveis, em que
 
 \describe{
@@ -14,8 +15,7 @@
 
 }}
 \source{
-Faria, J. C. (2009). Notas de aulas expandidas (10th ed.)
-    Ilhéus - BA: UESC. (Exemplo 2.9.5, pág 39)
+FARIA (2009), Exemplo 2.9.5, pág 39.
 }
 \description{
 Dois métodos de CTC do solo são usados em uma amostra de
@@ -36,5 +36,5 @@ aggregate(ctc ~ metod, data = FariaEg2.9.5,
 xyplot(ctc ~ metod, data = FariaEg2.9.5)
 
 }
-\keyword{ASS}
+\keyword{AAS}
 
diff --git a/man/FariaEg3.2.4.Rd b/man/FariaEg3.2.4.Rd
index 32bc868b..9110f5c4 100644
--- a/man/FariaEg3.2.4.Rd
+++ b/man/FariaEg3.2.4.Rd
@@ -17,8 +17,7 @@
 
 }}
 \source{
-Faria, J. C. (2009). Notas de aulas expandidas (10th ed.)
-    Ilhéus, BA: UESC. (Tabela 3.2.4, pág 46)
+FARIA (2009), Tabela 3.2.4, pág 46.
 }
 \description{
 Experimento em delineamento inteiramente casualizado que
diff --git a/man/FariaQd11.4.Rd b/man/FariaQd11.4.Rd
index 7aca6f2d..2f146b48 100644
--- a/man/FariaQd11.4.Rd
+++ b/man/FariaQd11.4.Rd
@@ -2,9 +2,9 @@
 % Please edit documentation in R/Faria.R
 \name{FariaQd11.4}
 \alias{FariaQd11.4}
-\title{Produ\enc{çã}{ca}o de Batatas em Fun\enc{çã}{ca}o da Calagem e Aduba\enc{çã}{ca}o}
-\format{Um \code{data.frame} com 16 observações e 4 variáveis, em
-    que
+\title{Produ\enc{çã}{ca}o de Batatas em Fun\enc{çã}{ca}o da Calagem e
+    Aduba\enc{çã}{ca}o}
+\format{Um \code{data.frame} com 16 observações e 4 variáveis, em que
 
 \describe{
 
@@ -21,8 +21,7 @@
 
 }}
 \source{
-Faria, J. C. (2009). Notas de aulas expandidas (10th ed.)
-    Ilhéus - BA: UESC. (Quadro 11.4, pág. 134)
+FARIA (2009), Quadro 11.4, pág. 134.
 }
 \description{
 Experimento montado em delineamento inteiramente
diff --git a/man/FariaQd11.9.Rd b/man/FariaQd11.9.Rd
index 58b8af7e..08361ca9 100644
--- a/man/FariaQd11.9.Rd
+++ b/man/FariaQd11.9.Rd
@@ -2,7 +2,8 @@
 % Please edit documentation in R/Faria.R
 \name{FariaQd11.9}
 \alias{FariaQd11.9}
-\title{Qualidade de Mudas em Fun\enc{çã}{ca}o do Recipiente da Esp\enc{é}{e}cie}
+\title{Qualidade de Mudas em Fun\enc{çã}{ca}o do Recipiente da
+    Esp\enc{é}{e}cie}
 \format{Um \code{data.frame} com 12 observações e 4 variáveis, em que
 
 \describe{
@@ -20,8 +21,7 @@
 
 }}
 \source{
-Faria, J. C. (2009). Notas de aulas expandidas (10th ed.)
-    Ilhéus - BA: UESC. (Quadro 11.9, pág 145)
+FARIA (2009), Quadro 11.9, pág 145.
 }
 \description{
 Experimento montado no delineamento inteiramente
diff --git a/man/FariaQd12.5.Rd b/man/FariaQd12.5.Rd
index a4d64b0e..e031f4bd 100644
--- a/man/FariaQd12.5.Rd
+++ b/man/FariaQd12.5.Rd
@@ -25,8 +25,7 @@
 As parcelas da testemunha, que não receberam aplicação de TVC,
     exibiram um valor 0 para a colonização das vassouras-de-bruxa.}
 \source{
-Faria, J. C. (2009). Notas de aulas expandidas (10th ed.)
-    Ilhéus - BA: UESC. ( Quadro 12.5, pág. 159)
+FARIA (2009), Quadro 12.5, pág. 159.
 }
 \description{
 Os dados referem-se a contagem da colonização de um
diff --git a/man/FariaQd14.2.Rd b/man/FariaQd14.2.Rd
index e81a38ec..a8719ed6 100644
--- a/man/FariaQd14.2.Rd
+++ b/man/FariaQd14.2.Rd
@@ -16,8 +16,7 @@
 
 }}
 \source{
-Faria, J. C. (2009). Notas de aulas expandidas (10th ed.)
-    Ilhéus - BA: UESC. (Quadro 14.2 pág. 198)
+FARIA (2009), Quadro 14.2 pág. 198.
 }
 \description{
 Os dados abaixo são provenientes de um ensaio em que
diff --git a/man/FariaQd14.3.Rd b/man/FariaQd14.3.Rd
index 99a05cc5..df57bea0 100644
--- a/man/FariaQd14.3.Rd
+++ b/man/FariaQd14.3.Rd
@@ -2,8 +2,8 @@
 % Please edit documentation in R/Faria.R
 \name{FariaQd14.3}
 \alias{FariaQd14.3}
-\title{Aduba\enc{çã}{ca}o com F\enc{ó}{o}sforo na Produ\enc{çã}{ca}o de Mat\enc{é}{e}ria Seca de Parte
-    A\enc{é}{e}rea de Milho}
+\title{Aduba\enc{çã}{ca}o com F\enc{ó}{o}sforo na Produ\enc{çã}{ca}o
+    de Mat\enc{é}{e}ria Seca de Parte A\enc{é}{e}rea de Milho}
 \format{Um \code{data.frame} com 25 observações e 3 variáveis, em que
 
 \describe{
@@ -19,8 +19,7 @@
 
 }}
 \source{
-Faria, J. C. (2009). Notas de aulas expandidas (10th ed.)
-    Ilhéus - BA: UESC. (Quadro 14.3 pág. 200)
+FARIA (2009), Quadro 14.3 pág. 200.
 }
 \description{
 Os dados abaixo são provenientes de um ensaio
diff --git a/man/FariaQd6.1.Rd b/man/FariaQd6.1.Rd
index 4c73247f..82238643 100644
--- a/man/FariaQd6.1.Rd
+++ b/man/FariaQd6.1.Rd
@@ -17,8 +17,7 @@
 
 }}
 \source{
-Faria, J. C. (2009). Notas de aulas expandidas (10th ed.)
-    Ilhéus, BA: UESC. (Tabela 6.1 pág 76)
+FARIA (2009), Tabela 6.1 pág 76.
 }
 \description{
 Produção de milho, em kg 100 m\eqn{^2} em um experimento
diff --git a/man/FerreiraEg7.1.Rd b/man/FerreiraEg7.1.Rd
index 920bdc3e..aab1bc24 100644
--- a/man/FerreiraEg7.1.Rd
+++ b/man/FerreiraEg7.1.Rd
@@ -46,7 +46,7 @@ boxplot(proteina ~ amostra, data = FerreiraEg7.1,
         axes = FALSE)
 box()
 axis(side = 2, col.axis = 4)
-mtext(side = 2, text = "Proteínas em g/dl", line = 3, col = 4) 
+mtext(side = 2, text = "Proteínas em g/dl", line = 3, col = 4)
 par(new = TRUE, mar = c(4, 5, 4, 5))
 boxplot(peroxido ~ amostra, data = FerreiraEg7.1,
         xlim = c(0.5, 2.5), border = 2,
diff --git a/man/FerreiraEg7.4.Rd b/man/FerreiraEg7.4.Rd
index ffc25559..223dc718 100644
--- a/man/FerreiraEg7.4.Rd
+++ b/man/FerreiraEg7.4.Rd
@@ -42,7 +42,7 @@ with(FerreiraEg7.4, {
      box()
      axis(side = 2, col.axis = 4)
      mtext(side = 2, text = "Produtividade em t/ha",
-           line = 3, col = 4) 
+           line = 3, col = 4)
      par(new = TRUE, mar = c(4, 5, 4, 5))
      plot.default(y = altura, xlab = "", ylab = "",
                   x = jitter(as.numeric(varie), factor = 0.5) + 0.1,
diff --git a/man/FerreiraEx7.4.1.Rd b/man/FerreiraEx7.4.1.Rd
index 7539d8f1..41797b55 100644
--- a/man/FerreiraEx7.4.1.Rd
+++ b/man/FerreiraEx7.4.1.Rd
@@ -42,7 +42,7 @@ with(FerreiraEx7.4.1, {
                   axes = FALSE)
      box()
      axis(side = 2, col.axis = 4)
-     mtext(side = 2, text = "Peso", line = 3, col = 4) 
+     mtext(side = 2, text = "Peso", line = 3, col = 4)
      par(new = TRUE, mar = c(4, 5, 4, 5))
      plot.default(y = teor, xlab = "", ylab = "",
                   x = jitter(as.numeric(fase), factor = 0.5) + 0.15,
diff --git a/man/FerreiraEx9.7.2.Rd b/man/FerreiraEx9.7.2.Rd
index d0852cb5..db6eaeab 100644
--- a/man/FerreiraEx9.7.2.Rd
+++ b/man/FerreiraEx9.7.2.Rd
@@ -58,5 +58,5 @@ Bussab, W. O., Miazaki, É. S., Andrade,
     D. F. (1990). Introdução à análise de agrupamentos. São Paulo,
     SP: ABE.
 }
-\keyword{agrupamento}
+\keyword{AnaAgrup}
 
diff --git a/man/ManlyTb1.2.Rd b/man/ManlyTb1.2.Rd
index 88bbce91..06050c5d 100644
--- a/man/ManlyTb1.2.Rd
+++ b/man/ManlyTb1.2.Rd
@@ -3,7 +3,7 @@
 \name{ManlyTb1.2}
 \alias{ManlyTb1.2}
 \title{Cr\enc{â}{a}nios eg\enc{í}{i}pcios}
-\format{Um \code{data.frame} com os tamanhos de 30 crânios para cada 
+\format{Um \code{data.frame} com os tamanhos de 30 crânios para cada
 período de tempo, com quatro variáveis.
 
 \describe{
@@ -24,11 +24,11 @@ A figura abaixo descreve as medidas do crânio.
 \if{html}{\figure{ManlyTb1-2.jpg}{options: width="250px"}}
 \if{latex}{\figure{ManlyTb1-2.jpg}{options: width=1.75in}}}
 \source{
-Manly, B. J. F. (2005). Métodos Estatísticos Multivariados - 
+Manly, B. J. F. (2005). Métodos Estatísticos Multivariados -
      uma introdução. Porto Alegre, RS: Bookman (pg 16)
 }
 \description{
-Medidas de crânios egípcios masculinos em cinco períodos 
+Medidas de crânios egípcios masculinos em cinco períodos
 de tempo. Medidas tomadas em milímetros.
 }
 \examples{
@@ -37,20 +37,20 @@ data(ManlyTb1.2)
 require(lattice)
 require(reshape2)
 
-splom(~ManlyTb1.2[2:5] | grup, data = ManlyTb1.2, 
-    layout=c(3,2), 
+splom(~ManlyTb1.2[2:5] | grup, data = ManlyTb1.2,
+    layout=c(3,2),
     pscales = 0,
     varnames = c("x1", "x2","x3", "x4"),
     main = "Gráfico de dispersão das medidas de crânio para cada período")
-    
+
 ManlyTb1.2long <- melt(ManlyTb1.2, id.vars = "grup")
- 
+
 bwplot(value ~grup | variable, data = ManlyTb1.2long,
-       scales = list(relation = "free"), 
-       ylab = "", 
+       scales = list(relation = "free"),
+       ylab = "",
        main = "Boxplot das medições de crânio em cada período" )
 
-            
+
 }
-\keyword{Afd}
+\keyword{AnaFat}
 
diff --git a/man/ManlyTb1.3.Rd b/man/ManlyTb1.3.Rd
index ebf0b351..248e40fc 100644
--- a/man/ManlyTb1.3.Rd
+++ b/man/ManlyTb1.3.Rd
@@ -20,32 +20,32 @@
 \item{\code{dg0.4}}{Frequência 0.4 em demobilidade gênica PGi (porcentagem).}
 
 \item{\code{dg0.6}}{Frequência 0.6 em demobilidade gênica PGi.}
- 
+
 \item{\code{dg0.8}}{Frequência 0.8 em demobilidade gênica PGi.}
 
 \item{\code{dg1}}{Frequência 1 em demobilidade gênica PGi.}
- 
+
 \item{\code{dg1.16}}{Frequência 1.16 em demobilidade gênica PGi.}
 
 \item{\code{dg1.3}}{Frequência 1.3 em demobilidade gênica PGi.}
- 
+
 }}
 \source{
-Manly, B. J. F. (2005). Métodos Estatísticos Multivariados 
+Manly, B. J. F. (2005). Métodos Estatísticos Multivariados
      - uma introdução. Porto Alegre, RS: Bookman (pg 19)
 }
 \description{
-Estudo de colônias de borboletas do tipo \emph{Euphydryas 
-editha} na Califórnia e em Oregon, EUA, com variáveis ambientais e 
+Estudo de colônias de borboletas do tipo \emph{Euphydryas
+editha} na Califórnia e em Oregon, EUA, com variáveis ambientais e
 frequências gênicas.
 }
 \examples{
 
 data(ManlyTb1.3)
 
-pairs(~ alt + precip + tempmax + tempmin + dg0.4 + dg0.6 + dg0.8 + 
+pairs(~ alt + precip + tempmax + tempmin + dg0.4 + dg0.6 + dg0.8 +
       dg1 + dg1.16 + dg1.3, data = ManlyTb1.3, cex.labels = 1.4,
       main="Matriz de gráficos de dispersão")
 }
-\keyword{CP}
+\keyword{AnaComPrin}
 
diff --git a/man/ManlyTb1.4.Rd b/man/ManlyTb1.4.Rd
index 44e6f42d..8146fc45 100644
--- a/man/ManlyTb1.4.Rd
+++ b/man/ManlyTb1.4.Rd
@@ -3,7 +3,7 @@
 \name{ManlyTb1.4}
 \alias{ManlyTb1.4}
 \title{C\enc{ã}{a}es pr\enc{é}{e}-hist\enc{ó}{o}ricos da Tail\enc{â}{a}ndia}
-\format{Um \code{data.frame} com 7 grupos caninos e 6 variáveis. 
+\format{Um \code{data.frame} com 7 grupos caninos e 6 variáveis.
 
 \describe{
 
@@ -26,7 +26,7 @@ Manly, B. J. F. (2005). Métodos Estatísticos Multivariados- uma introdução.
      Porto Alegre, RS: Bookman (pg 21)
 }
 \description{
-Estudo em ancestrais de cães da Tailândia, 
+Estudo em ancestrais de cães da Tailândia,
 através de medições das mandíbulas.
 }
 \examples{
@@ -35,8 +35,8 @@ através de medições das mandíbulas.
 data(ManlyTb1.4)
 
 pairs(~largm + altm + comppm + largpm + comppt + comppq,
-      data = ManlyTb1.4, 
+      data = ManlyTb1.4,
       main="Gráfico de dispersão para as medições da mandíbula")
 }
-\keyword{AnaClust}
+\keyword{AnaAgrup}
 
diff --git a/man/ManlyTb1.5.Rd b/man/ManlyTb1.5.Rd
index ff5fd211..2c4dd6cc 100644
--- a/man/ManlyTb1.5.Rd
+++ b/man/ManlyTb1.5.Rd
@@ -9,38 +9,38 @@
 
 \item{\code{pais}}{Identificação do país.}
 
-\item{\code{grup}}{Grupo econômico ao qual pertencente o país: União 
+\item{\code{grup}}{Grupo econômico ao qual pertencente o país: União
      Europeia (UE); Área europeia de livre comércio (AELC); Leste; Outro}
 
-\item{\code{afp}}{Porcentagem da população ativa empregada na agricultura, 
+\item{\code{afp}}{Porcentagem da população ativa empregada na agricultura,
      florestal e pesca.}
 
 \item{\code{mep}}{Porcentagem empregada na mineração e exploração de pedreiras.}
 
 \item{\code{fab}}{Porcentagem empregada nas fábricas.}
 
-\item{\code{fea}}{Porcentagem empregada nas áreas de fornecimento de 
+\item{\code{fea}}{Porcentagem empregada nas áreas de fornecimento de
      energia e água.}
 
 \item{\code{con}}{Porcentagem empregada na construção.}
- 
+
 \item{\code{ser}}{Porcentagem empregada na área de serviços.}
- 
+
 \item{\code{fin}}{Porcentagem empregada na área de finanças.}
- 
+
 \item{\code{ssp}}{Porcentagem empregada na área de serviços sociais e
     pessoais.}
 
-\item{\code{tc}}{Porcentagem empregada nas áreas de transportes e 
+\item{\code{tc}}{Porcentagem empregada nas áreas de transportes e
      comunicações.}
 
 }}
 \source{
-Manly, B. J. F. (2005). Métodos Estatísticos Multivariados- 
+Manly, B. J. F. (2005). Métodos Estatísticos Multivariados-
      uma introdução. Porto Alegre, RS: Bookman (pg 22)
 }
 \description{
-Porcentagens da força de trabalho de empregados para nove 
+Porcentagens da força de trabalho de empregados para nove
 diferentes campos de trabalho em 30 países europeus
 }
 \examples{
@@ -48,9 +48,9 @@ diferentes campos de trabalho em 30 países europeus
 data(ManlyTb1.5)
 
 pairs(~afp + mep + fab + fea + con + ser + fin + ssp + tc,
-      data = ManlyTb1.5, 
+      data = ManlyTb1.5,
       main="Matriz das variáveis de força de trabalho"
       )
 }
-\keyword{AnaClust}
+\keyword{AnaAgrup}
 
diff --git a/man/ManlyTb10.2.Rd b/man/ManlyTb10.2.Rd
index c2309743..30b71947 100644
--- a/man/ManlyTb10.2.Rd
+++ b/man/ManlyTb10.2.Rd
@@ -6,22 +6,22 @@
 \format{Um \code{data.frame} com 151 linhas e 8 variáveis.
 
 \describe{
-\item{\code{ser}}{Porcentagem de solo com enriquecimento constante de 
+\item{\code{ser}}{Porcentagem de solo com enriquecimento constante de
 calcário.}
 
-\item{\code{spc}}{Porcentagem de solo de prado com cálcio na água 
+\item{\code{spc}}{Porcentagem de solo de prado com cálcio na água
 subterrânea.}
 
-\item{\code{smc}}{Porcentagem de solo com matriz de coral sob 
+\item{\code{smc}}{Porcentagem de solo com matriz de coral sob
 condições de enriquecimento constante de calcário.}
 
-\item{\code{sao}}{Porcentagem de solos aluvial e orgânico adjacentes 
+\item{\code{sao}}{Porcentagem de solos aluvial e orgânico adjacentes
 a rios e solo orgânico salino na costa.}
 
-\item{\code{dfe}}{Porcentagem de floresta decídua estacional com 
+\item{\code{dfe}}{Porcentagem de floresta decídua estacional com
 ervas de folhas largas.}
 
-\item{\code{flab}}{Porcentagem de floresta de locais altos e baixos 
+\item{\code{flab}}{Porcentagem de floresta de locais altos e baixos
 coberta com água e plantas herbáceas em lugares úmidos e pântano.}
 
 \item{\code{fpc}}{Porcentagem de floresta palma de cohune.}
@@ -29,22 +29,22 @@ coberta com água e plantas herbáceas em lugares úmidos e pântano.}
 \item{\code{fm}}{Porcentagem de floresta mista.}
 }}
 \source{
-Manly, B. J. F. (2005). Métodos Estatísticos Multivariados - 
+Manly, B. J. F. (2005). Métodos Estatísticos Multivariados -
 uma introdução.Porto Alegre, RS: Bookman (pg 167 à 170)
 }
 \description{
-Estudo no distrito de Corozal, em Belize, com 4 variáveis 
-de solo e 4 variáveis de vegetação registradas para quadrados 
+Estudo no distrito de Corozal, em Belize, com 4 variáveis
+de solo e 4 variáveis de vegetação registradas para quadrados
 de 2,5 x 2,5 km.
 }
 \examples{
 
 data(ManlyTb10.2)
 pairs(~ ser + spc + smc + sao + fde + flab + fpc + fm,
-      data = ManlyTb10.2, 
+      data = ManlyTb10.2,
       main="Matriz de gráficos para as variáveis de solo")
 
-            
+
 }
-\keyword{ACC}
+\keyword{AnaCorCan}
 
diff --git a/man/ManlyTb10.4.Rd b/man/ManlyTb10.4.Rd
index 2def3911..c3c0ee1f 100644
--- a/man/ManlyTb10.4.Rd
+++ b/man/ManlyTb10.4.Rd
@@ -8,7 +8,7 @@
 \describe{
 \item{\code{pais}}{Identificação do país.}
 
-\item{\code{cv}}{Consumo de carne vermelha medida em gramas por 
+\item{\code{cv}}{Consumo de carne vermelha medida em gramas por
 pessoa por dia.}
 
 \item{\code{cb}}{Consumo de carne branca.}
@@ -20,14 +20,14 @@ pessoa por dia.}
 \item{\code{peixe}}{Consumo de peixe.}
 
 \item{\code{cere}}{Consumo por cereais.}
- 
+
 \item{\code{carb}}{Consumo de carboidratos.}
 
 \item{\code{gnl}}{Consumo de grãos, nozes e sementes oleaginosas.}
- 
+
 \item{\code{fv}}{Consumo de frutas e vegetais.}
 
-\item{\code{agr}}{Porcentagem da população ativa empregada na 
+\item{\code{agr}}{Porcentagem da população ativa empregada na
 agricultura, florestal e pesca.}
 
 \item{\code{min}}{Mineração e exploração de pedreiras.}
@@ -37,34 +37,34 @@ agricultura, florestal e pesca.}
 \item{\code{fea}}{Fornecimento de energia e água.}
 
 \item{\code{con}}{Construção.}
- 
+
 \item{\code{ser}}{Serviços.}
- 
+
 \item{\code{fin}}{Finanças.}
- 
+
 \item{\code{ssp}}{Serviços sociais e pessoais.}
 
 \item{\code{tc}}{Transportes e comunicações.}
 
 }}
 \source{
-Manly, B. J. F. (2005). Métodos Estatísticos Multivariados- 
+Manly, B. J. F. (2005). Métodos Estatísticos Multivariados-
 uma introdução. Porto Alegre, RS: Bookman (pg 175)
 }
 \description{
-Dados referentes a consumo de proteína e força de trabalho 
+Dados referentes a consumo de proteína e força de trabalho
 em países europeus.
 }
 \examples{
 
 data(ManlyTb10.4)
 
-pairs(~ cv + cb + ovo + leite + peixe + cere + carb + gnl+ agr + 
+pairs(~ cv + cb + ovo + leite + peixe + cere + carb + gnl+ agr +
 min + fab + fea + con + ser + fin + ssp + tc,
-      data = ManlyTb10.4, 
-      main = "Matriz de gráficos para as variáveis de força de trabalho 
+      data = ManlyTb10.4,
+      main = "Matriz de gráficos para as variáveis de força de trabalho
       e consumo de proteínas diárias"
       )
 }
-\keyword{ACC}
+\keyword{AnaCorCan}
 
diff --git a/man/ManlyTb11.3.Rd b/man/ManlyTb11.3.Rd
index 2b7651ae..f8407a67 100644
--- a/man/ManlyTb11.3.Rd
+++ b/man/ManlyTb11.3.Rd
@@ -3,10 +3,10 @@
 \name{ManlyTb11.3}
 \alias{ManlyTb11.3}
 \title{Dist\enc{â}{a}ncias rodovi\enc{á}{a}rias}
-\format{Uma matriz (13x13) com as distâncias rodoviárias entre as 
+\format{Uma matriz (13x13) com as distâncias rodoviárias entre as
 cidades da ilha Sul da Nova Zelândia.}
 \source{
-Manly, B. J. F. (2005). Métodos Estatísticos Multivariados - 
+Manly, B. J. F. (2005). Métodos Estatísticos Multivariados -
      uma introdução. Porto Alegre, RS: Bookman (pg 182)
 }
 \description{
@@ -19,8 +19,8 @@ data(ManlyTb11.3)
 
 require(lattice)
 
-levelplot(ManlyTb11.3, xlab = "", ylab = "", main = "Gráfico das 
+levelplot(ManlyTb11.3, xlab = "", ylab = "", main = "Gráfico das
 distâncias rodoviárias", scales = list(x = list(rot=90)))
 }
-\keyword{EM}
+\keyword{TODO}
 
diff --git a/man/ManlyTb11.5.Rd b/man/ManlyTb11.5.Rd
index ea45c372..629a059f 100644
--- a/man/ManlyTb11.5.Rd
+++ b/man/ManlyTb11.5.Rd
@@ -6,11 +6,11 @@
 \format{Uma matriz com os números de votos discordantes entre 15
 parlamentares de Nova Jersey.}
 \source{
-Manly, B. J. F. (2005). Métodos Estatísticos Multivariados 
+Manly, B. J. F. (2005). Métodos Estatísticos Multivariados
      - uma introdução. Porto Alegre, RS: Bookman (pg 185)
 }
 \description{
-Número de votos discordantes entre os parlamentares de 
+Número de votos discordantes entre os parlamentares de
 Nova Jersey em leis referentes a problemas ambientais
 }
 \examples{
@@ -19,8 +19,8 @@ data(ManlyTb11.5)
 
 require(lattice)
 
-levelplot(ManlyTb11.5, xlab = "", ylab = "", main = "Gráfico das 
+levelplot(ManlyTb11.5, xlab = "", ylab = "", main = "Gráfico das
 distâncias entre parlamentares", scales = list(x = list(rot=90)))
 }
-\keyword{EM}
+\keyword{TODO}
 
diff --git a/man/ManlyTb4.5.Rd b/man/ManlyTb4.5.Rd
index 5a9332bd..2b0c497f 100644
--- a/man/ManlyTb4.5.Rd
+++ b/man/ManlyTb4.5.Rd
@@ -24,19 +24,19 @@
 \item{\code{compptm}}{Comprimento do primeiro ao terceiro molar (mm).}
 
 \item{\code{comppqp}}{Comprimento do primeiro ao quarto pré-molar (mm).}
- 
+
 \item{\code{largci}}{Largura do canino inferior (mm).}
 
-\item{\code{sexo}}{Código para sexo, (1 para masculino, 2 para feminino 
+\item{\code{sexo}}{Código para sexo, (1 para masculino, 2 para feminino
 e caso contrário é desconhecido}
 
 }}
 \source{
-Manly, B. J. F. (2005). Métodos Estatísticos Multivariados - 
+Manly, B. J. F. (2005). Métodos Estatísticos Multivariados -
      uma introdução. Porto Alegre, RS: Bookman (pg 67 à 69)
 }
 \description{
-Estudo em ancestrais de cães da Tailândia, 
+Estudo em ancestrais de cães da Tailândia,
 através de medições da mandíbula.
 }
 \examples{
@@ -51,13 +51,13 @@ bwplot(value ~grup | variable, data = ManlyTb4.5long,
         scales = c(list(relation = "free"), list(x=list(draw=FALSE))),
       ylab = "",
        main = "Boxplot de entre os grupo das medições da mandíbula",
-       par.settings = list( box.umbrella=list(col = c(1,2,3,4,6)), 
-                            box.dot=list(col = c(1,2,3,4,6)), 
+       par.settings = list( box.umbrella=list(col = c(1,2,3,4,6)),
+                            box.dot=list(col = c(1,2,3,4,6)),
                             box.rectangle = list(col = c(1,2,3,4,6))),
        key = list(points = list(col=c(1,2,3,4,6), pch=19),
                   space = "top",
                   columns=2,
-                  text=list(c("Caes modernos da Tailandia", "Chacais dourados", "Cuons", 
+                  text=list(c("Caes modernos da Tailandia", "Chacais dourados", "Cuons",
                               "Lobos indianos", "Caes pre-historicos tailandeses"))))
 }
 \keyword{TS}
diff --git a/man/ManlyTb6.6.Rd b/man/ManlyTb6.6.Rd
index 1eb62169..60979e52 100644
--- a/man/ManlyTb6.6.Rd
+++ b/man/ManlyTb6.6.Rd
@@ -11,14 +11,14 @@ A figura apresentada descreve as cinco variáveis, correspondentes às
 dimensões das taças.
 
 \if{html}{\figure{ManlyTb6-6.jpg}{options: width="250px"}}
-\if{latex}{\figure{ManlyTb6-6.jpg}{options: width=1.75in}} 
+\if{latex}{\figure{ManlyTb6-6.jpg}{options: width=1.75in}}
 }}
 \source{
-Manly, B. J. F. (2005). Métodos Estatísticos Multivariados- 
+Manly, B. J. F. (2005). Métodos Estatísticos Multivariados-
      uma introdução. Porto Alegre, RS: Bookman (pg 101)
 }
 \description{
-Dimensões de 25 taças de cerâmicas escavadas de lugares 
+Dimensões de 25 taças de cerâmicas escavadas de lugares
 pré-históricos na Tailândia.
 }
 \examples{
@@ -26,8 +26,8 @@ pré-históricos na Tailândia.
 data(ManlyTb6.6)
 
 pairs(~ x1 + x2 + x3 + x4 + x5 + x6,
-      data = ManlyTb6.6, 
+      data = ManlyTb6.6,
       main="Matriz de diapersão para as variáveis de medida das taças")
 }
-\keyword{AnaComp}
+\keyword{AnaComPrin}
 
diff --git a/man/ManlyTb6.7.Rd b/man/ManlyTb6.7.Rd
index df51bf62..e0f22e58 100644
--- a/man/ManlyTb6.7.Rd
+++ b/man/ManlyTb6.7.Rd
@@ -20,13 +20,13 @@
 \item{\code{peixe}}{Consumo de peixe.}
 
 \item{\code{cere}}{Consumo por cereais.}
- 
+
 \item{\code{carb}}{Consumo de carboidratos.}
 
 \item{\code{gnso}}{Consumo de grãos, nozes e sementes oleaginosas.}
- 
+
 \item{\code{fv}}{Consumo de frutas e vegetais.}
- 
+
 \item{\code{total}}{Total de consumo do país.}
 
 }}
@@ -34,14 +34,14 @@
 Manly, B. J. F. (2005). Métodos Estatísticos Multivariados - uma introdução.
      Porto Alegre, RS: Bookman (pg 103)
 
-Manly, B. J. F. (2005). Métodos Estatísticos Multivariados - 
+Manly, B. J. F. (2005). Métodos Estatísticos Multivariados -
      uma introdução. Porto Alegre, RS: Bookman (pg 103)
 }
 \description{
 Estimativas do consumo médio de proteínas de diferentes fontes de alimentos para os habitantes de 25 países europeus. Medida em gramas por pessoa por dia
 
-Estimativas dos consumos médios de proteínas de diferentes 
-fontes de alimentos para habitantes de 25 países europeus. 
+Estimativas dos consumos médios de proteínas de diferentes
+fontes de alimentos para habitantes de 25 países europeus.
 Consumos registrados em gramas por pessoa por dia.
 }
 \examples{
@@ -49,15 +49,14 @@ Consumos registrados em gramas por pessoa por dia.
 data(ManlyTb6.7)
 
 pairs(~ cv + cb + ovo + leite + peixe + cere + carb + gnso + fv,
-      data = ManlyTb6.7, 
+      data = ManlyTb6.7,
       main="Matriz das variáveis de consumo de proteína")
 
 data(ManlyTb6.7)
 
 pairs(~ cv + cb + ovo + leite + peixe + cere + carb + gnso + fv,
-      data = ManlyTb6.7, 
+      data = ManlyTb6.7,
       main="Matriz das variáveis de consumo de proteína")
 }
-\keyword{AnaComp}
-\keyword{CP}
+\keyword{AnaComPrin}
 
diff --git a/man/ManlyTb9.7.Rd b/man/ManlyTb9.7.Rd
index 658aef8d..5cd632f7 100644
--- a/man/ManlyTb9.7.Rd
+++ b/man/ManlyTb9.7.Rd
@@ -3,7 +3,7 @@
 \name{ManlyTb9.7}
 \alias{ManlyTb9.7}
 \title{Esp\enc{é}{e}cies de plantas em lotes}
-\format{Um \code{data.frame} com 25 espécie de plantas com 18 
+\format{Um \code{data.frame} com 25 espécie de plantas com 18
 variáveis
 
 \describe{
@@ -45,14 +45,14 @@ variáveis
 \item{\code{l17}}{Medidas de abundância das espécies no lote 17.}
 }}
 \source{
-Manly, B. J. F. (2005). Métodos Estatísticos Multivariados- 
+Manly, B. J. F. (2005). Métodos Estatísticos Multivariados-
 uma introdução. Porto Alegre, RS: Bookman (pg 152)
 }
 \description{
 Estudo de 25 espécies de plantas em 17 lotes de um prado
-de pastagem na Reserva Natural em Steneryd na Suécia. Cada valor na 
-tabela é a soma dos valores cobertos em um intervalo de 0 a 5 por 
-nove quadrantes de amostra, de modo que um valor 45 corresponde à 
+de pastagem na Reserva Natural em Steneryd na Suécia. Cada valor na
+tabela é a soma dos valores cobertos em um intervalo de 0 a 5 por
+nove quadrantes de amostra, de modo que um valor 45 corresponde à
 completa cobertura pela espécie.
 }
 \examples{
@@ -61,11 +61,11 @@ data(ManlyTb9.7)
 
 euclid <- as.matrix(dist(ManlyTb9.7[,-1]))
 
-heatmap(euclid, 
-       margins= c(6,6), 
-       labRow = ManlyTb9.7$esp, 
+heatmap(euclid,
+       margins= c(6,6),
+       labRow = ManlyTb9.7$esp,
        labCol = ManlyTb9.7$esp,
        main = "Heatmap para a matriz de distâncias para as 25 espécies")
 }
-\keyword{AnaClust}
+\keyword{AnaAgrup}
 
diff --git a/man/ManlyTb9.8.Rd b/man/ManlyTb9.8.Rd
index c804148e..dbf8d599 100644
--- a/man/ManlyTb9.8.Rd
+++ b/man/ManlyTb9.8.Rd
@@ -87,20 +87,20 @@
 \item{\code{obj37}}{Presença (1) ou ausência (0) do objeto 37.}
 
 \item{\code{obj38}}{Presença (1) ou ausência (0) do objeto 38.}
- 
+
 }}
 \source{
-Manly, B. J. F. (2005). Métodos Estatísticos Multivariados- 
+Manly, B. J. F. (2005). Métodos Estatísticos Multivariados-
 uma introdução. Porto Alegre, RS: Bookman (pg 153 e 154)
 }
 \description{
-Conjunto de dados referentes a bens de túmulos de um 
-cemitério em Bannadi, nordeste da Tailândia. São registros de 
-presença ou ausência de 38 diferentes artigos em cada um dos 46 
+Conjunto de dados referentes a bens de túmulos de um
+cemitério em Bannadi, nordeste da Tailândia. São registros de
+presença ou ausência de 38 diferentes artigos em cada um dos 46
 túmulos, com informação adicional sobre se os restos mortais eram de
-um adulto masculino, feminino ou criança. Os sepultamentos estão na 
+um adulto masculino, feminino ou criança. Os sepultamentos estão na
 ordem de riqueza de diferentes bens (totais variando de 0 a 11), e os
-bens estão na ordem de frequência de ocorrência (totais variando de 
+bens estão na ordem de frequência de ocorrência (totais variando de
 1 a 18).
 }
 \examples{
@@ -109,10 +109,10 @@ data(ManlyTb9.8)
 
 matdist <- as.matrix(dist(ManlyTb9.8[,-c(1,2)], method = "binary"))
 ### Mapa de calor para a matriz de dissimilaridades.
-heatmap(matdist, 
-       margins= c(6,6), 
-       labRow = ManlyTb9.8$sep, 
+heatmap(matdist,
+       margins= c(6,6),
+       labRow = ManlyTb9.8$sep,
        labCol = ManlyTb9.8$sep)
 }
-\keyword{AnaClust}
+\keyword{AnaAgrup}
 
diff --git a/man/MingotiAnA3.Rd b/man/MingotiAnA3.Rd
index acb09dad..c0cb052c 100644
--- a/man/MingotiAnA3.Rd
+++ b/man/MingotiAnA3.Rd
@@ -48,5 +48,5 @@ bwplot(inst~rendpc|loc, data=MingotiAnA3,
 
                   
 }
-\keyword{AnaComp}
+\keyword{AnaComPrin}
 
diff --git a/man/MingotiAnA4.Rd b/man/MingotiAnA4.Rd
index ac4d4d46..c686e054 100644
--- a/man/MingotiAnA4.Rd
+++ b/man/MingotiAnA4.Rd
@@ -44,5 +44,5 @@ scatterplotMatrix(~ x1 + x2 + x3 + x4 | grp, data=MingotiAnA4,
      main = "Dispersão das variáveis de medidas para os dois grupos")
                   
 }
-\keyword{AnaComp}
+\keyword{AnaComPrin}
 
diff --git a/man/MingotiAnA6.Rd b/man/MingotiAnA6.Rd
index 19933058..cefc0f2e 100644
--- a/man/MingotiAnA6.Rd
+++ b/man/MingotiAnA6.Rd
@@ -54,5 +54,5 @@ scatterplotMatrix(~ testp + testc + anexp | grupo, data=MingotiAnA6,
      main="Dispersão das variáveis de medidas para os dois grupos")
                   
 }
-\keyword{AnaComp}
+\keyword{AnaComPrin}
 
diff --git a/man/MingotiTb3.10.Rd b/man/MingotiTb3.10.Rd
index 276c1a3f..c68f21e9 100644
--- a/man/MingotiTb3.10.Rd
+++ b/man/MingotiTb3.10.Rd
@@ -33,5 +33,5 @@ library(lattice)
 bwplot(peso~maq, data = MingotiTb3.10, xlab = "Máquina")
 
 }
-\keyword{AnaComp}
+\keyword{AnaComPrin}
 
diff --git a/man/MingotiTb3.7.Rd b/man/MingotiTb3.7.Rd
index e12e4d22..1c5d15b9 100644
--- a/man/MingotiTb3.7.Rd
+++ b/man/MingotiTb3.7.Rd
@@ -38,5 +38,5 @@ scatterplotMatrix(~ amst + areia + sed + arg + morg,
     data = MingotiTb3.7, main = "Matriz de gráficos de dispersão")
                   
 }
-\keyword{AnaComp}
+\keyword{AnaComPrin}
 
diff --git a/man/MingotiTb6.1.Rd b/man/MingotiTb6.1.Rd
index 4fc19df5..b8156bbe 100644
--- a/man/MingotiTb6.1.Rd
+++ b/man/MingotiTb6.1.Rd
@@ -36,5 +36,5 @@ xyplot(renda ~ idade,
       ylab="Renda mensal")
 
 }
-\keyword{AnaClust}
+\keyword{AnaAgrup}
 
diff --git a/man/MingotiTb6.8.Rd b/man/MingotiTb6.8.Rd
index 990448be..cc94692c 100644
--- a/man/MingotiTb6.8.Rd
+++ b/man/MingotiTb6.8.Rd
@@ -43,5 +43,5 @@ data(MingotiTb6.8)
 pairs(MingotiTb6.8)
 
 }
-\keyword{AnaClust}
+\keyword{AnaAgrup}
 
diff --git a/man/PaulaEg1.12.2.Rd b/man/PaulaEg1.12.2.Rd
index 801f79be..f44cf806 100644
--- a/man/PaulaEg1.12.2.Rd
+++ b/man/PaulaEg1.12.2.Rd
@@ -12,10 +12,10 @@
 
 \item{\code{sexo}}{Sexo do paciente (masculino, feminino).}
 
-\item{\code{hl}}{Intensidade da célula histiócitos-linfócitos (ausente, 
+\item{\code{hl}}{Intensidade da célula histiócitos-linfócitos (ausente,
     discreta, moderada, intensa).}
 
-\item{\code{ff}}{Intensidade da célula fibrose-frouxa (ausente, 
+\item{\code{ff}}{Intensidade da célula fibrose-frouxa (ausente,
     discreta, moderada, intensa).}
 
 }}
@@ -24,7 +24,7 @@ Paula, G. A. (2004). Modelos de regressão: com apoio
     computacional. São Paulo, SP: IME-USP. (Eg 1.12.2, p?g. 85)
 }
 \description{
-Um total de 175 pacientes com processo infecioso 
+Um total de 175 pacientes com processo infecioso
     pulmonar atendidos no hospital no período acima foram classificados
     por algumas variáveis.
 }
@@ -35,20 +35,20 @@ data(PaulaEg1.12.2)
 str(PaulaEg1.12.2)
 
 library(lattice)
-bwplot(idade ~ hl | tipo, 
+bwplot(idade ~ hl | tipo,
        data = PaulaEg1.12.2,
        ylab = "Idade",
        xlab = "Intensidade da célula histiócitos-linfócitos")
 
-bwplot(idade ~ ff | tipo, 
+bwplot(idade ~ ff | tipo,
        data = PaulaEg1.12.2,
        ylab = "Idade",
        xlab = "Intensidade da célula fibrose-frouxa")
-       
-barchart(table(PaulaEg1.12.2$tipo,PaulaEg1.12.2$hl), 
-auto.key=list(space="top", columns=2, 
+
+barchart(table(PaulaEg1.12.2$tipo,PaulaEg1.12.2$hl),
+auto.key=list(space="top", columns=2,
               cex.title=1,
-              rectangles = TRUE, 
+              rectangles = TRUE,
               points=FALSE))
 
 }
diff --git a/man/PaulaEg1.12.5.Rd b/man/PaulaEg1.12.5.Rd
index cbf05dd5..ffd519fd 100644
--- a/man/PaulaEg1.12.5.Rd
+++ b/man/PaulaEg1.12.5.Rd
@@ -24,8 +24,8 @@ Paula, G. A. (2004). Modelos de regressão: com apoio
     computacional. São Paulo, SP: IME-USP. (Eg 1.12.5, p?g. 94)
 }
 \description{
-Dados referentes ao consumo de combustível em 48 estados 
-    norte-americanos. O interesse nesse estudo é tentar explicar o 
+Dados referentes ao consumo de combustível em 48 estados
+    norte-americanos. O interesse nesse estudo é tentar explicar o
     consumo de combustível com base em variáveis econômicas.
 }
 \examples{
diff --git a/man/PaulaEg1.12.6.Rd b/man/PaulaEg1.12.6.Rd
index a7d05aaa..63c388c6 100644
--- a/man/PaulaEg1.12.6.Rd
+++ b/man/PaulaEg1.12.6.Rd
@@ -21,9 +21,9 @@ Paula, G. A. (2004). Modelos de regressão: com apoio
     computacional. São Paulo, SP: IME-USP. (Eg 1.12.6, p?g. 97)
 }
 \description{
-Dados referentes ao salário anual de uma 
-    amostra aleatória de 220 executivos (145 homens e 75 mulheres). O 
-    salário será relacionado com as variáveis: sexo, anos de experiência 
+Dados referentes ao salário anual de uma
+    amostra aleatória de 220 executivos (145 homens e 75 mulheres). O
+    salário será relacionado com as variáveis: sexo, anos de experiência
     no cargo e posição na empresa.
 }
 \examples{
diff --git a/man/PaulaEg2.4.3.Rd b/man/PaulaEg2.4.3.Rd
index 1d160f83..e87bd746 100644
--- a/man/PaulaEg2.4.3.Rd
+++ b/man/PaulaEg2.4.3.Rd
@@ -29,7 +29,7 @@ Dados referentes aos valores pagos de seguros
     individuais por danos com acidentes pessoais no período de
     janeiro de 1998 a junho de 1999 (18 meses). O estudo completo
     (Jong e Heller, 2008) contém o acompanhamento dos seguros desde
-    1989. No período considerado aqui foram pagos 769 seguros, sendo 
+    1989. No período considerado aqui foram pagos 769 seguros, sendo
     armazenadas as informações: se houve representação
     legal, tempo operacional para pagamento e mês em que ocorreu o
     acidente.
diff --git a/man/PaulaEg2.8.1.Rd b/man/PaulaEg2.8.1.Rd
index 6d6957a7..36c9e718 100644
--- a/man/PaulaEg2.8.1.Rd
+++ b/man/PaulaEg2.8.1.Rd
@@ -8,7 +8,7 @@
 
 \item{\code{semana}}{Semana da avaliação.}
 
-\item{\code{tipo}}{Tipo de snack avaliado. Os níveis representam as 
+\item{\code{tipo}}{Tipo de snack avaliado. Os níveis representam as
     seguintes configurações:
     \code{A}: 22\% de gordura, 0\% de óleo de canola, \code{B}: 0\%
     de gordura, 22\% de óleo de canola, \code{C}: 17\% de gordura,
@@ -30,8 +30,8 @@ Dados de um experimento desenvolvido pelo Departamento
     ácidos graxos, foram comparados ao longo de 20 semanas. Nesse
     novo produto a gordura vegetal hidrogenada, responsável pela
     fixação do aroma do produto, foi substituída, totalmente ou
-    parcialmente, por óleo de canola. Ao todo foram produzidas 750 
-    observações, referentes a 15 avaliações para cada tipo de snack 
+    parcialmente, por óleo de canola. Ao todo foram produzidas 750
+    observações, referentes a 15 avaliações para cada tipo de snack
     a cada 2 semanas.
 }
 \examples{
diff --git a/man/PaulaEg3.5.1.Rd b/man/PaulaEg3.5.1.Rd
index 6e75a440..17de00e8 100644
--- a/man/PaulaEg3.5.1.Rd
+++ b/man/PaulaEg3.5.1.Rd
@@ -8,7 +8,7 @@
 \describe{
 
 \item{sexo}{Sexo do camundongo (macho = 1 e fêmea = 0).}
-    
+
 \item{trat}{Identifica a presença ou não do tratamento (sim = 1 e não = 0).}
 
 \item{casos}{Número inteiro que identifica a quantidade de casos
@@ -18,15 +18,15 @@
 
 }}
 \source{
-Paula, G. A. (2004). Modelos de regressão: com apoio computacional. 
+Paula, G. A. (2004). Modelos de regressão: com apoio computacional.
    São Paulo, SP: IME-USP. (Eg 3.5.1 pág. 201)
 }
 \description{
 Dados de um experimento realizado para avaliar
-   o possível efeito cancerígeno do fungicida Avadex. Foram utilizados 
-   403 camundongos. Desses, 65 receberam o fungicida e foram acompanhados 
-   durante 85 semanas, verificando-se o desenvolvimento ou não de tumor 
-   cancerígeno. Os demais animais não receberam o fungicida (grupo controle) 
+   o possível efeito cancerígeno do fungicida Avadex. Foram utilizados
+   403 camundongos. Desses, 65 receberam o fungicida e foram acompanhados
+   durante 85 semanas, verificando-se o desenvolvimento ou não de tumor
+   cancerígeno. Os demais animais não receberam o fungicida (grupo controle)
    e também foram acompanhados pelo mesmo período.
 }
 \examples{
@@ -38,11 +38,11 @@ data(PaulaEg3.5.1)
 barchart(casos/exp ~ trat | sexo,  data = PaulaEg3.5.1,
          xlab="Grupo", ylab="Proporção de casos",
          scales=list(x=list(labels=c("Controle","Tratado"))),
-         strip=strip.custom(var.name="Sexo", 
+         strip=strip.custom(var.name="Sexo",
          factor.levels=c(" Fêmea", "Macho"),
-         strip.levels=rep(TRUE,2)), 
+         strip.levels=rep(TRUE,2)),
          main="Associação entre fungicida e desenvolvimento de tumor")
 }
-\keyword{GLM}
+\keyword{MLG}
 \keyword{binarios}
 
diff --git a/man/PaulaEg3.5.2.Rd b/man/PaulaEg3.5.2.Rd
index d513e8b0..945658d9 100644
--- a/man/PaulaEg3.5.2.Rd
+++ b/man/PaulaEg3.5.2.Rd
@@ -10,19 +10,19 @@
 \item{dose}{Dose de extrato vegetal aplicada (em partes por milhão).}
 
 \item{emb}{Número observado de embriões mortos.}
-    
+
 }}
 \source{
-Paula, G. A. (2004). Modelos de regressão: com apoio computacional. 
+Paula, G. A. (2004). Modelos de regressão: com apoio computacional.
    São Paulo, SP: IME-USP. (Eg 3.5.2 pág. 203)
 }
 \description{
-Dados de um experimento conduzido para avaliar o efeito de 
-   diversos extratos vegetais na mortalidade de embriões de 
-   \emph{Biomphalaria Glabrata}. Para o extrato vegetal aquoso frio de 
+Dados de um experimento conduzido para avaliar o efeito de
+   diversos extratos vegetais na mortalidade de embriões de
+   \emph{Biomphalaria Glabrata}. Para o extrato vegetal aquoso frio de
    folhas de \emph{P. Hyrsiflora} foram consideradas 7 amostras, sendo
-   que em cada uma delas 50 embriões foram submetidos a uma particular 
-   dose do extrato vegetal, registrando-se, após o vigésimo dia, o 
+   que em cada uma delas 50 embriões foram submetidos a uma particular
+   dose do extrato vegetal, registrando-se, após o vigésimo dia, o
    número de embriões mortos.
 }
 \examples{
@@ -33,12 +33,12 @@ data(PaulaEg3.5.2)
 
 str(PaulaEg3.5.2)
 
-barchart(emb/(sum(emb)) ~ dose,  data = PaulaEg3.5.2, 
+barchart(emb/(sum(emb)) ~ dose,  data = PaulaEg3.5.2,
          stack=TRUE, col= "lightblue",
-         xlab="Dose (em ppm)", ylab="Proporção de embriões mortos", 
+         xlab="Dose (em ppm)", ylab="Proporção de embriões mortos",
          main="Efeito de extrato vegetal")
 
 }
-\keyword{GLM}
+\keyword{MLG}
 \keyword{binarios}
 
diff --git a/man/PaulaEg3.6.11a.Rd b/man/PaulaEg3.6.11a.Rd
index e72afba9..61be2768 100644
--- a/man/PaulaEg3.6.11a.Rd
+++ b/man/PaulaEg3.6.11a.Rd
@@ -8,21 +8,21 @@
 \describe{
 
 \item{mortos}{Quantidade observada de besouros mortos.}
-    
+
 \item{exp}{Quantidade de besouros expostos a cada dose.}
 
 \item{dose}{Dose de disulfeto de carbono gasoso à qual os besouros
    foram expostos.}
-    
+
 }}
 \source{
-Paula, G. A. (2004). Modelos de regressão: com apoio computacional. 
+Paula, G. A. (2004). Modelos de regressão: com apoio computacional.
    São Paulo, SP: IME-USP. (Eg 3.6.11a pág. 237)
 }
 \description{
-Dados de  um estudo sobre o efeito da exposição de  
-    besouros adultos a diferentes doses de disulfeto de carbono gasoso 
-    \emph{(CS2)}, durante cinco horas. Foram registrados os números 
+Dados de  um estudo sobre o efeito da exposição de
+    besouros adultos a diferentes doses de disulfeto de carbono gasoso
+    \emph{(CS2)}, durante cinco horas. Foram registrados os números
     de besouros mortos.
 }
 \examples{
@@ -33,13 +33,13 @@ data(PaulaEg3.6.11a)
 
 str(PaulaEg3.6.11a)
 
-xyplot(mortos/(sum(mortos)) ~ dose,  data = PaulaEg3.6.11a, 
+xyplot(mortos/(sum(mortos)) ~ dose,  data = PaulaEg3.6.11a,
          type = "o",
-         xlab = "Dose de disulfeto de carbono gasoso", 
-         ylab = "Proporção de besouros mortos", 
+         xlab = "Dose de disulfeto de carbono gasoso",
+         ylab = "Proporção de besouros mortos",
          main = expression("Exposição de besouros a"~CS[2]))
 
 }
-\keyword{GLM}
+\keyword{MLG}
 \keyword{binarios}
 
diff --git a/man/PaulaEg3.6.11b.Rd b/man/PaulaEg3.6.11b.Rd
index 701e73f6..02c1d03e 100644
--- a/man/PaulaEg3.6.11b.Rd
+++ b/man/PaulaEg3.6.11b.Rd
@@ -8,19 +8,19 @@
 \describe{
 
 \item{menst}{Número de garotas menstruando.}
-    
+
 \item{entre}{Número de garotas entrevistadas.}
 
 \item{idade}{Idade media.}
-    
+
 }}
 \source{
-Paula, G. A. (2004). Modelos de regressão: com apoio computacional. 
+Paula, G. A. (2004). Modelos de regressão: com apoio computacional.
    São Paulo, SP: IME-USP. (Eg 3.6.11b pág. 241)
 }
 \description{
-Dados de  um estudo em que se investigou a idade do início 
-    da menstruação em 3918 garotas de Varsóvia. Para 25 médias de 
+Dados de  um estudo em que se investigou a idade do início
+    da menstruação em 3918 garotas de Varsóvia. Para 25 médias de
     idade foram observadas a ocorrência  ou não  do início de períodos
     de menstruação nas adolescentes.
 }
@@ -30,12 +30,12 @@ library(lattice)
 
 data(PaulaEg3.6.11b)
 
-       
-xyplot((menst/entre) ~ idade,  data = PaulaEg3.6.11b, 
+
+xyplot((menst/entre) ~ idade,  data = PaulaEg3.6.11b,
        type = c("p","a"),
-       xlab = "Idade média", 
-       ylab = "Meninas menstruando/Entrevistadas", 
+       xlab = "Idade média",
+       ylab = "Meninas menstruando/Entrevistadas",
        main = "Idade do início da menstruação em garotas de Varsóvia.")
 }
-\keyword{GLM}
+\keyword{MLG}
 
diff --git a/man/PaulaEg3.6.9c.Rd b/man/PaulaEg3.6.9c.Rd
index ca52b281..e7c0df3e 100644
--- a/man/PaulaEg3.6.9c.Rd
+++ b/man/PaulaEg3.6.9c.Rd
@@ -7,9 +7,9 @@
 
 \describe{
 
-\item{pref}{Preferência do comprador por um tipo de automóvel (1 = americano, 
+\item{pref}{Preferência do comprador por um tipo de automóvel (1 = americano,
    0 = japonês).}
-    
+
 \item{idade}{Idade do comprador (em anos).}
 
 \item{sexo}{Sexo do comprador (0 =  masculino; 1 = feminino).}
@@ -18,14 +18,14 @@
 
 }}
 \source{
-Paula, G. A. (2004). Modelos de regressão: com apoio computacional. 
+Paula, G. A. (2004). Modelos de regressão: com apoio computacional.
    São Paulo, SP: IME-USP. (Eg 3.6.9c pág. 231)
 }
 \description{
 Dados sobre a preferência de consumidores americanos com
-   relação a automóveis. Uma amostra aleatória de 263 consumidores foi 
-   considerada. As seguintes variáveis foram observadas para cada 
-   comprador: preferência quanto ao tipo de automóvel, idade, sexo e 
+   relação a automóveis. Uma amostra aleatória de 263 consumidores foi
+   considerada. As seguintes variáveis foram observadas para cada
+   comprador: preferência quanto ao tipo de automóvel, idade, sexo e
    estado civil.
 }
 \examples{
@@ -36,13 +36,13 @@ data(PaulaEg3.6.9c)
 
 str(PaulaEg3.6.9c)
 
-bwplot(idade ~ pref,  data = PaulaEg3.6.9c, 
+bwplot(idade ~ pref,  data = PaulaEg3.6.9c,
        type="p",
-       xlab="Preferência - Japonês e Americano", 
-       ylab="Idade do Comprador", 
+       xlab="Preferência - Japonês e Americano",
+       ylab="Idade do Comprador",
        main="Preferência")
 
 }
-\keyword{GLM}
+\keyword{MLG}
 \keyword{binarios}
 
diff --git a/man/PaulaEg5.2.8a.Rd b/man/PaulaEg5.2.8a.Rd
index 62e6f30b..572f7438 100644
--- a/man/PaulaEg5.2.8a.Rd
+++ b/man/PaulaEg5.2.8a.Rd
@@ -14,10 +14,10 @@
 
 \item{\code{esp14}}{Número de ácaros coletados da espécie 14.}
 
-\item{\code{placa}}{Número de partes da placa de esterco onde 
+\item{\code{placa}}{Número de partes da placa de esterco onde
     foram coletados os ácaros. (1 ou 6)}
 
-\item{\code{posic}}{Posição na placa de esterco onde foram coletados 
+\item{\code{posic}}{Posição na placa de esterco onde foram coletados
 os ácaros (central ou lateral).}
 
 \item{\code{reg}}{Região onde a placa de esterco foi coletada (São
@@ -32,12 +32,12 @@ Paula, G. A. (2004). Modelos de regressão: com apoio
     computacional. São Paulo, SP: IME-USP. (Exemplo 5.2.8a, pág. 359)
 }
 \description{
-Dados de um experimento desenvolvido para estudar  
-    a distribuição do número de ácaros em placas de esterco de gado 
-    bovino no estado de São Paulo, obtidos por Paula e Tavares, 1992. 
-    Essas placas são depósitos de ovos da mosca do chifre 
-    (\emph{Haematobia irritans}), uma das pragas mais importantes da 
-    pecuária brasileira. Os ácaros são inimigos naturais da mosca do 
+Dados de um experimento desenvolvido para estudar
+    a distribuição do número de ácaros em placas de esterco de gado
+    bovino no estado de São Paulo, obtidos por Paula e Tavares, 1992.
+    Essas placas são depósitos de ovos da mosca do chifre
+    (\emph{Haematobia irritans}), uma das pragas mais importantes da
+    pecuária brasileira. Os ácaros são inimigos naturais da mosca do
     chifre, uma vez que se alimentam de ovos e larvas dessas moscas.
 }
 \examples{
diff --git a/man/PaulaEg5.5.1.Rd b/man/PaulaEg5.5.1.Rd
index 63d1f038..704be989 100644
--- a/man/PaulaEg5.5.1.Rd
+++ b/man/PaulaEg5.5.1.Rd
@@ -8,8 +8,8 @@
 
 \item{\code{indiv}}{Identificação do indivíduo.}
 
-\item{\code{period}}{Período de observação (1 = antes do tratamento, 
-    2 = primeiro período após o tratamento, 3 = segundo período após 
+\item{\code{period}}{Período de observação (1 = antes do tratamento,
+    2 = primeiro período após o tratamento, 3 = segundo período após
     o tratamento e 4 = terceiro período após o tratamento).}
 
 \item{\code{seman}}{Número de semanas em cada período.}
@@ -25,11 +25,11 @@ Paula, G. A. (2004). Modelos de regressão: com apoio
     computacional. São Paulo, SP: IME-USP. (Exemplo 5.5.1, pág. 379)
 }
 \description{
-Dados apresentados em Diggle, Liang e Zeger (1994), 
+Dados apresentados em Diggle, Liang e Zeger (1994),
     referentes a um ensaio clínico com 59 indivíduos epilépticos,
     aleatorizados de modo que cada um recebesse uma droga
     antiepiléptica (progabide) ou placebo.
-    Os dados de cada indivíduo consistem do número de ataques 
+    Os dados de cada indivíduo consistem do número de ataques
     epilépticos num período de oito semanas antes do tratamento, além
     do número de ataques em cada período de duas semanas, num total
     de quatro períodos após o tratamento. O interesse do estudo é
@@ -47,7 +47,7 @@ xyplot(ataq ~ period | trat, groups = indiv, data = PaulaEg5.5.1,
        type = c("p", "a"),
        xlab = "Período",
        ylab = "Número de ataques epilépticos")
-       
+
 }
 \references{
 Diggle, P. J.; Liang, K. Y. e Zeger, S. L. (1994).
diff --git a/man/PaulaEg5.5.2.Rd b/man/PaulaEg5.5.2.Rd
index dfce09c0..25bcecc4 100644
--- a/man/PaulaEg5.5.2.Rd
+++ b/man/PaulaEg5.5.2.Rd
@@ -40,7 +40,7 @@ Estudo discutido em Myers, Montgomery e Vining (2002)
 data(PaulaEg5.5.2)
 
 str(PaulaEg5.5.2)
-           
+
 library(latticeExtra)
 
 tb <- with(PaulaEg5.5.2, table(nivel, trat, sexo, cond))
@@ -57,7 +57,7 @@ useOuterStrips(
                  columns = 2, cex.title = 1)
     )
 )
-           
+
 }
 \references{
 Myers, R.H.; Montgomery, D. C.; Vining, G. G. (2002).
diff --git a/man/PaulaEg5.5.3.Rd b/man/PaulaEg5.5.3.Rd
index a8c4f5db..7e51b643 100644
--- a/man/PaulaEg5.5.3.Rd
+++ b/man/PaulaEg5.5.3.Rd
@@ -22,11 +22,11 @@ Paula, G. A. (2004). Modelos de regressão: com apoio
 computacional. São Paulo, SP: IME-USP. (Exemplo 5.5.3, pág. 390)
 }
 \description{
-Dados de um ensaio clínico realizado com 109 indivíduos, 
+Dados de um ensaio clínico realizado com 109 indivíduos,
     distribuídos de forma aleatória para receberem um líquido
     tipo A (34 indivíduos), um líquido tipo B (36 indivíduos) ou um
-    líquido controle (39 indivíduos). Placas dentárias foram 
-    avaliadas e classificadas segundo um escore no início do 
+    líquido controle (39 indivíduos). Placas dentárias foram
+    avaliadas e classificadas segundo um escore no início do
     tratamento, após 3 e 6 meses.
 }
 \examples{
@@ -36,13 +36,13 @@ data(PaulaEg5.5.3)
 require(lattice)
 
 xyplot(escore ~ period | trat, groups = volunt,
-      xlab = 'Período', ylab = 'Escore', type = c("p", "a"), 
+      xlab = 'Período', ylab = 'Escore', type = c("p", "a"),
       data = PaulaEg5.5.3)
-      
+
 }
 \references{
-Hadgu, A. e Koch, G. (1999). Application of generalized 
-estimating equations to a dental randomized clinical trial. Journal 
+Hadgu, A. e Koch, G. (1999). Application of generalized
+estimating equations to a dental randomized clinical trial. Journal
 of Biopharmaceutical Statistics 9, 161-178.
 }
 \keyword{quase-verossimilhança}
diff --git a/man/PaulaEx1.13.20.Rd b/man/PaulaEx1.13.20.Rd
index 690ee5bd..65017b9c 100644
--- a/man/PaulaEx1.13.20.Rd
+++ b/man/PaulaEx1.13.20.Rd
@@ -27,7 +27,7 @@ Paula, G. A. (2004). Modelos de regressão: com apoio
     pág. 110)
 }
 \description{
-Dados referentes a vendas de um tipo de telhado de madeira 
+Dados referentes a vendas de um tipo de telhado de madeira
     em 26 filiais de uma rede de lojas de construção. Um dos objetivos do
     estudo é tentar prever o número esperado de telhados vendidos
     dadas as demais variáveis registradas.
diff --git a/man/PaulaEx2.10.7.Rd b/man/PaulaEx2.10.7.Rd
index b4e08d5a..6af2016e 100644
--- a/man/PaulaEx2.10.7.Rd
+++ b/man/PaulaEx2.10.7.Rd
@@ -36,7 +36,7 @@ str(PaulaEx2.10.7)
 library(lattice)
 xyplot(tempo ~ volt,
        groups = temp,
-       data = PaulaEx2.10.7, 
+       data = PaulaEx2.10.7,
        type = c("p", "g", "a"),
        auto.key = list(
            corner = c(0.9, 0.9),
@@ -71,5 +71,5 @@ xyplot(tempo[, "C.Variação"] ~ factor(trat),
 Lawless, J. F. (1982). Statistical Models and Methods for
     Lifetime Data. John Wiley, New York.
 }
-\keyword{positivos-assimétricos}
+\keyword{positivo-assimétrico}
 
diff --git a/man/PaulaEx3.7.14.Rd b/man/PaulaEx3.7.14.Rd
index 09e7eb8a..9eb7eb52 100644
--- a/man/PaulaEx3.7.14.Rd
+++ b/man/PaulaEx3.7.14.Rd
@@ -19,7 +19,7 @@ t = 1,2,3,4,5.}
 }}
 \source{
 Paula, G. A. (2004). Modelos de regressão: com apoio
-    computacional. São Paulo, SP: IME-USP. 
+    computacional. São Paulo, SP: IME-USP.
     (Exercício 3.7.14, página 272)
 }
 \description{
@@ -33,18 +33,18 @@ data(PaulaEx3.7.14)
 
 PaulaEx3.7.14$temp <- as.factor(PaulaEx3.7.14$temp)
 
-xyplot(nit~temp, groups = equip, data = PaulaEx3.7.14, type = "o", 
-       auto.key = TRUE, xlab = "Tempos", 
+xyplot(nit~temp, groups = equip, data = PaulaEx3.7.14, type = "o",
+       auto.key = TRUE, xlab = "Tempos",
        ylab = "N° de equipamentos operantes",
        main = "Confiabilidade dos equipamentos")
 }
 \references{
-Lawless, J. F. (1982). Statistical Models and Methods for 
+Lawless, J. F. (1982). Statistical Models and Methods for
     Lifetime Data. John Wiley & Sons, New York. (Página 389)
 
-Efron, B. (1988). Logistic regression, survival analysis, 
+Efron, B. (1988). Logistic regression, survival analysis,
     and the Kaplan-Meier curve. J. Amer. Stat. Assoc., 83.
     (Páginas 414-425)
 }
-\keyword{RLAS}
+\keyword{sobrevivencia}
 
diff --git a/man/PaulaEx3.7.15.Rd b/man/PaulaEx3.7.15.Rd
index c5a5b638..0fa0bb47 100644
--- a/man/PaulaEx3.7.15.Rd
+++ b/man/PaulaEx3.7.15.Rd
@@ -17,7 +17,7 @@
 
 \item{\code{tesc}}{Tempo de escolaridade (em anos).}
 
-\item{\code{gesc}}{Grau de escolaridade (0 = nenhum, 1 = segundo grau, 
+\item{\code{gesc}}{Grau de escolaridade (0 = nenhum, 1 = segundo grau,
 2 = técnico, 3 = universitário, 4 = mestrado, 5 = doutorado).}
 
 \item{\code{cur}}{Checkup Regular (1 = sim, 2 = não).}
@@ -34,7 +34,7 @@
 
 \item{\code{iupmen}}{Idade do último período menstrual.}
 
-\item{\code{ec}}{Estado civil (1 = casada, 2 = divorciada, 3 = separada, 
+\item{\code{ec}}{Estado civil (1 = casada, 2 = divorciada, 3 = separada,
 4 = viúva, 5 = solteira).}
 
 }}
@@ -57,22 +57,22 @@ data(PaulaEx3.7.15)
 str(PaulaEx3.7.15)
 
 PaulaEx3.7.15 <- transform(
-                 PaulaEx3.7.15, 
+                 PaulaEx3.7.15,
                  PaulaEx3.7.15$est <- as.factor(PaulaEx3.7.15$est),
                  PaulaEx3.7.15$diag <- as.factor(PaulaEx3.7.15$diag),
                  PaulaEx3.7.15$cur <- as.factor(PaulaEx3.7.15$cur),
                  PaulaEx3.7.15$ec <- as.factor(PaulaEx3.7.15$ec)
                   )
 # Libra para Kg
-PaulaEx3.7.15$peso <- PaulaEx3.7.15$peso*0.453592 
+PaulaEx3.7.15$peso <- PaulaEx3.7.15$peso*0.453592
 
-pairs(~ idade + diag + tesc + gesc + cur + ipg + idmens 
+pairs(~ idade + diag + tesc + gesc + cur + ipg + idmens
       + numab + numfi + peso + idupmens + ec,
-      data = PaulaEx3.7.15, 
+      data = PaulaEx3.7.15,
       main = "Matriz de gráficos de dispersão - tumor benigno na mama")
 }
 \references{
-Hosmer, D. W. e Lemeshow, S. (1989). 
+Hosmer, D. W. e Lemeshow, S. (1989).
 Applied Logistic Regression. John Wiley, New York. (Capítulo.7)
 }
 \keyword{RL}
diff --git a/man/PaulaEx3.7.16.Rd b/man/PaulaEx3.7.16.Rd
index 2c50ba66..cc0e2e6d 100644
--- a/man/PaulaEx3.7.16.Rd
+++ b/man/PaulaEx3.7.16.Rd
@@ -3,11 +3,11 @@
 \name{PaulaEx3.7.16}
 \alias{PaulaEx3.7.16}
 \title{Experimento de toxicidade}
-\format{Um \code{data.frame} com 4 variáveis. 
+\format{Um \code{data.frame} com 4 variáveis.
 
 \describe{
 
-\item{\code{conc}}{Concentração (R = rotenine, 
+\item{\code{conc}}{Concentração (R = rotenine,
 D = deguelin e M = mistura).}
 
 \item{\code{dose}}{Dose aplicada da concentração.}
@@ -19,7 +19,7 @@ D = deguelin e M = mistura).}
 }}
 \source{
 Paula, G. A. (2004). Modelos de regressão: com apoio
-    computacional. São Paulo, SP: IME-USP. 
+    computacional. São Paulo, SP: IME-USP.
     (Exercício 3.7.14, pág. 274 e 275)
 }
 \description{
@@ -40,7 +40,7 @@ auto.key = TRUE, ylab = "Proporção de insetos mortos",
 xlab = "Dose", main = "Sobrevivência dos insetos expostos a toxina")
 }
 \references{
-Morgan, B. J. T. (1992). Analysis of Quantal Response Data. 
+Morgan, B. J. T. (1992). Analysis of Quantal Response Data.
 Chapman and Hall, London. (Página 90)
 }
 \keyword{binomial}
diff --git a/man/PaulaEx3.7.19.Rd b/man/PaulaEx3.7.19.Rd
index 1afbc50f..4ce207ce 100644
--- a/man/PaulaEx3.7.19.Rd
+++ b/man/PaulaEx3.7.19.Rd
@@ -9,7 +9,7 @@
 
 \item{\code{idade}}{Idade (<30 anos ou +30).}
 
-\item{\code{ncigar}}{Número de cigarros consumidos por dia 
+\item{\code{ncigar}}{Número de cigarros consumidos por dia
 (< 5 ou +5).}
 
 \item{\code{tgest}}{Tempo de gestação (<= 260 dias ou >260).}
@@ -21,12 +21,12 @@
 }}
 \source{
 Paula, G. A. (2004). Modelos de regressão: com apoio
-    computacional. São Paulo, SP: IME-USP. 
+    computacional. São Paulo, SP: IME-USP.
     (Exercício 3.7.19, página 276)
 }
 \description{
-Estudo com gestantes fumantes, no qual as participantes   
-foram classificadas segundo os fatores de idade, número de cigarros  
+Estudo com gestantes fumantes, no qual as participantes
+foram classificadas segundo os fatores de idade, número de cigarros
 consumidos, tempo de gestação, e a condição (sobrevivência) da criança.
 }
 \examples{
@@ -35,7 +35,7 @@ data(PaulaEx3.7.19)
 
 require(vcd)
 
-# Paciente que sobreviveram 
+# Paciente que sobreviveram
 ss <- xtabs(sobres ~ idade + ncigar + tgest, PaulaEx3.7.19)
 
 # Paciente que não sobreviveram
@@ -54,7 +54,7 @@ mosaic(ns,
                           tgest = "Tempo de gestação")))
 }
 \references{
-Agresti A. (1990). Categorical Data Analysis. John Wiley, 
+Agresti A. (1990). Categorical Data Analysis. John Wiley,
 New York. (página 253))
 }
 \keyword{ML}
diff --git a/man/PaulaEx3.7.20.Rd b/man/PaulaEx3.7.20.Rd
index a91b8e71..3697b642 100644
--- a/man/PaulaEx3.7.20.Rd
+++ b/man/PaulaEx3.7.20.Rd
@@ -3,13 +3,13 @@
 \name{PaulaEx3.7.20}
 \alias{PaulaEx3.7.20}
 \title{Pacientes com leucemia}
-\format{Um \code{data.frame} com 51 pacientes e 
+\format{Um \code{data.frame} com 51 pacientes e
 
 \describe{
 
 \item{\code{idade}}{Idade do paciente (em anos).}
 
-\item{\code{mdd}}{Mancha diferencial da doença (em porcentagem).} 
+\item{\code{mdd}}{Mancha diferencial da doença (em porcentagem).}
 
 \item{\code{if}}{Infiltração na medula (em porcentagem).}
 
@@ -21,19 +21,19 @@
 
 \item{\code{trat}}{Tratamento (1 = satisfatório, 0 = não satisfatório).}
 
-\item{\code{tsobre}}{Tempo de sobrevivência  (em meses).} 
+\item{\code{tsobre}}{Tempo de sobrevivência  (em meses).}
 
-\item{\code{sit}}{Situação (1 = sobrevivente, 0 = não sobrevivente).} 
+\item{\code{sit}}{Situação (1 = sobrevivente, 0 = não sobrevivente).}
 }}
 \source{
 Paula, G. A. (2004). Modelos de regressão: com apoio
-    computacional. São Paulo, SP: IME-USP. 
+    computacional. São Paulo, SP: IME-USP.
     (Exercício 3.7.19, página 276)
 }
 \description{
-Estudo com 51 pacientes adultos, 
-previamente diagnosticados com um tipo agudo de leucemia, que 
-receberam um tipo de tratamento sendo verificada, após  certo 
+Estudo com 51 pacientes adultos,
+previamente diagnosticados com um tipo agudo de leucemia, que
+receberam um tipo de tratamento sendo verificada, após  certo
 período, a eficiência ou não do tratamento.
 }
 \examples{
@@ -53,19 +53,19 @@ PaulaEx3.7.20 <- transform(
 
 require(car)
 
-scatterplotMatrix(~ idade + mdd + im + cl + md + tmax + trat 
+scatterplotMatrix(~ idade + mdd + im + cl + md + tmax + trat
                   + tsobre + sit,
-                  spread = FALSE, 
-                  pch = 20, 
+                  spread = FALSE,
+                  pch = 20,
                   lwd = 2,
-                 smooth = TRUE, 
-                  data = PaulaEx3.7.20, 
+                 smooth = TRUE,
+                  data = PaulaEx3.7.20,
                   cex = 1.5,
                   main = "Matriz de gráficos de dispersão - Leucemia")
 }
 \references{
-Everitt, B. S. (1994). 
-A Handbook of Statistical Analysis using S-Plus. 
+Everitt, B. S. (1994).
+A Handbook of Statistical Analysis using S-Plus.
 Chapman and Hall, London. (Página 253)
 }
 \keyword{ML}
diff --git a/man/PaulaEx3.7.7a.Rd b/man/PaulaEx3.7.7a.Rd
index b4d87d8f..fe3e29ac 100644
--- a/man/PaulaEx3.7.7a.Rd
+++ b/man/PaulaEx3.7.7a.Rd
@@ -18,9 +18,9 @@ Paula, G. A. (2004). Modelos de regressão: com apoio
     computacional. São Paulo, SP: IME-USP. (Ex 3.7.7a, pág. 269)
 }
 \description{
-Experimento de dose-resposta conduzido para avaliar a 
+Experimento de dose-resposta conduzido para avaliar a
     influência dos extratos vegetais "aquoso frio de folhas", "aquoso
-    frio de frutos" e de um extrato químico, respectivamente, na morte 
+    frio de frutos" e de um extrato químico, respectivamente, na morte
     de um determinado tipo de caramujo.
 }
 \examples{
@@ -36,7 +36,7 @@ data = PaulaEx3.7.7a,
 xlab = "Dose",
 type = c("o"),
 ylab = "Proporção de mortos",
-auto.key = list(space="top", columns=2, 
+auto.key = list(space="top", columns=2,
                 title="Caramujos", cex.title=1,
                 lines=TRUE, points=FALSE))
 
diff --git a/man/PaulaEx3.7.7b.Rd b/man/PaulaEx3.7.7b.Rd
index eb092ff7..f3ef5674 100644
--- a/man/PaulaEx3.7.7b.Rd
+++ b/man/PaulaEx3.7.7b.Rd
@@ -18,9 +18,9 @@ Paula, G. A. (2004). Modelos de regressão: com apoio
     computacional. São Paulo, SP: IME-USP. (Ex 3.7.7b, pág. 269)
 }
 \description{
-Experimento de dose-resposta conduzido para avaliar a 
+Experimento de dose-resposta conduzido para avaliar a
     influência dos extratos vegetais "aquoso frio de folhas", "aquoso
-    frio de frutos" e de um extrato químico, respectivamente, na morte 
+    frio de frutos" e de um extrato químico, respectivamente, na morte
     de um determinado tipo de caramujo.
 }
 \examples{
@@ -30,13 +30,13 @@ data(PaulaEx3.7.7b)
 str(PaulaEx3.7.7b)
 
 library(lattice)
-                       
+
 xyplot(PaulaEx3.7.7b$cmort/PaulaEx3.7.7b$cexp ~ dose,
      data = PaulaEx3.7.7b,
      xlab = "Dose",
      type = c("o"),
      ylab = "Proporção de mortos",
-     auto.key = list(space="top", columns=2, 
+     auto.key = list(space="top", columns=2,
                      title="Caramujos", cex.title=1,
                      lines=TRUE, points=FALSE))
 
diff --git a/man/PaulaEx3.7.7c.Rd b/man/PaulaEx3.7.7c.Rd
index 5f55199f..b0d69962 100644
--- a/man/PaulaEx3.7.7c.Rd
+++ b/man/PaulaEx3.7.7c.Rd
@@ -18,9 +18,9 @@ Paula, G. A. (2004). Modelos de regressão: com apoio
     computacional. São Paulo, SP: IME-USP. (Ex 3.7.7c, pág. 269)
 }
 \description{
-Experimento de dose-resposta conduzido para avaliar a 
+Experimento de dose-resposta conduzido para avaliar a
     influência dos extratos vegetais "aquoso frio de folhas", "aquoso
-    frio de frutos" e de um extrato químico, respectivamente, na morte 
+    frio de frutos" e de um extrato químico, respectivamente, na morte
     de um determinado tipo de caramujo.
 }
 \examples{
@@ -36,7 +36,7 @@ xyplot(PaulaEx3.7.7c$cmort/PaulaEx3.7.7c$cexp ~ dose,
      xlab = "Dose",
      type = c("o"),
      ylab = "Proporção de mortos",
-     auto.key = list(space="top", columns=2, 
+     auto.key = list(space="top", columns=2,
                   title="Caramujos", cex.title=1,
                   lines=TRUE, points=FALSE))
 
diff --git a/man/PaulaEx3.7.8.Rd b/man/PaulaEx3.7.8.Rd
index 85cfef05..f5371bea 100644
--- a/man/PaulaEx3.7.8.Rd
+++ b/man/PaulaEx3.7.8.Rd
@@ -22,8 +22,8 @@ Paula, G. A. (2004). Modelos de regressão: com apoio
 }
 \description{
 Dados referentes a um experimento desenvolvido para avaliar
-     a germinação de um determinado tipo de semente. A tabela abaixo 
-     apresenta o número de sementes que germinaram após cinco dias para 
+     a germinação de um determinado tipo de semente. A tabela abaixo
+     apresenta o número de sementes que germinaram após cinco dias para
      cada 100 sementes submetidas a cada condição experimental.
 }
 \examples{
diff --git a/man/PaulaEx4.6.15.Rd b/man/PaulaEx4.6.15.Rd
index eed92d6b..709cad96 100644
--- a/man/PaulaEx4.6.15.Rd
+++ b/man/PaulaEx4.6.15.Rd
@@ -29,8 +29,8 @@ Paula, G. A. (2004). Modelos de regressão: com apoio
 \description{
 Dados referentes a um estudo realizado em 1990 com
     recrutas americanos em que a variável de interesse era o número de
-    infecções de ouvido. Além disso, foram coletadas as seguintes 
-    informações sobre os recrutas: hábito de nadar, local em que 
+    infecções de ouvido. Além disso, foram coletadas as seguintes
+    informações sobre os recrutas: hábito de nadar, local em que
     costuma nadar, idade e sexo.
 }
 \examples{
@@ -59,7 +59,7 @@ xyplot(ninfec[, "var"] ~ ninfec[, "mu"],
         })
 
 library(latticeExtra)
-useOuterStrips(    
+useOuterStrips(
     xyplot(ninfec ~ idade | habito + local,
            groups = sexo,
            data = PaulaEx4.6.15,
diff --git a/man/PaulaEx4.6.17.Rd b/man/PaulaEx4.6.17.Rd
index f160646f..68e5ec60 100644
--- a/man/PaulaEx4.6.17.Rd
+++ b/man/PaulaEx4.6.17.Rd
@@ -45,7 +45,7 @@ ftable(xt)
 plot(xt)
 
 library(latticeExtra)
-useOuterStrips(    
+useOuterStrips(
     xyplot(nind ~ maciez | prefer + usom,
            groups = temp,
            data = PaulaEx4.6.17,
diff --git a/man/PaulaEx4.6.20.Rd b/man/PaulaEx4.6.20.Rd
index 5e91626d..e1be9310 100644
--- a/man/PaulaEx4.6.20.Rd
+++ b/man/PaulaEx4.6.20.Rd
@@ -9,7 +9,7 @@
 \item{\code{dose}}{Dosagem de \emph{Nitrofen} aplicada, em mg/l.}
 
 \item{\code{novos}}{Número de ovos de \emph{Ceriodaphnia dubia}
-    eclodidos após 3 ninhadas.} 
+    eclodidos após 3 ninhadas.}
 
 }}
 \source{
diff --git a/man/PaulaEx4.6.7.Rd b/man/PaulaEx4.6.7.Rd
index 34d03f90..78b4064d 100644
--- a/man/PaulaEx4.6.7.Rd
+++ b/man/PaulaEx4.6.7.Rd
@@ -28,10 +28,10 @@ str(PaulaEx4.6.7)
 
 library(lattice)
 xyplot(nfalhas ~ comp, data = PaulaEx4.6.7,
-       type = c("p", "g", "smooth"), xlab = "Comprimento", ylab = 
+       type = c("p", "g", "smooth"), xlab = "Comprimento", ylab =
        "Número de falhas")
 
-histogram( ~nfalhas/comp, data = PaulaEx4.6.7, 
+histogram( ~nfalhas/comp, data = PaulaEx4.6.7,
       xlab = "Número de falhas por metro de tecido", ylab = "Frequência")
 
 }
diff --git a/man/PaulaEx5.6.13.Rd b/man/PaulaEx5.6.13.Rd
index b1cdf53a..09eec181 100644
--- a/man/PaulaEx5.6.13.Rd
+++ b/man/PaulaEx5.6.13.Rd
@@ -10,7 +10,7 @@
 
 \item{\code{dia}}{Dia de aplicação (1, 2 ou 3).}
 
-\item{\code{metod}}{Método utilizado: (1 = pincel, 2 = rolo e 
+\item{\code{metod}}{Método utilizado: (1 = pincel, 2 = rolo e
     3 = spray.}
 
 \item{\code{mistur}}{Tipo de mistura do pigmento (1, 2, 3 ou 4).}
@@ -23,10 +23,10 @@ Paula, G. A. (2004). Modelos de regressão: com apoio
 computacional. São Paulo, SP: IME-USP. (Exercício 5.6.13, pág. 400)
 }
 \description{
-Um experimento foi conduzido para avaliar a dispersão 
-    de quatro diferentes pigmentos numa pintura. O procedimento 
-    consistiu em preparar cada mistura e aplicá-las num painel usando 
-    três métodos diferentes. O experimento é repetido em três dias distintos 
+Um experimento foi conduzido para avaliar a dispersão
+    de quatro diferentes pigmentos numa pintura. O procedimento
+    consistiu em preparar cada mistura e aplicá-las num painel usando
+    três métodos diferentes. O experimento é repetido em três dias distintos
     e a resposta é a porcentagem de reflectância do pigmento.
 }
 \examples{
@@ -42,7 +42,7 @@ xyplot(reflec ~ mistur, groups = metod, auto.key = list(title = 'Método'),
 }
 \references{
 Myers, R.H.; Montgomery, D. C. e Vining, G. G. (2002).
-Generalized Linear Models: With Applications in Engineering and the 
+Generalized Linear Models: With Applications in Engineering and the
 Sciences. John Wiley, New York.
 }
 \keyword{quase-verossimilhança}
diff --git a/man/PaulaEx5.6.14.Rd b/man/PaulaEx5.6.14.Rd
index bf8db091..a5506a1b 100644
--- a/man/PaulaEx5.6.14.Rd
+++ b/man/PaulaEx5.6.14.Rd
@@ -25,9 +25,9 @@ computacional. São Paulo, SP: IME-USP. (Exercício 5.6.14, pág. 401)
 }
 \description{
 Dados referentes a um experimento em que 30 ratos tiveram
-    uma condição de leucemia induzida, sendo submetidos, posteriormente, 
-    a três drogas quimioterápicas. Foram coletadas de cada animal a 
-    quantidade de células brancas, a quantidade de células vermelhas 
+    uma condição de leucemia induzida, sendo submetidos, posteriormente,
+    a três drogas quimioterápicas. Foram coletadas de cada animal a
+    quantidade de células brancas, a quantidade de células vermelhas
     e o número de colônias de células cancerosas, em três períodos diferentes.
 }
 \examples{
@@ -38,11 +38,11 @@ data(PaulaEx5.6.14)
 
 xyplot(celucanc ~ period, groups = rato,
        type = c("p", "g", "a"), data = PaulaEx5.6.14)
-       
+
 }
 \references{
 Myers, R.H.; Montgomery, D. C. e Vining, G. G. (2002).
-Generalized Linear Models: With Applications in Engineering and the 
+Generalized Linear Models: With Applications in Engineering and the
 Sciences. John Wiley, New York.
 }
 \keyword{quase-verossimilhança}
diff --git a/man/PaulaEx5.6.15.Rd b/man/PaulaEx5.6.15.Rd
index ab8ed592..2bbbf8ef 100644
--- a/man/PaulaEx5.6.15.Rd
+++ b/man/PaulaEx5.6.15.Rd
@@ -8,7 +8,7 @@
 
 \item{\code{pacient}}{Identificação do paciente.}
 
-\item{\code{period}}{Momento em que o paciente foi avaliado (1 = início 
+\item{\code{period}}{Momento em que o paciente foi avaliado (1 = início
 do mês, 2 = após 1 mês, 3 = após 2 meses e 4 = após 3 meses.}
 
 \item{\code{sexo}}{Sexo (1 = masculino e 0 = feminino).}
@@ -17,7 +17,7 @@ do mês, 2 = após 1 mês, 3 = após 2 meses e 4 = após 3 meses.}
 
 \item{\code{trat}}{Tratamento aplicado placebo ou Auronofin).}
 
-\item{\code{result}}{Avaliação do paciente classificada em 
+\item{\code{result}}{Avaliação do paciente classificada em
 bom e regular ou ruim.}
 
 }}
@@ -26,10 +26,10 @@ Paula, G. A. (2004). Modelos de regressão: com apoio
 computacional. São Paulo, SP: IME-USP. (Exercício 5.6.14, pág. 401)
 }
 \description{
-Ensaio clínico em que 20 pacientes com artrite 
+Ensaio clínico em que 20 pacientes com artrite
     foram aleatorizados, de modo que 10 receberam o medicamento
     auronofin e os outros 10 receberam placebo. São consideradas como
-    variáveis explicativas sexo e idade, além do tipo do tratamento. Os 
+    variáveis explicativas sexo e idade, além do tipo do tratamento. Os
     pacientes foram consultados e avaliados em 4 ocasiões.
 }
 \examples{
@@ -38,19 +38,19 @@ library(lattice)
 
 data(PaulaEx5.6.15)
 
-barchart(table(PaulaEx5.6.15$result,PaulaEx5.6.15$trat, PaulaEx5.6.15$period), 
-         auto.key = list(space="top", 
-         columns = 4, cex.title = 1, rectangles = TRUE, points=FALSE, 
+barchart(table(PaulaEx5.6.15$result,PaulaEx5.6.15$trat, PaulaEx5.6.15$period),
+         auto.key = list(space="top",
+         columns = 4, cex.title = 1, rectangles = TRUE, points=FALSE,
          title = "Período"),
          scales = list(y = list(relation = "free"),
          x = list(alternating = FALSE)),
-         horizontal = FALSE, beside = FALSE, stack = FALSE, 
+         horizontal = FALSE, beside = FALSE, stack = FALSE,
          xlab = "Resultado", ylab = "Frequência absoluta")
 
 }
 \references{
 Myers, R.H.; Montgomery, D. C. e Vining, G. G. (2002).
-Generalized Linear Models: With Applications in Engineering and the 
+Generalized Linear Models: With Applications in Engineering and the
 Sciences. John Wiley, New York.
 }
 \keyword{quase-verossimilhança}
diff --git a/man/PaulaTb1.9.Rd b/man/PaulaTb1.9.Rd
index 937bed8b..620caa79 100644
--- a/man/PaulaTb1.9.Rd
+++ b/man/PaulaTb1.9.Rd
@@ -16,7 +16,7 @@ Paula, G. A. (2004). Modelos de regressão: com apoio
     computacional. São Paulo, SP: IME-USP. (Tabela 1.9, pág. 88)
 }
 \description{
-Número de bactérias sobreviventes em amostras de um 
+Número de bactérias sobreviventes em amostras de um
     produto alimentício segundo o tempo de exposição do produto a uma
     temperatura de 300°F.
 }
diff --git a/man/PaulaTb3.12.Rd b/man/PaulaTb3.12.Rd
index 7ece9003..908b7a45 100644
--- a/man/PaulaTb3.12.Rd
+++ b/man/PaulaTb3.12.Rd
@@ -8,22 +8,22 @@
 \describe{
 
 \item{vol}{Logaritmo do volume de ar inspirado.}
-    
+
 \item{razao}{Logaritmo da razão de ar inspirado.}
 
 \item{resp}{Ocorrência ou não de compressão de vaso (ocorrência = 1
    e ausência = 0).}
-    
+
 }}
 \source{
-Paula, G. A. (2004). Modelos de regressão: com apoio computacional. 
+Paula, G. A. (2004). Modelos de regressão: com apoio computacional.
    São Paulo, SP: IME-USP. (Tb 3.12 pág. 227)
 }
 \description{
-Dados de um experimento desenvolvido para 
+Dados de um experimento desenvolvido para
    avaliar a influência da quantidade de ar inspirado na ocorrência
    de vaso-constrição na pele dos dedos da mão.  A resposta é a ocorrência
-   (1) ou ausência (0) de compressão de vasos e as covariáveis são o 
+   (1) ou ausência (0) de compressão de vasos e as covariáveis são o
    volume e a razão de ar inspirado.
 }
 \examples{
@@ -34,18 +34,18 @@ data(PaulaTb3.12)
 
 str(PaulaTb3.12)
 
-bwplot(vol ~ resp,  data = PaulaTb3.12, 
+bwplot(vol ~ resp,  data = PaulaTb3.12,
        type=c("p","a"),
        xlab="Vaso-constrição", ylab="Volume de ar inspirado",
-       scales=list(x=list(labels=c("Ausência","Ocorrência"))), 
+       scales=list(x=list(labels=c("Ausência","Ocorrência"))),
        main="Ocorrência de vaso-constrição")
 
-bwplot(razao ~ resp,  data = PaulaTb3.12, 
+bwplot(razao ~ resp,  data = PaulaTb3.12,
        type=c("p","a"),
        xlab=" Vaso-constrição", ylab="Razão de ar inspirado",
-       scales=list(x=list(labels=c("Ausência","Ocorrência"))), 
+       scales=list(x=list(labels=c("Ausência","Ocorrência"))),
      main="Ocorrência de vaso-constrição")
 }
-\keyword{GLM}
+\keyword{MLG}
 \keyword{binarios}
 
diff --git a/man/PaulaTb3.20.Rd b/man/PaulaTb3.20.Rd
index 3a698214..eec0c353 100644
--- a/man/PaulaTb3.20.Rd
+++ b/man/PaulaTb3.20.Rd
@@ -8,7 +8,7 @@
 \describe{
 
 \item{mortos}{Número de insetos mortos.}
-    
+
 \item{exp}{Número de insetos expostos aos inseticidas.}
 
 \item{dose}{Dose aplicada dos inseticidas.}
@@ -17,7 +17,7 @@
 
 }}
 \source{
-Paula, G. A. (2004). Modelos de regressão: com apoio computacional. 
+Paula, G. A. (2004). Modelos de regressão: com apoio computacional.
    São Paulo, SP: IME-USP. (Tb 3.20 pág. 246)
 }
 \description{
@@ -35,9 +35,9 @@ str(PaulaTb3.20)
 
 xyplot(mortos/(sum(mortos)) ~ dose,  data = PaulaTb3.20, auto.key = TRUE,
          type = c("p","a"), groups= inset,
-         xlab = "Dose de inseticida aplicada", 
-         ylab = "Proporção de insetos mortos", 
+         xlab = "Dose de inseticida aplicada",
+         ylab = "Proporção de insetos mortos",
          main = "Aplicações de inseticidas")
 }
-\keyword{GLM}
+\keyword{MLG}
 
diff --git a/man/PaulaTb3.21.Rd b/man/PaulaTb3.21.Rd
index a9600e5e..2735b5ae 100644
--- a/man/PaulaTb3.21.Rd
+++ b/man/PaulaTb3.21.Rd
@@ -20,8 +20,8 @@ Paula, G. A. (2004). Modelos de regressão: com apoio
     computacional. São Paulo, SP: IME-USP. (Tb 3.21, pág. 257)
 }
 \description{
-Experimento com duas espécies de *rotifers*, um tipo  
-    microscópio de invertebrado aquático. São apresentados pra cada 
+Experimento com duas espécies de *rotifers*, um tipo
+    microscópio de invertebrado aquático. São apresentados pra cada
     espécie a densidade relativa da substância, o número de *rotifers*
     expostos e o número de *rotifers* em suspensão.
 }
diff --git a/man/PaulaTb4.2.Rd b/man/PaulaTb4.2.Rd
index 23fbae7f..fdeb773b 100644
--- a/man/PaulaTb4.2.Rd
+++ b/man/PaulaTb4.2.Rd
@@ -9,7 +9,7 @@
 \item{\code{nmortes}}{Número de casos de morte por câncer de
     pulmão.}
 
-\item{\code{tpessoas}}{Total de anos de exposição (somado para toda a 
+\item{\code{tpessoas}}{Total de anos de exposição (somado para toda a
     amostra).}
 
 \item{\code{cmdc}}{Consumo médio diário de cigarros, dividido em
diff --git a/man/PaulaTb4.9.Rd b/man/PaulaTb4.9.Rd
index 794c1ceb..6ec206f0 100644
--- a/man/PaulaTb4.9.Rd
+++ b/man/PaulaTb4.9.Rd
@@ -11,7 +11,7 @@
 
 \item{\code{ano}}{Fator com quatro níveis que representa o ano de
     fabricação do navio (entre 1960 e 1964 (\code{60-64}), entre 1965
-    e 1969 (\code{65-69}), entre 1970 e 1974 (\code{70-74}) e 
+    e 1969 (\code{65-69}), entre 1970 e 1974 (\code{70-74}) e
     entre 1975 e 1979 (\code{75-79})).}
 
 \item{\code{peri}}{Fator com dois níveis que representa o período de
diff --git a/man/PimentelEg4.2.Rd b/man/PimentelEg4.2.Rd
index 9807a18e..7d35a0bf 100644
--- a/man/PimentelEg4.2.Rd
+++ b/man/PimentelEg4.2.Rd
@@ -2,7 +2,7 @@
 % Please edit documentation in R/Pimentel.R
 \name{PimentelEg4.2}
 \alias{PimentelEg4.2}
-\title{Alimenta\enc{çã}{ca}o de porcos}
+\title{Alimenta\enc{çã}{ca}o de Porcos}
 \format{Um \code{data.frame} com 20 observações e 2 variáveis, em que
 
 \describe{
@@ -15,8 +15,7 @@
 
 }}
 \source{
-Pimentel-Gomes, F. (2009). Curso de Estatística Experimental
-    (15th ed.). Piracicaba, SP: FEALQ.
+PIMENTEL-GOMES (2009).
 }
 \description{
 Experimento (fictício) de alimentação de porcos em que
diff --git a/man/PimentelEg6.2.Rd b/man/PimentelEg6.2.Rd
index db85a232..29a6818d 100644
--- a/man/PimentelEg6.2.Rd
+++ b/man/PimentelEg6.2.Rd
@@ -2,7 +2,8 @@
 % Please edit documentation in R/Pimentel.R
 \name{PimentelEg6.2}
 \alias{PimentelEg6.2}
-\title{Ensaio de Competi\enc{çã}{ca}o de Variedades de Cana-de-a\enc{çú}{cu}car}
+\title{Ensaio de Competi\enc{çã}{ca}o de Variedades de
+    Cana-de-a\enc{çú}{cu}car}
 \format{Um \code{data.frame} com 25 observações e 4 variáveis, em que
 
 \describe{
@@ -21,8 +22,7 @@
 
 }}
 \source{
-Pimentel-Gomes, F. (2009). Curso de Estatística Experimental
-    (15th ed.). Piracicaba, SP: FEALQ. (Exemplo 6.2, pág. 96)
+PIMENTEL-GOMES (2009), Exemplo 6.2, pág. 96.
 }
 \description{
 Experimento de competição de variedades de
diff --git a/man/PimentelEg7.3.Rd b/man/PimentelEg7.3.Rd
index 948842aa..da4a1bd0 100644
--- a/man/PimentelEg7.3.Rd
+++ b/man/PimentelEg7.3.Rd
@@ -2,7 +2,8 @@
 % Please edit documentation in R/Pimentel.R
 \name{PimentelEg7.3}
 \alias{PimentelEg7.3}
-\title{Experimento Fatorial de Aduba\enc{çã}{ca}o Mineral e com Vinha\enc{ç}{c}a}
+\title{Experimento Fatorial de Aduba\enc{çã}{ca}o Mineral e com
+    Vinha\enc{ç}{c}a}
 \format{Um \code{data.frame} com 16 observações e 4 variáveis, em que
 
 \describe{
@@ -22,8 +23,7 @@
 
 }}
 \source{
-Pimentel-Gomes, F. (2009). Curso de Estatística Experimental
-    (15th ed.). Piracicaba, SP: FEALQ. (Exemplo 7.3, pág. 119)
+PIMENTEL-GOMES (2009), Exemplo 7.3, pág. 119.
 }
 \description{
 Experimento fatorial, \eqn{2^{2}}, em que os fatores
diff --git a/man/PimentelEg7.4.Rd b/man/PimentelEg7.4.Rd
index ebfc999d..c8fdcb4d 100644
--- a/man/PimentelEg7.4.Rd
+++ b/man/PimentelEg7.4.Rd
@@ -2,7 +2,8 @@
 % Please edit documentation in R/Pimentel.R
 \name{PimentelEg7.4}
 \alias{PimentelEg7.4}
-\title{Experimento de Aduba\enc{çã}{ca}o com Torta de Filtro e Adubo Mineral}
+\title{Experimento de Aduba\enc{çã}{ca}o com Torta de Filtro e Adubo
+    Mineral}
 \format{Um \code{data.frame} com 16 observações e 4 variáveis, em que
 
 \describe{
@@ -24,8 +25,7 @@
 
 }}
 \source{
-Pimentel-Gomes, F. (2009). Curso de Estatística Experimental
-    (15th ed.). Piracicaba, SP: FEALQ. (Exemplo 7.4, pág. 120)
+PIMENTEL-GOMES (2009), Exemplo 7.4, pág. 120.
 }
 \description{
 Experimento fatorial 2\eqn{^{2}} em que os fatores eram
diff --git a/man/PimentelEx5.8.4.Rd b/man/PimentelEx5.8.4.Rd
index 7513b5bf..7f17560b 100644
--- a/man/PimentelEx5.8.4.Rd
+++ b/man/PimentelEx5.8.4.Rd
@@ -2,7 +2,8 @@
 % Please edit documentation in R/Pimentel.R
 \name{PimentelEx5.8.4}
 \alias{PimentelEx5.8.4}
-\title{Dados de Produ\enc{çã}{ca}o de Cana-planta em Ensaio de Variedades}
+\title{Dados de Produ\enc{çã}{ca}o de Cana-planta em Ensaio de
+    Variedades}
 \format{Um \code{data.frame} com 28 observações e 3 variáveis, em que
 
 \describe{
@@ -12,13 +13,12 @@
 
 \item{\code{variedade}}{Fator de 7 níveis qualitativos, que são as
     variedades cana-de-açúcar.}
-    
+
 \item{\code{prod}}{Dados de produção de cana-planta.}
 
 }}
 \source{
-Pimentel-Gomes, F. (2009). Curso de Estatística Experimental
-    (15th ed.). Piracicaba, SP: FEALQ.
+PIMENTEL-GOMES (2009).
 }
 \description{
 Experimento em blocos casualizados realizado pela
diff --git a/man/PimentelEx5.8.5.Rd b/man/PimentelEx5.8.5.Rd
index 58ecd069..63ea7ae4 100644
--- a/man/PimentelEx5.8.5.Rd
+++ b/man/PimentelEx5.8.5.Rd
@@ -12,13 +12,12 @@
 
 \item{\code{variedade}}{Fator de 6 níveis qualitativos, que são os
     diferentes tipos de mandioca.}
-    
+
 \item{\code{prod}}{Produção de mandioca, em t ha\eqn{^{-1}}.}
 
 }}
 \source{
-Pimentel-Gomes, F. (2009). Curso de Estatística Experimental
-    (15th ed.). Piracicaba, SP: FEALQ.
+PIMENTEL-GOMES (2009).
 }
 \description{
 Experimento em blocos ao acaso, realizado pelo Instituto
diff --git a/man/PimentelEx6.6.3.Rd b/man/PimentelEx6.6.3.Rd
index baa9671c..8140bf22 100644
--- a/man/PimentelEx6.6.3.Rd
+++ b/man/PimentelEx6.6.3.Rd
@@ -2,7 +2,8 @@
 % Please edit documentation in R/Pimentel.R
 \name{PimentelEx6.6.3}
 \alias{PimentelEx6.6.3}
-\title{Efeito da Idade de Castra\enc{çã}{ca}o no Ganho de Peso de Su\enc{í}{i}nos}
+\title{Efeito da Idade de Castra\enc{çã}{ca}o no Ganho de Peso de
+    Su\enc{í}{i}nos}
 \format{Um \code{data.frame} com 16 observações e 4 variáveis, em que
 
 \describe{
@@ -24,8 +25,7 @@
 
 }}
 \source{
-Pimentel-Gomes, F. (2009). Curso de Estatística Experimental
-    (15th ed.). Piracicaba, SP: FEALQ. (Exercício 6.6.3, página 110)
+PIMENTEL-GOMES (2009), Exercício 6.6.3, página 110.
 }
 \description{
 Ensaio de alimentação de suínos, no qual foi usado um
diff --git a/man/PimentelPg142.Rd b/man/PimentelPg142.Rd
index 44d26d90..dd3c022b 100644
--- a/man/PimentelPg142.Rd
+++ b/man/PimentelPg142.Rd
@@ -2,7 +2,8 @@
 % Please edit documentation in R/Pimentel.R
 \name{PimentelPg142}
 \alias{PimentelPg142}
-\title{Grupo de Experimentos Fatoriais de Aduba\enc{çã}{ca}o de Algod\enc{ã}{a}o}
+\title{Grupo de Experimentos Fatoriais de Aduba\enc{çã}{ca}o de
+    Algod\enc{ã}{a}o}
 \format{Um \code{data.frame} com 100 observações e 6 variáveis, em
     que
 
@@ -32,8 +33,7 @@
 
 }}
 \source{
-Pimentel-Gomes, F. (2009). Curso de Estatística Experimental
-    (15th ed.). Piracicaba, SP: FEALQ. (Página 142)
+PIMENTEL-GOMES (2009), página 142.
 }
 \description{
 Grupo de experimentos de adubação de algodão, todos em
diff --git a/man/PimentelPg267.Rd b/man/PimentelPg267.Rd
index 71083216..f209d261 100644
--- a/man/PimentelPg267.Rd
+++ b/man/PimentelPg267.Rd
@@ -2,7 +2,8 @@
 % Please edit documentation in R/Pimentel.R
 \name{PimentelPg267}
 \alias{PimentelPg267}
-\title{Percentual de Sorgo na Ra\enc{çã}{ca}o para Desenvolvimento de Pintos}
+\title{Percentual de Sorgo na Ra\enc{çã}{ca}o para Desenvolvimento de
+    Pintos}
 \format{Um \code{data.frame} com 16 observações e 4 variáveis, em que
 
 \describe{
diff --git a/man/PimentelPg269.Rd b/man/PimentelPg269.Rd
index a58c5776..20205c5d 100644
--- a/man/PimentelPg269.Rd
+++ b/man/PimentelPg269.Rd
@@ -2,7 +2,8 @@
 % Please edit documentation in R/Pimentel.R
 \name{PimentelPg269}
 \alias{PimentelPg269}
-\title{Influ\enc{ê}{e}ncia da Case\enc{í}{i}na Iodada na Nutri\enc{çã}{ca}o de Vacas Leiteiras}
+\title{Influ\enc{ê}{e}ncia da Case\enc{í}{i}na Iodada na
+    Nutri\enc{çã}{ca}o de Vacas Leiteiras}
 \format{Um \code{data.frame} com 12 observações e 3 variáveis, em que
 
 \describe{
@@ -20,10 +21,9 @@
 
 A observação da testemunha (0 de caseina) no bloco 3 foi perdida. O
     valor correspondente foi estimado por métodos de imputação de
-    parcela perdida discutido na seção 5.4 de Pimentel-Gomes (2009).}
+    parcela perdida discutido na seção 5.4 de PIMENTEL-GOMES (2009).}
 \source{
-Pimentel-Gomes, F. (2009). Curso de Estatística Experimental
-    (15th ed.). Piracicaba, SP: FEALQ. (Página 269)
+PIMENTEL-GOMES (2009), página 269.
 }
 \description{
 Ensaio realizado pelo Departamento de Produção Animal da
diff --git a/man/PimentelPg382.Rd b/man/PimentelPg382.Rd
index 094f7e84..99fc1d99 100644
--- a/man/PimentelPg382.Rd
+++ b/man/PimentelPg382.Rd
@@ -19,8 +19,7 @@
 
 }}
 \source{
-Pimentel-Gomes, F. (2009). Curso de Estatística Experimental
-    (15th ed.). Piracicaba, SP: FEALQ. (Página 382)
+PIMENTEL-GOMES (2009), página 382.
 }
 \description{
 Experimento com 3 métodos de enxertia em que haviam 200
diff --git a/man/PimentelPg72.Rd b/man/PimentelPg72.Rd
index 6f6007b9..2bc8654e 100644
--- a/man/PimentelPg72.Rd
+++ b/man/PimentelPg72.Rd
@@ -7,16 +7,15 @@
 
 \describe{
 
-\item{\code{feno}}{Fator de 2 níveis qualitativos, que são os diferentes
-    tipos de feno.}
+\item{\code{feno}}{Fator de 2 níveis qualitativos, que são os
+    diferentes tipos de feno.}
 
 \item{\code{ganhopeso}}{Aumento do peso das leitoas, observado em
     quilogramas.}
 
 }}
 \source{
-Pimentel-Gomes, F. (2009). Curso de Estatística Experimental
-    (15th ed.). Piracicaba, SP: FEALQ.
+PIMENTEL-GOMES (2009).
 }
 \description{
 Experimento realizado pelos técnicos Manoel Becker, Luís
diff --git a/man/PimentelPg91.Rd b/man/PimentelPg91.Rd
index ad93e210..ed414d43 100644
--- a/man/PimentelPg91.Rd
+++ b/man/PimentelPg91.Rd
@@ -12,14 +12,13 @@
 
 \item{\code{bloco}}{Fator de 6 níveis qualitativos, usado para
     controle local.}
-    
+
 \item{\code{prod}}{Produção de milho, em kg por parcela de
     200\eqn{m^{2}}.}
 
 }}
 \source{
-Pimentel-Gomes, F. (2009). Curso de Estatística Experimental
-    (15th ed.). Piracicaba, SP: FEALQ.
+PIMENTEL-GOMES (2009).
 }
 \description{
 Experimento em blocos casualizados realizado pelo
diff --git a/man/PimentelTb10.3.1.Rd b/man/PimentelTb10.3.1.Rd
index 2919a9c9..202decfe 100644
--- a/man/PimentelTb10.3.1.Rd
+++ b/man/PimentelTb10.3.1.Rd
@@ -22,8 +22,7 @@
 
 }}
 \source{
-Pimentel-Gomes, F. (2009). Curso de Estatística Experimental
-    (15th ed.). Piracicaba, SP: FEALQ. (Tabela 10.3.1, pág. 190)
+PIMENTEL-GOMES (2009), Tabela 10.3.1, pág. 190.
 }
 \description{
 Experimento em blocos imcompletos equilibrados, no qual
diff --git a/man/PimentelTb10.4.1.Rd b/man/PimentelTb10.4.1.Rd
index ad561d82..91917efb 100644
--- a/man/PimentelTb10.4.1.Rd
+++ b/man/PimentelTb10.4.1.Rd
@@ -21,8 +21,7 @@
 
 }}
 \source{
-Pimentel-Gomes, F. (2009). Curso de Estatística Experimental
-    (15th ed.). Piracicaba, SP: FEALQ. (Tabela 10.4.1, pág. 192)
+PIMENTEL-GOMES (2009), Tabela 10.4.1, pág. 192.
 }
 \description{
 Experimento em blocos imcompletos equilibrados, no qual
diff --git a/man/PimentelTb10.6.1.Rd b/man/PimentelTb10.6.1.Rd
index 3459ea59..6e7d2076 100644
--- a/man/PimentelTb10.6.1.Rd
+++ b/man/PimentelTb10.6.1.Rd
@@ -2,8 +2,8 @@
 % Please edit documentation in R/Pimentel.R
 \name{PimentelTb10.6.1}
 \alias{PimentelTb10.6.1}
-\title{Experimento do Tipo III com recupera\enc{çã}{ca}o da informa\enc{çã}{ca}o
-    interblocos}
+\title{Experimento do Tipo III com recupera\enc{çã}{ca}o da
+    informa\enc{çã}{ca}o interblocos}
 \format{Um \code{data.frame} com 52 observações e 3 variáveis, em que
 
 \describe{
diff --git a/man/PimentelTb11.3.1.Rd b/man/PimentelTb11.3.1.Rd
index 286e9cee..f73cad1f 100644
--- a/man/PimentelTb11.3.1.Rd
+++ b/man/PimentelTb11.3.1.Rd
@@ -2,7 +2,8 @@
 % Please edit documentation in R/Pimentel.R
 \name{PimentelTb11.3.1}
 \alias{PimentelTb11.3.1}
-\title{Experimento de Produ\enc{çã}{ca}o de Milho em L\enc{á}{a}tice Quadrado}
+\title{Experimento de Produ\enc{çã}{ca}o de Milho em L\enc{á}{a}tice
+    Quadrado}
 \format{Um \code{data.frame} com 48 observações e 4 variáveis, em que
 
 \describe{
diff --git a/man/PimentelTb12.2.1.Rd b/man/PimentelTb12.2.1.Rd
index 61f83270..dd638881 100644
--- a/man/PimentelTb12.2.1.Rd
+++ b/man/PimentelTb12.2.1.Rd
@@ -2,7 +2,8 @@
 % Please edit documentation in R/Pimentel.R
 \name{PimentelTb12.2.1}
 \alias{PimentelTb12.2.1}
-\title{Experimento de Aduba\enc{çã}{ca}o com P\eqn{_2}O\eqn{_5} em Milho}
+\title{Experimento de Aduba\enc{çã}{ca}o com P\eqn{_2}O\eqn{_5} em
+    Milho}
 \format{Um \code{data.frame} com 20 observações e 3 variáveis, em que
 
 \describe{
diff --git a/man/PimentelTb12.3.1.Rd b/man/PimentelTb12.3.1.Rd
index 345c417b..efbf5d34 100644
--- a/man/PimentelTb12.3.1.Rd
+++ b/man/PimentelTb12.3.1.Rd
@@ -15,8 +15,7 @@
 
 }}
 \source{
-Pimentel-Gomes, F. (2009). Curso de Estatística Experimental
-    (15th ed.). Piracicaba, SP: FEALQ. (Tabela 12.3.1, pág. 236)
+PIMENTEL-GOMES (2009), Tabela 12.3.1, pág. 236.
 }
 \description{
 Série de 15 anos das temperaturas máximas médias de
diff --git a/man/PimentelTb12.4.1.Rd b/man/PimentelTb12.4.1.Rd
index 4aa9f836..9d6ed611 100644
--- a/man/PimentelTb12.4.1.Rd
+++ b/man/PimentelTb12.4.1.Rd
@@ -2,7 +2,8 @@
 % Please edit documentation in R/Pimentel.R
 \name{PimentelTb12.4.1}
 \alias{PimentelTb12.4.1}
-\title{Produ\enc{çã}{ca}o de Cana em Fun\enc{çã}{ca}o do Teor de K do Solo}
+\title{Produ\enc{çã}{ca}o de Cana em Fun\enc{çã}{ca}o do Teor de K do
+    Solo}
 \format{Um \code{data.frame} com 15 observações e 2 variáveis, em que
 
 \describe{
@@ -14,8 +15,7 @@
 
 }}
 \source{
-Pimentel-Gomes, F. (2009). Curso de Estatística Experimental
-    (15th ed.). Piracicaba, SP: FEALQ. (Tabela 12.4.1, pág. 238)
+PIMENTEL-GOMES (2009), Tabela 12.4.1, pág. 238.
 }
 \description{
 Experimento de produção de cana-de-açúcar em função do
diff --git a/man/PimentelTb13.5.1.Rd b/man/PimentelTb13.5.1.Rd
index d1dfd363..3a5e1fdf 100644
--- a/man/PimentelTb13.5.1.Rd
+++ b/man/PimentelTb13.5.1.Rd
@@ -2,7 +2,8 @@
 % Please edit documentation in R/Pimentel.R
 \name{PimentelTb13.5.1}
 \alias{PimentelTb13.5.1}
-\title{Grupo de Experimentos de Aduba\enc{çã}{ca}o de Cana-de-a\enc{çú}{cu}car}
+\title{Grupo de Experimentos de Aduba\enc{çã}{ca}o de
+    Cana-de-a\enc{çú}{cu}car}
 \format{Um \code{data.frame} com 228 observações e 4 variáveis, em
     que
 
@@ -22,8 +23,7 @@
 
 }}
 \source{
-Pimentel-Gomes, F. (2009). Curso de Estatística Experimental
-    (15th ed.). Piracicaba, SP: FEALQ. (Tabela 13.5.1, pág. 259)
+PIMENTEL-GOMES (2009), Tabela 13.5.1, pág. 259.
 }
 \description{
 Conjunto de 38 ensaios fatoriais de \eqn{3^{3}} com N, P
diff --git a/man/PimentelTb14.4.1.Rd b/man/PimentelTb14.4.1.Rd
index ab692a8d..c3de87d0 100644
--- a/man/PimentelTb14.4.1.Rd
+++ b/man/PimentelTb14.4.1.Rd
@@ -2,7 +2,8 @@
 % Please edit documentation in R/Pimentel.R
 \name{PimentelTb14.4.1}
 \alias{PimentelTb14.4.1}
-\title{Produ\enc{çã}{ca}o de Leite em um Ensaio de Alimenta\enc{çã}{ca}o de Vacas}
+\title{Produ\enc{çã}{ca}o de Leite em um Ensaio de
+    Alimenta\enc{çã}{ca}o de Vacas}
 \format{Um \code{data.frame} com 36 observações e 5 variáveis, em que
 
 \describe{
@@ -26,8 +27,7 @@ utilizado como linhas do quadrado latino de 3 \eqn{\times} 3. Ao todo
 
 }}
 \source{
-Pimentel-Gomes, F. (2009). Curso de Estatística Experimental
-    (15th ed.). Piracicaba, SP: FEALQ. (Tabela 14.4.1, pág. 272)
+PIMENTEL-GOMES (2009), Tabela 14.4.1, pág. 272.
 }
 \description{
 Experimento de nutrição de vacas, conduzido em períodos
@@ -55,5 +55,5 @@ xyplot(prod ~ trat,
        xlab = "Tratamento de alimentação")
 
 }
-\keyword{SQL}
+\keyword{DQL}
 
diff --git a/man/PimentelTb14.5.1.Rd b/man/PimentelTb14.5.1.Rd
index 07e4dd03..3152170f 100644
--- a/man/PimentelTb14.5.1.Rd
+++ b/man/PimentelTb14.5.1.Rd
@@ -27,8 +27,7 @@
 
 }}
 \source{
-Pimentel-Gomes, F. (2009). Curso de Estatística Experimental
-    (15th ed.). Piracicaba, SP: FEALQ. (Tabela 14.5.1, pág. 278)
+PIMENTEL-GOMES (2009), Tabela 14.5.1, pág. 278.
 }
 \description{
 Experimento de reversão (switch-back) avaliando a
diff --git a/man/PimentelTb14.7.1.Rd b/man/PimentelTb14.7.1.Rd
index 36205ca2..b3e5d56d 100644
--- a/man/PimentelTb14.7.1.Rd
+++ b/man/PimentelTb14.7.1.Rd
@@ -23,8 +23,7 @@
 
 }}
 \source{
-Pimentel-Gomes, F. (2009). Curso de Estatística Experimental
-    (15th ed.). Piracicaba, SP: FEALQ. (Tabela 14.7.1, pág. 283)
+PIMENTEL-GOMES (2009), Tabela 14.7.1, pág. 283.
 
 Pimentel-Gomes, F.; Nunes, S. G.; Gomes, M. de B; Curvo,
     J. B. E. Modificação na análise de variância de ensaions de
diff --git a/man/PimentelTb16.2.1.Rd b/man/PimentelTb16.2.1.Rd
index a7398efd..582b3254 100644
--- a/man/PimentelTb16.2.1.Rd
+++ b/man/PimentelTb16.2.1.Rd
@@ -21,8 +21,7 @@
 
 }}
 \source{
-Pimentel-Gomes, F. (2009). Curso de Estatística Experimental
-    (15th ed.). Piracicaba, SP: FEALQ. (Tabela 16.2.1, pág. 300)
+PIMENTEL-GOMES (2009), Tabela 16.2.1, pág. 300.
 }
 \description{
 Ensaio de controle de pragas do feijoeiro, realizado
diff --git a/man/PimentelTb16.3.1.Rd b/man/PimentelTb16.3.1.Rd
index ca170377..91722544 100644
--- a/man/PimentelTb16.3.1.Rd
+++ b/man/PimentelTb16.3.1.Rd
@@ -2,7 +2,8 @@
 % Please edit documentation in R/Pimentel.R
 \name{PimentelTb16.3.1}
 \alias{PimentelTb16.3.1}
-\title{Suscetibilidade de Variedades de Soja ao Ataque de Nemat\enc{ó}{o}ides}
+\title{Suscetibilidade de Variedades de Soja ao Ataque de
+    Nemat\enc{ó}{o}ides}
 \format{Um \code{data.frame} com 60 observações e 4 variáveis, em que
 
 \describe{
@@ -21,8 +22,7 @@
 
 }}
 \source{
-Pimentel-Gomes, F. (2009). Curso de Estatística Experimental
-    (15th ed.). Piracicaba, SP: FEALQ. (Tabela 16.3.1, pág. 306)
+PIMENTEL-GOMES (2009), Tabela 16.3.1, pág. 306.
 }
 \description{
 Experimento de Arruda (1952), em blocos casualizados, em
diff --git a/man/PimentelTb17.3.1.Rd b/man/PimentelTb17.3.1.Rd
index 80a48449..dac2cb26 100644
--- a/man/PimentelTb17.3.1.Rd
+++ b/man/PimentelTb17.3.1.Rd
@@ -22,8 +22,7 @@
 
 }}
 \source{
-Pimentel-Gomes, F. (2009). Curso de Estatística Experimental
-    (15th ed.). Piracicaba, SP: FEALQ. (Tabela 17.3.1, pág. 317)
+PIMENTEL-GOMES (2009), Tabela 17.3.1, pág. 317.
 }
 \description{
 Grupo de dois experimentos com espécies de eucaliptos
diff --git a/man/PimentelTb17.4.1.Rd b/man/PimentelTb17.4.1.Rd
index 135a3538..b0165794 100644
--- a/man/PimentelTb17.4.1.Rd
+++ b/man/PimentelTb17.4.1.Rd
@@ -20,8 +20,7 @@
 
 }}
 \source{
-Pimentel-Gomes, F. (2009). Curso de Estatística Experimental
-    (15th ed.). Piracicaba, SP: FEALQ. (Tabela 17.4.1, pág. 322)
+PIMENTEL-GOMES (2009), Tabela 17.4.1, pág. 322.
 }
 \description{
 Grupo de dois ensaios com variedades de cana-de-açúcar,
diff --git a/man/PimentelTb18.2.1.Rd b/man/PimentelTb18.2.1.Rd
index 5e7dd779..d650001e 100644
--- a/man/PimentelTb18.2.1.Rd
+++ b/man/PimentelTb18.2.1.Rd
@@ -2,8 +2,8 @@
 % Please edit documentation in R/Pimentel.R
 \name{PimentelTb18.2.1}
 \alias{PimentelTb18.2.1}
-\title{Ensaio Fatorial com Tratamentos Adicionais de Aduba\enc{çã}{ca}o de
-    Milho}
+\title{Ensaio Fatorial com Tratamentos Adicionais de
+    Aduba\enc{çã}{ca}o de Milho}
 \format{Um \code{data.frame} com 42 observações e 8 variáveis, em que
 
 \describe{
@@ -38,8 +38,7 @@
 
 }}
 \source{
-Pimentel-Gomes, F. (2009). Curso de Estatística Experimental
-    (15th ed.). Piracicaba, SP: FEALQ. (Tabela 18.2.1, pág. 330)
+PIMENTEL-GOMES (2009), Tabela 18.2.1, pág. 330.
 }
 \description{
 Ensaio de adubação NPK de milho, fatorial de
diff --git a/man/PimentelTb20.2.1.Rd b/man/PimentelTb20.2.1.Rd
index 885d3a69..5d6da647 100644
--- a/man/PimentelTb20.2.1.Rd
+++ b/man/PimentelTb20.2.1.Rd
@@ -18,8 +18,7 @@
 
 }}
 \source{
-Pimentel-Gomes, F. (2009). Curso de Estatística Experimental
-    (15th ed.). Piracicaba, SP: FEALQ. (Tabela 20.2.1, pág. 369)
+PIMENTEL-GOMES (2009), Tabela 20.2.1, pág. 369.
 }
 \description{
 Ensaio fatorial, de \eqn{3^{2}}, de adubação de
diff --git a/man/PimentelTb21.5.1.Rd b/man/PimentelTb21.5.1.Rd
index 3d0fe035..43203402 100644
--- a/man/PimentelTb21.5.1.Rd
+++ b/man/PimentelTb21.5.1.Rd
@@ -15,8 +15,7 @@
 
 }}
 \source{
-Pimentel-Gomes, F. (2009). Curso de Estatística Experimental
-    (15th ed.). Piracicaba, SP: FEALQ. (Tabela 21.5.1, pág. 384)
+PIMENTEL-GOMES (2009), Tabela 21.5.1, pág. 384.
 }
 \description{
 Ensaio inteiramente casualizado para avaliar a
diff --git a/man/PimentelTb5.3.1.Rd b/man/PimentelTb5.3.1.Rd
index b108ac18..e64f0128 100644
--- a/man/PimentelTb5.3.1.Rd
+++ b/man/PimentelTb5.3.1.Rd
@@ -19,8 +19,7 @@
 
 }}
 \source{
-Pimentel-Gomes, F. (2009). Curso de Estatística Experimental
-    (15th ed.). Piracicaba, SP: FEALQ.
+PIMENTEL-GOMES (2009).
 }
 \description{
 Pesquisa sobre o efeito do óleo de milho no teor de
diff --git a/man/PimentelTb6.3.1.Rd b/man/PimentelTb6.3.1.Rd
index dbb04d6b..c978e8c8 100644
--- a/man/PimentelTb6.3.1.Rd
+++ b/man/PimentelTb6.3.1.Rd
@@ -2,7 +2,8 @@
 % Please edit documentation in R/Pimentel.R
 \name{PimentelTb6.3.1}
 \alias{PimentelTb6.3.1}
-\title{Experimento de Aduba\enc{çã}{ca}o Mineral e Verde em Cana-de-a\enc{çú}{cu}car}
+\title{Experimento de Aduba\enc{çã}{ca}o Mineral e Verde em
+    Cana-de-a\enc{çú}{cu}car}
 \format{Um \code{data.frame} com 36 observações e 4 variáveis, em que
 
 \describe{
@@ -27,8 +28,7 @@
 
 }}
 \source{
-Pimentel-Gomes, F. (2009). Curso de Estatística Experimental
-    (15th ed.). Piracicaba, SP: FEALQ. (Tabela 6.3.1, página 99)
+PIMENTEL-GOMES (2009), Tabela 6.3.1, página 99.
 }
 \description{
 Experimento de adubação de cana da Usina Monte Alegre,
diff --git a/man/PimentelTb7.2.1.Rd b/man/PimentelTb7.2.1.Rd
index 04d95d9c..a48d31ea 100644
--- a/man/PimentelTb7.2.1.Rd
+++ b/man/PimentelTb7.2.1.Rd
@@ -2,7 +2,8 @@
 % Please edit documentation in R/Pimentel.R
 \name{PimentelTb7.2.1}
 \alias{PimentelTb7.2.1}
-\title{Experimento Fatorial Sobre Aduba\enc{çã}{ca}o NPK na Produ\enc{çã}{ca}o de Milho}
+\title{Experimento Fatorial Sobre Aduba\enc{çã}{ca}o NPK na
+    Produ\enc{çã}{ca}o de Milho}
 \format{Um \code{data.frame} com 32 observações e 5 variáveis, em que
 
 \describe{
@@ -23,8 +24,7 @@
 
 }}
 \source{
-Pimentel-Gomes, F. (2009). Curso de Estatística Experimental
-    (15th ed.). Piracicaba, SP: FEALQ. (Tabela 7.2.1, página 115)
+PIMENTEL-GOMES (2009), Tabela 7.2.1, página 115.
 }
 \description{
 Resultados da produção de milho em um experimento
diff --git a/man/PimentelTb7.6.1.Rd b/man/PimentelTb7.6.1.Rd
index cf0d2013..621d8e0d 100644
--- a/man/PimentelTb7.6.1.Rd
+++ b/man/PimentelTb7.6.1.Rd
@@ -2,8 +2,8 @@
 % Please edit documentation in R/Pimentel.R
 \name{PimentelTb7.6.1}
 \alias{PimentelTb7.6.1}
-\title{Experimento Fatorial Com Confunfimento de Aduba\enc{çã}{ca}o em
-    Cana-de-a\enc{çú}{cu}car}
+\title{Experimento Fatorial Com Confunfimento de Aduba\enc{çã}{ca}o
+    em Cana-de-a\enc{çú}{cu}car}
 \format{Um \code{data.frame} com 54 observações e 6 variáveis, em que
 
 \describe{
@@ -28,8 +28,7 @@
 
 }}
 \source{
-Pimentel-Gomes, F. (2009). Curso de Estatística Experimental
-    (15th ed.). Piracicaba, SP: FEALQ. (Tabela 7.6.1, pág. 126)
+PIMENTEL-GOMES (2009), Tabela 7.6.1, pág. 126.
 
 Straus, F. Esperimentos de adubação na zona canavieira de
     Pernambuco. In: Terceira Reunião Brasileira de Ciência do
diff --git a/man/PimentelTb7.8.1.Rd b/man/PimentelTb7.8.1.Rd
index fcdd20c2..12ede0fc 100644
--- a/man/PimentelTb7.8.1.Rd
+++ b/man/PimentelTb7.8.1.Rd
@@ -2,7 +2,8 @@
 % Please edit documentation in R/Pimentel.R
 \name{PimentelTb7.8.1}
 \alias{PimentelTb7.8.1}
-\title{Acidez de Variedades de Mangas em Fun\enc{çã}{ca}o da \enc{É}{E}poca}
+\title{Acidez de Variedades de Mangas em Fun\enc{çã}{ca}o da
+    \enc{É}{E}poca}
 \format{Um \code{data.frame} com 54 observações e 4 variáveis, em que
 
 \describe{
diff --git a/man/PimentelTb8.3.1.Rd b/man/PimentelTb8.3.1.Rd
index b11e8086..02397805 100644
--- a/man/PimentelTb8.3.1.Rd
+++ b/man/PimentelTb8.3.1.Rd
@@ -2,7 +2,8 @@
 % Please edit documentation in R/Pimentel.R
 \name{PimentelTb8.3.1}
 \alias{PimentelTb8.3.1}
-\title{Grupo de Ensaios de Batatinha na Prov\enc{í}{i}ncia de Buenos Aires}
+\title{Grupo de Ensaios de Batatinha na Prov\enc{í}{i}ncia de Buenos
+    Aires}
 \format{Um \code{data.frame} com 56 observações e 3 variáveis, em que
 
 \describe{
@@ -26,8 +27,7 @@ O atributo \code{qmr} é um vetor com os quadrados médios residuais da
     dados individuais está em \code{\link{PimentelEg5.2}}, que
     refere-se ao experimento número 3 com todas as observações.}
 \source{
-Pimentel-Gomes, F. (2009). Curso de Estatística Experimental
-    (15th ed.). Piracicaba, SP: FEALQ. (Tabela 8.3.1, pág. 147)
+PIMENTEL-GOMES (2009), Tabela 8.3.1, pág. 147.
 }
 \description{
 Grupo de ensaios de competição de variedades de
diff --git a/man/PimentelTb9.2.1.Rd b/man/PimentelTb9.2.1.Rd
index d8c6036d..b8e819c5 100644
--- a/man/PimentelTb9.2.1.Rd
+++ b/man/PimentelTb9.2.1.Rd
@@ -22,8 +22,7 @@
 
 }}
 \source{
-Pimentel-Gomes, F. (2009). Curso de Estatística Experimental
-    (15th ed.). Piracicaba, SP: FEALQ. (Tabela 9.2.1, pág. 166)
+PIMENTEL-GOMES (2009), Tabela 9.2.1, pág. 166.
 }
 \description{
 Experimento com 8 tratamentos (7 adubos verdes e milho)
diff --git a/man/PimentelTb9.3.1.Rd b/man/PimentelTb9.3.1.Rd
index fbe77c53..fb8c51b5 100644
--- a/man/PimentelTb9.3.1.Rd
+++ b/man/PimentelTb9.3.1.Rd
@@ -2,7 +2,8 @@
 % Please edit documentation in R/Pimentel.R
 \name{PimentelTb9.3.1}
 \alias{PimentelTb9.3.1}
-\title{Experimento de Aduba\enc{çã}{ca}o de Variedades de Cana-de-a\enc{çú}{cu}car}
+\title{Experimento de Aduba\enc{çã}{ca}o de Variedades de
+    Cana-de-a\enc{çú}{cu}car}
 \format{Um \code{data.frame} com 50 observações e 5 variáveis, em que
 
 \describe{
diff --git a/man/PimentelTb9.4.1.Rd b/man/PimentelTb9.4.1.Rd
index 74be5d9c..57bab13f 100644
--- a/man/PimentelTb9.4.1.Rd
+++ b/man/PimentelTb9.4.1.Rd
@@ -18,8 +18,7 @@
 
 }}
 \source{
-Pimentel-Gomes, F. (2009). Curso de Estatística Experimental
-    (15th ed.). Piracicaba, SP: FEALQ. (Tabela 9.4.1, pág. 175)
+PIMENTEL-GOMES (2009), Tabela 9.4.1, pág. 175.
 }
 \description{
 Experimento que mediu o grau brix de frutos de 5
diff --git a/man/RamalhoEg11.10.Rd b/man/RamalhoEg11.10.Rd
index 6874ce24..84499da1 100644
--- a/man/RamalhoEg11.10.Rd
+++ b/man/RamalhoEg11.10.Rd
@@ -20,13 +20,11 @@
 
 }}
 \source{
-Ramalho, M. A. P., Ferreira, D. F., Oliveira, A. C. (2005).
-    Experimentação em Genética e Melhoramento de Plantas (2th ed.).
-    Lavras: UFLA. (pág. 181)
+RAMALHO et al. (2005), pág. 181.
 }
 \description{
-Experimento da avaliação da produção de 40 cultivares de sorgo
-    conduzido no delineamento alfa-látice.
+Experimento da avaliação da produção de 40 cultivares de
+    sorgo conduzido no delineamento alfa-látice.
 }
 \examples{
 
diff --git a/man/RamalhoEg11.13.Rd b/man/RamalhoEg11.13.Rd
index 6015c119..01dd0593 100644
--- a/man/RamalhoEg11.13.Rd
+++ b/man/RamalhoEg11.13.Rd
@@ -2,7 +2,8 @@
 % Please edit documentation in R/Ramalho.R
 \name{RamalhoEg11.13}
 \alias{RamalhoEg11.13}
-\title{Produ\enc{çã}{ca}o de Gr\enc{ã}{a}os de Milho em Diferentes Popula\enc{çõ}{co}es}
+\title{Produ\enc{çã}{ca}o de Gr\enc{ã}{a}os de Milho em Diferentes
+    Popula\enc{çõ}{co}es}
 \format{Um \code{data.frame} com 48 observações e 4 variáveis, em que
 
 \describe{
@@ -20,9 +21,7 @@
 
 }}
 \source{
-Ramalho, M. A. P., Ferreira, D. F., Oliveira, A. C. (2005).
-    Experimentação em Genética e Melhoramento de Plantas (2th ed.).
-    Lavras: UFLA. (Exemplo 11.13, pág. 188)
+RAMALHO et al. (2005), Exemplo 11.13, pág. 188.
 }
 \description{
 Experimento envolvendo populações de milho no
diff --git a/man/RamalhoEg11.4.Rd b/man/RamalhoEg11.4.Rd
index cc89f8f6..9da24b7d 100644
--- a/man/RamalhoEg11.4.Rd
+++ b/man/RamalhoEg11.4.Rd
@@ -17,9 +17,7 @@
 
 }}
 \source{
-Ramalho, M. A. P., Ferreira, D. F., Oliveira, A. C. (2005).
-    Experimentação em Genética e Melhoramento de Plantas (2th ed.).
-    Lavras: UFLA. (pág. 171)
+RAMALHO et al. (2005), pág. 171.
 }
 \description{
 Experimento conduzido na EMBRAPA Milho e Sorgo em 1997,
diff --git a/man/RamalhoEg12.10.Rd b/man/RamalhoEg12.10.Rd
index a7e5c6b2..a86ddc9a 100644
--- a/man/RamalhoEg12.10.Rd
+++ b/man/RamalhoEg12.10.Rd
@@ -2,7 +2,8 @@
 % Please edit documentation in R/Ramalho.R
 \name{RamalhoEg12.10}
 \alias{RamalhoEg12.10}
-\title{Ensaio Dialelo para o Tempo At\enc{é}{e} o Florescimento do Feijoeiro}
+\title{Ensaio Dialelo para o Tempo At\enc{é}{e} o Florescimento do
+    Feijoeiro}
 \format{Um \code{data.frame} com 9 observações e 3 variáveis, em que
 
 \describe{
@@ -16,9 +17,7 @@
 
 }}
 \source{
-Ramalho, M. A. P., Ferreira, D. F., Oliveira, A. C. (2005).
-    Experimentação em Genética e Melhoramento de Plantas (2th ed.).
-    Lavras: UFLA. (Exemplo 12.10, pág. 227)
+RAMALHO et al. (2005), Exemplo 12.10, pág. 227.
 
     Arriel, E., Ramalho, M. A. P., Pacheco, C. A. P. Expected and
     Realized Gains in the CMS-39 Maize Population after three Cycles
diff --git a/man/RamalhoEg13.2.Rd b/man/RamalhoEg13.2.Rd
index af3cdcf2..2be9840f 100644
--- a/man/RamalhoEg13.2.Rd
+++ b/man/RamalhoEg13.2.Rd
@@ -2,7 +2,8 @@
 % Please edit documentation in R/Ramalho.R
 \name{RamalhoEg13.2}
 \alias{RamalhoEg13.2}
-\title{Produ\enc{çã}{ca}o de Gr\enc{ã}{a}os de Milho em Cons\enc{ó}{o}rcio com Feij\enc{ã}{a}o.}
+\title{Produ\enc{çã}{ca}o de Gr\enc{ã}{a}os de Milho em
+    Cons\enc{ó}{o}rcio com Feij\enc{ã}{a}o.}
 \format{Um \code{data.frame} com 36 observações e 5 variáveis, em que
 
 \describe{
@@ -22,9 +23,7 @@ de milho.}
 
 }}
 \source{
-Ramalho, M. A. P., Ferreira, D. F., Oliveira, A. C. (2005).
-    Experimentação em Genética e Melhoramento de Plantas (2th ed.).
-    Lavras: UFLA. (Exemplo 13.2, pág. 237)
+RAMALHO et al. (2005), Exemplo 13.2, pág. 237.
 
     Rezende, G. D. S. P.; Ramalho, M. A. P. Competitive Ability of
     Maize and Commom Bean (Phaseolus Vulgaris L.) Cultivars
diff --git a/man/RamalhoEg4.3.Rd b/man/RamalhoEg4.3.Rd
index 4b266c68..f32511d6 100644
--- a/man/RamalhoEg4.3.Rd
+++ b/man/RamalhoEg4.3.Rd
@@ -2,7 +2,8 @@
 % Please edit documentation in R/Ramalho.R
 \name{RamalhoEg4.3}
 \alias{RamalhoEg4.3}
-\title{Porcentagem de absor\enc{çã}{ca}o de \enc{á}{a}gua de feij\enc{ã}{a}o}
+\title{Porcentagem de absor\enc{çã}{ca}o de \enc{á}{a}gua de
+    feij\enc{ã}{a}o}
 \format{Um \code{data.frame} com 30 observações e 3 variáveis, em que
 
 \describe{
@@ -18,9 +19,7 @@
 
 }}
 \source{
-Ramalho, M. A. P., Ferreira, D. F., Oliveira, A. C. (2005).
-    Experimentação em Genética e Melhoramento de Plantas (2th ed.).
-    Lavras, MG: UFLA. (Exemplo 4.3, pág 56)
+RAMALHO et al. (2005), Exemplo 4.3, pág 56.
 }
 \description{
 Experimento conduzido na Universidade Federal de Lavras,
diff --git a/man/RamalhoEg4.7.Rd b/man/RamalhoEg4.7.Rd
index c463ad4a..316b64b4 100644
--- a/man/RamalhoEg4.7.Rd
+++ b/man/RamalhoEg4.7.Rd
@@ -16,9 +16,7 @@
 
 }}
 \source{
-Ramalho, M. A. P., Ferreira, D. F., Oliveira, A. C. (2005).
-    Experimentação em Genética e Melhoramento de Plantas (2th ed.).
-    Lavras: UFLA. (pg 62)
+RAMALHO et al. (2005), pág. 62.
 }
 \description{
 Experimento da produção de grãos na avaliação de
diff --git a/man/RamalhoEg7.8.Rd b/man/RamalhoEg7.8.Rd
index a185c0cf..2786da0a 100644
--- a/man/RamalhoEg7.8.Rd
+++ b/man/RamalhoEg7.8.Rd
@@ -2,7 +2,8 @@
 % Please edit documentation in R/Ramalho.R
 \name{RamalhoEg7.8}
 \alias{RamalhoEg7.8}
-\title{Produ\enc{çã}{ca}o de Gr\enc{ã}{a}os de Cruzamentos Feij\enc{ã}{a}o}
+\title{Produ\enc{çã}{ca}o de Gr\enc{ã}{a}os de Cruzamentos
+    Feij\enc{ã}{a}o}
 \format{Um \code{data.frame} com 240 observações e 4 variáveis, em
     que
 
@@ -21,9 +22,7 @@
 
 }}
 \source{
-Ramalho, M. A. P., Ferreira, D. F., Oliveira, A. C. (2005).
-    Experimentação em Genética e Melhoramento de Plantas (2th ed.).
-    Lavras, MG: UFLA. (Exemplo 7.8, pág 110).
+RAMALHO et al. (2005), Exemplo 7.8, pág. 110.
 }
 \description{
 Experimento referente à produção de grãos de feijão
diff --git a/man/RamalhoEg8.1.Rd b/man/RamalhoEg8.1.Rd
index 989ca297..f44c4c52 100644
--- a/man/RamalhoEg8.1.Rd
+++ b/man/RamalhoEg8.1.Rd
@@ -2,7 +2,8 @@
 % Please edit documentation in R/Ramalho.R
 \name{RamalhoEg8.1}
 \alias{RamalhoEg8.1}
-\title{Produ\enc{çã}{ca}o de Gr\enc{ã}{a}os em Cultivares de Feij\enc{ã}{a}o}
+\title{Produ\enc{çã}{ca}o de Gr\enc{ã}{a}os em Cultivares de
+    Feij\enc{ã}{a}o}
 \format{Um \code{data.frame} com 60 observações e 4 variáveis, em que
 
 \describe{
@@ -21,9 +22,7 @@
 
 }}
 \source{
-Ramalho, M. A. P., Ferreira, D. F., Oliveira, A. C. (2005).
-    Experimentação em Genética e Melhoramento de Plantas (2th ed.).
-    Lavras: UFLA. (Exemplo 8.1, pág. 115)
+RAMALHO et al. (2005), Exemplo 8.1, pág. 115.
 }
 \description{
 Experimentos para medir a produção de grãos de
diff --git a/man/RamalhoEg8.8.Rd b/man/RamalhoEg8.8.Rd
index 54aafef8..80a606d4 100644
--- a/man/RamalhoEg8.8.Rd
+++ b/man/RamalhoEg8.8.Rd
@@ -2,7 +2,8 @@
 % Please edit documentation in R/Ramalho.R
 \name{RamalhoEg8.8}
 \alias{RamalhoEg8.8}
-\title{Produ\enc{çã}{ca}o de Gr\enc{ã}{a}os de Feij\enc{ã}{a}o de Popula\enc{çõ}{co}es Segregantes}
+\title{Produ\enc{çã}{ca}o de Gr\enc{ã}{a}os de Feij\enc{ã}{a}o de
+    Popula\enc{çõ}{co}es Segregantes}
 \format{Um \code{data.frame} com 72 observações e 4 variáveis, em que
 
 \describe{
@@ -20,9 +21,7 @@
 
 }}
 \source{
-Ramalho, M. A. P., Ferreira, D. F., Oliveira, A. C. (2005).
-    Experimentação em Genética e Melhoramento de Plantas (2th ed.).
-    Lavras: UFLA. (Tabela 8.8, pág. 123)
+RAMALHO et al. (2005), Tabela 8.8, pág. 123.
 
     Corte, H. R., Ramalho, M. A. P., Gonçalves, F. M. A., Abreu. A de
     F. B. Natural Selection for Grain Yield in Dry Bean Population
diff --git a/man/RamalhoEx1.7.Rd b/man/RamalhoEx1.7.Rd
index d14e0267..59d4a22b 100644
--- a/man/RamalhoEx1.7.Rd
+++ b/man/RamalhoEx1.7.Rd
@@ -5,9 +5,7 @@
 \title{Altura de plantas de \emph{Eucaliptus camaldulensis}}
 \format{Vetor com 100 observações altura das plantas em metros.}
 \source{
-Ramalho, M. A. P., Ferreira, D. F., Oliveira, A. C. (2005).
-    Experimentação em Genética e Melhoramento de Plantas (2th ed.).
-    Lavras, MG: UFLA. (pg 26)
+RAMALHO et al. (2005), pág. 26.
 
     Castro, N. H. A., Andrade, H. B., Ramalho, m A. P. (1993).
     Revista Árvore. Viçosa, v. 17, n.2.
diff --git a/man/RamalhoEx12.2.Rd b/man/RamalhoEx12.2.Rd
index 604fff58..ba735376 100644
--- a/man/RamalhoEx12.2.Rd
+++ b/man/RamalhoEx12.2.Rd
@@ -2,7 +2,8 @@
 % Please edit documentation in R/Ramalho.R
 \name{RamalhoEx12.2}
 \alias{RamalhoEx12.2}
-\title{Dados Gen\enc{é}{e}ricos para Regress\enc{ã}{a}o M\enc{ú}{u}ltipla}
+\title{Dados Gen\enc{é}{e}ricos para Regress\enc{ã}{a}o
+    M\enc{ú}{u}ltipla}
 \format{Um \code{data.frame} com 8 observações e 4 variáveis, em que
 
 \describe{
@@ -17,9 +18,7 @@
 
 }}
 \source{
-Ramalho, M. A. P., Ferreira, D. F., Oliveira, A. C. (2005).
-    Experimentação em Genética e Melhoramento de Plantas (2th ed.).
-    Lavras: UFLA. (Exercício 12.2, pág. 231)
+RAMALHO et al. (2005), Exercício 12.2, pág. 231.
 }
 \description{
 Conjunto de dados apresentados para exercício. Objetivo
diff --git a/man/RamalhoEx13.1.Rd b/man/RamalhoEx13.1.Rd
index 77b93773..e699011e 100644
--- a/man/RamalhoEx13.1.Rd
+++ b/man/RamalhoEx13.1.Rd
@@ -20,9 +20,7 @@
 
 }}
 \source{
-Ramalho, M. A. P., Ferreira, D. F., Oliveira, A. C. (2005).
-    Experimentação em Genética e Melhoramento de Plantas (2th ed.).
-    Lavras: UFLA. (Exercício 13.1, pág. 255)
+RAMALHO et al. (2005), Exercício 13.1, pág. 255.
 }
 \description{
 Experimento referente a avaliação de clones de
diff --git a/man/RamalhoEx13.2.Rd b/man/RamalhoEx13.2.Rd
index 66714b56..ad94fe12 100644
--- a/man/RamalhoEx13.2.Rd
+++ b/man/RamalhoEx13.2.Rd
@@ -19,9 +19,7 @@
 
 }}
 \source{
-Ramalho, M. A. P., Ferreira, D. F., Oliveira, A. C. (2005).
-    Experimentação em Genética e Melhoramento de Plantas (2th ed.).
-    Lavras: UFLA. (Exercício 13.2, pág. 256)
+RAMALHO et al. (2005), Exercício 13.2, pág. 256.
 }
 \description{
 Experimento que avaliou a produção de espigas de
diff --git a/man/RamalhoEx13.3.Rd b/man/RamalhoEx13.3.Rd
index 7b74944d..4686f3ed 100644
--- a/man/RamalhoEx13.3.Rd
+++ b/man/RamalhoEx13.3.Rd
@@ -2,7 +2,8 @@
 % Please edit documentation in R/Ramalho.R
 \name{RamalhoEx13.3}
 \alias{RamalhoEx13.3}
-\title{Avalia\enc{çã}{ca}o do Stay Green em Fam\enc{í}{i}lias de Feijoeiro}
+\title{Avalia\enc{çã}{ca}o do Stay Green em Fam\enc{í}{i}lias de
+    Feijoeiro}
 \format{Um \code{data.frame} com 60 observações e 3 variáveis, em que
 
 \describe{
@@ -17,9 +18,7 @@
 
 }}
 \source{
-Ramalho, M. A. P., Ferreira, D. F., Oliveira, A. C. (2005).
-    Experimentação em Genética e Melhoramento de Plantas (2th ed.).
-    Lavras: UFLA. (Exercício 13.3, pág. 257)
+RAMALHO et al. (2005), Exercício 13.3, pág. 257.
 }
 \description{
 Notas da avaliação do "stay green" obtidos de famílias
diff --git a/man/RamalhoEx3.1.Rd b/man/RamalhoEx3.1.Rd
index c0146b81..4386b52e 100644
--- a/man/RamalhoEx3.1.Rd
+++ b/man/RamalhoEx3.1.Rd
@@ -2,7 +2,8 @@
 % Please edit documentation in R/Ramalho.R
 \name{RamalhoEx3.1}
 \alias{RamalhoEx3.1}
-\title{N\enc{ú}{u}mero de plantas de milho ap\enc{ó}{o}s inocula\enc{çã}{ca}o}
+\title{N\enc{ú}{u}mero de plantas de milho ap\enc{ó}{o}s
+    inocula\enc{çã}{ca}o}
 \format{data.frame com 20 observações e 4 variáveis, em que
 
 \describe{
@@ -16,9 +17,7 @@
 
 }}
 \source{
-Ramalho, M. A. P., Ferreira, D. F., Oliveira, A. C. (2005).
-    Experimentação em Genética e Melhoramento de Plantas (2th ed.).
-    Lavras, MG: UFLA. (pg 50)
+RAMALHO et al. (2005), pág. 50.
 }
 \description{
 Experimento referente ao número de plantas de milho,
diff --git a/man/RamalhoEx4.1.Rd b/man/RamalhoEx4.1.Rd
index ff64b019..80dab2fb 100644
--- a/man/RamalhoEx4.1.Rd
+++ b/man/RamalhoEx4.1.Rd
@@ -18,9 +18,7 @@
 
 }}
 \source{
-Ramalho, M. A. P., Ferreira, D. F., Oliveira, A. C. (2005).
-    Experimentação em Genética e Melhoramento de Plantas (2th ed.).
-    Lavras, MG: UFLA. (Exercício 4.1, pág 66)
+RAMALHO et al. (2005), Exercício 4.1, pág. 66.
 }
 \description{
 Experimento para avaliar o comprimento de conídios de
diff --git a/man/RamalhoEx4.2.Rd b/man/RamalhoEx4.2.Rd
index 046157a8..80abf50c 100644
--- a/man/RamalhoEx4.2.Rd
+++ b/man/RamalhoEx4.2.Rd
@@ -16,9 +16,7 @@
 
 }}
 \source{
-Ramalho, M. A. P., Ferreira, D. F., Oliveira, A. C. (2005).
-    Experimentação em Genética e Melhoramento de Plantas (2th ed.).
-    Lavras, MG: UFLA. (Execício 4.2, pág 66)
+RAMALHO et al. (2005), Execício 4.2, pág. 66.
 }
 \description{
 Experimento que estudou o número de perfilhos de plantas
diff --git a/man/RamalhoEx7.10.Rd b/man/RamalhoEx7.10.Rd
index b72a6043..8ee201bb 100644
--- a/man/RamalhoEx7.10.Rd
+++ b/man/RamalhoEx7.10.Rd
@@ -21,9 +21,7 @@
 
 }}
 \source{
-Ramalho, M. A. P., Ferreira, D. F., Oliveira, A. C. (2005).
-    Experimentação em Genética e Melhoramento de Plantas (2th ed.).
-    Lavras, MG: UFLA. (pg 112).
+RAMALHO et al. (2005), pág. 112.
 }
 \description{
 Experimento referente à produção de arroz obtida na
diff --git a/man/RamalhoEx8.1.Rd b/man/RamalhoEx8.1.Rd
index 912f4733..9257175e 100644
--- a/man/RamalhoEx8.1.Rd
+++ b/man/RamalhoEx8.1.Rd
@@ -2,7 +2,8 @@
 % Please edit documentation in R/Ramalho.R
 \name{RamalhoEx8.1}
 \alias{RamalhoEx8.1}
-\title{Produ\enc{çã}{ca}o de Gr\enc{ã}{a}os de Arroz em Munic\enc{í}{i}pios de Minas Gerais}
+\title{Produ\enc{çã}{ca}o de Gr\enc{ã}{a}os de Arroz em
+    Munic\enc{í}{i}pios de Minas Gerais}
 \format{Um \code{data.frame} com 90 observações e 4 variáveis, em que
 
 \describe{
@@ -20,9 +21,7 @@
 
 }}
 \source{
-Ramalho, M. A. P., Ferreira, D. F., Oliveira, A. C. (2005).
-    Experimentação em Genética e Melhoramento de Plantas (2th ed.).
-    Lavras: UFLA. (Exercício 8.1, pág. 132)
+RAMALHO et al. (2005), Exercício 8.1, pág. 132.
 }
 \description{
 Experimentos para avaliar a produção de grãos de
diff --git a/man/RamalhoEx8.2.Rd b/man/RamalhoEx8.2.Rd
index 06372b08..ec165aaf 100644
--- a/man/RamalhoEx8.2.Rd
+++ b/man/RamalhoEx8.2.Rd
@@ -21,9 +21,7 @@
 
 }}
 \source{
-Ramalho, M. A. P., Ferreira, D. F., Oliveira, A. C. (2005).
-    Experimentação em Genética e Melhoramento de Plantas (2th ed.).
-    Lavras: UFLA. (Exercício 8.2, pág. 133)
+RAMALHO et al. (2005), Exercício 8.2, pág. 133.
 }
 \description{
 Experimento em delineamento de blocos casualizados para
diff --git a/man/RamalhoTb1.2.Rd b/man/RamalhoTb1.2.Rd
index 6888ef42..85472c1b 100644
--- a/man/RamalhoTb1.2.Rd
+++ b/man/RamalhoTb1.2.Rd
@@ -15,9 +15,7 @@
 
 }}
 \source{
-Ramalho, M. A. P., Ferreira, D. F., Oliveira, A. C. (2005).
-    Experimentação em Genética e Melhoramento de Plantas (2th ed.).
-    Lavras, MG: UFLA. (pg 15)
+RAMALHO et al. (2005), pág 15.
 }
 \description{
 Experimento da produtividade média de espigas de milho
@@ -43,5 +41,5 @@ plot(ecdf(RamalhoTb1.2$prod),
      main = NULL)
 
 }
-\keyword{ASS}
+\keyword{AAS}
 
diff --git a/man/RamalhoTb11.1.Rd b/man/RamalhoTb11.1.Rd
index b267372c..61c47ce1 100644
--- a/man/RamalhoTb11.1.Rd
+++ b/man/RamalhoTb11.1.Rd
@@ -17,9 +17,7 @@
 
 }}
 \source{
-Ramalho, M. A. P., Ferreira, D. F., Oliveira, A. C. (2005).
-    Experimentação em Genética e Melhoramento de Plantas (2th ed.).
-    Lavras: UFLA. (pág. 165)
+RAMALHO et al. (2005), pág. 165.
 }
 \description{
 Experimento conduzido na EMBRAPA Milho e Sorgo
diff --git a/man/RamalhoTb11.17.Rd b/man/RamalhoTb11.17.Rd
index 59040fd5..dbddf62c 100644
--- a/man/RamalhoTb11.17.Rd
+++ b/man/RamalhoTb11.17.Rd
@@ -22,9 +22,7 @@
 
 }}
 \source{
-Ramalho, M. A. P., Ferreira, D. F., Oliveira, A. C. (2005).
-    Experimentação em Genética e Melhoramento de Plantas (2th ed.).
-    Lavras: UFLA. (Tabela 11.17, pág. 193)
+RAMALHO et al. (2005), Tabela 11.17, pág. 193.
 }
 \description{
 Dados provenientes de 3 experimentos envolvendo a
diff --git a/man/RamalhoTb12.8.Rd b/man/RamalhoTb12.8.Rd
index f0cddd90..5ac390c2 100644
--- a/man/RamalhoTb12.8.Rd
+++ b/man/RamalhoTb12.8.Rd
@@ -2,7 +2,8 @@
 % Please edit documentation in R/Ramalho.R
 \name{RamalhoTb12.8}
 \alias{RamalhoTb12.8}
-\title{Componentes da Produ\enc{çã}{ca}o de Linhagens de Feij\enc{ã}{a}o}
+\title{Componentes da Produ\enc{çã}{ca}o de Linhagens de
+    Feij\enc{ã}{a}o}
 \format{Um \code{data.frame} com 20 observações e 5 variáveis, em que
 
 \describe{
@@ -20,9 +21,7 @@
 
 }}
 \source{
-Ramalho, M. A. P., Ferreira, D. F., Oliveira, A. C. (2005).
-    Experimentação em Genética e Melhoramento de Plantas (2th ed.).
-    Lavras: UFLA. (Tabela 12.8, pág. 225)
+RAMALHO et al. (2005), Tabela 12.8, pág. 225.
 
     Pereira Filho, I. A., Ramalho, M. A. P., Ferreira, S. Avaliação
     de Progênies de Feijão e Estimativas de Parâmetros Genéticos na
diff --git a/man/RamalhoTb13.1.Rd b/man/RamalhoTb13.1.Rd
index 7e9c33a5..3e693f81 100644
--- a/man/RamalhoTb13.1.Rd
+++ b/man/RamalhoTb13.1.Rd
@@ -13,9 +13,7 @@
 
 }}
 \source{
-Ramalho, M. A. P., Ferreira, D. F., Oliveira, A. C. (2005).
-    Experimentação em Genética e Melhoramento de Plantas (2th ed.).
-    Lavras: UFLA. (Tabela 13.1, pág. 233)
+RAMALHO et al. (2005), Tabela 13.1, pág. 233.
 }
 \description{
 Experimento referente a cultura de milho, cujos dados
diff --git a/man/RamalhoTb13.11.Rd b/man/RamalhoTb13.11.Rd
index cdee1f33..f248075e 100644
--- a/man/RamalhoTb13.11.Rd
+++ b/man/RamalhoTb13.11.Rd
@@ -16,9 +16,7 @@
 
 }}
 \source{
-Ramalho, M. A. P., Ferreira, D. F., Oliveira, A. C. (2005).
-    Experimentação em Genética e Melhoramento de Plantas (2th ed.).
-    Lavras: UFLA. (Tabela 13.11, pág. 248)
+RAMALHO et al. (2005), Tabela 13.11, pág. 248.
 }
 \description{
 Experimento envolvendo a produção de raízes de 20
diff --git a/man/RamalhoTb13.13.Rd b/man/RamalhoTb13.13.Rd
index 2067ceb0..9b535d35 100644
--- a/man/RamalhoTb13.13.Rd
+++ b/man/RamalhoTb13.13.Rd
@@ -2,7 +2,8 @@
 % Please edit documentation in R/Ramalho.R
 \name{RamalhoTb13.13}
 \alias{RamalhoTb13.13}
-\title{Produ\enc{çã}{ca}o de Gr\enc{ã}{a}os de Prog\enc{ê}{e}nies de Feij\enc{ã}{a}o}
+\title{Produ\enc{çã}{ca}o de Gr\enc{ã}{a}os de Prog\enc{ê}{e}nies de
+    Feij\enc{ã}{a}o}
 \format{Um \code{data.frame} com 30 observações e 3 variáveis, em que
 
 \describe{
@@ -17,9 +18,7 @@
 
 }}
 \source{
-Ramalho, M. A. P., Ferreira, D. F., Oliveira, A. C. (2005).
-    Experimentação em Genética e Melhoramento de Plantas (2th ed.).
-    Lavras: UFLA. (Tabela 13.13, pág. 251)
+RAMALHO et al. (2005), Tabela 13.13, pág. 251.
 }
 \description{
 Experimento referente a avaliação de progênies
diff --git a/man/RamalhoTb13.15.Rd b/man/RamalhoTb13.15.Rd
index 8ac27d10..8377429f 100644
--- a/man/RamalhoTb13.15.Rd
+++ b/man/RamalhoTb13.15.Rd
@@ -16,9 +16,7 @@
 
 }}
 \source{
-Ramalho, M. A. P., Ferreira, D. F., Oliveira, A. C. (2005).
-    Experimentação em Genética e Melhoramento de Plantas (2th ed.).
-    Lavras: UFLA. (Tabela 13.15, pág. 252)
+RAMALHO et al. (2005), Tabela 13.15, pág. 252.
 }
 \description{
 Experimento envolvendo a produção de ramas (parte aérea)
diff --git a/man/RamalhoTb13.6.Rd b/man/RamalhoTb13.6.Rd
index f6684961..e67be659 100644
--- a/man/RamalhoTb13.6.Rd
+++ b/man/RamalhoTb13.6.Rd
@@ -2,7 +2,8 @@
 % Please edit documentation in R/Ramalho.R
 \name{RamalhoTb13.6}
 \alias{RamalhoTb13.6}
-\title{Produ\enc{çã}{ca}o de Gr\enc{ã}{a}os de Feij\enc{ã}{a}o e Teor de \eqn{P_{2}O_{5}}}
+\title{Produ\enc{çã}{ca}o de Gr\enc{ã}{a}os de Feij\enc{ã}{a}o e Teor
+    de \eqn{P_{2}O_{5}}}
 \format{Um \code{data.frame} com 30 observações e 4 variáveis, em que
 
 \describe{
@@ -19,9 +20,8 @@
 
 }}
 \source{
-Ramalho, M. A. P., Ferreira, D. F., Oliveira, A. C. (2005).
-    Experimentação em Genética e Melhoramento de Plantas (2th ed.).
-    Lavras: UFLA. (Tabela 13.6, pág. 243 e tabela 13.9, pág. 246)
+RAMALHO et al. (2005), Tabela 13.6, pág. 243 e tabela 13.9,
+    pág. 246.
 
     Pereira, A. F. Emprego de Covariância visando reduzir o efeito da
     heterogeneidade Ambiental nos Experimentos com a Cultura do
diff --git a/man/RamalhoTb3.1.Rd b/man/RamalhoTb3.1.Rd
index a27364e9..297dc2f4 100644
--- a/man/RamalhoTb3.1.Rd
+++ b/man/RamalhoTb3.1.Rd
@@ -16,9 +16,7 @@
 
 }}
 \source{
-Ramalho, M. A. P., Ferreira, D. F., Oliveira, A. C. (2005).
-    Experimentação em Genética e Melhoramento de Plantas (2th ed.).
-    Lavras, MG: UFLA. (pg 43)
+RAMALHO et al. (2005), pág. 43.
 }
 \description{
 Experimento do número de nematóides (vermes que estão
diff --git a/man/RamalhoTb3.4.Rd b/man/RamalhoTb3.4.Rd
index 881ed9ab..d780c187 100644
--- a/man/RamalhoTb3.4.Rd
+++ b/man/RamalhoTb3.4.Rd
@@ -20,9 +20,7 @@ controle local}
 
 }}
 \source{
-Ramalho, M. A. P., Ferreira, D. F., Oliveira, A. C. (2005).
-    Experimentação em Genética e Melhoramento de Plantas (2th ed.).
-    Lavras, MG: UFLA. (pg 45)
+RAMALHO et al. (2005), pág 45.
 }
 \description{
 Experimento para verificar a incidência de patógenos do
diff --git a/man/RamalhoTb3.6.Rd b/man/RamalhoTb3.6.Rd
index fa154801..7420dd3f 100644
--- a/man/RamalhoTb3.6.Rd
+++ b/man/RamalhoTb3.6.Rd
@@ -15,9 +15,7 @@
 
 }}
 \source{
-Ramalho, M. A. P., Ferreira, D. F., Oliveira, A. C. (2005).
-    Experimentação em Genética e Melhoramento de Plantas (2th ed.).
-    Lavras, MG: UFLA. (pg 48)
+RAMALHO et al. (2005), pág. 48.
 }
 \description{
 Experimento referente a largura dos ascos de três
diff --git a/man/RamalhoTb7.1.Rd b/man/RamalhoTb7.1.Rd
index 67e2afbb..453b2a47 100644
--- a/man/RamalhoTb7.1.Rd
+++ b/man/RamalhoTb7.1.Rd
@@ -20,9 +20,7 @@
 
 }}
 \source{
-Ramalho, M. A. P., Ferreira, D. F., Oliveira, A. C. (2005).
-    Experimentação em Genética e Melhoramento de Plantas (2th ed.).
-    Lavras, MG: UFLA. (Tabela 7.1, pág 102).
+RAMALHO et al. (2005), Tabela 7.1, pág 102.
 }
 \description{
 Pesquisa sobre avaliação de progênies de
diff --git a/man/RamalhoTb8.12.Rd b/man/RamalhoTb8.12.Rd
index b1868e9b..d09b1ce1 100644
--- a/man/RamalhoTb8.12.Rd
+++ b/man/RamalhoTb8.12.Rd
@@ -2,7 +2,8 @@
 % Please edit documentation in R/Ramalho.R
 \name{RamalhoTb8.12}
 \alias{RamalhoTb8.12}
-\title{Produ\enc{çã}{ca}o M\enc{é}{e}dia de Gr\enc{ã}{a}os de Caf\enc{é}{e}-cereja}
+\title{Produ\enc{çã}{ca}o M\enc{é}{e}dia de Gr\enc{ã}{a}os de
+    Caf\enc{é}{e}-cereja}
 \format{Um \code{data.frame} com 120 observações e 4 variáveis, em
     que
 
@@ -23,9 +24,7 @@
 
 }}
 \source{
-Ramalho, M. A. P., Ferreira, D. F., Oliveira, A. C. (2005).
-    Experimentação em Genética e Melhoramento de Plantas (2th ed.).
-    Lavras: UFLA. (pág. 128)
+RAMALHO et al. (2005), pág. 128.
 
     Mendes, A. N. G. Avaliação de Metodologias Empregadas na Seleção
     de Progênies do Cafeeiro (Coffea arabica L.) no estado de Minas
diff --git a/man/StorckEg2.3.5.Rd b/man/StorckEg2.3.5.Rd
index d5b7e253..29768e08 100644
--- a/man/StorckEg2.3.5.Rd
+++ b/man/StorckEg2.3.5.Rd
@@ -21,9 +21,7 @@
 
 }}
 \source{
-Storck, L., Garcia, B. C., Lopes, S. J., Estefanel,
-    V. (2011). Experimentação Vegetal (3th ed.). Santa Maria, RS:
-    UFSM. (Tabela 2.3.5, pág 63)
+STORCK et al. (2011), Tabela 2.3.5, pág. 63.
 }
 \description{
 Dados de um experimento no delineamento quadrado latino
diff --git a/man/StorckTb101.Rd b/man/StorckTb101.Rd
index 864509df..3b7843bd 100644
--- a/man/StorckTb101.Rd
+++ b/man/StorckTb101.Rd
@@ -2,7 +2,8 @@
 % Please edit documentation in R/Storck.R
 \name{StorckTb101}
 \alias{StorckTb101}
-\title{Grupo de Experimentos de Competi\enc{çã}{ca}o de Cultivares de Milho}
+\title{Grupo de Experimentos de Competi\enc{çã}{ca}o de Cultivares de
+    Milho}
 \format{Um \code{data.frame} com 96 observações e 4 variáveis, em que
 
 \describe{
@@ -20,9 +21,7 @@
 
 }}
 \source{
-Storck, L., Garcia, B. C., Lopes, S. J., Estefanel,
-    V. (2011). Experimentação Vegetal (3th ed.). Santa Maria, RS:
-    UFSM. (Tabela 101, pág. 182)
+STORCK et al. (2011), Tabela 101, pág. 182.
 }
 \description{
 Grupo de experimentos, avaliando 6 cultivres de milho,
diff --git a/man/StorckTb2.Rd b/man/StorckTb2.Rd
index e153634b..37e9d3c8 100644
--- a/man/StorckTb2.Rd
+++ b/man/StorckTb2.Rd
@@ -17,9 +17,7 @@
 
 }}
 \source{
-Storck, L., Garcia, B. C., Lopes, S. J., Estefanel,
-    V. (2011). Experimentação Vegetal (3th ed.). Santa Maria, RS:
-    UFMS. (Tabela 2, pág. 21)
+STORCK et al. (2011), Tabela 2, pág. 21.
 }
 \description{
 Experimento referente ao peso das plantas aos 30 dias
diff --git a/man/StorckTb56.Rd b/man/StorckTb56.Rd
index 53ee1606..92d99f9e 100644
--- a/man/StorckTb56.Rd
+++ b/man/StorckTb56.Rd
@@ -18,9 +18,7 @@
 
 }}
 \source{
-Storck, L., Garcia, B. C., Lopes, S. J., Estefanel,
-    V. (2011). Experimentação Vegetal (3th ed.). Santa Maria, RS:
-    UFSM.  (Tabela 56, pg 134)
+STORCK et al. (2011), Tabela 56, pg 134.
 }
 \description{
 Resultados (kg/parcela) em um experimento bifatorial 3
diff --git a/man/StorckTb60.Rd b/man/StorckTb60.Rd
index d5463681..91b4a7b8 100644
--- a/man/StorckTb60.Rd
+++ b/man/StorckTb60.Rd
@@ -19,9 +19,7 @@
 
 }}
 \source{
-Storck, L., Garcia, B. C., Lopes, S. J., Estefanel,
-    V. (2011). Experimentação Vegetal (3th ed.). Santa Maria, RS:
-    UFSM. (Tabela 60, pág. 138)
+STORCK et al. (2011), Tabela 60, pág. 138.
 }
 \description{
 Resultados fictícios (kg/parcela) de um experimento
diff --git a/man/StorckTb67.Rd b/man/StorckTb67.Rd
index f41b00b5..bde10833 100644
--- a/man/StorckTb67.Rd
+++ b/man/StorckTb67.Rd
@@ -2,7 +2,8 @@
 % Please edit documentation in R/Storck.R
 \name{StorckTb67}
 \alias{StorckTb67}
-\title{Efeito da Dose de NPK na Produ\enc{çã}{ca}o de Cultivares de Milho}
+\title{Efeito da Dose de NPK na Produ\enc{çã}{ca}o de Cultivares de
+    Milho}
 \format{Um \code{data.frame} com 60 observações e 4 variáveis, em que
 
 \describe{
@@ -20,9 +21,7 @@
 
 }}
 \source{
-Storck, L., Garcia, B. C., Lopes, S. J., Estefanel,
-    V. (2011). Experimentação Vegetal (3th ed.). Santa Maria, RS:
-    UFSM. (Tabela 67, pág. 144)
+STORCK et al. (2011), Tabela 67, pág. 144.
 }
 \description{
 Resultados ficitícios (kg/parcela) de um experimento
diff --git a/man/StorckTb74.Rd b/man/StorckTb74.Rd
index f7e64fb9..b8e02868 100644
--- a/man/StorckTb74.Rd
+++ b/man/StorckTb74.Rd
@@ -3,7 +3,8 @@
 \name{StorckTb74}
 \alias{StorckTb74}
 \alias{StorckTb88}
-\title{\enc{É}{E}poca e Densidade de Semeadura na Produ\enc{çã}{ca}o de Milho}
+\title{\enc{É}{E}poca e Densidade de Semeadura na Produ\enc{çã}{ca}o
+    de Milho}
 \format{Um \code{data.frame} com 75 observações e 4 variáveis, em que
 
 \describe{
@@ -20,9 +21,8 @@
 
 }}
 \source{
-Storck, L., Garcia, B. C., Lopes, S. J., Estefanel,
-    V. (2011). Experimentação Vegetal (3th ed.). Santa Maria, RS:
-    UFSM. (Tabela 74, pág. 150 e Tabela 88, pág. 168)
+STORCK et al. (2011), Tabela 74, pág. 150 e Tabela 88,
+    pág. 168.
 }
 \description{
 Resultados ficitícios de um experimento fatorial 3
diff --git a/man/StorckTb8.Rd b/man/StorckTb8.Rd
index 25739de5..6a7d7e46 100644
--- a/man/StorckTb8.Rd
+++ b/man/StorckTb8.Rd
@@ -18,9 +18,7 @@
 
 }}
 \source{
-Storck, L., Garcia, B. C., Lopes, S. J., Estefanel,
-    V. (2011). Experimentação Vegetal (3th ed.). Santa Maria, RS:
-    UFSM. (Tabela 8, pág. 33)
+STORCK et al. (2011), Tabela 8, pág. 33.
 }
 \description{
 Dados referentes a um experimento conduzido no
diff --git a/man/VieiraEx7.3.Rd b/man/VieiraEx7.3.Rd
index c7bb9b75..5cc6f907 100644
--- a/man/VieiraEx7.3.Rd
+++ b/man/VieiraEx7.3.Rd
@@ -2,8 +2,8 @@
 % Please edit documentation in R/Vieira.R
 \name{VieiraEx7.3}
 \alias{VieiraEx7.3}
-\title{Experimento de um Fator em DIC com N\enc{ú}{u}mero Diferente de
-    Repeti\enc{çõ}{co}es}
+\title{Experimento de um Fator em DIC com N\enc{ú}{u}mero Diferente
+    de Repeti\enc{çõ}{co}es}
 \format{Um \code{data.frame} com 18 observações e 2 variáveis, em que
 
 \describe{
@@ -16,8 +16,7 @@
 
 }}
 \source{
-Vieira, S. (1999). Estatística experimental (2th ed.).
-    São Paulo, SP: Atlas. (Exercício 7.3, pág. 85).
+VIEIRA (1999), Exercício 7.3, pág. 85.
 }
 \description{
 Dados de um experimento inteiramente ao acaso com número
diff --git a/man/VieiraEx7.5.Rd b/man/VieiraEx7.5.Rd
index 640fb1db..96ca4899 100644
--- a/man/VieiraEx7.5.Rd
+++ b/man/VieiraEx7.5.Rd
@@ -2,7 +2,8 @@
 % Please edit documentation in R/Vieira.R
 \name{VieiraEx7.5}
 \alias{VieiraEx7.5}
-\title{Experimento Com Um Fator e Repeti\enc{çã}{ca}o Dentro dos Blocos}
+\title{Experimento Com Um Fator e Repeti\enc{çã}{ca}o Dentro dos
+    Blocos}
 \format{Um \code{data.frame} com 12 observações e 3 variáveis, em que
 
 \describe{
@@ -17,8 +18,7 @@
 
 }}
 \source{
-Vieira, S. (1999). Estatística experimental (2th ed.).  São
-    Paulo, SP: Atlas. (Exercício 7.5, pág. 85).
+VIEIRA (1999), Exercício 7.5, pág. 85.
 }
 \description{
 Dados de um experimento em delineamento de blocos
diff --git a/man/VieiraEx8.3.Rd b/man/VieiraEx8.3.Rd
index bd16d7c4..c2acccd9 100644
--- a/man/VieiraEx8.3.Rd
+++ b/man/VieiraEx8.3.Rd
@@ -2,7 +2,8 @@
 % Please edit documentation in R/Vieira.R
 \name{VieiraEx8.3}
 \alias{VieiraEx8.3}
-\title{Experimento Em Blocos Casualizados Com Repeti\enc{çõ}{co}es Nos Blocos}
+\title{Experimento Em Blocos Casualizados Com Repeti\enc{çõ}{co}es
+    Nos Blocos}
 \format{Um \code{data.frame} com 24 observações e 3 variáveis, em que
 
 \describe{
@@ -18,8 +19,7 @@
 
 }}
 \source{
-Vieira, S. (1999). Estatística experimental (2th ed.).
-    São Paulo, SP: Atlas. (Exercício 8.3, pág. 102).
+VIEIRA (1999), Exercício 8.3, pág. 102.
 }
 \description{
 Dados de um experimento em delineamento em blocos
diff --git a/man/VieiraPg50.1.Rd b/man/VieiraPg50.1.Rd
index 46163c3e..ece8f6b8 100644
--- a/man/VieiraPg50.1.Rd
+++ b/man/VieiraPg50.1.Rd
@@ -13,8 +13,7 @@
 
 }}
 \source{
-Vieira, S. (1999). Estatística experimental (2th ed.). São
-    Paulo, SP: Atlas. (pág. 50, exercício 2).
+VIEIRA (1999), pág. 50, exercício 2.
 }
 \description{
 Experimento em delineamento inteiramente casualizado que
diff --git a/man/VieiraPg50.2.Rd b/man/VieiraPg50.2.Rd
index 75d85c70..5f718491 100644
--- a/man/VieiraPg50.2.Rd
+++ b/man/VieiraPg50.2.Rd
@@ -15,8 +15,7 @@
 
 }}
 \source{
-Vieira, S. (1999).  Estatística experimental (2th ed.).  São
-    Paulo, SP: Atlas. (pág. 50, Exercício 4).
+VIEIRA (1999), pág. 50, Exercício 4.
 }
 \description{
 Num laboratório são usados quatro voltímetros
diff --git a/man/VieiraPg57.1.Rd b/man/VieiraPg57.1.Rd
index f3bf033b..44edbdf5 100644
--- a/man/VieiraPg57.1.Rd
+++ b/man/VieiraPg57.1.Rd
@@ -15,8 +15,7 @@
 
 }}
 \source{
-Vieira, S. (1999).  Estatística experimental (2th ed.).  São
-    Paulo, SP: Atlas. (pág. 57, exercício 3).
+VIEIRA (1999), pág. 57, exercício 3 .
 }
 \description{
 Resultados de um experimento em delineamento de blocos
diff --git a/man/VieiraPg57.2.Rd b/man/VieiraPg57.2.Rd
index 15cf6ff1..21a44849 100644
--- a/man/VieiraPg57.2.Rd
+++ b/man/VieiraPg57.2.Rd
@@ -15,8 +15,7 @@
 
 }}
 \source{
-Vieira, S. (1999). Estatística experimental (2th ed.).  São
-    Paulo, SP: Atlas. (pág. 57, exercício 4).
+VIEIRA (1999), pág. 57, exercício 4 .
 }
 \description{
 Os dados referem-se ao peso de 3 ratos medidos 5 vezes
diff --git a/man/VieiraTb4.1.Rd b/man/VieiraTb4.1.Rd
index aaf24e0c..150c6a51 100644
--- a/man/VieiraTb4.1.Rd
+++ b/man/VieiraTb4.1.Rd
@@ -14,8 +14,7 @@
 
 }}
 \source{
-Vieira, S. (1999). Estatística experimental (2th ed.). São
-    Paulo, SP: Atlas. (pág 44, tabela 4.1).
+VIEIRA (1999), pág 44, tabela 4.1.
 }
 \description{
 Experimento que mediu a produção, em kg/100
diff --git a/man/VieiraTb5.3.Rd b/man/VieiraTb5.3.Rd
index d68e1f3c..17e41ee4 100644
--- a/man/VieiraTb5.3.Rd
+++ b/man/VieiraTb5.3.Rd
@@ -16,8 +16,7 @@
 
 }}
 \source{
-Vieira, S. (1999).  Estatística experimental (2th ed.).  São
-    Paulo, SP: Atlas. (pág. 53, tabela 5.3).
+VIEIRA (1999), pág. 53, tabela 5.3 .
 }
 \description{
 Experimento da produção de milho de 4 diferentes
diff --git a/man/VieiraTb7.2.Rd b/man/VieiraTb7.2.Rd
index c92bdd1e..0efbb40f 100644
--- a/man/VieiraTb7.2.Rd
+++ b/man/VieiraTb7.2.Rd
@@ -2,7 +2,8 @@
 % Please edit documentation in R/Vieira.R
 \name{VieiraTb7.2}
 \alias{VieiraTb7.2}
-\title{N\enc{ú}{u}meros de Ovos de Poedeiras em Fun\enc{çã}{ca}o do Estilo Musical}
+\title{N\enc{ú}{u}meros de Ovos de Poedeiras em Fun\enc{çã}{ca}o do
+    Estilo Musical}
 \format{Um \code{data.frame} com 16 observações e 2 variáveis, em que
 
 \describe{
@@ -15,8 +16,7 @@
 
 }}
 \source{
-Vieira, S. (1999). Estatística experimental (2th ed.).
-    São Paulo, SP: Atlas. (Tabela 7.2, pág. 74).
+VIEIRA (1999), Tabela 7.2, pág. 74 .
 }
 \description{
 Dados que refere-se ao número de ovos por poedeira 35
diff --git a/man/VieiraTb7.7.Rd b/man/VieiraTb7.7.Rd
index 6707ea82..fe0677b2 100644
--- a/man/VieiraTb7.7.Rd
+++ b/man/VieiraTb7.7.Rd
@@ -2,7 +2,8 @@
 % Please edit documentation in R/Vieira.R
 \name{VieiraTb7.7}
 \alias{VieiraTb7.7}
-\title{Teste Sobre Conhecimento em Fun\enc{çã}{ca}o da Fonte de Informa\enc{çã}{ca}o}
+\title{Teste Sobre Conhecimento em Fun\enc{çã}{ca}o da Fonte de
+    Informa\enc{çã}{ca}o}
 \format{Um \code{data.frame} com 24 observações e 3 variáveis, em que
 
 \describe{
@@ -18,8 +19,7 @@
 
 }}
 \source{
-Vieira, S. (1999). Estatística experimental (2th ed.).
-    São Paulo, SP: Atlas. (Tabela 7.7, pág. 81; Tabela 8.2, pág. 94).
+VIEIRA (1999), Tabela 7.7, pág. 81; Tabela 8.2, pág. 94 .
 }
 \description{
 Dados referentes às notas dos alunos em um teste de
diff --git a/man/VieiraTb8.5.Rd b/man/VieiraTb8.5.Rd
index db97faba..2289df70 100644
--- a/man/VieiraTb8.5.Rd
+++ b/man/VieiraTb8.5.Rd
@@ -2,7 +2,8 @@
 % Please edit documentation in R/Vieira.R
 \name{VieiraTb8.5}
 \alias{VieiraTb8.5}
-\title{N\enc{ú}{u}mero de Itens Produzidos Em Fun\enc{çã}{ca}o do Tipo de M\enc{á}{a}quina}
+\title{N\enc{ú}{u}mero de Itens Produzidos Em Fun\enc{çã}{ca}o do
+    Tipo de M\enc{á}{a}quina}
 \format{Um \code{data.frame} com 60 observações e 3 variáveis, em que
 
 \describe{
@@ -17,8 +18,7 @@
 
 }}
 \source{
-Vieira, S. (1999). Estatística experimental (2th ed.).
-    São Paulo, SP: Atlas. (Tabela 8.5, pág. 98).
+VIEIRA (1999), Tabela 8.5, pág. 98 .
 }
 \description{
 Os dados advém de um experimento no qual foram
diff --git a/man/keywords.Rd b/man/keywords.Rd
new file mode 100644
index 00000000..2a172549
--- /dev/null
+++ b/man/keywords.Rd
@@ -0,0 +1,40 @@
+% Generated by roxygen2: do not edit by hand
+% Please edit documentation in R/keywords.R
+\name{keywords}
+\alias{keywords}
+\title{Keywords para Classificar os Conjuntos de Dados}
+\format{Um \code{data.frame} com 596 observações e 2 variáveis, em
+    que
+
+\describe{
+
+\item{\code{name}}{Nome do conjunto de dados no pacote labestData.}
+
+\item{\code{keyword}}{Keyword atribuída ao conjunto de dados.}
+
+}}
+\description{
+As keywords servem para classificar os conjuntos de
+    dados por características que definem, geralmente, o tipo de
+    análise a ser aplicada aos dados. Isso orienta os estudantes e
+    professores a escolherem os conjuntos de dados para listas de
+    exercício, por exemplo.
+}
+\examples{
+
+data(keywords)
+str(keywords)
+
+library(lattice)
+
+tb <- table(keywords$keyword)
+
+barchart(sort(tb),
+         ylab = "Keyword",
+         xlab = "Frequência absoluta")
+
+subset(keywords, keyword == c("DBI"))
+subset(keywords, keyword \%in\% c("proporção", "contagem"))
+
+}
+
-- 
GitLab


From ebcd229f531c3e882366364afb4a82d0f42ccc07 Mon Sep 17 00:00:00 2001
From: Walmes Zeviani <walmes@ufpr.br>
Date: Tue, 23 Aug 2016 21:01:15 -0300
Subject: [PATCH 04/10] =?UTF-8?q?Edita=20refer=C3=AAncias=20e=20t=C3=ADtul?=
 =?UTF-8?q?os=20dos=20Zimmermann.?=
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

---
 R/Zimmermann.R | 323 +++++++++++++++++++------------------------------
 1 file changed, 124 insertions(+), 199 deletions(-)

diff --git a/R/Zimmermann.R b/R/Zimmermann.R
index ba1e9a4c..09755974 100644
--- a/R/Zimmermann.R
+++ b/R/Zimmermann.R
@@ -1,5 +1,6 @@
 #' @name ZimmermannTb10.15
-#' @title Aduba\enc{çã}{ca}o Ap\enc{ó}{o}s Pastagem em Cultivares de Arroz
+#' @title Aduba\enc{çã}{ca}o Ap\enc{ó}{o}s Pastagem em Cultivares de
+#'     Arroz
 #' @description Dados de um experimento conduzido em faixas, no
 #'     delineamento de blocos ao acaso, para testar o efeito da
 #'     aplicação de adubos em arroz após pastagem no qual foram
@@ -34,9 +35,7 @@
 #'   3 \tab 18 \tab 90 \tab 81 \tab 135 \tab  6
 #' }
 #' @keywords DBC EF
-#' @source Zimmermann, F. J. (2004). Estatística aplicada à pesquisa
-#'     agrícola (1st ed.). Santo Antônio de Goiás, GO: Embrapa Arroz e
-#'     Feijão. (Tabela 10.15, pág. 210)
+#' @source ZIMMERMANN (2004), Tabela 10.15, pág. 210.
 #' @examples
 #'
 #' library(lattice)
@@ -53,7 +52,8 @@
 NULL
 
 #' @name ZimmermannTb10.20
-#' @title Nitrog\enc{ê}{e}nio, Irriga\enc{çã}{ca}o e Preparo do Solo para Feijoeiro
+#' @title Nitrog\enc{ê}{e}nio, Irriga\enc{çã}{ca}o e Preparo do Solo
+#'     para Feijoeiro
 #' @description Dados de um experimento conduzido em faixas, no
 #'     delineamento de blocos ao acaso, com duas repetições e parcelas
 #'     divididas. Se testaram, nas faixas horizontais, as lâminas de
@@ -82,9 +82,7 @@ NULL
 #'
 #' }
 #' @keywords DBC PSS EF
-#' @source Zimmermann, F. J. (2004). Estatística aplicada à pesquisa
-#'     agrícola (1st ed.). Santo Antônio de Goiás, GO: Embrapa Arroz e
-#'     Feijão. (Tabela 10.20, pág 213)
+#' @source ZIMMERMANN (2004), Tabela 10.20, pág 213.
 #' @examples
 #'
 #' library(lattice)
@@ -132,9 +130,7 @@ NULL
 #'
 #' }
 #' @keywords PS DBC
-#' @source Zimmermann, F. J. (2004). Estatística aplicada à pesquisa
-#'     agrícola (1st ed.). Santo Antônio de Goiás, GO: Embrapa Arroz e
-#'     Feijão. (Tabela 10.6, pág. 201)
+#' @source ZIMMERMANN (2004), Tabela 10.6, pág. 201.
 #' @examples
 #'
 #' library(lattice)
@@ -151,7 +147,8 @@ NULL
 NULL
 
 #' @name ZimmermannTb10.9
-#' @title \enc{É}{E}poca de Plantio e Manejo de Inseticida em Cultivares de Arroz
+#' @title \enc{É}{E}poca de Plantio e Manejo de Inseticida em Cultivares
+#'     de Arroz
 #' @description Dados de um em delineamento de blocos completos ao
 #'     acaso, em parcelas subdivididas. O experimento avaliou o efeito
 #'     de 2 épocas de plantio e aplicação (ou não) do inseticida
@@ -179,9 +176,7 @@ NULL
 #'
 #' }
 #' @keywords PSS DBC
-#' @source Zimmermann, F. J. (2004). Estatística aplicada à pesquisa
-#'     agrícola (1st ed.). Santo Antônio de Goiás, GO: Embrapa Arroz e
-#'     Feijão. (Tabela 10.9, pág. 205)
+#' @source ZIMMERMANN (2004), Tabela 10.9, pág. 205.
 #' @examples
 #'
 #' library(lattice)
@@ -201,7 +196,8 @@ NULL
 NULL
 
 #' @name ZimmermannTb11.1
-#' @title Espa\enc{ç}{c}amento e Densidade de Plantio na Produ\enc{çã}{ca}o de Arroz
+#' @title Espa\enc{ç}{c}amento e Densidade de Plantio na
+#'     Produ\enc{çã}{ca}o de Arroz
 #' @description Dados de um experimento fatorial \eqn{2^3}, com
 #'     confundimento total da interação dupla. O ensaio foi conduzido em
 #'     dois blocos ao acaso de tamanho 4 dentro de quatro repetições, em
@@ -242,9 +238,7 @@ NULL
 #'     para fins didáticos. Não se deve alterar o delineamento de dados
 #'     reais para conduzir as análises.
 #' @keywords DBC FAT confundimento
-#' @source Zimmermann, F. J. (2004). Estatística aplicada à pesquisa
-#'     agrícola (1st ed.). Santo Antônio de Goiás, GO: Embrapa Arroz e
-#'     Feijão. (Tabela 11.1, pág. 221)
+#' @source ZIMMERMANN (2004), Tabela 11.1, pág. 221.
 #' @examples
 #'
 #' library(lattice)
@@ -266,7 +260,8 @@ NULL
 NULL
 
 #' @name ZimmermannTb11.10
-#' @title Espa\enc{ç}{c}amento Entre Linhas e Densidade no Plantio de Feij\enc{ã}{a}o
+#' @title Espa\enc{ç}{c}amento Entre Linhas e Densidade no Plantio de
+#'     Feij\enc{ã}{a}o
 #' @description Dados de um experimento fatorial \eqn{3^2}, com a
 #'     cultura do feijoeiro testando espaçamento entre linhas de plantio
 #'     (0.45, 0.6 e 0.75 m) e densidade de plantio (7, 10 e 13 sementes
@@ -295,9 +290,7 @@ NULL
 #'
 #' }
 #' @keywords DBC FAT confundimento
-#' @source Zimmermann, F. J. (2004). Estatística aplicada à pesquisa
-#'     agrícola (1st ed.). Santo Antônio de Goiás, GO: Embrapa Arroz e
-#'     Feijão. (pg 231)
+#' @source ZIMMERMANN (2004), Tabela 11.10, pág 231.
 #' @examples
 #'
 #' library(lattice)
@@ -323,7 +316,8 @@ NULL
 NULL
 
 #' @name ZimmermannTb11.13
-#' @title Absor\enc{çã}{ca}o e Transloca\enc{çã}{ca}o de Zinco em Arroz de Terras Altas
+#' @title Absor\enc{çã}{ca}o e Transloca\enc{çã}{ca}o de Zinco em Arroz
+#'     de Terras Altas
 #' @description Dados de um experimento fatorial \eqn{3^3}, com
 #'     confundimento parcial de 2 graus de liberdade da interação dupla.
 #'     O estudo é sobre a absorção e translocação de zinco em arroz de
@@ -354,9 +348,7 @@ NULL
 #'
 #' }
 #' @keywords DBC FAT confundimento
-#' @source Zimmermann, F. J. (2004). Estatística aplicada à pesquisa
-#'     agrícola (1st ed.). Santo Antônio de Goiás, GO: Embrapa Arroz e
-#'     Feijão. (Tabela 11.13, pág. 234)
+#' @source ZIMMERMANN (2004), Tabela 11.13, pág. 234.
 #' @examples
 #'
 #' library(lattice)
@@ -385,14 +377,14 @@ NULL
 NULL
 
 #' @name ZimmermannTb11.19
-#' @title Produtividade de arroz irrigado em ensaio fatorial com confundimento
+#' @title Produtividade de arroz irrigado em ensaio fatorial com
+#'     confundimento
 #' @description Dados de um experimento fatorial \eqn{2^5}, com
-#'     confundimento da interação de quinta ordem.
-#'     Estudou-se o efeito dos cinco principais problemas da cultura: controle de
-#'     invasoras, adubação, irrigação, controle de doenças e
-#'     cultivar. A interação de quarta ordem (5 fatores) foi
-#'     confundida com blocos.  Os dados da produtividade do arroz estão
-#'     em kg/ha.
+#'     confundimento da interação de quinta ordem.  Estudou-se o efeito
+#'     dos cinco principais problemas da cultura: controle de invasoras,
+#'     adubação, irrigação, controle de doenças e cultivar. A interação
+#'     de quarta ordem (5 fatores) foi confundida com blocos.  Os dados
+#'     da produtividade do arroz estão em kg/ha.
 #' @format Um \code{data.frame} com 32 observações e 7 variáveis, em que
 #'
 #' \describe{
@@ -419,9 +411,7 @@ NULL
 #'
 #' }
 #' @keywords DBC FAT confundimento
-#' @source Zimmermann, F. J. (2004). Estatística aplicada à pesquisa
-#'     agrícola (1st ed.). Santo Antônio de Goiás, GO: Embrapa Arroz e
-#'     Feijão. (Tabela 11.19, pág. 237)
+#' @source ZIMMERMANN (2004), Tabela 11.19, pág. 237.
 #' @examples
 #'
 #' library(lattice)
@@ -451,7 +441,8 @@ NULL
 NULL
 
 #' @name ZimmermannTb11.7
-#' @title Espa\enc{ç}{c}amento, Densidade e Nitrog\enc{ê}{e}nio na Produ\enc{çã}{ca}o de Arroz
+#' @title Espa\enc{ç}{c}amento, Densidade e Nitrog\enc{ê}{e}nio na
+#'     Produ\enc{çã}{ca}o de Arroz
 #' @description Dados de um experimento fatorial \eqn{2^3}, com
 #'     confundimento de duas das interações simples. Referem-se à
 #'     produtividade de grãos, em kg ha\eqn{^{-1}}. O ensaio foi
@@ -492,9 +483,7 @@ NULL
 #'     para fins didáticos. Não se deve alterar o delineamento de dados
 #'     reais para conduzir as análises.
 #' @keywords DBC FAT confundimento
-#' @source Zimmermann, F. J. (2004). Estatística aplicada à pesquisa
-#'     agrícola (1st ed.). Santo Antônio de Goiás, GO: Embrapa Arroz e
-#'     Feijão. (Tabela 11.7, pág 226)
+#' @source ZIMMERMANN (2004), Tabela 11.7, pág 226.
 #' @examples
 #'
 #' library(lattice)
@@ -538,9 +527,7 @@ NULL
 #'
 #' }
 #' @keywords DIC
-#' @source Zimmermann, F. J. (2004). Estatística aplicada à pesquisa
-#'     agrícola (1st ed.). Santo Antônio de Goiás, GO: Embrapa Arroz e
-#'     Feijão. (pg 249)
+#' @source ZIMMERMANN (2004), Tabela 12.1, pág. 249.
 #' @examples
 #'
 #' library(lattice)
@@ -583,9 +570,7 @@ NULL
 #'
 #' }
 #' @keywords DBC proporção
-#' @source Zimmermann, F. J. (2004). Estatística aplicada à pesquisa
-#'     agrícola (1st ed.). Santo Antônio de Goiás, GO: Embrapa Arroz e
-#'     Feijão. (Tab 12.13, pág 255)
+#' @source ZIMMERMANN (2004), Tabela 12.13, pág. 255.
 #' @examples
 #'
 #' library(lattice)
@@ -628,9 +613,7 @@ NULL
 #'
 #' }
 #' @keywords DBC proporção
-#' @source Zimmermann, F. J. (2004). Estatística aplicada à pesquisa
-#'     agrícola (1st ed.). Santo Antônio de Goiás, GO: Embrapa Arroz e
-#'     Feijão. (pg 255)
+#' @source ZIMMERMANN (2004), Tabela 12.14, pág. 255.
 #' @examples
 #'
 #' library(lattice)
@@ -650,7 +633,8 @@ NULL
 NULL
 
 #' @name ZimmermannTb12.19
-#' @title Produtividade de feij\enc{ã}{a}o em ensaio de competi\enc{çã}{ca}o de cultivares
+#' @title Produtividade de feij\enc{ã}{a}o em ensaio de
+#'     competi\enc{çã}{ca}o de cultivares
 #' @description Dados do ensaio 1 de um experimento em DBC de competição
 #'     de cultivares de feijão do grupo preto. Este ensaio foi realizado
 #'     no município de Senador Canedo (GO). Houveram três cultivares
@@ -671,9 +655,7 @@ NULL
 #'
 #' }
 #' @keywords DBC
-#' @source Zimmermann, F. J. (2004). Estatística aplicada à pesquisa
-#'     agrícola (1st ed.). Santo Antônio de Goiás, GO: Embrapa Arroz e
-#'     Feijão. (Tabela 12.19, pág 258)
+#' @source ZIMMERMANN (2004), Tabela 12.19, pág. 258.
 #' @examples
 #'
 #' library(lattice)
@@ -715,9 +697,7 @@ NULL
 #'
 #' }
 #' @keywords DIC
-#' @source Zimmermann, F. J. (2004). Estatística aplicada à pesquisa
-#'     agrícola (1st ed.). Santo Antônio de Goiás, GO: Embrapa Arroz e
-#'     Feijão. (Tabela 12.2, pág 249)
+#' @source ZIMMERMANN (2004), Tabela 12.2, pág. 249.
 #' @examples
 #'
 #' library(lattice)
@@ -736,7 +716,8 @@ NULL
 NULL
 
 #' @name ZimmermannTb12.20
-#' @title Produtividade de Gr\enc{ã}{a}os de Cultivares de Feij\enc{ã}{a}o
+#' @title Produtividade de Gr\enc{ã}{a}os de Cultivares de
+#'     Feij\enc{ã}{a}o
 #' @description Dados do ensaio 2 de um experimento em DBC de competição
 #'     de cultivares de feijão do grupo preto. Este ensaio foi realizado
 #'     no município de Santo Antonio de Goiás (GO). Houveram três
@@ -758,9 +739,7 @@ NULL
 #'
 #' }
 #' @keywords DBC
-#' @source Zimmermann, F. J. (2004). Estatística aplicada à pesquisa
-#'     agrícola (1st ed.). Santo Antônio de Goiás, GO: Embrapa Arroz e
-#'     Feijão. (pg 258)
+#' @source ZIMMERMANN (2004), Tabela 12.20, pág. 258.
 #' @examples
 #'
 #' library(lattice)
@@ -798,9 +777,7 @@ NULL
 #'
 #' }
 #' @keywords DQL
-#' @source Zimmermann, F. J. (2004). Estatística aplicada à pesquisa
-#'     agrícola (1st ed.). Santo Antônio de Goiás, GO: Embrapa Arroz e
-#'     Feijão. (pg 261)
+#' @source ZIMMERMANN (2004), Tabela 12.16, pág. 261.
 #' @examples
 #'
 #' library(lattice)
@@ -850,9 +827,7 @@ NULL
 #'
 #' }
 #' @keywords DQL
-#' @source Zimmermann, F. J. (2004). Estatística aplicada à pesquisa
-#'     agrícola (1st ed.). Santo Antônio de Goiás, GO: Embrapa Arroz e
-#'     Feijão. (Tabela 12.27, pág 262)
+#' @source ZIMMERMANN (2004), Tabela 12.27, pág. 262.
 #' @examples
 #'
 #' library(lattice)
@@ -881,29 +856,27 @@ NULL
 
 #' @name ZimmermannTb12.32
 #' @title Competi\enc{çã}{ca}o de Cultivares de Feij\enc{ã}{a}o
-#' @description Dados de um estudo em delineamento de blocos completos com 
-#'     quatro repetições. O experimento foi um ensaio de competição de
-#'     cultivares e linhagens de feijão, em cultivos irrigado e de sequeiro.
-#'     São apresentadas na tabela a média nos ensaios irrigados, nos de sequeiro
-#'     e geral. 
+#' @description Dados de um estudo em delineamento de blocos completos
+#'     com quatro repetições. O experimento foi um ensaio de competição
+#'     de cultivares e linhagens de feijão, em cultivos irrigado e de
+#'     sequeiro.  São apresentadas na tabela a média nos ensaios
+#'     irrigados, nos de sequeiro e geral.
 #' @format Um \code{data.frame} com 13 observações e 4 variáveis
 #'
 #' \describe{
 #'
-#' \item{\code{geno}}{Fator de níveis nominais. Identifica o genótipo repetição 
-#'     da observação.}
+#' \item{\code{geno}}{Fator de níveis nominais. Identifica o genótipo
+#'     repetição da observação.}
 #'
 #' \item{\code{irrigados}}{Médias nos ensaios irrigados.}
-#' 
+#'
 #' \item{\code{sequeiro}}{Médias nos ensaios de sequeiro.}
 #'
 #' \item{\code{geral}}{Média geral.}
 #'
 #' }
 #' @keywords DBC
-#' @source Zimmermann, F. J. (2004). Estatística aplicada à pesquisa
-#'     agrícola (1st ed.). Santo Antônio de Goiás, GO: Embrapa Arroz e
-#'     Feijão. (Tabela 12.32, pág 264)
+#' @source ZIMMERMANN (2004), Tabela 12.32, pág. 264.
 #' @examples
 #'
 #' library(lattice)
@@ -922,29 +895,27 @@ NULL
 
 #' @name ZimmermannTb12.33
 #' @title Competi\enc{çã}{ca}o de Cultivares de Feij\enc{ã}{a}o
-#' @description Dados de um estudo em delineamento de blocos completos com 
-#'     quatro repetições. O experimento foi um ensaio de competição de
-#'     cultivares e linhagens de feijão, em cultivos irrigado e de sequeiro.
-#'     São apresentadas na tabela o total nos ensaios irrigados, nos de sequeiro
-#'     e geral. 
+#' @description Dados de um estudo em delineamento de blocos completos
+#'     com quatro repetições. O experimento foi um ensaio de competição
+#'     de cultivares e linhagens de feijão, em cultivos irrigado e de
+#'     sequeiro.  São apresentadas na tabela o total nos ensaios
+#'     irrigados, nos de sequeiro e geral.
 #' @format Um \code{data.frame} com 13 observações e 4 variáveis
 #'
 #' \describe{
 #'
-#' \item{\code{geno}}{Fator de níveis nominais. Identifica o genótipo repetição 
-#'     da observação.}
+#' \item{\code{geno}}{Fator de níveis nominais. Identifica o genótipo
+#'     repetição da observação.}
 #'
 #' \item{\code{irrigados}}{Totais nos ensaios irrigados.}
-#' 
+#'
 #' \item{\code{sequeiro}}{Totais nos ensaios de sequeiro.}
 #'
 #' \item{\code{geral}}{Total geral.}
 #'
 #' }
 #' @keywords DBC
-#' @source Zimmermann, F. J. (2004). Estatística aplicada à pesquisa
-#'     agrícola (1st ed.). Santo Antônio de Goiás, GO: Embrapa Arroz e
-#'     Feijão. (Tabela 12.33, pág 265)
+#' @source ZIMMERMANN (2004), Tabela 12.33, pág. 265.
 #' @examples
 #'
 #' library(lattice)
@@ -984,9 +955,7 @@ NULL
 #'
 #' }
 #' @keywords DBC
-#' @source Zimmermann, F. J. (2004). Estatística aplicada à pesquisa
-#'     agrícola (1st ed.). Santo Antônio de Goiás, GO: Embrapa Arroz e
-#'     Feijão. (Tabela 12.7, pág 251)
+#' @source ZIMMERMANN (2004), Tabela 12.7, pág. 251.
 #' @examples
 #'
 #' library(lattice)
@@ -1028,9 +997,7 @@ NULL
 #'
 #' }
 #' @keywords DBC
-#' @source Zimmermann, F. J. (2004). Estatística aplicada à pesquisa
-#'     agrícola (1st ed.). Santo Antônio de Goiás, GO: Embrapa Arroz e
-#'     Feijão. (pg 252)
+#' @source ZIMMERMANN (2004), Tabela 12.8, pág. 252.
 #' @examples
 #'
 #' library(lattice)
@@ -1070,9 +1037,7 @@ NULL
 #'
 #' }
 #' @keywords REG
-#' @source Zimmermann, F. J. (2004). Estatística aplicada à pesquisa
-#'     agrícola (1st ed.). Santo Antônio de Goiás, GO: Embrapa Arroz e
-#'     Feijão. (Tabela 13.1, pág 272)
+#' @source ZIMMERMANN (2004), Tabela 13.1, pág. 272.
 #' @examples
 #'
 #' library(lattice)
@@ -1084,7 +1049,8 @@ NULL
 NULL
 
 #' @name ZimmermannTb14.3
-#' @title Estande de Plantas e Produtividade de Cultivares de Feij\enc{ã}{a}o
+#' @title Estande de Plantas e Produtividade de Cultivares de
+#'     Feij\enc{ã}{a}o
 #' @description Dados de um ensaio de competição de cultivares de feijão
 #'     onde foram registrados a produtivididade, bem como o estande por
 #'     área útil, para sete cultivares de arroz. O experimento foi feito
@@ -1110,9 +1076,7 @@ NULL
 #'     mesmo ensaio, porém com mais cultivares e sem a informação de
 #'     estande.
 #' @keywords DBC COV
-#' @source Zimmermann, F. J. (2004). Estatística aplicada à pesquisa
-#'     agrícola (1st ed.). Santo Antônio de Goiás, GO: Embrapa Arroz e
-#'     Feijão. (Tabela 14.3, pág 293)
+#' @source ZIMMERMANN (2004), Tabela 14.3, pág. 293.
 #' @examples
 #'
 #' library(lattice)
@@ -1154,7 +1118,8 @@ NULL
 NULL
 
 #' @name ZimmermannTb14.9
-#' @title Controle de Insetos na Produtividade de Gr\enc{ã}{a}os de Arroz
+#' @title Controle de Insetos na Produtividade de Gr\enc{ã}{a}os de
+#'     Arroz
 #' @description Dados de um ensaio de controle de insetos/pragas na
 #'     cultura do arroz.  O experimento foi feito em delineamento
 #'     quadrado latino 6 \eqn{\times} 6 mas há uma um dado perdido
@@ -1177,9 +1142,7 @@ NULL
 #'     número de perfilhos de arroz, estão disponíveis em
 #'     \code{\link{ZimmermannTb5.15}}.
 #' @keywords DQL desbalanceado
-#' @source Zimmermann, F. J. (2004). Estatística aplicada à pesquisa
-#'     agrícola (1st ed.). Santo Antônio de Goiás, GO: Embrapa Arroz e
-#'     Feijão. (Tabela 14.9, pág. 297)
+#' @source ZIMMERMANN (2004), Tabela 14.9, pág. 297.
 #' @examples
 #'
 #' library(lattice)
@@ -1210,7 +1173,8 @@ NULL
 NULL
 
 #' @name ZimmermannTb15.1
-#' @title Produ\enc{çã}{ca}o de Perfilhos por Planta em Fun\enc{çã}{ca}o de 4 Fatores
+#' @title Produ\enc{çã}{ca}o de Perfilhos por Planta em Fun\enc{çã}{ca}o
+#'     de 4 Fatores
 #' @description Dados de um ensaio fatorial fracionado \eqn{2^{4-1}}, em
 #'     blocos ao acaso. O experimento mediu o número médio de perfilhos
 #'     por planta. Os quatro fatores estudados foram: cultivar,
@@ -1245,9 +1209,7 @@ NULL
 #'     a mesma fração do fatorial (a fração complementar não foi
 #'     utilizada).
 #' @keywords DBC FRAC
-#' @source Zimmermann, F. J. (2004). Estatística aplicada à pesquisa
-#'     agrícola (1st ed.). Santo Antônio de Goiás, GO: Embrapa Arroz e
-#'     Feijão. (pg 306)
+#' @source ZIMMERMANN (2004), Tabela 15.1, pág. 306.
 #' @examples
 #'
 #' library(lattice)
@@ -1290,9 +1252,7 @@ NULL
 #'
 #' }
 #' @keywords FRAC superficie
-#' @source Zimmermann, F. J. (2004). Estatística aplicada à pesquisa
-#'     agrícola (1st ed.). Santo Antônio de Goiás, GO: Embrapa Arroz e
-#'     Feijão. (Tabela 15.10, pág. 314)
+#' @source ZIMMERMANN (2004), Tabela 15.10, pág. 314.
 #' @examples
 #'
 #' library(lattice)
@@ -1345,9 +1305,7 @@ NULL
 #'     blocos (do total de 9) continham a combinação 000 de zinco,
 #'     fósforo e cálcio.
 #' @keywords DBC FRAC
-#' @source Zimmermann, F. J. (2004). Estatística aplicada à pesquisa
-#'     agrícola (1st ed.). Santo Antônio de Goiás, GO: Embrapa Arroz e
-#'     Feijão. (Tabela 15.4, pág. 309)
+#' @source ZIMMERMANN (2004), Tabela 15.4, pág. 309.
 #' @examples
 #'
 #' library(lattice)
@@ -1396,9 +1354,7 @@ NULL
 #'
 #' }
 #' @keywords correlacao
-#' @source Zimmermann, F. J. (2004). Estatística aplicada à pesquisa
-#'     agrícola (1st ed.). Santo Antônio de Goiás, GO: Embrapa Arroz e
-#'     Feijão. (Tabela 16.1, pág. 327)
+#' @source ZIMMERMANN (2004), Tabela 16.1, pág. 327.
 #' @examples
 #'
 #' data(ZimmermannTb16.1)
@@ -1439,9 +1395,7 @@ NULL
 #'
 #' }
 #' @keywords DQL contagem
-#' @source Zimmermann, F. J. (2004). Estatística aplicada à pesquisa
-#'     agrícola (1st ed.). Santo Antônio de Goiás, GO: Embrapa Arroz e
-#'     Feijão. (Tabela 16.10, pág. 357)
+#' @source ZIMMERMANN (2004), Tabela 16.10, pág. 357.
 #' @examples
 #'
 #' library(lattice)
@@ -1472,7 +1426,8 @@ NULL
 NULL
 
 #' @name ZimmermannTb16.3
-#' @title Teores de Mat\enc{é}{e}ria Org\enc{â}{a}nica de Solos de V\enc{á}{a}rzea
+#' @title Teores de Mat\enc{é}{e}ria Org\enc{â}{a}nica de Solos de
+#'     V\enc{á}{a}rzea
 #' @description Teores de matéria orgânica de solos aluviais e gely
 #'     húmicos.
 #' @format Um \code{data.frame} com 14 observações e 2 variáveis, em que
@@ -1486,9 +1441,7 @@ NULL
 #'
 #' }
 #' @keywords TODO
-#' @source Zimmermann, F. J. (2004). Estatística aplicada à pesquisa
-#'     agrícola (1st ed.). Santo Antônio de Goiás, GO: Embrapa Arroz e
-#'     Feijão. (Tabela 16.3, pág. 337)
+#' @source ZIMMERMANN (2004), Tabela 16.3, pág. 337.
 #' @examples
 #'
 #' # Postos.
@@ -1519,9 +1472,7 @@ NULL
 #'
 #' }
 #' @keywords DIC contagem
-#' @source Zimmermann, F. J. (2004). Estatística aplicada à pesquisa
-#'     agrícola (1st ed.). Santo Antônio de Goiás, GO: Embrapa Arroz e
-#'     Feijão. (Tabela 16.4, pág. 341)
+#' @source ZIMMERMANN (2004), Tabela 16.4, pág. 341.
 #' @examples
 #'
 #' library(lattice)
@@ -1538,7 +1489,8 @@ NULL
 NULL
 
 #' @name ZimmermannTb16.5
-#' @title N\enc{ú}{u}mero de Dias para Flora\enc{çã}{ca}o de Cultivares de Arroz
+#' @title N\enc{ú}{u}mero de Dias para Flora\enc{çã}{ca}o de Cultivares
+#'     de Arroz
 #' @description Experimento realizado em delineamento em blocos
 #'     completos ao acaso, utilizando oito cultivares de arroz
 #'     irrigado. Os dados são referentes ao número de dias até a
@@ -1562,9 +1514,7 @@ NULL
 #'
 #' }
 #' @keywords DIC sobrevivencia
-#' @source Zimmermann, F. J. (2004). Estatística aplicada à pesquisa
-#'     agrícola (1st ed.). Santo Antônio de Goiás, GO: Embrapa Arroz e
-#'     Feijão. (Tabela 16.5, pág 347)
+#' @source ZIMMERMANN (2004), Tabela 16.5, pág. 347.
 #' @examples
 #'
 #' library(lattice)
@@ -1597,8 +1547,8 @@ NULL
 NULL
 
 #' @name ZimmermannTb16.8
-#' @title Dias para Flora\enc{çã}{ca}o de Cultivares de Arroz em um Reticulado
-#'     Quadrado
+#' @title Dias para Flora\enc{çã}{ca}o de Cultivares de Arroz em um
+#'     Reticulado Quadrado
 #' @description Experimento realizado em delineamento reticulado
 #'     quadrado 5 \eqn{\times} 5, com três repetições. Os dados são
 #'     referentes ao número de dias até a floração das cultivares de
@@ -1627,9 +1577,7 @@ NULL
 #' @seealso Os dados de produção de arroz do mesmo ensaio estão
 #'     disponíveis em \code{\link{ZimmermannTb7.1}}.
 #' @keywords LAT sobrevivencia
-#' @source Zimmermann, F. J. (2004). Estatística aplicada à pesquisa
-#'     agrícola (1st ed.). Santo Antônio de Goiás, GO: Embrapa Arroz e
-#'     Feijão. (Tabela 16.8, pág. 353)
+#' @source ZIMMERMANN (2004), Tabela 16.8, pág. 353.
 #' @examples
 #'
 #' library(lattice)
@@ -1662,7 +1610,7 @@ NULL
 NULL
 
 #' @name ZimmermannTb3.12
-#' @title Dados de mat\enc{é}{e}ria seca em plantas
+#' @title Dados de Mat\enc{é}{e}ria Seca em Plantas
 #' @description Experimento em DIC que estudou a produção de matéria
 #'     seca em plantas de arroz, em gramas. No experimento foram
 #'     utilizados cinco vasos para cada um de quatro tratamentos e três
@@ -1684,9 +1632,7 @@ NULL
 #'
 #' }
 #' @keywords DIC
-#' @source Zimmermann, F. J. (2004). Estatística aplicada à pesquisa
-#'     agrícola (1st ed.). Santo Antônio de Goiás, GO: Embrapa Arroz e
-#'     Feijão. (Table 3.12, pág 62)
+#' @source ZIMMERMANN (2004), Tabela 3.12, pág. 62.
 #' @examples
 #'
 #' library(lattice)
@@ -1727,9 +1673,7 @@ NULL
 #'
 #' }
 #' @keywords DIC
-#' @source Zimmermann, F. J. (2004). Estatística aplicada à pesquisa
-#'     agrícola (1st ed.). Santo Antônio de Goiás, GO: Embrapa Arroz e
-#'     Feijão. (pg 54)
+#' @source ZIMMERMANN (2004), Tabela 3.2.1, pág. 54.
 #' @examples
 #'
 #' library(lattice)
@@ -1751,8 +1695,8 @@ NULL
 NULL
 
 #' @name ZimmermannTb3.5
-#' @title Fracionamento da Aduba\enc{çã}{ca}o na Produ\enc{çã}{ca}o de Gr\enc{ã}{a}os de Arroz
-#'     Irrigado
+#' @title Fracionamento da Aduba\enc{çã}{ca}o na Produ\enc{çã}{ca}o de
+#'     Gr\enc{ã}{a}os de Arroz Irrigado
 #' @description Dados de um estudo sobre adubação nitrogenada na cultura
 #'     do arroz irrigado. Foram testadas quatros formas de aplicação do
 #'     adubo fazendo o fracionamento das quantidades em diferentes
@@ -1776,9 +1720,7 @@ NULL
 #'
 #' }
 #' @keywords DIC
-#' @source Zimmermann, F. J. (2004). Estatística aplicada à pesquisa
-#'     agrícola (1st ed.). Santo Antônio de Goiás, GO: Embrapa Arroz e
-#'     Feijão. (Tabela 3.5, pág. 54)
+#' @source ZIMMERMANN (2004), Tabela 3.5, pág. 54.
 #' @examples
 #'
 #' library(lattice)
@@ -1824,9 +1766,7 @@ NULL
 #'
 #' }
 #' @keywords DBC
-#' @source Zimmermann, F. J. (2004). Estatística aplicada à pesquisa
-#'     agrícola (1st ed.). Santo Antônio de Goiás, GO: Embrapa Arroz e
-#'     Feijão. (Tabela 4.11, pág 79)
+#' @source ZIMMERMANN (2004), Tabela 4.11, pág. 79.
 #' @examples
 #'
 #' library(lattice)
@@ -1866,9 +1806,7 @@ NULL
 #'
 #' }
 #' @keywords DBC
-#' @source Zimmermann, F. J. (2004). Estatística aplicada à pesquisa
-#'     agrícola (1st ed.). Santo Antônio de Goiás, GO: Embrapa Arroz e
-#'     Feijão. (Tabela 4.4, pág 72)
+#' @source ZIMMERMANN (2004), Tabela 4.4, pág. 72.
 #' @examples
 #'
 #' library(lattice)
@@ -1890,7 +1828,8 @@ NULL
 NULL
 
 #' @name ZimmermannTb5.11
-#' @title Propor\enc{çã}{ca}o de hastes sobreviventes ao ataque de insetos
+#' @title Propor\enc{çã}{ca}o de Hastes Sobreviventes ao Ataque de
+#'     Insetos
 #' @description Experimento em delineamento quadrado latino onde foram
 #'     tomadas quatro amostras em cada uma das parcelas (tipo de
 #'     inseticida) no que diz respeito ao número total de hastes e
@@ -1921,9 +1860,7 @@ NULL
 #'
 #' }
 #' @keywords DQL
-#' @source Zimmermann, F. J. (2004). Estatística aplicada à pesquisa
-#'     agrícola (1st ed.). Santo Antônio de Goiás, GO: Embrapa Arroz e
-#'     Feijão. (Tabela 5.1, pág 101)
+#' @source ZIMMERMANN (2004), Tabela 5.1, pág. 101.
 #' @examples
 #'
 #' library(lattice)
@@ -1955,7 +1892,8 @@ NULL
 NULL
 
 #' @name ZimmermannTb5.15
-#' @title N\enc{ú}{u}mero de Perfilhos em Arroz em Fun\enc{çã}{ca}o de 6 Tratamentos
+#' @title N\enc{ú}{u}mero de Perfilhos em Arroz em Fun\enc{çã}{ca}o de 6
+#'     Tratamentos
 #' @description Esperimento conduzido pelo pesquisador Evane Ferreira,
 #'     em Santo Antônio de Goiás, em 1998. O estudo avaliou o número de
 #'     perfilhos de arroz em função de 6 tratamentos (não mencionados)
@@ -1977,9 +1915,7 @@ NULL
 #'
 #' }
 #' @keywords DQL contagem
-#' @source Zimmermann, F. J. (2004). Estatística aplicada à pesquisa
-#'     agrícola (1st ed.). Santo Antônio de Goiás, GO: Embrapa Arroz e
-#'     Feijão. (Tabela 5.15, pág. 107)
+#' @source ZIMMERMANN (2004), Tabela 5.15, pág. 107.
 #' @examples
 #'
 #' library(lattice)
@@ -1996,7 +1932,8 @@ NULL
 NULL
 
 #' @name ZimmermannTb5.2
-#' @title Produ\enc{çã}{ca}o de Gr\enc{ã}{a}os de Gen\enc{ó}{o}tipos de Arroz
+#' @title Produ\enc{çã}{ca}o de Gr\enc{ã}{a}os de Gen\enc{ó}{o}tipos de
+#'     Arroz
 #' @description Experimento em delineamento quadrado latino cujo
 #'     objetivo foi medir a resposta em produtividade de um grupo de
 #'     oito genótipos de arroz ao ataque inicial de pragas.
@@ -2017,9 +1954,7 @@ NULL
 #'
 #' }
 #' @keywords DQL
-#' @source Zimmermann, F. J. (2004). Estatística aplicada à pesquisa
-#'     agrícola (1st ed.). Santo Antônio de Goiás, GO: Embrapa Arroz e
-#'     Feijão. (Tabela 5.2, pág 92)
+#' @source ZIMMERMANN (2004), Tabela 5.2, pág. 92.
 #' @examples
 #'
 #' library(lattice)
@@ -2048,7 +1983,8 @@ NULL
 NULL
 
 #' @name ZimmermannTb7.1
-#' @title Ensaio de Competi\enc{çã}{ca}o de Cultivares em Reticulado Quadrado
+#' @title Ensaio de Competi\enc{çã}{ca}o de Cultivares em Reticulado
+#'     Quadrado
 #' @description Experimento feito pelos pesquisadores Orlando Peixoto
 #'     Moraes, Emilio da Maia de Castro e Flavio Breseghello, da Embrapa
 #'     Arroz e Feijão, na fazenda Capivara em Santo Antônio de Goiás. O
@@ -2073,9 +2009,7 @@ NULL
 #'
 #' }
 #' @keywords LAT
-#' @source Zimmermann, F. J. (2004). Estatística aplicada à pesquisa
-#'     agrícola (1st ed.). Santo Antônio de Goiás, GO: Embrapa Arroz e
-#'     Feijão. (Tabela 7.1, pág. 136)
+#' @source ZIMMERMANN (2004), Tabela 7.1, pág. 136.
 #' @examples
 #'
 #' library(lattice)
@@ -2095,7 +2029,8 @@ NULL
 NULL
 
 #' @name ZimmermannTb7.4
-#' @title Produ\enc{çã}{ca}o de Gr\enc{ã}{a}os de Arroz em Ensaio Reticulado Retangular
+#' @title Produ\enc{çã}{ca}o de Gr\enc{ã}{a}os de Arroz em Ensaio
+#'     Reticulado Retangular
 #' @description Dados de um estudo sobre competição de cultivares e
 #'     linhagens de arroz irrigado quanto a produtividade. O experimento
 #'     foi conduzido em ensaio em reticulado retangular 5 \eqn{\times} 6
@@ -2120,9 +2055,7 @@ NULL
 #'
 #' }
 #' @keywords reticulado
-#' @source Zimmermann, F. J. (2004). Estatística aplicada à pesquisa
-#'     agrícola (1st ed.). Santo Antônio de Goiás, GO: Embrapa Arroz e
-#'     Feijão. (Tabela 7.4, pág. 140)
+#' @source ZIMMERMANN (2004), Tabela 7.4, pág. 140.
 #' @examples
 #'
 #' library(lattice)
@@ -2141,8 +2074,8 @@ NULL
 NULL
 
 #' @name ZimmermannTb8.5
-#' @title Produ\enc{çã}{ca}o de Gr\enc{ã}{a}os de Feij\enc{ã}{a}o em Delineamento de Blocos Aumentos
-#'     de Federer
+#' @title Produ\enc{çã}{ca}o de Gr\enc{ã}{a}os de Feij\enc{ã}{a}o em
+#'     Delineamento de Blocos Aumentados de Federer
 #' @description Dados de um estudo em desenho de blocos aumentados de
 #'     Federer, com total de dezoito blocos, cada um com quatro
 #'     testemunhas (1 a 4), e 12 linhagens, num total de 216
@@ -2165,9 +2098,7 @@ NULL
 #'
 #' }
 #' @keywords BAF
-#' @source Zimmermann, F. J. (2004). Estatística aplicada à pesquisa
-#'     agrícola (1st ed.). Santo Antônio de Goiás, GO: Embrapa Arroz e
-#'     Feijão. (Tabela 8.5, pág. 158)
+#' @source ZIMMERMANN (2004), Tabela 8.5, pág. 158.
 #' @examples
 #'
 #' library(lattice)
@@ -2185,7 +2116,8 @@ NULL
 NULL
 
 #' @name ZimmermannTb9.13
-#' @title Mat\enc{é}{e}ria Seca de Feij\enc{ã}{a}o em Fatorial 3x3
+#' @title Mat\enc{é}{e}ria Seca de Feij\enc{ã}{a}o em Fatorial 3
+#'     \eqn{\times} 3
 #' @description Dados de um estudo em ensaio fatorial 3 \eqn{times} 3,
 #'     considerando três níveis de densidade de solo e três doses
 #'     microelementos. Cada vaso continha três plantas de arroz e,
@@ -2211,9 +2143,7 @@ NULL
 #'
 #' }
 #' @keywords FAT
-#' @source Zimmermann, F. J. (2004). Estatística aplicada à pesquisa
-#'     agrícola (1st ed.). Santo Antônio de Goiás, GO: Embrapa Arroz e
-#'     Feijão. (Tabela 9.13, pág 179)
+#' @source ZIMMERMANN (2004), Tabela 9.13, pág. 179.
 #' @examples
 #'
 #' library(lattice)
@@ -2234,7 +2164,8 @@ NULL
 NULL
 
 #' @name ZimmermannTb9.17
-#' @title \enc{É}{E}poca de Aplica\enc{çã}{ca}o de NK na Produ\enc{çã}{ca}o de Gr\enc{ã}{a}os de Arroz
+#' @title \enc{É}{E}poca de Aplica\enc{çã}{ca}o de NK na
+#'     Produ\enc{çã}{ca}o de Gr\enc{ã}{a}os de Arroz
 #' @description Dados de um estudo em ensaio fatorial 3 \eqn{\times} 3,
 #'     referentes à produção de grãos de arroz, em kg ha\eqn{^{-1}}. O
 #'     delineamento é o de blocos completos ao acaso, com três
@@ -2261,9 +2192,7 @@ NULL
 #'
 #' }
 #' @keywords FAT3
-#' @source Zimmermann, F. J. (2004). Estatística aplicada à pesquisa
-#'     agrícola (1st ed.). Santo Antônio de Goiás, GO: Embrapa Arroz e
-#'     Feijão. (Tabela 9.17, pág. 182)
+#' @source ZIMMERMANN (2004), Tabela 9.17, pág. 182.
 #' @examples
 #'
 #' library(lattice)
@@ -2287,8 +2216,8 @@ NULL
 NULL
 
 #' @name ZimmermannTb9.22
-#' @title Fungicidas e Pol\enc{í}{i}mero na Infec\enc{çã}{ca}o de \emph{Fusarium} em
-#'     Sementes
+#' @title Fungicidas e Pol\enc{í}{i}mero na Infec\enc{çã}{ca}o de
+#'     \emph{Fusarium} em Sementes
 #' @description Resultados de um experimento fatorial com tratamentos
 #'     adicionais \eqn{3 \times 3 + 2} que estudou o número de sementes
 #'     infectadas por fusaruim em função aplicação de fungicidas às
@@ -2318,9 +2247,7 @@ NULL
 #'
 #' }
 #' @keywords DIC binomial
-#' @source Zimmermann, F. J. (2004). Estatística aplicada à pesquisa
-#'     agrícola (1st ed.). Santo Antônio de Goiás, GO: Embrapa Arroz e
-#'     Feijão. (Tabela 9.22, pág. 188)
+#' @source ZIMMERMANN (2004), Tabela 9.22, pág. 188.
 #' @examples
 #'
 #' library(lattice)
@@ -2350,7 +2277,8 @@ NULL
 NULL
 
 #' @name ZimmermannTb9.26
-#' @title \enc{É}{E}poca de Aplica\enc{çã}{ca}o de NK na Altura de Plantas
+#' @title \enc{É}{E}poca de Aplica\enc{çã}{ca}o de NK na Altura de
+#'     Plantas
 #' @description Dados de um estudo em fatorial \eqn{3^3}, sobre adubação
 #'     nitrogenada e potássica e suas épocas de aplicação. Os dados são
 #'     referentes a altura de plantas no cultivo da soca de arroz
@@ -2373,9 +2301,7 @@ NULL
 #'
 #' }
 #' @keywords FAT3
-#' @source Zimmermann, F. J. (2004). Estatística aplicada à pesquisa
-#'     agrícola (1st ed.). Santo Antônio de Goiás, GO: Embrapa Arroz e
-#'     Feijão. (Tabela 9.26, pág. 190)
+#' @source ZIMMERMANN (2004), Tabela 9.26, pág. 190.
 #' @examples
 #'
 #' library(lattice)
@@ -2397,4 +2323,3 @@ NULL
 #'                    factor.levels = c("Nitrogênio", "Potássio")))
 #'
 NULL
-
-- 
GitLab


From 2b0967cb3a93cc341f893d6acd543cdc31a3e583 Mon Sep 17 00:00:00 2001
From: Walmes Zeviani <walmes@ufpr.br>
Date: Tue, 23 Aug 2016 21:02:10 -0300
Subject: [PATCH 05/10] Adiciona bibtex da obra Paulino e Singer.

---
 vignettes/config/bibliography.bib | 63 +++++++++++++++++++++++--------
 1 file changed, 47 insertions(+), 16 deletions(-)

diff --git a/vignettes/config/bibliography.bib b/vignettes/config/bibliography.bib
index 0cc52bda..ffbe5246 100644
--- a/vignettes/config/bibliography.bib
+++ b/vignettes/config/bibliography.bib
@@ -1,13 +1,15 @@
-% This file was created with JabRef 2.10b2.
+% This file was created with JabRef 2.10.
 % Encoding: UTF-8
 
+
 @Book{banzatto,
   Title                    = {Experimentação Agrícola},
   Author                   = {Banzatto, D. A. and Kronka, S. D.},
   Publisher                = {Funep},
   Year                     = {2013},
+
   Address                  = {Jaboticabal, SP},
-  Edition                  = {4},
+  Edition                  = {4}
 }
 
 @Book{barbin,
@@ -15,8 +17,9 @@
   Author                   = {Barbin, D.},
   Publisher                = {Mecenas},
   Year                     = {2013},
+
   Address                  = {Londrina, PR},
-  Edition                  = {2},
+  Edition                  = {2}
 }
 
 @Book{dias,
@@ -24,7 +27,8 @@
   Author                   = {Barros, W. S. and Dias, L. A. S.},
   Publisher                = {Editora UFV},
   Year                     = {2009},
-  Address                  = {Viçosa, MG},
+
+  Address                  = {Viçosa, MG}
 }
 
 @Book{charnet,
@@ -32,8 +36,9 @@
   Author                   = {Charnet, R. and de Luna Freire, C.A. and Charnet, E.M.R. and Bonvino, H.},
   Publisher                = {Editora Unicamp},
   Year                     = {2008},
+
   Address                  = {Campinas, SP},
-  Edition                  = {2},
+  Edition                  = {2}
 }
 
 @Book{epprecht,
@@ -41,31 +46,38 @@
   Author                   = {Costa, A. F. B. and Epprecht, E. K. and Carpinetti, L.},
   Publisher                = {Atlas},
   Year                     = {2010},
+
   Address                  = {São Paulo, SP},
-  Edition                  = {2},
+  Edition                  = {2}
 }
 
 @Misc{costa,
   Title                    = {Técnicas Experimentais aplicadas às Ciências Agrárias},
+
   Author                   = {Costa, J. R.},
   HowPublished             = {Seropédica, RJ: Embrapa Agrobiologia (Documentos 163)},
   Year                     = {2003},
+
   Url                      = {http://www.ica.ufmg.br/mestrado_doutorado/images/stories/arquivos_mestrado/experimentao%20agrcola.pdf}
 }
 
 @Misc{demetrio,
   Title                    = {Modelos de Regressão},
+
   Author                   = {Demétrio, C. G. B. and Zocchi, S. S.},
   HowPublished             = {Piracicaba, SP. ESALQ (apostila)},
   Year                     = {2011},
+
   Url                      = {http://www.lce.esalq.usp.br/arquivos/aulas/2011/LCE5801/Apostila.pdf}
 }
 
 @Misc{faria,
   Title                    = {Notas de aulas expandidas: Metodologia e Estatística Experimental},
+
   Author                   = {Faria, J. C.},
   HowPublished             = {Ilhéus, BA. UESC (apostila)},
   Year                     = {2009},
+
   Url                      = {http://nbcgib.uesc.br/lec/download/faria/apostilas/CET076_12ed_1pf.pdf}
 }
 
@@ -74,8 +86,9 @@
   Author                   = {Ferreira, D. F.},
   Publisher                = {Editora UFLA},
   Year                     = {2011},
+
   Address                  = {Lavras, MG},
-  Edition                  = {2},
+  Edition                  = {2}
 }
 
 @Book{manly,
@@ -83,7 +96,8 @@
   Author                   = {Manly, B. F.},
   Publisher                = {Bookman},
   Year                     = {2005},
-  Address                  = {Porto Alegre},
+
+  Address                  = {Porto Alegre}
 }
 
 @Book{mingoti,
@@ -91,25 +105,36 @@
   Author                   = {Mingoti, S. A.},
   Publisher                = {Editora UFMG},
   Year                     = {2005},
-  Address                  = {Belo Horizonte, MG},
+
+  Address                  = {Belo Horizonte, MG}
 }
 
 @Misc{paula,
   Title                    = {Modelos de regressão: com apoio computacional},
+
   Author                   = {Paula, G. A.},
   HowPublished             = {São Paulo, SP. IME-USP (apostila)},
   Year                     = {2004},
+
   Url                      = {https://www.ime.usp.br/~giapaula/texto_2013.pdf}
 }
 
+@Book{paulino,
+  Title                    = {An{\'a}lise de dados categorizados},
+  Author                   = {Paulino, Carlos Daniel Mimoso and Singer, Julio da Motta},
+  Publisher                = {Edgard Bl{\"u}cher},
+  Address                  = {S{\~a}o Paulo, SP},
+  Year                     = {2006}
+}
+
 @Book{pimentel,
   Title                    = {Curso de Estatística Experimental},
   Author                   = {{Pimentel-Gomes}, F.},
   Publisher                = {FEALQ},
   Year                     = {2009},
-  Address                  = {Piracicaba, SP},
-  Edition                  = {15},
 
+  Address                  = {Piracicaba, SP},
+  Edition                  = {15}
 }
 
 @Book{ramalho,
@@ -117,8 +142,9 @@
   Author                   = {Ramalho, M. A. P. and Ferreira, D. F. and Oliveira, A. C.},
   Publisher                = {Editora UFLA},
   Year                     = {2005},
+
   Address                  = {Lavras, MG},
-  Edition                  = {2},
+  Edition                  = {2}
 }
 
 @Book{ramos,
@@ -126,8 +152,9 @@
   Author                   = {Ramos, E. M. L. S. and Almeida, S. S, and Araújo, A. R.},
   Publisher                = {Bookman},
   Year                     = {2013},
+
   Address                  = {Porto Alegre, RS},
-  Edition                  = {1},
+  Edition                  = {1}
 }
 
 @Book{storck,
@@ -135,8 +162,9 @@
   Author                   = {Storck, L. and Garcia, B. C. and Lopes, S. J. and Estefanel, V.},
   Publisher                = {Editora UFSM},
   Year                     = {2011},
+
   Address                  = {Santa Maria, RS},
-  Edition                  = {3},
+  Edition                  = {3}
 }
 
 @Book{vieira,
@@ -144,8 +172,9 @@
   Author                   = {Vieira, S.},
   Publisher                = {Atlas},
   Year                     = {1999},
+
   Address                  = {São Paulo, SP},
-  Edition                  = {2},
+  Edition                  = {2}
 }
 
 @Book{zimmermann,
@@ -153,6 +182,8 @@
   Author                   = {Zimmermann, F. J.},
   Publisher                = {Embrapa Arroz e Feijão},
   Year                     = {2004},
+
   Address                  = {Santo Antônio de Goiás, GO},
-  Edition                  = {1},
+  Edition                  = {1}
 }
+
-- 
GitLab


From 60fe60605a04844a3ac54da8f52740916699aaee Mon Sep 17 00:00:00 2001
From: Walmes Zeviani <walmes@ufpr.br>
Date: Fri, 26 Aug 2016 18:55:55 -0300
Subject: [PATCH 06/10] Adiciona inicio do roteiro.

---
 vignettes/roteiro.Rmd | 358 ++++++++++++++++++++++++++++++++++++++++++
 1 file changed, 358 insertions(+)
 create mode 100644 vignettes/roteiro.Rmd

diff --git a/vignettes/roteiro.Rmd b/vignettes/roteiro.Rmd
new file mode 100644
index 00000000..3a8328f1
--- /dev/null
+++ b/vignettes/roteiro.Rmd
@@ -0,0 +1,358 @@
+---
+title: "Roteiro"
+author: "PET Estatística UFPR"
+bibliography: config/bibliography.bib
+csl: config/ABNT_UFPR_2011-Mendeley.csl
+vignette: >
+  %\VignetteIndexEntry{Guia de Contribuição e Estilo}
+  %\VignetteEngine{knitr::rmarkdown}
+  %\VignetteEncoding{UTF-8}
+---
+
+```{r setup, include=FALSE}
+source("config/_setup.R")
+opts_chunk$set(eval = FALSE)
+```
+
+## Instalação e Configuração do Git
+
+Para instalar o Git no Linux, execute no terminal as instruções abaixo.
+
+```sh
+# Instalar no Linux (Ubuntu e Mint).
+sudo apt-get install git git-core git-man git-gui git-doc \
+     ssh openssh-server openssh-client gitk meld -y
+```
+
+Para instalar no Windows, baixe o `*.exe` disponível no endereço
+<https://git-scm.com/download/win>.
+
+Após instalar, é necessário configurar sua conta com as suas informações
+pessoais: nome e email. Execute no terminal do Linux (se Linux) ou no
+Git-bash (se Windows), as intruções abaixo substituindo os campos entre
+aspas pelas suas informações.
+
+```sh
+# Configura informações pessoais.
+git config --global user.name "Seu Nome Aqui"
+git config --global user.email "seuemail@aqui.com"
+
+# Mostra as configurações feitas.
+git config --list
+```
+
+Essas instruções escrevem um arquivo oculto na home do usuário chamado
+`.gitconfig`. Você pode abrir e editar esse arquivo se quiser, inclusive
+para incluir atalhos (aliases) de comandos, mas tenha cuidado para não
+comprometê-lo com erros.
+
+## Comunição do Cliente com o GitLab
+
+Depois de instalar o Git é necessário estabelecer comunição com o
+servidor do serviço GitLab para que conteúdo (arquivos) sejam
+transferidos entre cliente (computador do usuário) e servidor
+(computador que hospeda o GitLab). A autenticação entre as máquinas é
+baseada em chaves. Para gerar um par de chaves, execute as instruções
+abaixo no terminal ou git-bash, substituindo o email pelo seu. O prompt
+vai pedir para que você forneça *passphrase* mas você pode apenas
+pressionar ENTER.
+
+```sh
+ssh-keygen -t rsa -C "seuemail@aqui.com"
+```
+
+No output do terminal será informado o endereço do par de arquivos
+gerados: `id_rsa` e `id_rsa.pub`. Esse par é único. Abra o arquivo
+`id_rsa.pub` do editor de texto e copie o seu conteúdo sem
+modificá-lo. Entre em <https://gitlab.c3sl.ufpr.br/profile/keys>, cole o
+conteúdo no campo *key* e dê um título no campo *title*. Recomenda-se
+que o título informe o computador que contem as chaves (e.g. PC-casa,
+notebook, PC-PET). Clique em *Add key* para concluir.
+
+Para finalizar, teste se a autenticação está sendo feita. Execute no
+terminal ou git-bash a instrução abaixo.
+
+```sh
+# Testa a comunição entre cliente (você) e servidor (GitLab).
+ssh -T git@gitlab.c3sl.ufpr.br
+```
+
+Se for retornado um *Welcome*, então ok. Importante: Sempre que você
+executar o comando que gera chaves, novas chaves serão geradas e você
+terá que substituir as chaves cadastradas anteriormente.
+
+## Clonar o Repositório do LabestData
+
+Para trabalhar no *labestData* você precisa ter uma cópia do
+repositório. Abre o terminal ou git-bash em um diretório para fazer uma
+cópia do *labestData* dentro dele. O comando `cd` (*change directory*)
+muda de diretórios. Além disso, você pode clicar com o botão direito do
+mouse no espaço em branco do navegador de arquivos (Nautilus ou Windows
+Explorer) e clicar em *Open in Terminal* ou *Open gih-bash here* para
+abri-los no diretório exibido pelo navegador de arquivos.
+
+Para clonar o repositório, execute as instruções abaixo.
+
+```sh
+# Clona o repositório do labestData.
+git clone git@gitlab.c3sl.ufpr.br:pet-estatistica/labestData.git
+```
+
+Agora com a cópia, você pode explorar o projeto e fazer contribuições ao
+mesmo. Os comandos Git abaixo vão fazer um tour pelo labestData.
+
+```sh
+# Move para o diretório recém clonado do labestData.
+cd labestData/
+
+# Mostra o estado do repositório.
+git status
+
+# Exibe todos os ramos presentes. Com asterisco é o ramo atual.
+git branch
+
+# Mostra o log (histórico) do projeto. Pressione q para sair.
+git log
+
+# Abre a aplicação gitk para navegar no projeto.
+gitk
+```
+
+## Criar *Milestone*
+
+Toda obra no labestData é uma *milestone*. A tradução literal é pedra de
+milha. A *milestone* na realidade é a definição de uma meta. Uma
+*milestone* é um coletivo de *issues*. *Issue* é um assunto ou
+tópico. No projeto, *issue* é a definição do trabalho de uma
+semana. Portanto, uma *milestone* é uma obra, e os *issues* dessa
+*milestone* são fragmentos dessa obra que serão trabalhados cada um em
+uma semana.
+
+Para criar uma *milestone*, acesse
+<https://gitlab.c3sl.ufpr.br/pet-estatistica/labestData/milestones> e
+clique em *New Milestone*. Preencha o campo descrição com detalhes da
+obra, como título, autores, ano, editora. Visite *milestones* já criadas
+para ver exemplos.
+
+## Criar *Issues*
+
+Dentro da *milestone* recém criada, clique em `New Issue` para criar
+*issues*. Na descrição dos *issues* indique com detalhes o trabalho a
+ser feito naquele *issue*. Por exemplo, indique a tabela/página dos
+conjuntos de dados a serem incluídos com esse *issue*.
+
+Cada *issue* deve ter conteúdo programado para uma semana de
+desenvolvimento. Pela experiência adquirida, isso equivale à 2 tabelas
+grandes (maior que meia página) ou 5 tabelas médias (até 10 linhas) ou 8
+tabelas pequenas (como tabelas de contigência). Lembre-se, o custo maior
+de tempo está muitas vezes na documentação do conjunto de dados do que
+na digitação dos mesmos.
+
+O ideal é que toda a obra seja fragmentada em *issues* dentro da
+*milestone* no início do período de desenvolvimento do projeto. Isso é
+fundamental para o planejamento individual e coletivo das pessoas. Ao
+criar o *issue* escolha uma *label* condizente com o tema da obra.
+
+Você pode nagegar pelos *issues* do projeto em
+<https://gitlab.c3sl.ufpr.br/pet-estatistica/labestData/issues>. É
+possível aplicar filtros para o autor, *milestone* ou *label*. Perceba
+que todas as *issues* tem um número único. Esse número será usado como
+parte do nome dos *branches* de desenvolvimento.
+
+## Criar Ramo para Desenvolvimento
+
+Agora que a obra já possui *milestone* e *issues* com seus respectividos
+números, vamos criar ramos para inclusão das contribuições previstas no
+*issue*.
+
+O *branch* de desenvolvimento autor numerado (e.g. `walmes159`, nome do
+autor com número do *issue*) é extraído do *branch* `baby`. Antes, no
+entanto, é recomendado incorporar possível atualizações no `baby`. Os
+comandos abaixo ilustram isso.
+
+```sh
+# Muda para o ramo baby.
+git checkout baby
+
+# Atualiza para incorporar possíveis atualizações feitas.
+git pull origin baby
+
+# Cria um ramo a partir do baby.
+git checkout -b seunome123
+
+# Mostra o ramo atual. Deve estar com asterisco o seunome123.
+git branch
+```
+
+## Adicionar Contribuições
+
+Essa parte consiste basicamente em criar 4 arquivos para cada conjunto
+de dados: `data-raw/*.txt`, `data/*.rda`, `R/*.R` e
+`man/*.Rd`. Considerando que o nome do conjunto de dados seja `dados`,
+teríamos então a seguinte estrutura.
+
+```
+labestData/
+|-- DESCRIPTION
+|-- NAMESPACE
+|-- data-raw/
+|   `-- dados.txt               1. Digitar os dados e criar arquivo txt.
+|-- data/
+|   `-- dados.rda               2. Gerar rda com use_data().
+|-- R/
+|   `-- dados.R                 3. Gerar esqueleto com roxy_data()
+`-- man/                           e preencher.
+    `-- dados.Rd                4. Gerar documentação com document().
+```
+
+Algumas funções foram criadas para auxiliar no desenvolvimento do
+labestData. Elas estão disponíveis no *snippet* 46 do GitLab:
+<https://gitlab.c3sl.ufpr.br/snippets/46>. Recomenda-se que você tenha
+um *script* com os código para trabalhar no *labestData* e que carrege
+as funções no *snippet* ao iniciar sua sessão R.
+
+```{r}
+# Carrega as funções do definidas no snippet 46.
+source("https://gitlab.c3sl.ufpr.br/snippets/46/raw")
+```
+
+### Arquivo `txt`
+
+Para gerar o arquivo `*.txt` existem várias maneiras que destacamos
+três: digitar na planilha e exportar pela planilha, digitar na planilha
+e exportar pelo R, digitar no R e exportar pelo R.
+
+Digitar na planilha e exportar pela planilha
+: Digitar os dados na planilha eletrônica, copiar a região com os dados,
+  criar um arquivo `txt` vazio em `data-raw/` e colar o conteúdo copiado
+  da planilha dentro. As colunas serão separadas por tabulação.
+
+Digitar na planilha e exportar com o R
+: Digitar os dados na planilha eletrônica, copiar a região com os dados,
+  carregar pelo R com `read.table("clipboard", header = TRUE, sep =
+  "\t")`. Depois exporte com a função `write2txt(dados)`, disponível no
+  *snippet*.
+
+Digitar no R e exportar com o R
+: Digitar os dados com o R usando `scan()` ou `edit()` e exportar com a
+  função `write2txt(dados)`. Essa opção é bastante vatajosa quando você
+  tem dados com estrutura regular, como os de experimentos
+  planejados. Você pode criar as estruturas com `expand.grid()` e então
+  só digitar a variável resposta.
+
+### Arquivo `rda`
+
+O arquivo `rda` pode ser gerado com a função `use_data()` do pacote
+`devtools`.
+
+```{r}
+use_data(dados)
+```
+
+### Arquivo `R`
+
+O arquivo R vai conter a documentação do conjunto de dados escrito no
+formato definido pelo `roxygen2`. Esse formato será transcrito para o
+formato oficial de documentação R, cuaj extensão de arquivo é Rd (*R
+documentation*), e se assemelha à textos LaTeX.
+
+Para gerar o arquivo R com a documentação começada, execute a função
+`roxy_data()` definida no *snippet*.
+
+```{r}
+roxy_data(dados)
+```
+### Arquivo `Rd`
+
+O arquivo Rd é gerado automaticamente, a partir do arquivo R, pela
+função `document()` do *devtools*. A função `check_man()` verifica se
+existe problemas com a documentação gerara, como campos mal formados ou
+inexistentes.
+
+```{r}
+document()
+check_man()
+```
+
+### Resumo com Comandos
+
+```{r}
+# Carrega as funções do definidas no snippet 46.
+source("https://gitlab.c3sl.ufpr.br/snippets/46/raw")
+
+# Carregar os dados no txt (opção 1).
+dados <- read.table("data-raw/dados.txt", header = TRUE, sep = "\t")
+
+# Carregar os dados da área de transferência (opção 2).
+dados <- read.table("clipboard", header = TRUE, sep = "\t")
+
+# IMPORTANT: Use esses dados para ver se estão corretos.
+
+library(devtools)
+
+# Cria o txt no diretório data-raw/.
+write2txt(dados)
+
+# Criar o rda no diretório data/.
+use_data(dados)
+
+# Remover ele do workspace.
+rm("dados")
+
+# Carregar o labestData em desenvolvimento.
+load_all()
+
+# Exibe o nome dos objetos do pacote.
+ls("package:labestData")
+
+# Mostra estrutura dos dodos.
+str(dados)
+
+# Cria o arquivo com a documentação parcialmente preenchido.
+roxy_data(dados)
+
+# Abrir o arquivo R gerado no diretório R/ e editar.
+
+# Gera o arquivo Rd no diretório man/.
+document()
+
+# Busca por erros na documentação gerada.
+check_man()
+
+# Mostra o diretório em forma de árvore.
+dirtree("../")
+```
+
+## Verificar
+
+Depois de adicionados os 4 arquivos referentes ao conjunto de dados, é
+necessário fazer uma verificação integral do pacote. Caso erros tenham
+sido introduzidos, nessa fase serão indenficados para serem corrigidos
+antes de serem enviados para o repositório remoto.
+
+```{r}
+# Verificação integral. Gera manual mas não vinhetas. Resultados ficam
+# em diretório ao lado do atual.
+check(manual = TRUE, vignettes = FALSE, check_dir = "../")
+
+# Cria o arqquivo comprimido (zip, tar.gz) para distribuição do pacote.
+build(manual = TRUE, vignettes = TRUE)
+```
+
+## Orientações de uso do Git
+
+Como fazer commits, periodicidade.
+
+## Fazer Merge Request
+
+Para fazer *merge request* visite:
+<https://gitlab.c3sl.ufpr.br/pet-estatistica/labestData/merge_requests>.
+Clique no botão *New Merge Request* para criar um novo MR. Detalhe no
+campo descrição todas as contribuições enviadas com o ramo que você
+submeteu para a avaliação.
+
+## Referências Bibliográficas
+
+<!------------------------------------------- -->
+
+[**labestData**]: https://gitlab.c3sl.ufpr.br/pet-estatistica/labestData
-- 
GitLab


From bdb351f88336611c83760538340e9b3e5f54010b Mon Sep 17 00:00:00 2001
From: Walmes Zeviani <walmes@ufpr.br>
Date: Sun, 28 Aug 2016 23:43:31 -0300
Subject: [PATCH 07/10] Aprimora vinheta com roteiro.

---
 vignettes/roteiro.Rmd | 167 ++++++++++++++++++++++++++++--------------
 1 file changed, 112 insertions(+), 55 deletions(-)

diff --git a/vignettes/roteiro.Rmd b/vignettes/roteiro.Rmd
index 3a8328f1..9a975869 100644
--- a/vignettes/roteiro.Rmd
+++ b/vignettes/roteiro.Rmd
@@ -1,8 +1,6 @@
 ---
 title: "Roteiro"
 author: "PET Estatística UFPR"
-bibliography: config/bibliography.bib
-csl: config/ABNT_UFPR_2011-Mendeley.csl
 vignette: >
   %\VignetteIndexEntry{Guia de Contribuição e Estilo}
   %\VignetteEngine{knitr::rmarkdown}
@@ -41,27 +39,28 @@ git config --global user.email "seuemail@aqui.com"
 git config --list
 ```
 
-Essas instruções escrevem um arquivo oculto na home do usuário chamado
+Essas instruções escrevem um arquivo oculto na *home* do usuário chamado
 `.gitconfig`. Você pode abrir e editar esse arquivo se quiser, inclusive
-para incluir atalhos (aliases) de comandos, mas tenha cuidado para não
-comprometê-lo com erros.
+para incluir atalhos (*aliases*) de comandos, mas tenha cuidado para não
+comprometê-lo com erros. Veja um exemplo de arquivo
+[`.gitconfig`](https://gitlab.c3sl.ufpr.br/walmes/linux-config/blob/master/dotgitconfig).
 
 ## Comunição do Cliente com o GitLab
 
 Depois de instalar o Git é necessário estabelecer comunição com o
-servidor do serviço GitLab para que conteúdo (arquivos) sejam
-transferidos entre cliente (computador do usuário) e servidor
-(computador que hospeda o GitLab). A autenticação entre as máquinas é
-baseada em chaves. Para gerar um par de chaves, execute as instruções
-abaixo no terminal ou git-bash, substituindo o email pelo seu. O prompt
-vai pedir para que você forneça *passphrase* mas você pode apenas
-pressionar ENTER.
+servidor do serviço GitLab para que conteúdo (arquivos) seja transferido
+entre cliente (computador do usuário) e servidor (computador que hospeda
+o GitLab). A autenticação entre as máquinas é baseada em
+[chaves](https://www.vivaolinux.com.br/artigo/Conexoes-SSH-sem-senha-facil-e-descomplicado).
+Para gerar um par de chaves, execute as instruções abaixo no terminal ou
+git-bash, substituindo o email pelo seu. O *prompt* vai pedir para que
+você forneça uma *passphrase* mas você pode apenas pressionar ENTER.
 
 ```sh
 ssh-keygen -t rsa -C "seuemail@aqui.com"
 ```
 
-No output do terminal será informado o endereço do par de arquivos
+No *output* do terminal será informado o endereço do par de arquivos
 gerados: `id_rsa` e `id_rsa.pub`. Esse par é único. Abra o arquivo
 `id_rsa.pub` do editor de texto e copie o seu conteúdo sem
 modificá-lo. Entre em <https://gitlab.c3sl.ufpr.br/profile/keys>, cole o
@@ -77,9 +76,11 @@ terminal ou git-bash a instrução abaixo.
 ssh -T git@gitlab.c3sl.ufpr.br
 ```
 
-Se for retornado um *Welcome*, então ok. Importante: Sempre que você
-executar o comando que gera chaves, novas chaves serão geradas e você
-terá que substituir as chaves cadastradas anteriormente.
+Se for retornado um *Welcome*, então procedimento realizado com
+sucesso. Importante: Sempre que você executar o comando que gera as
+chaves, novas chaves serão geradas e você terá que substituir as chaves
+cadastradas anteriormente (a menos que você gere em outro diretório ou
+faça backup).
 
 ## Clonar o Repositório do LabestData
 
@@ -109,10 +110,15 @@ cd labestData/
 git status
 
 # Exibe todos os ramos presentes. Com asterisco é o ramo atual.
+# Sem argumentos equivale a -l (local), -r (remotes), -a (all).
 git branch
+git branch -l
+git branch -r
+git branch -a
 
 # Mostra o log (histórico) do projeto. Pressione q para sair.
 git log
+git log --oneline
 
 # Abre a aplicação gitk para navegar no projeto.
 gitk
@@ -123,23 +129,24 @@ gitk
 Toda obra no labestData é uma *milestone*. A tradução literal é pedra de
 milha. A *milestone* na realidade é a definição de uma meta. Uma
 *milestone* é um coletivo de *issues*. *Issue* é um assunto ou
-tópico. No projeto, *issue* é a definição do trabalho de uma
-semana. Portanto, uma *milestone* é uma obra, e os *issues* dessa
+tópico. No projeto *labestData*, *issue* é a definição do trabalho de
+uma semana. Portanto, uma *milestone* é uma obra, e os *issues* dessa
 *milestone* são fragmentos dessa obra que serão trabalhados cada um em
 uma semana.
 
 Para criar uma *milestone*, acesse
 <https://gitlab.c3sl.ufpr.br/pet-estatistica/labestData/milestones> e
 clique em *New Milestone*. Preencha o campo descrição com detalhes da
-obra, como título, autores, ano, editora. Visite *milestones* já criadas
-para ver exemplos.
+obra, como título, autores, ano, editora. Visite as *milestones* já
+criadas para ver exemplos.
 
 ## Criar *Issues*
 
-Dentro da *milestone* recém criada, clique em `New Issue` para criar
+Dentro da *milestone* recém criada, clique em `New Issue` para criar os
 *issues*. Na descrição dos *issues* indique com detalhes o trabalho a
 ser feito naquele *issue*. Por exemplo, indique a tabela/página dos
-conjuntos de dados a serem incluídos com esse *issue*.
+conjuntos de dados a serem incluídos com esse *issue*.  Ao criar o
+*issue* escolha uma *label* condizente com o tema da obra.
 
 Cada *issue* deve ter conteúdo programado para uma semana de
 desenvolvimento. Pela experiência adquirida, isso equivale à 2 tabelas
@@ -150,8 +157,8 @@ na digitação dos mesmos.
 
 O ideal é que toda a obra seja fragmentada em *issues* dentro da
 *milestone* no início do período de desenvolvimento do projeto. Isso é
-fundamental para o planejamento individual e coletivo das pessoas. Ao
-criar o *issue* escolha uma *label* condizente com o tema da obra.
+fundamental para o planejamento individual e coletivo dos
+desenvolvedores do projeto.
 
 Você pode nagegar pelos *issues* do projeto em
 <https://gitlab.c3sl.ufpr.br/pet-estatistica/labestData/issues>. É
@@ -165,10 +172,11 @@ Agora que a obra já possui *milestone* e *issues* com seus respectividos
 números, vamos criar ramos para inclusão das contribuições previstas no
 *issue*.
 
-O *branch* de desenvolvimento autor numerado (e.g. `walmes159`, nome do
-autor com número do *issue*) é extraído do *branch* `baby`. Antes, no
-entanto, é recomendado incorporar possível atualizações no `baby`. Os
-comandos abaixo ilustram isso.
+O *branch* de desenvolvimento é autor numerado, ou seja, composto pelo
+nome do autor e número do *issue* (e.g. `walmes159`). Esse ramo é sempre
+extraído do *branch* `baby`, que tem apenas o conteúdo mínimo
+necessário. Antes, no entanto, é recomendado incorporar possível
+atualizações no `baby`. Os comandos abaixo ilustram isso.
 
 ```sh
 # Muda para o ramo baby.
@@ -184,12 +192,17 @@ git checkout -b seunome123
 git branch
 ```
 
+O ciclo de vida dos ramos de desenvolvimento (ou demanda) é de uma
+semana. Ao final de cada semana eles são incorporados ao ramo `devel` e
+depois são removidos. Só existem três ramos permanentes: `baby`, `devel`
+e `master`.
+
 ## Adicionar Contribuições
 
 Essa parte consiste basicamente em criar 4 arquivos para cada conjunto
 de dados: `data-raw/*.txt`, `data/*.rda`, `R/*.R` e
 `man/*.Rd`. Considerando que o nome do conjunto de dados seja `dados`,
-teríamos então a seguinte estrutura.
+por simplicidade, teríamos então a seguinte estrutura.
 
 ```
 labestData/
@@ -198,40 +211,44 @@ labestData/
 |-- data-raw/
 |   `-- dados.txt               1. Digitar os dados e criar arquivo txt.
 |-- data/
-|   `-- dados.rda               2. Gerar rda com use_data().
+|   `-- dados.rda               2. Gerar rda com use_data(dados).
 |-- R/
-|   `-- dados.R                 3. Gerar esqueleto com roxy_data()
+|   `-- dados.R                 3. Gerar esqueleto com roxy_data(dados)
 `-- man/                           e preencher.
     `-- dados.Rd                4. Gerar documentação com document().
 ```
 
 Algumas funções foram criadas para auxiliar no desenvolvimento do
-labestData. Elas estão disponíveis no *snippet* 46 do GitLab:
-<https://gitlab.c3sl.ufpr.br/snippets/46>. Recomenda-se que você tenha
-um *script* com os código para trabalhar no *labestData* e que carrege
-as funções no *snippet* ao iniciar sua sessão R.
+*labestData*, como a `roxy_data()`. Elas estão disponíveis no *snippet*
+46 do GitLab: <https://gitlab.c3sl.ufpr.br/snippets/46>. Recomenda-se
+que você tenha um *script* com os código para trabalhar no *labestData*
+e que carrege as funções no *snippet* ao iniciar sua sessão R.
 
 ```{r}
+# Abre no navegador o snippet 46.
+browseURL("https://gitlab.c3sl.ufpr.br/snippets/46/")
+
 # Carrega as funções do definidas no snippet 46.
 source("https://gitlab.c3sl.ufpr.br/snippets/46/raw")
 ```
 
 ### Arquivo `txt`
 
-Para gerar o arquivo `*.txt` existem várias maneiras que destacamos
-três: digitar na planilha e exportar pela planilha, digitar na planilha
-e exportar pelo R, digitar no R e exportar pelo R.
+Existem várias maneiras de gerar o arquivo `*.txt` e destacamos três:
+digitar na planilha e exportar pela planilha, digitar na planilha e
+exportar pelo R, digitar no R e exportar pelo R.
 
 Digitar na planilha e exportar pela planilha
-: Digitar os dados na planilha eletrônica, copiar a região com os dados,
-  criar um arquivo `txt` vazio em `data-raw/` e colar o conteúdo copiado
-  da planilha dentro. As colunas serão separadas por tabulação.
+: Consiste em digitar os dados na planilha eletrônica, copiar a região
+  com os dados, criar um arquivo `txt` vazio em `data-raw/` e colar o
+  conteúdo copiado da planilha dentro. As colunas serão separadas por
+  tabulação.
 
 Digitar na planilha e exportar com o R
 : Digitar os dados na planilha eletrônica, copiar a região com os dados,
   carregar pelo R com `read.table("clipboard", header = TRUE, sep =
-  "\t")`. Depois exporte com a função `write2txt(dados)`, disponível no
-  *snippet*.
+  "\t")`. Depois escrever em `data-raw/` com a função `write2txt(dados)`
+  (disponível no *snippet* 46).
 
 Digitar no R e exportar com o R
 : Digitar os dados com o R usando `scan()` ou `edit()` e exportar com a
@@ -246,31 +263,60 @@ O arquivo `rda` pode ser gerado com a função `use_data()` do pacote
 `devtools`.
 
 ```{r}
+# Gera o arquivo dados.rda no diretório data/.
 use_data(dados)
 ```
 
+Depois de criar o arquivo `rda`, você deve remover esse objeto do da
+memória e carregar o *labestData* com `load_all()`. Esse é momento de
+experimental o conjunto de dados para ver se ele não tem erros.
+
+```{r}
+# Remove o objeto "dados" da memória.
+rm("dados")
+
+# Carrega os objetos do labestData. Isso vai carregar o dados.
+load_all()
+
+# Objetos do labestData.
+ls("package:labestData")
+
+# Mostra a estrutura do objeto.
+str(dados)
+```
+
 ### Arquivo `R`
 
 O arquivo R vai conter a documentação do conjunto de dados escrito no
-formato definido pelo `roxygen2`. Esse formato será transcrito para o
-formato oficial de documentação R, cuaj extensão de arquivo é Rd (*R
-documentation*), e se assemelha à textos LaTeX.
+formato definido pelo pacote
+[`roxygen2`](http://kbroman.org/pkg_primer/pages/docs.html).  Esse
+formato será transcrito para o formato oficial de documentação R, cuja
+extensão de arquivo é `Rd` (*R documentation*), e se assemelha aos
+textos LaTeX.
 
 Para gerar o arquivo R com a documentação começada, execute a função
 `roxy_data()` definida no *snippet*.
 
 ```{r}
+# Cria o arquivo dados.R no diretório R/.
 roxy_data(dados)
 ```
+
+A função `roxy_data()` vai criar o arquivo com parte da documentação
+preenchida. Abra o arquivo e complete com as informações restantes.
+
 ### Arquivo `Rd`
 
-O arquivo Rd é gerado automaticamente, a partir do arquivo R, pela
+O arquivo `Rd` é gerado automaticamente, a partir do arquivo R, pela
 função `document()` do *devtools*. A função `check_man()` verifica se
 existe problemas com a documentação gerara, como campos mal formados ou
 inexistentes.
 
 ```{r}
+# Gera a documentação dados.Rd em man/.
 document()
+
+# Verifica se a documentação não contém erros.
 check_man()
 ```
 
@@ -328,30 +374,41 @@ dirtree("../")
 Depois de adicionados os 4 arquivos referentes ao conjunto de dados, é
 necessário fazer uma verificação integral do pacote. Caso erros tenham
 sido introduzidos, nessa fase serão indenficados para serem corrigidos
-antes de serem enviados para o repositório remoto.
+antes de serem enviados para o repositório remoto. Procure sempre subir
+para o repositório remoto contribuições estáveis.
 
 ```{r}
-# Verificação integral. Gera manual mas não vinhetas. Resultados ficam
-# em diretório ao lado do atual.
+# Verificação integral. Gera manual mas não as vinhetas. Resultados
+# ficam em diretório ao lado do atual.
 check(manual = TRUE, vignettes = FALSE, check_dir = "../")
 
-# Cria o arqquivo comprimido (zip, tar.gz) para distribuição do pacote.
+# Cria o arquivo comprimido (zip, tar.gz) para distribuição do pacote.
 build(manual = TRUE, vignettes = TRUE)
+
+install.packages("MRDCr",
+                 repos = "http://leg.ufpr.br/~walmes/pacotes/")
+
+install.packages("http://leg.ufpr.br/~walmes/pacotes/MRDCr_0.0-2.tar.gz")
 ```
 
 ## Orientações de uso do Git
 
 Como fazer commits, periodicidade.
 
-## Fazer Merge Request
+## Fazer *Merge Request*
 
 Para fazer *merge request* visite:
 <https://gitlab.c3sl.ufpr.br/pet-estatistica/labestData/merge_requests>.
 Clique no botão *New Merge Request* para criar um novo MR. Detalhe no
 campo descrição todas as contribuições enviadas com o ramo que você
-submeteu para a avaliação.
-
-## Referências Bibliográficas
+submeteu para a avaliação. Escolha dentre os *mergers* do projeto aquele
+que foi designado para você.
+
+Quando o seu MR não for aceito, o *merger* vai deixar descrição das
+correções a serem feitas na página do seu MR. Todo MR tem um número
+correspondente, como os *issues*. Quando fizer as correções por ele
+apontadas, comente na página do MR que o ramo está pronto para
+incorporação novamente.
 
 <!------------------------------------------- -->
 
-- 
GitLab


From c2f1c441d2b41e0c9d844a8738559008f41fff75 Mon Sep 17 00:00:00 2001
From: Walmes Zeviani <walmes@ufpr.br>
Date: Mon, 29 Aug 2016 23:03:08 -0300
Subject: [PATCH 08/10] Conclui vinheta com o roteiro.

---
 vignettes/roteiro.Rmd | 93 ++++++++++++++++++++++++++++++++++++++-----
 1 file changed, 82 insertions(+), 11 deletions(-)

diff --git a/vignettes/roteiro.Rmd b/vignettes/roteiro.Rmd
index 9a975869..22277ad5 100644
--- a/vignettes/roteiro.Rmd
+++ b/vignettes/roteiro.Rmd
@@ -1,5 +1,5 @@
 ---
-title: "Roteiro"
+title: "Roteiro de Trabalho"
 author: "PET Estatística UFPR"
 vignette: >
   %\VignetteIndexEntry{Guia de Contribuição e Estilo}
@@ -12,9 +12,18 @@ source("config/_setup.R")
 opts_chunk$set(eval = FALSE)
 ```
 
+Esse documento descreve o roteiro de trabalho no *labestData*, desde a
+instalação do software até os passos para inclusão das contribuições. Os
+primeiros 4 itens precisam ser feitos apenas uma vez por máquina, as
+*milestones* e *issues* são feitos uma vez por obra, enquanto que os
+demais procedimentos tem uma base semanal.
+
 ## Instalação e Configuração do Git
 
-Para instalar o Git no Linux, execute no terminal as instruções abaixo.
+O
+[Git](https://git-scm.com/book/pt-br/v1/Primeiros-passos-No%C3%A7%C3%B5es-B%C3%A1sicas-de-Git)
+é um sistema de controle de versão. Para instalar o Git no Linux,
+execute no terminal as instruções abaixo.
 
 ```sh
 # Instalar no Linux (Ubuntu e Mint).
@@ -82,6 +91,35 @@ chaves, novas chaves serão geradas e você terá que substituir as chaves
 cadastradas anteriormente (a menos que você gere em outro diretório ou
 faça backup).
 
+## Instalar os Pacotes `devtools` e `roxygen2`
+
+O desenvolvimento do pacote *labestData* é baseado no uso do pacote
+`devtools` com a documentação escrita no formato `roxygen2`.
+
+Para instalar esses pacotes, execute em uma sessão R os códigos abaixo.
+
+```{r}
+install.packages(c("devtools", "roxygen2"),
+                 dependencies = TRUE
+                 repos = )
+```
+
+O `devtools` tem dependências do sistema operacional. Se a sua
+instalação no Linux não der certo, leia o output no console que
+normamente é indicado lá o que não foi encontrado. Normalmente basta
+instalar as "libs" abaixo.
+
+```
+sudo apt-get install libcurl4-openssl-dev libssl-dev
+```
+
+Depois de instalar, tente carregar os dois pacotes.
+
+```{r}
+library(devtools)
+library(roxygen2)
+```
+
 ## Clonar o Repositório do LabestData
 
 Para trabalhar no *labestData* você precisa ter uma cópia do
@@ -92,7 +130,7 @@ mouse no espaço em branco do navegador de arquivos (Nautilus ou Windows
 Explorer) e clicar em *Open in Terminal* ou *Open gih-bash here* para
 abri-los no diretório exibido pelo navegador de arquivos.
 
-Para clonar o repositório, execute as instruções abaixo.
+Para clonar o repositório, execute as instrução abaixo.
 
 ```sh
 # Clona o repositório do labestData.
@@ -103,6 +141,9 @@ Agora com a cópia, você pode explorar o projeto e fazer contribuições ao
 mesmo. Os comandos Git abaixo vão fazer um tour pelo labestData.
 
 ```sh
+# Mostra o diretório atual.
+pwd
+
 # Move para o diretório recém clonado do labestData.
 cd labestData/
 
@@ -126,8 +167,8 @@ gitk
 
 ## Criar *Milestone*
 
-Toda obra no labestData é uma *milestone*. A tradução literal é pedra de
-milha. A *milestone* na realidade é a definição de uma meta. Uma
+Toda obra no *labestData* é uma *milestone*. A tradução literal é pedra
+de milha. A *milestone* na realidade é a definição de uma meta. Uma
 *milestone* é um coletivo de *issues*. *Issue* é um assunto ou
 tópico. No projeto *labestData*, *issue* é a definição do trabalho de
 uma semana. Portanto, uma *milestone* é uma obra, e os *issues* dessa
@@ -384,16 +425,46 @@ check(manual = TRUE, vignettes = FALSE, check_dir = "../")
 
 # Cria o arquivo comprimido (zip, tar.gz) para distribuição do pacote.
 build(manual = TRUE, vignettes = TRUE)
-
-install.packages("MRDCr",
-                 repos = "http://leg.ufpr.br/~walmes/pacotes/")
-
-install.packages("http://leg.ufpr.br/~walmes/pacotes/MRDCr_0.0-2.tar.gz")
 ```
 
 ## Orientações de uso do Git
 
-Como fazer commits, periodicidade.
+O recurso que mais o desenvolvedor vai usar do Git e que é permanente no
+projeto é o *commit*. Por isso, é importante fazer o *commit* de forma
+correta para tirarmos ainda mais vatagem desse incrível recurso. Algumas
+[diretrizes para fazer *commits*](https://git-scm.com/book/pt-br/v1/Git-Distribu%C3%ADdo-Contribuindo-Para-Um-Projeto#Diretrizes-de-Commit)
+são dadas na página oficial do mesmo. Destacaremos as mais relevantes
+para o *labestData*.
+
+Faça *commits* de mudanças completas
+: Apenas faça *commits* de arquivos para unidades completas de algo. Por
+  exemplo, não faça *commit* de um texto com frases incompletas, não
+  faça commmit de uma função cujo código não foi terminado de escrever.
+
+Faça *commits* pensando que vai precisar revertê-los
+: Antes de fazer um *commit*, imagine que vai precisar revertê-lo,
+  voltar para o instante antes de fazê-lo. Existe um jeito melhor de
+  agrupar mudanças que seja melhor para o caso de precisar retroceder?
+  Se sim, faça o agrupamento de mudanças para um *commit* com isso em
+  mente.
+
+Use uma mensagem curta e apropriada
+: Prefira mensagens curtas e acertivas. Elas devem em poucas palavras
+  permitir se lembrar ou advinhar o que foi feito. Normalmente mensagens
+  que relatam o porquê das modificações são assim. Se um *commit*
+  precisar de uma mensagem longa demais, então é porque ele agrupa
+  modificações divisíveis.
+
+Use o tempo verbal como se fosse um comando
+: Recomenda-se usar o tempo verbal no presente da segunda pessoa
+  (ele/ela): faz, corrige, remove, muda, fatora, rescreve, transfere,
+  copia, acrescenta, modifica.
+
+Adote o idioma plenamente
+: Adotar o idioma plenamente, com palabras acentuadas e sinais de
+  pontuação facilita bastante quando for necessário fazer buscas nos
+  textos das mensagens pois só existe um jeito certo para a grafia das
+  palavras.
 
 ## Fazer *Merge Request*
 
-- 
GitLab


From 8e16e5619aba395ec522a7a28a4ca120cf3c50c5 Mon Sep 17 00:00:00 2001
From: Walmes Zeviani <walmes@ufpr.br>
Date: Tue, 30 Aug 2016 15:03:01 -0300
Subject: [PATCH 09/10] =?UTF-8?q?Adiciona=20a=20se=C3=A7=C3=A3o=20Fluxo=20?=
 =?UTF-8?q?de=20Trabalho=20trazida=20do=20devel.?=
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

---
 vignettes/guia-contrib.Rmd            |  48 ++++++++++++++++++++++++++
 vignettes/img/workflow-labestData.png | Bin 0 -> 145869 bytes
 2 files changed, 48 insertions(+)
 create mode 100644 vignettes/img/workflow-labestData.png

diff --git a/vignettes/guia-contrib.Rmd b/vignettes/guia-contrib.Rmd
index 2461a320..c0b8d7ff 100644
--- a/vignettes/guia-contrib.Rmd
+++ b/vignettes/guia-contrib.Rmd
@@ -365,6 +365,54 @@ por causa do nome, segue breve explicação.
   próprios dados (11). Depois da documentação, um `NULL` deve estar
   presente (14).
 
+## Fluxo de Trabalho
+
+O fluxograma abaixo resumo em linhas gerais o fluxo de trabalho do
+*labestData*. O fluxo é composto de 3 partes: 1) a da esquerda resume
+ações feitas no gitlab ou entre gitlab e repositório local; 2) a do meio
+são ações usando o R com o pacote *devtools*; e 3) são as ações usando o
+Git.
+
+![](./img/workflow-labestData.png)
+
+A primeira coisa é ler o Guia de Contribuição, que é este documento. Em
+seguida, catalogar toda a obra criando uma
+[*milestone*](https://gitlab.c3sl.ufpr.br/pet-estatistica/labestData/milestones)
+para ela. Dentro da *milestone* devem ser criados *issues*. Cada *issue*
+deve ter o conteúdo para uma semana de desenvolvimento.
+
+O desenvolvimento começa com a criação de um ramo para inclusão das
+contribuições. Cada *issue* no gitlab é numerado e para uma fácil
+indentificação, o padrão é criar ramos autor numerados: `jhenifer33`,
+`alessandra90`, `walmes160`. O ramo de desenvolvimento deve ser tirado
+do ramo *baby*. Antes, no entanto, atualize o ramo *baby*.
+
+Com o Git no ramo de desenvolvimento, o trabalho de inclusão do conjunto
+de dados começa com a criação do arquivo texto `txt` no diretório
+`data-raw/`. O arquivo deve ser um TSV (*tab separeted values*) com
+valores separados por tabulação e a primeira linha como cabeçalho. Você
+tem a opção de fazer *commits* quando convier. Carregue os dados em uma
+sessão R e gere o binário `rda` no diretório `data/`. Em seguida,
+carrege o pacote e experimente os dados que acabou de incluir para
+eliminar qualquer eventual erro. Escreva a documentação do conjunto de
+dados no diretório `R/`. Use a função `roxy_data()` definida em
+<https://gitlab.c3sl.ufpr.br/snippets/46>. Por fim, gere e verifique se
+a transcrição para o formato `Rd` aconteceu sem erros.
+
+Agora que todos os arquivos foram criados (`txt`, `rda`, `R` e `Rd`), é
+necessário fazer uma verificação completa no pacote. Se problemas
+forem indentificados nessa fase, deve procurar fazer a correção antes de
+subir. Se não houveram erros, então faça o empacotamento para gerar o
+`tar.gz` do pacote. Por fim, suba para o repositório remoto no gitlab.
+
+Na interface do gitlab, faça um *merge request* (requisição de fusão)
+para o *merger* designado à você. Se o MR for aceito, ponto positivo,
+você pode fechar o *issue* pois o completou e remover o ramo que já não
+é mais necessário. Caso contrário, providencie as correções indicadas
+pelo *merger* e, quando prontas, notifique-o novamente no mesmo MR.
+
+O Projeto só termina quando todas as obras tiverem sido concluídas.
+
 ## Referências Bibliográficas
 
 <!------------------------------------------- -->
diff --git a/vignettes/img/workflow-labestData.png b/vignettes/img/workflow-labestData.png
new file mode 100644
index 0000000000000000000000000000000000000000..dba0b59622c4408cbb05a3224ea3cdda42c90999
GIT binary patch
literal 145869
zcmeAS@N?(olHy`uVBq!ia0y~yVE)0tz&x3QiGhKkrOQ5&fq{X!*vT`5gM;JtL;nX1
z3=EtF9+AZi417mGm~pB$pELu50)wZEV@SoEH+RcpMBINfe7L#SX}X?=yUT<$M_1RQ
z>jZ_8uN+yo@yXUBLcN9;BNiFD_3o9fSDVGc{Y^q=L6U1vM?=Gv#ox;g1-{$%=iiJy
zzvKFpo_^Tz`RBib&u`3~UHdKX{kxktXGS)qMzSz~!3CWqtC+zo1_ljzm0u8MhJwcz
z#tSk>j~>;nTj!%D+<nxGhYcjPinY^@;gzqBn7fOMjCEPgi3y79)~!1$RqA}XBq}PZ
zpy0!*(A7CPIeoI$*UAd_2_821s+S(QZDHuE*S*$94S0MnfAZGS(mHhbFu$CQMcJDh
zGmX=?6*lDapWb9?X?cBpeEj~p+VAh~Ha9g*2{k@!;QQZVgU;#?P1_}WFME1=IyyRb
zi|cROzFl8iJJ@UMoVLD}Q>RXKbaWhU=db^8kbQp5r_LgCE{1^MnoxEIh78NDMf?7I
z^4=Ix^Yc^cOdqqVFBwe=v;KXVZJr;uqu}Aq&FO}Qh8zp`)&AZVxg`I9fzN!q+9OGY
zadC3<&mYg!a}6}{ecW>6%9SgJ4jsC5X_NPKz2xJ4U%!8U{`u;U*Q*ySSl~b3Zt2pc
zBCa2Q*2wj@3mn?*6DU&7ci{0y7N&zgK0fA`v$?T4eEq3YUNslf?(8UB)f2bUZ=TK0
z!pFxB9Xj;tRaQ$tZtmJmS>L{Y-(UEct*+8=(x33#VuuZWNF46z?e+Hdj^2OwXt#L$
z{yJN2ZSMJL8n6E_YHMq+{_e42)v8aQKCN1_Mn_A_iKAD}HmXyam0^Xx>A$5c3?F{}
znP2};QqiQ~!2$PvIaBjsdF!$_H#R0KD=Gc@`r3WclI`2eZ?~+}P*QsI@$vEanvbm8
zTU1V-IN{N9VUcS$pS)d8LV|#t+`9E3aQ^YfO`A3u85v!=bV)C6PX)-J<9(La*8e{q
zm#_WxC9{yn#5aCVMWBK}&5wueUN@GeZQ8Qs%&Ak0GOJ!*TH4Mh>%{T%_iz8XR#%T4
zS>oKzr>d%IX=%B0=T1*g&*$gomlqWonVE@ox|sNuzrLnxY5DUl`<=41^Yd)0zr9I6
zKX2=^yKAP;n>TOm+PBZ=*WX*{%%1mf`~AA;pr9s!Tl;EvH#RcHX-xI<pKmvJ?%cIg
z-pW}Pu_$iIy}fPy{(n)LqNlQ7cwD%8)z{lQSz?)czud-+8@=x9F*x`-F5+)cJ7C$>
z-|yc&|MkO%3)in-|761}<Lql|f|vXG&M<JayZHRUu^fK>{&#nG7jvIIbEfLsn@)kK
zjY+Nr1s~4LG@d+payzed+53BY<Mvi<RbX2g^6K5Yd6On>s{j9Q+Pik44;6d%)&73u
zvcLTOz2N13Yom{yKY#w-y?NUC+1aZTJME6WT`ctS<;$}(ji0Yxzi(3fj{5&~b6)62
zY-sTQBIp#myDWBJ%}$~1dFkoPkK7V5DN&iAl9`>&-D$_rz+C%<F`zm%HC0kla>dfx
z{6&iw2YUMpMLl?Sb~cA%eEj{Y>yKnVe)y2_;$`yjzP&X+jXWn!ojP@X?YGF&yWTHf
zx^(H1B_=}0qLWiouU0V1%F6z%*%BGM`HDyM8&Ftxc6#1z{n6Oh*Y~H$*w{F4YS5Oi
z)>i}m&Z=r*V2EN9s%5wm7ZM`kbmHR0i+AqqVfC+{-MKG9M^8h;fj9j|XJ_Y%i!Sou
z^rsoTOrb?dS^59J-|xj*8n-W6zyAHpmp7Z1Yfp4g$k=mWPvz%(QPZ_}jVnGR{Cw>s
zaqhk6q!5Y6iK(eyFS^U`-TQ!n;lbJl7kP%Q-~aq9zS6aDi^awF*VoTCO3rc!3KDYi
zaCc`fKN=Vi8L27Md11CtZHs{47eS}(d3Uo4CI0^Yp8sFDO5JbHjiuh=q3#Q(srk=)
z^Zfbp4FcvB*K@yZ+q5ZaciG$ME*=Jkd(*!CQ)XwVP@eO`{EABb^K)}!cbB=kxqYgz
zk(ZYb4-Z#XUL3kQ?BUj=jTXwvhYuV$aP_LF;t_*0Cnu}d|NVOX$&)9R#m{Q~|NYLj
z^`c4bzdt{Nm;1T8y578f`~BVB;s00`Z`=0m!b0ctb8|esy<gwh_;`k4@-*FOwfm8h
z={M}`?7nVGIez^3WA=QXFV)}Q^~$HDrfRN9l6W>fzRt4lPeoDDril|Tb_gm<w9Pb1
zJ#}HBv*@9WCHMWjyiWDo|C5lC(wgXT=kDEhUTHO<&bpsZrypA!v}?nL4fAZPrKF_H
zmKH=s-CF8BeVR_Bk_eY**wm?0WB1kEJbwK6*|WTgM>gfu)z#(Xyg5Bx|M$1I)&&n7
zT0ccbMiv$pax6?d+@^VD+Qf;1Qc|-fPIL^MGI#FX4-XH|ojW&rLw00j<aE8*Q)ka^
z-L_56EN4b*tLx*Zk<&osf{TkwV&cNtvuF4B_fMW2%)RZmn^5PI_51&A+PG2DAc4X6
za`?KK&b~f5gM@}dHf9$uUhJ2*KX>NLmMvS}Tw8m)Lr_^{*_Xfr250tGe_ynC@zJD>
z+qZ9DzkdD3jfHzvi;Ii%@9mj6ZQ8Qct6#r)W0Q7f#x<UKoqc_Le0<Y9RL-3{w{PFR
z-Z>`Mu3fXM_@H29v}wtbBPUL*aPOCMZs!Yq@qmRPz+Q*J;cV&KTcV0zK0I`8eVUq@
z`uW*eX_Jf#+wa#|=iV}LcX$7@(!TbWN%*sWe}98RVx!LNnKLa@P6!wq8_${bxnj?w
zM@c`q7B5=#>-+otX=i5{r=R1IHseuz^5VsbwZ1++U%r38zd8N<+UV`y-rQ`S{Plj_
zZ{GDwHC~;!|9@m}fQ^mKvokY|3m+YMdwcuo>;LQjf3N3Q*e7efuW)**k>tJUox<v;
z^y|OAnmT{}{p0fWd&=J4`hLIu{*@~t;-}A^J<6)3t=%tU*>w3-;9|G4vrM!9{P=i%
zef;yR1sYk`*Tu@o$;H=xy}HP?yXwn}M&TX*|2((P?^(tA?%v*R<vSY^o$qd~{r%0?
z$7f2sQO%EnmJ2%yAMa3gbaX6!e(vk1PlvvSgoG5Vo@ZCPtLEpYgU#%ZFR${RuJ`b1
zYip~Xp5Bf<3l}~-Jzf8)d0=ep+m|mhlah?`@9jBt$}6ujE$x}Rd~Hfvnpyd~J9l@N
z>&NaAS-y&qkx^1o()a$;FJHdwEPl?#(xex=tKj6i-Mg*p4#*mOa&mIovv=>`KYzC6
z-rkmXcb8u5t_dnXuZG8mhK8Ef?v}`V{QP4D*XiJ(ps@9Ewpmv+Vq;@lF1)+DTUF>}
z_4~c;i=}KT48o0UZ1%isZJMa;K5fdB6X6xVzGUuMwPJ;anwr}~n>%;z{8_*MUr>jl
zws!WjGc&ouXU>^3XVIcXuikmwRc8GB{kuD;I-Qj`<Nf~sasO_y&OaZ&IgNMU-Uget
z#6EfZyv)p(&!2D4ySwY{?d|-MMl9@=UtV0?^^}nziv?6H-hO?3ec_`;6TX~C+0@9)
z&L?TqvMh5?OQJ+}c6LiZS(#ZlkH7Wjv*!0z)YYpiDq{9j1gcGbxN?V}lc1nr%*g`>
z9FmhC@7Q7SM}J<`e1(o%x1y${Dk~{jmA;xXZJL_=jPCB!pP!$PoVHXW>*6BU#qRy@
zZfsO`I&u4U^_LeH7rXcK@$gLPmpp&C`Mi~s`c$vNmf~k;9*U)<r_Y`>>s0!g9Z&Dw
zyeavA_PlxjPO8uEk+YS09;EEvcO>yd`mXympL=J{jC6El+|J_P_8FAi3|EO|s9apX
zZk?Htk(a;!^!Nz#z1H>rK=HHVNUYt(`cF?z`rH3KV(MDlY4`2HLFPLlIqB))QBkLK
z<M-9<+_$f;q-0CY!yP*;xVgE*!^3}81O*3w%&|;MOXK9^%)b-awdmT~=;f<d?@m1}
zCZm4Xps=v;@-pAYlP>P+{MW`S&CzsYV>0{pB|COVynp}bX!rdcfvmi$zdSuXcbC0=
zq;zv<@$(-aAOEbevkN)aFW=uCyQ6?naZB>?zD=7pojP?&TtDv23`1u7)W^qqKZzD~
z)_Hhz?A-bD%gf9BayC24-`{I!V8}~9eCW`QPcvuE{PpYC{F+amWo2c#xw%<cugdS&
zE?>L0S3t@r#pAAQrp-lpvz!}qEQ{HArM{fj-+yOc?eFFD>mHq3sTa3LBYs}u3{~%G
z3N71mZy$U5h3D{^`2BLz<2R*nKKaG4Lf_*HV?h26&wc6V=W(4j&$)5n`RAv``8G^f
zPoDJLcVkcGX91_<{qplI3X}Z&__oWKzp}6R!0^BN`8ip;`TMi4>#aL5S>0d2Nls4g
zM?61&Kc}#o#u0;}CmyYr`R^>6KWkRh`+Yq!mO_eKN?u+ve^;89r+3cj+S=&$=>|N_
z?|FOtZ8j`+?^kMhc5bfr|Co&tJp!AyZe1Jw_U-NMoJ|wXn@YC5ys}c*NyFIqb8p~Q
zhUqV6&zxEM{+?|4l9$)l&!0YB{GI8<>C@HY_bvRAcestWRJgX)S3~8O&gn<94HR0^
z&d=+eerH!{_wmQEyUTp{MU<ABzMC&BBeN#JIVwtOU(ADN&(tQLl)8WOyxnge#Vys}
z-|bpm_U=w({-XL%Pdr;LJUG}aT68wP{;%l#^hd@gmt|{QJicRI!nSSOxW)C>tXLt?
zeRQ(A|2+G8JH3J*9}?~D?SCdnv>n{Jb?VfqHK8$!-amRIBqyi0|J8$o%@tGI+u6S_
zQdLorkd)Mn5&Q9S`TPRUR&MJzpvJ+4XJ=<WeeC1map3)x21e#5r{`M~GAUkJ?mvIm
z%|CyBel85<Qh&n0V9EsQ=;WTCXUnmWm0RqD{+d;*UR_vt_{GJ=PsJboyk-CQOYqOu
z9qoJD+mEjfU;kwK<8!((Ww%#{>o+<CgoU;JUz+)=ncq&qQz*UehuYkj)#~mGpZn+L
zt_{#IF*D0s(I{}<^ylaE_WKLh&$p}X3Kq~)t^M*s&?)2fwY8s)+Wq^H+;ZXMWc8=w
zZLO_WrFBnlQg-h%F)&!Ma^=Hm4-%O_*-n|#efrSv@9+PgHNT&8XGh`bX}Z#8IX_;l
zUSF_(qMF*T<9)KAK%8#+%J++8+e4`t>*M#w#l+lM8N9sq_cu)u>w*UiPA85XTXxSp
z@7kKk9c}mP|L>h>do+E?T&vPa^_7-)TvdL$#H&qy`1r$zhlhEmhQIjx)vZ_kmx$}b
zeR^_oaw4t|TZKAXtWACW{rfvR11qlm{QSJo;M4N0F^kq0Tx)r_&yYj$T~<(P>eIWs
z%cXDm{=AnO@wju}<jKKz&AH=i42+E*PrGvEipi&i-kzQZ*Sk&Ei(L>X&tS^hT*w%Z
z|J842@y}0Budk2ypJCuwm+0Za;pDNe+R*p%k9$_1pPhaDt4^UsMaa|9k#YX{<DLgj
zPuHJsU;pm?`}~xY7J*eORz&P7$*idOF;zRfz-ZOdrLE?>Dn34n+?@9H-CgPL+0S>K
zNG>ca3|hIR{{O$PeqUpwqPlLsyl){Su2}N^o^8v7&Q8wh1`n6T|BPLx!L|G%m+h*L
z+Q&+>o~NXzx3{(V%`{?t@8_%^wfE7ZN3ZtwUtQqXEE3n!)+1$_1uAO1Bc_!W6s%ag
zHuuzJ>6yzmPYh*o{PXAYc{w>bRaMo`&(FWVxcGPrr*MHgU!_I*+e=Hm_vYVeV&(qO
zUH|ly=ubZjt`7`7cD27w?BCN{{ow)Qyq>Gqu7xE|UAc1Qwryp;zP&~Hd`BOD^q90H
z(@H_1;rQc+t-E&ZnrmHttpD}B8><&AV3_~n(Q!ULJ}%Z*bNOCxK5uteeNJIvVMR^T
zym@lv2FaqLqMe<c73QBmf1bTn`Rl&OA2amz^wzCgckFt%oJ~c8eaY9p6=g+5Ql?o~
z&dxRu4hj+y68hkg$IwvK=pxVXRZLQ{^Oeue;#XHRC#l%~`QV(_>7lZ#>Z_Jh#)k(7
z?;M&kWy-5pSqlR!s=wv@T)uqiQpJ{<+S<Z(APp@SRs=47cV}nu!$Ym&`f)#g|6aaq
zS&@0srR&${8>gS^6jtYxwJLdWL9w>>@4vsl{bv{?zPq#YlQMT<+uZ=U{^ga99Hy%C
z5B&W8=xFyx-@dG@taI~hU%z~*Ie+~e%i?7#R-8C@&QH-YTZ88gcl^JQ#$}mzPCNZ`
zU44B`<mM03isvs}*zj(NgRi?l%i6WM!oq*WHgDNtQ}yM=kxt>wn>U|5b4D+A*OGvS
z)X196O>OVq9^D&%XK8blZQUOU#Us5O`CRYrWFGAjwJv*e;rjLKmoF=GELyf~*|u$B
z_qEq9Tej?_sF|#s&n1D09wm>D^<KDe;lqalTU*<ACJXlL*^~FM>U`e^hN>2U@<|O-
zr%t`Qr_$KO<jcLi)uExGcXyW`e}3lcwL39CTx1npE}PUHh?UHKa`tHX4sS27CKq{z
zQkG6ThO9NKR%t0J9z1ZsVV|v?zW)1bYoq`E{yu$w{k3arqcdl1+qP|5e&G@07yXjP
zZi!6pcdnh-dM<8%o$UX$D^|=fOg`4g%>L?`-tj)!*Z24T-&y=zNl6JLEd&BZudnIa
zR0tkkS>W9H@APziL8ouuzR6mZWYnw|78Z7Pa@w+Gi<o{~&-9qRRiQd!ph1@y$yv)j
z-dRvu{H5w}Lgcq6CnqyCCY+gJc<0dO^z)CNZ2jnBudd#H{`vK}_eu`6aDFo1n%lV8
zz5mh2%eh&HS~!!B_wn-a_4W4lc60>HDBZGX5fgvyv1I92uP!WX?(Fo;%*=fJTxG}8
z9h)|7y0=y5^tIR%ss}+$1f%38g)LxUmV4{Tg9iy|Y2VuJW>0K;rym^?18OKgKHkqS
zX_RuXiFN<KU#lA%9lgA~il0k7wVQqCD3{IM%l!6#5)u<X{(L?^|JD{x_4{UKW}%^>
zYi~?FR<ORnIbW|l>Do2*ISdVEOrT)bv9g+#IK!^?SHWE#0jKi!_fjR?{>@w8FK=J>
z^_8g8iSy_E?V1l7KR;pqC;9ogxtA|qoM}<0<kYb&^Uj8<Z*Ok81r^Bko9Ex#Q~CMX
zMxEIcCTu8we=qrXU+kWWjXQSC@IES)fAM%{U2t9~s4X-t_4?ZA<G%akq@-4TxMN%W
z?LmfUQAwxEr&m|C7Y3{_SXdDk7w6>Ew0gDnyjVfSkdTm)mzPv0sp#tJ?o_*76&W4<
zc;QK}<GxlmmmNBMSl+hk$-{>qKRrFI8N6&y#m7TOj<iH)CnPLbzFd8xhmo<d^s0r<
z?R-m@F6G_Im3-^gtsR@I_hzqNz52D@lRg=L|MMRoA2-iTzctB6?e~Yn{PMO{CY7I_
z+^_#1`_K7$jHIL_hoW5n@ws7ZV|SPR{`U6nuF~oc4;+PeS8tX3J}osZt?2u*3CC-n
zNY@uLGQ1VLBPq^c+V*>ab_vt5&94h|7tEYF^Y^#6hcDmLPT9M|HC}P{nUg0ge|&g&
ztXKMDP0h@iGq-Ntx@*_2UK79L$Bq?sN;wMT<>k5e$sEj`bEoCIi0jqemVAC+?%!~<
z*U)&e{eInSv)o&=OtYnKJ$>-tL04B-mGED2{kRP}x7S9Sx86J@nl-^|X}7rkJd;eJ
z!v@Xl{CO*CxBq?c?wZO(50Nm<623qMq0VEy(%X}d_bphUpsTxf%^Dq>WX*7f{R=r3
zZrQS>YIdn)+sTtB9rLA5Hasuv>gidtUEC`%G4XEeovZ3k%Z}u4JUw0ivElvM=J|EW
z)B3B$Oj*i9K7apy{CP-gYwPXp`R*KRBQ`!-oBGpZ-EGl4juqVBZ7*NExbnLR1H*-X
zpn)l=!^SgBCcW@hnbgWH{_f^x_VQy#BlV{@JvbA+@cO}ZvAb<-Z9h)=#<6h96p@w*
z4hkz~zbUfi3R@G=$nIOj(X=3QSM>J0Y15`vcse;T&3nW=-+s!}sVAS8>6|uGy;%R_
z!$VLzmPexC&yT{N6(95-%X)fvSQI`wGRrhuNlD47>`g~Jd*1Yqp{(yxlvPz(zlTq&
zzZfwsc3;iUCRXlCmoLBGmvPE9aLS?PX%DU9Q`6J6*Btt+e$87)Z2$j%zZbjp&N9!R
zw|e#KWxlfooWj?|94rri@F31psPoC0nZ~8so_>DQPNvk@)&KhPve(5T>xxE8fU9e(
z(^Coai_2~D^Yd-ezD$p=dw5PFnsfg-p2J%n@Ya5O#OmY`9Uc8}*`BXyCwsqaPn1ae
z|L<>9RFwUn56p2*_MI!viLTwVXHT2eRSnnk^K3sxycJgWE0F#E^r7&imBGso=@u~t
z1W$Ouyx>^Dvx{q^w?js39^_rHNWXgRnx2l%9NX$|-`?KV)zLY0`0&q~ecj#O9v&yQ
z<=z%>N=;4Ov9m9m$Bo0b;=_YaPfv^M#XMM+bx^l2X=6lPm}J+YJ{ikRd3UY;=$rRV
z6BZT@4hs5oT)w{GrG?yun`@)Z+Y-;sv$ZaL74q|*)X$$kmo8n(q4@J4+ox5lSC_xJ
zVOaCygTMV>6BQMf`yL#^-A7qjSyeo_S`Ve4pO<@M!^0z;!XH0=oH}*tk1dJc-`zcU
z@E})WNLX0j%}uG7m-$*WKZ!G$>9Z~AXxG7Jc7ACyo__hSA3k{a`W`JlpdA|*C-<Gp
zWU0-&$8p<l&U^j2_Q?ssb++>oXUw%Ow*z%ER)5gxTBPPbFD5j!^vMaqKW1wqHZsjO
zSr@gHYrbG&_Vsl~r@NQEyL0mHs-EH>9}-(GOpmX-S;4;CwOj1r&$7B758F>q*DpRD
zIqmNL`u~&F{R?<LInJ6j>)cFZcEu_4=ItwbdTQ6-AKYAA9}+K@{9sLw+;%UU<LcF`
z7Wdb#Sg~Ta*nSREQ`3q|>Th0MT^(QdQ?*W~e%rBLw~nr^N$XouZ?28ro|cjlv!kHV
z`r(tR6AwNbMAX#$Y2g(9@G<hc&4z`_jQaT*IxNR*R|hZm`!U7N)O6}>l_`_w&#(XZ
z$Tc`Pxb^1(28LHp-kyKK$q>M$=l<ox2ML=B1M{op-{0L8blSFU8>r=E8@l6JnZEvd
z-RNx(s-G6ke0pZ4@#RaGE?vI-{r&y>tHbptdZ_H5`s!7dja<or21Y|e!_Lmm<NfmA
zKYzBa{bi!pV7zu^@bX8}?~Hhg-{0H&@9*#XyUYFe%?n)}rr6Tc({ty}9lPIej5}SF
z_J8|+zyA0^pZRuwcfa3fUG?R~RPFFXhYue<bcl(WSzIR~Au%yAH&<3jDCm3XgP^_Z
zVt4=g_3P2ef9L1fb_)n`wc6R)g|Cl$%Ju!_Wp>3UZ{Fl2Cl^0Bz?fI|A@%e$#TFi3
z-nVbx?p%3icj@akfuf?KS$4Hmm6es=_g5S%uuR%t_jgC<ZE2;cULWu7o-=puPHDN~
z)jPV?o7wsA?I?Ww>gww1@9+LzbeAtQUj1Mr?+hQc=nV;sPA{IFo&D+So|>OQ8X}MO
zPMd#7{(cLi;*<C9_3fko^h%qTl$0#<nfdA1gUFq~iv?K>GcPS^X6Ki)tEqT#VId<U
z<DHg|@%4YV{t5o{`SZ?yA&cF5xp;Zku30n1Yw5?2A6JL3H#0U4-celexU0K+r*TB9
z?C~AJ*Ir&;emz!NQnK^BTTgHA_Wb*GUtV0ixY%7kaudsZ0i_nbm>ma1@9n8Hjyv)A
zqutLZlMlD^ySur??W?K$^yK8dd-u4^4@~k<*&%G>IqCFt{r_LD$3H(a^Ygvx_o-=V
zkFrg@r|C@8zkgw(L!gM9U3PYM^!I<McV7R0a#A=i(bbjJ&iV4iixcOsjaQoZ<M(fA
zX=(eK9~(UN^%xe!g4<)Q)^5_$()l+xx&CvPz5k}{$A^bIckcY88XFVi<m~)3`^LUn
z>vOLJoYd6R?En2(e5f~PqjmYag3Y|2e*W>CtoCq@-03rC-dtSF9+#b%n3$EdE90V4
zt8~pKo!w<`qgp2H-CG+FFyYWD&&g`0S2*V#e;gSZ$;!eq$F4T&;T?y#>3XpqlVUcd
zaF!b{v;X&lS<xiv2uJH@F`I7}j~`dJvWlv+w7XnTQZi+K=gQ5SH+OcPytlV{YTfn)
zO-)Sx{{F3&GQ2!IF|n~v{k<(_&YUSHC%5Cea9UQ@tCue|>%BL9_)ze()8*@zFWd6&
zdIgG1Z=0m@^1*`*+1J-inId9y^YoU?%dhgXzrVY?W6!p2-`aSkcRW4bFMph|<n67}
z$H#iBzrC4hl-f0S?%jun+h_m#b!SK6;_&rxpQ`s3J@x8ZwBuW8lfs*~Z$GZc)6v)G
zzyG7BdA;M$-@nyWR7?tYzrMb{yr}3=Us+7&+O=<gzu(`_9kZ)sW%l)TpJYR<%HF(q
z_ikN*@ao#%-wMMguUWGu@9wUn|Gvj1a40r9Jb3!F^}WH~s;{panc3IH?w&ULijd-x
zrAxnly&ix1{+^k_Vq(X5E3RI;bZc+5x$kA3!v*4ZVq#+c{rP;pt*_<El@Nb_|DXT<
zs;Q~T$;o|k=a~K?J3G7l?X9o>{{F70%*)f8m(z9rx&Lgl-2eanf|B&^-M`!A>uy}|
zUBk%mswv_1>?=GB3&bW(p8WRB8<BSoAz@+DCQn{`;ij#oCTIF#E>jUvQCD~O@>f?*
zUcI_?;>T8@P8Bt^Wy_WwJABx=?wVhphl-b{r=hWNae4W4|K%1zD@`mdZ=OB7HqS3U
zC}`2rrArqtKK%HjMBBuZDM2ekw5D#-$xccNGJm!!C@83;wDhSu+d>U3Wo74u`lk1$
zxhNfEc77TtA}T3)b9Z_EPjN+K<I8vM?9r`Kzibj46{RJ@#mdweprOLyq&4-C?Dfl+
zSMPT1T6F5vsSjHwF*P#mx7)gPtD2hHCr0n3m#$p7GG)q?K3VHsJ9j?(csXcgh|<It
zuU>ts*t2St)+Cj$U%yIs_NLz4w8@B>nR%v<+vP2P6y9`ob-lj6{`j$DUMfPx#l`aS
z^6~Nam)&RRUTv?ft!-?)dC8I^M~@!8dR274Lej>F@bGX2fh$+81c)p(c$!^R_3P{F
z>&8Y#9+OH+N<eeYo7Ln*yN{aqJ`Rso5C{-yjn8dMEGUYJjg1WrZH-Tyq_VR)AU-~R
z-+T$D6)RS7_=jKJo*)0`(Uoi0!a_q|zI?e+M|+|N4=-<}O<YjWq_u0;_Vx9-D0%w$
zoH=#s($%YP@9nKtHvSSG8tUrqK7HD>Z?CR$o8Q>16CD-R6))E5($u{EyN7|1k(R#x
z^-Gt8xLTbSZn&qsWY?}Jt*NhGy?SI(T3Y(_{_YnqUR=0vVa^<x*w|Qi_v3=fZddkN
zOE5URby&m?nn`D9U~4+K1I%IoPq%}a7aS(MV1DJfdLnEs09bTEqrydYFw2425ux2h
z9xTSd3+feunNl1=wO|H=i2%x6K3EWJIG8o;4cxbinZe;_S67#ckf*DwYfjFZRmm&o
z@7=q1>sC{z69*4EUfsyB;G0I*sdMMtIF24aK7IQ1)mC$URaR9=Nl46?J^S^`mn*HN
zmAASmX@aKLZR`F-T-|7raiD>bL(#&(L0U0lT4*T`gGRfD%CG&8_s`j1aPQu>V)^%t
ztN5Ou6`K4wDc+4w)+*)I7R_ch-k?$oh82=si<+9(zrVH9TWji0i|WYen=7prnXgzO
zpuY6j()1<gW?Sb!Tl4bSvuCUNJd8b6COx*7x3B*<$;Yj<IIx*nS>4>&(6a6L<MaP>
z-nDSbJ09bo!XZ?<fK#I@YF9~QQPQs|{m)CvO2SGl&IZTDRXx46^U9YW+~Q3S+T|P6
zx;i_5R$O}0`8fR-pTwfYYgfN2nANy!<&W@<``P7Y+mv3Kq&ole&w|X@nd@SAZ!3Db
z>b!W(+h?y%K3;h_J32Oa>ZDl}4^H%3m%roS;0P$SaBy~5#D7KZ-`@GQ$%Xs(W!=%3
zH-G--y3bwt*VoRpEN)ws%(x)-vEQ3;o#^Fpn){kASRWK$_owWCoy44n+N~~1GcAkF
zI=6_Q`R%kfsHW1ySJrahY)8}Oet)@qe=qo|aFIRBC%Nvu;jCrr;<&rIc-xoNGDt0w
zRR1PpaX5S$JHOnS+23!z61~6ruIt^ZrJa+uzy0;?$H(LgtA)1+sr+*2)s5N`;ZP!B
zpVzgDIdGXt;HN&@*U8C?A2!)BaH$A+u8-ThJ=ZQLC1ug8h$(E_ADsL3Mfk<qi%Cio
zGd>-^Tz_Lre694S*NZZ<&i+zOKlk_Dix(?iMKnk?yU4FtJ!8g<sqr<N%f5z%vM;Jx
zSl;BTyJi26q@Amn85h*fG)SEEf5pjJ7gMzRm#uU?z1+6`AJ49=Eex)K^XA>%URNG4
z+3){`PoFO3o9VQb$zPB%=(h{-7ICe$$^6un`Z`3`W4450&YPJB6efBsdF8;6;l3_*
zx0_P#+0&l{oowXlzjnP(KR0LXD~BtW{{3ZF>zTc<GSbfJ#EBCrhjvK*{w^O-s^HM;
zxQPGCrAtdsr=5>j!}#};^ry3{bd!&>1&AyKnJBIzbn?{H)naFUJ6&zuGWA^FIh9NM
z%HGae#T;mCXlR(u)a=G1z512IEv_xU8^W5_Sv&j{5f$~FYqNXm+_J1ysfpKx+t_z-
zx9mCQy-#nwp605Ol6C1NZ|*)|@z0kw=5D^`a%sW^>w~rIJL*3i{GA(U$?z)mVUufZ
z6<>Z;aa~TzG=~%AU*BA*Fr1e9IR445iil6FUH6%N|92gbYgJpSDkj8oQ2die(}a^R
z&gsei=6iSMvFTRF-eoIK8Xtf1^r@45@3P|3(%*%b7pj>(f1W;lxrzv%%+0MIle}!S
z3^H}UDyRg;MD+?phXsX3>u%m+_(}F*PGahfDa)r%pT6$q4huWGbuXh?8klu|IsBbt
z_47A7qx|+wLWP-EAKyMXRn)XsT>FIR`+Eh>QNjMFtqyPSf2a05W!hGwNo_y)BsL}g
zK4-Q{hT&_`_q>SBR&V$8obl^8m$`@M^rq=`-8B{36BRmkWzYU0dhny{#i@ybb$vf3
z@3fOY|MjK)meV``ckd`vT=vrNbH$&P^5<(mJ@LFe|5Kl~me#9>SC_w>TV{0GOZnYW
zlQ_4X?yOEPLUZoz^WC2F#@BAv&EJb>);_CyXrBLc!u6+DTPxSkj%c1Zv2*QK<$Xu>
z8P2kT{8IAzSzW^Q{QShS)=7&_UC`Ed@BMCK7J8Or=lbiqyK0}S^_*vZzhlOX8F%ev
zXPVYF7Omd<JA6;yybH(Aue>*99cz=HOUkmTYySM3pQqx!{q97sm#VMb%=WhZ`7@`w
z|G!PmlL<kOE><k}`>UpxXmht(Yop&&InkxAQ|;?Ya}QoWY_+>&O8h*D+37jUu5S!(
zSG)H4$xCK)ed`?uxT6@>@iTqBd~>0<_U4*tsokHng_1v4{kF=={Ji;+_hy%+wd|#R
zRg)C;R=>J;{M?~i0*WdkpLUgOo)B`SsI#uDD$}WC-NKFQs{OOu5+}tyi;j@KW%1|o
zJQXjkQy#i%9EbKU-x~DmbB}~nKu8Enr(MNySKE5S6Xg|`PkU#tyb{i8a<r=Ac1TC|
zq{pAn>hM(9JW5U3*15B8JtLouoag19<nYgT&J^j*pL{JyU&-jSw`%NN-M4dmy1BJJ
zhPU+16HpA%op{VGt@HFM>!{KXZ&IDF-BxthGfl}@wqn7e{~Pqq-U{~ieqH_jz3FSs
z_nS^nUw7vJm(yxu%QDrp*Q%Irt~pSUo~b)^T7<^hrEhl6u&tltH^JrpLBCy9PD|xQ
zx9jaU*=!PU;*+40UjD0)We2vd{(W*XyW&N5U5425hFPBe{>wFXO`YnYl`Y?@HuvXG
zPv2f0dv}?lpHH9OSN?A!?0WJ=)1B+~>-MSXt#;yYZB74E_@po|P130&@rL()+tWf*
zt;$UOyH0cOpRKcBOtIwSmCbX`Y&y6&Hdn@{Z0&Bj&*f>_%}3<yYL-l?VhD&|xpL($
ztFsc7^F^lDKYX%T+}~KhNngo`so!RwoQUjCi@OIro<CZdKE1x*h2v@Z^!s~6sy_$m
z)On>voot<4KYPaOnKNGg-}S!nPdJOy3I+E+r|<o~yDOSk?yb;glj8f!qD_vPZ29`A
zsq2ThWqO}`1%H9Wv-j8T%w77DEt{>>wAPF5XSt2#z6Xz1rXO^?xG?;2$=9v(Y(?Jw
zey4VNlb5}gQBarenpwAU?sF(B3r}nOC%!;c;UfF1<^A6egk4*ZzrgmHvi_eNr_Sy8
zZ;(DK>E7%IPpucdep30DgK4RXh(Zfnf1&C2Kg$#CzP$3D<o-?m)>3ctZvN$!x62JD
z$7_3ORmshJXMJa;3a9$@zUJdQ=Glqe`&Cycmv{GN*!-&u3*N=;>oGPl%B!mEk26~r
z_kYU_KB=ckiK#bEo_o=(xtEQnSnkuj?3fTfrxUmCExCW8e%9^mRjKaV@BS><RX#mW
zY%jZ2oyFbT3!3@9i#7^y{d$_&U-ylz%_{0vlV@?wrpw;)_dWA6UROpwW#8UnRc2bB
zpY&a<<o}CHKY5*98J|B~%<ikN^S^KR_bp|w6LkeX+0D9n`}p~ni)ZfL?6P#~`s^un
zA$!EajkgpDeQ62j^jgWjCtKkn`+JS1Klk|!`rTi=;4J;RRltc!@%*J@E0%eEyPx#G
z#x2e*t^7}Z)cX65w{M;es>>~^*|%^b-}lA$uHOArTIn0P@yXgZTnr9^n%^1KD_d6X
zw5!W`oDmeP8>}&TUXag(mcDfY|8E~YE_brl)qrRAq=1B!PyVMjZtFX+ue-9!tI&D&
zw>P=gMRSht{NH`zyk7V-y~eO$8!f9>kM(o!{N1$6t8GecNXaI{Q|EtPPn;kzyZq~y
z&#|x9#s7L6xw$F)l7rBPbB!+YD<o}g_wHAg-}X}N)nBW%>n2S#o3&%V-s)#^*{``c
zCS7>H;O;4pxMS|KXJtN!O<>5F=Ge^Mb$Y7l-cZ~5?`LVP+_9!>l4;pjAD!=v*Ds1n
zNWC@*`tkRq?b^4!{eMM{%?&Y$^@<8Ap8x5b)C+45&97IgAG&I~yYkEbe)DD1mLpDi
zo!#lnzpH;g<EOuMTmHTB-K)K~r%h#N0JR4si;F*Zd8uxh{P17jnfm{m&g}mcRx~#+
zqU~VnuF~yQCDuDvZTfb9>YvTqR_{*D+^C}bb^fzCYqkWv|HtRF_8MQ=`V|7z6%|`H
z2{Bxm+quy*v@~?{yh8>$*O$*sjBs05|9Ss(V-CgR>tuh{+`IdrzO?tjJ|&MyFJ9$I
zepQ)U9Tr!%^E<=wUD8WaOjMHvoNVkYzjN>BDlFyR^&v7M!esRy>venfY<bzbvs^~;
z$iLq!95^19d+l^T+VJpPp6!}C`!61KM!q$1iuIKbdp~_HekK2(_rUBAW_fp3ypmwZ
zm^Z)dT}}R#c9ol-^7o#)Zo07k*wTGkDUnB>Pws!OlD=eGM&{?YbI*88s;IHvxnsel
zQ|B~(Wu}ExxcN?9ldRr6@2_moBkpza9fH$CZTbDLUlTmynp&JKJLhbr&8Msf#m>Ta
z5AC_Wva|K^^6z=Ii|Rl1ALbVS>#iZPZIc|s6{&vrdA7yt+QZ+gP3!MIRVOklCMF;;
zW!3Cot3KRZ{AHF_=5asS9^bEBpS0!f`(3*x$g#B|@gQep=2EBJeckP;>d}k4m(NRG
zCiZ;EbXV7u8`d-1{z>-lS6cI?=T23`{oNBICTNRs{PaH*w1?edSB1v8S)U9{G?jF=
zu8DB^<e_b?%<L?y9sPK9<9Y7San)ZoWj@N?e97hHFWHvE?mXG|xWBBsbn&WZhyTWn
z+w#30&gltyC%b;4hkUD=_|tHSSue^qnI>g?J9bo}MIin}b&Yjor#q{oz}{L}Nw&HF
zEcYlpFOBS6q7eS)%|Z{grPcf;CRv}3oYjB4*uD4T>szA7@*C2cE59`Uy16@D|D@E`
zw09|OX&JMge)OD`6fsTJqsd)J<S0jrO_M^3(JU3tBTBQ<e$)tU|Mh{@#zu4bjy0>2
z)t#M_WixeE_lqgEyl+fOOFU3|C#Uz-tW~+z`#E=)Z~q#~xZqt(?47<h_Lq+wGSc*&
z#G)kNyjkb;sd_)jS&4<+I*uE3yie7B$X=DYb7m@&;{8+SIvhHFcPUh|^t)dYnLInR
zO<>a&vsK^Mt+*7`bzGgZMWgE>cg2pqV&#7xd_1YvcWQ6R(=T`a`+WTLsj4`zAs{gD
z;+K{4>o&h?UnX+w{<j~p?ktZcs@OTPILV#fByw~D%fSmgjzV5GS{6E|r%ewNeH#Aa
z73W!9-Yr{L&)&LxHCy~1=Wf<u-Da@{7x@+Q7cE-Uuu(qmc2UID#w}~T!~Obe&YLSJ
zI9zRHSWwk1rn_x((d+BsmbII1tIt{{ra%9mkzU*R_UJn%Q)kcq%`eSw_V?M2R~q*A
z&+jb#zq{h)o>k0@S)99S7{4ax<=IufT5`eq;3~c)yicD$cRAYTJdK}WTmJof@%7db
zv6uJE`}OMSiH~>f-`?SitlRwO>-DW`t*@=J>N0b=eC5|!?LN87AKG*;l!1CNnI|Wm
z*N^$RHuCU>D;)pQ_7^C6Ty12y5clEdpJK=KvbT5FymGkZl@lY<ob}+&zMV3%vZlN5
zK7X}!LH_l%hUVtsr3wzQp!U4b{PX;L*KV}Q{77S8pr@~|pDy06?mxS*U!^oKHn{Y|
ziEW$H{a0HFY;Cz+`{{FWh-}BFhu*u5)6c<s1fqE-EPwtM3}s)GvavAm!&yFuy#?%Y
zyxuP}W<~AKJi2p%@rBIgsXuD|{r#Qz+I;<m4fA5JnuZo+if@qv_oyO2?F>J^ZuND&
zD?N5LCcd&ZyOiHN-1_?Z|DaMGhAr+jcK;6^u5Rzk-(BMBEVci#%gOF({<k+2@}Ajp
zS?bxdXV3NL{7t$l)4TJ*=O-_l^~26u)<4vVxy8DcW%E0Rt?ELZ$NG3@7~~!6NK6iu
z^*#;h)0I6xCwswDyutj|?)3Zz^3V50Zgs6)9=$O0)rpUHc~)7Lz6zgV7N`mD0C%On
zF4;2G;P^(bkn16DZ|%N$^JwDzeR~TgvV%P#93Zl_{(qx!qvPe}b<duGJGax5XKDQW
zwf6LfYJP{!4~+i=9=4NsWgfNn(%)CJR=t>UV*a<9@2}UZKR6QiGASv^Zk|cymyW`$
z@`NeVr{CLK{yFW%)MCf<2VDFCVjf=_pJ`}mas5&LaN=U}F}GuEzuao~u&=UObWBC<
zcxdR}f7YK)rhoqb`Q#JNdGqG2>f>NAbq>5TS>6BN58Ds#?iwsVcTV=~+O=!ngvf?8
zYiS+vTv?b@xH3Q^Vq?+K4-XGNII^!dKm;_ZYQO%UXqo<+&5Mh})ytWgokQ8LE|_!Y
z%%4L!6E%*WKcD}rXXW4D-`m@27Pw4!!F)C(Bt&JR$CQYLix)5UPzg$E<xpg2XMY;T
zalpEJ(TX>3a#X`!ym-+e5cF<&oWDQ+u9*F)LY+%itnla*-FCDwF)xoVy>>yb!y<l%
z$pS1j5eyaW0xXRJP5!n44D4(H`UbE0zynGQ^c{JM>RYtpzyXI&mqo7}7y_WfUk=_6
zMDAa^_U+cz?5e7&RebCWt}LfFt?FZBFm(|4kjVHz)=7ZHiNo%z1EZZmiczGK)1kf9
z-?!!5oHT!azd+T82aUbGy{i^8pIWkfd3s*nx>p)e+(qIHvp}ml?`ckW(OmVAnR$=0
zTaU!X!pCm$@$sSTmx?CrX1Jg-;RW*tzeX4NE8W%xmo8skAG@1P_t&gdixxe)wA5SL
zEXRQ(GAe4GeSMto<=PXm3>iWmUl=QvJ1pXV75e=^#g`Ws7rA!dxqFwHnK@KkJVRK-
zb*^=J-qTZ4Wv$D4`uf63Ep!=oax?TU)aW|@TzRL<{AebI3ke_xnU*BjRDC&d{5X4^
ztjVQDX7*`1kwU`4k6*rA`6^--Z`xhP1%`rxf}q_D{{HS9o+^`kXPf=~aF~A;9~T3I
z!|zA0Uvo$9TlVYAWq(1Z=<Ru-r3$)?y1y9qIDUV3H#sS3N4>VTb|RlCgNfXh7tK`%
z8$aenZOgg2ulDy9L&gTNT84WME-ZAu^Z5O~-+piHo`8}<2Cuxld`m!J;KWtTnPwo5
zGRMcq>+9?Psd##7>MCCFHlhWc3K!WQoGm!NXQ}ser(!#h#w)FA{4$zaT3sC-8k%~#
zy4tm$RAR0^ys|!i|39^3YRl5p?Ck8M3Yg7&uP*nOZ@KW|;^I(Q4v<cV;LL<Y{()DP
zy*HcB&Go6|ds$)G_k!2=PF|_mv%h=Q<E%52+b^ouTS`ld|NOYb^R@Y!=83=G_U_!d
zbLmo5zweA7Gp;l(Q=MXHXejSL%clC+Bjw-cR#;6-+puMeoMDcRZ*aYPTlJ3Wx!hKV
zOS#zJ9y!#?{csXDSYO98m0u#Ry0N=-EDdYF_X%6w+O>*rxoU+?-Tr;eyQ(YK|9K>x
zF5X`I`<v6{I_r;*T)&)~TdiY#t7cn5->PJ=-5El>l0DH85icITOHF^et?X-<>Df<~
zR=0L#hv#qIT=co%yOxelNU6nptFA?9XJ?paT`2K>Hkmj6&%MK^-DT6SgZ7vmu=WrZ
zs_k0z=TF<e9X|v1?`sZ`?Y{Kowe^eRXWRe$X$ulr`YPgHtbUx!?Woe7)eDczkvXbf
z>f2(gs^l-eT<&<^oPg2{kcSxZ7jSm|`v)FiN(2p(IZQc&JjC=~X`SNz70;NN9n<r6
zPB7WxBJX_JjzP-j;bPxF5tAJZU5iwNI{yfDx-hY`W&FQlcTv341u?F4q$4r;JPTW=
zi&7~2r@V>zC)7C`4@EU8EX<T=;QjXZ`+fhpR-*QNJUm~%eGALASz!C%^G{|ro*P>-
zh5wabUgpcp#?w$(vf!^Wc>Gn@J#fnM^zUo$%jPV8R+Fi#I{8u+TU2gfrSR10)9W@T
z7Utxb)GXY?D&l(fZ^^;0rv;ZCxv)!fAJeqdQz;k4&P|$d`+9<t9D|8lRn@M=i<Q5>
zm#_bG@af+NvEN=?T-?aaUi9Ct=EsHW*TY*sHf+~4FetdSB~xi4Wcb*mziRsncJ}!E
z-G0`Yovpvk?_2Hq+qY%fu0q9S+uW{+MOP}{X?%XHS6b`lFYBcr+y3lYkSWj5`{cm`
zgVa+Z@9q~qKDN?8;zHezU%!fs<Etwx9jEbMX{u8HwY%)yCs~6fx>?gguCTGYuK!c_
zW|66K-1Kn!eUty}+Otd7?25?V>aV{)zlvXV>(}lD3*~<LGVcAxc)<p=45IGC-SYb{
zU%p&vCUK!o#;U~QAtS@vIZ~iyn^&)#xRqga_W8q?PP%qZ9?|XzX^9(NK42+6&6m4z
z;W7gwBhKC8Y|VAIJc^}1y>41o%V5&e+<dr0P+7o<TU;-sRA+(g!>Er7E#+5moBDm(
zym@nN)%L43vr<)sCaGv0xq2x|%idk4%(iiv<h0b!n@=BJr+($y2_^Z?y!dWy%{3{J
zW{OtNj~$(HX3HcqE;dDz1L+xMWo5Uo{?E(ub*_uOu!X-tP0~DX&eEl-Jo_2Bmif$7
zy1$vbq0DdZ@p35%iEXZ1XRcKJ7-$(P^m6HarE1=S3c-njb?QgUE3S8adR1*6cX$8H
z8S|C5Z81CJrOnCh_riF^W`_fdGt-XG+JEiszYWRD%`$&%-?k~cJL`U`ew@pG^Q<`w
zHZ9+oFlE!LKlzvU-8j1Pc>itl!?`7l0r7Qpbtg}rT-C?4#hQ_kaTOn9Lt4ONm;e9%
zvgd|uo;!JEwEyc%i%!j)&+o!9Gg6}EzNaIH<jhySKMp+pclOA^#W8E%^u&KJ|B?33
zviLOL-}bV^$ZwtzS(i@#G4uK&=u}u(m}P!#ckQIvQO}u!E=<~I)hj%yZQ7gT())h=
zy|8exfg(RcueO#}(2RL|=3cmZ_3g#Q?p0O0Rxz)X|0A=atG~a0l{3Qv$txBY-`}}u
zsA>0HH>X3T^S|vgK@LUX;@Xw~c4gVv+J%|!wJidU0%Bopmu{K8am!C<@BQU<L5%lj
zspDlkhWrx!H~+4$zJ4KSUaoq1=<!PnvK{MJTeVb8nI@j{Z2zBMudfC#uVqSZy}wLc
ze-ZON>GO{#mmkWrwA{MwusTD2qm=qDGc&VQe2juG>Yp>PT=Y12ZPf|^X$grf583W9
z=H8tUFK+UdIbeNt;`irgX6C2AG(3~OEnvagR|Qvu&ejN&*_K@{pO<`3`s?S9%B%R?
zKcD>D#A2{!&HnE*QnjD2{g=ji=MmeM;w&49aDRXONAI`2+I!eY=kSI*$t?o=HcP~v
z_*X7^*x*ibUT(C9S8sFL>}wf+uUP3a3x8q=xIV}7^YY$k<0bzqPJD{)asRZd?44o$
zr)A+AXJ%#=eE+g-=?CsZ>ZNCIe&^5UEiNkY_4N%dEnzTm>lLmoF8;h`j@i#L?~Zf6
z9p`-g_4+uxHFa0<?4H*ku&Y$l%zE*cb6YD~F09qokDngi9#<O~tIEB9_MG{#ee)$g
zm!}2A?7Q@MVWyU?vgobmXt$lgueb2{oM2{nez3W{Y?_?Sq~)(1Oj@=-Kk?rD|AJQ<
zCSl6^722BeZar20UEP0kQ>FEpdfr>QOy(i0SLR<|_de(P-pz|Q7p<OpGGmg0Kx0PN
z!;hYAiIp~!mPxckv~bAHU!vJ|Tv?;*;b+fTiJnalK6=jVc{Y*d@P?YkN%aSk9xqx_
z^754a{(!u#@0r%Q?^_jA!y4ok;}p{#_xnNYw|)PA<drFZEeS147dl(~=ghBg&y59F
z!(Yz&!L2k+^@Gpk1=shbar5xZG0UChp%S#a@I%&}Mg0P^%<Ioxe7t)~+**eNk3V|K
z^^0VEth5PIcrZ~#QQ#Ac(>{kE=aVP7b8Y>h(to7&<7N-Jm0xt`FI)Myy>5<W_O7DU
zS1aBwRNSwZaf|)EMW@T8NjgnB@jKbR|9$c7tU##y!oXQyxtV-_FR%@M?{fd(!NgBj
zJQtQXh01zJ@2b*$al15o!F|8YD^|JJ1v{*-{h+6<rS)jC)v7+H%QI$2O&6KI%8Kjk
z#in?H7hCyn>28(R-IsFm`Mh~|tG~ZW2i0g1Q}pfa)wRrO-XC1Miq9o?&)=1$QEX~Y
z7#HkJG0Lp@ba~4ei-iumH+jWGN9U%#ys`dyMy>5pYxQehtCbfy{i^O4{Lt!k)8zCf
zm&L-XANp<RozD0+Uc26rhxP7?qUsqF*tclEy1S@f;L+!w2M=D~_AX-eD~Bol%T|7!
z9UikoV96_oD{j?!C)RV%`o@^CYtp7akC&T=c^!G|cJ{lx-RsHUr`LTtxarZQJFjM)
z+SRJ9b$W4JTWIL@&8t|IlHax2*<AN%d?j`A<K_FFtKzj&iycCzd;*8n-oW23@}OO3
z7Nxh2v-iJSka_l{wEN{N6Cdwhc-c>Q>v?EBQK7tYjoF7!e$UU@*8Ki4`H8)Kbd*!B
z`E$EAS)bR_%#B}e$$6*e%=|RwS+94Of%(R)B@Tg}eM??#-M8*hE9(NiDgU^c_I`8x
zy^yoh&MD*Or_{}Me^V}g%FJAp5_)_QOXi{{uBVru{q<$?Oyl$wR$`_L;-KYCZ?|`s
zhUV$-Z{M!paA)=G^#KcXr(RvQ<ha_>y&Cnge-s{NEp>?rn)bi^%iCGEv|`pQ(fR+f
zd&2SaP1>qSEdr-E#WdasfB4bUU;3uW*$YRPRxUd>_rur5jup}2d9u?_F3~w{S6OFl
zsLQ1o5;E!X$wQ7Yfu{_54qc9%c2@gLN5?Kv+5ZCOu6x(%bbD5W#LQAZ<yG<H%lS8Z
zLRtbG1Fs!kUaz*yF8p=nhbtk{f14aG+hwSms9bdCU}a&kssHz8eRTSjU77Qjt!#EL
z|5N(<%;)FlnV6VDWc{j_?}Pe}_v9(hR}1pjEROyEW#Y?7&h775-CXYeGJbMo^9<|M
zM~hC}*j<13-`23GW`VA*-ScPsx^w7^p1S?lE3NX8)7GwAd4x63-sZcFnU3Ah_ifv>
zCwm^A&w4$!E07ho7T`+QULT(Gx&lu{(>{3Ah2<4RJv;s4N4tpX)ypp@%$+VJS-pMR
zwqKr4O253<`(@(H{<n0&5}p12{enxMwx+Lpml$bg_VDA=+4lGAM5fG}dSKHV{dDvD
zwKWf2@6_hz?&Ut%zWA}c*4L@by_MYi6)tSy5Aj><*7f4$%h(+PC2wzSJ$ib1zntN^
z-QoF5{Wsn(yX126qT%_xwz!{}&&xbM&Tg9h@J5V**VT<0$LnW*JF4ero3O5y!9v9M
zYOc=nlDBu1bw8(eX{23zBfol;)|M?LXMESn+5b*AGmF+v4_5YWQaIzgcDsCBM6B|~
ztA-M9jNg6SoM4?T{{P|T)A8cwA)6f(N{T-CobIX5e_<~kZe6-%`l&3XMNWTy)!sN<
zD-f5lApOa0^8@Ertv+-)eyNSN-pQ{V9~?QpzBK%^TzUGbc=4a#KGy$II&$#X)#cAM
zS^|6yE&g=<=;Pym*cGQtojqrg+~H8}TUVlgvp$^ltzXuft@v&8cK^jfwK@t4pvCO|
z^K3Z(y*{>8dbzyKp8MO&>s7D$UpDDqe&*z-`F7m$CIuT-uYP^!zt7E`<;Fdi>ld5*
z^%$h|++Hwool~x3X5iDS#^;0LMKw})vpDw1-M@SJ_OxXZ#i#k&j_q>&xxQI{Psfhy
z5$%TiFXow=ZaQ}QL^Ee4LqI}ip7`Vs9zkDsE#&;c*|cS2ks7Da`2))JVHX_lt0=v?
z_PQ%*VSuz^NNn)R)r<WFRGdy+J0+=@a^>KfiN4Q8mz0}qo*18$|M-`d>ZN<fp4O*w
zUACTe>q@28sdL^_Ph~mD&k^O=(!!+seVyHobUx2dJv{$^#>}1>AzAw4eez?!n?G0P
z*O)qJuS_X2n=yfXMOT_!R*hZ#g9D&ljXB+?%yVyTsr&nD+X_h&*Wg)+hw_d{&wf=~
zpRsBE<6obGI)k>|K6xzT^~IIudV7Doyqz6me@pXoEqiZCZSbP|Yd0-g_OjCs)X4mI
z_U6Xw7l(`a=l`>;I<ckgl!?jKr}ES5ieBC+o^oHL<-%U|>Hq#tF)xohtLyPT<)Om<
zC4Wi_JuB_ZAEu>Fo#E;c?Y;e7aptT?pIepLYA@Yjdvdt#rseH<T>7lem+b;L&-#41
z&F2~@ZI%<UIgNKt-~QUOS#6cN>)bd(_pJ*%wd`ljr{(c!EwTO9#eX*b`LsHH-p}5$
z>_0nahs9*vbi03W+21c;N<!Ng)P4E##pK@&1M{tNh94eJ_?^yUJ>%<J%SnIoo8q+B
zF4LGfFOPj%YQ)a4nrW#Y;%6;1-W1RK>Nlg4hN^9wwd-@PE4z1I7hQUCQAYmyg&Yg-
zG@0;=&!6&Th8|y>=%i0wr;KECZF6<+?m5JxyKvjejj4J2PTV=NYKKn0L(9sIOKWWT
z%+~qGw>%N+Sfe8&=p^F%(L>Hr;M2uTJj(KHw+r}HFL=FuqNjaf3;#VMi$k;26%`r(
zfBo_$q*Ukqv}b0AAIN{HO5b2$aOIoio1EnQPan#Xyqxx}+ZXnpaqiNfSDq0@PAk04
zz2_f{W$L$`H2+`HkKglbe_5T8E)Q9#<>{LH;ipE+gq^AE^AE<x*`4?D*A(KYn0K#i
zZcgt%uC7bh1i!p`f8zP)clW&<I5IOo|K=$vdY}1QOYQr;vp>w=9ksr+#Xm5l;KNt_
zY4tacu4~_yXS-Ro$!$sM(TvxN<hTEQU|rC_rq0V;)o*J0vP4_wL*yCR+kUY;UwY%i
zry26tmfbj$61YXfI8JMI?JuPz`TY|oz3TdK;x)&@4<}wTSN+~y_HkdyUytkOY<KPE
zcj9n8cJJ-=>@%0e6*(5V*Z;qI`SAHy_j$i@EIhL1`9{u%78mt}#a)lyl{c;MTD#@f
zjrXtj>}}(F`9E;G-d_E?7DgopSb~#J8x<ycM%E<;PK&<2kL&A>vX^)7|K2;<G5YTA
zZ&xoGCS+vYIM6@e_5QjEQ{2^Uj7+zk(LZ%YS77ftovqsoOE-OY;CL#U>T=xv&AV%A
z(-+@QeVgSYZt}KyduPMRJ+q!3Xk_-DrgL+D{r~6l>({-CxF=e4*1&nT-S?XY_5FVv
z=U2^Kv*>00)(KxFUzofu-oKUGpS$Icarv~hvp(;h*?O?+JyYKQub-CZ|9_K`{AGTq
zvijL~%Rd~^H)rqpx#Bp-_xIAb?kx9i*NL_-ySXL){oS7T_m0>7Y};7Fn1AdAbF<s7
zb$3JrKI;_!om9-RkU9O?oEz2GPhI<Qd%oSTvX3_}*eB24VXbp|%E?8#b5v(t-?BgX
z_qk?vzUu0pqPLg4H7<meT4Z@@t?sO<{2zL2a_Q^qbyn%qRvpgtsjB+*J9(MUm-su6
zq*krc?(+UzVY9DuBI~?%cQ;SZCKZlJ%QPDuP8jf<4X}}$zf5z|6G0Zmy4W@A(~mso
z%$ViG;;7J+m?_uazx&hY%C2;Gozt6iy4BxIKb7?%@#LnQP~WBV`WT%$5+%DPak55n
zD0VG-wYEih<vI<`v&QCIuU)*B964=KijCa-L`f#awp5Qv?c0w(=gyd=#4#x`!)|}&
z+q0>Ul)mq4`)q&tOj|=()=m8rw;c^bQ}^7yuw}g%6EpL2-`Q$HoiZ{qA+p||GtPaP
zmCxuJ7`-jWkt6r!Ce~*stE{Kk9sao8+J2YNkL^3w?Ao#5(Y@Xup7X!)@09xer;}s-
z+0%Oe-+uVJ>%7t1j04Zj&6s{quT6BVO!{N->wQmjc+!W*?279T9sYOSy8ier`}ytN
z>*iM1J^ixTj(P4ZxoykNZPlOX;V1L|?PX8ty}NiDboL)@ValC9Z}GDJ_}!J0pVgbb
zd?j%svV7~dH)qan(|o{PX=CR(iK$UQ(Ph$-27MLIpabHcJmfql9BY$htx<FosM*(W
z{_*Duo0x|4kFU>OAk1>`?zC=e9nPi$k#<fUDjsv5Dz`|jYFWHIIU)V7sJpj7i-UrS
z=OmDx8X3j@<Hu*(-s^sr_H%*Y+dq2R2G{K>xD_tuw-rA>_w@O5<(5yMKcAnQ{ig55
zg0Hud+LCRVb=AeYA2QDC-Y;qUzB|#>bkmX@HZ20af7gGUxA67OV^e>vI&f!Gb6xxY
z)J0`;&pul(Q}^Z2AKU$BFBxBO;s`97dLo{8Lj9eC9>2SL|D87PDJ|M)V6ra#OWb3V
z{B?ido8?Jfc+DK@zEH73<^0y-{qFqo`*&(E%<}7fw~49vZL=9`XI*fh$kw8#UhnRM
zmejLvdb`EdxM%C$&V?KG90khPAD6vT_4&s;YwK(Oe!l)^uxHx&|Iaro2wb~dBwwaH
zZ_x|Q&uj(WMwh$l?^VuTlu;Ntb;%+z{U?P}IbN+?@?K&2-Q{Vr_iL-qmmjRR&w8j*
zHS5Y2|G+Ch7kn<e*0s66S?u*o!-{)*&WFgdGH6{p2N^{H%?0JJDt>;BSJo;-MM$y5
zMd{*&h0Y5D_v>n`mRy#%@888Q`$QkTdh%mWgXi8IGk+9pe5JKA`g{Gdga0zz;#&kf
z|7FkHJ*DN(-~0D}oL@C@-{IJQvD%CNSF<kI<@M^?T`9#SYn3^E><|xU?suPL!=!kn
zJYafLOkwK|H}~)x$FHwkc#~nalku!?^0qZ^Zta}EYH@(7r0P=1s7_HX)?3q-&As}4
z0>gr-S5_$Q*ISqQ|Mb-R4&F)uViJEYhCDvjJKL&MtM1K%2Lcij8WT0ro5~IZUOU3!
zr2B75<vxyuy}#8$y_XzYR;89!RW|qRxBQ(OtNzLVW`6#s?)B&8{6W?dS@(BINf+w>
zeD?H3=jLB?cW&0P-uvWRynecl%ja;u|Ecj2rBkP@21UvGq~d-53S(ZaZW8x5=K6eO
zZcdMt#LKq0zv&KduU<YsE&t2=o96?kgjBpwJJi$KY(L{oY?RJN$vdvm?go!)&$BD8
zPt%wDbb4!Rf1bM9(dWE!SJzg{|9-LGIBHwJ*8B<Wi&nI9i>IZh`_Hj3w6?B(dTQ#g
zU%$?-Qq<I3n*Ds9?(M3$#Ht*picsIB4f=0x?QGwi{C(P0W&fB!DaqpYMJXb>tEWr}
zHc8FBxifyfVbmcucK$0!{lT-h!q#s2_3iM26E}8qr{x%$Z_Fxv^Z)Y2D~?JNGj4R`
zGR#^O>$~={(T>djXCA(Id|da?ySpzhI&<F7c_7Qa`JIWh<ALsFHK*oEG%9d3PH;b&
zAvgcYM~_J=8eI!hOb%}VZLcdS+PWZ9O?TsjYVFdJR<&opDkD=l6ep>0G%e6rcF%lQ
z^TfW%-K{=u>C2~U-RV7j!o`2ZQSCF;XP-~j=>|0xSe%V@x+`jeqP$<0U$}Nv_z@G&
z;ZGGye6HPMiw*TXF?r6MHH#MqhlGd-34zW6$<KfP?AnLV8-)w~j~;8&?b+!Qv*Y{!
zFh8z{NB{o6nOhzq94X%Z{>%~qCdDZics$;RvMlM)=-}P(eOFoR>2>So?{W>lzG+(N
z^?Rq+<%YiLRqEo<@R+F7A+oaR%Otl`PktvGqzQ^Ds!XYzU;FLkot@v$dGgFO-e3LB
zQhupv4!i&4ch5!BdSr~Eo7eSjHQDs)T-;s5{8z`$Tl@+&O?|%p{Vd~`>87E*>-Q>k
zEt>s**59{tWH*(5xxDGoKZ`H>^=6ANdK_79*BqdtqjS>e?d_|@^2IxJgeK}7_T64_
zZSJ}`QOj!+I4hfu@!D0rQJ6PjxpqVP-Gc`+?Tz}Ei*z6Tqo&x^#abiSul-=d&l`$m
zVJc4X`*luNfAzc7|GenO(pFOqEw{jp0UcZ{i~McRnO-Rje#C7wsoQ?t&gk&N>ol?%
z7&uy2c(ic+P^z0OP<=LEh>0PB*T$1wM6~?QY4*7?ThBi%kh7^Mcztc{rcImnR)3eX
zC|Iy=9iMe-Uf#LKA0It>B*2nrG;@;T*RNlnpPPGoYxecCv&~(VB9ATI;?U{C%Ahe(
zQ+B?VwY}=IpL0JdPxsnW!_csb>+adi7wI78w6=SvDywfje9FwAQW;y2;wn79`uV|^
z=fAI9xjN&~=O@YMmv{8+oHOO0$40X+Dps0G^B4UoJzcVib@I2v|8&E`llN3iT;<?h
zu*>?#TsHTKC9f+^>A9-AzIAtZ|Nr4IKWKmD-s<gbZO4vwi~s%eXM_6!<MeZP_EcUz
zcu-MMG4aKPg%QbRW#6`BUS?uqnx+?9_4pWXeSLkSgMxOlouhWNY>QH2-Nn;8mi(@4
zeaXNesHLTO+S{-H5%;WlYIo~@zw_<>CwTF{)lHr$OR}e2xL?S@;GiNTwzqcfEXiim
zYv$LMq#e6*Wv_7e(W_gZo)1>8^p$xNQkq+NsJmmwk!qc?zst{vE?l%`&XE}{w_8<j
z&fh4xd~Z$S>(d)Q?>G6F8f>t;)@0M`O`j*t&0*KN&?eXH^G@OZI{9Tw*J|B;B%V?J
z_$B}A@}7yUy|PZd8Eg6dCEr+<eLM5B;)<Q$?*rGH3q;)bJC?r*Dsj8=@595xix(|Q
zN=hnwe~;I3!pxa7moHCGO<lTe+qUJ)m+#zZ$>O+e+qPM=W^LWNRZ2=qJAB<7lgvrm
zwwW;`{Qvitjg3v+e_qU<io)Z%nby2(Ze@Sx>y<IOeKzw&>+9X8wYz+J-y{p=O%D~>
zqj_%4Dotgf6ThsEP5S3slNWk6`usm-d(*^7*N2anU$=~zwzzjYhv?GuqjnuTZHoUy
zsctF?`n7n+k!mrub6zP=r%b;Xqqn+$UFM<g58^ZZr=7X;?PJ~RQ?s`F3%}oK!Q&{v
z6t?$kuvzuazDYmTF9$#TbYtaALjxXZ=^G3e_6Qu$ezfP5Z&Kl_nY)&`v0Y<m*wl5X
zYt<w*JM;Yp%uNZ>+~GOtuD-FZaf!PEGz`qku3WnC`%35!rnqynLoV<8W|<!(9btMc
z?XT$zD|!C(jjy#=dHe9>sxp7>j(e3U?J1}HIQY=qw>2kJB-glnElMe3UwBcoIGj(c
z^MbOqvP$p7a-(0>GlN1;Y%<uqSRf&_wj$@rRh?#o&A%U-SC?I}n|*d)jpmb6Pgi%D
zEfL)jvu?5T{#Nd3b^G$#7DenSIe22Ca#Zi9S6$B@eW_UTNV7RH$-iUy8><Nkrm-KF
z^xmIuUGidu&!TUfEKL(93O?IxWogOCASETWW$V_NKA>}-y1TnWLqiogR;^sQ@bXLl
zc{V@){eHi(QA<lJFE5Xile4Jo%lsqvuUs>_a4m_6;nz+6zK(q_o?4wcS@vM{9+m%%
z!7EOg@NEy=Wk35e2ZMwC+`nxr)3ef_PMjdb$l#E0<hHJc-bXnGhnb6BJ+_mo=4CLr
zV19kcYbSvt7v60C{6R>sf345Y^Y2nZdgkrkReY_bbk?g~3=GD}?Pu%H{p&fq>9<Ff
zk#EhtllA7-w|{9&%v>1wT=i|a^7$7=zqBS!J-k@o>h{kaR=>Dge0kSMaWw6;F=IIE
z&*EG2Zf%F~x3GCig3sSvl?`^UU%&e9_N&~5m2<55{Vr!lrMdBGg;ZU+{Q9w*&c6za
z)<wSz%#IwnU}kN<bY<u3gttF`y!`5UQ2T!L>Dq~cdn=w@JNGZ5%FJj_v(Fsk2M_P|
zoGiBWd(-(RM0d)%2C0iuPiM07%rQ*r`F--TdsW<(y1IX}b@%6XbM${Hlukb=vnHc>
zmwdha&izR@zdt_SAHT22vpbf>_U-OVZr|SC7MGC7NNPIXrNIz$;(d;lzGD9t7u%vI
zCl)MN5WBmKk-;qgUXN+l(MOv$8F|V}^)6ele|qk++=WYY`dw7qkHshoc`8jjapM3R
z1H(asxyKGPz0A~lb?NU*6J4gph|teryFMO0t*)B7Q#4d{o!`H2VR8mv=I5-v@cTm*
z$1j1u9>Eto{5kV8)+kP#!oUzCx4Lz4d~Ec+1FH_EBrq_jh^Aaxb=D$RQCIugmi4mV
zVwSjsP5bfdv764pee0~E+9n!KkCFY$`&IYFs;KjmoNQy-yxS&wPPr+3E!p-c!=6*#
zm#)71tz)TUry6tV_|=p5FQ>9FG@MTE|1>)}-I9T!VNu5F!|c2gr<1OC2V8vpXUea(
zEcR@FL9LLmtbb}MOWh-9?pzUY^~tB3Uwl$3*cAm5q}`uA3k{dwd+ULCihSAM$qPR$
zn`WgKr{<zm^gAfXSysGBL02}kTz+%UlSfT=yp#ktmK$C%UT}Z!BqxOfWq)~idrarM
z?2$6N7I;9sEzVz*)780IcFWf*d9glgR%QIT5^BfKBPbbgVDajow*I&3WkhZ3-)#zX
z-Z#@eb;6?Dm+MxnHk4Uodp}gHpF^Vf<tcl<KE6r8doNye5B&1w<>lJn-;T=GS}NBo
z&R^s+$#3G#)f1*}(HH8Bdb83sFhoPd&E5U~kH`HC4I4HXO!QC@>rRvaRg@kcC+1id
zZ^)ZDbEdRe&WjJxnc7T>``0b>QV}vL@%_6;eVfJam4{djc%o<ST9R%nYm%@=W#6Hb
zWec{6eZKLNchVn&6+0py3U?n}d+Pu5_3yWt6!J-!h%$Wmar0}x^#Y}d5juG(*AxAv
za{QW~Tv?uT?5EPyt4pn-*luL+3SnFRXw#f6XLj8BRURW3t&sCiFym3N=aT<Nk{2X>
zNiDMx>%Dv-qB-@=%k=lz`F|H$$$hM?l3{AhNWM4c5$A31zaI-Ynj~iZ3cZ>yEuB4k
z){Z@DdQ8F_-p>nA>G9{AZChBYUMpfNH}k$D(=iLX9h2kYPw%W&t^B3*-rw@q{y&C#
zs{0h4oY}nfw)^oX`F+(hYM-7lb{1YcRoZRcoVsNS+b<pK-1+DELl&i??_OP7ljkpe
z&D5j2W$xYHOOv~opZorWdyBUI%Idk1dGC`f62CPlT$h!N)C*9ZwZNuXPVMda`TGlk
z9`LI?dTu2DU<<2k+d+f*H|zgy{eR`<<4MQv?T{32dpKpvl#7eqwQo(h*E+{rbXL@>
zH~T-F{X1p-j^$ZKA<t^fD^4#wx&M#hy94`+`Qv8&KFbw9Q#vhap>1K`oK-HRHj4f(
zE-n=n6*V<A9v&S_3jhE6d-dwo<YPTEEsLM+sr;-V!o~35$H&JtcJ=@N{r&m#r*_zy
zj;^j-TQV;%^PT<Xt+n>`g&es%P1pX&^(*zAIkB<y+-z|fJ??A~E>;Ex!>+EQ^Y`rR
zldutXoG|<0@k(Fa?U_lBY&$*Ht<rnSJ&S>1rX}YdHNI^>C1wZfxVf%avEj+oZPOST
z6t*j@y*kA=N~%ihRMy7x?-SDF_w}_isJI0(IIK2%yoJ@MQ>pXlBh$hS9dq^^>e;a3
z^WQhM>g?;M_&xpkasR2u%dZ!6U#hV^c2;8dvD>Bs*(!o3L%LQyvG4rv7#Nf}QG4ap
zhrg`UcCu!ggz_pgzkbrAaZ<|f*y`mzw#FwF&xK!<ET8Z&Synl386$(9On>P|gN>W=
zQ-22bd(O8x|M}qC5)sk=wI2+d4%nZu6|Yo({AJ&YQ=6XIeqVW>`*8lU#PydacfD_2
zBEa$C{p<WV`{@Or*1PXJoa_Itw&Z2X9eL@z@1|Fiq%zAc<VYwPJ!o(bU(NgFY?Xu4
zyrw3mSYP2gr>Bd)%IfL(;PKMQ-}YhThtC~HAH8_-;`#ac!5Sj@`T6ed$Gf_^-23Gs
zBO@)XtoGIZ{&sP(``_Q+^|iIT`}^f>DmKiX9bHxRYj5@UoSYmcW@hW4eIo46ih@5Y
zZ@xb#+k3MzsY?3yZ<dJlcjflfzCAm+-gNoi%gL9@=gumuiobF_E^6{ZqpDf2SMFWA
z{QTy^BsTxI^-s@iUO#u+-4d5u-#>n={PsqY#WCU#yV1-uk3S|zv?W@os4UsAA;90C
zKf6Vt!$W1(j2TOoElW#DVPLqnK7Rd@E1moAo}c8z$WYi>zWMW{N?#ei?Hd=ZN_jOS
zbe~+Z_G<6`_!|kCuav|V&w5qWR;v@VIY~Nl>&El%ts<&duDTHI;~Kh5cjnf=j%SuW
zer_Hy>)YjPNnJ-X>H?R|oX9-UfsH}JNH=uFm&5<pT)$>iuua-UNo#L~<XV@ox~bDy
z7%FC!+~53PL)&=z>+k&$Gb}7`@v$(dEVY+<WExm?TdYaoSpP4xC+8Y3eX?1#X_ou`
zhYU=d`bv9Z+-q|-&z@ZWytc%aGue4|^~Cz!mh2Nco~)VkJR&*p<!ifL%YIq8F*JM$
zUpVQUh-#K|GOyU;^Uq8&GGB;J*;7<5waW3jSZ9lVyn4-A@q4d6*zHm)mzyJJSfLg=
zQ>^H_!nX6$qKh|nmLKPv{<?1JJV*7rjxw>ojY_W8-4JS#4GT5#i+-^;vGR1&cNw#I
z6{lR8nJ3TRlbD^o+)h8m^us;rYgIn`12k6Y<R1vqdcMDoouMK+gquM_bH&5Yts<#6
z_q56>zkPqd`o=vWe<xLMCbn}HB_B@A`oH!V-|pAui{Hvvm#tZ{<jM8;dS5TEU!Tw0
zpPyqXEF`ok@9r+=c0Nlht9kbI|CZ0M<KpAnwt2Ji<de+od@<YeWV?@U+OlPiUG1-b
ze}AW+pSSi!`GviK2`+ZGo;?i=)}Fin+_^Zrw<S4G+I!klRZGqFRkl6e#oQj{Kg0Gx
zaNobVr%#sasc%od)pz0Didv(cmgg9EcRL8EWHK^HNK0>j!N#B<)OqgQ+co9CLwP<)
zSRct&(sDbh(bW|w(Ui#2s3_62AX50+Rnw47mb_Lx&Pt6cLY&9@W4N3*aEK}uytc0r
zQO%n0KSoe%)!Nk=Dc4s9T$Rb$Be=uTWWHBmtYLY1ZE~;HR6mtT*L3VS4jObVvf^o0
zj1zWIQshyd+!S`jJY;3SOO}=&pSyw?np6&}N=QenkJ_=lG1NIQNOkg*x~Mv#XhVmD
zC9P-Y{<`>8rH41?Oph%8oH*y;s~b$-s*7+kFq|v1d%o_SO?ByV50wS0J+HbgxTJeF
z=G)vTUWO<31)HX|&D);+;BCj`%=M3M%wbz)^fr6_y;lXcvWwlq)=q3R?Obw1{6mRE
z8$-h#^UPHtrEhLBFMnHdPd4Qh)B2~E{X+L<$MJdjYyEnA;EBE2ot5jKdX%qT|Mbs}
zACF$$XPR$U<*T4{-_K67R!q@k{Re?g-TyZXqt?AWx#h;Pq{ZLf-`VNBFyPOhKUNm!
z=j|{1x9im!AD=@9Uo1}l_2S{xxF;{#+uLW)n6W_P)w5^ImMvprh}c!~^5f&P7rnEu
zt+A~5uwecA_nT5rGcY_qH&<In$ENrh4}*f4nVF6bPx+VIy^DfgUw9$%U!l6o$n(H|
z|BUukvnK8Cx7@tm%_pTSFKp+Rl{>ZBpYLBc;oB!em0i2Jd{36|;B}rJHX-__g^951
zQ7@52lXnZYI(hl)N!eZFbiH_c`Xs5>l?)7x4mTpst7;2!xU~4F?fN-mZ{^><MLuOE
zZ>!&(5SCtU_sp#7`Z=|dXXzKLjQme5jxflVU^Dpff{)vA!me4{epU1HSL&}m{6SnM
zgT-x&$(N|J8#@$OJS}zCEL(Y`zy1F2r<1hnmc7ty5{P<x?NHhrGbYCi1@~X>lY1<{
zqA28H_iiyGL&>abmu~Ji-;}-bRF-bhLtmM#J%^JuCu-c-e(27P!k>5U%IJBAw(>d8
z?@nF1az(xQ|MOzKYx%;LUaJ51&g9$Ih|Ny~uB~$lJ^VePMs#i!`^Dr-p;xD<#Mv<@
zJPP}De)n<z*axjoZ@LIbxXrr$d8O8q_HtvD?!7`gWcKwY&u=d`o}zK&fahNoQ%OOV
zHo+f%vpE<T94DyE@h|cU)9|{rzxumguiNV#i~E&}qcVJK?cM6{?Wt_%lf88H>Rg-3
zqQpeSYaI&mcC0$p3g2#>I_34twEgpZ_3Am>l%IFha5^`?O|Q4suwB`4^}uYK^WK-<
zy~^G7_r;dyhC9pGsmOEAeE%j-#rD+AyE|H6>-SESOul|nvXDRif3?y%{R{7&tUb!Y
zbm#u*l(W+wEPc(iFY;k@{Ao$cgFmmVRb^l>&c4gJnO#C6`(ItouNj%^7?Wkp-p{sp
zecMsHPSUV)Ui-?a=bA$6xWhExOy3xM`bAyWjT<*IFE0}n5jpX^$YQU6s?pM;MjSkc
zvsTTLPv6s~(BT#6y5v?T%cNPWjy>O7lk?!Xx5<1dy_cN_IK=+1T%UZ$UEKfwg)pnH
ze2*^NFF4-$(qz}B=K|cG$sa_fFH<{ce!7-f{p;s%+l#&%zBWH_!~TRE!-J>kTMM@S
zU+R88wkM|0Ea&DI*Lyc6M2ibQU;oLvGW#R{epXw)(?&*@`Q|-JdY@#Fv}bbT#AiPu
z-_`!g@|nr=v$GYp7T`TAL&TP2@u6!i`wCCloZq+1NGwuBXe;PoCt2&V6VIb8WEVcy
z{-x~Rw`RqPj-H-9B`<>l0s<l<XSN+ve|^>4{mJ8tKi@hxT7K$1BeB|ywXf)>tm{$B
znNOcCEw%PPcfjxOpW{22qn%%8?__8=zHp}S{*NA=`V)9mCJH{etabXAY_ik(<<~+s
zGBDh}7Sn&`jzQkE-%o@6WA~o@RVnfQ*Gn^o1seNb9cmVpiqhH{`P5ur#c$s8kAK(f
z-}q2CjsJl;=W{mMYsLZk+Uxe#{rmZU8(aCU^b2ZFblz51R_ey?x^m-2#j7hTZ*R-Z
zp7=<dot@piN#>nG<jSS@d#rdI8Jg_xJk5{y+Ew??vO>PsIP=2%Btr*|4Xb8d+P(d2
zea@cG&q`S%J72uGRetu`gK9<1tykX|v&-GzF~LJgSu~ZGg{kIGzlTI)gM`lfswfqw
zP8AmohwXpg|9bX*y^v=|gFX|(4#Rqp#cSVPoz6H{>+SO=Pg+`A3wOq-t1n;Z++Jic
zXT}VPMhAneD=Us2JNDv5hSAJ3DMtDC_vNOgnWdeX@#)j22@?d2X4+JL%XxXjPv+<4
z&$55#*Z-?LJx%xE!GoZaZ}{{5dUfU+ZaA8)W4-A~z`1K><s!3{@1H&XCbw{H%HNPr
z*<PWlv!h=9V7(Q6<CXbG7Mpnsb}VqKN+>%P&At1Yc9N68lSi4K&M(Y(GvV;F<?5n0
zcT2?CeGO3&nJQ*>{<GFz5rzd$%E{-MFD+0qd3sZt!6C9xmw`dlG<xY;_wF-)SiK(!
zR=qv?D*uVpk{e1{^%o~q7VUU(v|C(1ZqJJc4-D%5RM^|w+wJ${6F>SgC}3rX;w_`C
zf`06oDOZI!=8J6DCHQG)GY8AsJ2z)noLxBY((No)rIJT;7`;RuJq`BXIBf>|dX+9a
zh6U@ES#IatW*B}e^?=%us13b485qvoeQ#r>nPqQk`W1A-aM4q**x0*kA~(13$x4Ze
zZY_HoRbF0xW^>f;GTr8bA3l88uyyNP`}(?&5RvJpzkc{|V{`iX%gg=!=iBKD8yDPi
zKVSYuSxM<f&A#c=!$U%@Y|FiEVq(H4Z#QTD{Q8%dRK2}Vr=OoUb?Vf)w$;}T9a1ti
zHPzHyxn;|h<HwKRzc0@)VbY|cZ*OkSG)~w0<y#^xG*8v^Ba4=Y`{nkn{7Qlslj}TI
zEIJr)G){nngT=A`-Tprzv!1YTH{K>Q$EKp??c(41_IBKk0?yA5>)D1W`%en>J@i~u
z>g48j6VX)OZ?CfL%-4KYbU4Mb(Jd!uj*b4TY15XiUAuPS!h=~)7%t?#Qd+E`<<$Da
z>?Yr#1cMi^v}zdn&o5JVel#int+nLp3~eiy>AKV7f{(ts{Qa==l?91r56v%Ut-d*5
za#2Bw9%wXn^UWN)`RmuOumAACk>S9JiOR}KN>b9&j0}&D_wTR$ZPtDC*5-761_evY
zpYQJOj*N_SQ4(bMaM|C!^at<5l8$-ui~m14Ia$&;%|N0jzW#6N!6sIQ2Fv1SSFT*S
zv!n3v&6|}M7rEw`{XW#neIqHj4tzxXfktLVhSlNgK?kOpWKLRi-?2RD;iH{5EA>|#
zdujS-%K0U_?^Wg<e<C?6<0tDaMg{?vZ_=slxh<>KKYfxijn(gsI_GhvN&keitN+Fv
zTKrqT{;qjp!}^^iyX7YH9S%4&`A&o3S=VO@97bC&?W}*x%D~|EK#b8oVs6Mpj?jg*
z1xZmQ&4MqC6P-RS37inWyhQuY$({Sp&l4y&3SREV%3xt(k+6ENprGLCX}XuMT*=!0
zQ8ZLFv0wjAmqn%apCdO{TRXp#J5w`1DzGi(`SK^?ds!H4>dKOzKU7`+IetrRPHJgp
z(k<tiv#&7!s6D=IN>7Gs^u^+YVyQD{dRK<5TEv@a-*xNqRk3&RwI4s^9qYF~elF^j
zar(~neRjF0U#;#kdv*GRS(d$l!G;wpJi^1vZ)`~Hm$N<8Bx|?%`oxndNpW`ju5Z-7
z@L9B0sPoB#2MTwau702RuP<qR=l@W_4bCs~EOHwUChYO(wl8~fW!L||i#q!h4t~=9
z_U~8f&2#ekx%O7NKVM3RF@Jx!clzPumggePUL5*(V=MQ$_xlaL$NbpTqF!lYy7WWz
z%a8rVOODr>KR)xtmHEGgt@iuS%CIQS>4&dh46pva?caLe@7vbxEPL_k&sXbXHaq6N
zGrRES!L|)^&J^_@6pM4#$t>|YkiqV`a>~o@J^k;xJbF(5cdf7S`0~9zXHRy<qSS;X
zk`^oDYjxGNOfDY^)35NVZ_~@Y7Bs)uecqN;UrsZI=&TU4momKf_sPo`%Ox2a8X6Tp
zKc)Kk^h}?AeR_30=f(&b+4|3=b*FAT?B4jrB5C7}4JOu_Zx{CNe0}{~SX^XCT;Pk8
z+f`!E=ll^*5juM0LfM4|!<Uiq+usF-1x}bHdHH^#$Le&~6))a3U*=sCC0%@-Ev&cw
zw1?5k?HYID?#;W&%Kgjw*VbLzMW1JTo~`=xIe)ciuB-LSO-}nvp7$TqxYbgoq@8*H
z#tjQ~_2)M?r<>>9iP&4Ub>YH?CnhS}UzNQ7`o`54Kl|+ZoFaBqyu0zy(fKda{igv}
zJNqt7H;OvZRnO-dZ~3`r;p(Wc7<HkAiPwV@C4@L!Zc3&q&)GgZ>Sc#ZMqSy_<FgmG
zIDL8F-2dP1M?}A8x>V-1s~fsMt=^z;dQ#J@!g;&T=6qpbIR4!w>Eg7`jg`TFza{P7
z%E0hPZK3ev`lOJaMM)x})sp`gc`d#YvT@S<XYrPQMcNc~mPXZm+x`Enb^F`PK~tvR
z*Ek`*VoA$s!<R<Q2R(eJMk;konSQabvwV8}=IGX2e|R_@CkS3%wdz@}bz1eT68Xl7
z{+7QQ|K0b9bN+C>wq173UYRxaKNEt(<1J4l%e3E~5I!R@@zI^?JvHDK@z(0&r=G5^
zxpQo$)Xm55>ULL#N6wk|m&H|zo$t%PqWA0ClfIXH6-p7>x<C1N-%{`Cpp)h*EBDs@
zjZzS3c(?6(ppMvc@x3)at>oGS_BGr-vFdWj_1Ee49`VO_+%2~A=G$ygIBiL6UitiU
zY~^1Ht+-u1f5-6c*VzB-@5G2t%F03u*T+w*Ev$(2jE(e+?RHxzP&+kD>#owxVAY#D
zRrj9uIv}37yJ(|3tB5GGBG(cvO)s;$lfstVKZQ~xLK?a*zDPHp^OntXPYtKg+da$H
zEn1+`eL7Y0+eVWM=FAKmEO}W~BVT1%8Sp%RvOi#P=FO;G$^TTF1Wu@U3D0L|NZ9!L
zQ+M30=*lO1JY5rxoVl@a#TV1AE*+maD&dvkk$<f0TUYsP-u_KR$iufLFVWMiNx<j#
zt<Iy5x?W8(cb%Dc&iQCk;mzGmU8^3|ecN}#p|N59)Zcp+ZajA4z_R{zoy&IRmF8A{
zye%Wql&K}J)KKX==gl4wvE6>bvDXhBk^FaRdH1_RI|`HAc%`d;2A!Cudz+{9?Y?bt
zx_r}*pE}bkZD052rg!_UWU1A8ich|)SZTbye&x!U8HUN<-rTILtZZv*b98k4{{DXb
zj}MB|Pwy>zD+TICO><gkQ}Lm}Y2lq6h05C6udl2OE`ENFm0?4~nz`2HdXbx4LPNI(
z-;0*cc=UPQU3(uj&0ZO!=*~4f8@#Tbe?M*7^R2fpx*vVfJ^f<ItZV6Wer)?Pk$K1B
z{>wWxylx%OZ2Z&u=Ul_lRjadCT)LK0x9afe>zqGbC6(FEKPr&YyK^Hs@6ChfwwlJz
zD^t!q-RGm7>$}V<*4pNm)6L!HhijInKUaM&zRx9L$-0H7?w#7aL`PlkW1MSfVW_WU
z=u9_-334_&uehHNdGuocIe*Q?`xa`gc0GRI>ulFt<B!MpG=1q%pT6cyjL+{|SIxtY
zFK<y_?!MFNXL#83V=8y*zTdl8|9hQ+<==^Wr>e6Yy#7u;?%&yUm=j}cjsc;*kvATH
zUfiy$Ab9e-(*Me7GFHWZqMj`F`C!YeHTBooJ2&s2nJX(Tt-Z3~($X1rwN?xd{`~w5
zntggvQsr<!v(j$e=?Ux9o@lS0uw4JszuyOvJ@e+sdAcw8`}X#BaS@RzQ>O4p7&yeo
z%QF~Me0Xr=hzmzki<2UQf`x^|9`W~w4;>O<dHDG!14DRtxZV8zMH+z%`-{t!&u_5g
zo!lJm^(yv&Ku+$p`A73KUu~6@Xc9kv=hjENq6N|ad>)kOi%4wkXBJU^QqJZixXtO(
zFT4DG4dvF4o*a6)Ur>O_H#B+4{WZb=|E1->efsLf_eW2KbA8pqW=%P}&i`zeEZef^
zS>H~dsa)r@lwa0Dk|7}}LwI_{`3?O~HTGMU@`jeo3ablbQ~Q=|VDh_SHyaa!&+l8Z
zztaESF3-==xwGkW@P^GLv#v2bPdxcDkbxn#ZQ<m%2R0lRXJGKHxwqf^yUyIb&YeDt
z3<3g5ERJlyp3N$W1r3hZmdV8(db)9{rq*})xm&lEga?K(GxSIpy*~d~d$O_IZmVw}
z4o!}*X;`#2gZ0eC`DVGZ7V*BcEb&#0kDhK;x9s=Y?#}o3w)rf-_Bmtz7XHH<Iy*Z%
zPqugEdwHF`*mlX-WB;_AwvZog$7k*8+Op<`=E3`0S7fQjviyBqnjp4(-vSG7@7R9*
z94*b$#pQel#4_Kmv6*y9?ptcq#SqgCe7kPdGBPA>+_C9dZsJL85mC#C>cA;0R!BT8
zkXEgY@_F&n$SH3=gWmc_CpeF)J$bp+WBIk0@8awj8rCgyRnpqKS}W^oj%z6A`cCKI
zz~g)~tI{}}Dx&A{Gc+X5Sa&T(+$Vf@zVQC3A@6P!O>W$0$<W|;dD0e-fbi_Nx~tcc
zf~Ksvp|T;QV`quX{wJlGm2xZxXH4g3*kJaapJBnuj3dii+U@tv_@KnZaNz020K=$|
zS-OVve1cvr&JK#2cmG;H8~gI?%c;SyMV^H5mEXE1y{Cq!b;?Cnh9k$c)R=QTBl#E{
zqF)!kKCrQ~TxQMQH*0O)xy|eB*~!CjqUP_PupcLvpIpeF>?{<lywUa6@$-3i`YdKn
z6aBvJ5AU^yv7wx1C-0uve_ER><_-JxD|>HOR-D|Ky?ayf<fXs2%m~oS-z$0N;_->{
zGq&u1d0z7A10(sjy8BmkF^O_(UHowHv1#}HXJxMoWHS>uwiy+Bp6ywizvgGi{A1r&
zZ!}<;-08LIee83yPbXg(t>nF<(beVRWShJAd;26_>9sn4KhLu0ePi{o-hb}?ebTP3
zjLpk_RrO3&Sth_-xcEwt(M*@XrI#4_{LI}oM9$5#v`=`zW2GN4HRID$#!Uw<xD>x)
zT5oxpEz>B3fnnJ+tHsN|@y~nI^fdmR`2mZHuG2Fz*9ovl&dTte^}6w?i<-cL#AMm$
zwdNIHuKc@Ib@pj+NQPJA<X^R$50!uLh?e;0Bqga`{r6?}o@TY(0vrYm4$j`GKP=R}
zt!>rK7vH?k=Ol3B-qD0RKIW=ih1Y`QrPZHZKc}x9(y3MwS8(8f<mU8q#}DOO%|3C$
z!`<Ee=kDLRk?h}I$!kQi*G($ey=d2!vnS)5*ZDeh6s!HS$UbD1GjZF#jkoF_OsNbu
zkD6hXEW5$;mDDPs%Svm{{5ou4v*3Qg#t56lE8DL<`wNZ+yZ5rp<zEV)^g1o6Rpr_k
z{`BXoM5lcw%53LDl(ggb?cKg>Tg<M#+x9s{cdzsbJbT9TK-4R#RVPwXeHMy$2X4H=
zzxPQuyK_OXu=}pSU)GwoUK&CkRm)P3R_$gDoU(#}L1<!3SRey~K=)Bi$^L`CC!I+W
zIl9c~g1LKwik+p8(OM2s(P?`wT{B`}cp|nW@oyrBnc0SuHFtAtwA{2;d%x9TFZscI
z_+X$4m*A)4KE<*|m-MV3uie}Iuyb}dBSYoQ_d0LBgyr(}?3&NX;8FK2?a&-XPyf%E
zC8v&9GMoLgY+U8U#*kxgwRYpY-`^XLi)fuJZ_#BqaH419>nA-s+SmWL6?`t9QU2*#
z(wXM}5-g41=gho%y{GVD#G1y9&;E56Gcw>9DDu9>mUGKovmnUcIz8?7^XZmF)4qkT
zkDEJf+OxNB-@bTJ@&4Z4Q>RXy+o#l~cUXYoLSJbDN7Mh!2e=QHNICn4Ha7@t_$L(F
z;i7U_pyw{fs_fG<s+QfD7XKms>58K*MW7fFX|P#Z%d0!}>~Hm>({n<D!}ETxa6FuI
zhka)K&Uon$5;+^+eZMIEf7XL1X)2RB?fv^jJ}q6S5h#BC&Z5<Kzu)-DE57c(;KwJI
z{<^0-zmwC^I;$u+^%!6L7n6^5HC`2<<uymDCpU*r>Ugr`%ZgRAHl3OC{AhmhMo)`5
z$Ci68WMBwZZohKohVk_6)567$+U#d$=%}sx{&qJLgTuMmSIk{!y5`3xFWoWa#Hs#A
z>;6^0UcY-{Ju?H_F4pAWn=^Lrt^NM&#!p_wa(<()XBZd^Ik$J6E(+e9Bz?2gfAYIv
z%`F?1#oUkI-%(N>pK|8ug%zJ~>^k!Gw|icjth#^)L&K6U?oJa6jy#Cm`gQ7exqqLR
zS-k#u`Sreek4q)kKK*YgEJ!&zzxvy*uiqyvpU^*1D8As?fyYml=bNqP+PL9raPV>l
z2EX^ci?RdO%Km0xm=bz|^Wx5<`Kw-MTe_FqPvH3?ljIqu#MSy@>16-;u1^^luDzEK
zt}|Y{tn29058K!7%uBtWen;nfnEosIl>DTXvSqfRI%5B;mCmUj*ySJJTkn5FbnnV%
z;6bW+=D%LNo}POBy#4j$OW$+$7}vh|=l<RJwq3n?qv!9uzkB`WSa6oAX=!QQ5WRfq
zl3TCT(zR>XE?>UA=;^6*b<MYC`IMTzz45%<UiDS8|9a-_5fA=OiCN(jC~I63=<;Ph
zf3h=I*XCt?abH(*YpTe5_D}j%uuJ@t=ZWCpqqlbdy!T`MpO-QwXJ%bJksTP~?KFR%
zl>J+&==jr}yXI$REUK(Iug<+7>-9x9|F`mG%2(}A{F{FvfBCPswKIc0mF7Rlej&NC
zbYF*&tLcgQcP9>R&U&RC@uq54*DkAA>Dw8pd2e>qyjxcudi0dY)rb3xH+-4G7dG$Q
zHoF(qEAMSt|JPsJKQU<U+@-rS<E<syI$1s~U`%eS@SSjnr-x^axZiyq1&;1BGmT%S
zOSDNxmS&mwzP$3jcILGI(M26+GXsLJGBMnkvAc^=p!?!S<>`k6bc8q+IW`%Vo0=E#
zRM*@)dCfgIR-C~=GsCskc`DabKZg$c^%krO9F2m!yS`1D8Lhp_n}Ok8o}&ws=e+q^
ze0^sk_dU8TuK9BNx_cMh+5{i0pAcnrV)ypa%i@)<4PWMjO^(nB3l3km{%KgKNn2dC
zVQJ%afA4>?X2%Slysubeto7@`|GD<Ro*Xy|N-6W*_S$X!Z^+`PH&5-qOqSl0Gl`!s
zPwsjX%cDQP>eoltx4)&ef=}Mhl{xvC%VN#4-{HX<EM!7jmf2J@GiYe9V`W&NRG68_
zyG?b$tJvh*&)=)GXe<}&1Pz(YvE2Op{QT>k;zC@!JUpjPpJrtE_wOI*YOUqVmrtB{
zabN9ktM`i-7?>I@@{T;ZJbl|8E_=h84?ZW$G(}vcBTOfiCanLr_`vbk2QG2%(YU3=
z=D3S_{`t*DZ=b&vyYlGOrP?ST4f6tbdH0DY)D`<ZzFb|p(ro>&n2E)*wp*tfpWDG}
zvU$VR-Cy%BrB?+_IT>BI<5<=M+g;x`-DgM+*T3vn^rbo|Ypz+70!v$)owM_PSL>NB
zhF7*v$Ws*ZWMKI5mnp5d=-2miR$`6J3=N4w3=G=2Yzz~A+?)~Je|1ZisjN}w3YVbC
zA$xwE|Ey)Ep4QAYweID$dozWvtqOW+z~a5_n-GWmBT0c41<t?6559aSz|pe*{Je^d
zR#(d}2#7ZBmbw^acimQKlftWir|<5+!^of$`CGB``On3M|L^=SyY9c;bjymTOV=(5
zv-wi}W9j5VJH~6m&v<SW*4zr&Un{_3SduY`Z;e}AYUJzH7gU5Aj|>0V`tsiK<xx}I
zr`YBE{xjEcuLAeQn!hGmcdl%?JUvD)eqT&noL%XwE4jC~o!t4OxpCjmM>C_}+gnvX
zI5TTs?HZG-r8n=iEmK>U{y(r}*0mcCyFn$Cf=gT4{P3NgH>^H<zQVrst7v9qp@{0L
zrJ4IbomzBd%?-D(+&7<h^IeNurB$-V+3lOLE^qC!d6{{Mw`MPzKGX8NB1c=|jcbQ$
z9rh<)sy(H3&%<Bi{Pz3WGE8&y`f8Tcaxlf!O)LA$6Ss74t;{q|hJ+WF?$n+!n$*o*
zq}}Oq<lfPM^9^<1y}E>2Z=63o!@*(E;msR1Mp>=;=lG3-$)4}Dj^+x_PW=t9(-TtH
z$48%Cw=%_3@1V)0g0E(avo+L@K3%RV#>l|+dDdZpt5>F8HC?%pf3x-DwO@r4_eW2T
z|FUUk0QW7`S1ykpoZwYgKfdZ!dAC?y_3vA`r4!@Ry?=8segAG``RzC}L&Nm>s!azN
zOx$CZsEeki@3~u7^6KB(g_Hi>*lhdlzo<R`{q3q>e*JtN`7(dI%p4uDZsB=P*m??g
z6h5?MU}#bZ)}DLV`Vb>S*<YTv{?a4!R1M}Gf8rPaB=_-=Gc|!s3<^SmjSekmdlWWY
zd8%;oVfwT8IR=XLPk;T)zJ7mFzgb9daByJY!32XR1#9~+UQ0SRZ^u0S2ccJ|aJTrr
zGGX)Gx-%$o_3HzEW_EhtoR1`lM02HOyfD|lw8)7?&BH1oeW#6?uj}FZ2O_$>wF@W2
z2ThZftG#&dl=H6szG;nLT0XJ#Up)R&=!9Zc{k`&L-M3!^S?+!Qz9#=VKQjZ1->dCU
zFHG6DjEAA2SGf4+`NPZ4d}m_VQ8oKte)fj?3ASbhZ%VFjG`_Pb$h%YJ(5>9Xj12Z~
zrB*LoI%#g8S@OpN^4m=Gud?=(&DdRZVy?Gm`FfT78^(1{_2oA`Ib^Wq@sBOO_uHSO
zOk<vT>9O*sYMx_kW@Xcur=7XAY}u-n8PNp=Pk0+0EGl1RR9q32vt1N7;p)okLY)^*
zSWE7gpZ)E2qo>U}1_pz|a|}uwD_P(FxhT=5$NTvxBSQ)At3B`A7#Py(UngfQvdmrh
z{fq0p!^bSnMZMbma<>4(forDMXSmIJUEWjp)hu?G-h&6*4Bn*IyxcYI>OQ6SDRb`0
zm%h68$oIEe-T&7s-q*=?DtvfSIgib4R^#MfKl!#ZGDO^X#p?g^{DsA}n-7J1yMHzQ
zT(0%CNk`81QD)E!|NVdb^Ry3~o~9c-Wx9T&OUR|`hOcfP4|?=8IpOtzs8>~!lAgFI
zakeG0C?<IC=5SI_U;))CLf6<|J2-H#v`m;Lsx9y-R`zcX@0zo{vbDCyCU!g#0~L4v
z3LAf{UMy8*DbP}%G1ntCb?KR<wY%6%zny)i>HN>jUyF^wC-%YDzv~y@`Spi`p~K^U
z=4t-xhK=>FnAT4eo|DdJ&A<?`yVfMMbx-2YRCV*kp|jo3O4SL>KBa#_?~|Wfd@!5Z
z)!*zl>vz}Ph&X>&BsD1Inf~OO|2mp07#S>fO3v+%kbASuSpT;yL&D2l4U?K)ooD~K
zh1uuC|65Y+vF+K{^XAwKzDsz!GQ+t_q|kGF|Gb-u&!>Kz=aQQG^z-xc!otGld3QJ%
zA~q(q?%ut7`EvEiC*P<#7S8Po(73a)_WV72zmip3_#G$gTUeD^$-LjwLq*Yn$DmM_
zp+Ui*)ho%=MEp>5VuynZOO4>fmW~#UnNB8~FFpM1S{eCtk|GOJPTFF2h7;%O+C$HW
z1}~4P*pM{q|G!^Re%;=eO;;Ry)^jKPY42AX28PH^g$LaU5>0|L?yIN>BycpjC{1y2
zX<-r+JN)_MpSkXvC+x5KckAowT_?UvHZ6z`pBuVGR95Nl)yq%5tcVo8mbklg^XK4A
zpC>i9mpy80*BAQ#>C@f|(KlY}eLUaOti15^qHo>zP1581d(H+g67Wo6+V80$QWxPO
z+!<AATd+d(+3sYQdnXwfKJ56j^fi;lDHW-?O{$*_H(v`44xct9#<Mo=M8421D`P|V
z`11~bFTCFr)B9FZ@aMsUjjQ+lW-R}b+QA|ERBZ2oy??$big1OmkGq?cz2M1(bLZZD
zdwcsw`fW!JmP7vg|Ky+A!s%SY>~d9XuE<t>v2Jhf+4b95|NLh;-RZL8$Z2+l1uG;z
zuif~+IKnsL%2E?2#a~)$Lw2P;6Po`vJHPJDQ)Y%&SvNF4=A29v=J$T2$L1t5n=5;I
z*$ex5`zKFGcd1){=v)!Q?8^oJFGiM{vT3=UbUC#`akFUd74{Do=B{6`Y15^X2j{wN
zC@CtK9?f;*UT046+wCVhTtfq^riN+#oa@RlY3Z&ot<u#OrhJ+4Uo*<(`hvLLNKw&Q
zKaaOro9nB1%};t^_I{;M_t6}&^^5i}T2IO4YL%O;Jl{c~N8bKlZ0bhP$j1}WCIA0?
z?(f>RD0<SodH0t4&p)riaPq_n12Z$bf(H#XtGK`B`1tyMy0<54)4lCNyL4Tm3#ae4
zSpLnftMY@_#jqMyrzydlcjGqQGk<?p`_Ad<mI5riFU)hEOo)`zQ{MBd|J8d77ROx|
z)=HLtxqWJ*@^T&Dxi|9P%sjRDM*bUJ-?@FVmP<1hR~Z@g+)~#TWMo+N{_~=qneTRe
zUj9r~SFb()@eOu{1ulwgey`M5dUYrm^f)jy>}X#fyVv(^ERX8u$XhR0UeI9OIhCQI
zk@4D%V3)kGN?%d!gpy*8Ub)HlBF<L}#y7~$ih3n6>x6>Q?&q#g^y7D`*#7QZwDyJN
z5w*KBOe&iet$k6qWchMy3yYADkeZFpKRrDizCKQueR7q}j4l67G(-3Te;c(Qex`k^
zWxa!<;7^NKcAGnYPH&Mi)e~F1wJAilxXk5=Z0mddmp4mnvhH6AdcMAR^VF43TGV&G
zIkxQf^hrVU#gmpl(~<sicm3i?k3QYsvu?$zj5#}xq#yq!Z5sL}bhevjU`Mstz1jln
z+NW(3FN;^+-#O*T!w=lW+Rp3u@A#EsI{k2e?TopTBlkT#|IuD=U&a4d-1+sZb=%eC
z|0^4rudX?vv3vFZBm3(j+hSF9z8=5)d+|S8!Rr&xFWl|^q`vFo!N;e%R{y@uf4tjy
ztF)k&mhS0p?|r7_|IV2HKOF8d_c3fOz}*Y$oi#+hy}ayx>vVWnSlpJ3iTn21u{ipu
z1&4;38XJH9@$vEc`2EMMmMmR*^Y(4+6Zht|)hzl}tsZNj^gp@Ep{GvV#mY^-{L6la
z;te}?d`&2{i;CyH`@i;iKDYS!srz&HcAfw4TqCEW*6yRY>e7@`UQy5dmSqQcrYu>s
zrqQ9{XcB|60E^=a4$*E#r-qFj^1IkduPzI$|5vqr+bmuNg-HUkwOcP8ippVSa8uCX
z35jgYNn9KreO9k7Saq(ZWZOcq$|?K1o^|{&e5dX&|8kT4HQ9v=79{+?cQ|}~+*ZTS
zOEgw$+?tceHvM?j)c-jrFS&Z}kM&s^B%15@J^AUWsh0$;>+0%eo9F*~Iz3*_E=RA$
zePKYKtaaJTOG~ZGXBBH^WoJ*HHtpL9dpFmK)2H8G8TfmzfR57t#OeJfj?4Z%$58&|
zwu^LYO3bb4(sL(HSl*jq6f*6<jZ?p8yve^EHtV^o)=l_t=(O;|y}iHRpW6NC-So%D
z`)AFX$t(G0d4_Y;!9$16oW3nwZgtxowD03vyHZA5TieN#Cl4MxSXlT!vR>LK#iOvW
z(C=J((9P%P=Ys|>|M0wJeQ;^tnipbD`&jN=e9u$h{{M8%+PWU^-$jd+FV*elocHL`
z^(hY@Wg4YlQQR53<v91xyBr)%%lzh6Jv_wfD&3@<oRplrckf=+_I5tmqQb($^78+W
z9RB>i;Q56u^ZuEr>-Hz^U2xHUm-y|jw&teN!@IgC=rfjov1ZP6m%rb0TS#Z?xnu9o
zzijf%Em!s2FiUU7mXE)SE1c$?bKAyQdF#a92~+C%Tu)y<{oZh8X+gm*BTY@sOYQ5{
zt-E<MS1VptQu3yy*w?aM)lPCsoHMsw@SfDTHdJigx6^+0(NPhfZ#SO2EM8f^?0I<O
z@@oe(Mekhv&p+vkm6Xc!^}KwI3K7judeomxWG>QJe4A;ZK(1+OQTm0?L9ZV?D2a?}
zdGX@Ki!C2_?pm~{>1<m4PWf}!FRvB;WKfc6|5oa{((=tFDXND)+D`0$x8G)m?VE2)
zRr(J;Guo*)FN*zn@PocOV^&tyw*sH+*`|Mc+UB(6?>RQ{PlW|fJiAwPo;l-_{rbO4
z509i#%IRsk7cXA4E`OI}IPLJux~gJxr)QV!E_)=u;n|)a_QUE+zTfmUYn;AuZjgI$
z`%TvD$k%@HPk8@c_YA+jgirc$#@idm4~69)T&1{J%}V(M`|*<t_dndy8W${HVc2W3
zK}^SxdHUhy7d06eIGWzX@_+^p@A#PO=(-5|&zKz9H`i$U#afwb7u6+WP8|Pfvtu!T
zi_^n%_y50m{@|*e;{W7=%=o+$@weXF6e!BGyZ@`Gtn`$R+g*0{<jIqlKRa)I*3K{g
z@6&1hbLY;jT)Fa+tt1cIyxN7ECobF~Z*VK|-6_R#J=ME=C+$f*|6}U@9tMUA-i;Ca
zlY6%B7iDnh_ng16;z7Ulaj#V?6L@6bet3Pa)B8FbkNoS1(1TH%RV%JO3%s#XzK(m#
zhO4_PY~F=Ny}WrLwb}i~r597cjpH0!lc&3T7c-!@cv(Ep?@8Et|MZkeeA9y8FgpEX
zFxTJL@cn6>MeeiM)QwvbF5Z^?yJt^Laqw(=^Sf^sO!#lOV~f6dRl}Bk?w=MGTnBI7
zjQsWCNT=|^g$vdF=b4!Q7YJxv`A=!0$FAl3_wTRKIr4JH7XLuCzq`sGt=!Ac$`t4t
zd3c)qI{iNf?_UX0e-u{rX|s96{7sW~ZEjy|FIWBZ%H^gzU31QCs*QG9Ki}J;{>#Y&
z3$HOSwEt^6e9Wr#kF35}ckm-_J(>QyJIbA$WxwB$=VxHBKV!T7=WhXq12+%*%eAK-
zv#BV3@x5SsW7?!lTej#IuU6;A7VnkKXJ34r<EM4`f4S)u@fX9sXk6MnUnhR2OVN#L
z+1iBxJHBq8`&VWUhpC;BAS5NaeV_WR5EPe<5fKp{@{2U2BqTrwKb|;oVzGO_UgV~f
zV?C0$x99u&`=395e)>B}2?>pO?`l)oDc{bnDZP4S>ixaB`%IVE=|3^&%$+-vfnnl@
zX0w*AsPlEoB8!%~ZoTn(&6e$2tGpN(!t*bm`o!irzvV?t8=r5#XTIUI<4^Tt#Wz$H
zKRB>3EbEngQQI%}TYvZcOWXbV?H2~c_(KO8@3}seR0{d>be%<RgZ_iiEBg$Mj3#aQ
z669{LuYdo_jaLV@U9dYb<=nYT9iRg0w&(916Z)GMM@aCr&A(rNO1Z;j(f)tGR_EW}
zxBu_A=&-P`s;Xbpbfax-ZH0w|mh1*?eBL+hQAx<H=_!W<!3~>7duRJ8m{>cx2wiH+
zwA=BFM>h0ic9^oiic|Kgh)c0ArLL?tT)oK2`2UT9=g(SQUIst!J2GMFt<SUXC%4pO
zis{GwFtV2W{?)pVL)7(HjAhxI6(z~*i@z8u-anjbvGUyZ$t{2S4=%0Uc`<fLZOn<|
z2VW}1?5X(pIHP)FL`+bSkf`X?S+jl>md*YA{QP6aUt9}oFV(@CAfNTu!kQoq3=fKa
znDzOrslDT4&fw53QOm&4bb#a2Lc!M)KB$D>4`7ZKV_>*pVdT7iZ^k3ejj4>GvxFE9
zT=Mg8b<;etmW6?bXT!96PggHpob@{ALuvlLbk3ibYW8P6Wr)9Ae0}?|<t>jt{(9Sd
zHnXFu>hGVkx!u!zKY#i*#qR2Et~AX(LhNyF;dvSxdfth@v^|<v%~Nr3&AhXFtG~PT
zN?kp6uCA_*U(V)5NOi%!6W6C*{Q7PCt)h%iAMKTjH=k<n*|htY|DV^>QyCiS<c=L*
zuYc;Kj<)8CzCE)y{=Rai`SxMI_uY?*e%v_lar2$<e7>5QL3`@6Goq3vZr}g(p!esp
z|24ngJXGhd{~&LEIQRT9YbV85?~==2eBbaZN{`_|)gAs6)k9l1b58d=8e6+**6D}G
z?arJ#sdN9s^B?l!@q6mOvN9x`UU>4<sVAYu|1w|yej9c)?{<5DMo({N^!9J=e7ifB
z-7@0fdTwlDa!vAE>c9NEuNs-7HBVoNmiem}8ZE8ASle7A$nCrFgQI!7HFqq&|JbtN
z!GTXtPw&5xduocNy5F1yK`V<4IG=adOs!bH#%bGzi>ueBiSJ+Obdi4^zw68;2Lm)g
zgLDTBSR5w=ba=%mZxV7mAfBjc%E}~ojnPd(r+1l}^V0Q_i+}iTE!kto;&`jdB*&X!
zV#|vctEY-xOM1;PsWC$6yqQ(P-E}u~{iZJpxA?^+4$aHgCw?nb-2c1D`q$pZrlzI^
z3l{YB^n{%^lISr`Ki4B;8FVh}Va+_frH@X|xu@{tafzAjor~`u*)xKQI}z=-kDcnu
z*~`CFb2=?Fu(7c*G&I!GdUbKJI|GBXv~+!aeR=u!i;LYKJJn5J%6+O*mR<Z)VTzM~
z*_Yi%<L&g`p5}E0WxxB(2W0=ood{<Qf1oi(Z{6!!(H#@|m7RB8Q*(_}^jy0*#C(f(
z^-l)>6Uy#S=1*YvU)$V#SvGTGn!APwSF4k&Wb<XWlnA%*jbE-@v9jn|#BTK~qVLb)
z+lwV0EqM1SqW}4=>C#1~xAs2=<(*|Z5gQUdKRbKlHMh8)goK2Nsj22Ql{sdYJ{s-f
zTH^lf#PL82+fx_cyE*+k{@~KSJ1=rF<w2G1F4NoFa&PY_RQ^`=>&r{;X*vfNf8H&4
zH{{mw)|xqfi=H2OQQqD0XIq2&+ta=0I&K|T{#30}(NmY7d}~XlxPIJ`xXlqdcP_r~
zE1ABc)<#KwdGJfluDb1FkXUHTSqjP7hB>#l@m6olysUQT^!sHc++e${X6LPc@m)gk
ze{xmx7JU(}={k`?K|w}|hgv30nsjw_`05oaPTcS5^ZvbK!u`z$MgPWiEMA-(6&2;`
z>gxaZ=UdwnU$8MxoXyL=-2S`Vx_09BUSVO;g*NLLT#vdaeX=pre^a%pWaXao4k}8;
z`=x6>R^&L#Zr{7Dp4Ha+dYzviU#ru~HEVi0IzD{<TwGWfxWMo&I5^+)KIp5{Px<`p
zY&*Zap0;-I7DbCq3%yS^RrJ-!?7SH3Ty8Zf>iM6G5=@MS8?W5l_3YQTt>$@uXK$(e
zzeF{g`If~Tx8*FpWf!mgUZS6oxZ1ob>;HPAm&RWjT5M$ao*!&x-=23@OI!Q)?(+Ab
zYo1@d+7SHg*)tnCeLX!sM*+3Tnvy~B@%8WS?2O%Ac6U!@u!_*h<LAm$o*WE*{ouiu
zkUxL^sQJ!XlA&FY;wJ8SqIvnXgA<MK`d^%WQtHkx+2ou#GmP715AfC7o1Hz;W0-m(
zZf3-euOCDfI&3LCDmwFw+QQ#nzZWiC`1;yfXMrQvuU|iT^5uz%$~JQPhK7PopgrOt
z;o-Y??v%ACP|()aHZ>J(TJYx0o6yx^bM0zpc`en8-nM4J0tFkJIUXvf&OX@Y0g9j1
z2Sop#Yd)J+?#tPH_~DV`$NA-KA}+RVVVdf7l)39xFB3Q+Otimy#&P1GTB8m}*~s3E
zj}?o3R8yBu)e7wRYtzHYqN2XqreIO=iTfY7Ud>rHv2FEs$yjGgO+9<vjT{UM(ihkr
zIIi<8vCK7+8Pr6QH#iX!*;=EovJ}*T5%}P`#%-R_)Rsj_a^VY{f<MXT9lo$s^huZ<
z-`Skxh6~5x8;Ni4`}^I!|8Q?l&#nLeo}T_doz3AJ@9@My)}YPrymegZ)8UUDH8OMf
zCQO_4?Rxxg<wMFZS6Ov!dph~e%|f4xYFn5ZJ2vbHt$%aVwCD*(OvaBWgUtAIfxpiR
z{(Sv>eQZ7VfAzx?)$cyLt)}{fUsWLWbGm1k(gLN8@e}s$Yy8#rG(2XnFQ`iRzD<rH
zA!(&>q4wRYw@Vt<AN}?}HvIY`xm_mjJ&&wb-mTQMe8-v}l}A+W+iRbaN~^c-Sh#xE
z_wB#Wy>kms4(tDT<7$4x#`g6)12kSGulV@B^G138>+5;)e=kp}-zoFYe>Z5|<mQAk
zfeSaxEuFQY#paLH<T}2%*L5*lU$sxY`}BL0gMx&lWTNWRxpU?)F!1v7-nw<mN3Hn(
zzrRP19$mF+l>p1tD_1VO{G#qZujc>X?>8JoMMcfcx3{#gR9gLdQ0p`=EmQul!dr9h
zpO5eQ&pY>4Pu`BtFI-vIH22Mo&a^haYiZ2S{3VxU6z@{4VSN8y`Fps|?|-*by|4Yr
z-@54R%d`Z}%4I&Y734GJg+I-I<Yd>U^g_<?*W8dd({6?r-*U>AYqzibaBr8?x5*vh
z{)>yg@Lm=7w=hio5N~>QP5gI1o2}m$Iw-8t$iDIE@Yh!RAI874<nDf5(5cSAkYN;Z
zEr-|Y<8x)k_$eP$`mdh&ES)MYI%}rH^#2daj(y+!udn}H?EYk*A7{7B(h{3~`2MzM
zyQbF8FWh{`I>StC>;LD=c0XHYR$2LT(+`y=T+iMmgDM>bfj76dW*=_jHMsL9SET#s
zCFutlCbRbK+qY*e3qy^_)_(UVj~|?9*_f>E#~JhZrO=XfZO7+t5f%zOdGOZf*`532
zEUNb|Sm1E+S&8=(0kCR~IqTlND9`Hqv*%5Dy?l*~=qybkQ|~uQg1?j&2Iz=|hj02d
z%izkDsfLa63=@9snQ&iaOKDotT?WvIzpGNoJFojoUxRjO%>MMow^Y@;s*a;6#>Q9c
z)U5Oe8-Bj@bp58+Cc9l`@;6RXyT3Afw*A`{tRYfXbI#9IMQH1d;O<2$0yKL1`nGM~
z&d$)%+S=)&v@wF`@P`Kno1LAURPGuX8>{=zTf?xJks)a3w{F+;4>CV3EM(PnP0yaW
z(CHEqv_(<2_4<*g+!bBhm?|v#Z|(oSVbR(b>q@fL)!Mk*`Gqg=w*EC&<w?EV$NJ<K
zlDoD%E895Z?4!^r<{o|%PjECg{HcBLapC>L{_neQ?Rex>QgM1dCr6WnmB~rP)f2-b
zuU$OkBhS-t^_N00Uk<ma>9$v=F4e*Ix$Zeq%g*rT{{H>Dc2%93VQ8FwZjO1rT&oi!
zgN%LMob%7$-`{U<Z(o13OEfSraJE_Qtu2|t-wYNwi0REc{piX=Cp$jB<3C@o|9dTs
zd0*KShXej+dv?lIeaU-re|p~g-|8vHn`fNXDbu!JKK1I-&P@K)#Fy$1O$(Fe-T(Rc
zg^`|r;>l>07Y01*;`ZM9`gGp9o-^PQ@}*Tt;QFP;N}rZ0PUKJt(ta=Nm>`kKr*rbG
z*7}u6tUYBmo9($6793w<e(iJI5pfTz{T>=394?KMWB%FwkjPe?B)}No(iH$|;yUPv
zsoR|7m3Un6_)swe1B>IbFst_RmeU`46E5xBaPHFK)QahAcRzgm`16~a#vDx>q6KIA
zJo{K-z;oC@Mo1_qB4Wkz<?W_U0xl{-zCJ!d!NJBxMhpzEudfdediCv;JRct)+w8M^
z+_f7DZe2h6H2nIs_<eiNAH0=aa)3$a*!s@%yXC4{PA9Jnh+cL~Yqf^Q*`Am04P4UP
z>RW^&ZyvkzHZn-V*LCmbb(hLw-Z16e-DRA2N5WP5Qt!mXD|T`d`!6qj(bZL#&izw3
zZFe=_Mw4w9{-w3*hfdYW{QeEJTc`M=!OUF;xET&S{cv4>mqq%|1uwhz+^s$HOy_&7
z<zt?H?FnDj>*Po5e{pEj{I<V8&%Xgpg?)I=;@hUhprB@CozZprrL}j-m#f>>?L203
zDQ16i&+6?jFO@Q~Z*P5?GVSyqS;2(VHj5V@zO7iN`F8Tj6s3tC3IYbxWt$Y%usRAz
zwDtD(PMtDkgPTxii|YsBPM35rxO4jW!Iz#PVPRP-Ue;X|*tg*2p<eqlzH|1(xO<j;
zn&9bW_H132$=Uwj))CcbXK!+3+g3NNYt<vWs%4j~`$Re#_f?jL_AXlcg0m#x7N`ZL
z=W+eiV*UA6S5s7*0vfuGCMj_~H1AZI&(P`P;HuHp)v2<i^ZFj1RY=Y2Nh!yC*50$c
zSM8q{X35~t>9l3T)zuo=8v1J|$27Su=V;Yvzska(Adp}zZOh<L_szO4`1!hZk5so>
z`#Cx?HXmFNv{Lt$;)?9Q8y}nyw&~xuMngk`L&~o7(2D%qb}CO(zntChID5L>LXE9|
zR<kf{u=vV)G&1T{RZU{BXXL!y#SZY5v<wU(J^OUe>ua0~TDHRKMuo6I6NhM`>>Jp+
zy_c^g>R(+lEq#9}-u7#uyzG3Td+yh-INbM9c%r_<Wy-YY8!dU4x$)V(JIK&*>eZ#^
zD<}HatkXMu;c)7a<DajXhV0d>Iw@{)Gm>wC*5z40?i`ww!=iX0#5C^t(u@nGYtF<(
zy!mxz4hxH-#Z4X+fqm<8JaTK7uAP0WsrBxfBVOUlWOsi1DD%@IcCy}*7pHZV_IIj_
zbOwlsntyD$v`!i{En>FaTgr0HGI37U*2<|u`tuk0I0@`nvqa4LNg-=yr|YFSJB9@d
z`?@QCGB7Lzt#|&VwRX$qy)_q}F8%wisjKVMv$L~r=4@NUd+^{v#-mHuXKKA#TlJHn
z;mq~(`K|M7X36|AFjFx!-Lz?!iQ2<&lUr`zxcQs^e`2w8sYKgH&4&;B^%)p8@b%BX
zyF<3nNLTw^?$6o&vD=sEn421#S?gO`+P-@Fx`L^(V^PMN&%6J=sdeX@sq5rgTjI;W
zz^c0bQoJqihncHZt_u$h{`S$P(DS=+kkXsAHd{?+x}W=d=IO@IT$kS4Tm9D1Q_*}Y
z=-OGO{m3Qb%1(Fx^^-cDv`p!+=Jz}OAo%c0iFnnwkDcuN!k2k>?3*h)Q9n9o?#zeg
zmv8j?c9}hyyh3noYiaH7qAUNzSFTwTvS7ZfjLe?G$H#i5&GT+;$$WET<F#wo?tU~r
za`2@jhpUsw-;}q4=IZ~Sd~s)Ku}FW^4_>S~4ZQsHY_|TpzipW-Uo$eWIMrRboDEx<
z8eZx7k9m2()J&PY$IH{wUd_B}8nS=2R!~^j(WFK>``ruI9$lgl*s7H1n`^mE<imrL
zOC=v)6W}<qYS#8NH$Gjp#Eq{H%g2K@T{b$Hm~By<tg*gGc<x)a)aT1Tu=*aZUCzvK
zN{cJ*`ThvAboM3z28M|njn=K|yKHw$0$jzG6pFmx7ZMis?fvtMACtC!I(YKziR_N2
z$3&-#=AIBgu;efEZKr-&>#&eX%QK31Y0ucr&+y^<_wX&c78ZL&V%rj<!gOX|b_iXz
z^%i4O0&{IK1H;^9tPBkg_|1is8fCtIk&3@?<nhLxd(z%AG$mT~E?l;Xk>SUmyj!bg
zZ5LpPp1F&GA;56fjBf=e&*U;RT(3MS(#7T4`D@*(h)7S@&NXMAZruEN(w{x*+h#2M
z5^KkEu<(ESd%MT8cHLrVus0XxsD8iKTxn4Qv*T-rwU4f4-MzMLeeTMw+rrkChD5I}
zy_UN*YwNqUD;m1GPE6bTeV$^Aiuum>?cJHDCJAyp_*wr!-0z(2cTT5whbI@G@7&|N
z-1vpbvW@#hy&YK@G(@x{br~{Ny`CN_HYsx7vR(Te4!l29&iPXDZO-Cuv)!)0Sa1H%
zShaGcZv4JK-(!y#Ec9HzcHzy`jq8h&;-8+d>f(FYomKheiv0fno`I5g&)>2<Ki}TI
z-~j`Jg|#(18`~t;TC2Uqo6`hYCUR*TPj5f3XIEYNxjFFjtyj&7YePCMV!k~zzJH$o
zk6Zk4o$Usuw(4<<>f7@c>FS&;DgUHuef?S}S7Bq*o+Re&cBb0L9Ii7l7;SpY`*kfx
zlgGIVUH#=t7G3%CEJ0CEKyXpwyT{S%_^w>@ei>oD<olMWTkfqjOZHEwU3CAnbzu3-
zJxtBFFC2B^ZcF4*3oUw8-><|GxK+XLc-QAYforCT-KyABTp+{G#Z^>RW>@iH!S?Oj
z*Bo}7@O|#Iw#NPE&pc4CU#*eNS19dVIs5YGA2BlG8$_mXI=Kk^KlfJA#W#N1wCARu
zc1mUKVsTuOe*EBV>rF>wqo&4BIrq3&*LQBKQes`;ubzhUC(6odw{~qx^Nn?NI>jBD
z>Z=yKaEH$FO}lOc+}AQSp5>S>^)h<ul;<zA{-%4oIM-@(wMxzZbmw%f4TAuSqR1l?
zsaPYnCWU{(^|v=F8mUCyVrK|B;r^?8pHcWS@v=qljP^4e&(_};xBaoKw}`fe(R9|I
zhBMCAzqS9BQW5d%m}ar<Ez4;Km-x<kxUKU3nf3Kt7mP#R`faHR%;k*vQ~3SQjUOCS
zo|Zcn6@6OjJ^j(6M*-9N6>3|qKj7SK|HsJa+rxwQ*JJnBe<}R2H2Zu1y}B>zQ@y%-
zsv}~f#peI9F*TNA@H+MR(WJvS=gblhEH5?foho{@Z|?t(bvG<aL+7&TSt~wu4Q~JS
z>cffKZ+^|1_Pk26R)4(#FGH7i@s*G*N34Hr5}9&(HP`(8`;1F2u$z{O{%p<U`sCG+
z*tt^BD(cvrwq0GTl-9V~#zh9^zS<$G_;9-Zojbo@+_c{=H}^@w>q(cCKX+Z)^m&p|
z@%<;F%a*3>S+_!`tM2j^dG7cF)nb+1$De<DU@r1fXp>%K-0Zlx*?piC-fg!%DM9?&
zmRGFV+x-(Yjm&HA-Mdl~?7h}rPdD1)p+jci=d)7&_kVx6cJxKJdfb-MH$NQ0orS+P
z-C1RMdJnI!2@~7@I|p8VS<e2*sqVw#XpN)Ot+woW_M1m{y{2w#L|kwX^YqxjP@koj
zu7sAJD6L>&vYYCq%rUV;;9@4vLIHIK4T)BrIoz!kv9()Qb*cS4?cL!b(PmmI@Gyj{
z*C{jZtx%^+%3_A+=C2PtHaC(idgA%Agzaa8+u~#iwF5sxw0bYy;!$FFz+JKQ>CaPM
zSx@fBF`io<up-5VfkDEJ&1bo>i;|#Y2S?L_fR(wu*My?tHk(fj-g)6E!%O{NckVBK
zd*_Fev(v-f_TFbtYREs|wf5?AmqX=yl%J%B-`gw0&2UkFle~Jq!PZNDUAiwqT51Aw
zRm;9VziY1>-+Aw~AdBP-ktb7oc&DgDpJ<V8aAIX(_%tnyVL^ZdgTvyBS3|cl-t()?
zfAuxLecF+kwsWuTVV?QadrrtB$L@2JBubV|-1l_9VYl`6j&`SoU*`JX5@eBN_!YB=
z|I&=D`HxpTH@&rN&yshU1x2~0;tX@xrLFmllsGD+=EO`0W@T_olbWZj)10qju~Yiy
zZmFYgDf_Et-8{#k!s_}gLBH5ezFu+`AH%e=UGtQ6&dYMDa~!%6Q~W|>we|F*SFfc`
zo?GYa!(Kf*U1hq#(|^VC>8BI!xjdijA9?fjRFP{-_G-TR(d}ydNsz@+fW>jbv|o8o
z7i4e#X2`>ROD5rYj>LDZ@)HH8SAMo-eDHcc(;C??=j3bW3B^}DyO+N2vFw!4r^{=f
z{Cs?G=KOm5bC<%xRYYWW?<=}u@q3$_z-PJKy?Mvm?fz|JSdhNLs{ZMR_ho)d0}Mn>
zTP5ZB@9wC!@}9`az@>9++5L2ll_&OA%`&`k{Lsm}9yU&=6OQ<2W@y&!%zU(opZ{@%
zd;T#exEsU19_`u}A@23NJG}o;;l-`R6B#B<4NFU0{n+NlkLH!@l4Z6tIQY1n+qw9m
zbp3q0Q@@ToTg&P2f2yv~Zd`MgUoy|KrYHBs-X+tNJ^JKploPMqzOrY>f@fzIsvFzM
zaWQPY%G+LFyQ5;O{?9AFVjBa`Z=T1toWbGGYn$}%%St7pc-5ZdDgAuYcK7oB=t@29
zwQH2`%Y>Y87XSy~t&8Q_zmn!^z3rDtpFcg)&u-nyM=rMKKYiG!p}$hNyyB~hv$uQX
z`GC-lZiWRK>$`INJvCA^Pj0nx+8oTGdg|?@$?si-KL6PJH)qr3|7WisEq}X3l!xKP
zi`6MA)0gbaOlAK%EkIG;vC7xakB{NTty`z8!1lhJQ#awo;oFz~b+4%IU3GA4)046)
zEv=I;B~9<Y4Dfz_fA;oQH+!8Hu2{8bU!?p;-Y;wWE-200UY>2ZBDZ9L*Sbk7*Dd{V
zF2Soi%lW<PwtA^#-bC11fH(#PjzCfSw$y18W=VFx+wD3buHe^~Ooks%Ci|zzax^J$
zG?n=M_xR!|tNGTxevVb`!+_M#%EHsDmrMRS_KGjB?aB0SdTrm=9r+|x$R*0$$tuRs
z;B+ubmXTpa2-i({h8?^$)zg<<Tvlu1Qlrr7CHP<Zqe|_+QxAPCr5G&u&8}SxUKphL
zmW7$Y$8y$dfne6KYH#xePId8z9~K-sd^lB>^-^<z%>5mOi}&xh|J5t)abwP`MVE43
z_T4<N_IP1q$#E9}mY2)^O?lzW?)96!oMpMHSZtk`$QH{7$M+iB)aVE;`c(h_<-2v0
zxsUl3%GqALSUBP0HPi4Zp--o?|71R}N7U}orQM$sgztak({=ywar;-9M9Yj7Gykio
zGwi6>J$LZzi}%M@*V`J}>lukNOk@4|QgW5v&m<EDoj)Zlefv&r%U@?S<4d;wHJKe7
zZX64=SG2lcKWXyp<(aDwPDsCQ9P+#7Z$)zP*|2yEtta12W%$xRKResi)%E^e*OzEc
zPEKwy9fk(q*=8rL#9U^5;<~JqEWhpk@>R=vj_1GmF{6K8Y>yYm%eWYhCWWAD@!uH^
z74Dh4^;_>*(=8>TMaHMJPu)oAZkx8Kb7@#znX09$++hQ&W~~R@nI&Bw9vrPoR&%w4
z1Vyye9&pd@J&<t8#YxbSVXE81&jkz<!V^|xYl=M&XJ%+^N|aC&5)6@YJs^HbGDJ~N
zh|5)?E%T*Tr;CfL=Iop$L7GgB8&VCDM7Y$1wtl*Qaf{nOzb$V2bS6rt6<W->apQ)2
zzg+H}9fAxwxw-G}?bUvLLExpgmsiyGyx5u=8-@jIH!WE)TRP3tJL%Tyo;g1>lc#UH
z{QNnyc9`y;$jFbf#+IHrerF#VzqXJ6!#!E?|GRsa+RV<p^36D`v!wpz<<;-DEWX)f
zbIL^8CrS9=o;9cTtnoVeZ|c*pQ=k4ncUqmJ$>-+DEpiMeL}D~@Qdu^sd*sYMn)^Wf
znc3Z=+J0wGrXQWl*`%SJck1!U%^fa>!kPuMXFgrLv~)@K`+IvC85y5FdlqY5b7qDi
zzx==DTr(z3N=i#p>%B0+&OJQ5{Qkb$ZZX}YjS-vrSSR*<TD53OkA|o!FVEp4=4qi<
zr=&hpd$8lcsWYy@vHT2Or;AQ&aaGjhg}syJS$re9dO~!});F4Bf}anZEo|}GRKwyp
zq3p|bm-#C9+{&My-@R2+SW-kZ(p|+jV{`ONp-vaj47Q=+%c4c{GBPo7adMK9Kd;Bv
z&$X|Y3vjJ>Fg7t+a`D%9YZaxHD@>k$ddqy+R{gs9m1C-QSFal~Gsw-aR{k+#^4jSE
zHwvD8>az^qcjc;?;DbH8erfS6E|9ilU|`vDb+XLN<Ij)ntK9Ty@mizmT#hD%+!x=c
z8=kyWSKGQ#>aOdiE%*HwI@S3v2+%MzG`uV0;_aP%sD)El&BvnZ%ZqifyUp_ML_|cq
zc>7j&Du*D;OUs87xBqcJvuU#o4@2pjQ*LtN3^RCswqCw&>U)gA<7CgJt7eARwugmY
zs*x<spYhw`<HNPzROWYiae%h#rSPus5^hppcHZy*#q-gnf9vAwt_$?OzrM6K<ivEY
zCWU!6l|qt|n)>?hA3uKl=uuEun3#}IQg-(1M~{LaCk|J9c<|`aqmB-a`1t#Z&TT3x
zDtC4kAHR3cPC=nz&z$YeN0V}IY*5tD(9qFYQywSSq;NMdE^@`%i(4MeT(v38vr>+s
zgCj60%cZI;Cbl+IcK4}6M>^jecw8*Wv+T*k+^<JkD_p+(Z8g63^^v!u0L#l2b@6}1
zl)Zmn{P=LkugO|<JdPdrYJKFJr(K)4NZGy5rsl_o)B5|reE4u<Z?!o?%&wBmo10QO
zIXM{$zP-8W+AUW5|L^yO3l}O)%=q!)p|p9PP3fyCvu54eQ~CKs>1FGtqe;Fq3>LD-
zvo$FM9ZET6UNC!Fdd3se3B_Ly$HkmI(J615bL-E_>>3-UBXgtgW!wxqZ?37&^Ht|+
zXlay8<CoI!@9%&A`jwZ9Ygg6RSDnJ@DYAS`Upg8mznJXf>wDRFa@`%<{VaN)T(@rG
zTP}P->gT1e4-PgTJLWdg!zAUzgwog77!RxpU9F>|b0Yovn#jfL*V|`ZS>Zd|Y;E-R
zbC)g|nVXkiUl)6Ny8e8t(pP_fe@~UNZc@0Eo|Ymn`F(-{2je;a^L?t)#aux-XYO7J
z-D=3=?NhD#PDlUvs^suOY0Eoqey*W~(YCHF8h^g#=6CLqf9XEM=UK0`IUBE3NK}+n
z_BEZz_GSg!qz0e66I~WxoVGs3#<bv)#Qug$C1LmHZ|zTe^1VgXd)k>9hL4YQ3jh1}
z&wHBA#*G^p8MMCMpWBmZGHc~Z&7U`}T?_kE=;Gp%-`=g@!T(vx=HYwkYQ8y9r&F{f
zq;G6^y_)gBapebTA3pw=@_bI4)wHHfJ2ne>Up;oI_I;-U!<qUYI=-cQ!>ZF#j%#nc
z@}<-#^;6e`awQHWZSB_|A0NNG%(uIzr>Cpy)2C0LzJ67m|Mklk9&YZ_=gyUtmWBrW
zD4+Xox_<n=y1!C~H++12yu9)w8_P>&wuD9gmo8oE>g~7qbi6Zv|IdZ`=Wn?if2uyw
z!YO>})G0aJs*;C?T0JMLiHeJ_UcGwz)yN{Zf7a>Gl{qfSpEMM;oA*(+{q(fy$$|I6
z>erl!v5Wtc&AdI%GjQss`;#v8bj~+5xpvy{$;yzZXj{=ptvWm7s-LY2vf;tO#eaT$
ze0zKQ@ngqk&7K{+@`_>dv6#J8rI(g?G8klETVtAiZN{uw=jPl0Khi0Dd6_SBgK74)
zi0J6`QCnXf?G``W&Tn7x;=+@YlT-g%2`qX2t7PTw-_zE|%$X&5+Q|Dw^X6|Cd;Z96
zt@~Rg)@@q(>B;5g{@U8+Q}4GpE&T8{j`OTsx6A*36&<$)StJu8K6#xLs<P@`xM+!A
z=EsBjZHYRSsz#^tS1;e!H?vW1)sJtnSy@@qW;qNED}$G_v9i|we!IP{uI`cP#QMKq
zuRlE8ety1v{lO;Ig$oxleE9VAbho&^UhJ+ZP75oltLuNgT&^9q#-Tb{@$apMwJ*BA
zp1owJ_2m1O2M-eL=D&aYR#r-CSMF`I($cTa?R=@Jsj)i>4jw!9?CI(0M~@y&KR0LN
zwrzdg-Q8VXS~@y1hDj~^_uDfZIdWu<W%0Ac{dSYSb~^~LIPPk_!|QBgdHL$qts6E>
zsEG*<{`_|P{UnKLbLOmByqK9GF){JiuV0VOm)6$S?*ISq_n$vC$;ru*Eqw}?3_b|g
z2Hl?tPQ-o7{pT-RvgFG3>-o2~c)Gf>GT8n5@%ZWK>D;YOO$sqFF?Rp|6fX?uNSrZq
z=FKlJFLO32bpLX6bj-fC=3rsWwe<{+0xT1a3Wel_gf<mCJoMv7MQG?%-RNygmMod@
z_UO^0kItPsbt*(lG<N00y4(i;yAxfeeM{Y~z#kR0{JMbzPkMT~zP`TEX?BLn%1W)N
zrxFZi_$>QjIM;9b<jIRKW|UaXJ(<G9FxPK+(8?#tERF(8;+2;tdHJ1C$+l8dRBUT&
zTeWJH44=A=PS2eAk6*u@J$v@=UthB~rI(a^IWyDv>C>mFf)-64$E&Bjn4DsoEq@l=
zY@Tp0BsO+$?rk%M8{6~a<KpCQN(c&q#^pXfK7Rb@(VxG5y}P~r{K=D=T3Vol=iJ6~
zb5rW+HIbY3Vt19iy|wkki4%W+e?R?2RKcS>@%`IaHQ&wOI`7Tcdf!C3UVYZY`~8VG
ze*Zq*q;P4{<jKaFcjmklwx3$6!0c6;yYsNX)YQ`#zb>_$=yBxvXGxwm2ZaSeD@~+&
z&p!{=5Lp;-BE={>JNxzP*StJDEKH0yPb3&HEZDNeL|6Chp+ipb@%x|7c=ANP#M0qc
z_xIGkI`6&4P*1(gzA;Cttaj_ZzL_G&pO{=Zd2-_lk*sK0j;0msbhDqBzQ~Z=e!2H}
z{*s^-CQ`9o8~1M45b2sTM~0yzJ$cefo67ceU0qz3+b8=iZ$9FtZDnQkWbaN6BZfWY
z!R0DnzpSY>QI>ZUSi*lw+o!vy_D0?ORkMub_HS%vR$IE)s<be>)HgC()`GY6`2Tw~
zFTXWf_xsQPQEeQ5AbWLsVCJ`po29!>7g<+iff^lqu6Nq4R8M=mSn?-FlS1vS-P?{?
z7ky)wn}2)a#7&<kImN~N)F@cHY**ao<z1(X@@;K68C0KEo-2zx{X93$sG51QqWtV1
zA`E#p7GY8I?!OT*R^Gi)`T3mv+g5MdwPf*nR!4y)yc!qTCzNH%i-LNYyB4onX0qO(
zx8}}))a7YzllxgM?CmW7WFG0gvPR<K?Oi<q9s50Ne}1`o_Rpd(-`aK8YgPSvl~(hq
zc%lbK{_}|Nt5aN$*;Wabu3xk&Gxq4CO?P%IDUh2#d+KjBJ<XVg&$nN3GAKEfyuNrc
z^Razk*st^VZcn|cIz3N*$JY-nYnNIxM9i?@E0kqskZ999p?$SDi{ZerOMh?uRSthA
zx9Zn>cgAVU&Mj{9-Cg%TBYl59N0Y+Y1up;N@9Mu@>}1!Z;PL&b*fO_cwo3Bh*QeRn
zlufMpbA4)j)+?<oro6(F=G#|&<7en_S#)`Nxrj)5*2>rSxoxHA|Jk$Fu-mKn-@a|p
zolB$c2mF3>)pygx<InGL*tsnXXmvU`^R%_ssUk*)hR?5Ftv2X6l>5Y_;HJZto5Bp6
zJ`06TG5NB^_lWwc<nX&Zc7;FBIjY}I^nRYR$)t1|kMep0U1jxqC(m&+<ea%X?fmVW
z^p}M%zx|8m_rH2IynFXftG*TaD|B^EzIs+J<T&B`o!`~Qd8>DA?$x{XM$A!Q$@31E
zMT;h_xp?ogFHg>zvv+s&er1?2OVanC#$&g$%nZJzf4#T!TimYPT2)c;MEAeo<~KU*
z%nq`<H%&aw%An?4_wY-p@9Px|OH$lkX3ds(9lcsBb6?Lc^E0(`etZb4W^#yhZQR(n
zHD$tYzq-ek8E-c2v`^AaV=vtCX7%@fKQs!~POG|Hq$kmKGm>}PMwu@kUbg;Kzh3kG
zr{Si#O@V99#Bg;P^OT%j`suE-z>~i%LVv?b${gjkY~gEC@bF(8pb>n0?T(t?4SV)X
zTK-yMlSW+3wBW$dk{|2k85$H^Cb@o0JEhIN)s*Mt@l~gyRG(HdC@8sft`vNEv#|7Q
zXz3d*ZejIJ%>Cz64gPJ;j*GUH-jU-vZB@#I?)3HhrHh`u+H3!(CT*2QrU&1o$@5ck
z5-#hMuV1;k;>Q;!+vRB=*T}2f4xM6}eRJyE-*So^O@G9_zC>UD2&!3>Ihs7g=N>z7
z|6I@XJ<8YaRduYr`ruB}l?~$IK}L(8*ZmM}R($@<qG-$aFXeqFL5;baQdzqgE}Y0#
zc>bb&?~bV8aKo${CaJDle>^Gp7-g<|-6MbX@=1%Ld~;h<{B3hDyBc2yWs&Fhw`JGZ
z*0!-2Ncu*vew87$`N`Cyw$hb%(kGfvzN}Qcmsxg=?d)2n1MAj@g<h+9{@SUEz3=hk
z<Nf!yWD5UGt*H31%y;&?dwadtUFlS)6`QsA{=9GLpmN|nGhci2;~gp9m6bc!G&xTA
z-ZE{MW1^>6A2&x+#pGX;a@MTV?e?wdVoXa*dHz=Lz`FHp4Bo=aTc(KLapPn7z`CdF
z)uV04OpG`6_f&fbv@kqho_>5%uO+Ld*|WS?t8PiOsV>_qR6cEb^3{#2cl65SDYx(W
zx^3;eUsh=^Eep?X^FL&8=49E8Q~lc*4t(5i-hF#z$gC$>_Q%iXFA7?rZFlQYhVhoj
zY5oE(X?aZ(_l2hKFZJMGcrl|}O!w2rkBa-heEb->B}4Gkr-}Rc|Mu*2jt2D^>iwro
zpUy9BmUDewEQ5fY+`g=<tF~reKR4Gp{92*n35R8iQ&W;3mi>6c&-KacmsOh5LIDPY
zo=<9DpPqj4yQqlk>zrFBlczH@tlQRkeuAg_xx5Pjm)E9-_kEbNXyvt<UhhfQA8^*+
zzft_)N|ajg!5atK{#YMGX-Xd2zqL$t+N$2AzwZe<GR*k@A#&EMs@$(87q%`4T9FxP
zXeQP?YwkqH>7PH(eE9H{eqN<yt-iALzt2baPl&HG`5T?;x;1RE@5zp&OHY^XUMhac
z*Eszg4;Pn~rY0jpZ0y~c#_6Z5lvpawd2%1$aeVsp>610Jp}UfMAN2N#s{gpCYoh$W
z)}Z{|ozKtDPwp=*E&crYbD$`@<1RII_4G?SEHA6q-I{oAPMejQ^S+yM8=2<ZKam{}
z5-?Gxv71A%J@|N%X0QPl!yR7B;IKf2$}8;3&nJC9SF|Ii(o)Rz(K&6#bNLUhX=|<u
z`d4i&<|x41`?ZLtQfun9y7Ntsdb-WO>(2Xo*gE|dN2^8rfyvX8x87g7#peH=t+B=S
zJeMvSW$jmAxog{<#Ew&&p00Rx<?*?>*5>*5Y#1!6zv-;{q41Z<>x=dC6Y}a|HJhG%
zSonCwg#Z6eoIGi0oV{xGLi2K#mwkS!zhaNATYs>X>7<zJG_JYFUhFhhTk6hc|Finq
zldHR;j@^~f($@c&_M!7+^7L7fH%mVVOnLELO6K^>5-SD{7N(Goj=xyHB;T?;9j^E6
zF|Wqy`t_ie?@Z(8e|~;`u{nz6rJA#|vtM%mdX>dXR{VPB7nGX+bm8*cRSN5`{9R~r
z<;%45xBr}5wSUQuCFzaa```RqIk9}v#f*Rd{ykxiJl>=r+mv_gt&GfZ`~QE6Bi$Rn
zZ1cDOE5cy+^NH}6XMGBH9T#6*c7BH5y{}~ofx#D(jGpYW@9UaWwR}^}LXR2YpVEF5
z%zrmu>Sc#!@G_s7My}Ta6+GM*y6i8WG<h<kg1Wl<wMK=#r><TVW%%>w4`@j4OLg|X
zpGJzNKGy<yWLl5T)DG91UMli_;zVWlJ{ij(xc)<j4lz8qwl;bbAIr;79kJ6lZ_f1j
zF39qdPghshS9a=_H4%~QMgj#=uimxJjr{u3E0X=wz6S*sj`8bm|NJ~J?X;e<$NW~I
zzkUY_YhGVl%i!>@dr$bjf4{QDRtwKxuFP?1TD{(U^9?C;{-g)jd@A0zAn@A5FW!}{
zncL;%ea~_4tA1})mHkRKeEl5*<4xZ63nj|7p7OYFWM<}fO;GW~?uDV{R*rkti80tz
ze>-#gcJ#K73VWZOkXLVNYFg&YZBzG&-^5qmaS7A$kJjby*lM?`DI14g+xW#eYn7Du
zbiMe`XQyX$KEHSHVZkz%Gd_JQ0|YA*C0H3;S{6*=ko><;eV2wpt&G<fYp&yk%F4<`
z%Xt_I%F6n>o$Jr?*H~Iw?o&Q)HcfKX#n@LLWg3&t+-1KW8ylMfy6V8TJ7&3jtkT5Q
z;dyH!e$5oBpCYsM=lswdM=`LGvvyq$6ciNPw{PFgn>QII%$@u8!2<y~Ilb2lCdjos
z{&8-8Id9RoWud(R={pi7Ts!mD-Lj~B^Wi7AeblLk1u3!$O$r>Bnk{7d_P;-JUM&CW
z5$5Q$p9~6>fexF$P29&B`o+5I@WTn86%5zBoUNAU$TsiH8J+(ZAD?itYcu^{J!8!y
z8Owe3mzFThY-v~U@OKvd`#r|G_0P0`O!=3a0~X!SeB>f8IiW!2{>H!C=i0x&w#+9b
zAmr97H@^!qCTHG!y88LWds`OCihxD`?`2sk?^nLCrgllbQ*gP!llYl4BgN9T{oa1p
zc)__m_0#MOTyEDF_4rn~nHq1}UG>y$y=#X8N7EOXqRhE(Ja|J7Eq@$ow`Z?LOUybK
z?oSG}Tv~qRQmbC@d!#7-{~mk%N=uzdm(y{6mDLvKntRvZ-__yuo5Lt!LD#?E%d(*k
z4i0dYcbvubvwd58mf&QosZS5z*77S`!lw0BnWO1TaID^w?JZuvJ?1xcU7p*f^^4ha
zI`>aq!Il-%KHWLzD?Ig^U<!kS=-=-xTeyDeF1%!SNqj+<-KT%A{1o@A@+@8<WVd2V
zzXHdlc#n+}?h9$XRjy@(I*}nr2W&FOrTY&p{FYy4T(D*h&s#fdg|9J+`&C13xu<Z1
zewp~auY?<HZqt|Gr%#`*4qsnZP@u56hT+1sYsU<7-rd<*{_f7i+?)=PuNg3HqRXv$
zL%;l9FQ*H&pnr~adEUJ}m2XRC*j9hrn0)-g`=b5VX179OtX3oat;v)Z--Bn)j9l#A
zD;gHH`oi0)&wF|g6`3i2`LOYC@N(aGXFn@(TynJN>z6ivcX6@%`!_4su9X!OOw7u<
z_1RJJ()E>R^Q!r7xrx8@eV=)5SNZ#U4Gj#%#h>+Lx`qDMEe8eJ!b^5dUs7kA=il2=
zn9OdSot-T%Cbp<3=fBczr#kNyTl&Au`fivm+UfG{-MiUlxwDK?y~O$4JL~={t%k@e
z)CM>?HErI!Ii<U)=}?!b_Lr|;4S9@BOhST!yu7@us=j1IMM>R!SpWa`{rCI->vbng
zT=zm5>Pc3pC&i8Qp@DM!#fukHrcUkL|K;=N+j}ZM^V|RV@Z)3hCfB&Qe<vm?i|fVg
zD1AL`M|4fip2?Gg^N)9x1jTEE^?LYA|FG0{6!4#C)7jHAW%~5*A3qir7HVp1b8~WT
z+`6^2uuxM=i;I&}(x#%Iu&~g@rDgs4_Y)MIg@lCO-PxI(pD!;U;P7sy5~u2~zfSix
zpKSjUH}zX_QBjJl)Bco<jE;4`_A02WA3t-(=g-oO8w*QHzC1ZOdA@zU-p$-EFE0N4
z`Saz=myf2^{{B|`?PmI3ag9rrwc94#7mB=PUsUsdi6`TxzNN<tE#`dsR21oc@qfwB
zYYQ6ZZ<e#G*|A_j!sTVYfq{YS{Bky>udW<yX5at!+wEp{e$W8S^!Pf^4MFPu^WMC8
zaU#XYJona@x7+VuyMF!ljT<$8zh3|S?QQgqg2c^?fs5`R|9a4=&YOAPmh%q_^x}4G
zNj+`mogD7U${X2!`Fw%&>)=gs=jIuI{{8he+mn9x`-RWX&FvIc@7ixu@nHdYH~DjG
z{x6?DSO55s=-<{>5_@0&$#$1%-`aaN>?!!TzVTP|{K=Cy|2)3-Aio@Mp``ljh+i{T
z&APN_lKJcF_2$LbzMT74!SiR1se!?TJ9lbsZ_6#QvNbimdh8e*!<{>KnwpxPouALo
zux#0~`1-%5k+Ta63O;=JU{U%?gh3}}M}UIB9P9FRHyboAzCZn|NOAwt#;9BNRZosQ
zli%JWVRZJ;l}@jPr>y4Gd1?rWiKW~1?|W#R^x|T2{Ryi%jM-mbU9JB9PPAT9QgY^;
zIeQWgHucGL>#@`Z+iQWn!2fS!c|)worcImdC9LDZ58t_)*)z-Q|L^*j+$~CpX?}+$
zhld~QmA}2R+v)!g@9oypbRvsBJaCMSy&JhX?dh{;lX^p5?LW!h>n2>Ukd&RR{d32{
zg$u)zU3W1a|G3uvt;{n!zjbLo`%ipgbm&{Pw3EGVTgB@A?_K!Xm0uSuVLtwGZS*$X
zxqENkx+9wUGuCZsKrio_bpKygdRmgc^{*@^ZT`&Y;O@TsvGKAC|GhyITz_iSK}M*_
z-H_j0!w|4&_G&Y~xQ!ovH<ko4G@K7xJI^Akb^rO8DNoBKr#fvlE049RE_Mt0d3pJH
ztGWjV{J*IC%m@ezEBo}sQ>xc2^U{)4t5%g+d7nFxZ)q+6a&uMH=G*g(KWw|WxA^(G
z-H#(8-3<$P%A~fx|L(l0FX=$mH@o>$rlh2QpKo;V#l^+jb8dcma&q!q>vA*eYZoqT
zIR4n#YRz=>-ES?QnC;3G>|rbp)X>*oud&uubKjPV9Y1pK-}>`*h3wxS(-$^hTOWTu
zX``C|yqaHMGE-AiHw9{laJ3!^lkav>`nd5?*^=|G`dj}@V++c(f3ezh+qC8s*`o&*
zE>11^`6*TAc&hA)10n(+=2y$FkJ<U?)vH%epQ`3n{`v8d-~P{oXV1jM#no?KzIaja
zuI^oTo(88nZ?BTijKzUJQlICk&z`ucFX=&orbhUbYh{1ho;A*Y!OqTJ|M{%>_4V=p
zf4yG6J@@vqb?fS0Tv)hf%^GfTy*)KQi_Xupg$(?8`uY9){eJ)AMT_3u-L1awsFs@A
zvokY|H}%SAy8qXGvfaeM>$jz)<+C<Do?Ua+FiQs9kv)EIXL0zoKpvm7(@xlwy}7Zs
z`g@<eeO_v+YM#pTN9L=4_sH4qDpzv3rGC`O&bxDGQt$s+YbTri5&Loa<In8v{ufOH
zriRUlRruU}=-%Gy&6_suvOl-9UQbdwqP$+l<;=;nC-3fC?V5W0!2b19&Ocuc9x1f8
zuvoET1p~wM)2Rj$P75a}a7^@Yu{&nqqakuB!(`LMlPO#*OkAx^k1ZyjoFXG|x97I_
zm+qydyWF;Me|mFs^Yd3%R|~88T)1$dprAm)EGJ?)-}#d#Iit2-zIpET-PnnItJmq4
zODx)y^D`-u-G~8PC8|cR2zm8<e*M3z;qiC(R-2odO*@-rZDG+PWBI9De_zGdS5tS~
zetUbny3dRYuRkjNpY-mMmESwJ`)}v$s(ril$MwpT(`!`YR@Y1HfB3nZKVPlH`bOTw
zldcPAM|XQk+2!=?5C6={vvldi>k7xGr13Ryf4tL_!Y#bK-0W09X>O(C*>3OYdSy#K
zA6Wmwn3zG!GjCp&SWWfHo%U3@)^R%b&uxCcvbX!+EGoG6tk$^MjQvkZ!nO4KwF~ms
zTyrkeg03c-`@1H-EmX#C{`-dyKVFZo*VNF+$jIQ4wc28SzE5FqzuV%uw$)*qTs1`A
z-Q0Zq$dM<@=hu1p`T2Qx+}M=bJ$?H0lxgpuKX2bub92(Wo*K)_Uww-|`~Q(sI`@h3
z!J&`Or~j+@dHG*t)UH!^W%kcbDGG$ntDXN;Ez*Aa-_HYGU8|B#y6s!Aan-Udr;|VZ
zxD(CqU$$i9eu*EQc19CQirwnGoG$)c{4n@A@6LMNyz6bzx39&R8U+4Vf8$;1dvsn$
zSai7M2W5ZL-gP1gRe9I;1!&a#{q^<YV)vaf?`9gOm%X_$an>v^yQ2vPIXOA=Y^%e<
z!_(8!)b{xYYKYw1QTTZK{W|N??LXc4U~2(hg~Z0r6=`-9m^s_JeBJ!{@tfV66u7v!
zoSdB>KYA4Pk7=HL{l4vsoM*l6l>GU4*{)ZTEA4iDT^9L!rnCRl(5JQP78)8x?mb(j
ztyX0^O<y|q9cX&J+(T8=^1r8_e7)JFOMc=EPoBJtTfEl2XX|C-py+Q`U#yE|ihA`j
zdgrCfm%qQi|Npf9ein9iW{1ego2}g9C!&LI<a~R3d%L_{&5TKtKAqOzAG5b=szS%3
zM~`ZMf0MN=YB~Pc({=`5(1hR^!~g1~rm`oGy=d8xK5_dkt0l=%vE57e>s@FPs$Ft_
z!l|A=v$XgaI9in$9+-XL|M$lsbnep!*OXVMKS`O=Uwk(#D&+Ro!__OgCeN9(C;52a
z*6i!+;`h%x{&?xKWxICo78e(1b_fc(RDQoUJtv2UVcxuXDapyn$qo(;jg1FiU0q#i
zGq1VXxvXs4mL|su`#{IL-nw;5_D#*VH<7w)8H<jm@4xKq{rZN*OY!H|J6z7HKb<!H
z%GK+px2#@O_iu~a{@7W*KAPczamd{LML)`|mj`J`FjV}A$g#IE{}g#_ZT+JEJGNXo
zd-=-Y<Bw*qo&0?5hnri{f1NoRr<D~nJK|FD(!V=)?9ku$BkAL#qo1Fhy}dD+9eEZK
zv<u?u>Tu9qobG)xf#KotyGmY)$JcBueC+1xdbIZUx3w`lgSsYe>C%7Tdc>werf%h$
zMGAJ7Hn!G$pvmpWljlzl6*+YKzqz1dmp9jWZJ*qXgyX8M;v(tWtfG|HE1G?Lx%ou2
z<<FCk-13y4r+)bxzVRS0Z|R4!BVp3NWv9GQ{@Wlj{aR*OeJfM9qDa@J$zGs!A~naY
zb^eq*X)m^o@bV4b23l^U|0U*A>-!s;=RR@uOw%=yI$GNCa!KU7lzQ3Psh*qf^qw(c
zIB+AT_}Qbxu2Xk+8Hc_Km2r1JuIfGQ!_PloUtiac-Sy?c!DbPzr!OxrXIQX!@#fm!
zW%>E<-|zo_@7S?tN4v!tHl&}I)78~2FE7`cx-01@m$mio(%08Y?Ri*UT5s91Wz(ij
zY3JwNtuxQfef#6bkDbNOzxjo9ERl<ia`$asy5!O?=~7=&cLf2q`yL&2H$xt1=&i6U
ze$lz(@UPg*>*jZ_S^F$(%BI8bRL@43yvZy$)qSC)HhJsR%l&7+-3^`+uX{J6deN5u
zPfiN+wI6=|`RmuO{4y2{46DP|ZrZRxVLmSp&zFxM4Gj!_yxo3(noguq^|v>-x97`S
z6eL_+<QiZ5_3Gc>-<JwGM{_h;l;?_X-xwEv{LPuCvaU;SYMq+J(D1m)P44-tz4k4O
z>cv&FA8fLW+14RoT5yxe@wL3^ow|~)%K_@gLn=NzsY$ux%<$l&bpQXoks3!NOLkT-
z^ez4wmHVbYU{U{<Qrj(C_=5YEEnffW>9U5m+3Tl@Tr-%lrCEIXG_mXREWflITyn4D
z$FT!0v3~RF-rVZCu-o%_zpcFKJ;&<~TT{E|b{|}of4uI?$pVH2L7I%l?78+f#}Bx~
zy80#_JML`$Zr-_|H}7)gg4RE}kYN%U8ft24$}nN_<jtEmE2}?Qv2tZ=OUs(b&1r|*
zczJnwpDYtjOiW~BV|$cbTU)EDuC09Hz=5QV=jPkj|Ni!No7eCEzwiI&;^v;c_EPhg
zzIk!V_QqR7VuJ%+efLFLw<X^CrPXQplR@Fg|JbT%l^iXJjZ<cbnOW5_`psYWJK^Q@
z#nRHOnVm-&6hyj`;-3n!1V+Z4f9_eI8?!QAgo%mi)2B}*rKR>i9yCvwAW+o1vTU1}
zsfmfo`=s}+Yh7PkZjH(NyCU&&j_%#Nb8Ahne%)%y!*Iak{-w*gYo3Hji1Zkpsh!id
zs&DGd&j#NM(~f;x%V&}MNBy3hFuQfX-22@MhNesmk0u}1^^w_YtG3IE=X=3N<=2gC
z&Az#3NG2?KKPe(Aou^mt>C#fBv|Y&(IlrHI#f7Od=tP(<+O^3}a~lJL-n<&iv`wF<
zORLNL`?_%AOts*7ae>F~?R{ysd|rCWvWsg}t>>0M4?1(_={=Aa``&X#e%T+$5D<O0
z;K%j$?(pAU+6k7c#Dw|(<b1rw{F~3a{4MK8>8H=m&R)ED@%s4veTg?dKR<s|_JpO4
zN@{9qZEbDlTq(z2Q#ggyrc9ewWHD#W8lCj?bcP+Zzqjq(yVv5VW7W)xOj+MR1-G{=
zFFpBud}Vyj41>py6OWhKPs=Hn%Q>^|sof4a|2ogbrmPO>0r$5B81iuMoL%w%RsFU|
z28KmPT@+SMe&l-a%o!b9+rLjwPrtq{mYa*q$jmJ7dD-W<dr?!CE;u7@@=Sc`>Xli`
zQ;+sZo9_Sn&&F>1U)6b^yDvYUJTLtEv?6IsraAl!Pp7t8&2oFPc~!pox2&xj?VUtx
zm-N4SY5GZje&3ES=`1s!G9O6D=RSGz%ldg~7CWWWmrvc>d9GUE|KI!l;pgKXxh_r8
zjb>mt{(tj<Z69(sx~qsZhIp>-Qr_t)(|Jez-N(nr`}+DM+EP<emMmK~>GB-6e!1G;
z-*OAjs##f89c*H~TOr7C>H5Y9ox-Pehgvu_PEVg2cl(W*;j#yRE`B(=x>oi5^+}VL
zum4r{W|nHY^iC#F#q>6I*1WmjE($O#2-tAzRoj;(j~XPKkNnj8Y0fa!Yhgh3<9oiD
zu_9$}Zd|-@;lbOte^2Z0|MB}bHw)7X<LK@n4H16v|JMEf@q0Fwcf6iau6OeOKlzB6
zJM-VQ&y#&(l6CFL)ywL2US>v;pLk=;e(sof-J$PdR&srdQ0<cQ6R)OipOn4g>gLK+
z)lv(+D6_8~2Oh|NUw6!Ro^eIxg!<EBo9w5m{S;K+`tw52)w7(lJUu<t{pacE>;Hed
z{r-vaVul?xKZ|^Pd=e5Kyt})bnVC6$Z&hkaO3CMEXYbs(^Z)Pr`nb5b$?E=me0={N
z_uKpU_)OD{R(pH>%60*kgX`8$EEVZE^XC5k_&>8-AA<^Bt9_iRN}_xB-+a3*f8D>0
z#y>9Ddz=3ev#4G8eA9Zj_4iG4?_aAHOnjNr{`>kPnL9oI>h}D)F8ukiQZZvf<b?Tq
zn3CUa+HBVMtKRlU&et|h`!}=9GG^@T-@o=bhxhlyXT{ShzdJoq=#Bgx8XEff`T6}t
zPfzLZ|C5xHW0QGF<>R$Q>*MzBDthWwQSsyP@qT%`8VNbMy0^EsK6&y)Slw^J@oU$w
zzrV9{^4T=+ucm*Gzy5Jt*iC<iRbA`SnV+rAjV4V`o*F75z!DfR=i;W~xWrkF>st5q
zX*TOkpYW+E$HaJBzjxKK$L2yT6X(d?^h@?uny6v-)3X2k+o)uHhv4!F`&5mMv%jp^
zc*rYT_t%nnKdh%5T+sP{s>nx`+LPk@iawQWsz`pHRPgvuwt9IoukO(c)t)zBrYbG;
zIPbAGm7AeJ`o}Y~TTeF1*SuJ?M9F>KF^7dgNB(<VzpdrBbLPam50if{_nUp^WAfTH
zYySQDe13EK`A<J<q<YyvD;YwxrYdlln{NlrI-ESYa^*@^HnvH^CYdI;wq{>9GB!Sa
z>eRC{GnMc4FZ#{GR2TGX^_o2{Y_aS1Eu41z@vGOfcuRjfOuYI><muGbovkaI=T;Z!
zU%K?^&+o+NVm|S+qi0Bcd$elOqFYxAwXG_290m4%_-T46`^wd;qN1~>-7z&Xx^(TD
zoB4xp%Me4bT35GSpJpP`*>RbD{v69MB{d6Pf8X!3w^;MpiS_(P<$p3ceCf`S|IGU;
zs_W>_s|*4)wsMCJWW<;5)0BI^?e3v4cMXx$rPBmi4klbm>${^XB=|_uZtntXaaM*K
z`)aHG{QMjp4_;X4eDdT>`T9Q}KRrEtGHdVV&7Yr~ocu8N<G+7@e}`yIJ^!4!p}n1b
z{(13Em$PQ`CMz{5Y%%4T?-C=<RhXyTuF%1H`MTB#?bf|}rcIIa6gYCRSeo6kPs-{A
z^QQf)|90$O_om06FFYvZw?@I*J$LHUOm<rK{doQ9obmK>u2!bdsmr8`&h)$iUCB2;
zX7QROdC7(x;#{|~a#pU|_T|)F=g-UPa#NpOYCRU$U{?9oWQ%bg|I601dAe^)p6h&_
zwfBnko4QN$e;-zwm(nqRk@1TCe|I`KHWudicTAkw);8_YLfM0M|F*^d7b&Rm=a}pG
zRVHz3?OW61j&5h8vQ}BFdbOth&^`gK&M!+IX{X2K+S@!o+5F@(`{6%KbEdQZoNM{z
z$&-5*^z=8~w7Z$N_;%3o@?&e)=<Td1UcY(ncZ2UAK^Lo5{5iJz`@avL=Pg{CcwtR(
zO;JV4oyDq~&A)hD$bYP<b+&AiEE~i0_cA7zw#z+wb$=przKum%=Ch>yrx%MiE}UCf
zE!p?j&CN|!RrSgA^Yd&!e|xv|(wl0(U9<0&HSXNHZSrnIh6<kT5<eSj9sN?1d>nr)
zzA|BV=U#cA>tD8ZGnG`Q-+A)ox+Uw$$F=rK`}Y()E;m0u@!GR>Z)KXe3+?s?I_~=_
zTjZi7I6L@kP{6{#|G}TKpA@bP(VBa#B0bsoj+@_Rdv&X;H(2N1k`#ZsW^S9%-+2mp
zPrkp1k(KIg3N(mOSaeaNp|Rn9P1?eZJKJ_G3v%=Ftc_K^xoF|ijI5=xk;l%R)W~1m
zDie7<VC$YGeb+lKONLCGupq#or-}22lU1|U5m%?o^Vg?e(a=dZcG?|q^rex^@ss|{
zvtA}FIxqf#@Bh|&=T05IpS~=mx~6Ey+NIUMzXyJ8Vy>_I{gC}MZ^_yFH-lA#a_{c`
z@%iZfRa)8KVr(=nzOQ|LZtiUJd^ylArODN7inhKnC*IH9Y4zS^VZyg{ZEee>_}3lX
z8k4lY|MlN)C+l4^UpyC2joDXRuwnE1raeK0k$HuY-`pFsXZAevR@obFHTA_}%U>Nm
zU!V2V$cS_PaB5OuVM;u$BhT<@lU8#4(~iwG3@dcj_gBqRoq2hCj-tEXiItB`A2BFA
z;BIxA=%DcAb3v2B51T#in`>VDlogJC^sz!uPw(Nwhq2Z+hPsP3?K)EZ;Yixsb7l9Q
zn9MU@sqcNN=yTVldG2>byINR}&b-LE@KN5>tE%ghn&<D|7kqvtD?=gszJ~8gukr#j
zKmXm+qV(|fj^nMWkt~i!)a~nkyisD{DERk!$MKbshEE=UIC0x`sU^b!@ef&9r%Si=
zoJ^M9@#ckj;`R6PYgeylYuIyW%khWP-?jb=J-v>l;ngjp%1T$Q)??x(OboMwg#|x9
z`1N=3Ny+sm4;vTXKce0aS_bjz;N;JlksDL2^^Q!w9Dkp~ZeI9|Yg^wdURs=XF6Wmp
zsH3r|_et%A-^QP;om7<WxjetWTj=)tO*Ipax-uUBXqbGg<maLbe9E<_mlm66t#}!@
z(!_oC!tV6kiu0TQoO9~5Q}VXmyXD;P#m~!pazwk2Ds2yV8MSME{ETI5R$RNLKEpF}
zqPd(*y<qM8!XHbo7xtgh=AOTI*Uv9keLvltaYTLP%!^jDj<u@JT(1A$M}Xy~;+v;i
zXCFNNc=CMlsejZjKIg9R%v>LL>`wj@Qy2A?XW~nzhl)&@@_esn<wq^O8K>7iH@UJj
z^=QlfeZI>tGA>x76d!%L<B!MoMY}At6tA2tlZd}CW9n};EyXFfBkXTg?^-siPI>*p
zX|bZe9<7p@{8i^un(gv+i+25pJ26vnU2<Es-@cM;`{fJuRE@2y6qhVoWwBr5uWyt~
zS)5XPG&_Tho%x%iqRGtJwz-pEm?zHt`%ZChgWKY>GmY69Y;0{)Wlu9)&-Q-3C%@|F
zB8SBn#dM>tJneS+Eg~B7W)0i!8^32r+?o(<JF(CCzP^iD%GNFC4yZ*QJy><)Sg$mr
zf}P#H<Hy+#Z`fJ<e4cgrx&;dsC>K6*iYY4Hme#i8*Xq?-msfo0Pp{dY@N4_7sAKE+
z4j(-)^)i~bSUx`~!}wx;V5BSK_KD7AD^kOM@z39za?UNA+x+B3iIQcD&jvI$gr8qo
zy77CW(bK0hKJmtEoBh}$Px<(j6Mah;<Rm`wS$xUl>Q}}EJ9OITY;hJiVsHL^r}a;>
zf}3A?ORqg!cac-^Nna12*}Pe=erb8V`en83T-m+Hwe~^bSNHw?@kL<!Mv1nSt6yyp
znezJ8>Reqm#snSK)O`)lpW4M~2uZz&VsQ8{c|Y&hwGt&e*X&v1*r&YvlYQ@(Jq-;E
z_4WV5mak9@x@gY*li4RfPUOVRyeF=X{{H!2UtKMKcgImX?4(Q;xAO$XR)&QRH#Ywk
zDVx7;T47C*#qx!HOBdY9V&_>b@iLl`!ScK8WQ~U!+N<1;*sMqnH<T!1IFP$0d_wpU
z4Uy1PT~XCihJdh;Y_llc-ILC)G`zBT!NnJ<sXM)NLW`5zt;$4uy_AoiKj&|9Y5Oq)
z9?)QcFHa8Rf)ysw4WBP>e%#`8@XyNZ7bR`GKfeeT-@a;P#!l;Axi>~qAeC>{+A=bT
zKdNlaWV3n(TEAms7ar`(&%otv^tHrC*GFb&@0=>Xwaa$N=^eShWS_~E%{{(VR(V%y
zjMA3yfBN)E$-LdI%A=~vEh$N9?)$cjfoC_eCrY%Qy6*4O^YZNEX;Y@e?73mmJm<xB
z?F;-o8W-JDn%x%H{y%KK`MICGZI;gdLlM32n(Vf`wcDn!I#6#_dENoglI&x>(sSp|
z<(IS3h?}gUuD)FPc+||DHZ^4*Z?2v#-!toa*!*pEa_8dyUOjdv_st1Q27zy%R=NB)
zyZ%sH<DAK*?Uw>Bt8y&bVUqr3%X&ryW%GkqR%AARIWxz6nVYY?w&>K9iRSzwQ`2Tj
z-rjw~e6NY1V$rtGW!t`LX`K7<`<PsHHa~0S(nXi%Omtq(<WQNqP|3U1Z85WhZ|=@*
zZGv;pt;k=IdOdvijo%Coafz!Y&QoPw9CA%$v&a-x`^6RWr%s>#{@>g0TfW#;EoSOJ
z&dpn^^jafo;mU=U`Ty=bJY1V1>#=>uu3b;WQ*|P@e0sN)U229t>+6+YC3hdY6LtIU
z=|A&>^{X>#*e08$ZJPX?WA(0CZJXQYi;90aaZgssDZsO(hyROBozddu_Vc*-`M-bs
z$k+gCGEMfkyLc(<*Oav1{=0YEs5uJQ)Ge0T?C*0b|4HFYo}FduOlyU`z6eHc+F)@0
zjNeV9>FFig+^UynywV7r^6f#I{N9EdbNMI9Wk0iu^mSGqdsv_szwge|RQ9bVJb!A_
z*zA8syG9mw+?F_Xd(OP$&mZk*Sh~PRK&k0Rc^<!F)~_H9p=V-Cc;t;F8H|b^9eo|&
zX}x9D29?P%+h?3zc~E1<ylt8cDbH1B&9;~}?fL5r$<*hnyR7@Q)@ubNtqi+9?d0i=
zSvN!9{E}*HU}s=)6cI@`n)zvKsc2Z59$S@IloVT0k&fK_=;&}o{pB;lXSgjlmfDfC
z(8FVCfbwIx-p_OS8Cq2%f9-nar4!0<Lf6Oi%62Wy^VttJu`<c+{8E=$xo=gM*kr}W
zp=~LTUS3YWz5U%9jkTqlBr{i7`CNPW#oXz}hO+Xwlas!_-ap$iyGlONbt89%$*uY6
zeMgTS>y@`|jeEb$rT%+R_}*jpt`>Znb1+x+msC_&@UyBpKWvwre*Bx&;+6Euy&S%?
zH=n6K^u>{}xjyf~hut<&t8X;vG$x&C1}$=^PJZ|;bamL@ACLPT9UX)IH2R#YsD1u%
zzT@fdp3AO>nx^WoKD}4}+@>(`v%q!3N!GhQu=akP6IB{IH?D6<aKNJe6Ek*fd2e48
zQ#&*9{giJnd0xHTJ-^oOd5cZ=#t)Y#9zK4f?!l(D%l);|GMB%$KY8*-%;%qvuiXBB
zq@;dp*r&UHeti5pS&h|0^-y_|(agIs#TT+au<(}dWncI_?zp|#rOhEhA*)xf7wc>h
zcGK^G?Z}OZ>q|{GT(QJPU(a&R*_D-orPnXNWsdg#zPkMX2D9?gLJ2;GKu$%zYtD}+
z9lrVX>cffK=f2%DRU~xw+|?^oPUrvdVbIVyX>w(=ioV3vt*J9DIiDTtQ*sJ9z0Sv{
z+VoIyk!vWYqk!hji|hCfuRRlUF7|fm>xZ79qPpVN^FOURbo}9Tt}bIu5w8a=p&~s&
z!QqM`oQv<b@JXBSEe<F#>D9k)myni|za-!F+$VjVb0&rx6q8r1(mUG9S~jiu>lR<b
zo}!P}>|}kFvx~2PH$MG8?QFTfoNMogIfsfeYTt={@>|^IE83-Izh~x#)YIFpY&lX_
ztM7PU=k5Jn61A_BN}|v6$tRoFKD_Ww<=4-fQ_J;_gStC!j-QnFS-WL&l66Ucu=|%Z
z#rZ9de|&y^e(68+<x^*#ZaR=ZTl8Z8oWF@z56!Rsf3`U7!2c=#tW8a<6xXcTl<;YW
z>RuVo<qK3FTJt);e({}0=6L<@uixiy|GUhw=l#n|cFmr%_ZR&*xpyIpqfh*cmrt`l
zUp>Cuy68cFb-E3&UuA{yLhJPVl{xqBp5FLvU7PoQnZ4PE*Y5vUaqH>AS@+J`f3f*-
z{C(}hRo6fAZayNl<4xD9B(15-)~#}0cUW2A!^#jT#}1d44!>lMRtrXlgBnhXev2=1
zDrCLZ5{X=8q7|!ggz<2L0>fbq30I9nD@CGCn@av*l50MfBQ?`a+1^3G+{;dl!>Qr(
z(YL*O*cc`xo2_M6J@B)pZt;(OOic<b7XEu)?e|bgD$bfB5_(iV-~+3TRj*^*A{F_^
zI~Gj5exZo@!8V=^rC%&%`qpl}eCg)wRM`^@g7g2>JUsPrvbz7IQiULeub1}iTJ~sy
z;Ix~WOFwb>i1Saj=Wk(bSUY*&?&+1Wyx-qFm5>o<Y-m!teD?B{gJ(6&lzv~m>;oF_
z{I-rQ>|0g%xjjq_QoWDNPoBKsvUkyxze*-+*X+o9#Iv1swVR&A{`qdpjb?tCmTqWv
z{lmA-sYaRR`Yxf<u6MKVDb`GTwkUD^{PfPtRr2+><-ec%aiCIL(&zicrSo_14Lwo6
zyl>6o_|xmUDuvw^UzA;A8*IE-*JtjQD_@O^9$E6{uvWT$4BK=xb!Vz5>-Bf?^Nh+Q
z+XCOLwT-%aYSqN!zUTX%np~MFaqCs)><PW0rb}PmEc{f|RTkF#(u8gK!gXsFH5^{M
z__D;US#F*$*T2zWH<tXQD}6Pz^u|}y$jVNJgtQ$0du(b-E}SRzgNzruC{3I@wY_cD
zx`p#vP4;KMb$b2c`+_rP))>|a8yjy<kv+lSviRb@pJp0Xc5_mv1sv_qOjmRJ{;~2$
z=Y8iB_BV25zCK?3$*M@CwaIs$v4x@9e(U9Fr!MyW`=;?E?@{C1@A+{ZQqQulK3#aD
zX^qrQY5sZtzCNFsT&sBcy%cMuYBF;+b8PX)tl1@2%}xsgR+@a0o#VCi;tCV4R;T60
z20V)sL`+3<jWU;Ad|{&1`)9h-!V8%_Vc~JY>hDUdoaeN5ORLH!OQ_w{J02pC{*%FB
zxuME?xnl-CMfv(%t&0{d@tgR=rpqzCi#u>qf2K**@y&l4pFe8#R&Mi|Tq?rczV_*Y
z1?#V!u;O~D;Qf1Fqtw$y>`G1-{xTk~d$FhTeGlvWzCZW*AE)a|x-AW=v)+2(NYLv$
z6AP4$duyMIGdC=q`|f?Zn49hSUG=7U=V$ikyVY%e{lq=&Th-}(pQ67_mA5?i?QrqU
zt#|Cdx1ZcBvG|yE#I2Wp@fKH3_&k2D{Ml~K>x*x67(P6V>Axr}6MSF9a;LQX?tMZG
zIyt4&YM*{Td26HnySb7E#S<3KR<zvIHto^$*=l;fKWqruR3oUUA#VGD_sR+VQ!kVw
z>)fxHU-?&B+1|B@ZL;F_|5waQq?&6UKm9D-eR`8~{GV$5X$;S=UJXx_XuW+R^TDR*
zy{ETt+V$kcPF~SaSEf1jU*E}}e7T-c!BqR%``6VPB3W^XuReaZ=VJM@YSyOW>t&{9
zW_RkoJYSqHt|_7V<>=KgX+{SZ4(ZA{>iX-aPWwMw*QDU4j9#=$#|h4vwtr(^ZL0f|
z7_Wc0u;%!;`*rtAdsHP%&eYy{wP0!X_1dfJ?RDSI_VM*ieyrU0r|{A3{JIMQr5m@{
zmrR+uY}=)^-52%b)QrXXZ~u9!8mIj3aej8*+S*?agc&|?7fcCHm>_@p)^4eLyKk9r
zySn-&esMYO=<NGFZ)bR1(DL*ZR(2Q8-iY~p>*k3Y;g)U7q_&3gGBpOoH6F};U_4_B
zXJg*BbHARdma5nBt8yGV;*|YHWclL#wrK{L#nUU9+veU9_v(A|F4eATk+WOS$*Y?u
zzVuXOXh@tfb?>{Yn<vIrH17SsQK!k{^fcYu&wPLSMJ?uJ`LpCpcw}Ygldx<Xx$yYw
zIV*0nzdt`eh-cTFb#0Y?etj!fu3VEmk?G~RTmOIG`23Q){Zr+SN1p9pdanFYx14!9
z<Nkgrce}4Ick%Q1ToJFcQqo+vVWRelvpW1cXGeq|zPs_A6+?`z^v|=`mWA@}al3tI
zr%dzXMcl{ZC1z$mNezv$|6X-%QewQ`kI8QoD#aK&I!~NDtHa)KX3C`JmeC<so?I5{
zUO%r_#`faJ?Y-Mqoq8Q=I_s5`beaGEyr(<YY}xc~k57>P`4iI@z1gEuEbMOHF32!p
zhE!rwiub)+DfzZ7M}to4pAz_Pg0u~E$2K?ax?i9%qbEL9;lCe-XiZh<xXtf>ZuTxW
z_tP8<|8{QG|K+=4U*FDc%N{07zo<Dgkk4$M)hxICAZ3OHSKUNadHuI<)RYW-v^l`w
zl)?AHr&C$0td_~?{j>eLb|PEI#rFayYv+n&utgnN;(Xg#_e@S;=Kgk__?;G}#@n)&
z*53cfXDr5Ny7h{b-LY#&4<E5V;MsU|&c}}zG>h4ytzR)7_~CHf(tB^DR}q85!i2E0
zT_+1!84{8fnm&HKaQpwxumr>Q-c6f|4QCi#fBfX$h2Y;#Z)15&zJ!L=T5nr7ZTFYc
z7o~1>`B>h1cbVJio!Yx!53ikZJ?z%IxxC1Hp2gwZ9}(8FwNqJFyWOyO8GZBhBt_l0
zx6$#(_x?#gaw`8=$Kx2WC(|W@3qBs{K37+)!u?a@wEM5=bLPmTP7|BzH1$-*)T^q;
z&*iUre#K96cg~{whaxBcGtd6?s%w=}Uh>|MWAF9n<g~HdSLnRfSmN2Ww02^E$Y&#I
zhOW=6=dwv_Z<rCEGiSr6*@le9?05IdI4?{n-5OI^d-qC^_MgC4x0!S9EiYkUP+;(M
zaSZvdD?Z=$Ps#tEN53cSzrDeF!&TRCmGevtOI=MrhyAGe8+_o-Q#%&N6)Q9+FpE74
zn<{pdi{;R#NmdLOE{31<(DSSfzB5;x<L|Z!`ped4&X_wrBs@MgW?FP`xM$kW+=m}`
z@~~~5%lEVO<+Nqzo+PWfhO$;JjVfEp@O*Nl9m9;-786@5Su0f;76fG$`Aqxq>_C|G
zZSJ;v*WYh;>ilQDW$XIMTzCD}rJXVOUKm|}tMl;=9%Y#oTefUTdaMlJ=_+e)@FY*k
zQGkVUWqy}Yke5-gw|mdl-_NgjFAVtd%9D-Z&R&_*L6el_XGdj;J`0_kE&Il9?}Pcl
z`d3UvO}9)v^iI8h{<Bl-o(i!{oE=&Cd;W||i*7Bs(KK6pQQg09RgQjFn?jWz#Xr9q
zX3oKKXhw&ObMV)e6??jj%8FthZV0?~yv%;x>W6ABPZ<yF$Xxd-s%vF_*Kzh;6X&Zl
z959H_j;)=#HhbN+zgAHf@83Tw$ih(27@+m|1M8mR>t&HMcUM*Wi1^=3GJ5i6txd=j
z(<Mb+|C$U1@?WZX|K^|fFI2g_S@%Vludhm$*G);DsN}^7=lje5-H@#L^<eUP@&8lj
z$5v*=N2FH%J@5XEEtk*YWA%y6?V7so7C$~W3r>^f|1XsDcER??FYbIh&%{t46Xmu%
zxc=|MYYSx$PI^13pK-yK6=q-JlFH+xcsefiZ);mPYt^@<w|~pq?zX6Xq@}ia?@^Qc
zmE9_nHP2_Rn4Gil^30mL#Q`^_tm15Ca@)Q9#g4kd{c2ucZYxKgSRN=c%hr3b#)3<A
z{;#7l?^kZ{j0<y(ESx)cbK{~-cjlfpOi`|!KDBFB)4E2lvMNc28#^T?yxj3vLD{nM
z*ayS1xW#M3S>#r(&8sM|tvk3%kpI#C|3#Ns;ubS7you#Cp5%2RnCJ7>&f2Noc4496
z9{zfa49^c9b4!yl|5wM$(A+l5b^i&r2F+r&$4n2uw9fNyo_t=e&Q0!-{DU8#cfFpw
zYjrilp4rMBBC5+=L&By{m@Vf~wC%H6b`BGxy{)z0o2Of^tXZ~o?GL87WB+gNe!pSa
zIX#94&-+>&ZU}r6b1}0hP{=Ec*1e{6>(;fbwRg8}i_eaBkAAyh>)LBk(OXONUx$gX
zI*JI)+~j_vTA0K0-QN51)0b&3*d%=DclEyK)stpd=lccmv`;QRukCZ{MCbao>v{Tj
zUC>yydX;9cCx_s66V;`6y-#+qF-WSOK3Oj!S#4_l{(knmXqB^(hmKeWJ}>?p%+Qc1
z(UzFerl)hVt7G2}1I-Y(lMD@uRvw!4rrmR)Q0D2qH&!1_-TC(Ly0z<jy!pDjxbr4=
zE6Bd8%#>FzXv**{O;Xy_W-)tL)%I)eEoGP(Qi4u-EcknLm+}4jI?X3Rn+`S3_;X;p
z{oKgVixuxY&WOK0H%W$xL8I&1wWp;&bXXeuzZ9SF&}3xTzw#VQBXdHo--$~PCf?gu
z7WIcuPyH>=R?WXxOhZCLr=Q`kC_Q&Y^bOZj{{<%>UpEgi?{+<#6qs7d9^baZx_@Ws
z_bo2Bm>5`(M)LM<t?`xB=3YLdMSx*~$5H;thn}eZm%H@j<7sVf$u>=$lT~;0zijGi
z+H>ejUj7@)DS9P7_a^2$_^Mmx2G_V&$%sd;)qQpAy>(9J{?D<$b3FeYYjt5L_`1oe
z+Q3U|;hHx*hCE)~S&Rv1RF>a3an1hBo%Y)*b|;t_%;jJIPMq0w_==I-)H7f1J$sPz
z>FPVxPX15%aXv*~x83^twe(wHxc=!qYq%H=7@RqDY{K064=gWzTdo_PG3(;R$B{QA
zHtqe9XBReqZ{ea%f9#8Y@xSl9@L=MkX@0fhEmofdm+Wm?#1os#{L}Q#+qt{;oX&qD
zQyY8mruKe2<K(HUFKZ+^zB>Cs_)Wu}Q?HV&v#(!SGvfq%_$h5}t<~N?qIQLe`K7Oa
zGtV})b^Z4*i=S_sKJEGM-dVw6kp;G2UQ9~AclEmPpTd&K+osK1dEnR0o7wB{+C9m5
zpQ^QCr)1rtElTy@rig2=>QY*yKWz$kF?W#GYHy1rZLKT!CV5QU7%nZHz5Iu+md3d|
z#Xl}@)z7PT`opnWJ@)tc^)l(X=_chLKkS;d>_WDt;`B-UZ+Pz3C!YPfUpQ;^Y!AMF
zho4Vh`=+Pn*p2x+{^mKy8Z(4Uxt9O?ex+>ey+5kTtZBRS*Uc^Xwf?u`>f_;|CSlV|
zedfH}_4Dp!h7Srx&yBkeTrR)&yY6wSG<)*V^o1H$Pl7&OuWmlHZt0)eFN_Q}-!IKr
zo&M;VzNDtX_1d3rJ;nWxY|`F7BU*CL*OzN%biCQJ<k7l)y3E^^_uH10etvLav5{9)
zbbMy!vk!09TsP#gE~|5|OigTF@$9;@^fRBx#AHhmhLRt@&h;tR-P_N{F#Fm6JsTHR
z&ffg9e_s99YX{~3SNOND=a&$(s9xK*?O&7RYX8_<GpCfT4-9$z*zV%RbIu#T{$FWS
zES%>yXU#gz-7=r1_b$D>d2?L)_Uhe!7B$~)AGxyI>K2<mOWl=+_Rl+JcwgO`y1L1%
zG(Y+L!X*otZ{D;FR$~nab!MGYIrrx|=eS$<cbC6kd*Okib4bQX{;eCU&T4ZrKlhz)
zwOwcO|0j{Z<&<-hlr|kX8^loXanqfjS4|ltj4!@?_&3H~eDj+vM&GtgULBd{_3}g^
zU-<bWmOQ40hL@*K54CZ>rDAs?{@1Ge@%vj+mroTHzp_MKJUcTxB0~DgRg<4R+q%1j
zk|fe{Rs~0eSZ7Xq{nGyZ_3LKYuRpDM+k0bu?cUnAljNU8-<A%YYA(T9V)8SF!9XY@
z`_s<WLs<+4W>*cjUfC@_>*p2mb$;`oaa`(7nbNat{ukZ&14ot~V|%vkK}^UjT^*0o
zQYq6b2d&lZEw#-H-+ITJo0?{1WN`K9D9Oic+*mTt`0LVJzfOHv@mcNIHML`53<h_S
zKlNH4|KoOcr+oF<J6HNnUo<c?D3>#enS6Y{Wu_%VkDT4%8wX?<mKb@y*t?k_L2bjw
zvd{jf`{q8|-?Dz`?JIxg+rO7~Ej^g%etrMG*(#Rb%+^W8oZYg9-R_<6?+>;?%6DgP
z{r`R9i(vM54=vh+Ef_ACZ2o(>yZ%qX>3g0NriR@LP-kOE7M{DgebM3kC8k%*qi;&-
z#XsKvsF(A${oWrBPaPI<E#BeM9btC#EBEolWkQ@=Kdzk|q{+&l%4%BoZT`y_Sz+O3
zc6+8T{-MM0;T?B<<PC|CDc8KCQtmbJH!`**-VmN7<8*JY+L=`n$$J<2+Mf?z8UIpU
z<<S+9{jPd_%8U)mUcTMG_oSa*+^;j$vhV)inPWctNUzO0HOG<<pDb0%>kh2mykwG?
z=jK0)YM5;gu3B)Gx7XB0Zocf=wA_a~avriXDAbFY9e!7^c=F!qHAj{!Wpf|@y8it%
zk0VjDZuM7}o<9@edO5edYVQ3T#jidnU+T7sKatNr_1o_#b?@Kvlyl|ooMmLNW%iA&
zJ-g?P7sG~a=5mj6PF=s2AaU&2y%QHAtiMEYF+|*!X4Uy{>u>3Yxeu<~RgeGsr~Sa8
zJ+HWr%V%U}>r`cK*|^fLc=D4E>mRc24DHiPQ)%a@DLiv9{t&~17xy}Pt;ObA3!ODM
zVD@Ck&xqw}B3nCB84|2r5;C(hGP7sQ50)&_%>4aNTq$pv>T%IK`!3z;`{{GRLsz#~
zUH#Xq@0ooHdr$ZzOrB8{ekEkR#pjTT5qC<I|FEzHM8=-Ep7nRf0fRfI4sjkYFk?>m
zAF^Rv0TV-Q?Bhd|a`fDlRUV17A6}|)>fS9;h6<^uqf6J`XAHYK#ZP8)!``!srcUqY
zPW6aBk`%Z(;!0JW%=PP{FJ4M8HN308eoa&B^g%-#qi06#ho4T6G86Orv|_@!7jBvJ
z|2izoWD{u%zZTa0Xwko)?^_e&|7@}-_`{!iw3Ok)hq!g?_D$<;-dJ-(wYqKDv1v!x
zbC(-<tA>=OCbyqIWZ)ARx3$Ln=;B*76K`MDiP!bE|Fx^>!wPQRUQ>pMJjbrj6CV2S
zJ0yD8VBfNHlh2=gSYSEl{}-1;iDj#kZ*V{SC+<1n$>Ys6W$YQ>**%||f0H>S_wVXe
zr@HDDTkiAEi@Nnc`S{vrYMcxmQc-IBw-0SQ`}W_jU;VS!Z`gi6V$=M!-<c1nJU{#9
zZOe>3l5z2j4#|6G)Mo5^Uw&+v)tej^h7(@8ve}<CtJ4^MyzE}>{>|;mRg;tUM;^a>
zuE&4l<UPBM_MdLNFW2m1Ybc-gKQ(DxbX?H-8wbAMl=hE&?xbsfR&a^9<<085Jr<IJ
zwS~u)q`s9ud)D8w{O$JZ@po38eB6HbfAq%b+y7n>`FWhf^(0H0^Rm8rzmFF;DyOrz
z%i30d4bR=T@BRtPoJ9XCcRt)+$a|XEev84@^V(kLMbzvb{#mO&-7~XI&N}JZ1IfQP
z#jDCCW7`t5R?pVS<-O@L|FG&Yf9Y>;)t^^u-nh5q*wXnMmD8+lRZk0jV$5Tl`Nk<Y
zIXl&TN!XQF=}T`{1wrz_t;ycMKgGlp{uSKz=+LC}pSgLbgKNYN8+_8)e|BbM&g7+Y
zlIFT?Y&mSe^ILn#*^|~anG3FgOFtI3X_t@b?<;)1W8S)r>(7_`3`*6Vls406R`i5L
ztCLrpeC)mC(VjyltzUaG-4;G<-+Ls!ZsGp9TfM8k9bWd#?OS)nOdqdFGEC|&zF*Iu
zub;mB<NGCjo4RT?F1dN)Ku_X~Gj~{iJdZbVzT7V@osjyl<*`dr)RP^8n?X&#vW?I0
z)kd>5-<!L2f7!=<q3``A4X^F<RJmyWr2g~A%CeAVufX4z`VU-i`mp76!NhltnJ)Sw
zpKd!Z{abh8=eoa)DGTaneg669la}HEi&XYSVO(9t%V(SoDic|iap%NMx3*^o7rM)<
z+}mVUe&wRsiu^STGqb);5uf{J@4KUMe?LD7cYb5z+q2fV_%U~v@ljphoj)~&GQCUw
z@W#J?x#(G2^~P|<2YF{w<-d1|Ei0RROmEE!tzUm%JU{2`X26r1lJM@e?b>DQ_AIdY
z{C)BK&n7<@7974l-?DP&&d#~(wjGo|ZpOdytAXLRtgJi_uifefn|wU>-o6k~Z2oN1
z^6vS4-|CMwzRr@?ne+2j>w{X>qce}OJ@b9k#<_U@#mka0lO3u9^QV6MT&!hZ{aG`9
zqt-;JDRo?3RucBDUs_z0%*>45JvkRKo$b#`$yTR-SH4{~u70lhVwsc@%hYebL$WjH
zzkFu2OKZ{B%QXjI)Uto$c_A;Vemt=|y?(*3><%6UcE8+Hr#z)E*ozi9EiAZqW@-1c
zJr{Q`&&|qPu|`jk<5Ix=5W62vcP^<+>?kee(e!Fdv^aZ#$N8~DU!sNUNedZ0-^(Jp
z${ds4UQy>1x)Im+iz_gA@5%#h&P9w0y1x^*8C<-0ulxAbRV%goySTS)l(EYG#BDTl
z%f5|n@#km!H9d8~q%Dz$q3@xHu5v+;-QD<!F1Lch0vD`KzR;~%=NsEPd;PstSJ!{J
z#>qbIp4Qvd3fsOEmmZi_7qNcN9<S*IrWb@YtOdRbN>+c|J>RUNsx-@Eg_Vfo?&l|s
zKUH(j+IpYAYE#d;u7Kr|Kkxtl5F2&v@bdTVC4O~*#~wWw=l?RlYu~b^E0dEguUtCg
zShz>l-?@A5w>||And6>KPbS2CGpn8|*Y{XvQg^b2=Y%Kr*AFC0q%BBKN_}@C?Wc)z
z{EmOWEAIb1$7i=K?A*P)e{t&`-#jx<#j@>}n#Hlc0CkT^&H^eY=gogoHsdKX!}P_8
zxeq(Ie(qf%KK){-Y?iUIJj1=(?`yBD`F*O-sn%o3qcwki_@(_cun_)xT(|6Y`30k0
zwQFymexWtjs&>}qwDa>sXUnX4qjAMOsOrWqe(QOL?O&LA419gx-rB|WZJm$WSs}H)
zPqS9tSuw$^s!%dEbb;Sed4>;PKAkz$zx>6$NFiy@(^WejAAdXde*Fd2Uw?xkg~h=J
z?YFCMF1PGfIoUhg&blBgI4Nt1i&ot)Mh|z5S*P?*-KhSu+4J%r7N###w_i$-5ZjUv
z`)9HB!$9#xkD3lI);}|2i%&wz$~QYE@U3vnjQ{Ipzed(R&%U6jxGs>*>wC4+l@R%=
z_c2Mw*52H_yWr|Ig;y8fxA*<=Yi->1?f1M_<!@K}y8nB8B4v|y__}@H-?8_Z-MbaF
z!h2!%s_fIByeD5@6S?<WuW8M`sI_x$x!e9~zN7H|Vt#%@+1u6b?*ATlxGcK6|IN+K
z>FaxE?w<a-BDLN4fQiX9m8I>HvtQNjdFWjKf8E~dX4Q++`>(y6A2)aTs>#cQ+$1v;
z{O_+^u_EARqs^<onfKZPG(yTaWUHUgE!T_LF=6)VMUNHUym>Q4)@i;&XI;EQXI-_?
z%$%pEv)BETz4|%w_g{y%-u7LG4l7>@GM*yqdOU3Zwxaj>zd=kfojKR{=9gc!zZgCd
zT7iYE-D1DO?rdmGK){8K$;Yq!V-C2wqG(ZkVCa<aDR!5NyEZYuG@A0l{#=8`TmDs-
z`nwJrn4akhU47~1>nT?!-j`gFy<dJs$n||uWlxklZfR(Wt1WT)a`B|JYpI~&^j|NY
zoOryV;`+W_Wlxl~Tyus0{*zyO*)~JLKR&p%(dNZv8OM<M%e(KNQl0<(;z{FHPX5VG
zzh68#A-v*^gIvfj$6xJLYQI*+K+-~^koRwpjw%nglSQB8U5~|`J?G8DQ0QHJXR)=W
z<i$6Og;rXaX>N(U6A`4><GI80a!J;;X6r!lme$Nq#s)mWLG#2##pg^Aatt(L$jDjc
z?YBQZYToqtIf9baQ$bz%95eCd8j*E{Zcbh;D|RZXJ$!a}$ptab%^_Nz9y_H4i&r{^
zXxry*j+in@QuyZsugFwJ29G7WH!DwO-sG2-%6@OZM^04yj*i&IY9Wi0moH56QhhWn
zjbVb9>dc*-iQoVGo$pMJX1#Ufvi|$m3X6i4)`C1Zd6()h=A{$v%W1v+zV)B}+r|FH
zEH8KdIyUQY`o4?TE`9zwug?70r@J#w%S>{9@MNa;?#(To3<bu2mQ38Ya>Yu;PY16`
zm-n^bwGWRDcMRN=Twh=R`duc&f{a&Jp2minE?vB5dFb_N^7}t1A2!gGG!$?8ez&^f
z?X|m?`GuUcz}?g~_js0uNuTy?sD7Sz*S7ZeyUeBsM^swo?A-Ia>PBGamYpk1o*(Gc
zzbV+blXd0ub$`>+pFT3oxifL|?a$ptpSUhJy_ezMU2gX2V5+a2z2)0~2QS~2XwzJ+
zQ!%4t_pWVk-fXqy)O^TL@amJEUi<R(+7{JMuU}ci&Tv6ZE_L7IEH78D-z&Z}e=*+b
z^@Tl5aldWIt@rGI!*02QYJBZOi_guLh@LGGJ(0!oPI6JnAKoSf+t_2EPNd?G{vYlS
z&89iOT@%~Gd)B?mcjCz<`|e#n-Z#Uv^3G=N^mRLhOZTnZsi^zfF*S7K?#~%Ahutgv
z&z|vJv3C83uk+GY<U0w?nLh9LlcTQxjfHPi?Ebm=d`7C>k=h#(vzDd#M48>GeN=IO
zr{vC$b&H?%e41r;x8AcfH_|uOk|Bok=jGd_d!{Yh*0=3n0Q>wKOK$spi|Z?!r*e{a
zhQyPnR(1)GE=~Gm6Ii@=<;JbkXYZfb`1AAUdvb4u85kIar{9XQtls&na%Z2o*b*j(
z*%ecMw5>K*o%Sv8C3_&3=}CJLx7R-EmdyG`!<QT{oOtzCpRA!U?~|9xIhp%Q75MM|
zX0D8Kf6dZ&uUvuq?{nt~a#}hkpB0%nDftyz#B?osvo`kT+kg8$8y7vAeEGe8eVOfU
z*5e#}?#=6$p1!wrdm$@Bp?7ei=QbCueUf!ehc7-TGP%>%m$p0AfM+|T8K2B>;6uH3
zyoFoF=dYG3;tV~!It&LK{23V9eyOqeZIHDPy?QkB=El^itSTp;PLN@)Wn_3Dv2MNg
z0RtX}Gc4N}E?l~_X6@B)&Tcw+y9Dc)m{+XPd-nfx#_Wm-c88{Y`(3HPZylvB(R<DD
z*IcU<#ZQtyna<gK{n6zF?xe53b^g}>kH_WD&$TwM{+6SxtZZ(+ePi<RZ|6U+i~D@)
z(1FUmcG>c^vy?sFFVdKKAm_xDkLS1E)XU2>GT!KWvcvCu-3yzPir>t$XGwo4>EZd}
zqv7Q?=}zXq^V{z)5B~pQ<F?}r48Ers5>^~8D1Ux&uI&f;oj*07ulxJ$S9i2&<)00|
z>%+sQm*~nZG2gKC?^ONuJAaiI%s+R_eW|?5PPT99Uh~VINY8%t<sIklEQ6A_-YSy<
z7rV*Y)kJuEpFVLS<ID`hzdzsXy}h-6-!#_=`x4UMPMRrw|H_>c_okj)!k{qKbKN~V
zliWX#B!!#*?c29~-NLTgDT`8l&+;-HFz^Yv(|a>GJV7EY-E_^ST|0KHDJ?XSR87|Y
z#pA5~?Y-fb{pF(aNf}ZM8Aoj;qb4uUO-h+MMNISlIks!h<}e&!U}msr+rGtQV{{RB
zP)R9|X=P1k$ei#QYzMZ~2Q88R;(Xoi)kBvleK)pbPTrLKV%eKFa|G=cFK(9RDcrCA
zU)Qd7pZkSXAFq9L^W6Be>$V}!?;o>SlhrIcXD?B0-O8}x<8fDuwm^};-<EH_ciZIo
zhj}0N)$;l`C(GDbxVPBe*jfJhPx><{DJc!}dG8i#yn1-JeY$>pS!t<l-Jc&@v#+x-
zHE!H!$RNP7aOqM}DXFNas8_FFXXoXelM4zDFaP!BCFqiwurMo2%ZC;6|6Hw-mYmmK
zzpvuYq5i3&p*DA>{5`jKwbT+z->Agv`SYu4-@dZz6?>_her}GZpP$?g`3B~Y+}yVt
z52wep|0??@;BDM~=g*WA?9;PfYa15}zmi(@rL^~a%+0rt%?{o<a?U4VcK8&z$pT5)
zmOYD7Hg;~mRQ#yxbc<!B=Q`(F*<4$O11Ao|DCO=f`(5Ch8(CMF)@N|?-Zfpbk6~VJ
zC7UCTT)tprW}?6LM1R-*z#zRRMJ5aiY7f&QQ}<0<woc9e^}oZfRi8S^sQdJ;wN&};
zccrpxlB9H`h4l}Yqp|f<1Y={v=S>nk{PfeR?9)lY`JvaRz0Q!HArX1WL{zSnk>QN*
zo03u<<s?13Qypd(#AirEy4vlSGkN+Q6|q9gJ$nwBa0mbHnPYLZV%L{-UD30AbSjnI
zew4h_Xh}^=`}VFnUoGv9m&e}4oMsYkUruFax<#FA@u|P2X<~EZ(4j@)=Q_V^Jv-Zc
z^?m(T#+_^t=3={Jx2L{4lfHNP?)sHG3co4M&;K9s?WVN)IoZy{?K*XpXV#wX*E%gN
zwpPM6Z`0@B`m%4%oD^Rxk(-;pC;9Tzb^9iqlfH2Jg_^p0{=GexDk@K&PLD4uEbQ#*
zv8nu&l9sk?=gvwmuT%Z@|8^uD?YeN`f^PISj#j7Q;?G~ceEELA{{MkS<{G>IXU*@6
zaJ3#hcu>Y~{`$mwds9m;CT(XHiINQ0+_l|E@36tvucC{VRRuTl-Zo#~F}IPK;pozx
z?dR)$U%X|@yGSZF_pn+0mhM^7t5$ilxJ{d7W5?jJRH#WovTd2<EaxIkuVV}kB>V!6
zcn&ihzH!^a(ZHlvn8o!ZN7E6*7`4fptOYC_FNU~=3idrb<|fv~f6?Tq;!d8!8`2LO
z$Q&=6>7zBxWaHmokEW@0x~y59>;W<-vn?$n%5a|EUi*yHJ8>7gV}ECCyv@k9wr91_
zF7v44cf97WUz?bluX6v;RfTlDFQ@#pSL@_Y$hWC{U{`(p=3S+a`=9<-pRx0Twe{L9
zm)9?_X8YnGS6=>os&=@S$|QgLzh9s`!uuXSeE5(dAu9`Xw5GlNeqL!a3v289yUY0*
z?o~dYd*FbBu&}V*{Qbqx&;9uEqxSc=ug-JsN}Om06+d+ii8C7Kbxz%x+%9R*DE#LC
zjolV~uU|@R{h!sh9@MRva`qEr!{LXIEc^sis{NW2Je!Ub&N=*Wl8SrX>;s&Wo;;8^
zr?}IijhVr-h@&ZGe%}F3<Hp|3jiIyKZxkm<9Lr1G|5Vwt@6W23d2Q3y^(p?|W6?L6
z<))h4lK)>%Imlf(+__>_<CGWWyOrakr(eIL)5~{W%J`z^zQUu@!hG-c9lm~X#oD~L
zvt^!T?tFIm<(u5_eC^8l{O!&@b6@X!x%_#J+ik{%om2m5zxTQK<#O@8ePs*|0z2kT
zc9;>mFnz(vclL@0o}TqjtNC-5DYn*^VS}tv#Mgf!3=gs<=<l`sxOBVP$z%z`bBTY$
zKa1%}Up*;qRIvM-=cFswubUefFfhpVKY#QnC_bK_fsKuAd;a~n{dIqz&#%9C<w{6w
ztncNLii#aem#S7T*tTuk`t|uGB_;ol-2Az&_Dg1;!m74qnzP(&-+6rhx*>bN->fJP
zS*NA)E=zf4xa?Oq{&d{0sEhM_*RIK?RZYsfj~<D+e(d0ngLh?Ynb+=;5@hI^_h3iC
zO$~K%V}=8TXHFi~F<mIYuw{$swSW2#9`3z!<;bG+c$v44Qh)kfSix-H{%@!8m8-Xd
zn%(z(x#kjUd-i5`&7GPxj0u0kKSv$86dS$%wPeQHp9Q;)bIi6p|MLg?ju}xe_U<Ta
z+T7kcd9|eUVeR)md290RK8H{Fv%dSB#D%4`mX#ZGPfycj=a>8Q?RNh5oSRAM>BsX@
zB$h3Ca^Fy7*REZE?>zW%1$+Wu$12U$Ivw78$<J?iEJ;djZ{|t3tMT^qi)BeKcdl#{
zGc6Te@uhji6vhcJzSnH&`(HBscjC;z#F>lLtu|^tla@b!<L_BszV-``vaf`6GAO+A
z3+s-M5}n7&P}bM9=+7**i7X6uH;l~ftk!#8F-lu>`DSzA=6PT9R%EA1sOj(i^l9Y|
zv5jxut?g-<v1k4Na=TAqZPzuT)6KhASVuAl$j(d6O`jq%J3jK>gjoS5WtT44m)%*l
zJ~wT@#*Ck9wl8$Bw%wT$w&481yXCunb+N@{&R?X_wMb<9hSu%T+w*qr-kmHlZR*si
z^X8p1;OTojS>4~R_Scr0?Ng>qc|QMrf?nMGsu=K5n=Ym^rK0s`?ELljs=cqw=7!S`
zHLYb*5?%*of}*}{{vO#%zNvKrqDx+N)~(km%g$RG9~U%#a-iSI40rM1{P^9Q9_^ac
zBo$lh+qFpgRaCZpU2yx+mUQNZ?&+$t`&xFaTnt+aP;7Bzje~rx^V;+#x7xq^_dj0L
za`3rue2lfCMd9J<*=gH5mNGnel{$0gty>H1^G;o8nPKy7+df5m<E1PNHtx3~ZcE2n
z{9|Bf>)%*kp)bxbFVZSVZK>E=3E4X3uP5>a?^Xmduh=qw(xjpX2O7J&y5#GAIBMmt
z?VDp+tfr@@XJAlpyic~VvGL-?i`TAQ6W5PBbNck{oyF;Xe&=rI@0XR5+Ew}a+1c6V
z)fE*Qs-Mh2#{s$vut?g>i@G)aqOa(Uqmtfhv{#=Bc*!2<yK45DFV~W``>ji}lzjT;
z?eD~y$?CkahUXqG4s~a6IPb7}ThtM|l$=G$DU0ULj^tx_cQ{u_{t08l*1dtDu7`gn
z^FK*HT@hk*xq5c<=9A&Or>oeV*k5UQ^6YIb)rB3kSFWDc`cb1)UA<zqW%YvR9=GRj
zi&>cI=H8#4m^@=<5Elbva?t6c)q{7E0;gYCSz7-6dOhB~PiCTrN={2+Vj_#90ng*d
zk2hC*Op@zQPe>4uknj*-VVIyYbHaoPbLQ|c$k+cd>|cK7(VQB|yQQzM*-A@vgxNTP
zy}O|&Z?4HygHs&)D%h6(=+Fwj*j2Y)<WuD2v|XF_nlK26PW$=Go$>mAKLK-ZMv!0E
zE&J*fbDy)X@O!KC9A8c*dCPN(j{`do2M9OroVP6OH3N%!xUsHX`ODRHJcm<Yvq;Ph
zv-?Zq%3AM-q%$zADV?dCEG)~{zN6gQIeL0}ZoWvNF)za&*!<DQt)@LJR<mmK7$i8i
ztbM~%{fQ}bKj`El6B84TrVCfDq(m<_F){I&l%k$CYxeBT;x9Kz-!z$Z_~8#Q&@ewe
zJ$mo6smGQ@fv(^X4GavOGIREXnX?t*JyzfT)OG3Tf1T8;o<ChB-)y!oUA%}bP`A1{
z_7b<G!>uXbZaV#YE$@HooUe1F-J(Y!dKcf{J({=t?B|M)y`9NwR*|=)m=654j{Ipk
zHQetwW5fFY6Q<vvmy)$`|C_BJW%v?v^HUxttVv(t8n|Wa-oOJ)>n}apHRT7>tVQKA
zF&}@qU$%@9GRV2;z4&_W%-!GW8Qbf5^-rv2V#uyu+<Lk;_z^ebgDZ`{9akUU|LfkA
zo!#yATmQ*0V43mI$jaf|Ib}=jfA0L;880nQZ3~FFdw4o0^M-7BM}Z}`S7o1WY0VVR
zd!xNt=f%U7dUtIuC}qC8q<A!S=T25l_j9@RuiU~mN0hwz)7SB$`_0|U)64JoSah<n
z@alBM{!aQU{XJ=Y?vFRlA-^0$=4a{hPMAB_I5mhN)O5>pO}p;Zj;EH0I6g2r8z92V
zp!RInQ`N5w2ObLXoV{Rj_@R()lH_i6Ut@*?m!E7<tuHf=wLQD4>)Im0w!~x0tVEZ7
z{j~hTl}Bdgo=?h4zf>?Ny#F0;qucI%AtYNuqHW{EFTZ}DubWw+ZBlV!!aTj7h8C)-
zsxM!>IN{E4a^+Jisb<M218>b;+Y_!meq+5awd;QIw`;b)YCoQi{~!JDO?#D9?C-Rx
zi&pB_)ns1&-EOt{<BOed`L?}#>~<z?|D~LX9p_{I9lda%<k^y^ww*D2x-+iMzwy80
z#bRgOl~47nLRY@{o~Ib^cS&h+rkmE%8(*XtZs^D}ED`cjTbwy7@$}m_^WHdr(wTqP
zcivNGhQkJ3k#-CkX+Ie*1gK9-|C#HjJ@t<?+hK#$qouVUKeu@Owte#8K|+51`=?J!
zzrTx3J>I0?aXsYvG}oi7>dV}`QrFHuW8%9!^{CsC7%#v6MJulLyL2rR3VP>uBt~m}
z()tZmZ`=#p+si$RZq@3wtDpbG=+Jzcd(LOKu)HL{e~a_x2sjEX`5f{nTD?*+{=m%T
zM)g%Z37^*e-CO<r9vAPmt5*d(T~6_NEd?DspsITEJsTU_Jj>#=KR-Usn>SCs_RGZ`
zg^zEE{}5yeG<|7VsQ6Ibz0&`*zE^)uLFLm)y)t~??;T#v+iRM}blY7raOKR4=g-!1
zGn|XLx%TMgZQBdEdu=XjR9(7MAuD%Jm0!qdnSaEkw54&pdgtrE{Hfj;E}L^_SCtcs
z<Aig;b&Kj>TzD9&ef?IJ&g+vIvP*2s6#8d(e}A#juKZm|Wr#f!LuY5_>1n#m4F3N9
zpkO*N*?_0`=d;FC?(4I;)-XP}vUD#0WM}u^EGN8Q&eN;A|0d2kaMP<@pI*(n^n6-<
zXX1>#TVHSAzwcj*e)w&9KY`fadm|%*b5h^ksQVqjK0kY5`|fW_f-H`^JbrfmyR_8%
zQ|nRt+W+m0rd!*Y%LH7FcCBpV`1xkD|6lb!O&y&#PXf1X+cs_5v|6bduYUi0KEM3U
z4Mqm<>3X$~d(HRk-TSkqZg!JQlY-XLbql?;CU1zeW3aeUB{DUI(IL0iH76*eGBvS#
zNu<`~4%M@wQ(Kvoy}!k8nYPT#|FP%(@>}xfu3vds6C$F@e4t=Y^ZHe$l{H<9R4$3>
zxi98kFYG9=M0?8o7n4<XKHSVdokjQ6-O~ltv9r7Le*gTiE=m97-gdo{Z>=VJY)L-e
zx72%j-rZfIrEe5YI2?SK;h~aLd35fgB{A#Ll7sIqG`@ds)}N;PCoE(1-aoH>&EVkd
z>}~g8(z2K8J$GJy_@JlAA;g?9vBPvnt~%>>k6D~eE|GRk3bkILR*%|w3QwH#t^WJi
zQ}l+b<lU_kkJaYRXg@md^7?t56~Em7Y`T7IyL=a@z4~SD_kB0E{@`S{+BIYC&w^jq
zY`vfB$=y4AYU87t_$g1zon2jB^YTCk5C%@`S77Fd4?ceCkfxd<3xi6~$HPku+^x@d
ztxB5o#Nt+E)~6q=u9Bs^p$rL$S@AJyYgTA6HGG-V?*HQU%MTycZ89i6Ayj4%V;?;u
z<!+!if0KfTeo&ojykDyK?@Z65>fi4F{;>L||2^Kr8(L4-c5`RlI&*Zt@SInsr>>QC
zd=&1B-JAF7s_{pb#`=w~D{GzqJ+yszms?cyQ#Iey?;MMM<+;r{bH;bYI?cTTf7qv=
zj^6fxIX1VM)i`Yat}VuzZ{rrPxOTjD(c-!6t|v>j@_v{58PmT0{KJflk6RcWCLf<~
zTzYiA`gW-o+-H2>@O<$}nX=_@`o@g~S@jkSGB$sESFGe?sI%ST*uH-MpPOI%Z*wpx
z+b(Z$kC%96G3fy3&zY%HbZmY-GWoAA+91H<SmoC$R4W#J>wns9eyyup{e%7IH=i^(
zqx4_is>Z`EbhERR&8P43PDa6A`SG<WSqsg}HU*mt)oxS%Kes>r?~BLW8Jzqqj#qAP
z`PjX@H-EOO^b5`~*4(^|H4i`j$noZJoN!vK?t;du$3>N0XN}*TOK!95o8lF1Qdv{x
z9a9vMl(pp1%{?*4t9Sn_ulUj3ZI>k<)Gp1K@Iqkz5BG=L-_4t6R%iITRoC}&c;4Ss
ztqp}63g4gWb{AlIX%c#dqdM-^^#>C#Kd+t@^}@A1UG=CKL&G+`{7XLJjWgF7tX6sx
z#pP?v=2jD5fBerKFE2O$IS+$k0*c?}G}$Pdn_Zo0cD`BR!-m(IU7}T!j@)g(4Qd41
z2y!zl6RX<yukYi<Lrr(IoRf3!bN20&OnrG$_073!-`pmr@4On)*~4<{lW~H?GrK#t
zuGf3`PJQv{W5miSS%RmHg1v6G&xtvEPPX&qtJkirH7t$-pz*2i`@Q26C6+B-d%w<q
zl7eUJPs_tH?zbX$YrQ)Vx8(PZ!`A%AKd>6dTNgi_?rqM0X7)cW1{urkv9s5k=l}95
z>9lWBsPzr4`f~eq+4X(h)1SIW&)3vjp{cjx=d<sr3<=LQe&pT%bRt^v`2UVMR@ZCq
zx0<SS`qv*TzU+T~?O%<AXHM%+eLD6v{#<?iX_;?4+|zrbcHA*HUD$D0)&ABmpV^bw
z|BXMuz5X{dgX4o@asK<?ZU=csJ2P-ZJlOg4`SUq3XK&ix|54Glet+_nxjxFmb0xX=
zK1sjv;jWW&^4l*@COysmWB;RQ-lLP@YiIw`Soh({zv{X58&@dHJ5FFca_ZEog)5zI
z29`KXK5l+NSmU36+?)57^V-rbG?gx{WxBE3SdC40&QGbEM-AutPnaldUZRop-CbY_
z^Qwr8(_gz~#&@5;Tl!||&&B&iO}8*KEOBLHkgwnT;MUHTSEt+<ZtVIO<8kWw`F$3@
zp8Tukp5A-PNAu^;)7cCOIg4!bPo8*h7W3uX*61Hi@4Job85>$=>}k5=b@a3PQLz|H
zS@A8m_!%_1?tOp!cKZE!N9;=e^q+9mKDJ@IxSn)sZvL0k+g>wFm>08X?c&7e8VT}N
zU$QIW%2*jbm{{i5*f`fc+c>#>R^*G?jqh@v-<Jn9{!$VYJ&g<uHmq6XV8>oO;ef%J
zBR9JC>h8Z7eW~c(@80|OcRzQTaL`$8^46D?Vx2BEb?g7GTpzP4`r`E0L7DfHm+1N$
z=S<^gP@F!=kVo3^+`>IeO5Yw<o2a5`c0aj=m*GT8NnjoCZd=oh5z+1J4F4{-Ykqsx
z662NkS;R<kX~p!QjQh*~zx?xY_A8w;zqV&BwYcJVM<??4{)W=%XTSXAm!*GrFUoQG
z*{=G(AAhQ!ssG{6vtmNO!ifW4u34|Y-@O|=16db%Y|(SEh2EP5mfYT!cXwCnX|ahO
zEDYuE?|uFBY1N8=qxy2Y(-~BLeeloxANR&|<G)_3%vZwSu3Wn)Fym#BMav^Mp2IB5
zc7592%loKn(zon++tY5`+GSI`dU;8T(3Abo)jb#e<x^=l*!<_a$|t$nTIYW=JH9)w
zUt073=hDya@)~kQ75*)3>x1WCDZLc3@n3KC#_MJ^-xPlpxC^8tY}~y0ai*j1++Tm>
zLX|p0WPW})bj(+JiY!MHPr~bKYj5u;T)b_Y8AFe}{k^kiedj)V&)efN|LV+3bxtMo
zLX@Ka?b=_%ec0gQ!$?MMo142O+IS_?s=nrc?)&r;_#emJ`dEVD4zH)YX&p!Or~ls-
znUp)OeP6ZH^U;HxLzka09Oz+<v#PTB=D=`(bIx7eSAN&tIOKCnGcy>NT$6kFyg}H4
z!D9F9?AKYFj@JEW5I@SjvB$UcPR+bev1VFNlsOi${o7Yyw%z8>kE3sYx=M=p+Wuu&
zGI!Rlt`j%9)z|0zPx~#Nbvd~~!Rz4j&*u5}boTEqeI2ICcKJ11gzb-&vA?H2<(1!G
z_U3f_yzerZ+GljGU%dS1Q}gEdwf4JzKUodR6VHyS#Md8>-xhb?N0YavaLe4q3BPL2
zZ&~u_2>VZlgoHEo4@>_$?{EA6ulB^g&+B8Yeg^1F6MGVN)a}`sc%z_%WxpTY;%xuk
za@_4%*tBc^Yx8T<yiVS9zUbSl%iZKA%C-8KU)i>8#<N6U%$*!qmK49_e8%qJ#P`Qt
zpFVpY(iY=0>-(RM$i{nu=9f=(zwWzR^ZVV}FK4C%)hhp6<M4iU`Xj~%GZ##Zijw;7
zY%Kr%R-n6GlftWmSFSwy)4Ew{V#as<>ThpuW+i5Q{*pYUk&%r#RHi35V2X9>t0(X4
zZasMUbmf}}0T<Z~uC)viyGmACP5sQs@H!=U$Et}ZQ~YOaU4Qhs)y`SlJC@GWT>9pS
z&!i)=v1b_-)c5x6bqa5G_fi#!ZkX<+DRbO_=P;*_)<T8@9t(1xrvwE?&7U9aImx0e
z5xQ*d*u1l6y!J2Jvd>lLaRF!9DZ7&gMg2J#s@P`T+BM6y@~TSbWfNzC9U)$YJ6cw@
z#s$Xl{<dxSBYD#@TlU}cjJXr{zq{IRS114Vl?Hbk@0EHTkM^dfraoEgwtusg`aidv
zPf0OwwwHL7_3O(^^Za{0K0aSQd<ZDh*_)a0T<_*h%T?QY^42GF|J)v+7=JTh(fYK2
zMg2CCr=CyXTPV*{TKeV1#njW&JeLNUu3o{nMDFjmUAEcv4i2(EIY74{D*R2jv!n3x
zGT-3MI`V8W{dLv0@owR!3;RH|5R2o4e~Ibo-_IDIx2fIVn3fR!<>{4`Tl%?Rdfn6}
z*M2>^eSXcK$eNm_P024)UtKG+xv=|Np!>d4PPV_Y*uK6{_HT>YI1%KQugd<ir5?w%
zo_$-xy7;^7jm2iRHd#Rzr%UfxTFV(5u3_E9^|SWX^ZE7XPM!=b69KzVLq7V1ymgY=
z`m$Ye$61eCFxfo#Hd8B`+kLC%+ts-fix{SUlWbczQLUi&bD-jW|BEKJNk=+-XPcF-
z=j0Fla<$V#<<hllal1-hUR>-xRhE0vqJW2DF9m)b43PHs5Xp2~Wwx}oboGnVyi+di
zYgwngsBizzlRhCQ-e+6%9Y1<><<q5R9^rHC>*W~kRXpZRWe0`Wm+fY)f4*6-2+oZE
z+dV}q`c^vkPn*eyZYLhh+Qu_mD?#Gfxw+PchK93d&3b&i|NEy;TKf9?Ykz;+ka&2{
zo;_XN-TC+T*%m!HF=^7I6)RSpoUH!)*Dp0y)!3ayN3UKjeRpSP&RMs>cG22}0W&5|
z0v(k1uPV~xy@9#8xuKz_hr|u}`yTU?>{+hluQ0phyke34g;Gu3kmgJKZiRh$8nStd
z{=(N@51&*^KTk<pzCdTc{+qkIzdt)W`~BYU_f`ZhE(3KHmiy0-+nN;`6ePqTV_5{6
zLb$gf(K#bS!}s#PfB&S-^ZtB3Z_mraGfg+T?8AeD%jd;wh_JD;-n@PL^~;xEe|9@o
z`3D6B1q1|SX1;WnuU+ycLSU-0P-ofOTU$$B2K}7>ONKA~)D+F=Z8?HmtzNvmjuYlp
zWhw5rHPv{#y52S3&(-U9j^h0*o+ZjpCOIesB&od8H88kv@L=NWYinir)NO6=-n=Qv
zP*YQLZEf`Snx91s8#ZtL{h*ouUd?A;hJxZ^Y16DL^Xva{GH8dbnc%hbZS?k=U3IRm
zu0B3z9v*J*m$hbNFf%i|y)F0k^XY9R{-vc~-|zoFZ^jG`hW!11zg=4!{j+A@re>!Q
zkD#DSTQV=7I(=Gx`{8qQt*@_%G<H~B<&p0w`j>H4yXS)gx^MZHL{xX^zOCQ<wtfD-
z|A!l9c|D5yE8pC*ZuOycb$cIoU(Jqt`9EDgBy3&G&pXBE-`?L}e``yocKEs!;o2sJ
zC)N{GH2>?R-q?`XwSDoTMOHTI))N8?z3b}!ZAv};OQB|o|BRV4-`?5z`RVj{H%+@m
z9%_@<MsI)je13i1r@Z{VU$5ow|6BI@nr_Hq#|exsYLov?{_U%7dH2lUf*$1qOnLK9
zZrt~-!t}?U?c2lOv)wFb3tYtS73&rrccP!C(|y0nuY+%HZa#hbw6l|w-y93W{Cj&Q
zO%if;K79P`ni~`E@3W47_u}GWc78b@UtinucXvRCjwIaJkQlx`?(N+Z6ZbXWdNP6U
z?aj^4S4P@tTUu70nxa`)SjfD3NxMSxv^^8_ADnqzxqBDi@kX&|_8<E44om+s3M8$6
z{U0=#{e3@ZTIIC<{yFyb|K?a0H#Ilk>=khh6uJ5^ch<6}$4_nF?mlTrI|v-#Rr-40
z|9`)GrOm}eMSuSM`Ss>&2Z1H|oUMnp->dR2?4CC5TK4+AX^DxAi8H27o!Zyu=jC+@
z6sHp>GBTVzd9wQ3o5bD!1Xuzi_XeHF&p$Br+tvR`clb6g{ad~9`jKDeua>N={qDl!
z9Pa(-$2ZTHH$Q5ee(!Idcjw24!~Eyx+y6hvE}wIE*VPLbK3tElKYQ||W#OYEe}8|k
z|MT(qq)C&U+xeC*TP9~;XJcme?bg<8^Za`${k`4Y)+H}4Og?}9`Df4t87o6ptzLcm
z`+7FV3Hyxl@7WyP9lYFcZ{cG%C#OTdzP`5q@t|4NdzwzvmJ?^r<h;1B@Kf!*s@J+D
zxq3}2HobW>NAcU?y1Qap3D3T|+J?73UZ6iu{=xp5qulFHrEH3`uh*Ay5r16f@sNMt
zJ^i=a#XjwKZLLwA;GvS4nc3Uho0pgOCSlIAXK8xVy#qxK8<_ZR-fqaVSffkDvutr&
zTU&_M(ZU$D$(b1$8uJ8nXS6E3a@P>Kb^G?|_qT4`u&Mb`@bAyhi4!Mw?e?8%v~<A&
z1!LpjeW}mS&0Vp=-eO^QVQ9?!XQgjVJ&KpyDqIzF%Y7%egFMd@$Hk>r_`SXey8MmV
zS(JKij^(G_yUX9p873WhadGkdst1!)y>G?L>gN&CxEP-5HFN!nN6eLMnXmn%_gZJq
zpF44X<?&BHj%ZAIs?5=}VhuaLoW?y_)2xuHs;YE8o4P+0_gz{PJjzRw-RklKKSuu6
zxR`%cJN7rIe;|;;;OXZVwkJC)>(<Yv7*|(Ud63%aUrXKV(pThMxAXe)f3Z4jxIE(4
zlCPSYntFQwSF-xeG<tekfB&B1=jXQHue<#$f|<G5uAkp=f_hMr;(pt!I&T+md)!yL
z@+^1h6MnW8?(&XT&R<;YE_!`W^xmqk`TPGqd;WZRg`r+s;@7WVv#+hOEPB#Wvv~FD
z*Nffzf0>54m@bg3y}EEp-=A{<E7#SATznt#-1|4Exy)hYP+3u-aqsWre*1N?ySL@v
zw^LVF|LJD7G<)-&V_PyW|5A5ial940(y6XmEA*DT>#5}xhwgW;m|(wRL6=?A3i*j1
zOV+MkyQ5X1WBa|T*MGm?-(U4LtEQ&L*|~Z4?Au2=h40sXzx(1v#?QRz`tkE@tIPHu
z@79oC^+J2@DX~wtgIh1zor;~e?(obt8E*d)nuTgv0=;*az0KNeq{omTk(QbH^2LjY
z;NZzqr>Y8dipZCim-lyf2mdnv)Dg76CBE}lB`6l&t*M=|yJXrQeUI2nlA@p36{oyV
z?ueRnGQ~Lk91kbw%Rh=cckV1JE2|X~Ty!a5(R!VaA34vT;g%6-{qt=~#4UH*UvpL8
z-}2A>Az1nZ6zS}fRCaIqa`oI?YtY!sUr)8kYipivZSXw5GR?g%U1MXmyr|~xoa^gi
zGoF5S<OuyD=+YY+5~35k>&wZ~+D3;D&*#@Ky7tGBFZ9dr$eNl%OFDzMEM3f=(RJVL
z|MYKx?=G1d&Fne+aDjQQfK#Vk(~7-jm(4_VBR4(ixBvIx^UuFBLW{Bj7TwQJF}itb
z`t=x#;?pfN3>&OISueKV4c6}I={axSycLecVEsI7Ml;uJ*kE8}H0kV*ei_S04<9~!
z@Sq{6rlnQr?>|BL`48Tkd-hA-{_JGem&`r=H=kshm%xsFit$Pl=UNr$e{`%{f8=H^
zXr<Lo@9P^rOZLfF3W<m;c@r_Au2ra(MKUD7uDyigZ^9STZ4>IhzSmIBG3qO<sxY%<
zUOU%4-mcu@*PV$HWv4$Fe!I=Tr{JT@n?B#^)iOE$U!61MpX$XbOg_10?OJbdZ(Cbi
zVWE)J!sI3O3tZ$K**dku*Rim$6j;bGBuG4acXzjQJD=-iaRD)}FTX=-Y7VVwNVn*<
zvyy3#vwV2Hy7^W1?Co_Geua;JWFD@w-u!Cof&0pN%f6o4{KX}H`nQW$=IU8geoD#A
z)MQXmQ@gjfI{fBC1&$_#z3aDayLRi=ti5laKHXaOHfqXKWsmsDCsVZJDohX5@7z~W
zm!JAm%#7{xJo&=6IW@E23YuU3v`JfxrB}uC&h6`Y_dYA%c)Luj>hnDL#N7NN_nsDX
zToj%gw#TsW&69<1#H86DA6?&b_1e?3aZikE_pyIz+b4ITS?I6ck7u*<pKQOrE_U@1
zj|p|klTXgu#p)<fx~bx0(za#Hpi$f1<?qAtY&aHud-Pa%jjl}o{FOov7;W>fPb@Cm
z&d_jZ&#G_ysmrHZR!8iph+Ov<+lYq1jF<0hx9{4t=HH8Z9aG=?)ct(xS;ZE0ey>T|
z<388-b#~Stj$XX{y!u<%9EJsl3onSD=l>AD?@?=bwfR|x&bsuwd#kUXJ*#VOF3zB&
zq;x~~6d%{i;=sT_M@L7eg#rvNN*AZ;MsLfzyXwsX0hX7}DxP`w_RQS-_T|f$&z~>9
zQz78e`_)x3{@j5Meg>;uv);<DTAMe?YsHcqP1?&J-_R9tegFGoS#IfTqZ{jM4Rno{
znpm&((OT;Fx70r4>yKTtmfhcWpQWMwdvW-=`<s(LPrcW>t>5c+2J8ECpT2#wtNNl*
zef#`*eMQBEixxTUR8;(X;Qaagx3{)_`}U1t!P>RF486U*r}(%WC+yprcXwB>v^mp(
zZMnCn$Z|KW(5-ae*C2dB{P}rLeRhW53)ODEOwE-u+I*o}B%Xu8NOI|pxr?IK@B1K=
zdHIe?<?qWglQ#CKd|Y8Ylffa_gyG2D^Q;Y%nr7|mh-`oC(7l%V&-CwM*X>rlC=dI6
zGiyb5@q~askLo@@JDYJzu4#p>-TeI}FM}9nSQIYWl<X*AdS!WQ&CV}R9-aEs_B>AN
za@uaO`L7?PRwl)(R8Lpn{OSC}e)~?Tl(4Lq=i}pU@BaJj-TG$x*lMSJ{J!7cF1@ig
z`j&gAU6W1g{Q2{jr)O*5+g18{iZoA?!r$a~cXrO3H}3_1HOtG=+A9<9#}!XbdENf}
zn7{P4f}QIheY<|m-+qU+&Cf)}-Tlp*IsGRyGZ>3iynOMoK!&;D#fLYXjCxgUYjf>o
z^cWc|8c+Y<zy533b-S#)juV#O-j;iNj%D$^y5G59qCr`+@bNKLHa0D5E|x%TF5^$n
zAJ4J#`S^6*eD8|2iSL)+W>!C6)VpgkD?^`N8vpyJaW;ad-w8<1jE;=@|9$V*nVPEU
z{I2Gv+jKajLN(U>O1=G6@tm4^-v08}UPgV%ht_murwfPeu@q#8tE|3s^YF!$oUXO9
zHhqOG5eMEHTVA^^yW2KfzL)L2k%@n;z^WB13=9o-*8KeR=H}+9vfNEyv=;_cDF2wY
zX>mZ`qeV*G-rlM13t61ot$y{&UthkulrJWuuWtL-Up;^HB%fveyu46!=E|kN>v#SA
z5V!7;vr6ae$d}<$u5Ir~mC<ty=3xL$#7*1Q)^_aH%acbZiAnY)tF%w>(wKCF(Lrme
zRn4M(7bZvk)<}PAH01@q-?L}WIy*aG9O6ltFyUlMxw2CD`nt164%|C@bN=b4n$}87
z{--=SvXp!AHOOl47ujdbtbD$>DqRFEa5||zf5HAft1G*^@0K+$6DxoCDR62kZ`{6Z
zlhb!Tw2&({xBeV>^5EU_U-ryB%xSQ-05kGl-!s|;b3pXAoS%O_pPwqr+Vq8erq45@
zGj~rOyMDZuX?k<epMxEXRxX<KCOfgcZ@$fw_x5o&AFh~S)@e8UQU0ABg`c0DeNpbx
zJ|+6Z`w6|x6R&IRzL4E7_3Fr}zNOi_0&lrnW=~(}QZLZe??1z$@KgEyocO)ZL_t$Z
zwR$>V&Y4I5lX!bso%#I)Mwcrg^XF8*J++nl6rW4$hR(Xm%1R%fGhbg{umATmz3lhD
zzrRgQOr}W9I<;}rrd!{CJF1F(x*9s&3l@r6pY&yT6KeMA+y!^Egt8tuUYR}l@rI+D
z?H#t(urTP||Mj=%L*|!->c`c7&6_u`v$OM5pX=4LvrM($lr51oobSG1{``AK3`!!s
zXY7^M*ZFfSc=qdnbGK48F3Q{7s(+}l@b#(<tK;i`vueFne&wYhvhTy6TbYlWr^s?F
z68h9_)Uzh_eqDPQOTKFUUBOP5j~_qoE_-WL_s4=^j#X*alM@sFinUFhdbMGPoP&yx
zt#Nr_R?Jd4TfV~=Jif<WxN5`lbWLoV(BFd(IK%l2d194)9hTO*#Qxn^ULWH!bLD}k
zn~h&AXD!qORq<NZ0-@h8|0`detu<A)byY^a;kp2gKTjt6%h^^<nQ-Cq*4`^ucWxGs
ztN!XMds5}9&fDy)!r8M`PW3%{xodjef;n4H2P|6u&8qmR0LUk=zVH1l?|NPGMd_>U
z9-cc53{5xf+$m_lbG&e-kJn|9>8EGg*QUlFzv=uvX}zmU{2Y^aHv{8>r^<G(y8Y!a
z_lxcG?mRx0&DHAE=+Mw6V%wKB?OVFem#W8)B?A*@#;>)%{!Fobp_=kB%Q?S3*Zp3+
zL+Z(wpK^=UEv{ZSll`f?Xvv0c@=kBdt}WDhZ`!n?>74$lvq!(4N%(l|J70Bm-?|km
zUTo(ObXhuM_Klxa{@wnZ<<hUL>wleMH4ZyJW6PSAI~{Kp+TOh(Xxz(lW{T|5$tO}S
zt=RG4*Rff8vZ2A@bx-bm+Z_Jg=2Qn)zmxdIZ}QgG)>EF^GtNK1zw-B|b$_L`P8uh9
zh1O-p*-!tVptSpNd(7Uo&-CB!5YK)UQ_h{;T)j|o-r}78I~CF0_qX5YGUAEV?R<P&
zeQEmf^2OUaglbtbuU>WCX~<*#<X1<L?VR?C_jfn%msfHT5Iu7F0W(9NFhj%R9enZi
zOP(KCF)?|E*MGJgfva(QYdLmBc&*Q0Q(1S<dY<0ntk+t$u@@tJzN$|?8MZdcH2c~b
z(DCE<_UzoaG4Q6K?a4#w&!3Aexz)dF)lnshwy-h_hW|P}SMM#I%pX5v<LblhTt%zv
z{y)5S)%fG<c*~ruh3U^zE|ov@e6cIYVkfxUvEp4RH-Ce+rNEN)UsD3}^wy;x)4BKK
z-ov}Q>z!kNa|A`rd!F%}k%8y%6VYX&Q=b-itm{1*U@RQ{lkaBbNvm7G`pV)|PM*|1
zwIK7<ksDf?rbRoBtL&SWms^{f_fNTV%h9`)Jn`P<hNhF2X|hRJYm4ujc5ZP`29JSo
zvNm^cwWR84eJ}mBC(KQ^NhQ5LXy8+t8|n8?xj!-4xLBBDPJ!&J+jfWkJnGqVs6<%V
zd*&Pa*qv9mK0S2k%Cl!~(%$LW-0nxiRrqHpbnH1)(xlLSW0x^ca9rq&+4CR0HlDli
z<)Te<X5A`suU<c;M}tZI?i}~W5)&s$URGH3u}F6P;p^$=uc@VVZdtm(B3Ns3#4IbD
zQyqs4&Rjm~KlwO2Lz4ny!{Lh=V%;W{H7i4ubbNI6PMaEUl+Aj7)@%ZUgL86j)-~p~
zg>&ER<^AfrMt4q^cd^&$&s$7Ne?;x_uPr^{Fn#vy-Gz^jb#-+~o9CUGYaJdP9eq>K
zmNoj;``7DgV{6Ygq}zPu*}_${`cVE7PgSGu56!N9a})PJ!ql*`b>8~@$u(OxC~WV#
zd;dU({qvm<E&5_@rQ-vm`~`Nb-oAA5>Yq2AFMhfm?sr_buJTRui8)W&S>FWut$ViA
zb*tpbqqQG}p2+^3sQA&=Q#WMSyheq;3s$%O`4*5V@2It^tLt=8@hADa)fK&Wg=SY+
ztN*`v<Kbo<AK4qdCeG~lEyIE)rl&rf5j{cbyM|B11Sy#^6D_?Tk9z;|3+0=3yH4B~
zzW8xo1&?%kQp(onAC{j@nz;7rhSl5oy_V{-RWa$cFJF03U+1Km@y50JYb<M?N$2X?
z#=n1Ao~(Djcjq0QydK|OwU$rLPw1G;KiMhRDESu4O(ntj9UJ|1@-}TQ5)@k|I`!EJ
z`Kl>`wcih_`itB5Cnn!CE|DnMX7KXWTj$6_E(|NOS9Eo8?-Q$<kvN0!{t?YtOby=*
zpNlSIy>BU2_CDuH^XXYObw#)SHZR|9$a7goto5EXH^cMw|Lcq&u`tZpwWs^^!<VnQ
z&c*#SHGRz}T^3Umac8mhGqr6-URAblI2dB~mIhq8lc2Ssvx}RL&-zzOcsq}RudlCp
z{=Gc~51l+cPx{;c-I9HM-K|^K_7$kBt8a{uk(BflXqh^7>YoX_cI`Uc&R_riZu#@`
z^OtLQc{bXI&7bzIa@HLCe|5TFvQBNZS5iM)WW4!G`NvH$zxOwY$9-pKXgcs*Pj27a
z?MtU^YkTvL&)N4{jYX{5Vzu*S*5W(QU5KbYVQ@M0y?^Z2e<2JB`TPF`9(Xoi{Cup<
zox97w`kD!4?BAYwZWZhPlPP=uUu~JOO2F&e_azhb+l6XVKD?@NuS;LBt~SMB^(swG
zt+SdsC-X9L&f0JKJSoLU^YDeRXU>0WpEEn8oJo~YueqakBg)GEbN#(bIVS?x^Vy@f
z@A`Er^?cn1tqfzwNe2_%|JFR8q;mY;vC!t#GpBuZ@IQXxcCJ%e-fNr5pH?mMd@S}z
zLQbyq-jN%(j@;-{Iq^_#^5Vz&8JVwqB>wU++=#GRU-9lSXv+lWr&DY9-%#JWtzeF!
z;fZ5K8oOhaMC12tJfHt0W|Bf_DNnk8t)b1Yq{`61-wm<tzfSdEx^61>*tmIbZYohb
zX}0v=JbCZ*#dDKYb}|Y#?}<6i?h_LgG*3Ni-SsCQZ<^~CoV!(dIgYWRq0>8e?VP<a
zfA_>3=jIM#RM>B!toQR=%f-)Yb?5wXJNL2dD|^Gm!|4{*KP+xm`^xMNh?w!KCH#82
zJ-5gE-Nnz(vCG$NsQmow?d|Q-Qc`l(WjU{|tbD_Iu>RlA=RZF`x3#rhym;|)|M}<g
zeEj|SxwyDEI3jkJy}e)m-!}J_$;yybZ^SQ#-7kF`eOo&6wsdwz(JZOxvYcHpVL{VH
zq6?mu$o$rDz4*IsPi(aAr1$z$gKpdX`u#(G;_CT#wWkJrp5Aw+BBbb@NA}W&y}5Zy
z{~tc)eR|pZJ+-E-cmMtDbDh7&a@OR)d)*V684h1q`slV5-^)tY$h}5ynYX@EXr5BD
zrLW;~_UZb6!MD~I%RTC4`=ro(%Ha4!=bXEY2Y$@gj;Xz)K5y3+<9C5GntNyW|5izM
z{@gRCLjF7Fo5eN0viq(YFu*qJ=kANE@{{R%IMHyrrHo$tl?@vU9%a8|JfQJDbHB`w
z6}z^@_+RH}xOnXna|8NT{;9Uo3=z>5j1BwNZA@z6Ih?{N+`ij?QvSgOTYoRzvnk-t
zr6sF#58T^oRIb9YX@|-3!wolA3r3w^aN%ixa*J8~eCHy@12+yZG2A%m3f@NKv2@b$
zqdmzx_N{BkJ!&X?gUP|$+xWMXXy;L1^F#g#3{$TjeRF%#)Y%ye{^u8O=)Ua1@L+<}
z!tdw2mgpvJToI{Lb!fG*;ifld>LXo5&&;tjHZd_#QcC*$?X5(crIl5mwE4P4iw+$*
zl5%H9p`V|hMBC1tJ0&G0uU@$#Atkl%^EvBoaeXsGL&k==*5y&r(eH0>&p$iM^i-X!
zY{ZW@e;Oo%=g-`2VXC)xJKLuxX;akg&+z-*nIJN|-dyGH`PhXF3X}gn&*ts=_5GE2
zC3Am>lj@NtFJF9OXb8K}xNOFvJ+C%BvSL`Fv6h`7n0xP<E0?}JnKaLRwTDmWlpyi4
zKVO{npYdy4bZ478ujENN+pAmdY{u6Y?pw61N=CiSs$zZp-|2JyOmTntz5nmuzq_uN
zZS|P-T58oTd8K^w<tah479Q`LvGnYJ|5@2N33f-$J$6j$*t&D_>fr3#wy^#E>lO=_
z&C$MKvQ(mB#mcyk7uf=JXU}>pvF_l*ml@JFdI__ZJuxi#qnD7&T$Oc3R{lr-oj+5G
zuh&)oJ-T+5P2G*Z`?XhlGdSG26cYY_{>N{Np0(ZQ%Z-rxv9NVzZCqg0vJdx{M&I7Q
z>-e#T6)KZd-oANrqh9CUy?YD+@$vadNlB@xTZ^BcYieSWm6hc=ylVC8uV23&K79Co
z^?TcI4!OCx@$vUxyvVrf^JO9bu5YPERaXz~{pP18oW4u1I@cz=`Om-4-V6>C{{Nfm
z_pf;O*)t{kwz)lO{`2kml9&Hu#NxwZ#H-#0@;?qaVo)M0muWX;N4@Rl^2=;jb~W?p
z*}gyVp6ANeejd5Elkc{lOkA|=*MyGX7{2@)6CQG>ue<mli|K$sbpMSd0o%^#95*m=
z-d?sND$?Si#l#t6KhHb&_*}b{|KPQ)t)AtYMY~SixG?8#5^M{XRdUPS$+_R&Zg?tw
z*q}Q5`idP1+jhhS%n7|8arj+kQqIz)D<@BqJo_#(I)3HCg{ip@uOuFb>2vekIe}MS
z&ywe#<jQjfTmDqu40q9PIcWD~$Bf%7XFz+l`j|l}pW%tvk{7Qe{>|U}yDxuLmOMk<
zyR&(>mR0A!Sk@hMN^3LE#vB$#(ZGPfi{XN<fh_T^A4NZ^uh1|O(P(OT6C1UlIp~F4
zN&7pqyP300c0T@o{Ak4OATQ6^YPI|7KY052y|d+&^`B?+-I8fvz{;RI`n%f&dIh8&
zJyO@(9Ud0Bpe||a5|@QjX3xHL!DMdyoMR<#DsO~e|EbEf%jxeu2}P6QXFgNCzV843
zH~;am-XHhn4KJF+M*j5Qbo0iI8|Tig+aLaOhDpTM_u_9%3fue(>(2g@HDs^bbMV;)
z0jE!4OJ^?^jX&VX;X7YCLFLh7i#CBrA8)!TF@APYH|JhDX-A<YyJE{`1F_c!U*G&^
z)_gpjy|3hANU|@h=E_w0|4F~4%O^cHohOr$duxm5X7?-Av(59{#C^pDSvDs9)Sh3r
z;c(BKgXxhrzc~GST0inmJm2~`oKNm=;lV>YFC<C6XnC?*bJ8cXWgkx~n|i*^SDUwL
zg<jr7)2ZR2PoJnSO*@`;r+dCZR-VtH&RuO<Q@tw9m8)hv&q!zYXWzZ>`{|<mJ64)g
zO;et#742-g^{eYi&x~KkvSg0G&29UzgUML<wYOorR`!vrlP0bC<6@m1Zg-wRF(oT$
z>KsAg2e#J^y>Z-=l>ay^W|D0E^O)q~+`7W3$y?63q)663ukoyu^PJS?B&_T_nQwLJ
zrtdyy_f=~D47&K&$L_wv#cNT~@rh|kxoJtcsSgXjJ`)t{UK^qrWR&kC`+v=e6MH^4
z&E#%+{BF+P@Ph3-RBoTGjPR=y5{|v=xj!s6I!VDm>;rF}YW%7-f{!gu-#Rq$@Uwd!
zHm;LeT4%1^o$b(Ws(mY^{POy%=GP=7XGP7t9V~LvWdHW9MTSDNo`|U2J=+ns>Q<Wt
zfA{|4bua4DRy!Sg`r-ZbyPG$cm6m={)O_@3>-||vN{=qJ>^&=FzC3Z}ccDw0l3z<_
z>zsMB>9f#TpEYmS#P0s{s_LJv;N%bDf361K-cxDpwBmpK1nuy3CMG62F*^hlT?CGZ
z$Jcy(Haow|Wzkga@O81f%T7#CoURvZRq)`zEYoZq9i2yy9~T!DP1B3*5?G}1YV&!!
z+gmaxZ{1pIzy4=o;m$kaaWT)HCDwj<V<wh(^jP&z_sfT`f4h6u|8&%?Hr{d`si(j0
zKKsnIbJfByv5!6%9!)>i(kDM_W{g$huI&dJX3vf^G&*CeaHR58PW}D__h|RaYvt!D
zah^JS{oBs#hiaH*pBSaicG~*ps=<8)_EhOWwRPE3H3gme^q$>+Q~mGO&NH`Wsoyed
zS+-Km=A5m>?$YPKPE1tvFIv&w=o=?5{ibJich#nwx%V4$OB(qq*UT;S>{_BR>1fhr
z(43=dutnSEh#Z;YoRe0pT_3PYB<vZV&xSsMB&!6k)ZS;y%-o!WMHe11lsQ~5NyTCg
z`%c59tJX#ZW#y#YQk0mgono_&AwOKq|8hz4W|wQXa&liDNi5dvQqpWXniMS3Dv-2!
z*9zaI8LO5q6+B#^>@3_A@X(@rk!D)j?4Y>V=qv>TBjL#H=X<urf4Hw5aw2NBtD9KI
z$>Yi{mqpqhTC`18Y1|xP;`&fW%u`55O!|01Q$V6bn?X<OW~()ke+678%9u@GmN`kq
zfCs!ku4~y6-QHtu%Ou(~Z$(Y@YTY<d(o;yHZS{2B$=>Vl*$CO?310S@tPpZmmsd@x
zn|;1<fXM8#pz_6egK=Ip|82?b{;@lYQvd$?%FD|eU;p>(p;m5Du2u(yiqB`w?f?CF
ze06pB@uNpwU0ihH_thL~;e35<?e9OI&!0YZN=ZrS(BZ?+&(D{am3{mC`SCr@7exK{
z^{(5wbYb`I(AeIPm=EVu_vM)7Jx)+snUxnTAfwm4^3d~-H@SA6I(Bf$!Z5Y`&{gS4
z5^j@3+D|KScI`a-Yy*er%5@J97Oru&J^wgpf{>>9v*+>U=Vsgg_UyZC+Yu=*&GKv4
z(pcAjOZKh4TB%a%9JAsUJM*1n)?W^<qf&gYKk7F%y>4q>AN#wDkGIKTzwKI<U%9!t
z7JbPQZUQXx&o9r6S{d@l;vCPt{q^^+U7L3NvF21Sp2HS0d~JzZQ?-nZg%zK?eS7x#
z=ikL!XI;9!_uJNvl_$RQZL%o+mJwfni{JE@!~C!Qu66znSM3-U=!<k*=H+!^v3xK~
zor(9+#|jy~_Oofmiq>t3XE?f#9xA+Z_3G5~&yAa7^rly8A9`5O1O_E0r`(x~q+@#%
zv_6%;yIWxTE5`oH7pJ0M8y(%^)p;hk)TK|j#m+2~@}-p9Qz+MKXXAkt@BJ7h|9;yt
z>7x9TFKS!w&+n`;%~;R*B_RIGiR)7iUdx`Z(6Qsjk3D;u-2GYK&WN7jJKs)J?*Uu?
zk)(~kO-`{py#BT5dform^Sl0>Q?UGdLt(M~1l}7ib?H^}Z%sd$GTXei@Xh(;xV*(S
zcbc~Bm626mslC7O_mL}^!FK<iD4UyK|7T;G^2L#T!o_@kqhC==7O$*btMcipLRxK(
zzzhC}Te)j5TmQN>;dy<0{_Wqd8x0SqTi>kCsMfVwv(U51{4v+jNym=ff3tlu-!_N;
zb(QP3wl3bKKf%o-wfB{nZEVo0TdP!6mnp60i*7Expf#PZCC8TK*IUO0>tp@zO;|oZ
zQ+wk2Wz6dZ8TwrWj(mC^?#Eqy&c!ggeNoMkoW<Q@wZG0Cbod|8>GJ7?`U|Eeg}NI*
zFK^y_uUX?i=gcmh!^d?^pWIrye5rkv*^8;0!@qCUe0tX>V3o+%-mA7YvtksjYqF}}
zyfwai#`9dq&;7RV@9n95wwzgh>GLDy#-DHOlwW^LZmGuKojigK>PK=G?=F7d7WJ)=
z)pEiAj7uh0JC5#ZyCORMS%&s0cYznowgv@JufO#DGks!N|Ig{e2FCKzmUo}ztX}PY
zUzSlV`fKg(byH4CUQeEU?%NX$6<0ay?Uzs9OFnkwxs}Zlr70iF_3vo=EYn!EC~D8I
zR$cGs`*v4cyDgr~cgbY#)bih9pH#n^9mwiV-yf^2xwl67)5d)g3}5aY$UkxU{Myo8
zjE!~|5_io$@!n^C(C_zup4+ZpczEkxuD^*|oA#7^T;-#7`J2<PnA+st9dF{2i*tjb
zLV|9Ey3YRd{^P47Q%=9M{HW#BDX=KhN?U(p=)FTWv!Z9{Wap}B8tGd5t;`Cxe_B`h
z?y%nxpFUr!=-}`^0jCZ(jzE#p^$+rLF5NtH$7Pa=fRl*t($wQqr##=b&Fk`}$EUQo
zXD%<Fck;xZ^6t|Q`#I;`+&ACWb7Hx1Qkm?H3rg7~n~IMY+9>^Tb!HZHI&t8DhhDy-
z=B1+tS8v=|cD<2TGt&Il^Y@i8|C*NH*U<3O*E(5sNnD)auTetqZ)TN=>)9IZE`;uy
zcjCQ|ebDcujTI|`6{as<J$E+yGD+ci_Ek@2Yzx2m+)MkDzMH&7#h>h^08`WJOH+<1
zv=ns*{j>Ng+qc>4RPlG2duxI;4SBM&)>%t$?O*nC&!Q_ote>+oIg6e1I@zPCcQ%c$
z)cUJe>ee5L>Q;6Cj$i7s37#10^XH>jq_FXf2{n!}(~>h3PMz|$DSW7&wjoq+>dB=d
zzFSW%UA6zdYl)?>Vu`wLR>_CpR~qvdtz5I`NIYNelq*x$M|}CX<)im4@jJmLrIu<&
z1ve_px^+zq<{1{={FH9DYK_?cqKxFSx=FiO<{W?8-g?e&N3|pKdVPkf^aV@5vHK~-
z^WMs4x_f!u)^j;?K1(R>n?C>UoTZ9xN_MW7e0kTZJv;R3(=lQ8{O~CzUyfSw@>HIV
zll^}C-0M?jk1lThf9$BM*_TEB_bq=s?zhigs(8Nqe(iVAQkOZFm+#!UbNzbxmlqfN
zt67|xKktjUk&u>>;U%zSTlhu!tk>H2D?VxmPZV|PSfnv)+4<PJ+jH(&WqZ4~T$rC;
zu9AMNh0Rx5)aLQ`<apI(G5h9LJ>B{9bpek%2kUQtKfnHOCESZLw6+`kT$*lPR>|dA
z>ssr4)%bjEU*e3_i_c%TUz@flt5ogY{pvT@<l~h+n~o;+^UYISsl9n?87C)4xctJ?
zGdULCYU5(Rz3^4$N6+U%!RyyVeAzg&GxT}togJlJ=gm7f;up#p8kx+r{MovzZB?zi
zeSXfQ9!bN=lHUuscS#g~;Ea!8_#!&_*7YjqdF*RTopk)>o|RNkv|~2<<#61_Q|W)4
z+tG)23qMcm-BV(ed;8et=xcvd-{*XL{<Zv!4$tqTm0@PbxaaYkn%2LOuh3ogZK_wQ
zhsTM7&Fs89JZH|Hb?=qBIzOHLz|Di*ou34qEc(nnUx&0z0<rVX)m@z=)FROL@N?Rp
zs;9>uE=UwU<FjU_``-3GjrDq2)2>aQ_B?u)wauFMy-T*8xpZe<=M`R-wpVr5y=Nz_
z-srCEU-$d=M*Yy1ppV~0cjbCjw)?NxHOF%ji<3m(|Igv3B|pAQWPCVLef!eqM*`;-
z^+xX8uGSlQ;!xx(!LDUNoAc!Cw$@(xAgRo}eARK*8b!}ZuU4rrIHce5eanBqWuFww
zFNgGuB})4@#<dA3d2%VL<cI$IaWz%gcwzp8W;O9&=7o(ZZV#rt>RNWscJKRD-#jOQ
z7S6o8yZdR;&qikUZFzTR&HlY$*38pStE#Gw9Xn=bZoYfhu2tOv9+PZpe|_10zixN^
z|9{V(rSa;qHGH!wnf#=n!fUBhEW7_CExqsqcl7j5ib+PNJXaN}w?CCu%v5tIXj9&j
z=SNt1rT=dT{!qcTwn(#h_9BgCPyM{JFE>7px4vC{ZuZAl+}zi<*H6B%u=mm7v`rB?
zJPXa1KAL}Y^UlPDo8u!sIMx;Zns<2i`{{pQ&uT1GPB)zTi>EO2+&ky_V$;*~<9|Hd
zF@eME_k10<*+J)$Htv*(GhZ*w;GiA)n|ZC$eq)X=jd>SBT<hAO9cOdW^9=fVGn7M7
z=D3>e)7^i1Ig6*aarDal@ijFQ)QOS%^{HOXclKj_g9l}DiJLzjn5ef|jNSP2+P5y7
z#n`QP%~Eceb4N#PugR?oJHB6iRXgR@`I9Ga?kauFE?@KE<8k@zTem)a_Kc04Jv=N-
zsb$mV&Gx@uD66Zhw*+KlXc(^u&`?rRdh_<}{kq?8w{0_vkH7!uQIfANTSFcPs~cb0
zJI~BO4#lNj6Xz7xuIRRRTCs8Gx2QYw^>t$Mlb;spzVrY3Ct-i5=FICyQ!VAzHS$|8
zo4YmJb!$XWc%Q&2U9Yq{b&pqCH*(Geh}Sd5M?}rLuCg}xy!eM!)2*o{zSBd+E|}as
z>tijwovARY{j#L=Ox+nftA4eliYN0edw#^Q*~IsA1)Iv(2fAKa*Up|c=Q}@VPtCoa
z@LnG4I)Olqa|Jo!f-DR#-0GKoV=q#Q=VhujxbQVFTUKs<ZmxP&dhn6y@^jW`<v;m!
z!(J{nGWKT4gXPjOa<5As{r+|?t%mXW^~vjx#hkGFll|w&@|xT?zE=Ge>^JuBtGo4i
z^<e=g9Wl9$89%1m>u)SK6P_t$^ZC&V|LyuBQg)egeveoFO+4JT_s^%(UQ0hc?zfNI
zS@g8u{$I!AA7^Kq3p!o9b}hc{=hGV-lg)E(Jb3wX=7b3i0>9qvey^je+uYn7sdH`h
z`hBn7zWw{KUEc1e5yOklotNW1&v)LI-TAWp@9Vv7Z2YAk7iYYBa&*3W&#d&M9K+;C
z#XDP1zFKCIrgrVwGBde6N1ux|(^+aBUJjo2-hS89>xXA|y-T0fwT2_;Y0C4woQ!X$
z7xqr9&-M1|HhS<s_?-9)<9~j?w&vGYzW%fIzG&{+yJut`+FSlRS2^j`qbx4<>i$q~
z^W9dzjLM@$b>01Hr^o+!5PMJ{eg9N%bIV($f@g(Q3O|3FdEw!O^<oY4UbSEOcfkM2
z>VrpjBsc`;mt~*4_~HJ}4%dScZQJ(LFIuvKPw~s4*N>%NMQsW`E#Tz-{q8KQ+yCeK
zr~mtNHq<?wdtO6uwDR43FXyaTdiLVgJ%>FC>u&!{*7S~->=sb+%sO9wQTyJk4uPz!
zjK4o;uh!pd>#4l@ul3gZPb^gelyAS-bTda-SU5O1xJ6+8`S0JprEwMc`1<<Kv6whx
zhK2w~RCM&~*RKVguCI^h=lP><Z<Tpz$=%)M_79mDUYt2!y=8v*@$UV;uG3ae%bT{%
z<ik&=Wi_nFKZuLxCdfT4{Fxp0$KQ75A`REsHW@cqp5=Kx`^sk>#QLL$`wOr1Gs{!i
zFF2;I@;&fhopXE6y=vV}YI@VpKmPYR*us7H!q;K{SA=Nsu(aJh|3yM*%B<4QQFk_e
zDD1vfek0|9#kzCXx(_y_!`1?Dv%0<CyDd0&`4!9V_5X^_#s5Bg>(a@ynGw^485sDD
z^Z&icyuAEOXT+4rlUCo%E!n#7=G){(2YH@=y?JXdJ0Gw2&#5mzazpXE(W$HD`S*1q
zcGQFv#`&fdoqYO*SF+su(W0X7?|WX_Gzq-Az}KoGAHp8Eq|M&s&F(gvR|}qOK5ysk
z=Vw>?N~A6E<H!Fl9zMMMhrz=>e!<Jx9C(j^(A&Q5kinT7C)WIa9u^|5o_<8*R#fiV
zm^EkK&U9SAP&r1X_LhHeeAVf+jW_?F`;{#5Z9~KCvq_s-+xq8pCjYo2xn9ox|KXdf
zf2aA@9@$;Eu(9yFuz*whzhB1!G-jE8eR?imnt`Ez$;UPu=51U3%oQ%MGY8&R{j@tV
z^Yi)pcf~TJeM5~M16Du#`{-4kX=2;?P2tB2E8pZwpD&Yh<k)!Q|CVzJ+jp-moaOa)
zvWn-V|5f#eaxNFYy|uOQ@v%gSuz-LGvuB^4qVGS?=I876`}1;hO$`hjI8@cu_kTFV
z?f+*f!vfDRvA%VF`)u^~*QV${;J*F*&2Pr}>Je7uYnQD1b1}F&;aAJjFtOT8S_};b
zor71_-t~I2+OgM8BH~xo=4id?YyWNEdqn!D@UrU9to(LXA2>JI*Z$~>-*EYeq}|b<
zroYRN$o%-oHv8}^n<jxt+qLf6tex@P4?a|OD00WIc;0$Z|FEs|=g!@mf8Vat<<r~k
z_g95zrG5DE@v)|+CbyW*jeWJhn^?K??(cj1;zh-?Gc$jGf4~3hwdmwyJu_{qzfIK+
zFME6I>6<ruvaV|R*85huUc7dza>5dirCt{+WinW1AN}@K!t%<|`F}sW`tz?bamKPm
z#T}m*FLbD{xpjRZsKd6HpKZcEzbE`(w?%F$;&FO$b87M}kyS^eSzopDz1wA3v*k5^
z{hlwc%P;n=dnUS+xBlIJQ@uN{?dP8}5#qFnnU+7{@pSn)GG=!+9_Da*kylfg8~XWV
zOX<&>Q`PzI<mG10-fgmE=f+a67JH|RpVE)N*UDdhtu~wgv&zca^78MXD(AvNXRoD`
z&Za51tc%}&E@@-NEIux-s4W?S^Us@`n#OKOVC+8X#If<_o5||_Vq#*~u3XWH+~lGn
zWc!L|Z+LL@v`M9leKp-p?y9U6|IlhDr(Ao-+3NhBsWm4L>#jJxwxdeJ^!2hO`;xM5
zJW`Ly7tdQBXDAxEb2nQ_O~bOwn;*Ng_*{GQ(&XHoLu<A?>RahyJ^Nfkqua_L9@$4L
z--a?QVBG8d_H~9*Jn!oZxdJvqZ3nxTRle2wq;Bi^{mi?KH!a$dTe^}q7q%!)-IQF+
zqi$Yo%)Pj&I#l;8ztQ?<)7tdjg_W8H6*fLeR6a8?SH?#r^lUCy)8W)WmEOk^ZOK}y
zCm(L|Xi_qbUBBM#a!9k**;}#8rskGd3wIyQj{kq_e)XBhb`zJql<r*qsVnH&*^0A=
z&P<cs89%Su{O_%%nd{4E_*}fA&u%}{qH5pu3lHM-P4`>)9xyN2AbaVxa>=x*(<7qe
zEfcTY(Ub4>v=Eds*(-ijh1XZ;{=`M0>up}T-mrBPI1*sKUi5s<tM=l?Mt#GlpV+0t
z{bu~QP|L|C{j7?UgSjM%fAu%{kSFYsbF8XE!nHnGH(!!nP&@0@#Qz>Fjw`3A_+Hi$
zy=i&MonxxV)us2uRxhq;37EU&X<kj>?-~0(a}+-@Dy*H|<iN3Vii&5DmgveH<&0Tj
z+XQRHpDMr2UF<Eu;wT_xli+o&_lNcKX=f^@gW9taZ96S0EUha_=k+B2$Ua~HQ6<pM
z>BL=Ahs}X?-D@=UUf$U;akHG+!E?8CHQ%mcJAXs`M$We;R_;}*OK-(-NC><Wy(?w?
zZsYy!uUovQ>-o+y$$WcjYyID^*YEB9yNliO!n%21Ze8z``)SMAXm?@RzI7+$ZGPoR
z-_2uTXLomV%Tl?sJmb}|wUZqWt4VNKUt{h4FyALAB{DU!$gL;n>a>FIPOhbe-r2!v
z@7AuG_4|y>%$Qk)`VZY6tvt2g{fe-c)~84B<6hLbtz7dl>5OAjfMSc(?Cj*p=jQF(
zw0wyYzoN_KlC*bgyA9csh5QU`FP_%o&RcHBaiQCL)8$R_In^!`T>Spcy&V2+%9Q7d
zEkcv@*?#*bJ>*|^Oi%OtZn5$=NoO3t&hv6>Q(G$f)Bj)5*R7`c>-{_|ucz8q7_4|A
zx>T<wO)>bv^7;y!doM39Z|9efi;dk|v9Znj#{q`xzE}78g+D0=b#Q0Zc|YM7`a9=V
z`sSPRH6IRcN<A$jE32%moN9D)vdr40OE+%ZdF|Am*WUc9rB63*KOeKd^wXKCwl6I|
ziiRG&S?Rf4|NY8!y3QO|uS|76DkmyAQ@N$C_fN>JOC179YAP!6d&J7$_(g@ZGlyND
zc29f9>_Yv<qe<Z*-Iq5dAMcrAsaBDex>Z84<ln9QzB0MX>N?p|w?B}GQ#j{wa!+7f
z=m{HhOXIf8(i_XB#QR%3OnIM}{dCTp%DIbHT4x5n%i}kb*)dyCIed$c-0lm9uK3mF
z>diizo3W;HlK86n9XodD)Yjcw7#uAWtaq68NV9<FMAfI2`~Pj6n11QY%VoT`;{4uU
zG>MIf*irrc-L74`y2bVDJ{}dnc=6&ZcV}nk$B!O$b$83k$jq3Q)Dyiu@9mwPpWEf@
zG_<rX9b4u2KXd-A<r$)v7Q5`5RkzQVojE4{`w96ox4z%<KfU8FfBKqLtD?5$NIIRk
zf4}}<6RVw_U4M;NI*aFm{n0gLX~{1|UPza%|BzR4W3v<U<FK7qZd@?2e0)$o$C>%@
zhr(_i7B|0dax-^s_tO4cd&k+0txY}MWpm^l@%cYjY}~o+FymTXnb}Lf>hax^XiI&1
z&&bT^us~W`R<43U$f{ePx-T#5iS9|f(Gpl}$Rqvgk-Fa5v|l?Wi$qq~7oXbU%CS(}
z{9i#i_miR@uBtZ|x1Z0LcCFYVCfPaonaD}Wi<_72>k;_$mFMZdy=#NAS5Nu<UUwSX
zn$q{{YoFiU{y6FJ_4*HitJj>pvEnt`=U=^UCf8Dv>ubXUV?W)>USG3c-T6B6++)X%
z*;aq6`T2DE%9Shg^73@VvR_?U3CenFA~y>-b&KoAZO@zA-F>?FyzTb#_xFB&ey-ed
zZEf`PhYvsgdc9s<MWv;+_3xL<{+rWZ*Z7H-EUsN&yF}<`yT!|Z{y*~?9ON??XP=d`
zE;}<bSe#?m)b6i|+|v(sx~ZI;#=_F_&40o9ghhWegO|;iHA|`FZQ=YprA-fteq7zE
z%0Ii|;f~IYOHZ8OQ9QzO`BfWd%{~M5|9+LJinGrKuAEYIwE4W40Z;jsVt0<26451g
z35^zak6x5keDc`v)A`NT!tdffeC3#HP$f70u=J}(|KI9o%jDcW>~^lG^phjU)KF2s
zQhrB{yV^SrCv9|fd&c6K^6XyG2H9D&YKxB@dG6wtwp5hWskwgN%;vx9@9lrJt~_CM
zBY)Gb%Y94s-MMq+Sz)|PZsO*f!fJi~9z9pTIc;HHxAO|~vSrIaTjV~S)_;C>wz!;J
zpFme%-@bx}Ou{efKc6+1laotKOx&J-zpt}%rhWatwb9%A<ZQLXx(#`xt;^m>=kNLW
zYW4bavrM_obS_u>ILkRZA6|V?@>X1To8wEq3w_~n)tcK4LSM`ZT<=qPW2u4F!3#UO
zS#-Nwxp{W{-7nEHAtdz53H#cg&ko+_`{VU}<JsBf$}Q7$B7<UL=1iNmt?==&jmgKi
z{b$+pynyGsl+>JQve#AC*58=Z{&(%(c?Cwg)@84Lq^tMG-cVfjepz+Y!@oXi7q)LI
zsCfM}f7-d&=$Kit3V!MwS1$+0)qI~SYxho3Jc&=CMWbug#3@nH7G`GGuU!kbx>=bZ
zaqU8cu89HP7hZ188He`#6_A|0dh>n}-=Ed}wePRay{xXYTdI0Vs9tSBP+{Br>2-0}
zISw2+5|i-Y(W66mczJko^77L1%+1W!#qa-jnBV@)$&)MBuXpE&-CuY2+&RC$tJ5wm
z@eB<OUAnX&@z;U{{*iyaDO_NWO3uujIcwgI%HPGIFIG&tR51G|-!mP_kLQ*xH?6y&
zy80MfU&%|GzQl}cj~<@M)$9NJ#n^HF+lVjs>Xmb3e{J~JxF}TU)u$z_&z6d^Ha5<k
zwIh3$kJ|3?_i=@Vg()dZe)YeYT#<F@bIrVi7mfdiUk|uiw`bu>Hbs}<kaqJHlfMZ|
zc9@(#b%^oshFxu|cC~qZDd!5aU1*%?ot&M$x$(e?ol6xpb-9igXmhg*Cv!`CFMo38
zHOtCJpIOYp&YfXr+R8hXjcIY)vRSu&b%pJ`a<I%J^la_QHGxaBk}vJOI_Z+x(nB5@
zPK()>uUorbNAG0PX3KBeoORB={aK^vv|^#>r8}1{xYpM)IMfHSf4q3{BDc6+%>KH+
z)8p$b6A!U`Z8>$y>uYXua<W*rslY8U<_p;YyO_7UnR-2L*7k&JS2P8${&WiVb6Ed<
z*}J&8OO|S^kJ@~Ej-9zfN>)KddCc>6j;2i;%*=#7F7@rw6g>P!##cD$)3h~G*2ND$
zbO^?8JvC)kET@ylDy<;NWik6|R>?cnv;}DN^z>YLz{pzjF#CMHoap!G`t4>`x2vO~
zECgDDuHAa`PU^<8kR?x#ct%S-nsn}Gb-$^RiKo}@TNgqm&#XRu=*+p}wNI|jc7OFs
zd+%N6p58OX-9c?TemoUlZf0_I$@3%JKb+1h9=4vddf&=fi&p+w6taHd!ILj9>TYt=
zYZtew*)_9sYs|!gCtv<s-r##$_|xCFMov*BcV+&RYtO`&_wv<g89ptFb)Ncs!b7EG
zZl1&a^X?|*K78>|?8M_wf=+ht6wh9&N><)17WsJVj^xy-trmUyGk#k2Jv8xEzq5Bk
z!n3Ruj0_9xC#tOcH~nA?w}`Cl+XoL4l9H4rpIjHeKQA@4RbZA$=A~a>U%$Vz(>Un}
zM@v9a(WgbO-7HLv)2{I~upPMP-_L7y=9TjPH@9~G`|E$^<?<an_(I;!j+XjYQS$WC
zhxhW=l<WVP<m=b}j^DS_DrZM>T9KyHiCcapy6KONg}0?IpO#smDzbLf;>Gi4N$*O(
zzpn8D>-y``X)7nH1l|w1tdwnJW@2i(@sQyh6;3HdnZur42@i8*j)!Wgb{}1q!KHX4
zZR1ki-W)Uc1L8t0T!#x=1Y9TSh|ON6*|p5#O<!t=i0?#}gAWU4-qziuro6DziY0&Q
z_6-p^_wI+E4Ki68qV>auxn)Ao)niXT%qVOM(7Y9O`#bYg?Ue6a@7aF#xpS=KSQ@la
zKuW@x|E_QUwk;dVH+_C_H~Z3j=`=>RD=%I*wzajr-}n37=JR&dk9*DU)&H+mS6}}1
z_4WThpU=O&J%9U_Ej;}E@|HzUzP!Agot1TNzWx6E`}-~~cCY_<RJ{88ySuwewP&B*
zSN8VSGT+%}&YZa=FTBt2%Zxa-imD%~UrqP^v6E0x5%P>*@=bS5Ph4I4r|t9Sg=%{4
zYcNjF?AX5l@7x`SHoH$2baGs%m%O}!tM|wLw|nA3@4XOz^F;c|hvVx%ax9#f=)5M!
z^^6H$yJ_97@*5%VgC}}wc0MXMvyF|4seZHF<(bGfJ~e+`j-sN?7L^*BU$;ppK6#q|
z|JrfmxcDvZdwU8W#?9VepSJ72ILpF~*+Mg1{<YTmJh8ttnf;fQZ%}w%X5RhEJ&U4p
z(%)Wseb{Ni{r?K{E;Ea`YEJdio4z_|WrU8{?6YB7Q!V-?tDJoNan`I^QBhHE-o6dh
z5;Z>Yv`EnD>eZ{2m6gtIJR3J}eqH19<Jg7dD#-_+4zI(nMOpPLwx4~{k!UQ=wsOjn
z3mx14t=_p@Y4WzZic@!wiz#k-&>Apt<-v2h)4M*e;_dyJtX6%dzHZ5Xj`U|cx#J{`
z-Z3zEvUguyRFPAmU)9e);!cJ<(SI(zcs;#nhWlRTH_vr=Z+@>m^H0{$u93fKkJ-*s
z7q7<b<tg?)TyAE&H|yQ`SzVtvS8cV|{^ZDCD*05oWuD3@c7`u}eUEGG<c}B1^&hW!
zaPn!<%^b7-<IWtNE=twa)hz<;hZ8qO_)O^+*tBgMA2;`Fqf_h-&m9)<v&ob?%Xvm0
znr!|=^Tf(k8kruuA{zv_xJpfpo~@p;WKZbMdUqbDjEA2BMVIn&EbOjdD*F8Dk@(Zu
zSs7<{L^lZ}ZTw(3+4h~9h;qxl-#SWPzx@r1yuE_+oqC=BmW|??PqaL*HeciQKg&PG
z>}2Mween_1@6L;)UAW?O<JKpC-G9g4a@$wwZqo2Ko~>%SvPf%%{fui?%nM`K85kHC
zm<3pVB`72X{hnXHJ!s9H+ll$F;v~f1Ra$QoP@GZ~os+7*D{#Zh)$!A~dMh{<F8(c4
zXZ`=!{Ok8;8tON!-1c4m;Te`+4>$h_@!GU$OXJ~0+pP*Gj+{w2cWJ`<Yx8|PMWSy>
zT=$H+a(sV{*5B6a$K(C(e>k^nW-gbgvBi<gQ86D9o?a_k)HG++oikovj&Q6BZJIlC
z(}8shJ()UdK&~rcW~wzP*!$_0_jhmZo;yXWMK1bJx+QOX)A(hYqLar>Hyiuf=XWmN
z*SOvBJiPz7!J9V|cR#*sfA`nLmE~rx9X`ATGM_(eJ$ZJ`hEjvVuN%DlG@Ljrcg?!)
zxnw!teal_u3wJHzR1Ar{=CS?uVN?CpMQ#tKuNMDnWt8(`M}dA?!5fkDo88|VZC|ZD
zD@iZyYt`Q@-&J$6{=9fP!(MSBKLZ0pgL{*MJWqyCR{iaD|L=sqeI1*1|In=yXPj;X
zsBhk47`LfN$H^n;s*c`-CHKU3S4On@NvsN*^s?NG>s_d+`Kj2uYo%VL^yxjzn|E#5
zvqN93Rp%Yf(am*zb$9)p+8myi7|&4S%ePuLraX<9wT%0HX!sPfCuv~{EpO)dtbOZZ
zzWz?K+J_%+4ouWzJ9IC9;Zc=O%k5uBM2GWs)-e3ya1@w0abo`dzuVTY*EeoTyfI1D
zyX@T^&51TI-MbkWF8o)}<S04NtsPfk^=RetW#?DwoDvO8mRqgZKY2B4_faYPv#-C%
zm%I1LKYEuP9C#^UPJHphimVqb-?!V<ovLp!cD?w1f6attncCJ9=PthaBlF(x^0@kU
zTMeEoPP-_+Nz2PybJDGUzd!9+(*??OdOyPbmPg-|x*lRCE%8ZgpF~z-u1bEW+@F_e
znT4`WFOHh4@7w=rLKW{ezGc~Vby}L+KE%1X>hJrb7Rq<pMqlySrwNLAdn>FM7N{Rd
z`nV=?vyri}b<h8g$K^p=*=Lz%^T}FmDR~*Rb`38BLzO$fH0M{-y>Ip{(f(&u`0MJ_
zd?`)!Pm#8FR|y<8(CfdtOku`uv1@L<rADQ%rS<xCO`e!uIeBGrtJ|JwX{=5i`VTao
z@N>PhjG4C4<HA0@`!`$+DxYnbJkj&aW}P*?SFS(Pi;;_(5Pa6;X2{{fo<(xMZ?`Ro
zl8y+>UmyGPVEg-5UTe=O<gdT!zF==!{Oz5^&u5ut%UR~0nxfgxFW<H{h}}42{mSEC
zj1GWCHoTvmogW)B>#<bO^^T+8He}6TmRUNbUtrbRY1{G(R^}*Q3A8hw2^yn#r6I4l
zBxurG(0E7jVw=C`YQJv25@_e7p}lpD^OSypSFTg;FF6%BBgS(_b>U(4_piOC@Hgmn
z_4K^)oYF7Q)zuZXDaA8>Jv#$~3F{*E1<5T=53jx`-s|x;`_AF2)Mrbk+CQ8quky)0
z=I6oo<%&nx7x;UsOiDdHZL7SYfkDOBtKo0oyfNS@E+{ZCGCFnc+`YZk<#BOxP8wQT
zT1G}fSrrTtbCv|X?31;=SNlEIZvOhWTfcCmd};K1<(d^A{-R1LUPEMBSk{800vYSK
zDBZuscFOgaOFPfsDVo9SVs=iNHVt&V()WAS?{B8hkKIwQu(!9jy}iBa+@{pi4{pUU
zur2TE>awl=cIDc&tZGGDR?vjGPgec&d%RoUJodkrU9XT3^?J>}f~3Tcws-fwyLRc)
zr9)9F*|~LJLM|ki8|$B+^K;6!@P+M1k_tmYru<qrdGh6n%I??JMwh?6W%_kNjNbk2
z`SE#qdB4@=EQ^->594HzFtD+;<>uy=m66%9cf!0T2l*Ffdp+O2u2R~+m*0HP{3&8z
zUsNtg_d4}iOgC=H>-(b2!DVG-zjwdBzFuEPr>DRFy}{dCTeE-u{Q1`X(W6JdY6=+`
za)VcfxcAH5-BtQJfB)aGxH!MdC3SWG*2V6gHEUMJtaB$%-rQNd+(*s2=*fw1Z*Lz>
zGW5MXT|fTbrd02uqD|Yb|6^eJ<?#GvRaU&c(9gH6t-abSPpN1I-R8b1EV=Xg^}YZ5
zwuLX8|L)Gt%m4B`JUrUZ{5|~V<8k@g%}NXh7(N~1)}JwB#-88rb{oxnb7rRT*RNke
z9fZAATSK(gu2}KoVY~dbHIbkH{eJJQGHG}Dd%syGFDLuk?X3M>79D+iMc`tq6!tBy
z@T?`DVsvv(hpVOL*8bbs@!d1zeqR5w&b{u+)feG$m1j?;MR*(#S=hL7+w{egr)VAB
z+w^4j%<1v9Z>RFxSH<5xebK*LO!wF4^Y&NEy}i7Wl9Q_|7Uuf;@_xA~)3RXiGP&0>
z4`$Au{r>Lm@^5c$n)r%~iS63G+uYQ2=8PFrrcJZ5u;@6N6dr!Pr>7_Ja9e12`0X1v
z-rU~){-}8TlFVC2kER}O<6Xb!Q`feAVx~WIBwqA4UY@XA{mbsH=cat{Y<1mfo`0<F
z@6~Oux~klx<8#-09N)6#n&{M}xxc^FyQkHyufH$H?B0Ie%-Z_)?c2Nmo_KO{vbz5~
zo4P+gqPOSm{r_+Oy}X&TW_>#@#K>@KbK2QiJBy$1+PSl}y?uS`ZZX9pNgJ>98|`<9
ziHQ+#x_0eaT3XtfTprLFIZ@HkTQ@!9d+?t9g8AoX=jWN#o&pD9|K8rb{gNuP@3yt}
za&t?oPxMGJy16+0`|j=c>wbTEdHLwkqqpKbuFtTSSm5vK;v!>L6H)v9NT;y<|39B+
z7$#py{dIj^Y<FK@US8fmPz%)l;_>6`_Zk=%d^gLzwWaFotIyBRzrVNl_s-|@cGvzc
zGoL)uzuM~lHN79UtY0oT_`Q8yuC(8K+O%oRn-4i^h$wX|XE(RE-~X)~G>`(?>~M2)
z`nNYXU;T=Dwzy`}pX;XT4<A1KyUl~4A?$+5-;?U|YySOwt{t|9gNLW)<<jXF?(gTa
z`hWV)f)(|%no52wU8vivbdI6<GK0@s{z)!&47(1UeH(AzDdOtt;<6@kvznIHt3$2a
zD_5=zT6yLAb#rCq#Vb~<_<QEUg$w^;H5nG{Kl$_%XmNdH<jq^RKu17aUl+S|>(={q
zzjd85et&y=dYZ0v$qNCejMvxJf{wvyWM-F=mj3?kZgzI|=@5o_R;5}N78Q?<bl&=_
z^<dYf<80!OU(IQpaI1d8iTK^0n)&a`s&xKo%zt@lDX4swf9{y~{M_8^YinK_bR^E$
zyZ7&fh0fAaQe0eIR#)cnN}K7Zs<PHiU{~KE5#C?Q_hCs;W>}b5|MAaXzdkM6sp7dR
zL`!e_>JY7&oM&?R+82jt?TpcL6tL(kwwSYRo0-{c-$^RdPhUMY{S!ZQ382Sr-pVgq
zxAv`Tc92(S;b`LE;yQKa%$uLVUESRaA7x)?a)|GLncA@YZxS2Buf}avZ(qmv*D!qH
znSIu-_?gf7=kIT9WL{Lm(6Fw-L7qqH@1EXucDZHT4RXbWg_?SLa%MR<l+)#`N?x2b
zzyGFPm64&r4b&u^{?GHRvywc+-A9ieO`0@mQ}Xe?cHbFBsb0RmzWm=WF)=hSI`OZb
z_-j_&v;tnI+VHLXqCa;rWqol>H=4O-#R?5&<>Z^2QaKi$oo(JPVR-2HarRTC49r<y
zzM}MDwwT<Wz#jGbg&4;dM{|XF%&|@RJhscGGs;bQ*Wl>e9Qr$8B7Z|&M|XF2eYlPo
z|CzOO85tf-RJg$2e0OsATW420hF>aLT3QMU4LkRiyu5UAvHRx=o40zL3>V7ne!tm#
z;)F+&f`C)f#)_AhmL_eCxZQn8!uHREMeAQaRkvpNx-Cmy>r<)tly?n!CsT}^ot?kl
zb#CW7Xu89J*Q@+Xe}qn1Y3bID8&|Gc<;0;Ixk<&yC<tW2i5JWt4m@7=O>rWBL!1y-
z>umG<w7lClZs<g9@!0*Ek>QJ`xcGEc?`Z~sc1{_mr|I5`?N4)Dz<*%>mkl5b880Mf
zUtgD+mveg?Z`}dL3)Qb4*xA^`oR7+JT)^+(es?+8;CsSctq&hQ<XC7~{4Aqdm!ZM#
z`J+dN{+!6awZ-#x_C*7ZFN`murmw8^c*1Ppab~9R@%#7VHAJ$i6&V`-ZAd!G)e?}9
zuwa|`qC|lg%pU^Y2LBEU6;%1eC}E?dq$H*jvEXee1H-SAGYpfzeA;WfM1`@UrSfyS
z|7^R|tEcn-eDCfSc*MNGk;U=I(PPh_ie^+R#xC~E`L18Rb#Is6hMQ|#yTxC{yD&9~
z?cA~B#nbBQ7a~7zEZF<(0n7jQzu0eOXHE1``~B#%{(p;_E2nd(v`0_aHhppO5?$Vp
zCzspqx%2P$ecykK|8B*dd%*P8wAxo~vaD^<o6qOB--xu%tk#WPEZD2)b9?m*r_Ea~
zp1k?+@7L_ZhmP64D^@J4%n|s&>-XXRx_X5R*Qe!guigIp`QPNW^JSa9U-%YP65%{q
zW%+|?JCtnA_1$l0OS&jrc+cAD^6B7j`PiK@rgcyLDC*Ve%vt(Y^rc*6c5&3XuT7J#
z^xOZ-IO=`6`kzZjteiAUO|$Ty{jcRYzHDt$;OJjycUnB>$~UJkE<T6i=jYZg7q7It
zU@h?C`yp@bu#cYR+1~EC`Yz8Wib%@VKWUHO_v)v6Wr3j{14F|<VR7mAPtCk;uf8BP
zYuQrWUMZUdj{{TI@4vO|AT!f~NTZo=PCeD=_+;ADy1D7^vbyhg`{voR>K$WcV7O2p
zwyq}i;+gNi9-T;?+8SBe310CW{WM7ITv72i?r*bih(CYzCN6Q)4wLAWS;AaBOLTjc
zlDj81K6GM!{H^%i^ry#E<`@V@o}0NXDEPUkltg&=6>k+GZ*Om3Sz!j=Umx3JFCUtB
z`J2|4_LV0-{g4kdnz^QZ`eSF&{S4n=YXRKk85kVwCwi!~F>&j)ufKVCl1kyDL;jgJ
z&DHznndknQbTc@<uIyX=v7QPm)7Ncj{#SU{D<00ArRJG*YKQA(b-mRqb!|&C%iAr_
z@y&B<TlURND(~LY=avtj#HX87`!JZKUSAjgCbvDKTC^(l&xxPz{W7l~rf_^=WMKFr
zJk!T*g-5TvnbtS|$n4K&PM)reX{@?%@0jj^-SOJjrDv&>U0cVY$QW;N<fy+^_6wWk
z%eGy)=XTh!f8xTGY5W`wY&RpV4_@6qD>XB({@tIQa(-=>WEmJ3tk$?*6RH3HXH(^S
z!*I`S=1K`h#mx$xlRn+i^6cE&dRQRce%7+r(yP0@HvQS-_FR1V#)4`6$33QcY3iL`
zxk7K-#-eWpyhjXtR%U5yo?onS>C_=bW%arp_mA)`wUE7XWm>PC9W!V;ZJ~woh4MYW
z7Jgc_==RF+2#eLAnX5Z-m)A2gFqH5z)q<U}XqSXyN?z9Q4V-6ndDYMTw<!MfX<}or
z^8a7URxMM>xbb7R<i(HW=dNFwcI{d?7jI9kjoZJ<yyrIr{bx%=&$IY{dCtq#HFunk
zEVT^JmrMNgbn92qd+!wQvi!>Ra!uaca`su;9q$$EbW2M=@p8^MWD^oJPkpNCxmmx8
z{OTqx+1GTmY5yLEhB~ID)(i{`B@y1)!cHBF<f8;jj6Y79+PZjZEA#B5a_`Jvmc0^X
zZoK&8f+dHddiD9I=W8V7wn-?O<Q@`AXFty{e<P#a<0DHgITZP~JD8{6U-s-)>gW5>
zTT3>dxUpw;s>iESJiIP7^Bz1oI)Cn4TX(iL<M{?#PDL+z-2Zz=`-aGzOz-Anuge%1
z7D!JBXJBAha9HQ;8$qY7rJ`c>>R&^(p1!@JEqe8+?xthQm+y%Pi#+l4!=j}BPYQOZ
zc<!?LrO;x)<IZ7uYo~IHPmivE6PN4jsk7Y;TC!eix3DQa3y^5DzOnPMM4pC7>HeNs
zw~Vy8-Mx!{e_Z@*-p)<wU%BJCemJ!R_|;9C+RD6H&^_zg*$o$N)_!$jU~o{MaFHG4
znw&Lre0p>zUs|{7yTPM^9m&q~wrww*d`fDqj*Q2o4JPF?jNZ-sxUg8Qccy*$G3{5+
zjUL)Lt=OUR`^C)n$6H-m+I7pyK4jJZIk)tG?5dU8n>Q6WaP;zaKKR@^eVx0}V^z`0
zXUohu7OvUj(iGz8CeLtTzQP5ty%ss|=Db{eWT~Zj{``d*tNuFs^t^lYVs8ALTUz;v
zY@AN50*f-e{^~oe*kN+}#tEMT;##3yzf->pRDGD&xJ+}_uj_`lz0Y^9&R&s}7arC<
z(_#MEr1LYkY3aUBiwo3p^0;+L!N|z}bf2(PhX|MC^wZgsu4R8=WngG%Z*q`lU}(rI
zF8vbs_t5mCs*%<If8>|^>HIS1$L*Ej-0#zQN<X@D_{!LxKXat2{K>Iy!*)Fvd5?2@
z^d@^JPd=yA@@Uez(2#CHr+4cZuTGlu*L}Z-&(5UOhY^9XF;Nre$Il6inN+*q=6l(z
zspr&}X8t<WYcDk`D@5z*+9%$rp{=S<D@{wEawt|yZ@+lZ|8HqwcwXYBg#jXy3l0Tn
z7#W%^7t|6-mvA=sVQ{EFcx8TRlU$OQ?$*6r7o_jk|F3m%X_+0JU$(mOfBE0dB`+@>
zZs$K-pItB1eROl0PUMd-(zPWuQ@u1-t`88*RZ=dVIC1B$S8dB)9!u+7v-Re!OPz<G
z1&O!@v2-6@rU4#67If;`7Pd4fF(<`s5=+}d5#Ng@t;rT`4^=!1Ebg3JzF33ncwyHv
zkEVo;H&k2`B+kk7F4B;?XySWW<Y>~yLYd{6vlK#N<(_kznt0Z@cZKc!H0fABk5%%%
zl@GqVop0@(CuNtmla1eF0*h~8?Z?Gm43>(rsvQ$^Yg7AMcI=(0iRURP;XYaGTa!-~
z80tyrXms7$o<D!{=HmBEwG0Oi9Di8wc1^5Rf3ifH)+Qs-NW=0%nd60eP8{ifKW{Xf
zpMK!Eq(aM#Z__Jw`|p`~a_&QmK7m7qGS3UFeUjyzI2P_N=Q?Dt#@<<&;mg&huP3f8
z%51N3tWEB{aA3yqs~^_g=08`VT=Z#1E3^8AdL4lm%?Fu|f1EN!BzHX%k3wW*q?wu7
ztvFDMIc`vQMP|~Q8-CxXJI~*<@6T#Gt}lX4E7HZE@;eB;VE*fJ`Ae^~`J_pcSeOp(
zD16Ms#FUklwP^9;y?gdBF)?XrX)Rj3*u6(0FfwxHj2RZ0mzGRac27%5nPXpn@Az?b
zC8b5}wPp?Pgu0KueED*=dH%I;PN3pyp=Z?mNtJWYKKoJC@=Q#Pzwo26`PP#sJRLY9
zBX4x~oSBh1)%1II*6CYQJ}vq^Q=;v6MN7dAS$nI~r*^-6^ddH3&bpA3wRhZ&tnWX4
za=)<n+tWf;j)jjV<pc|BFT0$#b;%ZoIp>~!x*N+pL$F0)(aS@>C8wHx-`mC#J;S!7
zdLJW)-Z9o+FQ>=X?X3Fx%KH5tVIiSSwZF?+K-Zdvt&N&Gablx@RmqDBU834%IX47^
zg`ERKA|h@qpI^7D{(oI?@a5Fg)BgVZ{odAI&{3fFt7*f&BQ@b`;`T<}=4NDgVKdX`
z+s*X(CsT}a^<C<>Y%!Cy*%z9UbMEn{@^|&~4?i=STH0k6nU?32mba*CSyx7O-pb<!
zG3zF5J+*Yj>ecG!;(x!5xl%VN#PgL_-LJok#Uh2BUL>7ye8%Ra@$cQwPpgz#0s=j+
zo%FVko^ku4$=}}_*IyA9nxro_HRbeE-Rk~7;VXl_d<<XjIpHGvua}>mp3ck56LIa8
zu?$iXQf!H<|NHgs?sDV)b<x}3waeGduqb>qJAYrNfK|nZ2Y-Km|Nj1dzd%=a_wJIH
zmp(o1-&f?JHaYk9HeSUog^!Qz`|acqFVKDTe*OQylT^KRbal7x6=P`N6Yf5`|Np<=
zpzx{uoVGAv#oMPZ`X5coF@K)uxbLx`Q{>LhbA54cPQon#85c}kqgMxAT{iD!%Jame
zl)~5Vj$S-yyvs6S!uyKy>kKUcvxDl?|K2)s@$;@ZVR4};IT_Dhy*T^yLwjYL6i3fL
zyYAmRCT<pRy7_baYSpD@;;O9}nQ9lzkE{FnG<{xW+WUKZA3l7jzyHss<;&HbI*ul-
zRNrtjM_gR|*|zD^!++oI?Cg}~|DK<;vEui)x1de?PAir!UCKX=|Cd)x%pHFFKLtNN
zB(_|T&i@knUYwz!PPqH%$B!R>e|x*T>Z_LVqZcnEBqdkg4dwMwxjOs&-nBY1d1~|W
z@-ioEH8VH6ZW#FQ@D|OdF?#ENGe^z3ZEQYAb`RH4N&eYlLIQDtv3uS=-(GXa*^S+P
zDc_g3IdWS*ZZO!K9s1(Z{aTJMjdimui_?64eM3U7fU?lpS)q}UnQ3X?Hk^E`{b~2g
zbN2QB{w(#L-X~`p75X)yTgKjgf9UG4%z~Q>{9WDMjsKU=HqWnn*eZVI{ksOg)ho51
zZ?JsTXT>}%<k|@q?X^WKt*RKTvaYTQeI+pe<0bD4_qJp!Gadi-C^GCB-!iqZ<LBN!
zDf+=Zzi#fzCG|7reX&wK$^PD)!%6djv{H*jj^5^4Ij0rAn(28TDw~dOzBg&B+48iz
zcVvIQ?Cv(ZaeK$YvfUZ4WnyE^8Sei6@wmU$>EWB3o9qAoEl*BPPMe_O`E}_p*}UMl
zX8YgNSlS=Hc=6($J9kcHEjTXxAW_YCR>_MC3#Uz+)+=r9G-bW{q@eZFraaHA7UfV}
z5~BG^dbM@`Y0*uGmv1|M&+hOY+p>4ZS8sG**`B|Hn{A(V__`G#tG;~s0_v_QZ``=i
z<OSFK`>{R$416!`+V$(y&C6kSwy8T?XU2Y?%vzJUc}v{72`5E2-THM(@A(t)<%%s+
zv|O{Uon5F`$D!z5{CiTDO-n$mbEs>mp|P&v)1uWeS|$c^wvRNky^l}3wrt+|ol!wm
z`*pToZ?0uA`sH9ByR*o3Wk{c_wV9e)+UaS!X=!Qpf4>9=240+~>~3Rgn}2s#Xk=vN
zg9D8G{QX<DY}sA@e%kcu{qpv9Ha0SfQy>>?J)d8{@37(DKOkV1cjrXN^ZH*emrF`Y
za&mG8Oy_La#@k^Qc~bIv_N!BA{<S;*DtJyje(r5av7DJ&g_`lEif^}%pZ{C%)9p!5
z=lRU!nGVJ`a<<K%AD@!)WSVZY-LDsmugBNh>gxL5?!F|?#^lU%T>rR>(2`XfcV4@9
zEcajV>S$5j{qnz8xnA?QT+(P!dv%g;jv2dRii*ic8L2;i?``Ese3;n1`%PD{s^-s+
z+xb&JrN#FLoL4+7=p^iZzTal2?skKjt()KE-qGlC;n-O4?cE9AWlE>hGWTw7p1#}L
z;rw-(*(KZdZLGR_$#<{x8|4i*pC>oV29-7it=v=oKF-^_d;NO-V#9SYde1?_E0;`s
z14W9Z4;xHUxtU{TeB$xP5G~QZ$1IK?D*kKzc>U);pZH^@4?9eD80Q6ghDD|}Hov_v
z=Z`htHfN@qV~Q=Wq*s6LzRXhNoc~?$l~{G}*{!UPN@NbV@A%Q(bLQ5Ru0y{i?cOP#
zSuFWoXipp4b@MRcmQ{OJT{wBp*;T_^`&08@bz|F|-QJr{ui`rEyJqhl_XiSwlU%~$
z7G1yapqjNj`l+ttVYLrCYPyyg6$uq_zYh|5`c^I}FY9rFb&F+PRN0-qP1fCMd#~=(
z+2FhKMs3F9Gn%LG&Z(LIXKBOS!rzw<mmL%BK00mMv<cr|t|_;E9M@s@;L(e>wk0f1
z9g9}v*VTQt*WUlMNbZ)}{ADl0T)F3KCz$Pd{h)sLy@;JDlN<DxXq<9LSRtqG>9lTw
zB$ul!pK5mQvqIMX-G^lzg+yFSB2vz?SM!w}V`V7Z8B<^X|C=&XBg5a{RWZ-Z+7D;i
z_wKx1ck3`ms}sjZ#tU7ySB7u?Eac2|xR`q~_mNDWkh#%Qgi1eWcqCMKR_6VgTdZ&Y
zTeJP}S<M~7qQ9SW{6Bg2(ytv$iqGptv<s9e{%WwgU|(C=Kl}5BJ&UefIU~KedA?P_
zpVtiY3yms^!{Q!&NEBXoRCe_mL4J9&k8uz09{N3V^Rj&|6OMFp@BXv*_>HKYVpCJP
zP8ZFa`&YgtV0DbvWbeut$JH@eIT@?sUd`RIV&&ucZwo&1_n+qHo;$bTdy^Yet$~1p
z>4LPG64Cd3Y;<!o9XPc0&VG|I+VgvZ#9@Pni}h*~rAoFPPughh^7G6>EB<dRvyZyX
zy_fc-W<$Tj0)7SthvRql)c)G~e7^u!PmQh9`{{R+y&5sMhV^jFDEjtlpSXDL29wRs
z9ISlO`bOI_vev!+G$YQrx%sbp?4CLUosu%Yx}aF+Q19&Epr|YLVRfe;bJ?`>{C{`-
z{|QkenRLY#H#WcG4YH3cQ-1jGulKlY()Vz2bGpZ?Q#os6otO^YmfyB*;h}?N8P6|Q
z?qH4Wv0U+UIvc}Y1FMQ-0pb6%JUM+Y3%j4+yse;S(&Dr8er>vtFd>eSztN6?fg$#i
z)^w#=Vd?LET&8g>RLh*(6<`!-=XB!i&GmaWE!elP>+rM4f3>RfuipRrbyrG4LQA3q
zcRKeEC!XViPNrK^RXpF=?`oZSVOfZY+4Wg7Ba~a-<irR%EmQLDQsN9cI)!tq=2O{8
zeJY*`Ee|WiYxP+`d$7DhrKf-H*w(<n<2Nm>Y+C;=p6%^37X3NM3GNT?YB~LIyXI3B
z*G&atP97JpbqPEwsPJ0aq{6w(X}U^i%({l-q9;UyzWT7WpH<~hEuO8w`Sq=ye@gPp
zFPApY-y)wAtYyG+*igps>8-a}MON{9jwWq1Y`HasYuTOu_m5B99Ff!UiIJg}>sB@s
z1H%Q?9JAxcPFd={Rs-!Hn)b3=T|~n2#!mI6uHYiQ=-AhVdjH(omR%F`GtZlwl2!dq
zRBf_IW<o-Xq7Qf@(Yf8e_Iud3Z*5I3_I9oe6?E!Y_EO8!^E<aNVkglG{cBq`7itTX
zU+h^LFz4ZoP)~jah75re&=ALq8Ozo8|2Y2gt!HMS6Z2z5y*ieaP8?_F{yQ~4y*%ZP
zcg93hHs09>ww#Ll@a6UK^Z#c|lkI-2<85p$&aQ8FKH=Ds=X~>i%wM{5Z|h9i>4z7~
zZ7OAJKOAdN{PkqFy|m=4lcGWC?C)O+Pb=HJ%3=OTcK@2W^Mun=GJgGO;%BK*bjoP?
z|77-d|7u>@i~oXIn^f}d*$K;S^O&s9#lTR)G*?Mpddqd05F;=U(~UavupnbrUw1cX
zTid0jcmHl=XRzsEyPX|mq8fg}>dVaqnNhbc9eB=dJ>|%jQ_%%;jz0gpxzK-hkYk{V
zaCdqCvdo!#W}Y`quqrF>SKwS4ba7w3ylb$#e|>&lnlxzBes%kz6`KQpYjn*r&P_Fs
zF8nUD<@y_c{_ORfa?8r!nmU@xt=_9P<sHKX+5G(XTeGiQSy?HyFflP5>y<W7J0p>+
z&&AMC!1Ml&FaKeKWaZ80THmuV9sU+*=hSih>35Y=>3x|Q3a>!ZoJpH+yj@(AHn%u^
zPgHPp)wfr6X-_W1-=Cl&D7eo_Ina)Qp@iA1oZ$uE?6dc_<=)<udRoBgOy2VgI+6?@
zB7WE$ytFfW=4vJZr_1U(TQ?P4csGfGp_wJ+3u8r#Yq!|V8#fHLZ_l~8=<ZPlh7!TH
z#8(gG7S%8~>~D0CZ*Wi8d{f#i$AP1@z1`VLo`HdZVHXoqErXn{k`j~RmZYOxx%w;&
zprm>Bl3T8RVn8!UQ?k&{0!cjv28It2JS{d$y%xR=eKB>*n;YBj*R5`!tayQaf%^la
z7zQ?lnK9sYh5!1M+UwV@zw)4}%IVrIpCA>d6}~GKI702`%Qn<~yLwIcW4Rt^b9VER
z6O&e**|4F|b`F1RIh%N=%crZ;@{5X!w(J$S>pbDe8OhCC_j27$&dl8TZSVHK%zw7-
z6<9ETRo1)vJ4%a=KI*Uj{$<IP)oRDY#M1n;%R=v-IJa9?w!Y@$oBt6rZia=3$M5*|
zd(ZN?&0CA!ZD(b;a9+(vCO&9u*OIjD_l^0!L{+9f%wE6u(&wK7FZj8@gUsvyKTr-j
z`RVf<fmhtO4V&sNT~LYq{!N@!b)|g$pNor*a<?9mE7fCvU}%$Q{;TdyYJAKj*|`Oe
zezM9-NY7MkiILsA+&7}=$CGVO&)1~nWnHd+&9I<;@3&jp%lqXyzs=6l+H~bxREdP=
z#HUkR)%E@bY+JtM`S~V?`hXk%-u|C!FKKW2#Z|9;{oAb#2akrNSgKWoWn4J3I^C%5
zXJxrl(wc4IEG5yEp@E*2^Cm7_xjUPo|Mvs&SzDGGE`Pw+fBO4px#naGrw*0QIZf8Q
zzCz;c`tH`{X;QAitVdsN{VEzJ*5^E@z4XTVRa+J{oK3qOwX>x1-kLow$<CX#JUi!K
zfAM9Gg?BM~xO;v}Ky9+`!@oRD0XuiIMa;OV)S|VjJJMqIvXzG>`LNGkc#d!0tIhL!
zZ*BkZ(tM`Ie8Ve8>mR-Nxm@pU-OHQ)Ccm8+4GPv&*T4PpGI;;*yyGA37cFbGO;5>K
z^;Y!dye)5TOj>p3dR+C=9RHKaOV21=xL(iV_~zEv)0-^i4=zu0h>oy0eOT8ZevXP*
z_roCe3)$hx{nNsp@PFpf6<B`XYu|>XkLnx?r%gM?eR03Fb;VKDx!IYyQr3?$yB5{i
z@4I^K)X}2{UniYecws^2zkA6XlPoG~R(GB_b?ubpzjHg83V-!<p1$IKZpZWqQ_8;H
zy!qbd&6WDtKb9sLRjH+gUeCU6xNvj1{{LUsyzgs-c3lpy`}$eRdD2?;zWi9D=d#k;
z&wHvlMMGVeDQR;T?>@YIU+lj#?mnr0g`U$+oY+%5)$hTEj~hMHPp|HJlY8gavs7k>
z-+!3@e1CUack;=)dt0sT6yt86zGx`+Obj%N|Ge}k=*)%xkCGnS#yYWAPVv9Ir7Pp|
za(<I3tG1afz2lK_>8#AGWzw@%)s9WOA$-j&;{?ZkN$Y>_m*?Kzo>i^rpdNbl&iOs%
zug{8a-*j`%1cs2{=wpAPCTmAM^NBzDnCpj4^Ore0HY(3Mr|Wafa8BoA-7|0c=Kel-
zzxvGFEgH@XPu_XCTEI!M@!{L`2YtPE&zf9cesfRht9}lv!vbb@C1pWTQ?@KUSpA}d
z`+A+ahiJcc#J&&C&z^U?y@-1lE3KX0@(*-;Q{JOfQVezJCa<RH-kwzbes6=X`Ce9z
zl>!_qcWdsRt)qE+v*PTO^2r+_gT8y033G6&2q*{$8Qc|l%%u0=UiY2cliO5QPoMeo
zpM-$ZwBC)3$rbx2Pd1j@TUqRW?Az7Z=HD4-pWT~(a<fF+$?Ds)qqJr`iMw}O?uoqV
zj&zyB%FdH-@0JQ!)PLt=i_^o^`>TJ3R#fg`-r2pt<^Q?w&+Ye`)xQef{%=p$zP?MV
z=Cn%o_dL20Tv>g2k~q)&qkS=@wHH_J+52zb!|%FvYz$em^)_+(MFjleeOVI|v*wIl
zS=#YGGgn`lEY5RvS^U*vrSx*|>a*|X|3AOBCs*R$r2}iLx8>CQpU=`*_gUfk+O@0g
zR1Bsm+&D9R+t*Z8xw;s>`8O{}Z(+EgI{oXn@_+Ad^D;PGzS0oJ$&fp@bmBtIGl~{%
z)s?@DZ>x&l{G0WY*}LA<XBs~P%fW|5KXm3iC~ReDNVH%GFbR#U-nVaOiNkIC1uyye
z{ZgdZf3z9j+<)b;fBqFC>#uCRrv>(3z7wOG<$GV_zBr5HgoO+3x0l=PeHYfBa=QBV
z=JWqkHqMw8wc2gs3+bL+cNY1`q@SHxw*T+HJlE{)dsJ2J9#>iS^!jAKTwyp<|LVuJ
z`C1Q)eh6D#^zWTNH@d*!fO*mkGr6SqJ5H2L+Hz0r@Xwwd9g=U~zRmc?XT%l57r#85
z|6c#YzS2dOGI3dl=KM64mn->k;KAYAz0P5Jb!Er@`3Cvh=X*XVZ7osz?|#+c{hgQm
zyLRoE9{RlOWVBvuODx~Xcgy{sJX#m@-RiCT;?S;G)$65MERGW<I+T8SU$btJw6UID
z5mRHv(?{{=Jmgc4?s~Lovf;zY-CmnLE@kbv-~Xc^`?v;oTKv!5+#8Y}UhYm?FBxmU
zowNJsnv0sb%Cnqb25w>f(Q<#*1h<a!#ggv@CUk1)SS(z;dgI2WG7M|Nykmn;2Iwj`
z37^jX#Oo%@Fhh4)T&g(35qE#<`j0b$)-p6OuHCeDb7STkU0$v)-4Qm`XV3kWf5kKF
zHJ9hLIAPgouN1!>GFY=|UBZuJb@vv2-4rxyne4aACU<WH<y9w1I0`&rb5j0wqW8H{
zf%MmnDw%I5ot~y&@v2!rZdIO!U&p+x>dvD|J7nyP4eS@Z%+6XnXO7AI1VOjS`<Cu)
zJN&Gb?I>fz(WGfx!^^*!{H|biZ(U~5lRjH_*|k2aE~UkXg4QhAy26C}c%(%eGn<HO
zE9-IZJGJcJ6Rb~p3kAf@HP<X$7x17;HLdH-tBEJ8Zwn<Y6Q4ephp*$~XTGbFCce6&
zUR!O9Oj>6yv|bQ;>ei}1dk&jeg}R43dnCj(<X7}BTDxzj%d402qSLatx31m1aPxA`
z!y7s#r0{RN{-E6R-t~97yiBw7G%WAkyISymQT!%OKF^8br~FUfT6J{Yq?Q?(`{ESu
zc1?RZ`TfhVEn?H>a((Le>X~`(;@vBE!c4VmSs7mN&YHZl`u)uRKVtv=VKWNc!Eq;S
zeNE>7iTV~f>n<+w?mOMV<6Cy?(sAvIYg4NC|9HpiUoO9OS^l>xzg6Dtdw7s@^RhKR
zKJ7M-ag}3RocHq1@i+XQzB4Yb&A40qVDfSKU&7s{m-hE;z7#HFv2W=bHUH)E8~)FI
zFlE2L1$X*Y)7T!q`6>JNFIza{^t0cU?R_7Xa5O0>w+q!i`4$u!FCjcp?LoIt@-p!l
zn>6n)+0yzZTSGP#Ov_qeZkOfdU7efwvUAFhn=IWK6Q;_Z|7WLJrZ)M-`;&jppV{&>
zDg5O==lS=yKe@T%M9J@eskv9x&%OKfowuLM+fZUl)Z8quS4m>sC#-g_-nrJwFm2am
zxfzRRbS3QlJ9p#6m*48Ih}Ozlva;`bvgz5jRrmhsnH^N+IJcAAJ?N3ql&qi6Wb3Pc
z&g^&5d-Unmo;7!DFFu^S$A+0hY-8#5`{}+rujiOmRsDEp`{n1RpZ*4$C-u#}`SRtv
z$@4aC*t<FL^}7A~@jpt=T+L);_@WV2yX4?=Jvm<9p7Z*4msF>-{&4$Klk<5_CjSw4
z-@oUt+561iBEs-w@7uJ^fvbZ(ZEEzxQg(OQXl0!%EipIhtV{NG-M@-G_2&r|At8a!
zm-NjuOSBlzx6WK6FE>X(Zq9){uiguP`;%OszD-^IoUiYUwU>E0TG#z}DqR&EB<AZk
zYyH)gu6jvn&p)yH-?EA~N|*JFV%(7bZO`k1d+OnTpZf3rDZ{YLKkn3<%BMH`85E36
zes16YWBa`YTT3|@yr0=*SsNsu+Pf{6=Wv)#P1W~C|Gi5cw{=?Cc5PE$zQ6X%zx#JP
zwzE4591-;TGVwNt@8zjmpNFrl5M;O%ELQvRZkt{ux3P?ztli30`!2X@#7+6g!SLgE
zi}<v834LB2^TJZgFV}pWvsI}4enQ8)7kN{*hFYuq3QW}WT`PJfm(gtY<Y{{jTs^vX
z-O43<p54*EzVG03&bi+X$XvY;^KJI>dzW9E#^~MO=P#cb;8o-1oBZ)mkEv7R>U#?m
zBaR%3T+Lb&IH5ko_3h4W>wfJx@nz=A)7)Nt?JP%pd}DbSQm^h@)p(D6njJqw?%c1u
zn>J1P(X;Jb+o@fj_3b|^wk10L3w){B%_sL?>sH=|`4`t_gz|sUoBLa$@3B*3N2_qD
zud33*8_sX8uAlU|!f9f6ME->ryi#)E0>Xwn9m9?#ZEX6x*pMgq%U0vLS4>2XyZP<g
zc;As_r&^Qkvh&j<+IIG>;V|!es3d;8vs-7*)3oqo|5kmo=zA<PYgxEnUD}h68#vDe
z$nuFjklt8wFZuqP%I_1W>i_g;o)x9dFZ2J^zoqA^z1P3L$-thrSuo+t_dr3Goy`kf
z<ahRNDL2h1IhB0VdZvCW)AgoFkH1^~UfdmT%a?1<dOzcey!~!&<`-|@i&)KeNy$F*
zn5!bjaXw#h3O8&mz^3Z=3(tq?{ae~^k}*ThfQSD>_YuQ8t}oX3%ZTsxnz{e`I=y!y
zzM<E}OG`|JSZ*g78W*?D+;DXIb=D~rKRRRe^LPK=R&LJZ;9b4-glmrXYiH(U|7Y(4
zvwz9RU3ne0CB-MQ^Rb0%u+&<wS1+drS4@z!)>&&MEhE6paJMT=-!s7@L5Jas=I)uN
zYT25n%~ZX=ep0x(h~=3$hY7QFRa8<OmMds}+O~IUOX3aR*geL2Mt84kyBrW_Y*@bg
zeevsiX~)EmE!y+#jr{$8Z`@qk6;8}$v+e1=<HqIXw<hxEDcjF->HngQ(qk)2=heM9
z{#c_c#mwW?rR3db*M{!quQAfDJ$k6eeMU`rh1%wazvtWe_|7=%b4zkx`@_@MZ|tv9
ztFO-tJ-6s)_OtUf6(^FUzU{r4o4rNrw%PQ<#|?Z=?9Y0q?|ZrS?_Hm(3%;Fe`!K=9
z?BLX`p}#$ve}~%YzBN7g?;^v6wHdu!yF+|7IEGCVvF2v@;-)(}aZ1?Sub=s3ZSHj{
znBRWAe*ZNMZTa^a$0qNdJw@~BOSMlD)zk8~N$mbTD?nA7#c_^Pr(MzJ01?;AQ`R17
zxtVlE-!5t6jP|VcQZGzre)+aCJtsxVaRaya<{A2hJmxdMoH1)Z%i5r~lZW9~Xi;Re
zDX$5G$@b8lT{b^#7T!$C$z0F4qoi!svW%{x8_P7Z?mzs`^<$B%WH!TrBt!A3b7egF
zn=gvEUJj4T&0GCt5=(-_wdHT#1(z|t)#+KypZKkv<=9HoTG_k4XU^&E)UnIbntgWX
zuil^yH)X`S7i7FjO8wRpx!N>Jwf$^pcGcBcb=_AVsd9#_61D9LGoPr=aN^b~XXeK<
z+N*foWIZRE@*WjiZE0qdyW+ItgxTp|mHD5Gy_bKl@lHludy{$ozob2jcYJ<Xvg^*B
znA_9CR+k>{leL<gC*$liVPeAGpU-ALmOae!`C4?o?;7*m*VEo6HfnDFu|#!hdiQC+
zZ(6(0q%qGvE4tfD<nLU2xqmixSzVWJiR8}ZovFSp%475D?)LT@zk}38Z?2Wys{8h8
zo|1ol=7gzR=2>pvzjCRKiN-<K7uRmyom2m?pg3F9Gt!_Tud@5d-S9^br-x6uc_nC}
z`74W@IPdD-`Q<D2Z2#-@GjnN_UQuB<@0VNKPG^163!Br)H~-4ojLZpBMW@Jcf9d}4
znNN0AdtE4h-{XJHTw!I}QRk=2ynmIc7LikKuCLdgZX~_={NF38(+hVt#id?v*mnQE
z`kp19a(t6FPTf-B%`_`Y+k17<ma45cd|xSk%X+(Fb?z>OC*6w<1r^LGH7f5vadfZ$
z&8xQpw`Y8dYIm8xXys?|eyv|tyPxU?2T$LzYlrmNwm*-Y-zB~Ou|iY5_&djsMJq0d
zxW>B&W=`|E>@6^7%aWgGc-!Mr!y`k_Ejdz|dUdDq<*=SwlaEzjziiWuv<ud8D;Ihf
zC&RaV^JeSUPXz7X2RswDHnLK24ZAXDb&kdF_22IwX4h3~xDz46_xybQzt6Yx_usvI
znVBKJ?&s2@Ns+tD-c}rMRk+^3yY6K-5C37c8?&bw)?Pd$=^wZIE^q3#83l7%A6vKv
zI$ZXt<>^|~_A5Ij^;+qo%wI*x3>zZOSah>8h`4Uz<YSQNv64AHGt@wHmehqW#g;X8
z{u!!kE!u)jj)vSenccfiiGR|TBniKZBEG>EZOm<k!L@I;8}b}4oU<%*)*_8rNgFxD
z&PlCe=Q-?o>D7cXW(LowOa__5o~KS7;(R7$8YSwu;it{Qt62y2<~K>U9cR#(b*OOK
z+baFJ9ZEB^ufMuddn&Jd<MjZ3*-1;TCS1BX-EeEf8J~o0ybKp!vhRptObpkauq<=+
z)kRlV^UwX0c9(ho{(JeaZ%hq+p8M-ff5t4vqHj6p_TRgGCE&hI@+Gf}C*;<-=A21O
zPR{mp&OZ5i{r+!1gkN6>y1c#3M~$0zZxHL&ojWD}YB}fCzu3-P6num2Rl&8XXX<7c
zsvnAcm=%2}t2*y|9gEcQg4<uppB2ay?D*56%dp{1nbnua8+aue?oL1arQva3<i52t
z53k;4>9Os+?g6Ige7^IFaaI?fen0N|;@Ovp@xQ<Eb&KA(r~Ui9Vsrky1c_s5#d=fb
z&zf4NuW;hW$rCfCPBiphetGZjcgJSU`ty<RxaI1rRn^Zf2>GA<E&tzC(=u}p^UmEZ
zEiG$ecb7dsH<w`p<i0H7LvMd*^EghJ{qVT*|LA=WJevdcAM9phcj+&;;9zoE_(A@E
zMfIM=1${H$nr(b{U&;Ko_4_@CRertS^Z8uG@g@c3CZSrEozW~mT~pI)g+-?s<zAZf
zv5(bJAmtG!C+EkH9}~@vS&Okq3Ql>UeBy3W(WN~nJwG3_=3;T2z?t*))z!zcOieND
zQ(h>8uU+jqF-i4BpN7#y&?RC5ERGYbC-|tne(@q>MgE?~TD}Z6h6l6PZ@+uMPFd;j
z-@kt^mMA<)bLg}y`n_pV*sMit(>L$Y6Y(`Yb;_Cf@w$-xJI_hXiq<~dESw)V^OasD
zcmL_~^3S^(bp=@*-$k80dp5pqW9t2VwVTt<egDYy;oG;VRrfZ;&kizw+54(%;fu-g
zb_Ls_@6DTB{pldPe9gC=@wdc3x=b(x752Za%F^2JEvT&c$^FgxcWBYV15+a%>Qpjj
z{d;%3{{P#lfqnaCoN2quZuj%`FWtq~a}u{nY_-~&t7yP($;!UyP>|cCef@h>n-osO
zp2*r-_v>Z-zWW=W|4fhj`+m7_veDlD{`#aEEe4xy&vq_*_RDm&eDvoRtM32%cJ%h<
zE!sv87i|49;r8`6ncsD1z1{Kdf%yGggPFY7Z;J+N=5IMxq{DEa^^>t>D|`M0&0|tL
zO$sMuSMJ<tX=u1}{qY?i=g)6%b?Ym)SS%<ewe#cr`QN`v2n$c1J$v?XYndm04R-oU
zkJs;Ay>Qvbrscc+8~iIuoj>+$Nww&k9{!xUVfvB#zE2LCyq>iEMD=aoH0NM%*0zU*
zfiKS#?c@t#-pjkmNapZi=Sexoqja9lI+nE7Z|W?A_DCLXhFQ_8Z|#=0J$lb@Vx~nK
zf3d~k9K)+-aUH!L$!UyRORsG&HLdVwI@Ba&z+*hKw^#RR;l!6dk3Y@&Go$0Aj#yya
z-21lzy#qrsL)U>^mA_;2_l9-3doJ9*FDg0fjVfnC+1J%idUc<MtyVQMiG1|XI^^`P
zXF;9q`o?GSjijYhQwsxw-9G0!2(ZlDVE6CEW7+#}>%Oo3FWhar?(VN|+Y0_|+TwZn
z+M2pI7fV;iSN&Z2k&k`mjSC%iM(04SySaD79thvNd3Q_lfA)Fr?m1j$NHBS+mGxOW
z>-_Dgs5Q$NbM4z6vMu(@ztFI`G-s7`*S@>o_g&3;`S$&-ZO>zuMxA?OKVxg?;^33F
zR(+TI)pN7h=zIH~N6td!_iruho~gc1?q30efkdfw-5+z$sF^zdQ{M3}|MacU^3R<^
zXPP6U86EO3$k=VYd+p!z<mfYE!kgpMF9et@HP6ryn|#@P;esa>>o=WFGOgeG`hD(P
zUWNoC={mc8lE))eGH>oHPu{*Kb;UH<yS=Qc>NCP;M{A$X`n2x7bc4c)t0G*kd3k!9
zYhPSYoatk>?xDi<u&}VQ4+l2({{Qob@5Cp`q>aaq)z{U1IIwZkrcEFFSfN3pm3=<l
zCsI<_(9%ff>15sg-Tkvpy_r92*Nu!zv)>v$R@kqx(W7YHj}u=`de1F$4SI4=IC_56
z-|&^~@(fE<&Xg5THQ<h3rmoNNp|_)d)~A!<`<G`%rAuh&oUQsflYfUyUCECn{bu`f
z3|?8t+<R~sG&Ye@`f9Fytwr{!t{WXD3@<{<riP@g|9@1iDM9`Cxj#=<-~X<0%i^4z
z^Z~<~Ur&~H?JJ9aKjF)hR_DE(3mrciU!KOy(0=%|_Nkhbr`|Dq|4+96FUrjIYnXK`
zNq&98a@}CzXLUdCN^_^JQ{pHKtxZfi(-T-LFTm31+|FnF_siv?pHuyRoSv?qZgy>b
z{Qk_#Y9_hA%$8h!8MZ#^^TXfqz2yq#_g3rYM(oY<bxoE0)!yDCC3VsL*v$U$0N1yc
zlW#`E&3*pzopnv}<eLW`7PMDwjlX$TZHLb+K8Cn?|F&^j*4;~Fc%b&_h~b?a!;{sw
zJum(G`mX%n_qT2O<$unmn5|-~YPXuRWX<imihdQ{iHaxBc)y*?`_Jy-nG1G~8=9Gu
zs;Z*b3z}8$Sl(`{XCE*9MEvUdSBwl@%e1o2zqS5zfBpA8#Ty^>_^p>*wRHB0!}rbi
zEc@7WGb!usie5f%*=H^sO%_Wpzr40Cc6ZIsqTf3A@2StPdG!8$d|X^zH?#A)m!0bK
zem!1Y|NJw{W7!kE$Deb~tNPRW_4UO!vMFCKq`RcdQ9XWEOT%(w?fdF^@AmQQ)Yknt
zb}sF8%)zH0c-?qCC+f_3`e9ORp$`v(Mb5l_lNaLIW;eD=Uie~dKWCYI+{Z^J@7S{Y
z=Rk%!3va|Ud!|><Rne8<o9|n&Cd_#Aaj&S{+t+!d88l|?s#(x_UYO~?%s=v>%zKNM
z+rN1AC@yU7?b6Cu=N?RBm@v)6e*Fsp-{6Z6C%c8aia5SY<7!n>R7_kUa^FpFy1J@r
z?f1Lo{dT`ztmWj{xvZI;|Iq>I-;1|L^-esUy4kX?-ul?xEt-;%()?4WPE}P^?Jd_i
z(bD4fWny7iX!r|d-ntL-?w^_aZ^2u`n+rcw9%A&}e{hAdMCsnYv3%>hV(#o!b-elf
z+hr5q%O$>#StlvY{q|UwQ|5w}^{&|r4a;8UxxO}N-yD&n@Bg2Dn%(`2mrLFq5@g`u
z?3wy~Tlu#W3=8~k-n|wn|3X?(pu^yRNUbbGKxnwb?WNyq<^|ll?RUAPI-J>f>Ip~h
zYF*#UBCev-=W=oTF)&0{`<6tkYQMpKc*Ch(O^H!V4iz4Yg4UkUw3#7gU;V>ez;VLC
zYwKdG&+6PyySuBDtM$>cW6eEx-q-&>9&h{kl!W!k)2r@(`StK{wfECl=9}(W$8OAC
z6Spxx`eFa=?y^7T@4LVI=l*=)^R9E(#*!beyrsj|#~B}6F=4kDIE`PqY`^@&gN2jt
zPgt_m|E8&N?a?b&j#@RR-R6IvS*kT_nRH6(`E|9EC0B@X9=#|y+5YFNa)uj+dfeY+
zU1VTLkob1t)BQKLUm`O@`T905k*iZ=G|bsHd8J*B+4F^|`|s61saF!`Zw?fe5!jt_
zZm}Q#cG*KuKU}}}{nRtrd@tL-%1)Ey;{F|a$2@<>t{tmQYqiDxI%yQJHZ1)t_q*)=
z?;!vB&UX3svrA8S%NqwhN~_=fK0fv8P9^d0$K`)b&Q-a0%=yjVr+xb+d!kmh|KH;2
z&5#iGtBd*g_9<7Ny!^uK^W1qW3xmvIb@g*=SLvrb`>4!eRAgQD=ESK}o9-(MaLlX!
zS7~o=&vTfGiOEGNFf{b)^!U2S@N&)A=-p*+JB8JcDMvifGMcGlSZCC2y3A+UzD>J#
zJAXaq{(W}OwN;b)_5|}vdM|PhpEz?%&~5wEPdRUVUqAcI<M>@WZ(X|a`|!1<ncR!r
zWEJPDd-Tj-6QHr=lJuT1@gnmBbNcj^4j<US`E6OMPyCjGW0N1t9-Ux!|KD|W`G4IF
z@0l2EySB~mtNnRr*Y@^I|I1tMt$14a<M5xN>(W~+&OIvpd3gS;O0DU~1ucBaC7%^^
zAMM#3apsO(*CMtpf0e|`f3LJt+dOg6iGwTmOx-f;tlKlAxtpSN)ixirTfRNwY*lmE
z6QymonFb-=3>H;s?d><RXFRXX7f!ueIos~Ha@0%NoxU$hti-3UuG13NiTLpCc7Fbi
z4G*83oP0*kZvOwH;_+{8ZGHXVp!Vv-l(aOx=xuMN9qZ!R^zy!ZQH0!?tl-7lo*p)S
zcrmVc`q4hyd9}B@tfHpq@7s6bVez4x$y+767azY=T=~@1-2YFfx}1D;!-=~bzIPpu
z&D_2EOTx8l+)tMmbMedBY&5m4Jow?QA&>AU*Teh|IezF}Kl5qkx)_$cX7#Q7#TK*A
zZe04+qOUtvl~4HBPMLcTbmSR0#0(+R5M?Ls-efuM`{dz-r`B6cqI;_OYo|@!ynE-?
zte``85`Vc1q-<EWOzpRRb5m2<+go4T?f)E{_LRBdV8V@ErP;Z;Yimz0cJIHpNMPc^
zr_Y|bwe)K?vN43t?^~9+^-{vd3BFrD9op>6;1IQPS=7&;#=W-~lfPY@wP#J$;)6+M
zk=&c4``@n*(4MPv%VL31itLIx`<2Q*+-)#S`^g~iLjKQXfBXK8!cX3{EPJQ$IOprB
zuWw^{y`~-tezQ62X!p8B)=RiPtv#r=W3tfmmtUBTFHP(J_|LTIPOHqS7k_@9ug}ZL
zIdi%=rst5|d-*JWBfVo0Im<29N8U3Hn4_MZ{cgUU{i6r#gjUb=InR-u{qFRg*jtxZ
z=B=8_?(VUv|JpRMExWv1>Kv0Io0ZI0=N)$czBwYi_s|xzZ;TDw=ii>OE}bK3BfGEf
zl9enc-ZJ;TP=3sF{DZ>&6;F1|+&D2)<MjSGiMCd@V`?t`rB%|5juRf<Jb#R_;menj
z_KCk2hJ=Jfti3i{Si~sE{@s1+V{&TeIlg`>oolE6s8c-M_1MoPXL(Y;wYzv-PHPQP
z`T8L^IPFY-OijJh(bjLS-&N1V34K2BII}CyH^2Yb!qtph85uk#NhNzYpFC+>J-N#5
zT}}pvfTIA*PH#(_f~Rla#>U6nA4;C;rCMcCRCDymk-Ine3jds1BQ3^VTq<tBYCf~D
z%3oicVM0ZB1WTTo<+PH|yaLP)<?Xl3R^*#So|jpfnfppQKuWH%Y*qY%-w{dOojV!*
z1r^E_O&0Yla5UXnnv}fWYu>6=t7N{NnQ#AJ{{Ij6va)ac|9#bOPY#@B|1K#%^xbQN
z*Y`4A=QRlM`|D4Cqr7#Sf4_|0#uxiq9u#y&t&~rm#?K(+e^R2_;hmobs5NmhWrt^I
zkH@8``!P}XV{YBMYVqfsq0~>+nD<9lu~k`D&&tp7W^v59bm`KY{dczK$9s95>X9_g
zsrH*^vorB<+m$O<E?o-xJuUm%f?dxZ^B*>xx~jfsZh(ky?7V+|fhMl;H<xLi+Lrs<
zKKVmWrCIye8~JJ1!b|1<Zk)60S16CX??%7syLV;p-HS_p!?M$Qp^Lm^di>j}-8=qF
z`71X`>1nNO^81;KG$N~gJ)houoW5Va?zsf-zLt&KQ?8g#7n|0zBIf&vXeEv$Ve#^-
zclyuHHkY?7N;y4EcjCnGu&7kKIg_7+2Aigxn^T#s<kI%>%Vqy-S3>)iw%-vhwVlhX
z`aJrT)~;EvMO2?hi^MXg_g_8rO7!T?P50z--*xV~C+GX^VibeLru9DScW-%8`EBE@
zd45}+^8-KH)&Ko|YS*WA{AM!e?!*RFY}5Sh;ai%S9<%9wL=#KHpU*e@*F{?&^P8~y
zGK)56y|qK>m;5#N{^?EZww``?^V^qUTi)4yIQc97&+oP`_iqGEto^rqdHDaYv#i~7
zKdAQXRb9NnWcB9dKldFyf9Jro$J|#hy62g9c6N%2if+@7)VY>l|NC}$eC^i{4-c!V
zs!H{$+1b^dn`5cJ|4)(Q!KtRJPM<m@BrJSfIqnJ9T)*uJ|0aF^_wVM4YJ=HpSQ;;z
z1el!d+4a~WZEMh(l-jh}t`9_9H%C}xE{$O6dpzT)(<2Es2@8>X8{co+?VM{Cc~{km
zzq6p^bpFlXpWE)I%(c-HS+t1zM5#0XW2Nm(zL!J4w$8OZo9Ot_qV4<YDmC@9moq|r
z*G^>+kP=BhT`QfEx>mMSqHSu}(@#78y!hbB7yDIfHxHZc><1>>Lo2<T4>dhvTo8YC
z@zs^he-<-1<X_lQdX3-i!>%u@t6t6a{%JG)#t9R%gNzMzQ)?V<>z7TvVm_VeLZ_i|
zWz4?I-V#5LUNfEg<7Z3R*ArD$w;w4jujrV2f9BganR$6@KYirl;@>wVLc;ggthS`J
zak3AD<%A@xLr&}MJd?GR?U$>;`mpQbt!zj8Q(75Wc2>(+6eyUOT=}NzIZ3|u%f;jJ
z^>5z4mlqUV7@`F_YhwSOr~2R8*TnCaOZ~Z>d11hd=g%+Sz5DR-WBXll7I(ZOC;Y9_
zklFoZ?#;A~3=9S5mWJhg3q8Hu;;os+nc@;f-fLH4<ON=|Z>mWtxo}1HNtngl|H+|u
ze_l9n<4y7JVlMuw9lseETqnCt*86?upPcLJwM#FiTzC;8(e|2GYO$yNj@8eut@`V}
zUt_(kyTF_?Yu5Wef6v@7t?$;MOWxf#w6AsvTkbwCl$(3`===I#9LFQq%5IG=+n2g=
z2IGRYoBy3y`S$+1ztgW~1@eE1U1MQ;MYZQolK<1Ue_y_st}DCMYVNPqvH8a8MHg<x
zMTgBjomR{z^IvQK501^o#;>#I)-@a#l{tMcGNLMJ#Wc0a4=<d|pAr6*%{T4Z^&GQw
zo%cLVcPgEnob3L732vWj;=6tO_W5?TyS8izS$_HE{wHtW?#;ZsELuXrXwLuIk3YND
z+j&kZ&siBfX-nRp2Ve8|-L$&bs30sVb<sVqwQJU&bh+Be=Y@rI$^vhmyl^0bp+LCO
z&o?&aazM^~BgHB$*T}PJhrgWkZhzH#TvYE=1q;KWrbqVo|J_>ir8+-hg^6$ayc@gT
zHQHBrGczWfKj^O?GH2ebT@nmczjwz~ys|Af*JoIuk+lMpa+n+n9L}uyB5L9rer@jb
z?^}QWZm~3Z@Huwcxmq3urW)n#?`!jKEm4(dv#mJ4erEN-dy^KdnG^f+B=_8HJbWF7
z(LJ$6GuMZE_&#pEaiXNXv__DHu_6BNtMHvWciykBfBU>_&z?P}PM_vv`ulQEtjE$z
z>-YbAwSTsK&BLGeJ>@#)N9)b&cVu4vonav_X=<{l{|=X3oa53^%e3y5d(`fG3t51B
zb&34u-LbC<UmjHRFPCTZUm_E5XM+Rdm05P(SI?yUWDpRWlOf&A&)1Q-sfOXeN5%TG
zb+40{YYs6o95z_FeE+=%JD9i`Zan+^qlz_pP1-X(_vrAy2ZiJF@9+NjVP)>F)9$=^
zorw`qmzo}Jy37y|H+T9hgLIYm3{7`(Iht<lEKW~Ld-g%p`1<<z`xh@ZuFATX7q%wC
zv2o+d$|c+iJ_^2PzlunNuZb`O#h`@Omx<AdX}`LfCOy9YrZW71_*su=vzo`*cCUPb
z!cWCVtWC4?KcQw3_IhchzS`zQorRlj#%#Wsv0Kn*k{I9fOH0Za<4q>Xt$UrcQCnVO
zj{REK*p=_yk{Swc+&MO_Yw_~^v!_^q=EZFH{AmSsMvCsNdDV94-aozOz~`?;Z6^H?
zeDZEf&dp7yPM!Mt`ntM`%8mEay_RNQU#F|B4cdEfG2-9b%-h@6o7a7)D*w)_alP#K
zi+AsC{5bgf_O@DEkPoDP&27EI#j2{lY>7@6-~5)xYqGD&Klt48X&>LLWmB^(rymyQ
zijkGtQg%hkw@NNNAh7yg=o7^!yS;4xSnry>CXBn=HRQ@XY3~(I`!o*dZ`xpzeQSwo
zTK7k%pEFw}`(wiSua|DTe&y!noNY5Ka^4+1^~Pbphgf&U+ZCU`bAJEK$Jp>`mh#~(
zEDVhIRh3j;wx9XG<j8rsY6Fg<^vPaJ<?H_#GDNHmGn>uJ5Vcn9?5rJsIa?3Sne(Py
zE^6v5i`u7Mp=a{<cXq3+wU@tBywS#9U0wR`XXj%XN&gKLgj=UCuMdrNtS#<5niQ7(
zOD^i)Y=!+Rem%P+Y`OdQRNI-6_gQ|r+kw*gF+oMo<)6OQeK=ahb2#k&?@JF{;@_zK
zt@>^)(I(k*%ROvgOX7^}CI(hEU+eGZ3Vd*_ySGrplc^zVLHTok`B`V#*5*C<{I<TA
z&wH-@=fvgKvcLA%pDeECtBZ=8y#DISAmL{&Ej*ENhhM73Tt6BYTv2f7o4i@nnzYqd
z_dNR-&Y)nL_-%Xj|E;y}_j_DYD*G(8OjTJo^WU|*|9yJqK3r1H;y7nx@14aa*^4H4
zExmbj`S#q~|6YH6eed3fgDYNt=-K`5U7z{Cf3IFk$Nm2C|DNpohzZsQVKwmj>0!(7
zZLGh%xqsi$9*z0?D}2_zjJB!XvDIE<)+K2Zr+u#<IKDV^Y0bBFZNI14tiGt_s`t*K
zEcMq+Kl=kuKX5kLew&dw>srQCn|TvvG8}GU`BD)4S#t4?8`+C8yjBNyw<O)(?HD-4
zZMg{7osQM)>)5ulG~8O&of>MnI_yuGj^Q1R6@7L^zpKAobdRri*c!PxjnSdF_;dF9
zz280_mtVZ{r*Ny&!ipCQLjwgljhCI{=Hr^HvG})2=Gs-7`nvjSvRB;LUC#gOd)pli
z;m7O@GcRy7<(j<gPp{XX`s2HH^{ZKWb{oF@e8_*$@Q&*Pvl?deiOEwR9ZdeexGizU
z>Jx___BfwewEvWb-nUr=JmsZ@`?L7pJ^94G-KHjMclUv}PDf{|%l*47k?b&Gcf0Os
z_J#`=E^N)dzGzK0Q)1h<)2C1O%i4bYw>p1E_uack=cR4F`c33=F6;3^zV?7szouwC
zHQrzIY-#vBcW)B~^J^^9bN0zD5d0gsA>z!YZ&`Ee95f1eKlMK<a@(I4ynog4ge$yy
z&XvD+G>Tihb?xixd$(-DfryQ(Q}!ekG`M}4$f;;)xpU2$o|}1jd2auc)U9UvnB7z4
z;r#pBDNhSrQs$Vc8=3rUD|xE;ZJ*-bJ2vJYl8$@4da3_)&I;jB!4#R=Z#UD=Eckb8
zYj&Vq8N0)MmnZ95Ph~4{G%1`2O*=Q|<>SZ94D~-x$AhL194B0K?zC%C;Apal+FNDH
zuz>S2N0U!R#w)(29{#Rn9;>IGeb)0wVDr%wBWV|>j~~vK{9<fM=zqMKk)wz`VpB?|
zQ=xMBT{i)ionJw#=3-P_r-eQ((T<8`$vgQ`lJ9EroKtrHgY)av`-G=wxm+@F4Hj`d
z>k)nJQk<|TXr<GxF!}Af|2$H*WMzMLuEM~!@*oHQ&WM?{Z_f1nG!Ex2?l_rqM%QLW
z?Z4&X^KNN;b?CHf>bW<^vN%NRYK42F0*8^B#zptMb+zqw+oR3~c{*g4=EZ$n7;pda
zooVr3#@?cvf0jq+ggKu4xMuV2|DSH_GcMTlZO_3K+AGh9?an>r8w6Vm;PtM-rT*8G
zrB}bUUN7~?`t#;aQ#0c}!NXe~7F7fXiHS~;`Cjr}GP;4Is5Zsu=5qP^e~<g^fBk0b
zFV`{W;r;S_exB@mjl3SlUN40w`?i0aJ9Bf|jcLrz0#Ewd>uyb)-F^C@?VdlZJcrYk
zuK$toS^MhO*5F`q{(29eBPw#!`59vP=AV7Gfs>Dc<%ipbh&A!H|ISAXe$j1=&3>!P
zF4i5nIJnA_sV)E7<=fBR3#aYxlW4jVlJ1vo|NYMAxOWRXFG~8`eK}Uq-pq3{$1ty^
zx_IrIoAG~N?F^5r<y`ukqsZLB{`rZsrq#Fpp5c*^3s)$cdP{7UtecC6(B{TOi<r12
zUXLEGzPegF>%8Zk+S)x$TdTINSsV4}UG}zFw{}aV`|N99wDR0LwaDnL4f<YPvt2iE
zOj6oimGbG{ww4($kEW_OGbjDo<D8qmFmqS@)yr3+W=a_E-M4c}>*hy`mKmsiu&$m}
zyQgWfQ?LP#@l0Obw_A0@9%_ABk-g`I;<vue8EdYtT>XkWLPtqe@9;K({QX{f+3U?D
zwmAN~*jVS>w|jfpwXIvOS5^LsUYqv&Z|+>)xwgI%ZLTdU)_YSG-)DcH#>VI?K1C+~
zeb$chi~2WN+LxT*e!4t0_i9qOr_&je`1KR=T)X%C@9?uP`1i<=VTS$Zhm32D_P@BW
z=w|lJ)LQ?iZ+rV^Rh{MM;V=?1n)xRD{M!18m+vid?o}LbieYX)JA2kH3*E|tJ1;-K
zAF%J|x!wOI-ggMF?0k7)gM3l(&1qSeUb0Wgs{HX(rA}nkE3SIGZA+JLzq@U2{lgO{
z@5py~ZDx4z;bg8=^RZ~Dl7EjjCa0G%G%Q-Ly!^p|nZ>{PW$p)s&Aoo}ZqEJL2UqCo
z*-xGMwKVM9JMO2;SHI$BOz?kJZ;><aM(D2h7oK0`b!E7qp>1E2^?T(W`L5G`A1e>d
z@6Wd@`gJ?_XSHQc-oc}f+5Ka7t&NWipAcPQpjnodbf#q4`GX&4pE)+aKi^R5t0LpZ
zP2Xnqy;HmGef->;Dc`p(U9R(GB3u65uis}K<8J1EAGqb0NAvku8>t7<H?Q5ipgKL!
z<m=~+XCEHyJS}chy75s@x5F6|VXheMtn;odDo;gagT9o9T@`&2Z;_;Wmcd{_=reKo
z!udan=TEqOWVw93UH&a)jnnfTA}qA+s$PA!E{|S&?PDLS<Am9Ky)TrvpE$Wk{$2E^
zHy(1wWKT_*(kgz+|7O0h&bQ#zalyP_m=0X=^j3Mdk0D{>EKqx&0b}XY#`nGl#Lv#F
zijTXvP~rcJr`+?BtRijF*B-fRF0sgZmvn0G)xwD{3j>3*X6wz;UADCNI-|q%n6T?1
zpB@EEN9r&!Y%2QB&~P)!rl96@@#}wn8#uxz9^b_3U-R|vec|Nvs@S~|R~JqOH4fZc
zmohjkh<9->SKhpT?dFA>-u*d!zNRBFVnTgL)u~0z$M<*fdGGzA^C|UiSJ+pF_m_6|
zKeW&j>4>lhydI(?)Ma}l?yr_*zq-iI4#ox1_g*RU&YQUHOp@ti3%$bcQ+NE9v;S@D
zSirDg+efFA3?XA_F2`dhvbMgvyZigg(EPq~g%e*BAFi3PA#<l?W%09fa_=JqSa$Bb
z&|z1kEi!$6nQ-MX*Jb@1<<I23vTS?USU0iY=Q76G59Xb_U#?S~?p(a`;ELT>*p44v
z7i2z>{h$(C{jr3q&F_zZmq@)nax-@C-?`iT3g)El)>r)ap;)xiAadW4!{?I>nH%<O
zzngLC_AmYqy$KsT{B|=|Gc3s5<rsFXMr3Enx6_*^McrEMs+SZUB`+nh`s(Vdv+UY4
zc8ls}p5!i&S)SpwIMmbjuh;6LM~jv*IAmVE`Jh39VMD}OudPWzk75{Jgn#={*`6ek
zwoSq^N3ZXpi0e~v`99gt<&2IJ?R>KH<`ne0=jCZ_KDxv_<G5kNZFbkdX{*zj`SeW_
zzs>*u<<{A5cE<^~S-ieXoV{-4)}W<fDL#>vhpV?e{cF|ytp4_YDbZ=WD!$!%@}p<<
z?SylDrI$R5v#-8mo`1$Gext!-LACsS&wjq$f8m8*=%d4ib51|&WUF1bK;x2K?e&-J
z>tt5%4LaI?`eCw!+LPV4<h?JK#MhTc1lTZaDK~3rSJ}k5Zq3?T?oxNwzsk&9&-tyN
zjlnfOy&>PCUz?%f)-vwNLeCi+?ky1g;KFd>O4Q1WTFOq7+zT=}igIo5ay={l<Z;Dx
zDrjZozs2#-L}U`|6qy|oUv@Gd-)~iw)_yW)Pa6MLU-8*d+PU%DO0R+XE5GO4n?(EE
zd|q!9z3%Q|-$w#B)|PL3aNzg<zrLY&OGQ3C+E7_F_vN$J7KIbJOsc<5oV|K2GCpdm
zv1Ml5{#DDDZ(qB3cjvN~cB$Wwo_dol=RHYm(w0jmxwoA!i}(gNZ?6_v>$dse<-6_6
zUjBL(w4;W@H#XB);`5}nj>XYaSD$D;FFZ^4*tBm_4C-?)nB?A9-27IRQ{aPZ=vUS=
zepemzr)w8@G#K!3^Y&QRf0UT~XiKRXPsY?U4;32=vwY|0o~oN3BPMTpHBnLbYD3f6
zXB#3|T!Y26H;bQ%T6<B;GG|@X<<-}|M6VIk_goOP_C?^99i29e4y(hpuXY`o@sc6I
z;FZR#H!t#nvVS=-CC}_~<0$HOZC$!!r`M`iT+5c}ZT$P$&p%G%eeV2OyJno;`Az5l
zuVs_mA}u$sHP7&W{{P2m)BH8n558ON{grf7a;=~3F^<pO{W*8P_RnczKKgX|ZL8Pr
zbqi_}oG-q*V%f@mT<pOFqh)ta|9KEE9)8hu+C681CwvXhUMQOf?qBu%cJ2GwXWA~U
zlDU1(JnrYRm0OLLKX53zvnFwsL)dlksiDuKJWrpzBd?}@R(Q7;m$$#h)lXfwiiP<1
z>s4+J($!ym?(yfAiw`H)>~)HXy<`5qM%%{XqPNfj^Nds3pO()1xAf{xskKJi4U9F*
z)Qns2x}{%uA}-I?aOcpOD=n6F_Y@~CJo)oz`~G`>&wrSpqVJhdTkIK~zSnJe*4s77
z!gG#I<1#zAGE?K#+t+&n3e$oP$uJm1`&hQJU!E*(v*F9n`F(Ys8*T*o|DV<N$USVI
z$&P&&Y(LNY@$L9```h2dSGLE8RIJ+XA5mI6vERhvgnib(Gwt;!{+vJ5V`|Y?USh60
z`~Q-|8)f+JCz-yt|Fv}XiR5orez(+2jJlj}@=_{V>(ZoWtJy?&H*Jc1seLC#_3PQ)
z{B!R-Q~MNS_MbC)ukzfu%gf(fdKGdeM4m-be6sNKxt81a?^>v#S;n?`dHmJKdfztr
z_DbLDYW2UpP5bpZWBa5SzWJvg?*DR{|Cq$=sat;iZaM0@^ty=%cZJ?z{Rl&!1m~60
zr^ad6+iKSyl}M7|YtwqA#PNtH%|529ho#MTgSl?<uSKoKGQ!8Bo0oV@+VaSP`*`7k
z#zh`oYByQL4;yqX`jE(dGI~v#%wa<wbxrNQ%@G!-lMIcWZ!tIoi*&nQFmb&o@;PJW
z)hx*iT1WGQp6zxH7HLZ~Vd#6PlA8Lk<?u_5E+tLvZr1=2RtA=C28P9+`DW6wu5v1w
zM-ApI(ww!dV9wDJ4$!WPw#iGTo_z*d$0*`^*`m8OdB@3|7cX;#Ke)=}-E)qWat)4J
z%XPS5V)u=#tq(vq4L`dQHFuZ)&9{2rq+V5~PTC^nV<p~rd+PQRNoj6wxzeDu2n-FU
zcV^wVmt!c%QvJEle16p5>k~sP_Ew%+_1UcU+wln#CKUEC?hM@b=h5m@Oj~!)E_u@a
z#`4F?a|<f7t}ea#Fw%1O;zMezzg#0cv$NfEw=cRHEhHc}$708?T$hZZY<F4LiDw?a
ziL|W#H6`}6n9a$=&sS#cTQ;q0%M(_eXYNy%Nk?m0RnMy3+vLprn4@W}amK7DttnZR
zDH&bsuTTBDXV+8RUR_Zo@j@4mO%3lKZIN^hEIq6Gca@x-zl8KeyB}>cZYFJFP1`o(
zmep(Bu+96+BU0~H@*JL&l>VvGi9uuaIqUL=CoZp!SJ#|${Hb+}{^hABb2479dH*Jp
z?@KQaZ`b0?S&L5SRdze~CM+-f_x?8TWi?&jzS)+a-XHDUlYj1+ynJOfi=&#730uP*
z7o9mr6N@>;8j~&h9<v;LwxRNj!RHT=b_^Rh`MO;nSe#R{ICDSWY<BZwi-SrWVh3|J
zN3^VM;BnkwdnC@HZF7Mbce)_U?4wE@r)_!c?k@d%V=3Rvxi;$#gg#+pIJ1&d?BJZa
zFDEG6m~NF)JVP!*r%B<)nOaW0cKIjbs)gTWpIs{8DHp9Y_%6oLbaqZt<w@5UVlo1@
zKA}ot-5bt-nrVI{ky($wz)I$HV)5)Ktt6#O$IMT=PuQ}Ab<?(2cB$qJ6GUz<&fxyQ
zD}O<2|J~geT_2dKrUvFErsX9*d+=)erfsj1)5{E8^R26ANvABGYrE<3&HJZst@_->
zCu_HL?jjG+3K)CY+dhFy_WQq>S^T@Y>h_ab*+|RXGiU0~F8|Y8Dc81WW%5ny-6Fb-
zb%JMeuZnA*x5!P~IIH~4{U@&;+3A*YW^S$fc6R=hteuBNZ?a#z6j!WM{e0%1+Dg}%
zHS;zsdUj`<{Jo`_yOwW%>-2MFUFi9J%KvrOT3P?7VqCC%d+zn~^I3knA9wY=S^D7d
z|D3;%`Dgxr`7*bBh2R?#KhW-?1uLyNiqy4rY!wT?bARd2db?t_@!!UeeC#`Kx3V0o
z>Z;WXOVgjTbyr}RoUEbb;SHOg*MFMCV${9E*K1C>P4)9LU!L+^%|E(s(z0t@&t}Hj
zzrWBiA?2#WduH$X><r}_uOIC)_W57UUu%|o=~Bl87lwq5H<HXX*)|kh%VLZdc_JSg
zSiNrTYCAn6+w}&*$0JvM+|20k=;87guL}fs@a2`gI~2$me?(`?^l3KxSMB?7<mTPg
zVS6&_T>}#}w;fP&o}BvDbgk^x?&mgLi8I=7RG<Ey|C)#S-lPLhe(-p|Jn8-}mY-o}
zWIX@Ad&NiHYxX)@<g7b#*W9W`Xuf)k)ptXNf)#>38#)da-rMzFzDYrt*XxVm6TfH5
zyyrA+ZmfQDX2zyTI}Mu@9&;StaPs8m&s|2(&sMBhwXfjjpW}=R_O70I_*vT1H;J1q
zRXp3+jx}z6wcXj*dAsea<c%|CM`=&j-(eDLsG`8epfPLJI{jBKvQ#*>9ZgC*_3WDI
z)Fo;$T8jElx?30x{bq07a{Y%#bB;O}Z;!5?{o6N-*0HoD@3;|q>dy8r6WN#>PNo#>
z5P$xqsxqc=ty=#4P1WbN{MIk6+v#S&uw&N_>t10;ffNmmi|!MwBNxO!x%E3v^1X(@
zlddT{A|ow#duyHlROyuF89Ql<SM4G3Gf}2HK9<@hXQ}FnxUORVb?5H7HGgZ=>g%V+
zZ2Pt^+<<5E)k}u6zVdm8TI8~or4}<boPKI;bGe?^dCIras=b#lPm{IYoP7V``Pi06
zGc!*sJFlN|aO-+On~*siO$vSsEq{RqI@T&b04)#ZpMNK9^<H5iiRk+=NzuPfWo<pM
z;MMjs-<GC7lGT2D>CFG1HVfyMXT*I>?AlcnQXIW>x(dVL4R)#J^EY*`+$$|NCnBcq
zR-MJ2%*_`L?D(}zX!Fycy+7B<MHbyzb1>W_Bw_kD23`h>w%I<v64y;{-CXjkG4=EO
zD4XisoRnKr53gSbO5@9)y9%%{GF+RTzt8fXp^riS-mlk=R9)VdcT-MmhS9x11r7!W
z|NPsNo*Exb3OVrGuVCSiMT-s}37NW6PiM|m)#+#Fe>5--d;4Da+MTGW;Zs&hy;z&C
z7n=R+NZzGAi=5ZWma2H};y9`#URYcFvh~wtudOjp9@#B;tFLE$bN!^xJDBABXT;Ym
z0qwLh$j?lOC`d{?+4*T!&D5yCph~j?`b-%o?7jz2k2&^~t7>X2^R0gl`%iRCSaPlJ
z)|=wrrdFxG&W7!0pMH*EGw0^+%734wvG$bU&JO8lt%5nGwV!PHvOiez`aF5`?&(Ya
zz$Z69+cP(;5ARrgLV5WIht$}{-4U}SjPE|I`dfSG$==+X&+AsLv5pU$TfXp5No}xa
zLwrltg6}maKdzgX)^xP2{PUxt3boCJ1#_O7R)&_cs%<{#{O0f!VTsOV+b+f1d_MBE
z?!5rZ%m}rJr6+DPYOQ~HAj7D@a!<CNgSE|E$IG{`OUek??mBF0HPx$Dw!7q>hVR;`
zb@vvY@!E32W5K6c<&y%ZTu+%Gl4<g)rAhm={biH2QUNc%FyFhRV0KV4=I^wX+qos&
z0#(=~+7cTQMLZwri1`Lubh}QPzUsxKC7~CuCvKdzSB24sRjW75RUpUCKVxf@febr?
z*ttcSyVkDW7Z_%z{Woq|-qnD!zd~)T4mV6sZ@4_a<auMD%IpUhOnfJW@f<ebIbL`t
zYpcZBs<eIk4u55G@O|9s78&W1Vbrf2u<Ge^eL3z={ZTg6Zy!h<Y<|4N<5F1Fjj$81
zX9ZOHvh0*zu+sWOMD5nsZy$XM{#NbLHRXG0Ot|{pPtzvvtag)i&UTOe_H({lt%dV)
z`5pJ7N~`&6k6l^2f2EtC#N(u+Gn*y}Z__WA|8b<wi@B*sT<qMY^PfOdCFSPp8SZna
zy_N+B!RbShIZcN}&Zj=qF`IpO%D$r;wL?oHbq*cZwz!~wDJ(tgiBejgwE)ZPmD9MV
ztM4m69bMFI)SmzB<vZag;-*)gS3YkPlzA4B#xE@4xFOg7sa1@=Yp}ii-=b?%rd~{3
zd64m<=10ksg_|>Gl|?C66wLXyv_1cZIj7?UYbLKR6E{ZfO{z^g!}Hs=YhT~{`d=S*
zSxeovZQN*G@M!h3ZL40}=PgN$Uh{0vqr;}X;_JS%Eav5TQY(A>+?x%yB{yya6`p;{
z{RY&q-1hR(kzMtz3d$*}Yh`15W%&A4);^ZyPH6b}Q%`Ga)6Yv;TTM=!x-?n5CqIOv
z=?>$C<@G5p8MD@{(tq<NlaIUWxZ$4otHzd@^W0WvWvyjtxUj%Nul@LzoC#C6mR(7d
z2#cC}`thg5ht)0L2AE#Bt)P9_(8fmP<l9e6f_lS3?*<%s`avi;-9YuT$EB#d0ZT%(
zotTo|q(3VuG2dEtr8DM^vh(EJ<!KsMyYBt-Tb9P^8d&NpJ~hiVB4E#U69I-_p|(+T
ztxni;F??b3jZUvE`JwX6>DQFIpZ0ybwCc`-hKyx%?t4V&EbA6cKO+|G^u?sz(Mx)g
zlDF3RXQHWY?fzb!vs1a(gx^#xn|jR6Cv79g<eN8c1m$UW#>P#S7dE_^amAW9=R+x@
zL#cD%hI$|O^5p(SrWfqBZrDpP*x1(i&$;{e!lwA!O@+VsOtyx7+HvSw->sGxnVY^z
zbzhw#G+j{G@Mp-odvltYxzpCBX^ASGkZn#7oGkR**K5x658Np+2@>C4{M~<A)8fLd
zz|#*ud|^8~Y3J)Da&?bo#hVm_<)kjUyFDrS*B@H?+?hFf^ZB>uHEmuze8<cn;w$C5
z>rL_RYLT_urnyaaTpXMzvCcfBXZmU%ixqhqzsm0a4qLr+`~K|P^U7x)RofbM^<nVs
zj9I62&z#Y><6#hS&Aq*Q<KESQuO5~^`BI*GwerkE^`bKQ)Au|DT$<P9{J!_yqif68
zJBu@Z|9jpa(~`&F5cK5RUTNu+RF;GHYClZAv?_)n<K+rnowG?&kV$36h9zr!wuG&A
z&A$+Ho#TGzoY=5Sw-#soeYD%WN9}l~jfijPwYmQv?KT&wmGxg=SNrkJR;GO%44?F6
zrfm)1&2dNT^||-fe=I@!QV%cRcAM|d&l_T!k3KOmSbm+A;rO{XfBr4!Kb`%FrRL(v
zJMwFmh%%_DpL_i#GwXfUmalKV$ez$WV>9)8bJXSUPy6=I)IIj+(P6KxhoXgcJli*Y
z`q_G=^)D`L|9$WMn@qW%x0@8U+v~NLTc`Zw@h_kMdz#H`!_uc$t{nZGX4A5%hQ%?D
z!(>r^kB6)8KjZ#=C!ce2itS$UCM6?5hhayj&GKb>>oPUA<<Atbow{gE+UCSxPnP=a
zR?__RpmVMN+JD-gr|YODZkxS&NxZ7L#MbY+mD5f?{Jf)S)2ll(Gf!tr>pzg#SMtt^
zVM4`^zY~7edu}w|^;B2X^m$xOma^l9%aa}N-Oh_<U$u7gzl3YoS5Moo@$my|!=+Q3
zZPq0mJ+z!r!9wBL>)8JuJ#*igsBB!F^6Sac)}`ud>gT3b{j$#8{QW}ux0j!oz2~R1
z9lbnB%;0pvyBq%<Gq2uUxw89h|0(S=Ht|J&US3^a-Ld!0_wzIM^vqP6BVt|rIDNm=
ztHrIC56p=ZFJ?aCEp*_Gf9L$%+3WXcB%i%#eE;vGiM)RPiN>m_g7cqWx)Nonnb@~x
z?JED9M~}RDE&A!j-}PbUBDwc|Uemw6=iz%{vl@HwPKrBf0gL*3I{L!{GC`Y#c0M)z
z88_*`L+ROP*wSQWmj9Z1H>W9Edi|$ebM|}L{F%}ITt%+Vr}d@Y&NbWjf3Clu$G|Xa
z8QT^whK$#%_&Ix2Ile7Dtjc(%ZO``F<Ntg=240?_BhL_J{mO|cIX68~Fz4-t{w=e7
z*v?%zTzy*HCbj<cfp2r>>o)U$>VFmf)k4O!^peo5W#w<~n^eC#)iUGdHdUKY=B`Jd
zE`PdLHu+}4##z0G?Jm9+m~r`aQr0Wg<EaL}-#&lj-tKQz{?H?|_MpLX1_s9Xmd85J
zI-P%qcKM_w=RG|5s%=r|>G&_7`DFJAvp5Q{IOfS~Ty%F!N&D3$Z}flt9yNO%jXJkm
zn;uH@|No*k{jj-&sfz0@w?~pU7Cd)>@7gc3h*=)a|8AOZ!MwUBU-Q512@a|>Q?+Zh
zyt7S#&-e0@tA`$bxWRHf%hcFfmg||p>svgjD`rVwdFq<AChYWsrbjtVlMPE#i|(v>
zoL)Y6e?`v6H}1{Mi?&vM{kHf2uJn74jW16tw%Fsp?N483CifZ8V&-P%;;Ps))0y_2
ze!yYK6K#`zcV6>!uXjA3`7Gk3T&IT2wXOd5e9DiW=hyb0ox<)ofpb;(P1lJ_ax)%O
zo&0T8z_YzqnP=H${tp#SV&{xz_WI~9xaiiUz)^H~f#t6g9U@ca%$T(4#lxriOH}oD
zq@Ap>^VfL)dPhiol>LJbt4<uf8!a@YHqYMovWf3?lei7?n%l(%=S0L!KCiMht$Sto
zO;(1)gPgLlpgkB230tFH&GMRY>|K)n#?>ijPlfl*yLoU8kG%BExTw-;mU|X`o3nhk
ze!upFsvqSg=8<c~W-ZgsI&ax__jaD@+Uus0dzY?dW9U(<b@i>w2-tJkY@Jen`?SAR
zC+C#9`_)H>&0YQCwF*a>i-*vB^_<r$l2<+AU{T^RaE)hY2)QbHL;X8nqvhUp51YSy
z=HvX-zim<)gTyo0f)AfR>iX)6`me3aJ-6j|;Iw|9lBH8Er<Oi<udPTt*?DWBcUtIG
z(VD%#=X*_+VX&&6wg1PvUcJiGE6%qna1<?GAXuB?vd8A{>Q`K^W_#<1ZH~J9{lcgF
zEI(bZnopm1;^y7;Z%&^1rFO#p)4^)Jsb!rUo>o)0e{a^mmMpRD*S+a%;%DkIe&&CZ
z`?Y3^7W?tYApZRewRZieU_C#p=)L&;y$@f$TYT-y*?Cp-kKDcP`e0ktQ}5sXH3t)m
zd(~o#V%UNc+8^rj?kT^hUncwG$4&S9e7rrr{*hmPZo3}iDks*Rd3EppR4JGC<^SIA
z=4IM<;=J_~rS&z(W=z_Y@x9UiMowPIk0rmw?2RXFchx9(8(fxu@8`52Re$fe10uU5
zy(ZLO+1$Tx>1BS7AA0Nb<l<|-w|Qu!ZQjW=kDCEh^xaFo|E@az)l2=4A0BVmx$TAw
zQ*l-7^(_g{R=xVQ=;3`v_Rr~dZ(cpJn{-YvrAZ>1_r79ZUfx=(sr%o5Z2x!U%mQxS
zo>-gox99%Oo)`0V*7DuwXPoO$;4m^1&Y5`q_QBX4M(dE~?w`Wv?%x`;gZHbn)Lc(&
z`~Q_qw{LSr%)bxm%QL)|OABzt7VhqRY~q_;qQ!Xr=*z!_n~xq@vyhoVY;|P*g&n&p
zZn!VH%wJ&n=iu>KXV`cSw^bfEpt;zyKXFFxwSOKLOx9jqY1!OWH{*<3mlC@_qm;~z
z2d|Yhg^qs^)C;t^VqLI#;nc$SDvRSJzh5iRI5d0eX7=Neg%e-$>Zb0CQ%s!xe*a6J
zS+9OMZ9Xa@Juz*!Sl2SCS*NRhTklnAe0Y#kqAfM8R=I5Q8J}oAhTOTlERH{_S`Bpn
zzkh9SyXTK<{Q897o8vX?V}mNciD$3-DDcO^N&B(ViMtHGcOBRDD%^0J{IBBMcX92_
zn~T21XxPs!`N|d9{7~YZQh~JHOOX$;>t;SRj_r&&@-5PiAwlBVt4DSr^G+oe=e`B6
zKz=FE8SvoMmk7P~`n{2M3?Fthy*>qQ2~X^<D9E(eYd5zzT`qOw!Rw@lYXsAN8ho*C
zP$*|x?pl$W8(Mj^y`jyP-Tv*1Jf;Rl-~ZQQ{~OHib=voOoBX}E!DY-1Q@7;Z{+t(D
ztJv-OL^M^-cJtwV&p*xj^EkbHSErut){A$dUaEa6Iq`{6K{at(*!r|{O$r=FaTl)4
zwT|Du=xmN*pHltShlQ;B>;A|_R&VvQ7kDCXntiJ4_1SE}mcW227p>a*J&PUQ6*!AN
zOx?WmyM86#;SKlxom)1ItA755JB!X7neo!6k+J(|NW`qICGU1Ex}+n%@W(&Z^Gps^
zrw-lwrx$&`b*cKQ*WK4`Kd|3kUQ(HF9h`ZcvG3u;g(u&}@~%+Q1&ubS{wm++E5GOe
z*?NBUqjAYRbrm^g$Lq9gntGi27v)}j#Okzga<mvn5i@US%k}ftQ+B>q{rKVXtE-^H
zX<mL|K9i)Nw)tSR6bsVPG`GDNriY|_U;UI{=kL_NdoA`lK2{R3<~@8i^pH(fKPU_W
z7S%tG-u7nR^y~lgdO#EXv6XLczTIsn{a#~&_5A?XiuF1Ig_V8M?Pq82esFNZ>es1-
zmVXXDJ;ZR}`tScYcfa4UY~6Oo2haOj1ix`e-)w4nbf9s;j<t{0gdWVwUVSa<`0ZQ&
zR;}H3)$exH>lItqu9a=7KCh&~7qH>f6yC)C4$}_UT7dN%6nmcZeecgs?&><jQ?al9
z$4*Pj?|0N4Kc1Xie7<moX{zgsnX=E8T@(ACr@m-?dQ5Qi$14V}q*wLwoU!^T#lWz@
z`hd*ed;KaWf9jv@@8qt&rZtU0!?7;VEi;wxP8;`>2a(+$>`q=S{IK^&L0)&~tX*7r
zS8p}`bw7HfHS~Iypi?RDRo0`CG3ngJ)z;b5HIv0<?KTHr3OR2Y6>X9BOwDGe6Z7d!
zH!D5MuC25E@QZ<A!QKUn?yJ{)e7bG_Kc1g&HtWZ{*=rl)w(_l(<bv-LPtAHfDSz41
zJ9GbE`tu|H{c0<j3+h|;a;#tUuvxuJySx5R@#KB;JcEn>zFDbVx`p-JUz@*fEdPW)
zO>Erf8N4|q>cHu)<vbr{!nMxX*VTQWBz|9=<I=H9GY@q3%-QkpoU`cerKxwXKYDo}
z?GgjS)k_<uDqU?nrn`QnhN0re-|xRqnKosmmB87{O1T#wWv{g2I_oTOWcT~Mw#Uv-
zS6R5`!tE75Kh4V3KeW1IQOem%$HGoCUgo*0u(G!3q<)LQVFMH2i7NfC<0B@OzWFon
zx>)W+|0|lp;w|%T3fiPMx9*JHzHiw(mebix7sL<L@2x$(;9zr|^^fjVi!XRc{bl5D
zu<M9!*=}p=Icd4O)V3^@f<poKpRD{_D0BSd@oLxGQ9FI4|9_G{zCXqyd+*YnwSNB&
ze-5voZTyzE^c?6^MHZD`3=9ko(|HQMZWOY5@#=+gi%;*`Fui-<uJ9T%FgTo403D~#
zu*=J?^=0IJ<`uJd{gMi8XJB|yxZxEa14F~Pg6{?19y`~*(r`!*x!xr^Cm~IcVXr*c
zRI9`H@9Xb3k-YZys>{mAa{IqughSmK8D11lc)`rT@M1~m>M*gXDXXoxE*P3Pr$0T;
zFJ<F#wUL3LN(Q1m^K10#LwT~N^iKtpDlFKm(p!3caev;uKaH!H85uN~A&NW|1Z+C`
z4Yw}-XR%Y)&@@UbJFL{@!OTzHMtyVso0<N9C4Rqd!<(()A+mf74w4C(ANZQTUiq!|
zV<+<kwys5bvAg!v$FIM&ta*{<q!+f?mn-=tzdU^A%fz_mH>ZO<(@yVp$3xf6ZC^jv
zo9OYt-jAV5KJR+;k6eC+3mFEb><xZhU0t(mDnH%aoE|F60XiD+K(IsMuEPr!-8Vm3
z|4zj9=#e99;`Uk@8eY6~Y14uQ4Jy^=r~hVP;0yV}$gr2;$r@R<&bs?8i8toiR-c<^
zD=jCt?p1_Cdt_A9zMs!#OPl31RE8~>3yOm;OcOSjNvQm)6>dv>`t<4dcXxmPe!st8
z);cUIs!QP2_4V`DuV25)nfd(p4-XF?IpWe15D;)-neXg9d-jCL3I>#e!n}&{M5Hy3
z(BFNYAD{aLUfGy@+$`rtKva~LP^XNHOo)_J#`GmimN2vPy}7qnTJg$-3k*wZFPM2C
zJN3(x^K-qwuU@t4+M3A4t5!I;ySlpm{Q0xBrG<r^eYKU?f@`Rb{d1?9S6f?qVZe+D
z6BfL3XozZdk!QHTec;n9hK7Bq$NOYEJ39jd16T2}FfcH@h@9|(`GTiVXUh9~d#k^{
z3oTVxkeqgYUa!EZ)2D+=6&!p6MW)W4eOlJt)wT0z($qF)28OxpopubeY7;%S<=$Sl
zeEIgWx3^MHPg`jvbHT7cTCZZ-k|iqo`ucMH&tJSavGvE#pPa2uJcqx%yXze|CF?LV
zLqlIv=5blJ;;p~ccn%8*3+Lb2v2e$febc8;U%q^K7IUy=aq(wXZm}LoW4Eh~B@Ate
z1@?LYE`e9tc%^r^&YXAj^5xHeetzC?N{qpw`9R-1hArWaj*e+*X+=ew_NZ!tfM=`X
z%FesH%cG;B-rd-k{O!%n0DX2TccqCImX=eePv3r5*V6Ll#fu-my}do_>qaq#3)2r?
zk!84*{p-ui-DPjJG&Kb~T^t=9W0IYnnQw15H8E*vY2j!+bhKOi^~;wBzpyPRoTeZD
z?~YD<-n%<Hg*unGKW1cTc*nFkz=~(tyDz@}|LznQ7u)}Mz+7Jbz2EMaM`+;6sTVF>
zINB{9zo(+`*O!;8`kq=QyyBYxI`_Rt(pV(Aq_p&Y#be&=>};OHIk~xCzkUr43ab10
zbb3z@&$`2lT)X+??bdW9FfuGiR!Dzq;PK`6vh=@qG`o~MXE3!3IElF4ym>S8h|t#w
zFPQmU1Fv1X*7f?8&m4=w+uL%Zx8>|Cdn<K)(c;CQKcBakx2^hesFnLuo<So!!vevC
zS9}byOp*I!JSWN5{YXqoQo6I9!NfH&abeQ5{QUg-FE1{BzgO))@2PUjtXZ@8<ZNcl
zo42ka$;GAR(;^mzhI37zw3WN#s2jhG#e!E33>nj3yvR7(E^VH7=G?iws~rNn%HBq$
zr7cVHPDx4eKhDO$5DQ8@3vL&9zdOL@>=1n9$Po>@FCRZ<hVHDN_WJtz?>;UJ3>U!p
zkKuy*)G1Rm?6z#!knumo=I6Ve3=9jlB~%$QFf`bmI(5qHW1^Q=S9^PV(&-jXVKtu_
z24!z<>@I)*?|uFM;2N&7b4&~?>{q;C{@^3jsbXSM^7q$QW_CUo4$js?4<0<Ya3NsD
z6UGbHJu;R-A0Ms^UcP7V-rCyQr@GhI#opeOdU}GQbJSW@)4D$us;wLh46zKNwG8v#
zU0UkBe&4TEk4lO+M%4WHkeK)PjcxU}HBno+rrlw5SgiT%3&%occD^%nt-oK7ub*q0
zJ?+oC=)Bn2S<6JL*;rUKwA~mOUf6g9Gi3BGTA}JaO~$flNv~b@^>u$=E}y?Hc6VA{
z-nuOZ7#QxJzIH84L*&%<qp1>V1_lLhZ*3J66r8Rf-`C&2e*JoRi-LrppddfLzDJ$K
z&(DRr?qOiKV7TFXaQnfw$i4S|eSKa2{@&erAW&FX7;rtjB{3o(ARr@S#VY1Z?wlE{
zPbN*8#KtRiWtHGz18He#aq;P|UcFkgMyJzd(T_K~N?(_~y|wg+1S7+O$qJ5)59}vR
zn)D>{->0XikM~F(Ht;DfHa=`{>(;Hnz`%As*+m*%uP4lzv#0+5Khx}MEA-+R9Hv)P
zR<4cSzV2#z^|VxOFqr>FUxcgt&5ea?UNA5$@K(6U{=l$nk(%!;mHLVY2N>(?|Nr~@
zyI<0{Ej2Pe{{Dsy2JGzZ{&qiI?xnxIwY9Oaal=10hFRIi`(*j$?Q+hiZGZOc*~5nq
zKd8zvI0PS9WzAqSZPqNU`D;(FT)8q)qHXpXQCV48IXSzkFE7H<ZFlyoF*r0&P?40A
zlM@oURJPr<TddPXNnc<8sS7JKP4=s*s&35++#}ztz>%K*TswT-mRH3O54Fnm^DtaE
z+|=CcsuUOyaA9)!jedFie~*rKxAV(C`&P%sz~IYx-=68ijm<%2?(Xj9=G!YjKa;hs
z`ttkz{`{|R9v*JL`sZFSgG052g+;;tX{th<^XADpd8h~-JYvJp@T{rJj-mhL`%Sr^
zg6-5)?ecebe!kg!KH;n?LzQjiQ@Kqw3=MA0F7ge>*Q{AH?^fNvKR@5z-v0jX?(2sS
zKR%h>>XgWToRuM9-h&4ZR;<u?7ojvU=k_+=!pAlY3>Oq8ykP!t<HSVe`CqS0(~TAq
z67rj8bFy~f`iw_MI&Edd85}C_RlU}=x3_;6;qR}ntIPZCC^JKbhQ}AiiZj=*Zx8LB
z1_EME9%_?yqqdwlbm-CY`E`d3d^Y+gBrN#k#KQ1pgJJS9jl6|lkBY~yFpywic)<nM
zeC^t`%a?=y6&&pn4PNF`SYBTLe(!f49v&_(u4#I)QZh0%FD@wN=H^yzKRH=_wNeCw
zga6I#`SRrgA|fo8zc4b);tspZ_`q<I%K7>B?_az)VQW+J;=;jZ_Q+{ZKmXL#)#X^&
zEv|ox`%ldL2@?c<M9DYArJb2!IBnXrrAwF2Hp>kv)nQ<`P#JKM{eiuVjLf$;HxJ92
zo0<lSxLz&^4i-La5VJT$YpU1MJGZQb)%|$*_`)LBFf_<*PB_Taav}Kres)l#iq<kj
zMQ={yb;@{qYin+K^p=c^@%4X~PU&D^IAvD)>dKTUB9mJFt1>c3@o4>GusJ%*G}}dK
z;-i{c*Jsb3-7%Xvfra5h^v@qZbfUNUTnz*@`5b039k^_1VR7W>QBg55H+T2rM~=L?
zx7S)jL&Lz}!s*kePoDJLH=mDTL9s?x*Dl$=Z_TYUXN8sO_`6@cve3SNg;m#bY5T-G
zueOIB)K_9~xDCogGd(7i6o3E+A0Ox*Sx_EVW?EoA!9(SD-HrYA|Ih!Gb>sUu=iu{9
z`~NZv8q!{DVZZq<FK+U3pF4Y=GOMe*hq|*c1O!h2wGabVxpK#uJ+RiF_m{CzcvYXP
zvY<s`{^M;m7q`8N`e^aLGgHzt;1)ZBjp!LrBXxm|P^XG^@RMgxcq8ksOG?k`mo<EU
z<DxLAZLwe(s9D0Wz-E5^x25kdM6T*v^u3_$!>>2SH+G9Nd?<m~C)Bm5PsT1S|M9X{
z4!gP%B_vhft`kg|60$GY-5q50%gWc+-mYU|W_YnSq0f$ifk9PMM@J-Mw%tv=%r)J;
z{OeZ=Crk7tN*umm;`=g#JI$vi^rqsr!@axH-`&}7Q~c>Q^If-+yq4&V&lmsSX`!3Y
zIeT*Xk++WvPflDN|MS$98=Hz3^U6J#K5f>+_wTRoyv)e3R|3>dWLPo7;krV?mpgZw
zLK@c{Tyt{$`FXpNvJND92Jc<<xN2A7;%6^jN|mLu{1-Il{pu^|WOb`4ld(I~%~xE4
zl_A4w1voHmc@A&cT2jb!+<?b<#=Zj?Gp<*JvVZlFxOde^vhCqrQxOIR8*Xr$`U-Q~
zN&eSTt8~x2-SPO;t4nY8sB}%@{Uoti-N1!Ib?M#Ath@sTGRF(rmiqRto%4oWsU_=`
zmdj86rJKag|69zmi!CV9yDpIJ@C7I1+e@yzSQy916x$qjJ*U(w*10s#v1@B<@ZKfM
zR;ZjlnAfm&YVph+3c(`zd0CI2nXm+NZ1RbjFi}|jg6W4(AD&M9({}9Eou&}uWNpo>
zK@pQ|FI5)>M*5Zd{(Qh#$FcC%uT^)NM69#Jg_XOP@B8Hw=;T?sZtm38i~lmLYfYTN
z6Ic`KJF{=wfx}1LqrI2kzL&+|aG#+S)Y5#lXx+k9D@@eaYuK9U`6#V)<~VA*XXd=W
z2M(Rtx5DK2`N{Dcb-D#kY5NoxOBo%=W$_aTS90F+!-`|!i{I0eAFr$0`J2l(_q+V9
zJ6Cj0>U!|*7L*beFZ=f@|G!FHcGk2lyY5V0uCml^{?FgjJ61g2$+}YKw4BYamtS8@
z{>Y!7mCfxJ_sdZ6=||i3l9q*@nHN<~?w2fncVT6I#5CWNJIeLmT({<57t?L^(cj6%
zv+`cA_44<2Kcp31j7x&DuDsN?553+s|JR}Sb~}{T=^QfnbAEFC(sX+Vj*}XhFJ{WJ
zRUKR0=Cf2Y>%RQ^@axmQpV`gF@M0?@{p-Dw&gwet;;MS{(W<0%WqIjut*UNt|IPV*
ze#VY9dlpUbzE;cTZ)9XJ`DE0gJehfh4@ITDm$P~1-srtxsLbR!>3N2|L-+d0)4ul4
zp1eJHf8*9t(eCGacPmw_UU;zn9dq3)&E%T27u-EEId_l$KKEJP^7N4ti<YfR$~y4q
zVY6Dr4!-lJe5cIM%gZu8S^w}w;^n62dnSj^2#ZmZdT4v{h=+&Jp78iz2`~TjZVNj%
z@7>~^=UDuH^v+nhdhPc$;_u!W-6{W3@?X$+?i=>BE+Ijua```NS1-=bec18%$A^Q$
zXMA!F<;%YA{4T?Ap&QhQW?*=A=-8!`=^tELCQSb8(4-*f#8#zdSeRJ)HMC}*nbV4u
zI~~K_&mX$ur#4y6_WNH3^Z5(o7&#U$+9V@$c=7w#Cm(;<1f9NjD|A72hrl6&JJ)WB
z9xuo{*S{!zZqwtIi3=^SA3t;C)`<uAlap5;x|H+t<*_!WcMch8s~78LOf)N;zIk(*
zD~F`y48@j$H}<oewi?RLf88&z$>e?b^?+Vb>e_6weR_Gpmd`upi`;D7F2uk9iKRB3
z*1tQNCtSY&tz60|HAcYc#j(4WW0X&C5?A7TWbx7IfY7?uWhp$Td*r?yn#{TP(V8mP
z+&POXK3(pQ468d~z~dVn=G0za{a1Z<dW4&t@#T3}OGVZN>93q9pPl*g#cN61|0N6z
z0Sv+A3=9k_SZ7VTX!3QwSlc;mAK_Uy6<anH3E!;0{Mwp-T}qdb*qIprNj5DP?y}e4
zj@tdmV&V+3v!w}<(-x(0C{9bgk^aW@>b&5Hw#1vqm!H0^8FlT_r4zF1%iMnU&RDrv
zx1wa7Q@x%4>P4G8w6YyJmZlst+ir3yzG;uTx!URvCmXZNw@6QzDSUozw}6)B>8E+G
zSQ#3=HFtqZR?+O7Rr}|QM8>M0JJBgT>t+@Im*=-Q=M<Dnmi_uvXRiMKAoE{Ar|*;3
z-M+n}{Vqposf^734{E-_Unfb~`JZ+;U-52>`MK7=Q2}!@({irfh_Nqw^5#>QQ(#?J
z$TcD9`qGx~Pr}4&KZ)4SpP3o?{k5to=gPok$EGcP^yiULV61bfeRTQrx_KN6g$m=G
zPQ5+I{AbJ7lJ)NM&j=iS&E1o$Gxv}C87Gdr-W==K>H7QhUb`svrChE{VAJ-u>(vc@
zeLU~$WV~B(-s2xOZ-2C#_wt@C{xo@Y_UXx&-@ke-`CNRda!b;qL&tucd7$<|WNO;-
zRC@`_6tB9#Uk{D%|Lo;hvr5z4#31<jS2sq6SDe9Xlp4MrFsQivOX<hX?ZRz|j*gBC
z7cN}Iw?tQ>4c70TV5e?wUjA&$f}h6svaX&p;5i$>;<u?IHDlKC$M$tysadbJzOcBd
z99*2ql_+7J%cjn8M5%3|<g|l^bF|-jr|PCYVq&gM&a>8%R6S}abGTsEGLhpUODed+
zuc&iON|fYLY)dVe<DheTlaA-7j9G^a<|JlJda~7HcA?Dr{1t{K2C5(2g+HbmX*y2O
zIc=bGSXn-{Z`sOQzqD!_1^bUL*N`;#oxd>iomR}pc?uqF%M4}I3z`;b@*Iw6Q}mQO
zy(!c*b<#4cg)7%?oAz$=y{oUHJ{}Nk(+=Br?WR08!-DIeMkxb>=;1<{<MOG;KJEE=
zF<3%x|J$jjpUEE<_;>$y^iLaI>um9#&XwDA<^OngEl-d*Rx5Wvuunkg-|fk}Eobar
zBo;5Nn3ALt^5(<)^v?f#7@8EG-hJ}1c)eiw4BPI>{e7NIQ~DbdXRO?~bmhjUo154f
z8nzvj0bTaVz`#(Y2pRzajqSW>1?NxDZI|Mpz9vYlA&x_+mf_Z=J9qxv5d#S@n6h-*
zG35UI`~AMGj7;ABeZ2x&`ug(?5)XZOc{x;8gkgcMX{qSZ)J5OEFVFB&n|w;%%p=R#
zm2>8zmQ$}TE&sND`V||?eM>g>rDe1PbZ?n?yMmj6A%qWP$)>EUt2S*is;{qanb6vL
z^y};E{W6w|UM*l?$UP~ddZ(K|zyALQ>4oWs>n7Ug<g7Zc>$AJ?yH8Tqm*C&e#Z$LP
z*{dpl`<^^M{Q4B-mafw-_U$zxLG!M!yurw@z}j&U|AFE+cXkHX+0^~1SQv1_EuEnu
z>cEC?-({_{zCGFK_^I8=`1Z+v+_G=kwiMR{)}8uly?ol9ANyu@iaMRRcrN+Wjs=I)
z%WPhAGcqs)NP*hjeV|*)va^ei2b^Pf2o{;%x#(T&nRDKc<erJApD=#^>C~b_lX6-F
z4jXZ52HxCxve&otylg;BXpQ!_nxrg~!xvuMuiYd$ZKptC!9DJLsTZ?PRPVCj;gYa@
z|K|RFn`9LRh5#XuHT!y{&6Qf%_~m$>)-aej)g@LXWr_43x3B-Y-TM1_g_d{fap!e?
z9?v@~a#VfEoo9Wsqg776ET42a`Ig*<9Xj7n%$)m+X>r@JTemkpfBJUOpZ2z2%fb%T
zt^HM9-ItrOMpx_X%WczH7#L(hLj~uz7d&)oxo~G^F=)7NL2OCMmu0MbYz|d_YMS{v
z|Ja<w|GEdZHzof#p%|RAHfEl6!j-+;laJ|rk$dsp`VFi5Z^lm#Pib?#&Al_vYSZe+
z4-QRQb8bHy1H%g=kVovw%gbes?<|pLSn$uMN3Ql~n(7<%#Y@iW_QuKt#6+r?Y<=3-
z%X8-G+g{(VR=2ABZI50!ux8u7P2Ja7L3f0^$TyTpn&-{gy?ghn#S9EvxDOlrm%AWw
z=!cE2+{xuD+_N*bZ80e=anRMBdu&<NyB#~12HLsD$DiM^?cK|pHMP!L7w*e!cV=g3
zc*opn$8cU;etyCKx;y88*9Vs>Ff^2D>Ir+M>T)dH(Qf{BO)O`ViTT!(`llQ?PNrP?
z@`hbj_QJ)y1AAKvrlqD%F$osY&)>eS;LI7{ilQt5*f@S{wJZa}1=S_1m>C?_28w+B
zwJCJ^`6CgFT;=!IX58O5f1O*5fw_78znKgSR}0@g|9QRht&x{k;3e1Mdu|++{4%p=
zNPYdi@x0`;jhhNmB%~BoGFScod?cKAlGL=+%|*iDEVWLP_DnfbZT@avX2uFf39r-p
z?C*VdEq}gn-{Ix*mf!#K@87?E>C)`{%lr2&oV9yG?^5GNVM)uvzjNEQ*d|OXjqhHb
zocnOapX+=K3`L;Ms?W!docca9&t^*`otxbxVDylGVn^0*>+1TiUzcl#?_Kul1p|Zs
zbK?pnr;fy#Y@TcP9pE@@&@w?RzPj>)`qxQPwvCE?w!h4x7cBn&Y|{DYxpoJxrZ=qi
zU+tEwdpA7(m&2uy^^0{U%<mI8WS~=UX;bp^?-4U@OH0lu>`i^tq&=~{>3PnJh2k6x
z3~yP2%NZ)Tx)#MnZmQ|}f7<Qr<}a0gpUUj=GCIX-{(Mt>@2Gq<X(N|13&R%P;|0vN
z$v%nc+B}DOzVwJ*{?aG(;)Q+XuC-H7Z~3VIzwpoLph7z*4fX#ICl=p7Kl58#>(1Ea
zpc`!NG6~f(M0NN3Z`fS6vu@KRnfXo0d&15qN#q@pR}!rJTK=sq@;3uR%LRt;`Aa{W
zOG$GHIxRaErY)XdyybI1X#fKQL#G`B*SydZ^+Hp=F*0=Z@SffJ;}(aabFHv!ZsV%M
zj0_Ad3K!WO*1dK5H+jJpeh2rPw{Dqvt<Go*D^=L*m31w)ynlJlEmj5w&^T}-RMGE=
zDm$~To?0|1CzSnC^#z`}Q{~^kf4}^d0|Ub=4x!o$*Gsod_^+bzmia>6>ibcme;>?Q
zwfKeYrsBzF`Trb1UEM1pD!&%If90k4AJko3V9UbP*u6SADa*v?!OLAng^pML8gq-C
z3olh*U@&Fvw0p65R~*C#8U4z~`B=}%OBQ|WK4HCFwYPK?pZn(vJacDA)qeP)ZneyG
zqWNJ~rXAlwUC0}grOTVQB}(kcoaMXk=2}g&eY=DHghfnSIZZWUhu5zMX1gTXSXo(H
z+uBxHP1u$oAtodwBqOutmBX)H(cAOnfBal<tB%?2qKM~;m)j=k>sAz=ymVA$<+6v2
z3|CnG^fA<WuRfbsePaL8+8b`-4cmVF{=M>T?2<cv(E-;O88S?+s{Arn%CGx<)^FCe
z6P&XqtM4_ay`>ZCeo^w-vuCHn^@4Bz538Q#q*yO@?)5~cI_;V}7beAi_;|bh+uPqO
z`KNtj1XXHLUcO&cg--61|Mvd=|IK@sE`R?)vS!{kqxF0$y`}Pd_Z#p3@-=jI*t)vx
z(D}2jt(*giAW)?j8u;q$j(g4ROKn%g+Wc;AxLB-sI^3>to#TNQJG;~CCwyB__F}@r
zRebKAyUH`?o@->S1nF8(bISXRu&~hF9QNC{cL-W6+|u2oE(q%5tC^IYIeRv=RL6Fm
z`m}2=Wg;f9gEV+8+vD>8_xtY^J9>g{J$1Of=hyG|H@_}kwfKeOs{lxxf&5|O<puJ`
z)eRiU&O0OnV<TqVmbEU6QJT2IYJ%KCyVgJIj+ycx^G+>X;u5bT)-Pe>Yk8gNtx3{{
zE%(Ah!p_4z)-aFF`mtSm&m<$B#ji9RcCRRgBqGq9S^uRyyqk|qb>-CDuKrU$$N%}H
zPj{AFvF<&~+mTw>G~r~FfYY`xJ>_<r`rf0<(mYW*`l}0-TLil5E4*VuZFbfkZ2lJf
zPwMAg)@!%e9e7XfPd|P3?AEPYTX{1W8Kk@>YyEmE3cC78pzd{s&z-Af^O96cK75=f
z@&CiK1OJrMed}t^U77mW?Y!=Kjhyp4p`HI_*5zM?UPx8!_%gLrcdFZFuAlx*m+Tm_
zl+4Y|H8eO58!QYsvDL!L>Qlv@MrQW5wzgGfW(*83SbV*{l$L%?_pQ8pJ>9MS+@)(m
z3M~b595@77GShNQ59GR7pFjE`udY5umi=~=W%>IVwKJEUIg!slV=I3HSD?t&^7nD>
z?#Gqg`)q#ZczK<AbhKODcNWWkGe(A4u9JmoZDS9w%ikOtHShVI^TLWpHsyF$#`(lV
zIGxI!wQNUv<g~M=e0NC}>jh772sHW`Idf6VY{PWdpPHY<X8O$1^x9GQ-KWY==JX~G
z#g%JRwaqn^)%Pu1_bBX)rDt;NYVYgbS?gTn9<@z974=TFW&ZA8*-l;}<#(Ta*&VLL
z?|RSjXl;8y#3WH^`EzqMPWeCFrP!h|%j@i)=Xb8gf9^Kg^&>39%2)r1J*U@ih7~NX
zfzE9_k-N)sZ{Jl?QfhHZ3<;T1w1|nJVcq2=F8j5QOm#h)x@gXy_HwxxM~;g;wSOMn
zJM}6^{=H|Y=~MS}wdXhG1aE$lbAz#MVXlsB{vF%ku)qUztG^!<Eld?`dssj3kCyFk
z#_JV-9>v-D-#&5R&y}U}!JGd%ay%7V(sq}lx0Bnt{_FO7q4lPw|I?qI+SJvwWzBET
z%yN#VoV?6kLX{aG82)E6cAwVf7Id1v?r&oHTeH$TkB%*4lR3P(X!4^;`C?Pkil5tg
z^c^v15y+Zoc6Uedse8xHdfj;M_=#6_Z`$3@uVHHe%3m$7=KdMB%}v|P=TFJ|rm64!
zj0`TloW`-6$?G?R#?3Zf=}D6(-@aM-?#|A=rHM%l4(~6A=NYV8qo>HRX=P;4{eWfx
zuhYMlFWPj&xIo3}#PRA!+kg9CztXAi_Qx>mg^4)3ev5$Phn|12U+>>dwfL^;kmu;N
zOk?Bz&jBqLrW87+9Si##@PE;zH+Pz@Fs`%9^SfvH^JL_rBUjhgUA+;pe(BfwQ!XAl
zvu@qKQwOgxAKuXPsAt+Vw<ZP7IUi)dHHBQ8r0F%|#dd+i8wwXcOOSZ>=)u(J2}uj`
zn*<g~T3PE?F1pXua^dQ1_n5hRe%id9^JmIM=ie`imLgT{)&FF#z6}hD5Uw_U{q^hP
z;}&%;m$Nn=y0m}k-&_CA-HWgN`|?!idd<(TL|j3q(zmv@etv#lUq|Q8hQ#K1^X3^b
zGdRp#v}jS;`+I9|ELy$#_c7`Gi0J5KiL~tO)$7;KpET*yY5n~vDJcpqN0L5%dU~2)
z-fqpJ3Py$n%)h)`@83<`asEMPvimtHy9^tr6&qBdwX*s4mwq{R*VuFAMdrJ1r&2D>
z`P07am{?3bdvtkYpIv!QO2RSOh*{sWCz=%=KYO+}JYSY~f9aM*t0Lm|9ET25*fuKm
zKiS@;sBM1n;5lZ+l=Qbz*8~2({b#DK|M!Mc?z7KZVr1BAzkj}E@1HaMzD7*MtlZ?6
zJ)n4OSMYGI4enYt>GFFsQ_~~M@5~bWuxW2^^!dH9uU0-!dvg1W@ktNOz{xuCexXZi
zCwhGOcwD~z<5BUcQ>QjIHcoij9M`jGMdjybn%jKlSbThSbu}j^=li|i@9loSZ+FJU
zML$13kB*AkwbS<B)aoZE1ZNyzX1KsnyL6HM@w=Vgmqk23iC%w^lQqqNCpJ1fGe@K5
z*~vRBQY|h&HJ7jd^X1tk{gN%L=I`dMT%i^CqRIC4n>Tx&JZx51YT;<AslDi4%6s+t
zV*h)!1*xZQERYnApZjFLhUMFHPfzR*)BiguaYj*LW9!UV-&j}I(9XSErP~s(nx-<v
zGQV&97hA_~60}|XljzPJ(J9NP79J1V=BB^L;>f*|Z+uSd{c$6v<-(TAd(E}Ku3k6$
z`^DG7*EsI*8+N{pwnYk3iYABdM`ol}JiNi&BGB*NGxya)`<st*UhLg5<4zvun&)1>
zO?;0Z1%bVPKAl$go1>wpH_tfT@BhEQf==t!t&5C|ym;{<i{p)3w@&%5T)Wn`{$Gu!
zXXotM(Fq9(jskZ@c^Fm&MMOlz#p%^&K;}UsH>bI}yPuYx4W0*$2nbjJng=~H!!UV@
zxCR45N!PQ`FOqGEk!`#Giz=#2HNC&H-c@a~-D>;t#cThRMfWwYt#%D9ES%X<?QwC+
zwrT6OwkCi1d%Ej(@<yI!fl2Y)ibpo_IC+GCGSZ^Ox)V;#`pk7%AnED(P3LdKuHLtB
z*~X22;qLp_E&LVd#Nu?q;rxv&H!hvK_0{ncZ`ZWU?3WQ-zi&qF2Hk<@T~hjGb@plP
zRbA4vU*)cy<9+(`D^*jYNN#bTnL8G^-nw(J+%H%&F;h0Z+*|MBcZnQh>l@D>ygPCK
zy9?ikZH^qd|H|U-#9sX7o6g%?nmOy^+y`d)Cp#Pu|1MPDx1&U)e8KAFTdN*VVJ~-C
z+3EUuTHl*{AF38@nLlgRuG-(<zTdB}|NQK%uCDIOmoE>u@oH;oI&y%nZ%;ozPu3(O
zASdU|larHo?k{@z^5wyU2ZNXSMDDHnI@35EG!r=a<h*i0hAVTEocaZB?I=txD=S;=
z)&e>+$H>@NG+Ienx!MX;Wm@rie|ao_uWMI%<D%3=bEnT;mjs<cO`l$0?0@Bot?h5k
z)fydpilr1w^c8K?|1aEg_ipNs7m50R3jdrgPGnzq&q}KBwZ>ti;$?dSBSSyEo|r4R
zy?_3$J@Me4u#A(2n%<ga>zb@Lt}wCI{oT0w@dKm6fA5dm^>^;pGTE%HCoC$Gp4KJg
z@>8?Y_2tHo{*ll2uiDm=IP=V$irU7&yt-2}we8*SS*EVYfA!RE*UFs_U+j#XSnek-
zlD<b^1B+tF{eaNm_=%cc1@E4Rh6YcYJN?Y_>}XC|10MUbME@sqFPk`Le%!r_VWL~W
zxl2~(-ibwKF6CG#{;cx)b+e5+v!}-veyo_YjW7R=NPpX}w3ZA1)~{D;S+qX&N|?FY
z-Sh4of-LW>55D~;E9ms%Zf@hpjg`HVrUgEZ@&7A%`K@5t?<Sjh^X9GJ|8G}_*4;go
zpFcf4{r&Cj_QyZgMsF8z+P81t`#qog_V54SZ~t$`lqn&xvAqIO`|JL8>+jPL;bLVv
zIM25F(c{PUf4^Q|*Us3Gb@a%e=kcri`~9n`s;d3=)cvhG@4~{saF;V!C;a=IJ9qBz
zuHG;A<l*h3g-bSx$*32|q)V`E)bacz;KXzI!TE>}^Ok8&OD${)c%!eLxoZ6yEkpCI
z7cYvP_}#7DoiZgPBklC#%!?+j0xHgzCHjOd950HrCF&fWpt64F(m<_TvkT@6Gr0~I
zw53K&I|vy>tJrf*_>1JUg)5K0{mN^)%c_dyW5%nH<X~pU37_uFO_W@@B{JH3diBYg
zd1BZ70yjOI=4RWND1P6~FDdIwU+w?mf`S**F7BFpC~f=W>XNTMa`Sh@|GIjFaekNg
zYn%34Z!LDP9NwV4{PFi%(Q9{9e!ti)&MeO7-EsEs)7>36qHl66ynk;0&%4LPC&`QW
z%r*Y;S3lkV!;NE)1<f~atK0gqXByx8V^gPWdUR`E_q5cRS&>bxtCzgK{i3bCegCgl
zt6N+9^SC7~i=K3eYERRTzjxzC#e)NlO-)R-wSWEXeyS)dA3k}~Gd}+Rm6gH4%l)2O
z`OmewdhFP<?f2(>n#g>3!-540ruSnx4sVz+VZwt438CyvAvp(|SdaJ1Pq#mF{`~&h
z-(}YSlR8|Kw*LLg$-p4PyZXiF$|x1bM-qNQOKh_1!>08MC~-_usa*T(G-t_|x4Czo
zMA}`SKihus(d!2d=eU0=<WcvOYZT^CoTR`x=fSay*DgH`JF3Vbbi8nqLZ!-l>pG*;
z?i>$q)ZhC0wdYBsos&nnyZ=U~{$z{kPmA><@A*yI^X}BAt8<L5pC~UdoPK3{hxcm%
zCrN(qWtH_mpEWTn|B3yhw)69kBiqXT`pWNDeT{jv>}|22lSSW7-Yq`<dfPUc7L^Fw
z?U>vwu&LN&t;qHHwtvoVy#MY?#<c#bqP4X@->P0-?mzux%Ke(pXWiv%RsJ78x=F`;
zV|#K!LPBot-QI9^2h}xe)`-Y2Te760qC#Vv&kTcyo6p<ruKfJ$dVKxeS1~6(F*3aJ
zKP*&x;k9P{=IC<$*>if_%OA1n${*g8Qx+9j=vZ1+^s(F9{nJ(t&sy)SB*F6fwToA8
z*cFuYJmJ-q`-g6XO!(nnSMRS~tnDm&*M0t@81{%)T=PD8uCFdVy{2~7vdmdwIf)W&
zi&o4w&#$ViRBZY8?|1&JWs%d47S{av@loAx&V+JrPtV951rLMSSREGk$o!mdo#i*z
z>gn6JZ(slZar$}o^>w*7H>IAKpvcL|*=2jYUw-`(0Y-)e+zJ=jvs`}8zRM^3R$@<4
z&&HJrukIY&RTcF)UUp|<^n+Ku!F+!!Ry%}brYPNz{q$<~dw)5jOCL{v_g8Ldxz={A
zOf7kNg^TNw+txFG`n|ZXF>%=uaRZahpU;QitEo5Y_c!yJSD9U5{wgWcURCw!gM-aU
z8-MJ6zi;yWu<B1wPA*xp#IpFAPUNO1U$4hszj)D+<L{@_`avs8&d;;8w6uJEZEbf?
z&z)VRudl6*-pS9*kYRFkj+|o2g9DA);p_hVdcA(#x^<u2@|v<&`yXXwWc1<`U|`tg
za`@Sc=Da0g#b2hHDeo8ECw9_E=kz9({*1gyi4tjP3(xyLekdXJ`oxkgHs!|+d={*~
z8gRWw;L^2+rslR@6Dw;D9SB$+bZ5bq6Hl$ov*Xn!8}c|$S`wml_1d*#25XisZB^iy
zmde?5;`Hgwn>Jm#bZL^;Qi-;Y6*fGFQ;a0HSFdPqZ{POq@_W|l9x7E;Rj;qDy}dO%
zeEZ%*aty^^7~2<VWM^j|U4N9LDPnioTkH3Gihq83`s2rsU%!4eGPCzdo4@=2@BROz
z<m9J!^X~8CJ)O<Oa3y|zw7dL@g>tdV`*SZ%bAP=q=*r@yA)=dWS^{!QCqHtYmbz0%
zUQy-zCqXA8&9#$s<V(xe*2=xVxLk8xPQSpVOI0=I9g7z~p4@9Amw#e{VlIF6w>Ob3
z7n)ePZ^_y*ta6$3<o*8tcFD(hD!F|x->?7wcU|o6oSdAPn3z?oSNqSm+nae=?dWDP
z-6)nwI|c{k6|sxr;{s<)lDvKCQcC{q`*$lNq<{MtF4^>KMfLQoS4Sk;va?@$EIq4o
zvb<dKS&DstC1dlt0F5W-4^^Jhe)8Q8WlZBW_otFu-`?KV)zwvGXOc?!_2p%^n66dP
zla3_i)0<jbTR)ku6qz}Dw!B4wL*zw928Zb@uFL$r^l8uG^m4Q9CZ=ZQGS>U8AAQ^S
zeBPnwne09DW=Bt0wLIHE_rcQxC)dxEivCymNIS5uONfarcHtk%pL?Uv>z=sm7Z@1W
z+1V*y_haEFeO`xf8H<7gmoIOgJJ)}{ovr}Ky!-qN3|AVeRDY$4vTk0!Zid(f&_orJ
z+xgw|OZM7s7f6s;wsvWEqJ<O3@ehLcCU5;=)v6k4E3f}T<*EMK%jI8=nC&_*Dk>@}
zBlG6@^LBx#Z8<ZG^tc?#1vyv>3k##S=jHCceWX+P^y$+NxwRP@*aFwDwB{?5W2;iT
zv$1uj?fmQS&c=(T{V*}Pc1mMq@P7BFl3mL_bzky6`co`z+qu7cBBrffp>^(Ly~UB@
z95+AEpz!X~1<K5u-|Ttv$Y^5sVTEjN_IECAiAF9TLrqhyZZYwT%jfFO{d8*4qf0WN
zk<a6YODp06t4e(>yKfw1{!_rSe&uR`r}k4$McMrB7kVM(k*fRCRg%Y<`)tnSpvCP~
ztQ;l0PaH4t#0E`^jthM7((YH?qpfw@-dz*xo3!lLoIOuo-6{%q&(}`0ZwVl@dcehQ
z>&gWdt9R(IA2twgKd9z*Nbiq8)f}$$C*K9vroDB)$MgQ;>Dc{sd$(*6QQVSuch~m&
zb<$mP9fT*U{JiKce|D~Q`QKk({ohq-i*S{{yTe(Y&&*)bSEc%^?botTkLT=p!kDK#
z&)PjcFtakwwKOy8n!Wznh~(s#Edr~uSJ;(i-v7e6zURX{nW|s6FMX=f|9)}f$A{mA
z4r#CII_tBh`*czAqeFY{)Ot=jZt$h?@ccbrPlYc#HqFSZ>dT#VoXO92TUOb7blv%W
z{P$_GJTvo+ecoL@Ub{bkI~B{JSe?DSBl`F=pXkoyiZ6dp^YWSsA3LM3aqdoi#^+Z{
z<HbbM+wNPfTA$t{uxf?Yw}P*MK3|Sbb={tPe)^Q>U0gw0tGp_fh<Sc`Z@1%-?ScKf
zw*7H<as2=GKh?Fii<ew^(Xrz3-?{BvzPX-FHWgoj_X`>?y_6O#yn6EVx;b`<E5AF`
zw*=hiJ-qDLG`o9~xw<#=$^9)kwj}l4Ip^K4+b_L6w65iH&_2e*m9HFjxwucie`Q5a
zs)==P`^(o4wk`LY`}6m!pK^OAEM1!F;c?>4&CQBO*=L<QefssSt=Sw4@7#%bH|@)j
zBQEOd>OXe#GF%9FWm@XKZqceGi&j+}n(<TCN?XzN)t9I8$9w0!erPo(d#7k|SVo$<
z$!1l~q7~PF-1xDY?U&lV!^@Rh+W6;L6rGr|@^Mr4D=nWM-DAD8gbk|Z?K|KRGNDOe
z*Y5}Uv9h(<-0m{R+xh1uq$LU0y_RT8+-GMjHCx*2^k)I5pvcY5bK5&7x;8H{d*k+E
zhG3)0$>J^Y3yxm*JpJqV*^{?d-al|_SJ%<c_hJS2T)l80#4yCWxcYtLzpY=VPW~gl
zSMJNk*`Eb$W1BtexZmX7Io3BPH!CSLU{a@m)MI1k_=G13ukG%Y&-;HOQq4`wv{W>h
zS&U!a<ly1bim*H-rxgn<UMISp30Th{bNFrUoti!B@jHIaE(-H~JLiAyor358rlu`k
zy>(Ma=<!RE@8Yig_SdnmtacVZE@^u&_i^}U`+s%&zH_v{>v(NHE3=Tbvgm!jd>p6s
z@oyU@O`7!JLBfd^hkT{@@*Ag5bN|a@W-ys<rS|Kru5Y*!|JixFCb^g8v|seB<6fgX
zw{QM^<*Bw&3>!D7?Dm->U-<jS*%_N3ol<h&&B&oBqb}g&#`cUu(YA46-?j$pV+Lo=
z9Pv_{tkm*}>oU)mo~O#zw<<-ZK2vD<!s^C+*X`J`cvlYFGaa&KprMTwI_$?kyr>pe
zem|#cSNX+zsOu_h8y`+y&w98}nYq}xR(O&E@0XsfTUi%1UD+VrzTS22gp*5r&kC)R
z?h|%v>kkVsG~W2k$(3WKWb{c5y(=NLw#q-l<@?Iyczd^Q{W?{)>h+W}H*ac2Px<z2
z8G~Wjyd<emS-;~;R7K_gzV*8uZ@QCr%Pd)wJ-vKR+RZl|4=3lPecXD&e*GTPf{xts
z*5jLec*|~ITpkoM!K(b;ns-uS4f~Sc-`l%$=gvEZu7L{|E)?o?St`iL;Gn+p`W4w0
z0oUMgCH}nzb)5_MdAgrh<tX~sv;EuuuMdxQ*gx}$?M#&L4SqK5obcbctj{)YRv!O4
zN$TguY18`l%@ZuQDLV0_`MBMDBfT9PH}=iWb_q6WOLgO~cJxoUQT4*?v*Xe9{5zJx
zLGz?de&_NW=ISz@UwSCG|FyJ;)6>@p5^5I=9bWaSoaEpBCqMARA5O;L7hdMh^V(M_
zzhY>sJ14HTevPF2$rqd3|5t{w%f_xff6w-6!1bEHmkuvnEK_^T!oH{alvADTRiEzH
zKPTGD-r&}>W0;$kl%#au>(IG#d4GO<G_aOuSg`QQ>P6=b&a|%HU-?bG_3@4!n^r8b
zS-))`m*N)%%}u+u?dcWH^m4l_;&dY5e#yHnp`4oA<yBmjT4dhX7`cAz_3bY+TBITA
z)R8LrbN-#iKN0udWtb}%tH)_&Ka}!5Rm9H!;c;K?+8CWPZ_dU1^sL*ze(hH6KH<*H
zi~su$oYFsH)bF0xn)<IeHt?YH!kM~liBqpGoqARE#r>V;UCmppTC>YHNC!m6pR9e@
zAfTmrUiO9Aq~ot|OjlfWNqFhsfAhjlUt?v_lgP^WlcBxB@$lQ`@IKBc!(-PTUR>_3
zZl3tzl%dtGKbfEROkXFLotxhy@M-RYZAph+`VX4L$j`1*D~^{-Oj~H5vEy%7xth;h
z>lq63{=GkX>RQITr1?kle@M=@`_&b%w)FMuS*5Hsxw3Lj9_Jmb3l3gLea&>tU%un9
zgp-DT^qJf}sTpgsbF?~kO}lqAoVT@xVb|#<R&E_#`MWM5QBl7@YgWzV7#LodJeurp
z7kDT&D=X`eo?GOM+gtCx{q%MJJM~z9pWd!c?%mS`>g+#C&0l`?{I$OycFuKUOAGtI
zu6^-}jVu4<#Y9AX`+Mw|m0kSppd06}+z8Uj?%Y${rBboD-B<YOa+m+b8<(w93Z4=W
z9luiDU{~?~pukMCLk0_1zTJDIqi2pqTjCktHLSbXI#&ihoyzLgc8GDEU8`y&r{?yr
zUwbxvo>VwT!uAboCF4Am%A1v*k89(f$Yp&j_36?1*T<u&d0toex&4`*joS)zG|tsb
z5Qz*8ZhO3=cWLqJ4c<q88h#A-KINiv(AZ2Q>*LnwC1=gw&(qaBfA!L(wJY>iX0O<^
zv81oQLR<H@o$G0xGdabd<kgnk$;(({YGh(=DD+G`b;)xZffp}!TUI`{DAawmW8b{O
z)Kbs7z++D~I==P%a$1XP**S^il$0-b=Gk%`|G4q-u`|_~$JV=VGc(<A%jJ1_)ggnN
z!`mF16pSW$tFcu@-jX<e{Mo+WnF@}Nj`Q79_58DZvi7IV+ES{z>(@wrzqV}UuQsc*
zzCq^~e#`%t-?ee&fshsFA5V;b!@sLU$xm&m*xq-$Kc2p+(#gG+M_TpL^=tj}O)kGa
zbdg=>wAGFozkQ4Nf4($xdNFnTv0ko%zpsx+*XVwlemQ>*U#G0>1F<bhKKALx?*;or
zQ%h~+HkN*Gvj29kqyJ=W>e(IB!+*xxd}~OIXc6d3zW@L0DgXOz$M3wkl(pgPmK|;7
zKaa=n|5fzc%r4&8?(xcN*VabI*L-x<*VhkaXSyQT_xReiYs>xSI&ttynXI_FZ3hFx
z0!M?Vcec))J$rZJ*XzwTHMifXP4*OQE0}Y@peI$LEzv+mopVy6giL*v;nYNlSqnMl
zqzInAU^4xIk<MWwp3|FDP9{fgTjr;exn{G$_U998W-XL#Q{$MlOp{4HbCwdvq{IxK
z!yHXZG$i|kc}`DYIk_n()OY5Rm3|pntJf}FT@g5IVd|!7VZA|--ZOU`aJWBX_Ic&S
zODx)wCHyX5nVf0v8?57G(N=u0c>TJ43)@sGt!^=OO-i&lw@K%;0gI!NPP5{X4Lp6q
z9jQC7yIvM)d&uKFS%qKmio(jZYxGRbgtYEOUD$Ty$_v@w|J3(C_j#((b?e{L^4(=J
z2FuhZ?RfXuzv9sA|K@S$9n!CF^X5=g7H-_UyVb|*?T^}*Dd*4c;L|qqiTTqO-*7uD
zyZZ5J&)Mnyztpt1UbzzUKJD5y{`)pXYG34>USxfGHh({_{lDL_EdfqXujlLk{e0_a
zO3Q?qt#uKP+TZUhdvWXNlfq#3oIhFLxSjWzm|ovK@n`4!%g0Sag<3A`yzyW5PU+v0
z6MN6s$Akoi?f*Qvn`7a8zjZr`tR8+@7|}9eU4#6@PZ!Uv74QFB#;&-f>hY9AcTN?%
zzbpUcn;f}JtpA%tQrWjdhC5O>{59a==HzVrDe)juqifUV&Dy%UduxB2>CEA0xDfNo
zw6y*B<If&;jlvdf!Yn5rfAnl};jq;{{e0e|i8V6EIp<7xe)-PJ7`C3o85<W~xOS>_
zx9qe7oN_0RZ*))pSWzQ$+;ft<fQnOxN~J|#vG`GgGgoe0x_4`BsMC4gPbtdtm#3z`
zRf<=f;{J)V>51OQlp8FLlkRL*iU0TN%h#TgEvzvTEPfMMernh>sc=lHPJgn#TY8SQ
z8^=pdp5HgW<=0PJ-?k(2cWmT@^gCM^f8Olh*0E~kq&xlRK7K3~n||%2^^tpLjJ6wW
z*krm$lT9&XPJFAtDiQN5A*Nza!wYL&B%j`?k!}%i-hA}`w(u!e)0a<`ocZVZ^LLh4
z<}I6f{Tln4dlsoTcQx$Ty~wMuIf<R;aNAF-snf3%@k^^-TJrm6+~GGn+r!F^#h(21
z)cbWy{C<u|JBGU*DkoXF#S~iH`eatVieO+^@cGKSw3rLW3panW4!?E%^7U<-vi}Ai
zzvC2NcPHS!&t;!b*XD_ytGE34_&qAO=6Gtx8tLlS_Qg3rqF6kI>fh|WsI@=5C2_{i
zqmQc>OTU_Z^#8NJF|qrF<wQT#o;eri(JCU}FwX#G!M=~DXl-%v=P7G4p2l!*xqNrW
z>1WU8&KI~}Y!!Q}f8R8_|5F3m+^jxLyAd6E?VH-CquT5|+x8Y|?OQtY5T}e{%m3<P
z-M+_nY&Xdqot<~~-`R`mXFmM-?c<b~C+ftZZm`b3CTE_H8@rx_+WYg5g*g=4(!TI+
z5p>cyeeB+;Sw`ss-*ws&&%G0y?tiqHf9~(-8`gi*n_Is%IN33HJ$U@sxcXZTXxAn~
z?4l)6tquwWg{4zWu4%sG;|^J|E6k?!mP)Cguyx?A``iDn>TZ8}^0xH4IbG%kmv$Ds
zIk@-s&E0l;_dI@Z>Al@Phrpia0lUxNw@yvW{c$QfS<q?y|NAY@_V?!O%-GR5@!Xy1
z?j7E*i;PYQItiy$*!Ae|DYuqZ{POZ1>-WXQS*xWdzY~A+;{}t`iQENO*SH=&tIIoW
zom_Rs|FypPEqS*$AE;i^tg-maiIDft^ACG>XXUvsssDD^$=&?nv8fB^?=R1~zwznp
zZRa`d=bIe5|Fm8I-#H)6r%ZL9|DI(3?(*#UmhZ*}BA*y5Cb=l>tovJ)>U#Ajx46Ww
zncQ<roxHt2Z|yjdCv%~G&HT=dC%;JQuSlQB%5dSg#>=#rmJ4g6x7**|biDkA&(j#b
zExNz{{md_`waECO5X%0k=H^XH*{JOM_fB59bICy8J0>vh{MH$>UVkk%)E5XX`uvrX
zN!=qxZE0mq)1-?wc8ZfPv2<?c@ebta_rD<GEU?4J?fBGu{#jdgd&R`ZDo#9^k!LdL
zh#}A7%(mm|QL{8#CT!z7pSvKm(la*m;$vQ3o}LnouFRZ_hkk{U39SOBJoP7U3;1Mb
z(N}o-{TB8$6YuvvNV{`S(a`YY+N-aZ=x*A%xmotjTmh$P)67=!y_z{|mUMRZs-sh%
zn&-Ex+wS>)Oj`T;x>)AmW(EdZugXq4rxQ0<{tww7K7aQKwHKK`T_q=Obl+UOYggIs
zOC`0A^Uif@-<LBf437%hcxl~_kPTb>wl}-PUk()6ns@itnJ;(BujOC77<TV{OP)yG
z+e;@m*T?QEaolGq&cIM&y>#6!;lj81vX^HyAGi1P>0KrnHFG)}Xqw;B(Dc`XkN!Pt
zqJ$>Pt+1NI_u^NR&0OaR7LKbbQdd<)@|`)s?hu%iwCMQ($8Xn|?P~se^Pc@A=rmc)
z=YP>_{%)~7dy1cb7jd=y&%(g)!eVLI7fTV>);2jip{kgZ*Wc>tUJ}#YH*M8o(0=4_
zpZWiqp4CO_=)aY|l>Bo?;`vyQ`vJeFZa;Rmw(`i@)tT(&?$7@2&RT9{xMt0yy>=Np
zY(+lpmJRu0dfh$RZlCbq{%2yJ<{z2*ZSo``lkeun3=X*~6)s*cd3}BT{jJ&4S1o>V
zc}L{$OI+2-_Y!!5*Y8!><-J#DdE{@qGbi3FPI!^M;>eLBy!rXRKK#`WmGv;+EnTg>
z-y-$?KKT$?4u%EWU(WRmIzQ1vWq0}ew)K&r-O&@$&$3_cdZ8S&EbQvT663b1oijH$
zKAyNjL3C3M!xN3Js1KJGm0!ybELFIhe}&`!nJ;&a9B~O{XJUAft8nrCj2}NLS^~0G
zsS3y}fUO1iw5+pv`J=SA>Nb0vXWm&e>Db1c@^vehJAK_WN9t|y{<gZxhmSI6tYdCi
zRQmeb{#{Sj#u+CspIUw`Kk~yRr4>qy47<cte#r_83N{K@)&APDikXo^@yUY+6K2l+
z^zFE@*F{5L{kO%fe?IEZ5)(;3J4bTGs{)1q{m#zLnJ;%PcKcCYyQ1w^+RTu*Va*pV
zUaKuV8U6a&TF}a@hB($|FUlKSlrCPr{J2kAN@~G_Rdz+i#m~<~MNHGYa3S*d*G)1r
z<L*4&u=(D-=1^Jh`3%KhO#Al7A7KCgd)4cwe_nK)S^a!cd(SI#tplpM3oG83eD~v-
zG%ZA^Tz&c?38v#)wp8{`662P3-tU>Wt132j`NO~b_xFfNvi;x5z_6?P*-{s+Ey>6E
zettaI%pNMinQ`>sK}9>mwAbgRo37ikKH@~Xj(o%NNggUjl2^a#*ndvU%nUs1e*gST
zqvNX$wrl;W3VZGq`z|hwPcN-}efr)nzfOq9f8~s^cye#;oca59-aGn1z^OQ$-Q6YT
z^)Cwsh69Z*`}e8{ojfjIpOcx{DX?kFmOp<!pHDPex+`+$tF2$&R5T_}T6X5v^Ry@J
zcdfo0k7rLvwPl$1^w-zd#c6D%wR2`CzEn%Al4#3({h_U|?8XjTfx{cl@h(+<pxja*
z<IEvBo71ho{OnnQ?e&Xar%T#o+>o#TbMvSp1A_yf(BE%X6(15jJUkp78J$)vSdehM
zPc|_zaTOoe7SN7R!KJktPna*%O%)C0`{oxbzkFHHp-nltrIUT!o-dhxfA`d8fvmhq
zs`vGMymj<+SM9Abv$Rv|PrZ5T)v*)aE4QytJCWi)|Lpx&!cLW*bKAG`PXAus+PCf9
z+Gz9L790!=CmaPg?!C4qQrTY3Qz-5Gs?AeZ$Ibrz=*&rB=Bvfm?97$zdD5ORU$85G
ze^2(g_2%y8JN;r)r(e0-e@<5*w0GWvqK6qas!MDC%ncImIxn+pefol@Pt>+-GUmD|
zKlkT`5VfVUch4y6E$J{iHGR+1?`sUDU(GtY^y^Dc)hRu7sb`IMmv)@r5O~*!kAXp9
z#f#>9Ubf!915U6n5I%M4l&)^>E{hWe@$L(!9(?gp&-?n1oqQW)?2b*$mN!~8fAj7O
zCtSWC4X>?H-^C~Wc*dUv84o`NE>_>+$0IXADE`i|8M<e$oR5!RuajR<`Bfs%h@XLB
zg{a3D$NXhso4+Nx*)hy*ei)IN8Th?#rNvn`b%WrCi$$;MtmW<XDdiM$=ZL%^;k7jP
zZg;BImFQj9^q;wvo#}n^j+dW-VHc~)uLaYC+b`LPd}4gj6=}TNDt|e%$g-Q;pNGYs
zU$|{@8o$k-&vPIBd6l>G-%{=8yHaHs7#t?NXtr}|g+!+7F|}hme_F=Mw<kvYJY>Oh
z*y#VdwI{W<Z00$wr8DoaU9zIAm)q(8bGBxzSlfJ3-&$$*?3CD^3CmXQERK8gNP&St
zfxXl2h4z&ATkTGE40n^hya@c*xiMBoMayRKnjLy}YWm7MU8X4Z^`8`;e&sHgcYpuM
z(|+3i{#w4?I_Lbf{X5R;>#pkEH|^xytCxIYZ71K+YWDBc@9H|?!VzmB6dxAiJ>f_8
zfAeh%*Hxb1wqesFy}x;$p59XC>!i#6vobLF$={VM|Nic7V`HPA-`vRcyoZ0in0+m~
z<7kqq&I#t(cUKwTkPLrZQNeTP_uY7wi$C8VS)vO%`?6bN+S9Zr4=mgQdD;>!8Wmf1
zEVBESZyn#AlF|0sUtq_hIdwC8jtLy%oU=?)=I{>Azf*dS74Rs!2+aMz_S0ei`)_Xl
zpSyEs<#Klh1_syKji4ctgU#%dCrt{G<p}7Vr}x%bQNAH>d*<b1&h7jqsVw`%I)yD9
zAKAz`e&U$q{($A&b*0LhCWV5g1C=&S%P;f^O!}U`)#2abJd0zG1!F)Hpq2f{UY4{h
zUFw?phzT?uc$cH=vMihE-?+u<UcUoQT;~Y5c-@8Z@iBegxW`Xkta{~8#o`;Bzb;xv
zv{qQCmchaN)nC!tX{q^lc6@xh{r<lXhxs`<IXM=7`t)hBdw&sVQHr9X;>(vWCr+Gr
zdwYI=Z?7wds;X-4{e6G`{QNxO!uPzp(cmbxef4N5_wD_+eJ<y&Enm6wT&%^u%G2x<
zo-#A+3V-karT*W~=N~?N*nYq6_VMHC&(F=}SSYOSw<cm^)9hWsLPDEzZf@eY|6^ce
zG$~P{z8*B4|Kt1pdUG?gxIGmg=hy#R`RapX|LbY2l?j=$3{|rn6mD#MJo_(u*($3E
z@1`rC^6}WWyX2)1q~@xsUnDOkcJ0ocGX`fm1eMKlZ?y<S?XB9nd9(5NH`VX=rsw9$
z3J82SsXjmF)|Qh;kE-hH=O6Er)ec`b$GZI8{rdlFFWqRIRI+pne`^iH6g2~b2}h&+
z=G)$x{py$HqBHCF-!A%ii4|;BYgPTC|G!?Ze}8-X`Ae6I9v*6~tgMVtb`<!;r{Za4
zVNr1W-Me>P$9sEwy?RAggn(m&-QlF)91F9YCk^J;b>Ds4TQs$Q*-H7kU(b?mO#IFN
zj+2Ecw4IsZ1;}Xo+FxHjefreQ&Ob@TviRAVRjXE+S!us(zA?{M&{6;LKX7&qn7Y(^
zx{K@mJLL(x-KKvlcA2^QfBr}9(_-^%DrGj+FgWnP{M-5O+1c5wOb6FQZvOY@vp+L4
z^SX)4GG{HDUv<Wy-+Sk$vJ1;?wu8MJa{A7lKhMsdNK|ImiL!dz@BF*iW#+6&AFp2t
zX^r2#rSSCs?dA7B22Q>C|G@dVv+h;<d-!`e=_@)YD9AFhIv%|mTM`&nziwAH>%-M6
zcAq|VYr|rN1qw=`D>-c!s;DTkdb~fmMBUgk?b*HGzaMW(o~FR1Qmj7t{O|tSvv+3h
zEPi)ngL?Y8;(6-)GXL~!{~lTsx%o&R2g8|}Kc8!~^UGh$+WPV1M@>!5?Ca}Fi;8Y-
zNOTSiyjXs}R$NSM+N@bov9WtAKR>&0;li0SXS&7p!@|P)<n8S=H9I?ujEv0k@BR63
zI6}en0mst6{`UVq9o@h8*%{w(k2kH4W!7gun7mwH;_K04OiO++Jc`=&<>69q`E#dE
z-THU;`|rAYVfO>(PoHgFbVOp~<6WK0p0zD|wyfg=M|k-4o5gASzTAorILgkTZ18{L
zhp4q?_V)Yt?zPp@I(6^fybdcXD-kZ%)0=G07t5&MNt0+xjhyMDCKIAH)oQMv(!>{E
ztCj}c{M#~PvHgOQ`CIR=(?8f#^SQzD7XyQVz>Ip&poIZPjvOhmPs+^n{J&c+e24Dz
z)4T0`cijG)X}}=q_4~Z-_d9=BxdTqHGcYv#V><fsc3aoK11<A+TROVRGcd3*eU9(p
z2CZZ^U{D0@fo5PZaE9(yIwK$i*}!Dn;sRdme1L~SCI7#zxcbU;_4QX@t2Q!&7K}6O
z5LNlLJ@Gn!HB+s!UDfLi>%%`R^`4p3&b;i!-tYIcwX}q+xj?R))G6!me?i#l=jWnk
zOb>j2NH;-5Xq|CY)*<K1?`6LpJ=ULURMS=<d%RHEJnzf*@BCa`Le^po3=9%40xtf~
zbyD2_W6x%0`@TdK7nQ^(>n5!{X)PUatNopdkf)p5u{%49kAjbnVG#Wr{cFC{zAwk@
zyK<g7#w>q-rKR1ikN;oZZ}V%{t}SBWOnO-P??|Wc^Yin!Z`mSao)?polM@>oTU1n3
zQBjeTlM@;mT2%Du!^6X?SFgT&>5`DJuzR1(%(-)G9~@{rapFYe<}^bd<!_=43=9pH
z&aVH%zv?{st}^A@=1H0s23ha#)w=Zw9Qpck`FuIcq9-@g=gS%<9ohYUpSKHW?t4?}
z=}ntAcV?WPrVF}8UVHtXNs}fWDvWV*I<zWu^}b)PwB6m0v&+{MTwdmz)XvYqz>vl#
z`git@QpNr13%C3~uBy)~`}yU$*xLcO<Q4d2twcmbjuhTGF;V&L+qa!BPO8uU^Jeq;
z7VyP${Puqe9v$h_4qKzJD1YD2Wm~p<S-pOr(xS`D{pD>cK1_6%6VxwbU|=w)U-9Dp
zi|-<zs)f9M?_9p5ai8Gsx*M053pREBcr5?_$3=Jf%8Ck|s4XkDYzeW@nCivrKjCBw
zBO~LXw;w)yc(>hDsy8s1m4Tt5k-hVu{*|oKphss!`}e+F6rZ42y0_W*#;N8xU%%UZ
zJfZE`X?!)SbiF%=TI#VL$<oqNY4f}(CsQ`3pU=z5*>iOA?(!##twE`@hoSRdX?fU*
z_nsPW#pi8y&Ak6+@2^*@uU)%V{OrulEt!+&&YfE@AvJPZYJS!1#}<dPd5?oq;xCS>
zFZsKb|9{^wsWSSN_?n70XZi2{Px-#@?TcIH-qa~u_`7Qb85kH6wn@x;ezecgXLsF=
z&qwBm-N;hE7rFji{;QPG+^#A9cK;LZ{jsbqtTT{m+xc<2>*}k|o<HBdeY?A>D`$71
zH4(*y=B2AVB|L|7Zf;6FIY~8%or!_rLOWaDqI``fw~LeCFAINe{?X>TlBKZW5!R)D
z>(-_(;{PiS%IgvwY#IG^`K3?(%kd}|J~%EqzufIQXfrK?#MuV#FYoKNoSVCG!meE}
zK;h%d^8^%d49XG_o%;;Af7&kG0!niXZpHyZwHvt*d;<lc+CqeUt?!>T+x=(yDehOF
z^6fY4RIjDiU+<RJ)YKHz1m)O<+X?47_pKEDRPB^`|I5m&S@H4r*G6v_y7=<)^5o>?
z^K&ef%Rn2281|pFac`E+b*sxixTZFETgu5vxwp4*Znw3uId%GUs!@*S-TjGub_@(W
zEPoX^_r)%YKk=S(X>IVfvbRx(-<H0<rg$1uB-Smge{yjDWX<v?|K(oXGWTU<Wb78#
zS5xBW?{DQ6?~>(XU|=}#KFO}Lu3qQK_m)fhGOJ##T;7rK^V3s}=gbTY4)qt~g&)29
zRSouzuWw9@jG*s4o5(i~pkk|Teck*Q_fr+)l@h1fS^oQP7h|Gk_@%8q=1%VYUnw6y
z?f3u4Tk>vcLO!$CZ?&VhZds|Rxp{mC1?#WYI-Anv;_k0&s^839w7OLPe`WOdX6^rb
z6E4ah_v@|PylKnFcS?J;nX?r7qt=G43`ue?EZ$xIex7ytx*LIa=4{=%b@l3#wbPeg
zf32;hb)@gnGbU!{>+9q5XW0i_{*%eX;81@hUifdU{hP{1{@OWPh2QTBKYl3a-`B?F
zF?Vv+-T%#hm=Lhyw*36LCGRH*9=3^l^X9_cr_p!z`h{Ix=JE5%XZ~kr=PQ@#)Gk`G
z<jLRvIXCvz9zSs-GwJxH|5L)B@2Ix?`}XK_A)#ZPvfP3by_WuZZh!A@-SO`a9T)5B
z<{aT$K7VDl#>z~MUw=OPKR(`jbd~@E!w%`c`WN4SmHf#WeCV#t+yA?&o=sZv-J5&;
z^vVA}{%nq~uc-NaUb}7Aehrz4r<Xo{-{~<!Xk+#3pFLY92|i}4{B8Mn&+AK@*PoBs
z|I4A>P1@d4CvC_4=E+~%^JPP}mu}Q?clp;Gv;2(Yn+G|2-)*fe{~0(tJ2QT57{9F1
zowJ4o1rbfVSFgYE@Jo1>@9Upu7N?p{FMoSWP*_?yNo8~Txz%g4WMs?^p8tKU%;Lw~
zExXS3oL2wT9dv#F_Pld*ZYH%eGcf!OwSRr_efLEx&S0f;D)GM7fd*Ml8wykkt3s->
z3<XWivs#qH%ucDt&zV)X%|d^5(Z5T9otGDj*_x?Y9QvD|f3CCR<GTwP)BlzRwY%+p
zIQOvB*0Sd(_phrdXB1RD*TL2Q@mEsqr#G&LZT7r<Z{%0}_SXG>cfTKAoTk<r-K6tB
zFCzM;uZ(g2LEH0tK7G;>JZw?<DWrOG%CjY@CqBJzbILQ!I&r1_+1^iY{#VDn0S#2k
zzc%lzyWe~5BX`j{y?ih0K!YkL4nfT+n=1KxZ)`NYdhg<@l@EU%nf?6wnO!C8LKeT1
zvQ>Q2?wfhi{^=HzOdTE3`!zL1FTe1w&6#5SPI^||wizAko`o!3K5b1^Rr~DacORek
zwcDXx{N>1m?)0uz+Ow)vqdrTY_<T${o1K+M%$mzMF*h~5U~R;a{|5g)e%mFuafa^|
z>m@>&8{%Wa(x%;L1ZA(Q_CkO6&7SyP{E5<<t-iiH&9Z6?4jc5_nEspH@4rbW{dvOG
zJ1f+bcE(uM9u#0#U%k`YZO`9F{gRogE+P`I;!3t|dyzG_K*;_1>%AryoonlF&2)4z
zelH&tf7`75V}W$^(|GxtSGo;n2WS3&ax(Z}U13mX$Qp(%yZkoZ+tuGAYxVrB`8}bh
zYp-UN9^9Igt!*86@2-w3OMl(lt=EtCF)=Xw(hiP)nfl^H`9m>-OZWb7R!Q{wadS$x
zOGwm;SFf%d_vhp0DE$5A{_&0z_b#s5>FDdSukjr3s%>{~>q*3^PW3vpXz#q(Ut0^d
z8|+`UY*XdcU%&O1PJNOZw(QRwZ<mYCHT-YR{K$O1G_F4~L9sLxUNJ5CU-q{C-^*h+
zIylRV+pc_RzFMj(<fb%PQ=;vm#kKqDHd-Z9Ts}$v-x{O4tK`j>@8|mDzMqeBbXnDQ
z>e4Cg!^vuQeGQf!IB)&sb#C^xeP7!?-miK+?fo%6)AL6kB^7Qd_w~~aUw!rO7jYQ|
zh9jw$L~E6E%4Qp=KKiqg>0#NckJ<S(J6<f_&d*u?R(5UFEEAU}uQKy9mkRK;xl~0&
zYAYq}_2v#ewAf|I<xTuPzxV}XErPe?SMMsgaP_iZ#nc$Z-j1*Dx*wcfuw{MF%6FR>
zY^q+^${b%MwK~lw$}0KNr5PuF*tYMpn78Y-dAx*_h`7|3(=mTu?V5DvPH?$!=gSY@
zzKFkGo0}_hv?{weHT`wMCgXHQh66`tX1MNO&;7H>{(tVN8Am4E>~5?7Uz(NPuJ`uG
zR=3dE7fu>KZ%n-W?5LND&!sm9Gu77>>U@8<%zfRn5Lx>f%LB9B)mYM(h?d(=b<&(|
zXMgV6xkpEjZ-4bwMo{+N+^vtEW;QD3Jw5t$_qI9j7keudYrehDtL=UJ*|n;+#Eui^
zwM~>#Zft#Y=Ez3wy3eh5|5x>NcJz04yg#e~D$aXOiwM^q?x|tVv@opw;U<0G``?#%
z_mrZQ+r0f<+`pyD-<+;%Q}W^XnZMRX5^X9$o!h+alW*KE`!<btRoTOfx%20~yO6>A
zeCF1IjCQx(8XxWRYd8I9&X<q=cwl;!?e@yUC+C;NWo2G_u_Z@7j#=<;(5-ORUv4u#
zuK9c4bM@O#CEN;1^PXpiq^3>{*O?M_F>&$IORxWLH8;B+r|GkO)0WWes8(g2<6+mQ
zUAa1)U)JVgfwfi5nWJlx|Jgl^d)IjP{Q06Bw{M01-x>73A9(X;b1AQ==VP%~Uv8b5
z6TEF(U!tRPhsWiM)8c2u#Z{Ub{<E`|KK|&_o@Zg9Aum=atMB*riqM#@$?d&adlk2}
z)ot~@nd<{0I97|in!W1ty4VXPTYM$|H!R8DcZdnp6g<3TQs+MDwZ*})bF2Cux9ZIA
zxRM+DYMb6+XPwh8zs~uv!tb=yrW&PJ^Pc+85wp~|^Z3QS(@R@d9Z$>u@S#k?^53r+
z=YH)nQ%?EG_RM_3^KCCmqHI_1uTkB)b8FqD9ls;{?r!|w+_r3%V4-L4+0y&(BF}%e
zIsf@&dYRbt=d8cnwq-{ZtzX8uKGZa1p4Im6Pj>EYyL~*k{!aCe?lpUiLrwpGzS<jh
zeQNdBn5<(5&*}MAm3dWO-MZ^nmsIG@r++p-H{vfZ*&-ZR8~pX?n<)n$CU4nwZqcRF
zKU-gl8}+YxrOhvUKWeeo)YDUzpL;v?^c3OaXC|MXDxY7M`hQ}t%ar(njmy^Q)Ezmq
zX3yodxk-7)co-NMo*irvs#Pv|@|`umUVY`4U*Gv+=l=ThW|j8M&?MGmw%Fh0YgUGq
zzPpsT(`VzGgIBLj+xC-H{FU^oMTgxyB~EtiIC;Ixcy@H?^ddhKv+KOlHWv?{wXgee
z=HY)?mX{A-iHlFY@VCr6+BxVDbA8Mnt&$59-o0NmL3{CGx7Q`HZ(mKjaiY*`>C)Cq
zL6<L@sZ=?+FSj~i-t_#ZZ1sJ4GmF5>7q6|$<mK(+mN&U_>5$v<_fn=QuadjtF2Azc
zynfEt@0`j?<>K-7?=M&e|G#qUTE(Y3_g-uWJeq3x?_MHbnV#FfFANL}2mZ`(dEHlN
z_38JCzV$)#YYJa^zrPbbAzXQ?=fBO*9KPS$ufdjfec$ZO+h>2)@1Cc<ihJv>bIR)b
zC!e0mwbMweMCANuR@Iw%dUkEkIdcDA&o7^S>9B_iU)j2E+x%Qot|ymfdPh6Y-gWbM
z@dO{W^((cvZY|^Z)SZ=^J;gJXuS{>MsjJoAZ&8J6r(em<`rZ_?PGQlnWve<KJY09~
zp39XRF{@u@Jg%IVIAhhUMK3m7beS@@{@Sry|ANkWw#HQcU$g(qNp=<n1_tJyAD#Oy
zT7CN6vCVsb-B-qqi+2d_`W6|cKUs5<kXWhxiNYN3=;nv(7P{|W{;r<+&Vog|E?n0>
za`R&I^PjJ7P4fIaUwu*2r8f-sJ(O0h(&hTn-P8LgHCF%h#;vP1wf^_LA3Jx?+nhPy
zWN*HBE&AxCoPb%ziVv$^Y`EBb`1qZNSD6?X7``Z^{k(HR_9ycNhL^X}BW+K=%D0es
zARKo;A~dvm@8P)fuPW#9f9c*cXa21#i<B0X`Fdx%+MO>xBwW$A`{mntTG?FAOv#-q
zeD9v|kVt%(Ul`dpzdU2@sy%D>MlOG?q%`mO>D62vE0(Rha`WQhQ<uUjcKWErZ%Z*1
z{Q0{@^4TAWxTV)$ugda%_s<wq;t8x>bpJm0&%doVr+?E=Qx%_<w%T;<^7HTI#f(on
zWopXs^UK+#-T1P;e2=K8)ul_9rX_#%d@L^^XS{RGr&r6P<34}oDlIDD=a-u|wcN`3
z|C-gC%hT??G%Njlv)i8ahfB({xp~?7R<(8YJ}!IK_8#Va9}yaCVwtEY7<x_QR|OmQ
z*8j_<?K(8+jl%vH6As*1YrpPxdCKDEz1cZOER?kL&VT*N^RkZ3cJ=NW)vcSojq88S
zZ;f;iR8*dH{$IfTkhdxC^CEN;{I1NpRy@7WWcw-!H>Ee($2L`YbHAQB`M*M02B>%4
z{jl=hiTunLC$>L7_HD82_P?^{i*+X%3p&U6tjexGw#9PsBC&gCB}=T<x@e_#Bu4HH
zQQMuUwRG3wwF@`ix_a~WrAO1fua#^m&ot#LTPJhesHf$zWm|{(Bm<#oSB-g`d6W}X
zbe2!|O0g}!arM<Mk)ov^uC<k$$fztjr^hQ8sj>Fo?>~M!eKKFLo;qW@c7k?n?4J5R
zKZUuMetop_JlD>;*}HBAW$I2o`Tp5u0U68BUr%msfB(;B`|HjA`_EWjf0R-GIsbXZ
zy!ih=H(z|1Jn5M3lg{w$sCut^doH{YQ&|#kH*aRO)&=uRH!nJ`-0)_f=IyzbMbBQJ
zy=}+M!SSN^1p`Auf??UbyZ-L4@2Eyscjvm#FDu$8XvkJ9dqR1-_7b6$E=m(mi`u52
zkB+|etFpc9{HM+nr!F14c&|56Vr7WhM30o9nIT$}JyQ>PrWpPFdfUkLyw3a%9?shD
zAU`T`FP*A*T3xC2&Y=lU<28N4O~c$;c*+aE#8ln)UYpx{^l9ZG=WW;c_D*^_Tc<5i
zXG)lm+aZIVmWel_ta+s8Xp{x)?Rj3QUcLQy`Z|Gc)qH#%g4Rk53=$W5uJ5|M-u?BR
zr4I`D)x~EYtD3m{<At~UPXbq8T^9V$oY_}bYu@gAfAuGyyc_%1Cg$%E-jgeK=@#bY
z<`<QJRaNSHzACHB>(u8pI=RV8$4@RXQaW|c{`SS2=M026l^<4IyLr+0gnn1YtmxO>
zr;E1iTK8hZ#cN?@QL*8XPec2X@5a<@`h1Q@)+X@8hTYlO`RBBE9QYjLkuYa+v$UY8
z+4ZR*PfAO+{H|>OS;Z=Rk@vZzknKY6+kqj|j4f);Y<=Xj(nU(rD(L*H(^~7VtT=Ti
zwubE|znI^;%bB0K&TZdj%J##ps+z@+=kdd5^-B$$SHIn|_22wu>!p>RSMJ-Qw13k!
z553?Ym914fetv&=oR5KldFn)=JYk(Dw{Jw+e7$75?VH%g$%miWS~PV$DSG)N^5Xjc
z&;KbdW@>rP)6ZY^c(LpGHFFeg4ju~n_v5qYySQ(M7VG~{o_FcduXwM2%`yMKyjk-6
z{tVqKdF?%15g$L<*4JmRYv0Z+$jeoJ{_L8P@0+H39EtDyVD0@oYirfnS*E9_=^Cfy
zq~%BWC>=JiSIyryq4bT@vyCSozuUfXo4B>c;;h{KHET4r*6u0NdpsfPu9u6w?CmA*
zGK$N;dY`r^dGRCcVdhfNp9>wGm7LwZmRy=2yiG%NnoG&ENB+-^`1twcUq5^E`J?&z
zvXWKar#|z^-k&wCFysA0ef<>K*Dv-I9<4m~^s%I+y3O4`U)Q{Q@KM)gO7Yh_FS&mw
zDLrCu@4s39W%c6a+d#39nH3m&#!pPn_q^Z9y=D8h?tM9X?)w`NH~V{L7ybJ4@AC8S
z!hxZ=Cl5Z3ev=#f=50*fk4$F4tL9<vZ9ZIF(C|XAaPntvy}V!lbQ5P*oIe3745vQr
zk+iyd+V(}xuk*)#Gcqt7aJcl`a(iaqwU3{Q=UC_#-7KDbc+uWze@i#TXl~vVX!rBc
zl`or*Rz^<!JiSk8k^P_4MXgI~-g58OS^MPQ!FA`>nN3b}`=5A}WoC?*OP!<M<4K2h
zTYYtzVxg>MbL@5Z*OQyYc|U*H7Qdln%HG9S*|Yh@;@587xLLyH%=dlnZntk}O}8_>
z_kvrg?y4@^Cl1Yhy}f5wg|5D~E>=6NCCyVWSVdK5*1R7dKFsh`emsfo!Lf+kw`W7Q
z9-Vr%b=5JghwC2&I=|=SmJ$+@uuc>T+;M<`L1Kxgi(|-{J(Id#_xdO&O_q5RQ?hHF
z^YQIx=X~kd?jEpv*V79h*M3w^Kbi8$VZX=HLq_`_IAsLHOsEg>&i>o{d4Bx1l&yQ`
z7JvV)wR+dA!k<Te1Qyrqb$Zl(zNg#g!Yixqa{rX-e(1~$NlSlilKkn?<mcb6nTFge
zkmEPs|8em%p^5X$ZzzA?KV`~>7b&;$%*Er)#pP#)n3WVf+UecCd&}JW@BWns9b*1x
zm)LyxxQ}Or!w+FSrIeQ5se7IB3~Mi4k_wId_4KiM@16}N(d(~&w0Zv6QX_H6PTh&@
z3=F~-x39HUvyNK6YR$^v#oF4d__>PzA3oFHk@0lDxD2Q#QQkXGVAIRPkL?)!9;>z2
zey!sYym=!s#v=C0f-HZ#37@}je-<{)OepZsln-C7C@B?v-ctQ%=gDsM{pM<hUmnd|
z^s4LGZ#l`muU@`&`SN+4PieIH>7rG)uIb<N-B+^C<%svYmA@V4eYg8Fef|9J7Z<yi
zzq>PY>eSQ<zl4N@`Ns_Y&bwJ#RcBy&PtH*}NnJQ_Lj05sT#<Ug%jW!bT>bjhn-FQQ
zPw&?4vzq&Dx9w|XXLlZ1n~5D-+1)BVPtN@OTeQ<jFZfqwYee)-VZp;5HG7;?dX_vd
zS7tpL*~gdHwp&o~u=Xl$tKBATz87k2nwJJehWbvNz4<%u^M@9F9W{HMI!+usw{+32
z0L5@Q+pW%e;Tv?MUr0wr2A?nxIy_~0$ApJ6=ck6oNgC(ODsWl3;lnqMRckaiZ7zK!
z`E$YxPU~-b=T9uQIia8B@x?`4{rtY4dl(rK9E9r+>uh9c+Z7pc;`@6Kbx3c2!kN!Y
zi>LQg{5~q5y*g@MW$v$sdvCg=Bx?H4k=y!k?qL@Z$>)=+S2lI12tC{9?v{VAps6G6
zp8b}6+j8GMdMH(TJzoB%i_2~Ed4GQ$2o_c4wccm7yEa)%(Dm3aktf$XDmJQl-%tK$
z%Ol_vzH8Uwx0BDVx7qR_Kki-Q(y8I=rpEkNp8Wi0t-HCG%B7dW@?w1(s$`EBC%5^&
zpLyZ`t#@g$xB8}C`!(<Q?JH*wWhihe2cFW+`9J&ncboo&=O?6oT_@M9*1!Ayhk$om
zKj*$mvt2DNCK|&(`-fTS=7;No5;L>ke#oA<f5V@{i#FYvqrLKWUCj48!txQ3T{|P>
z85qt4-QV`^%xwGRJ8bj|T%3)IUx`@@bS8Z;*uVI<{_5MiI!>5h*y(t6TlMYMxAF7V
zuFX<h^g-f%(;g|MSq8d6N)tIk{~SF0XOsRk!N5OH43tiJ=qfIHp}3E|EbYy`vWFk$
z<tQadq}?wUKi<Bk>iN^V=l9v2zIXA|$)jzFGrnE(yQudy{DaN)Gjq6PE(XNR`+ne2
z>&K5DwZqq)Iddi_KR<qN)z%Ml9z9Chr(fzn>CDuR>NjTTgstD5n7uhFG;;Yi=NoB1
zq6*die&1|0``_oSkIuAio-e2-xOAEPmycW%J(fiNOm9*DV6*=E>yD1+mWO{mljiv(
z9}_e&J}@@H;?c85$*GyMtKZHk*uHaX+{!INr@oobasToC)Q9z94f#j5KJuQ`_xknA
zuT^u`hj)Z1`Fh)DRCKmXWclUxEN*XIQQz|r-l-Q87w1d;ycldPQq=vy(fPUW@68*S
z7#SEAT>n}*D>XN_R;6<P!uI1Ox4yXd^8b7Gc=Dm#aQ|v=?bZTol}n2^ZMmp_V&}qj
zZ||upN6j(~*9+(5Kg#pjy6nNHFRX<-r)%Ba`)0QE)pv2<*3BzBl>L+|v!JDYTk!jr
zuM1wCn7W2LmG!6T+Ox8cCmrfqcjXs<(bLL(YhI{*bqy@pw93r&l<)Qno3?F>+gbFq
z_`L1*yt})m$JbT9zP5IeONQJxnO`;*24+SnEjJoFd@f%sGqhg1GPHE7#^JL^k8jYN
zu{^qAZtvsgx5M~9$-jB_Xz|O8)93877jCgCsmb<8c(Zhlu+HlIU~}y!Ue?mbD=*Kx
zQT(F&)2eK}zIn6GZTq<R*|n?TBGaE{mBv2Tla-S+f7)iw%iHBGVOf3o`}-p<JyTDL
z`0?c_KVEib_O~PNn&+QfQWT#4{!deP_cNQt6SUWhrkC0G?^^u!&C&TCFTVWz>%2(4
zVkf(gjIsaKfS)(7O-*cW`)Kq0%?nE-z07-G?BCn{$aM8x*uA*jZ~gA{Lz7;1dT;-?
z<K2OczJiL%UZ;xH`(hP*#9m2O2Hs5l)^hK>_Le0|`JZ;Qf(G6l;tlS#MXGJ}pBAEJ
z8TjE>&%*reCYc>4uHAdo9(+Fb+=?Buf=mA-#JyYE6`MY9{mPuWuP5`>&-TcPy!-d9
zdw1uH+0NP$ZIv%O*Ou{x#lMUFcRu`E&HvI{&h>KNUtI3|UA|<x`1SX<it1j>SnxdT
zyw6X|>5qThjXob9ZlYgl^Y7wv;r|~$<t==ozw7ob%hl_TXW#qV7P+kF@ecF*)o=9s
z|DHb4o#$I{Sf}rC3-5`FN0!s3o)&Fu|56p3T|K#ZZ}*3M!SjVYhd<cpPxR_k?@P9v
zH`zdF;g<DRORugv^)^TLZSLGokLB0BBsdRyM1<Y{JLm4!)zPnJugYC3J4fbD>$5p}
zx$e2OJEtyPJ9+Q!4WWm4pYN1g8=_Y7iu=CxN1OY1Rt058-HrYGWYg>SOD|{g%iT9h
zyHS$v&i|0(^sCoWS{)~jo;>|w%e;xNBWr7ur-ogB`RvW*+Uu?JHYAEMFx)Xre&3U=
zw6wM@af;Zcb9{3jcEl)d-Ml>~AohROy;D&O1G76{Y%Tq~S#QeQdu5FsId64uMXf7;
z5D{^TSHHY)b1rBcYE41-!YPrrHD*h#)7PGIda28j%NvjF*l@q7+i9Oh&-@qVWtr#V
z{$zf+kU7<~HTSKr^CI;Zk$<-?^1kk6^jJyw&mQN_6&rV&={^=Xy=j{n-(&Z)Pdm@=
zoRpTCsQaeA#P0Ko>D3Fiy9)?rTHX4@efhNZdbMNs)6*YEgjH@`pyIvywTyAjuDxrE
zorBLFdz)|b@qx70(pIOu#4Xt-2VL&>ES+<AYW3GUhrj>*+jj8hUe-=Ku(!jn`7X(x
z|NQ5>NISuoTh@R&Ad08e7i~Bgcm314^@~kYe!5)w`}AvRZkx{hjxDiO&eQx|tYovf
zBI~~Q)d-*b)VqGAYw1>v$4_?d-MVVi<mcaBMb=K=_V~w5`9FJ{ZSVfMtS_&=XwjxQ
ze-3>)`S{)U@0`2CYC6^Jtlz(BJ+nCXt*^_G&wo0v$hS^ew{PXIq_R^FJ{U&DrU$-!
z+I>?~cJABBkKPv-etGrg(v~fz%jVooUAV=rv@U=5uFxmi?fU{lrYT=}Z0Yysejx)x
zgLKCQC*_j2^&g&Uf88{9?wV6S82{Aq9By%|44r1yA$#KPtCY~Mo94>b{5&=B$zSHm
z<<aid*A@O}sI!-cCSR3*S6}J!=E-68eP2Iv1)k9DI#tx}=KsLr-Gz_2huQo?PUuF2
zy?-jFlBlwA;zyn3-@i$?xRibs4O)5T+_g@Ou_5pCe%rPeD=u2GAyCgR?%OuMxOa?(
zf*&sn%a^?}dm?zob3uMe$&D9Jy{~ieS~4&&sJU*5s}$CJdq3(+!2Hc8!=q<e9pQU&
zZsCOb=3mFM_QqLT)aV>Gs0yq9>6PW~{(I@2$(Pmao;;V0ikbKL%?mvr$CEo}J$w1g
z-=!+-{*92=kDj=?h;QoSdTSfH^(c6tCoR$QoAc+m4V$*eiW$FL{Wibu)7jOQ;g^;O
zX$pp3pSok`kB+LH7q&~ZZQQu+|JI-L7#J8H2^H^Hc#`jl;fZ|_|IRqacgh}}YrM6u
zCO9B6SVGRm=f?9DD|cSIb?Te}V_Qeot5Y#^Ydcmf+U0OH;HjXzgUi-cM&{!3oi0Iv
zu{SQR{PvwwebK60iyZc!xN)N5VXMsfqb^5|xAd=Fq4%Tg{I3%i1jD9n3*D+J>~`Mx
zpDAc)XF`W)ZF61Vt@q^tC;pqNKCL`7D@rLV*!*=#?4hbJQK6O7w{70I^V+#<D;KED
ze*W{E-qzKd%|SyUJ1r_jr^QV>EwZZ3%isL}uC`O#zNO7w*WFPuPk+7Eiu^TtdZ#Cz
zd~$DIbIjbmx;krG@6OWE%{isDzN=y{Xo5eXbN-9TCrjS$-f`1Q<=F>O8>>(Cyr(yc
zUTuwg*LWz_e>+3l#GL!z>rUN_)ma{{rL!dH=FM(<P0?x7rkQ;!(>oM%blbOMt6isC
z^p%!>&CLo-eLjEd_EIj+p1omncD_Gx?6UYb>l-__te)LJ_n+O*GyLg#G7$!kJvo&#
z^VX(Yn*A;6GMEoKx$nS<9^1Ij*N)8Esz1@7zCQcimY;?7@!M2QpGKWmxA}2o$7A+l
zZ7-?%=bXn?+WdB?J7p@~-~08@(qh%UlCO2|UhAm|PI&ThmdyE=U#(hWGA$Nee{Hqf
z#O&I)L$P!Hw5Og@5jy!)JCpV3%<q2Hb2_%{TKBH_4zK?EH<tt^CUWfZTYojndhOab
zExT>bzy1<?Y|g68hL5wJu{<_qWO&dw)5Z0^!<tL~9-miVx-4e4%tkfktvjAC<~e+(
zIwQqn$?^holT*d-9zEP{F?;s%yLXNrzU(KWF=dmly}hXE5s%Y`fhYd^3b|dfJ*}=Z
z(<kr5r%n&Oa1LvYtE;?tUuTFGEuHX`dpocHwt%S8`>#Cof+aT9C?!d_P0;}@cW_9E
z>fCqWN9^zJ=|{t-n7#NK6TW=k^Tjsj?@#~m{t2_?p}X#3J`z@HAH>o(ZwcD>@elt=
z_M*7Rf4Qldk2`)i)(U<3@6yrtCoXKUR<T2>6axdpFJr^y@9s1ivVZbeDkN?m-5T`l
zQCf8TbvKuJc6^J~TOw|1@Yl@0cx6FZ(MCy2yB$BW-cCJz6*SfJHg|5=HLkwL*48Cv
zWn#k1U3XR8m@2ZO@Bf_Bg*BNEzrI&`BfC~+?plBO-IvM_3cJ1j!nk%__hXB4@p#B`
zpdH1_A}*R6_+|d@6ra@b;^Xs4Ez<oqrVkIQAA5UyVx8{xs^=@8zmd^deouPyv%SAt
zug&eetaRLm$8(O{&u48%H!A;OZi@Z?^Qd!rU+mv+pN%J{yVh@fe%|Qj*ZvTt#Ctz;
zPQFUtzkgcvW%r4*9To3iy&AgKaA$0?XwlQd-2a}vd7)UQP`+Z*u8=j`#lG>k#a+2|
z?aiw${pk!05Bz47Eb@1IdF%g^`R*MVcTerj-?!oP&8yE^&C~1u<!$miJ<mGw#=UEn
zm1$qL&!4ZUy>Fjo-l_9D#m|Yz-mLz4b7}nYxf&HO=T`H-J(sm6|NVuG>-#on*KGLy
zXX)aW^nX9|gZXOaf4qFoyH?P6rnmdQ`EvCp#_xCB2%Ir>)2Y?`I%fBNJ$v_VuDSJZ
zuDV%!SFUt@`uzRn`uc;63=T2N=DpzVxwci__DX;1&g1iD{&><IEMHrd<d#*~ylQTT
z#W%J5QwC=?Y;-KWs(UE5H)?k6#+(lZ_7B%BU;lVszWz7Y326Z*%so6L!UM`WpGItC
zHk41l^nK5#SKf>EY+b#2_3r7DIqO_6*FP0qvTtYE)*GO!Kk8E#+5WPXT%H}jaLTEa
zOY7||^qzd*-<c>8{ym;;?UwDOtNzXYp8x+-PP|J-o$Sx``+j|zxcBBl$HFA`B)%)N
zu05FGAjo~7zWU?NsrB{ck0jo(-{Fqv)7985A}p<3rog~(A^vNB*FMMiDc@9s+B#Ym
zc1=Gw^;OB6HLZtv`cH`lDNXWF4SM<Yd{?q%v^BTVqso7GPByLl9`}ELVp}3x>+b(w
z4u6fC>zMei&hgw{p@j$LaQ(ci8&h(>b<SURzuep`!QAyG#tW{NE}L_A>*ojcM|2s~
zReCN5-Tjw5Khgfd?uA!N)1J=#nRb2l`*r`P-`L2&;9#E?C7t%SZg1$V?Zq2vDt`V@
zkDs&a>*e71eba+t@0rv(-kJ4Xe4bU&(jQrCn>U|b{@=<dG3rTt{QQ{{!~Q&sX5Xwo
z?Y^=8w_bknSU>&xj~~|-wSHOrw%%%X&DRt6-b~~?c)e&f|J!py=V}Z-Kka?Lyyo}M
znfG?Y80$Q_zhKFdl(VnQ`Q@#wjLK%+*!ac%=~c@h*5Cd0d*@Ct@Ou-{(Gj9`)&Bp-
zci-M`b7$+{x@Ci)^_;q8>lQ9qwlL%F{{NQA$4X|dxnJ{=i-AFH#eTJ4SG;e(Fyc`T
z_b81DQ=49(bAFSIU}VH8=fyU!S4C%Q&F=KbRJ@!Sxp2|?%Nt!%o+qrlUOelYp3<a~
zDhDUda|tO~8g~2ZX^FbdmWMmye&qbVo3_2&d2QJ0kQJ}*n`LKb3(K5Y1YdSCY4T)Y
zVd0~FkDmE_Ue3wD@Hf!j?+fd(nOpV6HtRoO?szmaeO~3ao9WC<Oh-VA@D}iY-7NQa
zUeEsCb%iss-R&AQZ|tl6J=1va<uG;zhJ;POY8Uyt&D@%w^2|_K{(#BKkX5s0&8q$V
zty7kRfx+RvQM*fgg51(tkxz`jZng1BcVyh&mYcOT3bfvV;a9-^_ZQ!<{9pEVv9kPv
z^((JtNzZ=W+z_@tZg0_3ufoTS3=A)<(`LK~*5`d<xQx*>irv8_``Vhwtyxna=2cf)
z*F9!nI1ux-S>*@cm-XvvOP(-Gw8yQ#zajDPtE;O!Gp?=*H8eDQeQm9<wFU!2!@i_>
zqP5Jz`fnFc;7{<;ntJNgsZ+OZ%}Si18@){@a?_J9FE4-m_%Z1?D+9v?bsxR&Z)2Cm
z+;UfxKX4)@Ha7o9tn)N}28OgVXM}4TSMokNm>~;VQS>64S?QvBuolQr5Z}!pK&ZBH
z2iU`)nY0YHutollrhW?qE%;<$NR}$-+;?CGT>1xF#v=b?aNUa}c69Dr@ZRgU#uH}H
zn#2yaszv^_!5~+F3_sH9@_*MoxawsLo&WUT?c37t1YQ$1gG1$)`L4~E?6`h{6ek2t
zcya&8+i5VXgPUFchyR@im!37@#r;!jy<t|JbXxTPb`@N;aJ$R@@|SV9@-IGJI03wl
zOpUMeU+xU^`g2eJaBmb&o&H&W0YqXMPv^h47c)%Q>u#;Sm;p{S3=9v#z&G$PFw9T{
zUqQpbkjBvoc4mX5(;~2e32me(nR$b8#?G&=ufM;wHTzhP<hgU_0s{k+kM)435f~UG
z1OhI;caB<HcBDh_e$D6JsZ*zJ-u(H+#l=Vaz_&QEafN(&FLwU3tE=nrKH1s!_5Xf;
zey$(4$D-`bjUz`~l!7!w5)%{K`Q`I+b9s4qQY73eI8Sf-{r$bZhDJeA(JcG=eRJo|
zT@elnS%x$Y(Z9Q|-nsMVsCc~1zaNi5LoFvyPV`zDyv*n3?s9#>r_Y}4`}65^U0t1v
zN!FDWuU=&-y?XOzj%oI^?c2W_pSQVu^{S|-XlP7~&L>lli48XsE9Qw?xBXkPWQmG_
z!G;|>EEE(D6l~bM`SPVppyjKco}Mlx=WW09NSVA?+;5kak)fcJo}RAM)!AA3_v`iN
z=jZ?bc02$1vuAm?ws=;&y|OZR?wmRM{(g%V)MHCnkR*|IdYZ2HG#x=}0S1N!yOwKn
z;}j;J>^L#u*YTrAL&L&^CN5t5nBV@-glW^#GBa0R%#f0n?tJm%<Kx1@!nW&bYHD@g
zZl)`-@Pgc$#@ku<-uTO-^^u#^Y;9}5zq`wGc#dW9u@5W@+uak=)1N<mn)*fnH05~U
z&O-P7;v00bf5bB$FLWt+b7SL+7a47dTwGl1Vs<K(c>2yV$^8HCuT-yFMOszWuS-k4
zk9L5XJPc<fh5qiodgaQNvbRx6Rsa8fKYi*{OLJysCg?n>4G9N9Cyyo^Y$|?!?&q&x
z@9ys2zGcf7&?;T)vNv-qi}~d3{(L+x|NHlE{pf8zSF}N{W-x9!x?}tD=SeYrkGDjv
zby|4gWl7M=5VgsfTcbK%4sBW!v~tb5b=x*<C@3j;^Xk<kuca<3lTTL6)7Q~ivwC%R
zSJ$TP+r>XuF|euV9Ajl@Xk@VcRqm}cF(M*DU}Dfpkv<I(u3zuDV*UO7A1-(psFWn3
zW&r{>Zfpc~7Y;NuUIP~w4957@ZvVBuc<q{683#i_`<JS{Hxxk&rkREQ-hTY*m6yx>
z`hPobG%_5JwJLcbAo%n5?`}v5dr0Q*?QM|NmRq-PkB*M+mgQ!+v+c%>8@qPx`t+$N
zkxh?*p<$<!>;G-GU#|qaY$<%~wvm~!;dWS1(4?tTx7PeDO8Lpaknk<w;(lQ#*Mgs)
zo}QkrFFvc1;lPoVS6|)TUB3VGIqS&C$RBQe3=C{cD!<B=tgU}9Y?nKA>Xg!=B}<mL
z%h!gy>0o#ecInckd)4o4l|Fs=5V1Y)?j%)j&~5;R1?Lqn?k`qVRh?~?8?`lSD##c4
q(R(UB2K(EJ%FFA68W;?2pZ+r%NA1gyvHzwHiZD-CKbLh*2~7Z4z>Q@9

literal 0
HcmV?d00001

-- 
GitLab


From 0f5e78f68d9f8e2cb23115878091ad419e65bb17 Mon Sep 17 00:00:00 2001
From: Walmes Zeviani <walmes@ufpr.br>
Date: Tue, 30 Aug 2016 15:03:29 -0300
Subject: [PATCH 10/10] Adiciona Rd do Zimmermann.

---
 man/ZimmermannTb10.15.Rd |  7 +++----
 man/ZimmermannTb10.20.Rd |  7 +++----
 man/ZimmermannTb10.6.Rd  |  4 +---
 man/ZimmermannTb10.9.Rd  |  7 +++----
 man/ZimmermannTb11.1.Rd  |  7 +++----
 man/ZimmermannTb11.10.Rd |  7 +++----
 man/ZimmermannTb11.13.Rd |  7 +++----
 man/ZimmermannTb11.19.Rd | 18 ++++++++----------
 man/ZimmermannTb11.7.Rd  |  7 +++----
 man/ZimmermannTb12.1.Rd  |  4 +---
 man/ZimmermannTb12.13.Rd |  4 +---
 man/ZimmermannTb12.14.Rd |  4 +---
 man/ZimmermannTb12.19.Rd |  7 +++----
 man/ZimmermannTb12.2.Rd  |  4 +---
 man/ZimmermannTb12.20.Rd |  7 +++----
 man/ZimmermannTb12.26.Rd |  4 +---
 man/ZimmermannTb12.27.Rd |  4 +---
 man/ZimmermannTb12.32.Rd | 18 ++++++++----------
 man/ZimmermannTb12.33.Rd | 18 ++++++++----------
 man/ZimmermannTb12.7.Rd  |  4 +---
 man/ZimmermannTb12.8.Rd  |  4 +---
 man/ZimmermannTb13.1.Rd  |  4 +---
 man/ZimmermannTb14.3.Rd  |  7 +++----
 man/ZimmermannTb14.9.Rd  |  7 +++----
 man/ZimmermannTb15.1.Rd  |  7 +++----
 man/ZimmermannTb15.10.Rd |  4 +---
 man/ZimmermannTb15.4.Rd  |  4 +---
 man/ZimmermannTb16.1.Rd  |  4 +---
 man/ZimmermannTb16.10.Rd |  4 +---
 man/ZimmermannTb16.3.Rd  |  7 +++----
 man/ZimmermannTb16.4.Rd  |  4 +---
 man/ZimmermannTb16.5.Rd  |  7 +++----
 man/ZimmermannTb16.8.Rd  |  8 +++-----
 man/ZimmermannTb3.12.Rd  |  6 ++----
 man/ZimmermannTb3.2.1.Rd |  4 +---
 man/ZimmermannTb3.5.Rd   |  8 +++-----
 man/ZimmermannTb4.11.Rd  |  4 +---
 man/ZimmermannTb4.4.Rd   |  4 +---
 man/ZimmermannTb5.11.Rd  |  7 +++----
 man/ZimmermannTb5.15.Rd  |  7 +++----
 man/ZimmermannTb5.2.Rd   |  7 +++----
 man/ZimmermannTb7.1.Rd   |  7 +++----
 man/ZimmermannTb7.4.Rd   |  7 +++----
 man/ZimmermannTb8.5.Rd   |  8 +++-----
 man/ZimmermannTb9.13.Rd  |  7 +++----
 man/ZimmermannTb9.17.Rd  |  7 +++----
 man/ZimmermannTb9.22.Rd  |  8 +++-----
 man/ZimmermannTb9.26.Rd  |  7 +++----
 48 files changed, 122 insertions(+), 196 deletions(-)

diff --git a/man/ZimmermannTb10.15.Rd b/man/ZimmermannTb10.15.Rd
index 46c06ab4..dab56a15 100644
--- a/man/ZimmermannTb10.15.Rd
+++ b/man/ZimmermannTb10.15.Rd
@@ -2,7 +2,8 @@
 % Please edit documentation in R/Zimmermann.R
 \name{ZimmermannTb10.15}
 \alias{ZimmermannTb10.15}
-\title{Aduba\enc{çã}{ca}o Ap\enc{ó}{o}s Pastagem em Cultivares de Arroz}
+\title{Aduba\enc{çã}{ca}o Ap\enc{ó}{o}s Pastagem em Cultivares de
+    Arroz}
 \format{Um \code{data.frame} com 24 observações e 4 variáveis
 
 \describe{
@@ -21,9 +22,7 @@
 
 }}
 \source{
-Zimmermann, F. J. (2004). Estatística aplicada à pesquisa
-    agrícola (1st ed.). Santo Antônio de Goiás, GO: Embrapa Arroz e
-    Feijão. (Tabela 10.15, pág. 210)
+ZIMMERMANN (2004), Tabela 10.15, pág. 210.
 }
 \description{
 Dados de um experimento conduzido em faixas, no
diff --git a/man/ZimmermannTb10.20.Rd b/man/ZimmermannTb10.20.Rd
index 123dc217..dd76c608 100644
--- a/man/ZimmermannTb10.20.Rd
+++ b/man/ZimmermannTb10.20.Rd
@@ -2,7 +2,8 @@
 % Please edit documentation in R/Zimmermann.R
 \name{ZimmermannTb10.20}
 \alias{ZimmermannTb10.20}
-\title{Nitrog\enc{ê}{e}nio, Irriga\enc{çã}{ca}o e Preparo do Solo para Feijoeiro}
+\title{Nitrog\enc{ê}{e}nio, Irriga\enc{çã}{ca}o e Preparo do Solo
+    para Feijoeiro}
 \format{Um \code{data.frame} com 72 observações e 5 variáveis
 
 \describe{
@@ -24,9 +25,7 @@
 
 }}
 \source{
-Zimmermann, F. J. (2004). Estatística aplicada à pesquisa
-    agrícola (1st ed.). Santo Antônio de Goiás, GO: Embrapa Arroz e
-    Feijão. (Tabela 10.20, pág 213)
+ZIMMERMANN (2004), Tabela 10.20, pág 213.
 }
 \description{
 Dados de um experimento conduzido em faixas, no
diff --git a/man/ZimmermannTb10.6.Rd b/man/ZimmermannTb10.6.Rd
index cce7370d..ea2fcf60 100644
--- a/man/ZimmermannTb10.6.Rd
+++ b/man/ZimmermannTb10.6.Rd
@@ -20,9 +20,7 @@
 
 }}
 \source{
-Zimmermann, F. J. (2004). Estatística aplicada à pesquisa
-    agrícola (1st ed.). Santo Antônio de Goiás, GO: Embrapa Arroz e
-    Feijão. (Tabela 10.6, pág. 201)
+ZIMMERMANN (2004), Tabela 10.6, pág. 201.
 }
 \description{
 Dados de um experimento com dois fatores, em
diff --git a/man/ZimmermannTb10.9.Rd b/man/ZimmermannTb10.9.Rd
index f2a29dc5..a5d19bcf 100644
--- a/man/ZimmermannTb10.9.Rd
+++ b/man/ZimmermannTb10.9.Rd
@@ -2,7 +2,8 @@
 % Please edit documentation in R/Zimmermann.R
 \name{ZimmermannTb10.9}
 \alias{ZimmermannTb10.9}
-\title{\enc{É}{E}poca de Plantio e Manejo de Inseticida em Cultivares de Arroz}
+\title{\enc{É}{E}poca de Plantio e Manejo de Inseticida em Cultivares
+    de Arroz}
 \format{Um \code{data.frame} com 48 observações e 5 variáveis, em que
 
 \describe{
@@ -23,9 +24,7 @@
 
 }}
 \source{
-Zimmermann, F. J. (2004). Estatística aplicada à pesquisa
-    agrícola (1st ed.). Santo Antônio de Goiás, GO: Embrapa Arroz e
-    Feijão. (Tabela 10.9, pág. 205)
+ZIMMERMANN (2004), Tabela 10.9, pág. 205.
 }
 \description{
 Dados de um em delineamento de blocos completos ao
diff --git a/man/ZimmermannTb11.1.Rd b/man/ZimmermannTb11.1.Rd
index 0a390e6a..24e1efe7 100644
--- a/man/ZimmermannTb11.1.Rd
+++ b/man/ZimmermannTb11.1.Rd
@@ -2,7 +2,8 @@
 % Please edit documentation in R/Zimmermann.R
 \name{ZimmermannTb11.1}
 \alias{ZimmermannTb11.1}
-\title{Espa\enc{ç}{c}amento e Densidade de Plantio na Produ\enc{çã}{ca}o de Arroz}
+\title{Espa\enc{ç}{c}amento e Densidade de Plantio na
+    Produ\enc{çã}{ca}o de Arroz}
 \format{Um \code{data.frame} com 32 observações e 4 variáveis, em que
 
 \describe{
@@ -26,9 +27,7 @@
 
 }}
 \source{
-Zimmermann, F. J. (2004). Estatística aplicada à pesquisa
-    agrícola (1st ed.). Santo Antônio de Goiás, GO: Embrapa Arroz e
-    Feijão. (Tabela 11.1, pág. 221)
+ZIMMERMANN (2004), Tabela 11.1, pág. 221.
 }
 \description{
 Dados de um experimento fatorial \eqn{2^3}, com
diff --git a/man/ZimmermannTb11.10.Rd b/man/ZimmermannTb11.10.Rd
index f6ab049a..d598364e 100644
--- a/man/ZimmermannTb11.10.Rd
+++ b/man/ZimmermannTb11.10.Rd
@@ -2,7 +2,8 @@
 % Please edit documentation in R/Zimmermann.R
 \name{ZimmermannTb11.10}
 \alias{ZimmermannTb11.10}
-\title{Espa\enc{ç}{c}amento Entre Linhas e Densidade no Plantio de Feij\enc{ã}{a}o}
+\title{Espa\enc{ç}{c}amento Entre Linhas e Densidade no Plantio de
+    Feij\enc{ã}{a}o}
 \format{Um \code{data.frame} com 36 observações e 6 variáveis
 
 \describe{
@@ -23,9 +24,7 @@
 
 }}
 \source{
-Zimmermann, F. J. (2004). Estatística aplicada à pesquisa
-    agrícola (1st ed.). Santo Antônio de Goiás, GO: Embrapa Arroz e
-    Feijão. (pg 231)
+ZIMMERMANN (2004), Tabela 11.10, pág 231.
 }
 \description{
 Dados de um experimento fatorial \eqn{3^2}, com a
diff --git a/man/ZimmermannTb11.13.Rd b/man/ZimmermannTb11.13.Rd
index ad967a05..000dd6ca 100644
--- a/man/ZimmermannTb11.13.Rd
+++ b/man/ZimmermannTb11.13.Rd
@@ -2,7 +2,8 @@
 % Please edit documentation in R/Zimmermann.R
 \name{ZimmermannTb11.13}
 \alias{ZimmermannTb11.13}
-\title{Absor\enc{çã}{ca}o e Transloca\enc{çã}{ca}o de Zinco em Arroz de Terras Altas}
+\title{Absor\enc{çã}{ca}o e Transloca\enc{çã}{ca}o de Zinco em Arroz
+    de Terras Altas}
 \format{Um \code{data.frame} com 81 observações e 6 variáveis, em que
 
 \describe{
@@ -26,9 +27,7 @@
 
 }}
 \source{
-Zimmermann, F. J. (2004). Estatística aplicada à pesquisa
-    agrícola (1st ed.). Santo Antônio de Goiás, GO: Embrapa Arroz e
-    Feijão. (Tabela 11.13, pág. 234)
+ZIMMERMANN (2004), Tabela 11.13, pág. 234.
 }
 \description{
 Dados de um experimento fatorial \eqn{3^3}, com
diff --git a/man/ZimmermannTb11.19.Rd b/man/ZimmermannTb11.19.Rd
index 5b20a436..f593016a 100644
--- a/man/ZimmermannTb11.19.Rd
+++ b/man/ZimmermannTb11.19.Rd
@@ -2,7 +2,8 @@
 % Please edit documentation in R/Zimmermann.R
 \name{ZimmermannTb11.19}
 \alias{ZimmermannTb11.19}
-\title{Produtividade de arroz irrigado em ensaio fatorial com confundimento}
+\title{Produtividade de arroz irrigado em ensaio fatorial com
+    confundimento}
 \format{Um \code{data.frame} com 32 observações e 7 variáveis, em que
 
 \describe{
@@ -29,18 +30,15 @@
 
 }}
 \source{
-Zimmermann, F. J. (2004). Estatística aplicada à pesquisa
-    agrícola (1st ed.). Santo Antônio de Goiás, GO: Embrapa Arroz e
-    Feijão. (Tabela 11.19, pág. 237)
+ZIMMERMANN (2004), Tabela 11.19, pág. 237.
 }
 \description{
 Dados de um experimento fatorial \eqn{2^5}, com
-    confundimento da interação de quinta ordem.
-    Estudou-se o efeito dos cinco principais problemas da cultura: controle de
-    invasoras, adubação, irrigação, controle de doenças e
-    cultivar. A interação de quarta ordem (5 fatores) foi
-    confundida com blocos.  Os dados da produtividade do arroz estão
-    em kg/ha.
+    confundimento da interação de quinta ordem.  Estudou-se o efeito
+    dos cinco principais problemas da cultura: controle de invasoras,
+    adubação, irrigação, controle de doenças e cultivar. A interação
+    de quarta ordem (5 fatores) foi confundida com blocos.  Os dados
+    da produtividade do arroz estão em kg/ha.
 }
 \examples{
 
diff --git a/man/ZimmermannTb11.7.Rd b/man/ZimmermannTb11.7.Rd
index 7449d736..3333c8e2 100644
--- a/man/ZimmermannTb11.7.Rd
+++ b/man/ZimmermannTb11.7.Rd
@@ -2,7 +2,8 @@
 % Please edit documentation in R/Zimmermann.R
 \name{ZimmermannTb11.7}
 \alias{ZimmermannTb11.7}
-\title{Espa\enc{ç}{c}amento, Densidade e Nitrog\enc{ê}{e}nio na Produ\enc{çã}{ca}o de Arroz}
+\title{Espa\enc{ç}{c}amento, Densidade e Nitrog\enc{ê}{e}nio na
+    Produ\enc{çã}{ca}o de Arroz}
 \format{Um \code{data.frame} com 32 observações e 7 variáveis
 
 \describe{
@@ -26,9 +27,7 @@
 
 }}
 \source{
-Zimmermann, F. J. (2004). Estatística aplicada à pesquisa
-    agrícola (1st ed.). Santo Antônio de Goiás, GO: Embrapa Arroz e
-    Feijão. (Tabela 11.7, pág 226)
+ZIMMERMANN (2004), Tabela 11.7, pág 226.
 }
 \description{
 Dados de um experimento fatorial \eqn{2^3}, com
diff --git a/man/ZimmermannTb12.1.Rd b/man/ZimmermannTb12.1.Rd
index 23caa24d..06e5f56d 100644
--- a/man/ZimmermannTb12.1.Rd
+++ b/man/ZimmermannTb12.1.Rd
@@ -18,9 +18,7 @@
 
 }}
 \source{
-Zimmermann, F. J. (2004). Estatística aplicada à pesquisa
-    agrícola (1st ed.). Santo Antônio de Goiás, GO: Embrapa Arroz e
-    Feijão. (pg 249)
+ZIMMERMANN (2004), Tabela 12.1, pág. 249.
 }
 \description{
 Dados do Ensaio 1 de um experimento em DIC, que estudou
diff --git a/man/ZimmermannTb12.13.Rd b/man/ZimmermannTb12.13.Rd
index d63ef3b0..82bc602a 100644
--- a/man/ZimmermannTb12.13.Rd
+++ b/man/ZimmermannTb12.13.Rd
@@ -19,9 +19,7 @@
 
 }}
 \source{
-Zimmermann, F. J. (2004). Estatística aplicada à pesquisa
-    agrícola (1st ed.). Santo Antônio de Goiás, GO: Embrapa Arroz e
-    Feijão. (Tab 12.13, pág 255)
+ZIMMERMANN (2004), Tabela 12.13, pág. 255.
 }
 \description{
 Dados do ensaio 1 de um experimento em DBC que estudou a
diff --git a/man/ZimmermannTb12.14.Rd b/man/ZimmermannTb12.14.Rd
index 4cbabb0f..a15c2338 100644
--- a/man/ZimmermannTb12.14.Rd
+++ b/man/ZimmermannTb12.14.Rd
@@ -19,9 +19,7 @@
 
 }}
 \source{
-Zimmermann, F. J. (2004). Estatística aplicada à pesquisa
-    agrícola (1st ed.). Santo Antônio de Goiás, GO: Embrapa Arroz e
-    Feijão. (pg 255)
+ZIMMERMANN (2004), Tabela 12.14, pág. 255.
 }
 \description{
 Dados do ensaio 2 de um experimento em DBC que estudou a
diff --git a/man/ZimmermannTb12.19.Rd b/man/ZimmermannTb12.19.Rd
index 80f2fd25..cbd71aa8 100644
--- a/man/ZimmermannTb12.19.Rd
+++ b/man/ZimmermannTb12.19.Rd
@@ -2,7 +2,8 @@
 % Please edit documentation in R/Zimmermann.R
 \name{ZimmermannTb12.19}
 \alias{ZimmermannTb12.19}
-\title{Produtividade de feij\enc{ã}{a}o em ensaio de competi\enc{çã}{ca}o de cultivares}
+\title{Produtividade de feij\enc{ã}{a}o em ensaio de
+    competi\enc{çã}{ca}o de cultivares}
 \format{Um \code{data.frame} com 36 observações e 3 variáveis
 
 \describe{
@@ -17,9 +18,7 @@
 
 }}
 \source{
-Zimmermann, F. J. (2004). Estatística aplicada à pesquisa
-    agrícola (1st ed.). Santo Antônio de Goiás, GO: Embrapa Arroz e
-    Feijão. (Tabela 12.19, pág 258)
+ZIMMERMANN (2004), Tabela 12.19, pág. 258.
 }
 \description{
 Dados do ensaio 1 de um experimento em DBC de competição
diff --git a/man/ZimmermannTb12.2.Rd b/man/ZimmermannTb12.2.Rd
index 08a93c02..cb2c95eb 100644
--- a/man/ZimmermannTb12.2.Rd
+++ b/man/ZimmermannTb12.2.Rd
@@ -18,9 +18,7 @@
 
 }}
 \source{
-Zimmermann, F. J. (2004). Estatística aplicada à pesquisa
-    agrícola (1st ed.). Santo Antônio de Goiás, GO: Embrapa Arroz e
-    Feijão. (Tabela 12.2, pág 249)
+ZIMMERMANN (2004), Tabela 12.2, pág. 249.
 }
 \description{
 Dados do Ensaio 2 de um experimento em DIC, que estudou
diff --git a/man/ZimmermannTb12.20.Rd b/man/ZimmermannTb12.20.Rd
index f5449355..cd054e14 100644
--- a/man/ZimmermannTb12.20.Rd
+++ b/man/ZimmermannTb12.20.Rd
@@ -2,7 +2,8 @@
 % Please edit documentation in R/Zimmermann.R
 \name{ZimmermannTb12.20}
 \alias{ZimmermannTb12.20}
-\title{Produtividade de Gr\enc{ã}{a}os de Cultivares de Feij\enc{ã}{a}o}
+\title{Produtividade de Gr\enc{ã}{a}os de Cultivares de
+    Feij\enc{ã}{a}o}
 \format{Um \code{data.frame} com 36 observações e 3 variáveis
 
 \describe{
@@ -17,9 +18,7 @@
 
 }}
 \source{
-Zimmermann, F. J. (2004). Estatística aplicada à pesquisa
-    agrícola (1st ed.). Santo Antônio de Goiás, GO: Embrapa Arroz e
-    Feijão. (pg 258)
+ZIMMERMANN (2004), Tabela 12.20, pág. 258.
 }
 \description{
 Dados do ensaio 2 de um experimento em DBC de competição
diff --git a/man/ZimmermannTb12.26.Rd b/man/ZimmermannTb12.26.Rd
index 585828f8..e0cc8783 100644
--- a/man/ZimmermannTb12.26.Rd
+++ b/man/ZimmermannTb12.26.Rd
@@ -19,9 +19,7 @@
 
 }}
 \source{
-Zimmermann, F. J. (2004). Estatística aplicada à pesquisa
-    agrícola (1st ed.). Santo Antônio de Goiás, GO: Embrapa Arroz e
-    Feijão. (pg 261)
+ZIMMERMANN (2004), Tabela 12.16, pág. 261.
 }
 \description{
 Ensaio 1 de um experimento em DQL, que avaliou a
diff --git a/man/ZimmermannTb12.27.Rd b/man/ZimmermannTb12.27.Rd
index 706dcaef..b03e5803 100644
--- a/man/ZimmermannTb12.27.Rd
+++ b/man/ZimmermannTb12.27.Rd
@@ -20,9 +20,7 @@
 
 }}
 \source{
-Zimmermann, F. J. (2004). Estatística aplicada à pesquisa
-    agrícola (1st ed.). Santo Antônio de Goiás, GO: Embrapa Arroz e
-    Feijão. (Tabela 12.27, pág 262)
+ZIMMERMANN (2004), Tabela 12.27, pág. 262.
 }
 \description{
 Ensaio 2 de um experimento em delineamento quadrado
diff --git a/man/ZimmermannTb12.32.Rd b/man/ZimmermannTb12.32.Rd
index be45095c..f63b305d 100644
--- a/man/ZimmermannTb12.32.Rd
+++ b/man/ZimmermannTb12.32.Rd
@@ -7,8 +7,8 @@
 
 \describe{
 
-\item{\code{geno}}{Fator de níveis nominais. Identifica o genótipo repetição 
-    da observação.}
+\item{\code{geno}}{Fator de níveis nominais. Identifica o genótipo
+    repetição da observação.}
 
 \item{\code{irrigados}}{Médias nos ensaios irrigados.}
 
@@ -18,16 +18,14 @@
 
 }}
 \source{
-Zimmermann, F. J. (2004). Estatística aplicada à pesquisa
-    agrícola (1st ed.). Santo Antônio de Goiás, GO: Embrapa Arroz e
-    Feijão. (Tabela 12.32, pág 264)
+ZIMMERMANN (2004), Tabela 12.32, pág. 264.
 }
 \description{
-Dados de um estudo em delineamento de blocos completos com 
-    quatro repetições. O experimento foi um ensaio de competição de
-    cultivares e linhagens de feijão, em cultivos irrigado e de sequeiro.
-    São apresentadas na tabela a média nos ensaios irrigados, nos de sequeiro
-    e geral.
+Dados de um estudo em delineamento de blocos completos
+    com quatro repetições. O experimento foi um ensaio de competição
+    de cultivares e linhagens de feijão, em cultivos irrigado e de
+    sequeiro.  São apresentadas na tabela a média nos ensaios
+    irrigados, nos de sequeiro e geral.
 }
 \examples{
 
diff --git a/man/ZimmermannTb12.33.Rd b/man/ZimmermannTb12.33.Rd
index ac48b806..c0cc6f38 100644
--- a/man/ZimmermannTb12.33.Rd
+++ b/man/ZimmermannTb12.33.Rd
@@ -7,8 +7,8 @@
 
 \describe{
 
-\item{\code{geno}}{Fator de níveis nominais. Identifica o genótipo repetição 
-    da observação.}
+\item{\code{geno}}{Fator de níveis nominais. Identifica o genótipo
+    repetição da observação.}
 
 \item{\code{irrigados}}{Totais nos ensaios irrigados.}
 
@@ -18,16 +18,14 @@
 
 }}
 \source{
-Zimmermann, F. J. (2004). Estatística aplicada à pesquisa
-    agrícola (1st ed.). Santo Antônio de Goiás, GO: Embrapa Arroz e
-    Feijão. (Tabela 12.33, pág 265)
+ZIMMERMANN (2004), Tabela 12.33, pág. 265.
 }
 \description{
-Dados de um estudo em delineamento de blocos completos com 
-    quatro repetições. O experimento foi um ensaio de competição de
-    cultivares e linhagens de feijão, em cultivos irrigado e de sequeiro.
-    São apresentadas na tabela o total nos ensaios irrigados, nos de sequeiro
-    e geral.
+Dados de um estudo em delineamento de blocos completos
+    com quatro repetições. O experimento foi um ensaio de competição
+    de cultivares e linhagens de feijão, em cultivos irrigado e de
+    sequeiro.  São apresentadas na tabela o total nos ensaios
+    irrigados, nos de sequeiro e geral.
 }
 \examples{
 
diff --git a/man/ZimmermannTb12.7.Rd b/man/ZimmermannTb12.7.Rd
index 07bbb747..efe767b9 100644
--- a/man/ZimmermannTb12.7.Rd
+++ b/man/ZimmermannTb12.7.Rd
@@ -17,9 +17,7 @@
 
 }}
 \source{
-Zimmermann, F. J. (2004). Estatística aplicada à pesquisa
-    agrícola (1st ed.). Santo Antônio de Goiás, GO: Embrapa Arroz e
-    Feijão. (Tabela 12.7, pág 251)
+ZIMMERMANN (2004), Tabela 12.7, pág. 251.
 }
 \description{
 Dados do ensaio 1 de um experimento que avaliou as
diff --git a/man/ZimmermannTb12.8.Rd b/man/ZimmermannTb12.8.Rd
index 17821773..8bc528b1 100644
--- a/man/ZimmermannTb12.8.Rd
+++ b/man/ZimmermannTb12.8.Rd
@@ -17,9 +17,7 @@
 
 }}
 \source{
-Zimmermann, F. J. (2004). Estatística aplicada à pesquisa
-    agrícola (1st ed.). Santo Antônio de Goiás, GO: Embrapa Arroz e
-    Feijão. (pg 252)
+ZIMMERMANN (2004), Tabela 12.8, pág. 252.
 }
 \description{
 Dados do ensaio 1 de um experimento que avaliou as
diff --git a/man/ZimmermannTb13.1.Rd b/man/ZimmermannTb13.1.Rd
index 0ce7f7ec..31442150 100644
--- a/man/ZimmermannTb13.1.Rd
+++ b/man/ZimmermannTb13.1.Rd
@@ -19,9 +19,7 @@
 
 }}
 \source{
-Zimmermann, F. J. (2004). Estatística aplicada à pesquisa
-    agrícola (1st ed.). Santo Antônio de Goiás, GO: Embrapa Arroz e
-    Feijão. (Tabela 13.1, pág 272)
+ZIMMERMANN (2004), Tabela 13.1, pág. 272.
 }
 \description{
 Em um plantio de feijão com a cultivar Jalo Precoce
diff --git a/man/ZimmermannTb14.3.Rd b/man/ZimmermannTb14.3.Rd
index 45db1956..af9253f9 100644
--- a/man/ZimmermannTb14.3.Rd
+++ b/man/ZimmermannTb14.3.Rd
@@ -2,7 +2,8 @@
 % Please edit documentation in R/Zimmermann.R
 \name{ZimmermannTb14.3}
 \alias{ZimmermannTb14.3}
-\title{Estande de Plantas e Produtividade de Cultivares de Feij\enc{ã}{a}o}
+\title{Estande de Plantas e Produtividade de Cultivares de
+    Feij\enc{ã}{a}o}
 \format{Um \code{data.frame} com 28 observações e 4 variáveis
 
 \describe{
@@ -18,9 +19,7 @@
 
 }}
 \source{
-Zimmermann, F. J. (2004). Estatística aplicada à pesquisa
-    agrícola (1st ed.). Santo Antônio de Goiás, GO: Embrapa Arroz e
-    Feijão. (Tabela 14.3, pág 293)
+ZIMMERMANN (2004), Tabela 14.3, pág. 293.
 }
 \description{
 Dados de um ensaio de competição de cultivares de feijão
diff --git a/man/ZimmermannTb14.9.Rd b/man/ZimmermannTb14.9.Rd
index 6e19d1d2..b43119d4 100644
--- a/man/ZimmermannTb14.9.Rd
+++ b/man/ZimmermannTb14.9.Rd
@@ -2,7 +2,8 @@
 % Please edit documentation in R/Zimmermann.R
 \name{ZimmermannTb14.9}
 \alias{ZimmermannTb14.9}
-\title{Controle de Insetos na Produtividade de Gr\enc{ã}{a}os de Arroz}
+\title{Controle de Insetos na Produtividade de Gr\enc{ã}{a}os de
+    Arroz}
 \format{Um \code{data.frame} com 36 observações e 4 variáveis
 
 \describe{
@@ -18,9 +19,7 @@
 
 }}
 \source{
-Zimmermann, F. J. (2004). Estatística aplicada à pesquisa
-    agrícola (1st ed.). Santo Antônio de Goiás, GO: Embrapa Arroz e
-    Feijão. (Tabela 14.9, pág. 297)
+ZIMMERMANN (2004), Tabela 14.9, pág. 297.
 }
 \description{
 Dados de um ensaio de controle de insetos/pragas na
diff --git a/man/ZimmermannTb15.1.Rd b/man/ZimmermannTb15.1.Rd
index 1e097ba2..bac157e3 100644
--- a/man/ZimmermannTb15.1.Rd
+++ b/man/ZimmermannTb15.1.Rd
@@ -2,7 +2,8 @@
 % Please edit documentation in R/Zimmermann.R
 \name{ZimmermannTb15.1}
 \alias{ZimmermannTb15.1}
-\title{Produ\enc{çã}{ca}o de Perfilhos por Planta em Fun\enc{çã}{ca}o de 4 Fatores}
+\title{Produ\enc{çã}{ca}o de Perfilhos por Planta em Fun\enc{çã}{ca}o
+    de 4 Fatores}
 \format{Um \code{data.frame} com 24 observações e 3 variáveis
 
 \describe{
@@ -25,9 +26,7 @@
 
 }}
 \source{
-Zimmermann, F. J. (2004). Estatística aplicada à pesquisa
-    agrícola (1st ed.). Santo Antônio de Goiás, GO: Embrapa Arroz e
-    Feijão. (pg 306)
+ZIMMERMANN (2004), Tabela 15.1, pág. 306.
 }
 \description{
 Dados de um ensaio fatorial fracionado \eqn{2^{4-1}}, em
diff --git a/man/ZimmermannTb15.10.Rd b/man/ZimmermannTb15.10.Rd
index 0549b3fc..5d9c35b8 100644
--- a/man/ZimmermannTb15.10.Rd
+++ b/man/ZimmermannTb15.10.Rd
@@ -17,9 +17,7 @@
 
 }}
 \source{
-Zimmermann, F. J. (2004). Estatística aplicada à pesquisa
-    agrícola (1st ed.). Santo Antônio de Goiás, GO: Embrapa Arroz e
-    Feijão. (Tabela 15.10, pág. 314)
+ZIMMERMANN (2004), Tabela 15.10, pág. 314.
 }
 \description{
 Dados de produção de grãos em terras altas, em kg
diff --git a/man/ZimmermannTb15.4.Rd b/man/ZimmermannTb15.4.Rd
index 67a681ca..61694a04 100644
--- a/man/ZimmermannTb15.4.Rd
+++ b/man/ZimmermannTb15.4.Rd
@@ -23,9 +23,7 @@
 
 }}
 \source{
-Zimmermann, F. J. (2004). Estatística aplicada à pesquisa
-    agrícola (1st ed.). Santo Antônio de Goiás, GO: Embrapa Arroz e
-    Feijão. (Tabela 15.4, pág. 309)
+ZIMMERMANN (2004), Tabela 15.4, pág. 309.
 }
 \description{
 Dados de um ensaio com fração 1/3 de um fatorial
diff --git a/man/ZimmermannTb16.1.Rd b/man/ZimmermannTb16.1.Rd
index 291138f2..4f4ce1c7 100644
--- a/man/ZimmermannTb16.1.Rd
+++ b/man/ZimmermannTb16.1.Rd
@@ -26,9 +26,7 @@
 
 }}
 \source{
-Zimmermann, F. J. (2004). Estatística aplicada à pesquisa
-    agrícola (1st ed.). Santo Antônio de Goiás, GO: Embrapa Arroz e
-    Feijão. (Tabela 16.1, pág. 327)
+ZIMMERMANN (2004), Tabela 16.1, pág. 327.
 }
 \description{
 Dados de análise de solos aluviais, que apresentaram pH
diff --git a/man/ZimmermannTb16.10.Rd b/man/ZimmermannTb16.10.Rd
index caa3c8ae..fb6caabf 100644
--- a/man/ZimmermannTb16.10.Rd
+++ b/man/ZimmermannTb16.10.Rd
@@ -22,9 +22,7 @@
 
 }}
 \source{
-Zimmermann, F. J. (2004). Estatística aplicada à pesquisa
-    agrícola (1st ed.). Santo Antônio de Goiás, GO: Embrapa Arroz e
-    Feijão. (Tabela 16.10, pág. 357)
+ZIMMERMANN (2004), Tabela 16.10, pág. 357.
 }
 \description{
 Experimento realizado em delineamento quadrado latino 6
diff --git a/man/ZimmermannTb16.3.Rd b/man/ZimmermannTb16.3.Rd
index 125b4b43..1aae31d9 100644
--- a/man/ZimmermannTb16.3.Rd
+++ b/man/ZimmermannTb16.3.Rd
@@ -2,7 +2,8 @@
 % Please edit documentation in R/Zimmermann.R
 \name{ZimmermannTb16.3}
 \alias{ZimmermannTb16.3}
-\title{Teores de Mat\enc{é}{e}ria Org\enc{â}{a}nica de Solos de V\enc{á}{a}rzea}
+\title{Teores de Mat\enc{é}{e}ria Org\enc{â}{a}nica de Solos de
+    V\enc{á}{a}rzea}
 \format{Um \code{data.frame} com 14 observações e 2 variáveis, em que
 
 \describe{
@@ -14,9 +15,7 @@
 
 }}
 \source{
-Zimmermann, F. J. (2004). Estatística aplicada à pesquisa
-    agrícola (1st ed.). Santo Antônio de Goiás, GO: Embrapa Arroz e
-    Feijão. (Tabela 16.3, pág. 337)
+ZIMMERMANN (2004), Tabela 16.3, pág. 337.
 }
 \description{
 Teores de matéria orgânica de solos aluviais e gely
diff --git a/man/ZimmermannTb16.4.Rd b/man/ZimmermannTb16.4.Rd
index 9e87305a..4c3dbd5e 100644
--- a/man/ZimmermannTb16.4.Rd
+++ b/man/ZimmermannTb16.4.Rd
@@ -17,9 +17,7 @@
 
 }}
 \source{
-Zimmermann, F. J. (2004). Estatística aplicada à pesquisa
-    agrícola (1st ed.). Santo Antônio de Goiás, GO: Embrapa Arroz e
-    Feijão. (Tabela 16.4, pág. 341)
+ZIMMERMANN (2004), Tabela 16.4, pág. 341.
 }
 \description{
 Dados de um experimento em delineamento inteiramente
diff --git a/man/ZimmermannTb16.5.Rd b/man/ZimmermannTb16.5.Rd
index bbedbe17..26b3ed55 100644
--- a/man/ZimmermannTb16.5.Rd
+++ b/man/ZimmermannTb16.5.Rd
@@ -2,7 +2,8 @@
 % Please edit documentation in R/Zimmermann.R
 \name{ZimmermannTb16.5}
 \alias{ZimmermannTb16.5}
-\title{N\enc{ú}{u}mero de Dias para Flora\enc{çã}{ca}o de Cultivares de Arroz}
+\title{N\enc{ú}{u}mero de Dias para Flora\enc{çã}{ca}o de Cultivares
+    de Arroz}
 \format{Um \code{data.frame} com 24 observações e 4 variáveis, em que
 
 \describe{
@@ -19,9 +20,7 @@
 
 }}
 \source{
-Zimmermann, F. J. (2004). Estatística aplicada à pesquisa
-    agrícola (1st ed.). Santo Antônio de Goiás, GO: Embrapa Arroz e
-    Feijão. (Tabela 16.5, pág 347)
+ZIMMERMANN (2004), Tabela 16.5, pág. 347.
 }
 \description{
 Experimento realizado em delineamento em blocos
diff --git a/man/ZimmermannTb16.8.Rd b/man/ZimmermannTb16.8.Rd
index 7b594575..908f93d2 100644
--- a/man/ZimmermannTb16.8.Rd
+++ b/man/ZimmermannTb16.8.Rd
@@ -2,8 +2,8 @@
 % Please edit documentation in R/Zimmermann.R
 \name{ZimmermannTb16.8}
 \alias{ZimmermannTb16.8}
-\title{Dias para Flora\enc{çã}{ca}o de Cultivares de Arroz em um Reticulado
-    Quadrado}
+\title{Dias para Flora\enc{çã}{ca}o de Cultivares de Arroz em um
+    Reticulado Quadrado}
 \format{Um \code{data.frame} com 75 observações e 5 variáveis, em que
 
 \describe{
@@ -24,9 +24,7 @@
 
 }}
 \source{
-Zimmermann, F. J. (2004). Estatística aplicada à pesquisa
-    agrícola (1st ed.). Santo Antônio de Goiás, GO: Embrapa Arroz e
-    Feijão. (Tabela 16.8, pág. 353)
+ZIMMERMANN (2004), Tabela 16.8, pág. 353.
 }
 \description{
 Experimento realizado em delineamento reticulado
diff --git a/man/ZimmermannTb3.12.Rd b/man/ZimmermannTb3.12.Rd
index 9b975e6e..a7e8cdf0 100644
--- a/man/ZimmermannTb3.12.Rd
+++ b/man/ZimmermannTb3.12.Rd
@@ -2,7 +2,7 @@
 % Please edit documentation in R/Zimmermann.R
 \name{ZimmermannTb3.12}
 \alias{ZimmermannTb3.12}
-\title{Dados de mat\enc{é}{e}ria seca em plantas}
+\title{Dados de Mat\enc{é}{e}ria Seca em Plantas}
 \format{Um \code{data.frame} com 75 observações e 4 variáveis
 
 \describe{
@@ -20,9 +20,7 @@
 
 }}
 \source{
-Zimmermann, F. J. (2004). Estatística aplicada à pesquisa
-    agrícola (1st ed.). Santo Antônio de Goiás, GO: Embrapa Arroz e
-    Feijão. (Table 3.12, pág 62)
+ZIMMERMANN (2004), Tabela 3.12, pág. 62.
 }
 \description{
 Experimento em DIC que estudou a produção de matéria
diff --git a/man/ZimmermannTb3.2.1.Rd b/man/ZimmermannTb3.2.1.Rd
index 5a23c11a..9f08cff3 100644
--- a/man/ZimmermannTb3.2.1.Rd
+++ b/man/ZimmermannTb3.2.1.Rd
@@ -18,9 +18,7 @@
 
 }}
 \source{
-Zimmermann, F. J. (2004). Estatística aplicada à pesquisa
-    agrícola (1st ed.). Santo Antônio de Goiás, GO: Embrapa Arroz e
-    Feijão. (pg 54)
+ZIMMERMANN (2004), Tabela 3.2.1, pág. 54.
 }
 \description{
 Dados de um experimento em DIC que visa estudar a
diff --git a/man/ZimmermannTb3.5.Rd b/man/ZimmermannTb3.5.Rd
index 22a045eb..7e682955 100644
--- a/man/ZimmermannTb3.5.Rd
+++ b/man/ZimmermannTb3.5.Rd
@@ -2,8 +2,8 @@
 % Please edit documentation in R/Zimmermann.R
 \name{ZimmermannTb3.5}
 \alias{ZimmermannTb3.5}
-\title{Fracionamento da Aduba\enc{çã}{ca}o na Produ\enc{çã}{ca}o de Gr\enc{ã}{a}os de Arroz
-    Irrigado}
+\title{Fracionamento da Aduba\enc{çã}{ca}o na Produ\enc{çã}{ca}o de
+    Gr\enc{ã}{a}os de Arroz Irrigado}
 \format{Um \code{data.frame} com 32 observações e 3 variáveis
 
 \describe{
@@ -22,9 +22,7 @@
 
 }}
 \source{
-Zimmermann, F. J. (2004). Estatística aplicada à pesquisa
-    agrícola (1st ed.). Santo Antônio de Goiás, GO: Embrapa Arroz e
-    Feijão. (Tabela 3.5, pág. 54)
+ZIMMERMANN (2004), Tabela 3.5, pág. 54.
 }
 \description{
 Dados de um estudo sobre adubação nitrogenada na cultura
diff --git a/man/ZimmermannTb4.11.Rd b/man/ZimmermannTb4.11.Rd
index 7a02a53d..2fb9cd93 100644
--- a/man/ZimmermannTb4.11.Rd
+++ b/man/ZimmermannTb4.11.Rd
@@ -20,9 +20,7 @@
 
 }}
 \source{
-Zimmermann, F. J. (2004). Estatística aplicada à pesquisa
-    agrícola (1st ed.). Santo Antônio de Goiás, GO: Embrapa Arroz e
-    Feijão. (Tabela 4.11, pág 79)
+ZIMMERMANN (2004), Tabela 4.11, pág. 79.
 }
 \description{
 Dados de um ensaio com dez genótipos, quatro blocos e
diff --git a/man/ZimmermannTb4.4.Rd b/man/ZimmermannTb4.4.Rd
index 84f080b1..fc91785d 100644
--- a/man/ZimmermannTb4.4.Rd
+++ b/man/ZimmermannTb4.4.Rd
@@ -16,9 +16,7 @@
 
 }}
 \source{
-Zimmermann, F. J. (2004). Estatística aplicada à pesquisa
-    agrícola (1st ed.). Santo Antônio de Goiás, GO: Embrapa Arroz e
-    Feijão. (Tabela 4.4, pág 72)
+ZIMMERMANN (2004), Tabela 4.4, pág. 72.
 }
 \description{
 Dados de um ensaio de competição de cultivares, em
diff --git a/man/ZimmermannTb5.11.Rd b/man/ZimmermannTb5.11.Rd
index 1c95f8eb..eb6e5d55 100644
--- a/man/ZimmermannTb5.11.Rd
+++ b/man/ZimmermannTb5.11.Rd
@@ -2,7 +2,8 @@
 % Please edit documentation in R/Zimmermann.R
 \name{ZimmermannTb5.11}
 \alias{ZimmermannTb5.11}
-\title{Propor\enc{çã}{ca}o de hastes sobreviventes ao ataque de insetos}
+\title{Propor\enc{çã}{ca}o de Hastes Sobreviventes ao Ataque de
+    Insetos}
 \format{Um \code{data.frame} com 484 observações e 5 variáveis
 
 \describe{
@@ -26,9 +27,7 @@
 
 }}
 \source{
-Zimmermann, F. J. (2004). Estatística aplicada à pesquisa
-    agrícola (1st ed.). Santo Antônio de Goiás, GO: Embrapa Arroz e
-    Feijão. (Tabela 5.1, pág 101)
+ZIMMERMANN (2004), Tabela 5.1, pág. 101.
 }
 \description{
 Experimento em delineamento quadrado latino onde foram
diff --git a/man/ZimmermannTb5.15.Rd b/man/ZimmermannTb5.15.Rd
index fd76ebc1..83790e7e 100644
--- a/man/ZimmermannTb5.15.Rd
+++ b/man/ZimmermannTb5.15.Rd
@@ -2,7 +2,8 @@
 % Please edit documentation in R/Zimmermann.R
 \name{ZimmermannTb5.15}
 \alias{ZimmermannTb5.15}
-\title{N\enc{ú}{u}mero de Perfilhos em Arroz em Fun\enc{çã}{ca}o de 6 Tratamentos}
+\title{N\enc{ú}{u}mero de Perfilhos em Arroz em Fun\enc{çã}{ca}o de 6
+    Tratamentos}
 \format{Um \code{data.frame} com 36 observações e 4 variáveis, em que
 
 \describe{
@@ -20,9 +21,7 @@
 
 }}
 \source{
-Zimmermann, F. J. (2004). Estatística aplicada à pesquisa
-    agrícola (1st ed.). Santo Antônio de Goiás, GO: Embrapa Arroz e
-    Feijão. (Tabela 5.15, pág. 107)
+ZIMMERMANN (2004), Tabela 5.15, pág. 107.
 }
 \description{
 Esperimento conduzido pelo pesquisador Evane Ferreira,
diff --git a/man/ZimmermannTb5.2.Rd b/man/ZimmermannTb5.2.Rd
index ba0ddd68..61494360 100644
--- a/man/ZimmermannTb5.2.Rd
+++ b/man/ZimmermannTb5.2.Rd
@@ -2,7 +2,8 @@
 % Please edit documentation in R/Zimmermann.R
 \name{ZimmermannTb5.2}
 \alias{ZimmermannTb5.2}
-\title{Produ\enc{çã}{ca}o de Gr\enc{ã}{a}os de Gen\enc{ó}{o}tipos de Arroz}
+\title{Produ\enc{çã}{ca}o de Gr\enc{ã}{a}os de Gen\enc{ó}{o}tipos de
+    Arroz}
 \format{Um \code{data.frame} com 64 observações e 4 variáveis
 
 \describe{
@@ -20,9 +21,7 @@
 
 }}
 \source{
-Zimmermann, F. J. (2004). Estatística aplicada à pesquisa
-    agrícola (1st ed.). Santo Antônio de Goiás, GO: Embrapa Arroz e
-    Feijão. (Tabela 5.2, pág 92)
+ZIMMERMANN (2004), Tabela 5.2, pág. 92.
 }
 \description{
 Experimento em delineamento quadrado latino cujo
diff --git a/man/ZimmermannTb7.1.Rd b/man/ZimmermannTb7.1.Rd
index ad921f40..02a31bdf 100644
--- a/man/ZimmermannTb7.1.Rd
+++ b/man/ZimmermannTb7.1.Rd
@@ -2,7 +2,8 @@
 % Please edit documentation in R/Zimmermann.R
 \name{ZimmermannTb7.1}
 \alias{ZimmermannTb7.1}
-\title{Ensaio de Competi\enc{çã}{ca}o de Cultivares em Reticulado Quadrado}
+\title{Ensaio de Competi\enc{çã}{ca}o de Cultivares em Reticulado
+    Quadrado}
 \format{Um \code{data.frame} com 75 observações e 4 variáveis, em que
 
 \describe{
@@ -21,9 +22,7 @@
 
 }}
 \source{
-Zimmermann, F. J. (2004). Estatística aplicada à pesquisa
-    agrícola (1st ed.). Santo Antônio de Goiás, GO: Embrapa Arroz e
-    Feijão. (Tabela 7.1, pág. 136)
+ZIMMERMANN (2004), Tabela 7.1, pág. 136.
 }
 \description{
 Experimento feito pelos pesquisadores Orlando Peixoto
diff --git a/man/ZimmermannTb7.4.Rd b/man/ZimmermannTb7.4.Rd
index 15e6c3dd..29d9a36b 100644
--- a/man/ZimmermannTb7.4.Rd
+++ b/man/ZimmermannTb7.4.Rd
@@ -2,7 +2,8 @@
 % Please edit documentation in R/Zimmermann.R
 \name{ZimmermannTb7.4}
 \alias{ZimmermannTb7.4}
-\title{Produ\enc{çã}{ca}o de Gr\enc{ã}{a}os de Arroz em Ensaio Reticulado Retangular}
+\title{Produ\enc{çã}{ca}o de Gr\enc{ã}{a}os de Arroz em Ensaio
+    Reticulado Retangular}
 \format{Um \code{data.frame} com 90 observações e 3 variáveis, em que
 
 \describe{
@@ -22,9 +23,7 @@
 
 }}
 \source{
-Zimmermann, F. J. (2004). Estatística aplicada à pesquisa
-    agrícola (1st ed.). Santo Antônio de Goiás, GO: Embrapa Arroz e
-    Feijão. (Tabela 7.4, pág. 140)
+ZIMMERMANN (2004), Tabela 7.4, pág. 140.
 }
 \description{
 Dados de um estudo sobre competição de cultivares e
diff --git a/man/ZimmermannTb8.5.Rd b/man/ZimmermannTb8.5.Rd
index c5feb66e..5f7471e4 100644
--- a/man/ZimmermannTb8.5.Rd
+++ b/man/ZimmermannTb8.5.Rd
@@ -2,8 +2,8 @@
 % Please edit documentation in R/Zimmermann.R
 \name{ZimmermannTb8.5}
 \alias{ZimmermannTb8.5}
-\title{Produ\enc{çã}{ca}o de Gr\enc{ã}{a}os de Feij\enc{ã}{a}o em Delineamento de Blocos Aumentos
-    de Federer}
+\title{Produ\enc{çã}{ca}o de Gr\enc{ã}{a}os de Feij\enc{ã}{a}o em
+    Delineamento de Blocos Aumentados de Federer}
 \format{Um \code{data.frame} com 90 observações e 3 variáveis, em que
 
 \describe{
@@ -19,9 +19,7 @@
 
 }}
 \source{
-Zimmermann, F. J. (2004). Estatística aplicada à pesquisa
-    agrícola (1st ed.). Santo Antônio de Goiás, GO: Embrapa Arroz e
-    Feijão. (Tabela 8.5, pág. 158)
+ZIMMERMANN (2004), Tabela 8.5, pág. 158.
 }
 \description{
 Dados de um estudo em desenho de blocos aumentados de
diff --git a/man/ZimmermannTb9.13.Rd b/man/ZimmermannTb9.13.Rd
index eb25ee81..6b986de6 100644
--- a/man/ZimmermannTb9.13.Rd
+++ b/man/ZimmermannTb9.13.Rd
@@ -2,7 +2,8 @@
 % Please edit documentation in R/Zimmermann.R
 \name{ZimmermannTb9.13}
 \alias{ZimmermannTb9.13}
-\title{Mat\enc{é}{e}ria Seca de Feij\enc{ã}{a}o em Fatorial 3x3}
+\title{Mat\enc{é}{e}ria Seca de Feij\enc{ã}{a}o em Fatorial 3
+    \eqn{\times} 3}
 \format{Um \code{data.frame} com 27 observações e 4 variáveis, em que
 
 \describe{
@@ -21,9 +22,7 @@
 
 }}
 \source{
-Zimmermann, F. J. (2004). Estatística aplicada à pesquisa
-    agrícola (1st ed.). Santo Antônio de Goiás, GO: Embrapa Arroz e
-    Feijão. (Tabela 9.13, pág 179)
+ZIMMERMANN (2004), Tabela 9.13, pág. 179.
 }
 \description{
 Dados de um estudo em ensaio fatorial 3 \eqn{times} 3,
diff --git a/man/ZimmermannTb9.17.Rd b/man/ZimmermannTb9.17.Rd
index 3f9a716c..508cd6c7 100644
--- a/man/ZimmermannTb9.17.Rd
+++ b/man/ZimmermannTb9.17.Rd
@@ -2,7 +2,8 @@
 % Please edit documentation in R/Zimmermann.R
 \name{ZimmermannTb9.17}
 \alias{ZimmermannTb9.17}
-\title{\enc{É}{E}poca de Aplica\enc{çã}{ca}o de NK na Produ\enc{çã}{ca}o de Gr\enc{ã}{a}os de Arroz}
+\title{\enc{É}{E}poca de Aplica\enc{çã}{ca}o de NK na
+    Produ\enc{çã}{ca}o de Gr\enc{ã}{a}os de Arroz}
 \format{Um \code{data.frame} com 81 observações e 5 variáveis, em que
 
 \describe{
@@ -23,9 +24,7 @@
 
 }}
 \source{
-Zimmermann, F. J. (2004). Estatística aplicada à pesquisa
-    agrícola (1st ed.). Santo Antônio de Goiás, GO: Embrapa Arroz e
-    Feijão. (Tabela 9.17, pág. 182)
+ZIMMERMANN (2004), Tabela 9.17, pág. 182.
 }
 \description{
 Dados de um estudo em ensaio fatorial 3 \eqn{\times} 3,
diff --git a/man/ZimmermannTb9.22.Rd b/man/ZimmermannTb9.22.Rd
index 5dcd7545..fc171d22 100644
--- a/man/ZimmermannTb9.22.Rd
+++ b/man/ZimmermannTb9.22.Rd
@@ -2,8 +2,8 @@
 % Please edit documentation in R/Zimmermann.R
 \name{ZimmermannTb9.22}
 \alias{ZimmermannTb9.22}
-\title{Fungicidas e Pol\enc{í}{i}mero na Infec\enc{çã}{ca}o de \emph{Fusarium} em
-    Sementes}
+\title{Fungicidas e Pol\enc{í}{i}mero na Infec\enc{çã}{ca}o de
+    \emph{Fusarium} em Sementes}
 \format{Um \code{data.frame} com 55 observações e 4 variáveis, em que
 
 \describe{
@@ -25,9 +25,7 @@
 
 }}
 \source{
-Zimmermann, F. J. (2004). Estatística aplicada à pesquisa
-    agrícola (1st ed.). Santo Antônio de Goiás, GO: Embrapa Arroz e
-    Feijão. (Tabela 9.22, pág. 188)
+ZIMMERMANN (2004), Tabela 9.22, pág. 188.
 }
 \description{
 Resultados de um experimento fatorial com tratamentos
diff --git a/man/ZimmermannTb9.26.Rd b/man/ZimmermannTb9.26.Rd
index c9acb98b..cd8aa8d9 100644
--- a/man/ZimmermannTb9.26.Rd
+++ b/man/ZimmermannTb9.26.Rd
@@ -2,7 +2,8 @@
 % Please edit documentation in R/Zimmermann.R
 \name{ZimmermannTb9.26}
 \alias{ZimmermannTb9.26}
-\title{\enc{É}{E}poca de Aplica\enc{çã}{ca}o de NK na Altura de Plantas}
+\title{\enc{É}{E}poca de Aplica\enc{çã}{ca}o de NK na Altura de
+    Plantas}
 \format{Um \code{data.frame} com 27 observações e 4 variáveis, em que
 
 \describe{
@@ -20,9 +21,7 @@
 
 }}
 \source{
-Zimmermann, F. J. (2004). Estatística aplicada à pesquisa
-    agrícola (1st ed.). Santo Antônio de Goiás, GO: Embrapa Arroz e
-    Feijão. (Tabela 9.26, pág. 190)
+ZIMMERMANN (2004), Tabela 9.26, pág. 190.
 }
 \description{
 Dados de um estudo em fatorial \eqn{3^3}, sobre adubação
-- 
GitLab