File indexing completed on 2025-02-23 09:20:21
0001
0002
0003
0004
0005
0006
0007
0008
0009
0010
0011
0012
0013
0014
0015
0016
0017
0018
0019
0020
0021
0022
0023
0024
0025
0026
0027
0028
0029
0030
0031
0032
0033 #include "PrimaryGeneratorMessenger.hh"
0034
0035 PrimaryGeneratorMessenger::~PrimaryGeneratorMessenger()
0036 {
0037 delete cmdGunRadius;
0038 delete cmdGunMeanEnergy;
0039 delete cmdGunStdEnergy;
0040 }
0041
0042 PrimaryGeneratorMessenger::PrimaryGeneratorMessenger(PrimaryGeneratorAction* myGun)
0043 : primaryGenPointer(myGun), cmdGunRadius(nullptr),
0044 cmdGunMeanEnergy(nullptr), cmdGunStdEnergy(nullptr)
0045 {
0046 cmdGunRadius = new G4UIcmdWithADoubleAndUnit("/PrimaryGenerator/gunRadius", this);
0047 cmdGunRadius -> SetDefaultUnit("mm");
0048 cmdGunRadius -> SetDefaultValue(1.);
0049 primaryGenPointer -> SetGunRadius(1.*mm);
0050
0051 cmdGunMeanEnergy = new G4UIcmdWithADoubleAndUnit("/PrimaryGenerator/gunMeanEnergy", this);
0052 cmdGunMeanEnergy -> SetDefaultUnit("MeV");
0053 cmdGunMeanEnergy -> SetDefaultValue(12.);
0054 primaryGenPointer -> SetGunMeanEnergy(12.*MeV);
0055
0056 cmdGunStdEnergy = new G4UIcmdWithADoubleAndUnit("/PrimaryGenerator/gunStdEnergy", this);
0057 cmdGunStdEnergy -> SetDefaultUnit("MeV");
0058 cmdGunStdEnergy -> SetDefaultValue(0.127);
0059 primaryGenPointer -> SetGunStdEnergy(0.127*MeV);
0060 }
0061
0062 void PrimaryGeneratorMessenger::SetNewValue(G4UIcommand* cmd, G4String newValue)
0063 {
0064 if ( cmd == cmdGunRadius )
0065 {
0066 cmdGunRadius -> GetNewUnitValue(newValue);
0067 primaryGenPointer -> SetGunRadius(cmdGunRadius -> GetNewDoubleValue(newValue));
0068 }
0069 else if ( cmd == cmdGunMeanEnergy )
0070 {
0071 cmdGunMeanEnergy -> GetNewUnitValue(newValue);
0072 primaryGenPointer -> SetGunMeanEnergy(cmdGunMeanEnergy -> GetNewDoubleValue(newValue));
0073 }
0074 else if ( cmd == cmdGunStdEnergy )
0075 {
0076 cmdGunStdEnergy -> GetNewUnitValue(newValue);
0077 primaryGenPointer -> SetGunStdEnergy(cmdGunStdEnergy -> GetNewDoubleValue(newValue));
0078 }
0079 else
0080 G4cerr << "PrimaryGeneratorMessenger::SetNewValue: command not found" << G4endl;
0081
0082 }