Import Geant4 4.0.0 source tree

2016-06-08 16:18:25 +02:00
parent 36c080dca6
commit 921d3b1cda
3990 changed files with 185376 additions and 82884 deletions
@@ -0,0 +1,93 @@
+//
+// ********************************************************************
+// * 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: F02PrimaryGeneratorMessenger.cc,v 1.3 2001/10/15 17:20:44 gcosmo Exp $
+// GEANT4 tag $Name: geant4-04-00 $
+//
+// 
+
+//....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo....
+//....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo....
+
+#include "F02PrimaryGeneratorMessenger.hh"
+
+#include "F02PrimaryGeneratorAction.hh"
+#include "G4UIcmdWithAString.hh"
+#include "G4UIcmdWithADoubleAndUnit.hh"
+
+//....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo....
+
+F02PrimaryGeneratorMessenger::F02PrimaryGeneratorMessenger(F02PrimaryGeneratorAction* F02Gun)
+  : F02Action(F02Gun)
+{ 
+  RndmCmd = new G4UIcmdWithAString("/gun/random",this);
+  RndmCmd->SetGuidance("Shoot randomly the incident particle.");
+  RndmCmd->SetGuidance("  Choice : on, off(default)");
+  RndmCmd->SetParameterName("choice",true);
+  RndmCmd->SetDefaultValue("off");
+  RndmCmd->SetCandidates("on off");
+  RndmCmd->AvailableForStates(PreInit,Idle);
+ 
+  setxvertexCmd = new G4UIcmdWithADoubleAndUnit("/gun/xvertex",this);
+  setxvertexCmd->SetGuidance(" Set x coord. of the primary vertex.");
+  setxvertexCmd->SetParameterName("xv",true);
+  setxvertexCmd->SetDefaultValue(0.0*mm) ; 
+  
+  setyvertexCmd = new G4UIcmdWithADoubleAndUnit("/gun/yvertex",this);
+  setyvertexCmd->SetGuidance(" Set y coord. of the primary vertex.");
+  setyvertexCmd->SetParameterName("yv",true);
+  setyvertexCmd->SetDefaultValue(0.0*mm) ; 
+  
+  setzvertexCmd = new G4UIcmdWithADoubleAndUnit("/gun/zvertex",this);
+  setzvertexCmd->SetGuidance(" Set z coord. of the primary vertex.");
+  setzvertexCmd->SetParameterName("zv",true);
+  setzvertexCmd->SetDefaultValue(0.0*mm) ; 
+  
+}
+
+//....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo....
+
+F02PrimaryGeneratorMessenger::~F02PrimaryGeneratorMessenger()
+{
+  delete RndmCmd;
+  delete setxvertexCmd;
+  delete setyvertexCmd;
+  delete setzvertexCmd;
+}
+
+//....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo....
+
+void F02PrimaryGeneratorMessenger::SetNewValue(G4UIcommand * command,G4String newValue)
+{ 
+  if( command == RndmCmd )
+   { F02Action->SetRndmFlag(newValue);}
+  if( command == setxvertexCmd)
+   { F02Action->Setxvertex(setxvertexCmd->GetNewDoubleValue(newValue));}
+  if( command == setyvertexCmd)
+   { F02Action->Setyvertex(setyvertexCmd->GetNewDoubleValue(newValue));}
+  if( command == setzvertexCmd)
+   { F02Action->Setzvertex(setzvertexCmd->GetNewDoubleValue(newValue));}
+}
+
+//....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo....
+