| 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 exoticphysics/monopole/src/G4Monopol
27 /// \brief Implementation of the G4MonopolePhy
28 //
29 //
30 //--------------------------------------------
31 //
32 // ClassName: G4MonopolePhysics
33 //
34 // Author: V.Ivanchenko 13.03.2005
35 //
36 // Modified:
37 //
38 // 12.07.10 S.Burdin (changed the magnetic a
39 // from integer to double)
40 //--------------------------------------------
41 //
42 //
43 //....oooOO0OOooo........oooOO0OOooo........oo
44 //....oooOO0OOooo........oooOO0OOooo........oo
45
46 #include "G4MonopolePhysics.hh"
47
48 #include "G4BuilderType.hh"
49 #include "G4Monopole.hh"
50 #include "G4MonopolePhysicsMessenger.hh"
51 #include "G4MonopoleTransportation.hh"
52 #include "G4ParticleDefinition.hh"
53 #include "G4PhysicsListHelper.hh"
54 #include "G4ProcessManager.hh"
55 #include "G4ProcessVector.hh"
56 #include "G4StepLimiter.hh"
57 #include "G4SystemOfUnits.hh"
58 #include "G4Transportation.hh"
59 #include "G4hIonisation.hh"
60 #include "G4hMultipleScattering.hh"
61 #include "G4hhIonisation.hh"
62 #include "G4mplIonisation.hh"
63 #include "G4mplIonisationWithDeltaModel.hh"
64
65 //....oooOO0OOooo........oooOO0OOooo........oo
66
67 G4MonopolePhysics::G4MonopolePhysics(const G4S
68 : G4VPhysicsConstructor(nam), fMpl(nullptr)
69 {
70 fMagCharge = 1.0;
71 // fMagCharge = -1.0;
72 // fElCharge = -50.0;
73 fElCharge = 0.0;
74 fMonopoleMass = 100. * GeV;
75 SetPhysicsType(bUnknown);
76 fMessenger = new G4MonopolePhysicsMessenger(
77 }
78
79 //....oooOO0OOooo........oooOO0OOooo........oo
80
81 G4MonopolePhysics::~G4MonopolePhysics()
82 {
83 delete fMessenger;
84 }
85
86 //....oooOO0OOooo........oooOO0OOooo........oo
87
88 void G4MonopolePhysics::ConstructParticle()
89 {
90 if (!fMpl) {
91 fMpl = G4Monopole::MonopoleDefinition(fMon
92 }
93 else {
94 G4Monopole::Monopole();
95 }
96 }
97
98 //....oooOO0OOooo........oooOO0OOooo........oo
99
100 void G4MonopolePhysics::ConstructProcess()
101 {
102 if (verboseLevel > 0) {
103 G4cout << "G4MonopolePhysics::ConstructPro
104 }
105
106 G4PhysicsListHelper* ph = G4PhysicsListHelpe
107 G4ProcessManager* pmanager = fMpl->GetProces
108
109 // defined monopole parameters and binning
110 G4double magn = fMpl->MagneticCharge();
111 G4double emin = std::min(fMonopoleMass / 200
112 G4double emax = std::max(10. * TeV, fMonopol
113 G4int nbin = G4lrint(10 * std::log10(emax /
114
115 // dedicated trasporation
116 if (magn != 0.0) {
117 G4int idxt(0);
118 pmanager->RemoveProcess(idxt);
119 pmanager->AddProcess(new G4MonopoleTranspo
120 }
121
122 if (fMpl->GetPDGCharge() != 0.0) {
123 G4hIonisation* hhioni = new G4hIonisation(
124 hhioni->SetDEDXBinning(nbin);
125 hhioni->SetMinKinEnergy(emin);
126 hhioni->SetMaxKinEnergy(emax);
127 ph->RegisterProcess(hhioni, fMpl);
128 }
129 if (magn != 0.0) {
130 G4mplIonisation* mplioni = new G4mplIonisa
131 mplioni->SetDEDXBinning(nbin);
132 mplioni->SetMinKinEnergy(emin);
133 mplioni->SetMaxKinEnergy(emax);
134 ph->RegisterProcess(mplioni, fMpl);
135 }
136 ph->RegisterProcess(new G4StepLimiter(), fMp
137 }
138
139 //....oooOO0OOooo........oooOO0OOooo........oo
140
141 void G4MonopolePhysics::SetMagneticCharge(G4do
142 {
143 if (fMpl) {
144 G4Exception("G4MonopolePhysics", "01", Jus
145 "Cannot set value when monopol
146 }
147 else {
148 fMagCharge = val;
149 }
150 }
151
152 //....oooOO0OOooo........oooOO0OOooo........oo
153
154 void G4MonopolePhysics::SetElectricCharge(G4do
155 {
156 if (fMpl) {
157 G4Exception("G4MonopolePhysics", "01", Jus
158 "Cannot set value when monopol
159 }
160 else {
161 fElCharge = val;
162 }
163 }
164
165 //....oooOO0OOooo........oooOO0OOooo........oo
166
167 void G4MonopolePhysics::SetMonopoleMass(G4doub
168 {
169 if (fMpl) {
170 G4Exception("G4MonopolePhysics", "01", Jus
171 "Cannot set value when monopol
172 }
173 else {
174 fMonopoleMass = mass;
175 }
176 }
177
178 //....oooOO0OOooo........oooOO0OOooo........oo
179