Skip to content
GitLab
Menu
Projects
Groups
Snippets
Loading...
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
Menu
Open sidebar
HYCAR-Hydro
airGR
Commits
52c24906
Commit
52c24906
authored
Sep 05, 2017
by
unknown
Browse files
v1.0.9.38 CreateIniStates stops if state values < 0
parent
d3d98406
Changes
2
Hide whitespace changes
Inline
Side-by-side
DESCRIPTION
View file @
52c24906
Package: airGR
Type: Package
Title: Suite of GR Hydrological Models for Precipitation-Runoff Modelling
Version: 1.0.9.3
7
Version: 1.0.9.3
8
Date: 2017-09-05
Authors@R: c(
person("Laurent", "Coron", role = c("aut", "trl")),
...
...
R/CreateIniStates.R
View file @
52c24906
...
...
@@ -62,6 +62,12 @@ CreateIniStates <- function(FUN_MOD, InputsModel,
## check states
if
(
any
(
ProdStore
<
0
)
|
any
(
RoutStore
<
0
)
|
any
(
ExpStore
<
0
)
|
any
(
UH1
<
0
)
|
any
(
UH2
<
0
)
|
any
(
GCemaNeigeLayers
<
0
)
|
any
(
eTGCemaNeigeLayers
<
0
))
{
stop
(
"Negative values are not allowed for any state variables"
)
}
if
(
identical
(
FUN_MOD
,
RunModel_GR6J
)
|
identical
(
FUN_MOD
,
RunModel_CemaNeigeGR6J
))
{
if
(
is.null
(
ExpStore
))
{
stop
(
"'RunModel_*GR6J' need an 'ExpStore' value"
)
...
...
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
.
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment