Geant4  10.03.p03
 All Classes Namespaces Files Functions Variables Typedefs Enumerations Enumerator Friends Macros Groups Pages
G4StatMFMacroNucleon.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 //
27 // $Id: G4StatMFMacroNucleon.cc 91834 2015-08-07 07:24:22Z gcosmo $
28 //
29 // Hadronic Process: Nuclear De-excitations
30 // by V. Lara
31 
32 #include "G4StatMFMacroNucleon.hh"
33 #include "G4PhysicalConstants.hh"
34 #include "G4SystemOfUnits.hh"
35 #include "G4Log.hh"
36 #include "G4Exp.hh"
37 
39  : G4VStatMFMacroCluster(1), _NeutronMeanMultiplicity(0.0),
40  _ProtonMeanMultiplicity(0.0)
41 {}
42 
44 {}
45 
46 G4double
48  const G4double mu,
49  const G4double nu, const G4double T)
50 {
51  if (T <= 0.0) {
52  throw G4HadronicException(__FILE__, __LINE__,
53  "G4StatMFMacroNucleon::CalcMeanMultiplicity: Temperature less or equal 0");
54  }
55 
56  G4double ThermalWaveLenght = 16.15*fermi/std::sqrt(T);
57 
58  G4double lambda3 = ThermalWaveLenght*ThermalWaveLenght*ThermalWaveLenght;
59 
60  static const G4double degeneracy = 2.0;
61 
62  G4double exponent_proton = (mu + nu - G4StatMFParameters::GetCoulomb())/T;
63  G4double exponent_neutron = mu/T;
64 
65  if (exponent_neutron > 300.0) exponent_neutron = 300.0;
66  if (exponent_proton > 300.0) exponent_proton = 300.0;
67 
68  _NeutronMeanMultiplicity =
69  (degeneracy*FreeVol/lambda3)*G4Exp(exponent_neutron);
70 
71  _ProtonMeanMultiplicity =
72  (degeneracy*FreeVol/lambda3)*G4Exp(exponent_proton);
73 
74  return _MeanMultiplicity = _NeutronMeanMultiplicity + _ProtonMeanMultiplicity;
75 }
76 
77 
79 {
81 }
82 
83 G4double
85 {
86  G4double ThermalWaveLenght = 16.15*fermi/std::sqrt(T);
87  G4double lambda3 = ThermalWaveLenght*ThermalWaveLenght*ThermalWaveLenght;
88 
89  G4double NeutronEntropy = 0.0;
90  if (_NeutronMeanMultiplicity > 0.0)
91  NeutronEntropy = _NeutronMeanMultiplicity*(2.5+G4Log(2*theA*FreeVol/
92  (lambda3*_NeutronMeanMultiplicity)));
93 
94  G4double ProtonEntropy = 0.0;
95  if (_ProtonMeanMultiplicity > 0.0)
96  ProtonEntropy = _ProtonMeanMultiplicity*(2.5+G4Log(2*theA*FreeVol/
97  (lambda3*_ProtonMeanMultiplicity)));
98 
99  return NeutronEntropy+ProtonEntropy;
100 }
101 
G4double CalcMeanMultiplicity(const G4double FreeVol, const G4double mu, const G4double nu, const G4double T)
G4double CalcEnergy(const G4double T)
static const G4double degeneracy
G4double CalcEntropy(const G4double T, const G4double FreeVol)
G4double G4Log(G4double x)
Definition: G4Log.hh:230
G4double G4Exp(G4double initial_x)
Exponential Function double precision.
Definition: G4Exp.hh:183
static G4double GetCoulomb()
double G4double
Definition: G4Types.hh:76
static constexpr double fermi
Definition: G4SIunits.hh:103