--- trunk/dyn3d/flumass.f	2018/03/19 10:28:42	264
+++ trunk/dyn3d/flumass.f	2018/03/20 09:35:59	265
@@ -12,7 +12,7 @@
     ! Objet: calcul du flux de masse aux niveaux s 
 
     USE comgeom, ONLY: aire, aireu
-    USE dimens_m, ONLY: iim, llm
+    USE dimensions, ONLY: iim, llm
     USE paramet_m, ONLY: iip1, iip2, ip1jm, ip1jmi1, ip1jmp1
 
     REAL, intent(in):: massebx(ip1jmp1, llm), masseby(ip1jm, llm)