diff --git a/DESCRIPTION b/DESCRIPTION index 47eb81f47c3afcb69b2419eccf252c1cd11fce4b..ad1c119c9a6d2aea3091af61854c17270618ffa0 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.2.9.4 +Version: 1.2.9.5 Date: 2019-03-13 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 af6e4d2d6a88fd70e8f34315d59548b0116eb989..5f49f786abce66e070c4e82bfe340ad7fddf6055 100644 --- a/NEWS.rmd +++ b/NEWS.rmd @@ -13,7 +13,7 @@ output: -### 1.2.9.4 Release Notes (2019-03-13) +### 1.2.9.5 Release Notes (2019-03-13) diff --git a/R/Calibration.R b/R/Calibration.R index 6c6f4980fc7ca631e66a3f2bdd1ab0cf93f64d01..adc66d8e94b2935475084e216e2c1bd777c32c23 100644 --- a/R/Calibration.R +++ b/R/Calibration.R @@ -4,7 +4,9 @@ Calibration <- function(InputsModel, RunOptions, InputsCrit, CalibOptions, FUN_MOD <- match.fun(FUN_MOD) FUN_CRIT <- match.fun(FUN_CRIT) FUN_CALIB <- match.fun(FUN_CALIB) - FUN_TRANSFO <- match.fun(FUN_TRANSFO) + if (!is.null(FUN_TRANSFO)) { + FUN_TRANSFO <- match.fun(FUN_TRANSFO) + } return(FUN_CALIB(InputsModel, RunOptions, InputsCrit, CalibOptions, FUN_MOD, FUN_CRIT, FUN_TRANSFO, verbose = verbose)) }