diff --git a/R/CreateInputsModel.R b/R/CreateInputsModel.R index 0c44c3fa1271c837368a654276051b58623680d1..93b97dc7f804b4c80272500458590236ecd93996 100644 --- a/R/CreateInputsModel.R +++ b/R/CreateInputsModel.R @@ -30,6 +30,7 @@ CreateInputsModel <- function(FUN_MOD, FUN_MOD <- match.fun(FUN_MOD) FeatFUN_MOD <- .GetFeatModel(FUN_MOD = FUN_MOD, DatesR = DatesR) ObjectClass <- FeatFUN_MOD$Class + TimeStep <- FeatFUN_MOD$TimeStep ##check_arguments @@ -286,7 +287,7 @@ CreateInputsModel <- function(FUN_MOD, Qupstream <- Qupstream * TimeStep / 1e3 } InputsModel <- c(InputsModel, list(Qupstream = Qupstream, - LengthHydro = LengthHydro, + LengthHydro = LengthHydro, BasinAreas = BasinAreas)) }