--- trunk/dyn3d/enercin.f	2018/03/19 10:28:42	264
+++ trunk/dyn3d/enercin.f	2018/03/20 09:35:59	265
@@ -8,7 +8,7 @@
 
     ! From LMDZ4/libf/dyn3d/enercin.F, version 1.1.1.1 2004/05/19 12:53:06
 
-    USE dimens_m
+    USE dimensions
     USE paramet_m
     USE comgeom