--- trunk/libf/dyn3d/groupe.f90	2010/04/01 14:59:19	31
+++ trunk/dyn3d/groupe.f90	2013/11/15 18:45:49	76
@@ -15,7 +15,7 @@
   USE dimens_m
   USE paramet_m
   USE comconst
-  USE comvert
+  USE disvert_m
   USE comgeom
 
   IMPLICIT NONE