From 7971f3c10c8b534aa380327fabedba5058e21f3c Mon Sep 17 00:00:00 2001 From: Delaigue Olivier <olivier.delaigue@irstea.priv> Date: Mon, 20 May 2019 16:39:58 +0200 Subject: [PATCH] v1.3.0.1 BUG: CreateIniStates returns an object of class GR if RunModel_CemaNeigeGR4H is used --- DESCRIPTION | 2 +- NEWS.rmd | 2 +- R/CreateIniStates.R | 2 +- 3 files changed, 3 insertions(+), 3 deletions(-) diff --git a/DESCRIPTION b/DESCRIPTION index 6ad3bf1b..bd1b6c00 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.3.0.14 +Version: 1.3.0.15 Date: 2019-05-20 Authors@R: c( person("Laurent", "Coron", role = c("aut", "trl"), comment = c(ORCID = "0000-0002-1503-6204")), diff --git a/NEWS.rmd b/NEWS.rmd index 999ceb82..7ce58718 100644 --- a/NEWS.rmd +++ b/NEWS.rmd @@ -14,7 +14,7 @@ output: -### 1.3.0.14 Release Notes (2019-05-20) +### 1.3.0.15 Release Notes (2019-05-20) #### New features diff --git a/R/CreateIniStates.R b/R/CreateIniStates.R index 050ce006..c3774e8e 100644 --- a/R/CreateIniStates.R +++ b/R/CreateIniStates.R @@ -38,7 +38,7 @@ CreateIniStates <- function(FUN_MOD, InputsModel, IsHyst = FALSE, BOOL <- TRUE } if (identical(FUN_MOD, RunModel_CemaNeigeGR4H)) { - ObjectClass <- c(ObjectClass, "CemaNeige", "hourly") + ObjectClass <- c(ObjectClass, "GR", "CemaNeige", "hourly") BOOL <- TRUE } if (identical(FUN_MOD, RunModel_CemaNeigeGR4J) | -- GitLab