TFluka/TFluka.h

   1 #ifndef TFLUKA_H
   2 #define TFLUKA_H
   3 /* Copyright(c) 1998-1999, ALICE Experiment at CERN, All rights reserved. *
   4  * See cxx source for full Copyright notice                               */
   5
   6 /* $Id$ */
   7
   8 ///////////////////////////////////////////////////////////////////////////////
   9 //                                                                           //
  10 //                                                                           //
  11 // FLUKA implementation of the VirtualMC Interface                           //
  12 //                                                                           //
  13 //                                                                           //
  14 ///////////////////////////////////////////////////////////////////////////////
  15
  16
  17 #include "TVirtualMC.h"
  18 #include "TMCOptical.h"
  19 #include "TFlukaCodes.h"
  20 #include "TFlukaMCGeometry.h"
  21
  22 //Forward declaration
  23 class TGeoMCGeometry;
  24 //class TFlukaMCGeometry;
  25 class TGeoMaterial;
  26
  27 class TFluka : public TVirtualMC {
  28
  29  public:
  30   TFluka(const char *title, Int_t verbosity = 0,  Bool_t isRootGeometrySupported = 0);
  31   TFluka();
  32   virtual ~TFluka();
  33   virtual Bool_t IsRootGeometrySupported() const { return kTRUE;}
  34
  35   Int_t         GetNstep() { return fGeom->GetNstep(); } // to be removed
  36
  37   //
  38   // Methods for building/management of geometry
  39   // ------------------------------------------------
  40   //
  41
  42   // Functions from GCONS
  43   virtual void   Gfmate(Int_t imat, char *name, Float_t &a, Float_t &z,
  44                         Float_t &dens, Float_t &radl, Float_t &absl,
  45                         Float_t* ubuf, Int_t& nbuf);
  46   virtual void   Gfmate(Int_t imat, char *name, Double_t &a, Double_t &z,
  47                         Double_t &dens, Double_t &radl, Double_t &absl,
  48                         Double_t* ubuf, Int_t& nbuf);
  49
  50   // Detector composition
  51   virtual void   Material(Int_t& kmat, const char* name, Double_t a,
  52                           Double_t z, Double_t dens, Double_t radl, Double_t absl,
  53                           Float_t* buf, Int_t nwbuf);
  54   virtual void   Material(Int_t& kmat, const char* name, Double_t a,
  55                           Double_t z, Double_t dens, Double_t radl, Double_t absl,
  56                           Double_t* buf, Int_t nwbuf);
  57   virtual void   Mixture(Int_t& kmat, const char *name, Float_t *a,
  58                          Float_t *z, Double_t dens, Int_t nlmat, Float_t *wmat);
  59   virtual void   Mixture(Int_t& kmat, const char *name, Double_t *a,
  60                          Double_t *z, Double_t dens, Int_t nlmat, Double_t *wmat);
  61   virtual void   Medium(Int_t& kmed, const char *name, Int_t nmat,
  62                         Int_t isvol, Int_t ifield, Double_t fieldm, Double_t tmaxfd,
  63                         Double_t stemax, Double_t deemax, Double_t epsil,
  64                         Double_t stmin, Float_t* ubuf, Int_t nbuf);
  65   virtual void   Medium(Int_t& kmed, const char *name, Int_t nmat,
  66                         Int_t isvol, Int_t ifield, Double_t fieldm, Double_t tmaxfd,
  67                         Double_t stemax, Double_t deemax, Double_t epsil,
  68                         Double_t stmin, Double_t* ubuf, Int_t nbuf);
  69   virtual void   Matrix(Int_t& krot, Double_t thetaX, Double_t phiX,
  70                         Double_t thetaY, Double_t phiY, Double_t thetaZ,
  71                         Double_t phiZ);
  72   virtual void   Gstpar(Int_t itmed, const char *param, Double_t parval);
  73
  74   // Functions from GGEOM
  75   virtual Int_t  Gsvolu(const char *name, const char *shape, Int_t nmed,
  76                         Float_t *upar, Int_t np);
  77   virtual Int_t  Gsvolu(const char *name, const char *shape, Int_t nmed,
  78                         Double_t *upar, Int_t np);
  79   virtual void   Gsdvn(const char *name, const char *mother, Int_t ndiv,
  80                        Int_t iaxis);
  81   virtual void   Gsdvn2(const char *name, const char *mother, Int_t ndiv,
  82                         Int_t iaxis, Double_t c0i, Int_t numed);
  83   virtual void   Gsdvt(const char *name, const char *mother, Double_t step,
  84                        Int_t iaxis, Int_t numed, Int_t ndvmx);
  85   virtual void   Gsdvt2(const char *name, const char *mother, Double_t step,
  86                        Int_t iaxis, Double_t c0, Int_t numed, Int_t ndvmx);
  87   virtual void   Gsord(const char *name, Int_t iax);
  88   virtual void   Gspos(const char *name, Int_t nr, const char *mother,
  89                        Double_t x, Double_t y, Double_t z, Int_t irot,
  90                       const char *konly="ONLY");
  91   virtual void   Gsposp(const char *name, Int_t nr, const char *mother,
  92                         Double_t x, Double_t y, Double_t z, Int_t irot,
  93                         const char *konly, Float_t *upar, Int_t np);
  94   virtual void   Gsposp(const char *name, Int_t nr, const char *mother,
  95                         Double_t x, Double_t y, Double_t z, Int_t irot,
  96                         const char *konly, Double_t *upar, Int_t np);
  97   virtual void   Gsbool(const char* onlyVolName, const char* manyVolName);
  98
  99    // functions for access to geometry
 100    //
 101    // Return the Transformation matrix between the volume specified by
 102    // the path volumePath and the top or master volume.
 103    virtual Bool_t GetTransformation(const TString& volumePath,
 104                         TGeoHMatrix& matrix);
 105
 106    // Return the name of the shape and its parameters for the volume
 107    // specified by the volume name.
 108    virtual Bool_t GetShape(const TString& volumePath,
 109                         TString& shapeType, TArrayD& par);
 110
 111    // Returns the material parameters for the volume specified by
 112    // the volume name.
 113    virtual Bool_t GetMaterial(const TString& volumeName,
 114                  TString& name, Int_t& imat,
 115                  Double_t& a, Double_t& z, Double_t& density,
 116                  Double_t& radl, Double_t& inter, TArrayD& par);
 117
 118    // Returns the medium parameters for the volume specified by the
 119    // volume name.
 120    virtual Bool_t GetMedium(const TString& volumeName,
 121                         TString& name, Int_t& imed,
 122                  Int_t& nmat, Int_t& isvol, Int_t& ifield,
 123                  Double_t& fieldm, Double_t& tmaxfd, Double_t& stemax,
 124                  Double_t& deemax, Double_t& epsil, Double_t& stmin,
 125                  TArrayD& par);
 126
 127   virtual void   SetCerenkov(Int_t itmed, Int_t npckov, Float_t *ppckov,
 128                              Float_t *absco, Float_t *effic, Float_t *rindex);
 129   virtual void   SetCerenkov(Int_t itmed, Int_t npckov, Double_t *ppckov,
 130                              Double_t *absco, Double_t *effic, Double_t *rindex);
 131   virtual void   SetCerenkov(Int_t itmed, Int_t npckov, Float_t *ppckov,
 132                              Float_t *absco, Float_t *effic, Float_t *rindex, Float_t *rfl);
 133   virtual void   SetCerenkov(Int_t itmed, Int_t npckov, Double_t *ppckov,
 134                              Double_t *absco, Double_t *effic, Double_t *rindex, Double_t *rfl);
 135
 136 //
 137   virtual void   DefineOpSurface(const char* name, EMCOpSurfaceModel model, EMCOpSurfaceType surface,
 138                                  EMCOpSurfaceFinish surfaceFinish, Double_t sigmaAlpha);
 139
 140   virtual void  SetBorderSurface(const char* name, const char* vol1Name, int vol1CopyNo, const char* vol2Name, int vol2CopyNo,
 141                                  const char* opSurfaceName);
 142
 143
 144   virtual void  SetSkinSurface(const char* name, const char* volName, const char* opSurfaceName);
 145
 146   virtual void  SetMaterialProperty(Int_t itmed, const char* propertyName, Int_t np, Double_t* pp, Double_t* values);
 147
 148   virtual void  SetMaterialProperty(Int_t itmed, const char* propertyName, Double_t value);
 149
 150   virtual void  SetMaterialProperty(const char* surfaceName, const char* propertyName, Int_t np, Double_t* pp, Double_t* values);
 151
 152   // Functions for drawing
 153   virtual void   DrawOneSpec(const char* /*name*/)
 154       {Warning("DrawOneSpec",  "Not yet implemented !\n");}
 155   virtual void   Gsatt(const char* name, const char* att, Int_t val);
 156   virtual void   Gdraw(const char*,Double_t /*theta = 30*/, Double_t /*phi = 30*/,
 157                        Double_t /*psi = 0*/, Double_t /*u0 = 10*/, Double_t /*v0 = 10*/,
 158                        Double_t /*ul = 0.01*/, Double_t /*vl = 0.01*/)
 159       {Warning("Gdraw", "Not yet implemented !\n");}
 160
 161   // Euclid
 162   virtual void   WriteEuclid(const char*, const char*, Int_t, Int_t);
 163
 164   // Getters
 165   Int_t          GetDummyRegion() const;
 166   Int_t          GetDummyLattice() const;
 167   virtual Int_t  VolId(const Text_t* volName) const;
 168   virtual const  char* VolName(Int_t id) const;
 169   virtual Int_t  NofVolumes() const {return fNVolumes;}
 170   virtual Int_t  VolId2Mate(Int_t id) const;
 171   // Return the unique numeric identifier for medium name mediumName
 172   virtual Int_t MediumId(const Text_t* mediumName) const;
 173
 174   //
 175   // Methods for physics management
 176   // ------------------------------------------------
 177   //
 178
 179   // User configuration
 180   virtual Bool_t     SetProcess(const char* flagName, Int_t flagValue);
 181   virtual void       SetProcess(const char* flagName, Int_t flagValue, Int_t imed);
 182   virtual Bool_t     SetCut(const char* cutName, Double_t cutValue);
 183   virtual void       SetCut(const char* cutName, Double_t cutValue, Int_t imed);
 184   virtual void       SetModelParameter(const char* parName, Double_t parValue, Int_t imed);
 185   virtual TObjArray* GetListOfUserConfigs() {return fUserConfig;}
 186   virtual Double_t   Xsec(char*, Double_t, Int_t, Int_t);
 187   virtual void       SetLowEnergyNeutronTransport(Bool_t flag) {fLowEnergyNeutronTransport = flag;}
 188   virtual Bool_t     LowEnergyNeutronTransport() {return fLowEnergyNeutronTransport;}
 189   // Particle table usage
 190   virtual Int_t    IdFromPDG(Int_t id) const;
 191   virtual Int_t    PDGFromId(Int_t pdg) const;
 192   virtual void     DefineParticles()
 193   {Warning("DefineParticles", "Not yet implemented !\n");}
 194
 195   //
 196   // methods for step management
 197   // ------------------------------------------------
 198   //
 199
 200   // Action methods
 201   virtual void   StopTrack();
 202   virtual void   ResetStoppingCondition() {fStopped = kFALSE;}
 203   virtual Bool_t GetStoppingCondition() const   {return fStopped;}
 204
 205   virtual void   StopEvent() {fStopEvent = kTRUE;}
 206   virtual void   StopRun()   {fStopEvent = kTRUE; fStopRun   = kTRUE;}
 207   virtual Bool_t EventIsStopped() const {return fStopEvent;}
 208   virtual void   SetStopEvent(Bool_t flag) {fStopEvent = flag;}
 209
 210   // Set methods
 211   virtual void SetMaxStep (Double_t step);
 212   virtual void SetMaxNStep(Int_t);
 213   virtual void SetUserDecay(Int_t);
 214
 215   // Get methods
 216   // Tracking volume(s)
 217   virtual Int_t    CurrentVolID(Int_t& copyNo) const;
 218   virtual Int_t    CurrentVolOffID(Int_t off, Int_t& copyNo) const;
 219   virtual const char* CurrentVolName() const;
 220   virtual const char* CurrentVolOffName(Int_t off) const;
 221   virtual Int_t    CurrentMaterial(Float_t &a, Float_t &z,
 222                                    Float_t &dens, Float_t &radl, Float_t &absl) const;
 223   virtual Int_t    CurrentEvent() const {return fNEvent;}
 224
 225   virtual void     Gmtod(Float_t* xm, Float_t* xd, Int_t iflag);
 226
 227   virtual void     Gmtod(Double_t* xm, Double_t* xd, Int_t iflag);
 228
 229   virtual void     Gdtom(Float_t* xd, Float_t* xm, Int_t iflag);
 230
 231   virtual void     Gdtom(Double_t* xd, Double_t* xm, Int_t iflag);
 232
 233   virtual Double_t MaxStep() const;
 234   virtual Int_t    GetMaxNStep() const
 235       {Warning("GetMaxNStep",  "Not yet implemented !\n"); return -1;}
 236   virtual Int_t    GetMedium() const;
 237   virtual Int_t    CurrentMedium() const {return GetMedium();}
 238
 239   // Tracking particle
 240   // dynamic properties
 241   virtual void     TrackPosition(TLorentzVector& position) const;
 242   virtual void     TrackPosition(Double_t& x, Double_t& y, Double_t& z) const;
 243   virtual void     TrackMomentum(TLorentzVector& momentum) const;
 244   virtual void     TrackMomentum(Double_t& px, Double_t& py, Double_t& pz, Double_t& e) const;
 245   virtual Double_t TrackStep() const;
 246   virtual Double_t TrackLength() const;
 247   virtual Double_t TrackTime() const;
 248   virtual Double_t Edep() const;
 249   // Static properties
 250   virtual Int_t    CorrectFlukaId() const;
 251   virtual Int_t    TrackPid() const;
 252   virtual Double_t TrackCharge() const;
 253   virtual Double_t TrackMass() const;
 254   virtual Double_t Etot() const;
 255   // Track status
 256   virtual Bool_t   IsNewTrack() const;
 257   virtual Bool_t   IsTrackInside() const;
 258   virtual Bool_t   IsTrackEntering() const;
 259   virtual Bool_t   IsTrackExiting() const;
 260   virtual Bool_t   IsTrackOut() const;
 261   virtual Bool_t   IsTrackDisappeared() const;
 262   virtual Bool_t   IsTrackStop() const;
 263   virtual Bool_t   IsTrackAlive() const;
 264
 265   // Secondaries
 266   virtual Int_t    NSecondaries() const;
 267   virtual void     SetNCerenkov(Int_t nc) {fNCerenkov = nc;}
 268
 269   virtual void     GetSecondary(Int_t isec, Int_t& particleId,
 270                         TLorentzVector& position, TLorentzVector& momentum);
 271   virtual Bool_t   SecondariesAreOrdered() const {return kFALSE;}
 272   virtual TMCProcess ProdProcess(Int_t iproc) const ;
 273   virtual Int_t    StepProcesses(TArrayI & proc) const;
 274   //
 275   // Geant3 specific methods
 276   // !!! need to be transformed to common interface
 277   //
 278   virtual void Gdopt(const char*,const char*)
 279     {Warning("Gdopt", "Not yet implemented !\n");}
 280   virtual void SetClipBox(const char*,Double_t=-9999,Double_t=0, Double_t=-9999,
 281                           Double_t=0,Double_t=-9999,Double_t=0)
 282     {Warning("SetClipBox", "Not yet implemented !\n");}
 283   virtual void DefaultRange()
 284     {Warning("DefaultRange", "Not yet implemented !\n");}
 285   virtual void Gdhead(Int_t, const char*, Double_t=0)
 286     {Warning("Gdhead", "Not yet implemented !\n");}
 287   virtual void Gdman(Double_t, Double_t, const char*)
 288     {Warning("Gdman", "Not yet implemented !\n");}
 289   virtual void SetColors()
 290     {Warning("SetColors", "Not yet implemented !\n");}
 291   virtual void Gtreve()
 292     {Warning("Gtreve", "Not yet implemented !\n");}
 293   virtual void GtreveRoot()
 294     {Warning("GtreveRoot", "Not yet implemented !\n");}
 295   virtual void Gckmat(Int_t, char*)
 296     {Warning("Gckmat", "Not yet implemented !\n");}
 297   virtual void InitLego()
 298     {Warning("InitLego", "Not yet implemented !\n");}
 299 //
 300   virtual void Gfpart(Int_t pdg, char* name, Int_t& type, Float_t& mass, Float_t& charge, Float_t& tlife);
 301   virtual void Gspart(Int_t, const char*, Int_t, Double_t, Double_t, Double_t)
 302       {Warning("Gspart", "Not yet implemented !\n");}
 303
 304   //
 305   // Particle Properties
 306   // -------------------
 307   //
 308   virtual Bool_t DefineParticle(Int_t, const char*, TMCParticleType, Double_t, Double_t, Double_t) {return kFALSE;}
 309   virtual Bool_t DefineParticle(Int_t, const char*, TMCParticleType, Double_t, Double_t, Double_t,
 310                                 const TString&, Double_t, Int_t, Int_t, Int_t, Int_t, Int_t, Int_t, Int_t, Int_t,
 311                                 Bool_t, Bool_t = kFALSE, const TString& = "", Int_t = 0, Double_t = 0.0, Double_t = 0.0) {return kFALSE;}
 312   virtual Bool_t DefineIon(const char*, int, int, int, double, double) {return kFALSE;}
 313   virtual TString  ParticleName(int pdg)      const;
 314   virtual Double_t ParticleMass(int pdg)      const;
 315   virtual Double_t ParticleMassFPC(int fpc)   const;
 316   virtual Double_t ParticleCharge(int pdg)    const;
 317   virtual Double_t ParticleLifeTime(int pdg)  const;
 318   virtual TMCParticleType ParticleMCType(int) const {return (TMCParticleType) 9;}
 319   //
 320   // Control methods
 321   // ------------------------------------------------
 322   //
 323
 324   virtual void Init();
 325   virtual void InitPhysics();
 326   virtual void FinishGeometry();
 327   virtual void BuildPhysics();
 328   virtual void ProcessEvent();
 329   virtual Bool_t ProcessRun(Int_t nevent);
 330
 331
 332   //
 333   // FLUKA Scoring specific methods
 334   // ------------------------------
 335   //
 336   virtual void SetUserScoring(const char* option, const char* sdum, Int_t npr,char* outfile, Float_t* what);
 337   virtual void SetUserScoring(const char* option, const char* sdum, Int_t npr,char* outfile, Float_t* what,
 338                               const char* det1, const char* det2, const char* det3);
 339   //
 340   // New Getter and Setters
 341   // ------------------------------------------------
 342   //
 343   // - Core input file name
 344   TString GetCoreInputFileName() const {return fCoreInputFileName;}
 345   void SetCoreInputFileName(const char* file = "coreFlukaVmc.inp") {fCoreInputFileName = file;}
 346
 347   // - Input file name
 348   TString GetInputFileName() const {return fInputFileName;}
 349   void SetInputFileName(const char* file = "FlukaVmc.inp") {fInputFileName = file;}
 350
 351   // - Verbosity level
 352   Int_t GetVerbosityLevel() const {return fVerbosityLevel;}
 353   void SetVerbosityLevel(Int_t l) {fVerbosityLevel = l;}
 354
 355   //
 356   // - Fluka Draw procedures identifiers, see TFlukaCodes.h
 357   //
 358   FlukaCallerCode_t GetCaller() const {return fCaller;}
 359   FlukaProcessCode_t GetIcode() const {return fIcode;}
 360   Int_t GetMreg() const {return fCurrentFlukaRegion;}
 361   Int_t GetNewreg() const {return fNewReg;}
 362   Double_t GetRull() const {return fRull;}
 363   Double_t GetXsco() const {return fXsco;}
 364   Double_t GetYsco() const {return fYsco;}
 365   Double_t GetZsco() const {return fZsco;}
 366   Int_t              GetCurrentFlukaRegion() const {return fCurrentFlukaRegion;}
 367   // - Fluka Draw Setters
 368   void  SetCurrentFlukaRegion(Int_t reg) {fCurrentFlukaRegion=reg;}
 369   void  SetCaller(FlukaCallerCode_t l) {fCaller = l;}
 370   void  SetIcode(FlukaProcessCode_t l) {fIcode = l;}
 371   void  SetMreg(Int_t l, Int_t lttc);
 372   void  SetNewreg(Int_t l, Int_t /*lttc*/) {fNewReg = l;}
 373   void  SetRull(Double_t r) {fRull = r;}
 374   void  SetXsco(Double_t x) {fXsco = x;}
 375   void  SetYsco(Double_t y) {fYsco = y;}
 376   void  SetZsco(Double_t z) {fZsco = z;}
 377   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;}
 378   void  SetTrackIsEntering(){fTrackIsEntering = kTRUE; fTrackIsExiting = kFALSE;}
 379   void  SetTrackIsExiting() {fTrackIsExiting  = kTRUE; fTrackIsEntering = kFALSE;}
 380   void  SetTrackIsInside()  {fTrackIsExiting  = kFALSE; fTrackIsEntering = kFALSE;}
 381   void  SetTrackIsNew(Bool_t flag = kTRUE);
 382
 383   void   SetDummyBoundary(Int_t mode) {fDummyBoundary = mode;}
 384   Int_t  GetDummyBoundary() const {return fDummyBoundary;}
 385   Bool_t IsDummyBoundary() const {return (fDummyBoundary==0)?kFALSE:kTRUE;}
 386
 387   void   EnableField(Bool_t flag=kTRUE) {fFieldFlag = flag;}
 388   Bool_t IsFieldEnabled() const {return fFieldFlag;}
 389
 390   Int_t  GetMaterialIndex(Int_t idmat) const {return fMaterials[idmat];}
 391
 392   TObjArray *          GetFlukaMaterials();
 393   virtual void         SetRootGeometry() {;} // Dummy
 394   virtual Int_t        NofVolDaughters(const char* volName) const;
 395   virtual const char*  VolDaughterName(const char* volName, Int_t i) const;
 396   virtual Int_t        VolDaughterCopyNo(const char* volName, Int_t i) const;
 397   virtual const char*  CurrentVolPath();
 398   virtual void         ForceDecayTime(Float_t){;}
 399   //
 400   // Info about primary ionization electrons
 401   Int_t    GetNPrimaryElectrons();
 402   Double_t GetPrimaryElectronKineticEnergy(Int_t i) const;
 403   void     GetPrimaryElectronPosition(Int_t i, Double_t& x, Double_t& y, Double_t& z, Double_t& t) const;
 404   void     SetCurrentPrimaryElectronIndex(Int_t i)  {fPrimaryElectronIndex = i;}
 405   void     PrimaryIonisationStepping(Int_t nprim);
 406
 407   void  AddIon(Int_t a, Int_t z) const;
 408   Int_t GetIonPdg(Int_t z, Int_t a, Int_t i = 0) const;
 409  private:
 410
 411   // Copy constructor and operator= declared but not implemented (-Weff++ flag)
 412   TFluka(const TFluka &mc); //: TVirtualMC(mc) {;}
 413   TFluka & operator=(const TFluka &); // {return (*this);}
 414
 415   void  PrintHeader();
 416   void  AddParticlesToPdgDataBase() const;
 417
 418   Int_t GetSpecialPdg(Int_t number) const;
 419
 420   Float_t* CreateFloatArray(Double_t* array, Int_t size) const;
 421
 422   //
 423   Int_t   fVerbosityLevel; //Verbosity level (0 lowest - 3 highest)
 424   Int_t   fNEvent;         //Current event number
 425   TString fInputFileName;     //Name of the real input file
 426   TString fCoreInputFileName; //Name of the input file
 427
 428   FlukaCallerCode_t     fCaller;           // Parameter to indicate who is the caller of the Fluka Draw
 429   FlukaProcessCode_t    fIcode;            // Fluka Draw procedures formal parameter
 430   Int_t                 fNewReg;           // Fluka Draw procedures formal parameter
 431   Double_t              fRull;             // Fluka Draw procedures formal parameter
 432   Double_t              fXsco;             // Fluka Draw procedures formal parameter
 433   Double_t              fYsco;             // Fluka Draw procedures formal parameter
 434   Double_t              fZsco;             // Fluka Draw procedures formal parameter
 435   Double_t              fPint[4];          // 4-vector of particle after interaction
 436   Bool_t   fTrackIsEntering;      // Flag for track entering
 437   Bool_t   fTrackIsExiting;       // Flag for track exiting
 438   Bool_t   fTrackIsNew;           // Flag for new track
 439   Bool_t   fFieldFlag;            // Flag for magnetic field
 440   Int_t    fDummyBoundary;        // Flag for crossing dummy boundaries
 441   Bool_t   fStopped;              // Flag for stopping
 442   Bool_t   fStopEvent;            // Flag for stopped event
 443   Bool_t   fStopRun;              // Flag for stopped run
 444   Int_t    fPrimaryElectronIndex; // Primary electron Index
 445   Bool_t   fLowEnergyNeutronTransport; // Flag to force low energy neutron transport
 446
 447   //
 448   //Geometry through TGeo
 449   //
 450   Int_t*               fMaterials;          //!Array of indices
 451   Int_t                fNVolumes;           //!Current number of volumes
 452   Int_t                fCurrentFlukaRegion; // Index of fluka region at each step
 453   Int_t                fNCerenkov;          // Number of cerekov photons
 454   TFlukaMCGeometry    *fGeom;               // TGeo-FLUKA interface
 455   TGeoMCGeometry      *fMCGeo;              // Interface to TGeo builder
 456
 457   // SetProcess, SetCut and user Scoring dynamic storage
 458   TObjArray* fUserConfig;            // List of user physics configuration
 459   TObjArray* fUserScore;             // List of user scoring options
 460
 461
 462   ClassDef(TFluka,1)  //C++ interface to Fluka montecarlo
 463
 464
 465   // Temporary implementation of new functions
 466   // To be removed with the next release
 467 };
 468   inline Int_t TFluka::NofVolDaughters(const char* /*volName*/) const {
 469     Warning("NofVolDaughters", "New function - not yet implemented.");
 470     return 0;
 471   }
 472
 473   inline const char*  TFluka::VolDaughterName(const char* /*volName*/, Int_t /*i*/) const {
 474     Warning("VolDaughterName", "New function - not yet implemented.");
 475     return "";
 476   }
 477
 478   inline Int_t  TFluka::VolDaughterCopyNo(const char* /*volName*/, Int_t /*i*/) const {
 479     Warning("VolDaughterCopyNo", "New function - not yet implemented.");
 480     return 0;
 481   }
 482
 483
 484 inline void TFluka::DefineOpSurface(const char* /*name*/, EMCOpSurfaceModel /*model*/, EMCOpSurfaceType /*surface*/,
 485                                     EMCOpSurfaceFinish /*surfaceFinish*/, Double_t /*sigmaAlpha*/)
 486 {
 487     Warning("DefineOpSurface", "New function - not yet implemented.");
 488 }
 489
 490
 491 inline void TFluka::SetBorderSurface(const char* /*name*/, const char* /*vol1Name*/, int /*vol1CopyNo*/, const char* /*vol2Name*/,
 492                                      int /*vol2CopyNo*/, const char* /*opSurfaceName*/)
 493 {
 494     Warning("SetBorderSurface", "New function - not yet implemented.");
 495 }
 496
 497
 498 inline void TFluka::SetSkinSurface(const char* /*name*/, const char* /*volName*/, const char* /*opSurfaceName*/)
 499 {
 500     Warning("SetSkinSurface", "New function - not yet implemented.");
 501 }
 502
 503
 504 inline void TFluka::SetMaterialProperty(Int_t /*itmed*/, const char* /*propertyName*/, Int_t /*np*/, Double_t* /*pp*/, Double_t* /*values*/)
 505 {
 506     Warning("SetMaterialProperty", "New function - not yet implemented.");
 507 }
 508
 509
 510 inline void TFluka::SetMaterialProperty(Int_t /*itmed*/, const char* /*propertyName*/, Double_t /*value*/)
 511 {
 512     Warning("SetMaterialProperty", "New function - not yet implemented.");
 513 }
 514
 515
 516 inline void TFluka::SetMaterialProperty(const char* /*surfaceName*/, const char* /*propertyName*/, Int_t /*np*/,
 517                                         Double_t* /*pp*/, Double_t* /*values*/)
 518 {
 519     Warning("SetMaterialProperty", "New function - not yet implemented.");
 520 }
 521
 522
 523
 524 #endif //TFLUKA
 525