5 * Revision 1.1.1.1 1995/10/24 10:20:37 cernlib
9 #ifndef CERNLIB_GEANT321_AUXPAR_INC
10 #define CERNLIB_GEANT321_AUXPAR_INC
15 C***********************************************************************
16 C INCLUDE FILE: AUXPAR COPY CREATED 11/12/86 BY PA
18 C INCLUDED IN THE FOLLOWING SUBROUTINES OR FUNCTIONS: NOT UPDATED
20 C DESCRIPTION OF THE COMMON BLOCK(S) AND VARIABLE(S)
22 C***********************************************************************
23 PARAMETER (IDMAX6=1133)
25 COMMON /FKAUXP/PXA(IDMAX6),PYA(IDMAX6),PZA(IDMAX6),HEPA(IDMAX6),
26 *AMA(IDMAX6),ICHA(IDMAX6),IBARA(IDMAX6), NREA(IDMAX6)
27 COMMON /FKAUXC/ANA(IDMAX6)