--- trunk/libf/dyn3d/laplacien_gam.f	2011/12/12 13:25:01	55
+++ trunk/dyn3d/laplacien_gam.f	2013/11/15 18:45:49	76
@@ -13,6 +13,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