Geant4
9.6.p02
Main Page
Related Pages
Modules
Namespaces
Classes
Files
File List
File Members
All
Classes
Namespaces
Files
Functions
Variables
Typedefs
Enumerations
Enumerator
Friends
Macros
Groups
Pages
geant4_9_6_p02
examples
extended
optical
wls
src
WLSRunActionMessenger.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
//
28
//
29
//
30
//
31
32
#include "
globals.hh
"
33
#include "
Randomize.hh
"
34
35
#include "
G4UImanager.hh
"
36
37
#include "
G4UIdirectory.hh
"
38
#include "
G4UIcmdWithABool.hh
"
39
#include "
G4UIcmdWithAString.hh
"
40
#include "
G4UIcmdWithADouble.hh
"
41
#include "
G4UIcmdWithAnInteger.hh
"
42
#include "
G4UIcmdWithADoubleAndUnit.hh
"
43
44
#include "
WLSRunAction.hh
"
45
#include "
WLSRunActionMessenger.hh
"
46
47
WLSRunActionMessenger::WLSRunActionMessenger
(
WLSRunAction
* RA)
48
: runAction (RA)
49
{
50
RndmDir =
new
G4UIdirectory
(
"/rndm/"
);
51
RndmDir->
SetGuidance
(
"Rndm status control."
);
52
53
RndmSaveCmd =
new
G4UIcmdWithAnInteger
(
"/rndm/save"
,
this
);
54
RndmSaveCmd->
55
SetGuidance(
"set frequency to save rndm status on external files."
);
56
RndmSaveCmd->
SetGuidance
(
"freq = 0 not saved"
);
57
RndmSaveCmd->
SetGuidance
(
"freq > 0 saved on: beginOfRun.rndm"
);
58
RndmSaveCmd->
SetGuidance
(
"freq = 1 saved on: endOfRun.rndm"
);
59
RndmSaveCmd->
SetGuidance
(
"freq = 2 saved on: endOfEvent.rndm"
);
60
RndmSaveCmd->
SetParameterName
(
"frequency"
,
false
);
61
RndmSaveCmd->
SetRange
(
"frequency>=0 && frequency<=2"
);
62
RndmSaveCmd->
AvailableForStates
(
G4State_PreInit
,
G4State_Idle
);
63
64
RndmReadCmd =
new
G4UIcmdWithAString
(
"/rndm/read"
,
this
);
65
RndmReadCmd->
SetGuidance
(
"get rndm status from an external file."
);
66
RndmReadCmd->
SetParameterName
(
"fileName"
,
true
);
67
RndmReadCmd->
SetDefaultValue
(
"beginOfRun.rndm"
);
68
RndmReadCmd->
AvailableForStates
(
G4State_PreInit
,
G4State_Idle
);
69
70
SetAutoSeedCmd =
new
G4UIcmdWithABool
(
"/rndm/autoSeed"
,
this
);
71
SetAutoSeedCmd->
SetGuidance
(
"Switch on/off time-based random seeds"
);
72
SetAutoSeedCmd->
SetGuidance
(
" true: run seeds determined by system time"
);
73
SetAutoSeedCmd->
SetGuidance
(
"false: use command 'random/resetEngineFrom'"
);
74
SetAutoSeedCmd->
SetGuidance
(
"Default = false"
);
75
SetAutoSeedCmd->
SetParameterName
(
"autoSeed"
,
false
);
76
SetAutoSeedCmd->
AvailableForStates
(
G4State_PreInit
,
G4State_Idle
);
77
}
78
79
WLSRunActionMessenger::~WLSRunActionMessenger
()
80
{
81
delete
RndmDir;
delete
RndmSaveCmd;
delete
RndmReadCmd;
delete
SetAutoSeedCmd;
82
}
83
84
void
WLSRunActionMessenger::SetNewValue
(
G4UIcommand
* command,
G4String
newValue)
85
{
86
if
(command == RndmSaveCmd)
87
runAction->
SetRndmFreq
(RndmSaveCmd->
GetNewIntValue
(newValue));
88
89
if
(command == RndmReadCmd)
90
{
G4cout
<<
"\n---> rndm status restored from file: "
<< newValue <<
G4endl
;
91
CLHEP::HepRandom::restoreEngineStatus
(newValue);
92
CLHEP::HepRandom::showEngineStatus
();
93
}
94
95
if
(command == SetAutoSeedCmd)
96
runAction->
SetAutoSeed
(SetAutoSeedCmd->
GetNewBoolValue
(newValue));
97
}
Generated on Sat May 25 2013 14:32:58 for Geant4 by
1.8.4