--- trunk/dyn3d/groupe.f	2014/03/05 14:57:53	82
+++ trunk/Sources/dyn3d/groupe.f	2015/04/29 15:47:56	134
@@ -17,6 +17,7 @@
   USE comconst
   USE disvert_m
   USE comgeom
+  use vitvert_m, only: vitvert
 
   IMPLICIT NONE