--- trunk/Sources/phylmd/CV3_routines/cv3_prelim.f	2015/04/29 15:47:56	134
+++ trunk/Sources/phylmd/CV30_routines/cv30_prelim.f	2016/04/14 15:15:56	190
@@ -1,13 +1,13 @@
-module cv3_prelim_m
+module cv30_prelim_m
 
   implicit none
 
 contains
 
-  SUBROUTINE cv3_prelim(len, nd, ndp1, t, q, p, ph, lv, cpn, tv, gz, h, hm, th)
+  SUBROUTINE cv30_prelim(len, nd, ndp1, t, q, p, ph, lv, cpn, tv, gz, h, hm, th)
 
-    USE cv3_param_m, ONLY: nl
-    USE cvthermo, ONLY: cl, clmcpv, cpd, cpv, eps, lv0, rrd, rrv
+    USE cv30_param_m, ONLY: nl
+    USE cv_thermo_m, ONLY: cl, clmcpv, cpd, cpv, eps, lv0, rrd, rrv
 
     ! Calculate arrays of geopotential, heat capacity and static energy
 
@@ -65,6 +65,6 @@
        end do
     end do
 
-  end SUBROUTINE cv3_prelim
+  end SUBROUTINE cv30_prelim
 
-end module cv3_prelim_m
+end module cv30_prelim_m