51 :GammaRayTelDetector(GammaRayTelDet)
55 GammaRayTeldetDir->
SetGuidance(
"GammaRayTel payload control.");
60 ConverterMaterCmd->
SetGuidance(
"Select Material of the Converter.");
67 (
"/payload/setConvThick",
this);
68 ConverterThickCmd->
SetGuidance(
"Set Thickness of the Converter");
70 ConverterThickCmd->
SetRange(
"Size>=0.");
77 (
"/payload/setSiThick",
this);
78 SiliconThickCmd->
SetGuidance(
"Set Thickness of the Silicon");
80 SiliconThickCmd->
SetRange(
"Size>=0.");
87 (
"/payload/setSiPitch",
this);
88 SiliconPitchCmd->
SetGuidance(
"Set Pitch of the Silicon Strips");
90 SiliconPitchCmd->
SetRange(
"Size>=0.");
97 (
"/payload/setSiTileXY",
this);
98 SiliconTileXYCmd->
SetGuidance(
"Set XY dimensions of Si Tile");
100 SiliconTileXYCmd->
SetRange(
"Size>=0.");
107 NbSiTilesCmd->
SetGuidance(
"Set number of Si Tiles.");
109 NbSiTilesCmd->
SetRange(
"NbSiTiles>0 && NbSiTiles<100");
115 NbTKRLayersCmd->
SetGuidance(
"Set number of TKR Layers.");
117 NbTKRLayersCmd->
SetRange(
"NbTKRLayers>0 && NbTKRLayers<30");
123 (
"/payload/setLayerDistance",
this);
124 LayerDistanceCmd->
SetGuidance(
"Set distance between two layers");
126 LayerDistanceCmd->
SetRange(
"Size>=0.");
133 (
"/payload/setViewsDistance",
this);
134 ViewsDistanceCmd->
SetGuidance(
"Set distance between X and Y views");
136 ViewsDistanceCmd->
SetRange(
"Size>=0.");
143 (
"/payload/setCALThick",
this);
144 CALThickCmd->
SetGuidance(
"Set thickness of CAL detectors");
153 NbCALBarsCmd->
SetGuidance(
"Set number of CsI Bars.");
155 NbCALBarsCmd->
SetRange(
"NbSiTiles>0 && NbSiTiles<100");
161 NbCALLayersCmd->
SetGuidance(
"Set number of CAL Layers.");
163 NbCALLayersCmd->
SetRange(
"NbCALLayers>0 && NbCALLayers<16");
169 (
"/payload/setACDThick",
this);
170 ACDThickCmd->
SetGuidance(
"Set thickness of ACD detectors");
179 UpdateCmd->
SetGuidance(
"Update payload geometry.");
180 UpdateCmd->
SetGuidance(
"This command MUST be applied before \"beamOn\" ");
181 UpdateCmd->
SetGuidance(
"if you changed geometrical value(s).");
187 MagFieldCmd->
SetGuidance(
"Define magnetic field.");
188 MagFieldCmd->
SetGuidance(
"Magnetic field will be in Z direction.");
198 delete ConverterMaterCmd;
delete ConverterThickCmd;
199 delete NbSiTilesCmd;
delete NbTKRLayersCmd;
200 delete SiliconTileXYCmd;
delete SiliconPitchCmd;
201 delete SiliconThickCmd;
delete LayerDistanceCmd;
202 delete ViewsDistanceCmd;
delete ACDThickCmd;
203 delete NbCALLayersCmd;
delete NbCALBarsCmd;
204 delete CALThickCmd;
delete UpdateCmd;
205 delete MagFieldCmd;
delete GammaRayTeldetDir;
215 if( command == ConverterMaterCmd )
218 if( command == ConverterThickCmd )
223 if( command == SiliconTileXYCmd )
226 if( command == SiliconPitchCmd )
229 if( command == SiliconThickCmd )
232 if( command == NbSiTilesCmd )
235 if( command == NbTKRLayersCmd )
238 if( command == LayerDistanceCmd )
241 if( command == ViewsDistanceCmd )
246 if( command == NbCALLayersCmd )
249 if( command == NbCALBarsCmd )
252 if( command == CALThickCmd )
257 if( command == ACDThickCmd )
260 if( command == UpdateCmd )
263 if( command == MagFieldCmd )