| 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 //
27 //--------------------------------------------
28 //
29 // ClassName: G4PhysListFactoryMessenger
30 //
31 // Author: 2017 V.Ivanchenko
32 //
33 //--------------------------------------------
34 //
35
36 #include "G4PhysListFactoryMessenger.hh"
37 #include "G4VModularPhysicsList.hh"
38 #include "G4RadioactiveDecayPhysics.hh"
39 #include "G4OpticalPhysics.hh"
40 #include "G4ThermalNeutrons.hh"
41 #include "G4NeutrinoPhysics.hh"
42 #include "G4ChargeExchangePhysics.hh"
43
44 G4PhysListFactoryMessenger::G4PhysListFactoryM
45 {
46 //G4cout << "### G4PhysListFactoryMessenger
47 thePhysList = pl;
48
49 theDir = new G4UIdirectory("/physics_lists/f
50 theDir->SetGuidance("commands for configurat
51
52 theRadDecay = new G4UIcommand("/physics_list
53 theRadDecay->SetGuidance("Enable radioactive
54 theRadDecay->AvailableForStates(G4State_PreI
55
56 theOptical = new G4UIcommand("/physics_lists
57 theOptical->SetGuidance("Enable optical phys
58 theOptical->AvailableForStates(G4State_PreIn
59
60 theThermal = new G4UIcommand("/physics_lists
61 theThermal->SetGuidance("Enable special elas
62 theThermal->SetGuidance("Important note: to
63 theThermal->AvailableForStates(G4State_PreIn
64
65 theNeutrino = new G4UIcommand("/physics_list
66 theNeutrino->SetGuidance("Enable physics pro
67 theNeutrino->AvailableForStates(G4State_PreI
68
69 theChargeEx = new G4UIcommand("/physics_list
70 theChargeEx->SetGuidance("Enable charge exch
71 theChargeEx->AvailableForStates(G4State_PreI
72 }
73
74 G4PhysListFactoryMessenger::~G4PhysListFactory
75 {
76 delete theThermal;
77 delete theOptical;
78 delete theRadDecay;
79 delete theNeutrino;
80 delete theChargeEx;
81 delete theDir;
82 }
83
84 void G4PhysListFactoryMessenger::SetNewValue(G
85 {
86 G4int ver = thePhysList->GetVerboseLevel();
87 if (aComm == theRadDecay) {
88 thePhysList->RegisterPhysics(new G4Radioac
89 } else if (aComm == theOptical) {
90 thePhysList->RegisterPhysics(new G4Optical
91 } else if (aComm == theThermal) {
92 thePhysList->RegisterPhysics(new G4Thermal
93 } else if (aComm == theNeutrino) {
94 thePhysList->RegisterPhysics(new G4Neutrin
95 } else if(aComm == theChargeEx) {
96 thePhysList->RegisterPhysics(new G4ChargeE
97 }
98 }
99