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

*
* $Id$
*
* $Log$
* Revision 1.1.1.1  1995/10/24 10:20:40  cernlib
* Geant
*
*
#ifndef CERNLIB_GEANT321_MAPA_INC
#define CERNLIB_GEANT321_MAPA_INC
*
*
* mapa.inc
*
*----------------------------------------------------------------------*
*     include file: mapa copy                    created 26/11/86 by pa*
*     note: change also mapa2 copy if you touch this file              *
*     changes: none                                                    *
*     included in the following subroutines or functions: not updated  *
*                                                                      *
*     description of the common block(s) and variable(s)               *
*                                                                      *
*                                                                      *
*     /mapa/ contains the parameters describing the target materials   *
*        matnam = matnam(i)=name of the material number i              *
*        medium = medium(nreg)=material number of the region nreg      *
*        amss   = the atomic weight of the materials                   *
*        aocmbm = atomic densities in barn**-1 cm**-1                  *
*                 (Atoms Over Cm times Barn for Materials)             *
*        ztar   = atomic numbers of the materials                      *
*        rho    = densities of the materials                           *
*        zlin   = inelastic scattering lengths of the materials        *
*                 for beam particles at the average beam energy in cm  *
*        zlel   = elastic scattering lengths of the materials for      *
*                 beam particles at average beam energy in cm          *
*        zlrad  = radiation lengths of the materials in cm             *
*        zul    = inelastic scattering lengths of the materials        *
*                 for neutrons at threshold energy in cm               *
*        mulflg = flags for multiple scattering options                *
*        icomp  = 0 if the material is not a compound                  *
*        mssnum = mass number of the target nucleus, if =< 0 it means  *
*                 that it is in the natural isotopic composition       *
*        nregs  = total number of the regions                          *
*        nmat   = total number of the materials                        *
*        mtbsnm = medium for which inelastic interaction biasing must  *
*                 be done                                              *
*                                                                      *
*                        Mxxrgn = maximum number of regions            *
*                                                                      *
*----------------------------------------------------------------------*
*
      COMMON / FKMAPA / AOCMBM (MXXMDF), AMSS (MXXMDF), ZTAR   (MXXMDF),
     &                  RHO    (MXXMDF), ZLIN (MXXMDF), ZLEL   (MXXMDF),
     &                  ZLRAD  (MXXMDF), ZUL  (MXXMDF), MEDIUM (MXXRGN),
     &                  MULFLG (MXXMDF), ICOMP(MXXMDF), MSSNUM (MXXMDF),
     &                  NREGS, NMAT, MTBSNM
 

#endif
Commit	Line	Data
fe4da5cc	1	*
	2	* $Id$
	3	*
	4	* $Log$
	5	* Revision 1.1.1.1 1995/10/24 10:20:40 cernlib
	6	* Geant
	7	*
	8	*
	9	#ifndef CERNLIB_GEANT321_MAPA_INC
	10	#define CERNLIB_GEANT321_MAPA_INC
	11	*
	12	*
	13	* mapa.inc
	14	*
	15	----------------------------------------------------------------------
	16	* include file: mapa copy created 26/11/86 by pa*
	17	* note: change also mapa2 copy if you touch this file *
	18	* changes: none *
	19	* included in the following subroutines or functions: not updated *
	20	* *
	21	* description of the common block(s) and variable(s) *
	22	* *
	23	* *
	24	* /mapa/ contains the parameters describing the target materials *
	25	* matnam = matnam(i)=name of the material number i *
	26	* medium = medium(nreg)=material number of the region nreg *
	27	* amss = the atomic weight of the materials *
	28	* aocmbm = atomic densities in barn-1 cm-1 *
	29	* (Atoms Over Cm times Barn for Materials) *
	30	* ztar = atomic numbers of the materials *
	31	* rho = densities of the materials *
	32	* zlin = inelastic scattering lengths of the materials *
	33	* for beam particles at the average beam energy in cm *
	34	* zlel = elastic scattering lengths of the materials for *
	35	* beam particles at average beam energy in cm *
	36	* zlrad = radiation lengths of the materials in cm *
	37	* zul = inelastic scattering lengths of the materials *
	38	* for neutrons at threshold energy in cm *
	39	* mulflg = flags for multiple scattering options *
	40	* icomp = 0 if the material is not a compound *
	41	* mssnum = mass number of the target nucleus, if =< 0 it means *
	42	* that it is in the natural isotopic composition *
	43	* nregs = total number of the regions *
	44	* nmat = total number of the materials *
	45	* mtbsnm = medium for which inelastic interaction biasing must *
	46	* be done *
	47	* *
	48	* Mxxrgn = maximum number of regions *
	49	* *
	50	----------------------------------------------------------------------
	51	*
	52	COMMON / FKMAPA / AOCMBM (MXXMDF), AMSS (MXXMDF), ZTAR (MXXMDF),
	53	& RHO (MXXMDF), ZLIN (MXXMDF), ZLEL (MXXMDF),
	54	& ZLRAD (MXXMDF), ZUL (MXXMDF), MEDIUM (MXXRGN),
	55	& MULFLG (MXXMDF), ICOMP(MXXMDF), MSSNUM (MXXMDF),
	56	& NREGS, NMAT, MTBSNM
	57
	58
	59	#endif