Import Geant4 1.1.0 source tree

This commit is contained in:
Gabriele Cosmo
2016-06-08 15:34:16 +02:00
parent ca1c8cb059
commit 103bda00c8
2654 changed files with 29719 additions and 20203 deletions
@@ -5,8 +5,8 @@
// based on the Program) you indicate your acceptance of this statement,
// and all its terms.
//
// $Id: G4LEAntiNeutronInelastic.cc,v 1.1.10.1 1999/12/07 20:52:21 gunter Exp $
// GEANT4 tag $Name: geant4-01-00 $
// $Id: G4LEAntiNeutronInelastic.cc,v 1.1.10.1.2.2 1999/12/10 15:42:11 gunter Exp $
// GEANT4 tag $Name: geant4-01-01 $
//
// Hadronic Process: AntiNeutron Inelastic Process
// J.L. Chuma, TRIUMF, 18-Feb-1997
@@ -33,11 +33,11 @@
if( verboseLevel > 1 )
{
G4Material *targetMaterial = aTrack.GetMaterial();
G4cout << "G4LEAntiNeutronInelastic::ApplyYourself called" << endl;
G4cout << "G4LEAntiNeutronInelastic::ApplyYourself called" << G4endl;
G4cout << "kinetic energy = " << originalIncident->GetKineticEnergy()/MeV << "MeV, ";
G4cout << "target material = " << targetMaterial->GetName() << ", ";
G4cout << "target particle = " << originalTarget->GetDefinition()->GetParticleName()
<< endl;
<< G4endl;
}
//
// Fermi motion and evaporation
@@ -87,7 +87,7 @@
vec.Initialize( 0 );
const G4double cutOff = 0.1*MeV;
const G4double anni = min( 1.3*currentParticle.GetTotalMomentum()/GeV, 0.4 );
const G4double anni = G4std::min( 1.3*currentParticle.GetTotalMomentum()/GeV, 0.4 );
if( (currentParticle.GetKineticEnergy()/MeV > cutOff) ||
(G4UniformRand() > anni) )
@@ -162,7 +162,7 @@
counter = -1;
for( np=0; np<(numSec/3); ++np )
{
for( nm=max(0,np-2); nm<=np; ++nm )
for( nm=G4std::max(0,np-2); nm<=np; ++nm )
{
for( nz=0; nz<numSec/3; ++nz )
{
@@ -183,7 +183,7 @@
counter = -1;
for( np=0; np<numSec/3; ++np )
{
for( nm=max(0,np-1); nm<=(np+1); ++nm )
for( nm=G4std::max(0,np-1); nm<=(np+1); ++nm )
{
for( nz=0; nz<numSec/3; ++nz )
{
@@ -289,7 +289,7 @@
np = nm = nz = 0;
if( targetParticle.GetDefinition() == aProton )
{
test = exp( min( expxu, max( expxl, -(1.0+b[0])*(1.0+b[0])/(2.0*c*c) ) ) );
test = exp( G4std::min( expxu, G4std::max( expxl, -(1.0+b[0])*(1.0+b[0])/(2.0*c*c) ) ) );
w0 = test;
wp = test;
if( G4UniformRand() < w0/(w0+wp) )
@@ -299,10 +299,10 @@
}
else // target is a neutron
{
test = exp( min( expxu, max( expxl, -(1.0+b[1])*(1.0+b[1])/(2.0*c*c) ) ) );
test = exp( G4std::min( expxu, G4std::max( expxl, -(1.0+b[1])*(1.0+b[1])/(2.0*c*c) ) ) );
w0 = test;
wp = test;
test = exp( min( expxu, max( expxl, -(-1.0+b[1])*(-1.0+b[1])/(2.0*c*c) ) ) );
test = exp( G4std::min( expxu, G4std::max( expxl, -(-1.0+b[1])*(-1.0+b[1])/(2.0*c*c) ) ) );
wm = test;
wt = w0+wp+wm;
wp += w0;
@@ -326,7 +326,7 @@
counter = -1;
for( np=0; np<numSec/3 && ran>=excs; ++np )
{
for( nm=max(0,np-2); nm<=np && ran>=excs; ++nm )
for( nm=G4std::max(0,np-2); nm<=np && ran>=excs; ++nm )
{
for( nz=0; nz<numSec/3 && ran>=excs; ++nz )
{
@@ -335,7 +335,7 @@
nt = np+nm+nz;
if( nt > 0 )
{
test = exp( min( expxu, max( expxl, -(pi/4.0)*(nt*nt)/(n*n) ) ) );
test = exp( G4std::min( expxu, G4std::max( expxl, -(pi/4.0)*(nt*nt)/(n*n) ) ) );
dum = (pi/anpn)*nt*protmul[counter]*protnorm[nt-1]/(2.0*n*n);
if( fabs(dum) < 1.0 )
{
@@ -360,7 +360,7 @@
counter = -1;
for( np=0; np<numSec/3 && ran>=excs; ++np )
{
for( nm=max(0,np-1); nm<=(np+1) && ran>=excs; ++nm )
for( nm=G4std::max(0,np-1); nm<=(np+1) && ran>=excs; ++nm )
{
for( nz=0; nz<numSec/3 && ran>=excs; ++nz )
{
@@ -369,7 +369,7 @@
nt = np+nm+nz;
if( (nt>=1) && (nt<=numSec) )
{
test = exp( min( expxu, max( expxl, -(pi/4.0)*(nt*nt)/(n*n) ) ) );
test = exp( G4std::min( expxu, G4std::max( expxl, -(pi/4.0)*(nt*nt)/(n*n) ) ) );
dum = (pi/anpn)*nt*neutmul[counter]*neutnorm[nt-1]/(2.0*n*n);
if( fabs(dum) < 1.0 )
{
@@ -467,7 +467,7 @@
nt = np+nm+nz;
if( nt>1 && nt<=numSec )
{
test = exp( min( expxu, max( expxl, -(pi/4.0)*(nt*nt)/(n*n) ) ) );
test = exp( G4std::min( expxu, G4std::max( expxl, -(pi/4.0)*(nt*nt)/(n*n) ) ) );
dum = (pi/anpn)*nt*protmulA[counter]*protnormA[nt-1]/(2.0*n*n);
if( fabs(dum) < 1.0 )
{
@@ -493,7 +493,7 @@
nt = np+nm+nz;
if( (nt>1) && (nt<=numSec) )
{
test = exp( min( expxu, max( expxl, -(pi/4.0)*(nt*nt)/(n*n) ) ) );
test = exp( G4std::min( expxu, G4std::max( expxl, -(pi/4.0)*(nt*nt)/(n*n) ) ) );
dum = (pi/anpn)*nt*neutmulA[counter]*neutnormA[nt-1]/(2.0*n*n);
if( fabs(dum) < 1.0 )
{