00001 // 00002 // ******************************************************************** 00003 // * License and Disclaimer * 00004 // * * 00005 // * The Geant4 software is copyright of the Copyright Holders of * 00006 // * the Geant4 Collaboration. It is provided under the terms and * 00007 // * conditions of the Geant4 Software License, included in the file * 00008 // * LICENSE and available at http://cern.ch/geant4/license . These * 00009 // * include a list of copyright holders. * 00010 // * * 00011 // * Neither the authors of this software system, nor their employing * 00012 // * institutes,nor the agencies providing financial support for this * 00013 // * work make any representation or warranty, express or implied, * 00014 // * regarding this software system or assume any liability for its * 00015 // * use. Please see the license in the file LICENSE and URL above * 00016 // * for the full disclaimer and the limitation of liability. * 00017 // * * 00018 // * This code implementation is the result of the scientific and * 00019 // * technical work of the GEANT4 collaboration. * 00020 // * By using, copying, modifying or distributing the software (or * 00021 // * any work based on the software) you agree to acknowledge its * 00022 // * use in resulting scientific publications, and indicate your * 00023 // * acceptance of all terms of the Geant4 Software license. * 00024 // ******************************************************************** 00025 // 00026 // $Id: G4NeutronKillerMessenger.cc 69887 2013-05-17 08:17:02Z gcosmo $ 00027 // 00028 //--------------------------------------------------------------------------- 00029 // 00030 // ClassName: G4NeutronKillerMessenger 00031 // 00032 // Description: Messenger class 00033 // 00034 // Author: V.Ivanchenko 26/09/00 for HARP software 00035 // 00036 //---------------------------------------------------------------------------- 00037 // 00038 //....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo...... 00039 //....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo...... 00040 00041 #include "G4NeutronKillerMessenger.hh" 00042 #include "G4UIcmdWithADoubleAndUnit.hh" 00043 #include "G4UIdirectory.hh" 00044 #include "G4NeutronKiller.hh" 00045 00046 //....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo...... 00047 00048 G4NeutronKillerMessenger::G4NeutronKillerMessenger(G4NeutronKiller* p) 00049 :killer(p) 00050 { 00051 00052 dir = new G4UIdirectory("/physics_engine/neutron/"); 00053 dir->SetGuidance("control on neutrons"); 00054 00055 eCmd = new G4UIcmdWithADoubleAndUnit("/physics_engine/neutron/energyLimit",this); 00056 eCmd->SetGuidance("Set tracking cut - min energy of a particle."); 00057 eCmd->SetParameterName("energyLimit",false); 00058 eCmd->SetUnitCategory("Energy"); 00059 eCmd->AvailableForStates(G4State_PreInit,G4State_Idle); 00060 00061 tCmd = new G4UIcmdWithADoubleAndUnit("/physics_engine/neutron/timeLimit",this); 00062 tCmd->SetGuidance("Set time limit."); 00063 tCmd->SetParameterName("timeLimit",false); 00064 tCmd->SetUnitCategory("Time"); 00065 tCmd->AvailableForStates(G4State_PreInit,G4State_Idle); 00066 } 00067 00068 //....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo...... 00069 00070 G4NeutronKillerMessenger::~G4NeutronKillerMessenger() 00071 { 00072 delete eCmd; 00073 delete tCmd; 00074 delete dir; 00075 } 00076 00077 //....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo...... 00078 00079 void G4NeutronKillerMessenger::SetNewValue(G4UIcommand* command, G4String val) 00080 { 00081 if (command == eCmd) 00082 killer->SetKinEnergyLimit(eCmd->GetNewDoubleValue(val)); 00083 00084 if (command == tCmd) 00085 killer->SetTimeLimit(tCmd->GetNewDoubleValue(val)); 00086 } 00087 00088 //....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo......