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
advanced
gammaknife
src
GammaKnifePhysicsListMessenger.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
27
#include "
GammaKnifePhysicsListMessenger.hh
"
28
#include "
GammaKnifePhysicsList.hh
"
29
#include "
G4UIdirectory.hh
"
30
#include "
G4UIcmdWithoutParameter.hh
"
31
#include "
G4UIcmdWithADouble.hh
"
32
#include "
G4UIcmdWithADoubleAndUnit.hh
"
33
#include "
G4UIcmdWithABool.hh
"
34
#include "
G4UIcmdWithAString.hh
"
35
#include "
G4SystemOfUnits.hh
"
36
37
GammaKnifePhysicsListMessenger::GammaKnifePhysicsListMessenger
(
GammaKnifePhysicsList
* physList)
38
:physicsList(physList)
39
{
40
listDir =
new
G4UIdirectory
(
"/Physics/"
);
41
// Building modular PhysicsList
42
43
physicsListCmd =
new
G4UIcmdWithAString
(
"/Physics/addPhysics"
,
this
);
44
physicsListCmd->
SetGuidance
(
"Add chunks of PhysicsList."
);
45
physicsListCmd->
SetParameterName
(
"physList"
,
false
);
46
physicsListCmd->
AvailableForStates
(
G4State_PreInit
,
G4State_Idle
);
47
48
gammaCutCmd =
new
G4UIcmdWithADoubleAndUnit
(
"/Physics/setGCut"
,
this
);
49
gammaCutCmd->
SetGuidance
(
"Set gamma cut."
);
50
gammaCutCmd->
SetParameterName
(
"Gcut"
,
false
);
51
gammaCutCmd->
SetUnitCategory
(
"Length"
);
52
gammaCutCmd->
SetRange
(
"Gcut>0.0"
);
53
gammaCutCmd->
AvailableForStates
(
G4State_PreInit
,
G4State_Idle
);
54
55
electCutCmd =
new
G4UIcmdWithADoubleAndUnit
(
"/Physics/setECut"
,
this
);
56
electCutCmd->
SetGuidance
(
"Set electron cut."
);
57
electCutCmd->
SetParameterName
(
"Ecut"
,
false
);
58
electCutCmd->
SetUnitCategory
(
"Length"
);
59
electCutCmd->
SetRange
(
"Ecut>0.0"
);
60
electCutCmd->
AvailableForStates
(
G4State_PreInit
,
G4State_Idle
);
61
62
protoCutCmd =
new
G4UIcmdWithADoubleAndUnit
(
"/Physics/setPCut"
,
this
);
63
protoCutCmd->
SetGuidance
(
"Set positron cut."
);
64
protoCutCmd->
SetParameterName
(
"Pcut"
,
false
);
65
protoCutCmd->
SetUnitCategory
(
"Length"
);
66
protoCutCmd->
SetRange
(
"Pcut>0.0"
);
67
protoCutCmd->
AvailableForStates
(
G4State_PreInit
,
G4State_Idle
);
68
69
allCutCmd =
new
G4UIcmdWithADoubleAndUnit
(
"/Physics/setCuts"
,
this
);
70
allCutCmd->
SetGuidance
(
"Set cut for all."
);
71
allCutCmd->
SetParameterName
(
"cut"
,
false
);
72
allCutCmd->
SetUnitCategory
(
"Length"
);
73
allCutCmd->
SetRange
(
"cut>0.0"
);
74
allCutCmd->
AvailableForStates
(
G4State_PreInit
,
G4State_Idle
);
75
76
77
}
78
79
GammaKnifePhysicsListMessenger::~GammaKnifePhysicsListMessenger
()
80
{
81
delete
physicsListCmd;
82
delete
gammaCutCmd;
83
delete
electCutCmd;
84
delete
protoCutCmd;
85
delete
allCutCmd;
86
delete
listDir;
87
}
88
89
void
GammaKnifePhysicsListMessenger::SetNewValue
(
G4UIcommand
* command,
G4String
newValue)
90
{
91
if
(command == physicsListCmd)
92
{
93
physicsList->
AddPhysicsList
(newValue);
94
}
95
96
else
if
( command == gammaCutCmd )
97
{ physicsList->
SetCutForGamma
(gammaCutCmd->
GetNewDoubleValue
(newValue));}
98
99
else
if
( command == electCutCmd )
100
{ physicsList->
SetCutForElectron
(electCutCmd->
GetNewDoubleValue
(newValue));}
101
102
else
if
( command == protoCutCmd )
103
{ physicsList->
SetCutForPositron
(protoCutCmd->
GetNewDoubleValue
(newValue));}
104
105
else
if
( command == allCutCmd )
106
{
107
G4double
cut = allCutCmd->
GetNewDoubleValue
(newValue);
108
physicsList->
SetCutForGamma
(cut);
109
physicsList->
SetCutForElectron
(cut);
110
physicsList->
SetCutForPositron
(cut);
111
}
112
113
}
114
115
116
117
118
119
Generated on Sat May 25 2013 14:32:09 for Geant4 by
1.8.4