| 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 // G4VContinuousDiscreteProcess class implemen
27 //
28 // Authors:
29 // - 2 December 1995, G.Cosmo - First implemen
30 // - 8 January 1997, H.Kurashige - New Physics
31 // -------------------------------------------
32
33 #include "G4VContinuousDiscreteProcess.hh"
34 #include "G4SystemOfUnits.hh"
35
36 #include "G4Step.hh"
37 #include "G4Track.hh"
38 #include "G4MaterialTable.hh"
39 #include "G4VParticleChange.hh"
40
41 // -------------------------------------------
42 G4VContinuousDiscreteProcess::G4VContinuousDis
43 : G4VProcess("No Name Discrete Process")
44 {
45 G4Exception("G4VContinuousDiscreteProcess::G
46 "ProcMan102", JustWarning, "Defa
47 }
48
49 // -------------------------------------------
50 G4VContinuousDiscreteProcess::
51 G4VContinuousDiscreteProcess(const G4String& a
52 : G4VProcess(aName, aType)
53 {
54 enableAtRestDoIt = false;
55 }
56
57 // -------------------------------------------
58 G4VContinuousDiscreteProcess::~G4VContinuousDi
59 {
60 }
61
62 // -------------------------------------------
63 G4VContinuousDiscreteProcess::
64 G4VContinuousDiscreteProcess(G4VContinuousDisc
65 : G4VProcess(right),
66 valueGPILSelection(right.valueGPILSelectio
67 {
68 }
69
70 // -------------------------------------------
71 G4double G4VContinuousDiscreteProcess::
72 PostStepGetPhysicalInteractionLength( const G4
73 G4double
74 G4ForceC
75 {
76 if ( (previousStepSize <=0.0) || (theNumberO
77 {
78 // beginning of tracking (or just after Do
79 ResetNumberOfInteractionLengthLeft();
80 }
81 else if ( previousStepSize > 0.0)
82 {
83 // subtract NumberOfInteractionLengthLeft
84 SubtractNumberOfInteractionLengthLeft(prev
85 }
86 else
87 {
88 // zero step
89 // DO NOTHING
90 }
91
92 // condition is set to "Not Forced"
93 *condition = NotForced;
94
95 // get mean free path
96 currentInteractionLength = GetMeanFreePath(t
97
98 G4double value;
99 if (currentInteractionLength < DBL_MAX)
100 {
101 value = theNumberOfInteractionLengthLeft *
102 }
103 else
104 {
105 value = DBL_MAX;
106 }
107 #ifdef G4VERBOSE
108 if (verboseLevel>1)
109 {
110 G4cout << "G4VContinuousDiscreteProcess::P
111 G4cout << "[ " << GetProcessName() << "]"
112 track.GetDynamicParticle()->DumpInfo();
113 G4cout << " in Material " << track.GetMa
114 G4cout << "InteractionLength= " << value/c
115 }
116 #endif
117 return value;
118 }
119
120 // -------------------------------------------
121 G4VParticleChange*
122 G4VContinuousDiscreteProcess::PostStepDoIt( co
123 co
124 {
125 // clear NumberOfInteractionLengthLeft
126 ClearNumberOfInteractionLengthLeft();
127
128 return pParticleChange;
129 }
130
131 // -------------------------------------------
132 G4VParticleChange*
133 G4VContinuousDiscreteProcess::AlongStepDoIt( c
134 c
135 {
136 // clear NumberOfInteractionLengthLeft
137 ClearNumberOfInteractionLengthLeft();
138
139 return pParticleChange;
140 }
141
142 // -------------------------------------------
143 G4double G4VContinuousDiscreteProcess::
144 AlongStepGetPhysicalInteractionLength( const G
145 G4doubl
146 G4doubl
147 G4doubl
148 G4GPILS
149 {
150 // GPILSelection is set to defaule value of
151 valueGPILSelection = CandidateForSelection;
152
153 // get Step limit proposed by the process
154 G4double steplength = GetContinuousStepLimit
155
156 // set return value for G4GPILSelection
157 *selection = valueGPILSelection;
158
159 #ifdef G4VERBOSE
160 if (verboseLevel>1)
161 {
162 G4cout << "G4VContinuousDiscreteProcess::A
163 G4cout << "[ " << GetProcessName() << "]"
164 track.GetDynamicParticle()->DumpInfo();
165 G4cout << " in Material " << track.GetMa
166 G4cout << "IntractionLength= " << stepleng
167 }
168 #endif
169 return steplength;
170 }
171