--- trunk/dyn3d/principal_cshift.f	2018/03/19 10:28:42	264
+++ trunk/dyn3d/principal_cshift.f	2018/03/20 09:35:59	265
@@ -10,7 +10,7 @@
     ! so that xlon is in ascending order. Make the same cshift on
     ! xprimm.
 
-    USE dimens_m, ONLY: iim
+    USE dimensions, ONLY: iim
     use dynetat0_m, only: clon
     use nr_util, only: twopi