ECCE @ EIC Software
 All Classes Namespaces Files Functions Variables Typedefs Enumerations Enumerator Friends Macros Groups Pages
G4ParticleHPMessenger.cc
Go to the documentation of this file. Or view the newest version in sPHENIX GitHub for file G4ParticleHPMessenger.cc
1 //
2 // ********************************************************************
3 // * License and Disclaimer *
4 // * *
5 // * The Geant4 software is copyright of the Copyright Holders of *
6 // * the Geant4 Collaboration. It is provided under the terms and *
7 // * conditions of the Geant4 Software License, included in the file *
8 // * LICENSE and available at http://cern.ch/geant4/license . These *
9 // * include a list of copyright holders. *
10 // * *
11 // * Neither the authors of this software system, nor their employing *
12 // * institutes,nor the agencies providing financial support for this *
13 // * work make any representation or warranty, express or implied, *
14 // * regarding this software system or assume any liability for its *
15 // * use. Please see the license in the file LICENSE and URL above *
16 // * for the full disclaimer and the limitation of liability. *
17 // * *
18 // * This code implementation is the result of the scientific and *
19 // * technical work of the GEANT4 collaboration. *
20 // * By using, copying, modifying or distributing the software (or *
21 // * any work based on the software) you agree to acknowledge its *
22 // * use in resulting scientific publications, and indicate your *
23 // * acceptance of all terms of the Geant4 Software license. *
24 // ********************************************************************
25 //
26 #include "G4ParticleHPMessenger.hh"
27 #include "G4ParticleHPManager.hh"
28 
29 #include "G4UIdirectory.hh"
30 #include "G4UIcmdWithAString.hh"
31 #include "G4UIcmdWithAnInteger.hh"
32 
34 :manager(man)
35 {
36  ParticleHPDir = new G4UIdirectory( "/process/had/particle_hp/" );
37  ParticleHPDir->SetGuidance( "UI commands of ParticleHP" );
38 
39  PhotoEvaCmd = new G4UIcmdWithAString("/process/had/particle_hp/use_photo_evaporation",this);
40  PhotoEvaCmd->SetGuidance(" Force the use of the Photon Evaporation model, instead of the neutron capture final state data.");
41  PhotoEvaCmd->SetParameterName("choice",false);
42  PhotoEvaCmd->SetCandidates("true false");
44 
45  SkipMissingCmd = new G4UIcmdWithAString("/process/had/particle_hp/skip_missing_isotopes",this);
46  SkipMissingCmd->SetGuidance("Use only exact isotope data files, instead of allowing nearby isotope files to be used.");
47  SkipMissingCmd->SetGuidance("In this case if the exact file is not available, the cross section will be set to zero.");
48  SkipMissingCmd->SetParameterName("choice",false);
49  SkipMissingCmd->SetCandidates("true false");
51 
52  NeglectDopplerCmd = new G4UIcmdWithAString("/process/had/particle_hp/neglect_Doppler_broadening",this);
53  NeglectDopplerCmd->SetGuidance("Switch off the Doppler broadening due to the thermal motion of the target nucleus.");
54  NeglectDopplerCmd->SetGuidance("This option provides a significant CPU performance advantage.");
55  NeglectDopplerCmd->SetParameterName("choice",false);
56  NeglectDopplerCmd->SetCandidates("true false");
58 
59  DoNotAdjustFSCmd = new G4UIcmdWithAString("/process/had/particle_hp/do_not_adjust_final_state",this);
60  DoNotAdjustFSCmd->SetGuidance("Disable to adjust final state for getting better conservation.");
61  DoNotAdjustFSCmd->SetParameterName("choice",false);
62  DoNotAdjustFSCmd->SetCandidates("true false");
64 
65  ProduceFissionFragementCmd = new G4UIcmdWithAString("/process/had/particle_hp/produce_fission_fragment",this);
66  ProduceFissionFragementCmd->SetGuidance("Enable to generate fission fragments.");
70 
71  NRESP71Cmd = new G4UIcmdWithAString("/process/had/particle_hp/use_NRESP71_model",this);
72  NRESP71Cmd->SetGuidance("Enable to use NRESP71 model for n on C reaction");
73  NRESP71Cmd->SetParameterName("choice",false);
74  NRESP71Cmd->SetCandidates("true false");
76 
77  VerboseCmd = new G4UIcmdWithAnInteger("/process/had/particle_hp/verbose",this);
78  VerboseCmd->SetGuidance("Set Verbose level of ParticleHP package");
79  VerboseCmd->SetParameterName("verbose_level",true);
81  VerboseCmd->SetRange("verbose_level >=0");
83 }
84 
86 {
87  delete ParticleHPDir;
88  delete PhotoEvaCmd;
89  delete SkipMissingCmd;
90  delete NeglectDopplerCmd;
91  delete DoNotAdjustFSCmd;
93  delete VerboseCmd;
94 }
95 
97 {
98  G4bool bValue=false;
99  if ( newValue == "true" ) bValue=true;
100 
101  if ( command == PhotoEvaCmd ) {
103  }
104  if ( command == SkipMissingCmd) {
105  manager->SetSkipMissingIsotopes( bValue );
106  }
107  if ( command == NeglectDopplerCmd ) {
108  manager->SetNeglectDoppler( bValue );
109  }
110  if ( command == DoNotAdjustFSCmd ) {
111  manager->SetDoNotAdjustFinalState( bValue );
112  }
113  if ( command == ProduceFissionFragementCmd ) {
115  }
116  if ( command == NRESP71Cmd ) {
117  manager->SetUseNRESP71Model( bValue );
118  }
119  if ( command == VerboseCmd ) {
121  }
122 }
123