--- trunk/libf/phylmd/conf_phys.f90	2008/02/27 13:16:39	3
+++ trunk/libf/phylmd/conf_phys.f90	2008/07/21 16:05:07	12
@@ -43,7 +43,7 @@
     ! bl95_b*: parameters in the formula to link CDNC to aerosol mass conc 
 
     ! Sortie:
-    character (len = 6)  :: ocean
+    character(len=*), intent(out):: ocean
     logical              :: ok_veget, ok_newmicro
     logical              :: ok_journe, ok_mensuel, ok_instan        
     LOGICAL              :: ok_ade, ok_aie
@@ -64,7 +64,7 @@
     !Config Key  = OCEAN 
     !Config Desc = Type d'ocean
     !Config Def  = force
-    !Config Help = Type d'ocean utilise: force, slab,couple
+    !Config Help = Type d'ocean utilise: force ou slab mais pas couple
     !
     ocean = 'force '
     call getin('OCEAN', ocean)
@@ -698,7 +698,6 @@
     bug_ozone = .false.
     call getin('bug_ozone',bug_ozone)
 
-
     write(numout,*)' *********'
     write(numout,*)' Configuration des parametres de la physique: '
     write(numout,*)' Config ocean = ', ocean