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
field
field01
src
F01PrimaryGeneratorMessenger.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
// $Id$
31
//
32
//
33
34
//....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo....
35
//....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo....
36
37
#include "
F01PrimaryGeneratorMessenger.hh
"
38
39
#include "
F01PrimaryGeneratorAction.hh
"
40
#include "
G4UIcmdWithAString.hh
"
41
#include "
G4UIcmdWithADoubleAndUnit.hh
"
42
#include "
G4SystemOfUnits.hh
"
43
44
//....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo....
45
46
F01PrimaryGeneratorMessenger::F01PrimaryGeneratorMessenger
(
47
F01PrimaryGeneratorAction
* action)
48
:
G4UImessenger
(),
49
fAction(action),
50
fRndmCmd(0),
51
fSetXVertexCmd(0),
52
fSetYVertexCmd(0),
53
fSetZVertexCmd(0)
54
{
55
fRndmCmd =
new
G4UIcmdWithAString
(
"/gun/random"
,
this
);
56
fRndmCmd->
SetGuidance
(
"Shoot randomly the incident particle."
);
57
fRndmCmd->
SetGuidance
(
" Choice : on, off(default)"
);
58
fRndmCmd->
SetParameterName
(
"choice"
,
true
);
59
fRndmCmd->
SetDefaultValue
(
"off"
);
60
fRndmCmd->
SetCandidates
(
"on off"
);
61
fRndmCmd->
AvailableForStates
(
G4State_PreInit
,
G4State_Idle
);
62
63
fSetXVertexCmd =
new
G4UIcmdWithADoubleAndUnit
(
"/gun/xvertex"
,
this
);
64
fSetXVertexCmd->
SetGuidance
(
" Set x coord. of the primary vertex."
);
65
fSetXVertexCmd->
SetParameterName
(
"xv"
,
true
);
66
fSetXVertexCmd->
SetDefaultValue
(0.0*
mm
) ;
67
68
fSetYVertexCmd =
new
G4UIcmdWithADoubleAndUnit
(
"/gun/yvertex"
,
this
);
69
fSetYVertexCmd->
SetGuidance
(
" Set y coord. of the primary vertex."
);
70
fSetYVertexCmd->
SetParameterName
(
"yv"
,
true
);
71
fSetYVertexCmd->
SetDefaultValue
(0.0*
mm
) ;
72
73
fSetZVertexCmd =
new
G4UIcmdWithADoubleAndUnit
(
"/gun/zvertex"
,
this
);
74
fSetZVertexCmd->
SetGuidance
(
" Set z coord. of the primary vertex."
);
75
fSetZVertexCmd->
SetParameterName
(
"zv"
,
true
);
76
fSetZVertexCmd->
SetDefaultValue
(0.0*
mm
) ;
77
78
}
79
80
//....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo....
81
82
F01PrimaryGeneratorMessenger::~F01PrimaryGeneratorMessenger
()
83
{
84
delete
fRndmCmd;
85
delete
fSetXVertexCmd;
86
delete
fSetYVertexCmd;
87
delete
fSetZVertexCmd;
88
}
89
90
//....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo....
91
92
void
F01PrimaryGeneratorMessenger::SetNewValue
(
G4UIcommand
* command,
G4String
newValue)
93
{
94
if
( command == fRndmCmd )
95
{ fAction->
SetRndmFlag
(newValue);}
96
if
( command == fSetXVertexCmd)
97
{ fAction->
SetXVertex
(fSetXVertexCmd->
GetNewDoubleValue
(newValue));}
98
if
( command == fSetYVertexCmd)
99
{ fAction->
SetYVertex
(fSetYVertexCmd->
GetNewDoubleValue
(newValue));}
100
if
( command == fSetZVertexCmd)
101
{ fAction->
SetZVertex
(fSetZVertexCmd->
GetNewDoubleValue
(newValue));}
102
}
103
104
//....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo....
105
Generated on Sat May 25 2013 14:32:25 for Geant4 by
1.8.4