[819] | 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 | // |
---|
[1055] | 27 | // $Id: G4CoulombBarrier.cc,v 1.9 2009/03/04 11:05:02 gcosmo Exp $ |
---|
[1228] | 28 | // GEANT4 tag $Name: geant4-09-03 $ |
---|
[819] | 29 | // |
---|
| 30 | // Hadronic Process: Nuclear De-excitations |
---|
| 31 | // by V. Lara (Dec 1999) |
---|
| 32 | // modified barrier by JMQ (test30) by 14-11-07 |
---|
| 33 | |
---|
| 34 | #include "G4CoulombBarrier.hh" |
---|
| 35 | #include "G4HadronicException.hh" |
---|
| 36 | #include <sstream> |
---|
| 37 | |
---|
[1055] | 38 | G4CoulombBarrier::G4CoulombBarrier() |
---|
| 39 | : G4VCoulombBarrier(1,0) {} |
---|
| 40 | |
---|
| 41 | G4CoulombBarrier::G4CoulombBarrier(const G4int anA,const G4int aZ) |
---|
| 42 | : G4VCoulombBarrier(anA,aZ) {} |
---|
| 43 | |
---|
| 44 | G4CoulombBarrier::~G4CoulombBarrier() {} |
---|
| 45 | |
---|
[819] | 46 | G4CoulombBarrier::G4CoulombBarrier(const G4CoulombBarrier & ) : G4VCoulombBarrier() |
---|
| 47 | { |
---|
| 48 | throw G4HadronicException(__FILE__, __LINE__, "G4CoulombBarrier::copy_constructor meant to not be accessable."); |
---|
| 49 | } |
---|
| 50 | |
---|
| 51 | |
---|
| 52 | const G4CoulombBarrier & G4CoulombBarrier::operator=(const G4CoulombBarrier & ) |
---|
| 53 | { |
---|
| 54 | throw G4HadronicException(__FILE__, __LINE__, "G4CoulombBarrier::operator= meant to not be accessable."); |
---|
| 55 | return *this; |
---|
| 56 | } |
---|
| 57 | |
---|
| 58 | G4bool G4CoulombBarrier::operator==(const G4CoulombBarrier & ) const |
---|
| 59 | { |
---|
| 60 | return false; |
---|
| 61 | } |
---|
| 62 | |
---|
| 63 | G4bool G4CoulombBarrier::operator!=(const G4CoulombBarrier & ) const |
---|
| 64 | { |
---|
| 65 | return true; |
---|
| 66 | } |
---|
| 67 | |
---|
| 68 | |
---|
| 69 | |
---|
| 70 | G4double G4CoulombBarrier::GetCoulombBarrier(const G4int ARes, const G4int ZRes, const G4double) const |
---|
| 71 | // Calculation of Coulomb potential energy (barrier) for outgoing fragment |
---|
| 72 | { |
---|
| 73 | G4double Barrier = 0.0; |
---|
| 74 | if (ZRes > ARes || ARes < 1) { |
---|
| 75 | std::ostringstream errOs; |
---|
| 76 | errOs << "G4CoulombBarrier::GetCoulombBarrier: "; |
---|
| 77 | errOs << "Wrong values for "; |
---|
| 78 | errOs << "residual nucleus A = " << ARes << " "; |
---|
| 79 | errOs << "and residual nucleus Z = " << ZRes << G4endl; |
---|
| 80 | |
---|
| 81 | throw G4HadronicException(__FILE__, __LINE__, errOs.str()); |
---|
| 82 | } |
---|
| 83 | if (GetA() == 1 && GetZ() == 0) { |
---|
| 84 | Barrier = 0.0; // Neutron Coulomb Barrier is 0 |
---|
| 85 | } else { |
---|
| 86 | |
---|
| 87 | // JMQ: old coulomb barrier commented since it does not agree with Dostrovski's prescription |
---|
| 88 | // and too low barriers are obtained (for protons at least) |
---|
| 89 | // calculation of K penetration factor is correct |
---|
| 90 | // G4double CompoundRadius = CalcCompoundRadius(static_cast<G4double>(ZRes)); |
---|
| 91 | // Barrier = elm_coupling/CompoundRadius * static_cast<G4double>(GetZ())*static_cast<G4double>(ZRes)/ |
---|
| 92 | // (std::pow(static_cast<G4double>(GetA()),1./3.) + std::pow(static_cast<G4double>(ARes),1./3.)); |
---|
| 93 | |
---|
| 94 | ///New coulomb Barrier according to original Dostrovski's paper |
---|
| 95 | G4double rho=1.2*fermi; |
---|
| 96 | if(GetA()==1 && GetZ()==1){ rho=0.0;} |
---|
| 97 | |
---|
| 98 | G4double RN=1.5*fermi; |
---|
| 99 | Barrier=elm_coupling* static_cast<G4double>(GetZ())*static_cast<G4double>(ZRes)/(RN*std::pow(static_cast<G4double>(ARes),1./3.)+rho); |
---|
| 100 | |
---|
| 101 | // Barrier penetration coeficient |
---|
| 102 | G4double K = BarrierPenetrationFactor(ZRes); |
---|
| 103 | |
---|
| 104 | |
---|
| 105 | Barrier *= K; |
---|
| 106 | // |
---|
| 107 | |
---|
| 108 | |
---|
| 109 | |
---|
| 110 | |
---|
| 111 | // JMQ : the following statement has unknown origin and dimensionally is meaningless( energy divided by mass number in argument of sqrt function). Energy dependence of Coulomb barrier penetrability should be included in proper way (if needed..) |
---|
| 112 | // Barrier /= (1.0 + std::sqrt(U/(2.0*static_cast<G4double>(ARes)))); |
---|
| 113 | // |
---|
| 114 | } |
---|
| 115 | return Barrier; |
---|
| 116 | } |
---|
| 117 | |
---|
| 118 | |
---|
| 119 | |
---|