--- trunk/dyn3d/inithist.f	2018/03/19 10:28:42	264
+++ trunk/dyn3d/inithist.f	2018/03/20 09:35:59	265
@@ -15,7 +15,7 @@
     ! format IOIPSL.
 
     use comconst, only: dtvr
-    USE dimens_m, ONLY: jjm, llm, nqmx
+    USE dimensions, ONLY: jjm, llm, nqmx
     USE disvert_m, ONLY: presnivs
     use dynetat0_m, only: day_ref, annee_ref, rlatu, rlatv, rlonu, rlonv
     use histbeg_totreg_m, only: histbeg_totreg