--- trunk/Sources/phylmd/Radlwsw/sw2s.f	2017/03/30 15:59:45	219
+++ trunk/phylmd/Radlwsw/sw2s.f90	2019/06/13 14:40:06	328
@@ -7,7 +7,7 @@
   SUBROUTINE sw2s(knu, paki, palbd, palbp, pcg, pcld, pclear, pdsig, pomega, &
        poz, prmu, psec, ptau, pud, pwv, pqs, pfdown, pfup)
     
-    USE dimens_m
+    USE dimensions
     USE dimphy
     USE raddim
     USE radepsi