v1.3.2.25 BUG: RunModel_CemaNeige now returns a ts of precipitation with an...

v1.3.2.25 BUG: RunModel_CemaNeige now returns a ts of precipitation with an exact length  when IndPeriod_WarmUp = 0L (no warm-up) in CreateRunOptions #5622

DESCRIPTION

 Package: airGR
 Type: Package
 Title: Suite of GR Hydrological Models for Precipitation-Runoff Modelling
-Version: 1.3.2.24
-Date: 2019-06-21
+Version: 1.3.2.25
+Date: 2019-09-04
 Authors@R: c(
   person("Laurent", "Coron", role = c("aut", "trl"), comment = c(ORCID = "0000-0002-1503-6204")),
   person("Olivier", "Delaigue", role = c("aut", "cre"), comment = c(ORCID = "0000-0002-7668-8468"), email = "airGR@irstea.fr"),

NEWS.rmd

@@ -14,7 +14,13 @@ output:
 
 
 
-### 1.3.2.24 Release Notes (2019-06-21)
+### 1.3.2.25 Release Notes (2019-06-21)
+
+
+
+#### Bug fixes
+
+- Fixed bug in <code>RunModel_CemaNeige()</code>. The function now runs correctly when <code>IndPeriod_WarmUp = 0L</code> in <code>CreateRunOptions()</code> value without <code>"CumFreq"</code> in order to completely disable the warm-up period (e.g. to perform a forecast form a given initial state).
 
 ____________________________________________________________________________________
 

R/RunModel_CemaNeige.R

@@ -40,7 +40,7 @@ RunModel_CemaNeige <- function(InputsModel, RunOptions, Param) {
   }
 
   ## Input_data_preparation
-  if (identical(RunOptions$IndPeriod_WarmUp, 0)) {
+  if (identical(RunOptions$IndPeriod_WarmUp, as.integer(0))) {
     RunOptions$IndPeriod_WarmUp <- NULL
   }
   IndPeriod1     <- c(RunOptions$IndPeriod_WarmUp, RunOptions$IndPeriod_Run)