LArSoft  v07_13_02
Liquid Argon Software toolkit - http://larsoft.org/
Qmaterials.cc
Go to the documentation of this file.
1 //
2 // ********************************************************************
3 // * License and Disclaimer *
4 // * *
5 // * The Geant4 software is copyright of the Copyright Holders of *
6 // * the Geant4 Collaboration. It is provided under the terms and *
7 // * conditions of the Geant4 Software License, included in the file *
8 // * LICENSE and available at http://cern.ch/geant4/license . These *
9 // * include a list of copyright holders. *
10 // * *
11 // * Neither the authors of this software system, nor their employing *
12 // * institutes,nor the agencies providing financial support for this *
13 // * work make any representation or warranty, express or implied, *
14 // * regarding this software system or assume any liability for its *
15 // * use. Please see the license in the file LICENSE and URL above *
16 // * for the full disclaimer and the limitation of liability. *
17 // * *
18 // * This code implementation is the result of the scientific and *
19 // * technical work of the GEANT4 collaboration. *
20 // * By using, copying, modifying or distributing the software (or *
21 // * any work based on the software) you agree to acknowledge its *
22 // * use in resulting scientific publications, and indicate your *
23 // * acceptance of all terms of the Geant4 Software license. *
24 // ********************************************************************
25 //
26 // $Id: Qmaterials.cc 66892 2013-01-17 10:57:59Z gunter $
27 // ====================================================================
28 // Qmaterials.cc
29 //
30 // 2005 Q
31 // ====================================================================
32 #include "G4Material.hh"
33 #include "G4SystemOfUnits.hh"
34 #include "G4PhysicalConstants.hh"
35 
37 void Construct()
39 {
40  G4double A, Z;
41 
42  // ------------------------------------------------------------------------
43  // Elements
44  // ------------------------------------------------------------------------
45  G4Element* elH = new G4Element("Hydrogen","H", Z=1., A=1.00794*g/mole);
46  G4Element* elC = new G4Element("Carbon", "C", Z=6., A= 12.011 *g/mole);
47  G4Element* elN = new G4Element("Nitrogen","N", Z=7., A= 14.00674*g/mole);
48  G4Element* elO = new G4Element("Oxygen", "O", Z=8., A= 15.9994*g/mole);
49  G4Element* elNa = new G4Element("Sodium", "Na", Z=11., A= 22.989768*g/mole);
50  G4Element* elSi = new G4Element("Silicon", "Si", Z=14., A= 28.0855*g/mole);
51  G4Element* elAr = new G4Element("Argon", "Ar", Z=18., A= 39.948*g/mole);
52  G4Element* elI = new G4Element("Iodine", "I", Z=53., A= 126.90447*g/mole);
53  G4Element* elCs = new G4Element("Cesium", "Cs", Z=55., A= 132.90543*g/mole);
54 
55  // ------------------------------------------------------------------------
56  // Materials
57  // ------------------------------------------------------------------------
58  G4double density, massfraction;
59  G4int natoms, nel;
60 
61  // temperature of experimental hall is controlled at 20 degree.
62  const G4double expTemp= STP_Temperature+20.*kelvin;
63 
64  // vacuum
65  density= universe_mean_density;
66  G4Material* Vacuum= new G4Material("Vacuum", density, nel=2);
67  Vacuum-> AddElement(elN, .7);
68  Vacuum-> AddElement(elO, .3);
69 
70  // air
71  density= 1.2929e-03 *g/cm3; // at 20 degree
72  G4Material* Air= new G4Material("Air", density, nel=3,
73  kStateGas, expTemp);
74  G4double ttt= 75.47+23.20+1.28;
75  Air-> AddElement(elN, massfraction= 75.47/ttt);
76  Air-> AddElement(elO, massfraction= 23.20/ttt);
77  Air-> AddElement(elAr, massfraction= 1.28/ttt);
78 
79  // Ar gas
80  A= 39.948 *g/mole;
81  const G4double denAr= 1.782e-03 *g/cm3 * STP_Temperature/expTemp;
82  G4Material* Ar= new G4Material("ArgonGas", Z=18., A, denAr,
83  kStateGas, expTemp);
84 
85  // ethane (C2H6)
86  const G4double denEthane= 1.356e-3 *g/cm3 * STP_Temperature/expTemp;
87  G4Material* Ethane= new G4Material("Ethane", denEthane, nel=2,
88  kStateGas, expTemp);
89  Ethane-> AddElement(elC, natoms=2);
90  Ethane-> AddElement(elH, natoms=6);
91 
92  // Ar(50%) + ethane(50%) mixture
93  density= (denAr+denEthane)/2.;
94  G4Material* ArEthane= new G4Material("ArEthane", density, nel=2,
95  kStateGas, expTemp);
96  ArEthane-> AddMaterial(Ar, massfraction= denAr/density/2.);
97  ArEthane-> AddMaterial(Ethane, massfraction= denEthane/density/2.);
98 
99  // silicon
100  A= 28.0855 *g/mole;
101  density= 2.33 *g/cm3;
102  G4Material* Si= new G4Material("SiliconWafer", Z=14., A, density);
103 
104  // alminium
105  A= 26.98 *g/mole;
106  density= 2.70 *g/cm3;
107  G4Material* Al= new G4Material("Al", Z=13., A, density);
108 
109  // iron
110  A= 55.847 *g/mole;
111  density= 7.87 *g/cm3;
112  G4Material* Fe= new G4Material("Iron", Z=26., A, density);
113 
114  // lead
115  A= 207.2 *g/mole;
116  density= 11.35 *g/cm3;
117  G4Material* Pb= new G4Material("Lead", Z=82., A, density);
118 
119  // scintillator (Polystyene(C6H5CH=CH2))
120  density= 1.032 *g/cm3;
121  G4Material* Scinti= new G4Material("Scinti", density, nel=2);
122  Scinti-> AddElement(elC, natoms=8);
123  Scinti-> AddElement(elH, natoms=8);
124 
125  // quartz (SiO2, crystalline)
126  density= 2.64 *g/cm3;
127  G4Material* Quartz= new G4Material("Quartz", density, nel= 2);
128  Quartz-> AddElement(elSi, natoms=1);
129  Quartz-> AddElement(elO, natoms=2);
130 
131  // NaI crystal
132  density= 3.67 *g/cm3;
133  G4Material* NaI= new G4Material("NaI", density, nel= 2);
134  NaI-> AddElement(elNa, natoms=1);
135  NaI-> AddElement(elI, natoms=1);
136 
137  // CsI crystal
138  density= 4.51 *g/cm3;
139  G4Material* CsI= new G4Material("CsI", density, nel= 2);
140  CsI-> AddElement(elCs, natoms=1);
141  CsI-> AddElement(elI, natoms=1);
142 
143 }
Float_t Z
Definition: plot.C:39
void Construct()
Definition: Qmaterials.cc:37