Index: LMDZ6/trunk/libf/dyn3d_common/infotrac.F90
===================================================================
--- LMDZ6/trunk/libf/dyn3d_common/infotrac.F90	(revision 4152)
+++ LMDZ6/trunk/libf/dyn3d_common/infotrac.F90	(revision 4153)
@@ -132,5 +132,5 @@
    INTEGER,             SAVE, ALLOCATABLE :: conv_flg(:), &     !--- Convection     activation ; needed for INCA        (nbtr)
                                               pbl_flg(:)        !--- Boundary layer activation ; needed for INCA        (nbtr)
-   LOGICAL, PARAMETER :: lOldCode = .TRUE.
+   LOGICAL, PARAMETER :: lOldCode = .FALSE.
 
 CONTAINS
Index: LMDZ6/trunk/libf/phylmdiso/isotopes_mod.F90
===================================================================
--- LMDZ6/trunk/libf/phylmdiso/isotopes_mod.F90	(revision 4152)
+++ LMDZ6/trunk/libf/phylmdiso/isotopes_mod.F90	(revision 4153)
@@ -12,5 +12,5 @@
   !--- Isotopes-specific routines are in isotopes_routines_mod to avoid circular dependencies with isotopes_verif_mod.
 
-  LOGICAL, PARAMETER :: lOldCode=.TRUE.
+  LOGICAL, PARAMETER :: lOldCode=.FALSE.
 
    !--- Isotopes indices (in [1,niso] ; non-existing => 0 index)
