diff --git a/src/LIB/NEWLFI/src/NEWLFI_ALL.f b/src/LIB/NEWLFI/src/NEWLFI_ALL.f
index 3ce0beb2f5920bbc9297c7299f21e217f73fd80a..2daebeafbd1f6778c06c3e65cb6263a0c634ccfd 100644
--- a/src/LIB/NEWLFI/src/NEWLFI_ALL.f
+++ b/src/LIB/NEWLFI/src/NEWLFI_ALL.f
@@ -6737,6 +6737,9 @@ C
       IRANMS=0
       INBARI=0
       LLVERG=.FALSE.
+CJUAN
+      CLACTI='UNKNOWN'      
+
 C
 C        Appel legerement anticipe a LFINUM, permettant une initialisa-
 C     tion des variables globales du logiciel a la 1ere utilisation.
diff --git a/src/MNH/modd_conf.f90 b/src/MNH/modd_conf.f90
index 24c36a3c17fd89bd25768de92c28e65aa850c77a..0e793ac08e1dfeb38d215b2a84d48be526aea38d 100644
--- a/src/MNH/modd_conf.f90
+++ b/src/MNH/modd_conf.f90
@@ -67,7 +67,7 @@ LOGICAL,SAVE      :: LTHINSHELL  ! Logical for thinshell approximation
 LOGICAL,SAVE      :: LCARTESIAN  ! Logical for cartesian geometry :
                                  !  .TRUE.  = cartesian geometry 
                                  !  .FALSE. = conformal projection
-LOGICAL,SAVE      :: L2D         ! Logical for 2D model version
+LOGICAL,SAVE      :: L2D = .FALSE. ! Logical for 2D model version
                                  ! .TRUE.  = 2D model version
                                  ! .FALSE. = 3D model version
 LOGICAL,SAVE      :: L1D         ! Logical for 1D model version