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

Last change on this file since 836 was 819, checked in by garnier, 16 years ago

import all except CVS

File size: 4.2 KB
Line 
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.