6f5667d1 |
1 | #ifndef TFLUKA_H |
2 | #define TFLUKA_H |
829fb838 |
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" |
829fb838 |
18 | |
19 | //Forward declaration |
6f5667d1 |
20 | class TGeoMCGeometry; |
829fb838 |
21 | class TFlukaMCGeometry; |
22 | class TGeoMaterial; |
23 | |
24 | class TFluka : public TVirtualMC { |
25 | |
26 | public: |
27 | TFluka(const char *title, Int_t verbosity = 0, Bool_t isRootGeometrySupported = 0); |
28 | TFluka(); |
29 | virtual ~TFluka(); |
30 | |
31 | // |
32 | // methods for building/management of geometry |
33 | // ------------------------------------------------ |
34 | // |
35 | |
36 | // functions from GCONS |
37 | virtual void Gfmate(Int_t imat, char *name, Float_t &a, Float_t &z, |
38 | Float_t &dens, Float_t &radl, Float_t &absl, |
39 | Float_t* ubuf, Int_t& nbuf); |
40 | virtual void Gfmate(Int_t imat, char *name, Double_t &a, Double_t &z, |
41 | Double_t &dens, Double_t &radl, Double_t &absl, |
42 | Double_t* ubuf, Int_t& nbuf); |
43 | |
44 | // detector composition |
45 | virtual void Material(Int_t& kmat, const char* name, Double_t a, |
46 | Double_t z, Double_t dens, Double_t radl, Double_t absl, |
47 | Float_t* buf, Int_t nwbuf); |
48 | virtual void Material(Int_t& kmat, const char* name, Double_t a, |
49 | Double_t z, Double_t dens, Double_t radl, Double_t absl, |
50 | Double_t* buf, Int_t nwbuf); |
51 | virtual void Mixture(Int_t& kmat, const char *name, Float_t *a, |
52 | Float_t *z, Double_t dens, Int_t nlmat, Float_t *wmat); |
53 | virtual void Mixture(Int_t& kmat, const char *name, Double_t *a, |
54 | Double_t *z, Double_t dens, Int_t nlmat, Double_t *wmat); |
55 | virtual void Medium(Int_t& kmed, const char *name, Int_t nmat, |
56 | Int_t isvol, Int_t ifield, Double_t fieldm, Double_t tmaxfd, |
57 | Double_t stemax, Double_t deemax, Double_t epsil, |
58 | Double_t stmin, Float_t* ubuf, Int_t nbuf); |
59 | virtual void Medium(Int_t& kmed, const char *name, Int_t nmat, |
60 | Int_t isvol, Int_t ifield, Double_t fieldm, Double_t tmaxfd, |
61 | Double_t stemax, Double_t deemax, Double_t epsil, |
62 | Double_t stmin, Double_t* ubuf, Int_t nbuf); |
63 | virtual void Matrix(Int_t& krot, Double_t thetaX, Double_t phiX, |
64 | Double_t thetaY, Double_t phiY, Double_t thetaZ, |
65 | Double_t phiZ); |
66 | virtual void Gstpar(Int_t itmed, const char *param, Double_t parval); |
67 | |
68 | // functions from GGEOM |
69 | virtual Int_t Gsvolu(const char *name, const char *shape, Int_t nmed, |
70 | Float_t *upar, Int_t np); |
71 | virtual Int_t Gsvolu(const char *name, const char *shape, Int_t nmed, |
72 | Double_t *upar, Int_t np); |
73 | virtual void Gsdvn(const char *name, const char *mother, Int_t ndiv, |
74 | Int_t iaxis); |
75 | virtual void Gsdvn2(const char *name, const char *mother, Int_t ndiv, |
76 | Int_t iaxis, Double_t c0i, Int_t numed); |
77 | virtual void Gsdvt(const char *name, const char *mother, Double_t step, |
78 | Int_t iaxis, Int_t numed, Int_t ndvmx); |
79 | virtual void Gsdvt2(const char *name, const char *mother, Double_t step, |
80 | Int_t iaxis, Double_t c0, Int_t numed, Int_t ndvmx); |
81 | virtual void Gsord(const char *name, Int_t iax); |
82 | virtual void Gspos(const char *name, Int_t nr, const char *mother, |
83 | Double_t x, Double_t y, Double_t z, Int_t irot, |
84 | const char *konly="ONLY"); |
85 | virtual void Gsposp(const char *name, Int_t nr, const char *mother, |
86 | Double_t x, Double_t y, Double_t z, Int_t irot, |
87 | const char *konly, Float_t *upar, Int_t np); |
88 | virtual void Gsposp(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, Double_t *upar, Int_t np); |
91 | virtual void Gsbool(const char* onlyVolName, const char* manyVolName); |
92 | |
93 | virtual void SetCerenkov(Int_t itmed, Int_t npckov, Float_t *ppckov, |
94 | Float_t *absco, Float_t *effic, Float_t *rindex); |
95 | virtual void SetCerenkov(Int_t itmed, Int_t npckov, Double_t *ppckov, |
96 | Double_t *absco, Double_t *effic, Double_t *rindex); |
97 | |
98 | |
99 | // functions for drawing |
100 | virtual void DrawOneSpec(const char* /*name*/) |
101 | {printf("WARNING: DrawOneSpec not yet implemented !\n");} |
102 | virtual void Gsatt(const char* name, const char* att, Int_t val); |
103 | virtual void Gdraw(const char*,Double_t /*theta = 30*/, Double_t /*phi = 30*/, |
104 | Double_t /*psi = 0*/, Double_t /*u0 = 10*/, Double_t /*v0 = 10*/, |
105 | Double_t /*ul = 0.01*/, Double_t /*vl = 0.01*/) |
106 | {printf("WARNING: Gdraw not yet implemented !\n");} |
107 | |
108 | // Euclid |
109 | virtual void WriteEuclid(const char*, const char*, Int_t, Int_t); |
110 | |
111 | // get methods |
112 | virtual Int_t VolId(const Text_t* volName) const; |
113 | virtual const char* VolName(Int_t id) const; |
114 | virtual Int_t NofVolumes() const {return fNVolumes;} |
115 | virtual Int_t VolId2Mate(Int_t id) const; |
116 | // |
117 | // methods for physics management |
118 | // ------------------------------------------------ |
119 | // |
120 | |
121 | // set methods |
122 | virtual Bool_t SetProcess(const char* flagName, Int_t flagValue); |
123 | virtual void SetProcess(const char* flagName, Int_t flagValue, Int_t imed); |
124 | virtual Bool_t SetCut(const char* cutName, Double_t cutValue); |
125 | virtual void SetCut(const char* cutName, Double_t cutValue, Int_t imed); |
126 | virtual Double_t Xsec(char*, Double_t, Int_t, Int_t); |
127 | |
128 | // particle table usage |
129 | virtual Int_t IdFromPDG(Int_t id) const; |
130 | virtual Int_t PDGFromId(Int_t pdg) const; |
131 | virtual void DefineParticles() |
132 | {printf("WARNING: DefineParticles not yet implemented !\n");} |
133 | |
134 | // |
135 | // methods for step management |
136 | // ------------------------------------------------ |
137 | // |
138 | |
139 | // action methods |
bd3d5c8a |
140 | virtual void StopTrack(); |
141 | virtual void ResetStoppingCondition() {fStopped = kFALSE;} |
142 | virtual Bool_t GetStoppingCondition() {return fStopped;} |
143 | |
829fb838 |
144 | virtual void StopEvent() |
145 | {printf("WARNING: StopEvent not yet implemented !\n");} |
146 | virtual void StopRun() |
147 | {printf("WARNING: StopRun not yet implemented !\n");} |
148 | |
149 | // set methods |
150 | virtual void SetMaxStep(Double_t); |
151 | virtual void SetMaxNStep(Int_t); |
152 | virtual void SetUserDecay(Int_t); |
153 | |
154 | // get methods |
155 | // tracking volume(s) |
156 | virtual Int_t CurrentVolID(Int_t& copyNo) const; |
157 | virtual Int_t CurrentVolOffID(Int_t off, Int_t& copyNo) const; |
158 | virtual const char* CurrentVolName() const; |
159 | virtual const char* CurrentVolOffName(Int_t off) const; |
160 | virtual Int_t CurrentMaterial(Float_t &a, Float_t &z, |
161 | Float_t &dens, Float_t &radl, Float_t &absl) const; |
162 | virtual Int_t CurrentEvent() const |
163 | {printf("WARNING: CurrentEvent not yet implemented !\n"); return -1;} |
164 | virtual void Gmtod(Float_t* xm, Float_t* xd, Int_t iflag); |
165 | |
166 | virtual void Gmtod(Double_t* xm, Double_t* xd, Int_t iflag); |
167 | |
168 | virtual void Gdtom(Float_t* xd, Float_t* xm, Int_t iflag); |
169 | |
170 | virtual void Gdtom(Double_t* xd, Double_t* xm, Int_t iflag); |
171 | |
172 | virtual Double_t MaxStep() const |
173 | {printf("WARNING: MaxStep not yet implemented !\n"); return -1.;} |
174 | virtual Int_t GetMaxNStep() const |
175 | {printf("WARNING: GetMaxNStep not yet implemented !\n"); return -1;} |
176 | virtual Int_t GetMedium() const; |
177 | |
178 | // tracking particle |
179 | // dynamic properties |
180 | virtual void TrackPosition(TLorentzVector& position) const; |
181 | virtual void TrackPosition(Double_t& x, Double_t& y, Double_t& z) const; |
182 | virtual void TrackMomentum(TLorentzVector& momentum) const; |
183 | virtual void TrackMomentum(Double_t& px, Double_t& py, Double_t& pz, Double_t& e) const; |
184 | virtual Double_t TrackStep() const; |
185 | virtual Double_t TrackLength() const; |
186 | virtual Double_t TrackTime() const; |
187 | virtual Double_t Edep() const; |
188 | // static properties |
189 | virtual Int_t TrackPid() const; |
190 | virtual Double_t TrackCharge() const; |
191 | virtual Double_t TrackMass() const; |
192 | virtual Double_t Etot() const; |
193 | // track status |
194 | virtual Bool_t IsNewTrack() const; |
195 | virtual Bool_t IsTrackInside() const; |
196 | virtual Bool_t IsTrackEntering() const; |
197 | virtual Bool_t IsTrackExiting() const; |
198 | virtual Bool_t IsTrackOut() const; |
199 | virtual Bool_t IsTrackDisappeared() const; |
200 | virtual Bool_t IsTrackStop() const; |
201 | virtual Bool_t IsTrackAlive() const; |
202 | |
203 | // secondaries |
204 | virtual Int_t NSecondaries() const ; |
205 | virtual void GetSecondary(Int_t isec, Int_t& particleId, |
206 | TLorentzVector& position, TLorentzVector& momentum); |
bd3d5c8a |
207 | virtual Bool_t SecondariesAreOrdered() const {return kFALSE;} |
829fb838 |
208 | virtual TMCProcess ProdProcess(Int_t iproc) const ; |
209 | virtual Int_t StepProcesses(TArrayI &/*proc*/) const |
210 | {printf("WARNING: StepProcesses not yet implemented !\n"); return -1;} |
211 | |
212 | |
213 | // |
214 | // Geant3 specific methods |
215 | // !!! need to be transformed to common interface |
216 | // |
217 | virtual void Gdopt(const char*,const char*) |
218 | {printf("WARNING: Gdopt not yet implemented !\n");} |
219 | virtual void SetClipBox(const char*,Double_t=-9999,Double_t=0, Double_t=-9999, |
220 | Double_t=0,Double_t=-9999,Double_t=0) |
221 | {printf("WARNING: SetClipBox not yet implemented !\n");} |
222 | virtual void DefaultRange() |
223 | {printf("WARNING: DefaultRange not yet implemented !\n");} |
224 | virtual void Gdhead(Int_t, const char*, Double_t=0) |
225 | {printf("WARNING: Gdhead not yet implemented !\n");} |
226 | virtual void Gdman(Double_t, Double_t, const char*) |
227 | {printf("WARNING: Gdman not yet implemented !\n");} |
228 | virtual void SetColors() |
229 | {printf("WARNING: SetColors not yet implemented !\n");} |
230 | virtual void Gtreve() |
231 | {printf("WARNING: Gtreve not yet implemented !\n");} |
232 | virtual void GtreveRoot() |
233 | {printf("WARNING: GtreveRoot not yet implemented !\n");} |
234 | virtual void Gckmat(Int_t, char*) |
235 | {printf("WARNING: Gckmat not yet implemented !\n");} |
236 | virtual void InitLego() |
237 | {printf("WARNING: InitLego not yet implemented !\n");} |
238 | virtual void Gfpart(Int_t, char*, Int_t&, Float_t&, Float_t&, Float_t&) |
239 | {printf("WARNING: Gfpart not yet implemented !\n");} |
240 | virtual void Gspart(Int_t, const char*, Int_t, Double_t, Double_t, Double_t) |
241 | {printf("WARNING: Gspart not yet implemented !\n");} |
242 | |
243 | // Dummy methods |
244 | virtual Bool_t DefineParticle(int, const char*, TMCParticleType, double, double, double) {return kTRUE;} |
245 | virtual Bool_t DefineIon(const char*, int, int, int, double, double) {return kTRUE;} |
246 | virtual TString ParticleName(int) const {return "";} |
247 | virtual Double_t ParticleMass(int) const {return 0.;} |
248 | virtual Double_t ParticleCharge(int) const {return 0.;} |
249 | virtual Double_t ParticleLifeTime(int) const {return 0.;} |
250 | virtual TMCParticleType ParticleMCType(int) const {return (TMCParticleType) 0;} |
251 | // |
252 | // control methods |
253 | // ------------------------------------------------ |
254 | // |
255 | |
256 | virtual void Init(); |
257 | virtual void InitPhysics(); |
258 | virtual void FinishGeometry(); |
259 | virtual void BuildPhysics(); |
260 | virtual void ProcessEvent(); |
261 | virtual Bool_t ProcessRun(Int_t nevent); |
262 | |
263 | // |
264 | //New Getter and Setters |
265 | // ------------------------------------------------ |
266 | // |
267 | // - Core input file name |
268 | TString GetCoreInputFileName() const {return fCoreInputFileName;} |
3b8c325d |
269 | void SetCoreInputFileName(const char* file = "coreFlukaVmc.inp") {fCoreInputFileName = file;} |
829fb838 |
270 | |
271 | // - Input file name |
272 | TString GetInputFileName() const {return fInputFileName;} |
3b8c325d |
273 | void SetInputFileName(const char* file = "FlukaVmc.inp") {fInputFileName = file;} |
829fb838 |
274 | |
829fb838 |
275 | // - Verbosity level |
276 | Int_t GetVerbosityLevel() const {return fVerbosityLevel;} |
277 | void SetVerbosityLevel(Int_t l) {fVerbosityLevel = l;} |
278 | |
279 | // - Fluka Draw procedures identifiers |
280 | // bxdraw = 1 inside |
281 | // bxdraw = 11 entering |
282 | // bxdraw = 12 exiting |
283 | // eedraw = 2 |
284 | // endraw = 3 |
285 | // mgdraw = 4 |
286 | // sodraw = 5 |
287 | // usdraw = 6 |
288 | Int_t GetCaller() const {return fCaller;} |
289 | void SetCaller(Int_t l) {fCaller = l;} |
290 | |
291 | // - Fluka Draw procedures formal parameters |
292 | Int_t GetIcode() const {return fIcode;} |
293 | void SetIcode(Int_t l) {fIcode = l;} |
294 | // in the case of sodraw fIcode=0 |
295 | |
296 | Int_t GetMreg() const {return fCurrentFlukaRegion;} |
297 | void SetMreg(Int_t l); |
298 | |
299 | Int_t GetNewreg() const {return fNewReg;} |
300 | void SetNewreg(Int_t l) {fNewReg = l;} |
301 | |
302 | Double_t GetRull() const {return fRull;} |
303 | void SetRull(Double_t r) {fRull = r;} |
304 | |
305 | Double_t GetXsco() const {return fXsco;} |
306 | void SetXsco(Double_t x) {fXsco = x;} |
307 | |
308 | Double_t GetYsco() const {return fYsco;} |
309 | void SetYsco(Double_t y) {fYsco = y;} |
310 | |
311 | Double_t GetZsco() const {return fZsco;} |
312 | void SetZsco(Double_t z) {fZsco = z;} |
313 | |
314 | void SetCurrentFlukaRegion(Int_t reg) {fCurrentFlukaRegion=reg;} |
315 | Int_t GetCurrentFlukaRegion() const {return fCurrentFlukaRegion;} |
316 | |
317 | void SetDummyBoundary(Int_t mode) {fDummyBoundary = mode;} |
318 | Int_t GetDummyBoundary() const {return fDummyBoundary;} |
319 | Bool_t IsDummyBoundary() const {return (fDummyBoundary==0)?kFALSE:kTRUE;} |
320 | |
7f13be31 |
321 | void SetGeneratePemf(Bool_t flag = kTRUE) {fGeneratePemf = flag;} |
829fb838 |
322 | Bool_t IsGeneratePemf() const {return fGeneratePemf;} |
323 | |
324 | void EnableField(Bool_t flag=kTRUE) {fFieldFlag = flag;} |
325 | Bool_t IsFieldEnabled() const {return fFieldFlag;} |
326 | void SetTrackIsEntering(){fTrackIsEntering = kTRUE; fTrackIsExiting = kFALSE;} |
327 | void SetTrackIsExiting() {fTrackIsExiting = kTRUE; fTrackIsEntering = kFALSE;} |
328 | void SetTrackIsInside() {fTrackIsExiting = kFALSE; fTrackIsEntering = kFALSE;} |
7cad64b7 |
329 | void SetTrackIsNew(Bool_t flag = kTRUE); |
330 | |
6f5667d1 |
331 | Int_t GetMaterialIndex(Int_t idmat) const {return fMaterials[idmat];} |
829fb838 |
332 | TObjArray *GetFlukaMaterials(); |
1df5fa54 |
333 | // |
334 | // Fluka specific scoring options |
335 | // |
829fb838 |
336 | |
1df5fa54 |
337 | Bool_t SetFlukaScoringOption(Float_t what[12], const char* sdum) {return kTRUE;} |
829fb838 |
338 | |
339 | private: |
340 | TFluka(const TFluka &mc): TVirtualMC(mc) {;} |
341 | TFluka & operator=(const TFluka &) {return (*this);} |
342 | |
343 | |
344 | Int_t fVerbosityLevel; //Verbosity level (0 lowest - 3 highest) |
345 | |
3b8c325d |
346 | TString fInputFileName; //Name of the real input file |
347 | TString fCoreInputFileName; //Name of the input file |
829fb838 |
348 | |
349 | Int_t fCaller; //Parameter to indicate who is the caller of the Fluka Draw |
350 | Int_t fIcode; //Fluka Draw procedures formal parameter |
351 | Int_t fNewReg; //Fluka Draw procedures formal parameter |
352 | Double_t fRull; //Fluka Draw procedures formal parameter |
353 | Double_t fXsco; //Fluka Draw procedures formal parameter |
354 | Double_t fYsco; //Fluka Draw procedures formal parameter |
355 | Double_t fZsco; //Fluka Draw procedures formal parameter |
356 | Bool_t fTrackIsEntering; // Flag for track entering |
357 | Bool_t fTrackIsExiting; // Flag for track exiting |
358 | Bool_t fTrackIsNew; // Flag for new track |
359 | Bool_t fFieldFlag; // Flag for magnetic field |
360 | Bool_t fGeneratePemf; // Flag for automatic .pemf generation |
361 | Int_t fDummyBoundary; // Flag for crossing dummy boundaries |
bd3d5c8a |
362 | Bool_t fStopped; // Flag for stopping |
363 | |
829fb838 |
364 | |
365 | //Geometry through TGeo |
366 | Int_t* fMaterials; //!Array of indices |
367 | Int_t fNVolumes; //!Current number of volumes |
368 | Int_t fCurrentFlukaRegion; //Index of fluka region at each step |
369 | TFlukaMCGeometry *fGeom; // TGeo-FLUKA interface |
370 | TGeoMCGeometry *fMCGeo; // Interface to TGeo builder |
371 | |
1df5fa54 |
372 | // SetProcess, SetCut and user Scoring dynamic storage |
373 | TObjArray* fProcesses; // List of processes |
374 | TObjArray* fCuts; // List of cuts |
375 | TObjArray* fUserScore; // List of user scoring options |
376 | |
829fb838 |
377 | ClassDef(TFluka,1) //C++ interface to Fluka montecarlo |
378 | }; |
379 | |
380 | #endif //TFLUKA |
381 | |