diff --git a/R/RunModel_CemaNeigeGR4J.R b/R/RunModel_CemaNeigeGR4J.R
index 28151667fa8f79f26265ed1e8b8684f14b1aa2fd..d07d98ed92a93b8d39e186a82cf515f98e82b063 100644
--- a/R/RunModel_CemaNeigeGR4J.R
+++ b/R/RunModel_CemaNeigeGR4J.R
@@ -18,11 +18,11 @@ RunModel_CemaNeigeGR4J <- function(InputsModel,RunOptions,Param){
 
       Param_X1X3_threshold <- 1e-2
       if (Param[1L] < Param_X1X3_threshold) {
-        warning(sprintf("Param[1] (X1: production store capacity [mm]) < %.2f\n New X1 value: %.2f", Param_X1X3_threshold, Param_X1X3_threshold))
+        warning(sprintf("Param[1] (X1: production store capacity [mm]) < %.2f\n X1 set to %.2f", Param_X1X3_threshold, Param_X1X3_threshold))
         Param[1L] <- Param_X1X3_threshold
       }
       if (Param[3L] < Param_X1X3_threshold) {
-        warning(sprintf("Param[3] (X3: routing store capacity [mm]) < %.2f\n New X3 value: %.2f", Param_X1X3_threshold, Param_X1X3_threshold))
+        warning(sprintf("Param[3] (X3: routing store capacity [mm]) < %.2f\n X3 set to %.2f", Param_X1X3_threshold, Param_X1X3_threshold))
         Param[3L] <- Param_X1X3_threshold
       }
       
diff --git a/R/RunModel_CemaNeigeGR5J.R b/R/RunModel_CemaNeigeGR5J.R
index b99e4c2dd32af514e185a0aeeb9211633c444b39..2661e01e110ec1034e51e27b8e3830cda1fa97b8 100644
--- a/R/RunModel_CemaNeigeGR5J.R
+++ b/R/RunModel_CemaNeigeGR5J.R
@@ -18,11 +18,11 @@ RunModel_CemaNeigeGR5J <- function(InputsModel,RunOptions,Param){
       
       Param_X1X3_threshold <- 1e-2
       if (Param[1L] < Param_X1X3_threshold) {
-        warning(sprintf("Param[1] (X1: production store capacity [mm]) < %.2f\n New X1 value: %.2f", Param_X1X3_threshold, Param_X1X3_threshold))
+        warning(sprintf("Param[1] (X1: production store capacity [mm]) < %.2f\n X1 set to %.2f", Param_X1X3_threshold, Param_X1X3_threshold))
         Param[1L] <- Param_X1X3_threshold
       }
       if (Param[3L] < Param_X1X3_threshold) {
-        warning(sprintf("Param[3] (X3: routing store capacity [mm]) < %.2f\n New X3 value: %.2f", Param_X1X3_threshold, Param_X1X3_threshold))
+        warning(sprintf("Param[3] (X3: routing store capacity [mm]) < %.2f\n X3 set to %.2f", Param_X1X3_threshold, Param_X1X3_threshold))
         Param[3L] <- Param_X1X3_threshold
       }
 
diff --git a/R/RunModel_CemaNeigeGR6J.R b/R/RunModel_CemaNeigeGR6J.R
index fb7985d0136c89f640ae445f6e58b0abec42cd8e..cd0b79584f43feaf19ef4905ccd9b6f662dc1871 100644
--- a/R/RunModel_CemaNeigeGR6J.R
+++ b/R/RunModel_CemaNeigeGR6J.R
@@ -18,15 +18,15 @@ RunModel_CemaNeigeGR6J <- function(InputsModel,RunOptions,Param){
       
       Param_X1X3X6_threshold <- 1e-2
       if (Param[1L] < Param_X1X3X6_threshold) {
-        warning(sprintf("Param[1] (X1: production store capacity [mm]) < %.2f\n New X1 value: %.2f", Param_X1X3X6_threshold, Param_X1X3X6_threshold))
+        warning(sprintf("Param[1] (X1: production store capacity [mm]) < %.2f\n X1 set to %.2f", Param_X1X3X6_threshold, Param_X1X3X6_threshold))
         Param[1L] <- Param_X1X3X6_threshold
       }
       if (Param[3L] < Param_X1X3X6_threshold) {
-        warning(sprintf("Param[3] (X3: routing store capacity [mm]) < %.2f\n New X3 value: %.2f", Param_X1X3X6_threshold, Param_X1X3X6_threshold))
+        warning(sprintf("Param[3] (X3: routing store capacity [mm]) < %.2f\n X3 set to %.2f", Param_X1X3X6_threshold, Param_X1X3X6_threshold))
         Param[3L] <- Param_X1X3X6_threshold
       }
       if (Param[6L] < Param_X1X3X6_threshold) {
-        warning(sprintf("Param[6] (X6: coefficient for emptying exponential store [mm]) < %.2f\n New X6 value: %.2f", Param_X1X3X6_threshold, Param_X1X3X6_threshold))
+        warning(sprintf("Param[6] (X6: coefficient for emptying exponential store [mm]) < %.2f\n X6 set to %.2f", Param_X1X3X6_threshold, Param_X1X3X6_threshold))
         Param[6L] <- Param_X1X3X6_threshold
       }         
 
diff --git a/R/RunModel_GR2M.R b/R/RunModel_GR2M.R
index cbefa5ddb96c4af85abf7613a6f3f216431512aa..d0b1784f981e4a1486b68beb5bad0b7982a63eb5 100644
--- a/R/RunModel_GR2M.R
+++ b/R/RunModel_GR2M.R
@@ -15,7 +15,7 @@ RunModel_GR2M <- function(InputsModel,RunOptions,Param){
       
       Param_X1_threshold <- 1e-2
       if (Param[1L] < Param_X1_threshold) {
-        warning(sprintf("Param[1] (X1: production store capacity [mm]) < %.2f\n New X1 value: %.2f", Param_X1_threshold, Param_X1_threshold))
+        warning(sprintf("Param[1] (X1: production store capacity [mm]) < %.2f\n X1 set to %.2f", Param_X1_threshold, Param_X1_threshold))
         Param[1L] <- Param_X1_threshold
       }
 
diff --git a/R/RunModel_GR4H.R b/R/RunModel_GR4H.R
index 541d9dfccac80a01b670cec538e701e68596d6c7..76e5713246819efddba31ead005f3e75dd939db2 100644
--- a/R/RunModel_GR4H.R
+++ b/R/RunModel_GR4H.R
@@ -15,11 +15,11 @@ RunModel_GR4H <- function(InputsModel,RunOptions,Param){
       
       Param_X1X3_threshold <- 1e-2
       if (Param[1L] < Param_X1X3_threshold) {
-        warning(sprintf("Param[1] (X1: production store capacity [mm]) < %.2f\n New X1 value: %.2f", Param_X1X3_threshold, Param_X1X3_threshold))
+        warning(sprintf("Param[1] (X1: production store capacity [mm]) < %.2f\n X1 set to %.2f", Param_X1X3_threshold, Param_X1X3_threshold))
         Param[1L] <- Param_X1X3_threshold
       }
       if (Param[3L] < Param_X1X3_threshold) {
-        warning(sprintf("Param[3] (X3: routing store capacity [mm]) < %.2f\n New X3 value: %.2f", Param_X1X3_threshold, Param_X1X3_threshold))
+        warning(sprintf("Param[3] (X3: routing store capacity [mm]) < %.2f\n X3 set to %.2f", Param_X1X3_threshold, Param_X1X3_threshold))
         Param[3L] <- Param_X1X3_threshold
       }
 
diff --git a/R/RunModel_GR4J.R b/R/RunModel_GR4J.R
index a413ce9392ffc213b54ab247429498b0553484e0..b871d24a7c62bf1fcb86a76cdcfcfb2e712ed4b8 100644
--- a/R/RunModel_GR4J.R
+++ b/R/RunModel_GR4J.R
@@ -15,11 +15,11 @@ RunModel_GR4J <- function(InputsModel,RunOptions,Param){
       
       Param_X1X3_threshold <- 1e-2
       if (Param[1L] < Param_X1X3_threshold) {
-        warning(sprintf("Param[1] (X1: production store capacity [mm]) < %.2f\n New X1 value: %.2f", Param_X1X3_threshold, Param_X1X3_threshold))
+        warning(sprintf("Param[1] (X1: production store capacity [mm]) < %.2f\n X1 set to %.2f", Param_X1X3_threshold, Param_X1X3_threshold))
         Param[1L] <- Param_X1X3_threshold
       }
       if (Param[3L] < Param_X1X3_threshold) {
-        warning(sprintf("Param[3] (X3: routing store capacity [mm]) < %.2f\n New X3 value: %.2f", Param_X1X3_threshold, Param_X1X3_threshold))
+        warning(sprintf("Param[3] (X3: routing store capacity [mm]) < %.2f\n X3 set to %.2f", Param_X1X3_threshold, Param_X1X3_threshold))
         Param[3L] <- Param_X1X3_threshold
       }
 
diff --git a/R/RunModel_GR5J.R b/R/RunModel_GR5J.R
index f7357c09d01a298a0d8f7cac8fa535289a40d764..729e610852dd0b8183f1f4607c7d377f6911a6a3 100644
--- a/R/RunModel_GR5J.R
+++ b/R/RunModel_GR5J.R
@@ -15,11 +15,11 @@ RunModel_GR5J <- function(InputsModel,RunOptions,Param){
       
       Param_X1X3_threshold <- 1e-2
       if (Param[1L] < Param_X1X3_threshold) {
-        warning(sprintf("Param[1] (X1: production store capacity [mm]) < %.2f\n New X1 value: %.2f", Param_X1X3_threshold, Param_X1X3_threshold))
+        warning(sprintf("Param[1] (X1: production store capacity [mm]) < %.2f\n X1 set to %.2f", Param_X1X3_threshold, Param_X1X3_threshold))
         Param[1L] <- Param_X1X3_threshold
       }
       if (Param[3L] < Param_X1X3_threshold) {
-        warning(sprintf("Param[3] (X3: routing store capacity [mm]) < %.2f\n New X3 value: %.2f", Param_X1X3_threshold, Param_X1X3_threshold))
+        warning(sprintf("Param[3] (X3: routing store capacity [mm]) < %.2f\n X3 set to %.2f", Param_X1X3_threshold, Param_X1X3_threshold))
         Param[3L] <- Param_X1X3_threshold
       }
       
diff --git a/R/RunModel_GR6J.R b/R/RunModel_GR6J.R
index 87800dec43b489b6992c4f929021387f785cfb26..23e234da7a310c474977517b9d55fbd1231b9fe0 100644
--- a/R/RunModel_GR6J.R
+++ b/R/RunModel_GR6J.R
@@ -15,15 +15,15 @@ RunModel_GR6J <- function(InputsModel,RunOptions,Param){
       
       Param_X1X3X6_threshold <- 1e-2
       if (Param[1L] < Param_X1X3X6_threshold) {
-        warning(sprintf("Param[1] (X1: production store capacity [mm]) < %.2f\n New X1 value: %.2f", Param_X1X3X6_threshold, Param_X1X3X6_threshold))
+        warning(sprintf("Param[1] (X1: production store capacity [mm]) < %.2f\n X1 set to %.2f", Param_X1X3X6_threshold, Param_X1X3X6_threshold))
         Param[1L] <- Param_X1X3X6_threshold
       }
       if (Param[3L] < Param_X1X3X6_threshold) {
-        warning(sprintf("Param[3] (X3: routing store capacity [mm]) < %.2f\n New X3 value: %.2f", Param_X1X3X6_threshold, Param_X1X3X6_threshold))
+        warning(sprintf("Param[3] (X3: routing store capacity [mm]) < %.2f\n X3 set to %.2f", Param_X1X3X6_threshold, Param_X1X3X6_threshold))
         Param[3L] <- Param_X1X3X6_threshold
       }
       if (Param[6L] < Param_X1X3X6_threshold) {
-        warning(sprintf("Param[6] (X6: coefficient for emptying exponential store [mm]) < %.2f\n New X6 value: %.2f", Param_X1X3X6_threshold, Param_X1X3X6_threshold))
+        warning(sprintf("Param[6] (X6: coefficient for emptying exponential store [mm]) < %.2f\n X6 set to %.2f", Param_X1X3X6_threshold, Param_X1X3X6_threshold))
         Param[6L] <- Param_X1X3X6_threshold
       }