Geant4
9.6.p02
Main Page
Related Pages
Modules
Namespaces
Classes
Files
File List
File Members
All
Classes
Namespaces
Files
Functions
Variables
Typedefs
Enumerations
Enumerator
Friends
Macros
Groups
Pages
geant4_9_6_p02
source
processes
hadronic
models
pre_equilibrium
exciton_model
src
G4HETCDeuteron.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
// $Id$
27
//
28
// by V. Lara
29
//
30
// Modified:
31
// 23.08.2010 V.Ivanchenko general cleanup, move constructor and destructor
32
// the source, use G4Pow
33
34
#include "
G4HETCDeuteron.hh
"
35
#include "
G4Deuteron.hh
"
36
37
G4HETCDeuteron::G4HETCDeuteron
()
38
:
G4HETCChargedFragment
(
G4Deuteron
::Deuteron(), &theDeuteronCoulombBarrier)
39
{}
40
41
G4HETCDeuteron::~G4HETCDeuteron
()
42
{}
43
44
G4double
G4HETCDeuteron::GetAlpha
()
45
{
46
G4double
C = 0.0;
47
G4int
aZ =
GetZ
() +
GetRestZ
();
48
if
(aZ >= 70)
49
{
50
C = 0.10;
51
}
52
else
53
{
54
C = ((((0.15417e-06*aZ) - 0.29875
e
-04)*aZ + 0.21071e-02)*aZ - 0.66612
e
-01)*aZ + 0.98375;
55
}
56
return
1.0 + C/2.0;
57
}
58
59
G4double
G4HETCDeuteron::GetBeta
()
60
{
61
return
-
GetCoulombBarrier
();
62
}
63
64
G4double
G4HETCDeuteron::GetSpinFactor
()
65
{
66
// 2s+1
67
return
3.0;
68
}
69
70
G4double
G4HETCDeuteron::K
(
const
G4Fragment
& aFragment)
71
{
72
// Number of protons in emitted fragment
73
G4int
Pa =
GetZ
();
74
// Number of neutrons in emitted fragment
75
G4int
Na =
GetA
() - Pa;
76
77
G4int
TargetZ =
GetRestZ
();
78
G4int
TargetA =
GetRestA
();
79
G4double
r
=
G4double
(TargetZ)/
G4double
(TargetA);
80
81
G4int
P = aFragment.
GetNumberOfParticles
();
82
G4int
H = aFragment.
GetNumberOfHoles
();
83
84
G4double
result = 0.0;
85
if
(P > 1)
86
{
87
result = 2.0* (H*(H-1.0)*r*(r-1.0)+H*(Na*r+Pa*(1.0-
r
)) + Pa*Na)/(P*(P-1.0));
88
89
result /= r*(1.0 -
r
);
90
}
91
return
std::max(0.0,result);
92
}
Generated on Sat May 25 2013 14:34:06 for Geant4 by
1.8.4