--- trunk/libf/dyn3d/caladvtrac.f90 2011/04/13 12:29:18 44 +++ trunk/libf/dyn3d/caladvtrac.f90 2012/08/29 14:47:17 64 @@ -51,7 +51,7 @@ CALL qminimum(q, 2, finmasse) finmasse = masse - CALL filtreg(finmasse, jjm + 1, llm, -2, 2, .TRUE., 1) + CALL filtreg(finmasse, jjm + 1, llm, -2, 2, .TRUE.) ! Calcul de "dq" pour l'eau, pour le passer à la physique dtvrtrac = iapp_tracvl * dtvr