Import Geant4 5.0.0 source tree

2016-06-08 16:57:27 +02:00
parent 330b82b769
commit 37fff30d2e
5733 changed files with 263867 additions and 74574 deletions
@@ -0,0 +1,98 @@
+//
+// ********************************************************************
+// * 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.                                    *
+// ********************************************************************
+//
+// $Id: A01PrimaryGeneratorMessenger.cc,v 1.3 2002/12/13 11:34:34 gunter Exp $
+// --------------------------------------------------------------
+//
+#include "A01PrimaryGeneratorMessenger.hh"
+#include "A01PrimaryGeneratorAction.hh"
+#include "G4UIcmdWithADoubleAndUnit.hh"
+#include "G4UIcmdWithABool.hh"
+#include "G4ios.hh"
+
+A01PrimaryGeneratorMessenger::A01PrimaryGeneratorMessenger(A01PrimaryGeneratorAction * mpga)
+:target(mpga)
+{
+  momentumCmd = new G4UIcmdWithADoubleAndUnit("/mydet/momentum",this);
+  momentumCmd->SetGuidance("Mean momentum of primaries");
+  momentumCmd->SetParameterName("p",true);
+  momentumCmd->SetRange("p>=0.");
+  momentumCmd->SetDefaultValue(1.);
+  momentumCmd->SetDefaultUnit("GeV");
+
+  sigmaMomCmd = new G4UIcmdWithADoubleAndUnit("/mydet/sigmaMomentum",this);
+  sigmaMomCmd->SetGuidance("Sigma momentum of primaries");
+  sigmaMomCmd->SetParameterName("p",true);
+  sigmaMomCmd->SetRange("p>=0.");
+  sigmaMomCmd->SetDefaultValue(1.);
+  sigmaMomCmd->SetDefaultUnit("GeV");
+
+  sigmaAngCmd = new G4UIcmdWithADoubleAndUnit("/mydet/sigmaAngle",this);
+  sigmaAngCmd->SetGuidance("sigma angle divergence of primaries");
+  sigmaAngCmd->SetParameterName("t",true);
+  sigmaAngCmd->SetRange("t>=0.");
+  sigmaAngCmd->SetDefaultValue(1.);
+  sigmaAngCmd->SetDefaultUnit("deg");
+
+  randomCmd = new G4UIcmdWithABool("/mydet/randomizePrimary",this);
+  randomCmd->SetGuidance("Boolean flag for randomizing primary particle types.");
+  randomCmd->SetGuidance("In case this flag is false, you can select the primary particle");
+  randomCmd->SetGuidance("  with /gun/particle command.");
+  randomCmd->SetParameterName("flg",true);
+  randomCmd->SetDefaultValue(true);
+}
+
+A01PrimaryGeneratorMessenger::~A01PrimaryGeneratorMessenger()
+{
+  delete momentumCmd;
+  delete sigmaMomCmd;
+  delete sigmaAngCmd;
+  delete randomCmd;
+}
+
+void A01PrimaryGeneratorMessenger::SetNewValue(G4UIcommand * command,G4String newValue)
+{
+  if( command==momentumCmd )
+  { target->SetMomentum(momentumCmd->GetNewDoubleValue(newValue)); }
+  if( command==sigmaMomCmd )
+  { target->SetSigmaMomentum(sigmaMomCmd->GetNewDoubleValue(newValue)); }
+  if( command==sigmaAngCmd )
+  { target->SetSigmaAngle(sigmaAngCmd->GetNewDoubleValue(newValue)); }
+  if( command==randomCmd )
+  { target->SetRandomize(randomCmd->GetNewBoolValue(newValue)); }
+}
+
+G4String A01PrimaryGeneratorMessenger::GetCurrentValue(G4UIcommand * command)
+{
+  G4String cv;
+  if( command==momentumCmd )
+  { cv = momentumCmd->ConvertToString(target->GetMomentum(),"GeV"); }
+  if( command==sigmaMomCmd )
+  { cv = sigmaMomCmd->ConvertToString(target->GetSigmaMomentum(),"GeV"); }
+  if( command==sigmaAngCmd )
+  { cv = sigmaAngCmd->ConvertToString(target->GetSigmaAngle(),"deg"); }
+  if( command==randomCmd )
+  { cv = randomCmd->ConvertToString(target->GetRandomize()); }
+
+  return cv;
+}
+