Back to home page

EIC code displayed by LXR

 
 

    


File indexing completed on 2025-01-18 09:58:27

0001 //
0002 // ********************************************************************
0003 // * License and Disclaimer                                           *
0004 // *                                                                  *
0005 // * The  Geant4 software  is  copyright of the Copyright Holders  of *
0006 // * the Geant4 Collaboration.  It is provided  under  the terms  and *
0007 // * conditions of the Geant4 Software License,  included in the file *
0008 // * LICENSE and available at  http://cern.ch/geant4/license .  These *
0009 // * include a list of copyright holders.                             *
0010 // *                                                                  *
0011 // * Neither the authors of this software system, nor their employing *
0012 // * institutes,nor the agencies providing financial support for this *
0013 // * work  make  any representation or  warranty, express or implied, *
0014 // * regarding  this  software system or assume any liability for its *
0015 // * use.  Please see the license in the file  LICENSE  and URL above *
0016 // * for the full disclaimer and the limitation of liability.         *
0017 // *                                                                  *
0018 // * This  code  implementation is the result of  the  scientific and *
0019 // * technical work of the GEANT4 collaboration.                      *
0020 // * By using,  copying,  modifying or  distributing the software (or *
0021 // * any work based  on the software)  you  agree  to acknowledge its *
0022 // * use  in  resulting  scientific  publications,  and indicate your *
0023 // * acceptance of all terms of the Geant4 Software license.          *
0024 // ********************************************************************
0025 //
0026 // INCL++ intra-nuclear cascade model
0027 // Alain Boudard, CEA-Saclay, France
0028 // Joseph Cugnon, University of Liege, Belgium
0029 // Jean-Christophe David, CEA-Saclay, France
0030 // Pekka Kaitaniemi, CEA-Saclay, France, and Helsinki Institute of Physics, Finland
0031 // Sylvie Leray, CEA-Saclay, France
0032 // Davide Mancusi, CEA-Saclay, France
0033 //
0034 #define INCLXX_IN_GEANT4_MODE 1
0035 
0036 #include "globals.hh"
0037 
0038 /** \file G4INCLNDFWoodsSaxon.hh
0039  * \brief Class for Woods-Saxon density
0040  *
0041  * \date 16 July 2012
0042  * \author Davide Mancusi
0043  */
0044 
0045 #ifndef G4INCLNDFWOODSSAXON_HH_
0046 #define G4INCLNDFWOODSSAXON_HH_
0047 
0048 #include "G4INCLIFunction1D.hh"
0049 #include <cmath>
0050 
0051 namespace G4INCL {
0052 
0053   namespace NuclearDensityFunctions {
0054 
0055     class WoodsSaxonRP : public IFunction1D {
0056       public:
0057         WoodsSaxonRP(G4double radiusParameter, G4double maximumRadius, G4double diffusenessParameter) :
0058           IFunction1D(0., maximumRadius),
0059           theRadiusParameter(radiusParameter),
0060           theDiffusenessParameter(diffusenessParameter)
0061       {}
0062 
0063         inline G4double operator()(const G4double r) const {
0064           G4double wsax = std::pow(r,3)
0065             *std::exp((r - theRadiusParameter)/theDiffusenessParameter)
0066             /std::pow((1.0 + std::exp((r - theRadiusParameter)/theDiffusenessParameter)),2);
0067           return wsax/theDiffusenessParameter;
0068         }
0069 
0070         inline G4double getRadiusParameter() { return theRadiusParameter; };
0071         inline G4double getDiffusenessParameter() { return theDiffusenessParameter; };
0072 
0073         inline void setRadiusParameter(G4double r) { theRadiusParameter = r; };
0074         inline void setDiffusenessParameter(G4double a) { theDiffusenessParameter = a; };
0075 
0076       protected:
0077         G4double theRadiusParameter, theDiffusenessParameter;
0078     };
0079 
0080     class WoodsSaxon : public IFunction1D {
0081       public:
0082         WoodsSaxon(G4double radiusParameter, G4double maximumRadius, G4double diffusenessParameter) :
0083           IFunction1D(0., maximumRadius),
0084           theRadiusParameter(radiusParameter),
0085           theDiffusenessParameter(diffusenessParameter)
0086       {}
0087 
0088         inline G4double operator()(const G4double r) const {
0089           return r * r / (1.0 + std::exp((r - theRadiusParameter)/theDiffusenessParameter));
0090         }
0091 
0092         inline G4double getRadiusParameter() { return theRadiusParameter; };
0093         inline G4double getDiffusenessParameter() { return theDiffusenessParameter; };
0094 
0095         inline void setRadiusParameter(G4double r) { theRadiusParameter = r; };
0096         inline void setDiffusenessParameter(G4double a) { theDiffusenessParameter = a; };
0097 
0098       protected:
0099         G4double theRadiusParameter, theDiffusenessParameter;
0100     };
0101 
0102   }
0103 
0104 }
0105 
0106 #endif // G4INCLNDFWOODSSAXON_HH_