--- trunk/libf/phylmd/conflx.f	2011/01/06 17:52:19	38
+++ trunk/libf/phylmd/conflx.f	2011/09/20 09:14:34	51
@@ -25,7 +25,7 @@
       REAL, intent(in):: dtime            ! pas d'integration (s)
       REAL, intent(in):: pres_h(klon,klev+1) ! pression half-level (Pa)
       REAL, intent(in):: pres_f(klon,klev)! pression full-level (Pa)
-      REAL t(klon,klev)     ! temperature (K)
+      REAL, intent(in):: t(klon,klev)     ! temperature (K)
       REAL q(klon,klev)     ! humidite specifique (g/g)
       REAL w(klon,klev)     ! vitesse verticale (Pa/s)
       REAL con_t(klon,klev) ! convergence de temperature (K/s)