diff --git a/tests/testthat/test-CreateInputsCrit.R b/tests/testthat/test-CreateInputsCrit.R index 8c3ad5ad973cf94b07ef47b2611c8b9ed1968a86..980a6aa50aaa61694200097f9cc905ae8669c981 100644 --- a/tests/testthat/test-CreateInputsCrit.R +++ b/tests/testthat/test-CreateInputsCrit.R @@ -122,6 +122,18 @@ test_that("Lavenne criterion: not upstream a priori nodes are allow if processed transfo = "sqrt" ) expect_equal(attr(IC156$`54029`, "AprioriId"), c("54029" = "54095")) + e <- runCalibration( + nodes = nodes, + Qobs2 = NULL, + InputsCrit = IC156, + CalibOptions = NULL, + FUN_CRIT = ErrorCrit_KGE2, + runRunModel = FALSE, + IsHyst = FALSE + ) + for (x in ls(e)) assign(x, get(x, e)) + # 54029 not processed as ungauged + expect_false(is.null(OutputsCalib$`54029`$CritFinal)) }) test_that("Lavenne criterion: current node and a priori node must use the same model", {