Index: LMDZ5/trunk/libf/phylmd/phys_cal_mod.F90
===================================================================
--- LMDZ5/trunk/libf/phylmd/phys_cal_mod.F90	(revision 2550)
+++ LMDZ5/trunk/libf/phylmd/phys_cal_mod.F90	(revision 2551)
@@ -76,4 +76,6 @@
     year_len = ioget_year_len(year_cur)
 
+    print *,'phys_cal_update: jH_cur, hour ',jH_cur, hour
+
   END SUBROUTINE phys_cal_update
 
Index: LMDZ5/trunk/libf/phylmd/phys_output_mod.F90
===================================================================
--- LMDZ5/trunk/libf/phylmd/phys_output_mod.F90	(revision 2550)
+++ LMDZ5/trunk/libf/phylmd/phys_output_mod.F90	(revision 2551)
@@ -56,4 +56,5 @@
     include "clesphys.h"
     include "thermcell.h"
+    include "YOMCST.h"
 
     ! ug Nouveaux arguments n\'ecessaires au histwrite_mod:
@@ -263,5 +264,5 @@
      ELSE
          CALL ymds2ju(annee_ref, 1, idayref, 0.0, zjulian)
-         CALL ymds2ju(annee_ref, 1, day_ini, start_time*86400, zjulian_start)
+         CALL ymds2ju(annee_ref, 1, day_ini, start_time*rday, zjulian_start)
      END IF
 
Index: LMDZ5/trunk/libf/phylmd/phys_output_write_mod.F90
===================================================================
--- LMDZ5/trunk/libf/phylmd/phys_output_write_mod.F90	(revision 2550)
+++ LMDZ5/trunk/libf/phylmd/phys_output_write_mod.F90	(revision 2551)
@@ -331,6 +331,5 @@
 
     ! On calcul le nouveau tau:
-!!    itau_w = itau_phy + itap + start_time * day_step_phy      !! essais jyg
-    itau_w = itau_phy + itap                                    !! essais jyg
+    itau_w = itau_phy + itap 
     ! On le donne à iophy pour que les histwrite y aient accès:
     CALL set_itau_iophy(itau_w)
Index: LMDZ5/trunk/libf/phylmd/time_phylmdz_mod.F90
===================================================================
--- LMDZ5/trunk/libf/phylmd/time_phylmdz_mod.F90	(revision 2550)
+++ LMDZ5/trunk/libf/phylmd/time_phylmdz_mod.F90	(revision 2551)
@@ -83,4 +83,5 @@
   USE print_control_mod, ONLY: lunout
   IMPLICIT NONE
+  INCLUDE 'YOMCST.h'
     REAL,INTENT(IN) :: pdtphys_
     REAL            :: julian_date
@@ -94,8 +95,9 @@
     
     ! Update elapsed time since begining of run:
-    current_time=current_time+pdtphys/86400
+    current_time=current_time+pdtphys/rday
+       print *,'update_time: start_time, current_time ', start_time, current_time
 
     ! Compute corresponding Julian date and update calendar
-    CALL ymds2ju(annee_ref,1,day_ini,(start_time+current_time)*86400,julian_date)
+    CALL ymds2ju(annee_ref,1,day_ini,(start_time+current_time)*rday,julian_date)
     CALL phys_cal_update(julian_date)