From f040501ba03ae92e3153e8e0c2c7e140641b7375 Mon Sep 17 00:00:00 2001 From: Delaigue Olivier <olivier.delaigue@irstea.priv> Date: Mon, 20 May 2019 11:11:09 +0200 Subject: [PATCH] v1.3.0.4 UPDATE: Calibration_Michel modified to take into account RunModel_CemaNeigeGR4H --- DESCRIPTION | 2 +- NEWS.rmd | 2 +- R/Calibration_Michel.R | 6 +++++- 3 files changed, 7 insertions(+), 3 deletions(-) diff --git a/DESCRIPTION b/DESCRIPTION index e94b78b3..af6b6198 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.3 +Version: 1.3.0.4 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 c32fb949..31d0a70e 100644 --- a/NEWS.rmd +++ b/NEWS.rmd @@ -14,7 +14,7 @@ output: -### 1.3.0.3 Release Notes (2019-05-20) +### 1.3.0.4 Release Notes (2019-05-20) #### New features diff --git a/R/Calibration_Michel.R b/R/Calibration_Michel.R index 122c50d0..2f23888f 100644 --- a/R/Calibration_Michel.R +++ b/R/Calibration_Michel.R @@ -82,7 +82,11 @@ Calibration_Michel <- function(InputsModel, FUN_TRANSFO <- TransfoParam_CemaNeige } } - if (identical(FUN_MOD, RunModel_CemaNeigeGR4J) | identical(FUN_MOD, RunModel_CemaNeigeGR5J) | identical(FUN_MOD, RunModel_CemaNeigeGR6J)) { + if (identical(FUN_MOD, RunModel_CemaNeigeGR4H) | + identical(FUN_MOD, RunModel_CemaNeigeGR4J) | identical(FUN_MOD, RunModel_CemaNeigeGR5J) | identical(FUN_MOD, RunModel_CemaNeigeGR6J)) { + if (identical(FUN_MOD, RunModel_CemaNeigeGR4H)) { + FUN1 <- TransfoParam_GR4H + } if (identical(FUN_MOD, RunModel_CemaNeigeGR4J)) { FUN1 <- TransfoParam_GR4J } -- GitLab