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

#ifndef CERNLIB_ISAJET_JWORK_INC
#define CERNLIB_ISAJET_JWORK_INC
*
*
* jwork.inc
*
      COMMON/JWORK/ZZC(MXJSET),JMATCH(MXJSET),TNEW,P1CM(4),
     1J1,J2,J3,J4,J5,E1CM,E2CM,E3CM,E4CM,E5CM
      SAVE /JWORK/
      LOGICAL TNEW
      EQUIVALENCE (J1,JJ(1)),(E1CM,EE(1))
      INTEGER   JMATCH,J1,J2,J3,J4,J5,JJ(5)
      REAL      ZZC,P1CM,E1CM,E2CM,E3CM,E4CM,E5CM,EE(5)

#endif
Commit	Line	Data
0795afa3	1	#ifndef CERNLIB_ISAJET_JWORK_INC
	2	#define CERNLIB_ISAJET_JWORK_INC
	3	*
	4	*
	5	* jwork.inc
	6	*
	7	COMMON/JWORK/ZZC(MXJSET),JMATCH(MXJSET),TNEW,P1CM(4),
	8	1J1,J2,J3,J4,J5,E1CM,E2CM,E3CM,E4CM,E5CM
	9	SAVE /JWORK/
	10	LOGICAL TNEW
	11	EQUIVALENCE (J1,JJ(1)),(E1CM,EE(1))
	12	INTEGER JMATCH,J1,J2,J3,J4,J5,JJ(5)
	13	REAL ZZC,P1CM,E1CM,E2CM,E3CM,E4CM,E5CM,EE(5)
	14
	15	#endif