--- trunk/phylmd/Radlwsw/swde.f	2018/02/05 10:39:38	254
+++ trunk/phylmd/Radlwsw/swde.f	2018/03/20 09:35:59	265
@@ -5,7 +5,7 @@
 contains
 
   SUBROUTINE swde(pgg, pref, prmuz, pto1, pw, pre1, pre2, ptr1, ptr2)
-    USE dimens_m
+    USE dimensions
     USE dimphy
     USE raddim
     ! ------------------------------------------------------------------