| 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 hadronic/Hadr00/src/DetectorConstruc
27 /// \brief Implementation of the DetectorConst
28 //
29 //
30 //////////////////////////////////////////////
31 //
32 // DetectorConstruction
33 //
34 // Created: 20.06.2008 V.Ivanchenko
35 //
36 // Modified:
37 //
38 //////////////////////////////////////////////
39 //
40
41 #include "DetectorConstruction.hh"
42
43 #include "DetectorMessenger.hh"
44
45 #include "G4Colour.hh"
46 #include "G4GeometryManager.hh"
47 #include "G4LogicalVolume.hh"
48 #include "G4LogicalVolumeStore.hh"
49 #include "G4NistManager.hh"
50 #include "G4PVPlacement.hh"
51 #include "G4PhysicalConstants.hh"
52 #include "G4PhysicalVolumeStore.hh"
53 #include "G4RunManager.hh"
54 #include "G4SolidStore.hh"
55 #include "G4SystemOfUnits.hh"
56 #include "G4Tubs.hh"
57 #include "G4UnitsTable.hh"
58 #include "G4VisAttributes.hh"
59 #include "G4ios.hh"
60
61 //....oooOO0OOooo........oooOO0OOooo........oo
62
63 DetectorConstruction::DetectorConstruction()
64 : G4VUserDetectorConstruction(),
65 fTargetMaterial(nullptr),
66 fWorldMaterial(nullptr),
67 fSolidW(nullptr),
68 fSolidA(nullptr),
69 fLogicTarget(nullptr),
70 fLogicWorld(nullptr),
71 fPhysWorld(nullptr),
72 fPhysList(nullptr)
73 {
74 fDetectorMessenger = new DetectorMessenger(t
75
76 fRadius = 5. * cm;
77 fLength = 10. * cm;
78
79 fTargetMaterial = G4NistManager::Instance()-
80 fWorldMaterial = G4NistManager::Instance()->
81
82 ComputeGeomParameters();
83 }
84
85 //....oooOO0OOooo........oooOO0OOooo........oo
86
87 DetectorConstruction::~DetectorConstruction()
88 {
89 delete fDetectorMessenger;
90 }
91
92 void DetectorConstruction::ComputeGeomParamete
93 {
94 // Sizes
95 fWorldR = fRadius + CLHEP::cm;
96 fWorldZ = fLength + CLHEP::cm;
97 if (fPhysWorld) {
98 fSolidW->SetOuterRadius(fWorldR);
99 fSolidW->SetZHalfLength(fWorldZ * 0.5);
100 fSolidA->SetOuterRadius(fRadius);
101 fSolidA->SetZHalfLength(fLength * 0.5);
102 }
103 }
104
105 G4VPhysicalVolume* DetectorConstruction::Const
106 {
107 if (fPhysWorld) {
108 return fPhysWorld;
109 }
110 ComputeGeomParameters();
111
112 //
113 // World
114 //
115 fSolidW = new G4Tubs("World", 0., fWorldR, 0
116 fLogicWorld = new G4LogicalVolume(fSolidW, f
117 fPhysWorld =
118 new G4PVPlacement(nullptr, G4ThreeVector(0
119
120 //
121 // Target volume
122 //
123 fSolidA = new G4Tubs("Target", 0., fRadius,
124 fLogicTarget = new G4LogicalVolume(fSolidA,
125 new G4PVPlacement(nullptr, G4ThreeVector(),
126
127 G4cout << "### Target consist of " << fTarge
128 << " disks with R(mm)= " << fRadius /
129 << G4endl;
130
131 // colors
132 fLogicWorld->SetVisAttributes(G4VisAttribute
133
134 G4VisAttributes* regCcolor = new G4VisAttrib
135 fLogicTarget->SetVisAttributes(regCcolor);
136
137 G4cout << *(G4Material::GetMaterialTable())
138
139 return fPhysWorld;
140 }
141
142 //....oooOO0OOooo........oooOO0OOooo........oo
143
144 void DetectorConstruction::SetTargetMaterial(c
145 {
146 // search the material by its name
147 G4Material* material = G4NistManager::Instan
148
149 if (material && material != fTargetMaterial)
150 fTargetMaterial = material;
151 if (fLogicTarget) {
152 fLogicTarget->SetMaterial(fTargetMateria
153 }
154 G4RunManager::GetRunManager()->PhysicsHasB
155 }
156 }
157
158 //....oooOO0OOooo........oooOO0OOooo........oo
159
160 void DetectorConstruction::SetWorldMaterial(co
161 {
162 // search the material by its name
163 G4Material* material = G4NistManager::Instan
164
165 if (material && material != fWorldMaterial)
166 fWorldMaterial = material;
167 if (fLogicWorld) {
168 fLogicWorld->SetMaterial(fWorldMaterial)
169 }
170 G4RunManager::GetRunManager()->PhysicsHasB
171 }
172 }
173
174 void DetectorConstruction::SetTargetRadius(G4d
175 {
176 if (val > 0.0 && val != fRadius) {
177 fRadius = val;
178 ComputeGeomParameters();
179 }
180 }
181
182 //....oooOO0OOooo........oooOO0OOooo........oo
183
184 void DetectorConstruction::SetTargetLength(G4d
185 {
186 if (val > 0.0 && val != fLength) {
187 fLength = val;
188 ComputeGeomParameters();
189 }
190 }
191
192 //....oooOO0OOooo........oooOO0OOooo........oo
193