--- trunk/phylmd/Radlwsw/sw1s.f	2018/02/05 10:39:38	254
+++ trunk/phylmd/Radlwsw/sw1s.f	2018/03/20 09:35:59	265
@@ -7,7 +7,7 @@
   SUBROUTINE sw1s(knu, palbd, palbp, pcg, pcld, pclear, pdsig, pomega, poz, &
        prmu, psec, ptau, pud, pfd, pfu)
     
-    USE dimens_m
+    USE dimensions
     USE dimphy
     USE raddim
     use swclr_m, only: swclr