| Geant4 Cross Reference |
1 //
2 // ********************************************************************
3 // * License and Disclaimer *
4 // * *
5 // * The Geant4 software is copyright of the Copyright Holders of *
6 // * the Geant4 Collaboration. It is provided under the terms and *
7 // * conditions of the Geant4 Software License, included in the file *
8 // * LICENSE and available at http://cern.ch/geant4/license . These *
9 // * include a list of copyright holders. *
10 // * *
11 // * Neither the authors of this software system, nor their employing *
12 // * institutes,nor the agencies providing financial support for this *
13 // * work make any representation or warranty, express or implied, *
14 // * regarding this software system or assume any liability for its *
15 // * use. Please see the license in the file LICENSE and URL above *
16 // * for the full disclaimer and the limitation of liability. *
17 // * *
18 // * This code implementation is the result of the scientific and *
19 // * technical work of the GEANT4 collaboration. *
20 // * By using, copying, modifying or distributing the software (or *
21 // * any work based on the software) you agree to acknowledge its *
22 // * use in resulting scientific publications, and indicate your *
23 // * acceptance of all terms of the Geant4 Software license. *
24 // ********************************************************************
25 //
26 // Author: F. Poignant, floriane.poignant@gmail.com
27 //
28 // file STyclotronPrimaryGeneratorAction.cc
29
30 #include "STCyclotronPrimaryGeneratorAction.hh"
31 #include "STCyclotronRun.hh"
32
33 #include "G4RunManager.hh"
34 #include "G4Event.hh"
35 #include "G4GeneralParticleSource.hh"
36 #include "G4ParticleTable.hh"
37 #include "G4ParticleDefinition.hh"
38 #include "G4SystemOfUnits.hh"
39 #include "STCyclotronPrimaryGeneratorActionMessenger.hh"
40
41 STCyclotronPrimaryGeneratorAction::STCyclotronPrimaryGeneratorAction()
42 : G4VUserPrimaryGeneratorAction()
43 {
44 fMessenger = new STCyclotronPrimaryGeneratorActionMessenger(this);
45 fParticleBeam = new G4GeneralParticleSource();
46 fBeamCurrent = 10.E-6 ; //ampere;
47 //The rest of the parameters (type of particle, energy, beam shape ..) are defined in the init_beam.vis class.
48 }
49
50 STCyclotronPrimaryGeneratorAction::~STCyclotronPrimaryGeneratorAction()
51 {
52 delete fMessenger;
53 delete fParticleBeam;
54 }
55
56 void STCyclotronPrimaryGeneratorAction::GeneratePrimaries(G4Event* anEvent)
57 {
58 //Set up the number of particles per event
59 G4double timePerEvent = 1.E-11 ; //s;
60 G4double chargeParticle = fParticleBeam->GetParticleDefinition()->GetPDGCharge()*1.6E-19;
61 G4double numberOfPart = std::abs(fBeamCurrent*timePerEvent/chargeParticle);
62 G4String name = fParticleBeam->GetParticleDefinition()->GetParticleName();
63 // G4double energy = fParticleBeam->GetParticleEnergy();
64 G4double energy = fParticleBeam -> GetCurrentSource()->GetEneDist()->GetMonoEnergy();
65 G4int fPrimariesPerEvent = (G4int)numberOfPart;
66
67 if(fPrimariesPerEvent < 1){
68 G4cout << "Warning: number of particles per event below 0: " << numberOfPart << G4endl;
69 return;
70 }
71
72 fParticleBeam->SetNumberOfParticles(fPrimariesPerEvent);
73 fParticleBeam->GeneratePrimaryVertex(anEvent);
74
75 STCyclotronRun* fRun = static_cast<STCyclotronRun*>(G4RunManager::GetRunManager()->GetNonConstCurrentRun());
76 fRun->SetPrimariesPerEvent(fPrimariesPerEvent);
77 fRun->SetTimePerEvent(timePerEvent);
78
79 fRun->SetBeamName(name);
80 fRun->SetBeamCurrent(fBeamCurrent);
81 fRun->SetBeamEnergy(energy);
82
83 //G4cout << "The new beam current is the following : " << fBeamCurrent << " Ampere." << G4endl;
84 //G4cout << "Particles per event : " << numberOfParticlePerEvent << " particles." << G4endl;
85
86 }
87
88 void STCyclotronPrimaryGeneratorAction::SetBeamCurrent(G4double current)
89 {
90 if(fBeamCurrent!=current){
91 fBeamCurrent=current;
92 G4cout << "The new beam current is the following : " << fBeamCurrent << " Ampere." << G4endl;
93 }
94 }
95