[Gmm-commits] r38 - in pkg/gmm: . R inst/doc man

[noreply at r-forge.r-project.org]

Author: chaussep
Date: 2011-06-03 17:36:02 +0200 (Fri, 03 Jun 2011)
New Revision: 38

Modified:
   pkg/gmm/DESCRIPTION
   pkg/gmm/NEWS
   pkg/gmm/R/FinRes.R
   pkg/gmm/R/Methods.gmm.R
   pkg/gmm/R/gmm.R
   pkg/gmm/R/momentEstim.R
   pkg/gmm/R/specTest.R
   pkg/gmm/inst/doc/gmm_with_R.pdf
   pkg/gmm/inst/doc/gmm_with_R.rnw
   pkg/gmm/man/gmm.Rd
Log:
Adding convergence code and improving the case of fixed weighting matrix

Modified: pkg/gmm/DESCRIPTION
===================================================================
--- pkg/gmm/DESCRIPTION	2011-03-30 16:57:46 UTC (rev 37)
+++ pkg/gmm/DESCRIPTION	2011-06-03 15:36:02 UTC (rev 38)
@@ -1,6 +1,6 @@
 Package: gmm
-Version: 1.3-6
-Date: 2011-03-30
+Version: 1.3-7
+Date: 2011-06-03
 Title: Generalized Method of Moments and Generalized Empirical
         Likelihood
 Author: Pierre Chausse <pchausse at uwaterloo.ca>

Modified: pkg/gmm/NEWS
===================================================================
--- pkg/gmm/NEWS	2011-03-30 16:57:46 UTC (rev 37)
+++ pkg/gmm/NEWS	2011-06-03 15:36:02 UTC (rev 38)
@@ -1,3 +1,12 @@
+Changes in version 1.3-7
+
+o Until now there was no way to know whether optim or nlminb has converged in case of nonlinear GMM. The convergence code
+  is now printed by print.gmm and pring.summary.gmm  
+o For cases in which the weighting matrix is provided, you have the choice of assuming that it is just a fixed matrix
+  not necessary equal to the inverse of the covariance matrix of the moment conditions (the default) or setting 
+  vcov="TrueFixed" if it is the inverse of the estimated covariance matrix.
+
+
 Changes in version 1.3-6
 
 o Bug fixed when estimating model with timeSeries objects

Modified: pkg/gmm/R/FinRes.R
===================================================================
--- pkg/gmm/R/FinRes.R	2011-03-30 16:57:46 UTC (rev 37)
+++ pkg/gmm/R/FinRes.R	2011-06-03 15:36:02 UTC (rev 38)
@@ -39,9 +39,12 @@
     G <- gradv(z$coefficients, x, g = object$g)
 
   if (P$vcov == "iid")
-    v <- iid(z$coefficients, x, z$g, P$centeredVcov)/n
-  else
     {
+    v <- iid(z$coefficients, x, z$g, P$centeredVcov)
+    z$v <- v
+    }
+  else if(P$vcov == "HAC")
+    {
     if(P$centeredVcov) 
 	gmat <- lm(z$gt~1)
     else
@@ -50,16 +53,44 @@
        class(gmat) <- "gmmFct"
        }
     v <- kernHAC(gmat, kernel = P$kernel, bw = P$bw, prewhite = P$prewhite, 
-		ar.method = P$ar.method, approx = P$approx, tol = P$tol, sandwich = FALSE)/n
+		ar.method = P$ar.method, approx = P$approx, tol = P$tol, sandwich = FALSE)
+    z$v <- v
     }
 
-  z$vcov <- try(solve(crossprod(G, solve(v, G))), silent = TRUE)
-  if(class(z$vcov) == "try-error")
-    {
-    z$vcov <- matrix(Inf,length(z$coef),length(z$coef))
-    warning("The covariance matrix of the coefficients is singular")
-    }
+  if (P$vcov == "TrueFixed") 
+	{
+	z$vcov=try(solve(crossprod(G, P$weightsMatrix) %*% G)/n, silent = TRUE)
+        if(class(z$vcov) == "try-error")
+           {
+           z$vcov <- matrix(Inf,length(z$coef),length(z$coef))
+           warning("The covariance matrix of the coefficients is singular")
+           }
+	}
+  else if (is.null(P$weigthsMatrix) & (P$wmatrix != "ident") )
+	{
+ 	z$vcov <- try(solve(crossprod(G, solve(v, G)))/n, silent = TRUE)
+        if(class(z$vcov) == "try-error")
+           {
+           z$vcov <- matrix(Inf,length(z$coef),length(z$coef))
+           warning("The covariance matrix of the coefficients is singular")
+           }
+	}
+   else
+     {
+     if (is.null(P$weigthsMatrix))
+	w <- diag(ncol(z$gt))
+     else
+	w <- P$weightsMatrix
 
+     T1 <- try(solve(t(G)%*%w%*%G,t(G)%*%w), silent = TRUE)
+     if(class(T1) == "try-error")
+           {
+           z$vcov <- matrix(Inf,length(z$coef),length(z$coef))
+           warning("The covariance matrix of the coefficients is singular")
+           }
+     else
+     	   z$vcov <- T1%*%v%*%t(T1)/n	
+     }
   dimnames(z$vcov) <- list(names(z$coefficients), names(z$coefficients))
   z$call <- P$call
   
@@ -78,6 +109,9 @@
   else
     z$w <- P$weightsMatrix
 
+  z$weightsMatrix <- P$weightsMatrix
+  z$infVcov <- P$vcov
+  z$infWmatrix <- P$wmatrix
   z$G <- G
   z$met <- P$type
   z$kernel <- P$kernel

Modified: pkg/gmm/R/Methods.gmm.R
===================================================================
--- pkg/gmm/R/Methods.gmm.R	2011-03-30 16:57:46 UTC (rev 37)
+++ pkg/gmm/R/Methods.gmm.R	2011-06-03 15:36:02 UTC (rev 38)
@@ -26,7 +26,7 @@
     	dimnames(ans$coefficients) <- list(names(z$coefficients), 
         c("Estimate", "Std. Error", "t value", "Pr(>|t|)"))
 	ans$stest <- specTest(z)
-
+        ans$convergence <- z$convergence
 	class(ans) <- "summary.gmm"
 	ans
 	}
@@ -45,6 +45,8 @@
 	print.default(format(x$stest$test, digits=digits),
                       print.gap = 2, quote = FALSE)
 	cat("\n")
+	if(!is.null(x$convergence))
+		cat("Convergence code = ", x$convergence,"\n")
 	invisible(x)
 	}
 
@@ -71,8 +73,6 @@
 			ans <- ans[parm,]
 		ans
 		}
-
-
 		
 residuals.gmm <- function(object,...) 
 	{
@@ -95,6 +95,8 @@
 	print.default(format(coef(x), digits=digits),
                       print.gap = 2, quote = FALSE)
 	cat("\n")
+	if(!is.null(x$convergence))
+		cat("Convergence code = ", x$convergence,"\n")
 	invisible(x)
 	}
 

Modified: pkg/gmm/R/gmm.R
===================================================================
--- pkg/gmm/R/gmm.R	2011-03-30 16:57:46 UTC (rev 37)
+++ pkg/gmm/R/gmm.R	2011-06-03 15:36:02 UTC (rev 38)
@@ -11,7 +11,7 @@
 #  A copy of the GNU General Public License is available at
 #  http://www.r-project.org/Licenses/
 
-gmm <- function(g,x,t0=NULL,gradv=NULL, type=c("twoStep","cue","iterative"), wmatrix = c("optimal","ident"),  vcov=c("HAC","iid"), 
+gmm <- function(g,x,t0=NULL,gradv=NULL, type=c("twoStep","cue","iterative"), wmatrix = c("optimal","ident"),  vcov=c("HAC","iid","TrueFixed"), 
 	      kernel=c("Quadratic Spectral","Truncated", "Bartlett", "Parzen", "Tukey-Hanning"),crit=10e-7,bw = bwAndrews, 
 	      prewhite = FALSE, ar.method = "ols", approx="AR(1)",tol = 1e-7, itermax=100,optfct=c("optim","optimize","nlminb"),
 	      model=TRUE, X=FALSE, Y=FALSE, TypeGmm = "baseGmm", centeredVcov = TRUE, weightsMatrix = NULL, data, ...)
@@ -22,6 +22,12 @@
 vcov <- match.arg(vcov)
 wmatrix <- match.arg(wmatrix)
 optfct <- match.arg(optfct)
+
+if(vcov=="TrueFixed" & is.null(weightsMatrix))
+	stop("TrueFixed vcov only for fixed weighting matrix")
+if(!is.null(weightsMatrix))
+	wmatrix <- "optimal"
+
 if(missing(data))
 	data<-NULL
 all_args<-list(data = data, g = g, x = x, t0 = t0, gradv = gradv, type = type, wmatrix = wmatrix, vcov = vcov, kernel = kernel,
@@ -165,11 +171,14 @@
   }
 
 
-.obj1 <- function(thet, x, w, gf)
+.obj1 <- function(thet, x, w, gf, INV = TRUE)
   {
   gt <- gf(thet, x)
   gbar <- as.vector(colMeans(gt))
-  obj <- crossprod(gbar, solve(w, gbar))
+  if (INV)		
+  	obj <- crossprod(gbar, solve(w, gbar))
+  else
+	obj <- crossprod(gbar,w)%*%gbar
   return(obj)
   }
 
@@ -210,3 +219,4 @@
   return(obj)
 }	
 
+

Modified: pkg/gmm/R/momentEstim.R
===================================================================
--- pkg/gmm/R/momentEstim.R	2011-03-30 16:57:46 UTC (rev 37)
+++ pkg/gmm/R/momentEstim.R	2011-06-03 15:36:02 UTC (rev 38)
@@ -51,7 +51,11 @@
     res$value <- res$objective
     }	
   if (q == k2 | P$wmatrix == "ident")
+    {
     z = list(coefficients = res$par, objective = res$value, k=k, k2=k2, n=n, q=q, df=df)	
+    if (P$optfct != "optimize")
+	z$convergence = res$convergence
+    }
   else
     {
     if (P$vcov == "iid")
@@ -88,6 +92,9 @@
       }	
 
      z = list(coefficients = res2$par, objective = res2$value, k=k, k2=k2, n=n, q=q, df=df)	
+     if (P$optfct != "optimize")
+	z$convergence = res2$convergence
+
     }
 
   if(is.null(names(P$t0)))
@@ -317,6 +324,8 @@
   if (q == k2 | P$wmatrix == "ident")
     {
     z <- list(coefficients = res$par, objective = res$value, k=k, k2=k2, n=n, q=q, df=df)
+    if (P$optfct != "optimize")
+	z$convergence = res$convergence
     }	
   else
     {
@@ -362,6 +371,8 @@
         j <- j+1	
       }
     z = list(coefficients = res$par, objective = res$value,k=k, k2=k2, n=n, q=q, df=df)	
+    if (P$optfct != "optimize")
+	z$convergence = res$convergence
     }
 
   if(is.null(names(P$t0)))
@@ -419,6 +430,8 @@
       res2$value <- res2$objective
       }
     z = list(coefficients = res2$par, objective = res2$value, dat = dat, k = k, k2 = k2, n = n, q = q, df = df)
+    if (P$optfct != "optimize")
+	z$convergence = res2$convergence
     }
 
   z$gt <- g(z$coefficients, x) 
@@ -494,6 +507,8 @@
   if (q == k2 | P$wmatrix == "ident")
     {
     z <- list(coefficients = res$par, objective = res$value, k=k, k2=k2, n=n, q=q, df=df)
+    if (P$optfct != "optimize")
+	z$convergence = res$convergence
     }	
   else
     {
@@ -511,6 +526,8 @@
       res2$value <- res2$objective
       }
     z = list(coefficients=res2$par,objective=res2$value, k=k, k2=k2, n=n, q=q, df=df)	
+    if (P$optfct != "optimize")
+	z$convergence = res2$convergence
     }
 
   if(is.null(names(P$t0)))
@@ -757,12 +774,13 @@
   w <- P$weightsMatrix
   if(!all(dim(w) == c(q,q)))
     stop("The matrix of weights must be qxq")
-  if(!is.real(eigen(w)$values))
-    stop("The matrix of weights must be strictly positive definite")
-  if(is.real(eigen(w)$values))
+  eigenW <- svd(w)$d
+  if(!is.real(eigenW))
+    warning("The matrix of weights is not strictly positive definite")
+  if(is.real(eigenW))
     {
-    if(sum(eigen(w)$values<=0)!=0)
-      stop("The matrix of weights must be strictly positive definite")
+    if(any(eigenW<=0))
+      warning("The matrix of weights is not strictly positive definite")
     }
   
   res2 <- .tetlin(x, w, dat$ny, dat$nh, dat$k, P$gradv, g)
@@ -826,30 +844,33 @@
   w <- P$weightsMatrix
   if(!all(dim(w) == c(q,q)))
     stop("The matrix of weights must be qxq")
-  if(!is.real(eigen(w)$values))
-    stop("The matrix of weights must be strictly positive definite")
-  if(is.real(eigen(w)$values))
+  eigenW <- svd(w)$d
+  if(!is.real(eigenW))
+    warning("The matrix of weights is not strictly positive definite")
+  if(is.real(eigenW))
     {
-    if(sum(eigen(w)$values<=0)!=0)
-      stop("The matrix of weights must be strictly positive definite")
+    if(any(eigenW<=0))
+      warning("The matrix of weights is not strictly positive definite")
     }
 
   if (P$optfct == "optim")
-    res2 <- optim(P$t0, .obj1, x = P$x, w = w, gf = P$g, ...)
+    res2 <- optim(P$t0, .obj1, x = P$x, w = w, gf = P$g, INV = FALSE,  ...)
 
   if (P$optfct == "nlminb")
     {
-    res2 <- nlminb(P$t0, .obj1, x = P$x, w = w, gf = P$g, ...)
+    res2 <- nlminb(P$t0, .obj1, x = P$x, w = w, gf = P$g, INV = FALSE, ...)
     res2$value <- res2$objective
     }
   if (P$optfct == "optimize")
     {
-    res2 <- optimize(.obj1, P$t0, x = P$x, w = w, gf = P$g, ...)
+    res2 <- optimize(.obj1, P$t0, x = P$x, w = w, gf = P$g, INV = FALSE, ...)
     res2$par <- res2$minimum
     res2$value <- res2$objective
     }	
   z = list(coefficients = res2$par, objective = res2$value, k=k, k2=k2, n=n, q=q, df=df)	
-  
+  if (P$optfct != "optimize")
+    z$convergence = res2$convergence
+
   if(is.null(names(P$t0)))
     names(z$coefficients) <- paste("Theta[" ,1:k, "]", sep = "")
   else

Modified: pkg/gmm/R/specTest.R
===================================================================
--- pkg/gmm/R/specTest.R	2011-03-30 16:57:46 UTC (rev 37)
+++ pkg/gmm/R/specTest.R	2011-06-03 15:36:02 UTC (rev 38)
@@ -5,7 +5,19 @@
 
 specTest.gmm <- function(x, ...)
 	{
-	j <- x$objective*x$n
+	if (x$infWmatrix == "ident")
+		{
+		gb <- colMeans(x$gt)
+		j <- crossprod(gb,solve(x$v,gb))*x$n
+		}
+	else if ( (x$infVcov!="TrueFixed") & !is.null(x$weightsMatrix) )
+		{
+		gb <- colMeans(x$gt)
+		j <- crossprod(gb,solve(x$v,gb))*x$n
+		}
+	else
+		j <- x$objective*x$n
+
 	J_test <- noquote(paste("J-Test: degrees of freedom is ",x$df,sep=""))
 	j <- noquote(cbind(j, ifelse(x$df>0,pchisq(j,x$df, lower.tail = FALSE),"*******")))
 	dimnames(j) <- list("Test E(g)=0:  ", c("J-test", "P-value"))

Modified: pkg/gmm/inst/doc/gmm_with_R.pdf
===================================================================
--- pkg/gmm/inst/doc/gmm_with_R.pdf	2011-03-30 16:57:46 UTC (rev 37)
+++ pkg/gmm/inst/doc/gmm_with_R.pdf	2011-06-03 15:36:02 UTC (rev 38)
@@ -829,22 +829,22 @@
 /ProcSet [ /PDF /Text ]
 >> endobj
 200 0 obj <<
-/Length 1334      
+/Length 1346      
 /Filter /FlateDecode
 >>
 stream
-xÚµXKoÛF¾ûWðH"áfŸ|8MMí )Š¦ˆ€šd½¬B¢Qqb ýïÙå.镐KkŠäì<¿ùfižm2ž½¿úyvõê¶Q™à¬å­ÈfëLV†µÂdµ©Y«L6[få‘oWðçˆkU”JÉüÝýüÜö}!Ûü3—ªÐµÌWÅß³ t¤ÓTŒ7LZm5Š\qòáÕ­à&–.µY©kªÊmxQ”º&ïÀÜÖ
Ö®(Tùw‘ðä375ƒÖR(ft;ì–•h­ïÃ	ÖŠ¥sû8\Þ_VVþMÄ’²b
-	Þb¢Pwo
-Ù<}-dÛœ©|ƒt6“ó“õÇŠttf?ßÙÀDþä/QUO.ñæ}?Q K§·Î1åaïžt…llˆ{4}‡ñç+ë¯]“Œcxë‚í£t1òc5XÒ&`aöÕ…ô‘ÆÎ]~É2”Ûu~×7kdºÓï@…܏ðñK'µ'çöq„z—Ê3hºXî?‹FûÒbžîÑ^çŠwübR¾G=VA”mëÛaCîïSÃYÝH/iÛ
-aÐm&6Ý­‡Êüx"b.Hö±0U>ß¡ŽUï\´	³F¥Œ­
-©Y%³ÐÛ‰ñX¡æ.
-fj%c•ª`R™fµ‚èƒÔë¢U
-Z•Jh‚iP«Xk'/-8JÎ(,!ù™%Ì0!U&YÉy¨c)ë‹‹:é¨l˜$õ:¡\³Feã
!S“U’Mª«¯¾8§€[ÏOý3°„Âj½—q“·‹ ¸·l£›¡¿u™Øà¹
-¹7Ö*¿/$çDMúFq&ZªÊo¹ÜS/m
-«E5&úJBŸhn~pÀ ²f¼¥¿UþC’Ú…±>º~Aç×4	º‰È!ÐÅ#E½#QÔv
- 溶ybÄ`žXV;b6)a˜ò‘`M…±£)ÔÁFäÅã$(2†*2P“#‚ÞÕô\X>N’W\„™£ŽT¹ÀÍkõž‚÷œžR=¢X¥‡û¡Èì>7²dþZ &Õ‰èh8.;:žÃ;RARk|ã'Ý„ mûø*îçC=»ôÜ++8—}nú¥CNôëãþ]§…Rbð%Û=nºgÍ¿œPÁÉ‚0øÉ
ì,AP°šFšKLšìróóqOýJ/ýé`5¤Ù)ûƒªê]õn{ ,œÏŸ¬þ1u‡ÊÅvÛPÖmXÓÚÒæ-=ïû²ÃÀ10ÜGµ¿‰N|Û{tX´láÓ°´mo=¾ñgóáHT
-SÛ#hšÅJ%´²çúc€Ã[XßIù÷¸feÊUO`¼5gØÉþb Bç“g+I@åô{ež§S'ëõŠH§™èT\I²šäë‰^IK§z.ûÈÉ1¥¦j¢€Z’›$IVF
Uƒžt@"J*t{½>y*É$4‹XêäZ
±¤Ç›ˆÈ¢ÃÇÁ‚x’ÇÉÙÿ`‘i_oÃ&‡•p•g×;s9ã2ò‘Þ=ǨE^JÝ8¦¡
¢£1ÔÊÐ5ÁÔgßPeŐÝñD÷™mH®ùáaZJeÆáÂ<‚‡Òµ{yÀo²Gœ{–©JÞÒq„¬‡Ö_?ñ¸ùHÃ!r†œ«Š-Ü'!üÖpäïmÅìút7h§ÅÉr›'ºÕÒí»C_žÜïðá\‰F/ÞÚO­@ânا&¢j%“ÀþÑÙ"æÚqmç8î)¿ùÌX×
-¿'šssý¼¹‹³}ø…¿ÞÌ®þǺÄ?
+xÚÍXKoÛF¾ûWðH"áf\>œ&‡ºv€ESD@M²^V!‰†(;1þ÷ÎÌÎ’Kz-ôR ‡µø˜ç7ß,-“M"“?Î.ÞÜÔ&QR4²QÉlèÒŠFÙ¤²•hŒMfËäôS¦Òí
+þq­²Ü^ÝÍà¶ë2ݤ_¤6YQét•ý9ûJG:m)dmÁ$i«PäB²on”´¡t^*ɍuYº
+¯²¼¨”M`n
«…µËr«MúÎýhxòEZ…šAk®Œ°EÓïÖ¥jÈwŒáëc9¸}~>œWVþŽÄ’º¦v‚7˜(ÔÝ‘!ÊÓ×LW)å̤tà@™œŸÈ9´èÌ~¾£ÀTúä/QUÇ.ñæ}?q K§·Î1e»wO™®)Ä=š¾ÅøÓŠu—.‚IÆÇ1¼wÁvAºû±ê-÷iS°0ûæLúXãÁýü ’ùP6Iëå]ßÈÈt§/^Ë…Üáã×NjÏþÎéq˜bê\*_@ÓÙrÿžÕ…/-æéí\ñŽd”ó=ê±¢lßvë)ªZ{Ij7„Áa3±én=TæÇãsÁ²™-Óùu¬:ç"%ŒŒjZUb©{³ÐÛ%‹ÉX¡’.
+a+%¥©œ`TY!*ÑRo³\•h5&¢U)Q€Z#Ë8ÐŽ\
+
+óRԐÐÜ(aV(m-øËÎCs]ÕX\üÁ £ŽêZI½(/D]ôe“B¦¦Ë$ëXWÝ3^}qNn=?uÏÀ> ¤Þpë½›¤¿]‚{b»Ýrý­ƒÈD€‚ëå6ìÞüY«üľ°|˜3í›J(É5ý% —;nã%ÕÙŠJ•Žxø ÌW–ùÌ{pï½Ão í²á\ÿÊLùK.x†úèÚ}_ó 8LDځ-9è‹¢¶KÀ¯,*J“`ó,Xò°š±i
+³ÌŽ}äºÐdÊ@yñ
+C%¨ØÅï*~®ˆŽ™QÉ&+¹êƒóypeÝðµOÄj at QËl¿ê«Î±Ç©1(ñÌS`!+ßHçÖ#|Î^=Å:Ј²èwî{µØÛn êô~h0˜ƒ'&»}{˜òèXïXK­ñŸ£z¥æô ÙÏ{¸âS5/áÔc‹—fk<äüû®º
+к#¤FÆj”L–~F-áË	Ñœã¡ÀK=ˆÛ釃-$`¤>Ç3CŸç9nÙŸƒ–9ðõ.PöWÕ»êÝö@Y8Ÿ?“þ13ûʝi[Ü°æµåÍÛ uOWvg&å¨ö×Áyr`¢DF>
+KbòøÚŸüûW®lEÜ8IæF†¾ŽÞÃúÎÊ¿‡5Ëc®z~”}ü\à¯z¦u>y2ÔTÉ×+§ž­¬×«v¢Wqq5Ë,_Môj^E¬ç°œ3v< :¨a¹i@šeuPÙ뉤‚¤Ê@·×득$Yh°Ôɵ"bɏ7
‘G›–@ÜÏàãäË¢%dÒëí°Éa¥ãa©ÆÙõÎœFθŒ|âwÏ1JÈ‹©ÇÔ7 at pðb†zǺd˜úì[®¬ê³;>0øÌÖ,Wÿ_fu®gÆ<„Š­ÝË?(q¬’?9ãzé<ÒUÏ,ë§ñn>²Æá¼f¨+4Š-Ü÷,\ð½ÒQ`ô‚?dÝ
+ZÄat"êô<ºZº}·èË“»¾šW‚ÉŽ·ô8Ìw–ˆ
+\Óh¡a¸G—ÊÇЉ_à°jüæËÑ¿Aüïõìâ„ïÖë
 endstream
 endobj
 199 0 obj <<
@@ -862,35 +862,34 @@
 /ProcSet [ /PDF /Text ]
 >> endobj
 211 0 obj <<
-/Length 2903      
+/Length 2660      
 /Filter /FlateDecode
 >>
 stream
-xÚÝÙrÛÈñ]_ÚÍ”˜ð\ [qª²‰íÍ–•Ã«ò‹íMA$%¡,‚2AZv¥ößÓÝÓ38ÁÒ’ÉÃ>€`zúîž«Et‰èåÉ÷ç'O_ØHŠ¤…ŒÎ/#+£<Í“B§Ñù"zÛÓ÷ç?ŒîɬH2
-‚yy*ã³³Ó™Ö*.kxY`[Ó÷çð¼r¯w´·ð\»÷׈úD0+O_HÑ#2“™N
-%£™N›eŽÖ·0þÛÓ™&„öžsx–ð4Œÿ»ÓYª4pá>_Á³á¶£î54/]ór #±{庫vdÒŽ
-à?²i’›4š©<…uLzƶ=Æf2ÍeüOîûO	Ï
-<;‚Cl³B&&™¥NRS8t}ùˆTë;‘
-šþžÁ#œ”(ÒXA;'…'‡a,Á8)÷KgνkA"ÚT:žþ|:3iA,­Ê’>ظ©Ho*'¡°£D-TëÚõãW‚©¯Ü‡í5IGíËõ
-Z#†».Ü%Ž¬ç¬Uìq(×n@Ã8ñÐ¥—3çyËv^ƒ~òxçìØMM}E|¯7mwÇÑT¢o¤f…²ÿK"3ÓÒÄøq	1
/:n>¢­ËMð2Yn<WL?:	x\ˆ/h_ •f¹pok†ðJÄ¡åH—9
-~:UÖ_­‰™?mÝ°ùš¢µê)µ!§˜Ç?8­âÏ’Q
«Opp»QMpƨ¼yŒØ×D+‹_¢Î\ûbç<Û$éÒµE¤P#AîžOæλR àÌANFà¬Ü
õœ'd†èª
-“4E씶œ—ä ÌÏÙ«VÔf_Œ^Bë0³óái“ݼºÞÈ>é²è‚]QšH3!zC#4.–j
->Ý«µÄE¶é0¶ÓDαr9¦ñ‘ Ï¿Ùg?»®?R¹“Bƒ©ëHü³TíTíÓ©ÏŒŸ¼¨ç?#îô4ȏØR¾r±âlºeœñ¨‹û©ógå1Ýj…>ƒh.Y;7ŽY¬Zöj?×`&—ÕW‡ŒÉeJâï+jöX3²Õ¨‰VL®l¹yæþLÔ¸ÖéüŠ‰­¾šdü–%|Ò
-ý~Ô¼-?ãÏŒcH3}I5J¥ûÈJÚ¶$ý´½¹‡ûûžeY³V@ž®Ÿ¶Ò<XejŸÿ}ޯذ«þ*A¶c>÷_磡"ZVŸ´ˆ7¬¾éÿÚ_‰üŽ³ÁšY¿ä§âï¯Y¬f*`~™ê¼`le»HëhiyˆšWv,è†Ù»£„Þ÷¯¦Ûö›]?j
->ÛS£I-CmƁp0á@åëþ8"U/:Bͼ®:kS&Ñ·H—ÉŽaütØôìpú
-cßq›¹þ†Uìp>ó³§Þ
.·ÜÃõ’»Îú8¾6¼	yà.·èhæj2§ŒºÚPÀ_‡îëfÊú@»¿éÓýíÙÁ¢=íñÓÌÿ0ÛüÜ7úã’Ïÿ=ý<⢧¤Ör¿Q×ÜtŒ²c¯ë,”îodîäé|˜Ã™ÃnˆW‡™»]WA’ÂçÙðëC„Å¿Üs:;˜œOLx?¬”rËmÚ—ónX¯ÉZÔMšCw7a-B(îÀ±Í»ÃÎxnÇŽ†¨„³‚§/”êr« m¡Éçgõˆ@E’æÖ<C"6NÅ“Ql6‘
Wµ]nFÐ)™­ø”±ëOí”B§ ¾¸vã}jÛj7ýAaÐ7gL؁ºGkì}šSAÚ1ù€íÜ$Z*÷»Þ¡ÿ~~òñå‘Œ¤Iž«H#C,æ«“·ïE´€Np§D6º#ÐU¤A'@Dtýtò¯$ªI
-.5Àƒîá°2QYö+pЙìÀÂ&K¬Ô€Ì€[ð	Ü;¡2RHO
ZÚ¤Ðæ ÞµÒêH¼kkAfÈ»Öû¼wõ®§é>Àxy³Eq˜ñcÿ@]*‘FB”Š$SÆÉÿ=%Ïf_J
6™…²REb
-ݧüæÔjwJF,Ôs^5àègÖ‡›%"Ïû|PÚ>Ῐ/øï˜×Z'0Á>Ð|:ƒ@Åq(ç*Émv¯ùÊvâÝãÃÈ")`þ8ÜH?Ðz&S‰RùaÁ×	`˜€Ÿ&ǃ’o	¦Íò¬w㵟Á|â8]›'Êè>aó©JL¤Ž#ÐVÚ$E:J»PÅDº8m825NÛNdŒGÓÉGà_«Ú¦Ïÿ–n €Õv"iƒx³­ÉÆ”g¬œHG m`^¤£´ÓTN$‹݉ §9(àRä—êDª¼Ít¯&ýt} wéú@—~Ú!Ð÷i[¥'ý´} ÑVþhÚ#~þC wùŸ9
´)&ýÄ} ï+ÏÈ©@?íè#´Çœ&ú
†kÝ&6ӏY  ‘Àuª¸ÊEI“Ø[ó¸M\µÄ,"~îJªp±èktž¶wÖо¥SŽpîD§c¼™Í/1A°Ò}!¼|qÃÕÐGðTx at W¾»-—7ŒŸs€"2Õ?çÐ&sÇËOþúuÇwÖгÄÛžruËAß\‡:º’^¸Ï½uxçò‰v“0p8Á—íó¹çîÚÀKÚ–'0~ätÇïþ¯	W·|†êFEŲ|÷—ÈxM&9*êV.¸{ó¼ãkZm-Šmº|¯›póª,‡›q]øà<ÂÖX`€
-RY·äáK÷7§Ã'¯„¾\»»Wê^òâm8ŠjØþ-¯ŽGi@Æ1¿fRîšÇ»‚1å¬C¡Â„)´+[ÙzýÔ{å¬äŒ/‘¤Ñæ*òÍ×/O¢·3£ÝÉ%íLæ´;º
-!ãפÌÒùŠ{Ï…£N{ª‚Y.Ú}•?Þ
ìDgFS<àiV6Ég½8>”þܺj‹†ãÕ‡M_ü#(à½wnPŒù¶Óƒ¡½ô=¼&|–6¢÷[-ÈFp m,åø£Êä`µôûó9Xúr—7v|~öÅÁ3ßؤ«V
-ðr³t#*.±1y¿N —(жW´D`kW¼p!¡µU*_dmüÚGµ×—Gð,ÍWÎ@WÎŒèåÒ?ÍdÞÒý¹_£ãŽÚÙqØ ‘,Š½º&øtO]õ‘Ûaƒbªä¯
-"¾ºZ6Û¶8‰\¸èŸt~ÿ—ÒWq•Í|Í¢øRHèqã¼–µ¿îîº8ÂÕÅ%ú¸õñAä[’¿ar’™sk—\è=d;h£òË9
¦Â9ÙfmCeX ¬ká/ãॡfnÞ¢ÜÕ.`B©ÞØÁ5,>ÓöTúùÈ|gaµÎ½‚†x¬„Ð’!t”ÂG@ši˜ýÙáªÏd «Èq¯r	àY
-ÚK”…lû˜`Á“Áb¤zK½¾ÓDæy4ëÐD3=qeuw!Ζ£âÀÂ$Z©Fµ¢…j
\…âÀ®®†ñÊçªróÅYµöµ™T¤yáSŸâÊIýàlÓÙþ-F’Ë¢5ŽW„JûíE‡r °†ïn$è*\u¼»HlèàìQ(œ]f±’ò'üÍ)ÆÂ"ÄŠN–µrbš%X¾”À!ô¾ZûRBë².e²≌IûÑåEg…eå–6Ò‹Ó,ÃAÞýyPþn²ÊºŸ`Í
-q’õ
-÷ t"Å=é$d•Yª-U _³³Zѵ
-lidŒsµZ]>AhÁ>IøY:ߪm¼Bme&^ðÊŠ•_hq¥3
-	ç*~¡u
-ÍY Ò›Úàý+ó‚м‘í×Ãâ赿¼¯:™+ðÊV^‘Ýs!õ_`Á
+xÚÝkoÛÈñ»‘뺍˜}‘\š½ÖÉõ mÎÈ—$WÐ’lgQŽ(Å	Šûï×ò%Z±OºíJËÝÙyϐœ]E*zyòÝùɳ>Ò*)T¡£óËÈë(Oó¤°it>‹ÞÅþôÃù c»@:+’Ì怂`^žêøõëÓ‰µ&.+¸™áØÒü\¯øön
ã
+\×|ÿQŸ(aåÙ­Ò.‘I 2±iⳌiýét’×€æ®9\S¸Îe\‰÷*Uð·îLÔfa´êI“&¹Î¢‰Éáß1•o þ›Ó‰V.€ñd„Ä·ÌÉL¦¯:䌖W0¼äáå wâò’—í&-¤™
+à9òÀ¤K‰IUÌd`lÓcl¢Ó\ÇÿµOp•pÝÀµ%8Ä6)tâ2
+*¶Iê]_>âã¬ÕäUÐ ŽŸÃ¥X
Fil`œÀ•Â•Ã…0ž`X
+%ëZöy®Õµ…;ˆ÷ýùtâÒ‚XZ–7$Lø¸^ÞLNBáB‰ZX¬*^ÇY‚©®xbsMÒÑøru#›Vˆá®w‰;«©hW%ópÍjÁ‰3@—n^³Ÿ#ä­ØyúÉãbœŠGà2
+ö%ñ½Z·Ë(AS©¾‘ê%ÊJüωÌÄjãä"n 4>¢­Ëuãe2_®„N²²¯‰b_ •z>㻕@%âÖò¤ËXƒŸNóË1SáÔ†·MW”=¥Öägóø{Ö*þÌ°ú7ç1ïÑÄ"ˆ‘Lj~EIJø%â5/¶ìÊ8&Qç<‘D…eyJLÍ„½àK
+¶y‹vÔsâü½Ò¢[thè˜Ä)bÖÚ|Z’‡
+?¯_µ²Ö»bôòf‡™ù˜ZnD„ŸIâç‹ëÆÅ)9YÏHÓÊi&1Dwh…šÓtY3ðPk0u¯Ö’hÓap»Äf'•s8ëø_â´Ÿy鏔ŚäI±)	¿ñ$™“4U±ªC>
+©q²­ü{Lq@Ë€…–
+e¬!KɧAº fòê~ò2m:O¢‡°`vXè3¸Í¥¨gÍû„ÅEË^ž6˜ËõC–6Täi’~WOk±ÅJp-GM´jeËÌsþs-PÍI¬³ø[}-éøø´•ùèu[~Ž?ŽišQš(ÞGÑRçÍ%<¸×÷°A{ß³¬hpÒJ(ìg­8æßìò¿Ëû•XvÙOÐížÏýÛéh¨¨–Õ§-âµh oû¿ößE~'é`%¬_ʵù…ÌW"V½/`~wsZ»deû–ÖQ’
+•¼Úu^A‘»;Jè}ÿª[°MØu£ÖÞ“-º‘Ì2Tæa˜
{üç¡|}-ÿÍ:O„J˜]ößäUGáe÷h™ð<|tX}"Ø·2¶ŸÈ¦…8\ÈüOvô;ÀÅo‚;¸^ÊÒë>Ž¯éâm“ás³Žf®öæ”Q_
+øëÐýfvÛ§û¿oóAªAèéÓùøiæ7Ì6?õmþ¸äó_ÏA?xèá®Ùšîÿ4­;VÙŠÛuÞ”îoäá)óa»!¾èxÌ”?»:º²y?χ³würO}¢ó	s._ÄÆ~ݦ/sùžÖ+²-“æPÄíMó.B(~ƒãX>;;°Î5VL˜1QiªÏ^ÓåÖÀØÃPêtÕˆ@E’æ> <G">NÕÓQl>Ñ
+®Åf¾Agt¢¬à3J)f7TA§ ¾ð¸>µiµ6VªÓÊ%¦A_wœ1ê×Äû¬ä‚´W챝»Äjð~Û+L†ÿ³ó“'(¿Št¤JòÜD&Ïjš.OÞ}PÑÁ[øèŽ@—‘8Èñ*º‰~<ùç’Ì&&·û 8;诓e¿Õ~vYâµdyb­gm¼W&#…ô`µO
+ëâÝ mŽÄ»õᆼ[»Ë{Wï*wω!2Þ£qìîuaítdRYüï(wÖ»0éô(„)WØá·§Þr‘Œ8¨¦¡\5`#Ï’Ì»ã°á30fÞcƒrþÙç=ÀvówkmOׇÙÎf¤ª8áÜ$¹Ïî³]Ù>swØpºH
+xtƒ
+.df:—™Ä˜ü°°ë„®Þã
ñoSàÝ»wsˆF‘älïPm7y…œqº>OìVø(Uʨ=i㴍uI‘ŽÒ.L±'Wƒ¶7I–™qÚ~O¾x4í‘|qþÁñaìúüOà­
+ðÖïÉÇ žÃƒÖecÊs^ïIG íL
+N3J;Mõžlq€áš@‡TàMqXÀ¥àxrøµ©îÕž@?Ýè]º!Ðõž@?í&Ðwi{c÷ú1h‡@£möú£iúøo½Ëÿ„°®ØèÇ }WyNïô#Ðn}„ö˜Ó4~€áºžÙǼÿàÐÀtj¤†‚®$…¡	wJLR¥â³P"Y4GŠ¡Áæi{\
+ã[ªo4'*Œ­ñP6w¡½ÁJž!¼|q#gÔ°F‡ïÔt@§½ۍ´6ŒW8@ð%Ñ«pX—q!bþ)œ¼nå¸VæxÎS.o¥$ðõuÓcA§Ñ3žî¦Ã½´N´;¨B"ÀMEo¶ô…/+w×Üh 7iÛš ø‘ӭ܇Ú]ÝÚ^HõªéA‘åçæè¯Èd#E¢n×™çý³^×rè|kQÓ¹{U7g®Æc!ÄùLz‚°ÔƒÇï[ao
HeÝv„/ùoJe§ „¾\ñ±+-Ïåôð¶)BÕbÿ–WæŸ)
+È0ó+!Å'ü¸ŸÛÆ”³jzÖ La¹eeôSítˆ’O0¾T’Fë«(ß¼<‰ÞMœåš%}˜LéÛ[*”Žß2ËК-~wΘ:}ÒPÌ|Ö~U…Â`G ªíã
ëXÙ`§TyqÓösˍµ”Ô‡ÃÐ÷;(àƒw®©•mÓYÁО‡ù„&REÛ=A¸å`A.û[ç)5À5å Ëyø4Ÿ‚a`-ç´±•ÂÙ†¶qHg¬ßåzÎ;Ò\ãò~‡
+@ל'дkîW"°•Ä ÷-
\“ÏÚþ”Yhò>þ{‚ÚÇ«KÆÑ8–ˆzf`IzfFÜñ’ûž&oÉܺºsXߨ­D
+€É¢Øii‚©{Zšh¼R¥ÌÖˆøêj^oÚ¾,$rÁÁ¿×÷qÿ_ÊÐÀUÖÓ•ˆz-aýÅMèíšW᜻ëáÿU×èâfÔÅïÉ‚Ãä¤3vkN.tßd;£öË)
¦¦9ÝfmGX ­ëá¯ãÆM›~¹i‹r[qÀ4mzc%kx÷LÛzôÙÈóÎÃËfSù
+âqð"Ô ÍÂF9¼ï(é!U>²ðôÝiŸÈÁR‘çU™“,õ%&´7.F0ÙDgðîн‡7½¾ÓDçØÛÒD;=å–º»&Ðæ£â¸ÄeV£Z±Ê´ ܝ8°+÷/^…\U®¿°U«Ð—I
+š!'ÝSSÿùË·
 endstream
 endobj
 210 0 obj <<
@@ -899,146 +898,163 @@
 /Resources 209 0 R
 /MediaBox [0 0 595.276 841.89]
 /Parent 202 0 R
-/Annots [ 203 0 R 204 0 R 205 0 R 206 0 R 207 0 R 208 0 R ]
+/Annots [ 203 0 R 204 0 R 205 0 R 206 0 R ]
 >> endobj
 203 0 obj <<
 /Type /Annot
 /Subtype /Link
 /Border[0 0 0]/H/I/C[0 1 0]
-/Rect [170.961 162.829 312.668 175.626]
+/Rect [170.961 135.73 312.668 148.528]
 /A << /S /GoTo /D (cite.garcia-renault-veredas06) >>
 >> endobj
 204 0 obj <<
 /Type /Annot
 /Subtype /Link
 /Border[0 0 0]/H/I/C[0 1 0]
-/Rect [318.115 162.829 341.925 175.626]
+/Rect [318.115 135.73 341.925 148.528]
 /A << /S /GoTo /D (cite.garcia-renault-veredas06) >>
 >> endobj
 205 0 obj <<
 /Type /Annot
 /Subtype /Link
 /Border[0 0 0]/H/I/C[0 1 0]
-/Rect [380.083 135.73 485.328 148.528]
+/Rect [380.083 108.632 485.328 121.43]
 /A << /S /GoTo /D (cite.carrasco-florens02) >>
 >> endobj
 206 0 obj <<
 /Type /Annot
 /Subtype /Link
 /Border[0 0 0]/H/I/C[0 1 0]
-/Rect [491.931 135.73 515.742 148.528]
+/Rect [491.931 108.632 515.742 121.43]
 /A << /S /GoTo /D (cite.carrasco-florens02) >>
 >> endobj
-207 0 obj <<
-/Type /Annot
-/Subtype /Link
-/Border[0 0 0]/H/I/C[0 1 0]
-/Rect [492.837 108.632 522.996 121.43]
-/A << /S /GoTo /D (cite.nolan09) >>
->> endobj
-208 0 obj <<
-/Type /Annot
-/Subtype /Link
-/Border[0 0 0]/H/I/C[0 1 0]
-/Rect [84.236 95.083 108.047 107.88]
-/A << /S /GoTo /D (cite.nolan09) >>
->> endobj
 212 0 obj <<
 /D [210 0 R /XYZ 80 770.89 null]
 >> endobj
 18 0 obj <<
-/D [210 0 R /XYZ 81 226.872 null]
+/D [210 0 R /XYZ 81 199.744 null]
 >> endobj
 213 0 obj <<
-/D [210 0 R /XYZ 81 226.872 null]
+/D [210 0 R /XYZ 81 199.744 null]
 >> endobj
 209 0 obj <<
-/Font << /F8 99 0 R /F83 137 0 R /F103 138 0 R /F105 195 0 R /F22 140 0 R /F60 96 0 R /F23 143 0 R /F24 214 0 R /F25 141 0 R /F34 142 0 R /F80 101 0 R >>
+/Font << /F8 99 0 R /F83 137 0 R /F105 195 0 R /F103 138 0 R /F22 140 0 R /F60 96 0 R /F23 143 0 R /F24 214 0 R >>
 /ProcSet [ /PDF /Text ]
 >> endobj
-224 0 obj <<
-/Length 3206      
+223 0 obj <<
+/Length 3368      
 /Filter /FlateDecode
 >>
 stream
-xÚÍÙn#7òÝ_¡— ­MÔáÙÇd3Y$‹Ø+1°žÁ¢-ɲYòè{f±óí[É&[”åd€ÀÅf‹ÅbÝ%1ZŒÄè¯ß]^|ýC£GR”­håèòf¤*[¶ÒŽj[—­¶£ËÙèªøçXË9üÛâg>žh­Š¿ÜvxÜíƪ-^	¥Ç¦VÅ|üúò'@šà´U)[¶A.„£a41FŽ&Ú–MU1À´[ÃFÓ±jŠÛÍx¢êb³ƒÍpk#‹Ž¿¦8ƒ$íáÓ-áßš_,pŸgL²19R©²±­'çÆÁ¨Æ–ÆñJhã€ÄØR‚1e]µ£‰,+í—9T ¦a¢‡úf<‘U]¼xñ‚FUŒ_Gø•.­­“
-ÞäÎcJ[ÙxƒEæÚRÖÚh3†¾EæûˆÓŽ£d¿pWÀ\ð=±ŸEàíØÚ¢[¹¥kb4ç»½ãü^É~ÎÓ8yÛ_ß=¾Ûv2ßû;Ü1èaç¬épúÚ–R Ÿ¦åĵ†+”ÅfµÂÿHê
-Çá×w›»y^Ízæö"¢7¸b÷"w…R¶¥•f4Q¦¬DÍ4|ï 6ÃÐŽš²ñWñJ•
-kªÑ$‚œg$À–¢nVZ>:(ïÚº®ª.áúAJ”têºÌ Ò¥¬P
-P$t12]Ö¶AlF8ÂV9™mU¨µ¥h›pR‘‘;Ê^‘¤|%¬ÈòX•µª{H¥2Ø@-UPËoòŒmL›Q\Sܺn’3&{
ǐa
—¹+7¥2jpç:ƒ¯.m^ù·hØšB|ø@ŒZðáCÖIXìgŽØª¯Ö¬-’0¡çßÀ½ÉÙnSŠž¡ÎÚÊo28&Z6 cþ8~>ÜzÕG-®«'¥ÃÀIó»HGó|騟–9Š€H<èKgÍ`Û)xœ¢º%ë‡ÿ¦ÁøÑo:§Œ2q@›4õ/ÈB•ã‰­uq9ä^ØÕ‚½‹æ‰r¨ðf³žóà
)éðß;žØ“ñ„a] UœÃegE¢Ž¿ˆÌîþ­èé
-<*
-wl£É¸îœuÝ"y¸èœ~ä>¬p¶˜†3´Ø÷äùÉvÏÜñà•_I'›ó8pvCt³›þ:bù{òPà«i«âßãÆЉ­&ñËÕŠÑ°›q'gOÀñ5Üz³Oqj8ð?P×-Æ?<ü ‘rïï´0'‰•®Èz%9…êJJH1Xê%4qÙÀ+ö{-É¯™`g,dO\)¾ÎèRàÄ{Íû%kÁJôªyÂ€­Õ‘7ÑpiEˆ¢@b'V{»Ïžmô\å¹WV
-l"Ú!ùZ%v*gý8¸*¡)sŠR¶áx*ï(•1²hË*¶àÇx¨^óÅyã`d¯5FÄö¨ÃˆhÂÚ¬+0Ó¦:¹ò¶ªQ¤¢AaI €„0µ¹A9žeÝ‘¨J)ã5'˜WÕêIæɘ½W9$ªèˆ½Ù`¼TŸ¦ÈOòu	ûå믲džèID²Žrj¤-^æü¯*ûTE0·úf0kYê8oñŸ²r¦°S›#~†mÎq\A\ľó¨£á.±ÞÁƒqjåÇ–qÙoó°öhv¨‡­.ö¸i9 !RÛ8‘unoåÚHê›bÅ	åôÈFÜ={fÊúÔ„|ƒ*.’–¬b·Û3FZ´8Ü%b@GžtÇódRX}H
yëÜõN
->| ñ˜ò¥¹'ð¶·Rˆ¯kà]Г}בџîrF±‚pË_.F”þ6¶,ÈÍ™3þ\Øbp§º8Äyúû#¨žåÑD{£Á>4¼”žîx¢copïõÔçxÁ›ðÀp1_{
-»½wã†.€ehsÇ3oéüþbºë•Ë‰wn3|ãa½›ôPβ"_?2LbüÇÖÌÓݼ7ȈwNŠé
—
-C”ãÂÈeæ9‘CR’ï⃥îˆZAéôÈXð'>kðq¦~f.ØüÁ¢ýã`Ó¬o³U€¦¬›í<«°}Öqa^®1+´Næ÷>^	̱0''$®Œ\ÌñÙ«R³Ðeë÷>½Ø²Õ5fû
ò׬÷
û©ì:ë”ß¿f+°[–øfH{“Ð~%O0<ÇÖjÙG,GU aâXnÏ‘üq…`TÛöU´hU8ÍÅ÷—o.$YC9Ò¢€IŽ¬­K
¢5½»¸z-F3xùK£«ÑÞ
-
-ŠÉjôËÅ¿¸Ô›”/58yÖd«OW
-äì†*ÕK?ŠüÇ­Ë)E†xÄÚ곩 ~ ÂUJ_fÓŽ$[R<ñÃ)B@ëæSA+uq‰wŽ5•ÝΧQ¥%—ªˆ\‰cŸ²ï:u+ŸÙŒØ´ø¤ú ów°Ís,C“lלÚíJ>%²ldN›E
o$mk©:ÖLU›Ò .kà´~J31nŠ™X
-äF†\ÝO3ÐÍgè¥ÂlÛ|¶2)kJßj³È
-ˆŒT0‘	
ïS&EÇ+ýI&åckÍHií)›bš²í9xÂ÷¥&å©Â0Xʶ2 Nµ­Ÿ*䶪ÔÀÝ$’»N“/Z")’>#¶› S3ºó<»pxå5	pa&¤²Kë#ø’/Œ–kV×üÒ@ 5›ÖÀ<µ†îî>ÜñtRÊ5ùR®àÓRnÌD¢èZû¨¤Ò2I`©j´LT…;ãg|3~pYŒ¸Ûò|Ô~àKÈF×(ÃÁ+/²A“mÍGã HŸ@^êªq9e¨ ,JšË¬2`Ô
¡6@¾RLÁ!ŸtîBsÃÕK⎻UÔDØßæ»e¨éSœ{’«GœríÁµ.aàX¾uck_Æå[Ÿ·×»þ>n]²'±íݪÔ/SÚÔ-<yÝö&b\!£Á–éÇåÒ±=çg8ášÜ8$1pùR6çé©/RS9bíÖ¹ãPÍãà:é~¾æäð¶G{»98-šñ$ëfhóä{âΆæ¾ü‡»Ëßص@–ª—ƒî‘á Ví2jËJaU
-…?Wp>òåxb•†+—à¡iøg*jÒðÆÝVPC¿›#)Kù½úŠ1<2”ä§ÿæNô%2@¶aåሌÃý¦ßRö[Ø~èk,Ä=a¥£™í~Ë_ˆGxŸ îžd|HX²Ä¦+ ïÜ
ãBÕc¤i?\'ó7°!žàõˆï?†;–»
}Žâ/`æOðùâYT÷·–кu;=|&ZŸÁË~±‚„\$æwþmœ’À·Êsü˜GTxÊØåyÒ7A:yœ3ºè5úéMŸ…<ÇTd$éÞ‘<$w j‹^­#Êöé®nxš±¡ŠPäÙpž…y¢¦Ž-Þ—ÍzÊ~ì+"éI%ï甝 s4m#Î/|[
-Òð¿lšx•à¥”>ªÑ‡Š3¤Ôl†ïŽAwKJx_ʵåCm;Ï2*Ãv­Þ5m¶<;å"4­¹v
-z ÞȾÿ©U„»ÛñÚ¾_íšÕ\æ…7ŽI׸å;^DqÓMç‰ÝÓ=å¢>àbU—¿6ÃêˆHú0\£4¤ÆƒÒʼnFm·Þú†“á2øžÇ¾ªCÉ_Xiˆ©yf?¦=EyC.y‘dèý
·QWü\Æb•üD”çño:Úºø
{@ߤùþ$ᑤ.8 jŠU}BÓD‡í>ÒÊ¿ô?Ùce¡¤™±±ß«Jp%­±‰‘Ú¬£:?É»fy÷M†í^qf7‹½c»>{1ã³‹A%µß:÷R7?}Êù\I±Õ©Hš#›ìMj‰m„ù¿Mb¿d,	…Z>DÅ&]YË6©úÖɵÛÒoý®ßž:uîÕ.d•<>eÛ^¦¡æÞEþyžÚj
-lPÚó³‘õiñ{XšŠÞúKGUòŠã©(V}FÜõ²wu"ë®9£ð>8üxÕo¸÷(:ÉÂa¼ËFa»”ÛÌÂàå¾v¼{ãn>òîêÈaÎ5«“aÌ}¤ˆët·mßÊðm-r®*MŒTüˆcG~¤{èg›²õYþß"^ߺ‹#(ók”äÃ4þÅ/·BՐ€»ÿp’ù«ƒŒsÀ·l?Χ‰ò6’ ƒÃöb<‘ÂÔA„ñ»rlNÁPÑúŽÛØþûûË‹ÿÏÃ!
+xÚÍZݏ·¿¿B/
¤ÆÚðs?ì:)’¢
Z´É
}8ÅZÒ锜¤³Vò]Ô{çƒä’+Jwvë´0ÎâîÉáp8ó›ŠÑr$F¼øîòâ›j=’¢hD#G—×#UÚ¢‘vTÙªh´]ÎGWã¿Näxµ€ÿvø·˜LµVã?Ü´x캉jƯ„ÒS©ñbòúòG4Ó–…¨-LI£5Hr!£©1r4Õ¶¨Ë’	Ú
+Œ;灔JF’E%?Ð+¡£²1U+ð4Š	´‰	¤,dU{’Ÿ2,WE]…yžÁ‚5¾
®ÚÚ5üòÏìÞm;øo1Ç7b|½E­ù3Šì
þîðÝɺvØ0í+a<bz^Sß÷csSbœÇMí{wôñûõBzú¸sopŸðÅj‹’uËéԍ÷þv´Ã-áæO°3W4ä_¶8>ìIºkVe]Ž¦RÖ4~C`Aç”c%¤HG¢n¦p?Ådju=¾„æ×&ïMYÒ†ÍY®×9•«ŠROs‡˜MT5þubËq»Di•f<ßN¦ðrá„o6Û=6ôøýDÕ(z˜#E{Ë$÷+'Í~žñŽÂ8{'ï
+ö=œ Éöš×Û5Êœ¾ï]ï-+;ôôÝéãÇmqq?!^a±£i£‹ªÔ©ôg-j†ÀŒÃkcåÄ÷¬´ðƒ/vn-3L–^aæ¹S%•*ê^î×¹óicMæx
+8PM%ˆÆ ç
+p^”ºbB™
+È4¼è©^L¦²¬ÆÏŸ?§V¯£ñˆÄVÉosë1…-m<Á2£G
+
+í´Å
+xGŠ±cI;‰.QhüÁmSÖ	o9ßM¬e5®¼ïÔ^t~ïQ?Úý‚_³’…í#-Þµkoh;&=t^÷–¬ ²²…Mª!ñ€Z²ݒ	CVï™iXm]ôË ›ÏºîLoRºç¹-”²)¬4£©2pkæá{G™ˆY¢…¨‹ÚoÅ+!T^)¬
›Q.2`
ÆhÁÑêÁQøÖTUÉ&¶´DIçåV™¡t!KÔÂ@)]<G[ãhF8Âۜ΁“Sèì
+Ñ“)DFï°)ûƒ$¥7­G2VE¥ªžR©Ìhp,U8–/ò‚­MίêÜÁ­ª*Yc2HhȪg¶ÜʨÁžë¬'¶Uºå/Ñ°Õcññ#)0ž‚³ÖHB§ ;rÌ–EøìFÍÚ"Y‚zù
+ìÐÛœÿ1…èúñQ[ù"3ÆTËh¬;?nõ÷7þèã)®Ê³Úa`Ϥù¯hGýtí¨Ïk‡ED¤´Ž•³fÐŒí<’ç&ôµ#GŒ_@:ؘ11êÄ
mÒ,ñ§ˆ**=¾J/Ìj#øåY ‡
+_¶›7È·øß{~±'ã	ÍŠ
l†qVÔ
+ÔòÏ­‘‘.Á£VEƵsÖuGð
+W-°rä>¬p¶˜š„Tîª!SÝñ'ßsÏÀŠÚA²[’ {Kp~‡‡Dþ<Tàäjšrü÷ImhÅV‚øãí-ÃnÆ­œ=
+ÆÛtˆ½’±7g ¥`é9£›ÇªWä>ÿp:ðØÒÁ¶nå°›Çǘhç¬cgv?ç¢>¼?x?g­#‰þdž°`juäL4ìÙ8€(PX ÜÞ¬Á³…g=—¹sÜ€'+&͐Äè¨ÄL匟ÿV&<å §(dSB¹¡Ÿ4VÆÈJ )ÊØ€“ø?õš7ÎÛ#ûCcDlŽZDS>Ì ×‹Ò”Çˆ+oªjÕ‡‡ŒÔ7Il€Aæ&K

Œ7Ôœ^Y©³Â“±x¯rƒ RÑ‘x³XœTÜËÏru‰øåëgÙex‘®£žiÇßæܯ*úHE°´Og´,t¶xfd]=šVhšsi@kµoC¸¯Æ!CÐïàÀ8²@‹òž‰cÃ	ØíW¢¹ß„DEùz¼ÐÍÚÈÿ(@HÍ0ˆïÍ\©}=¾å€rvd£îŽ=3Å}hB¾AùHžÉ<w{‘:-iLDGž´ã÷dSøüÐ	ä©.X/â¤Ç‡#&ïIDܦxiá¼éÍTšj©hГ}×’ÕŸu9«XÜ:›t°æ¾
+Œ1¸S=>Äqú‡#—C=É¥‰æ„Kƒy¶hy)<íøEË<^ãÜ›™ñ‚76
ð@s¹ØxÛ½wã†6€uh»æ7ïhý~cÚ7·.&îÜdøÅÓz?é©œiE¹~"Lâñ!Ž
+­Y¦Ý¢ÿ6ˆˆ;§Åô€Ý†5Æ8¹ê‡y
+RbJ
+òï@XyåŽ8¡NŒ‡á³'gê'Æ‚õoö?5¤0ëe6PU]£¡k¦Ïz.ŒË5F…ÖéÃâáΖ ;p	‰pò@!ñeäcŽ×^
+¼….Ûœ‡/¶h fF”¿dÝøØÏ÷Ð[§òþ%›Ñ€Ù²Ì×CÞë„÷+ye@ó1±¦T«²e„‰ÁÜž¡üq†@XÛ”AlhÑÊ°š‹ï//Þ^H²†r¤E
+ˆIêlÀß™Ñl}qõZŒæðñG0–F—£{"]5ªÉíèç‹¿q…$I_jðò
+(,pas]Õ³—˜*U¯ý¸(òËÍDžì H¬-¿ØÄ?€¸J©ñ×Ù¸#c+D  N1‡±ª?×4RS
$'…ŠÒnÇQ¦%«ˆ\ŠÁO
+Ñw•º•/lFlš|R=êüßX†úÔlWòœ~È¢–¹ÓœðFÒVtJmtJÒ“©*SËÊŽáÙ“‰±p38˜‰UðC	8äÆF†!—÷ÓÆÎæÎ¥ÂpÛ|ÑsÉÚw»]f•TFªÿ3•	€÷œIíÕ¥þmL
+Ä´ö”M1uÑô<áûR“r.1–²)
+¨Se«s‰ÜF¤ËHÎQ^†§É'-i )’ò<Vçë 3äüÙƒg‡o£¸&\˜	±ìÊc}$?Ì}1»°ºáß«Ù°¦reÐõ/5¬­LšÊ5ùT®Gði*7–
+Pt¥}fŽ¤Ò2S5Z¦ªÄ©ñáàËôøàÂÀÛ¥ò<l?ð.dá5*qpËË,j²ùÄt ô)¦.÷;
+%à"WÑ,“ZÕà4 lŽˆð8@ÀRŒÁ! tnCsËùK’ˆ«qG5@¤‹ÝH5£
+ö)Ö¾rõA.vCÉ|çRÆV>=Ýw>@:8ioº~?n\´'ñºH£Ò=¥¸©]zöÚÝ{ŒÄ8GF¯ÑX.Çc{Ðð…«rc“ÔÀlÈÙ‚_Ï|–šò×Ï-‡’WJ÷ï+Žoúao¶wŒæü’g¨óË$-?,|g濱l"¤!.5Ü#ËAµÚUT—•ÂÒ
+¯ù8ôúíd
+h¶\‚‹¦æï)­IÍk·[áúiÜ;w‰¥?ç½	zÆ#<ø»ôôÏxEÎKë—Mèx8â¢sC¿íg”ý¶oúÜëpÏWáXv÷)ô%ÿà8³˜‘¶gîŽïs;Ûåáˆ|íVgªú5ÍúæC#Æ-ÍïÀ–tl¸„ÇØÇñþ°f½ðç8þ
+Þüþ¾z×ý¶%¼îÜL÷_ˆ×'Ȳï,ƒfD$áÆEÂa~ö§ïÆ)ÌH+¾ùtúX,"&<cìò‡"é+
+‰\Í™=ˆôùIŸ†Bžb)2ŠtçX~ŒÝe®#Ööé´®yZž±¡Š†ÈËás™š9¹x_6ï9ûS¿ZiOªy?¥ò=ÆÓ.}ðÂ'F˪$²ð¯l˜8•à¤”>ÊчŒ3„Tl†ß–I»•GÞ•rnyÎT»ÖKŒÆЁ=«÷Lt•Òɘª÷Êûê?Pqdß_µŠÆ¦»JGõjW¬æ4/|q2zƒS¾çN›®[Ï잶)ú@ˆeyœÜ6ÃPF<vvj0÷¤«áåËl¥¶‰ko}ÅÉp|ÏmŸÕ‡¦äÂU@#UÏì§Ô§(nÈ/²„½_à.*‹?±A)?Åy|§£©Æ?àݾC›Æx%ၴ.تŠ•}@SG‡Ý>:”Kþè¯ìñY¡ …‰±Ÿ³J°%˜}H¶f»‰ý¤ðšÞWvkÁÞ<r‡7*&Üûk£7<$ÕßZ÷QW?…
+úŽ$pu`.’êÈ6»•Zb!„þïR£˜à—L ‚9¡CËCT¬ÒÑ]ïRõµ“7nJ?õû~z*Õ¹O]+¹}ÊD~›bͽƒþy‘Új
+X¡´øEÖ§õ?Ìa6½õ—Ž«óŠãWX=ƒ»lÂåž&Êy+ÇMë¼?ž@õ³¿IÜ{L-déF\gAX—
+›%œÜ7NtoÝÆGÎ]ù˹ãæö$Glß]t7él»¾”9Û2ZZä[U©üˆc?~tôÐÏÖEãƒü?G²¾q“#ÎOæ:ʽ#ò0oŒÅ%bÿûýåÅ¿
ßÄ`-
 endstream
 endobj
-223 0 obj <<
+222 0 obj <<
 /Type /Page
-/Contents 224 0 R
-/Resources 222 0 R
+/Contents 223 0 R
+/Resources 221 0 R
 /MediaBox [0 0 595.276 841.89]
 /Parent 202 0 R
-/Annots [ 218 0 R 219 0 R 220 0 R 221 0 R ]
+/Annots [ 207 0 R 208 0 R 217 0 R 218 0 R 219 0 R 220 0 R ]
 >> endobj
-218 0 obj <<
+207 0 obj <<
 /Type /Annot
 /Subtype /Link
 /Border[0 0 0]/H/I/C[0 1 0]
-/Rect [80.004 628.483 110.163 641.385]
+/Rect [492.837 718.346 522.996 731.143]
 /A << /S /GoTo /D (cite.nolan09) >>
 >> endobj
-219 0 obj <<
+208 0 obj <<
 /Type /Annot
 /Subtype /Link
 /Border[0 0 0]/H/I/C[0 1 0]
-/Rect [116.125 628.483 139.936 641.385]
+/Rect [84.236 704.796 108.047 717.594]
 /A << /S /GoTo /D (cite.nolan09) >>
 >> endobj
-220 0 obj <<
+217 0 obj <<
 /Type /Annot
 /Subtype /Link
 /Border[0 0 0]/H/I/C[0 1 0]
-/Rect [170.181 587.836 206.711 600.634]
+/Rect [80.004 601.385 110.163 614.286]
+/A << /S /GoTo /D (cite.nolan09) >>
+>> endobj
+218 0 obj <<
+/Type /Annot
+/Subtype /Link
+/Border[0 0 0]/H/I/C[0 1 0]
+/Rect [116.125 601.385 139.936 614.286]
+/A << /S /GoTo /D (cite.nolan09) >>
+>> endobj
+219 0 obj <<
+/Type /Annot
+/Subtype /Link
+/Border[0 0 0]/H/I/C[0 1 0]
+/Rect [170.181 560.737 206.711 573.535]
 /A << /S /GoTo /D (cite.fBasics) >>
 >> endobj
-221 0 obj <<
+220 0 obj <<
 /Type /Annot
 /Subtype /Link
 /Border[0 0 0]/H/I/C[0 1 0]
-/Rect [212.814 587.836 236.625 600.634]
+/Rect [212.814 560.737 236.625 573.535]
 /A << /S /GoTo /D (cite.fBasics) >>
 >> endobj
-225 0 obj <<
-/D [223 0 R /XYZ 80 770.89 null]
+224 0 obj <<
+/D [222 0 R /XYZ 80 770.89 null]
 >> endobj
-222 0 obj <<
-/Font << /F83 137 0 R /F8 99 0 R /F25 141 0 R /F22 140 0 R /F20 104 0 R /F23 143 0 R /F28 161 0 R /F24 214 0 R /F34 142 0 R /F80 101 0 R /F103 138 0 R /F105 195 0 R >>
+221 0 obj <<
+/Font << /F83 137 0 R /F8 99 0 R /F22 140 0 R /F25 141 0 R /F34 142 0 R /F80 101 0 R /F20 104 0 R /F23 143 0 R /F28 161 0 R /F24 214 0 R /F103 138 0 R /F105 195 0 R >>
 /ProcSet [ /PDF /Text ]
 >> endobj
 229 0 obj <<
-/Length 1728      
+/Length 1763      
 /Filter /FlateDecode
 >>
 stream
-xÚÕË®ÛDt¿"båˆÚ¿+è¢è¶j¡ÐH,(ßÄIL“øÊNz{Q?žóšñ8qK‹…Å$ó8s^sžV³ÍLÍž]=Y\=|ZÌ´ŠJUêÙb=+ô,Oó¨ŒÓÙb5û5ÐjþÛâ Å>”ÎÓ§ŠžÍuðòå<ŒcTX¬pÓþ5Œxy×ÀücËëŸõ•^>ÕjD$ÔI¥ªœ…I%ZªàþÆ-áÑ°]êàæµà‡½8Ëò`CsìeØý•Àî<02M¥…
ºq”&¥ÈÇå
-Ü30J1Œlj•ätv[
-|Ap:HÎ`KÙO§‘µ7Ø\Î9O¼y&Ïä+P‘H*ÍY”Å–Äã¢:œöðsbÀf4=ÿZÙx;7EP#ì=_[ŠÒÚ^ð öÚaº­ù"λÓ@«ê*|ƒÏgOb…™*ƒ''ËEÜÍMž%Xm"l][ |y ºg o¾c~`£}ӍqÃת£Ç'±†®ÆÏý£˜Gd“¦•,✦·Q3¨( EVµâ£ÔÜ=›ùˆà…•ë$Žò¬°®Do22Yð\¾/ÜÌ’ÜÞÜ[ëß²G–d:v¬"'‡
-Mi°xºÿx¦&þ:x­R%ËZ¶ô¤\gÆ÷ ÚÉx4¥ýGWhm˜«oùo#ð€—ïF‡ïƇGò@à(>iyFò‰"ù—^ÙÒÓjÑ"û!îßÉþ+«)	2“CTY¾—CTÖÁ‹7ÙO¢çJˆt2G¤hcKæù•„ºš¶ø¸sºô郢[¹°–ÑÈåFö‚¨w
jP:¿Æµ@XŽö‡àŠF•©SÊ}9¾;a¤sڣ㷞!H„0™.ƒ劼ûcïù{ÿÍBŸÕç"ù‰Á;Éu<½¬?Ì/LJé\Ž	ƒ?KZ:Íõ§f‘/ÇôDVýœ”öå¿LûŸ“_ÿeÆýXBY	ƼGŽ%èRV®›ŒŽ[f§ë3ˆ•ø螏›á’¶5ŬÔQ’é‰4éE at fhpd<»ttrß)tc¹\q)@Ü_C g-=’ð‹_X­Y[‰'|JË‹ÆòâêÓ+'Cq„ùþä2íI5‚
t´R
-@¢QrU„‰3W,áÁ¾¥ºè€%Ñ·–-Uэ}i‡PA)Ó
-üô•…è_C\”O<Úÿ;þP¡§°pÖÁÓy‘mg…CB;Ax¨©l³\ºª¢F€þÁ”‹K™Ò°ÜÄÖSXɉ|P¬e–µ¸Ä±„k9\7âj+›¾*›yJ¯&Ct¶dÄù¶â‚+W%¡„†5þj‰P[«-‹pÀ¿¡JãsµØ£z’s¡XÁÕ+VãIÜ븵5î¾µ'ÕåMRÅö/
-jXK’’uþV(WƒAô|Ü®ùÿh1Á|ɯU“ëèlÙxFV@¥ÔøÚEF,_¨`B=æs9Ô½iÊÖH¬–ÌÞ¢ìðèPˆ“‰6Ö“IäëHrû/¨Øš7¦K–ÙYꪡ{^’¥€¼1^\éª<â,Ár^è­im/ˆ‘á;C ’¸‰»èˆY짋w£³¨È]	~aöցæØ—^†—¸ˆLQÚ[w[W¢‘MQâfGJ¾X²íL±Ö9‰dt+¬B5²DØ•m%›êÿ,ÛäD¯F¢§ƒe-][Á郞®ÉÐ÷\ñÂŽa§líû®Üf
Š}×nDœû&€;k>G‡Ró„ÝŽ•m%DItíÔØZÞêkaqëú 6¤qpœkC$¬cHD•ÞúÕ1þüA§Œ²Æ9(<Åt'˜E©vÆÔJA{”"Þ1wnL9ôpîuÌlâ†R‘ß»¶ØºˆK *º@ÀS?ðl_Äæk•›ÖZAì	“ÞÕJä^Oû
-4žYO‰ÊÑõRLú8ã¾8EÒ€ðe^Œëùa¢m§××xå¾1àI%ð=go²‚f-QÅâàÓ­ËòèüÁKz~Ï{g¿PIp²±¶çV1ÆŒ…L¡1·B¾VÆLh@L:RÄe‡oJ±íðõ¨Ã÷ÛwÃ[ßPÍæZì‹ü¬ëžè³ÝrÚlý6ü+‰Œ—‘RÓ™ ÚImzçiÉr`Ï#J}'Kužw%§|-¥*‚½«2åöI$¹ý+<ex×}Ä[BËÿáñßûcþ§_d¾°í àÆDE–Ž¥Ÿ4'ghÿË	-ëô-«ø¾e¹oòöÿzqõ'\ÐZk
[TRUNCATED]

To get the complete diff run:
    svnlook diff /svnroot/gmm -r 38