* * $Id: gutrev.F,v 1.1.1.1 1995/10/24 10:22:21 cernlib Exp $ * * $Log: gutrev.F,v $ * Revision 1.1.1.1 1995/10/24 10:22:21 cernlib * Geant * * #include "geant321/pilot.h" *CMZ : 3.21/02 29/03/94 15.41.36 by S.Giani *-- Author : SUBROUTINE GUTREV C. * C. * User routine to control tracking of one event C. * Called by GRUN C. * C CALL GTREVE C END