GEANT321/geant321/hadpar.inc

   1 *
   2 * $Id$
   3 *
   4 * $Log$
   5 * Revision 1.1.1.1  1995/10/24 10:20:39  cernlib
   6 * Geant
   7 *
   8 *
   9 #ifndef CERNLIB_GEANT321_HADPAR_INC
  10 #define CERNLIB_GEANT321_HADPAR_INC
  11 *
  12 *
  13 * hadpar.inc
  14 *
  15 C***********************************************************************
  16 C     INCLUDE FILE: HADPAR COPY                   CREATED 11/12/86 BY PA
  17 C     CHANGES: NONE
  18 C     INCLUDED IN THE FOLLOWING SUBROUTINES OR FUNCTIONS: NOT UPDATED
  19 C
  20 C     DESCRIPTION OF THE COMMON BLOCK(S) AND VARIABLE(S)
  21 C
  22 C***********************************************************************
  23       PARAMETER (IDMAX4=1133)
  24       CHARACTER*8 ANH
  25       COMMON /FKHADP/PXH(IDMAX4),PYH(IDMAX4),PZH(IDMAX4),HEPH(IDMAX4),
  26      *AMH(IDMAX4),ICHH(IDMAX4),IBARH(IDMAX4),            NREH(IDMAX4)
  27       COMMON /FKHADC/ANH(IDMAX4)
  28
  29
  30 #endif