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