/usr/include/geant321/gcking.inc is in libgeant321-2-dev 1:3.21.14.dfsg-11.
This file is owned by root:root, with mode 0o644.
The actual contents of the file can be viewed below.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 | *
* $Id: gcking.inc,v 1.1.1.1 1995/10/24 10:20:32 cernlib Exp $
*
* $Log: gcking.inc,v $
* Revision 1.1.1.1 1995/10/24 10:20:32 cernlib
* Geant
*
*
#ifndef CERNLIB_GEANT321_GCKING_INC
#define CERNLIB_GEANT321_GCKING_INC
*
*
* gcking.inc
*
#if !defined(CERNLIB_INCLUDE)
#include <geant321/gckmax.inc>
COMMON/GCKING/KCASE,NGKINE,GKIN(5,MXGKIN),
+ TOFD(MXGKIN),IFLGK(MXGKIN)
INTEGER KCASE,NGKINE ,IFLGK,MXPHOT,NGPHOT
REAL GKIN,TOFD,XPHOT
C
PARAMETER (MXPHOT=800)
COMMON/GCKIN2/NGPHOT,XPHOT(11,MXPHOT)
C
COMMON/GCKIN3/GPOS(3,MXGKIN)
REAL GPOS
C
#endif
*
* gcking.inc
*
#if defined(CERNLIB_INCLUDE)
*
#include <geant321/incbeg.inc>
+ gcking
#include <geant321/incend.inc>
#endif
#endif
|