Geant4
10.01.p02
Main Page
Related Pages
Modules
Namespaces
Classes
Files
File List
File Members
G4ParticleHPWattSpectrum.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
// neutron_hp -- source file
27
// J.P. Wellisch, Nov-1996
28
// A prototype of the low energy neutron transport model.
29
// P. Arce, June-2014 Conversion neutron_hp to particle_hp
30
//
31
32
#include "
G4ParticleHPWattSpectrum.hh
"
33
#include "
G4SystemOfUnits.hh
"
34
35
G4double
G4ParticleHPWattSpectrum::Sample
(
G4double
anEnergy)
36
{
37
G4double
a
=
theApar
.
GetY
(anEnergy)*
eV
;
38
G4double
b =
theBpar
.
GetY
(anEnergy)/
eV
;
39
G4double
result;
40
G4double
random, cut,
max
;
41
max = std::sinh(std::sqrt(b*15.*a));
42
do
43
{
44
random =
G4UniformRand
();
45
result = -a*std::log(random);
46
cut =
G4UniformRand
();
47
}
48
while
(cut>std::sinh(std::sqrt(b*result))/max);
49
return
result;
50
}
G4ParticleHPWattSpectrum::theApar
G4ParticleHPVector theApar
Definition:
G4ParticleHPWattSpectrum.hh:83
a
G4double a
Definition:
TRTMaterials.hh:39
G4UniformRand
#define G4UniformRand()
Definition:
Randomize.hh:93
G4ParticleHPWattSpectrum::theBpar
G4ParticleHPVector theBpar
Definition:
G4ParticleHPWattSpectrum.hh:84
G4ParticleHPVector::GetY
G4double GetY(G4double x)
Definition:
G4ParticleHPVector.hh:195
G4ParticleHPWattSpectrum.hh
eV
static const double eV
Definition:
G4SIunits.hh:194
G4INCL::Math::max
T max(const T t1, const T t2)
brief Return the largest of the two arguments
Definition:
G4INCLGlobals.hh:112
G4ParticleHPWattSpectrum::Sample
G4double Sample(G4double anEnergy)
Definition:
G4ParticleHPWattSpectrum.cc:35
G4double
double G4double
Definition:
G4Types.hh:76
G4SystemOfUnits.hh
geant4.10.01.p02
source
processes
hadronic
models
particle_hp
src
G4ParticleHPWattSpectrum.cc
Generated on Wed Dec 30 2015 22:46:41 for Geant4 by
1.8.8