lars/geant4
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Import Geant4 1.0.0 source tree

Browse Source
This commit is contained in:
Gabriele Cosmo
2016-06-08 15:28:20 +02:00
parent aaa409b6ee
commit ca1c8cb059
2995 changed files with 106830 additions and 299600 deletions
Download Patch File Download Diff File Expand all files Collapse all files
source/global/HEPNumerics/include/G4ChebyshevApproximation.hh
+6 -4
View File
@@ -1,12 +1,14 @@
// This code implementation is the intellectual property of
// the RD44 GEANT4 collaboration.
// the GEANT4 collaboration.
//
// By copying, distributing or modifying the Program (or any work
// based on the Program) you indicate your acceptance of this statement,
// and all its terms.
//
// $Id: G4ChebyshevApproximation.hh,v 1.1 1999/01/07 16:08:53 gunter Exp $
// GEANT4 tag $Name: geant4-00-01 $
// $Id: G4ChebyshevApproximation.hh,v 1.2 1999/11/16 17:30:55 gcosmo Exp $
// GEANT4 tag $Name: geant4-01-00 $
//
// Class description:
//
// Class creating the Chebyshev approximation for a function pointed by fFunction
// data member. The Chebyshev polinom approximation provides an efficient evaluation
@@ -93,7 +95,7 @@
// at the point (fMean - fDiff)
//
// void IntegralChebyshevCof(G4double integralCof[]) const
//
// --------------------------- HISTORY --------------------------------------
//
// 24.04.97 V.Grichine ( Vladimir.Grichine@cern.ch )
source/global/HEPNumerics/include/G4DataInterpolation.hh
+7 -5
View File
@@ -1,12 +1,14 @@
// This code implementation is the intellectual property of
// the RD44 GEANT4 collaboration.
// the GEANT4 collaboration.
//
// By copying, distributing or modifying the Program (or any work
// based on the Program) you indicate your acceptance of this statement,
// and all its terms.
//
// $Id: G4DataInterpolation.hh,v 1.1 1999/01/07 16:08:53 gunter Exp $
// GEANT4 tag $Name: geant4-00-01 $
// $Id: G4DataInterpolation.hh,v 1.2 1999/11/16 17:30:56 gcosmo Exp $
// GEANT4 tag $Name: geant4-01-00 $
//
// Class description:
//
// The class consists of some methods for data interpolations and extrapolations.
// The methods based mainly on recommendations given in the book : An introduction to
@@ -81,14 +83,14 @@
// decreasing. If index = -1 or fNumber, this indicates that pX is out of range.
// The value index on input is taken as the initial approximation for index on
// output.
//
// --------------------------------- History: --------------------------------------
//
// 3.4.97 V.Grichine (Vladimir.Grichine@cern.ch)
//
#ifndef G4DATAINTERPOLATION_HH
#ifndef G4DATAINTERPOLATION_HH
#define G4DATAINTERPOLATION_HH
#include "globals.hh"
source/global/HEPNumerics/include/G4GaussChebyshevQ.hh
+6 -4
View File
@@ -1,12 +1,14 @@
// This code implementation is the intellectual property of
// the RD44 GEANT4 collaboration.
// the GEANT4 collaboration.
//
// By copying, distributing or modifying the Program (or any work
// based on the Program) you indicate your acceptance of this statement,
// and all its terms.
//
// $Id: G4GaussChebyshevQ.hh,v 1.1 1999/01/07 16:08:53 gunter Exp $
// GEANT4 tag $Name: geant4-00-01 $
// $Id: G4GaussChebyshevQ.hh,v 1.2 1999/11/16 17:30:56 gcosmo Exp $
// GEANT4 tag $Name: geant4-01-00 $
//
// Class description:
//
// Class for Gauss-Chebyshev quadrature method
// Roots of ortogonal polynoms and corresponding weights are calculated based on
@@ -30,7 +32,7 @@
// method
//
// G4double Integral(G4double a, G4double b) const
//
// ------------------------------- HISTORY --------------------------------
//
// 13.05.97 V.Grichine (Vladimir.Grichine@cern.chz0
source/global/HEPNumerics/include/G4GaussHermiteQ.hh
+6 -5
View File
@@ -1,12 +1,14 @@
// This code implementation is the intellectual property of
// the RD44 GEANT4 collaboration.
// the GEANT4 collaboration.
//
// By copying, distributing or modifying the Program (or any work
// based on the Program) you indicate your acceptance of this statement,
// and all its terms.
//
// $Id: G4GaussHermiteQ.hh,v 1.1 1999/01/07 16:08:53 gunter Exp $
// GEANT4 tag $Name: geant4-00-01 $
// $Id: G4GaussHermiteQ.hh,v 1.2 1999/11/16 17:30:57 gcosmo Exp $
// GEANT4 tag $Name: geant4-01-00 $
//
// Class description:
//
// Roots of ortogonal polynoms and corresponding weights are calculated based on
// iteration method (by bisection Newton algorithm). Constant values for initial
@@ -27,8 +29,7 @@
// to plus infinity .
//
// G4double Integral() const
//
//
// ------------------------------- HISTORY -------------------------------------
//
// 13.05.97 V.Grichine (Vladimir.Grichine@cern.chz0
source/global/HEPNumerics/include/G4GaussJacobiQ.hh
+6 -4
View File
@@ -1,12 +1,14 @@
// This code implementation is the intellectual property of
// the RD44 GEANT4 collaboration.
// the GEANT4 collaboration.
//
// By copying, distributing or modifying the Program (or any work
// based on the Program) you indicate your acceptance of this statement,
// and all its terms.
//
// $Id: G4GaussJacobiQ.hh,v 1.1 1999/01/07 16:08:54 gunter Exp $
// GEANT4 tag $Name: geant4-00-01 $
// $Id: G4GaussJacobiQ.hh,v 1.2 1999/11/16 17:30:57 gcosmo Exp $
// GEANT4 tag $Name: geant4-01-00 $
//
// Class description:
//
// Roots of ortogonal polynoms and corresponding weights are calculated based on
// iteration method (by bisection Newton algorithm). Constant values for initial
@@ -29,7 +31,7 @@
// from minus unit to plus unit .
//
// G4double Integral() const
//
// ------------------------------- HISTORY -------------------------------------
//
// 13.05.97 V.Grichine (Vladimir.Grichine@cern.chz0
source/global/HEPNumerics/include/G4GaussLaguerreQ.hh
+6 -4
View File
@@ -1,12 +1,14 @@
// This code implementation is the intellectual property of
// the RD44 GEANT4 collaboration.
// the GEANT4 collaboration.
//
// By copying, distributing or modifying the Program (or any work
// based on the Program) you indicate your acceptance of this statement,
// and all its terms.
//
// $Id: G4GaussLaguerreQ.hh,v 1.1 1999/01/07 16:08:54 gunter Exp $
// GEANT4 tag $Name: geant4-00-01 $
// $Id: G4GaussLaguerreQ.hh,v 1.2 1999/11/16 17:30:57 gcosmo Exp $
// GEANT4 tag $Name: geant4-01-00 $
//
// Class description:
//
// Class for realization of Gauss-Laguerre quadrature method
// Roots of ortogonal polynoms and corresponding weights are calculated based on
@@ -35,7 +37,7 @@
// fAbscissa[i] and fWeight[i] arrays were created in constructor
//
// G4double Integral() const
//
// ------------------------------- HISTORY --------------------------------
//
// 13.05.97 V.Grichine (Vladimir.Grichine@cern.chz0
source/global/HEPNumerics/include/G4GaussLegendreQ.hh
+6 -4
View File
@@ -1,12 +1,14 @@
// This code implementation is the intellectual property of
// the RD44 GEANT4 collaboration.
// the GEANT4 collaboration.
//
// By copying, distributing or modifying the Program (or any work
// based on the Program) you indicate your acceptance of this statement,
// and all its terms.
//
// $Id: G4GaussLegendreQ.hh,v 1.1 1999/01/07 16:08:54 gunter Exp $
// GEANT4 tag $Name: geant4-00-01 $
// $Id: G4GaussLegendreQ.hh,v 1.2 1999/11/16 17:30:58 gcosmo Exp $
// GEANT4 tag $Name: geant4-01-00 $
//
// Class description:
//
// Class for Gauss-Legendre integration method
// Roots of ortogonal polynoms and corresponding weights are calculated based on
@@ -57,7 +59,7 @@
//
// G4double
// AccurateIntegral(G4double a, G4double b) const
//
// ------------------------------- HISTORY --------------------------------
//
// 13.05.97 V.Grichine (Vladimir.Grichine@cern.chz0
source/global/HEPNumerics/include/G4Integrator.hh
+166
View File
@@ -0,0 +1,166 @@
// This code implementation is the intellectual property of
// the GEANT4 collaboration.
//
// By copying, distributing or modifying the Program (or any work
// based on the Program) you indicate your acceptance of this statement,
// and all its terms.
//
// $Id: G4Integrator.hh,v 1.3 1999/11/16 17:30:58 gcosmo Exp $
// GEANT4 tag $Name: geant4-01-00 $
//
// Class description:
//
// Class collecting template integrator methods for generic funtions.
// History:
//
// 04.09.99 V.Grichine, first implementation based on G4SimpleIntegration class
// and H.-P. Wellisch, G.Cosmo, and E.Cherniaev advises
// 08.09.99 V.Grichine, methods involving orthogonal polynomials
//
#ifndef G4INTEGRATOR_HH
#define G4INTEGRATOR_HH 1
#include "globals.hh"
#include <math.h>
class G4Integrator
{
public:
G4Integrator(){;}
~G4Integrator(){;}
// Simpson integration method
template <class T, class F> G4double
Simpson( T& typeT, F f, G4double a, G4double b, G4int n ) ;
template <class T, class F> G4double
Simpson( T* ptrT, F f, G4double a, G4double b, G4int n ) ;
G4double Simpson( G4double (*f)(G4double),
G4double a, G4double b, G4int n ) ;
// Adaptive Gauss method
template <class T, class F> G4double
AdaptiveGauss( T& typeT, F f, G4double a, G4double b, G4double e ) ;
template <class T, class F> G4double
AdaptiveGauss( T* ptrT, F f, G4double a, G4double b, G4double e ) ;
G4double AdaptiveGauss( G4double (*f)(G4double),
G4double a, G4double b, G4double e ) ;
// Integration methods involving orthogohol polynomials
// Methods involving Legendre polynomials
template <class T, class F>
G4double Legendre( T& typeT, F f, G4double a, G4double b, G4int n) ;
template <class T, class F>
G4double Legendre( T* ptrT, F f, G4double a, G4double b, G4int n) ;
G4double Legendre( G4double (*f)(G4double), G4double a, G4double b, G4int n) ;
// Legendre10 is very fast and accurate anough
template <class T, class F>
G4double Legendre10( T& typeT, F f,G4double a, G4double b) ;
template <class T, class F>
G4double Legendre10( T* ptrT, F f,G4double a, G4double b) ;
G4double Legendre10( G4double (*f)(G4double), G4double a, G4double b) ;
// Legendre96 is very accurate and fast enough
template <class T, class F>
G4double Legendre96( T& typeT, F f,G4double a, G4double b) ;
template <class T, class F>
G4double Legendre96( T* ptrT, F f,G4double a, G4double b) ;
G4double Legendre96( G4double (*f)(G4double), G4double a, G4double b) ;
// Methods involving Chebyshev polynomials
template <class T, class F>
G4double Chebyshev( T& typeT, F f, G4double a, G4double b, G4int n) ;
template <class T, class F>
G4double Chebyshev( T* ptrT, F f, G4double a, G4double b, G4int n) ;
G4double Chebyshev( G4double (*f)(G4double), G4double a, G4double b, G4int n) ;
// Method involving Laguerre polynomials
template <class T, class F>
G4double Laguerre( T& typeT, F f, G4double alpha, G4int n) ;
template <class T, class F>
G4double Laguerre( T* ptrT, F f, G4double alpha, G4int n) ;
G4double Laguerre( G4double (*f)(G4double), G4double alpha, G4int n) ;
// Method involving Hermite polynomials
template <class T, class F>
G4double Hermite( T& typeT, F f, G4int n) ;
template <class T, class F>
G4double Hermite( T* ptrT, F f, G4int n) ;
G4double Hermite( G4double (*f)(G4double), G4int n) ;
// Method involving Jacobi polynomials
template <class T, class F>
G4double Jacobi( T& typeT, F f, G4double alpha, G4double beta, G4int n) ;
template <class T, class F>
G4double Jacobi( T* ptrT, F f, G4double alpha, G4double beta, G4int n) ;
G4double Jacobi( G4double (*f)(G4double), G4double alpha,
G4double beta, G4int n) ;
protected:
// Auxiliary function for adaptive Gauss method
template <class T, class F> G4double
Gauss( T& typeT, F f, G4double a, G4double b ) ;
template <class T, class F> G4double
Gauss( T* ptrT, F f, G4double a, G4double b ) ;
G4double Gauss( G4double (*f)(G4double), G4double a, G4double b) ;
//
template <class T, class F> void
AdaptGauss( T& typeT, F f, G4double a, G4double b,
G4double e, G4double& sum, G4int& n) ;
template <class T, class F> void
AdaptGauss( T* typeT, F f, G4double a, G4double b,
G4double e, G4double& sum, G4int& n ) ;
void AdaptGauss( G4double (*f)(G4double), G4double a, G4double b,
G4double e, G4double& sum, G4int& n ) ;
G4double GammaLogarithm(G4double xx) ;
} ;
#include "G4Integrator.icc"
#endif
source/global/HEPNumerics/include/G4Integrator.icc
+1407
View File
File diff suppressed because it is too large Load Diff
source/global/HEPNumerics/include/G4SimpleIntegration.hh
+6 -4
View File
@@ -1,12 +1,14 @@
// This code implementation is the intellectual property of
// the RD44 GEANT4 collaboration.
// the GEANT4 collaboration.
//
// By copying, distributing or modifying the Program (or any work
// based on the Program) you indicate your acceptance of this statement,
// and all its terms.
//
// $Id: G4SimpleIntegration.hh,v 1.1 1999/01/07 16:08:54 gunter Exp $
// GEANT4 tag $Name: geant4-00-01 $
// $Id: G4SimpleIntegration.hh,v 1.2 1999/11/16 17:30:59 gcosmo Exp $
// GEANT4 tag $Name: geant4-01-00 $
//
// Class description:
//
// Class for realisation of simple numerical methodes for integration of functions
// with signature: double f(double). The methods based mainly on algorithms given in
@@ -29,7 +31,7 @@
//
// AdaptGausIntegration(double a, double b) - integrate function from a to be with
// accuracy <= fTolerance
//
// ----------------------------- History: ----------------------------------------
//
// 26.03.97 V.Grichine ( Vladimir.Grichine@cern.ch )
source/global/HEPNumerics/include/G4VGaussianQuadrature.hh
+6 -4
View File
@@ -1,12 +1,14 @@
// This code implementation is the intellectual property of
// the RD44 GEANT4 collaboration.
// the GEANT4 collaboration.
//
// By copying, distributing or modifying the Program (or any work
// based on the Program) you indicate your acceptance of this statement,
// and all its terms.
//
// $Id: G4VGaussianQuadrature.hh,v 1.1 1999/01/07 16:08:55 gunter Exp $
// GEANT4 tag $Name: geant4-00-01 $
// $Id: G4VGaussianQuadrature.hh,v 1.2 1999/11/16 17:30:59 gcosmo Exp $
// GEANT4 tag $Name: geant4-01-00 $
//
// Class description:
//
// Base Class for realisation of numerical methodes for integration of functions
// with signature double f(double) by Gaussian quadrature methods
@@ -30,7 +32,7 @@
//
// G4double
// GammaLogarithm(G4double xx)
//
// ------------------------------------------------------------------------------
//
// History: