This commit was generated by cvs2svn to compensate for changes in r2,
[u/mrichter/AliRoot.git] / GEANT321 / geant321 / gcking.inc
1 *
2 * $Id$
3 *
4 * $Log$
5 * Revision 1.1.1.1  1995/10/24 10:20:32  cernlib
6 * Geant
7 *
8 *
9 #ifndef CERNLIB_GEANT321_GCKING_INC
10 #define CERNLIB_GEANT321_GCKING_INC
11 *
12 *
13 * gcking.inc
14 *
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
20       REAL          GKIN,TOFD,XPHOT
21 C
22       PARAMETER (MXPHOT=800)
23       COMMON/GCKIN2/NGPHOT,XPHOT(11,MXPHOT)
24 C
25       COMMON/GCKIN3/GPOS(3,MXGKIN)
26       REAL          GPOS
27 C
28 #endif
29 *
30 * gcking.inc
31 *
32 #if defined(CERNLIB_INCLUDE)
33 *
34 #include "geant321/incbeg.inc"
35      +   gcking
36 #include "geant321/incend.inc"
37 #endif
38
39 #endif