GEANT321/geant321/gcparm.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_GCPARM_INC
  10 #define CERNLIB_GEANT321_GCPARM_INC
  11 *
  12 *
  13 * gcparm.inc
  14 *
  15 #if !defined(CERNLIB_INCLUDE)
  16       COMMON/GCPARM/IPARAM,PCUTGA,PCUTEL,PCUTNE,PCUTHA,PCUTMU
  17      +             ,NSPARA,MPSTAK,NPGENE
  18       REAL PACUTS(5)
  19       EQUIVALENCE (PACUTS(1),PCUTGA)
  20 #if defined(CERNLIB_TYPE)
  21 #include "geant321/gtparm.inc"
  22 #endif
  23 C
  24 #endif
  25 *
  26 * gcparm.inc
  27 *
  28 #if defined(CERNLIB_INCLUDE)
  29 *
  30 #include "geant321/incbeg.inc"
  31      +   gcparm
  32 #include "geant321/incend.inc"
  33 #endif
  34
  35 #endif