--- trunk/phylmd/Radlwsw/swr.f	2018/02/05 10:39:38	254
+++ trunk/phylmd/Radlwsw/swr.f	2018/03/20 09:35:59	265
@@ -7,7 +7,7 @@
   SUBROUTINE swr(knu, palbd, pcg, pcld, pomega, psec, ptau, &
        pcgaz, ppizaz, pray1, pray2, prefz, prj, prk, prmue, ptauaz, ptra1, &
        ptra2)
-    USE dimens_m
+    USE dimensions
     USE dimphy
     USE raddim
     USE radepsi