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

*
* $Id$
*
* $Log$
* Revision 1.1.1.1  1995/10/24 10:20:39  cernlib
* Geant
*
*
#ifndef CERNLIB_GEANT321_FINPAR2_INC
#define CERNLIB_GEANT321_FINPAR2_INC
*
*
* finpar2.inc
*
C***********************************************************************
C     INCLUDE FILE: FINPAR2 COPY                   CREATED 11/12/86 BY A
C     NOTE: DO NOT FORGET FILE FINPAR 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 (IDMAX3=1133)
      CHARACTER*8 ANF
      COMMON /FKFINP/PXF(IDMAX3),PYF(IDMAX3),PZF(IDMAX3),HEF(IDMAX3),
     *AMF(IDMAX3),ICHF(IDMAX3),IBARF(IDMAX3),NREF(IDMAX3)
      COMMON /FKFINC/ ANF(IDMAX3)
 

#endif
Commit	Line	Data
fe4da5cc	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_FINPAR2_INC
	10	#define CERNLIB_GEANT321_FINPAR2_INC
	11	*
	12	*
	13	* finpar2.inc
	14	*
	15	C***********************************************************************
	16	C INCLUDE FILE: FINPAR2 COPY CREATED 11/12/86 BY A
	17	C NOTE: DO NOT FORGET FILE FINPAR 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 (IDMAX3=1133)
	25	CHARACTER*8 ANF
	26	COMMON /FKFINP/PXF(IDMAX3),PYF(IDMAX3),PZF(IDMAX3),HEF(IDMAX3),
	27	*AMF(IDMAX3),ICHF(IDMAX3),IBARF(IDMAX3),NREF(IDMAX3)
	28	COMMON /FKFINC/ ANF(IDMAX3)
	29
	30
	31	#endif