--- trunk/libf/bibio/initfluxsto.f90	2012/04/20 14:58:43	61
+++ trunk/libf/bibio/initfluxsto.f90	2012/09/20 13:00:41	66
@@ -33,7 +33,7 @@
   USE dimens_m
   USE paramet_m
   USE comconst
-  USE comvert
+  USE disvert_m
   use conf_gcm_m
   USE comgeom
   USE serre