--- trunk/libf/phylmd/clvent.f	2011/01/06 17:52:19	38
+++ trunk/libf/phylmd/clvent.f	2012/01/30 12:54:02	57
@@ -3,7 +3,7 @@
      s                  d_ven,flux_v)
       use dimens_m
       use dimphy
-      use iniprint
+      use conf_gcm_m
       use SUPHEC_M
       IMPLICIT none
 c======================================================================