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

#ifndef CERNLIB_ISAJET_DYLIM_INC
#define CERNLIB_ISAJET_DYLIM_INC
*
*
* dylim.inc
*
      COMMON/DYLIM/QMIN,QMAX,QTMIN,QTMAX,YWMIN,YWMAX,XWMIN,XWMAX,THWMIN,
     2  THWMAX,PHWMIN,PHWMAX
     3  ,SETLMQ(12)
      SAVE /DYLIM/
      LOGICAL SETLMQ
      EQUIVALENCE(BLIM1(1),QMIN)
      REAL      QMIN,QMAX,QTMIN,QTMAX,YWMIN,YWMAX,XWMIN,XWMAX,THWMIN,
     +          THWMAX,PHWMIN,PHWMAX,BLIM1(12)

#endif
Commit	Line	Data
0795afa3	1	#ifndef CERNLIB_ISAJET_DYLIM_INC
	2	#define CERNLIB_ISAJET_DYLIM_INC
	3	*
	4	*
	5	* dylim.inc
	6	*
	7	COMMON/DYLIM/QMIN,QMAX,QTMIN,QTMAX,YWMIN,YWMAX,XWMIN,XWMAX,THWMIN,
	8	2 THWMAX,PHWMIN,PHWMAX
	9	3 ,SETLMQ(12)
	10	SAVE /DYLIM/
	11	LOGICAL SETLMQ
	12	EQUIVALENCE(BLIM1(1),QMIN)
	13	REAL QMIN,QMAX,QTMIN,QTMAX,YWMIN,YWMAX,XWMIN,XWMAX,THWMIN,
	14	+ THWMAX,PHWMIN,PHWMAX,BLIM1(12)
	15
	16	#endif