Files
geant4/examples/advanced/underground_physics/src/DMXStackingActionMessenger.cc
T
2016-06-09 10:28:22 +02:00

77 lines
2.9 KiB
C++

//
// ********************************************************************
// * DISCLAIMER *
// * *
// * The following disclaimer summarizes all the specific disclaimers *
// * of contributors to this software. The specific disclaimers,which *
// * govern, are listed with their locations in: *
// * http://cern.ch/geant4/license *
// * *
// * Neither the authors of this software system, nor their employing *
// * institutes,nor the agencies providing financial support for this *
// * work make any representation or warranty, express or implied, *
// * regarding this software system or assume any liability for its *
// * use. *
// * *
// * This code implementation is the intellectual property of the *
// * GEANT4 collaboration. *
// * By copying, distributing or modifying the Program (or any work *
// * based on the Program) you indicate your acceptance of this *
// * statement, and all its terms. *
// ********************************************************************
//
//
// --------------------------------------------------------------
// GEANT 4 - Underground Dark Matter Detector Advanced Example
//
// For information related to this code contact: Alex Howard
// e-mail: a.s.howard@ic.ac.uk
// --------------------------------------------------------------
// Comments
//
// Underground Advanced
// by A. Howard and H. Araujo
// (27th November 2001)
//
// StackingActionMessenger program
// --------------------------------------------------------------
#include "DMXStackingActionMessenger.hh"
#include "DMXStackingAction.hh"
#include "G4UIcmdWithABool.hh"
#include "G4UIcommand.hh"
#include "globals.hh"
DMXStackingActionMessenger::DMXStackingActionMessenger
(DMXStackingAction* msa) :DMXAction(msa) {
KillGammasCmd = new G4UIcmdWithABool("/dmx/KillGammasInConcrete",this);
KillGammasCmd->
SetGuidance("Kills gammas produced by neutrons in the concrete wall");
KillGammasCmd->SetGuidance("Default = false");
KillGammasCmd->SetParameterName("KillGammasFlag", false);
KillGammasCmd->SetDefaultValue(false);
}
DMXStackingActionMessenger::~DMXStackingActionMessenger() {
delete KillGammasCmd;
}
void DMXStackingActionMessenger::SetNewValue
(G4UIcommand* command, G4String newValue) {
if(command==KillGammasCmd) {
G4int vl;
const char* t = newValue;
std::istrstream is((char*)t);
is >> vl;
DMXAction->SetKillGammasFlag(vl!=0);
}
}