Geant4-11
G4GEMCoulombBarrier.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// J. M. Quesada (July 2009): New class based on G4GEMCoulombBarrierHE
27// Coded strictly according to Furihata's GEM paper
28// NEW:effective decrease of barrier with E* (Barashenkov) has been added
29//
32#include "G4Pow.hh"
34#include "G4SystemOfUnits.hh"
35
37 G4CoulombBarrier(anA,aZ)
38{
40}
41
43{}
44
46 G4double U) const
47// Calculation of Coulomb potential energy (barrier) for outgoing fragment
48{
49 G4double Barrier = 0.0;
50 if (GetZ() > 0 && ZRes > 0) {
51
52 G4double CompoundRadius = CalcCompoundRadius(ARes);
53 Barrier = CLHEP::elm_coupling * (GetZ() * ZRes)/CompoundRadius;
54
55 // Barrier penetration coeficient
56 if(GetA() <= 4) { Barrier *= BarrierPenetrationFactor(ZRes); }
57
58 //JMQ 200709 effective decrease of barrier with E* (Barashenkov)
59 // (not inclued in original Furihata's formulation)
60 Barrier /= (1.0 + std::sqrt(U/(static_cast<G4double>(2*ARes))));
61 }
62 return Barrier;
63}
64
66{
67 G4double AresOneThird = g4calc->Z13(ARes);
68 G4int A = GetA();
69
70 G4double Result = 0.0;
71 if(A == 1){
72 Result = 1.7* AresOneThird;
73
74 } else if (A <= 4){
75 Result = 1.7* AresOneThird + 1.2;
76
77 } else {
78 Result = 1.12*(AresOneThird + AejectOneThird) -
79 0.86*(AresOneThird+AejectOneThird)/(AresOneThird*AejectOneThird)+3.75;
80 }
81 return Result*fermi;
82}
83
84
static constexpr double fermi
Definition: G4SIunits.hh:83
double G4double
Definition: G4Types.hh:83
int G4int
Definition: G4Types.hh:85
const G4double A[17]
virtual G4double GetCoulombBarrier(G4int ARes, G4int ZRes, G4double U) const
G4GEMCoulombBarrier(G4int anA, G4int aZ)
G4double CalcCompoundRadius(G4int ARes) const
G4double Z13(G4int Z) const
Definition: G4Pow.hh:123
G4int GetA(void) const
static constexpr double elm_coupling