--- trunk/dyn3d/laplacien_rot.f	2014/09/09 12:54:30	106
+++ trunk/dyn3d/laplacien_rot.f	2014/09/11 15:09:15	107
@@ -17,6 +17,8 @@
   USE paramet_m
   USE comgeom
   USE filtreg_m, ONLY: filtreg
+  use rotatf_m, only: rotatf
+
   IMPLICIT NONE
 
 
@@ -32,7 +34,7 @@
   ! ........................................................
 
 
-  CALL filtreg(rotin, jjm, klevel, 2, 1, .FALSE.)
+  CALL filtreg(rotin, direct = .true., intensive = .true.)
 
   CALL nxgrad(klevel, rotin, ghx, ghy)
   CALL rotatf(klevel, ghx, ghy, rotout)