| 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 /// \file biasing/ReverseMC01/src/RMC01Detecto
27 /// \brief Implementation of the RMC01Detector
28 //
29 //
30 //////////////////////////////////////////////
31 // Class Name: RMC01DetectorMessen
32 // Author: L. Desorgher
33 // Organisation: SpaceIT GmbH
34 // Contract: ESA contract 21435/
35 // Customer: ESA/ESTEC
36 //////////////////////////////////////////////
37
38 //....oooOO0OOooo........oooOO0OOooo........oo
39 //....oooOO0OOooo........oooOO0OOooo........oo
40
41 #include "RMC01DetectorMessenger.hh"
42
43 #include "RMC01DetectorConstruction.hh"
44
45 #include "G4UIcmdWith3VectorAndUnit.hh"
46 #include "G4UIcmdWithADoubleAndUnit.hh"
47 #include "G4UIdirectory.hh"
48
49 //....oooOO0OOooo........oooOO0OOooo........oo
50
51 RMC01DetectorMessenger::RMC01DetectorMessenger
52 : G4UImessenger(),
53 fTheDetector(GeneralDet),
54 fGeneralDir(0),
55 fDetDir(0),
56 fSetSensitiveVolumeHeightCmd(0),
57 fSetSensitiveVolumeRadiusCmd(0),
58 fSetShieldingThicknessCmd(0)
59 {
60 fGeneralDir = new G4UIdirectory("/RMC01/");
61 fGeneralDir->SetGuidance("Control of the Gea
62
63 fDetDir = new G4UIdirectory("/RMC01/geometry
64 fDetDir->SetGuidance("Geometry control");
65
66 fSetSensitiveVolumeHeightCmd =
67 new G4UIcmdWithADoubleAndUnit("/RMC01/geom
68 fSetSensitiveVolumeHeightCmd->SetGuidance("S
69 fSetSensitiveVolumeHeightCmd->AvailableForSt
70
71 fSetSensitiveVolumeRadiusCmd =
72 new G4UIcmdWithADoubleAndUnit("/RMC01/geom
73 fSetSensitiveVolumeRadiusCmd->SetGuidance("S
74 fSetSensitiveVolumeRadiusCmd->AvailableForSt
75
76 fSetShieldingThicknessCmd =
77 new G4UIcmdWithADoubleAndUnit("/RMC01/geom
78 fSetShieldingThicknessCmd->SetGuidance("Set
79 fSetShieldingThicknessCmd->AvailableForState
80 }
81
82 //....oooOO0OOooo........oooOO0OOooo........oo
83
84 RMC01DetectorMessenger::~RMC01DetectorMessenge
85 {
86 if (fGeneralDir) delete fGeneralDir;
87 if (fDetDir) delete fDetDir;
88 if (fSetSensitiveVolumeHeightCmd) delete fSe
89 if (fSetSensitiveVolumeRadiusCmd) delete fSe
90 if (fSetShieldingThicknessCmd) delete fSetSh
91 }
92
93 //....oooOO0OOooo........oooOO0OOooo........oo
94
95 void RMC01DetectorMessenger::SetNewValue(G4UIc
96 {
97 if (command == fSetSensitiveVolumeHeightCmd)
98 fTheDetector->SetSensitiveVolumeHeight(
99 fSetSensitiveVolumeHeightCmd->GetNewDoub
100 }
101
102 else if (command == fSetSensitiveVolumeRadiu
103 fTheDetector->SetSensitiveVolumeRadius(
104 fSetSensitiveVolumeRadiusCmd->GetNewDoub
105 }
106
107 else if (command == fSetShieldingThicknessCm
108 fTheDetector->SetShieldingThickness(fSetSh
109 }
110 }
111
112 //....oooOO0OOooo........oooOO0OOooo........oo
113