| Geant4 Cross Reference |
1 // 1
2 // *******************************************
3 // * License and Disclaimer
4 // *
5 // * The Geant4 software is copyright of th
6 // * the Geant4 Collaboration. It is provided
7 // * conditions of the Geant4 Software License
8 // * LICENSE and available at http://cern.ch/
9 // * include a list of copyright holders.
10 // *
11 // * Neither the authors of this software syst
12 // * institutes,nor the agencies providing fin
13 // * work make any representation or warran
14 // * regarding this software system or assum
15 // * use. Please see the license in the file
16 // * for the full disclaimer and the limitatio
17 // *
18 // * This code implementation is the result
19 // * technical work of the GEANT4 collaboratio
20 // * By using, copying, modifying or distri
21 // * any work based on the software) you ag
22 // * use in resulting scientific publicati
23 // * acceptance of all terms of the Geant4 Sof
24 // *******************************************
25 //
26 #include "Par03EMShowerMessenger.hh"
27
28 #include "Par03EMShowerModel.hh"
29
30 #include "G4UIcmdWithADouble.hh"
31 #include "G4UIcmdWithADoubleAndUnit.hh"
32 #include "G4UIcmdWithAnInteger.hh"
33 #include "G4UIcmdWithoutParameter.hh"
34 #include "G4UIdirectory.hh"
35
36 Par03EMShowerMessenger::Par03EMShowerMessenger
37 {
38 fDirectory = new G4UIdirectory("/Par03/fastS
39 fDirectory->SetGuidance("Set mesh parameters
40
41 fPrintCmd = new G4UIcmdWithoutParameter("/Pa
42 fPrintCmd->SetGuidance("Print current settin
43
44 fSigmaCmd = new G4UIcmdWithADoubleAndUnit("/
45 fSigmaCmd->SetGuidance("Set sigma parameter
46 fSigmaCmd->SetParameterName("Sigma", false);
47 fSigmaCmd->SetUnitCategory("Length");
48
49 fAlphaCmd = new G4UIcmdWithADouble("/Par03/f
50 fAlphaCmd->SetGuidance("Set alpha parameter
51 fAlphaCmd->SetParameterName("Alpha", false);
52
53 fBetaCmd = new G4UIcmdWithADouble("/Par03/fa
54 fBetaCmd->SetGuidance("Set beta parameter of
55 fBetaCmd->SetParameterName("Beta", false);
56
57 fNbOfHitsCmd = new G4UIcmdWithAnInteger("/Pa
58 fNbOfHitsCmd->SetGuidance(
59 "Set number of (same energy) energy deposi
60 "Those deposits will be scored in the dete
61 "the sensitive detector.");
62 fNbOfHitsCmd->SetParameterName("Number", fal
63
64 fLongMaxDepthCmd = new G4UIcmdWithADouble("/
65 fLongMaxDepthCmd->SetGuidance("Set maximum s
66 fLongMaxDepthCmd->SetGuidance("Expressed in
67 fLongMaxDepthCmd->SetParameterName("Depth",
68 }
69
70 //....oooOO0OOooo........oooOO0OOooo........oo
71
72 Par03EMShowerMessenger::~Par03EMShowerMessenge
73 {
74 delete fPrintCmd;
75 delete fSigmaCmd;
76 delete fAlphaCmd;
77 delete fBetaCmd;
78 delete fNbOfHitsCmd;
79 delete fLongMaxDepthCmd;
80 delete fDirectory;
81 }
82
83 //....oooOO0OOooo........oooOO0OOooo........oo
84
85 void Par03EMShowerMessenger::SetNewValue(G4UIc
86 {
87 if (aCommand == fPrintCmd) {
88 fModel->Print();
89 }
90 else if (aCommand == fSigmaCmd) {
91 fModel->SetSigma(fSigmaCmd->GetNewDoubleVa
92 }
93 else if (aCommand == fAlphaCmd) {
94 fModel->SetAlpha(fAlphaCmd->GetNewDoubleVa
95 }
96 else if (aCommand == fBetaCmd) {
97 fModel->SetBeta(fBetaCmd->GetNewDoubleValu
98 }
99 else if (aCommand == fNbOfHitsCmd) {
100 fModel->SetNbOfHits(fNbOfHitsCmd->GetNewIn
101 }
102 else if (aCommand == fLongMaxDepthCmd) {
103 fModel->SetLongMaxDepth(fLongMaxDepthCmd->
104 }
105 }
106
107 //....oooOO0OOooo........oooOO0OOooo........oo
108
109 G4String Par03EMShowerMessenger::GetCurrentVal
110 {
111 G4String cv;
112
113 if (aCommand == fSigmaCmd) {
114 cv = fSigmaCmd->ConvertToString(fModel->Ge
115 }
116 else if (aCommand == fAlphaCmd) {
117 cv = fAlphaCmd->ConvertToString(fModel->Ge
118 }
119 else if (aCommand == fBetaCmd) {
120 cv = fBetaCmd->ConvertToString(fModel->Get
121 }
122 else if (aCommand == fNbOfHitsCmd) {
123 cv = fNbOfHitsCmd->ConvertToString(fModel-
124 }
125 else if (aCommand == fLongMaxDepthCmd) {
126 cv = fLongMaxDepthCmd->ConvertToString(fMo
127 }
128 return cv;
129 }
130