]> git.uio.no Git - u/mrichter/AliRoot.git/blobdiff - TFluka/TFluka.h
Cerenkov photon update.
[u/mrichter/AliRoot.git] / TFluka / TFluka.h
index d3c0d85eae57deb170e3caf010a2e4362283eb0e..e85068586d8c632d0606164dbb41bbab2cda5820 100644 (file)
 ///////////////////////////////////////////////////////////////////////////////
 //                                                                           //
 //                                                                           //
-// FLUKA implementation of the AliMC Interface                               //
+// FLUKA implementation of the VirtualMC Interface                           //
 //                                                                           //
 //                                                                           //
 ///////////////////////////////////////////////////////////////////////////////
 
 
-#include "AliMC.h"
+#include "TVirtualMC.h"
+#include "TMCOptical.h"
+#include "TFlukaCodes.h"
+#include "TFlukaMCGeometry.h"
 
-class TFluka : public AliMC
-{
+//Forward declaration
+class TGeoMCGeometry;
+//class TFlukaMCGeometry;
+class TGeoMaterial;
+
+class TFluka : public TVirtualMC {
+  
  public:
-    TFluka(const char *name, const char *title) 
-       {AliMC(name, title);}
-    TFluka() {;}
-    virtual ~TFluka() {;}
-  
-    //
-    // methods for building/management of geometry
-    // ------------------------------------------------
-    //
-    // Not yet implemented !!!
-    //
-    // functions from GCONS 
-    virtual void  Gfmate(Int_t imat, char *name, Float_t &a, Float_t &z,  
-                        Float_t &dens, Float_t &radl, Float_t &absl,
-                        Float_t* ubuf, Int_t& nbuf)
-       {printf("Gfmate not yet implemented !\n");}
-    
+  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
+  // ------------------------------------------------
+  //
+  
+  // Functions from GCONS 
+  virtual void   Gfmate(Int_t imat, char *name, Float_t &a, Float_t &z,  
+                       Float_t &dens, Float_t &radl, Float_t &absl,
+                       Float_t* ubuf, Int_t& nbuf);
+  virtual void   Gfmate(Int_t imat, char *name, Double_t &a, Double_t &z,
+                       Double_t &dens, Double_t &radl, Double_t &absl,
+                       Double_t* ubuf, Int_t& nbuf);
+  
+  // Detector composition
+  virtual void   Material(Int_t& kmat, const char* name, Double_t a, 
+                         Double_t z, Double_t dens, Double_t radl, Double_t absl,
+                         Float_t* buf, Int_t nwbuf);
+  virtual void   Material(Int_t& kmat, const char* name, Double_t a, 
+                         Double_t z, Double_t dens, Double_t radl, Double_t absl,
+                         Double_t* buf, Int_t nwbuf);
+  virtual void   Mixture(Int_t& kmat, const char *name, Float_t *a, 
+                        Float_t *z, Double_t dens, Int_t nlmat, Float_t *wmat);
+  virtual void   Mixture(Int_t& kmat, const char *name, Double_t *a, 
+                        Double_t *z, Double_t dens, Int_t nlmat, Double_t *wmat);
+  virtual void   Medium(Int_t& kmed, const char *name, 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, Float_t* ubuf, Int_t nbuf);
+  virtual void   Medium(Int_t& kmed, const char *name, 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, Double_t* ubuf, Int_t nbuf);
+  virtual void   Matrix(Int_t& krot, Double_t thetaX, Double_t phiX, 
+                       Double_t thetaY, Double_t phiY, Double_t thetaZ, 
+                       Double_t phiZ);
+  virtual void   Gstpar(Int_t itmed, const char *param, Double_t parval);
+  
+  // Functions from GGEOM 
+  virtual Int_t  Gsvolu(const char *name, const char *shape, Int_t nmed,  
+                       Float_t *upar, Int_t np);
+  virtual Int_t  Gsvolu(const char *name, const char *shape, Int_t nmed,  
+                       Double_t *upar, Int_t np);
+  virtual void   Gsdvn(const char *name, const char *mother, Int_t ndiv, 
+                      Int_t iaxis);
+  virtual void   Gsdvn2(const char *name, const char *mother, Int_t ndiv, 
+                       Int_t iaxis, Double_t c0i, Int_t numed);
+  virtual void   Gsdvt(const char *name, const char *mother, Double_t step, 
+                      Int_t iaxis, Int_t numed, Int_t ndvmx);
+  virtual void   Gsdvt2(const char *name, const char *mother, Double_t step, 
+                      Int_t iaxis, Double_t c0, Int_t numed, Int_t ndvmx);
+  virtual void   Gsord(const char *name, Int_t iax);
+  virtual void   Gspos(const char *name, Int_t nr, const char *mother,  
+                      Double_t x, Double_t y, Double_t z, Int_t irot, 
+                     const char *konly="ONLY");
+  virtual void   Gsposp(const char *name, Int_t nr, const char *mother,  
+                       Double_t x, Double_t y, Double_t z, Int_t irot,
+                       const char *konly, Float_t *upar, Int_t np);
+  virtual void   Gsposp(const char *name, Int_t nr, const char *mother,  
+                       Double_t x, Double_t y, Double_t z, Int_t irot,
+                       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);
 
-    // detector composition
-    virtual void  Material(Int_t& kmat, const char* name, Float_t a, 
-                     Float_t z, Float_t dens, Float_t radl, Float_t absl,
-                          Float_t* buf, Int_t nwbuf)
-       {printf("Material not yet implemented !\n");}
-    
-    virtual void  Mixture(Int_t& kmat, const char *name, Float_t *a, 
-                         Float_t *z, Float_t dens, Int_t nlmat, Float_t *wmat)
-       {printf("Mixture not yet implemented !\n");}
+   // 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  Medium(Int_t& kmed, const char *name, Int_t nmat, 
-                        Int_t isvol, Int_t ifield, Float_t fieldm,
-                        Float_t tmaxfd, 
-                        Float_t stemax, Float_t deemax, Float_t epsil, 
-                        Float_t stmin, Float_t* ubuf, Int_t nbuf)
-       {printf("Medium not yet implemented !\n");}
-    virtual void  Matrix(Int_t& krot, Float_t thetaX, Float_t phiX, 
-                        Float_t thetaY, Float_t phiY, Float_t thetaZ, 
-                        Float_t phiZ)
-       {printf("Matrix not yet implemented !\n");}
-    virtual void  Gstpar(Int_t itmed, const char *param, Float_t parval)
-       {printf("Gstpar not yet implemented !\n");} 
-    
-    // functions from GGEOM 
-    virtual Int_t Gsvolu(const char *name, const char *shape, Int_t nmed,  
-                         Float_t *upar, Int_t np)
-       {printf("Gsvolu not yet implemented !\n"); return -1;} 
-    virtual void  Gsdvn(const char *name, const char *mother, Int_t ndiv, 
-                        Int_t iaxis)
-       {printf("Gsdvn not yet implemented !\n");} 
-    virtual void  Gsdvn2(const char *name, const char *mother, Int_t ndiv, 
-                         Int_t iaxis, Float_t c0i, Int_t numed)
-       {printf("Gsdvn2 not yet implemented !\n");} 
-    virtual void  Gsdvt(const char *name, const char *mother, Float_t step, 
-                        Int_t iaxis, Int_t numed, Int_t ndvmx)
-       {printf("Gsdvt not yet implemented !\n");} 
-    virtual void  Gsdvt2(const char *name, const char *mother, Float_t step, 
-                         Int_t iaxis, Float_t c0, Int_t numed, Int_t ndvmx)
-       {printf("Gsdvt2 not yet implemented !\n");} 
-    virtual void  Gsord(const char *name, Int_t iax)
-       {printf("Gsord not yet implemented !\n");} 
-    virtual void  Gspos(const char *name, Int_t nr, const char *mother,  
-                        Float_t x, Float_t y, Float_t z, Int_t irot, 
-                        const char *konly="ONLY")
-       {printf("Gspos not yet implemented !\n");} 
-    virtual void  Gsposp(const char *name, Int_t nr, const char *mother,  
-                         Float_t x, Float_t y, Float_t z, Int_t irot,
-                         const char *konly, Float_t *upar, Int_t np)
-       {printf("Gsposp not yet implemented !\n");}
-    virtual void  Gsbool(const char* onlyVolName, const char* manyVolName)
-       {printf("Gsbool not yet implemented !\n");}
-
-    virtual void  SetCerenkov(Int_t itmed, Int_t npckov, Float_t *ppckov,
-                             Float_t *absco, Float_t *effic, Float_t *rindex)
-       {printf("SetCerenkov not yet implemented !\n");}
-    
-    
-    // functions for drawing
-    virtual void  DrawOneSpec(const char* name)
-       {printf("DrawOneSpec not yet implemented !\n");}
-    virtual void  Gsatt(const char* name, const char* att, Int_t val)
-       {printf("Gsatt not yet implemented !\n");}
-    virtual void  Gdraw(const char*,Float_t theta = 30, Float_t phi = 30,
-                       Float_t psi = 0, Float_t u0 = 10, Float_t v0 = 10,
-                       Float_t ul = 0.01, Float_t vl = 0.01)
-       {printf("Gdraw not yet implemented !\n");}
-
-    // Euclid
-    virtual void WriteEuclid(const char*, const char*, Int_t, Int_t)
-       {printf("WriteEuclid not yet implemented !\n");}
-                              
-    // get methods
-    virtual Int_t VolId(const Text_t* volName) const
-       {printf("VolId not yet implemented !\n"); return -1;}
-    virtual const char* VolName(Int_t id) const
-       {printf("VolName not yet implemented !\n"); return "void";}
-    virtual Int_t NofVolumes() const
-       {printf("NofVolumes not yet implemented !\n"); return -1;}
-    virtual Int_t VolId2Mate(Int_t id) const
-       {printf("VolIdMate not yet implemented !\n"); return -1;}
-
-    //
-    // methods for physics management
-    // ------------------------------------------------
-    //
+  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*/)
+      {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*/)
+      {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;}
+  virtual Int_t  VolId2Mate(Int_t id) const;
+  // Return the unique numeric identifier for medium name mediumName
+  virtual Int_t MediumId(const Text_t* mediumName) const;
+
+  //
+  // Methods for physics management
+  // ------------------------------------------------
+  //
+  
+  // 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 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()
+  {Warning("DefineParticles", "Not yet implemented !\n");}     
+  
+  //
+  // methods for step management
+  // ------------------------------------------------
+  //
+  
+  // Action methods
+  virtual void   StopTrack();
+  virtual void   ResetStoppingCondition() {fStopped = kFALSE;}
+  virtual Bool_t GetStoppingCondition() const   {return fStopped;}
+
+  virtual void   StopEvent() {fStopEvent = kTRUE;}   
+  virtual void   StopRun()   {fStopEvent = kTRUE; fStopRun   = kTRUE;}
+  virtual Bool_t EventIsStopped() const {return fStopEvent;}
+  virtual void   SetStopEvent(Bool_t flag) {fStopEvent = flag;}
+  
+  // Set methods
+  virtual void SetMaxStep (Double_t step);
+  virtual void SetMaxNStep(Int_t);
+  virtual void SetUserDecay(Int_t);
+  
+  // Get methods
+  // Tracking volume(s) 
+  virtual Int_t    CurrentVolID(Int_t& copyNo) const;
+  virtual Int_t    CurrentVolOffID(Int_t off, Int_t& copyNo) const;
+  virtual const char* CurrentVolName() const;
+  virtual const char* CurrentVolOffName(Int_t off) const;
+  virtual Int_t    CurrentMaterial(Float_t &a, Float_t &z, 
+                                  Float_t &dens, Float_t &radl, Float_t &absl) const;
+  virtual Int_t    CurrentEvent() const {return fNEvent;}
+
+  virtual void     Gmtod(Float_t* xm, Float_t* xd, Int_t iflag);
+  
+  virtual void     Gmtod(Double_t* xm, Double_t* xd, Int_t iflag);
+  
+  virtual void     Gdtom(Float_t* xd, Float_t* xm, Int_t iflag);
+  
+  virtual void     Gdtom(Double_t* xd, Double_t* xm, Int_t iflag);
+  
+  virtual Double_t MaxStep() const;
+  virtual Int_t    GetMaxNStep() const
+      {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 void     TrackPosition(TLorentzVector& position) const;
+  virtual void     TrackPosition(Double_t& x, Double_t& y, Double_t& z) const;
+  virtual void     TrackMomentum(TLorentzVector& momentum) const;
+  virtual void     TrackMomentum(Double_t& px, Double_t& py, Double_t& pz, Double_t& e) const;
+  virtual Double_t TrackStep() const;
+  virtual Double_t TrackLength() const;
+  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 Double_t Etot() const;
+  // Track status
+  virtual Bool_t   IsNewTrack() const;
+  virtual Bool_t   IsTrackInside() const;
+  virtual Bool_t   IsTrackEntering() const;
+  virtual Bool_t   IsTrackExiting() const;
+  virtual Bool_t   IsTrackOut() const;
+  virtual Bool_t   IsTrackDisappeared() const;
+  virtual Bool_t   IsTrackStop() const;
+  virtual Bool_t   IsTrackAlive() const;
  
-    // set methods
-    virtual void SetCut(const char* cutName, Float_t cutValue)
-       {printf("Set Cut not yet implemented !\n");}
-    virtual void SetProcess(const char* flagName, Int_t flagValue)
-       {printf("Set Process not yet implemented !\n");}
-    virtual Float_t Xsec(char*, Float_t, Int_t, Int_t)
-       {printf("Xsec not yet implemented !\n"); return -1.;} 
+  // Secondaries
+  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;}
+  virtual TMCProcess ProdProcess(Int_t iproc) const ;
+  virtual Int_t    StepProcesses(TArrayI & proc) const;
+  //
+  // Geant3 specific methods
+  // !!! need to be transformed to common interface
+  //
+  virtual void Gdopt(const char*,const char*)
+    {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)
+    {Warning("SetClipBox", "Not yet implemented !\n");}
+  virtual void DefaultRange()
+    {Warning("DefaultRange", "Not yet implemented !\n");}
+  virtual void Gdhead(Int_t, const char*, Double_t=0)
+    {Warning("Gdhead", "Not yet implemented !\n");}  
+  virtual void Gdman(Double_t, Double_t, const char*)
+    {Warning("Gdman", "Not yet implemented !\n");}
+  virtual void SetColors()
+    {Warning("SetColors", "Not yet implemented !\n");}
+  virtual void Gtreve()
+    {Warning("Gtreve", "Not yet implemented !\n");}
+  virtual void GtreveRoot()
+    {Warning("GtreveRoot", "Not yet implemented !\n");}
+  virtual void Gckmat(Int_t, char*)
+    {Warning("Gckmat", "Not yet implemented !\n");}
+  virtual void InitLego()
+    {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)
+      {Warning("Gspart", "Not yet implemented !\n");}
+
+  //
+  // Particle Properties
+  // -------------------
+  //
+  virtual Bool_t DefineParticle(int, const char*, TMCParticleType, double, double, double) {return kFALSE;}
+  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;}
+  //
+  // Control methods
+  // ------------------------------------------------
+  //
+  
+  virtual void Init();
+  virtual void InitPhysics();
+  virtual void FinishGeometry();
+  virtual void BuildPhysics();
+  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
+  // ------------------------------------------------
+  //
+  // - Core input file name
+  TString GetCoreInputFileName() const {return fCoreInputFileName;}
+  void SetCoreInputFileName(const char* file = "coreFlukaVmc.inp") {fCoreInputFileName = file;}
+
+  // - Input file name
+  TString GetInputFileName() const {return fInputFileName;}
+  void SetInputFileName(const char* file = "FlukaVmc.inp") {fInputFileName = file;}
+
+  // - Verbosity level
+  Int_t GetVerbosityLevel() const {return fVerbosityLevel;}
+  void SetVerbosityLevel(Int_t l) {fVerbosityLevel = l;}
+
+  //
+  // - 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;}
+  Int_t GetNewreg() const {return fNewReg;}
+  Double_t GetRull() const {return fRull;}
+  Double_t GetXsco() const {return fXsco;}
+  Double_t GetYsco() const {return fYsco;}
+  Double_t GetZsco() const {return fZsco;}
+  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  SetPint(Double_t px, Double_t py, Double_t pz, Double_t e) {fPint[0] = px; fPint[1] = py; fPint[2] = pz; fPint[3] = e;}
+  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   EnableField(Bool_t flag=kTRUE) {fFieldFlag = flag;}
+  Bool_t IsFieldEnabled() const {return fFieldFlag;}
+  
+  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;}
+  void     PrimaryIonisationStepping(Int_t nprim);
+ private:
+   
+  // Copy constructor and operator= declared but not implemented (-Weff++ flag)
+  TFluka(const TFluka &mc); //: TVirtualMC(mc) {;}
+  TFluka & operator=(const TFluka &); // {return (*this);}
  
-        // particle table usage         
-    virtual Int_t   IdFromPDG(Int_t id)  const
-        {printf("IdFromPDG not yet implemented !\n"); return -1;}
-    virtual Int_t   PDGFromId(Int_t pdg) const
-       {printf("PDGFromId not yet implemented !\n"); return -1;}  
-    virtual void    DefineParticles()
-       {printf("DefineParticles not yet implemented !\n");}      
-  
-    //
-    // methods for step management
-    // ------------------------------------------------
-    //
-
-    // action methods
-    virtual void StopTrack()
-       {printf("StopTrack not yet implemented !\n");}
-    
-    virtual void StopEvent()
-       {printf("StopEvent not yet implemented !\n");}   
-
-    // set methods
-    virtual void SetMaxStep(Float_t)
-       {printf("SetMaxStep not yet implemented !\n");}
-    virtual void SetMaxNStep(Int_t)
-       {printf("SetMaxNStep not yet implemented !\n");}
-    virtual void SetUserDecay(Int_t)
-       {printf("SetUserDecay not yet implemented !\n");}  
-
-    // get methods
-         // tracking volume(s) 
-    virtual Int_t CurrentVolID(Int_t& copyNo) const
-       {printf("CurrentVolID not yet implemented !\n"); return -1;}
-    virtual Int_t CurrentVolOffID(Int_t off, Int_t& copyNo) const
-       {printf("CurrentVolOffID not yet implemented !\n"); return -1;}
-    virtual const char* CurrentVolName() const
-       {printf("CurrentVolName not yet implemented !\n"); return "void";}
-    virtual const char* CurrentVolOffName(Int_t off) const
-       {printf("CurrentVolOffName not yet implemented !\n"); return "void";}
-    virtual Int_t CurrentMaterial(Float_t &a, Float_t &z, 
-                    Float_t &dens, Float_t &radl, Float_t &absl) const
-       {printf("CurrentMaterial not yet implemented !\n"); return -1;}  
-    virtual Int_t CurrentEvent() const
-       {printf("CurrentEvent not yet implemented !\n"); return -1;} 
-    virtual void  Gmtod(Float_t* xm, Float_t* xd, Int_t iflag) 
-       {printf("Gmtod not yet implemented !\n");}
-    virtual void  Gdtom(Float_t* xd, Float_t* xm, Int_t iflag)
-       {printf("Gdtom not yet implemented !\n");}
-    virtual Float_t MaxStep() const
-       {printf("MaxStep not yet implemented !\n"); return -1.;}
-    virtual Int_t GetMaxNStep() const
-       {printf("GetMaxNStep not yet implemented !\n"); return -1;}
-    virtual Int_t GetMedium() const
-       {printf("GetMedium not yet implemented !\n"); return -1;}
-
-        // tracking particle 
-        // dynamic properties
-    virtual void    TrackPosition(TLorentzVector& position) const
-       {printf("TrackPosition not yet implemented !\n");}
-    virtual void    TrackMomentum(TLorentzVector& momentum) const
-       {printf("TrackMomentum not yet implemented !\n");}
-    virtual Float_t TrackStep() const
-       {printf("TrackStep not yet implemented !\n"); return -1.;}
-    virtual Float_t TrackLength() const
-       {printf("TrackLength not yet implemented !\n"); return -1.;} 
-    virtual Float_t TrackTime() const
-       {printf("TrackTimenot yet implemented !\n"); return -1.;}
-    virtual Float_t Edep() const
-       {printf("Edep not yet implemented !\n"); return -1.;}
-        // static properties
-    virtual Int_t   TrackPid() const
-       {printf("TrackPid not yet implemented !\n"); return -1;}
-    virtual Float_t TrackCharge() const
-       {printf("TrackCharge not yet implemented !\n"); return -1.;}
-    virtual Float_t TrackMass() const
-       {printf("TrackMasd not yet implemented !\n"); return -1.;}
-    virtual Float_t Etot() const
-       {printf("Etot not yet implemented !\n"); return -1.;}
-    
-        // track status
-    virtual Bool_t  IsNewTrack() const
-       {printf("IsNewTrack not yet implemented !\n"); return 0;}
-    virtual Bool_t  IsTrackInside() const
-       {printf("IsTrackInside not yet implemented !\n"); return 0;}
-    virtual Bool_t  IsTrackEntering() const
-       {printf("IsTrackEntering not yet implemented !\n"); return 0;}
-    virtual Bool_t  IsTrackExiting() const
-       {printf("IsTrackExiting not yet implemented !\n"); return 0;}
-    virtual Bool_t  IsTrackOut() const
-       {printf("IsTrackOut not yet implemented !\n"); return 0;}
-    virtual Bool_t  IsTrackDisappeared() const
-       {printf("IsTrackDisappeared not yet implemented !\n"); return 0;}
-    virtual Bool_t  IsTrackStop() const
-       {printf("IsTrackStop not yet implemented !\n"); return 0;}
-    virtual Bool_t  IsTrackAlive() const
-       {printf("IsTrackAlive not yet implemented !\n"); return 0;}
-
-        // secondaries
-    virtual Int_t NSecondaries() const
-       {printf("NSecondaries not yet implemented !\n"); return -1;}
-    virtual void  GetSecondary(Int_t isec, Int_t& particleId, 
-                    TLorentzVector& position, TLorentzVector& momentum)
-       {printf("GetSecondary not yet implemented !\n");}
-    virtual AliMCProcess ProdProcess(Int_t isec) const
-       {printf("ProdProcess not yet implemented !\n"); return kPNoProcess;} 
-    virtual Int_t StepProcesses(TArrayI &proc) const
-       {printf("StepProcess not yet implemented !\n"); return -1;}
-
-    //
-    // other (then geometry/step/run management) methods
-    // ----------------------------------------------
-    //
-    virtual AliMCGeomType GetAliMCGeomType() const
-       {printf("AliMCGeomType not yet implemented !\n"); return 0;}
-    
-    //
-    // Geant3 specific methods
-    // !!! need to be transformed to common interface
-    //
-    virtual void Gdopt(const char*,const char*)
-       {printf("Gdopt not yet implemented !\n");}
-    virtual void SetClipBox(const char*,Float_t=-9999,Float_t= 0, Float_t=-9999,Float_t=0,Float_t=-9999,Float_t=0)
-       {printf("SetClipBox not yet implemented !\n");}
-    virtual void DefaultRange()
-       {printf("DefaultRange not yet implemented !\n");}
-    virtual void Gdhead(Int_t, const char*, Float_t=0)
-       {printf("Gdhead not yet implemented !\n");}   
-    virtual void Gdman(Float_t, Float_t, const char*)
-       {printf("Gdman not yet implemented !\n");}
-    virtual void SetColors()
-       {printf("SetColors not yet implemented !\n");}
-    virtual void Gtreve()
-       {printf("Gtreve not yet implemented !\n");}
-    virtual void GtreveRoot()
-       {printf("GtreveRoot not yet implemented !\n");}
-    virtual void Gckmat(Int_t, char*)
-       {printf("Gckmat not yet implemented !\n");}
-    virtual void InitLego()
-       {printf("InitLego not yet implemented !\n");}
-    virtual void Gfpart(Int_t, char*, Int_t&, Float_t&, Float_t&, Float_t&)
-       {printf("Gfpart not yet implemented !\n");} 
-    virtual void Gspart(Int_t, const char*, Int_t, Float_t, Float_t, Float_t)
-       {printf("Gspart not yet implemented !\n");} 
-
-  // Control Methods
-
-  virtual void Init()
-      {printf("Init not yet implemented !\n");}
-  virtual void FinishGeometry()
-      {printf("FinishGeometry not yet implemented !\n");}
-  virtual void BuildPhysics()
-      {printf("BuildPhysics not yet implemented !\n");}
-  // External Decayer
-  virtual void SetExternalDecayer(AliDecayer* decayer)
-      {printf("SetExternalDecayer not yet implemented !\n");}
-  virtual AliDecayer* Decayer() const
-      {printf("AliDecayer not yet implemented !\n"); return 0;}
-
-  private:
-  TFluka(const TFluka &) {;}
-  TFluka & operator=(const TFluka &) {return (*this);}
-
-  ClassDef(TFluka,1)  //Fluka implementation of the Monte Carlo Interface
+  void  PrintHeader();
+  void  AddParticlesToPdgDataBase() const;
+  Int_t GetIonPdg(Int_t z, Int_t a, Int_t i = 0) const;
+  Float_t* CreateFloatArray(Double_t* array, Int_t size) 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 
+
+  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
+  Double_t              fPint[4];          // 4-vector of particle after interaction
+  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
+  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                fNCerenkov;          // Number of cerekov photons 
+  TFlukaMCGeometry    *fGeom;               // TGeo-FLUKA interface
+  TGeoMCGeometry      *fMCGeo;              // Interface to TGeo builder
+
+  // SetProcess, SetCut and user Scoring dynamic storage
+  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 
+#endif //TFLUKA