5 * Revision 1.1.1.1 1995/10/24 10:20:32 cernlib
9 #ifndef CERNLIB_GEANT321_GCKING_INC
10 #define CERNLIB_GEANT321_GCKING_INC
15 #if !defined(CERNLIB_INCLUDE)
16 #include "geant321/gckmax.inc"
17 COMMON/GCKING/KCASE,NGKINE,GKIN(5,MXGKIN),
18 + TOFD(MXGKIN),IFLGK(MXGKIN)
19 INTEGER KCASE,NGKINE ,IFLGK,MXPHOT,NGPHOT
22 PARAMETER (MXPHOT=800)
23 COMMON/GCKIN2/NGPHOT,XPHOT(11,MXPHOT)
25 COMMON/GCKIN3/GPOS(3,MXGKIN)
32 #if defined(CERNLIB_INCLUDE)
34 #include "geant321/incbeg.inc"
36 #include "geant321/incend.inc"