7137149c64bc21da9b9abe72688f49ed4eba7b36
[u/mrichter/AliRoot.git] / TOF / AliTOF.cxx
1 /**************************************************************************
2  * Copyright(c) 1998-1999, ALICE Experiment at CERN, All rights reserved. *
3  *                                                                        *
4  * Author: The ALICE Off-line Project.                                    *
5  * Contributors are mentioned in the code where appropriate.              *
6  *                                                                        *
7  * Permission to use, copy, modify and distribute this software and its   *
8  * documentation strictly for non-commercial purposes is hereby granted   *
9  * without fee, provided that the above copyright notice appears in all   *
10  * copies and that both the copyright notice and this permission notice   *
11  * appear in the supporting documentation. The authors make no claims     *
12  * about the suitability of this software for any purpose. It is          *
13  * provided "as is" without express or implied warranty.                  *
14  **************************************************************************/
15
16 /*
17 $Log$
18 */
19
20 ///////////////////////////////////////////////////////////////////////////////
21 //                                                                           //
22 //  Time Of Flight                                                           //
23 //  This class contains the basic functions for the Time Of Flight           //
24 //  detector. Functions specific to one particular geometry are              //
25 //  contained in the derived classes                                         //
26 //                                                                           //
27 //Begin_Html
28 /*
29 <img src="picts/AliTOFClass.gif">
30 */
31 //End_Html
32 //                                                                           //
33 //                                                                           //
34 ///////////////////////////////////////////////////////////////////////////////
35
36 #include "AliTOF.h"
37 #include <TNode.h>
38 #include <TTUBE.h>
39 #include <TBRIK.h>
40 #include "AliRun.h"
41 #include "AliConst.h"
42 #include <stdlib.h>
43  
44 ClassImp(AliTOF)
45  
46 //_____________________________________________________________________________
47 AliTOF::AliTOF()
48 {
49   //
50   // Default constructor
51   //
52   fIshunt   = 0;
53 }
54  
55 //_____________________________________________________________________________
56 AliTOF::AliTOF(const char *name, const char *title)
57        : AliDetector(name,title)
58 {
59   //
60   // AliTOF standard constructor
61   // 
62   fHits   = new TClonesArray("AliTOFhit",  405);
63   //
64   fIshunt     =  0;
65   //
66   SetMarkerColor(7);
67   SetMarkerStyle(2);
68   SetMarkerSize(0.4);
69   //
70   // Check that FRAME is there otherwise we have no place where to
71   // put TOF
72   AliModule* FRAME=gAlice->GetModule("FRAME");
73   if(!FRAME) {
74     Error("Ctor","TOF needs FRAME to be present\n");
75     exit(1);
76   }
77 }
78
79 //_____________________________________________________________________________
80 void AliTOF::AddHit(Int_t track, Int_t *vol, Float_t *hits)
81 {
82   //
83   // Add a TOF hit
84   //
85   TClonesArray &lhits = *fHits;
86   new(lhits[fNhits++]) AliTOFhit(fIshunt,track,vol,hits);
87 }
88  
89 //_____________________________________________________________________________
90 void AliTOF::BuildGeometry()
91 {
92   //
93   // Build TOF ROOT geometry for the ALICE event viewver
94   //
95   TNode *Node, *Top;
96   const int kColorTOF  = 27;
97   //
98   // Find top TNODE
99   Top=gAlice->GetGeometry()->GetNode("alice");
100   //
101   // Define rotation matrixes
102   new TRotMatrix("rot501","rot501",90,-20,90,90-20,0,0);
103   new TRotMatrix("rot502","rot502",90,-40,90,90-40,0,0);
104   new TRotMatrix("rot503","rot503",90,-60,90,90-60,0,0);
105   new TRotMatrix("rot504","rot504",90,-80,90,90-80,0,0);
106   new TRotMatrix("rot505","rot505",90,-100,90,90-100,0,0);
107   new TRotMatrix("rot506","rot506",90,-120,90,90-120,0,0);
108   new TRotMatrix("rot507","rot507",90,-140,90,90-140,0,0);
109   new TRotMatrix("rot508","rot508",90,-160,90,90-160,0,0);
110   new TRotMatrix("rot509","rot509",90,-180,90,90-180,0,0);
111   new TRotMatrix("rot510","rot510",90,-200,90,90-200,0,0);
112   new TRotMatrix("rot511","rot511",90,-220,90,90-220,0,0);
113   new TRotMatrix("rot512","rot512",90,-240,90,90-240,0,0);
114   new TRotMatrix("rot513","rot513",90,-260,90,90-260,0,0);
115   new TRotMatrix("rot514","rot514",90,-280,90,90-280,0,0);
116   new TRotMatrix("rot515","rot515",90,-300,90,90-300,0,0);
117   new TRotMatrix("rot516","rot516",90,-320,90,90-320,0,0);
118   new TRotMatrix("rot517","rot517",90,-340,90,90-340,0,0);
119   new TRotMatrix("rot518","rot518",90,-360,90,90-360,0,0);
120   //
121   // Position the different copies
122   const Float_t rtof=(399+370)/2;
123   const Int_t ntof=18;
124   const Float_t angle=2*kPI/ntof;
125   Float_t ang;
126   //
127   // Define TOF basic volume
128   new TBRIK("S_TOF1","TOF box","void",130/2,29/2,190.);
129   //
130   // Position it
131   Top->cd();
132   ang=2.5*angle;
133   Node = new TNode("FTO002","FTO02","S_TOF1",rtof*TMath::Cos(ang),rtof*TMath::Sin(ang),190,"rot502");
134   Node->SetLineColor(kColorTOF);
135   fNodes->Add(Node); 
136   //
137   Top->cd();
138   Node = new TNode("FTO102","FTO102","S_TOF1",rtof*TMath::Cos(ang),rtof*TMath::Sin(ang),-190,"rot502");
139   Node->SetLineColor(kColorTOF);
140   fNodes->Add(Node); 
141   //
142   //
143   Top->cd();
144   ang=1.5*angle;
145   Node = new TNode("FTO003","FTO003","S_TOF1",rtof*TMath::Cos(ang),rtof*TMath::Sin(ang),190,"rot503");
146   Node->SetLineColor(kColorTOF);
147   fNodes->Add(Node); 
148   //
149   Top->cd();
150   Node = new TNode("FTO103","FTO103","S_TOF1",rtof*TMath::Cos(ang),rtof*TMath::Sin(ang),-190,"rot503");
151   Node->SetLineColor(kColorTOF);
152   fNodes->Add(Node); 
153   //
154   //
155   Top->cd();  
156   ang=0.5*angle;
157   Node = new TNode("FTO004","FTO004","S_TOF1",rtof*TMath::Cos(ang),rtof*TMath::Sin(ang),190,"rot504");
158   Node->SetLineColor(kColorTOF);
159   fNodes->Add(Node);
160   //
161   Top->cd();
162   Node = new TNode("FTO104","FTO104","S_TOF1",rtof*TMath::Cos(ang),rtof*TMath::Sin(ang),-190,"rot504");
163   Node->SetLineColor(kColorTOF);
164   fNodes->Add(Node); 
165   //
166   //
167   Top->cd();
168   ang=-0.5*angle;
169   Node = new TNode("FTO005","FTO005","S_TOF1",rtof*TMath::Cos(ang),rtof*TMath::Sin(ang),190,"rot505");
170   Node->SetLineColor(kColorTOF);
171   fNodes->Add(Node); 
172   //
173   Top->cd();
174   Node = new TNode("FTO105","FTO105","S_TOF1",rtof*TMath::Cos(ang),rtof*TMath::Sin(ang),-190,"rot505");
175   Node->SetLineColor(kColorTOF);
176   fNodes->Add(Node); 
177   //
178   //
179   Top->cd();
180   ang=-1.5*angle;
181   Node = new TNode("FTO006","FTO006","S_TOF1",rtof*TMath::Cos(ang),rtof*TMath::Sin(ang),190,"rot506");
182   Node->SetLineColor(kColorTOF);
183   fNodes->Add(Node); 
184   //
185   Top->cd();
186   Node = new TNode("FTO106","FTO106","S_TOF1",rtof*TMath::Cos(ang),rtof*TMath::Sin(ang),-190,"rot506");
187   Node->SetLineColor(kColorTOF);
188   fNodes->Add(Node); 
189   //
190   //
191   Top->cd();  
192   ang=kPI+1.5*angle;
193   Node = new TNode("FTO012","FTO012","S_TOF1",rtof*TMath::Cos(ang),rtof*TMath::Sin(ang),190,"rot512");
194   Node->SetLineColor(kColorTOF);
195   fNodes->Add(Node); 
196   //
197   Top->cd();
198   Node = new TNode("FTO112","FTO112","S_TOF1",rtof*TMath::Cos(ang),rtof*TMath::Sin(ang),-190,"rot512");
199   Node->SetLineColor(kColorTOF);
200   fNodes->Add(Node); 
201   //
202   //
203   Top->cd();
204   ang=kPI+0.5*angle;
205   Node = new TNode("FTO013","FTO013","S_TOF1",rtof*TMath::Cos(ang),rtof*TMath::Sin(ang),190,"rot513");
206   Node->SetLineColor(kColorTOF);
207   fNodes->Add(Node); 
208   //
209   Top->cd();
210   Node = new TNode("FTO113","FTO113","S_TOF1",rtof*TMath::Cos(ang),rtof*TMath::Sin(ang),-190,"rot513");
211   Node->SetLineColor(kColorTOF);
212   fNodes->Add(Node); 
213   //
214   //
215   Top->cd();
216   ang=kPI-0.5*angle;
217   Node = new TNode("FTO014","FTO04","S_TOF1",rtof*TMath::Cos(ang),rtof*TMath::Sin(ang),190,"rot514");
218   Node->SetLineColor(kColorTOF);
219   fNodes->Add(Node); 
220   //
221   Top->cd();
222   Node = new TNode("FTO114","FTO114","S_TOF1",rtof*TMath::Cos(ang),rtof*TMath::Sin(ang),-190,"rot514");
223   Node->SetLineColor(kColorTOF);
224   fNodes->Add(Node); 
225   //
226   //
227   Top->cd();
228   ang=kPI-1.5*angle;
229   Node = new TNode("FTO015","FTO015","S_TOF1",rtof*TMath::Cos(ang),rtof*TMath::Sin(ang),190,"rot515");
230   Node->SetLineColor(kColorTOF);
231   fNodes->Add(Node); 
232   //
233   Top->cd();
234   Node = new TNode("FTO115","FTO115","S_TOF1",rtof*TMath::Cos(ang),rtof*TMath::Sin(ang),-190,"rot515");
235   Node->SetLineColor(kColorTOF);
236   fNodes->Add(Node); 
237   //
238   //
239   Top->cd();
240   ang=kPI-2.5*angle;
241   Node = new TNode("FTO016","FTO016","S_TOF1",rtof*TMath::Cos(ang),rtof*TMath::Sin(ang),190,"rot516");
242   Node->SetLineColor(kColorTOF);
243   fNodes->Add(Node); 
244   //
245   Top->cd();
246   Node = new TNode("FTO116","FTO116","S_TOF1",rtof*TMath::Cos(ang),rtof*TMath::Sin(ang),-190,"rot516");
247   Node->SetLineColor(kColorTOF);
248   fNodes->Add(Node); 
249   //
250   //
251   // Define second TOF volume
252   new TBRIK("S_TOF2","TOF box","void",130/2,29/2,170.);
253   //
254   // Position the volume
255   Top->cd();
256   ang=-2.5*angle;
257   Node = new TNode("FTO007","FTO007","S_TOF2",rtof*TMath::Cos(ang),rtof*TMath::Sin(ang),(2*190-170),"rot507");
258   Node->SetLineColor(kColorTOF);
259   fNodes->Add(Node); 
260   //
261   Top->cd();
262   Node = new TNode("FTO107","FTO107","S_TOF2",rtof*TMath::Cos(ang),rtof*TMath::Sin(ang),-(2*190-170),"rot507");
263   Node->SetLineColor(kColorTOF);
264   fNodes->Add(Node); 
265   //
266   //
267   Top->cd();
268   ang=-3.5*angle;
269   Node = new TNode("FTO008","FTO008","S_TOF2",rtof*TMath::Cos(ang),rtof*TMath::Sin(ang),(2*190-170),"rot508");
270   Node->SetLineColor(kColorTOF);
271   fNodes->Add(Node); 
272   //
273   Top->cd();
274   Node = new TNode("FTO108","FTO108","S_TOF2",rtof*TMath::Cos(ang),rtof*TMath::Sin(ang),-(2*190-170),"rot508");
275   Node->SetLineColor(kColorTOF);
276   fNodes->Add(Node); 
277   //
278   //
279   Top->cd();
280   ang=-kPI/2;
281   Node = new TNode("FTO009","FTO009","S_TOF2",rtof*TMath::Cos(ang),rtof*TMath::Sin(ang),(2*190-170),"rot509");
282   Node->SetLineColor(kColorTOF);
283   fNodes->Add(Node); 
284   //
285   Top->cd();
286   Node = new TNode("FTO109","FTO109","S_TOF2",rtof*TMath::Cos(ang),rtof*TMath::Sin(ang),-(2*190-170),"rot509");
287   Node->SetLineColor(kColorTOF);
288   fNodes->Add(Node); 
289   //
290   //
291   Top->cd();
292   ang=kPI+3.5*angle;
293   Node = new TNode("FTO010","FTO010","S_TOF2",rtof*TMath::Cos(ang),rtof*TMath::Sin(ang),(2*190-170),"rot510");
294   Node->SetLineColor(kColorTOF);
295   fNodes->Add(Node); 
296   //
297   Top->cd();
298   Node = new TNode("FTO110","FTO110","S_TOF2",rtof*TMath::Cos(ang),rtof*TMath::Sin(ang),-(2*190-170),"rot510");
299   Node->SetLineColor(kColorTOF);
300   fNodes->Add(Node); 
301   //
302   //
303   Top->cd();
304   ang=kPI+2.5*angle;
305   Node = new TNode("FTO011","FTO011","S_TOF2",rtof*TMath::Cos(ang),rtof*TMath::Sin(ang),(2*190-170),"rot511");
306   Node->SetLineColor(kColorTOF);
307   fNodes->Add(Node); 
308   //
309   Top->cd();
310   Node = new TNode("FTO111","FTO111","S_TOF2",rtof*TMath::Cos(ang),rtof*TMath::Sin(ang),-(2*190-170),"rot511");
311   Node->SetLineColor(kColorTOF);
312   fNodes->Add(Node); 
313   //
314   //
315   // Define third TOF volume
316   new TBRIK("S_TOF3","TOF box","void",130/2.,29/2,75.);
317   //
318   // Position it
319   Top->cd();
320   ang=3.5*angle;
321   Node = new TNode("FTO001","FTO001","S_TOF3",rtof*TMath::Cos(ang),rtof*TMath::Sin(ang),(2*190-75),"rot501");
322   Node->SetLineColor(kColorTOF);
323   fNodes->Add(Node); 
324   //
325   Top->cd();
326   Node = new TNode("FTO101","FTO101","S_TOF3",rtof*TMath::Cos(ang),rtof*TMath::Sin(ang),-(2*190-75),"rot501");
327   Node->SetLineColor(kColorTOF);
328   fNodes->Add(Node); 
329   //
330   //
331   Top->cd();
332   ang=kPI-3.5*angle;
333   Node = new TNode("FTO017","FTO017","S_TOF3",rtof*TMath::Cos(ang),rtof*TMath::Sin(ang),(2*190-75),"rot517");
334   Node->SetLineColor(kColorTOF);
335   fNodes->Add(Node); 
336   //
337   Top->cd();
338   Node = new TNode("FTO117","FTO117","S_TOF3",rtof*TMath::Cos(ang),rtof*TMath::Sin(ang),-(2*190-75),"rot517");
339   Node->SetLineColor(kColorTOF);
340   fNodes->Add(Node); 
341   //
342   //
343   Top->cd();
344   ang=kPI/2;
345   Node = new TNode("FTO018","FTO018","S_TOF3",rtof*TMath::Cos(ang),rtof*TMath::Sin(ang),(2*190-75),"rot518");
346   Node->SetLineColor(kColorTOF);
347   fNodes->Add(Node); 
348   //
349   Top->cd();
350   Node = new TNode("FTO118","FTO118","S_TOF3",rtof*TMath::Cos(ang),rtof*TMath::Sin(ang),-(2*190-75),"rot518");
351   Node->SetLineColor(kColorTOF);
352   fNodes->Add(Node); 
353 }
354
355 //_____________________________________________________________________________
356 void AliTOF::CreateGeometry()
357 {
358   //
359   // Common geometry code 
360   //
361   //Begin_Html
362   /*
363     <img src="picts/AliTOFv23.gif">
364   */
365   //End_Html
366   //
367
368   const Double_t kPi=TMath::Pi();
369   const Double_t kDegrad=kPi/180;
370   //
371   Int_t lmax;
372   Float_t xtof, ytof, fil_step;
373   Float_t zcor1, zcor2, zcor3;
374   Float_t ztof0, ztof1, ztof2;
375   Float_t zl, rmin, rmax, xm, ym, dwall;
376   Int_t idrotm[18];
377   Float_t zm0, zm1, zm2;
378   Float_t par[10];
379   //
380   Int_t *idtmed = fIdtmed->GetArray()-499;
381   //
382   // barrel iner radius 
383   rmin = 370.;
384   // barrel outer radius 
385   rmax = rmin+29;
386   // barrel length along Z axis
387   zl = (rmin+2/*distance to sencetive layer*/+7/2)*2;
388   //
389   // frame inbetween TOF modules
390   dwall = 4.;
391   // Sizes of TOF module with its support etc..
392   xtof = 2 * (rmin*TMath::Tan(10*kDegrad)-dwall/2-.5);
393   ytof = rmax-rmin;
394   ztof0 = zl/2;
395   // Is it full coverage version (3) or not
396   if (IsVersion() != 3) {
397   ztof1 = ztof0-rmax*TMath::Tan(7.8*kDegrad); // minus Z size of PHOS
398   ztof2 = ztof0-rmax*TMath::Tan(54.34/2*kDegrad); // minus Z size of HMPID;
399   } else {
400   ztof1 = ztof0;
401   ztof2 = ztof0;
402   }
403    // Number of TOF-modules 
404   lmax = 18;
405   //
406 /*
407   //Some imitation of TRD
408   par[0] = 281;
409   par[1] = 350.282;
410   par[2] = zl/2;
411   gMC->Gsvolu("FTRD", "TUBE", idtmed[510], par, 3);
412   gMC->Gspos("FTRD", 1, "ALIC", 0., 0., 0., 0, "ONLY");
413
414   par[0] = 0.;
415   par[1] = 360.;
416   par[2] = lmax;
417   par[3] = 2.;
418   par[4] = -zl/2;
419   par[5] = rmin;
420   par[6] = rmax;
421   par[7] = zl/2;
422   par[8] = rmin;
423   par[9] = rmax;
424   gMC->Gsvolu("FBAR", "PGON", idtmed[500], par, 10);
425   gMC->Gspos("FBAR", 1, "ALIC", 0., 0., 0., 0, "ONLY");
426 */
427   //
428   // TOF size  (CO2)
429   par[0] = xtof / 2.;
430   par[1] = ytof / 2.;
431   par[2] = ztof0 / 2.;
432   gMC->Gsvolu("FTO1", "BOX ", idtmed[506], par, 3);
433   par[2] = ztof1 / 2.;
434   gMC->Gsvolu("FTO2", "BOX ", idtmed[506], par, 3);
435   par[2] = ztof2 / 2.;
436   gMC->Gsvolu("FTO3", "BOX ", idtmed[506], par, 3);
437 /*
438   // Frame wall
439   par[0]=dwall/2.;
440   par[1]=(rmax-rmin)/2.;
441   par[2]=ztof0/2.;
442   gMC->Gsvolu("FFR1", "BOX ", idtmed[508], par, 3);
443   gMC->Gsatt("FFR1", "SEEN", -2);
444   par[2]=ztof1/2.;
445   gMC->Gsvolu("FFR2", "BOX ", idtmed[508], par, 3);
446   gMC->Gsatt("FFR2", "SEEN", -2);
447   par[2]=ztof2/2.;
448   gMC->Gsvolu("FFR2", "BOX ", idtmed[508], par, 3);
449   gMC->Gsatt("FFR2", "SEEN", -2);
450 */  
451   //
452   // Subtraction the distanse to TOF module boundaries 
453   xm = xtof -(.5 +.5)*2;
454   ym = ytof;
455   zm0 = ztof0;
456   zm1 = ztof1;
457   zm2 = ztof2;
458   //  
459 /////////////// TOF module internal definitions //////////////
460   TOFpc(xm, ym, zm0, zm1, zm2);
461 /////////////////////////////////////////////////////////////
462   //
463   // Position of modules
464   fil_step = 360./lmax;
465   zcor1 = ztof0/2;
466   zcor2 = ztof0 - ztof1 / 2.;
467   zcor3 = ztof0 - ztof2 / 2.;
468 /*
469   for (i = 1; i <= lmax; ++i) {
470     fil1 = fil_step * i;
471     xcor2 = (rmin+rmax)/2 * TMath::Sin(fil1 * kDegrad);
472     ycor2 = (rmin+rmax)/2 * TMath::Cos(fil1 * kDegrad);
473     lmax1 = i + lmax;
474     AliMatrix(idrotm[i], 90., -fil1, 90., 90. -fil1, 0., 0.);
475     if (i>=7 && i<=11) { // free space for PHOS
476       //    if (fil1 >= 180-50  && fil1 <= 180+50) {
477       gMC->Gspos("FTO2", i, "FBAR", xcor2, ycor2, zcor2, idrotm[i], "ONLY");
478       gMC->Gspos("FTO2", lmax1, "FBAR", xcor2, ycor2, -zcor2, idrotm[i], "ONLY");
479     } else if (i>=17 || i==1) { // free space for RICH
480       //    } else if (fil1 <= 30 || fil1 >= 360. - 30) {
481       gMC->Gspos("FTO3", i, "FBAR", xcor2, ycor2, zcor3, idrotm[i], "ONLY");
482       gMC->Gspos("FTO3", lmax1, "FBAR", xcor2, ycor2, -zcor3, idrotm[i], "ONLY");
483     } else {
484       gMC->Gspos("FTO1", i, "FBAR", xcor2, ycor2, zcor1, idrotm[i], "ONLY");
485       gMC->Gspos("FTO1", lmax1, "FBAR", xcor2, ycor2, -zcor1, idrotm[i], "ONLY");
486     }
487   }
488 */
489       AliMatrix(idrotm[0], 90., 0., 0., 0., 90, -90.);
490       gMC->Gspos("FTO2", 1, "BTO2", 0, zcor2, 0, idrotm[0], "ONLY");
491       gMC->Gspos("FTO2", 2, "BTO2", 0, -zcor2, 0, idrotm[0], "ONLY");
492
493       gMC->Gspos("FTO3", 1, "BTO3", 0, zcor3, 0, idrotm[0], "ONLY");
494       gMC->Gspos("FTO3", 2, "BTO3", 0, -zcor3, 0, idrotm[0], "ONLY");
495
496       gMC->Gspos("FTO1", 1, "BTO1", 0, zcor1, 0, idrotm[0], "ONLY");
497       gMC->Gspos("FTO1", 2, "BTO1", 0, -zcor1, 0, idrotm[0], "ONLY");
498 }
499
500 //_____________________________________________________________________________
501 void AliTOF::DrawModule()
502 {
503   //
504   // Draw a shaded view of the common part of the TOF geometry
505   //
506
507    cout << " Drawing of AliTOF"<< endl; 
508   // Set everything unseen
509   gMC->Gsatt("*", "seen", -1);
510   // 
511   // Set ALIC mother transparent
512   gMC->Gsatt("ALIC","SEEN",0);
513   //
514   // Set the volumes visible
515   gMC->Gsatt("FBAR","SEEN",0);
516   gMC->Gsatt("FTO1","SEEN",1);
517   gMC->Gsatt("FTO2","SEEN",1);
518   gMC->Gsatt("FTO3","SEEN",1);
519   gMC->Gsatt("FBT1","SEEN",1);
520   gMC->Gsatt("FBT2","SEEN",1);
521   gMC->Gsatt("FBT3","SEEN",1);
522   gMC->Gsatt("FLT1","SEEN",1);
523   gMC->Gsatt("FLT2","SEEN",1);
524   gMC->Gsatt("FLT3","SEEN",1);
525   //
526   gMC->Gdopt("hide", "on");
527   gMC->Gdopt("shad", "on");
528   gMC->Gsatt("*", "fill", 7);
529   gMC->SetClipBox(".");
530   gMC->SetClipBox("*", 0, 1000, -1000, 1000, -1000, 1000);
531   gMC->DefaultRange();
532   gMC->Gdraw("alic", 40, 30, 0, 12, 9.5, .02, .02);
533   gMC->Gdhead(1111, "Time Of Flight");
534   gMC->Gdman(18, 4, "MAN");
535   gMC->Gdopt("hide","off");
536 }
537
538 //_____________________________________________________________________________
539 void AliTOF::CreateMaterials()
540 {
541   //
542   // Defines TOF materials for all versions
543   // Authors :   Maxim Martemianov, Boris Zagreev (ITEP)   18/09/98 
544   //
545   Int_t   ISXFLD = gAlice->Field()->Integ();
546   Float_t SXMGMX = gAlice->Field()->Max();
547   //
548   //--- Quartz (SiO2) 
549   Float_t   aq[2] = { 28.0855,15.9994 };
550   Float_t   zq[2] = { 14.,8. };
551   Float_t   wq[2] = { 1.,2. };
552   Float_t   dq = 2.20;
553   Int_t nq = -2;
554   // --- Freon
555   Float_t afre[2]  = { 12.011,18.9984032 };
556   Float_t zfre[2]  = { 6.,9. };
557   Float_t wfre[2]  = { 5.,12. };
558   Float_t densfre  = 1.5;
559   Int_t nfre = -2;
560   // --- CO2 
561   Float_t ac[2]   = { 12.,16. };
562   Float_t zc[2]   = { 6.,8. };
563   Float_t wc[2]   = { 1.,2. };
564   Float_t dc = .001977;
565   Int_t nc = -2;
566    // For mylar (C5H4O2) 
567   Float_t amy[3] = { 12., 1., 16. };
568   Float_t zmy[3] = {  6., 1.,  8. };
569   Float_t wmy[3] = {  5., 4.,  2. };
570   Float_t dmy    = 1.39;
571   Int_t nmy = -3;
572  // For polyethilene (CH2) for honeycomb!!!!
573   Float_t ape[2] = { 12., 1. };
574   Float_t zpe[2] = {  6., 1. };
575   Float_t wpe[2] = {  1., 2. };
576   Float_t dpe    = 0.935*0.479; //To have 1%X0 for 1cm as for honeycomb
577   Int_t npe = -2;
578   // --- G10 
579   Float_t ag10[4] = { 12.,1.,16.,28. };
580   Float_t zg10[4] = { 6.,1.,8.,14. };
581   Float_t wmatg10[4] = { .259,.288,.248,.205 };
582   Float_t densg10  = 1.7;
583   Int_t nlmatg10 = -4;
584   // --- DME 
585   Float_t adme[5] = { 12.,1.,16.,19.,79. };
586   Float_t zdme[5] = { 6.,1.,8.,9.,35. };
587   Float_t wmatdme[5] = { .4056,.0961,.2562,.1014,.1407 };
588   Float_t densdme  = .00205;
589   Int_t nlmatdme = 5;
590   // ---- ALUMINA (AL203) 
591   Float_t aal[2] = { 27.,16. };
592   Float_t zal[2] = { 13.,8. };
593   Float_t wmatal[2] = { 2.,3. };
594   Float_t densal  = 2.3;
595   Int_t nlmatal = -2;
596   // -- Water
597   Float_t awa[2] = {  1., 16. };
598   Float_t zwa[2] = {  1.,  8. };
599   Float_t wwa[2] = {  2.,  1. };
600   Float_t dwa    = 1.0;
601   Int_t nwa = -2;
602   //
603   //
604   //AliMaterial(0, "Vacuum$", 1e-16, 1e-16, 1e-16, 1e16, 1e16);
605   AliMaterial(1, "Air$",14.61,7.3,0.001205,30423.24,67500.);
606   AliMaterial(2, "Cu $",  63.54, 29.0, 8.96, 1.43, 14.8);
607   AliMaterial(3, "C  $",  12.01,  6.0, 2.265,18.8, 74.4);
608   AliMixture(4, "Polyethilene$", ape, zpe, dpe, npe, wpe);
609   AliMixture(5, "G10$", ag10, zg10, densg10, nlmatg10, wmatg10);
610   AliMixture(6, "DME ", adme, zdme, densdme, nlmatdme, wmatdme);
611   AliMixture(7, "CO2$", ac, zc, dc, nc, wc);
612   AliMixture(8, "ALUMINA$", aal, zal, densal, nlmatal, wmatal);
613   AliMaterial(9, "Al $", 26.98, 13., 2.7, 8.9, 37.2);
614   // (TRD simulation) thickness = 69.282cm/18.8cm = 3.685 X/X0
615   //  AliMaterial(10, "C-TRD$", 12.01, 6., 2.265*18.8/69.282*10.2/100, 18.8, 74.4); // for 10.2% 
616   AliMaterial(10, "C-TRD$", 12.01, 6., 2.265*18.8/69.282*15./100, 18.8, 74.4); // for 15%
617   //  AliMaterial(10, "C-TRD$", 12.01, 6., 2.265*18.8/69.282*20./100, 18.8, 74.4); // for 20%
618   AliMixture(11, "Mylar$",  amy, zmy, dmy, nmy, wmy);
619   AliMixture(12, "Freon$",  afre, zfre, densfre, nfre, wfre);
620   AliMixture(13, "Quartz$", aq, zq, dq, nq, wq);
621   AliMixture(14, "Water$",  awa, zwa, dwa, nwa, wwa);
622
623   Float_t epsil, stmin, deemax, stemax;
624   //       Previous data 
625   //       EPSIL  =  0.1   ! Tracking precision, 
626   //       STEMAX = 0.1      ! Maximum displacement for multiple scattering
627   //       DEEMAX = 0.1    ! Maximum fractional energy loss, DLS 
628   //       STMIN  = 0.1 
629   //       New data from 
630   epsil  = .001;
631   stemax = -1.;
632   deemax = -.3;
633   stmin  = -.8;
634   //  AliMedium(0, "Vacuum  $", 0, 0, ISXFLD, SXMGMX, 10., stemax, deemax, epsil, stmin);
635   AliMedium(1, "Air$", 1, 0, ISXFLD, SXMGMX, 10., stemax, deemax, epsil, stmin);
636   AliMedium(2, "Cu $", 2, 0, ISXFLD, SXMGMX, 10., stemax, deemax, epsil, stmin);
637   AliMedium(3, "C  $", 3, 0, ISXFLD, SXMGMX, 10., stemax, deemax, epsil, stmin);
638   AliMedium(4, "Pol$", 4, 0, ISXFLD, SXMGMX, 10., stemax, deemax, epsil, stmin);
639   AliMedium(5, "G10$", 5, 0, ISXFLD, SXMGMX, 10., stemax, deemax, epsil, stmin);
640   AliMedium(6, "DME$", 6, 0, ISXFLD, SXMGMX, 10., stemax, deemax, epsil, stmin);
641   AliMedium(7, "CO2$", 7, 0, ISXFLD, SXMGMX, 10., -.01, -.1, .01, -.01);
642   AliMedium(8, "ALUMINA$", 8, 0, ISXFLD, SXMGMX, 10., stemax, deemax, epsil, stmin);
643   AliMedium(9, "Al Frame$", 9, 0, ISXFLD, SXMGMX, 10, stemax, deemax, epsil, stmin);
644   AliMedium(10, "DME-S$", 6, 1, ISXFLD, SXMGMX, 10., stemax, deemax, epsil, stmin);
645   AliMedium(11, "C-TRD$", 10, 0, ISXFLD, SXMGMX, 10., stemax, deemax, epsil, stmin);
646   AliMedium(12, "Myl$", 11, 0, ISXFLD, SXMGMX, 10., stemax, deemax, epsil, stmin);
647   AliMedium(13, "Fre$", 12, 0, ISXFLD, SXMGMX, 10., stemax, deemax, epsil, stmin);
648   AliMedium(14, "Fre-S$", 12, 1, ISXFLD, SXMGMX, 10., stemax, deemax, epsil, stmin);
649   AliMedium(15, "Glass$", 13, 0, ISXFLD, SXMGMX, 10., stemax, deemax, epsil, stmin);
650   AliMedium(16, "Water$", 14, 0, ISXFLD, SXMGMX, 10., stemax, deemax, epsil, stmin);
651 }
652
653 //_____________________________________________________________________________
654 Int_t AliTOF::DistancetoPrimitive(Int_t , Int_t )
655 {
656   //
657   // Returns distance from mouse pointer to detector, default version
658   //
659   return 9999;
660 }
661  
662 //_____________________________________________________________________________
663 void AliTOF::Init()
664 {
665   //
666   // Initialise TOF detector after it has been built
667   //
668   Int_t i;
669   //
670   printf("\n");
671   for(i=0;i<35;i++) printf("*");
672   printf(" TOF_INIT ");
673   for(i=0;i<35;i++) printf("*");
674   printf("\n");
675   cout << "TOF version " << IsVersion() <<" initialized" << endl;
676   //
677   // Set id of TOF sensitive volume
678   if (IsVersion() !=0) fIdSens=gMC->VolId("FPG0");
679   //
680   for(i=0;i<80;i++) printf("*");
681   printf("\n");
682 }
683
684  
685 ClassImp(AliTOFhit)
686  
687 //___________________________________________
688 AliTOFhit::AliTOFhit(Int_t shunt, Int_t track, Int_t *vol, Float_t *hits):
689   AliHit(shunt, track)
690 {
691   //
692   // Store a TOF hit
693   //
694   Int_t i;
695   for (i=0;i<3;i++) fVolume[i] = vol[i];
696   //
697   // Position
698   fX=hits[0];
699   fY=hits[1];
700   fZ=hits[2];
701   //
702   // Momentum
703   fPx=hits[3];
704   fPy=hits[4];
705   fPz=hits[5];
706   fPmom=hits[6];
707   //
708   // Time Of Flight
709   fTof=hits[7];
710 }
711  
712