Geant4 Cross Reference |
1 // 2 // ******************************************************************** 3 // * License and Disclaimer * 4 // * * 5 // * The Geant4 software is copyright of the Copyright Holders of * 6 // * the Geant4 Collaboration. It is provided under the terms and * 7 // * conditions of the Geant4 Software License, included in the file * 8 // * LICENSE and available at http://cern.ch/geant4/license . These * 9 // * include a list of copyright holders. * 10 // * * 11 // * Neither the authors of this software system, nor their employing * 12 // * institutes,nor the agencies providing financial support for this * 13 // * work make any representation or warranty, express or implied, * 14 // * regarding this software system or assume any liability for its * 15 // * use. Please see the license in the file LICENSE and URL above * 16 // * for the full disclaimer and the limitation of liability. * 17 // * * 18 // * This code implementation is the result of the scientific and * 19 // * technical work of the GEANT4 collaboration. * 20 // * By using, copying, modifying or distributing the software (or * 21 // * any work based on the software) you agree to acknowledge its * 22 // * use in resulting scientific publications, and indicate your * 23 // * acceptance of all terms of the Geant4 Software license. * 24 // ******************************************************************** 25 // 26 /// \file field/field03/src/F03DetectorMessenger.cc 27 /// \brief Implementation of the F03DetectorMessenger class 28 // 29 // 30 // 31 // 32 //....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo...... 33 //....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo...... 34 35 #include "F03DetectorMessenger.hh" 36 37 #include "F03DetectorConstruction.hh" 38 39 #include "G4UIcmdWithADoubleAndUnit.hh" 40 #include "G4UIcmdWithAString.hh" 41 #include "G4UIcmdWith3VectorAndUnit.hh" 42 #include "G4UIcmdWithoutParameter.hh" 43 44 //....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo...... 45 46 F03DetectorMessenger::F03DetectorMessenger(F03DetectorConstruction* det) : fDetector(det) 47 { 48 fDetDir = new G4UIdirectory("/calor/"); 49 fDetDir->SetGuidance("F03 detector control."); 50 51 fAbsMaterCmd = new G4UIcmdWithAString("/calor/setAbsMat", this); 52 fAbsMaterCmd->SetGuidance("Select Material of the Absorber."); 53 fAbsMaterCmd->SetParameterName("choice", true); 54 fAbsMaterCmd->SetDefaultValue("Lead"); 55 fAbsMaterCmd->AvailableForStates(G4State_Idle); 56 fAbsMaterCmd->SetToBeBroadcasted(false); 57 58 fWorldMaterCmd = new G4UIcmdWithAString("/calor/setWorldMat", this); 59 fWorldMaterCmd->SetGuidance("Select Material of the World."); 60 fWorldMaterCmd->SetParameterName("wchoice", true); 61 fWorldMaterCmd->SetDefaultValue("Air"); 62 fWorldMaterCmd->AvailableForStates(G4State_Idle); 63 fWorldMaterCmd->SetToBeBroadcasted(false); 64 65 fAbsThickCmd = new G4UIcmdWithADoubleAndUnit("/calor/setAbsThick", this); 66 fAbsThickCmd->SetGuidance("Set Thickness of the Absorber"); 67 fAbsThickCmd->SetParameterName("SizeZ", false, false); 68 fAbsThickCmd->SetDefaultUnit("mm"); 69 fAbsThickCmd->SetRange("SizeZ>0."); 70 fAbsThickCmd->AvailableForStates(G4State_Idle); 71 fAbsThickCmd->SetToBeBroadcasted(false); 72 73 fAbsRadCmd = new G4UIcmdWithADoubleAndUnit("/calor/setAbsRad", this); 74 fAbsRadCmd->SetGuidance("Set radius of the Absorber"); 75 fAbsRadCmd->SetParameterName("SizeR", false, false); 76 fAbsRadCmd->SetDefaultUnit("mm"); 77 fAbsRadCmd->SetRange("SizeR>0."); 78 fAbsRadCmd->AvailableForStates(G4State_Idle); 79 fAbsRadCmd->SetToBeBroadcasted(false); 80 81 fAbsZposCmd = new G4UIcmdWithADoubleAndUnit("/calor/setAbsZpos", this); 82 fAbsZposCmd->SetGuidance("Set Z pos. of the Absorber"); 83 fAbsZposCmd->SetParameterName("Zpos", false, false); 84 fAbsZposCmd->SetDefaultUnit("mm"); 85 fAbsZposCmd->AvailableForStates(G4State_Idle); 86 fAbsZposCmd->SetToBeBroadcasted(false); 87 88 fWorldZCmd = new G4UIcmdWithADoubleAndUnit("/calor/setWorldZ", this); 89 fWorldZCmd->SetGuidance("Set Z size of the World"); 90 fWorldZCmd->SetParameterName("WSizeZ", false, false); 91 fWorldZCmd->SetDefaultUnit("mm"); 92 fWorldZCmd->SetRange("WSizeZ>0."); 93 fWorldZCmd->AvailableForStates(G4State_Idle); 94 fWorldZCmd->SetToBeBroadcasted(false); 95 96 fWorldRCmd = new G4UIcmdWithADoubleAndUnit("/calor/setWorldR", this); 97 fWorldRCmd->SetGuidance("Set R size of the World"); 98 fWorldRCmd->SetParameterName("WSizeR", false, false); 99 fWorldRCmd->SetDefaultUnit("mm"); 100 fWorldRCmd->SetRange("WSizeR>0."); 101 fWorldRCmd->AvailableForStates(G4State_Idle); 102 fWorldRCmd->SetToBeBroadcasted(false); 103 104 // moved from FieldSetup (depends on the user field) 105 fFieldDir = new G4UIdirectory("/field03/"); 106 fFieldDir->SetGuidance("F03 field control."); 107 108 fMagFieldCmd = new G4UIcmdWith3VectorAndUnit("/field03/setField",this); 109 fMagFieldCmd->SetGuidance("Define magnetic field."); 110 fMagFieldCmd->SetParameterName("Bx", "By", "Bz" ,false,false); 111 fMagFieldCmd->SetDefaultUnit("tesla"); 112 fMagFieldCmd->AvailableForStates(G4State_Idle); 113 114 fLocalMagFieldCmd = new G4UIcmdWith3VectorAndUnit("/field03/setLocalField",this); 115 fLocalMagFieldCmd->SetGuidance("Define magnetic field."); 116 fLocalMagFieldCmd->SetParameterName("Bx", "By", "Bz" ,false,false); 117 fLocalMagFieldCmd->SetDefaultUnit("tesla"); 118 fLocalMagFieldCmd->AvailableForStates(G4State_Idle); 119 } 120 121 //....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo...... 122 123 F03DetectorMessenger::~F03DetectorMessenger() 124 { 125 delete fAbsMaterCmd; 126 delete fAbsThickCmd; 127 delete fAbsRadCmd; 128 delete fAbsZposCmd; 129 delete fWorldMaterCmd; 130 delete fWorldZCmd; 131 delete fWorldRCmd; 132 delete fDetDir; 133 delete fLocalMagFieldCmd; 134 delete fMagFieldCmd; 135 delete fFieldDir; 136 } 137 138 //....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo...... 139 140 void F03DetectorMessenger::SetNewValue(G4UIcommand* command, G4String newValue) 141 { 142 if (command == fAbsMaterCmd) { 143 fDetector->SetAbsorberMaterial(newValue); 144 } 145 146 if (command == fWorldMaterCmd) { 147 fDetector->SetWorldMaterial(newValue); 148 } 149 150 if (command == fAbsThickCmd) { 151 fDetector->SetAbsorberThickness(fAbsThickCmd->GetNewDoubleValue(newValue)); 152 } 153 154 if (command == fAbsRadCmd) { 155 fDetector->SetAbsorberRadius(fAbsRadCmd->GetNewDoubleValue(newValue)); 156 } 157 158 if (command == fAbsZposCmd) { 159 fDetector->SetAbsorberZpos(fAbsZposCmd->GetNewDoubleValue(newValue)); 160 } 161 162 if (command == fWorldZCmd) { 163 fDetector->SetWorldSizeZ(fWorldZCmd->GetNewDoubleValue(newValue)); 164 } 165 166 if (command == fWorldRCmd) { 167 fDetector->SetWorldSizeR(fWorldRCmd->GetNewDoubleValue(newValue)); 168 } 169 170 if( command == fMagFieldCmd ) { 171 fDetector->SetFieldValue(fMagFieldCmd->GetNew3VectorValue(newValue)); 172 } 173 174 if( command == fLocalMagFieldCmd ) { 175 fDetector->SetLocalFieldValue(fLocalMagFieldCmd->GetNew3VectorValue(newValue)); 176 } 177 } 178 179 //....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo...... 180