[u/mrichter/AliRoot.git] / ISAJET / isajet / types.inc

#ifndef CERNLIB_ISAJET_TYPES_INC
#define CERNLIB_ISAJET_TYPES_INC
*
*
* types.inc
*
      INTEGER MXTYPE
      PARAMETER (MXTYPE=8)
      COMMON/TYPES/LOC(100),NTYP,NJTTYP(MXTYPE),NWWTYP(2),NWMODE(3)
      COMMON/XTYPES/PARTYP(40),TITLE(10),JETYP(30,MXTYPE),WWTYP(30,2)
     $,WMODES(30,3)
      SAVE /TYPES/,/XTYPES/
      CHARACTER*8 JETYP,WWTYP,TITLE,PARTYP,WMODES
      INTEGER   LOC,NTYP,NJTTYP,NWWTYP,NWMODE

#endif
Commit	Line	Data
0795afa3	1	#ifndef CERNLIB_ISAJET_TYPES_INC
	2	#define CERNLIB_ISAJET_TYPES_INC
	3	*
	4	*
	5	* types.inc
	6	*
	7	INTEGER MXTYPE
	8	PARAMETER (MXTYPE=8)
	9	COMMON/TYPES/LOC(100),NTYP,NJTTYP(MXTYPE),NWWTYP(2),NWMODE(3)
	10	COMMON/XTYPES/PARTYP(40),TITLE(10),JETYP(30,MXTYPE),WWTYP(30,2)
	11	$,WMODES(30,3)
	12	SAVE /TYPES/,/XTYPES/
	13	CHARACTER*8 JETYP,WWTYP,TITLE,PARTYP,WMODES
	14	INTEGER LOC,NTYP,NJTTYP,NWWTYP,NWMODE
	15
	16	#endif