From 8c6ab7fc981926d5bea26a99060aaba553a5896a Mon Sep 17 00:00:00 2001
From: Hban Mesure <>
Date: Thu, 5 Dec 2019 13:33:42 +0100
Subject: [PATCH] v1.4.1.10 BUG: tests added in CreatInputsModel in order to
check inputs to run GR5H #13
---
DESCRIPTION | 2 +-
NEWS.md | 2 +-
R/CreateInputsModel.R | 4 ++--
3 files changed, 4 insertions(+), 4 deletions(-)
diff --git a/DESCRIPTION b/DESCRIPTION
index 9a3db440..e5a61d67 100644
--- a/DESCRIPTION
+++ b/DESCRIPTION
@@ -1,7 +1,7 @@
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")),
diff --git a/NEWS.md b/NEWS.md
index 3689aa22..6bcb176d 100644
--- 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
diff --git a/R/CreateInputsModel.R b/R/CreateInputsModel.R
index cb7e1e13..510ea517 100644
--- 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)
--
GitLab