Index: LMDZ5/trunk/libf/dyn3d/calfis.F
===================================================================
--- LMDZ5/trunk/libf/dyn3d/calfis.F	(revision 1675)
+++ LMDZ5/trunk/libf/dyn3d/calfis.F	(revision 1676)
@@ -507,5 +507,5 @@
      .             debut_split,    !! firstcall 
      .             lafin_split,    !! lastcall
-     .             float(day_ini), !! pday <-- day_ini (dans temps.h)
+     .             jD_cur,         !! pday. see leapfrog
      .             jH_cur_split,   !! ptime "fraction of day"
      .             zdt_split,      !! ptimestep
Index: LMDZ5/trunk/libf/dyn3d/leapfrog.F
===================================================================
--- LMDZ5/trunk/libf/dyn3d/leapfrog.F	(revision 1675)
+++ LMDZ5/trunk/libf/dyn3d/leapfrog.F	(revision 1676)
@@ -383,4 +383,10 @@
            jD_cur = jD_ref + day_ini - day_ref +                        &
      &          itau/day_step
+
+           IF (planet_type .eq."generic") THEN
+              ! AS: we make jD_cur to be pday
+              jD_cur = int(day_ini + itau/day_step)
+           ENDIF
+
            jH_cur = jH_ref + start_time +                               &
      &              mod(itau,day_step)/float(day_step) 
Index: LMDZ5/trunk/libf/dyn3dmem/calfis_loc.F
===================================================================
--- LMDZ5/trunk/libf/dyn3dmem/calfis_loc.F	(revision 1675)
+++ LMDZ5/trunk/libf/dyn3dmem/calfis_loc.F	(revision 1676)
@@ -725,5 +725,5 @@
      .             debut_split,    !! firstcall 
      .             lafin_split,    !! lastcall
-     .             float(day_ini), !! pday <-- day_ini (dans temps.h)
+     .             jD_cur,         !! pday. see leapfrog_p 
      .             jH_cur_split,   !! ptime "fraction of day"
      .             zdt_split,      !! ptimestep
Index: LMDZ5/trunk/libf/dyn3dmem/call_calfis_mod.F90
===================================================================
--- LMDZ5/trunk/libf/dyn3dmem/call_calfis_mod.F90	(revision 1675)
+++ LMDZ5/trunk/libf/dyn3dmem/call_calfis_mod.F90	(revision 1676)
@@ -138,4 +138,10 @@
            jD_cur = jD_ref + day_ini - day_ref                           &
      &        + itau/day_step
+
+           IF (planet_type .eq."generic") THEN
+              ! AS: we make jD_cur to be pday
+              jD_cur = int(day_ini + itau/day_step)
+           ENDIF
+
            jH_cur = jH_ref + start_time +                                &
      &              mod(itau,day_step)/float(day_step) 
Index: LMDZ5/trunk/libf/dyn3dpar/calfis_p.F
===================================================================
--- LMDZ5/trunk/libf/dyn3dpar/calfis_p.F	(revision 1675)
+++ LMDZ5/trunk/libf/dyn3dpar/calfis_p.F	(revision 1676)
@@ -684,5 +684,5 @@
      .             debut_split,    !! firstcall 
      .             lafin_split,    !! lastcall
-     .             float(day_ini), !! pday <-- day_ini (dans temps.h)
+     .             jD_cur,         !! pday. see leapfrog_p 
      .             jH_cur_split,   !! ptime "fraction of day"
      .             zdt_split,      !! ptimestep
Index: LMDZ5/trunk/libf/dyn3dpar/leapfrog_p.F
===================================================================
--- LMDZ5/trunk/libf/dyn3dpar/leapfrog_p.F	(revision 1675)
+++ LMDZ5/trunk/libf/dyn3dpar/leapfrog_p.F	(revision 1676)
@@ -710,4 +710,10 @@
            jD_cur = jD_ref + day_ini - day_ref
      $        + itau/day_step
+
+           IF (planet_type .eq."generic") THEN
+              ! AS: we make jD_cur to be pday
+              jD_cur = int(day_ini + itau/day_step)
+           ENDIF
+
            jH_cur = jH_ref + start_time +                                &
      &              mod(itau,day_step)/float(day_step)