/usr/include/geant321/gcshpt.inc is in libgeant321-2-dev 1:3.21.14.dfsg-11build1.
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 40 41 42 43 44 45 46 | *
* $Id: gcshpt.inc,v 1.1.1.1 1995/10/24 10:20:35 cernlib Exp $
*
* $Log: gcshpt.inc,v $
* Revision 1.1.1.1 1995/10/24 10:20:35 cernlib
* Geant
*
*
#ifndef CERNLIB_GEANT321_GCSHPT_INC
#define CERNLIB_GEANT321_GCSHPT_INC
*
*
* gcshpt.inc
*
#if !defined(CERNLIB_INCLUDE)
C Shells are numbered from 1 to 24.
C Shells used:
C K,L1,L2,L3,M1,M2,M3,M4,M5
C N1,N2,N3,N4,N5,N6,N7,
C O1,O2,O3,O4,O5,P1,P2,P3
C VARIABLES:
C NSHLST - value of Z for which the shells starts to be present
C N1ST - pointer to K shell of a given Z (in ESHELL array)
C NSHLLS - Number of used shells for a given Z
C ESHELL - Shells potentials in eV !!!
INTEGER LENGTH,MAXSHL
PARAMETER (LENGTH= 1409)
PARAMETER (MAXSHL=24)
INTEGER NSHLST,N1ST,NSHLLS
REAL ESHELL
DIMENSION NSHLST(MAXSHL),N1ST(MAXELZ),NSHLLS(MAXELZ)
DIMENSION ESHELL(LENGTH)
COMMON /GCSHPT/NSHLST,N1ST,NSHLLS,ESHELL
C
#endif
*
* gcshpt.inc
*
#if defined(CERNLIB_INCLUDE)
*
#include <geant321/incbeg.inc>
+ gcshpt
#include <geant321/incend.inc>
#endif
#endif
|