From 678b50ce965426b395c88eb855827ce0c3ea3d61 Mon Sep 17 00:00:00 2001
From: unknown <olivier.delaigue@ANPI1430.antony.irstea.priv>
Date: Wed, 26 Oct 2016 11:06:08 +0200
Subject: [PATCH] To be perfectly in CemaNeige functions examples,
 "BasinInfo$HypsoData [51]" is replaced by "median(BasinInfo$HypsoData)"

---
 man/RunModel_CemaNeigeGR4J.Rd | 2 +-
 man/RunModel_CemaNeigeGR5J.Rd | 2 +-
 man/RunModel_CemaNeigeGR6J.Rd | 2 +-
 3 files changed, 3 insertions(+), 3 deletions(-)

diff --git a/man/RunModel_CemaNeigeGR4J.Rd b/man/RunModel_CemaNeigeGR4J.Rd
index 102ca348..d3af641e 100644
--- a/man/RunModel_CemaNeigeGR4J.Rd
+++ b/man/RunModel_CemaNeigeGR4J.Rd
@@ -67,7 +67,7 @@ data(L0123002)
 ## preparation of the InputsModel object
 InputsModel <- CreateInputsModel(FUN_MOD = RunModel_CemaNeigeGR4J, DatesR = BasinObs$DatesR, 
                                  Precip = BasinObs$P, PotEvap = BasinObs$E, TempMean = BasinObs$T, 
-                                 ZInputs = BasinInfo$HypsoData[51],
+                                 ZInputs = median(BasinInfo$HypsoData),
                                  HypsoData = BasinInfo$HypsoData, NLayers = 5)
 
 ## run period selection
diff --git a/man/RunModel_CemaNeigeGR5J.Rd b/man/RunModel_CemaNeigeGR5J.Rd
index c7e3de7c..2031d8fc 100644
--- a/man/RunModel_CemaNeigeGR5J.Rd
+++ b/man/RunModel_CemaNeigeGR5J.Rd
@@ -68,7 +68,7 @@ data(L0123002)
 ## preparation of the InputsModel object
 InputsModel <- CreateInputsModel(FUN_MOD = RunModel_CemaNeigeGR5J, DatesR = BasinObs$DatesR, 
                                  Precip = BasinObs$P, PotEvap = BasinObs$E, TempMean = BasinObs$T, 
-                                 ZInputs = BasinInfo$HypsoData[51],
+                                 ZInputs = median(BasinInfo$HypsoData),
                                  HypsoData = BasinInfo$HypsoData, NLayers = 5)
 
 ## run period selection
diff --git a/man/RunModel_CemaNeigeGR6J.Rd b/man/RunModel_CemaNeigeGR6J.Rd
index a465d934..ab6aa409 100644
--- a/man/RunModel_CemaNeigeGR6J.Rd
+++ b/man/RunModel_CemaNeigeGR6J.Rd
@@ -71,7 +71,7 @@ data(L0123002)
 ## preparation of the InputsModel object
 InputsModel <- CreateInputsModel(FUN_MOD = RunModel_CemaNeigeGR6J, DatesR = BasinObs$DatesR, 
                                  Precip = BasinObs$P, PotEvap = BasinObs$E, TempMean = BasinObs$T, 
-                                 ZInputs = BasinInfo$HypsoData[51],
+                                 ZInputs = median(BasinInfo$HypsoData),
                                  HypsoData = BasinInfo$HypsoData, NLayers = 5)
 
 ## run period selection
-- 
GitLab