G4GEMCoulombBarrier.cc

Go to the documentation of this file.
00001 //
00002 // ********************************************************************
00003 // * License and Disclaimer                                           *
00004 // *                                                                  *
00005 // * The  Geant4 software  is  copyright of the Copyright Holders  of *
00006 // * the Geant4 Collaboration.  It is provided  under  the terms  and *
00007 // * conditions of the Geant4 Software License,  included in the file *
00008 // * LICENSE and available at  http://cern.ch/geant4/license .  These *
00009 // * include a list of copyright holders.                             *
00010 // *                                                                  *
00011 // * Neither the authors of this software system, nor their employing *
00012 // * institutes,nor the agencies providing financial support for this *
00013 // * work  make  any representation or  warranty, express or implied, *
00014 // * regarding  this  software system or assume any liability for its *
00015 // * use.  Please see the license in the file  LICENSE  and URL above *
00016 // * for the full disclaimer and the limitation of liability.         *
00017 // *                                                                  *
00018 // * This  code  implementation is the result of  the  scientific and *
00019 // * technical work of the GEANT4 collaboration.                      *
00020 // * By using,  copying,  modifying or  distributing the software (or *
00021 // * any work based  on the software)  you  agree  to acknowledge its *
00022 // * use  in  resulting  scientific  publications,  and indicate your *
00023 // * acceptance of all terms of the Geant4 Software license.          *
00024 // ********************************************************************
00025 //
00026 // J. M. Quesada (July 2009):  New class based on G4GEMCoulombBarrierHE
00027 // Coded strictly according to Furihata's GEM paper 
00028 // NEW:effective decrease  of barrier with E* (Barashenkov) has been added
00029 //
00030 #include "G4GEMCoulombBarrier.hh"
00031 #include "G4HadronicException.hh"
00032 #include "G4Pow.hh"
00033 #include "G4PhysicalConstants.hh"
00034 #include "G4SystemOfUnits.hh"
00035 
00036 G4GEMCoulombBarrier::G4GEMCoulombBarrier(G4int anA, G4int aZ) :
00037   G4VCoulombBarrier(anA,aZ) 
00038 {}
00039 
00040 G4GEMCoulombBarrier::~G4GEMCoulombBarrier() 
00041 {}
00042 
00043 G4double G4GEMCoulombBarrier::GetCoulombBarrier(G4int ARes, G4int ZRes, G4double U) const 
00044 // Calculation of Coulomb potential energy (barrier) for outgoing fragment
00045 {
00046   G4double Barrier = 0.0;
00047   if (ZRes > ARes || ARes < 1) {
00048     G4cout << "G4GEMCoulombBarrier::GetCoulombBarrier: "
00049            << "Wrong values for "
00050            << "residual nucleus A = " << ARes << " "
00051            << "and residual nucleus Z = " << ZRes << G4endl;
00052     throw G4HadronicException(__FILE__, __LINE__,"FATAL error");
00053   }
00054   if (GetZ() == 0) {
00055     Barrier = 0.0;   // If there is no charge there is neither barrier
00056 
00057   } else {
00058     G4double CompoundRadius = CalcCompoundRadius(ARes);
00059     Barrier = ( elm_coupling * GetZ() * ZRes)/CompoundRadius;
00060       
00061     // Barrier penetration coeficient
00062     if(GetA() <= 4) { Barrier *= BarrierPenetrationFactor(G4double(ZRes)); }
00063   
00064     //JMQ 200709 effective decrease  of barrier with E* (Barashenkov)
00065     // (not inclued in original Furihata's formulation)
00066     Barrier /= (1.0 + std::sqrt(U/(static_cast<G4double>(2*ARes))));
00067   }
00068   return Barrier;
00069 }
00070 
00071 G4double G4GEMCoulombBarrier::CalcCompoundRadius(G4int ARes) const
00072 {      
00073   G4Pow* g4pow = G4Pow::GetInstance();
00074   G4double AresOneThird = g4pow->Z13(ARes);
00075   G4int A = GetA();
00076   G4double AejectOneThird = g4pow->Z13(A);
00077 
00078   G4double Result = 0.0;
00079   if(A == 1){
00080     Result = 1.7* AresOneThird;
00081 
00082   } else if (A <= 4){
00083     Result = 1.7* AresOneThird + 1.2;
00084 
00085   } else {
00086     Result = 1.12*(AresOneThird + AejectOneThird) - 
00087       0.86*(AresOneThird+AejectOneThird)/(AresOneThird*AejectOneThird)+3.75;
00088   }
00089   return Result*fermi;
00090 }
00091 
00092 

Generated on Mon May 27 17:48:20 2013 for Geant4 by  doxygen 1.4.7