--- trunk/libf/phylmd/nflxtr.f	2011/01/06 17:52:19	38
+++ trunk/libf/phylmd/nflxtr.f	2012/07/26 14:37:37	62
@@ -28,7 +28,10 @@
       REAL, intent(in):: pdtime
 c--les flux sont definis au 1/2 niveaux
 c--pmfu(klev+1) et pmfd(klev+1) sont implicitement nuls
-      REAL pmfu(klon,klev)  ! flux de masse dans le panache montant 
+
+      REAL, intent(in):: pmfu(klon,klev) 
+!     flux de masse dans le panache montant 
+
       REAL pmfd(klon,klev)  ! flux de masse dans le panache descendant
       REAL pen_u(klon,klev) ! flux entraine dans le panache montant
       REAL pde_u(klon,klev) ! flux detraine dans le panache montant