v1.4.3.30 BUG: wrong call to RunModel_GR5H replaced by RunModel_CemaNeigeGR5H...

v1.4.3.30 BUG: wrong call to RunModel_GR5H replaced by  RunModel_CemaNeigeGR5H in CreatIniSates used in RunModel_CemaNeigeGR5H #13

DESCRIPTION

 Package: airGR
 Type: Package
 Title: Suite of GR Hydrological Models for Precipitation-Runoff Modelling
-Version: 1.4.3.29
+Version: 1.4.3.30
 Date: 2019-12-19
 Authors@R: c(
   person("Laurent", "Coron", role = c("aut", "trl"), comment = c(ORCID = "0000-0002-1503-6204")),

NEWS.md

@@ -2,7 +2,7 @@
 
 
 
-### 1.4.3.29 Release Notes (2019-12-19)
+### 1.4.3.30 Release Notes (2019-12-19)
 
 
 #### New features

R/RunModel_CemaNeigeGR5H.R

@@ -144,7 +144,7 @@ RunModel_CemaNeigeGR5H <- function(InputsModel,RunOptions,Param){
   if (ExportStateEnd) {
     RESULTS$StateEnd[-3L] <- ifelse(RESULTS$StateEnd[-3L] < 0, 0, RESULTS$StateEnd[-3L]) ### remove negative values except for the ExpStore location
     idNStates <- seq_len(NStates*NLayers) %% NStates
-    RESULTS$StateEnd <- CreateIniStates(FUN_MOD = RunModel_GR5H, InputsModel = InputsModel, IsHyst = IsHyst,
+    RESULTS$StateEnd <- CreateIniStates(FUN_MOD = RunModel_CemaNeigeGR5H, InputsModel = InputsModel, IsHyst = IsHyst,
                                         ProdStore = RESULTS$StateEnd[1L], RoutStore = RESULTS$StateEnd[2L], ExpStore = NULL,
                                         IntStore = RESULTS$StateEnd[4L],
                                         UH1 = NULL, UH2 = RESULTS$StateEnd[(1:(40*24))+(7+20*24)],