--- trunk/dyn3d/groupe.f	2014/03/05 14:57:53	82
+++ trunk/dyn3d/groupe.f	2014/03/26 17:18:58	91
@@ -17,6 +17,7 @@
   USE comconst
   USE disvert_m
   USE comgeom
+  use vitvert_m, only: vitvert
 
   IMPLICIT NONE