--- trunk/dyn3d/laplacien.f 2014/09/09 12:54:30 106 +++ trunk/dyn3d/laplacien.f 2014/09/11 15:09:15 107 @@ -24,7 +24,7 @@ !----------------------------------------------------------------- - CALL filtreg(teta, jjp1, klevel, 2, 1, .TRUE.) + CALL filtreg(teta, direct = .true., intensive = .true.) CALL grad(klevel, teta, ghx, ghy) CALL divergf(klevel, ghx, ghy, teta)