| Geant4 Cross Reference |
1 // 1 //
2 // ******************************************* 2 // ********************************************************************
3 // * License and Disclaimer 3 // * License and Disclaimer *
4 // * 4 // * *
5 // * The Geant4 software is copyright of th 5 // * The Geant4 software is copyright of the Copyright Holders of *
6 // * the Geant4 Collaboration. It is provided 6 // * the Geant4 Collaboration. It is provided under the terms and *
7 // * conditions of the Geant4 Software License 7 // * conditions of the Geant4 Software License, included in the file *
8 // * LICENSE and available at http://cern.ch/ 8 // * LICENSE and available at http://cern.ch/geant4/license . These *
9 // * include a list of copyright holders. 9 // * include a list of copyright holders. *
10 // * 10 // * *
11 // * Neither the authors of this software syst 11 // * Neither the authors of this software system, nor their employing *
12 // * institutes,nor the agencies providing fin 12 // * institutes,nor the agencies providing financial support for this *
13 // * work make any representation or warran 13 // * work make any representation or warranty, express or implied, *
14 // * regarding this software system or assum 14 // * regarding this software system or assume any liability for its *
15 // * use. Please see the license in the file 15 // * use. Please see the license in the file LICENSE and URL above *
16 // * for the full disclaimer and the limitatio 16 // * for the full disclaimer and the limitation of liability. *
17 // * 17 // * *
18 // * This code implementation is the result 18 // * This code implementation is the result of the scientific and *
19 // * technical work of the GEANT4 collaboratio 19 // * technical work of the GEANT4 collaboration. *
20 // * By using, copying, modifying or distri 20 // * By using, copying, modifying or distributing the software (or *
21 // * any work based on the software) you ag 21 // * any work based on the software) you agree to acknowledge its *
22 // * use in resulting scientific publicati 22 // * use in resulting scientific publications, and indicate your *
23 // * acceptance of all terms of the Geant4 Sof 23 // * acceptance of all terms of the Geant4 Software license. *
24 // ******************************************* 24 // ********************************************************************
25 // 25 //
26 #include "F01RunAction.hh" 26 #include "F01RunAction.hh"
>> 27 #include "globals.hh"
>> 28 #include "G4SystemOfUnits.hh"
>> 29 #include "G4Run.hh"
27 30
28 #include "G4CoupledTransportation.hh" <<
29 #include "G4Electron.hh" <<
30 #include "G4ParticleDefinition.hh" 31 #include "G4ParticleDefinition.hh"
>> 32 #include "G4Electron.hh"
31 #include "G4ProcessManager.hh" 33 #include "G4ProcessManager.hh"
32 #include "G4Run.hh" <<
33 #include "G4SystemOfUnits.hh" <<
34 #include "G4Transportation.hh" 34 #include "G4Transportation.hh"
35 #include "globals.hh" << 35 #include "G4CoupledTransportation.hh"
36 36
37 //....oooOO0OOooo........oooOO0OOooo........oo << 37 F01RunAction::F01RunAction() {
>> 38 fWarningEnergy = 1.0 * CLHEP::kiloelectronvolt; // Arbitrary
>> 39 fImportantEnergy = 10.0 * CLHEP::kiloelectronvolt; // Arbitrary
>> 40 fNumberOfTrials = 15; // Arbitrary
>> 41 // Applications should determine these thresholds according to
>> 42 // - physics requirements, and
>> 43 // - the computing cost of continuing integration for looping tracks
>> 44 }
38 45
39 void F01RunAction::BeginOfRunAction(const G4Ru << 46 F01RunAction::~F01RunAction() {}
40 { << 47
>> 48 //------------------------------------------------------------------------------
>> 49
>> 50
>> 51 void F01RunAction::BeginOfRunAction( const G4Run* aRun ) {
41 G4cout << "### Run " << aRun->GetRunID() << 52 G4cout << "### Run " << aRun->GetRunID() << " start." << G4endl;
42 53
43 G4cout << " Calling F01RunAction::ChangeLoop 54 G4cout << " Calling F01RunAction::ChangeLooperParameters() " << G4endl;
44 ChangeLooperParameters(G4Electron::Definitio << 55 ChangeLooperParameters( G4Electron::Definition() );
45 } 56 }
46 57
47 //....oooOO0OOooo........oooOO0OOooo........oo << 58 //------------------------------------------------------------------------------
48 59
49 void F01RunAction::ChangeLooperParameters(cons << 60 void F01RunAction::
>> 61 ChangeLooperParameters(const G4ParticleDefinition* particleDef )
50 { 62 {
51 if (particleDef == nullptr) particleDef = G4 << 63 if( particleDef == nullptr )
52 auto transport = FindTransportation(particle << 64 particleDef = G4Electron::Definition();
>> 65 auto transport= FindTransportation( particleDef );
53 66
54 // Note that all particles that share the sa 67 // Note that all particles that share the same Transportation
55 // (or Coupled Transportation) process (wit 68 // (or Coupled Transportation) process (with this particle)
56 // will be affected by this change 69 // will be affected by this change
57 // -- to change these parameters by partic 70 // -- to change these parameters by particle type, the values
58 // must instead be changed/reset in a ( 71 // must instead be changed/reset in a (Start) Tracking Action.
59 72
60 G4cout << " ChangeLooperParameters called wi << 73 G4cout << " ChangeLooperParameters called with particle type "
>> 74 << particleDef->GetParticleName()
61 << " transport process: "; 75 << " transport process: ";
62 if (transport != nullptr) { << 76 if( transport != nullptr ) {
63 G4cout << transport->GetProcessName(); 77 G4cout << transport->GetProcessName();
64 } << 78 } else {
65 else { <<
66 G4cout << " UNKNOWN -- it is neither G4Tra 79 G4cout << " UNKNOWN -- it is neither G4Transportation nor G4CoupledTransportation";
67 } 80 }
68 G4cout << G4endl; 81 G4cout << G4endl;
69 << 82
70 if (transport != nullptr) { << 83 if( transport != nullptr ) {
71 if (fWarningEnergy >= 0.0) { << 84 if( fWarningEnergy >= 0.0 ){
72 transport->SetThresholdWarningEnergy(fWa << 85 transport->SetThresholdWarningEnergy( fWarningEnergy );
73 G4cout << "-- Changed Threshold Warning 86 G4cout << "-- Changed Threshold Warning Energy (for loopers) = "
74 << fWarningEnergy / CLHEP::MeV << << 87 << fWarningEnergy / CLHEP::MeV << " MeV " << G4endl;
75 } 88 }
76 if (fImportantEnergy >= 0.0) { << 89 if( fImportantEnergy >= 0.0 ) {
77 transport->SetThresholdImportantEnergy(f << 90 transport->SetThresholdImportantEnergy( fImportantEnergy );
78 << 91
79 G4cout << "-- Changed Threshold Importan 92 G4cout << "-- Changed Threshold Important Energy (for loopers) = "
80 << fImportantEnergy / CLHEP::MeV << 93 << fImportantEnergy / CLHEP::MeV << " MeV " << G4endl;
81 } 94 }
82 << 95
83 if (fNumberOfTrials > 0) { << 96 if( fNumberOfTrials > 0 ) {
84 transport->SetThresholdTrials(fNumberOfT << 97 transport->SetThresholdTrials( fNumberOfTrials );
85 << 98
86 G4cout << "-- Changed number of Trials ( 99 G4cout << "-- Changed number of Trials (for loopers) = " << fNumberOfTrials << G4endl;
87 } 100 }
88 } 101 }
89 << 102
90 if (transport == nullptr) { << 103 if( transport == nullptr ) {
91 if (fWarningEnergy >= 0.0) << 104 if( fWarningEnergy >= 0.0 )
92 G4cerr << " Unknown transport process> C << 105 G4cerr << " Unknown transport process> Cannot change Warning Energy. " << G4endl;
93 if (fImportantEnergy >= 0.0) << 106 if( fImportantEnergy >= 0.0 )
94 G4cerr << " Unknown transport process> C << 107 G4cerr << " Unknown transport process> Cannot change 'Important' Energy. " << G4endl;
95 if (fNumberOfTrials > 0) << 108 if( fNumberOfTrials > 0 )
96 G4cerr << " Unknown transport process> C << 109 G4cerr << " Unknown transport process> Cannot change number of trials. " << G4endl;
97 } 110 }
98 } 111 }
99 112
100 //....oooOO0OOooo........oooOO0OOooo........oo << 113 //------------------------------------------------------------------------------
101 114
102 void F01RunAction::EndOfRunAction(const G4Run* << 115 void F01RunAction::EndOfRunAction( const G4Run* ) {
103 { << 116 if( fVerboseLevel > 1 )
104 if (fVerboseLevel > 1) << 117 G4cout << G4endl << G4endl
105 G4cout << G4endl << G4endl << " ########## << 118 << " ########### Track Statistics for Transportation process(es) "
106 << " ########### " << G4endl << " # << 119 << " ########### " << G4endl
107 << " ####################### " << G << 120 << " ############################################## "
108 << 121 << " ####################### " << G4endl << G4endl;
109 auto transport = FindTransportation(G4Electr << 122
110 if (transport) { << 123 auto transport= FindTransportation( G4Electron::Definition() );
111 transport->PrintStatistics(G4cout); << 124 if( transport) {
>> 125 transport->PrintStatistics(G4cout);
112 } 126 }
113 } 127 }
114 128
115 //....oooOO0OOooo........oooOO0OOooo........oo << 129 //------------------------------------------------------------------------------
116 130
117 G4Transportation* F01RunAction::FindTransporta << 131 G4Transportation*
118 << 132 F01RunAction::FindTransportation( const G4ParticleDefinition* particleDef,
>> 133 bool reportError )
119 { 134 {
120 const auto* partPM = particleDef->GetProcess << 135 const auto *partPM= particleDef->GetProcessManager();
121 << 136
122 G4VProcess* partTransport = partPM->GetProce 137 G4VProcess* partTransport = partPM->GetProcess("Transportation");
123 auto transport = dynamic_cast<G4Transportati << 138 auto transport= dynamic_cast<G4Transportation*>(partTransport);
124 139
125 if (!transport) { << 140 if( !transport ){
126 partTransport = partPM->GetProcess("Couple << 141 partTransport = partPM->GetProcess("CoupledTransportation");
127 auto coupledTransport = dynamic_cast<G4Cou << 142 auto coupledTransport=
128 if (coupledTransport) { << 143 dynamic_cast<G4CoupledTransportation*>(partTransport);
129 transport = coupledTransport; << 144 if( coupledTransport ) {
130 } << 145 transport= coupledTransport;
131 else { << 146 } else {
132 partTransport = partPM->GetProcess("Tran << 147 partTransport = partPM->GetProcess("TransportationWithMsc");
133 auto transportWithMsc = dynamic_cast<G4C << 148 auto transportWithMsc=
134 if (transportWithMsc) { << 149 dynamic_cast<G4CoupledTransportation*>(partTransport);
135 transport = transportWithMsc; << 150 if( transportWithMsc ) {
136 } << 151 transport= transportWithMsc;
137 } << 152 }
>> 153 }
>> 154 }
>> 155
>> 156 if( reportError && !transport )
>> 157 {
>> 158 G4cerr << "Unable to find Transportation process for particle type "
>> 159 << particleDef->GetParticleName()
>> 160 << " ( PDG code = " << particleDef->GetPDGEncoding() << " ) "
>> 161 << G4endl;
138 } 162 }
139 << 163
140 if (reportError && !transport) { <<
141 G4cerr << "Unable to find Transportation p <<
142 << particleDef->GetParticleName() < <<
143 << " ) " << G4endl; <<
144 } <<
145 <<
146 return transport; 164 return transport;
147 } 165 }
148 166