v1.4.1.10 BUG: tests added in CreatInputsModel in order to check inputs to run GR5H #13

8c6ab7fc · Hban Mesure · 42315707 · 8c6ab7fc · 8c6ab7fc · 8c6ab7fc
Commit 8c6ab7fc authored 5 years ago by Hban Mesure
Hide whitespace changes
Inline Side-by-side

Showing

with 4 additions and 4 deletions
+4 -4
--- a/DESCRIPTION
+++ b/DESCRIPTION
 Package: airGR
 Type: Package
 Title: Suite of GR Hydrological Models for Precipitation-Runoff Modelling
-Version: 1.4.1.9
+Version: 1.4.1.10
 Date: 2019-12-05
 Authors@R: c(
  person("Laurent", "Coron", role = c("aut", "trl"), comment = c(ORCID = "0000-0002-1503-6204")),

--- a/NEWS.md
+++ b/NEWS.md
@@ -2,7 +2,7 @@



-### 1.4.1.9 Release Notes (2019-12-05)
+### 1.4.1.10 Release Notes (2019-12-05)


 #### New features

--- a/R/CreateInputsModel.R
+++ b/R/CreateInputsModel.R
@@ -13,7 +13,7 @@ CreateInputsModel <- function(FUN_MOD,
    
    ##check_FUN_MOD
    BOOL <- FALSE
-    if (identical(FUN_MOD, RunModel_GR4H)) {
+    if (identical(FUN_MOD, RunModel_GR4H) | identical(FUN_MOD, RunModel_GR5H)) {
      ObjectClass <- c(ObjectClass, "hourly", "GR")
      
      TimeStep <- as.integer(60 * 60)
@@ -59,7 +59,7 @@ CreateInputsModel <- function(FUN_MOD,
      
      BOOL <- TRUE
    }
-    if (identical(FUN_MOD, RunModel_CemaNeigeGR4H)) {
+    if (identical(FUN_MOD, RunModel_CemaNeigeGR4H) | identical(FUN_MOD, RunModel_CemaNeigeGR5H)) {
      ObjectClass <- c(ObjectClass, "hourly", "GR", "CemaNeige")
      
      TimeStep <- as.integer(60 * 60)