| Geant4 Cross Reference |
1 // 1 //
2 // ******************************************* 2 // ********************************************************************
3 // * License and Disclaimer 3 // * License and Disclaimer *
4 // * 4 // * *
5 // * The Geant4 software is copyright of th 5 // * The Geant4 software is copyright of the Copyright Holders of *
6 // * the Geant4 Collaboration. It is provided 6 // * the Geant4 Collaboration. It is provided under the terms and *
7 // * conditions of the Geant4 Software License 7 // * conditions of the Geant4 Software License, included in the file *
8 // * LICENSE and available at http://cern.ch/ 8 // * LICENSE and available at http://cern.ch/geant4/license . These *
9 // * include a list of copyright holders. 9 // * include a list of copyright holders. *
10 // * 10 // * *
11 // * Neither the authors of this software syst 11 // * Neither the authors of this software system, nor their employing *
12 // * institutes,nor the agencies providing fin 12 // * institutes,nor the agencies providing financial support for this *
13 // * work make any representation or warran 13 // * work make any representation or warranty, express or implied, *
14 // * regarding this software system or assum 14 // * regarding this software system or assume any liability for its *
15 // * use. Please see the license in the file 15 // * use. Please see the license in the file LICENSE and URL above *
16 // * for the full disclaimer and the limitatio 16 // * for the full disclaimer and the limitation of liability. *
17 // * 17 // * *
18 // * This code implementation is the result 18 // * This code implementation is the result of the scientific and *
19 // * technical work of the GEANT4 collaboratio 19 // * technical work of the GEANT4 collaboration. *
20 // * By using, copying, modifying or distri 20 // * By using, copying, modifying or distributing the software (or *
21 // * any work based on the software) you ag 21 // * any work based on the software) you agree to acknowledge its *
22 // * use in resulting scientific publicati 22 // * use in resulting scientific publications, and indicate your *
23 // * acceptance of all terms of the Geant4 Sof 23 // * acceptance of all terms of the Geant4 Software license. *
24 // ******************************************* 24 // ********************************************************************
25 // 25 //
26 // 26 //
27 /// \file field/field04/src/F04PrimaryGenerato <<
28 /// \brief Implementation of the F04PrimaryGen <<
29 // 27 //
30 28
31 #include "F04PrimaryGeneratorMessenger.hh" <<
32 <<
33 #include "F04PrimaryGeneratorAction.hh" <<
34 <<
35 #include "G4SystemOfUnits.hh" <<
36 #include "G4UIcmdWithADoubleAndUnit.hh" <<
37 #include "G4UIcmdWithAString.hh" 29 #include "G4UIcmdWithAString.hh"
>> 30 #include "G4UIcmdWithADoubleAndUnit.hh"
38 31
39 //....oooOO0OOooo........oooOO0OOooo........oo << 32 #include "F04PrimaryGeneratorAction.hh"
40 << 33 #include "F04PrimaryGeneratorMessenger.hh"
41 F04PrimaryGeneratorMessenger::F04PrimaryGenera <<
42 : fAction(gun) <<
43 { <<
44 fRndmCmd = new G4UIcmdWithAString("/gun/rand <<
45 fRndmCmd->SetGuidance("Shoot randomly the in <<
46 fRndmCmd->SetGuidance(" Choice : on, off(de <<
47 fRndmCmd->SetParameterName("choice", true); <<
48 fRndmCmd->SetDefaultValue("off"); <<
49 fRndmCmd->SetCandidates("on off"); <<
50 fRndmCmd->AvailableForStates(G4State_PreInit <<
51 <<
52 fSetXvertexCmd = new G4UIcmdWithADoubleAndUn <<
53 fSetXvertexCmd->SetGuidance(" Set x coord. o <<
54 fSetXvertexCmd->SetParameterName("xv", true) <<
55 fSetXvertexCmd->SetDefaultValue(0.0 * mm); <<
56 fSetXvertexCmd->SetDefaultUnit("mm"); <<
57 <<
58 fSetYvertexCmd = new G4UIcmdWithADoubleAndUn <<
59 fSetYvertexCmd->SetGuidance(" Set y coord. o <<
60 fSetYvertexCmd->SetParameterName("yv", true) <<
61 fSetYvertexCmd->SetDefaultValue(0.0 * mm); <<
62 fSetYvertexCmd->SetDefaultUnit("mm"); <<
63 34
64 fSetZvertexCmd = new G4UIcmdWithADoubleAndUn << 35 F04PrimaryGeneratorMessenger::F04PrimaryGeneratorMessenger(F04PrimaryGeneratorAction* Gun)
65 fSetZvertexCmd->SetGuidance(" Set z coord. o << 36 : Action(Gun)
66 fSetZvertexCmd->SetParameterName("zv", true) << 37 {
67 fSetZvertexCmd->SetDefaultValue(0.0 * mm); << 38 RndmCmd = new G4UIcmdWithAString("/gun/random",this);
68 fSetZvertexCmd->SetDefaultUnit("mm"); << 39 RndmCmd->SetGuidance("Shoot randomly the incident particle.");
>> 40 RndmCmd->SetGuidance(" Choice : on, off(default)");
>> 41 RndmCmd->SetParameterName("choice",true);
>> 42 RndmCmd->SetDefaultValue("off");
>> 43 RndmCmd->SetCandidates("on off");
>> 44 RndmCmd->AvailableForStates(G4State_PreInit,G4State_Idle);
>> 45
>> 46 setxvertexCmd = new G4UIcmdWithADoubleAndUnit("/gun/xvertex",this);
>> 47 setxvertexCmd->SetGuidance(" Set x coord. of the primary vertex.");
>> 48 setxvertexCmd->SetParameterName("xv",true);
>> 49 setxvertexCmd->SetDefaultValue(0.0*mm) ;
>> 50
>> 51 setyvertexCmd = new G4UIcmdWithADoubleAndUnit("/gun/yvertex",this);
>> 52 setyvertexCmd->SetGuidance(" Set y coord. of the primary vertex.");
>> 53 setyvertexCmd->SetParameterName("yv",true);
>> 54 setyvertexCmd->SetDefaultValue(0.0*mm) ;
>> 55
>> 56 setzvertexCmd = new G4UIcmdWithADoubleAndUnit("/gun/zvertex",this);
>> 57 setzvertexCmd->SetGuidance(" Set z coord. of the primary vertex.");
>> 58 setzvertexCmd->SetParameterName("zv",true);
>> 59 setzvertexCmd->SetDefaultValue(0.0*mm) ;
>> 60
69 } 61 }
70 62
71 //....oooOO0OOooo........oooOO0OOooo........oo <<
72 <<
73 F04PrimaryGeneratorMessenger::~F04PrimaryGener 63 F04PrimaryGeneratorMessenger::~F04PrimaryGeneratorMessenger()
74 { 64 {
75 delete fRndmCmd; << 65 delete RndmCmd;
76 delete fSetXvertexCmd; << 66 delete setxvertexCmd;
77 delete fSetYvertexCmd; << 67 delete setyvertexCmd;
78 delete fSetZvertexCmd; << 68 delete setzvertexCmd;
79 } 69 }
80 70
81 //....oooOO0OOooo........oooOO0OOooo........oo << 71 void F04PrimaryGeneratorMessenger::SetNewValue(G4UIcommand * command,G4String newValue)
82 << 72 {
83 void F04PrimaryGeneratorMessenger::SetNewValue << 73 if( command == RndmCmd )
84 { << 74 { Action->SetRndmFlag(newValue);}
85 if (command == fRndmCmd) { << 75 if( command == setxvertexCmd)
86 fAction->SetRndmFlag(newValue); << 76 { Action->Setxvertex(setxvertexCmd->GetNewDoubleValue(newValue));}
87 } << 77 if( command == setyvertexCmd)
88 if (command == fSetXvertexCmd) { << 78 { Action->Setyvertex(setyvertexCmd->GetNewDoubleValue(newValue));}
89 fAction->SetXvertex(fSetXvertexCmd->GetNew << 79 if( command == setzvertexCmd)
90 } << 80 { Action->Setzvertex(setzvertexCmd->GetNewDoubleValue(newValue));}
91 if (command == fSetYvertexCmd) { <<
92 fAction->SetYvertex(fSetYvertexCmd->GetNew <<
93 } <<
94 if (command == fSetZvertexCmd) { <<
95 fAction->SetZvertex(fSetZvertexCmd->GetNew <<
96 } <<
97 } 81 }
98 82