gpamela/gpcdes/gpmat.inc

*
* $Id: gpmat.inc,v 3.7 2006/11/10 11:39:34 pam-ba Exp $
*
* $Log: gpmat.inc,v $
* Revision 3.7  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.6  2006/10/13 16:36:58  pam-ba
* Added a new material, the cadmium, for ND
*
* Revision 3.5  2006/05/18 10:52:32  pam-ba
* TOF geometry completed and a new material, the polystyrene (density 35 g/l), added
*
* Revision 3.4  2006/05/02 11:46:13  pam-ba
* TOF geometry and position updated and a new material, the mylar, added
*
* Revision 3.3  2003/12/17 11:32:49  pamela
* CALO SIMULATION COMPLETED: geometry and special tracking parameters updated and simulation checked by a comparison with the Trieste's standalone Monte Carlo simulation
*
* 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:02:00  cafagna
* First GPAMELA release on CVS
*
*
*
* gpmat.inc
*
*               03/10/2002  10.42.39  by  Jens Lund
*CMZ :  2.02/00 11/10/2000  20.14.33  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 18/03/97  18.25.29  by  Francesco Cafagna
*CMZ :  1.00/02 15/03/96  17.47.37  by  Francesco Cafagna
*-- Author :    Francesco Cafagna   05/12/95
C
C Common with material definitions
C
C
C Plast. sci: H 50%, C 50%  , Rho=1.032 g/cm**3 from P.D.Book
C G10       : SiO2 60%, Epoxy 40%, Rho=1.7 g/cm**3 from P.D.Book
C             Epoxy from CRC handbook (Raw estimation)
c G10C      : Si 53%, O 30%, C 15%, H 2%, Rho=1.7 g/cm**3 from Mirko,
C             for Calorimeter
C N2 (Gas)  : A=14.01, Z=7, Rho=1.25 g/l
C Silicon   : A=28.09, Z=14,Rho=2.33 g/cm**3, X0=9.36 from P.D.Book
C Xenon     : A=131.29, Z=54,Rho=5.858 g/l, X0=1447.6cm from P.D.Book
C TRD rad.  : Carbon fiber with density 0.060 g/cm**3, used in TS93
C Aerogel   : A=96.11, Z=54 (Comp. n(SiO2)+2n(H2O)), Rho=.2g/cm**3 (Ave.),
C             X0=150 cm, from P.D.Book
C Tungsten  : W 95%, Cu 2.5%, Ni 2.5%, Rho=18.1 g/cm**3 from Mirko-Aerostudi
C Kaolinite : Al 21%, Si 21.7%, O 55.8%, H 1.5% Rho=2.594 g/cm**3 (insulator
C             for calorimeter) from Mirko et al.
C Mylar     : C5H4O2: Rho=1.39 g/cm**3 from P. D. Book 
C Polystirene: C8H8: from P. D. Book Rho=35 g/l=350 g/cm**3 from Beppe Osteria 
C Cadmium    : for ND: A=, Z=, Rho=, Xo=
C He3        : from Leonov: Z=2, A=3 Rho=.001246 g/cm3, Xo=107.86 cm
C Polyethylene(CH2): for ND from Leonv: A=12.011,1.00794, Z=6,1, Rho=.93 g/cm3
C TAV        : Titanium alloy for top plate: Ti(90%), Al(6%), Va(4%):
c              Z=(22,13,23), A=(47.867,26.9815,50.9415),Rho=4.49234 g/cm3
C NYL6       : Nylon 6 for shell external cover:(NH(CH2)5CO)n, 6C, 11H, 1O, 1N 
c              Z=(6,1,8,7), A=(12.011,1.00794,15.9994,14.00674), Rho=1.14 g/cm3
C AMG6M      : AMg6M for top container (TSPH volume): Al(94%), Mg(6%)
C              Z=(13,12), A=(26.9815,24.3050), Rho=2.610 g/cm3
C
C The NM*** numbers are the material numbers in the JMATE structure
C Note that the Silicon has been duplicate to allow the changing of
C the special tracking parameter for both TRACKER and CALORIMETER
C
C
C For Silicon special parameter has been added to be used in the Straggling
C simulation. These parameter are stored into the User word in the JMAT
C structure
C
      INTEGER NMSCIN,NMG10,NMN2,NMSITR,NMSICA,NMXE,NMTRAD,NMAER
*EM:
      INTEGER NMCERA,NMG10C,NMWCAL
*END EM.
*JeL:
      INTEGER NMPLAS
*END JeL.
      INTEGER NMMYL,NMPOL,NMCAD,NMTAV,NMHE3,NMCH2,NMNYL6,NMAMG6M
      REAL ASCIN,ZSCIN,WSCIN,DSCIN,
     +     AN2G,ZN2G,DN2G,RN2G,
     +     AG10,ZG10,WG10,DG10,
     +     AG10C,ZG10C,WG10C,DG10C,
     +     ASI ,ZSI ,DSI ,RSI, ABSI,
     +     AXE ,ZXE ,DXE ,RXE,
     +     ATRAD ,ZTRAD ,DTRAD ,RTRAD,
     +     AAER ,ZAER ,DAER ,RAER,
     +     D2SICA,D2SITR,
     +     AWCAL,ZWCAL,DWCAL,WWCAL,
     +     ACERA,ZCERA,DCERA,WCERA,
     +     AMYL,ZMYL,DMYL,WMYL,
     +     APOL,ZPOL,DPOL,WPOL,
     +     ACAD,ZCAD,DCAD,RCAD,
     +     ATAV,ZTAV,DTAV,WTAV,
     +     AHE3,ZHE3,DHE3,RHE3,
     +     APOLND,ZPOLND,DPOLND,WPOLND,
     +     ANYL6,ZNYL6,DNYL6,WNYL6,
     +     AAMG6M,ZAMG6M,DAMG6M,WAMG6M
      COMMON/GPCMAT/ NMSCIN,NMG10,NMN2,NMSITR,NMSICA,NMXE,NMTRAD,NMAER,
*EM:
     +              NMCERA,NMG10C,NMWCAL,
*END EM.
*JeL:
     +              NMPLAS,
*END JeL.
     +              NMMYL,NMPOL,NMCAD,NMTAV,NMHE3,NMCH2,NMNYL6,
     +              NMAMG6M,NMIRON,
     +              ASCIN(2),ZSCIN(2),WSCIN(2),DSCIN,
     +              AN2G,ZN2G,DN2G,RN2G,
     +              AG10(2),ZG10(2),WG10(2),DG10,
     +              ASI,ZSI,DSI,RSI,ABSI,
     +              AXE,ZXE,DXE,RXE,
     +              ATRAD,ZTRAD,DTRAD,RTRAD,
     +              AAER,ZAER,DAER,RAER,
     +              D2SICA,D2SITR,
*EM:
     +              AG10C(4),ZG10C(4),WG10C(4),DG10C,
     +              AWCAL(3),ZWCAL(3),DWCAL,WWCAL(3),
     +              ACERA(4),ZCERA(4),WCERA(4),DCERA,
*END EM.
     +              AMYL(3),ZMYL(3),DMYL,WMYL(3),
     +              APOL(2),ZPOL(2),DPOL,WPOL(2),
     +              ACAD,ZCAD,DCAD,RCAD,
     +              ATAV(3),ZTAV(3),DTAV,WTAV(3),
     +              AHE3, ZHE3, DHE3, RHE3,
     +              APOLND(2),ZPOLND(2),DPOLND,WPOLND(2),
     +              ANYL6(4),ZNYL6(4),DNYL6,WNYL6(4),
     +              AAMG6M(2),ZAMG6M(2),DAMG6M,WAMG6M(2)     
C


1	cafagna	3.1	*
2	pamela	3.8	* $Id: gpmat.inc,v 3.7 2006/11/10 11:39:34 pam-ba Exp $
3	pamela	3.2	*
4			* $Log: gpmat.inc,v $
5	pamela	3.8	* Revision 3.7 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.7	* Revision 3.6 2006/10/13 16:36:58 pam-ba
9			* Added a new material, the cadmium, for ND
10			*
11	pam-ba	3.6	* Revision 3.5 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.5	* Revision 3.4 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.4	* Revision 3.3 2003/12/17 11:32:49 pamela
18			* CALO SIMULATION COMPLETED: geometry and special tracking parameters updated and simulation checked by a comparison with the Trieste's standalone Monte Carlo simulation
19			*
20	pamela	3.3	* Revision 3.2 2002/12/05 10:17:42 pamela
21			* Update CAS and CALO geometries and positions. Makefile updated as well
22			*
23	pamela	3.2	* Revision 3.1.1.1 2002/07/11 16:02:00 cafagna
24			* First GPAMELA release on CVS
25	cafagna	3.1	*
26			*
27			*
28			* gpmat.inc
29			*
30	pamela	3.2	* 03/10/2002 10.42.39 by Jens Lund
31	cafagna	3.1	*CMZ : 2.02/00 11/10/2000 20.14.33 by Francesco Cafagna
32			*CMZ : 2.01/00 05/04/2000 14.35.17 by Marialuigia Ambriola
33			*CMZ : 2.00/00 03/03/2000 15.39.05 by Francesco Cafagna
34			*CMZ : 1.02/00 18/03/97 18.25.29 by Francesco Cafagna
35			*CMZ : 1.00/02 15/03/96 17.47.37 by Francesco Cafagna
36			*-- Author : Francesco Cafagna 05/12/95
37			C
38			C Common with material definitions
39			C
40			C
41			C Plast. sci: H 50%, C 50% , Rho=1.032 g/cm**3 from P.D.Book
42			C G10 : SiO2 60%, Epoxy 40%, Rho=1.7 g/cm**3 from P.D.Book
43			C Epoxy from CRC handbook (Raw estimation)
44			c G10C : Si 53%, O 30%, C 15%, H 2%, Rho=1.7 g/cm**3 from Mirko,
45			C for Calorimeter
46			C N2 (Gas) : A=14.01, Z=7, Rho=1.25 g/l
47			C Silicon : A=28.09, Z=14,Rho=2.33 g/cm**3, X0=9.36 from P.D.Book
48			C Xenon : A=131.29, Z=54,Rho=5.858 g/l, X0=1447.6cm from P.D.Book
49			C TRD rad. : Carbon fiber with density 0.060 g/cm**3, used in TS93
50			C Aerogel : A=96.11, Z=54 (Comp. n(SiO2)+2n(H2O)), Rho=.2g/cm**3 (Ave.),
51			C X0=150 cm, from P.D.Book
52			C Tungsten : W 95%, Cu 2.5%, Ni 2.5%, Rho=18.1 g/cm**3 from Mirko-Aerostudi
53			C Kaolinite : Al 21%, Si 21.7%, O 55.8%, H 1.5% Rho=2.594 g/cm**3 (insulator
54			C for calorimeter) from Mirko et al.
55	pam-ba	3.4	C Mylar : C5H4O2: Rho=1.39 g/cm**3 from P. D. Book
56	pam-ba	3.5	C Polystirene: C8H8: from P. D. Book Rho=35 g/l=350 g/cm**3 from Beppe Osteria
57	pam-ba	3.7	C Cadmium : for ND: A=, Z=, Rho=, Xo=
58			C He3 : from Leonov: Z=2, A=3 Rho=.001246 g/cm3, Xo=107.86 cm
59			C Polyethylene(CH2): for ND from Leonv: A=12.011,1.00794, Z=6,1, Rho=.93 g/cm3
60			C TAV : Titanium alloy for top plate: Ti(90%), Al(6%), Va(4%):
61			c Z=(22,13,23), A=(47.867,26.9815,50.9415),Rho=4.49234 g/cm3
62	pamela	3.8	C NYL6 : Nylon 6 for shell external cover:(NH(CH2)5CO)n, 6C, 11H, 1O, 1N
63			c Z=(6,1,8,7), A=(12.011,1.00794,15.9994,14.00674), Rho=1.14 g/cm3
64			C AMG6M : AMg6M for top container (TSPH volume): Al(94%), Mg(6%)
65			C Z=(13,12), A=(26.9815,24.3050), Rho=2.610 g/cm3
66	cafagna	3.1	C
67			C The NM*** numbers are the material numbers in the JMATE structure
68			C Note that the Silicon has been duplicate to allow the changing of
69			C the special tracking parameter for both TRACKER and CALORIMETER
70			C
71			C
72			C For Silicon special parameter has been added to be used in the Straggling
73			C simulation. These parameter are stored into the User word in the JMAT
74			C structure
75			C
76			INTEGER NMSCIN,NMG10,NMN2,NMSITR,NMSICA,NMXE,NMTRAD,NMAER
77			*EM:
78			INTEGER NMCERA,NMG10C,NMWCAL
79			*END EM.
80	pamela	3.2	*JeL:
81			INTEGER NMPLAS
82			*END JeL.
83	pamela	3.8	INTEGER NMMYL,NMPOL,NMCAD,NMTAV,NMHE3,NMCH2,NMNYL6,NMAMG6M
84	cafagna	3.1	REAL ASCIN,ZSCIN,WSCIN,DSCIN,
85			+ AN2G,ZN2G,DN2G,RN2G,
86			+ AG10,ZG10,WG10,DG10,
87			+ AG10C,ZG10C,WG10C,DG10C,
88	pamela	3.3	+ ASI ,ZSI ,DSI ,RSI, ABSI,
89	cafagna	3.1	+ AXE ,ZXE ,DXE ,RXE,
90			+ ATRAD ,ZTRAD ,DTRAD ,RTRAD,
91			+ AAER ,ZAER ,DAER ,RAER,
92			+ D2SICA,D2SITR,
93			+ AWCAL,ZWCAL,DWCAL,WWCAL,
94	pam-ba	3.4	+ ACERA,ZCERA,DCERA,WCERA,
95	pam-ba	3.5	+ AMYL,ZMYL,DMYL,WMYL,
96	pam-ba	3.6	+ APOL,ZPOL,DPOL,WPOL,
97	pam-ba	3.7	+ ACAD,ZCAD,DCAD,RCAD,
98			+ ATAV,ZTAV,DTAV,WTAV,
99			+ AHE3,ZHE3,DHE3,RHE3,
100	pamela	3.8	+ APOLND,ZPOLND,DPOLND,WPOLND,
101			+ ANYL6,ZNYL6,DNYL6,WNYL6,
102			+ AAMG6M,ZAMG6M,DAMG6M,WAMG6M
103	cafagna	3.1	COMMON/GPCMAT/ NMSCIN,NMG10,NMN2,NMSITR,NMSICA,NMXE,NMTRAD,NMAER,
104			*EM:
105			+ NMCERA,NMG10C,NMWCAL,
106			*END EM.
107	pamela	3.2	*JeL:
108			+ NMPLAS,
109			*END JeL.
110	pamela	3.8	+ NMMYL,NMPOL,NMCAD,NMTAV,NMHE3,NMCH2,NMNYL6,
111			+ NMAMG6M,NMIRON,
112	cafagna	3.1	+ ASCIN(2),ZSCIN(2),WSCIN(2),DSCIN,
113			+ AN2G,ZN2G,DN2G,RN2G,
114			+ AG10(2),ZG10(2),WG10(2),DG10,
115	pamela	3.3	+ ASI,ZSI,DSI,RSI,ABSI,
116	cafagna	3.1	+ AXE,ZXE,DXE,RXE,
117			+ ATRAD,ZTRAD,DTRAD,RTRAD,
118			+ AAER,ZAER,DAER,RAER,
119			+ D2SICA,D2SITR,
120			*EM:
121			+ AG10C(4),ZG10C(4),WG10C(4),DG10C,
122			+ AWCAL(3),ZWCAL(3),DWCAL,WWCAL(3),
123	pam-ba	3.4	+ ACERA(4),ZCERA(4),WCERA(4),DCERA,
124	cafagna	3.1	*END EM.
125	pam-ba	3.5	+ AMYL(3),ZMYL(3),DMYL,WMYL(3),
126	pam-ba	3.6	+ APOL(2),ZPOL(2),DPOL,WPOL(2),
127	pam-ba	3.7	+ ACAD,ZCAD,DCAD,RCAD,
128			+ ATAV(3),ZTAV(3),DTAV,WTAV(3),
129			+ AHE3, ZHE3, DHE3, RHE3,
130	pamela	3.8	+ APOLND(2),ZPOLND(2),DPOLND,WPOLND(2),
131			+ ANYL6(4),ZNYL6(4),DNYL6,WNYL6(4),
132			+ AAMG6M(2),ZAMG6M(2),DAMG6M,WAMG6M(2)
133	cafagna	3.1	C
134	pam-ba	3.7
135