--- trunk/libf/phylmd/phytrac.f90 2012/07/26 14:37:37 62 +++ trunk/phylmd/phytrac.f90 2013/11/15 18:45:49 76 @@ -84,8 +84,12 @@ REAL prfl(klon, llm+1), psfl(klon, llm+1) !--lessivage large-scale ! convection: + REAL, intent(in):: pmfu(klon, llm) ! flux de masse dans le panache montant - REAL pmfd(klon, llm) ! flux de masse dans le panache descendant + + REAL, intent(in):: pmfd(klon, llm) + ! flux de masse dans le panache descendant + REAL pen_u(klon, llm) ! flux entraine dans le panache montant ! thermiques: