source: trunk/source/processes/cuts/src/G4ProductionCutsTableMessenger.cc@ 1176

Last change on this file since 1176 was 1007, checked in by garnier, 17 years ago

update to geant4.9.2

File size: 5.4 KB
Line 
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//
27// $Id: G4ProductionCutsTableMessenger.cc,v 1.1 2008/03/02 10:52:55 kurasige Exp $
28// GEANT4 tag $Name: geant4-09-02 $
29//
30//
31//---------------------------------------------------------------
32//
33// G4ProductionCutsTableMessenger.cc
34// ------------------------------------------------------------
35// History
36// first version 02 Mar. 2008 by H.Kurashige
37//
38
39#include "G4ProductionCutsTableMessenger.hh"
40#include "G4ProductionCutsTable.hh"
41
42#include "G4UIdirectory.hh"
43#include "G4UIcmdWithoutParameter.hh"
44#include "G4UIcmdWithAnInteger.hh"
45#include "G4UIcmdWithADoubleAndUnit.hh"
46#include "G4UIcmdWithAString.hh"
47#include "G4ios.hh"
48#include "G4Tokenizer.hh"
49
50#include <sstream>
51
52G4ProductionCutsTableMessenger::G4ProductionCutsTableMessenger( G4ProductionCutsTable* pTable)
53 :theCutsTable(pTable)
54{
55 // /cuts/ directory
56 theDirectory = new G4UIdirectory("/cuts/");
57 theDirectory->SetGuidance("Commands for G4VUserPhysicsList.");
58
59 // /cuts/verbose command
60 verboseCmd = new G4UIcmdWithAnInteger("/cuts/verbose",this);
61 verboseCmd->SetGuidance("Set the Verbose level of G4ProductionCutsTable.");
62 verboseCmd->SetGuidance(" 0 : Silent (default)");
63 verboseCmd->SetGuidance(" 1 : Display warning messages");
64 verboseCmd->SetGuidance(" 2 : Display more info");
65 verboseCmd->SetGuidance(" 2 : Display debug info");
66 verboseCmd->SetParameterName("level",true);
67 verboseCmd->SetDefaultValue(0);
68 verboseCmd->SetRange("level >=0 && level <=3");
69
70 // /cuts/setLowEdge command
71 setLowEdgeCmd = new G4UIcmdWithADoubleAndUnit("/cuts/setLowEdge",this);
72 setLowEdgeCmd->SetGuidance("Set low edge energy value ");
73 setLowEdgeCmd->SetParameterName("edge",false);
74 setLowEdgeCmd->SetDefaultValue(0.99);
75 setLowEdgeCmd->SetRange("edge >0.0");
76 setLowEdgeCmd->SetDefaultUnit("keV");
77 setLowEdgeCmd->AvailableForStates(G4State_PreInit);
78
79 // /cuts/setHighEdge command
80 setHighEdgeCmd = new G4UIcmdWithADoubleAndUnit("/cuts/setHighEdge",this);
81 setHighEdgeCmd->SetGuidance("Set high edge energy value ");
82 setHighEdgeCmd->SetParameterName("edge",false);
83 setHighEdgeCmd->SetDefaultValue(100.0);
84 setHighEdgeCmd->SetRange("edge >0.0");
85 setHighEdgeCmd->SetDefaultUnit("TeV");
86 setHighEdgeCmd->AvailableForStates(G4State_PreInit);
87
88 // /cuts/dump command
89 dumpCmd = new G4UIcmdWithoutParameter("/cuts/dump",this);
90 dumpCmd->SetGuidance("Dump cuplues in ProductuinCutsTable. ");
91
92}
93
94G4ProductionCutsTableMessenger::~G4ProductionCutsTableMessenger()
95{
96 delete dumpCmd;
97 delete setHighEdgeCmd;
98 delete setLowEdgeCmd;
99 delete verboseCmd;
100 delete theDirectory;
101}
102
103void G4ProductionCutsTableMessenger::SetNewValue(G4UIcommand * command,
104 G4String newValue)
105{
106 if( command==verboseCmd ) {
107 theCutsTable->SetVerboseLevel(verboseCmd->GetNewIntValue(newValue));
108
109 } else if( command==dumpCmd ){
110 theCutsTable-> DumpCouples();
111
112 } else if( command==setLowEdgeCmd ){
113 G4double lowEdge = setLowEdgeCmd->GetNewDoubleValue(newValue);
114 G4double highEdge = theCutsTable->GetHighEdgeEnergy();
115 theCutsTable->SetEnergyRange(lowEdge, highEdge);
116
117 } else if( command==setHighEdgeCmd ){
118 G4double highEdge = setHighEdgeCmd->GetNewDoubleValue(newValue);
119 G4double lowEdge = theCutsTable->GetLowEdgeEnergy();
120 theCutsTable->SetEnergyRange(lowEdge, highEdge);
121
122 }
123}
124
125G4String G4ProductionCutsTableMessenger::GetCurrentValue(G4UIcommand * command)
126{
127 G4String cv;
128
129 if( command==verboseCmd ){
130 cv = verboseCmd->ConvertToString(theCutsTable->GetVerboseLevel());
131
132 } else if( command==setLowEdgeCmd ){
133 G4double lowEdge = theCutsTable->GetLowEdgeEnergy();
134 cv = setLowEdgeCmd->ConvertToString( lowEdge, "keV" );
135
136 } else if( command==setHighEdgeCmd ){
137 G4double highEdge = theCutsTable->GetHighEdgeEnergy();
138 cv = setHighEdgeCmd->ConvertToString( highEdge, "TeV" );
139 }
140
141 return cv;
142
143}
144
Note: See TracBrowser for help on using the repository browser.