diff --git a/src/LIB/SURCOUCHE/src/modd_structure_ll.f90 b/src/LIB/SURCOUCHE/src/modd_structure_ll.f90
index 570dcba7e58e2f18d20d042d9a67b977355d11f6..f2ce9fe5c21b8c436db2714c36eec256cf8beb8e 100644
--- a/src/LIB/SURCOUCHE/src/modd_structure_ll.f90
+++ b/src/LIB/SURCOUCHE/src/modd_structure_ll.f90
@@ -1,11 +1,11 @@
-!MNH_LIC Copyright 1994-2018 CNRS, Meteo-France and Universite Paul Sabatier
+!MNH_LIC Copyright 1998-2019 CNRS, Meteo-France and Universite Paul Sabatier
 !MNH_LIC This is part of the Meso-NH software governed by the CeCILL-C licence
-!MNH_LIC version 1. See LICENSE, CeCILL-C_V1-en.txt and CeCILL-C_V1-fr.txt  
+!MNH_LIC version 1. See LICENSE, CeCILL-C_V1-en.txt and CeCILL-C_V1-fr.txt
 !MNH_LIC for details. version 1.
 !-----------------------------------------------------------------
-!      ########################
-       MODULE MODD_STRUCTURE_ll
-!      ########################
+!#######################
+MODULE MODD_STRUCTURE_ll
+!#######################
 !
 !!****  *MODD_STRUCTURE_lll* - declaration of parallel structure
 !
@@ -45,10 +45,12 @@
 !
 !-------------------------------------------------------------------------------
 !
-  USE MODD_ARGSLIST_ll,   ONLY : LIST_ll
-  USE MODD_PARAMETERS,    ONLY : NNEGUNDEF
-  USE MODD_PARAMETERS_ll, ONLY : NMAXRIM
-!
+USE MODD_ARGSLIST_ll,   ONLY : LIST_ll
+USE MODD_PARAMETERS,    ONLY : NNEGUNDEF
+USE MODD_PARAMETERS_ll, ONLY : NMAXRIM
+
+implicit none
+
 !-------------------------------------------------------------------------------
 !
 ! Routines for allocation of structured types
diff --git a/src/MNH/ini_modeln.f90 b/src/MNH/ini_modeln.f90
index e195ef60395124e0e0c8dc1fbe07fcd75c2d0f72..d9b1a256ea8caa640edca701c3299957c02152c1 100644
--- a/src/MNH/ini_modeln.f90
+++ b/src/MNH/ini_modeln.f90
@@ -343,7 +343,7 @@ USE MODD_VAR_ll,        ONLY : IP
 !
 USE MODD_STAND_ATM,     ONLY : XSTROATM, XSMLSATM, XSMLWATM, XSPOSATM, XSPOWATM
 USE MODD_CH_MNHC_n, ONLY : LUSECHEM, LUSECHAQ, LUSECHIC, LCH_INIT_FIELD, &
-                           CCHEM_INPUT_FILE, LCH_CONV_LINOX,             &
+                           LCH_CONV_LINOX,             &
                            XCH_TUV_DOBNEW, LCH_PH, CSPEC_BUDGET, CSPEC_PRODLOSS
 USE MODD_CH_PH_n
 USE MODD_CH_AEROSOL, ONLY : LORILAM
diff --git a/src/MNH/ini_spectren.f90 b/src/MNH/ini_spectren.f90
index c3dd25be2798322536353b291f733f4676953731..bc70618f2fb802ab10c0af6d9766073f09889e71 100644
--- a/src/MNH/ini_spectren.f90
+++ b/src/MNH/ini_spectren.f90
@@ -48,7 +48,7 @@ USE MODD_BUDGET
 USE MODD_CH_AERO_n,     ONLY: XSOLORG,XMI
 USE MODD_CH_AEROSOL,    ONLY: LORILAM
 USE MODD_CH_MNHC_n,     ONLY: LUSECHEM, LUSECHAQ, LUSECHIC, LCH_INIT_FIELD, &
-                              CCHEM_INPUT_FILE, LCH_CONV_LINOX,             &
+                              LCH_CONV_LINOX,             &
                               XCH_TUV_DOBNEW, LCH_PH
 USE MODD_CH_PH_n
 USE MODD_CLOUD_MF_n