Geant4  9.6.p02
 All Classes Namespaces Files Functions Variables Typedefs Enumerations Enumerator Friends Macros Groups Pages
BrachyPrimaryGeneratorActionIr.cc
Go to the documentation of this file.
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 //
27 // --------------------------------------------------------------
28 // GEANT 4 - Brachytherapy example
29 // --------------------------------------------------------------
30 //
31 // Code developed by:
32 // S. Agostinelli, F. Foppiano, S. Garelli , M. Tropeano, S.Guatelli
33 //
34 // ********************************************
35 // * *
36 // * BrachyPrimaryGeneratorActionIr.cc *
37 // * *
38 // ********************************************
39 //
40 // $Id$
41 //
43 #include "globals.hh"
44 #include "Randomize.hh"
45 #include "G4SystemOfUnits.hh"
46 #include "G4ParticleTable.hh"
47 #include "G4Event.hh"
48 #include "G4ParticleGun.hh"
49 #include "G4UImanager.hh"
50 #include "G4RunManager.hh"
51 
53 {
54  G4int NumParticles = 1;
55  particleGun = new G4ParticleGun(NumParticles);
56 }
57 
59 {
60  if(particleGun)
61  delete particleGun;
62 }
63 
65 {
66 
67  // Define primary particle type
69  G4String ParticleName = "gamma";
70  G4ParticleDefinition* pParticle = pParticleTable -> FindParticle(ParticleName);
71  particleGun -> SetParticleDefinition(pParticle);
72 
73  // Random generation of gamma source point inside the Iridium core
74  G4double x,y,z;
75  G4double radius = 0.30*mm;
76  do{
77  x = (G4UniformRand()-0.5)*(radius)/0.5;
78  y = (G4UniformRand()-0.5)*(radius)/0.5;
79  }while(x*x+y*y > radius*radius);
80 
81  z = (G4UniformRand()-0.5)*1.75*mm/0.5 -1.975*mm ;
82 
83  G4ThreeVector position(x,y,z);
84  particleGun -> SetParticlePosition(position);
85 
86  // Random generation of the impulse direction
87  G4double a,b,c;
88  G4double n;
89  do{
90  a = (G4UniformRand()-0.5)/0.5;
91  b = (G4UniformRand()-0.5)/0.5;
92  c = (G4UniformRand()-0.5)/0.5;
93  n = a*a+b*b+c*c;
94  }while(n > 1 || n == 0.0);
95  n = std::sqrt(n);
96  a /= n;
97  b /= n;
98  c /= n;
99 
100  G4ThreeVector direction(a,b,c);
101  particleGun->SetParticleMomentumDirection(direction);
102 
103  // Primary particle energy
104  primaryParticleEnergy = 356.*keV;
105  particleGun->SetParticleEnergy(primaryParticleEnergy);
106 
107 
108  // Generate a primary particle
109  particleGun -> GeneratePrimaryVertex(anEvent);
110 }
111