5 * Revision 1.1.1.1 1995/10/24 10:21:46 cernlib
9 #include "geant321/pilot.h"
10 *CMZ : 3.21/02 29/03/94 15.41.25 by S.Giani
12 SUBROUTINE GUSKIP (ISKIP)
14 C. ******************************************************************
16 C. * User routine to skip unwanted tracks *
18 C. * Called by : GSSTAK *
19 C. * Author : F.Bruyant *
21 C. ******************************************************************
23 #include "geant321/gcbank.inc"
24 #include "geant321/gckine.inc"
25 C. ------------------------------------------------------------------