| Geant4 Cross Reference |
1 // 1
2 // *******************************************
3 // * License and Disclaimer
4 // *
5 // * The Geant4 software is copyright of th
6 // * the Geant4 Collaboration. It is provided
7 // * conditions of the Geant4 Software License
8 // * LICENSE and available at http://cern.ch/
9 // * include a list of copyright holders.
10 // *
11 // * Neither the authors of this software syst
12 // * institutes,nor the agencies providing fin
13 // * work make any representation or warran
14 // * regarding this software system or assum
15 // * use. Please see the license in the file
16 // * for the full disclaimer and the limitatio
17 // *
18 // * This code implementation is the result
19 // * technical work of the GEANT4 collaboratio
20 // * By using, copying, modifying or distri
21 // * any work based on the software) you ag
22 // * use in resulting scientific publicati
23 // * acceptance of all terms of the Geant4 Sof
24 // *******************************************
25 //
26 /// \file electromagnetic/TestEm15/src/Detecto
27 /// \brief Implementation of the DetectorConst
28 //
29 //
30 //....oooOO0OOooo........oooOO0OOooo........oo
31 //....oooOO0OOooo........oooOO0OOooo........oo
32
33 #include "DetectorConstruction.hh"
34
35 #include "DetectorMessenger.hh"
36
37 #include "G4Box.hh"
38 #include "G4GeometryManager.hh"
39 #include "G4LogicalVolume.hh"
40 #include "G4LogicalVolumeStore.hh"
41 #include "G4Material.hh"
42 #include "G4NistManager.hh"
43 #include "G4PVPlacement.hh"
44 #include "G4PhysicalConstants.hh"
45 #include "G4PhysicalVolumeStore.hh"
46 #include "G4SolidStore.hh"
47 #include "G4SystemOfUnits.hh"
48 #include "G4UnitsTable.hh"
49
50 //....oooOO0OOooo........oooOO0OOooo........oo
51
52 DetectorConstruction::DetectorConstruction()
53 : G4VUserDetectorConstruction(),
54 fWorld(0),
55 fBox(0),
56 fMaterial(0),
57 fWMaterial(0),
58 fDetectorMessenger(0)
59 {
60 fBoxSize = 100 * m;
61 fWorldSize = 1.2 * fBoxSize;
62 DefineMaterials();
63 SetMaterial("Water");
64 fDetectorMessenger = new DetectorMessenger(t
65 }
66
67 //....oooOO0OOooo........oooOO0OOooo........oo
68
69 DetectorConstruction::~DetectorConstruction()
70 {
71 delete fDetectorMessenger;
72 }
73
74 //....oooOO0OOooo........oooOO0OOooo........oo
75
76 G4VPhysicalVolume* DetectorConstruction::Const
77 {
78 return ConstructVolumes();
79 }
80
81 //....oooOO0OOooo........oooOO0OOooo........oo
82
83 void DetectorConstruction::DefineMaterials()
84 {
85 //
86 // define Elements
87 //
88 G4double z, a;
89
90 G4Element* H = new G4Element("Hydrogen", "H"
91 G4Element* N = new G4Element("Nitrogen", "N"
92 G4Element* O = new G4Element("Oxygen", "O",
93 G4Element* Na = new G4Element("Sodium", "Na"
94 G4Element* Ge = new G4Element("Germanium", "
95 G4Element* I = new G4Element("Iodine", "I",
96 G4Element* Bi = new G4Element("Bismuth", "Bi
97
98 //
99 // define materials
100 //
101 G4double density;
102 G4int ncomponents, natoms;
103 G4double fractionmass;
104
105 G4Material* Air = new G4Material("Air", dens
106 Air->AddElement(N, fractionmass = 70. * perC
107 Air->AddElement(O, fractionmass = 30. * perC
108
109 G4Material* H2l = new G4Material("H2liquid",
110 H2l->AddElement(H, fractionmass = 1.);
111
112 G4Material* H2O = new G4Material("Water", de
113 H2O->AddElement(H, natoms = 2);
114 H2O->AddElement(O, natoms = 1);
115 H2O->SetChemicalFormula("H_2O");
116 H2O->GetIonisation()->SetMeanExcitationEnerg
117
118 new G4Material("liquidArgon", z = 18., a = 3
119
120 new G4Material("Carbon", z = 6., a = 12.01 *
121
122 new G4Material("Aluminium", z = 13., a = 26.
123
124 new G4Material("Silicon", z = 14., a = 28.09
125
126 new G4Material("Germanium", z = 32., a = 72.
127
128 G4Material* NaI = new G4Material("NaI", dens
129 NaI->AddElement(Na, natoms = 1);
130 NaI->AddElement(I, natoms = 1);
131 NaI->GetIonisation()->SetMeanExcitationEnerg
132
133 G4Material* Iod = new G4Material("Iodine", d
134 Iod->AddElement(I, natoms = 1);
135
136 G4Material* BGO = new G4Material("BGO", dens
137 BGO->AddElement(O, natoms = 12);
138 BGO->AddElement(Ge, natoms = 3);
139 BGO->AddElement(Bi, natoms = 4);
140
141 new G4Material("Iron", z = 26., a = 55.85 *
142
143 new G4Material("Tungsten", z = 74., a = 183.
144
145 new G4Material("Lead", z = 82., a = 207.19 *
146
147 new G4Material("Uranium", z = 92., a = 238.0
148
149 density = universe_mean_density; // from Ph
150 G4double pressure = 3.e-18 * pascal;
151 G4double temperature = 2.73 * kelvin;
152 G4Material* vacuum = new G4Material("Galacti
153 temperat
154
155 G4cout << *(G4Material::GetMaterialTable())
156
157 // default material
158 fWMaterial = vacuum;
159 }
160
161 //....oooOO0OOooo........oooOO0OOooo........oo
162
163 G4VPhysicalVolume* DetectorConstruction::Const
164 {
165 // Cleanup old geometry
166 G4GeometryManager::GetInstance()->OpenGeomet
167 G4PhysicalVolumeStore::GetInstance()->Clean(
168 G4LogicalVolumeStore::GetInstance()->Clean()
169 G4SolidStore::GetInstance()->Clean();
170
171 // World
172 //
173 G4Box* sWorld = new G4Box("World", // name
174 fWorldSize / 2, fW
175
176 G4LogicalVolume* lWorld = new G4LogicalVolum
177
178
179
180 fWorld = new G4PVPlacement(0, // no rotatio
181 G4ThreeVector(),
182 lWorld, // logic
183 "World", // name
184 0, // mother vo
185 false, // no boo
186 0); // copy numb
187
188 // Box
189 //
190 G4Box* sBox = new G4Box("Container", // its
191 fBoxSize / 2, fBoxSi
192
193 G4LogicalVolume* lBox = new G4LogicalVolume(
194
195
196
197 fBox = new G4PVPlacement(0, // no rotation
198 G4ThreeVector(), /
199 lBox, // its logic
200 fMaterial->GetName(
201 lWorld, // its mot
202 false, // no boole
203 0); // copy number
204
205 PrintParameters();
206
207 // always return the root volume
208 //
209 return fWorld;
210 }
211
212 //....oooOO0OOooo........oooOO0OOooo........oo
213
214 void DetectorConstruction::PrintParameters()
215 {
216 G4cout << "\n The Box is " << G4BestUnit(fBo
217 << G4endl;
218 }
219
220 //....oooOO0OOooo........oooOO0OOooo........oo
221
222 void DetectorConstruction::SetMaterial(G4Strin
223 {
224 // search the material by its name
225 G4Material* pttoMaterial = G4NistManager::In
226
227 if (pttoMaterial) {
228 fMaterial = pttoMaterial;
229 UpdateGeometry();
230 }
231 else {
232 G4cout << "\n--> warning from DetectorCons
233 << " not found" << G4endl;
234 }
235 }
236
237 //....oooOO0OOooo........oooOO0OOooo........oo
238
239 void DetectorConstruction::SetSize(G4double va
240 {
241 fBoxSize = value;
242 fWorldSize = 1.2 * fBoxSize;
243 UpdateGeometry();
244 }
245
246 //....oooOO0OOooo........oooOO0OOooo........oo
247
248 #include "G4RunManager.hh"
249
250 void DetectorConstruction::UpdateGeometry()
251 {
252 if (fWorld) G4RunManager::GetRunManager()->D
253 }
254
255 //....oooOO0OOooo........oooOO0OOooo........oo
256