gpamela/gpcdes/gpmed.inc

*
* $Id: gpmed.inc,v 3.6 2006/11/10 11:39:34 pam-ba Exp $
*
* $Log: gpmed.inc,v $
* Revision 3.6  2006/11/10 11:39:34  pam-ba
* S2 and S1 z-positions corrected, He3 and plystyrene mixture added, Top Plate geometry simulated and titanium mixture added.
*
* Revision 3.5  2006/10/13 16:36:58  pam-ba
* Added a new material, the cadmium, for ND
*
* Revision 3.4  2006/05/18 10:52:32  pam-ba
* TOF geometry completed and a new material, the polystyrene (density 35 g/l), added
*
* Revision 3.3  2006/05/02 11:46:13  pam-ba
* TOF geometry and position updated and a new material, the mylar, added
*
* Revision 3.2  2002/12/05 10:17:42  pamela
* Update CAS and CALO geometries and positions. Makefile updated as well
*
* Revision 3.1.1.1  2002/07/11 16:01:59  cafagna
* First GPAMELA release on CVS
*
*
*
* gpmed.inc
*
*               03/10/2002  11.15.52  by  Jens Lund
*CMZ :  3.00/00 20/03/2001  17.31.38  by  Marialuigia Ambriola
*CMZ :  2.02/00 09/10/2000  15.33.16  by  Francesco Cafagna
*CMZ :  2.01/00 05/04/2000  14.35.17  by  Marialuigia Ambriola
*CMZ :  2.00/00 03/03/2000  15.39.05  by  Francesco Cafagna
*CMZ :  1.02/00 10/03/97  12.52.13  by  Francesco Cafagna
*CMZ :  1.00/02 06/02/96  12.55.04  by  Francesco Cafagna
*-- Author :    Francesco Cafagna   05/12/95
C
C Common with tracking media definition
C
       INTEGER MN2,MSCIN,MAER,MXE,MKAP,MTRAD,MMAG,MROA,MCF,MSIC,
     +         MSIT,MG10,MCE,MW,MAL,ISVOLGP
*EM:
       INTEGER MW2,MCER,MG10C
*END EM.
*JeL:
       INTEGER MPLAS
*END JeL.
       INTEGER MMYL,MPOL,MCAD,MCH2,MHE3,MTAV,MNYL,MAMG,MIRON
       REAL    FIELDMGP,TMAXFDGP,STEMAXGP,DEEMAXGP,EPSILGP,STMINGP
       COMMON /GPCMED/ MN2,MSCIN,MAER,MXE,MKAP,MTRAD,MMAG,MROA,
     +              MCF,MSIC,MSIT,MG10,MCE,MW,MAL,ISVOLGP,
     +              FIELDMGP,TMAXFDGP,STEMAXGP,DEEMAXGP,EPSILGP,STMINGP,
*EM:
     +                MW2,MCER,MG10C,MIRON,
*END EM.
*JeL:
     +                MPLAS,MMYL,MPOL,MCAD,MCH2,MHE3,MTAV,MNYL,MAMG
*END JeL.
C
1	cafagna	3.1	*
2	pamela	3.7	* $Id: gpmed.inc,v 3.6 2006/11/10 11:39:34 pam-ba Exp $
3	pamela	3.2	*
4			* $Log: gpmed.inc,v $
5	pamela	3.7	* Revision 3.6 2006/11/10 11:39:34 pam-ba
6			* S2 and S1 z-positions corrected, He3 and plystyrene mixture added, Top Plate geometry simulated and titanium mixture added.
7			*
8	pam-ba	3.6	* Revision 3.5 2006/10/13 16:36:58 pam-ba
9			* Added a new material, the cadmium, for ND
10			*
11	pam-ba	3.5	* Revision 3.4 2006/05/18 10:52:32 pam-ba
12			* TOF geometry completed and a new material, the polystyrene (density 35 g/l), added
13			*
14	pam-ba	3.4	* Revision 3.3 2006/05/02 11:46:13 pam-ba
15			* TOF geometry and position updated and a new material, the mylar, added
16			*
17	pam-ba	3.3	* Revision 3.2 2002/12/05 10:17:42 pamela
18			* Update CAS and CALO geometries and positions. Makefile updated as well
19			*
20	pamela	3.2	* Revision 3.1.1.1 2002/07/11 16:01:59 cafagna
21			* First GPAMELA release on CVS
22	cafagna	3.1	*
23			*
24			*
25			* gpmed.inc
26			*
27	pamela	3.2	* 03/10/2002 11.15.52 by Jens Lund
28	cafagna	3.1	*CMZ : 3.00/00 20/03/2001 17.31.38 by Marialuigia Ambriola
29			*CMZ : 2.02/00 09/10/2000 15.33.16 by Francesco Cafagna
30			*CMZ : 2.01/00 05/04/2000 14.35.17 by Marialuigia Ambriola
31			*CMZ : 2.00/00 03/03/2000 15.39.05 by Francesco Cafagna
32			*CMZ : 1.02/00 10/03/97 12.52.13 by Francesco Cafagna
33			*CMZ : 1.00/02 06/02/96 12.55.04 by Francesco Cafagna
34			*-- Author : Francesco Cafagna 05/12/95
35			C
36			C Common with tracking media definition
37			C
38			INTEGER MN2,MSCIN,MAER,MXE,MKAP,MTRAD,MMAG,MROA,MCF,MSIC,
39			+ MSIT,MG10,MCE,MW,MAL,ISVOLGP
40			*EM:
41			INTEGER MW2,MCER,MG10C
42			*END EM.
43	pamela	3.2	*JeL:
44			INTEGER MPLAS
45			*END JeL.
46	pamela	3.7	INTEGER MMYL,MPOL,MCAD,MCH2,MHE3,MTAV,MNYL,MAMG,MIRON
47	cafagna	3.1	REAL FIELDMGP,TMAXFDGP,STEMAXGP,DEEMAXGP,EPSILGP,STMINGP
48			COMMON /GPCMED/ MN2,MSCIN,MAER,MXE,MKAP,MTRAD,MMAG,MROA,
49			+ MCF,MSIC,MSIT,MG10,MCE,MW,MAL,ISVOLGP,
50			+ FIELDMGP,TMAXFDGP,STEMAXGP,DEEMAXGP,EPSILGP,STMINGP,
51			*EM:
52	pamela	3.7	+ MW2,MCER,MG10C,MIRON,
53	cafagna	3.1	*END EM.
54	pamela	3.2	*JeL:
55	pamela	3.7	+ MPLAS,MMYL,MPOL,MCAD,MCH2,MHE3,MTAV,MNYL,MAMG
56	pamela	3.2	*END JeL.
57	cafagna	3.1	C