Commit 1b62dfdd authored by unknown's avatar unknown
Browse files

v1.0.9.52 error message fixed in CreateRunOptions when the length of IniResLevels is checked

parent e5af398e
No related merge requests found
Showing with 5 additions and 5 deletions
+5 -5
Package: airGR
Type: Package
Title: Suite of GR Hydrological Models for Precipitation-Runoff Modelling
Version: 1.0.9.51
Date: 2017-10-17
Version: 1.0.9.52
Date: 2017-10-23
Authors@R: c(
person("Laurent", "Coron", role = c("aut", "trl")),
person("Charles", "Perrin", role = c("aut", "ths")),
......
......@@ -14,7 +14,7 @@ output:
### 1.0.9.51 Release Notes (2017-10-17)
### 1.0.9.52 Release Notes (2017-10-23)
#### New features
......
......@@ -109,12 +109,12 @@ CreateRunOptions <- function(FUN_MOD, InputsModel, IndPeriod_WarmUp = NULL, IndP
identical(FUN_MOD, RunModel_GR5J) | identical(FUN_MOD, RunModel_CemaNeigeGR5J) |
identical(FUN_MOD, RunModel_GR2M)) &
length(IniResLevels) != 2) {
stop("The length of IniStates must be 2 for the chosen FUN_MOD \n")
stop("The length of IniResLevels must be 2 for the chosen FUN_MOD \n")
return(NULL)
}
if ((identical(FUN_MOD,RunModel_GR6J) | identical(FUN_MOD,RunModel_CemaNeigeGR6J)) &
length(IniResLevels) != 3) {
stop("The length of IniStates must be 3 for the chosen FUN_MOD \n")
stop("The length of IniResLevels must be 3 for the chosen FUN_MOD \n")
return(NULL)
}
} else if (is.null(IniStates)) {
......
Supports Markdown
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment