5 * Revision 1.1.1.1 1995/10/24 10:21:56 cernlib
9 #include "geant321/pilot.h"
10 *CMZ : 3.21/04 23/02/95 14.46.01 by S.Giani
12 SUBROUTINE GETENE(EN,D1,D2,N)
13 C sample N times secondary energy distribution and
15 #include "geant321/mconst.inc"
16 #include "geant321/mnutrn.inc"
21 CALL SECEGY(EX,D1,EN,D2)