--- trunk/Sources/dyn3d/conf_gcm.f	2016/05/09 19:56:28	191
+++ trunk/Sources/dyn3d/conf_gcm.f	2016/06/08 12:23:41	202
@@ -41,6 +41,8 @@
   ! 1 : physique normale (appel \`a phylmd, phymars...) (default)
   ! 2 : rappel Newtonien pour la temp\'erature + friction au sol
 
+  INTEGER, SAVE:: lmt_pas ! number of time steps of "physics" per day
+
 contains
 
   SUBROUTINE conf_gcm
@@ -80,6 +82,9 @@
     IF (MOD(day_step, iphysiq)/= 0) call abort_gcm("conf_gcm", &
          'Il faut choisir un nombre de pas par jour multiple de "iphysiq".')
 
+    lmt_pas = day_step / iphysiq
+    print *, 'Number of time steps of "physics" per day: ', lmt_pas
+
   END SUBROUTINE conf_gcm
 
 end module conf_gcm_m