Import Geant4 9.4.0 source tree

This commit is contained in:
Gabriele Cosmo
2016-06-09 16:25:56 +02:00
parent 74cad5e589
commit 89a9605df1
4440 changed files with 379508 additions and 189225 deletions
@@ -23,7 +23,7 @@
// * acceptance of all terms of the Geant4 Software license. *
// ********************************************************************
//
// $Id: G4Abla.hh,v 1.11 2008/06/25 17:20:03 kaitanie Exp $
// $Id: G4Abla.hh,v 1.14 2010/11/17 20:19:09 kaitanie Exp $
// Translation of INCL4.2/ABLA V3
// Pekka Kaitaniemi, HIP (translation)
// Christelle Schmidt, IPNL (fission code)
@@ -32,6 +32,7 @@
#include "globals.hh"
#include "G4VInclLogger.hh"
#include "G4InclRandomNumbers.hh"
#include "G4AblaDataDefs.hh"
#include "G4InclDataDefs.hh"
@@ -47,11 +48,6 @@
class G4Abla {
public:
/**
* Basic constructor.
*/
G4Abla();
/**
* This constructor is used by standalone test driver and the Geant4 interface.
*
@@ -61,24 +57,20 @@ public:
*/
G4Abla(G4Hazard *aHazard, G4Volant *aVolant, G4VarNtp *aVarntp);
/**
* Constructor that is to be used only for testing purposes.
* @param aHazard random seeds
* @param aVolant data structure for ABLA output
*/
G4Abla(G4Hazard *hazard, G4Volant *volant);
/**
* Basic destructor.
*/
~G4Abla();
/**
* Register the INCL/ABLA internal variable logger.
*/
void registerLogger(G4VInclLogger *theLogger);
/**
* Set verbosity level.
*/
void setVerboseLevel(G4int level) {
verboseLevel = level;
}
void setVerboseLevel(G4int level);
/**
* Get the internal output data structure pointer.
@@ -101,7 +93,7 @@ public:
* @param momZ momentum z-component
* @param eventnumber number of the event
*/
void breakItUp(G4double nucleusA, G4double nucleusZ, G4double nucleusMass, G4double excitationEnergy,
void breakItUp(G4int nucleusA, G4int nucleusZ, G4double nucleusMass, G4double excitationEnergy,
G4double angularMomentum, G4double recoilEnergy, G4double momX, G4double momY, G4double momZ,
G4int eventnumber);
@@ -162,7 +154,7 @@ public:
void direct(G4double zprf,G4double a, G4double ee, G4double jprf,
G4double *probp_par, G4double *probn_par, G4double *proba_par,
G4double *probf_par, G4double *ptotl_par, G4double *sn_par, G4double *sbp_par, G4double *sba_par, G4double *ecn_par,
G4double *ecp_par,G4double *eca_par, G4double *bp_par, G4double *ba_par, G4int inttype, G4int inum, G4int itest);
G4double *ecp_par,G4double *eca_par, G4double *bp_par, G4double *ba_par, G4int, G4int inum, G4int itest);
/**
* Level density parameters.
@@ -321,6 +313,8 @@ private:
G4Opt *opt;
G4Volant *volant;
G4VarNtp *varntp;
G4VInclLogger *theLogger;
};
#endif
@@ -23,7 +23,7 @@
// * acceptance of all terms of the Geant4 Software license. *
// ********************************************************************
//
// $Id: G4AblaDataDefs.hh,v 1.9 2008/06/25 17:20:04 kaitanie Exp $
// $Id: G4AblaDataDefs.hh,v 1.13 2010/11/13 00:08:36 kaitanie Exp $
// Translation of INCL4.2/ABLA V3
// Pekka Kaitaniemi, HIP (translation)
// Christelle Schmidt, IPNL (fission code)
@@ -94,7 +94,9 @@ public:
/**
*
*/
G4Ald() {};
G4Ald()
:av(0.0), as(0.0), ak(0.0), optafan(0.0)
{};
~G4Ald() {};
G4double av,as,ak,optafan;
@@ -140,7 +142,10 @@ class G4Fiss {
*/
public:
G4Fiss() {};
G4Fiss()
:akap(0.0), bet(0.0), homega(0.0), koeff(0.0), ifis(0.0),
optshp(0), optxfis(0), optles(0), optcol(0)
{};
~G4Fiss() {};
G4double akap,bet,homega,koeff,ifis;
@@ -170,7 +175,9 @@ public:
class G4Opt {
public:
G4Opt() {};
G4Opt()
:optemd(0), optcha(0), eefac(0.0)
{};
~G4Opt() {};
G4int optemd,optcha;
@@ -181,14 +188,23 @@ public:
#define XHESIZE 50
class G4Eenuc {
public:
G4Eenuc() {};
G4Eenuc() {
for(G4int i = 0; i < EENUCSIZE; ++i) {
she[i] = 0.0;
}
for(G4int i = 0; i < XHESIZE; ++i) {
for(G4int j = 0; j < EENUCSIZE; ++j) {
xhe[i][j] = 0.0;
}
}
};
~G4Eenuc() {};
G4double she[EENUCSIZE],xhe[XHESIZE][EENUCSIZE];
};
//#define VOLANTSIZE 200
#define VOLANTSIZE 2000
#define VOLANTSIZE 301
/**
* Evaporation and fission output data.
*/
@@ -23,7 +23,7 @@
// * acceptance of all terms of the Geant4 Software license. *
// ********************************************************************
//
// $Id: G4AblaEvaporation.hh,v 1.1 2007/09/11 13:18:42 miheikki Exp $
// $Id: G4AblaEvaporation.hh,v 1.3 2010/10/26 02:47:59 kaitanie Exp $
// Defines an interface to evaporation models of Bertini cascase (BERT)
// based on INUCL code.
//
@@ -34,7 +34,6 @@
#include "G4VEvaporation.hh"
#include "G4Fragment.hh"
#include "G4DynamicParticle.hh"
#include "G4Abla.hh"
//#include "G4VCoulombBarrier.hh"
@@ -95,6 +94,12 @@ private:
// G4VCoulombBarrier * theCoulombBarrierPtr;
G4double CoulombBarrier;
/**
* ABLA evaporation
*/
G4Abla *abla;
G4VarNtp *varntp;
#ifdef DEBUG
#endif
@@ -23,7 +23,7 @@
// * acceptance of all terms of the Geant4 Software license. *
// ********************************************************************
//
// $Id: G4AblaFissionBase.hh,v 1.2 2008/06/25 17:20:04 kaitanie Exp $
// $Id: G4AblaFissionBase.hh,v 1.5 2010/10/26 02:47:59 kaitanie Exp $
// Translation of INCL4.2/ABLA V3
// Pekka Kaitaniemi, HIP (translation)
// Christelle Schmidt, IPNL (fission code)
@@ -34,6 +34,7 @@
#define G4AblaFissionBase_hh 1
#include "globals.hh"
#include "G4InclUtils.hh"
/*
* Abstract interface to fission models.
@@ -42,15 +43,23 @@
class G4AblaFissionBase {
public:
G4AblaFissionBase() {}
~G4AblaFissionBase() {}
G4AblaFissionBase();
virtual ~G4AblaFissionBase();
virtual void doFission(G4double &A, G4double &Z, G4double &E,
G4double &A1, G4double &Z1, G4double &E1, G4double &K1,
G4double &A2, G4double &Z2, G4double &E2, G4double &K2) = 0;
void setVerboseLevel(G4int level) {
verboseLevel = level;
if(verboseLevel > G4InclUtils::silent) {
about();
G4cout <<";; Fission model verbosity level set to " << verboseLevel << G4endl;
}
}
void about() {
G4cout << aboutModel << G4endl;
G4cout << ";; " << aboutModel << G4endl;
}
void setAboutString(G4String about) {
@@ -58,6 +67,7 @@ public:
}
private:
G4int verboseLevel;
G4String aboutModel;
};
@@ -23,7 +23,7 @@
// * acceptance of all terms of the Geant4 Software license. *
// ********************************************************************
//
// $Id: G4Incl.hh,v 1.15 2009/11/18 10:43:14 kaitanie Exp $
// $Id: G4Incl.hh,v 1.19 2010/11/13 00:08:36 kaitanie Exp $
// Translation of INCL4.2/ABLA V3
// Pekka Kaitaniemi, HIP (translation)
// Christelle Schmidt, IPNL (fission code)
@@ -38,6 +38,8 @@
#include "G4InclDataDefs.hh"
#include "G4Abla.hh"
#include <fstream>
#include "G4VInclLogger.hh"
#include "G4InclInput.hh"
using namespace std;
/**
@@ -62,7 +64,7 @@ public:
* @param mat a pointer to G4Mat structure.
* @param varntp a pointer to G4VarNtp structure.
*/
G4Incl(G4Hazard *hazard, G4Calincl *calincl, G4Ws *ws, G4Mat *mat, G4VarNtp *varntp);
G4Incl(G4Hazard *hazard, G4InclInput *calincl, G4Ws *ws, G4Mat *mat, G4VarNtp *varntp);
/**
* Constructor for private unit testing purposes.
@@ -85,6 +87,19 @@ public:
void dumpBl2(std::ofstream& dumpOut); // Dump the contents of G4Bl2.
void dumpBl3(std::ofstream& dumpOut); // Dump the contents of G4Bl3.
/**
* Set Fermi break-up use flag.
*/
void setUseFermiBreakUp(G4bool useIt);
/**
* Set projectile spectator use flag.
*
* Select whether or not to produce so-called spectator nucleus from
* the projectile nucleons that do not hit the target.
*/
void setUseProjectileSpectators(G4bool useIt);
/**
* Set verbosity level.
*/
@@ -100,7 +115,7 @@ public:
void setSaxwData(G4Saxw *newSaxw);
void setSpl2Data(G4Spl2 *newSpl2);
void setMatData(G4Mat *newMat);
void setCalinclData(G4Calincl *newCalincl);
void setInput(G4InclInput *newCalincl);
void setLightNucData(G4LightNuc *newLightNuc);
void setLightGausNucData(G4LightGausNuc *newLightGausNuc);
void setBl1Data(G4Bl1 *newBl1);
@@ -114,16 +129,26 @@ public:
void setBl10Data(G4Bl10 *newBl10);
void setKindData(G4Kind *newKind);
/**
* Register the logger.
*/
void registerLogger(G4VInclLogger *aLogger) {
if(aLogger != 0) {
theLogger = aLogger;
abla->registerLogger(aLogger);
}
}
public:
/**
* Process one event with INCL4 only.
*/
void processEventIncl();
void processEventIncl(G4InclInput *input);
/**
* Process one event with INCL4 and built-in ABLA evaporation and fission.
*/
void processEventInclAbla(G4int eventnumber);
void processEventInclAbla(G4InclInput *input, G4int eventnumber);
public: // Methods used to initialize INCL
/**
@@ -279,7 +304,12 @@ public: // Main INCL routines
*/
void pnu(G4int *ibert_p, G4int *nopart_p, G4int *izrem_p, G4int *iarem_p, G4double *esrem_p,
G4double *erecrem_p, G4double *alrem_p, G4double *berem_p, G4double *garem_p,
G4double *bimpact_p, G4int *l_p);
G4double *bimpact_p, G4int *l_p, G4double *xjrem, G4double *yjrem, G4double *zjrem);
//C projection de JREM sur Z:
// MREM=ANINT(ZJREM/197.328)
// IF (MREM.GT.JREM) MREM=JREM
// IF (MREM.LT.-JREM) MREM=-JREM
/**
* Single nucleon-nucleon collision.
@@ -459,7 +489,16 @@ public: // Main INCL routines
* @param v0
* @return a double value
*/
G4double transmissionProb(G4double E, G4double iz, G4double izn, G4double r, G4double v0);
// G4double transmissionProb(G4double E, G4double iz, G4double izn, G4double r, G4double v0);
// G4double transmissionProb(G4double E, G4int iz, G4int izn, G4double r, G4double v0)
G4double transmissionProb(G4double E, G4int iz, G4int ia, G4int izn, G4double r, G4double v0);
// G4double transmissionProb(G4double E, G4int iz, G4int ia, G4int izn,G4double R, G4double v0);
// G4double transmissionProb(G4double E, G4double iz, G4double izn, G4double r, G4double v0);
void projo_spec(G4int ia1, G4int ips,
G4double fmpinc, G4double pinc, G4double tlab);
void ordered(G4double t, G4int nb);
/**
*
@@ -535,7 +574,7 @@ public: // Main INCL routines
* Nuclear radius
* @param A mass number (double parameter)
*/
G4double radius(G4double A);
G4double radius(G4int A);
/** Parametrisation de la section efficace de réaction calculée par incl4.1
* iprojo=1 proton incident, iprojo=2, neutron incident).
@@ -636,8 +675,23 @@ public: // Utilities
G4double amax1(G4double a, G4double b);
G4double w(G4double a, G4double b, G4double c, G4double d);
G4int idnint(G4double a);
void print_log_start_step();
void print_log_end_step();
void print_log_entry(G4int iavatars, G4int iselected, G4int iparticles, G4int imin);
void print_avatars();
void print_one_avatar(G4int index);
void print_one_particle(G4int index);
void print_three_vector(G4double x, G4double y, G4double z);
void print_map();
private:
/*
* (Re)Initialize INCL internal variables
*/
void clearState();
/**
* Random seeds for INCL4 internal random number generators.
*/
@@ -675,9 +729,9 @@ public: // Utilities
G4LightNuc *light_nuc;
/**
* G4Calincl
* INCL input data structure
*/
G4Calincl *calincl;
G4InclInput *calincl;
/**
* G4Mat
@@ -734,6 +788,11 @@ public: // Utilities
*/
G4Kind *kindstruct;
/**
* Projectile properties.
*/
G4Bev *bev;
/**
*
*/
@@ -809,15 +868,40 @@ public: // Utilities
*/
G4int densFunction;
/**
* Use fermi break-up?
*/
G4bool useFermiBreakup;
/**
* Projectile spectator nucleus support?
*/
G4bool useProjSpect;
/**
* Type of the particle at index i.
*
* The extension to large composite projectiles the value is
* negative for projectile spectators. Otherwise the particle types
* are given in exactly the same way as in G4Calincl::f[6].
* @see G4Calincl::f
*/
G4int kind[300]; //= (*kind_p);
G4double ep[300]; // = (*ep_p);
G4double alpha[300]; // = (*alpha_p);
G4double beta[300]; // = (*beta_p);
G4double gam[300]; // = (*gam_p);
G4VBe *be;
G4InclProjSpect *ps;
G4InclFermi *fermi;
G4QuadvectProjo *qvp;
G4Volant *volant;
G4Abla *abla;
G4InclRandomInterface *randomGenerator;
G4VInclLogger *theLogger;
G4int inside_step; // Flag to determine whether we are inside or outside a simulation step
};
#endif
@@ -23,7 +23,7 @@
// * acceptance of all terms of the Geant4 Software license. *
// ********************************************************************
//
// $Id: G4InclAblaCascadeInterface.hh,v 1.8 2009/11/18 10:43:14 kaitanie Exp $
// $Id: G4InclAblaCascadeInterface.hh,v 1.11 2010/11/13 00:08:36 kaitanie Exp $
// Translation of INCL4.2/ABLA V3
// Pekka Kaitaniemi, HIP (translation)
// Christelle Schmidt, IPNL (fission code)
@@ -90,6 +90,7 @@ using namespace std;
* as well.
*
* @see G4InclAblaLightIonInterface
* @see G4InclCascadeInterface
*/
class G4InclAblaCascadeInterface : public G4VIntraNuclearTransportModel {
@@ -128,7 +129,7 @@ private:
private:
G4Hazard *hazard; // The random seeds used by INCL.
G4VarNtp *varntp;
G4Calincl *calincl;
G4InclInput *calincl;
G4Ws *ws;
G4Mat *mat;
G4Incl *incl;
@@ -23,7 +23,7 @@
// * acceptance of all terms of the Geant4 Software license. *
// ********************************************************************
//
// $Id: G4InclAblaDataFile.hh,v 1.2 2007/10/31 10:44:22 miheikki Exp $
// $Id: G4InclAblaDataFile.hh,v 1.4 2010/11/17 20:19:09 kaitanie Exp $
// Translation of INCL4.2/ABLA V3
// Pekka Kaitaniemi, HIP (translation)
// Christelle Schmidt, IPNL (fission code)
@@ -42,6 +42,7 @@ class G4InclAblaDataFile : public G4InclAblaVirtualData {
public:
G4InclAblaDataFile();
~G4InclAblaDataFile();
/**
* Read all data from files.
@@ -50,8 +51,6 @@ public:
private:
G4int verboseLevel;
G4String *dataPath;
};
#endif
@@ -23,7 +23,7 @@
// * acceptance of all terms of the Geant4 Software license. *
// ********************************************************************
//
// $Id: G4InclAblaLightIonInterface.hh,v 1.5 2007/10/31 10:44:22 miheikki Exp $
// $Id: G4InclAblaLightIonInterface.hh,v 1.7 2010/10/26 02:47:59 kaitanie Exp $
// Translation of INCL4.2/ABLA V3
// Pekka Kaitaniemi, HIP (translation)
// Christelle Schmidt, IPNL (fission code)
@@ -45,9 +45,6 @@
#ifndef G4INCLABLALIGHTIONINTERFACE_H
#define G4INCLABLALIGHTIONINTERFACE_H 1
#include "G4Nucleon.hh"
#include "G4Nucleus.hh"
#include "G4HadronicInteraction.hh"
#include "G4VIntraNuclearTransportModel.hh"
#include "G4KineticTrackVector.hh"
#include "G4FragmentVector.hh"
@@ -107,7 +104,7 @@ private:
private:
G4Hazard *hazard; // The random seeds used by INCL.
G4VarNtp *varntp;
G4Calincl *calincl;
G4InclInput *calincl;
G4Ws *ws;
G4Mat *mat;
G4Incl *incl;
@@ -118,6 +115,8 @@ private:
G4int eventNumber;
G4double previousTargetA;
G4double previousTargetZ;
G4bool useProjectileSpectator;
G4bool useFermiBreakup;
};
#endif // G4INCLABLALIGHTIONINTERFACE_H
@@ -23,7 +23,7 @@
// * acceptance of all terms of the Geant4 Software license. *
// ********************************************************************
//
// $Id: G4InclAblaVirtualData.hh,v 1.5 2008/06/25 17:20:04 kaitanie Exp $
// $Id: G4InclAblaVirtualData.hh,v 1.6 2010/06/14 16:10:01 gcosmo Exp $
// Translation of INCL4.2/ABLA V3
// Pekka Kaitaniemi, HIP (translation)
// Christelle Schmidt, IPNL (fission code)
@@ -46,9 +46,10 @@ class G4InclAblaVirtualData {
protected:
/**
* Constructor
* Constructor, destructor
*/
G4InclAblaVirtualData();
virtual ~G4InclAblaVirtualData();
public:
/**
@@ -23,7 +23,7 @@
// * acceptance of all terms of the Geant4 Software license. *
// ********************************************************************
//
// $Id: G4InclCascadeInterface.hh,v 1.5 2007/10/31 10:44:22 miheikki Exp $
// $Id: G4InclCascadeInterface.hh,v 1.8 2010/11/13 00:08:36 kaitanie Exp $
// Translation of INCL4.2/ABLA V3
// Pekka Kaitaniemi, HIP (translation)
// Christelle Schmidt, IPNL (fission code)
@@ -59,15 +59,41 @@
#include "G4AblaDataDefs.hh"
#include "G4Incl.hh"
// Geant4 de-excitation
#include "G4ExcitationHandler.hh"
#include "G4PreCompoundModel.hh"
#include <fstream>
#include <iostream>
using namespace std;
/**
* <h1>INCL intra-nuclear cascade with Geant4 PreCompound for de-excitation</h1>
*
* Interface for INCL. This interface handles basic hadron
* bullet particles (protons, neutrons, pions).
* @see G4InclAblaLightIonInterface
*
* Example usage in case of protons:
* @code
* G4InclCascadeInterface* inclModel = new G4InclCascadeInterface;
* inclModel -> SetMinEnergy(0.0 * MeV); // Set the energy limits
* inclModel -> SetMaxEnergy(3.0 * GeV);
*
* G4ProtonInelasticProcess* protonInelasticProcess = new G4ProtonInelasticProcess();
* G4ProtonInelasticCrossSection* protonInelasticCrossSection = new G4ProtonInelasticCrossSection();
*
* protonInelasticProcess -> RegisterMe(inclModel);
* protonInelasticProcess -> AddDataSet(protonInelasticCrossSection);
*
* particle = G4Proton::Proton();
* processManager = particle -> GetProcessManager();
* processManager -> AddDiscreteProcess(protonInelasticProcess);
* @endcode
* The same setup procedure is needed for neutron and pion inelastic processes
* as well.
*
* @see G4InclLightIonInterface
*/
class G4InclCascadeInterface : public G4VIntraNuclearTransportModel {
@@ -76,7 +102,7 @@ public:
/**
* Basic constructor.
*/
G4InclCascadeInterface();
G4InclCascadeInterface(const G4String& name = "INCL Cascade with Geant4 PreCompound");
G4int operator==(G4InclCascadeInterface& right) {
@@ -92,10 +118,10 @@ public:
G4ReactionProductVector* Propagate(G4KineticTrackVector* theSecondaries, G4V3DNucleus* theNucleus); // Idle
/**
* Main method to apply the INCL/ABLA physics model.
* Main method to apply the INCL physics model.
* @param aTrack the projectile particle
* @param theNucleus target nucleus
* @return the output of the INCL/ABLA physics model
* @return the output of the INCL physics model
*/
G4HadFinalState* ApplyYourself(const G4HadProjectile& aTrack, G4Nucleus& theNucleus);
@@ -106,17 +132,20 @@ private:
private:
G4Hazard *hazard; // The random seeds used by INCL.
G4VarNtp *varntp;
G4Calincl *calincl;
G4InclInput *calincl;
G4Ws *ws;
G4Mat *mat;
G4Incl *incl;
G4HadFinalState theResult;
ofstream diagdata;
G4int eventNumber;
G4double previousTargetA;
G4double previousTargetZ;
G4ExcitationHandler *theExcitationHandler;
G4PreCompoundModel *thePrecoModel;
};
#endif // G4INCLCASCADEINTERFACE_H
#endif // G4INCLABLACASCADEINTERFACE_H
@@ -23,7 +23,7 @@
// * acceptance of all terms of the Geant4 Software license. *
// ********************************************************************
//
// $Id: G4InclDataDefs.hh,v 1.7 2009/11/18 10:43:14 kaitanie Exp $
// $Id: G4InclDataDefs.hh,v 1.12 2010/11/17 20:19:09 kaitanie Exp $
// Translation of INCL4.2/ABLA V3
// Pekka Kaitaniemi, HIP (translation)
// Christelle Schmidt, IPNL (fission code)
@@ -35,39 +35,92 @@
#ifndef InclDataDefs_hh
#define InclDataDefs_hh 1
#define FSIZE 15
/**
* Initial values of a hadronic cascade problem.
*/
class G4Calincl {
public:
G4Calincl() {};
~G4Calincl() {};
/**
* Here f is an array containing the following initial values:
* - f[0] : target mass number
* - f[1] : target charge number
* - f[2] : bullet energy
* - f[3] : minimum proton energy to leave the target (default: 0.0)
* - f[4] : nuclear potential (default: 45.0 MeV)
* - f[5] : time scale (default: 1.0)
* - f[6] : bullet type (1: proton, 2: neutron, 3: pi+, 4: pi0 5: pi-, 6:H2, 7: H3, 8: He3, 9: He4
* - f[7] : minimum neutron energy to leave the target (default: 0.0)
* - f[8] : target material identifier (G4Mat)
* - f[9] : not used
* - f[10] : not used
* - f[11] : not used
* - f[12] : not used
* - f[13] : not used
* - f[14] : not used
*/
G4double f[FSIZE];
#include "G4Nucleus.hh"
#include "G4HadProjectile.hh"
#include "G4ParticleTable.hh"
#include "G4Track.hh"
/**
* Number of events to be processed.
*/
G4int icoup;
class G4InclFermi {
public:
G4InclFermi() {
G4double hc = 197.328;
G4double fmp = 938.2796;
pf=1.37*hc;
pf2=pf*pf;
tf=std::sqrt(pf*pf+fmp*fmp)-fmp;
};
~G4InclFermi() {};
G4double tf,pf,pf2;
};
#define max_a_proj 61
/**
* (eps_c,p1_s,p2_s,p3_s,eps_c used to store the kinematics of
* nucleons for composit projectiles before entering the potential)
*/
class G4QuadvectProjo {
public:
G4QuadvectProjo() {
for(G4int i = 0; i < max_a_proj; ++i) {
eps_c[i] = 0.0;
t_c[i] = 0.0;
p3_c[i] = 0.0;
p1_s[i] = 0.0;
p2_s[i] = 0.0;
p3_s[i] = 0.0;
}
};
~G4QuadvectProjo() {};
G4double eps_c[max_a_proj],p3_c[max_a_proj],
p1_s[max_a_proj],p2_s[max_a_proj],p3_s[max_a_proj],
t_c[max_a_proj];
};
class G4VBe {
public:
G4VBe()
:ia_be(0), iz_be(0),
rms_be(0.0), pms_be(0.0), bind_be(0.0)
{ };
~G4VBe() {};
G4int ia_be, iz_be;
G4double rms_be, pms_be, bind_be;
};
/**
* Projectile spectator
*/
class G4InclProjSpect {
public:
G4InclProjSpect() {
// G4cout <<"Projectile spectator data structure created!" << G4endl;
clear();
};
~G4InclProjSpect() {};
void clear() {
for(G4int i = 0; i < 21; i++) tab[i] = 0.0;
for(G4int i = 0; i < 61; i++) n_projspec[i] = 0;
a_projspec = 0;
z_projspec = 0;
t_projspec = 0.0;
ex_projspec = 0.0;
p1_projspec = 0.0;
p2_projspec = 0.0;
p3_projspec = 0.0;
m_projspec = 0.0;
};
G4double tab[21];
G4int n_projspec[61];
G4int a_projspec,z_projspec;
G4double ex_projspec,t_projspec, p1_projspec, p2_projspec, p3_projspec, m_projspec;
};
#define IGRAINESIZE 19
@@ -78,7 +131,13 @@ public:
*/
class G4Hazard{
public:
G4Hazard() {};
G4Hazard() {
ial = 0;
for(G4int i = 0; i < IGRAINESIZE; ++i) {
igraine[i] = 0;
}
};
~G4Hazard() {};
/**
@@ -99,7 +158,21 @@ public:
*/
class G4Mat {
public:
G4Mat() { };
G4Mat() {
nbmat = 0;
for(G4int i = 0; i < MATSIZE; ++i) {
zmat[i] = 0;
amat[i] = 0;
}
for(G4int i = 0; i < MATGEOSIZE; ++i) {
for(G4int j = 0; j < MATSIZE; ++j) {
bmax_geo[i][j] = 0;
}
}
};
~G4Mat() { };
/**
@@ -129,7 +202,16 @@ public:
*/
class G4LightGausNuc {
public:
G4LightGausNuc() {};
G4LightGausNuc() {
for(G4int i = 0; i < LGNSIZE; ++i) {
rms1t[i] = 0.0;
pf1t[i] = 0.0;
pfln[i] = 0.0;
tfln[i] = 0.0;
vnuc[i] = 0.0;
}
};
~G4LightGausNuc() {};
G4double rms1t[LGNSIZE];
@@ -145,7 +227,13 @@ public:
*/
class G4LightNuc {
public:
G4LightNuc() {};
G4LightNuc() {
for(G4int i = 0; i < LNSIZE; ++i) {
r[i] = 0.0;
a[i] = 0.0;
}
};
~G4LightNuc() {};
/**
@@ -166,7 +254,17 @@ public:
*/
class G4Saxw {
public:
G4Saxw() {};
G4Saxw() {
for(G4int i = 0; i < SAXWROWS; ++i) {
for(G4int j = 0; j < SAXWCOLS; ++j) {
x[i][j] = 0.0;
y[i][j] = 0.0;
s[i][j] = 0.0;
}
}
imat = 0; n = 0; k = 0;
};
~G4Saxw() {};
/**
@@ -205,7 +303,18 @@ public:
*/
class G4Ws {
public:
G4Ws() {};
G4Ws() {
fneck = 0.0;
r0 = 0.0;
adif = 0.0;
rmaxws = 0.0;
drws = 0.0;
nosurf = 0.0;
xfoisa = 0.0;
bmax = 0.0;
npaulstr = 0.0;
};
~G4Ws() {};
/**
@@ -255,6 +364,8 @@ public:
* Maximum impact parameter
*/
G4double bmax;
G4double fneck;
};
#define DTONSIZE 13
@@ -265,7 +376,14 @@ public:
*/
class G4Dton {
public:
G4Dton() {};
G4Dton() {
fn = 0.0;
for(G4int i = 0; i < DTONSIZE; ++i) {
c[i] = 0.0;
d[i] = 0.0;
}
};
~G4Dton() {};
G4double c[DTONSIZE];
@@ -281,7 +399,14 @@ public:
*/
class G4Spl2 {
public:
G4Spl2() {};
G4Spl2() {
for(G4int i = 0; i < SPL2SIZE; ++i) {
x[i] = 0.0; y[i] = 0.0;
a[i] = 0.0; b[i] = 0.0; c[i] = 0.0;
}
n = 0;
};
~G4Spl2() {};
G4double x[SPL2SIZE];
@@ -303,23 +428,47 @@ public:
*/
class G4Bl1 {
public:
G4Bl1() {};
G4Bl1() {
ta = 0.0;
for(G4int i = 0; i < BL1SIZE; ++i) {
p1[i] = 0.0; p2[i] = 0.0; p3[i] = 0.0; eps[i] = 0.0;
ind1[i] = 0; ind2[i] = 0;
}
};
~G4Bl1() {};
G4double p1[BL1SIZE],p2[BL1SIZE],p3[BL1SIZE];
G4double eps[BL1SIZE];
G4int ind1[BL1SIZE],ind2[BL1SIZE];
G4double ta;
void dump(G4int numberOfParticles) {
static G4int dumpNumber = 0;
G4cout <<"Dump number" << dumpNumber << " of particle 4-momenta (G4Bl1):" << G4endl;
G4cout <<"ta = " << ta << G4endl;
for(G4int i = 0; i < numberOfParticles; i++) {
G4cout <<"i = " << i << " p1 = " << p1[i] << " p2 = " << p2[i] << " p3 = " << p3[i] << " eps = " << eps[i] << G4endl;
}
dumpNumber++;
}
};
#define BL2CROISSIZE 19900
#define BL2INDSIZE 19900
#define BL2SIZE 19900
/**
*
*/
class G4Bl2 {
public:
G4Bl2() {};
G4Bl2() {
k = 0;
for(G4int i = 0; i < BL2SIZE; ++i) {
crois[i] = 0.0;
ind[i] = 0;
jnd[i] = 0;
}
};
~G4Bl2() {};
void dump() {
@@ -335,7 +484,7 @@ public:
/**
*
*/
G4double crois[BL2CROISSIZE];
G4double crois[BL2SIZE];
/**
*
@@ -345,12 +494,12 @@ public:
/**
*
*/
G4int ind[BL2INDSIZE];
G4int ind[BL2SIZE];
/**
*
*/
G4int jnd[BL2INDSIZE];
G4int jnd[BL2SIZE];
};
//#define BL3SIZE 300
@@ -360,7 +509,16 @@ public:
*/
class G4Bl3 {
public:
G4Bl3() {};
G4Bl3() {
r1 = 0.0; r2 = 0.0;
ia1 = 0; ia2 = 0;
rab2 = 0.0;
for(G4int i = 0; i < BL3SIZE; ++i) {
x1[i] = 0.0; x2[i] = 0.0; x3[i] = 0.0;
}
};
~G4Bl3() {};
/**
@@ -382,6 +540,18 @@ public:
* rab2
*/
G4double rab2;
void dump() {
static G4int dumpNumber = 0;
G4cout <<"Dump number" << dumpNumber << " of particle positions (G4Bl3):" << G4endl;
G4cout <<" ia1 = " << ia1 << G4endl;
G4cout <<" ia2 = " << ia2 << G4endl;
G4cout <<" rab2 = " << rab2 << G4endl;
for(G4int i = 0; i <= (ia1 + ia2); i++) {
G4cout <<"i = " << i << " x1 = " << x1[i] << " x2 = " << x2[i] << " x3 = " << x3[i] << G4endl;
}
dumpNumber++;
}
};
/**
@@ -389,7 +559,10 @@ public:
*/
class G4Bl4 {
public:
G4Bl4() {};
G4Bl4()
:tmax5(0.0)
{};
~G4Bl4() {};
/**
@@ -405,7 +578,13 @@ public:
*/
class G4Bl5 {
public:
G4Bl5() {};
G4Bl5() {
for(G4int i = 0; i < BL5SIZE; ++i) {
tlg[i] = 0.0;
nesc[i] = 0;
}
};
~G4Bl5() {};
/**
@@ -424,7 +603,10 @@ public:
*/
class G4Bl6 {
public:
G4Bl6() {};
G4Bl6()
:xx10(0.0), isa(0.0)
{};
~G4Bl6() {};
/**
@@ -443,7 +625,10 @@ public:
*/
class G4Bl8 {
public:
G4Bl8() {};
G4Bl8()
:rathr(0.0), ramass(0.0)
{};
~G4Bl8() {};
/**
@@ -467,6 +652,9 @@ public:
G4Bl9() {
l1 = 0;
l2 = 0;
for(G4int i = 0; i < BL9SIZE; ++i) {
hel[i] = 0.0;
}
};
~G4Bl9() {};
@@ -486,7 +674,9 @@ public:
*/
class G4Bl10 {
public:
G4Bl10() {};
G4Bl10()
:ri4(0.0), rs4(0.0), r2i(0.0), r2s(0.0), pdummy(0.0), pf(0.0)
{};
~G4Bl10() {};
/**
@@ -500,7 +690,9 @@ public:
*/
class G4Kind {
public:
G4Kind() {};
G4Kind()
:kindf7(0)
{};
~G4Kind() {};
/**
@@ -509,6 +701,49 @@ public:
G4int kindf7;
};
/**
* Projectile parameters.
*/
class G4Bev {
public:
/**
* Initialize all variables to zero.
*/
G4Bev() {
ia_be = 0;
iz_be = 0;
rms_be = 0.0;
pms_be = 0.0;
bind_be = 0.0;
};
~G4Bev() {};
/**
* Mass number.
*/
G4int ia_be;
/**
* Charge number.
*/
G4int iz_be;
/**
* rms
*/
G4double rms_be;
/**
* pms
*/
G4double pms_be;
/**
* bind
*/
G4double bind_be;
};
#define VARSIZE 3
#define VAEPSSIZE 250
#define VAAVM 1000
@@ -517,7 +752,40 @@ public:
*/
class G4VarAvat {
public:
G4VarAvat() {};
G4VarAvat() {
kveux = 0;
bavat = 0.0;
nopartavat = 0; ncolavat = 0;
nb_avat = 0;
for(G4int i = 0; i < VARSIZE; ++i) {
r1_in[i] = 0.0;
r1_first_avat[i] = 0.0;
}
for(G4int i = 0; i < VAEPSSIZE; ++i) {
epsd[i] = 0.0;
eps2[i] = 0.0;
eps4[i] = 0.0;
eps6[i] = 0.0;
epsf[i] = 0.0;
}
for(G4int i = 0; i < VAAVM; ++i) {
timeavat[i] = 0.0;
l1avat[i] = 0.0;
l2avat[i] = 0.0;
jpartl1[i] = 0.0;
jpartl2[i] = 0.0;
del1avat[i] = 0.0;
del2avat[i] = 0.0;
energyavat[i] = 0.0;
bloc_paul[i] = 0.0;
bloc_cdpp[i] = 0.0;
go_out[i] = 0.0;
}
};
~G4VarAvat() {};
/**
@@ -566,10 +834,13 @@ public:
G4double bloc_paul[VAAVM],bloc_cdpp[VAAVM],go_out[VAAVM];
};
#define VARNTPSIZE 255
#define VARNTPSIZE 301
class G4VarNtp {
public:
G4VarNtp() {};
G4VarNtp() {
clear();
};
~G4VarNtp() {};
/**
@@ -581,6 +852,16 @@ public:
projEnergy = 0.0;
targetA = 0;
targetZ = 0;
masp = 0.0; mzsp = 0.0; exsp = 0.0; mrem = 0.0;
// To be deleted?
spectatorA = 0;
spectatorZ = 0;
spectatorEx = 0.0;
spectatorM = 0.0;
spectatorT = 0.0;
spectatorP1 = 0.0;
spectatorP2 = 0.0;
spectatorP3 = 0.0;
massini = 0;
mzini = 0;
exini = 0;
@@ -589,6 +870,7 @@ public:
pxrem = 0;
pyrem = 0;
pzrem = 0;
erecrem = 0;
mulncasc = 0;
mulnevap = 0;
mulntot = 0;
@@ -599,6 +881,7 @@ public:
izfis = 0;
iafis = 0;
ntrack = 0;
needsFermiBreakup = false;
for(G4int i = 0; i < VARNTPSIZE; i++) {
itypcasc[i] = 0;
avv[i] = 0;
@@ -611,6 +894,9 @@ public:
}
}
/**
* Add a particle to the INCL/ABLA final output.
*/
void addParticle(G4double A, G4double Z, G4double E, G4double P, G4double theta, G4double phi) {
if(full[particleIndex]) {
G4cout <<"G4VarNtp: Error. Index i = " << particleIndex << " is already occupied by particle:" << G4endl;
@@ -750,6 +1036,51 @@ public:
*/
G4int targetZ;
/**
* Projectile spectator A, Z, Eex;
*/
G4double masp, mzsp, exsp, mrem;
/**
* Spectator nucleus mass number for light ion projectile support.
*/
G4int spectatorA;
/**
* Spectator nucleus charge number for light ion projectile support.
*/
G4int spectatorZ;
/**
* Spectator nucleus excitation energy for light ion projectile support.
*/
G4double spectatorEx;
/**
* Spectator nucleus mass.
*/
G4double spectatorM;
/**
* Spectator nucleus kinetic energy.
*/
G4double spectatorT;
/**
* Spectator nucleus momentum x-component.
*/
G4double spectatorP1;
/**
* Spectator nucleus momentum y-component.
*/
G4double spectatorP2;
/**
* Spectator nucleus momentum z-component.
*/
G4double spectatorP3;
/**
* A of the remnant.
*/
@@ -765,7 +1096,7 @@ public:
*/
G4double exini;
G4double pcorem, mcorem, pxrem, pyrem, pzrem;
G4double pcorem, mcorem, pxrem, pyrem, pzrem, erecrem;
/**
* Cascade n multip.
@@ -824,6 +1155,14 @@ public:
*/
G4bool full[VARNTPSIZE];
/**
* Does this nucleus require Fermi break-up treatment? Only
* applicable when used together with Geant4.
* true = do fermi break-up (and skip ABLA part)
* false = use ABLA
*/
G4bool needsFermiBreakup;
/**
* emitted in cascade (0) or evaporation (1).
*/
@@ -869,7 +1208,12 @@ private:
*/
class G4Paul {
public:
G4Paul() {};
G4Paul()
:ct0(0.0), ct1(0.0), ct2(0.0), ct3(0.0), ct4(0.0), ct5(0.0), ct6(0.0),
pr(0.0), pr2(0.0), xrr(0.0), xrr2(0.0),
cp0(0.0), cp1(0.0), cp2(0.0), cp3(0.0), cp4(0.0), cp5(0.0), cp6(0.0)
{};
~G4Paul() {};
/**
@@ -0,0 +1,172 @@
//
// ********************************************************************
// * License and Disclaimer *
// * *
// * The Geant4 software is copyright of the Copyright Holders of *
// * the Geant4 Collaboration. It is provided under the terms and *
// * conditions of the Geant4 Software License, included in the file *
// * LICENSE and available at http://cern.ch/geant4/license . These *
// * include a list of copyright holders. *
// * *
// * Neither the authors of this software system, nor their employing *
// * institutes,nor the agencies providing financial support for this *
// * work make any representation or warranty, express or implied, *
// * regarding this software system or assume any liability for its *
// * use. Please see the license in the file LICENSE and URL above *
// * for the full disclaimer and the limitation of liability. *
// * *
// * This code implementation is the result of the scientific and *
// * technical work of the GEANT4 collaboration. *
// * By using, copying, modifying or distributing the software (or *
// * any work based on the software) you agree to acknowledge its *
// * use in resulting scientific publications, and indicate your *
// * acceptance of all terms of the Geant4 Software license. *
// ********************************************************************
//
#ifndef G4INCLINPUT_HH
#define G4INCLINPUT_HH 1
#include "G4Nucleus.hh"
#include "G4HadProjectile.hh"
#include "G4Proton.hh"
#include "G4Neutron.hh"
#include "G4Deuteron.hh"
#include "G4Triton.hh"
#include "G4He3.hh"
#include "G4Alpha.hh"
#include "G4ParticleTable.hh"
#define FSIZE 15
/**
* Initial values of a hadronic cascade problem.
*/
class G4InclInput {
public:
G4InclInput() {
isExtended = false;
breakupThreshold = 10;
fTargetA = 0;
fTargetZ = 0;
fBulletType = 0;
fBulletE = 0.0;
fTimeScale = 1.0;
fNuclearPotential = 45.0; // Nuclear potential
icoup = 0;
theExtendedProjectileA = 0;
theExtendedProjectileZ = 0;
isExtended = false;
fMinProtonE = 0.0;
fNuclearPotential = 45.0;
fTimeScale = 1.0;
fMinNeutronEnergy = 0.0;
usingInverseKinematics = false;
};
G4InclInput(const G4HadProjectile &aTrack, const G4Nucleus &theNucleus, G4bool inverseKinematics);
~G4InclInput();
void printInfo();
static void printProjectileTargetInfo(const G4HadProjectile &aTrack, const G4Nucleus &theNucleus);
static G4bool canUseInverseKinematics(const G4HadProjectile &aTrack, const G4Nucleus &theNucleus);
G4double bulletE() {
return fBulletE;
}
G4int getClusterOption() { return 0; }; // No clusters (and in 4.2 there never will be!)
G4int bulletType() {
return fBulletType;
};
void setExtendedProjectileInfo(const G4ParticleDefinition *pd);
G4int getBulletType(const G4ParticleDefinition *pd);
static G4ParticleDefinition* getParticleDefinition(G4int inclParticleCode);
G4bool isInverseKinematics() {
return usingInverseKinematics;
};
G4int targetA() { return fTargetA; };
G4int targetZ() { return fTargetZ; };
G4int extendedProjectileA() { return theExtendedProjectileA; };
G4int extendedProjectileZ() { return theExtendedProjectileZ; };
G4bool isExtendedProjectile() { return isExtended; };
void isExtendedProjectile(G4bool ext) { isExtended = ext; };
G4double getPotential() { return fNuclearPotential; };
G4int getBreakupThreshold() { return breakupThreshold; };
G4double getTimeScale() { return fTimeScale; };
private:
G4int theExtendedProjectileA;
G4int theExtendedProjectileZ;
G4bool isExtended;
G4int breakupThreshold;
/**
* Here f is an array containing the following initial values:
* - f[0] : target mass number
* - f[1] : target charge number
*/
G4int fTargetA, fTargetZ;
/*
* - f[2] : bullet energy
*/
G4double fBulletE;
/*
* - f[3] : minimum proton energy to leave the target (default: 0.0)
*/
G4double fMinProtonE;
/*
* - f[4] : nuclear potential (default: 45.0 MeV)
*/
G4double fNuclearPotential;
/*
* - f[5] : time scale (default: 1.0)
*/
G4double fTimeScale;
/*
* - f[6] : bullet type (1: proton, 2: neutron, 3: pi+, 4: pi0 5: pi-, 6:H2, 7: H3, 8: He3, 9: He4
*/
G4int fBulletType;
/*
* - f[7] : minimum neutron energy to leave the target (default: 0.0)
*/
G4double fMinNeutronEnergy;
/*
* - f[8] : target material identifier (G4Mat)
* - f[9] : not used
* - f[10] : not used
* - f[11] : not used
* - f[12] : not used
* - f[13] : not used
* - f[14] : not used
*/
// G4double f[FSIZE];
/**
* Number of events to be processed.
*/
G4int icoup;
G4bool usingInverseKinematics;
};
#endif
@@ -23,7 +23,7 @@
// * acceptance of all terms of the Geant4 Software license. *
// ********************************************************************
//
// $Id: G4InclLightIonInterface.hh,v 1.5 2007/10/31 10:44:22 miheikki Exp $
// $Id: G4InclLightIonInterface.hh,v 1.8 2010/11/13 00:08:36 kaitanie Exp $
// Translation of INCL4.2/ABLA V3
// Pekka Kaitaniemi, HIP (translation)
// Christelle Schmidt, IPNL (fission code)
@@ -45,9 +45,6 @@
#ifndef G4INCLLIGHTIONINTERFACE_H
#define G4INCLLIGHTIONINTERFACE_H 1
#include "G4Nucleon.hh"
#include "G4Nucleus.hh"
#include "G4HadronicInteraction.hh"
#include "G4VIntraNuclearTransportModel.hh"
#include "G4KineticTrackVector.hh"
#include "G4FragmentVector.hh"
@@ -60,15 +57,19 @@
#include "G4AblaDataDefs.hh"
#include "G4Incl.hh"
// Geant4 de-excitation
#include "G4ExcitationHandler.hh"
#include "G4PreCompoundModel.hh"
#include <fstream>
#include <iostream>
using namespace std;
/**
* Interface for INCL. This interface handles basic light ion
* bullet particles (deuterons, tritons, he3 and alphas).
* @see G4InclAblaLightIonInterface
* Interface for INCL with Geant4 PreCompound de-excitation. This
* interface handles basic light ion bullet particles from deuterons
* up to carbon-12. @see G4InclAblaLightIonInterface
*/
class G4InclLightIonInterface : public G4VIntraNuclearTransportModel {
@@ -93,10 +94,10 @@ public:
G4ReactionProductVector* Propagate(G4KineticTrackVector* theSecondaries, G4V3DNucleus* theNucleus); // Idle
/**
* Main method to apply the INCL/ABLA physics model.
* Main method to apply the INCL physics model.
* @param aTrack the projectile particle
* @param theNucleus target nucleus
* @return the output of the INCL/ABLA physics model
* @return the output of the INCL physics model
*/
G4HadFinalState* ApplyYourself(const G4HadProjectile& aTrack, G4Nucleus& theNucleus);
@@ -107,7 +108,7 @@ private:
private:
G4Hazard *hazard; // The random seeds used by INCL.
G4VarNtp *varntp;
G4Calincl *calincl;
G4InclInput *calincl;
G4Ws *ws;
G4Mat *mat;
G4Incl *incl;
@@ -118,6 +119,11 @@ private:
G4int eventNumber;
G4double previousTargetA;
G4double previousTargetZ;
G4bool useProjectileSpectator;
G4bool useFermiBreakup;
G4ExcitationHandler *theExcitationHandler;
G4PreCompoundModel *thePrecoModel;
};
#endif // G4INCLLIGHTIONINTERFACE_H
#endif // G4INCLABLALIGHTIONINTERFACE_H
@@ -23,7 +23,7 @@
// * acceptance of all terms of the Geant4 Software license. *
// ********************************************************************
//
// $Id: G4InclRandomNumbers.hh,v 1.3 2008/06/25 17:20:04 kaitanie Exp $
// $Id: G4InclRandomNumbers.hh,v 1.8 2010/11/13 00:08:36 kaitanie Exp $
// Translation of INCL4.2/ABLA V3
// Pekka Kaitaniemi, HIP (translation)
// Christelle Schmidt, IPNL (fission code)
@@ -42,18 +42,20 @@
class G4InclRandomInterface {
public:
G4InclRandomInterface() { }
G4InclRandomInterface() {
this->seed = 1337; // Default seed, this is never actually used.
}
G4InclRandomInterface(G4long seed) {
this->seed = seed;
}
~G4InclRandomInterface() { }
virtual ~G4InclRandomInterface() { }
/**
* Provide evenly distributed random numbers.
*/
virtual G4double getRandom() = 0;
virtual void printSeeds() = 0;
private:
G4long seed;
};
@@ -76,6 +78,8 @@ public:
G4double getRandom() {
return 0.5;
}
void printSeeds() {};
};
/**
@@ -95,6 +99,10 @@ public:
G4double getRandom() {
return G4UniformRand();
}
void printSeeds() {
G4cout <<"Using Geant4 random number generator." << G4endl;
};
};
#endif
@@ -0,0 +1,49 @@
//
// ********************************************************************
// * License and Disclaimer *
// * *
// * The Geant4 software is copyright of the Copyright Holders of *
// * the Geant4 Collaboration. It is provided under the terms and *
// * conditions of the Geant4 Software License, included in the file *
// * LICENSE and available at http://cern.ch/geant4/license . These *
// * include a list of copyright holders. *
// * *
// * Neither the authors of this software system, nor their employing *
// * institutes,nor the agencies providing financial support for this *
// * work make any representation or warranty, express or implied, *
// * regarding this software system or assume any liability for its *
// * use. Please see the license in the file LICENSE and URL above *
// * for the full disclaimer and the limitation of liability. *
// * *
// * This code implementation is the result of the scientific and *
// * technical work of the GEANT4 collaboration. *
// * By using, copying, modifying or distributing the software (or *
// * any work based on the software) you agree to acknowledge its *
// * use in resulting scientific publications, and indicate your *
// * acceptance of all terms of the Geant4 Software license. *
// ********************************************************************
//
#ifndef G4InclUtils_hh
#define G4InclUtils_hh 1
#include "globals.hh"
class G4InclUtils
{
public:
static G4double calculate4MomentumScaling(G4int A, G4int Z, G4double excitationE, G4double kineticE,
G4double px, G4double py, G4double pz);
protected:
G4InclUtils();
~G4InclUtils();
public:
// Verbosity levels:
static const G4int silent = 0;
static const G4int debug = 2;
static const G4int verbose = 3;
static const G4int verboseAll = 5;
};
#endif
@@ -23,7 +23,7 @@
// * acceptance of all terms of the Geant4 Software license. *
// ********************************************************************
//
// $Id: G4Ranecu.hh,v 1.3 2008/06/25 17:20:04 kaitanie Exp $
// $Id: G4Ranecu.hh,v 1.5 2010/10/26 02:47:59 kaitanie Exp $
// Translation of INCL4.2/ABLA V3
// Pekka Kaitaniemi, HIP (translation)
// Christelle Schmidt, IPNL (fission code)
@@ -38,6 +38,10 @@ class G4Ranecu : public G4InclRandomInterface {
~G4Ranecu();
G4double getRandom();
void printSeeds() {
G4cout <<"Seed1 = " << iseed1 << G4endl;
G4cout <<"Seed2 = " << iseed2 << G4endl;
};
private:
G4long iseed1, iseed2;
@@ -0,0 +1,78 @@
//
// ********************************************************************
// * License and Disclaimer *
// * *
// * The Geant4 software is copyright of the Copyright Holders of *
// * the Geant4 Collaboration. It is provided under the terms and *
// * conditions of the Geant4 Software License, included in the file *
// * LICENSE and available at http://cern.ch/geant4/license . These *
// * include a list of copyright holders. *
// * *
// * Neither the authors of this software system, nor their employing *
// * institutes,nor the agencies providing financial support for this *
// * work make any representation or warranty, express or implied, *
// * regarding this software system or assume any liability for its *
// * use. Please see the license in the file LICENSE and URL above *
// * for the full disclaimer and the limitation of liability. *
// * *
// * This code implementation is the result of the scientific and *
// * technical work of the GEANT4 collaboration. *
// * By using, copying, modifying or distributing the software (or *
// * any work based on the software) you agree to acknowledge its *
// * use in resulting scientific publications, and indicate your *
// * acceptance of all terms of the Geant4 Software license. *
// ********************************************************************
//
// $Id: G4VInclLogger.hh,v 1.2 2010/10/26 02:47:59 kaitanie Exp $
// Translation of INCL4.2/ABLA V3
// Pekka Kaitaniemi, HIP (translation)
// Christelle Schmidt, IPNL (fission code)
// Alain Boudard, CEA (contact person INCL/ABLA)
// Aatos Heikkinen, HIP (project coordination)
#ifndef G4VInclLogger_hh
#define G4VInclLogger_hh 1
#include "globals.hh"
#include "G4String.hh"
/**
* INCL logger interface
*
* Interface that allows us to generate graphs and histograms of the
* INCL internal variables.
*/
class G4VInclLogger {
public:
G4VInclLogger() {};
~G4VInclLogger() {};
/**
* Book 1D histogram.
*/
virtual void bookHistogram1D(G4String name, G4int bins, G4double xmin, G4double xmax) = 0;
/**
* Book 2D histogram.
*/
virtual void bookHistogram2D(G4String name, G4int binsx, G4double xmin, G4double xmax,
G4int binsy, G4double ymin, G4double ymax) = 0;
/**
* Fill 1D histogram.
*/
virtual void fillHistogram1D(G4String name, G4double value) = 0;
/**
* Fill 2D histogram.
*/
virtual void fillHistogram2D(G4String name, G4double xvalue, G4double yvalue) = 0;
/**
* Save the histograms.
*/
virtual void saveHistograms() = 0;
};
#endif