--- trunk/phylmd/Radlwsw/lwv.f	2018/02/05 10:39:38	254
+++ trunk/phylmd/Radlwsw/lwv.f	2018/03/20 09:35:59	265
@@ -7,7 +7,7 @@
   SUBROUTINE lwv(kuaer, ktraer, klim, pabcu, pb, pbint, pbsuin, pbsur, pbtop, &
        pdbsl, pemis, ppmb, pga, pgb, pgasur, pgbsur, pgatop, pgbtop, &
        pcntrb, pcts, pfluc)
-    USE dimens_m
+    USE dimensions
     USE dimphy
     use lwvd_m, only: lwvd
     use lwvn_m, only: lwvn