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
xray_fluorescence
src
XrayFluoPlaneDetectorMessenger.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
// $Id: XrayFluoPlaneDetectorMessenger.cc
28
// GEANT4 tag $Name:
29
//
30
// Author: Alfonso Mantero (Alfonso.Mantero@ge.infn.it)
31
//
32
// History:
33
// -----------
34
//
35
// 29 Aug 2003 Alfonso Mantero created
36
//
37
// -------------------------------------------------------------------
38
39
40
#include "
XrayFluoPlaneDetectorMessenger.hh
"
41
#include "
XrayFluoPlaneDetectorConstruction.hh
"
42
#include "
G4UIdirectory.hh
"
43
#include "
G4UIcmdWithAString.hh
"
44
#include "
G4UIcmdWithADoubleAndUnit.hh
"
45
#include "
G4UIcmdWithoutParameter.hh
"
46
#include "
G4UIcmdWithABool.hh
"
47
48
//....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo....
49
50
XrayFluoPlaneDetectorMessenger::XrayFluoPlaneDetectorMessenger
(
XrayFluoPlaneDetectorConstruction
* Det)
51
:Detector(Det)
52
{
53
detDir =
new
G4UIdirectory
(
"/apparate/"
);
54
detDir->
SetGuidance
(
"detector control."
);
55
56
UpdateCmd =
new
G4UIcmdWithoutParameter
(
"/apparate/update"
,
this
);
57
UpdateCmd->
SetGuidance
(
"Update apparate geometry."
);
58
UpdateCmd->
SetGuidance
(
"This command MUST be applied before \"beamOn\" "
);
59
UpdateCmd->
SetGuidance
(
"if you changed geometrical value(s): /apparate/GrainDiameter and /apparate/sampleGranularity"
);
60
61
UpdateCmd->
AvailableForStates
(
G4State_Idle
);
62
63
sampleCmd =
new
G4UIcmdWithAString
(
"/apparate/planeMaterial"
,
this
);
64
sampleCmd->
SetGuidance
(
"select a diferent material for the plane"
);
65
sampleCmd->
SetParameterName
(
"material"
,
true
);
66
sampleCmd->
SetDefaultValue
(
"mars1"
);
67
sampleCmd->
SetCandidates
(
"Dolorite Anorthosite Mars1 IceBasalt"
);
68
sampleCmd->
AvailableForStates
(
G4State_Idle
);
69
70
detectorCmd =
new
G4UIcmdWithAString
(
"/apparate/detector"
,
this
);
71
detectorCmd->
SetGuidance
(
"select a diferent detectorType"
);
72
detectorCmd->
SetParameterName
(
"detector"
,
true
);
73
detectorCmd->
SetDefaultValue
(
"sili"
);
74
detectorCmd->
SetCandidates
(
"sili hpge"
);
75
detectorCmd->
AvailableForStates
(
G4State_Idle
);
76
77
grainDiaCmd =
new
G4UIcmdWithADoubleAndUnit
(
"/apparate/GrainDiameter"
,
this
);
78
grainDiaCmd->
SetGuidance
(
"Set diameter of grains"
);
79
grainDiaCmd->
SetGuidance
(
"After this, /apparate/update must be executed before BeamOn"
);
80
grainDiaCmd->
SetGuidance
(
"Default: 0.5 mm "
);
81
grainDiaCmd->
SetParameterName
(
"Grain Diameter"
,
true
,
true
);
82
grainDiaCmd->
SetDefaultUnit
(
"mm"
);
83
grainDiaCmd->
SetUnitCategory
(
"Length"
);
84
grainDiaCmd->
AvailableForStates
(
G4State_Idle
);
85
86
granularityFlagCmd=
new
G4UIcmdWithABool
(
"/apparate/sampleGranularity"
,
this
);
87
granularityFlagCmd->
SetGuidance
(
"Set if sample granularity is present"
);
88
granularityFlagCmd->
SetGuidance
(
"After this, /apparate/update must be executed before BeamOn"
);
89
granularityFlagCmd->
SetParameterName
(
"Granularity Flag"
,
true
);
90
granularityFlagCmd->
SetDefaultValue
(
false
);
91
granularityFlagCmd->
AvailableForStates
(
G4State_Idle
);
92
93
}
94
95
//....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo....
96
97
XrayFluoPlaneDetectorMessenger::~XrayFluoPlaneDetectorMessenger
()
98
{
99
delete
UpdateCmd;
100
delete
detDir;
101
}
102
103
//....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo....
104
105
void
XrayFluoPlaneDetectorMessenger::SetNewValue
(
G4UIcommand
* command,
G4String
newValue)
106
{
107
if
( command == UpdateCmd )
108
{ Detector->
UpdateGeometry
(); }
109
110
else
if
( command == sampleCmd )
111
{ Detector->
SetPlaneMaterial
(newValue);}
112
113
else
if
( command == detectorCmd )
114
{ Detector->
SetDetectorType
(newValue);}
115
116
else
if
( command == grainDiaCmd )
117
{
118
G4double
newSize = grainDiaCmd->
GetNewDoubleValue
(newValue);
119
Detector->
SetGrainDia
(newSize);
120
}
121
122
else
if
( command == granularityFlagCmd )
123
{
124
Detector->
DeleteGrainObjects
();
125
G4bool
newGranFlag = granularityFlagCmd->
GetNewBoolValue
(newValue);
126
Detector->
SetPlaneGranularity
(newGranFlag);
127
}
128
129
}
130
131
132
//....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo....
133
134
135
136
137
138
139
140
141
Generated on Sat May 25 2013 14:32:15 for Geant4 by
1.8.4