diff --git a/sources/mascaret/Modules/m_message_c.f90 b/sources/mascaret/Modules/m_message_c.f90
index 8f6b01e9ef0884ae77815da64c76b0565f5995f6..ff3959ebdb1a7fb7b8f82574163e52840fa8bbd7 100644
--- a/sources/mascaret/Modules/m_message_c.f90
+++ b/sources/mascaret/Modules/m_message_c.f90
@@ -1232,7 +1232,7 @@ err_366c = '("The parameter value for the dissipation zone is not between",&
 character (*), parameter ::                                                &
 err_367  = '("Error with the parameters file.",/,      &
            & "Dissipation zones.",/,                      &
-           & "The reahc number of the dissipation zone # ",i3," is not positive.")'
+           & "The reach number of the dissipation zone # ",i3," is not positive.")'
 character (*), parameter ::                                                &
 err_367c = '("Reach number of the dissipation zone # ",i3," is <= 0")'
 !-------------------------------------------------------------------------
@@ -1240,10 +1240,10 @@ character (*), parameter ::                                                &
 err_368  = '("Error with the parameters file.",/,      &
            & "Singularities.",/,                             &
            & "The type of the singularity # ",i3," = ",i3,/,               &
-           & "is not compatible with the steady kernel.")'
+           & "is not compatible with the kernel ",i1)'
 character (*), parameter ::                                                &
 err_368c = '("Type of the singularity # ",i3," = ",i3," is not compatible with",&
-           & " the steady kernel")'
+           & " the kernel ",i1)'
 !-------------------------------------------------------------------------
 character (*), parameter ::                                                &
 err_369  = '("Error with the parameters file : ",A,".",/,                          &
diff --git a/sources/mascaret/Pretrait/lec_sing.f90 b/sources/mascaret/Pretrait/lec_sing.f90
index 048ee0714a5691eec0064f1dacaf2e93b64d587c..08110e4a8c8bcc764c7163718c79a18462a43ff7 100644
--- a/sources/mascaret/Pretrait/lec_sing.f90
+++ b/sources/mascaret/Pretrait/lec_sing.f90
@@ -574,7 +574,7 @@ subroutine LEC_SING(    &
             Erreur%Numero = 368
             Erreur%ft     = err_368
             Erreur%ft_c   = err_368c
-            call TRAITER_ERREUR( Erreur , ising , Singularite(ising)%Type )
+            call TRAITER_ERREUR( Erreur , ising , Singularite(ising)%Type , NOYAU_MASCARET )
             return
          end if
 
@@ -582,7 +582,7 @@ subroutine LEC_SING(    &
             Erreur%Numero = 368
             Erreur%ft     = err_368
             Erreur%ft_c   = err_368c
-            call TRAITER_ERREUR( Erreur , ising , Singularite(ising)%Type )
+            call TRAITER_ERREUR( Erreur , ising , Singularite(ising)%Type , NOYAU_MASCARET )
             return
          end if
 
@@ -590,7 +590,7 @@ subroutine LEC_SING(    &
             Erreur%Numero = 368
             Erreur%ft     = err_368
             Erreur%ft_c   = err_368c
-            call TRAITER_ERREUR( Erreur , ising , Singularite(ising)%Type )
+            call TRAITER_ERREUR( Erreur , ising , Singularite(ising)%Type , NOYAU_MASCARET )
             return
          end if
 
@@ -598,7 +598,7 @@ subroutine LEC_SING(    &
             Erreur%Numero = 368
             Erreur%ft     = err_368
             Erreur%ft_c   = err_368c
-            call TRAITER_ERREUR( Erreur , ising , Singularite(ising)%Type )
+            call TRAITER_ERREUR( Erreur , ising , Singularite(ising)%Type , NOYAU_MASCARET )
             return
          end if