--- trunk/Sources/phylmd/phyredem0.f	2016/06/06 17:42:15	201
+++ trunk/Sources/phylmd/phyredem0.f	2016/06/08 12:23:41	202
@@ -6,7 +6,7 @@
 
 contains
 
-  SUBROUTINE phyredem0(lmt_pas)
+  SUBROUTINE phyredem0
 
     ! From phylmd/phyredem.F, version 1.3, 2005/05/25 13:10:09
     ! Author: Z. X. Li (LMD/CNRS)
@@ -15,7 +15,7 @@
     ! Objet : \'ecriture de l'\'etat de d\'emarrage ou red\'emarrage
     ! pour la physique
 
-    use conf_gcm_m, only: nday
+    use conf_gcm_m, only: nday, lmt_pas
     USE dimphy, ONLY: klev, klon
     USE dimsoil, ONLY: nsoilmx
     USE indicesol, ONLY: nbsrf
@@ -24,8 +24,6 @@
          nf95_def_var, nf95_enddef, nf95_put_var
     use phyetat0_m, only: rlat, rlon, itau_phy
 
-    INTEGER, intent(in):: lmt_pas ! number of time steps of "physics" per day
-
     ! Local:
 
     INTEGER idim2, idim3, dimid_nbsrf, dimid_nsoilmx