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

*
* $Id$
*
* $Log$
* Revision 1.1.1.1  1995/10/24 10:20:33  cernlib
* Geant
*
*
#ifndef CERNLIB_GEANT321_GCSTRA_INC
#define CERNLIB_GEANT321_GCSTRA_INC
*
*
* gcstra.inc
*
#if !defined(CERNLIB_INCLUDE)
      PARAMETER (ILTAB=200)
      COMMON /GCSTRA / EMAX,EM(200),SFINT,EPSR(ILTAB),EPSI(ILTAB),
     +  FINT(ILTAB),EMIN,EPPS,BETA2,GAMMA2,WP2,S2,MEEV,EMM(200),
     +  GAMLOG(21),NP,NTAB,IE,NFACT,NICOLL
*
      INTEGER NP,NTAB,IE,NFACT
      REAL    EMAX,EM,SFINT,EPSR,EPSI,FINT,EMIN,EPPS,EMM,GAMLOG
     +        ,BETA2,GAMMA2,WP2,S2,MEEV
*
#endif

#endif
Commit	Line	Data
fe4da5cc	1	*
	2	* $Id$
	3	*
	4	* $Log$
	5	* Revision 1.1.1.1 1995/10/24 10:20:33 cernlib
	6	* Geant
	7	*
	8	*
	9	#ifndef CERNLIB_GEANT321_GCSTRA_INC
	10	#define CERNLIB_GEANT321_GCSTRA_INC
	11	*
	12	*
	13	* gcstra.inc
	14	*
	15	#if !defined(CERNLIB_INCLUDE)
	16	PARAMETER (ILTAB=200)
	17	COMMON /GCSTRA / EMAX,EM(200),SFINT,EPSR(ILTAB),EPSI(ILTAB),
	18	+ FINT(ILTAB),EMIN,EPPS,BETA2,GAMMA2,WP2,S2,MEEV,EMM(200),
	19	+ GAMLOG(21),NP,NTAB,IE,NFACT,NICOLL
	20	*
	21	INTEGER NP,NTAB,IE,NFACT
	22	REAL EMAX,EM,SFINT,EPSR,EPSI,FINT,EMIN,EPPS,EMM,GAMLOG
	23	+ ,BETA2,GAMMA2,WP2,S2,MEEV
	24	*
	25	#endif
	26
	27	#endif