* about the suitability of this software for any purpose. It is *
* provided "as is" without express or implied warranty. *
**************************************************************************/
-
/* $Id$ */
-
- /////////////////////////////////////////////////////////////////////
-// //
-// Forward Multiplicity detector based on Silicon version 0 //
-//
-//Begin Html
-/*
-<img src="gif/AliFMDv0Class.gif">
+/** @file AliFMDv1.cxx
+ @author Christian Holm Christensen <cholm@nbi.dk>
+ @date Mon Mar 27 12:48:51 2006
+ @brief Concrete implementation of FMD detector driver - detailed
+ version
+ @ingroup FMD_sim
*/
-//End Html
-// //
-// //
-//////////////////////////////////////////////////////////////////////
-
-#include <Riostream.h>
-#include <stdlib.h>
-
-#include <TClonesArray.h>
-#include <TDirectory.h>
-#include <TFile.h>
-#include <TGeometry.h>
-#include <TLorentzVector.h>
-#include <TMath.h>
-#include <TNode.h>
-#include <TTUBE.h>
-#include <TTree.h>
-#include <TVirtualMC.h>
-
-#include "AliFMDdigit.h"
-#include "AliFMDhit.h"
-#include "AliFMDv0.h"
-#include "AliFMDv1.h"
-#include "AliMagF.h"
-#include "AliRun.h"
-#include "AliMC.h"
-
+//____________________________________________________________________
+//
+// Forward Multiplicity Detector based on Silicon wafers. This class
+// contains the base procedures for the Forward Multiplicity detector
+// Detector consists of 3 sub-detectors FMD1, FMD2, and FMD3, each of
+// which has 1 or 2 rings of silicon sensors.
+// This class contains the detailed version of the FMD - that is, hits
+// are produced during simulation.
+//
+// See also the class AliFMD for a more detailed explanation of the
+// various componets.
+//
+#include <TVirtualMC.h> // ROOT_TVirtualMC
+#include <AliRun.h> // ALIRUN_H
+#include <AliMC.h> // ALIMC_H
+// #include <AliLog.h> // ALILOG_H
+#include "AliFMDDebug.h" // Better debug macros
+#include "AliFMDv1.h" // ALIFMDV1_H
+// #include "AliFMDGeometryBuilder.h"
+#include "AliFMDGeometry.h"
+#include "AliFMDDetector.h"
+#include "AliFMDRing.h"
+#include <TParticlePDG.h>
+#include <TDatabasePDG.h>
+#include "AliFMDHit.h"
+
+//____________________________________________________________________
ClassImp(AliFMDv1)
-
-//--------------------------------------------------------------------
-AliFMDv1::AliFMDv1(const char *name, const char *title):
- AliFMD(name,title)
-{
- //
- // Standart constructor for Forward Multiplicity Detector version 0
- //
- fIdSens1=0;
- fIdSens2=0;
- fIdSens3=0;
- fIdSens4=0;
- fIdSens5=0;
-// setBufferSize(128000);
- }
-//-------------------------------------------------------------------------
-void AliFMDv1::CreateGeometry()
-{
- //
- // Create the geometry of Forward Multiplicity Detector version 0
- //
- //Detector consists of 6 volumes:
- // 1st covered pseudorapidity interval from 3.3 to 2.0
- // and placed on 65cm in Z-direction;
- // 2nd - from 2.0 to 1.6 and Z=85 cm;
- // 3d - the same pseudorapidity interval as the 1st
- // but on the other side from the interaction point z=-65cm;
- // 4th - simmetricaly with the 2nd :
- // pseudorapidity from 2.0 to 1.6, Z=-85cm
- // 5th - from 3.6 to 4.7, Z=-270cm
- // 6th - from 4.5 to 5.5 , Z=-630cm.
- // Each part has 400mkm Si (sensetive area, detector itself),
- // 0.75cm of plastic simulated electronics material,
- // Al support ring 2cm thickness and 1cm width placed on
- // the outer radius of each Si disk;
- //
- // begin Html
- /*
- <img src="gif/AliFMDv0.gif">
- */
- //
+#if 0
+ ; // This is here to keep Emacs for indenting the next line
+#endif
-
- Int_t *idtmed = fIdtmed->GetArray();
-
- Int_t ifmd;
- Int_t idrotm[999];
- /*<<<<<<< AliFMDv1.cxx
- Float_t zFMD,par[3],ppcon[15];
- Float_t z[5]={62.8, 75.2, -83.4, -75.2, -340.};
- Float_t NylonTube[3]={0.2,0.6,0.45};
- Float_t zPCB=0.12; Float_t zHoneyComb=0.5;
- Float_t zSi=0.03;
-
- char nameFMD[5], nameSi[5], nameSector[5], nameRing[5];
- Char_t nameHoney[5], nameHoneyIn[5], nameHoneyOut[5];
- Char_t namePCB[5], nameCopper[5], nameChips[5], nameG10[5];
- Char_t nameLPCB[5], nameLCopper[5], nameLChips[5], nameGL10[5];;
- Float_t rin[5]={4.2,15.4,4.2,15.4,4.2};
- Float_t rout[5]={17.4,28.4,17.4,28.4,17.4};
- Float_t RinHoneyComb[5] ={ 5.15,16.4, 5.15,16.4, 5.15};
- Float_t RoutHoneyComb[5]={20.63,34.92,22.3, 32.02,20.63};
- Float_t zInside;
- Float_t zCooper=0.01; Float_t zChips=0.01;
- Float_t yNylonTube[5]={10,20,10,20,10};
- =======*/
- Float_t zFMD,par[3],ppcon[15];
- Float_t z[5]={-62.8, -75.2, 83.4, 75.2, 340.};
- Float_t NylonTube[3]={0.2,0.6,0.45};
- Float_t zPCB=0.12; Float_t zHoneyComb=0.5;
- Float_t zSi=0.03;
-
- char nameFMD[5], nameSi[5], nameSector[5], nameRing[5];
- Char_t nameHoney[5], nameHoneyIn[5], nameHoneyOut[5];
- Char_t namePCB[5], nameCopper[5], nameChips[5], nameG10[5];
- Char_t nameLPCB[5], nameLCopper[5], nameLChips[5], nameGL10[5];;
- Float_t rin[5]={4.2,15.4,4.2,15.4,4.2};
- Float_t rout[5]={17.4,28.4,17.4,28.4,17.4};
- Float_t RinHoneyComb[5] ={ 5.15,16.4, 5.15,16.4, 5.15};
- Float_t RoutHoneyComb[5]={20.63,34.92,22.3, 32.02,20.63};
- Float_t zInside;
- Float_t zCooper=0.01; Float_t zChips=0.01;
- Float_t yNylonTube[5]={10,20,10,20,10};
- //>>>>>>> 1.25
-
-
- AliMatrix(idrotm[901], 90, 0, 90, 90, 180, 0);
-
+//____________________________________________________________________
+Bool_t
+AliFMDv1::VMC2FMD(TLorentzVector& v, UShort_t& detector,
+ Char_t& ring, UShort_t& sector, UShort_t& strip) const
+{
+ // Convert VMC coordinates to detector coordinates
+ TVirtualMC* mc = TVirtualMC::GetMC();
+ AliFMDGeometry* fmd = AliFMDGeometry::Instance();
+
+ // Get track position
+ mc->TrackPosition(v);
+ Int_t moduleno; mc->CurrentVolOffID(fmd->GetModuleOff(), moduleno);
+ Int_t iring; mc->CurrentVolOffID(fmd->GetRingOff(), iring);
+ ring = Char_t(iring);
+ Int_t det; mc->CurrentVolOffID(fmd->GetDetectorOff(), det);
+ detector = det;
- // Nylon tubes
- gMC->Gsvolu("GNYL","TUBE", idtmed[1], NylonTube, 3); //support nylon tube
- Float_t wideSupport=zSi+3*zPCB+2*NylonTube[2]+zHoneyComb;
- cout<<" wideSupport "<<wideSupport<<endl;
-
- for (ifmd=0; ifmd<5; ifmd++)
- {
- sprintf(nameFMD,"FMD%d",ifmd+1);
- ppcon[0]=0;
- ppcon[1]=360;
- ppcon[2]=4;
-
- ppcon[3]=-wideSupport;
- ppcon[4]=rin[ifmd]-0.1;
- ppcon[5]=rout[ifmd]+0.1;
-
- ppcon[6]=ppcon[3]+2*zSi+2*zPCB+2*NylonTube[2];
- ppcon[7]=rin[ifmd]-0.1;
- ppcon[8]=rout[ifmd]+0.1;
-
- ppcon[9]=ppcon[6];
- ppcon[10]=RinHoneyComb[ifmd]-0.1;
- ppcon[11]=RoutHoneyComb[ifmd]+0.1;
-
- ppcon[12]=ppcon[9]+2*zHoneyComb+zPCB;
- ppcon[13]=RinHoneyComb[ifmd]-0.1;
- ppcon[14]=RoutHoneyComb[ifmd]+0.1;
- gMC->Gsvolu(nameFMD,"PCON",idtmed[0],ppcon,15);
- if (z[ifmd] >0){
- zFMD=z[ifmd]+wideSupport;
- gMC->Gspos(nameFMD,1,"ALIC",0,0,zFMD,0, "ONLY");}
- else {
- zFMD=z[ifmd]-wideSupport;
- gMC->Gspos(nameFMD,1,"ALIC",0,0,zFMD,idrotm[901], "ONLY");}
- //silicon
- sprintf(nameSi,"GSI%d",ifmd+1);
- sprintf(nameSector,"GSC%d",ifmd+1);
- sprintf(nameRing,"GRN%d",ifmd+1);
-
- //honeycomb support
- sprintf(nameHoney,"GSU%d",ifmd+1);
- gMC->Gsvolu(nameHoney,"TUBE", idtmed[0], par, 0); //honeycomb
- sprintf(nameHoneyIn,"GHI%d",ifmd+1);
- gMC->Gsvolu(nameHoneyIn,"TUBE", idtmed[7], par, 0); //honey comb inside
- sprintf(nameHoneyOut,"GHO%d",ifmd+1);
- gMC->Gsvolu(nameHoneyOut,"TUBE", idtmed[6], par, 0); //honey comb skin
- //PCB
- sprintf(namePCB,"GPC%d",ifmd+1);
- gMC->Gsvolu(namePCB,"TUBE", idtmed[0], par, 0); //PCB
- sprintf(nameCopper,"GCO%d",ifmd+1);
- gMC->Gsvolu(nameCopper,"TUBE", idtmed[3], par, 0); // Cooper
- sprintf(nameChips,"GCH%d",ifmd+1);
- gMC->Gsvolu(nameChips,"TUBE", idtmed[5], par, 0); // Si chips
- sprintf(nameG10,"G10%d",ifmd+1);
- gMC->Gsvolu(nameG10,"TUBE", idtmed[2], par, 0); //G10 plate
- //last PCB
- sprintf(nameLPCB,"GPL%d",ifmd+1);
- gMC->Gsvolu(nameLPCB,"TUBE", idtmed[0], par, 0); //PCB
- sprintf(nameLCopper,"GCL%d",ifmd+1);
- gMC->Gsvolu(nameLCopper,"TUBE", idtmed[3], par, 0); // Cooper
- sprintf(nameLChips,"GHL%d",ifmd+1);
- gMC->Gsvolu(nameLChips,"TUBE", idtmed[5], par, 0); // Si chips
- sprintf(nameGL10,"G1L%d",ifmd+1);
- gMC->Gsvolu(nameGL10,"TUBE", idtmed[2], par, 0); // Last G10
- par[0]=rin[ifmd]; // pipe size
- par[1]=rout[ifmd];
- par[2]=zSi/2;
- gMC->Gsvolu(nameSi,"TUBE", idtmed[4], par, 3);
- zInside=ppcon[3]+par[2];
- gMC->Gspos(nameSi,ifmd+1,nameFMD,0,0,zInside,0, "ONLY");
- //PCB 1
- zInside += par[2]+zPCB/2;
- par[2]=zPCB/2;
- gMC->Gsposp(namePCB,1,nameFMD,0,0,zInside,0, "ONLY",par,3);
- zInside += zPCB;
- gMC->Gsposp(namePCB,2,nameFMD,0,0,zInside,0, "ONLY",par,3);
- Float_t NulonTubeBegin=zInside+2.5*zPCB;
- par[2]=zPCB/2-0.02;
- Float_t zInPCB = -zPCB/2+par[2];
- gMC->Gsposp(nameG10,1,namePCB,0,0,zInPCB,0, "ONLY",par,3);
- zInPCB+=par[2]+zCooper/2 ;
- par[2]=zCooper/2;
- gMC->Gsposp(nameCopper,1,namePCB,0,0,zInPCB,0, "ONLY",par,3);
- zInPCB += zCooper/2 + zChips/2;
- par[2]=zChips/2;
- gMC->Gsposp(nameChips,1,namePCB,0,0,zInPCB,0, "ONLY",par,3);
- //HoneyComb
- zHoneyComb=0.8;
- par[0] = RinHoneyComb[ifmd];
- par[1] = RoutHoneyComb[ifmd];
- par[2] = zHoneyComb/2;
- zInside += 2*NylonTube[2]+par[2];
- gMC->Gsposp(nameHoney,1,nameFMD,0,0,zInside,0, "ONLY",par,3);
- par[2]=0.1/2;
- Float_t zHoney=-zHoneyComb/2+par[2];
- gMC->Gsposp(nameHoneyOut,1,nameHoney,0,0,zHoney,0,
- "ONLY",par,3); //shkurki
- zHoney=zHoneyComb/2-par[2];
- gMC->Gsposp(nameHoneyOut,2,nameHoney,0,0,zHoney,0, "ONLY",par,3);
- par[2]=(zHoneyComb-2.*0.1)/2; //soty vnutri
- gMC->Gsposp(nameHoneyIn,1,nameHoney,0,0,0,0, "ONLY",par,3);
-
- gMC->Gspos("GNYL",1,nameFMD,0,yNylonTube[ifmd],
- NulonTubeBegin+NylonTube[2]/2.,0, "ONLY");
- gMC->Gspos("GNYL",2,nameFMD,0,-yNylonTube[ifmd],
- NulonTubeBegin+NylonTube[2]/2.,0, "ONLY");
-
- //last PCB
- par[0]=RoutHoneyComb[ifmd]-9;
- par[1]=RoutHoneyComb[ifmd];
- par[2]=zPCB/2;
- zInside += zHoneyComb/2+par[2];
- gMC->Gsposp(nameLPCB,1,nameFMD,0,0,zInside,0, "ONLY",par,3);
-
- par[2]=zPCB/2-0.02;
- zInPCB = -zPCB/2+par[2];
- gMC->Gsposp(nameGL10,1,nameLPCB,0,0,zInPCB,0, "ONLY",par,3);
- zInPCB+=par[2]+zCooper/2 ;
- par[2]=zCooper/2;
- gMC->Gsposp(nameLCopper,1,nameLPCB,0,0,zInPCB,0, "ONLY",par,3);
- zInPCB += zCooper/2 + zChips/2;
- par[2]=zChips/2;
- gMC->Gsposp(nameLChips,1,nameLPCB,0,0,zInPCB,0, "ONLY",par,3);
-
-
- //Granularity
- fSectorsSi1=20;
- fRingsSi1=256*2;
- // fRingsSi1=3; // for drawing only
- fSectorsSi2=40;
- fRingsSi2=128*2;
- // fRingsSi2=3; //for drawing onl
- if(ifmd==1||ifmd==3)
- {
- gMC->Gsdvn(nameSector, nameSi , fSectorsSi2, 2);
- gMC->Gsdvn(nameRing, nameSector, fRingsSi2, 1);
- }
- else
- {
- gMC->Gsdvn(nameSector, nameSi , fSectorsSi1, 2);
- gMC->Gsdvn(nameRing, nameSector , fRingsSi1, 1);
- }
-
- }
-}
+ // Get the ring geometry
+ //Int_t nsec = fmd->GetDetector(detector)->GetRing(ring)->GetNSectors();
+ Int_t nstr = fmd->GetDetector(detector)->GetRing(ring)->GetNStrips();
+ Double_t lowr = fmd->GetDetector(detector)->GetRing(ring)->GetMinR();
+ Double_t theta = fmd->GetDetector(detector)->GetRing(ring)->GetTheta();
+ Double_t pitch = fmd->GetDetector(detector)->GetRing(ring)->GetPitch();
+
+ // Figure out the strip number
+ Double_t r = TMath::Sqrt(v.X() * v.X() + v.Y() * v.Y());
+ Int_t str = Int_t((r - lowr) / pitch);
+ if (str < 0 || str >= nstr) return kFALSE;
+ strip = str;
+
+ // Figure out the sector number
+ Double_t phi = TMath::ATan2(v.Y(), v.X()) * 180. / TMath::Pi();
+ if (phi < 0) phi = 360. + phi;
+ Double_t t = phi - 2 * moduleno * theta;
+ sector = 2 * moduleno;
+ if (t < 0 || t > 2 * theta) return kFALSE;
+ else if (t > theta) sector += 1;
+
+ AliFMDDebug(40, ("<1> Inside an active FMD volume FMD%d%c[%2d,%3d] %s",
+ detector, ring, sector, strip, mc->CurrentVolPath()));
+ return kTRUE;
+}
-//------------------------------------------------------------------------
-void AliFMDv1::CreateMaterials()
+//____________________________________________________________________
+Bool_t
+AliFMDv1::VMC2FMD(Int_t copy, TLorentzVector& v,
+ UShort_t& detector, Char_t& ring,
+ UShort_t& sector, UShort_t& strip) const
{
- Int_t isxfld = gAlice->Field()->Integ();
- Float_t sxmgmx = gAlice->Field()->Max();
-
- // Plastic CH
- Float_t aPlastic[2]={1.01,12.01};
- Float_t zPlastic[2]={1,6};
- Float_t wPlastic[2]={1,1};
- Float_t denPlastic=1.03;
- //
- // 60% SiO2 , 40% G10FR4
- // PC board
- Float_t apcb[3] = { 28.0855,15.9994,17.749 };
- Float_t zpcb[3] = { 14.,8.,8.875 };
- Float_t wpcb[3] = { .28,.32,.4 };
- Float_t denspcb = 1.8;
- //
-// AIR
- Float_t aAir[4]={12.0107,14.0067,15.9994,39.948};
-Float_t zAir[4]={6.,7.,8.,18.};
-Float_t wAir[4]={0.000124,0.755267,0.231781,0.012827};
-Float_t dAir = 1.20479E-3;
- //*** Definition Of avaible FMD materials ***
- AliMixture(0, "FMD Air$", aAir, zAir, dAir, 4,wAir);
- AliMixture(1, "Plastic$",aPlastic,zPlastic,denPlastic,-2,wPlastic);
- AliMixture(2, "SSD PCB$", apcb, zpcb, denspcb, 3, wpcb);
- AliMaterial(3, "SSD Copper$", 63.546, 29., 8.96, 1.43, 999.);
- AliMaterial(4, "SSD Si$", 28.0855, 14., 2.33, 9.36, 999.);
- AliMaterial(5, "SSD Si chip$", 28.0855, 14., 2.33, 9.36, 999.);
- AliMaterial(6, "SSD C$", 12.011, 6., 2.265,18.8, 999.);
- AliMaterial(7, "SSD Kapton$", 12.011, 6., 0.01, 31.27, 999.);//honeycomb
- AliMaterial(8, "SSD G10FR4$", 17.749, 8.875, 1.8, 21.822, 999.);
-
-
-//**
- AliMedium(0, "FMD air$", 0, 0, isxfld, sxmgmx, 1., .001, 1., .001, .001);
- AliMedium(1, "Plastic$", 1, 0,isxfld, sxmgmx, 10., .01, 1., .003, .003);
- AliMedium(2, "SSD PCB$", 2, 0, isxfld, sxmgmx, 1., .001, 1., .001, .001);
- AliMedium(3, "SSD Copper$", 3, 0,isxfld, sxmgmx, 10., .01, 1., .003, .003);
- AliMedium(4, "SSD Si$", 4, 1, isxfld, sxmgmx, 1., .001, 1., .001, .001);
- AliMedium(5, "SSD Si chip$", 5, 0,isxfld, sxmgmx, 10., .01, 1., .003, .003);
- AliMedium(6, "SSD C$", 6, 0,isxfld, sxmgmx, 10., .01, 1., .003, .003);
- AliMedium(7, "SSD Kapton$", 7, 0, isxfld, sxmgmx, 1., .001, 1., .001, .001);
- AliMedium(8, "SSD G10FR4$", 8, 0,isxfld, sxmgmx, 10., .01, 1., .003, .003);
-
-
+ // Convert VMC coordinates to detector coordinates
+ TVirtualMC* mc = TVirtualMC::GetMC();
+ AliFMDGeometry* fmd = AliFMDGeometry::Instance();
+
+ strip = copy - 1;
+ Int_t sectordiv; mc->CurrentVolOffID(fmd->GetSectorOff(), sectordiv);
+ if (fmd->GetModuleOff() >= 0) {
+ Int_t module; mc->CurrentVolOffID(fmd->GetModuleOff(), module);
+ sector = 2 * module + sectordiv;
+ }
+ else
+ sector = sectordiv;
+ AliFMDDebug(30, ("Getting ring volume with offset %d -> %s",
+ fmd->GetRingOff(),
+ mc->CurrentVolOffName(fmd->GetRingOff())));
+ Int_t iring; mc->CurrentVolOffID(fmd->GetRingOff(), iring);
+ ring = Char_t(iring);
+ Int_t det; mc->CurrentVolOffID(fmd->GetDetectorOff(), det);
+ detector = det;
+
+ //Double_t rz = fmd->GetDetector(detector)->GetRingZ(ring);
+ AliFMDDetector* gdet = fmd->GetDetector(detector);
+ AliFMDRing* gring = gdet->GetRing(ring);
+ if (!gring) {
+ AliFatal(Form("Ring %c not found (volume was %s at offset %d in path %s)",
+ ring, fmd->GetRingOff(),
+ mc->CurrentVolOffName(fmd->GetRingOff()),
+ mc->CurrentVolPath()));
+ }
+ Int_t n = gring->GetNSectors();
+#if 0
+ if (rz < 0) {
+ Int_t s = ((n - sector + n / 2) % n) + 1;
+ AliFMDDebug(1, ("Recalculating sector to %d (=%d-%d+%d/2%%%d+1 z=%f)",
+ s, n, sector, n, n, rz));
+ sector = s;
+ }
+#endif
+ if (sector < 1 || sector > n) {
+ AliWarning(Form("sector # %d out of range (0-%d)", sector-1, n-1));
+ return kFALSE;
+ }
+ sector--;
+ // Get track position
+ mc->TrackPosition(v);
+ AliFMDDebug(15, ("<2> Inside an active FMD volume FMD%d%c[%2d,%3d] %s",
+ detector, ring, sector, strip, mc->CurrentVolPath()));
+ return kTRUE;
}
-//---------------------------------------------------------------------
-void AliFMDv1::DrawDetector()
-{
-//
-// Draw a shaded view of the Forward multiplicity detector version 0
-//
-//Set ALIC mother transparent
-gMC->Gsatt("ALIC","SEEN",0);
-//
-//Set volumes visible
-gMC->Gsatt("FMD1","SEEN",1);
-gMC->Gsatt("FMD2","SEEN",1);
-gMC->Gsatt("FMD3","SEEN",1);
-gMC->Gsatt("FMD4","SEEN",1);
-gMC->Gsatt("FMD5","SEEN",1);
-//
-gMC->Gdopt("hide","on");
-gMC->Gdopt("shad","on");
-gMC->SetClipBox(".");
-gMC->SetClipBox("*",0,1000,-1000,1000,-1000,1000);
-gMC->DefaultRange();
-gMC->Gdraw("alic",40,30,0,12,9.5,.2,0.2);
-gMC->Gdhead(1111,"Forward multiplicity detector");
-gMC->Gdopt("hide","off");
-}
-//-------------------------------------------------------------------
-void AliFMDv1::Init()
+//____________________________________________________________________
+Bool_t
+AliFMDv1::CheckHit(Int_t trackno, Int_t pdg, Float_t absQ,
+ const TLorentzVector& p, Float_t edep) const
{
-// Initialises version 0 of the Forward Multiplicity Detector
-//
-AliFMD::Init();
-fIdSens1=gMC->VolId("GRN1");
-fIdSens2=gMC->VolId("GRN2");
-fIdSens3=gMC->VolId("GRN3");
-fIdSens4=gMC->VolId("GRN4");
-fIdSens5=gMC->VolId("GRN5");
-printf("*** FMD version 1 initialized ***\n");
+ // Check that a hit is good
+ if (AliLog::GetDebugLevel("FMD", "AliFMD") < 5) return kFALSE;
+ TVirtualMC* mc = TVirtualMC::GetMC();
+ Double_t mass = mc->TrackMass();
+ Double_t poverm = (mass == 0 ? 0 : p.P() / mass);
+
+ // This `if' is to debug abnormal energy depositions. We trigger on
+ // p/m approx larger than or equal to a MIP, and a large edep - more
+ // than 1 keV - a MIP is 100 eV.
+ if (!(edep > absQ * absQ && poverm > 1)) return kFALSE;
+
+ TArrayI procs;
+ mc->StepProcesses(procs);
+ TString processes;
+ for (Int_t ip = 0; ip < procs.fN; ip++) {
+ if (ip != 0) processes.Append(",");
+ processes.Append(TMCProcessName[procs.fArray[ip]]);
+ }
+ TDatabasePDG* pdgDB = TDatabasePDG::Instance();
+ TParticlePDG* particleType = pdgDB->GetParticle(pdg);
+ TString pname(particleType ? particleType->GetName() : "???");
+ TString what;
+ if (mc->IsTrackEntering()) what.Append("entering ");
+ if (mc->IsTrackExiting()) what.Append("exiting ");
+ if (mc->IsTrackInside()) what.Append("inside ");
+ if (mc->IsTrackDisappeared()) what.Append("disappeared ");
+ if (mc->IsTrackStop()) what.Append("stopped ");
+ if (mc->IsNewTrack()) what.Append("new ");
+ if (mc->IsTrackAlive()) what.Append("alive ");
+ if (mc->IsTrackOut()) what.Append("out ");
+
+ Int_t mother = gAlice->GetMCApp()->GetPrimary(trackno);
+ AliFMDDebug(15, ("Track # %5d deposits a lot of energy\n"
+ " Volume: %s\n"
+ " Momentum: (%7.4f,%7.4f,%7.4f)\n"
+ " PDG: %d (%s)\n"
+ " Edep: %-14.7f keV (mother %d)\n"
+ " p/m: %-7.4f/%-7.4f = %-14.7f\n"
+ " Processes: %s\n"
+ " What: %s\n",
+ trackno, mc->CurrentVolPath(), p.X(), p.Y(), p.Z(),
+ pdg, pname.Data(), edep, mother, p.P(), mass,
+ poverm, processes.Data(), what.Data()));
+ return kTRUE;
}
-//-------------------------------------------------------------------
-void AliFMDv1::StepManager()
+//____________________________________________________________________
+void
+AliFMDv1::StepManager()
{
+ // Member function that is executed each time a hit is made in the
+ // FMD. None-charged particles are ignored. Dead tracks are
+ // ignored.
//
- // Called for every step in the Forward Multiplicity Detector
- //
- Int_t id,copy,copy1,copy2;
- static Float_t hits[9];
- static Int_t vol[3];
- static Float_t de;
- TLorentzVector pos;
- TLorentzVector mom;
-
-
- TClonesArray &lhits = *fHits;
- if(!gMC->IsTrackAlive()) return; // particle has disappeared
-
- Float_t charge = gMC->TrackCharge();
- if(TMath::Abs(charge)<=0.) return; //take only charged particles
-
- // printf(" in StepManeger \n");
- id=gMC->CurrentVolID(copy);
- //((TGeant3*)gMC)->Gpcxyz();
+ // The procedure is as follows:
+ //
+ // - IF NOT track is alive THEN RETURN ENDIF
+ // - IF NOT particle is charged THEN RETURN ENDIF
+ // - IF NOT volume name is "STRI" or "STRO" THEN RETURN ENDIF
+ // - Get strip number (volume copy # minus 1)
+ // - Get phi division number (mother volume copy #)
+ // - Get module number (grand-mother volume copy #)
+ // - section # = 2 * module # + phi division # - 1
+ // - Get ring Id from volume name
+ // - Get detector # from grand-grand-grand-mother volume name
+ // - Get pointer to sub-detector object.
+ // - Get track position
+ // - IF track is entering volume AND track is inside real shape THEN
+ // - Reset energy deposited
+ // - Get track momentum
+ // - Get particle ID #
+ /// - ENDIF
+ // - IF track is inside volume AND inside real shape THEN
+ /// - Update energy deposited
+ // - ENDIF
+ // - IF track is inside real shape AND (track is leaving volume,
+ // or it died, or it is stopped THEN
+ // - Create a hit
+ // - ENDIF
+ //
+ TVirtualMC* mc = TVirtualMC::GetMC();
+ if (!mc->IsTrackAlive()) return;
+ Double_t absQ = TMath::Abs(mc->TrackCharge());
+ if (absQ <= 0) return;
-// Check the sensetive volume
- if(id==fIdSens1||id==fIdSens2||id==fIdSens3||id==fIdSens4||id==fIdSens5)
- {
- if(gMC->IsTrackEntering())
- {
- vol[2]=copy;
- gMC->CurrentVolOffID(1,copy1);
- vol[1]=copy1;
- gMC->CurrentVolOffID(2,copy2);
- vol[0]=copy2;
-
- gMC->TrackPosition(pos);
- hits[0]=pos[0];
- hits[1]=pos[1];
- hits[2]=pos[2];
-
- gMC->TrackMomentum(mom);
- hits[3]=mom[0];
- hits[4]=mom[1];
- hits[5]=mom[2];
-
- Int_t iPart= gMC->TrackPid();
- Int_t partId=gMC->IdFromPDG(iPart);
- hits[7]=partId;
- hits[8]=1e9*gMC->TrackTime();
- de=0.;
- }
- if(gMC->IsTrackInside()){
- de=de+1000.*gMC->Edep();
- }
-
- if(gMC->IsTrackExiting()
- ||gMC->IsTrackDisappeared()||
- gMC->IsTrackStop())
- {
- hits[6]=de+1000.*gMC->Edep();
- new(lhits[fNhits++]) AliFMDhit(fIshunt,gAlice->GetMCApp()->GetCurrentTrackNumber(),vol,hits);
- } // IsTrackExiting()
- }
+ Int_t copy;
+ Int_t vol = mc->CurrentVolID(copy);
+ AliFMDGeometry* fmd = AliFMDGeometry::Instance();
+ if (!fmd->IsActive(vol)) {
+ AliFMDDebug(50, ("Not an FMD volume %d '%s'",vol,mc->CurrentVolName()));
+ return;
}
-//--------------------------------------------------------------------------
-
-void AliFMDv1::Response( Float_t Edep)
-{
- Float_t I=1.664*0.04*2.33/22400; // = 0.69e-6;
- Float_t chargeOnly=Edep/I;
- //Add noise ~500electrons
- Int_t charge=500;
- if (Edep>0)
- charge=Int_t(gRandom->Gaus(chargeOnly,500));
- }
-
-
-
-
-
-
+ TLorentzVector v;
+ UShort_t detector;
+ Char_t ring;
+ UShort_t sector;
+ UShort_t strip;
+
+ if (fmd->IsDetailed()) {
+ if (!VMC2FMD(copy, v, detector, ring, sector, strip)) return;
+ } else {
+ if (!VMC2FMD(v, detector, ring, sector, strip)) return;
+ }
+ TLorentzVector p;
+ mc->TrackMomentum(p);
+ Int_t trackno = gAlice->GetMCApp()->GetCurrentTrackNumber();
+ Int_t pdg = mc->TrackPid();
+ Double_t edep = mc->Edep() * 1000; // keV
+ Bool_t isBad = CheckHit(trackno, pdg, absQ, p, edep);
+
+ // Check that the track is actually within the active area
+ Bool_t entering = mc->IsTrackEntering();
+ Bool_t inside = mc->IsTrackInside();
+ Bool_t out = (mc->IsTrackExiting()|| mc->IsTrackDisappeared()||
+ mc->IsTrackStop());
+ // Reset the energy deposition for this track, and update some of
+ // our parameters.
+ if (entering) {
+ AliFMDDebug(15, ("Track # %8d entering active FMD volume %s: "
+ "Edep=%f (%f,%f,%f)", trackno, mc->CurrentVolPath(),
+ edep, v.X(), v.Y(), v.Z()));
+ fCurrentP = p;
+ fCurrentV = v;
+ fCurrentDeltaE = edep;
+ fCurrentPdg = pdg; // mc->IdFromPDG(pdg);
+ }
+ // If the track is inside, then update the energy deposition
+ if (inside && fCurrentDeltaE >= 0) {
+ fCurrentDeltaE += edep;
+ AliFMDDebug(15, ("Track # %8d inside active FMD volume %s: Edep=%f, "
+ "Accumulated Edep=%f (%f,%f,%f)", trackno,
+ mc->CurrentVolPath(), edep, fCurrentDeltaE,
+ v.X(), v.Y(), v.Z()));
+ }
+ // The track exits the volume, or it disappeared in the volume, or
+ // the track is stopped because it no longer fulfills the cuts
+ // defined, then we create a hit.
+ if (out) {
+ if (fCurrentDeltaE >= 0) {
+ fCurrentDeltaE += edep;
+ AliFMDDebug(15, ("Track # %8d exiting active FMD volume %s: Edep=%g, "
+ "Accumulated Edep=%g (%f,%f,%f)", trackno,
+ mc->CurrentVolPath(), edep, fCurrentDeltaE,
+ v.X(), v.Y(), v.Z()));
+ TVector3 cur(v.Vect());
+ cur -= fCurrentV.Vect();
+ Double_t len = cur.Mag();
+ AliFMDHit* h =
+ AddHitByFields(trackno, detector, ring, sector, strip,
+ fCurrentV.X(), fCurrentV.Y(), fCurrentV.Z(),
+ fCurrentP.X(), fCurrentP.Y(), fCurrentP.Z(),
+ fCurrentDeltaE, fCurrentPdg, fCurrentV.T(),
+ len, mc->IsTrackDisappeared()||mc->IsTrackStop());
+ // Add a copy
+ if (isBad && fBad) {
+ new ((*fBad)[fBad->GetEntries()]) AliFMDHit(*h);
+ }
+ // Check the geometry that we can get back the coordinates.
+#ifdef CHECK_TRANS
+ Double_t x, y, z;
+ fmd->Detector2XYZ(detector, ring, sector, strip, x, y ,z);
+ AliFMDDebug(1, ("Hit at (%f,%f,%f), geometry says (%f,%f,%f)",
+ fCurrentV.X(), fCurrentV.Y(), fCurrentV.Z(), x, y, z));
+#endif
+ }
+ fCurrentDeltaE = -1;
+ }
+}
+//___________________________________________________________________
+//
+// EOF
+//