diff --git a/R/CreateIniStates.R b/R/CreateIniStates.R index 84e6b53cfe56717803c9439f7f566750a21e1b95..c361f8c63de0596b53cda9f5094633efc3d1f530 100644 --- a/R/CreateIniStates.R +++ b/R/CreateIniStates.R @@ -74,7 +74,7 @@ CreateIniStates <- function(FUN_MOD, InputsModel, IsHyst = FALSE, IsIntStore = F } UH1 <- rep(Inf, UH1n) } - if ((!identical(FUN_MOD, RunModel_GR5H) | identical(FUN_MOD, RunModel_CemaNeigeGR5H)) & !is.null(IntStore)) { + if (!(identical(FUN_MOD, RunModel_GR5H) | identical(FUN_MOD, RunModel_CemaNeigeGR5H)) & !is.null(IntStore)) { if (verbose) { warning(sprintf("'%s' does not require 'IntStore'. Values set to NA", FeatFUN_MOD$NameFunMod)) }