--- trunk/dyn3d/grad.f	2018/03/19 10:28:42	264
+++ trunk/dyn3d/grad.f	2018/03/20 09:35:59	265
@@ -11,7 +11,7 @@
 
     ! Calcul des composantes covariantes en x et y du gradient de g.
 
-    USE dimens_m, ONLY: iim, jjm
+    USE dimensions, ONLY: iim, jjm
 
     INTEGER, intent(in):: klevel
     REAL, intent(in):: g(iim + 1, jjm + 1, klevel)