--- trunk/dyn3d/laplacien_rot.f 2014/09/11 15:09:15 107 +++ trunk/dyn3d/laplacien_rot.f 2018/02/05 10:39:38 254 @@ -16,7 +16,7 @@ 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 @@ -34,7 +34,7 @@ ! ........................................................ - CALL filtreg(rotin, direct = .true., intensive = .true.) + CALL filtreg_v(rotin, intensive = .true.) CALL nxgrad(klevel, rotin, ghx, ghy) CALL rotatf(klevel, ghx, ghy, rotout)