| 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 SteppingAction.cc
27 /// \brief Implementation of the SteppingActio
28 //
29 //
30
31 //....oooOO0OOooo........oooOO0OOooo........oo
32 //....oooOO0OOooo........oooOO0OOooo........oo
33
34 #include "SteppingAction.hh"
35
36 #include "Run.hh"
37
38 #include "G4IonTable.hh"
39 #include "G4LossTableManager.hh"
40 #include "G4ParticleDefinition.hh"
41 #include "G4ParticleTypes.hh"
42 #include "G4Step.hh"
43 #include "G4StepPoint.hh"
44 #include "G4SystemOfUnits.hh"
45 #include "G4TouchableHistory.hh"
46 #include "G4Track.hh"
47 #include "G4VPhysicalVolume.hh"
48 #include "G4VSolid.hh"
49 #include "G4VTouchable.hh"
50
51 const std::array<G4String, SteppingAction::fkN
52 SteppingAction::fkArrayScoringVolumeNames =
53
54 const std::array<G4String, SteppingAction::fkN
55 SteppingAction::fkArrayKinematicRegionNames
56
57 const std::array<G4String, SteppingAction::fkN
58 SteppingAction::fkArrayParticleTypeNames = {
59
60
61
62 //....oooOO0OOooo........oooOO0OOooo........oo
63
64 G4int SteppingAction::GetIndex(const G4int iSc
65 const G4int iPa
66 {
67 G4int index = -1;
68 if (iScoringVolume >= 0 && iScoringVolume <
69 && iKinematicRegion < fkNumberKinematicR
70 && iParticleType < fkNumberParticleTypes
71 {
72 index = iScoringVolume * fkNumberKinematic
73 + iKinematicRegion * fkNumberParti
74 }
75 if (index < 0 || index >= fkNumberCombinatio
76 G4cerr << "SteppingAction::GetIndex : WRON
77 index = 0;
78 }
79 return index;
80 }
81
82 //....oooOO0OOooo........oooOO0OOooo........oo
83
84 SteppingAction::SteppingAction() : G4UserStepp
85 {
86 Initialize();
87 }
88
89 //....oooOO0OOooo........oooOO0OOooo........oo
90
91 void SteppingAction::Initialize()
92 {
93 // Initialization needed at the beginning of
94 fPrimaryParticleId = 0;
95 fPrimaryParticleEnergy = 0.0;
96 fPrimaryParticleDirection = G4ThreeVector(0.
97 fTargetMaterialName = "";
98 fIsFirstStepOfTheEvent = true;
99 fIsFirstStepInTarget = true;
100 fIsFirstStepInScoringUpDown = true;
101 fIsFirstStepInScoringSide = true;
102 fCubicVolumeScoringUpDown = 1.0;
103 fCubicVolumeScoringSide = 1.0;
104 for (G4int i = 0; i < fkNumberCombinations;
105 fArraySumStepLengths[i] = 0.0;
106 }
107 /*
108 for ( G4int i = 0; i < fkNumberCombinations;
109 G4cout << " fkNumberCombinations=" << fkNumb
110 for ( G4int i = 0; i < fkNumberScoringVolume
111 for ( G4int j = 0; j < fkNumberKinematicRe
112 for ( G4int k = 0; k < fkNumberParticleT
113 G4int index = GetIndex( i, j, k );
114 G4cout << "(i, j, k)=(" << i << ", " <
115 if ( fArraySumStepLengths[ index ] < 1
116 else
117 G4cout << G4endl;
118 }
119 }
120 }
121 for ( G4int i = 0; i < fkNumberCombinations;
122 if ( fArraySumStepLengths[i] > 999.0 ) G4c
123 }
124 */
125 }
126
127 //....oooOO0OOooo........oooOO0OOooo........oo
128
129 void SteppingAction::UserSteppingAction(const
130 {
131 // Get information on the primary particle
132 if (fIsFirstStepOfTheEvent) {
133 if (theStep->GetTrack()->GetParentID() ==
134 fPrimaryParticleId = theStep->GetTrack()
135 fPrimaryParticleEnergy = theStep->GetPre
136 fPrimaryParticleDirection = theStep->Get
137 if (fRunPtr) {
138 fRunPtr->SetPrimaryParticleId(fPrimary
139 fRunPtr->SetPrimaryParticleEnergy(fPri
140 fRunPtr->SetPrimaryParticleDirection(f
141 }
142 fIsFirstStepOfTheEvent = false;
143 }
144 }
145 // Get information on the target material
146 if (fIsFirstStepInTarget
147 && theStep->GetPreStepPoint()->GetPhysic
148 {
149 fTargetMaterialName = theStep->GetPreStepP
150 if (fRunPtr) fRunPtr->SetTargetMaterialNam
151 fIsFirstStepInTarget = false;
152 }
153 // Get information on step lengths in the sc
154 G4int iScoringVolume = -1;
155 if (theStep->GetPreStepPoint()->GetPhysicalV
156 iScoringVolume = 0;
157 if (fIsFirstStepInScoringUpDown) {
158 fCubicVolumeScoringUpDown =
159 theStep->GetTrack()->GetVolume()->GetL
160 if (fRunPtr) fRunPtr->SetCubicVolumeScor
161 fIsFirstStepInScoringUpDown = false;
162 }
163 }
164 else if (theStep->GetPreStepPoint()->GetPhys
165 iScoringVolume = 1;
166 if (fIsFirstStepInScoringSide) {
167 fCubicVolumeScoringSide =
168 theStep->GetTrack()->GetVolume()->GetL
169 if (fRunPtr) fRunPtr->SetCubicVolumeScor
170 fIsFirstStepInScoringSide = false;
171 }
172 }
173 else if (theStep->GetPreStepPoint()->GetPhys
174 iScoringVolume = 2;
175 if (fIsFirstStepInScoringUpDown) {
176 fCubicVolumeScoringUpDown =
177 theStep->GetTrack()->GetVolume()->GetL
178 if (fRunPtr) fRunPtr->SetCubicVolumeScor
179 fIsFirstStepInScoringUpDown = false;
180 }
181 }
182 if (iScoringVolume >= 0) {
183 // In the case of the upstream scoring vol
184 // is opposite with respect to the primary
185 // for avoiding to account the incoming, p
186 if (iScoringVolume == 2
187 && fPrimaryParticleDirection.dot(theSt
188 {
189 return;
190 }
191 G4double stepLength = theStep->GetTrack()-
192 G4int absPdg = theStep->GetTrack()->GetDef
193 ? 0
194 : std::abs(theStep->GetTr
195 /*
196 G4cout << std::setprecision(6)
197 << theStep->GetTrack()->GetDefiniti
198 << " Ekin[MeV]=" << theStep->GetPr
199 << " (rho,z)[mm]=(" << theStep->Ge
200 << "," << theStep->GetTrack()->GetP
201 << " " << theStep->GetTrack()->Get
202 << " " << theStep->GetTrack()->Get
203 << " L[mm]=" << stepLength << " "
204 << ( fPrimaryParticleDirection.dot(
205 theStep->GetPreStepPoint()->
206 ? "forward" : "backward" )
207 << G4endl;
208 */
209 // Three kinematical regions: [0] : any v
210 G4int iKinematicRegion = theStep->GetPreSt
211 G4int iParticleType = -1;
212 if (absPdg == 11)
213 iParticleType = 1; // electron (and pos
214 else if (absPdg == 22)
215 iParticleType = 2; // gamma
216 else if (absPdg == 13)
217 iParticleType = 3; // muons (mu- and mu
218 else if (absPdg == 12 || absPdg == 14 || a
219 iParticleType = 4; // neutrinos
220 //(and anti-neutrinos), all flavors
221 else if (absPdg == 111 || absPdg == 211)
222 iParticleType = 5; // (charged) pions
223 else if (absPdg == 2112)
224 iParticleType = 6; // neutron (and anti
225 else if (absPdg == 2212)
226 iParticleType = 7; // proton (and anti
227 else if (G4IonTable::IsIon(theStep->GetTra
228 G4IonTable::IsAntiIon(theStep->Ge
229 iParticleType = 8;
230 else if (absPdg < 1000)
231 iParticleType = 9; // other mesons (e.g
232 // in m
233 else if (absPdg > 1000)
234 iParticleType = 10; // other baryons (e
235 // etc.)
236 // Consider the specific case : scoring vo
237 G4int index = GetIndex(iScoringVolume, iKi
238 fArraySumStepLengths[index] += stepLength;
239 // Consider the "all" particle case, with
240 index = GetIndex(iScoringVolume, iKinemati
241 fArraySumStepLengths[index] += stepLength;
242 // Consider the "any" kinematic region cas
243 index = GetIndex(iScoringVolume, 0, iParti
244 fArraySumStepLengths[index] += stepLength;
245 // Consider the "any" kinematic region and
246 index = GetIndex(iScoringVolume, 0, 0);
247 fArraySumStepLengths[index] += stepLength;
248 if (fRunPtr) fRunPtr->SetSteppingArray(fAr
249 }
250 }
251
252 //....oooOO0OOooo........oooOO0OOooo........oo
253