Index: LMDZ6/trunk/libf/phylmd/ch4n2o_correction_mod.F90
===================================================================
--- LMDZ6/trunk/libf/phylmd/ch4n2o_correction_mod.F90	(revision 5912)
+++ LMDZ6/trunk/libf/phylmd/ch4n2o_correction_mod.F90	(revision 5913)
@@ -150,4 +150,5 @@
     INTEGER           :: ibuf(4), mode_code
 
+    ghg_mode = 'identity'
     mode_in = ghg_mode
     CALL getin_p('ghg_mode',            mode_in)
Index: LMDZ6/trunk/libf/phylmd/paramlmdz_phy_mod.F90
===================================================================
--- LMDZ6/trunk/libf/phylmd/paramlmdz_phy_mod.F90	(revision 5912)
+++ LMDZ6/trunk/libf/phylmd/paramlmdz_phy_mod.F90	(revision 5913)
@@ -72,5 +72,5 @@
 
 !--PC Provide the record time step to IOIPSL (silences INTENT(OUT) warning)
-       dtime = zstophy
+!       dtime = zstophy
        CALL histbeg("paramLMDZ_phy.nc",  &
                        np,zx_lon(np:np,1), np,zx_lat(1,np:np), &
Index: LMDZ6/trunk/libf/phylmd/physiq_mod.F90
===================================================================
--- LMDZ6/trunk/libf/phylmd/physiq_mod.F90	(revision 5912)
+++ LMDZ6/trunk/libf/phylmd/physiq_mod.F90	(revision 5913)
@@ -2024,4 +2024,5 @@
        IF (phys_tstep*REAL(radpas).GT.21600..AND.iflag_cycle_diurne.GE.1) THEN
           WRITE(lunout,*)'Nbre d appels au rayonnement insuffisant'
+          WRITE(lunout,*)'phys_tstep =', phys_tstep, radpas, iflag_cycle_diurne
           WRITE(lunout,*)"Au minimum 4 appels par jour si cycle diurne"
           abort_message='Nbre d appels au rayonnement insuffisant'
Index: LMDZ6/trunk/libf/phylmdiso/ch4n2o_correction_mod.F90
===================================================================
--- LMDZ6/trunk/libf/phylmdiso/ch4n2o_correction_mod.F90	(revision 5913)
+++ LMDZ6/trunk/libf/phylmdiso/ch4n2o_correction_mod.F90	(revision 5913)
@@ -0,0 +1,1 @@
+link ../phylmd/ch4n2o_correction_mod.F90