--- trunk/libf/dyn3d/iniprint.f90	2008/02/27 13:16:39	3
+++ trunk/libf/dyn3d/iniprint.f90	2008/07/21 16:05:07	12
@@ -4,17 +4,13 @@
 
   implicit none
 
-  INTEGER:: lunout = 6
-  ! (unité du fichier dans lequel se font les sorties, par défaut la
-  ! sortie standard)
-
   integer:: prt_level = 0 ! niveau d'impression souhaité (0 = minimum)
 
 contains
 
   subroutine read_iniprint
 
-    namelist /iniprint_nml/lunout, prt_level
+    namelist /iniprint_nml/prt_level
 
     !-------------------------------------------------