Geant4 Cross Reference

Cross-Referencing   Geant4
Geant4/examples/extended/field/field04/src/F04DetectorMessenger.cc

Version: [ ReleaseNotes ] [ 1.0 ] [ 1.1 ] [ 2.0 ] [ 3.0 ] [ 3.1 ] [ 3.2 ] [ 4.0 ] [ 4.0.p1 ] [ 4.0.p2 ] [ 4.1 ] [ 4.1.p1 ] [ 5.0 ] [ 5.0.p1 ] [ 5.1 ] [ 5.1.p1 ] [ 5.2 ] [ 5.2.p1 ] [ 5.2.p2 ] [ 6.0 ] [ 6.0.p1 ] [ 6.1 ] [ 6.2 ] [ 6.2.p1 ] [ 6.2.p2 ] [ 7.0 ] [ 7.0.p1 ] [ 7.1 ] [ 7.1.p1 ] [ 8.0 ] [ 8.0.p1 ] [ 8.1 ] [ 8.1.p1 ] [ 8.1.p2 ] [ 8.2 ] [ 8.2.p1 ] [ 8.3 ] [ 8.3.p1 ] [ 8.3.p2 ] [ 9.0 ] [ 9.0.p1 ] [ 9.0.p2 ] [ 9.1 ] [ 9.1.p1 ] [ 9.1.p2 ] [ 9.1.p3 ] [ 9.2 ] [ 9.2.p1 ] [ 9.2.p2 ] [ 9.2.p3 ] [ 9.2.p4 ] [ 9.3 ] [ 9.3.p1 ] [ 9.3.p2 ] [ 9.4 ] [ 9.4.p1 ] [ 9.4.p2 ] [ 9.4.p3 ] [ 9.4.p4 ] [ 9.5 ] [ 9.5.p1 ] [ 9.5.p2 ] [ 9.6 ] [ 9.6.p1 ] [ 9.6.p2 ] [ 9.6.p3 ] [ 9.6.p4 ] [ 10.0 ] [ 10.0.p1 ] [ 10.0.p2 ] [ 10.0.p3 ] [ 10.0.p4 ] [ 10.1 ] [ 10.1.p1 ] [ 10.1.p2 ] [ 10.1.p3 ] [ 10.2 ] [ 10.2.p1 ] [ 10.2.p2 ] [ 10.2.p3 ] [ 10.3 ] [ 10.3.p1 ] [ 10.3.p2 ] [ 10.3.p3 ] [ 10.4 ] [ 10.4.p1 ] [ 10.4.p2 ] [ 10.4.p3 ] [ 10.5 ] [ 10.5.p1 ] [ 10.6 ] [ 10.6.p1 ] [ 10.6.p2 ] [ 10.6.p3 ] [ 10.7 ] [ 10.7.p1 ] [ 10.7.p2 ] [ 10.7.p3 ] [ 10.7.p4 ] [ 11.0 ] [ 11.0.p1 ] [ 11.0.p2 ] [ 11.0.p3, ] [ 11.0.p4 ] [ 11.1 ] [ 11.1.1 ] [ 11.1.2 ] [ 11.1.3 ] [ 11.2 ] [ 11.2.1 ] [ 11.2.2 ] [ 11.3.0 ]

Diff markup

Differences between /examples/extended/field/field04/src/F04DetectorMessenger.cc (Version 11.3.0) and /examples/extended/field/field04/src/F04DetectorMessenger.cc (Version 11.2.2)


  1 //                                                  1 //
  2 // *******************************************      2 // ********************************************************************
  3 // * License and Disclaimer                         3 // * License and Disclaimer                                           *
  4 // *                                                4 // *                                                                  *
  5 // * The  Geant4 software  is  copyright of th      5 // * The  Geant4 software  is  copyright of the Copyright Holders  of *
  6 // * the Geant4 Collaboration.  It is provided      6 // * the Geant4 Collaboration.  It is provided  under  the terms  and *
  7 // * conditions of the Geant4 Software License      7 // * conditions of the Geant4 Software License,  included in the file *
  8 // * LICENSE and available at  http://cern.ch/      8 // * LICENSE and available at  http://cern.ch/geant4/license .  These *
  9 // * include a list of copyright holders.           9 // * include a list of copyright holders.                             *
 10 // *                                               10 // *                                                                  *
 11 // * Neither the authors of this software syst     11 // * Neither the authors of this software system, nor their employing *
 12 // * institutes,nor the agencies providing fin     12 // * institutes,nor the agencies providing financial support for this *
 13 // * work  make  any representation or  warran     13 // * work  make  any representation or  warranty, express or implied, *
 14 // * regarding  this  software system or assum     14 // * regarding  this  software system or assume any liability for its *
 15 // * use.  Please see the license in the file      15 // * use.  Please see the license in the file  LICENSE  and URL above *
 16 // * for the full disclaimer and the limitatio     16 // * for the full disclaimer and the limitation of liability.         *
 17 // *                                               17 // *                                                                  *
 18 // * This  code  implementation is the result      18 // * This  code  implementation is the result of  the  scientific and *
 19 // * technical work of the GEANT4 collaboratio     19 // * technical work of the GEANT4 collaboration.                      *
 20 // * By using,  copying,  modifying or  distri     20 // * By using,  copying,  modifying or  distributing the software (or *
 21 // * any work based  on the software)  you  ag     21 // * any work based  on the software)  you  agree  to acknowledge its *
 22 // * use  in  resulting  scientific  publicati     22 // * use  in  resulting  scientific  publications,  and indicate your *
 23 // * acceptance of all terms of the Geant4 Sof     23 // * acceptance of all terms of the Geant4 Software license.          *
 24 // *******************************************     24 // ********************************************************************
 25 //                                                 25 //
 26 //                                                 26 //
 27 /// \file field/field04/src/F04DetectorMesseng     27 /// \file field/field04/src/F04DetectorMessenger.cc
 28 /// \brief Implementation of the F04DetectorMe     28 /// \brief Implementation of the F04DetectorMessenger class
 29 //                                                 29 //
 30                                                    30 
 31 #include "F04DetectorMessenger.hh"                 31 #include "F04DetectorMessenger.hh"
 32                                                    32 
 33 #include "G4UIcmdWithADoubleAndUnit.hh"        <<  33 #include "G4UIdirectory.hh"
 34 #include "G4UIcmdWithAString.hh"                   34 #include "G4UIcmdWithAString.hh"
 35 #include "G4UIcmdWithAnInteger.hh"                 35 #include "G4UIcmdWithAnInteger.hh"
                                                   >>  36 #include "G4UIcmdWithADoubleAndUnit.hh"
 36 #include "G4UIcmdWithoutParameter.hh"              37 #include "G4UIcmdWithoutParameter.hh"
 37 #include "G4UIdirectory.hh"                    << 
 38                                                    38 
 39 //....oooOO0OOooo........oooOO0OOooo........oo     39 //....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo......
 40                                                    40 
 41 F04DetectorMessenger::F04DetectorMessenger(F04 <<  41 F04DetectorMessenger::F04DetectorMessenger(F04DetectorConstruction* detector)
                                                   >>  42  : fDetector(detector)
 42 {                                                  43 {
 43   fDetDir = new G4UIdirectory("/field04/");        44   fDetDir = new G4UIdirectory("/field04/");
 44   fDetDir->SetGuidance(" field04 Simulation ")     45   fDetDir->SetGuidance(" field04 Simulation ");
 45                                                    46 
 46   fWorldMaterCmd = new G4UIcmdWithAString("/fi <<  47   fWorldMaterCmd = new G4UIcmdWithAString("/field04/SetWorldMat",this);
 47   fWorldMaterCmd->SetGuidance("Select Material     48   fWorldMaterCmd->SetGuidance("Select Material of the World");
 48   fWorldMaterCmd->SetParameterName("wchoice",  <<  49   fWorldMaterCmd->SetParameterName("wchoice",true);
 49   fWorldMaterCmd->SetDefaultValue("Air");          50   fWorldMaterCmd->SetDefaultValue("Air");
 50   fWorldMaterCmd->AvailableForStates(G4State_P <<  51   fWorldMaterCmd->AvailableForStates(G4State_PreInit,G4State_Idle);
 51   fWorldMaterCmd->SetToBeBroadcasted(false);       52   fWorldMaterCmd->SetToBeBroadcasted(false);
 52                                                    53 
 53   fWorldRCmd = new G4UIcmdWithADoubleAndUnit(" <<  54   fWorldRCmd = new G4UIcmdWithADoubleAndUnit("/field04/SetWorldR",this);
 54   fWorldRCmd->SetGuidance("Set Radius of the W     55   fWorldRCmd->SetGuidance("Set Radius of the World");
 55   fWorldRCmd->SetParameterName("WSizeR", false <<  56   fWorldRCmd->SetParameterName("WSizeR",false,false);
 56   fWorldRCmd->SetDefaultUnit("cm");                57   fWorldRCmd->SetDefaultUnit("cm");
 57   fWorldRCmd->SetRange("WSizeR>0.");               58   fWorldRCmd->SetRange("WSizeR>0.");
 58   fWorldRCmd->AvailableForStates(G4State_PreIn <<  59   fWorldRCmd->AvailableForStates(G4State_PreInit,G4State_Idle);
 59   fWorldRCmd->SetToBeBroadcasted(false);           60   fWorldRCmd->SetToBeBroadcasted(false);
 60                                                    61 
 61   fWorldZCmd = new G4UIcmdWithADoubleAndUnit(" <<  62   fWorldZCmd = new G4UIcmdWithADoubleAndUnit("/field04/SetWorldZ",this);
 62   fWorldZCmd->SetGuidance("Set Length of the W     63   fWorldZCmd->SetGuidance("Set Length of the World");
 63   fWorldZCmd->SetParameterName("WSizeZ", false <<  64   fWorldZCmd->SetParameterName("WSizeZ",false,false);
 64   fWorldZCmd->SetDefaultUnit("cm");                65   fWorldZCmd->SetDefaultUnit("cm");
 65   fWorldZCmd->SetRange("WSizeZ>0.");               66   fWorldZCmd->SetRange("WSizeZ>0.");
 66   fWorldZCmd->AvailableForStates(G4State_PreIn <<  67   fWorldZCmd->AvailableForStates(G4State_PreInit,G4State_Idle);
 67   fWorldZCmd->SetToBeBroadcasted(false);           68   fWorldZCmd->SetToBeBroadcasted(false);
 68                                                    69 
 69   fCaptureRCmd = new G4UIcmdWithADoubleAndUnit <<  70   fCaptureRCmd = new G4UIcmdWithADoubleAndUnit("/field04/SetCaptureR",this);
 70   fCaptureRCmd->SetGuidance("Set Radius of the     71   fCaptureRCmd->SetGuidance("Set Radius of the Capture Magnet");
 71   fCaptureRCmd->SetParameterName("CSizeR", fal <<  72   fCaptureRCmd->SetParameterName("CSizeR",false,false);
 72   fCaptureRCmd->SetDefaultUnit("cm");              73   fCaptureRCmd->SetDefaultUnit("cm");
 73   fCaptureRCmd->SetRange("CSizeR>0.");             74   fCaptureRCmd->SetRange("CSizeR>0.");
 74   fCaptureRCmd->AvailableForStates(G4State_Pre <<  75   fCaptureRCmd->AvailableForStates(G4State_PreInit,G4State_Idle);
 75   fCaptureRCmd->SetToBeBroadcasted(false);         76   fCaptureRCmd->SetToBeBroadcasted(false);
 76                                                    77 
 77   fCaptureZCmd = new G4UIcmdWithADoubleAndUnit <<  78   fCaptureZCmd = new G4UIcmdWithADoubleAndUnit("/field04/SetCaptureZ",this);
 78   fCaptureZCmd->SetGuidance("Set Length of the     79   fCaptureZCmd->SetGuidance("Set Length of the Capture Magnet");
 79   fCaptureZCmd->SetParameterName("CSizeZ", fal <<  80   fCaptureZCmd->SetParameterName("CSizeZ",false,false);
 80   fCaptureZCmd->SetDefaultUnit("cm");              81   fCaptureZCmd->SetDefaultUnit("cm");
 81   fCaptureZCmd->SetRange("CSizeZ>0.");             82   fCaptureZCmd->SetRange("CSizeZ>0.");
 82   fCaptureZCmd->AvailableForStates(G4State_Pre <<  83   fCaptureZCmd->AvailableForStates(G4State_PreInit,G4State_Idle);
 83   fCaptureZCmd->SetToBeBroadcasted(false);         84   fCaptureZCmd->SetToBeBroadcasted(false);
 84                                                    85 
 85   fTransferRCmd = new G4UIcmdWithADoubleAndUni <<  86   fTransferRCmd = new G4UIcmdWithADoubleAndUnit("/field04/SetTransferR",this);
 86   fTransferRCmd->SetGuidance("Set Radius of th     87   fTransferRCmd->SetGuidance("Set Radius of the Transfer Magnet");
 87   fTransferRCmd->SetParameterName("TSizeR", fa <<  88   fTransferRCmd->SetParameterName("TSizeR",false,false);
 88   fTransferRCmd->SetDefaultUnit("cm");             89   fTransferRCmd->SetDefaultUnit("cm");
 89   fTransferRCmd->SetRange("TSizeR>0.");            90   fTransferRCmd->SetRange("TSizeR>0.");
 90   fTransferRCmd->AvailableForStates(G4State_Pr <<  91   fTransferRCmd->AvailableForStates(G4State_PreInit,G4State_Idle);
 91   fTransferRCmd->SetToBeBroadcasted(false);        92   fTransferRCmd->SetToBeBroadcasted(false);
 92                                                    93 
 93   fTransferZCmd = new G4UIcmdWithADoubleAndUni <<  94   fTransferZCmd = new G4UIcmdWithADoubleAndUnit("/field04/SetTransferZ",this);
 94   fTransferZCmd->SetGuidance("Set Length of th     95   fTransferZCmd->SetGuidance("Set Length of the Transfer Magnet");
 95   fTransferZCmd->SetParameterName("TSizeZ", fa <<  96   fTransferZCmd->SetParameterName("TSizeZ",false,false);
 96   fTransferZCmd->SetDefaultUnit("cm");             97   fTransferZCmd->SetDefaultUnit("cm");
 97   fTransferZCmd->SetRange("TSizeZ>0.");            98   fTransferZCmd->SetRange("TSizeZ>0.");
 98   fTransferZCmd->AvailableForStates(G4State_Pr <<  99   fTransferZCmd->AvailableForStates(G4State_PreInit,G4State_Idle);
 99   fTransferZCmd->SetToBeBroadcasted(false);       100   fTransferZCmd->SetToBeBroadcasted(false);
100                                                   101 
101   fTransferPCmd = new G4UIcmdWithADoubleAndUni << 102   fTransferPCmd = new G4UIcmdWithADoubleAndUnit("/field04/SetTransferP",this);
102   fTransferPCmd->SetGuidance("Set Z pos of the    103   fTransferPCmd->SetGuidance("Set Z pos of the T-Mgnt from end of C-Mgnt");
103   fTransferPCmd->SetParameterName("TSizeP", fa << 104   fTransferPCmd->SetParameterName("TSizeP",false,false);
104   fTransferPCmd->SetDefaultUnit("cm");            105   fTransferPCmd->SetDefaultUnit("cm");
105   fTransferPCmd->AvailableForStates(G4State_Pr << 106   fTransferPCmd->AvailableForStates(G4State_PreInit,G4State_Idle);
106   fTransferPCmd->SetToBeBroadcasted(false);       107   fTransferPCmd->SetToBeBroadcasted(false);
107                                                   108 
108   fTgtMaterCmd = new G4UIcmdWithAString("/fiel << 109   fTgtMaterCmd = new G4UIcmdWithAString("/field04/SetTgtMat",this);
109   fTgtMaterCmd->SetGuidance("Select Material o    110   fTgtMaterCmd->SetGuidance("Select Material of the Target");
110   fTgtMaterCmd->SetParameterName("tchoice", tr << 111   fTgtMaterCmd->SetParameterName("tchoice",true);
111   fTgtMaterCmd->SetDefaultValue("Tungsten");      112   fTgtMaterCmd->SetDefaultValue("Tungsten");
112   fTgtMaterCmd->AvailableForStates(G4State_Pre << 113   fTgtMaterCmd->AvailableForStates(G4State_PreInit,G4State_Idle);
113   fTgtMaterCmd->SetToBeBroadcasted(false);        114   fTgtMaterCmd->SetToBeBroadcasted(false);
114                                                   115 
115   fTgtRadCmd = new G4UIcmdWithADoubleAndUnit(" << 116   fTgtRadCmd = new G4UIcmdWithADoubleAndUnit("/field04/SetTgtRad",this);
116   fTgtRadCmd->SetGuidance("Set Radius of the T    117   fTgtRadCmd->SetGuidance("Set Radius of the Target");
117   fTgtRadCmd->SetParameterName("TgtSizeR", fal << 118   fTgtRadCmd->SetParameterName("TgtSizeR",false,false);
118   fTgtRadCmd->SetDefaultUnit("cm");               119   fTgtRadCmd->SetDefaultUnit("cm");
119   fTgtRadCmd->SetRange("TgtSizeR>0.");            120   fTgtRadCmd->SetRange("TgtSizeR>0.");
120   fTgtRadCmd->AvailableForStates(G4State_PreIn << 121   fTgtRadCmd->AvailableForStates(G4State_PreInit,G4State_Idle);
121   fTgtRadCmd->SetToBeBroadcasted(false);          122   fTgtRadCmd->SetToBeBroadcasted(false);
122                                                   123 
123   fTgtThickCmd = new G4UIcmdWithADoubleAndUnit << 124   fTgtThickCmd = new G4UIcmdWithADoubleAndUnit("/field04/SetTgtThick",this);
124   fTgtThickCmd->SetGuidance("Set Thickness of     125   fTgtThickCmd->SetGuidance("Set Thickness of the Target");
125   fTgtThickCmd->SetParameterName("TgtSizeZ", f << 126   fTgtThickCmd->SetParameterName("TgtSizeZ",false,false);
126   fTgtThickCmd->SetDefaultUnit("cm");             127   fTgtThickCmd->SetDefaultUnit("cm");
127   fTgtThickCmd->SetRange("TgtSizeZ>0.");          128   fTgtThickCmd->SetRange("TgtSizeZ>0.");
128   fTgtThickCmd->AvailableForStates(G4State_Pre << 129   fTgtThickCmd->AvailableForStates(G4State_PreInit,G4State_Idle);
129   fTgtThickCmd->SetToBeBroadcasted(false);        130   fTgtThickCmd->SetToBeBroadcasted(false);
130                                                   131 
131   fTgtPosCmd = new G4UIcmdWithADoubleAndUnit(" << 132   fTgtPosCmd = new G4UIcmdWithADoubleAndUnit("/field04/SetTgtPos",this);
132   fTgtPosCmd->SetGuidance("Set Z pos of the tg    133   fTgtPosCmd->SetGuidance("Set Z pos of the tgt relative to C-Mgnt centre");
133   fTgtPosCmd->SetParameterName("TgtSizeP", fal << 134   fTgtPosCmd->SetParameterName("TgtSizeP",false,false);
134   fTgtPosCmd->SetDefaultUnit("cm");               135   fTgtPosCmd->SetDefaultUnit("cm");
135   fTgtPosCmd->AvailableForStates(G4State_PreIn << 136   fTgtPosCmd->AvailableForStates(G4State_PreInit,G4State_Idle);
136   fTgtPosCmd->SetToBeBroadcasted(false);          137   fTgtPosCmd->SetToBeBroadcasted(false);
137                                                   138 
138   fTgtAngCmd = new G4UIcmdWithAnInteger("/fiel << 139   fTgtAngCmd = new G4UIcmdWithAnInteger("/field04/SetTgtAng",this);
139   fTgtAngCmd->SetGuidance("Set the angle [in d << 140   fTgtAngCmd->
140   fTgtAngCmd->AvailableForStates(G4State_PreIn << 141     SetGuidance("Set the angle [in deg] of the Tgt relative to C-Mgnt centre");
                                                   >> 142   fTgtAngCmd->AvailableForStates(G4State_PreInit,G4State_Idle);
141   fTgtAngCmd->SetToBeBroadcasted(false);          143   fTgtAngCmd->SetToBeBroadcasted(false);
142                                                   144 
143   fDgrMaterCmd = new G4UIcmdWithAString("/fiel << 145   fDgrMaterCmd = new G4UIcmdWithAString("/field04/SetDgrMat",this);
144   fDgrMaterCmd->SetGuidance("Select Material o    146   fDgrMaterCmd->SetGuidance("Select Material of the Degrader");
145   fDgrMaterCmd->SetParameterName("dchoice", tr << 147   fDgrMaterCmd->SetParameterName("dchoice",true);
146   fDgrMaterCmd->SetDefaultValue("Lead");          148   fDgrMaterCmd->SetDefaultValue("Lead");
147   fDgrMaterCmd->AvailableForStates(G4State_Pre << 149   fDgrMaterCmd->AvailableForStates(G4State_PreInit,G4State_Idle);
148   fDgrMaterCmd->SetToBeBroadcasted(false);        150   fDgrMaterCmd->SetToBeBroadcasted(false);
149                                                   151 
150   fDgrRadCmd = new G4UIcmdWithADoubleAndUnit(" << 152   fDgrRadCmd = new G4UIcmdWithADoubleAndUnit("/field04/SetDgrRad",this);
151   fDgrRadCmd->SetGuidance("Set Radius of the D    153   fDgrRadCmd->SetGuidance("Set Radius of the Degrader");
152   fDgrRadCmd->SetParameterName("DrgSizeR", fal << 154   fDgrRadCmd->SetParameterName("DrgSizeR",false,false);
153   fDgrRadCmd->SetDefaultUnit("cm");               155   fDgrRadCmd->SetDefaultUnit("cm");
154   fDgrRadCmd->SetRange("DrgSizeR>0.");            156   fDgrRadCmd->SetRange("DrgSizeR>0.");
155   fDgrRadCmd->AvailableForStates(G4State_PreIn << 157   fDgrRadCmd->AvailableForStates(G4State_PreInit,G4State_Idle);
156   fDgrRadCmd->SetToBeBroadcasted(false);          158   fDgrRadCmd->SetToBeBroadcasted(false);
157                                                   159 
158   fDgrThickCmd = new G4UIcmdWithADoubleAndUnit << 160   fDgrThickCmd = new G4UIcmdWithADoubleAndUnit("/field04/SetDgrThick",this);
159   fDgrThickCmd->SetGuidance("Set Thickness of     161   fDgrThickCmd->SetGuidance("Set Thickness of the Degrader");
160   fDgrThickCmd->SetParameterName("DgrSizeZ", f << 162   fDgrThickCmd->SetParameterName("DgrSizeZ",false,false);
161   fDgrThickCmd->SetDefaultUnit("cm");             163   fDgrThickCmd->SetDefaultUnit("cm");
162   fDgrThickCmd->SetRange("DgrSizeZ>0.");          164   fDgrThickCmd->SetRange("DgrSizeZ>0.");
163   fDgrThickCmd->AvailableForStates(G4State_Pre << 165   fDgrThickCmd->AvailableForStates(G4State_PreInit,G4State_Idle);
164   fDgrThickCmd->SetToBeBroadcasted(false);        166   fDgrThickCmd->SetToBeBroadcasted(false);
165                                                   167 
166   fDgrPosCmd = new G4UIcmdWithADoubleAndUnit(" << 168   fDgrPosCmd = new G4UIcmdWithADoubleAndUnit("/field04/SetDgrPos",this);
167   fDgrPosCmd->SetGuidance("Set Z pos of the Dg    169   fDgrPosCmd->SetGuidance("Set Z pos of the Dgr relative to T-Mgnt centre");
168   fDgrPosCmd->SetParameterName("DgrSizeP", fal << 170   fDgrPosCmd->SetParameterName("DgrSizeP",false,false);
169   fDgrPosCmd->SetDefaultUnit("cm");               171   fDgrPosCmd->SetDefaultUnit("cm");
170   fDgrPosCmd->AvailableForStates(G4State_PreIn << 172   fDgrPosCmd->AvailableForStates(G4State_PreInit,G4State_Idle);
171   fDgrPosCmd->SetToBeBroadcasted(false);          173   fDgrPosCmd->SetToBeBroadcasted(false);
172 }                                                 174 }
173                                                   175 
174 //....oooOO0OOooo........oooOO0OOooo........oo    176 //....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo......
175                                                   177 
176 F04DetectorMessenger::~F04DetectorMessenger()     178 F04DetectorMessenger::~F04DetectorMessenger()
177 {                                                 179 {
178   delete fDetDir;                                 180   delete fDetDir;
179                                                   181 
180   delete fWorldMaterCmd;                          182   delete fWorldMaterCmd;
181   delete fWorldRCmd;                              183   delete fWorldRCmd;
182   delete fWorldZCmd;                              184   delete fWorldZCmd;
183                                                   185 
184   delete fCaptureRCmd;                            186   delete fCaptureRCmd;
185   delete fCaptureZCmd;                            187   delete fCaptureZCmd;
186                                                   188 
187   delete fTransferRCmd;                           189   delete fTransferRCmd;
188   delete fTransferZCmd;                           190   delete fTransferZCmd;
189   delete fTransferPCmd;                           191   delete fTransferPCmd;
190                                                   192 
191   delete fTgtMaterCmd;                            193   delete fTgtMaterCmd;
192   delete fTgtRadCmd;                              194   delete fTgtRadCmd;
193   delete fTgtThickCmd;                            195   delete fTgtThickCmd;
194   delete fTgtPosCmd;                              196   delete fTgtPosCmd;
195   delete fTgtAngCmd;                              197   delete fTgtAngCmd;
196                                                   198 
197   delete fDgrMaterCmd;                            199   delete fDgrMaterCmd;
198   delete fDgrRadCmd;                              200   delete fDgrRadCmd;
199   delete fDgrThickCmd;                            201   delete fDgrThickCmd;
200   delete fDgrPosCmd;                              202   delete fDgrPosCmd;
201 }                                                 203 }
202                                                   204 
203 //....oooOO0OOooo........oooOO0OOooo........oo    205 //....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo......
204                                                   206 
205 void F04DetectorMessenger::SetNewValue(G4UIcom << 207 void F04DetectorMessenger::SetNewValue(G4UIcommand* command,G4String newValue)
206 {                                                 208 {
207   if (command == fWorldMaterCmd) {             << 209   if( command == fWorldMaterCmd )
208     fDetector->SetWorldMaterial(newValue);     << 210    { fDetector->SetWorldMaterial(newValue);}
209   }                                            << 
210                                                << 
211   if (command == fTgtMaterCmd) {               << 
212     fDetector->SetTargetMaterial(newValue);    << 
213   }                                            << 
214                                                << 
215   if (command == fDgrMaterCmd) {               << 
216     fDetector->SetDegraderMaterial(newValue);  << 
217   }                                            << 
218                                                   211 
219   if (command == fWorldRCmd) {                 << 212   if( command == fTgtMaterCmd )
220     fDetector->SetWorldSizeR(fWorldRCmd->GetNe << 213    { fDetector->SetTargetMaterial(newValue);}
221   }                                            << 
222                                                   214 
223   if (command == fWorldZCmd) {                 << 215   if( command == fDgrMaterCmd )
224     fDetector->SetWorldSizeZ(fWorldZCmd->GetNe << 216    { fDetector->SetDegraderMaterial(newValue);}
225   }                                            << 217 
                                                   >> 218   if( command == fWorldRCmd )
                                                   >> 219    { fDetector->SetWorldSizeR(fWorldRCmd->GetNewDoubleValue(newValue));}
                                                   >> 220 
                                                   >> 221   if( command == fWorldZCmd )
                                                   >> 222    { fDetector->SetWorldSizeZ(fWorldZCmd->GetNewDoubleValue(newValue));}
226                                                   223 
227   if (command == fCaptureRCmd)                 << 224   if( command == fCaptureRCmd )
228     fDetector->SetCaptureMgntRadius(fCaptureRC    225     fDetector->SetCaptureMgntRadius(fCaptureRCmd->GetNewDoubleValue(newValue));
229                                                   226 
230   if (command == fCaptureZCmd)                 << 227   if( command == fCaptureZCmd )
231     fDetector->SetCaptureMgntLength(fCaptureZC    228     fDetector->SetCaptureMgntLength(fCaptureZCmd->GetNewDoubleValue(newValue));
232                                                   229 
233   if (command == fTransferRCmd)                << 230   if( command == fTransferRCmd )
234     fDetector->SetTransferMgntRadius(fTransfer << 231    fDetector->SetTransferMgntRadius(fTransferRCmd->GetNewDoubleValue(newValue));
235                                                   232 
236   if (command == fTransferZCmd)                << 233   if( command == fTransferZCmd )
237     fDetector->SetTransferMgntLength(fTransfer << 234    fDetector->SetTransferMgntLength(fTransferZCmd->GetNewDoubleValue(newValue));
238                                                   235 
239   if (command == fTransferPCmd)                << 236   if( command == fTransferPCmd )
240     fDetector->SetTransferMgntPos(fTransferPCm    237     fDetector->SetTransferMgntPos(fTransferPCmd->GetNewDoubleValue(newValue));
241                                                   238 
242   if (command == fTgtRadCmd) fDetector->SetTar << 239   if( command == fTgtRadCmd )
                                                   >> 240     fDetector->SetTargetRadius(fTgtRadCmd->GetNewDoubleValue(newValue));
243                                                   241 
244   if (command == fTgtThickCmd)                 << 242   if( command == fTgtThickCmd )
245     fDetector->SetTargetThickness(fTgtThickCmd    243     fDetector->SetTargetThickness(fTgtThickCmd->GetNewDoubleValue(newValue));
246                                                   244 
247   if (command == fTgtPosCmd) fDetector->SetTar << 245   if( command == fTgtPosCmd )
                                                   >> 246     fDetector->SetTargetPos(fTgtPosCmd->GetNewDoubleValue(newValue));
248                                                   247 
249   if (command == fTgtAngCmd) fDetector->SetTar << 248   if( command == fTgtAngCmd )
                                                   >> 249     fDetector->SetTargetAngle(fTgtAngCmd->GetNewIntValue(newValue));
250                                                   250 
251   if (command == fDgrRadCmd) fDetector->SetDeg << 251   if( command == fDgrRadCmd )
                                                   >> 252     fDetector->SetDegraderRadius(fDgrRadCmd->GetNewDoubleValue(newValue));
252                                                   253 
253   if (command == fDgrThickCmd)                 << 254   if( command == fDgrThickCmd )
254     fDetector->SetDegraderThickness(fDgrThickC    255     fDetector->SetDegraderThickness(fDgrThickCmd->GetNewDoubleValue(newValue));
255                                                   256 
256   if (command == fDgrPosCmd) fDetector->SetDeg << 257   if( command == fDgrPosCmd )
                                                   >> 258     fDetector->SetDegraderPos(fDgrPosCmd->GetNewDoubleValue(newValue));
257                                                   259 
258   if (command == fWorldZCmd) fDetector->SetWor << 260   if( command == fWorldZCmd )
                                                   >> 261     fDetector->SetWorldSizeZ(fWorldZCmd->GetNewDoubleValue(newValue));
259                                                   262 
260   if (command == fWorldRCmd) fDetector->SetWor << 263   if( command == fWorldRCmd )
                                                   >> 264     fDetector->SetWorldSizeR(fWorldRCmd->GetNewDoubleValue(newValue));
261 }                                                 265 }
262                                                   266