| Geant4 Cross Reference |
>> 1 // This code implementation is the intellectual property of
>> 2 // the GEANT4 collaboration.
1 // 3 //
2 // ******************************************* << 4 // By copying, distributing or modifying the Program (or any work
3 // * License and Disclaimer << 5 // based on the Program) you indicate your acceptance of this statement,
4 // * << 6 // and all its terms.
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 // 7 //
26 // G4VContinuousDiscreteProcess class implemen << 8 // $Id: G4VContinuousDiscreteProcess.cc,v 1.1.10.1 1999/12/07 20:52:50 gunter Exp $
>> 9 // GEANT4 tag $Name: geant4-01-01 $
27 // 10 //
28 // Authors: << 11 //
29 // - 2 December 1995, G.Cosmo - First implemen << 12 // --------------------------------------------------------------
30 // - 8 January 1997, H.Kurashige - New Physics << 13 // GEANT 4 class implementation file
31 // ------------------------------------------- << 14 //
>> 15 // For information related to this code contact:
>> 16 // CERN, CN Division, ASD Group
>> 17 // History: first implementation, based on object model of
>> 18 // 2nd December 1995, G.Cosmo
>> 19 // --------------------------------------------------------------
>> 20 // New Physics scheme 8 Jan. 1997 H.Kurahige
>> 21 // ------------------------------------------------------------
32 22
33 #include "G4VContinuousDiscreteProcess.hh" 23 #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 24 G4VContinuousDiscreteProcess::G4VContinuousDiscreteProcess()
43 : G4VProcess("No Name Discrete Process") << 25 :G4VProcess("No Name Discrete Process")
44 { 26 {
45 G4Exception("G4VContinuousDiscreteProcess::G << 27 G4Exception("G4VContinuousDiscreteProcess:: default constructor is called");
46 "ProcMan102", JustWarning, "Defa <<
47 } 28 }
48 29
49 // ------------------------------------------- << 30 G4VContinuousDiscreteProcess::G4VContinuousDiscreteProcess(const G4String& aName , G4ProcessType aType)
50 G4VContinuousDiscreteProcess:: << 31 : G4VProcess(aName, aType)
51 G4VContinuousDiscreteProcess(const G4String& a <<
52 : G4VProcess(aName, aType) <<
53 { 32 {
54 enableAtRestDoIt = false; <<
55 } 33 }
56 34
57 // ------------------------------------------- <<
58 G4VContinuousDiscreteProcess::~G4VContinuousDi 35 G4VContinuousDiscreteProcess::~G4VContinuousDiscreteProcess()
59 { 36 {
60 } 37 }
61 38
62 // ------------------------------------------- << 39 G4VContinuousDiscreteProcess::G4VContinuousDiscreteProcess(G4VContinuousDiscreteProcess& right)
63 G4VContinuousDiscreteProcess:: << 40 : G4VProcess(right)
64 G4VContinuousDiscreteProcess(G4VContinuousDisc <<
65 : G4VProcess(right), <<
66 valueGPILSelection(right.valueGPILSelectio <<
67 { 41 {
68 } 42 }
69 43
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 44
120 // ------------------------------------------- <<
121 G4VParticleChange* <<
122 G4VContinuousDiscreteProcess::PostStepDoIt( co <<
123 co <<
124 { <<
125 // clear NumberOfInteractionLengthLeft <<
126 ClearNumberOfInteractionLengthLeft(); <<
127 45
128 return pParticleChange; <<
129 } <<
130 46
131 // ------------------------------------------- <<
132 G4VParticleChange* <<
133 G4VContinuousDiscreteProcess::AlongStepDoIt( c <<
134 c <<
135 { <<
136 // clear NumberOfInteractionLengthLeft <<
137 ClearNumberOfInteractionLengthLeft(); <<
138 47
139 return pParticleChange; <<
140 } <<
141 48
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 49
153 // get Step limit proposed by the process <<
154 G4double steplength = GetContinuousStepLimit <<
155 50
156 // set return value for G4GPILSelection <<
157 *selection = valueGPILSelection; <<
158 51
159 #ifdef G4VERBOSE << 52
160 if (verboseLevel>1) << 53
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 54