--- trunk/libf/bibio/initdynav.f90	2012/01/30 14:37:26	60
+++ trunk/libf/bibio/initdynav.f90	2012/04/20 14:58:43	61
@@ -17,7 +17,10 @@
     USE comvert, ONLY : nivsigs
     USE comgeom, ONLY : rlatu, rlonv
     USE dimens_m, ONLY : llm
-    USE histcom, ONLY: histbeg_totreg, histdef, histend, histvert
+    USE histbeg_totreg_m, ONLY : histbeg_totreg
+    USE histdef_m, ONLY : histdef
+    USE histend_m, ONLY : histend
+    USE histvert_m, ONLY : histvert
     USE iniadvtrac_m, ONLY : ttext
     USE nr_util, ONLY : pi
     USE paramet_m, ONLY : iip1, jjp1