gpamela/gcdes/dimpar.inc

*
* $Id: dimpar.inc,v 1.1.1.1 1995/10/24 10:20:38 cernlib Exp $
*
* $Log: dimpar.inc,v $
* Revision 1.1.1.1  1995/10/24 10:20:38  cernlib
* Geant
*
*
#ifndef CERNLIB_GEANT321_DIMPAR_INC
#define CERNLIB_GEANT321_DIMPAR_INC
*
*
* dimpar.inc
*
*                                                                     *
*=== dimpar ==========================================================*
*                                                                     *
*---------------------------------------------------------------------*
*                                                                     *
*      DIMPAR: included in any routine                                *
*                                                                     *
*          Mxxrgn = maximum number of regions                         *
*          Mxxmdf = maximum number of media in Fluka                  *
*          Mxxmde = maximum number of media in Emf                    *
*          Mfstck = stack dimension in Fluka                          *
*          Mestck = stack dimension in Emf                            *
*          Nallwp = number of allowed particles                       *
*          Mpdpdx = number of particle types for which EM dE/dx pro-  *
*                   cesses (ion,pair,bremss) have to be computed      *
*          Icomax = maximum number of materials for compounds (equal  *
*                   to the sum of the number of materials for every   *
*                   compound )                                        *
*          Nstbis = number of stable isotopes recorded in common iso- *
*                   top                                               *
*                                                                     *
*---------------------------------------------------------------------*
*                                                                     *
      PARAMETER ( MXXRGN = 500  )
      PARAMETER ( MXXMDF = 50   )
      PARAMETER ( MXXMDE = 18   )
      PARAMETER ( MFSTCK = 1000 )
      PARAMETER ( MESTCK = 100  )
      PARAMETER ( NALLWP = 39   )
      PARAMETER ( MPDPDX = 8    )
      PARAMETER ( ICOMAX = 120  )
      PARAMETER ( NSTBIS = 304  )
 

#endif
1	*
2	* $Id: dimpar.inc,v 1.1.1.1 1995/10/24 10:20:38 cernlib Exp $
3	*
4	* $Log: dimpar.inc,v $
5	* Revision 1.1.1.1 1995/10/24 10:20:38 cernlib
6	* Geant
7	*
8	*
9	#ifndef CERNLIB_GEANT321_DIMPAR_INC
10	#define CERNLIB_GEANT321_DIMPAR_INC
11	*
12	*
13	* dimpar.inc
14	*
15	* *
16	=== dimpar ==========================================================
17	* *
18	---------------------------------------------------------------------
19	* *
20	* DIMPAR: included in any routine *
21	* *
22	* Mxxrgn = maximum number of regions *
23	* Mxxmdf = maximum number of media in Fluka *
24	* Mxxmde = maximum number of media in Emf *
25	* Mfstck = stack dimension in Fluka *
26	* Mestck = stack dimension in Emf *
27	* Nallwp = number of allowed particles *
28	* Mpdpdx = number of particle types for which EM dE/dx pro- *
29	* cesses (ion,pair,bremss) have to be computed *
30	* Icomax = maximum number of materials for compounds (equal *
31	* to the sum of the number of materials for every *
32	* compound ) *
33	* Nstbis = number of stable isotopes recorded in common iso- *
34	* top *
35	* *
36	---------------------------------------------------------------------
37	* *
38	PARAMETER ( MXXRGN = 500 )
39	PARAMETER ( MXXMDF = 50 )
40	PARAMETER ( MXXMDE = 18 )
41	PARAMETER ( MFSTCK = 1000 )
42	PARAMETER ( MESTCK = 100 )
43	PARAMETER ( NALLWP = 39 )
44	PARAMETER ( MPDPDX = 8 )
45	PARAMETER ( ICOMAX = 120 )
46	PARAMETER ( NSTBIS = 304 )
47
48
49	#endif