--- trunk/dyn3d/laplacien_gam.f	2014/03/05 14:57:53	82
+++ trunk/Sources/dyn3d/laplacien_gam.f	2015/04/29 15:47:56	134
@@ -31,7 +31,7 @@
 
   ! ...........    variables  locales    .................
 
-  REAL ghy(ip1jm, llm), ghx(ip1jmp1, llm)
+  REAL ghy(ip1jm, klevel), ghx(ip1jmp1, klevel)
   ! ......................................................
 
   CALL scopy(ip1jmp1*klevel, teta, 1, divgra, 1)