--- trunk/dyn3d/groupe.f90	2013/11/15 18:45:49	76
+++ 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