From b5f238f13c36eb533272562b3d2214b5bfd2325e Mon Sep 17 00:00:00 2001 From: David <david.dorchies@inrae.fr> Date: Fri, 29 Mar 2024 10:17:50 +0100 Subject: [PATCH] fix(test): warning on CreateCalibOptions due to Reservoir fixed params Refs #72 --- tests/testthat/test-RunModel_Ungauged.R | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/tests/testthat/test-RunModel_Ungauged.R b/tests/testthat/test-RunModel_Ungauged.R index 4a60218..19f3f65 100644 --- a/tests/testthat/test-RunModel_Ungauged.R +++ b/tests/testthat/test-RunModel_Ungauged.R @@ -299,8 +299,8 @@ testDerivdedUngauged <- function(donorByDerivation) { e <- setupRunModel(griwrm = g, runRunModel = FALSE, Qobs2 = Qobs2) for (x in ls(e)) assign(x, get(x, e)) - CalibOptions <- CreateCalibOptions(InputsModel) - CalibOptions[["Dam"]]$FixedParam <- c(650E6, 1) + CalibOptions <- CreateCalibOptions(InputsModel, + FixedParam = list(Dam = c(650E6, 1))) e <- runCalibration(g, Qobs2 = Qobs2, CalibOptions = CalibOptions) for(x in ls(e)) assign(x, get(x, e)) expect_equal(Param[["54095"]][1:3], -- GitLab