--- trunk/libf/phylmd/calbeta.f	2012/01/10 19:02:02	56
+++ trunk/libf/phylmd/calbeta.f	2012/01/30 12:54:02	57
@@ -3,7 +3,7 @@
       use dimens_m
       use indicesol
       use dimphy
-      use iniprint
+      use conf_gcm_m
       use SUPHEC_M
       IMPLICIT none
 c======================================================================