--- trunk/libf/dyn3d/laplacien.f	2012/01/30 13:04:08	59
+++ trunk/libf/dyn3d/laplacien.f	2012/01/30 14:37:26	60
@@ -11,6 +11,7 @@
 c     klevel et teta  sont des arguments  d'entree pour le s-prog
 c      divgra     est  un argument  de sortie pour le s-prog
 c
+      use grad_m, only: grad
       use dimens_m
       use paramet_m
       use comgeom