--- trunk/dyn3d/laplacien_rot.f	2014/09/09 12:54:30	106
+++ trunk/dyn3d/laplacien_rot.f	2018/02/05 10:39:38	254
@@ -16,7 +16,9 @@
   USE dimens_m
   USE paramet_m
   USE comgeom
-  USE filtreg_m, ONLY: filtreg
+  USE filtreg_v_m, ONLY: filtreg_v
+  use rotatf_m, only: rotatf
+
   IMPLICIT NONE
 
 
@@ -32,7 +34,7 @@
   ! ........................................................
 
 
-  CALL filtreg(rotin, jjm, klevel, 2, 1, .FALSE.)
+  CALL filtreg_v(rotin, intensive = .true.)
 
   CALL nxgrad(klevel, rotin, ghx, ghy)
   CALL rotatf(klevel, ghx, ghy, rotout)