--- trunk/libf/phylmd/CV3_routines/cv3_undilute1.f90	2012/11/14 16:59:30	68
+++ trunk/libf/phylmd/CV3_routines/cv3_undilute1.f90	2013/02/18 16:33:12	69
@@ -1,7 +1,7 @@
 
       SUBROUTINE cv3_undilute1(len,nd,t,q,qs,gz,plcl,p,nk,icb &
                              ,tp,tvp,clw,icbs)
-            use cvparam3
+            use cv3_param_m
             use cvthermo
       implicit none