--- trunk/libf/dyn3d/conf_gcm.f90	2008/07/25 19:59:34	13
+++ trunk/libf/dyn3d/conf_gcm.f90	2010/03/05 16:43:45	25
@@ -18,25 +18,24 @@
   ! frequence du groupement des flux (en pas de temps) 
 
   integer:: iconser= 240
-  ! periode de sortie des variables de controle
-  ! (En pas de temps)
+  ! période de sortie des variables de contrôle (en pas de temps)
 
   integer:: iecri= 1 ! période d'écriture du fichier "dyn_hist.nc" (en jours)
 
   integer:: idissip= 10 ! periode de la dissipation (en pas)
 
   integer:: iphysiq= 5
-  ! Help = Periode de la physique en pas de temps de la dynamique.
+  ! Période de la physique en pas de temps de la dynamique.
 
   integer:: dayref = 1 ! jour de l'année de l'état initial
   ! (= 350 si 20 décembre par exemple)
 
   integer:: anneeref = 1998 ! Annee de l'etat initial (avec 4 chiffres)
 
-  integer:: raz_date = 0 ! Remise a zero de la date initiale
-  ! 0 pas de remise a zero, on garde la date du fichier restart
-  ! 1 prise en compte de la date de gcm.def avec remise a zero
-  ! des compteurs de pas de temps
+  logical:: raz_date = .false.
+  ! (remise a zero de la date initiale, prise en compte de la date de
+  ! gcm.def avec remise a zero des compteurs de pas de temps)
+  ! (pas de remise a zero: on garde la date du fichier restart)
 
   REAL:: periodav= 1.
   ! periode de stockage fichier histmoy (en jour)