source: trunk/source/processes/electromagnetic/lowenergy/src/G4CrossSectionExcitationBornPartial.cc@ 830

Last change on this file since 830 was 819, checked in by garnier, 17 years ago

import all except CVS

File size: 4.2 KB
RevLine 
[819]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// $Id: G4CrossSectionExcitationBornPartial.cc,v 1.1 2007/10/15 08:57:54 pia Exp $
28// GEANT4 tag $Name: $
29//
30// Contact Author: Maria Grazia Pia (Maria.Grazia.Pia@cern.ch)
31//
32// Reference: TNS Geant4-DNA paper
33// Reference for implementation model: NIM. 155, pp. 145-156, 1978
34
35// History:
36// -----------
37// Date Name Modification
38// 28 Apr 2007 M.G. Pia Created in compliance with design described in TNS paper
39//
40// -------------------------------------------------------------------
41
42// Class description:
43// Geant4-DNA Cross total cross section for electron elastic scattering in water
44// Reference: TNS Geant4-DNA paper
45// S. Chauvie et al., Geant4 physics processes for microdosimetry simulation:
46// design foundation and implementation of the first set of models,
47// IEEE Trans. Nucl. Sci., vol. 54, no. 6, Dec. 2007.
48// Further documentation available from http://www.ge.infn.it/geant4/dna
49
50// -------------------------------------------------------------------
51
52
53#include "G4CrossSectionExcitationBornPartial.hh"
54#include "G4Track.hh"
55#include "G4DynamicParticle.hh"
56#include "G4ParticleDefinition.hh"
57#include "G4Electron.hh"
58#include "G4LogLogInterpolation.hh"
59
60#include "Randomize.hh"
61
62#include <deque>
63
64G4CrossSectionExcitationBornPartial::G4CrossSectionExcitationBornPartial()
65{
66 table = 0;
67 // nLevels = waterExcitation.NumberOfLevels();
68}
69
70
71G4CrossSectionExcitationBornPartial::~G4CrossSectionExcitationBornPartial()
72{
73 delete table;
74}
75
76
77G4int G4CrossSectionExcitationBornPartial::RandomSelect(G4double k)
78{
79 // Lazy initialisation: load cross section tables in memory the first time access to them is required
80
81 G4int level = 0;
82
83 if (table == 0)
84 {
85 // Load tables
86 // ---- MGP ----
87 table = new G4DNACrossSectionDataSet(new G4LogLogInterpolation, eV,(1e-22/3.343)*m*m );
88 table->LoadData("dna/sigma_excitation_p_born");
89
90 // ---- MGP ---- Temporary
91 table->PrintData();
92 }
93
94 G4double* valuesBuffer = new G4double[table->NumberOfComponents()];
95
96 const size_t n(table->NumberOfComponents());
97 size_t i(n);
98 G4double value = 0.;
99
100 while (i>0)
101 {
102 i--;
103 valuesBuffer[i] = table->GetComponent(i)->FindValue(k);
104 value += valuesBuffer[i];
105 }
106
107 value *= G4UniformRand();
108
109 i = n;
110
111 while (i > 0)
112 {
113 i--;
114
115 if (valuesBuffer[i] > value)
116 {
117 delete[] valuesBuffer;
118 return i;
119 }
120 value -= valuesBuffer[i];
121 }
122
123 // It should never end up here
124
125 // ---- MGP ---- Is the following line really necessary?
126 if (valuesBuffer) delete[] valuesBuffer;
127
128 return level;
129}
130
Note: See TracBrowser for help on using the repository browser.