--- trunk/Sources/phylmd/CV30_routines/cv30_prelim.f	2016/03/16 15:04:46	185
+++ trunk/Sources/phylmd/CV30_routines/cv30_prelim.f	2016/04/14 15:15:56	190
@@ -7,7 +7,7 @@
   SUBROUTINE cv30_prelim(len, nd, ndp1, t, q, p, ph, lv, cpn, tv, gz, h, hm, th)
 
     USE cv30_param_m, ONLY: nl
-    USE cvthermo, ONLY: cl, clmcpv, cpd, cpv, eps, lv0, rrd, rrv
+    USE cv_thermo_m, ONLY: cl, clmcpv, cpd, cpv, eps, lv0, rrd, rrv
 
     ! Calculate arrays of geopotential, heat capacity and static energy