#include "TVirtualMC.h"
+#include "TMCOptical.h"
+#include "TFlukaCodes.h"
+#include "TFlukaMCGeometry.h"
//Forward declaration
class TGeoMCGeometry;
-class TFlukaMCGeometry;
+//class TFlukaMCGeometry;
class TGeoMaterial;
class TFluka : public TVirtualMC {
TFluka(const char *title, Int_t verbosity = 0, Bool_t isRootGeometrySupported = 0);
TFluka();
virtual ~TFluka();
+ virtual Bool_t IsRootGeometrySupported() const { return kTRUE;}
+
+ Int_t GetNstep() { return fGeom->GetNstep(); } // to be removed
//
// Methods for building/management of geometry
const char *konly, Double_t *upar, Int_t np);
virtual void Gsbool(const char* onlyVolName, const char* manyVolName);
+ // functions for access to geometry
+ //
+ // Return the Transformation matrix between the volume specified by
+ // the path volumePath and the top or master volume.
+ virtual Bool_t GetTransformation(const TString& volumePath,
+ TGeoHMatrix& matrix);
+
+ // Return the name of the shape and its parameters for the volume
+ // specified by the volume name.
+ virtual Bool_t GetShape(const TString& volumePath,
+ TString& shapeType, TArrayD& par);
+
+ // Returns the material parameters for the volume specified by
+ // the volume name.
+ virtual Bool_t GetMaterial(const TString& volumeName,
+ TString& name, Int_t& imat,
+ Double_t& a, Double_t& z, Double_t& density,
+ Double_t& radl, Double_t& inter, TArrayD& par);
+
+ // Returns the medium parameters for the volume specified by the
+ // volume name.
+ virtual Bool_t GetMedium(const TString& volumeName,
+ TString& name, Int_t& imed,
+ Int_t& nmat, Int_t& isvol, Int_t& ifield,
+ Double_t& fieldm, Double_t& tmaxfd, Double_t& stemax,
+ Double_t& deemax, Double_t& epsil, Double_t& stmin,
+ TArrayD& par);
+
virtual void SetCerenkov(Int_t itmed, Int_t npckov, Float_t *ppckov,
Float_t *absco, Float_t *effic, Float_t *rindex);
virtual void SetCerenkov(Int_t itmed, Int_t npckov, Double_t *ppckov,
Double_t *absco, Double_t *effic, Double_t *rindex);
+ virtual void SetCerenkov(Int_t itmed, Int_t npckov, Float_t *ppckov,
+ Float_t *absco, Float_t *effic, Float_t *rindex, Float_t *rfl);
+ virtual void SetCerenkov(Int_t itmed, Int_t npckov, Double_t *ppckov,
+ Double_t *absco, Double_t *effic, Double_t *rindex, Double_t *rfl);
+
+//
+ virtual void DefineOpSurface(const char* name, EMCOpSurfaceModel model, EMCOpSurfaceType surface,
+ EMCOpSurfaceFinish surfaceFinish, Double_t sigmaAlpha);
+
+ virtual void SetBorderSurface(const char* name, const char* vol1Name, int vol1CopyNo, const char* vol2Name, int vol2CopyNo,
+ const char* opSurfaceName);
+ virtual void SetSkinSurface(const char* name, const char* volName, const char* opSurfaceName);
+
+ virtual void SetMaterialProperty(Int_t itmed, const char* propertyName, Int_t np, Double_t* pp, Double_t* values);
+
+ virtual void SetMaterialProperty(Int_t itmed, const char* propertyName, Double_t value);
+
+ virtual void SetMaterialProperty(const char* surfaceName, const char* propertyName, Int_t np, Double_t* pp, Double_t* values);
+
// Functions for drawing
virtual void DrawOneSpec(const char* /*name*/)
- {printf("WARNING: DrawOneSpec not yet implemented !\n");}
+ {Warning("DrawOneSpec", "Not yet implemented !\n");}
virtual void Gsatt(const char* name, const char* att, Int_t val);
virtual void Gdraw(const char*,Double_t /*theta = 30*/, Double_t /*phi = 30*/,
Double_t /*psi = 0*/, Double_t /*u0 = 10*/, Double_t /*v0 = 10*/,
Double_t /*ul = 0.01*/, Double_t /*vl = 0.01*/)
- {printf("WARNING: Gdraw not yet implemented !\n");}
+ {Warning("Gdraw", "Not yet implemented !\n");}
// Euclid
virtual void WriteEuclid(const char*, const char*, Int_t, Int_t);
// Getters
+ Int_t GetDummyRegion() const;
+ Int_t GetDummyLattice() const;
virtual Int_t VolId(const Text_t* volName) const;
virtual const char* VolName(Int_t id) const;
virtual Int_t NofVolumes() const {return fNVolumes;}
//
// User configuration
- virtual Bool_t SetProcess(const char* flagName, Int_t flagValue);
- virtual void SetProcess(const char* flagName, Int_t flagValue, Int_t imed);
- virtual Bool_t SetCut(const char* cutName, Double_t cutValue);
- virtual void SetCut(const char* cutName, Double_t cutValue, Int_t imed);
- virtual Double_t Xsec(char*, Double_t, Int_t, Int_t);
+ virtual Bool_t SetProcess(const char* flagName, Int_t flagValue);
+ virtual void SetProcess(const char* flagName, Int_t flagValue, Int_t imed);
+ virtual Bool_t SetCut(const char* cutName, Double_t cutValue);
+ virtual void SetCut(const char* cutName, Double_t cutValue, Int_t imed);
+ virtual void SetModelParameter(const char* parName, Double_t parValue, Int_t imed);
+ virtual TObjArray* GetListOfUserConfigs() {return fUserConfig;}
+ virtual Double_t Xsec(char*, Double_t, Int_t, Int_t);
+
// Particle table usage
virtual Int_t IdFromPDG(Int_t id) const;
virtual Int_t PDGFromId(Int_t pdg) const;
virtual void DefineParticles()
- {printf("WARNING: DefineParticles not yet implemented !\n");}
+ {Warning("DefineParticles", "Not yet implemented !\n");}
//
// methods for step management
// Action methods
virtual void StopTrack();
virtual void ResetStoppingCondition() {fStopped = kFALSE;}
- virtual Bool_t GetStoppingCondition() {return fStopped;}
+ virtual Bool_t GetStoppingCondition() const {return fStopped;}
virtual void StopEvent() {fStopEvent = kTRUE;}
virtual void StopRun() {fStopEvent = kTRUE; fStopRun = kTRUE;}
- virtual Bool_t EventIsStopped() {return fStopEvent;}
+ virtual Bool_t EventIsStopped() const {return fStopEvent;}
virtual void SetStopEvent(Bool_t flag) {fStopEvent = flag;}
// Set methods
virtual void Gdtom(Double_t* xd, Double_t* xm, Int_t iflag);
- virtual Double_t MaxStep() const
- {printf("WARNING: MaxStep not yet implemented !\n"); return -1.;}
+ virtual Double_t MaxStep() const;
virtual Int_t GetMaxNStep() const
- {printf("WARNING: GetMaxNStep not yet implemented !\n"); return -1;}
+ {Warning("GetMaxNStep", "Not yet implemented !\n"); return -1;}
virtual Int_t GetMedium() const;
+ virtual Int_t CurrentMedium() const {return GetMedium();}
// Tracking particle
// dynamic properties
virtual Double_t TrackTime() const;
virtual Double_t Edep() const;
// Static properties
+ virtual Int_t CorrectFlukaId() const;
virtual Int_t TrackPid() const;
virtual Double_t TrackCharge() const;
virtual Double_t TrackMass() const;
virtual Bool_t IsTrackAlive() const;
// Secondaries
- virtual Int_t NSecondaries() const ;
+ virtual Int_t NSecondaries() const;
+ virtual void SetNCerenkov(Int_t nc) {fNCerenkov = nc;}
+
virtual void GetSecondary(Int_t isec, Int_t& particleId,
TLorentzVector& position, TLorentzVector& momentum);
virtual Bool_t SecondariesAreOrdered() const {return kFALSE;}
// !!! need to be transformed to common interface
//
virtual void Gdopt(const char*,const char*)
- {printf("WARNING: Gdopt not yet implemented !\n");}
+ {Warning("Gdopt", "Not yet implemented !\n");}
virtual void SetClipBox(const char*,Double_t=-9999,Double_t=0, Double_t=-9999,
Double_t=0,Double_t=-9999,Double_t=0)
- {printf("WARNING: SetClipBox not yet implemented !\n");}
+ {Warning("SetClipBox", "Not yet implemented !\n");}
virtual void DefaultRange()
- {printf("WARNING: DefaultRange not yet implemented !\n");}
+ {Warning("DefaultRange", "Not yet implemented !\n");}
virtual void Gdhead(Int_t, const char*, Double_t=0)
- {printf("WARNING: Gdhead not yet implemented !\n");}
+ {Warning("Gdhead", "Not yet implemented !\n");}
virtual void Gdman(Double_t, Double_t, const char*)
- {printf("WARNING: Gdman not yet implemented !\n");}
+ {Warning("Gdman", "Not yet implemented !\n");}
virtual void SetColors()
- {printf("WARNING: SetColors not yet implemented !\n");}
+ {Warning("SetColors", "Not yet implemented !\n");}
virtual void Gtreve()
- {printf("WARNING: Gtreve not yet implemented !\n");}
+ {Warning("Gtreve", "Not yet implemented !\n");}
virtual void GtreveRoot()
- {printf("WARNING: GtreveRoot not yet implemented !\n");}
+ {Warning("GtreveRoot", "Not yet implemented !\n");}
virtual void Gckmat(Int_t, char*)
- {printf("WARNING: Gckmat not yet implemented !\n");}
+ {Warning("Gckmat", "Not yet implemented !\n");}
virtual void InitLego()
- {printf("WARNING: InitLego not yet implemented !\n");}
+ {Warning("InitLego", "Not yet implemented !\n");}
//
virtual void Gfpart(Int_t pdg, char* name, Int_t& type, Float_t& mass, Float_t& charge, Float_t& tlife);
virtual void Gspart(Int_t, const char*, Int_t, Double_t, Double_t, Double_t)
- {printf("WARNING: Gspart not yet implemented !\n");}
-
+ {Warning("Gspart", "Not yet implemented !\n");}
- //
- // FLUKA Scoring specific methods
- // ------------------------------
- //
- virtual void SetUserScoring(const char* option, Int_t npar, Float_t* what);
//
// Particle Properties
// -------------------
virtual Bool_t DefineIon(const char*, int, int, int, double, double) {return kFALSE;}
virtual TString ParticleName(int pdg) const;
virtual Double_t ParticleMass(int pdg) const;
+ virtual Double_t ParticleMassFPC(int fpc) const;
virtual Double_t ParticleCharge(int pdg) const;
virtual Double_t ParticleLifeTime(int pdg) const;
virtual TMCParticleType ParticleMCType(int) const {return (TMCParticleType) 9;}
virtual void ProcessEvent();
virtual Bool_t ProcessRun(Int_t nevent);
+
+ //
+ // FLUKA Scoring specific methods
+ // ------------------------------
+ //
+ virtual void SetUserScoring(const char* option, const char* sdum, Int_t npr,char* outfile, Float_t* what);
+ virtual void SetUserScoring(const char* option, const char* sdum, Int_t npr,char* outfile, Float_t* what,
+ const char* det1, const char* det2, const char* det3);
//
// New Getter and Setters
// ------------------------------------------------
Int_t GetVerbosityLevel() const {return fVerbosityLevel;}
void SetVerbosityLevel(Int_t l) {fVerbosityLevel = l;}
- // - Fluka Draw procedures identifiers
- // bxdraw = 1 inside
- // bxdraw = 11 entering
- // bxdraw = 12 exiting
- // eedraw = 2
- // endraw = 3
- // mgdraw = 4
- // sodraw = 5
- // usdraw = 6
- Int_t GetCaller() const {return fCaller;}
- void SetCaller(Int_t l) {fCaller = l;}
-
- // - Fluka Draw procedures formal parameters
- Int_t GetIcode() const {return fIcode;}
- void SetIcode(Int_t l) {fIcode = l;}
- // in the case of sodraw fIcode=0
-
+ //
+ // - Fluka Draw procedures identifiers, see TFlukaCodes.h
+ //
+ FlukaCallerCode_t GetCaller() const {return fCaller;}
+ FlukaProcessCode_t GetIcode() const {return fIcode;}
Int_t GetMreg() const {return fCurrentFlukaRegion;}
- void SetMreg(Int_t l);
-
Int_t GetNewreg() const {return fNewReg;}
- void SetNewreg(Int_t l) {fNewReg = l;}
-
Double_t GetRull() const {return fRull;}
- void SetRull(Double_t r) {fRull = r;}
-
Double_t GetXsco() const {return fXsco;}
- void SetXsco(Double_t x) {fXsco = x;}
-
Double_t GetYsco() const {return fYsco;}
- void SetYsco(Double_t y) {fYsco = y;}
-
Double_t GetZsco() const {return fZsco;}
- void SetZsco(Double_t z) {fZsco = z;}
+ Int_t GetCurrentFlukaRegion() const {return fCurrentFlukaRegion;}
+ // - Fluka Draw Setters
+ void SetCurrentFlukaRegion(Int_t reg) {fCurrentFlukaRegion=reg;}
+ void SetCaller(FlukaCallerCode_t l) {fCaller = l;}
+ void SetIcode(FlukaProcessCode_t l) {fIcode = l;}
+ void SetMreg(Int_t l, Int_t lttc);
+ void SetNewreg(Int_t l, Int_t /*lttc*/) {fNewReg = l;}
+ void SetRull(Double_t r) {fRull = r;}
+ void SetXsco(Double_t x) {fXsco = x;}
+ void SetYsco(Double_t y) {fYsco = y;}
+ void SetZsco(Double_t z) {fZsco = z;}
- void SetCurrentFlukaRegion(Int_t reg) {fCurrentFlukaRegion=reg;}
- Int_t GetCurrentFlukaRegion() const {return fCurrentFlukaRegion;}
+ void SetTrackIsEntering(){fTrackIsEntering = kTRUE; fTrackIsExiting = kFALSE;}
+ void SetTrackIsExiting() {fTrackIsExiting = kTRUE; fTrackIsEntering = kFALSE;}
+ void SetTrackIsInside() {fTrackIsExiting = kFALSE; fTrackIsEntering = kFALSE;}
+ void SetTrackIsNew(Bool_t flag = kTRUE);
void SetDummyBoundary(Int_t mode) {fDummyBoundary = mode;}
Int_t GetDummyBoundary() const {return fDummyBoundary;}
Bool_t IsDummyBoundary() const {return (fDummyBoundary==0)?kFALSE:kTRUE;}
+
void SetGeneratePemf(Bool_t flag = kTRUE) {fGeneratePemf = flag;}
Bool_t IsGeneratePemf() const {return fGeneratePemf;}
void EnableField(Bool_t flag=kTRUE) {fFieldFlag = flag;}
Bool_t IsFieldEnabled() const {return fFieldFlag;}
- void SetTrackIsEntering(){fTrackIsEntering = kTRUE; fTrackIsExiting = kFALSE;}
- void SetTrackIsExiting() {fTrackIsExiting = kTRUE; fTrackIsEntering = kFALSE;}
- void SetTrackIsInside() {fTrackIsExiting = kFALSE; fTrackIsEntering = kFALSE;}
- void SetTrackIsNew(Bool_t flag = kTRUE);
- Int_t GetMaterialIndex(Int_t idmat) const {return fMaterials[idmat];}
- TObjArray *GetFlukaMaterials();
- //
- // Fluka specific scoring options
+ Int_t GetMaterialIndex(Int_t idmat) const {return fMaterials[idmat];}
+
+ TObjArray * GetFlukaMaterials();
+ virtual void SetRootGeometry() {;} // Dummy
+ virtual Int_t NofVolDaughters(const char* volName) const;
+ virtual const char* VolDaughterName(const char* volName, Int_t i) const;
+ virtual Int_t VolDaughterCopyNo(const char* volName, Int_t i) const;
+ virtual const char* CurrentVolPath();
+ virtual void ForceDecayTime(Float_t){;}
//
+ // Info about primary ionization electrons
+ Int_t GetNPrimaryElectrons();
+ Double_t GetPrimaryElectronKineticEnergy(Int_t i) const;
+ void GetPrimaryElectronPosition(Int_t i, Double_t& x, Double_t& y, Double_t& z) const;
+ void SetCurrentPrimaryElectronIndex(Int_t i) {fPrimaryElectronIndex = i;}
- Bool_t SetFlukaScoringOption(Float_t what[12], const char* sdum) {return kTRUE;}
-
- private:
- TFluka(const TFluka &mc): TVirtualMC(mc) {;}
- TFluka & operator=(const TFluka &) {return (*this);}
+ private:
+
+ // Copy constructor and operator= declared but not implemented (-Weff++ flag)
+ TFluka(const TFluka &mc); //: TVirtualMC(mc) {;}
+ TFluka & operator=(const TFluka &); // {return (*this);}
+
+ void PrintHeader();
+ void AddParticlesToPdgDataBase() const;
+ //
-
Int_t fVerbosityLevel; //Verbosity level (0 lowest - 3 highest)
Int_t fNEvent; //Current event number
TString fInputFileName; //Name of the real input file
TString fCoreInputFileName; //Name of the input file
- Int_t fCaller; //Parameter to indicate who is the caller of the Fluka Draw
- Int_t fIcode; //Fluka Draw procedures formal parameter
- Int_t fNewReg; //Fluka Draw procedures formal parameter
- Double_t fRull; //Fluka Draw procedures formal parameter
- Double_t fXsco; //Fluka Draw procedures formal parameter
- Double_t fYsco; //Fluka Draw procedures formal parameter
- Double_t fZsco; //Fluka Draw procedures formal parameter
- Bool_t fTrackIsEntering; // Flag for track entering
- Bool_t fTrackIsExiting; // Flag for track exiting
- Bool_t fTrackIsNew; // Flag for new track
- Bool_t fFieldFlag; // Flag for magnetic field
- Bool_t fGeneratePemf; // Flag for automatic .pemf generation
- Int_t fDummyBoundary; // Flag for crossing dummy boundaries
- Bool_t fStopped; // Flag for stopping
- Bool_t fStopEvent; // Flag for stopped event
- Bool_t fStopRun; // Flag for stopped run
+ FlukaCallerCode_t fCaller; // Parameter to indicate who is the caller of the Fluka Draw
+ FlukaProcessCode_t fIcode; // Fluka Draw procedures formal parameter
+ Int_t fNewReg; // Fluka Draw procedures formal parameter
+ Double_t fRull; // Fluka Draw procedures formal parameter
+ Double_t fXsco; // Fluka Draw procedures formal parameter
+ Double_t fYsco; // Fluka Draw procedures formal parameter
+ Double_t fZsco; // Fluka Draw procedures formal parameter
+ Bool_t fTrackIsEntering; // Flag for track entering
+ Bool_t fTrackIsExiting; // Flag for track exiting
+ Bool_t fTrackIsNew; // Flag for new track
+ Bool_t fFieldFlag; // Flag for magnetic field
+ Bool_t fGeneratePemf; // Flag for automatic .pemf generation
+ Int_t fDummyBoundary; // Flag for crossing dummy boundaries
+ Bool_t fStopped; // Flag for stopping
+ Bool_t fStopEvent; // Flag for stopped event
+ Bool_t fStopRun; // Flag for stopped run
+ Int_t fPrimaryElectronIndex; // Primary electron Index
//
//Geometry through TGeo
//
Int_t* fMaterials; //!Array of indices
Int_t fNVolumes; //!Current number of volumes
- Int_t fCurrentFlukaRegion; //Index of fluka region at each step
+ Int_t fCurrentFlukaRegion; // Index of fluka region at each step
+ Int_t fNCerenkov; // Number of cerekov photons
TFlukaMCGeometry *fGeom; // TGeo-FLUKA interface
TGeoMCGeometry *fMCGeo; // Interface to TGeo builder
// SetProcess, SetCut and user Scoring dynamic storage
- TObjArray* fProcesses; // List of processes
- TObjArray* fCuts; // List of cuts
+ TObjArray* fUserConfig; // List of user physics configuration
TObjArray* fUserScore; // List of user scoring options
+
ClassDef(TFluka,1) //C++ interface to Fluka montecarlo
+
+
+ // Temporary implementation of new functions
+ // To be removed with the next release
};
+ inline Int_t TFluka::NofVolDaughters(const char* /*volName*/) const {
+ Warning("NofVolDaughters", "New function - not yet implemented.");
+ return 0;
+ }
+
+ inline const char* TFluka::VolDaughterName(const char* /*volName*/, Int_t /*i*/) const {
+ Warning("VolDaughterName", "New function - not yet implemented.");
+ return "";
+ }
+
+ inline Int_t TFluka::VolDaughterCopyNo(const char* /*volName*/, Int_t /*i*/) const {
+ Warning("VolDaughterCopyNo", "New function - not yet implemented.");
+ return 0;
+ }
+
+
+inline void TFluka::DefineOpSurface(const char* /*name*/, EMCOpSurfaceModel /*model*/, EMCOpSurfaceType /*surface*/,
+ EMCOpSurfaceFinish /*surfaceFinish*/, Double_t /*sigmaAlpha*/)
+{
+ Warning("DefineOpSurface", "New function - not yet implemented.");
+}
+
+
+inline void TFluka::SetBorderSurface(const char* /*name*/, const char* /*vol1Name*/, int /*vol1CopyNo*/, const char* /*vol2Name*/,
+ int /*vol2CopyNo*/, const char* /*opSurfaceName*/)
+{
+ Warning("SetBorderSurface", "New function - not yet implemented.");
+}
+
+
+inline void TFluka::SetSkinSurface(const char* /*name*/, const char* /*volName*/, const char* /*opSurfaceName*/)
+{
+ Warning("SetSkinSurface", "New function - not yet implemented.");
+}
+
+
+inline void TFluka::SetMaterialProperty(Int_t /*itmed*/, const char* /*propertyName*/, Int_t /*np*/, Double_t* /*pp*/, Double_t* /*values*/)
+{
+ Warning("SetMaterialProperty", "New function - not yet implemented.");
+}
+
+
+inline void TFluka::SetMaterialProperty(Int_t /*itmed*/, const char* /*propertyName*/, Double_t /*value*/)
+{
+ Warning("SetMaterialProperty", "New function - not yet implemented.");
+}
+
+
+inline void TFluka::SetMaterialProperty(const char* /*surfaceName*/, const char* /*propertyName*/, Int_t /*np*/,
+ Double_t* /*pp*/, Double_t* /*values*/)
+{
+ Warning("SetMaterialProperty", "New function - not yet implemented.");
+}
+
+
#endif //TFLUKA