[u/mrichter/AliRoot.git] / GEANT321 / geant321 / decayc.inc

*
* $Id$
*
* $Log$
* Revision 1.1.1.1  1995/10/24 10:20:38  cernlib
* Geant
*
*
#ifndef CERNLIB_GEANT321_DECAYC_INC
#define CERNLIB_GEANT321_DECAYC_INC
*
*
* decayc.inc
*
C***********************************************************************
C     INCLUDE FILE: DECAYC COPY                   CREATED 12/12/86 BY PA
C     NOTE: SEE ALSO DECAYC2 COPY
C     CHANGES: NONE
C     INCLUDED IN THE FOLLOWING SUBROUTINES OR FUNCTIONS: NOT UPDATED
C
C     DESCRIPTION OF THE COMMON BLOCK(S) AND VARIABLE(S)
C
C***********************************************************************
      PARAMETER (IDMAX9=540)
      CHARACTER*8 ZKNAME
      COMMON/FKDECC/ NZK(IDMAX9,3),WT(IDMAX9)
      COMMON/FKDECH/ ZKNAME(IDMAX9)
 

#endif
Commit	Line	Data
fe4da5cc	1	*
	2	* $Id$
	3	*
	4	* $Log$
	5	* Revision 1.1.1.1 1995/10/24 10:20:38 cernlib
	6	* Geant
	7	*
	8	*
	9	#ifndef CERNLIB_GEANT321_DECAYC_INC
	10	#define CERNLIB_GEANT321_DECAYC_INC
	11	*
	12	*
	13	* decayc.inc
	14	*
	15	C***********************************************************************
	16	C INCLUDE FILE: DECAYC COPY CREATED 12/12/86 BY PA
	17	C NOTE: SEE ALSO DECAYC2 COPY
	18	C CHANGES: NONE
	19	C INCLUDED IN THE FOLLOWING SUBROUTINES OR FUNCTIONS: NOT UPDATED
	20	C
	21	C DESCRIPTION OF THE COMMON BLOCK(S) AND VARIABLE(S)
	22	C
	23	C***********************************************************************
	24	PARAMETER (IDMAX9=540)
	25	CHARACTER*8 ZKNAME
	26	COMMON/FKDECC/ NZK(IDMAX9,3),WT(IDMAX9)
	27	COMMON/FKDECH/ ZKNAME(IDMAX9)
	28
	29
	30	#endif