GEANT321/geant321/mpstor.inc

   1 *
   2 * $Id$
   3 *
   4 * $Log$
   5 * Revision 1.1.1.1  1995/10/24 10:20:45  cernlib
   6 * Geant
   7 *
   8 *
   9 #ifndef CERNLIB_GEANT321_MPSTOR_INC
  10 #define CERNLIB_GEANT321_MPSTOR_INC
  11 *
  12 *
  13 * mpstor.inc
  14 *
  15       PARAMETER(IDNEU  = 1)
  16       PARAMETER(IDHEVY = 2)
  17       PARAMETER(IDGAMA = 3)
  18       COMMON/ MPSTOR / EN(MAXPAR),UN(MAXPAR),VN(MAXPAR),WN(MAXPAR),
  19      +                 AGEN(MAXPAR),MTN(MAXPAR),AMN(MAXPAR),
  20      +                 ZMN(MAXPAR),IDN(MAXPAR),
  21      +                 EP,UP,VP,WP,MTP,AGEP,AMP,ZMP,
  22      +                 NNEU,NHEVY,NGAMA,NPSTOR
  23
  24 #endif