]> git.uio.no Git - u/mrichter/AliRoot.git/blame - MUON/AliMUON.cxx
Add some charmed and bottom baryons to the particle list (TDatabasePDG). This
[u/mrichter/AliRoot.git] / MUON / AliMUON.cxx
CommitLineData
4c039060 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 **************************************************************************/
4c039060 15/*
16$Log$
802a864d 17Revision 1.23 2000/06/28 12:19:17 morsch
18More consequent seperation of global input data services (AliMUONClusterInput singleton) and the
19cluster and hit reconstruction algorithms in AliMUONClusterFinderVS.
20AliMUONClusterFinderVS becomes the base class for clustering and hit reconstruction.
21It requires two cathode planes. Small modifications in the code will make it usable for
22one cathode plane and, hence, more general (for test beam data).
23AliMUONClusterFinder is now obsolete.
24
30aaba74 25Revision 1.22 2000/06/28 08:06:10 morsch
26Avoid global variables in AliMUONClusterFinderVS by seperating the input data for the fit from the
27algorithmic part of the class. Input data resides inside the AliMUONClusterInput singleton.
28It also naturally takes care of the TMinuit instance.
29
9825400f 30Revision 1.21 2000/06/27 08:54:41 morsch
31Problems with on constant array sizes (in hitMap, nmuon, xhit, yhit) corrected.
32
d09fafb0 33Revision 1.20 2000/06/26 14:02:38 morsch
34Add class AliMUONConstants with MUON specific constants using static memeber data and access methods.
35
f665c1ea 36Revision 1.19 2000/06/22 13:40:51 morsch
37scope problem on HP, "i" declared once
38pow changed to TMath::Power (PH, AM)
39
9ae15266 40Revision 1.18 2000/06/15 07:58:48 morsch
41Code from MUON-dev joined
42
a9e2aefa 43Revision 1.14.4.17 2000/06/14 14:36:46 morsch
44- add TriggerCircuit (PC)
45- add GlobalTrigger and LocalTrigger and specific methods (PC)
46
47Revision 1.14.4.16 2000/06/09 21:20:28 morsch
48Most coding rule violations corrected
49
50Revision 1.14.4.15 2000/05/02 09:54:32 morsch
51RULE RN17 violations corrected
52
53Revision 1.14.4.12 2000/04/26 12:25:02 morsch
54Code revised by P. Crochet:
55- Z position of TriggerChamber changed according to A.Tournaire Priv.Comm.
56- ToF included in the method MakePadHits
57- inner radius of flange between beam shielding and trigger corrected
58- Trigger global volume updated (according to the new geometry)
59
60Revision 1.14.4.11 2000/04/19 19:42:08 morsch
61Some changes of variable names curing viols and methods concerning
62correlated clusters removed.
63
64Revision 1.14.4.10 2000/03/22 16:44:07 gosset
65Memory leak suppressed in function Digitise:
66p_adr->Delete() instead of Clear (I.Chevrot and A.Baldisseri)
67
68Revision 1.14.4.9 2000/03/20 18:15:25 morsch
69Positions of trigger chambers corrected (P.C.)
dbe37a89 70
a9e2aefa 71Revision 1.14.4.8 2000/02/21 15:38:01 morsch
72Call to AddHitList introduced to make this version compatible with head.
dffd31ef 73
a9e2aefa 74Revision 1.14.4.7 2000/02/20 07:45:53 morsch
75Bugs in Trigger part of BuildGeomemetry corrected (P.C)
1cedd08a 76
a9e2aefa 77Revision 1.14.4.6 2000/02/17 14:28:54 morsch
78Trigger included into initialization and digitization
6a935c13 79
a9e2aefa 80Revision 1.14.4.5 2000/02/15 10:02:58 morsch
81Log messages of previous revisions added
5d84196c 82
a9e2aefa 83Revision 1.14.4.2 2000/02/04 10:57:34 gosset
84Z position of the chambers:
85it was the Z position of the stations;
86it is now really the Z position of the chambers.
87 !!!! WARNING: THE CALLS TO "AliMUONChamber::SetZPOS"
88 !!!! AND "AliMUONChamber::ZPosition"
89 !!!! HAVE TO BE CHANGED TO "AliMUONChamber::"SetZ"
90 !!!! AND "AliMUONChamber::Z"
50f986db 91
a9e2aefa 92Revision 1.14.4.3 2000/02/04 16:19:04 gosset
93Correction for mis-spelling of NCH
0b34885d 94
a9e2aefa 95Revision 1.14.4.4 2000/02/15 09:43:38 morsch
96Log message added
2b86633d 97
4c039060 98*/
99
a9e2aefa 100
101///////////////////////////////////////////////
fe4da5cc 102// Manager and hits classes for set:MUON //
103////////////////////////////////////////////////
104
105#include <TTUBE.h>
a897a37a 106#include <TBRIK.h>
107#include <TRotMatrix.h>
fe4da5cc 108#include <TNode.h>
a897a37a 109#include <TTree.h>
fe4da5cc 110#include <TRandom.h>
111#include <TObject.h>
112#include <TVector.h>
113#include <TObjArray.h>
a897a37a 114#include <TMinuit.h>
115#include <TParticle.h>
116#include <TROOT.h>
117#include <TFile.h>
118#include <TNtuple.h>
119#include <TCanvas.h>
120#include <TPad.h>
121#include <TDirectory.h>
122#include <TObjectTable.h>
123#include <AliPDG.h>
a9e2aefa 124#include <TTUBE.h>
fe4da5cc 125
126#include "AliMUON.h"
a9e2aefa 127#include "AliMUONHit.h"
128#include "AliMUONPadHit.h"
129#include "AliMUONDigit.h"
130#include "AliMUONTransientDigit.h"
131#include "AliMUONRawCluster.h"
132#include "AliMUONLocalTrigger.h"
133#include "AliMUONGlobalTrigger.h"
134#include "AliMUONHitMap.h"
135#include "AliMUONHitMapA1.h"
136#include "AliMUONChamberTrigger.h"
f665c1ea 137#include "AliMUONConstants.h"
30aaba74 138#include "AliMUONClusterFinderVS.h"
a9e2aefa 139#include "AliMUONTriggerDecision.h"
fe4da5cc 140#include "AliRun.h"
141#include "AliMC.h"
9825400f 142#include "AliMUONClusterInput.h"
fe4da5cc 143#include "iostream.h"
144#include "AliCallf77.h"
a9e2aefa 145#include "AliConst.h"
146
147// Defaults parameters for Z positions of chambers
148// taken from values for "stations" in AliMUON::AliMUON
149// const Float_t zch[7]={528, 690., 975., 1249., 1449., 1610, 1710.};
150// and from array "dstation" in AliMUONv1::CreateGeometry
151// Float_t dstation[5]={20., 20., 20, 20., 20.};
152// for tracking chambers,
153// according to (Z1 = zch - dstation) and (Z2 = zch + dstation)
154// for the first and second chambers in the station, respectively,
155// and from "DTPLANES" in AliMUONv1::CreateGeometry
156// const Float_t DTPLANES = 15.;
157// for trigger chambers,
158// according to (Z1 = zch) and (Z2 = zch + DTPLANES)
159// for the first and second chambers in the station, respectively
fe4da5cc 160
fe4da5cc 161ClassImp(AliMUON)
fe4da5cc 162//___________________________________________
163AliMUON::AliMUON()
164{
a9e2aefa 165 fIshunt = 0;
166 fHits = 0;
167 fPadHits = 0;
168 fNPadHits = 0;
169 fDchambers = 0;
170 fTriggerCircuits = 0; // cp new design of AliMUONTriggerDecision
171 fNdch = 0;
172 fRawClusters = 0;
173 fNrawch = 0;
174 fGlobalTrigger = 0;
175 fNLocalTrigger = 0;
176 fLocalTrigger = 0;
177 fNLocalTrigger = 0;
fe4da5cc 178}
179
180//___________________________________________
181AliMUON::AliMUON(const char *name, const char *title)
182 : AliDetector(name,title)
183{
184//Begin_Html
185/*
a897a37a 186<img src="gif/alimuon.gif">
fe4da5cc 187*/
188//End_Html
f665c1ea 189
a9e2aefa 190 fHits = new TClonesArray("AliMUONHit",1000);
1cedd08a 191 gAlice->AddHitList(fHits);
a9e2aefa 192 fPadHits = new TClonesArray("AliMUONPadHit",10000);
193 fNPadHits = 0;
fe4da5cc 194 fIshunt = 0;
195
f665c1ea 196 fNdch = new Int_t[AliMUONConstants::NCh()];
fe4da5cc 197
f665c1ea 198 fDchambers = new TObjArray(AliMUONConstants::NCh());
fe4da5cc 199
200 Int_t i;
201
f665c1ea 202 for (i=0; i<AliMUONConstants::NCh() ;i++) {
a9e2aefa 203 (*fDchambers)[i] = new TClonesArray("AliMUONDigit",10000);
fe4da5cc 204 fNdch[i]=0;
205 }
206
f665c1ea 207 fNrawch = new Int_t[AliMUONConstants::NTrackingCh()];
a897a37a 208
f665c1ea 209 fRawClusters = new TObjArray(AliMUONConstants::NTrackingCh());
a897a37a 210
f665c1ea 211 for (i=0; i<AliMUONConstants::NTrackingCh();i++) {
a897a37a 212 (*fRawClusters)[i] = new TClonesArray("AliMUONRawCluster",10000);
213 fNrawch[i]=0;
214 }
a9e2aefa 215 cout << " here " << "\n";
a897a37a 216
a9e2aefa 217 fGlobalTrigger = new TClonesArray("AliMUONGlobalTrigger",1);
218 fNGlobalTrigger = 0;
219 fLocalTrigger = new TClonesArray("AliMUONLocalTrigger",234);
220 fNLocalTrigger = 0;
fe4da5cc 221
222//
223// Transport angular cut
224 fAccCut=0;
225 fAccMin=2;
226 fAccMax=9;
227
228 SetMarkerColor(kRed);
a9e2aefa 229//
230//
231//
232//
f665c1ea 233
a9e2aefa 234 Int_t ch;
235
f665c1ea 236 fChambers = new TObjArray(AliMUONConstants::NCh());
a9e2aefa 237
238 // Loop over stations
f665c1ea 239 for (Int_t st = 0; st < AliMUONConstants::NCh() / 2; st++) {
a9e2aefa 240 // Loop over 2 chambers in the station
241 for (Int_t stCH = 0; stCH < 2; stCH++) {
242//
243//
244// Default Parameters for Muon Tracking Stations
245
246
247 ch = 2 * st + stCH;
248//
f665c1ea 249 if (ch < AliMUONConstants::NTrackingCh()) {
a9e2aefa 250 (*fChambers)[ch] = new AliMUONChamber();
251 } else {
252 (*fChambers)[ch] = new AliMUONChamberTrigger();
253 }
254
255 AliMUONChamber* chamber = (AliMUONChamber*) (*fChambers)[ch];
256
257 chamber->SetGid(0);
258 // Default values for Z of chambers
f665c1ea 259 chamber->SetZ(AliMUONConstants::DefaultChamberZ(ch));
a9e2aefa 260//
f665c1ea 261 chamber->InitGeo(AliMUONConstants::DefaultChamberZ(ch));
262 chamber->SetRInner(AliMUONConstants::Dmin(st)/2);
263 chamber->SetROuter(AliMUONConstants::Dmax(st)/2);
a9e2aefa 264//
265 } // Chamber stCH (0, 1) in
266 } // Station st (0...)
267 fMaxStepGas=0.01;
268 fMaxStepAlu=0.1;
269 fMaxDestepGas=-1;
270 fMaxDestepAlu=-1;
271//
272 fMaxIterPad = 0;
273 fCurIterPad = 0;
274
275 // cp new design of AliMUONTriggerDecision
f665c1ea 276 fTriggerCircuits = new TObjArray(AliMUONConstants::NTriggerCircuit());
277 for (Int_t circ=0; circ<AliMUONConstants::NTriggerCircuit(); circ++) {
a9e2aefa 278 (*fTriggerCircuits)[circ] = new AliMUONTriggerCircuit();
279 }
280 // cp new design of AliMUONTriggerDecision
281
fe4da5cc 282}
283
284//___________________________________________
a9e2aefa 285AliMUON::AliMUON(const AliMUON& rMUON)
286{
287// Dummy copy constructor
288 ;
289
290}
291
fe4da5cc 292AliMUON::~AliMUON()
293{
a897a37a 294 printf("Calling AliMUON destructor !!!\n");
295
f665c1ea 296 Int_t i;
297 fIshunt = 0;
298 delete fHits;
299 delete fPadHits;
300
301 delete fGlobalTrigger;
302 fNGlobalTrigger = 0;
303
304 delete fLocalTrigger;
305 fNLocalTrigger = 0;
a897a37a 306
f665c1ea 307 for (i=0;i<AliMUONConstants::NCh();i++) {
308 delete (*fDchambers)[i];
309 fNdch[i]=0;
310 }
311 delete fDchambers;
312
313 for (i=0;i<AliMUONConstants::NTrackingCh();i++) {
314 delete (*fRawClusters)[i];
315 fNrawch[i]=0;
316 }
317 delete fRawClusters;
318
319 for (Int_t circ=0; circ<AliMUONConstants::NTriggerCircuit(); circ++) {
320 delete (*fTriggerCircuits)[circ];
321 }
322 delete fTriggerCircuits;
fe4da5cc 323}
324
325//___________________________________________
326void AliMUON::AddHit(Int_t track, Int_t *vol, Float_t *hits)
327{
328 TClonesArray &lhits = *fHits;
a9e2aefa 329 new(lhits[fNhits++]) AliMUONHit(fIshunt,track,vol,hits);
fe4da5cc 330}
331//___________________________________________
a9e2aefa 332void AliMUON::AddPadHit(Int_t *clhits)
fe4da5cc 333{
a9e2aefa 334 TClonesArray &lclusters = *fPadHits;
335 new(lclusters[fNPadHits++]) AliMUONPadHit(clhits);
fe4da5cc 336}
337//_____________________________________________________________________________
338void AliMUON::AddDigits(Int_t id, Int_t *tracks, Int_t *charges, Int_t *digits)
339{
340 //
341 // Add a MUON digit to the list
342 //
343
344 TClonesArray &ldigits = *((TClonesArray*)(*fDchambers)[id]);
a9e2aefa 345 new(ldigits[fNdch[id]++]) AliMUONDigit(tracks,charges,digits);
fe4da5cc 346}
347
a897a37a 348//_____________________________________________________________________________
349void AliMUON::AddRawCluster(Int_t id, const AliMUONRawCluster& c)
350{
351 //
352 // Add a MUON digit to the list
353 //
354
355 TClonesArray &lrawcl = *((TClonesArray*)(*fRawClusters)[id]);
356 new(lrawcl[fNrawch[id]++]) AliMUONRawCluster(c);
357}
a897a37a 358
a9e2aefa 359//___________________________________________
360void AliMUON::AddGlobalTrigger(Int_t *singlePlus, Int_t *singleMinus,
361 Int_t *singleUndef,
362 Int_t *pairUnlike, Int_t *pairLike)
363{
364// add a MUON Global Trigger to the list (only one GlobalTrigger per event !)
365 TClonesArray &globalTrigger = *fGlobalTrigger;
366 new(globalTrigger[fNGlobalTrigger++])
367 AliMUONGlobalTrigger(singlePlus, singleMinus, singleUndef, pairUnlike,
368 pairLike);
369}
370//___________________________________________
371void AliMUON::AddLocalTrigger(Int_t *localtr)
372{
373// add a MUON Local Trigger to the list
374 TClonesArray &localTrigger = *fLocalTrigger;
375 new(localTrigger[fNLocalTrigger++]) AliMUONLocalTrigger(localtr);
a897a37a 376}
377
fe4da5cc 378//___________________________________________
379void AliMUON::BuildGeometry()
380{
a9e2aefa 381 TNode *node, *nodeF, *top, *nodeS;
382 const int kColorMUON = kBlue;
383 const int kColorMUON2 = kGreen;
a897a37a 384 //
a9e2aefa 385 top=gAlice->GetGeometry()->GetNode("alice");
a897a37a 386// MUON
387//
388// z-Positions of Chambers
a9e2aefa 389 const Float_t kCz[7]={511., 686., 971., 1245., 1445., 1600, 1700.};
390// inner diameter (Xlenght for trigger chamber -> active area)
391 const Float_t kDmin[7]={ 35., 47., 67., 86., 100., 544., 544.};
392// outer diameter (Ylenght for trigger chamber -> active area)
393 const Float_t kDmax[7]={183., 245., 346., 520., 520., 612., 612.};
a897a37a 394
395 TRotMatrix* rot000 = new TRotMatrix("Rot000"," ", 90, 0, 90, 90, 0, 0);
396 TRotMatrix* rot090 = new TRotMatrix("Rot090"," ", 90, 90, 90,180, 0, 0);
397 TRotMatrix* rot180 = new TRotMatrix("Rot180"," ", 90,180, 90,270, 0, 0);
398 TRotMatrix* rot270 = new TRotMatrix("Rot270"," ", 90,270, 90, 0, 0, 0);
399
a9e2aefa 400 Float_t rmin, rmax, dx, dy, dz, dr, xpos, ypos, zpos;
401 Float_t dzc1=4.; // tracking chambers
402 Float_t dzc2=15.; // trigger chambers
403 Float_t hole=102.; // x-y hole around beam pipe for trig. chambers
404 Float_t zscale; // scaling parameter trigger chambers
405 Float_t halfx, halfy;
406 char nameChamber[9], nameSense[9], nameFrame[9], nameNode[8];
407 char nameSense1[9], nameSense2[9];
408 for (Int_t i=0; i<7; i++) {
a897a37a 409 for (Int_t j=0; j<2; j++) {
410 Int_t id=2*i+j+1;
a9e2aefa 411 if (i<5) { // tracking chambers
412 if (j==0) {
413 zpos=kCz[i]-dzc1;
414 } else {
415 zpos=kCz[i]+dzc1;
416 }
a897a37a 417 } else {
a9e2aefa 418 if (j==0) {
419 zpos=kCz[i];
420 } else {
421 zpos=kCz[i]+dzc2;
422 }
a897a37a 423 }
a9e2aefa 424 sprintf(nameChamber,"C_MUON%d",id);
425 sprintf(nameSense,"S_MUON%d",id);
426 sprintf(nameSense1,"S1_MUON%d",id);
427 sprintf(nameSense2,"S2_MUON%d",id);
428 sprintf(nameFrame,"F_MUON%d",id);
429 if (i<5) { // tracking chambers
430 rmin = kDmin[i]/2.-3;
431 rmax = kDmax[i]/2.+3;
432 new TTUBE(nameChamber,"Mother","void",rmin,rmax,0.25,1.);
433 rmin = kDmin[i]/2.;
434 rmax = kDmax[i]/2.;
435 new TTUBE(nameSense,"Sens. region","void",rmin,rmax,0.25, 1.);
436 dx=(rmax-rmin)/2;
437 dy=3.;
438 dz=0.25;
439 TBRIK* frMUON = new TBRIK(nameFrame,"Frame","void",dx,dy,dz);
440 top->cd();
441 sprintf(nameNode,"MUON%d",100+id);
442 node = new TNode(nameNode,"ChamberNode",nameChamber,0,0,zpos,"");
443 node->SetLineColor(kColorMUON);
444 fNodes->Add(node);
445 node->cd();
446 sprintf(nameNode,"MUON%d",200+id);
447 node = new TNode(nameNode,"Sens. Region Node",nameSense,0,0,0,"");
448 node->SetLineColor(kColorMUON);
449 node->cd();
450 dr=dx+rmin;
451 sprintf(nameNode,"MUON%d",300+id);
452 nodeF = new TNode(nameNode,"Frame0",frMUON,dr, 0, 0,rot000,"");
453 nodeF->SetLineColor(kColorMUON);
454 node->cd();
455 sprintf(nameNode,"MUON%d",400+id);
456 nodeF = new TNode(nameNode,"Frame1",frMUON,0 ,dr,0,rot090,"");
457 nodeF->SetLineColor(kColorMUON);
458 node->cd();
459 sprintf(nameNode,"MUON%d",500+id);
460 nodeF = new TNode(nameNode,"Frame2",frMUON,-dr,0,0,rot180,"");
461 nodeF->SetLineColor(kColorMUON);
462 node ->cd();
463 sprintf(nameNode,"MUON%d",600+id);
464 nodeF = new TNode(nameNode,"Frame3",frMUON,0,-dr,0,rot270,"");
465 nodeF->SetLineColor(kColorMUON);
466 } else {
467 zscale=zpos/kCz[5];
468 Float_t xsize=kDmin[i]*zscale;
469 Float_t ysize=kDmax[i]*zscale;
470 Float_t holeScaled=hole*zscale;
471
472 halfx=xsize/2.+3.;
473 halfy=ysize/2.+3.;
474 new TBRIK(nameChamber,"Mother","void",halfx,halfy,0.25);
475 top->cd();
476 sprintf(nameNode,"MUON%d",100+id);
477 node = new TNode(nameNode,"Chambernode",nameChamber,0,0,zpos,"");
478 node->SetLineColor(kColorMUON2);
479 fNodes->Add(node);
480
481// up/down of beam pipe
482 halfx=xsize/2.;
483 halfy=(ysize/2.-holeScaled/2.)/2.;
484 new TBRIK(nameSense,"Sens. region","void",halfx,halfy,0.25);
485
486 node->cd();
487 ypos=holeScaled/2.+((ysize/2.-holeScaled/2.)/2.);
488 sprintf(nameNode,"MUON%d",200+id);
489 nodeS = new TNode(nameNode,"Sens. Region Node",nameSense,0,ypos,0,"");
490 nodeS->SetLineColor(kColorMUON2);
491
492 node->cd();
493 ypos=-1.*ypos;
494 sprintf(nameNode,"MUON%d",300+id);
495 nodeS = new TNode(nameNode,"Sens. Region Node",nameSense,0,ypos,0,"");
496 nodeS->SetLineColor(kColorMUON2);
497
498// left/right of beam pipe
499 halfx=(xsize/2.-holeScaled/2.)/2.;
500 halfy=holeScaled/2.;
501 new TBRIK(nameSense1,"Sens. region","void",halfx,halfy,0.25);
502
503 node->cd();
504 xpos=holeScaled/2.+((xsize/2.-holeScaled/2.)/2.);
505 sprintf(nameNode,"MUON%d",400+id);
506 nodeS = new TNode(nameNode,"Sens. Region Node",nameSense1,xpos,0,0,"");
507 nodeS->SetLineColor(kColorMUON2);
508
509 node->cd();
510 xpos=-1.*xpos;
511 sprintf(nameNode,"MUON%d",500+id);
512 nodeS = new TNode(nameNode,"Sens. Region Node",nameSense1,xpos,0,0,"");
513 nodeS->SetLineColor(kColorMUON2);
514
515// missing corners
516 halfx=17.*zscale/2.;
517 halfy=halfx;
518 new TBRIK(nameSense2,"Sens. region","void",halfx,halfy,0.25);
519
520 node->cd();
521 xpos=holeScaled/2.-halfx;
522 ypos=xpos;
523 sprintf(nameNode,"MUON%d",600+id);
524 nodeS = new TNode(nameNode,"Sens. Region Node",nameSense2,xpos,ypos,0,"");
525 nodeS->SetLineColor(kColorMUON2);
526
527 node->cd();
528 ypos=-1.*xpos;
529 sprintf(nameNode,"MUON%d",700+id);
530 nodeS = new TNode(nameNode,"Sens. Region Node",nameSense2,xpos,ypos,0,"");
531 nodeS->SetLineColor(kColorMUON2);
532
533 node->cd();
534 xpos=-1.*xpos;
535 sprintf(nameNode,"MUON%d",800+id);
536 nodeS = new TNode(nameNode,"Sens. Region Node",nameSense2,xpos,ypos,0,"");
537 nodeS->SetLineColor(kColorMUON2);
538
539 node->cd();
540 ypos=-1.*xpos;
541 sprintf(nameNode,"MUON%d",900+id);
542 nodeS = new TNode(nameNode,"Sens. Region Node",nameSense2,xpos,ypos,0,"");
543 nodeS->SetLineColor(kColorMUON2);
544 }
a897a37a 545 }
546 }
fe4da5cc 547}
548
a897a37a 549
fe4da5cc 550//___________________________________________
551Int_t AliMUON::DistancetoPrimitive(Int_t , Int_t )
552{
553 return 9999;
554}
555
556//___________________________________________
557void AliMUON::MakeBranch(Option_t* option)
558{
f665c1ea 559 // Create Tree branches for the MUON.
560 const Int_t kBufferSize = 4000;
561 char branchname[30];
562 sprintf(branchname,"%sCluster",GetName());
563
564 AliDetector::MakeBranch(option);
565
566 if (fPadHits && gAlice->TreeH()) {
567 gAlice->TreeH()->Branch(branchname,&fPadHits, kBufferSize);
568 printf("Making Branch %s for clusters\n",branchname);
569 }
570
fe4da5cc 571// one branch for digits per chamber
f665c1ea 572 Int_t i;
573
574 for (i=0; i<AliMUONConstants::NCh() ;i++) {
575 sprintf(branchname,"%sDigits%d",GetName(),i+1);
576
577 if (fDchambers && gAlice->TreeD()) {
578 gAlice->TreeD()->Branch(branchname,&((*fDchambers)[i]), kBufferSize);
579 printf("Making Branch %s for digits in chamber %d\n",branchname,i+1);
580 }
581 }
582
583 printf("Make Branch - TreeR address %p\n",gAlice->TreeR());
584
a897a37a 585// one branch for raw clusters per chamber
f665c1ea 586 for (i=0; i<AliMUONConstants::NTrackingCh() ;i++) {
587 sprintf(branchname,"%sRawClusters%d",GetName(),i+1);
588
589 if (fRawClusters && gAlice->TreeR()) {
590 gAlice->TreeR()->Branch(branchname,&((*fRawClusters)[i]), kBufferSize);
591 printf("Making Branch %s for raw clusters in chamber %d\n",branchname,i+1);
592 }
593 }
594
a9e2aefa 595// one branch for global trigger
f665c1ea 596 sprintf(branchname,"%sGlobalTrigger",GetName());
597 if (fGlobalTrigger && gAlice->TreeR()) {
598 gAlice->TreeR()->Branch(branchname,&fGlobalTrigger,kBufferSize);
599 printf("Making Branch %s for Global Trigger\n",branchname);
600 }
a9e2aefa 601// one branch for local trigger
f665c1ea 602 sprintf(branchname,"%sLocalTrigger",GetName());
603 if (fLocalTrigger && gAlice->TreeR()) {
604 gAlice->TreeR()->Branch(branchname,&fLocalTrigger,kBufferSize);
605 printf("Making Branch %s for Local Trigger\n",branchname);
606 }
607
fe4da5cc 608}
609
610//___________________________________________
611void AliMUON::SetTreeAddress()
612{
613 // Set branch address for the Hits and Digits Tree.
a897a37a 614 char branchname[30];
fe4da5cc 615 AliDetector::SetTreeAddress();
616
617 TBranch *branch;
618 TTree *treeH = gAlice->TreeH();
619 TTree *treeD = gAlice->TreeD();
a897a37a 620 TTree *treeR = gAlice->TreeR();
fe4da5cc 621
622 if (treeH) {
a9e2aefa 623 if (fPadHits) {
fe4da5cc 624 branch = treeH->GetBranch("MUONCluster");
a9e2aefa 625 if (branch) branch->SetAddress(&fPadHits);
fe4da5cc 626 }
627 }
628
629 if (treeD) {
f665c1ea 630 for (int i=0; i<AliMUONConstants::NCh(); i++) {
fe4da5cc 631 sprintf(branchname,"%sDigits%d",GetName(),i+1);
632 if (fDchambers) {
633 branch = treeD->GetBranch(branchname);
634 if (branch) branch->SetAddress(&((*fDchambers)[i]));
635 }
636 }
637 }
a897a37a 638
639 // printf("SetTreeAddress --- treeR address %p \n",treeR);
640
641 if (treeR) {
f665c1ea 642 for (int i=0; i<AliMUONConstants::NTrackingCh(); i++) {
a897a37a 643 sprintf(branchname,"%sRawClusters%d",GetName(),i+1);
644 if (fRawClusters) {
645 branch = treeR->GetBranch(branchname);
646 if (branch) branch->SetAddress(&((*fRawClusters)[i]));
647 }
648 }
a897a37a 649
a9e2aefa 650 if (fLocalTrigger) {
651 branch = treeR->GetBranch("MUONLocalTrigger");
652 if (branch) branch->SetAddress(&fLocalTrigger);
653 }
654 if (fGlobalTrigger) {
655 branch = treeR->GetBranch("MUONGlobalTrigger");
656 if (branch) branch->SetAddress(&fGlobalTrigger);
657 }
658 }
fe4da5cc 659}
660//___________________________________________
661void AliMUON::ResetHits()
662{
663 // Reset number of clusters and the cluster array for this detector
664 AliDetector::ResetHits();
a9e2aefa 665 fNPadHits = 0;
666 if (fPadHits) fPadHits->Clear();
fe4da5cc 667}
668
669//____________________________________________
670void AliMUON::ResetDigits()
671{
672 //
673 // Reset number of digits and the digits array for this detector
674 //
f665c1ea 675 for ( int i=0;i<AliMUONConstants::NCh();i++ ) {
a897a37a 676 if ((*fDchambers)[i]) ((TClonesArray*)(*fDchambers)[i])->Clear();
fe4da5cc 677 if (fNdch) fNdch[i]=0;
678 }
679}
a897a37a 680//____________________________________________
681void AliMUON::ResetRawClusters()
682{
683 //
684 // Reset number of raw clusters and the raw clust array for this detector
685 //
f665c1ea 686 for ( int i=0;i<AliMUONConstants::NTrackingCh();i++ ) {
a897a37a 687 if ((*fRawClusters)[i]) ((TClonesArray*)(*fRawClusters)[i])->Clear();
688 if (fNrawch) fNrawch[i]=0;
689 }
690}
a9e2aefa 691
a897a37a 692//____________________________________________
a9e2aefa 693void AliMUON::ResetTrigger()
a897a37a 694{
a9e2aefa 695 // Reset Local and Global Trigger
696 fNGlobalTrigger = 0;
697 if (fGlobalTrigger) fGlobalTrigger->Clear();
698 fNLocalTrigger = 0;
699 if (fLocalTrigger) fLocalTrigger->Clear();
700}
701
702//____________________________________________
703void AliMUON::SetPadSize(Int_t id, Int_t isec, Float_t p1, Float_t p2)
704{
705 Int_t i=2*(id-1);
706 ((AliMUONChamber*) (*fChambers)[i]) ->SetPadSize(isec,p1,p2);
707 ((AliMUONChamber*) (*fChambers)[i+1])->SetPadSize(isec,p1,p2);
a897a37a 708}
709
fe4da5cc 710//___________________________________________
a9e2aefa 711void AliMUON::SetChambersZ(const Float_t *Z)
712{
713 // Set Z values for all chambers (tracking and trigger)
714 // from the array pointed to by "Z"
f665c1ea 715 for (Int_t ch = 0; ch < AliMUONConstants::NCh(); ch++)
716 ((AliMUONChamber*) ((*fChambers)[ch]))->SetZ(Z[ch]);
717 return;
a9e2aefa 718}
fe4da5cc 719
a9e2aefa 720//___________________________________________
721void AliMUON::SetChambersZToDefault()
fe4da5cc 722{
a9e2aefa 723 // Set Z values for all chambers (tracking and trigger)
724 // to default values
f665c1ea 725 SetChambersZ(AliMUONConstants::DefaultChamberZ());
a9e2aefa 726 return;
fe4da5cc 727}
728
729//___________________________________________
a897a37a 730void AliMUON::SetChargeSlope(Int_t id, Float_t p1)
fe4da5cc 731{
732 Int_t i=2*(id-1);
a9e2aefa 733 ((AliMUONChamber*) (*fChambers)[i])->SetChargeSlope(p1);
734 ((AliMUONChamber*) (*fChambers)[i+1])->SetChargeSlope(p1);
fe4da5cc 735}
736
737//___________________________________________
a897a37a 738void AliMUON::SetChargeSpread(Int_t id, Float_t p1, Float_t p2)
fe4da5cc 739{
740 Int_t i=2*(id-1);
a9e2aefa 741 ((AliMUONChamber*) (*fChambers)[i])->SetChargeSpread(p1,p2);
742 ((AliMUONChamber*) (*fChambers)[i+1])->SetChargeSpread(p1,p2);
fe4da5cc 743}
744
745//___________________________________________
a897a37a 746void AliMUON::SetSigmaIntegration(Int_t id, Float_t p1)
fe4da5cc 747{
748 Int_t i=2*(id-1);
a9e2aefa 749 ((AliMUONChamber*) (*fChambers)[i])->SetSigmaIntegration(p1);
750 ((AliMUONChamber*) (*fChambers)[i+1])->SetSigmaIntegration(p1);
fe4da5cc 751}
752
753//___________________________________________
d09fafb0 754void AliMUON::SetMaxAdc(Int_t id, Int_t p1)
fe4da5cc 755{
756 Int_t i=2*(id-1);
a9e2aefa 757 ((AliMUONChamber*) (*fChambers)[i])->SetMaxAdc(p1);
758 ((AliMUONChamber*) (*fChambers)[i+1])->SetMaxAdc(p1);
fe4da5cc 759}
760
761//___________________________________________
a897a37a 762void AliMUON::SetMaxStepGas(Float_t p1)
fe4da5cc 763{
764 fMaxStepGas=p1;
765}
766
767//___________________________________________
a897a37a 768void AliMUON::SetMaxStepAlu(Float_t p1)
fe4da5cc 769{
770 fMaxStepAlu=p1;
771}
772
773//___________________________________________
a897a37a 774void AliMUON::SetMaxDestepGas(Float_t p1)
fe4da5cc 775{
776 fMaxDestepGas=p1;
777}
778
779//___________________________________________
a897a37a 780void AliMUON::SetMaxDestepAlu(Float_t p1)
fe4da5cc 781{
782 fMaxDestepAlu=p1;
783}
784//___________________________________________
a897a37a 785void AliMUON::SetMuonAcc(Bool_t acc, Float_t angmin, Float_t angmax)
fe4da5cc 786{
787 fAccCut=acc;
788 fAccMin=angmin;
789 fAccMax=angmax;
790}
791//___________________________________________
a9e2aefa 792void AliMUON::SetSegmentationModel(Int_t id, Int_t isec, AliMUONSegmentation *segmentation)
fe4da5cc 793{
a9e2aefa 794 ((AliMUONChamber*) (*fChambers)[id])->SetSegmentationModel(isec, segmentation);
fe4da5cc 795
796}
797//___________________________________________
a9e2aefa 798void AliMUON::SetResponseModel(Int_t id, AliMUONResponse *response)
fe4da5cc 799{
a9e2aefa 800 ((AliMUONChamber*) (*fChambers)[id])->SetResponseModel(response);
fe4da5cc 801}
802
30aaba74 803void AliMUON::SetReconstructionModel(Int_t id, AliMUONClusterFinderVS *reconst)
a897a37a 804{
a9e2aefa 805 ((AliMUONChamber*) (*fChambers)[id])->SetReconstructionModel(reconst);
a897a37a 806}
807
fe4da5cc 808void AliMUON::SetNsec(Int_t id, Int_t nsec)
809{
a9e2aefa 810 ((AliMUONChamber*) (*fChambers)[id])->SetNsec(nsec);
fe4da5cc 811}
812
813
814//___________________________________________
815
a897a37a 816
a9e2aefa 817
802a864d 818void AliMUON::MakePadHits(Float_t xhit,Float_t yhit, Float_t zhit,
a9e2aefa 819 Float_t eloss, Float_t tof, Int_t idvol)
fe4da5cc 820{
821//
a897a37a 822// Calls the charge disintegration method of the current chamber and adds
823// the simulated cluster to the root treee
fe4da5cc 824//
a897a37a 825 Int_t clhits[7];
826 Float_t newclust[6][500];
827 Int_t nnew;
828
829
fe4da5cc 830//
a897a37a 831// Integrated pulse height on chamber
832
833
834 clhits[0]=fNhits+1;
fe4da5cc 835//
a897a37a 836//
a9e2aefa 837 ((AliMUONChamber*) (*fChambers)[idvol])
802a864d 838 ->DisIntegration(eloss, tof, xhit, yhit, zhit, nnew, newclust);
a897a37a 839 Int_t ic=0;
840
841//
842// Add new clusters
843 for (Int_t i=0; i<nnew; i++) {
844 if (Int_t(newclust[3][i]) > 0) {
845 ic++;
846// Cathode plane
847 clhits[1] = Int_t(newclust[5][i]);
848// Cluster Charge
849 clhits[2] = Int_t(newclust[0][i]);
850// Pad: ix
851 clhits[3] = Int_t(newclust[1][i]);
852// Pad: iy
853 clhits[4] = Int_t(newclust[2][i]);
854// Pad: charge
855 clhits[5] = Int_t(newclust[3][i]);
856// Pad: chamber sector
857 clhits[6] = Int_t(newclust[4][i]);
858
a9e2aefa 859 AddPadHit(clhits);
a897a37a 860 }
861 }
a897a37a 862}
863
a9e2aefa 864//----------------------------------------------------------------------
865
866void AliMUON::Digitise(Int_t nev,Int_t bgrEvent,Option_t *option,Option_t *opt,Text_t *filename)
a897a37a 867{
868 // keep galice.root for signal and name differently the file for
869 // background when add! otherwise the track info for signal will be lost !
870
a6f39961 871 static Bool_t first=kTRUE;
a9e2aefa 872 static TFile *file;
873 char *addBackground = strstr(option,"Add");
a897a37a 874
f665c1ea 875
a9e2aefa 876 AliMUONChamber* iChamber;
877 AliMUONSegmentation* segmentation;
a897a37a 878
879
880 Int_t trk[50];
881 Int_t chtrk[50];
882 TObjArray *list=new TObjArray;
a9e2aefa 883 static TClonesArray *pAddress=0;
884 if(!pAddress) pAddress=new TClonesArray("TVector",1000);
a897a37a 885 Int_t digits[5];
886
a9e2aefa 887 AliMUON *pMUON = (AliMUON *) gAlice->GetModule("MUON");
d09fafb0 888 AliMUONHitMap** hitMap= new AliMUONHitMap* [AliMUONConstants::NCh()];
f665c1ea 889 for (Int_t i=0; i<AliMUONConstants::NCh(); i++) {hitMap[i]=0;}
a9e2aefa 890 if (addBackground ) {
a897a37a 891 if(first) {
892 fFileName=filename;
893 cout<<"filename"<<fFileName<<endl;
a9e2aefa 894 file=new TFile(fFileName);
a897a37a 895 cout<<"I have opened "<<fFileName<<" file "<<endl;
a9e2aefa 896 fHits2 = new TClonesArray("AliMUONHit",1000 );
897 fPadHits2 = new TClonesArray("AliMUONPadHit",10000);
a897a37a 898 }
a6f39961 899 first=kFALSE;
a9e2aefa 900 file->cd();
901 //file->ls();
a897a37a 902 // Get Hits Tree header from file
903 if(fHits2) fHits2->Clear();
a9e2aefa 904 if(fPadHits2) fPadHits2->Clear();
905 if(fTrH1) delete fTrH1;
906 fTrH1=0;
a897a37a 907
908 char treeName[20];
a9e2aefa 909 sprintf(treeName,"TreeH%d",bgrEvent);
910 fTrH1 = (TTree*)gDirectory->Get(treeName);
911 //printf("fTrH1 %p of treename %s for event %d \n",fTrH1,treeName,bgrEvent);
a897a37a 912
a9e2aefa 913 if (!fTrH1) {
914 printf("ERROR: cannot find Hits Tree for event:%d\n",bgrEvent);
a897a37a 915 }
916 // Set branch addresses
917 TBranch *branch;
918 char branchname[20];
919 sprintf(branchname,"%s",GetName());
a9e2aefa 920 if (fTrH1 && fHits2) {
921 branch = fTrH1->GetBranch(branchname);
a897a37a 922 if (branch) branch->SetAddress(&fHits2);
923 }
a9e2aefa 924 if (fTrH1 && fPadHits2) {
925 branch = fTrH1->GetBranch("MUONCluster");
926 if (branch) branch->SetAddress(&fPadHits2);
a897a37a 927 }
928// test
a9e2aefa 929 //Int_t ntracks1 =(Int_t)fTrH1->GetEntries();
a897a37a 930 //printf("background - ntracks1 - %d\n",ntracks1);
931 }
932 //
933 // loop over cathodes
934 //
935 AliMUONHitMap* hm;
936 Int_t countadr=0;
937 for (int icat=0; icat<2; icat++) {
a897a37a 938 Int_t counter=0;
d09fafb0 939 Int_t * nmuon = new Int_t [AliMUONConstants::NCh()];
f665c1ea 940 for (Int_t i =0; i<AliMUONConstants::NCh(); i++) {
a9e2aefa 941 iChamber=(AliMUONChamber*) (*fChambers)[i];
a897a37a 942 if (iChamber->Nsec()==1 && icat==1) {
fe4da5cc 943 continue;
a897a37a 944 } else {
a9e2aefa 945 segmentation=iChamber->SegmentationModel(icat+1);
fe4da5cc 946 }
a9e2aefa 947 hitMap[i] = new AliMUONHitMapA1(segmentation, list);
f665c1ea 948 nmuon[i]=0;
a897a37a 949 }
950 //printf("Start loop over tracks \n");
951//
952// Loop over tracks
953//
954
a9e2aefa 955 TTree *treeH = gAlice->TreeH();
956 Int_t ntracks =(Int_t) treeH->GetEntries();
d09fafb0 957 Int_t jj;
958 Float_t ** xhit = new Float_t * [2];
959 for (jj=0; jj<2; jj++) xhit[jj] = new Float_t [AliMUONConstants::NCh()];
960 Float_t ** yhit = new Float_t * [2];
961 for (jj=0; jj<2; jj++) yhit[jj] = new Float_t [AliMUONConstants::NCh()];
a897a37a 962
963 for (Int_t track=0; track<ntracks; track++) {
964 gAlice->ResetHits();
a9e2aefa 965 treeH->GetEvent(track);
a897a37a 966
967//
968// Loop over hits
a9e2aefa 969 for(AliMUONHit* mHit=(AliMUONHit*)pMUON->FirstHit(-1);
a897a37a 970 mHit;
a9e2aefa 971 mHit=(AliMUONHit*)pMUON->NextHit())
a897a37a 972 {
973 Int_t nch = mHit->fChamber-1; // chamber number
f665c1ea 974 if (nch > AliMUONConstants::NCh()-1) continue;
a9e2aefa 975 iChamber = &(pMUON->Chamber(nch));
a897a37a 976 // new 17.07.99
a9e2aefa 977 if (addBackground) {
978
979 if (mHit->fParticle == kMuonPlus
980 || mHit->fParticle == kMuonMinus) {
981 xhit[nch][nmuon[nch]]=mHit->fX;
982 yhit[nch][nmuon[nch]]=mHit->fY;
983 nmuon[nch]++;
984 if (nmuon[nch] >2) printf("nmuon %d\n",nmuon[nch]);
985 }
fe4da5cc 986 }
a9e2aefa 987
a897a37a 988
989
990
991//
992// Loop over pad hits
a9e2aefa 993 for (AliMUONPadHit* mPad=
994 (AliMUONPadHit*)pMUON->FirstPad(mHit,fPadHits);
a897a37a 995 mPad;
a9e2aefa 996 mPad=(AliMUONPadHit*)pMUON->NextPad(fPadHits))
a897a37a 997 {
998 Int_t cathode = mPad->fCathode; // cathode number
999 Int_t ipx = mPad->fPadX; // pad number on X
1000 Int_t ipy = mPad->fPadY; // pad number on Y
a9e2aefa 1001 Int_t iqpad = Int_t(mPad->fQpad);// charge per pad
a897a37a 1002//
1003//
1004
1005 if (cathode != (icat+1)) continue;
1006 // fill the info array
802a864d 1007 Float_t thex, they, thez;
a9e2aefa 1008 segmentation=iChamber->SegmentationModel(cathode);
802a864d 1009 segmentation->GetPadCxy(ipx,ipy,thex,they,thez);
a9e2aefa 1010// Float_t rpad=TMath::Sqrt(thex*thex+they*they);
1011// if (rpad < rmin || iqpad ==0 || rpad > rmax) continue;
a897a37a 1012
a9e2aefa 1013 new((*pAddress)[countadr++]) TVector(2);
1014 TVector &trinfo=*((TVector*) (*pAddress)[countadr-1]);
a897a37a 1015 trinfo(0)=(Float_t)track;
1016 trinfo(1)=(Float_t)iqpad;
1017
1018 digits[0]=ipx;
1019 digits[1]=ipy;
1020 digits[2]=iqpad;
1021 digits[3]=iqpad;
a9e2aefa 1022 if (mHit->fParticle == kMuonPlus ||
1023 mHit->fParticle == kMuonMinus) {
1024 digits[4]=mPad->fHitNumber;
a897a37a 1025 } else digits[4]=-1;
1026
a9e2aefa 1027 AliMUONTransientDigit* pdigit;
a897a37a 1028 // build the list of fired pads and update the info
a9e2aefa 1029 if (!hitMap[nch]->TestHit(ipx, ipy)) {
a897a37a 1030
1031 list->AddAtAndExpand(
a9e2aefa 1032 new AliMUONTransientDigit(nch,digits),counter);
a897a37a 1033
a9e2aefa 1034 hitMap[nch]->SetHit(ipx, ipy, counter);
a897a37a 1035 counter++;
a9e2aefa 1036 pdigit=(AliMUONTransientDigit*)list->At(list->GetLast());
a897a37a 1037 // list of tracks
1038 TObjArray *trlist=(TObjArray*)pdigit->TrackList();
1039 trlist->Add(&trinfo);
1040 } else {
a9e2aefa 1041 pdigit=(AliMUONTransientDigit*) hitMap[nch]->GetHit(ipx, ipy);
a897a37a 1042 // update charge
1043 (*pdigit).fSignal+=iqpad;
1044 (*pdigit).fPhysics+=iqpad;
1045 // update list of tracks
1046 TObjArray* trlist=(TObjArray*)pdigit->TrackList();
a9e2aefa 1047 Int_t lastEntry=trlist->GetLast();
1048 TVector *pTrack=(TVector*)trlist->At(lastEntry);
1049 TVector &ptrk=*pTrack;
1050 Int_t lastTrack=Int_t(ptrk(0));
1051 Int_t lastCharge=Int_t(ptrk(1));
1052 if (lastTrack==track) {
1053 lastCharge+=iqpad;
1054 trlist->RemoveAt(lastEntry);
1055 trinfo(0)=lastTrack;
1056 trinfo(1)=lastCharge;
1057 trlist->AddAt(&trinfo,lastEntry);
a897a37a 1058 } else {
1059 trlist->Add(&trinfo);
1060 }
1061 // check the track list
1062 Int_t nptracks=trlist->GetEntriesFast();
1063 if (nptracks > 2) {
1064 for (Int_t tr=0;tr<nptracks;tr++) {
a9e2aefa 1065 TVector *ppTrack=(TVector*)trlist->At(tr);
1066 TVector &pptrk=*ppTrack;
a897a37a 1067 trk[tr]=Int_t(pptrk(0));
1068 chtrk[tr]=Int_t(pptrk(1));
1069 }
1070 } // end if nptracks
1071 } // end if pdigit
1072 } //end loop over clusters
1073 } // hit loop
1074 } // track loop
a897a37a 1075
1076 // open the file with background
1077
a9e2aefa 1078 if (addBackground) {
1079 ntracks =(Int_t)fTrH1->GetEntries();
a897a37a 1080//
1081// Loop over tracks
1082//
1083 for (Int_t track=0; track<ntracks; track++) {
1084
1085 if (fHits2) fHits2->Clear();
a9e2aefa 1086 if (fPadHits2) fPadHits2->Clear();
a897a37a 1087
a9e2aefa 1088 fTrH1->GetEvent(track);
a897a37a 1089//
1090// Loop over hits
a9e2aefa 1091 AliMUONHit* mHit;
a897a37a 1092 for(int i=0;i<fHits2->GetEntriesFast();++i)
a9e2aefa 1093 {
1094 mHit=(AliMUONHit*) (*fHits2)[i];
a897a37a 1095 Int_t nch = mHit->fChamber-1; // chamber number
1096 if (nch >9) continue;
a9e2aefa 1097 iChamber = &(pMUON->Chamber(nch));
a897a37a 1098 Int_t rmin = (Int_t)iChamber->RInner();
1099 Int_t rmax = (Int_t)iChamber->ROuter();
1100 Float_t xbgr=mHit->fX;
1101 Float_t ybgr=mHit->fY;
a6f39961 1102 Bool_t cond=kFALSE;
a897a37a 1103
1104 for (Int_t imuon =0; imuon < nmuon[nch]; imuon++) {
1105 Float_t dist= (xbgr-xhit[nch][imuon])*(xbgr-xhit[nch][imuon])
1106 +(ybgr-yhit[nch][imuon])*(ybgr-yhit[nch][imuon]);
a6f39961 1107 if (dist<100) cond=kTRUE;
a897a37a 1108 }
1109 if (!cond) continue;
1110
1111//
1112// Loop over pad hits
a9e2aefa 1113 for (AliMUONPadHit* mPad=
1114 (AliMUONPadHit*)pMUON->FirstPad(mHit,fPadHits2);
a897a37a 1115 mPad;
a9e2aefa 1116 mPad=(AliMUONPadHit*)pMUON->NextPad(fPadHits2))
a897a37a 1117 {
a9e2aefa 1118 // mPad = (AliMUONPadHit*) (*fPadHits2)[j];
a897a37a 1119 Int_t cathode = mPad->fCathode; // cathode number
1120 Int_t ipx = mPad->fPadX; // pad number on X
1121 Int_t ipy = mPad->fPadY; // pad number on Y
a9e2aefa 1122 Int_t iqpad = Int_t(mPad->fQpad);// charge per pad
a897a37a 1123
1124 if (cathode != (icat+1)) continue;
802a864d 1125 Float_t thex, they, thez;
a9e2aefa 1126 segmentation=iChamber->SegmentationModel(cathode);
802a864d 1127 segmentation->GetPadCxy(ipx,ipy,thex,they,thez);
a897a37a 1128 Float_t rpad=TMath::Sqrt(thex*thex+they*they);
1129 if (rpad < rmin || iqpad ==0 || rpad > rmax) continue;
a9e2aefa 1130 new((*pAddress)[countadr++]) TVector(2);
1131 TVector &trinfo=*((TVector*) (*pAddress)[countadr-1]);
1132 trinfo(0)=-1; // tag background
1133 trinfo(1)=-1;
1134
a897a37a 1135 digits[0]=ipx;
1136 digits[1]=ipy;
1137 digits[2]=iqpad;
1138 digits[3]=0;
1139 digits[4]=-1;
a897a37a 1140
a9e2aefa 1141 AliMUONTransientDigit* pdigit;
1142 // build the list of fired pads and update the info
1143 if (!hitMap[nch]->TestHit(ipx, ipy)) {
1144 list->AddAtAndExpand(new AliMUONTransientDigit(nch,digits),counter);
1145
1146 hitMap[nch]->SetHit(ipx, ipy, counter);
a897a37a 1147 counter++;
1148
a9e2aefa 1149 pdigit=(AliMUONTransientDigit*)list->At(list->GetLast());
a897a37a 1150 // list of tracks
a9e2aefa 1151 TObjArray *trlist=(TObjArray*)pdigit->
1152 TrackList();
1153 trlist->Add(&trinfo);
a897a37a 1154 } else {
a9e2aefa 1155 pdigit=(AliMUONTransientDigit*) hitMap[nch]->GetHit(ipx, ipy);
a897a37a 1156 // update charge
1157 (*pdigit).fSignal+=iqpad;
a9e2aefa 1158
a897a37a 1159 // update list of tracks
a9e2aefa 1160 TObjArray* trlist=(TObjArray*)pdigit->
1161 TrackList();
1162 Int_t lastEntry=trlist->GetLast();
1163 TVector *pTrack=(TVector*)trlist->
1164 At(lastEntry);
1165 TVector &ptrk=*pTrack;
1166 Int_t lastTrack=Int_t(ptrk(0));
1167 if (lastTrack==-1) {
1168 continue;
1169 } else {
1170 trlist->Add(&trinfo);
1171 }
a897a37a 1172 // check the track list
a9e2aefa 1173 Int_t nptracks=trlist->GetEntriesFast();
1174 if (nptracks > 0) {
1175 for (Int_t tr=0;tr<nptracks;tr++) {
1176 TVector *ppTrack=(TVector*)trlist->At(tr);
1177 TVector &pptrk=*ppTrack;
1178 trk[tr]=Int_t(pptrk(0));
1179 chtrk[tr]=Int_t(pptrk(1));
1180 }
1181 } // end if nptracks
a897a37a 1182 } // end if pdigit
1183 } //end loop over clusters
1184 } // hit loop
1185 } // track loop
1186 //Int_t nentr2=list->GetEntriesFast();
1187 //printf(" \n counter2, nentr2 %d %d \n",counter,nentr2);
1188 TTree *fAli=gAlice->TreeK();
a9e2aefa 1189 TFile *file=NULL;
a897a37a 1190
1191 if (fAli) file =fAli->GetCurrentFile();
1192 file->cd();
d09fafb0 1193 } // if addBackground
1194 delete [] xhit;
1195 delete [] yhit;
1196
a897a37a 1197 Int_t tracks[10];
1198 Int_t charges[10];
a897a37a 1199 Int_t nentries=list->GetEntriesFast();
a897a37a 1200
1201 for (Int_t nent=0;nent<nentries;nent++) {
a9e2aefa 1202 AliMUONTransientDigit *address=(AliMUONTransientDigit*)list->At(nent);
a897a37a 1203 if (address==0) continue;
1204 Int_t ich=address->fChamber;
1205 Int_t q=address->fSignal;
a9e2aefa 1206 iChamber=(AliMUONChamber*) (*fChambers)[ich];
1207//
1208// Digit Response (noise, threshold, saturation, ...)
1209// if (address->fPhysics !=0 ) address->fPhysics+=(Int_t)Noise;
1210 AliMUONResponse * response=iChamber->ResponseModel();
1211 q=response->DigitResponse(q);
1212
1213 if (!q) continue;
1214
a897a37a 1215 digits[0]=address->fPadX;
1216 digits[1]=address->fPadY;
1217 digits[2]=q;
1218 digits[3]=address->fPhysics;
1219 digits[4]=address->fHit;
a897a37a 1220
1221 TObjArray* trlist=(TObjArray*)address->TrackList();
1222 Int_t nptracks=trlist->GetEntriesFast();
1223 //printf("nptracks, trlist %d %p\n",nptracks,trlist);
1224
a9e2aefa 1225 // this was changed to accomodate the real number of tracks
1226 if (nptracks > 10) {
1227 cout<<"Attention - nptracks > 10 "<<nptracks<<endl;
1228 nptracks=10;
1229 }
1230 if (nptracks > 2) {
1231 printf("Attention - nptracks > 2 %d \n",nptracks);
1232 printf("cat,ich,ix,iy,q %d %d %d %d %d \n",icat,ich,digits[0],digits[1],q);
1233 }
1234 for (Int_t tr=0;tr<nptracks;tr++) {
1235 TVector *ppP=(TVector*)trlist->At(tr);
1236 if(!ppP ) printf("ppP - %p\n",ppP);
1237 TVector &pp =*ppP;
1238 tracks[tr]=Int_t(pp(0));
1239 charges[tr]=Int_t(pp(1));
a897a37a 1240 //printf("tracks, charges - %d %d\n",tracks[tr],charges[tr]);
a9e2aefa 1241 } //end loop over list of tracks for one pad
a897a37a 1242 // Sort list of tracks according to charge
a9e2aefa 1243 if (nptracks > 1) {
1244 SortTracks(tracks,charges,nptracks);
1245 }
1246 if (nptracks < 10 ) {
1247 for (Int_t i=nptracks; i<10; i++) {
1248 tracks[i]=0;
1249 charges[i]=0;
a897a37a 1250 }
a9e2aefa 1251 }
1252
a897a37a 1253 // fill digits
a9e2aefa 1254 pMUON->AddDigits(ich,tracks,charges,digits);
1255 // delete trlist;
a897a37a 1256 }
1257 //cout<<"I'm out of the loops for digitisation"<<endl;
a9e2aefa 1258 // gAlice->GetEvent(nev);
a897a37a 1259 gAlice->TreeD()->Fill();
a9e2aefa 1260 pMUON->ResetDigits();
a897a37a 1261 list->Delete();
d09fafb0 1262
a9e2aefa 1263
f665c1ea 1264 for(Int_t ii=0;ii<AliMUONConstants::NCh();++ii) {
a9e2aefa 1265 if (hitMap[ii]) {
1266 hm=hitMap[ii];
a897a37a 1267 delete hm;
a9e2aefa 1268 hitMap[ii]=0;
fe4da5cc 1269 }
a897a37a 1270 }
d09fafb0 1271 delete [] nmuon;
a897a37a 1272 } //end loop over cathodes
d09fafb0 1273 delete [] hitMap;
a9e2aefa 1274 char hname[30];
1275 sprintf(hname,"TreeD%d",nev);
1276 gAlice->TreeD()->Write(hname);
1277 // reset tree
1278 gAlice->TreeD()->Reset();
1279 delete list;
1280
1281 pAddress->Delete();
1282 // gObjectTable->Print();
a897a37a 1283}
1284
1285void AliMUON::SortTracks(Int_t *tracks,Int_t *charges,Int_t ntr)
1286{
1287 //
1288 // Sort the list of tracks contributing to a given digit
1289 // Only the 3 most significant tracks are acctually sorted
1290 //
1291
1292 //
1293 // Loop over signals, only 3 times
1294 //
1295
1296 Int_t qmax;
1297 Int_t jmax;
1298 Int_t idx[3] = {-2,-2,-2};
1299 Int_t jch[3] = {-2,-2,-2};
1300 Int_t jtr[3] = {-2,-2,-2};
1301 Int_t i,j,imax;
1302
1303 if (ntr<3) imax=ntr;
1304 else imax=3;
1305 for(i=0;i<imax;i++){
1306 qmax=0;
1307 jmax=0;
1308
1309 for(j=0;j<ntr;j++){
1310
1311 if((i == 1 && j == idx[i-1])
1312 ||(i == 2 && (j == idx[i-1] || j == idx[i-2]))) continue;
1313
1314 if(charges[j] > qmax) {
1315 qmax = charges[j];
1316 jmax=j;
1317 }
1318 }
1319
1320 if(qmax > 0) {
1321 idx[i]=jmax;
1322 jch[i]=charges[jmax];
1323 jtr[i]=tracks[jmax];
1324 }
1325
1326 }
1327
1328 for(i=0;i<3;i++){
1329 if (jtr[i] == -2) {
1330 charges[i]=0;
1331 tracks[i]=0;
1332 } else {
1333 charges[i]=jch[i];
1334 tracks[i]=jtr[i];
1335 }
1336 }
1337
fe4da5cc 1338}
1339
a9e2aefa 1340//___________________________________________
1341void AliMUON::Trigger(Int_t nev){
1342// call the Trigger Algorithm and fill TreeR
1343
1344 Int_t singlePlus[3] = {0,0,0};
1345 Int_t singleMinus[3] = {0,0,0};
1346 Int_t singleUndef[3] = {0,0,0};
1347 Int_t pairUnlike[3] = {0,0,0};
1348 Int_t pairLike[3] = {0,0,0};
1349
1350 ResetTrigger();
a9e2aefa 1351 AliMUONTriggerDecision* decision= new AliMUONTriggerDecision(1);
1352 decision->Trigger();
1353 decision->GetGlobalTrigger(singlePlus, singleMinus, singleUndef,
1354 pairUnlike, pairLike);
1355// add a local trigger in the list
1356 AddGlobalTrigger(singlePlus, singleMinus, singleUndef, pairUnlike, pairLike);
9ae15266 1357 Int_t i;
a9e2aefa 1358
f665c1ea 1359 for (Int_t icirc=0; icirc<AliMUONConstants::NTriggerCircuit(); icirc++) {
9ae15266 1360 if(decision->GetITrigger(icirc)==1) {
1361 Int_t localtr[7]={0,0,0,0,0,0,0};
1362 Int_t loLpt[2]={0,0}; Int_t loHpt[2]={0,0}; Int_t loApt[2]={0,0};
1363 decision->GetLutOutput(icirc, loLpt, loHpt, loApt);
1364 localtr[0] = icirc;
1365 localtr[1] = decision->GetStripX11(icirc);
1366 localtr[2] = decision->GetDev(icirc);
1367 localtr[3] = decision->GetStripY11(icirc);
1368 for (i=0; i<2; i++) { // convert the Lut output in 1 digit
1369 localtr[4] = localtr[4]+Int_t(loLpt[i]*TMath::Power(2,i));
1370 localtr[5] = localtr[5]+Int_t(loHpt[i]*TMath::Power(2,i));
1371 localtr[6] = localtr[6]+Int_t(loApt[i]*TMath::Power(2,i));
1372 }
1373 AddLocalTrigger(localtr); // add a local trigger in the list
a897a37a 1374 }
a9e2aefa 1375 }
1376 delete decision;
a897a37a 1377
a9e2aefa 1378 gAlice->TreeR()->Fill();
1379 ResetTrigger();
a897a37a 1380 char hname[30];
1381 sprintf(hname,"TreeR%d",nev);
1382 gAlice->TreeR()->Write(hname);
1383 gAlice->TreeR()->Reset();
a9e2aefa 1384 printf("\n End of trigger for event %d", nev);
a897a37a 1385}
a897a37a 1386
a897a37a 1387
a9e2aefa 1388//____________________________________________
1389void AliMUON::FindClusters(Int_t nev,Int_t lastEntry)
1390{
1391 TClonesArray *dig1, *dig2;
1392 Int_t ndig, k;
1393 dig1 = new TClonesArray("AliMUONDigit",1000);
1394 dig2 = new TClonesArray("AliMUONDigit",1000);
1395 AliMUONDigit *digit;
a897a37a 1396//
a9e2aefa 1397// Loop on chambers and on cathode planes
a897a37a 1398//
a897a37a 1399
a9e2aefa 1400 for (Int_t ich=0;ich<10;ich++) {
1401 AliMUONChamber* iChamber=(AliMUONChamber*) (*fChambers)[ich];
30aaba74 1402 AliMUONClusterFinderVS* rec = iChamber->ReconstructionModel();
a9e2aefa 1403 gAlice->ResetDigits();
1404 gAlice->TreeD()->GetEvent(lastEntry);
1405 TClonesArray *muonDigits = this->DigitsAddress(ich);
1406 ndig=muonDigits->GetEntriesFast();
1407 printf("\n 1 Found %d digits in %p %d", ndig, muonDigits,ich);
1408 TClonesArray &lhits1 = *dig1;
1409 Int_t n=0;
1410 for (k=0; k<ndig; k++) {
1411 digit=(AliMUONDigit*) muonDigits->UncheckedAt(k);
1412 if (rec->TestTrack(digit->fTracks[0]))
1413 new(lhits1[n++]) AliMUONDigit(*digit);
1414 }
1415 gAlice->ResetDigits();
1416 gAlice->TreeD()->GetEvent(lastEntry+1);
1417 muonDigits = this->DigitsAddress(ich);
1418 ndig=muonDigits->GetEntriesFast();
1419 printf("\n 2 Found %d digits in %p %d", ndig, muonDigits, ich);
1420 TClonesArray &lhits2 = *dig2;
1421 n=0;
1422
1423 for (k=0; k<ndig; k++) {
1424 digit= (AliMUONDigit*) muonDigits->UncheckedAt(k);
1425 if (rec->TestTrack(digit->fTracks[0]))
1426 new(lhits2[n++]) AliMUONDigit(*digit);
a897a37a 1427 }
a897a37a 1428
9825400f 1429 if (rec) {
1430 AliMUONClusterInput::Instance()->SetDigits(ich, dig1, dig2);
a9e2aefa 1431 rec->FindRawClusters();
1432 }
1433 dig1->Delete();
1434 dig2->Delete();
1435 } // for ich
1436 gAlice->TreeR()->Fill();
1437 ResetRawClusters();
1438 char hname[30];
1439 sprintf(hname,"TreeR%d",nev);
1440 gAlice->TreeR()->Write(hname);
1441 gAlice->TreeR()->Reset();
1442 printf("\n End of cluster finding for event %d", nev);
1443
1444 delete dig1;
1445 delete dig2;
1446 //gObjectTable->Print();
a897a37a 1447}
a9e2aefa 1448
a897a37a 1449
fe4da5cc 1450void AliMUON::Streamer(TBuffer &R__b)
1451{
1452 // Stream an object of class AliMUON.
a9e2aefa 1453 AliMUONChamber *iChamber;
1454 AliMUONTriggerCircuit *iTriggerCircuit;
1455 AliMUONSegmentation *segmentation;
1456 AliMUONResponse *response;
fe4da5cc 1457 TClonesArray *digitsaddress;
a897a37a 1458 TClonesArray *rawcladdress;
9ae15266 1459 Int_t i;
9ae15266 1460 if (R__b.IsReading()) {
1461 Version_t R__v = R__b.ReadVersion(); if (R__v) { }
1462 AliDetector::Streamer(R__b);
1463 R__b >> fNPadHits;
1464 R__b >> fPadHits; // diff
1465 R__b >> fNLocalTrigger;
1466 R__b >> fLocalTrigger;
1467 R__b >> fNGlobalTrigger;
1468 R__b >> fGlobalTrigger;
1469 R__b >> fDchambers;
1470 R__b >> fRawClusters;
1471 R__b.ReadArray(fNdch);
1472 R__b.ReadArray(fNrawch);
1473 R__b >> fAccCut;
1474 R__b >> fAccMin;
1475 R__b >> fAccMax;
1476 R__b >> fChambers;
1477 R__b >> fTriggerCircuits;
f665c1ea 1478 for (i =0; i<AliMUONConstants::NTriggerCircuit(); i++) {
9ae15266 1479 iTriggerCircuit=(AliMUONTriggerCircuit*) (*fTriggerCircuits)[i];
1480 iTriggerCircuit->Streamer(R__b);
fe4da5cc 1481 }
9ae15266 1482// Stream chamber related information
f665c1ea 1483 for (i =0; i<AliMUONConstants::NCh(); i++) {
9ae15266 1484 iChamber=(AliMUONChamber*) (*fChambers)[i];
1485 iChamber->Streamer(R__b);
1486 if (iChamber->Nsec()==1) {
1487 segmentation=iChamber->SegmentationModel(1);
1488 if (segmentation)
1489 segmentation->Streamer(R__b);
1490 } else {
1491 segmentation=iChamber->SegmentationModel(1);
1492 if (segmentation)
1493 segmentation->Streamer(R__b);
1494 if (segmentation)
1495 segmentation=iChamber->SegmentationModel(2);
1496 segmentation->Streamer(R__b);
1497 }
1498 response=iChamber->ResponseModel();
1499 if (response)
1500 response->Streamer(R__b);
1501 digitsaddress=(TClonesArray*) (*fDchambers)[i];
1502 digitsaddress->Streamer(R__b);
f665c1ea 1503 if (i < AliMUONConstants::NTrackingCh()) {
9ae15266 1504 rawcladdress=(TClonesArray*) (*fRawClusters)[i];
1505 rawcladdress->Streamer(R__b);
1506 }
a9e2aefa 1507 }
9ae15266 1508
1509 } else {
1510 R__b.WriteVersion(AliMUON::IsA());
1511 AliDetector::Streamer(R__b);
1512 R__b << fNPadHits;
1513 R__b << fPadHits; // diff
1514 R__b << fNLocalTrigger;
1515 R__b << fLocalTrigger;
1516 R__b << fNGlobalTrigger;
1517 R__b << fGlobalTrigger;
1518 R__b << fDchambers;
1519 R__b << fRawClusters;
f665c1ea 1520 R__b.WriteArray(fNdch, AliMUONConstants::NCh());
1521 R__b.WriteArray(fNrawch, AliMUONConstants::NTrackingCh());
9ae15266 1522
1523 R__b << fAccCut;
1524 R__b << fAccMin;
1525 R__b << fAccMax;
1526
1527 R__b << fChambers;
1528 R__b << fTriggerCircuits;
f665c1ea 1529 for (i =0; i<AliMUONConstants::NTriggerCircuit(); i++) {
9ae15266 1530 iTriggerCircuit=(AliMUONTriggerCircuit*) (*fTriggerCircuits)[i];
1531 iTriggerCircuit->Streamer(R__b);
fe4da5cc 1532 }
f665c1ea 1533 for (i =0; i<AliMUONConstants::NCh(); i++) {
9ae15266 1534 iChamber=(AliMUONChamber*) (*fChambers)[i];
1535 iChamber->Streamer(R__b);
1536 if (iChamber->Nsec()==1) {
1537 segmentation=iChamber->SegmentationModel(1);
1538 if (segmentation)
1539 segmentation->Streamer(R__b);
1540 } else {
1541 segmentation=iChamber->SegmentationModel(1);
1542 if (segmentation)
1543 segmentation->Streamer(R__b);
1544 segmentation=iChamber->SegmentationModel(2);
1545 if (segmentation)
1546 segmentation->Streamer(R__b);
1547 }
1548 response=iChamber->ResponseModel();
1549 if (response)
1550 response->Streamer(R__b);
1551 digitsaddress=(TClonesArray*) (*fDchambers)[i];
1552 digitsaddress->Streamer(R__b);
f665c1ea 1553 if (i < AliMUONConstants::NTrackingCh()) {
9ae15266 1554 rawcladdress=(TClonesArray*) (*fRawClusters)[i];
1555 rawcladdress->Streamer(R__b);
1556 }
a9e2aefa 1557 }
fe4da5cc 1558 }
fe4da5cc 1559}
a9e2aefa 1560AliMUONPadHit* AliMUON::FirstPad(AliMUONHit* hit, TClonesArray *clusters)
fe4da5cc 1561{
1562//
1563 // Initialise the pad iterator
1564 // Return the address of the first padhit for hit
a897a37a 1565 TClonesArray *theClusters = clusters;
fe4da5cc 1566 Int_t nclust = theClusters->GetEntriesFast();
1567 if (nclust && hit->fPHlast > 0) {
a9e2aefa 1568 AliMUON::fMaxIterPad=hit->fPHlast;
1569 AliMUON::fCurIterPad=hit->fPHfirst;
1570 return (AliMUONPadHit*) clusters->UncheckedAt(AliMUON::fCurIterPad-1);
fe4da5cc 1571 } else {
1572 return 0;
1573 }
1574}
1575
a9e2aefa 1576AliMUONPadHit* AliMUON::NextPad(TClonesArray *clusters)
fe4da5cc 1577{
a9e2aefa 1578 AliMUON::fCurIterPad++;
1579 if (AliMUON::fCurIterPad <= AliMUON::fMaxIterPad) {
1580 return (AliMUONPadHit*) clusters->UncheckedAt(AliMUON::fCurIterPad-1);
fe4da5cc 1581 } else {
1582 return 0;
1583 }
1584}
1585
a897a37a 1586
1587AliMUONRawCluster *AliMUON::RawCluster(Int_t ichamber, Int_t icathod, Int_t icluster)
1588{
a9e2aefa 1589 TClonesArray *muonRawCluster = RawClustAddress(ichamber);
a897a37a 1590 ResetRawClusters();
a9e2aefa 1591 TTree *treeR = gAlice->TreeR();
1592 Int_t nent=(Int_t)treeR->GetEntries();
1593 treeR->GetEvent(nent-2+icathod-1);
1594 //treeR->GetEvent(icathod);
1595 //Int_t nrawcl = (Int_t)muonRawCluster->GetEntriesFast();
a897a37a 1596
a9e2aefa 1597 AliMUONRawCluster * mRaw = (AliMUONRawCluster*)muonRawCluster->UncheckedAt(icluster);
a897a37a 1598 //printf("RawCluster _ nent nrawcl icluster mRaw %d %d %d%p\n",nent,nrawcl,icluster,mRaw);
1599
1600 return mRaw;
1601}
1602
a9e2aefa 1603AliMUON& AliMUON::operator = (const AliMUON& rhs)
a897a37a 1604{
a9e2aefa 1605// copy operator
1606// dummy version
1607 return *this;
a897a37a 1608}
1609
1610
1611
a897a37a 1612
1613
fe4da5cc 1614
fe4da5cc 1615
fe4da5cc 1616
fe4da5cc 1617
1618
1619
1620
1621
1622
1623
1624
1625
1626
1627