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

*
* $Id$
*
* $Log$
* Revision 1.2  1996/07/25 15:01:16  ravndal
* CMZ to CVS conversion artefact removed
*
* Revision 1.1  1996/03/06 15:32:34  mclareni
* Add geane321 includes
*
*
#ifndef CERNLIB_ERPRCDES_ERWORK_INC
#define CERNLIB_ERPRCDES_ERWORK_INC
*
*      Working sequences for the interface
*
* erwork.inc
*
      DOUBLE PRECISION EI, EF, ASDSC
      COMMON /ERWORK/ EI(15), EF(15), ASDSC(5,5),
     +                   XI(3), PPI(3), HI(9),
     +                   XF(3), PF(3),  HF(9),
     +                   CHTR, DEDX2, BACKTR, CUTEK, TLGCM2, TLRAD
*
* erwork.inc
*
#if defined(CERNLIB_INCLUDE)
#include "geant321/incbeg.inc"
     +    ERWORK
#include "geant321/incend.inc"
#endif

#endif
Commit	Line	Data
fe4da5cc	1	*
	2	* $Id$
	3	*
	4	* $Log$
	5	* Revision 1.2 1996/07/25 15:01:16 ravndal
	6	* CMZ to CVS conversion artefact removed
	7	*
	8	* Revision 1.1 1996/03/06 15:32:34 mclareni
	9	* Add geane321 includes
	10	*
	11	*
	12	#ifndef CERNLIB_ERPRCDES_ERWORK_INC
	13	#define CERNLIB_ERPRCDES_ERWORK_INC
	14	*
	15	* Working sequences for the interface
	16	*
	17	* erwork.inc
	18	*
	19	DOUBLE PRECISION EI, EF, ASDSC
	20	COMMON /ERWORK/ EI(15), EF(15), ASDSC(5,5),
	21	+ XI(3), PPI(3), HI(9),
	22	+ XF(3), PF(3), HF(9),
	23	+ CHTR, DEDX2, BACKTR, CUTEK, TLGCM2, TLRAD
	24	*
	25	* erwork.inc
	26	*
	27	#if defined(CERNLIB_INCLUDE)
	28	#include "geant321/incbeg.inc"
	29	+ ERWORK
	30	#include "geant321/incend.inc"
	31	#endif
	32
	33	#endif