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

*
* $Id$
*
* $Log$
* Revision 1.1.1.1  1995/10/24 10:20:32  cernlib
* Geant
*
*
#ifndef CERNLIB_GEANT321_GCMULO_INC
#define CERNLIB_GEANT321_GCMULO_INC
*
*
* gcmulo.inc
*
#if !defined(CERNLIB_INCLUDE)
      COMMON/GCMULO/SINMUL(101),COSMUL(101),SQRMUL(101),OMCMOL,CHCMOL
     +  ,EKMIN,EKMAX,NEKBIN,NEK1,EKINV,GEKA,GEKB,EKBIN(200),ELOW(200)
C
      REAL SINMUL,COSMUL,SQRMUL,OMCMOL,CHCMOL,EKMIN,EKMAX,ELOW,EKINV
      REAL GEKA,GEKB,EKBIN
      INTEGER NEKBIN,NEK1
C
#endif
*
* gcmulo.inc
*
#if defined(CERNLIB_INCLUDE)
*
#include "geant321/incbeg.inc"
     +   gcmulo
#include "geant321/incend.inc"
#endif

#endif
Commit	Line	Data
fe4da5cc	1	*
	2	* $Id$
	3	*
	4	* $Log$
	5	* Revision 1.1.1.1 1995/10/24 10:20:32 cernlib
	6	* Geant
	7	*
	8	*
	9	#ifndef CERNLIB_GEANT321_GCMULO_INC
	10	#define CERNLIB_GEANT321_GCMULO_INC
	11	*
	12	*
	13	* gcmulo.inc
	14	*
	15	#if !defined(CERNLIB_INCLUDE)
	16	COMMON/GCMULO/SINMUL(101),COSMUL(101),SQRMUL(101),OMCMOL,CHCMOL
	17	+ ,EKMIN,EKMAX,NEKBIN,NEK1,EKINV,GEKA,GEKB,EKBIN(200),ELOW(200)
	18	C
	19	REAL SINMUL,COSMUL,SQRMUL,OMCMOL,CHCMOL,EKMIN,EKMAX,ELOW,EKINV
	20	REAL GEKA,GEKB,EKBIN
	21	INTEGER NEKBIN,NEK1
	22	C
	23	#endif
	24	*
	25	* gcmulo.inc
	26	*
	27	#if defined(CERNLIB_INCLUDE)
	28	*
	29	#include "geant321/incbeg.inc"
	30	+ gcmulo
	31	#include "geant321/incend.inc"
	32	#endif
	33
	34	#endif