Import Geant4 3.0.0 source tree

This commit is contained in:
Gabriele Cosmo
2016-06-08 15:55:53 +02:00
parent e7d7193284
commit cfcb558cfe
3050 changed files with 91703 additions and 48310 deletions
@@ -6,7 +6,7 @@
// and all its terms.
//
// $Id: G4ChebyshevApproximation.cc,v 1.2 1999/11/16 17:31:09 gcosmo Exp $
// GEANT4 tag $Name: geant4-02-00 $
// GEANT4 tag $Name: geant4-03-00 $
//
#include "G4ChebyshevApproximation.hh"
@@ -6,7 +6,7 @@
// and all its terms.
//
// $Id: G4DataInterpolation.cc,v 1.3 1999/11/16 17:31:09 gcosmo Exp $
// GEANT4 tag $Name: geant4-02-00 $
// GEANT4 tag $Name: geant4-03-00 $
//
#include "G4DataInterpolation.hh"
@@ -6,7 +6,7 @@
// and all its terms.
//
// $Id: G4GaussChebyshevQ.cc,v 1.2 1999/11/16 17:31:09 gcosmo Exp $
// GEANT4 tag $Name: geant4-02-00 $
// GEANT4 tag $Name: geant4-03-00 $
//
#include "G4GaussChebyshevQ.hh"
@@ -5,8 +5,8 @@
// based on the Program) you indicate your acceptance of this statement,
// and all its terms.
//
// $Id: G4GaussHermiteQ.cc,v 1.2 1999/11/16 17:31:10 gcosmo Exp $
// GEANT4 tag $Name: geant4-02-00 $
// $Id: G4GaussHermiteQ.cc,v 1.3 2000/11/20 17:26:43 gcosmo Exp $
// GEANT4 tag $Name: geant4-03-00 $
//
#include "G4GaussHermiteQ.hh"
@@ -23,7 +23,8 @@ G4GaussHermiteQ::G4GaussHermiteQ( function pFunction,
const G4int maxNumber = 12 ;
G4int i, j, k ;
G4double newton, newton1, temp1, temp2, temp3, temp ;
G4double newton=0.;
G4double newton1, temp1, temp2, temp3, temp ;
G4double piInMinusQ = pow(pi,-0.25) ; // 1.0/sqrt(sqrt(pi)) ??
fNumber = (nHermite +1)/2 ;
@@ -5,8 +5,8 @@
// based on the Program) you indicate your acceptance of this statement,
// and all its terms.
//
// $Id: G4GaussJacobiQ.cc,v 1.2 1999/11/16 17:31:10 gcosmo Exp $
// GEANT4 tag $Name: geant4-02-00 $
// $Id: G4GaussJacobiQ.cc,v 1.3 2000/11/20 17:26:43 gcosmo Exp $
// GEANT4 tag $Name: geant4-03-00 $
//
#include "G4GaussJacobiQ.hh"
@@ -26,8 +26,9 @@ G4GaussJacobiQ::G4GaussJacobiQ( function pFunction,
const G4double tolerance = 1.0e-12 ;
const G4double maxNumber = 12 ;
G4int i, k, j ;
G4double root=0.;
G4double alphaBeta, alphaReduced, betaReduced, root1, root2, root3 ;
G4double a, b, c, newton1, newton2, newton3, newton, temp, root, rootTemp ;
G4double a, b, c, newton1, newton2, newton3, newton, temp, rootTemp ;
fNumber = nJacobi ;
fAbscissa = new G4double[fNumber] ;
@@ -5,8 +5,8 @@
// based on the Program) you indicate your acceptance of this statement,
// and all its terms.
//
// $Id: G4GaussLaguerreQ.cc,v 1.2 1999/11/16 17:31:10 gcosmo Exp $
// GEANT4 tag $Name: geant4-02-00 $
// $Id: G4GaussLaguerreQ.cc,v 1.3 2000/11/20 17:26:43 gcosmo Exp $
// GEANT4 tag $Name: geant4-03-00 $
//
#include "G4GaussLaguerreQ.hh"
@@ -28,7 +28,8 @@ G4GaussLaguerreQ::G4GaussLaguerreQ( function pFunction,
const G4double tolerance = 1.0e-10 ;
const G4int maxNumber = 12 ;
G4int i, j, k ;
G4double newton, newton1, temp1, temp2, temp3, temp, cofi ;
G4double newton=0.;
G4double newton1, temp1, temp2, temp3, temp, cofi ;
fNumber = nLaguerre ;
fAbscissa = new G4double[fNumber] ;
@@ -6,7 +6,7 @@
// and all its terms.
//
// $Id: G4GaussLegendreQ.cc,v 1.2 1999/11/16 17:31:10 gcosmo Exp $
// GEANT4 tag $Name: geant4-02-00 $
// GEANT4 tag $Name: geant4-03-00 $
//
#include "G4GaussLegendreQ.hh"
@@ -6,7 +6,7 @@
// and all its terms.
//
// $Id: G4SimpleIntegration.cc,v 1.2 1999/11/16 17:31:11 gcosmo Exp $
// GEANT4 tag $Name: geant4-02-00 $
// GEANT4 tag $Name: geant4-03-00 $
//
// Implementation file for simple integration methods
//
@@ -6,7 +6,7 @@
// and all its terms.
//
// $Id: G4VGaussianQuadrature.cc,v 1.2 1999/11/16 17:31:11 gcosmo Exp $
// GEANT4 tag $Name: geant4-02-00 $
// GEANT4 tag $Name: geant4-03-00 $
//
// Implementation file for G4VGaussianQuadrature virtual base class
//