]> git.uio.no Git - u/mrichter/AliRoot.git/blob - TFluka/TFluka.h
Correct energy of interacting particle after BREMS, DELTA, COMPTON
[u/mrichter/AliRoot.git] / 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
188   
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, const char*, TMCParticleType, double, double, double) {return kFALSE;}
309   virtual Bool_t DefineIon(const char*, int, int, int, double, double) {return kFALSE;}
310   virtual TString  ParticleName(int pdg)      const;
311   virtual Double_t ParticleMass(int pdg)      const;
312   virtual Double_t ParticleMassFPC(int fpc)   const;
313   virtual Double_t ParticleCharge(int pdg)    const;
314   virtual Double_t ParticleLifeTime(int pdg)  const;
315   virtual TMCParticleType ParticleMCType(int) const {return (TMCParticleType) 9;}
316   //
317   // Control methods
318   // ------------------------------------------------
319   //
320   
321   virtual void Init();
322   virtual void InitPhysics();
323   virtual void FinishGeometry();
324   virtual void BuildPhysics();
325   virtual void ProcessEvent();
326   virtual Bool_t ProcessRun(Int_t nevent);
327
328
329   //
330   // FLUKA Scoring specific methods
331   // ------------------------------
332   //
333   virtual void SetUserScoring(const char* option, const char* sdum, Int_t npr,char* outfile, Float_t* what);
334   virtual void SetUserScoring(const char* option, const char* sdum, Int_t npr,char* outfile, Float_t* what,
335                               const char* det1, const char* det2, const char* det3);
336   //
337   // New Getter and Setters
338   // ------------------------------------------------
339   //
340   // - Core input file name
341   TString GetCoreInputFileName() const {return fCoreInputFileName;}
342   void SetCoreInputFileName(const char* file = "coreFlukaVmc.inp") {fCoreInputFileName = file;}
343
344   // - Input file name
345   TString GetInputFileName() const {return fInputFileName;}
346   void SetInputFileName(const char* file = "FlukaVmc.inp") {fInputFileName = file;}
347
348   // - Verbosity level
349   Int_t GetVerbosityLevel() const {return fVerbosityLevel;}
350   void SetVerbosityLevel(Int_t l) {fVerbosityLevel = l;}
351
352   //
353   // - Fluka Draw procedures identifiers, see TFlukaCodes.h
354   //
355   FlukaCallerCode_t GetCaller() const {return fCaller;}
356   FlukaProcessCode_t GetIcode() const {return fIcode;}
357   Int_t GetMreg() const {return fCurrentFlukaRegion;}
358   Int_t GetNewreg() const {return fNewReg;}
359   Double_t GetRull() const {return fRull;}
360   Double_t GetXsco() const {return fXsco;}
361   Double_t GetYsco() const {return fYsco;}
362   Double_t GetZsco() const {return fZsco;}
363   Int_t              GetCurrentFlukaRegion() const {return fCurrentFlukaRegion;}
364   // - Fluka Draw Setters
365   void  SetCurrentFlukaRegion(Int_t reg) {fCurrentFlukaRegion=reg;}
366   void  SetCaller(FlukaCallerCode_t l) {fCaller = l;}
367   void  SetIcode(FlukaProcessCode_t l) {fIcode = l;}
368   void  SetMreg(Int_t l, Int_t lttc);
369   void  SetNewreg(Int_t l, Int_t /*lttc*/) {fNewReg = l;}
370   void  SetRull(Double_t r) {fRull = r;}
371   void  SetXsco(Double_t x) {fXsco = x;}
372   void  SetYsco(Double_t y) {fYsco = y;}
373   void  SetZsco(Double_t z) {fZsco = z;}
374
375   void  SetTrackIsEntering(){fTrackIsEntering = kTRUE; fTrackIsExiting = kFALSE;}
376   void  SetTrackIsExiting() {fTrackIsExiting  = kTRUE; fTrackIsEntering = kFALSE;}
377   void  SetTrackIsInside()  {fTrackIsExiting  = kFALSE; fTrackIsEntering = kFALSE;}
378   void  SetTrackIsNew(Bool_t flag = kTRUE);
379
380   void   SetDummyBoundary(Int_t mode) {fDummyBoundary = mode;}
381   Int_t  GetDummyBoundary() const {return fDummyBoundary;}
382   Bool_t IsDummyBoundary() const {return (fDummyBoundary==0)?kFALSE:kTRUE;}
383   
384   void   EnableField(Bool_t flag=kTRUE) {fFieldFlag = flag;}
385   Bool_t IsFieldEnabled() const {return fFieldFlag;}
386   
387   Int_t  GetMaterialIndex(Int_t idmat) const {return fMaterials[idmat];}
388
389   TObjArray *          GetFlukaMaterials();
390   virtual void         SetRootGeometry() {;} // Dummy
391   virtual Int_t        NofVolDaughters(const char* volName) const;
392   virtual const char*  VolDaughterName(const char* volName, Int_t i) const;
393   virtual Int_t        VolDaughterCopyNo(const char* volName, Int_t i) const;
394   virtual const char*  CurrentVolPath();
395   virtual void         ForceDecayTime(Float_t){;}
396   //
397   // Info about primary ionization electrons
398   Int_t    GetNPrimaryElectrons();
399   Double_t GetPrimaryElectronKineticEnergy(Int_t i) const;
400   void     GetPrimaryElectronPosition(Int_t i, Double_t& x, Double_t& y, Double_t& z) const;
401   void     SetCurrentPrimaryElectronIndex(Int_t i)  {fPrimaryElectronIndex = i;}
402   void     PrimaryIonisationStepping(Int_t nprim);  
403  private:
404    
405   // Copy constructor and operator= declared but not implemented (-Weff++ flag)
406   TFluka(const TFluka &mc); //: TVirtualMC(mc) {;}
407   TFluka & operator=(const TFluka &); // {return (*this);}
408  
409   void  PrintHeader();
410   void  AddParticlesToPdgDataBase() const;
411   Int_t GetIonPdg(Int_t z, Int_t a, Int_t i = 0) const;
412
413   //
414   Int_t   fVerbosityLevel; //Verbosity level (0 lowest - 3 highest)
415   Int_t   fNEvent;         //Current event number
416   TString fInputFileName;     //Name of the real input file 
417   TString fCoreInputFileName; //Name of the input file 
418
419   FlukaCallerCode_t     fCaller;           // Parameter to indicate who is the caller of the Fluka Draw
420   FlukaProcessCode_t    fIcode;            // Fluka Draw procedures formal parameter 
421   Int_t                 fNewReg;           // Fluka Draw procedures formal parameter
422   Double_t              fRull;             // Fluka Draw procedures formal parameter
423   Double_t              fXsco;             // Fluka Draw procedures formal parameter
424   Double_t              fYsco;             // Fluka Draw procedures formal parameter
425   Double_t              fZsco;             // Fluka Draw procedures formal parameter
426   Bool_t   fTrackIsEntering;      // Flag for track entering
427   Bool_t   fTrackIsExiting;       // Flag for track exiting  
428   Bool_t   fTrackIsNew;           // Flag for new track
429   Bool_t   fFieldFlag;            // Flag for magnetic field
430   Int_t    fDummyBoundary;        // Flag for crossing dummy boundaries
431   Bool_t   fStopped;              // Flag for stopping 
432   Bool_t   fStopEvent;            // Flag for stopped event
433   Bool_t   fStopRun;              // Flag for stopped run 
434   Int_t    fPrimaryElectronIndex; // Primary electron Index
435   
436   //
437   //Geometry through TGeo
438   //
439   Int_t*               fMaterials;          //!Array of indices
440   Int_t                fNVolumes;           //!Current number of volumes
441   Int_t                fCurrentFlukaRegion; // Index of fluka region at each step
442   Int_t                fNCerenkov;          // Number of cerekov photons 
443   TFlukaMCGeometry    *fGeom;               // TGeo-FLUKA interface
444   TGeoMCGeometry      *fMCGeo;              // Interface to TGeo builder
445
446   // SetProcess, SetCut and user Scoring dynamic storage
447   TObjArray* fUserConfig;            // List of user physics configuration 
448   TObjArray* fUserScore;             // List of user scoring options
449   
450
451   ClassDef(TFluka,1)  //C++ interface to Fluka montecarlo
452
453
454   // Temporary implementation of new functions
455   // To be removed with the next release
456 };
457   inline Int_t TFluka::NofVolDaughters(const char* /*volName*/) const {
458     Warning("NofVolDaughters", "New function - not yet implemented.");
459     return 0;
460   }
461
462   inline const char*  TFluka::VolDaughterName(const char* /*volName*/, Int_t /*i*/) const {
463     Warning("VolDaughterName", "New function - not yet implemented.");
464     return "";
465   }
466
467   inline Int_t  TFluka::VolDaughterCopyNo(const char* /*volName*/, Int_t /*i*/) const {
468     Warning("VolDaughterCopyNo", "New function - not yet implemented.");
469     return 0;
470   }
471
472
473 inline void TFluka::DefineOpSurface(const char* /*name*/, EMCOpSurfaceModel /*model*/, EMCOpSurfaceType /*surface*/,
474                                     EMCOpSurfaceFinish /*surfaceFinish*/, Double_t /*sigmaAlpha*/)
475 {
476     Warning("DefineOpSurface", "New function - not yet implemented.");
477 }
478
479
480 inline void TFluka::SetBorderSurface(const char* /*name*/, const char* /*vol1Name*/, int /*vol1CopyNo*/, const char* /*vol2Name*/,
481                                      int /*vol2CopyNo*/, const char* /*opSurfaceName*/)
482 {
483     Warning("SetBorderSurface", "New function - not yet implemented."); 
484 }
485
486   
487 inline void TFluka::SetSkinSurface(const char* /*name*/, const char* /*volName*/, const char* /*opSurfaceName*/)
488 {
489     Warning("SetSkinSurface", "New function - not yet implemented.");
490 }
491
492   
493 inline void TFluka::SetMaterialProperty(Int_t /*itmed*/, const char* /*propertyName*/, Int_t /*np*/, Double_t* /*pp*/, Double_t* /*values*/)
494 {
495     Warning("SetMaterialProperty", "New function - not yet implemented."); 
496 }
497
498
499 inline void TFluka::SetMaterialProperty(Int_t /*itmed*/, const char* /*propertyName*/, Double_t /*value*/)
500 {
501     Warning("SetMaterialProperty", "New function - not yet implemented.");
502 }
503
504
505 inline void TFluka::SetMaterialProperty(const char* /*surfaceName*/, const char* /*propertyName*/, Int_t /*np*/,
506                                         Double_t* /*pp*/, Double_t* /*values*/)
507 {
508     Warning("SetMaterialProperty", "New function - not yet implemented.");       
509 }
510
511
512
513 #endif //TFLUKA
514