--- trunk/libf/dyn3d/advyp.f	2012/09/20 09:57:03	65
+++ trunk/libf/dyn3d/advyp.f	2012/09/20 13:00:41	66
@@ -6,7 +6,7 @@
       use dimens_m
       use comconst
       use paramet_m
-      use comvert
+      use disvert_m
       use comgeom
       IMPLICIT NONE
 CCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCC