| Geant4 Cross Reference |
1 // 1 //
2 // ******************************************* 2 // ********************************************************************
3 // * License and Disclaimer 3 // * License and Disclaimer *
4 // * 4 // * *
5 // * The Geant4 software is copyright of th 5 // * The Geant4 software is copyright of the Copyright Holders of *
6 // * the Geant4 Collaboration. It is provided 6 // * the Geant4 Collaboration. It is provided under the terms and *
7 // * conditions of the Geant4 Software License 7 // * conditions of the Geant4 Software License, included in the file *
8 // * LICENSE and available at http://cern.ch/ 8 // * LICENSE and available at http://cern.ch/geant4/license . These *
9 // * include a list of copyright holders. 9 // * include a list of copyright holders. *
10 // * 10 // * *
11 // * Neither the authors of this software syst 11 // * Neither the authors of this software system, nor their employing *
12 // * institutes,nor the agencies providing fin 12 // * institutes,nor the agencies providing financial support for this *
13 // * work make any representation or warran 13 // * work make any representation or warranty, express or implied, *
14 // * regarding this software system or assum 14 // * regarding this software system or assume any liability for its *
15 // * use. Please see the license in the file 15 // * use. Please see the license in the file LICENSE and URL above *
16 // * for the full disclaimer and the limitatio 16 // * for the full disclaimer and the limitation of liability. *
17 // * 17 // * *
18 // * This code implementation is the result 18 // * This code implementation is the result of the scientific and *
19 // * technical work of the GEANT4 collaboratio 19 // * technical work of the GEANT4 collaboration. *
20 // * By using, copying, modifying or distri 20 // * By using, copying, modifying or distributing the software (or *
21 // * any work based on the software) you ag 21 // * any work based on the software) you agree to acknowledge its *
22 // * use in resulting scientific publicati 22 // * use in resulting scientific publications, and indicate your *
23 // * acceptance of all terms of the Geant4 Sof 23 // * acceptance of all terms of the Geant4 Software license. *
24 // ******************************************* 24 // ********************************************************************
25 // 25 //
26 // 26 //
>> 27 // $Id: G4StatMFFragment.cc,v 1.7 2008-07-25 11:20:47 vnivanch Exp $
>> 28 // GEANT4 tag $Name: not supported by cvs2svn $
27 // 29 //
28 // Hadronic Process: Nuclear De-excitations 30 // Hadronic Process: Nuclear De-excitations
29 // by V. Lara 31 // by V. Lara
30 32
31 #include "G4StatMFFragment.hh" 33 #include "G4StatMFFragment.hh"
32 #include "G4PhysicalConstants.hh" <<
33 #include "G4HadronicException.hh" 34 #include "G4HadronicException.hh"
34 #include "G4Pow.hh" << 35
35 36
36 // Copy constructor 37 // Copy constructor
37 G4StatMFFragment::G4StatMFFragment(const G4Sta 38 G4StatMFFragment::G4StatMFFragment(const G4StatMFFragment & )
38 { 39 {
39 throw G4HadronicException(__FILE__, __LINE << 40 throw G4HadronicException(__FILE__, __LINE__, "G4StatMFFragment::copy_constructor meant to not be accessable");
40 } 41 }
41 42
42 // Operators 43 // Operators
43 44
44 G4StatMFFragment & G4StatMFFragment:: 45 G4StatMFFragment & G4StatMFFragment::
45 operator=(const G4StatMFFragment & ) 46 operator=(const G4StatMFFragment & )
46 { 47 {
47 throw G4HadronicException(__FILE__, __LINE << 48 throw G4HadronicException(__FILE__, __LINE__, "G4StatMFFragment::operator= meant to not be accessable");
48 return *this; 49 return *this;
49 } 50 }
50 51
>> 52
51 G4bool G4StatMFFragment::operator==(const G4St 53 G4bool G4StatMFFragment::operator==(const G4StatMFFragment & ) const
52 { 54 {
53 // throw G4HadronicException(__FILE__, __LINE << 55 // throw G4HadronicException(__FILE__, __LINE__, "G4StatMFFragment::operator== meant to not be accessable");
54 return false; 56 return false;
55 } 57 }
56 58
>> 59
57 G4bool G4StatMFFragment::operator!=(const G4St 60 G4bool G4StatMFFragment::operator!=(const G4StatMFFragment & ) const
58 { 61 {
59 // throw G4HadronicException(__FILE__, __LINE << 62 // throw G4HadronicException(__FILE__, __LINE__, "G4StatMFFragment::operator!= meant to not be accessable");
60 return true; 63 return true;
61 } 64 }
62 65
>> 66
>> 67
63 G4double G4StatMFFragment::GetCoulombEnergy(vo 68 G4double G4StatMFFragment::GetCoulombEnergy(void) const
64 { 69 {
65 G4double res = 0.0; << 70 if (theZ <= 0.1) return 0.0;
66 if (theZ >= 1) { << 71 G4double Coulomb = (3./5.)*(elm_coupling*theZ*theZ)*
67 res = G4StatMFParameters::GetCoulomb(); << 72 std::pow(1.0+G4StatMFParameters::GetKappaCoulomb(),1./3.)/
68 } << 73 (G4StatMFParameters::Getr0()*std::pow(theA,1./3.));
69 return res; << 74
>> 75 return Coulomb;
70 } 76 }
71 77
>> 78
72 G4double G4StatMFFragment::GetEnergy(const G4d 79 G4double G4StatMFFragment::GetEnergy(const G4double T) const
73 { 80 {
74 if (theA < 1 || theZ < 0 || theZ > theA) { << 81 if (theA < 1 || theZ < 0 || theZ > theA) {
75 G4cout << "G4StatMFFragment::GetEnergy: A << 82 G4cerr << "G4StatMFFragment::GetEnergy: A = " << theA
76 << ", Z = " << theZ << G4endl; << 83 << ", Z = " << theZ << G4endl;
77 throw G4HadronicException(__FILE__, __LINE << 84 throw G4HadronicException(__FILE__, __LINE__,
78 "G4StatMFFragment::GetEnergy: Wron << 85 "G4StatMFFragment::GetEnergy: Wrong values for A and Z!");
79 } << 86 }
80 G4double BulkEnergy = G4NucleiProperties::Ge << 87 G4double BulkEnergy = G4NucleiProperties::GetMassExcess(static_cast<G4int>(theA),
81 << 88 static_cast<G4int>(theZ));
82 if (theA < 4) return BulkEnergy - GetCoulomb << 89
83 << 90 if (theA < 4) return BulkEnergy - GetCoulombEnergy();
84 G4double SurfaceEnergy; << 91
85 if (G4StatMFParameters::DBetaDT(T) == 0.0) S << 92 G4double SurfaceEnergy;
86 else SurfaceEnergy = 2.5*G4Pow::GetInstance( << 93 if (G4StatMFParameters::DBetaDT(T) == 0.0) SurfaceEnergy = 0.0;
87 G4StatMFParameters::GetBeta0()/ << 94 else SurfaceEnergy = (5./2.)*std::pow(theA,2.0/3.0)*T*T*
88 (G4StatMFParameters::GetCriticalTemp()* << 95 G4StatMFParameters::GetBeta0()/
89 G4StatMFParameters::GetCriticalTemp()); << 96 (G4StatMFParameters::GetCriticalTemp()*
90 << 97 G4StatMFParameters::GetCriticalTemp());
91 G4double ExchangeEnergy = theA*T*T/GetInvLev << 98
92 if (theA != 4) ExchangeEnergy += SurfaceEner << 99
93 return BulkEnergy + ExchangeEnergy - GetCoul << 100 G4double ExchangeEnergy = theA*T*T/GetInvLevelDensity();
>> 101 if (theA != 4) ExchangeEnergy += SurfaceEnergy;
>> 102
>> 103 return BulkEnergy + ExchangeEnergy - GetCoulombEnergy();
>> 104
94 } 105 }
95 106
>> 107
96 G4double G4StatMFFragment::GetInvLevelDensity( 108 G4double G4StatMFFragment::GetInvLevelDensity(void) const
97 { 109 {
98 G4double res = 0.0; << 110 // Calculate Inverse Density Level
99 if (theA > 1) { << 111 // Epsilon0*(1 + 3 /(Af - 1))
100 res = G4StatMFParameters::GetEpsilon0()*( << 112 if (theA == 1) return 0.0;
101 } << 113 else return
102 return res; << 114 G4StatMFParameters::GetEpsilon0()*(1.0+3.0/(theA - 1.0));
103 } 115 }
104 116
>> 117
>> 118
105 G4Fragment * G4StatMFFragment::GetFragment(con 119 G4Fragment * G4StatMFFragment::GetFragment(const G4double T)
106 { 120 {
107 G4double U = CalcExcitationEnergy(T); << 121 G4double U = CalcExcitationEnergy(T);
108 G4double M = GetNuclearMass(); << 122
109 G4LorentzVector FourMomentum(_momentum,std:: << 123 G4double M = GetNuclearMass();
110 G4Fragment * theFragment = new G4Fragment(th << 124
111 return theFragment; << 125 G4LorentzVector FourMomentum(_momentum,std::sqrt(_momentum.mag2()+(M+U)*(M+U)));
>> 126
>> 127 G4Fragment * theFragment = new G4Fragment(static_cast<G4int>(theA),static_cast<G4int>(theZ),FourMomentum);
>> 128
>> 129 return theFragment;
112 } 130 }
113 131
>> 132
114 G4double G4StatMFFragment::CalcExcitationEnerg 133 G4double G4StatMFFragment::CalcExcitationEnergy(const G4double T)
115 { 134 {
116 if (theA <= 3) return 0.0; << 135 if (theA <= 3) return 0.0;
>> 136
>> 137 G4double BulkEnergy = theA*T*T/GetInvLevelDensity();
117 138
118 G4double BulkEnergy = theA*T*T/GetInvLevelDe << 139 // if it is an alpha particle: done
>> 140 if (theA == 4) return BulkEnergy;
119 141
120 // if it is an alpha particle: done << 142 // Term connected with surface energy
121 if (theA == 4) return BulkEnergy; << 143 G4double SurfaceEnergy = 0.0;
122 << 144 if (std::abs(G4StatMFParameters::DBetaDT(T)) > 1.0e-20)
123 // Term connected with surface energy << 145 // SurfaceEnergy = (5./2.)*std::pow(theA,2.0/3.0)*T*T*G4StatMFParameters::GetBeta0()/
124 G4double SurfaceEnergy = 0.0; << 146 // (G4StatMFParameters::GetCriticalTemp()*G4StatMFParameters::GetCriticalTemp());
125 G4double q = G4StatMFParameters::DBetaDT(T); << 147 SurfaceEnergy = (5./2.)*std::pow(theA,2.0/3.0)*(G4StatMFParameters::Beta(T) -
126 if (std::abs(q) > 1.0e-20) { << 148 T*G4StatMFParameters::DBetaDT(T) - G4StatMFParameters::GetBeta0());
127 SurfaceEnergy = 2.5*G4Pow::GetInstance()-> << 149
128 *(G4StatMFParameters::Beta(T) - T*q - G4 << 150 return BulkEnergy + SurfaceEnergy;
129 } <<
130 return BulkEnergy + SurfaceEnergy; <<
131 } 151 }
>> 152
>> 153
132 154