Geant4 Cross Reference |
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 /// \file field/field03/src/F03DetectorMesseng 26 /// \file field/field03/src/F03DetectorMessenger.cc 27 /// \brief Implementation of the F03DetectorMe 27 /// \brief Implementation of the F03DetectorMessenger class 28 // 28 // 29 // 29 // 30 // 30 // 31 // 31 // 32 //....oooOO0OOooo........oooOO0OOooo........oo 32 //....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo...... 33 //....oooOO0OOooo........oooOO0OOooo........oo 33 //....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo...... 34 34 35 #include "F03DetectorMessenger.hh" 35 #include "F03DetectorMessenger.hh" 36 36 37 #include "F03DetectorConstruction.hh" 37 #include "F03DetectorConstruction.hh" 38 << 39 #include "G4UIcmdWithADoubleAndUnit.hh" << 40 #include "G4UIcmdWithAString.hh" 38 #include "G4UIcmdWithAString.hh" 41 #include "G4UIcmdWith3VectorAndUnit.hh" << 39 #include "G4UIcmdWithADoubleAndUnit.hh" 42 #include "G4UIcmdWithoutParameter.hh" 40 #include "G4UIcmdWithoutParameter.hh" 43 41 44 //....oooOO0OOooo........oooOO0OOooo........oo 42 //....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo...... 45 43 46 F03DetectorMessenger::F03DetectorMessenger(F03 << 44 F03DetectorMessenger::F03DetectorMessenger(F03DetectorConstruction* det) >> 45 : G4UImessenger(), >> 46 fDetector(det), >> 47 fDetDir(0), >> 48 fAbsMaterCmd(0), >> 49 fAbsThickCmd(0), >> 50 fAbsRadCmd(0), >> 51 fAbsZposCmd(0), >> 52 fWorldMaterCmd(0), >> 53 fWorldZCmd(0), >> 54 fWorldRCmd(0) 47 { 55 { 48 fDetDir = new G4UIdirectory("/calor/"); 56 fDetDir = new G4UIdirectory("/calor/"); 49 fDetDir->SetGuidance("F03 detector control." 57 fDetDir->SetGuidance("F03 detector control."); 50 << 58 51 fAbsMaterCmd = new G4UIcmdWithAString("/calo << 59 fAbsMaterCmd = new G4UIcmdWithAString("/calor/setAbsMat",this); 52 fAbsMaterCmd->SetGuidance("Select Material o 60 fAbsMaterCmd->SetGuidance("Select Material of the Absorber."); 53 fAbsMaterCmd->SetParameterName("choice", tru << 61 fAbsMaterCmd->SetParameterName("choice",true); 54 fAbsMaterCmd->SetDefaultValue("Lead"); 62 fAbsMaterCmd->SetDefaultValue("Lead"); 55 fAbsMaterCmd->AvailableForStates(G4State_Idl 63 fAbsMaterCmd->AvailableForStates(G4State_Idle); 56 fAbsMaterCmd->SetToBeBroadcasted(false); 64 fAbsMaterCmd->SetToBeBroadcasted(false); 57 65 58 fWorldMaterCmd = new G4UIcmdWithAString("/ca << 66 fWorldMaterCmd = new G4UIcmdWithAString("/calor/setWorldMat",this); 59 fWorldMaterCmd->SetGuidance("Select Material 67 fWorldMaterCmd->SetGuidance("Select Material of the World."); 60 fWorldMaterCmd->SetParameterName("wchoice", << 68 fWorldMaterCmd->SetParameterName("wchoice",true); 61 fWorldMaterCmd->SetDefaultValue("Air"); 69 fWorldMaterCmd->SetDefaultValue("Air"); 62 fWorldMaterCmd->AvailableForStates(G4State_I 70 fWorldMaterCmd->AvailableForStates(G4State_Idle); 63 fWorldMaterCmd->SetToBeBroadcasted(false); 71 fWorldMaterCmd->SetToBeBroadcasted(false); 64 72 65 fAbsThickCmd = new G4UIcmdWithADoubleAndUnit << 73 fAbsThickCmd = new G4UIcmdWithADoubleAndUnit("/calor/setAbsThick",this); 66 fAbsThickCmd->SetGuidance("Set Thickness of 74 fAbsThickCmd->SetGuidance("Set Thickness of the Absorber"); 67 fAbsThickCmd->SetParameterName("SizeZ", fals << 75 fAbsThickCmd->SetParameterName("SizeZ",false,false); 68 fAbsThickCmd->SetDefaultUnit("mm"); 76 fAbsThickCmd->SetDefaultUnit("mm"); 69 fAbsThickCmd->SetRange("SizeZ>0."); 77 fAbsThickCmd->SetRange("SizeZ>0."); 70 fAbsThickCmd->AvailableForStates(G4State_Idl 78 fAbsThickCmd->AvailableForStates(G4State_Idle); 71 fAbsThickCmd->SetToBeBroadcasted(false); 79 fAbsThickCmd->SetToBeBroadcasted(false); 72 80 73 fAbsRadCmd = new G4UIcmdWithADoubleAndUnit(" << 81 fAbsRadCmd = new G4UIcmdWithADoubleAndUnit("/calor/setAbsRad",this); 74 fAbsRadCmd->SetGuidance("Set radius of the A 82 fAbsRadCmd->SetGuidance("Set radius of the Absorber"); 75 fAbsRadCmd->SetParameterName("SizeR", false, << 83 fAbsRadCmd->SetParameterName("SizeR",false,false); 76 fAbsRadCmd->SetDefaultUnit("mm"); 84 fAbsRadCmd->SetDefaultUnit("mm"); 77 fAbsRadCmd->SetRange("SizeR>0."); 85 fAbsRadCmd->SetRange("SizeR>0."); 78 fAbsRadCmd->AvailableForStates(G4State_Idle) 86 fAbsRadCmd->AvailableForStates(G4State_Idle); 79 fAbsRadCmd->SetToBeBroadcasted(false); 87 fAbsRadCmd->SetToBeBroadcasted(false); 80 88 81 fAbsZposCmd = new G4UIcmdWithADoubleAndUnit( << 89 fAbsZposCmd = new G4UIcmdWithADoubleAndUnit("/calor/setAbsZpos",this); 82 fAbsZposCmd->SetGuidance("Set Z pos. of the 90 fAbsZposCmd->SetGuidance("Set Z pos. of the Absorber"); 83 fAbsZposCmd->SetParameterName("Zpos", false, << 91 fAbsZposCmd->SetParameterName("Zpos",false,false); 84 fAbsZposCmd->SetDefaultUnit("mm"); 92 fAbsZposCmd->SetDefaultUnit("mm"); 85 fAbsZposCmd->AvailableForStates(G4State_Idle 93 fAbsZposCmd->AvailableForStates(G4State_Idle); 86 fAbsZposCmd->SetToBeBroadcasted(false); 94 fAbsZposCmd->SetToBeBroadcasted(false); 87 95 88 fWorldZCmd = new G4UIcmdWithADoubleAndUnit(" << 96 fWorldZCmd = new G4UIcmdWithADoubleAndUnit("/calor/setWorldZ",this); 89 fWorldZCmd->SetGuidance("Set Z size of the W 97 fWorldZCmd->SetGuidance("Set Z size of the World"); 90 fWorldZCmd->SetParameterName("WSizeZ", false << 98 fWorldZCmd->SetParameterName("WSizeZ",false,false); 91 fWorldZCmd->SetDefaultUnit("mm"); 99 fWorldZCmd->SetDefaultUnit("mm"); 92 fWorldZCmd->SetRange("WSizeZ>0."); 100 fWorldZCmd->SetRange("WSizeZ>0."); 93 fWorldZCmd->AvailableForStates(G4State_Idle) 101 fWorldZCmd->AvailableForStates(G4State_Idle); 94 fWorldZCmd->SetToBeBroadcasted(false); 102 fWorldZCmd->SetToBeBroadcasted(false); 95 103 96 fWorldRCmd = new G4UIcmdWithADoubleAndUnit(" << 104 fWorldRCmd = new G4UIcmdWithADoubleAndUnit("/calor/setWorldR",this); 97 fWorldRCmd->SetGuidance("Set R size of the W 105 fWorldRCmd->SetGuidance("Set R size of the World"); 98 fWorldRCmd->SetParameterName("WSizeR", false << 106 fWorldRCmd->SetParameterName("WSizeR",false,false); 99 fWorldRCmd->SetDefaultUnit("mm"); 107 fWorldRCmd->SetDefaultUnit("mm"); 100 fWorldRCmd->SetRange("WSizeR>0."); 108 fWorldRCmd->SetRange("WSizeR>0."); 101 fWorldRCmd->AvailableForStates(G4State_Idle) 109 fWorldRCmd->AvailableForStates(G4State_Idle); 102 fWorldRCmd->SetToBeBroadcasted(false); 110 fWorldRCmd->SetToBeBroadcasted(false); 103 << 104 // moved from FieldSetup (depends on the use << 105 fFieldDir = new G4UIdirectory("/field03/"); << 106 fFieldDir->SetGuidance("F03 field control.") << 107 << 108 fMagFieldCmd = new G4UIcmdWith3VectorAndUnit << 109 fMagFieldCmd->SetGuidance("Define magnetic f << 110 fMagFieldCmd->SetParameterName("Bx", "By", " << 111 fMagFieldCmd->SetDefaultUnit("tesla"); << 112 fMagFieldCmd->AvailableForStates(G4State_Idl << 113 << 114 fLocalMagFieldCmd = new G4UIcmdWith3VectorAn << 115 fLocalMagFieldCmd->SetGuidance("Define magne << 116 fLocalMagFieldCmd->SetParameterName("Bx", "B << 117 fLocalMagFieldCmd->SetDefaultUnit("tesla"); << 118 fLocalMagFieldCmd->AvailableForStates(G4Stat << 119 } 111 } 120 112 121 //....oooOO0OOooo........oooOO0OOooo........oo 113 //....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo...... 122 114 123 F03DetectorMessenger::~F03DetectorMessenger() 115 F03DetectorMessenger::~F03DetectorMessenger() 124 { 116 { 125 delete fAbsMaterCmd; 117 delete fAbsMaterCmd; 126 delete fAbsThickCmd; 118 delete fAbsThickCmd; 127 delete fAbsRadCmd; 119 delete fAbsRadCmd; 128 delete fAbsZposCmd; 120 delete fAbsZposCmd; 129 delete fWorldMaterCmd; 121 delete fWorldMaterCmd; 130 delete fWorldZCmd; 122 delete fWorldZCmd; 131 delete fWorldRCmd; 123 delete fWorldRCmd; 132 delete fDetDir; 124 delete fDetDir; 133 delete fLocalMagFieldCmd; << 134 delete fMagFieldCmd; << 135 delete fFieldDir; << 136 } 125 } 137 126 138 //....oooOO0OOooo........oooOO0OOooo........oo 127 //....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo...... 139 128 140 void F03DetectorMessenger::SetNewValue(G4UIcom << 129 void F03DetectorMessenger::SetNewValue(G4UIcommand* command,G4String newValue) 141 { 130 { 142 if (command == fAbsMaterCmd) { << 131 if( command == fAbsMaterCmd ) 143 fDetector->SetAbsorberMaterial(newValue); << 132 { fDetector->SetAbsorberMaterial(newValue);} 144 } << 133 145 << 134 if( command == fWorldMaterCmd ) 146 if (command == fWorldMaterCmd) { << 135 { fDetector->SetWorldMaterial(newValue);} 147 fDetector->SetWorldMaterial(newValue); << 136 148 } << 137 if( command == fAbsThickCmd ) 149 << 138 {fDetector->SetAbsorberThickness(fAbsThickCmd->GetNewDoubleValue(newValue));} 150 if (command == fAbsThickCmd) { << 139 151 fDetector->SetAbsorberThickness(fAbsThickC << 140 if( command == fAbsRadCmd ) 152 } << 141 { fDetector->SetAbsorberRadius(fAbsRadCmd->GetNewDoubleValue(newValue));} 153 << 142 154 if (command == fAbsRadCmd) { << 143 if( command == fAbsZposCmd ) 155 fDetector->SetAbsorberRadius(fAbsRadCmd->G << 144 { fDetector->SetAbsorberZpos(fAbsZposCmd->GetNewDoubleValue(newValue));} 156 } << 145 157 << 146 if( command == fWorldZCmd ) 158 if (command == fAbsZposCmd) { << 147 { fDetector->SetWorldSizeZ(fWorldZCmd->GetNewDoubleValue(newValue));} 159 fDetector->SetAbsorberZpos(fAbsZposCmd->Ge << 148 160 } << 149 if( command == fWorldRCmd ) 161 << 150 { fDetector->SetWorldSizeR(fWorldRCmd->GetNewDoubleValue(newValue));} 162 if (command == fWorldZCmd) { << 163 fDetector->SetWorldSizeZ(fWorldZCmd->GetNe << 164 } << 165 << 166 if (command == fWorldRCmd) { << 167 fDetector->SetWorldSizeR(fWorldRCmd->GetNe << 168 } << 169 << 170 if( command == fMagFieldCmd ) { << 171 fDetector->SetFieldValue(fMagFieldCmd->Get << 172 } << 173 << 174 if( command == fLocalMagFieldCmd ) { << 175 fDetector->SetLocalFieldValue(fLocalMagFie << 176 } << 177 } 151 } 178 152 179 //....oooOO0OOooo........oooOO0OOooo........oo 153 //....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo...... 180 154