Index: LMDZ4/trunk/libf/phylmd/cpl_mod.F90
===================================================================
--- LMDZ4/trunk/libf/phylmd/cpl_mod.F90	(revision 1009)
+++ LMDZ4/trunk/libf/phylmd/cpl_mod.F90	(revision 1010)
@@ -311,7 +311,7 @@
        time_sec=(itime-1)*dtime
 #ifdef CPP_COUPLE
-    il_time_secs=(itime-1)*dtime
+    time_sec=(itime-1)*dtime
 !$OMP MASTER
-    CALL fromcpl(il_time_secs, tab_read_flds)
+    CALL fromcpl(time_sec, tab_read_flds)
 !$OMP END MASTER
 #endif
@@ -1165,7 +1165,7 @@
     time_sec=(itime-1)*dtime
 #ifdef CPP_COUPLE
-    il_time_secs=(itime-1)*dtime
+    time_sec=(itime-1)*dtime
 !$OMP MASTER
-    CALL intocpl(il_time_secs, lafin, tab_flds(:,:,:))
+    CALL intocpl(time_sec, lafin, tab_flds(:,:,:))
 !$OMP END MASTER
 #endif