Geant4  10.01.p01
G4NeutronHPMessenger.cc
Go to the documentation of this file.
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 "G4NeutronHPMessenger.hh"
27 #include "G4NeutronHPManager.hh"
28 
29 #include "G4UIdirectory.hh"
30 #include "G4UIcmdWithAString.hh"
31 
33 :manager(man)
34 {
35  NeutronHPDir = new G4UIdirectory( "/process/had/neutron_hp/" );
36  NeutronHPDir->SetGuidance( "UI commands of NeutronHP" );
37 
38  PhotoEvaCmd = new G4UIcmdWithAString("/process/had/neutron_hp/use_photo_evaporation",this);
39  PhotoEvaCmd->SetGuidance(" Force the use of the Photon Evaporation model, instead of the neutron capture final state data.");
40  PhotoEvaCmd->SetParameterName("choice",false);
41  PhotoEvaCmd->SetCandidates("true false");
43 
44  SkipMissingCmd = new G4UIcmdWithAString("/process/had/neutron_hp/skip_missing_isotopes",this);
45  SkipMissingCmd->SetGuidance("Use only exact isotope data files, instead of allowing nearby isotope files to be used.");
46  SkipMissingCmd->SetGuidance("In this case if the exact file is not available, the cross section will be set to zero.");
47  SkipMissingCmd->SetParameterName("choice",false);
48  SkipMissingCmd->SetCandidates("true false");
50 
51  NeglectDopplerCmd = new G4UIcmdWithAString("/process/had/neutron_hp/neglect_Doppler_broadening",this);
52  NeglectDopplerCmd->SetGuidance("Switch off the Doppler broadening due to the thermal motion of the target nucleus.");
53  NeglectDopplerCmd->SetGuidance("This option provides a significant CPU performance advantage.");
54  NeglectDopplerCmd->SetParameterName("choice",false);
55  NeglectDopplerCmd->SetCandidates("true false");
57 
58  DoNotAdjustFSCmd = new G4UIcmdWithAString("/process/had/neutron_hp/do_not_adjust_final_state",this);
59  DoNotAdjustFSCmd->SetGuidance("Disable to adjust final state for getting better conservation.");
60  DoNotAdjustFSCmd->SetParameterName("choice",false);
61  DoNotAdjustFSCmd->SetCandidates("true false");
63 
64  ProduceFissionFragementCmd = new G4UIcmdWithAString("/process/had/neutron_hp/produce_fission_fragment",this);
65  ProduceFissionFragementCmd->SetGuidance("Enable to generate fission fragments.");
69 }
70 
72 {
73  delete NeutronHPDir;
74  delete PhotoEvaCmd;
75  delete SkipMissingCmd;
76  delete NeglectDopplerCmd;
77  delete DoNotAdjustFSCmd;
79 }
80 
82 {
83  G4bool bValue=false;
84  if ( newValue == "true" ) bValue=true;
85 
86  if ( command == PhotoEvaCmd ) {
88  }
89  if ( command == SkipMissingCmd) {
90  manager->SetSkipMissingIsotopes( bValue );
91  }
92  if ( command == NeglectDopplerCmd ) {
93  manager->SetNeglectDoppler( bValue );
94  }
95  if ( command == DoNotAdjustFSCmd ) {
97  }
98  if ( command == ProduceFissionFragementCmd ) {
100  }
101 }
102 
void SetParameterName(const char *theName, G4bool omittable, G4bool currentAsDefault=false)
void SetProduceFissionFragments(G4bool val)
void SetNewValue(G4UIcommand *, G4String)
G4UIcmdWithAString * NeglectDopplerCmd
void SetUseOnlyPhotoEvaporation(G4bool val)
G4NeutronHPManager * manager
bool G4bool
Definition: G4Types.hh:79
void SetGuidance(const char *aGuidance)
Definition: G4UIcommand.hh:161
void AvailableForStates(G4ApplicationState s1)
Definition: G4UIcommand.cc:239
G4UIcmdWithAString * DoNotAdjustFSCmd
G4UIcmdWithAString * SkipMissingCmd
G4NeutronHPMessenger(G4NeutronHPManager *)
G4UIcmdWithAString * ProduceFissionFragementCmd
void SetDoNotAdjustFinalState(G4bool val)
void SetNeglectDoppler(G4bool val)
G4UIdirectory * NeutronHPDir
G4UIcmdWithAString * PhotoEvaCmd
void SetCandidates(const char *candidateList)
void SetSkipMissingIsotopes(G4bool val)