--- trunk/libf/dyn3d/integrd.f90	2012/01/30 12:54:02	57
+++ trunk/libf/dyn3d/integrd.f90	2013/07/08 18:12:18	71
@@ -11,12 +11,14 @@
     ! Author: P. Le Van 
     ! Objet: incrémentation des tendances dynamiques
 
-    USE comvert, ONLY : ap, bp
     USE comgeom, ONLY : aire, apoln, apols
     USE dimens_m, ONLY : iim, jjm, llm
+    USE disvert_m, ONLY : ap, bp
     USE filtreg_m, ONLY : filtreg
+    use massdair_m, only: massdair
     use nr_util, only: assert
     USE paramet_m, ONLY : iip1, iip2, ip1jm, ip1jmp1, jjp1, llmp1
+    use qminimum_m, only: qminimum
 
     ! Arguments: 
 
@@ -100,7 +102,7 @@
     CALL massdair(p, masse)
 
     finvmasse = masse
-    CALL filtreg(finvmasse, jjp1, llm, -2, 2, .TRUE., 1)
+    CALL filtreg(finvmasse, jjp1, llm, -2, 2, .TRUE.)
 
     ! integration de ucov, vcov, h