diff --git a/tests/testthat/test-RunModel_Lag.R b/tests/testthat/test-RunModel_Lag.R
index 26e10832da4e5f5961733b469b6bef8e94889951..c7cc53ec8c72d8b6eba1648c5977ac6e535b3ee1 100644
--- a/tests/testthat/test-RunModel_Lag.R
+++ b/tests/testthat/test-RunModel_Lag.R
@@ -39,22 +39,6 @@ RunOptions <- suppressWarnings(CreateRunOptions(FUN_MOD = RunModel_GR4J,
                                                 InputsModel = InputsModel,
                                                 IndPeriod_Run = Ind_Run))
 
-test_that("'QupstrUnit' must correspond to one possible value", {
-  expect_error(
-    InputsModel <- CreateInputsModel(
-      FUN_MOD = RunModel_GR4J,
-      DatesR = BasinObs$DatesR,
-      Precip = BasinObs$P,
-      PotEvap = BasinObs$E,
-      Qupstream = matrix(Qupstream, ncol = 1),
-      LengthHydro = 1,
-      BasinAreas = BasinAreas,
-      QupstrUnit = "m3/h"
-    ),
-    regexp = "'arg' should be one of \"mm\", \"m3\", \"m3/s\", \"l/s\""
-  )
-})
-
 test_that("QcontribDown parameter should be a numeric vector or an OutputModel object", {
   regexp = "'QcontribDown' must be a numeric vector or a 'OutputsModel' object"
   expect_error(