| 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 // ClassName: G4HadronicParametersMessenger
28 // Author: Alberto Ribon
29 // Date: May 2020
30 //--------------------------------------------
31
32 #include "G4HadronicParametersMessenger.hh"
33 #include "G4UIdirectory.hh"
34 #include "G4UIcommand.hh"
35 #include "G4UIcmdWithAnInteger.hh"
36 #include "G4UIcmdWithADoubleAndUnit.hh"
37 #include "G4UIcmdWithABool.hh"
38 #include "G4HadronicParameters.hh"
39
40
41 G4HadronicParametersMessenger::G4HadronicParam
42 theHadronicParameters( inputHadParam )
43 {
44 // Main directory for the whole hadronic
45 theDirectory = new G4UIdirectory( "/process/
46 theDirectory->SetGuidance( "Control of gener
47
48 // This command setup the overall verbose le
49 // It is the responsibility of all hadronic
50 // this verbose level and behave consistentl
51 // should be no print out regardless of thei
52 theVerboseCmd = new G4UIcmdWithAnInteger( "/
53 theVerboseCmd->SetGuidance( "Set verbose lev
54 theVerboseCmd->SetParameterName( "VerboseLev
55 theVerboseCmd->SetDefaultValue( 1 );
56 theVerboseCmd->SetRange( "VerboseLevel>=0" )
57 theVerboseCmd->AvailableForStates( G4State_P
58
59 // This command sets the max energy for hadr
60 theMaxEnergyCmd = new G4UIcmdWithADoubleAndU
61 theMaxEnergyCmd->SetGuidance( "Max energy fo
62 theMaxEnergyCmd->SetParameterName( "MaxEnerg
63 theMaxEnergyCmd->SetUnitCategory( "Energy" )
64 theMaxEnergyCmd->SetRange( "MaxEnergy>0.0" )
65 theMaxEnergyCmd->AvailableForStates( G4State
66
67 // This command enable the Cosmic Ray (CR) c
68 theCRCoalescenceCmd = new G4UIcmdWithABool(
69 theCRCoalescenceCmd->SetGuidance( "Enable Co
70 theCRCoalescenceCmd->SetParameterName( "Enab
71 theCRCoalescenceCmd->SetDefaultValue( false
72 }
73
74
75 G4HadronicParametersMessenger::~G4HadronicPara
76 delete theDirectory;
77 delete theVerboseCmd;
78 delete theMaxEnergyCmd;
79 delete theCRCoalescenceCmd;
80 }
81
82
83 void G4HadronicParametersMessenger::SetNewValu
84 if ( command == theVerboseCmd ) {
85 // Note that the messenger updates only th
86 // it is the responsibility of each hadron
87 // this verbose level and behave according
88 theHadronicParameters->SetVerboseLevel( th
89 } else if ( command == theMaxEnergyCmd ) {
90 theHadronicParameters->SetMaxEnergy( theMa
91 } else if ( command == theCRCoalescenceCmd )
92 theHadronicParameters->SetEnableCRCoalesce
93 }
94 }
95