Index: /trunk/LMDZ.COMMON/libf/phy_common/init_print_control_mod.F90
===================================================================
--- /trunk/LMDZ.COMMON/libf/phy_common/init_print_control_mod.F90	(revision 1790)
+++ /trunk/LMDZ.COMMON/libf/phy_common/init_print_control_mod.F90	(revision 1791)
@@ -7,12 +7,13 @@
 
   SUBROUTINE init_print_control
-  USE print_control_mod, ONLY : set_print_control
+  USE print_control_mod, ONLY : set_print_control, &
+                                prt_level, lunout, debug 
   USE ioipsl_getin_p_mod, ONLY : getin_p
   USE mod_phys_lmdz_para, ONLY: is_omp_root, is_master
   IMPLICIT NONE
 
-    INTEGER :: lunout ! default output file identifier (6==screen)
-    INTEGER :: prt_level ! Output level
-    LOGICAL :: debug ! flag to specify if in "debug mode"
+!    INTEGER :: lunout ! default output file identifier (6==screen)
+!    INTEGER :: prt_level ! Output level
+!    LOGICAL :: debug ! flag to specify if in "debug mode"
     LOGICAL :: opened
     INTEGER :: number