X-Git-Url: http://git.uio.no/git/?a=blobdiff_plain;f=EMCAL%2FAliEMCALGeometry.cxx;h=cd06991853af0a692533c479bf0e080cea8205b5;hb=552165965afa36010a518aa1f08f4f5508264af3;hp=460dbbc9c15b08214265dfd89e4c650aa51e8ccf;hpb=fc575e27de939b5e0dbca20d1eb66d35b277cf05;p=u%2Fmrichter%2FAliRoot.git diff --git a/EMCAL/AliEMCALGeometry.cxx b/EMCAL/AliEMCALGeometry.cxx index 460dbbc9c15..cd06991853a 100644 --- a/EMCAL/AliEMCALGeometry.cxx +++ b/EMCAL/AliEMCALGeometry.cxx @@ -1,4 +1,4 @@ - /************************************************************************** +/************************************************************************** * Copyright(c) 1998-1999, ALICE Experiment at CERN, All rights reserved. * * * * Author: The ALICE Off-line Project. * @@ -18,34 +18,54 @@ //_________________________________________________________________________ // Geometry class for EMCAL : singleton // EMCAL consists of layers of scintillator and lead +// with scintillator fiber arranged as "shish-kebab" skewers // Places the the Barrel Geometry of The EMCAL at Midrapidity // between 80 and 180(or 190) degrees of Phi and // -0.7 to 0.7 in eta -// Number of Modules and Layers may be controlled by -// the name of the instance defined +// +// EMCAL geometry tree: +// EMCAL -> superModule -> module -> tower(cell) +// Indexes +// absId -> nSupMod -> nModule -> (nIphi,nIeta) +// +// Name choices: +// EMCAL_PDC06 (geometry used for PDC06 simulations, kept for backward compatibility) +// = equivalent to SHISH_77_TRD1_2X2_FINAL_110DEG in old notation +// EMCAL_COMPLETE (geometry for expected complete detector) +// = equivalent to SHISH_77_TRD1_2X2_FINAL_110DEG scTh=0.176 pbTh=0.144 +// in old notation +// EMCAL_WSUC (Wayne State test stand) +// = no definite equivalent in old notation, was only used by +// Aleksei, but kept for testing purposes +// +// etc. +// +// +// //*-- Author: Sahal Yacoob (LBL / UCT) // and : Yves Schutz (SUBATECH) // and : Jennifer Klay (LBL) -// SHASHLYK : Aleksei Pavlinov (WSU) -// SuperModules -> module(or tower) -> cell +// and : Aleksei Pavlinov (WSU) +// -// --- AliRoot header files --- -#include -#include "Riostream.h" +#include -#include -#include -#include -#include +// --- Root header files --- +#include +#include +#include #include -#include #include +#include +#include #include +#include #include -#include - +#include +#include +#include // -- ALICE Headers. -//#include "AliConst.h" +#include "AliLog.h" // --- EMCAL headers #include "AliEMCALGeometry.h" @@ -53,259 +73,443 @@ #include "AliEMCALRecPoint.h" #include "AliEMCALDigit.h" #include "AliEMCALHistoUtilities.h" -#include "AliEMCALAlignData.h" ClassImp(AliEMCALGeometry) // these initialisations are needed for a singleton AliEMCALGeometry *AliEMCALGeometry::fgGeom = 0; Bool_t AliEMCALGeometry::fgInit = kFALSE; -AliEMCALAlignData *AliEMCALGeometry::fgAlignData = 0; +const Char_t* AliEMCALGeometry::fgDefaultGeometryName = "EMCAL_COMPLETE"; +// +// Usage: +// You can create the AliEMCALGeometry object independently from anything. +// You have to use just the correct name of geometry. If name is empty string the +// default name of geometry will be used. +// +// AliEMCALGeometry* g = AliEMCALGeometry::GetInstance(name,title); // first time +// .. +// g = AliEMCALGeometry::GetInstance(); // after first time +// +// MC: If you work with MC data you have to get geometry the next way: +// == ============================= +// AliRunLoader *rl = AliRunLoader::Instance(); +// AliEMCALGeometry *geom = dynamic_cast(rl->GetAliRun()->GetDetector("EMCAL"))->GetGeometry(); +// TGeoManager::Import("geometry.root"); + +AliEMCALGeometry::AliEMCALGeometry() + : AliGeometry(), + fGeoName(0),fArrayOpts(0),fNAdditionalOpts(0),fECPbRadThickness(0.),fECScintThick(0.), + fNECLayers(0),fArm1PhiMin(0.),fArm1PhiMax(0.),fArm1EtaMin(0.),fArm1EtaMax(0.),fIPDistance(0.), + fShellThickness(0.),fZLength(0.),fNZ(0),fNPhi(0),fSampling(0.),fNumberOfSuperModules(0), + fFrontSteelStrip(0.),fLateralSteelStrip(0.),fPassiveScintThick(0.),fPhiModuleSize(0.), + fEtaModuleSize(0.),fPhiTileSize(0.),fEtaTileSize(0.),fLongModuleSize(0.),fNPhiSuperModule(0), + fNPHIdiv(0),fNETAdiv(0), fNCells(0),fNCellsInSupMod(0),fNCellsInModule(0), + // Trigger staff + fNTRUEta(0), + fNTRUPhi(0), + fNModulesInTRUEta(0), + fNModulesInTRUPhi(0), + fNEtaSubOfTRU(0), + // + fTrd1Angle(0.),f2Trd1Dx2(0.), + fPhiGapForSM(0.),fKey110DEG(0),fPhiBoundariesOfSM(0), fPhiCentersOfSM(0),fEtaMaxOfTRD1(0), + fCentersOfCellsEtaDir(0), fCentersOfCellsXDir(0),fCentersOfCellsPhiDir(0), + fEtaCentersOfCells(0),fPhiCentersOfCells(0),fShishKebabTrd1Modules(0), + fILOSS(-1), fIHADR(-1), + //obsolete member data + fAlFrontThick(0.), fGap2Active(0.), fSteelFrontThick(0.), fTrd2AngleY(0.), + f2Trd2Dy2(0.), fEmptySpace(0.), fTubsR(0.), fTubsTurnAngle(0.) +{ + // default ctor only for internal usage (singleton) + // must be kept public for root persistency purposes, + // but should never be called by the outside world + + AliDebug(2, "AliEMCALGeometry : default ctor "); +} +//______________________________________________________________________ +AliEMCALGeometry::AliEMCALGeometry(const Text_t* name, const Text_t* title) + : AliGeometry(name, title), + fGeoName(0),fArrayOpts(0),fNAdditionalOpts(0),fECPbRadThickness(0.),fECScintThick(0.), + fNECLayers(0),fArm1PhiMin(0.),fArm1PhiMax(0.),fArm1EtaMin(0.),fArm1EtaMax(0.),fIPDistance(0.), + fShellThickness(0.),fZLength(0.),fNZ(0),fNPhi(0),fSampling(0.),fNumberOfSuperModules(0), + fFrontSteelStrip(0.),fLateralSteelStrip(0.),fPassiveScintThick(0.),fPhiModuleSize(0.), + fEtaModuleSize(0.),fPhiTileSize(0.),fEtaTileSize(0.),fLongModuleSize(0.),fNPhiSuperModule(0), + fNPHIdiv(0),fNETAdiv(0), fNCells(0),fNCellsInSupMod(0),fNCellsInModule(0), + // Trigger staff + fNTRUEta(0), + fNTRUPhi(0), + fNModulesInTRUEta(0), + fNModulesInTRUPhi(0), + fNEtaSubOfTRU(0), + // + fTrd1Angle(0.),f2Trd1Dx2(0.), + fPhiGapForSM(0.),fKey110DEG(0),fPhiBoundariesOfSM(0), fPhiCentersOfSM(0), fEtaMaxOfTRD1(0), + fCentersOfCellsEtaDir(0),fCentersOfCellsXDir(0),fCentersOfCellsPhiDir(0), + fEtaCentersOfCells(0),fPhiCentersOfCells(0),fShishKebabTrd1Modules(0), + fILOSS(-1), fIHADR(-1), + //obsolete member data + fAlFrontThick(0.), fGap2Active(0.), fSteelFrontThick(0.), fTrd2AngleY(0.), + f2Trd2Dy2(0.), fEmptySpace(0.), fTubsR(0.), fTubsTurnAngle(0.) +{ + // ctor only for internal usage (singleton) + AliDebug(2, Form("AliEMCALGeometry(%s,%s) ", name,title)); + + Init(); + + CreateListOfTrd1Modules(); + + if (AliDebugLevel()>=2) { + PrintGeometry(); + } + +} +//______________________________________________________________________ +AliEMCALGeometry::AliEMCALGeometry(const AliEMCALGeometry& geom) + : AliGeometry(geom), + fGeoName(geom.fGeoName), + fArrayOpts(geom.fArrayOpts), + fNAdditionalOpts(geom.fNAdditionalOpts), + fECPbRadThickness(geom.fECPbRadThickness), + fECScintThick(geom.fECScintThick), + fNECLayers(geom.fNECLayers), + fArm1PhiMin(geom.fArm1PhiMin), + fArm1PhiMax(geom.fArm1PhiMax), + fArm1EtaMin(geom.fArm1EtaMin), + fArm1EtaMax(geom.fArm1EtaMax), + fIPDistance(geom.fIPDistance), + fShellThickness(geom.fShellThickness), + fZLength(geom.fZLength), + fNZ(geom.fNZ), + fNPhi(geom.fNPhi), + fSampling(geom.fSampling), + fNumberOfSuperModules(geom.fNumberOfSuperModules), + fFrontSteelStrip(geom.fFrontSteelStrip), + fLateralSteelStrip(geom.fLateralSteelStrip), + fPassiveScintThick(geom.fPassiveScintThick), + fPhiModuleSize(geom.fPhiModuleSize), + fEtaModuleSize(geom.fEtaModuleSize), + fPhiTileSize(geom.fPhiTileSize), + fEtaTileSize(geom.fEtaTileSize), + fLongModuleSize(geom.fLongModuleSize), + fNPhiSuperModule(geom.fNPhiSuperModule), + fNPHIdiv(geom.fNPHIdiv), + fNETAdiv(geom.fNETAdiv), + fNCells(geom.fNCells), + fNCellsInSupMod(geom.fNCellsInSupMod), + fNCellsInModule(geom.fNCellsInModule), + // Trigger staff + fNTRUEta(geom.fNTRUEta), + fNTRUPhi(geom.fNTRUPhi), + fNModulesInTRUEta(geom.fNModulesInTRUEta), + fNModulesInTRUPhi(geom.fNModulesInTRUPhi), + fNEtaSubOfTRU(geom.fNEtaSubOfTRU), + // + fTrd1Angle(geom.fTrd1Angle), + f2Trd1Dx2(geom.f2Trd1Dx2), + fPhiGapForSM(geom.fPhiGapForSM), + fKey110DEG(geom.fKey110DEG), + fPhiBoundariesOfSM(geom.fPhiBoundariesOfSM), + fPhiCentersOfSM(geom.fPhiCentersOfSM), + fEtaMaxOfTRD1(geom.fEtaMaxOfTRD1), + fCentersOfCellsEtaDir(geom.fCentersOfCellsEtaDir), + fCentersOfCellsXDir(geom.fCentersOfCellsXDir), + fCentersOfCellsPhiDir(geom.fCentersOfCellsPhiDir), + fEtaCentersOfCells(geom.fEtaCentersOfCells), + fPhiCentersOfCells(geom.fPhiCentersOfCells), + fShishKebabTrd1Modules(geom.fShishKebabTrd1Modules), + fILOSS(geom.fILOSS), fIHADR(geom.fIHADR), + //obsolete member data + fAlFrontThick(geom.fAlFrontThick), + fGap2Active(geom.fGap2Active), + fSteelFrontThick(geom.fSteelFrontThick), + fTrd2AngleY(geom.fTrd2AngleY), + f2Trd2Dy2(geom.f2Trd2Dy2), + fEmptySpace(geom.fEmptySpace), + fTubsR(geom.fTubsR), + fTubsTurnAngle(geom.fTubsTurnAngle) +{ + //copy ctor +} //______________________________________________________________________ AliEMCALGeometry::~AliEMCALGeometry(void){ // dtor } + //______________________________________________________________________ void AliEMCALGeometry::Init(void){ - // Initializes the EMCAL parameters - // naming convention : GUV_WX_N_ gives the composition of a tower - // WX inform about the composition of the EM calorimeter section: - // thickness in mm of Pb radiator (W) and of scintillator (X), and number of scintillator layers (N) - // New geometry: EMCAL_55_25 - // 24-aug-04 for shish-kebab - // SHISH_25 or SHISH_62 - // 11-oct-05 - correction for pre final design - // Feb 06,2006 - decrease the weight of EMCAL - - fAdditionalOpts[0] = "nl="; // number of sampling layers - fAdditionalOpts[1] = "pbTh="; // cm, Thickness of the Pb - fAdditionalOpts[2] = "scTh="; // cm, Thickness of the Sc + // + // Initializes the EMCAL parameters based on the name + // Only Shashlyk geometry is available, but various combinations of + // layers and number of supermodules can be selected with additional + // options or geometry name + // + + fAdditionalOpts[0] = "nl="; // number of sampling layers (fNECLayers) + fAdditionalOpts[1] = "pbTh="; // cm, Thickness of the Pb (fECPbRadThick) + fAdditionalOpts[2] = "scTh="; // cm, Thickness of the Sc (fECScintThick) + fAdditionalOpts[3] = "latSS="; // cm, Thickness of lateral steel strip (fLateralSteelStrip) + fAdditionalOpts[4] = "allILOSS="; // = 0,1,2,3,4 (4 - energy loss without fluctuation) + fAdditionalOpts[5] = "allIHADR="; // = 0,1,2 (0 - no hadronic interaction) fNAdditionalOpts = sizeof(fAdditionalOpts) / sizeof(char*); + // geometry fgInit = kFALSE; // Assume failed until proven otherwise. fGeoName = GetName(); fGeoName.ToUpper(); - fKey110DEG = 0; - if(fGeoName.Contains("110DEG")) fKey110DEG = 1; // for GetAbsCellId - fShishKebabTrd1Modules = 0; - fTrd2AngleY = f2Trd2Dy2 = fEmptySpace = fTubsR = fTubsTurnAngle = 0; - - fNZ = 114; // granularity along Z (eta) - fNPhi = 168; // granularity in phi (azimuth) - fArm1PhiMin = 60.0; // degrees, Starting EMCAL Phi position - fArm1PhiMax = 180.0; // degrees, Ending EMCAL Phi position - fArm1EtaMin = -0.7; // pseudorapidity, Starting EMCAL Eta position - fArm1EtaMax = +0.7; // pseudorapidity, Ending EMCAL Eta position - fIPDistance = 454.0; // cm, Radial distance to inner surface of EMCAL - fPhiGapForSM = 0.; // cm, only for final TRD1 geometry - for(int i=0; i<12; i++) fMatrixOfSM[i] = 0; - // geometry - if(fGeoName.Contains("SHISH")){ // Only shahslyk now - // 7-sep-05; integration issue - fArm1PhiMin = 80.0; // 60 -> 80 - fArm1PhiMax = 180.0; // 180 -> 190 - - fNumberOfSuperModules = 10; // 12 = 6 * 2 (6 in phi, 2 in Z); - fSteelFrontThick = 2.54; // 9-sep-04 - fIPDistance = 460.0; - fFrontSteelStrip = fPassiveScintThick = 0.0; // 13-may-05 - fLateralSteelStrip = 0.025; // before MAY 2005 - fPhiModuleSize = fEtaModuleSize = 11.4; - fPhiTileSize = fEtaTileSize = 5.52; // (11.4-5.52*2)/2. = 0.18 cm (wall thickness) - fNPhi = 14; - fNZ = 30; - fAlFrontThick = fGap2Active = 0; - fNPHIdiv = fNETAdiv = 2; - - fNECLayers = 62; - fECScintThick = fECPbRadThickness = 0.2; - fSampling = 1.; // 30-aug-04 - should be calculated - if(fGeoName.Contains("TWIST")) { // all about EMCAL module - fNZ = 27; // 16-sep-04 - } else if(fGeoName.Contains("TRD")) { - fIPDistance = 428.0; // 11-may-05 - fSteelFrontThick = 0.0; // 3.17 -> 0.0; 28-mar-05 : no stell plate - fNPhi = 12; - fSampling = 12.327; - fPhiModuleSize = fEtaModuleSize = 12.26; - fNZ = 26; // 11-oct-04 - fTrd1Angle = 1.3; // in degree -// 18-nov-04; 1./0.08112=12.327 -// http://pdsfweb01.nersc.gov/~pavlinov/ALICE/SHISHKEBAB/RES/linearityAndResolutionForTRD1.html - if(fGeoName.Contains("TRD1")) { // 30-jan-05 - // for final design - fPhiGapForSM = 2.; // cm, only for final TRD1 geometry - if(fGeoName.Contains("MAY05") || fGeoName.Contains("WSUC") || fGeoName.Contains("FINAL")){ - fNumberOfSuperModules = 12; // 20-may-05 - if(fGeoName.Contains("WSUC")) fNumberOfSuperModules = 1; // 27-may-05 - fNECLayers = 77; // (13-may-05 from V.Petrov) - fPhiModuleSize = 12.5; // 20-may-05 - rectangular shape - fEtaModuleSize = 11.9; - fECScintThick = fECPbRadThickness = 0.16;// (13-may-05 from V.Petrov) - fFrontSteelStrip = 0.025;// 0.025cm = 0.25mm (13-may-05 from V.Petrov) - fLateralSteelStrip = 0.01; // 0.01cm = 0.1mm (13-may-05 from V.Petrov) - was 0.025 - fPassiveScintThick = 0.8; // 0.8cm = 8mm (13-may-05 from V.Petrov) - fNZ = 24; - fTrd1Angle = 1.5; // 1.3 or 1.5 - - if(fGeoName.Contains("FINAL")) { // 9-sep-05 - fNumberOfSuperModules = 10; - if(fGeoName.Contains("110DEG")) { - fNumberOfSuperModules = 12;// last two modules have size 10 degree in phi (1801.64 - fTrd2AngleY = fTrd1Angle; // symmetric case now - fEmptySpace = 0.2; // 2 mm - fTubsR = fIPDistance; // 31-jan-05 - as for Fred case - - fPhiModuleSize = fTubsR*2.*TMath::Tan(fTrd2AngleY*TMath::DegToRad()/2.); - fPhiModuleSize -= fEmptySpace/2.; // 11-mar-05 - fEtaModuleSize = fPhiModuleSize; // 20-may-05 - fTubsTurnAngle = 3.; - } - fNPHIdiv = fNETAdiv = 2; // 13-oct-04 - division again - if(fGeoName.Contains("3X3")) { // 23-nov-04 - fNPHIdiv = fNETAdiv = 3; - } else if(fGeoName.Contains("4X4")) { - fNPHIdiv = fNETAdiv = 4; - } + //Convert old geometry names to new ones + if(fGeoName.Contains("SHISH_77_TRD1_2X2_FINAL_110DEG")) { + if(fGeoName.Contains("PBTH=0.144") && fGeoName.Contains("SCTH=0.176")) { + fGeoName = "EMCAL_COMPLETE"; + } else { + fGeoName = "EMCAL_PDC06"; } - fPhiTileSize = fPhiModuleSize/2. - fLateralSteelStrip; // 13-may-05 - fEtaTileSize = fEtaModuleSize/2. - fLateralSteelStrip; // 13-may-05 + } + if(fGeoName.Contains("WSUC")) fGeoName = "EMCAL_WSUC"; - if(fGeoName.Contains("25")){ - fNECLayers = 25; - fECScintThick = fECPbRadThickness = 0.5; - } - if(fGeoName.Contains("WSUC")){ // 18-may-05 - about common structure - fShellThickness = 30.; // should be change - fNPhi = fNZ = 4; - } + //check that we have a valid geometry name + if(!(fGeoName.Contains("EMCAL_PDC06") || fGeoName.Contains("EMCAL_COMPLETE") || fGeoName.Contains("EMCAL_WSUC") || fGeoName.Contains("EMCAL_1stYear"))) { + Fatal("Init", "%s is an undefined geometry!", fGeoName.Data()) ; + } + + // Option to know whether we have the "half" supermodule(s) or not + fKey110DEG = 0; + if(fGeoName.Contains("COMPLETE") || fGeoName.Contains("PDC06")) fKey110DEG = 1; // for GetAbsCellId + fShishKebabTrd1Modules = 0; + // JLK 13-Apr-2008 + //default parameters are those of EMCAL_COMPLETE geometry + //all others render variations from these at the end of + //geometry-name specific options + + fNumberOfSuperModules = 12; // 12 = 6 * 2 (6 in phi, 2 in Z) + fNPhi = 12; // module granularity in phi within smod (azimuth) + fNZ = 24; // module granularity along Z within smod (eta) + fNPHIdiv = fNETAdiv = 2; // tower granularity within module + fArm1PhiMin = 80.0; // degrees, Starting EMCAL Phi position + fArm1PhiMax = 200.0; // degrees, Ending EMCAL Phi position + fArm1EtaMin = -0.7; // pseudorapidity, Starting EMCAL Eta position + fArm1EtaMax = +0.7; // pseudorapidity, Ending EMCAL Eta position + fIPDistance = 428.0; // cm, radial distance to front face from nominal vertex point + fPhiGapForSM = 2.; // cm, only for final TRD1 geometry + fFrontSteelStrip = 0.025; // 0.025cm = 0.25mm (13-may-05 from V.Petrov) + fPassiveScintThick = 0.8; // 0.8cm = 8mm (13-may-05 from V.Petrov) + fLateralSteelStrip = 0.01; // 0.01cm = 0.1mm (13-may-05 from V.Petrov) - was 0.025 + fTrd1Angle = 1.5; // in degrees + + fSampling = 1.; // should be calculated with call to DefineSamplingFraction() + fNECLayers = 77; // (13-may-05 from V.Petrov) - can be changed with additional options + fECScintThick = 0.176; // scintillator layer thickness + fECPbRadThickness = 0.144; // lead layer thickness + + fPhiModuleSize = 12.26 - fPhiGapForSM / Float_t(fNPhi); // first assumption + fEtaModuleSize = fPhiModuleSize; + + fZLength = 700.; // Z coverage (cm) + + + //needs to be called for each geometry and before setting geometry + //parameters which can depend on the outcome + CheckAdditionalOptions(); + + //modifications to the above for PDC06 geometry + if(fGeoName.Contains("PDC06")){ // 18-may-05 - about common structure + fECScintThick = fECPbRadThickness = 0.16;// (13-may-05 from V.Petrov) CheckAdditionalOptions(); + } - // constant for transition absid <--> indexes - fNCellsInTower = fNPHIdiv*fNETAdiv; - fNCellsInSupMod = fNCellsInTower*fNPhi*fNZ; - fNCells = fNCellsInSupMod*fNumberOfSuperModules; - if(fGeoName.Contains("110DEG")) fNCells -= fNCellsInSupMod; + //modifications to the above for WSUC geometry + if(fGeoName.Contains("WSUC")){ // 18-may-05 - about common structure + fPhiModuleSize = 12.5; // 20-may-05 - rectangular shape + fEtaModuleSize = 11.9; + fECScintThick = fECPbRadThickness = 0.16;// (13-may-05 from V.Petrov) + fNumberOfSuperModules = 1; // 27-may-05 + fShellThickness = 30.; // should be change + fNPhi = fNZ = 4; + CheckAdditionalOptions(); + } - fLongModuleSize = fNECLayers*(fECScintThick + fECPbRadThickness); - if(fGeoName.Contains("MAY05")) fLongModuleSize += (fFrontSteelStrip + fPassiveScintThick); + if(fGeoName.Contains("1stYear")){ + fNumberOfSuperModules = 2; + + if(fGeoName.Contains("LowerEta")) { + fNPhiSuperModule = 1; + } + else if(fGeoName.Contains("LowerPhi_SideA")){ + fNPhiSuperModule = 2; + fArm1EtaMax=0; + } + else if(fGeoName.Contains("LowerPhi_SideC")){ + fNPhiSuperModule = 2; + fArm1EtaMin=0; + } + + CheckAdditionalOptions(); + } - // 30-sep-04 - if(fGeoName.Contains("TRD")) { - f2Trd1Dx2 = fEtaModuleSize + 2.*fLongModuleSize*TMath::Tan(fTrd1Angle*TMath::DegToRad()/2.); - if(fGeoName.Contains("TRD2")) { // 27-jan-05 - f2Trd2Dy2 = fPhiModuleSize + 2.*fLongModuleSize*TMath::Tan(fTrd2AngleY*TMath::DegToRad()/2.); - } - } - } else Fatal("Init", "%s is an undefined geometry!", fGeoName.Data()) ; + // constant for transition absid <--> indexes + fNCellsInModule = fNPHIdiv*fNETAdiv; + fNCellsInSupMod = fNCellsInModule*fNPhi*fNZ; + fNCells = fNCellsInSupMod*fNumberOfSuperModules; + if(GetKey110DEG()) fNCells -= fNCellsInSupMod; fNPhiSuperModule = fNumberOfSuperModules/2; - if(fNPhiSuperModule<1) fNPhiSuperModule = 1; - //There is always one more scintillator than radiator layer because of the first block of aluminium - fShellThickness = fAlFrontThick + fGap2Active + fNECLayers*GetECScintThick()+(fNECLayers-1)*GetECPbRadThick(); - if(fGeoName.Contains("SHISH")) { - fShellThickness = fSteelFrontThick + fLongModuleSize; - if(fGeoName.Contains("TWIST")) { // 13-sep-04 - fShellThickness = TMath::Sqrt(fLongModuleSize*fLongModuleSize + fPhiModuleSize*fEtaModuleSize); - fShellThickness += fSteelFrontThick; - } else if(fGeoName.Contains("TRD")) { // 1-oct-04 - fShellThickness = TMath::Sqrt(fLongModuleSize*fLongModuleSize + f2Trd1Dx2*f2Trd1Dx2); - fShellThickness += fSteelFrontThick; - // Local coordinates - fParSM[0] = GetShellThickness()/2.; - fParSM[1] = GetPhiModuleSize() * GetNPhi()/2.; - fParSM[2] = 350./2.; + if(fNPhiSuperModule < 1) fNPhiSuperModule = 1; + + fPhiTileSize = fPhiModuleSize/double(fNPHIdiv) - fLateralSteelStrip; // 13-may-05 + fEtaTileSize = fEtaModuleSize/double(fNETAdiv) - fLateralSteelStrip; // 13-may-05 + + fLongModuleSize = fNECLayers*(fECScintThick + fECPbRadThickness); + f2Trd1Dx2 = fEtaModuleSize + 2.*fLongModuleSize*TMath::Tan(fTrd1Angle*TMath::DegToRad()/2.); + if(!fGeoName.Contains("WSUC")) fShellThickness = TMath::Sqrt(fLongModuleSize*fLongModuleSize + f2Trd1Dx2*f2Trd1Dx2); + + //These parameters are used to create the mother volume to hold the supermodules + //2cm padding added to allow for misalignments - JLK 30-May-2008 + fEnvelop[0] = fIPDistance - 1.; // mother volume inner radius + fEnvelop[1] = fIPDistance + fShellThickness + 1.; // mother volume outer r. + fEnvelop[2] = fZLength + 2.; //mother volume length + + // Local coordinates + fParSM[0] = GetShellThickness()/2.; + fParSM[1] = GetPhiModuleSize() * GetNPhi()/2.; + fParSM[2] = fZLength/4.; //divide by 4 to get half-length of SM + + // SM phi boundaries - (0,1),(2,3) .. (10,11) - has the same boundaries; Nov 7, 2006 + fPhiBoundariesOfSM.Set(fNumberOfSuperModules); + fPhiCentersOfSM.Set(fNumberOfSuperModules/2); + fPhiBoundariesOfSM[0] = TMath::PiOver2() - TMath::ATan2(fParSM[1] , fIPDistance); // 1th and 2th modules) + fPhiCentersOfSM[0] = TMath::PiOver2(); + if(fNumberOfSuperModules > 1) + fPhiBoundariesOfSM[1] = TMath::PiOver2() + TMath::ATan2(fParSM[1] , fIPDistance); + if(fNumberOfSuperModules > 2) { + for(int i=1; i<=4; i++) { // from 2th ro 9th + fPhiBoundariesOfSM[2*i] = fPhiBoundariesOfSM[0] + 20.*TMath::DegToRad()*i; + fPhiBoundariesOfSM[2*i+1] = fPhiBoundariesOfSM[1] + 20.*TMath::DegToRad()*i; + fPhiCentersOfSM[i] = fPhiCentersOfSM[0] + 20.*TMath::DegToRad()*i; } } - - fZLength = 2.*ZFromEtaR(fIPDistance+fShellThickness,fArm1EtaMax); // Z coverage - fEnvelop[0] = fIPDistance; // mother volume inner radius - fEnvelop[1] = fIPDistance + fShellThickness; // mother volume outer r. - fEnvelop[2] = 1.00001*fZLength; // add some padding for mother volume. - - if(fgAlignData != NULL) { - // Number of modules is read from Alignment DB if exists - fNumberOfSuperModules = fgAlignData->GetNSuperModules(); + if(fNumberOfSuperModules > 10) { + fPhiBoundariesOfSM[11] = 190.*TMath::DegToRad(); + fPhiBoundariesOfSM[10] = fPhiBoundariesOfSM[11] - TMath::ATan2((fParSM[1]) , fIPDistance); + fPhiCentersOfSM[5] = (fPhiBoundariesOfSM[10]+fPhiBoundariesOfSM[11])/2.; } - + + //called after setting of scintillator and lead layer parameters + DefineSamplingFraction(); + + // TRU parameters - Apr 29,08 by PAI. + // These parameters values was updated at Nov 05, 2007 + // As is on Olivier BOURRION (LPSC) ppt preasentation + // at ALICE trigger meeting at 13th-14th March + fNTRUEta = 1; // was 3 + fNTRUPhi = 3; // was 1 + fNModulesInTRUEta = 24; // was 8 + fNModulesInTRUPhi = 4; // was 12 + // Jet trigger + // 3*6*10 + 2*6*2 = 204 -> matrix (nphi(17), neta(12)) + fNEtaSubOfTRU = 6; + fgInit = kTRUE; - - if (kTRUE) { - printf("Init: geometry of EMCAL named %s is as follows:\n", fGeoName.Data()); - printf( " ECAL : %d x (%f cm Pb, %f cm Sc) \n", - GetNECLayers(), GetECPbRadThick(), GetECScintThick() ) ; - printf(" fSampling %5.2f \n", fSampling ); - if(fGeoName.Contains("SHISH")){ - printf(" fIPDistance %6.3f cm \n", fIPDistance); - if(fSteelFrontThick>0.) - printf(" fSteelFrontThick %6.3f cm \n", fSteelFrontThick); - printf(" fNPhi %i | fNZ %i \n", fNPhi, fNZ); - printf(" fNCellsInTower %i : fNCellsInSupMod %i : fNCells %i\n",fNCellsInTower, fNCellsInSupMod, fNCells); - if(fGeoName.Contains("MAY05")){ - printf(" fFrontSteelStrip %6.4f cm (thickness of front steel strip)\n", - fFrontSteelStrip); - printf(" fLateralSteelStrip %6.4f cm (thickness of lateral steel strip)\n", - fLateralSteelStrip); - printf(" fPassiveScintThick %6.4f cm (thickness of front passive Sc tile)\n", - fPassiveScintThick); - } - printf(" X:Y module size %6.3f , %6.3f cm \n", fPhiModuleSize, fEtaModuleSize); - printf(" X:Y tile size %6.3f , %6.3f cm \n", fPhiTileSize, fEtaTileSize); - printf(" #of sampling layers %i(fNECLayers) \n", fNECLayers); - printf(" fLongModuleSize %6.3f cm \n", fLongModuleSize); - printf(" #supermodule in phi direction %i \n", fNPhiSuperModule ); - } - if(fGeoName.Contains("TRD")) { - printf(" fTrd1Angle %7.4f\n", fTrd1Angle); - printf(" f2Trd1Dx2 %7.4f\n", f2Trd1Dx2); - if(fGeoName.Contains("TRD2")) { - printf(" fTrd2AngleY %7.4f\n", fTrd2AngleY); - printf(" f2Trd2Dy2 %7.4f\n", f2Trd2Dy2); - printf(" fTubsR %7.2f cm\n", fTubsR); - printf(" fTubsTurnAngle %7.4f\n", fTubsTurnAngle); - printf(" fEmptySpace %7.4f cm\n", fEmptySpace); - } else if(fGeoName.Contains("TRD1") && fGeoName.Contains("FINAL")){ - printf("SM dimensions(TRD1) : dx %7.2f dy %7.2f dz %7.2f (SMOD, BOX)\n", - fParSM[0],fParSM[1],fParSM[2]); - printf(" fPhiGapForSM %7.4f cm \n", fPhiGapForSM); - if(fGeoName.Contains("110DEG"))printf(" Last two modules have size 10 degree in phi (180GetEntries(); i++){ + TObjString *o = (TObjString*)fArrayOpts->At(i); + printf(" %i : %s \n", i, o->String().Data()); } - printf("Granularity: %d in eta and %d in phi\n", GetNZ(), GetNPhi()) ; - printf("Layout: phi = (%7.1f, %7.1f), eta = (%5.2f, %5.2f), IP = %7.2f\n", + } + printf("Granularity: %d in eta and %d in phi\n", GetNZ(), GetNPhi()) ; + printf("Layout: phi = (%7.1f, %7.1f), eta = (%5.2f, %5.2f), IP = %7.2f -> for EMCAL envelope only\n", GetArm1PhiMin(), GetArm1PhiMax(),GetArm1EtaMin(), GetArm1EtaMax(), GetIPDistance() ); + + printf( " ECAL : %d x (%f cm Pb, %f cm Sc) \n", + GetNECLayers(), GetECPbRadThick(), GetECScintThick() ) ; + printf(" fSampling %5.2f \n", fSampling ); + printf(" fIPDistance %6.3f cm \n", fIPDistance); + printf(" fNPhi %i | fNZ %i \n", fNPhi, fNZ); + printf(" fNCellsInModule %i : fNCellsInSupMod %i : fNCells %i\n",fNCellsInModule, fNCellsInSupMod, fNCells); + printf(" X:Y module size %6.3f , %6.3f cm \n", fPhiModuleSize, fEtaModuleSize); + printf(" X:Y tile size %6.3f , %6.3f cm \n", fPhiTileSize, fEtaTileSize); + printf(" #of sampling layers %i(fNECLayers) \n", fNECLayers); + printf(" fLongModuleSize %6.3f cm \n", fLongModuleSize); + printf(" #supermodule in phi direction %i \n", fNPhiSuperModule ); + printf(" fILOSS %i : fIHADR %i \n", fILOSS, fIHADR); + printf(" fTrd1Angle %7.4f\n", fTrd1Angle); + printf(" f2Trd1Dx2 %7.4f\n", f2Trd1Dx2); + printf("SM dimensions(TRD1) : dx %7.2f dy %7.2f dz %7.2f (SMOD, BOX)\n", + fParSM[0],fParSM[1],fParSM[2]); + printf(" fPhiGapForSM %7.4f cm (%7.4f <- phi size in degree)\n", + fPhiGapForSM, TMath::ATan2(fPhiGapForSM,fIPDistance)*TMath::RadToDeg()); + if(GetKey110DEG()) printf(" Last two modules have size 10 degree in phi (180 %7.5f(%7.2f) : center %7.5f(%7.2f) \n", i, + fPhiBoundariesOfSM[2*i], fPhiBoundariesOfSM[2*i]*TMath::RadToDeg(), + fPhiBoundariesOfSM[2*i+1], fPhiBoundariesOfSM[2*i+1]*TMath::RadToDeg(), + fPhiCentersOfSM[i], fPhiCentersOfSM[i]*TMath::RadToDeg()); + } + printf(" fShishKebabTrd1Modules has %i modules : max eta %5.4f \n", + fShishKebabTrd1Modules->GetSize(),fEtaMaxOfTRD1); + + printf("\n Cells grid in eta directions : size %i\n", fCentersOfCellsEtaDir.GetSize()); + for(Int_t i=0; i nSupMod %i nModule %i nIphi %i nIeta %i \n", tit, absId, nSupMod, nModule, nIphi, nIeta); + if(pri>0) { + GetCellPhiEtaIndexInSModule(nSupMod,nModule,nIphi,nIeta, iphi,ieta); + printf(" local SM index : iphi %i : ieta %i \n", iphi,ieta); + GetGlobal(absId, vg); + printf(" vglob : mag %7.2f : perp %7.2f : z %7.2f : eta %6.4f : phi %6.4f(%6.2f) \n", + vg.Mag(), vg.Perp(), vg.Z(), vg.Eta(), vg.Phi(), vg.Phi()*TMath::RadToDeg()); + } +} +//______________________________________________________________________ void AliEMCALGeometry::CheckAdditionalOptions() { // Feb 06,2006 - //Additional options that - //can be used to select - //the specific geometry of - //EMCAL to run - + // Additional options that + // can be used to select + // the specific geometry of + // EMCAL to run + // Dec 27,2006 + // adeed allILOSS= and allIHADR= for MIP investigation fArrayOpts = new TObjArray; Int_t nopt = AliEMCALHistoUtilities::ParseString(fGeoName, *fArrayOpts); if(nopt==1) { // no aditional option(s) @@ -327,136 +531,73 @@ void AliEMCALGeometry::CheckAdditionalOptions() } } if(indj<0) { - printf(" option |%s| unavailable : ** look to the file AliEMCALGeometry.h **\n", - addOpt.Data()); + AliDebug(2,Form(" option |%s| unavailable : ** look to the file AliEMCALGeometry.h **\n", + addOpt.Data())); assert(0); } else { - printf(" option |%s| is valid : number %i : |%s|\n", - addOpt.Data(), indj, fAdditionalOpts[indj]); + AliDebug(2,Form(" option |%s| is valid : number %i : |%s|\n", + addOpt.Data(), indj, fAdditionalOpts[indj])); if (addOpt.Contains("NL=",TString::kIgnoreCase)) {// number of sampling layers sscanf(addOpt.Data(),"NL=%i", &fNECLayers); - printf(" fNECLayers %i (new) \n", fNECLayers); - } else if(addOpt.Contains("PBTH=",TString::kIgnoreCase)) {//Thickness of the Pb + AliDebug(2,Form(" fNECLayers %i (new) \n", fNECLayers)); + } else if(addOpt.Contains("PBTH=",TString::kIgnoreCase)) {//Thickness of the Pb(fECPbRadThicknes) sscanf(addOpt.Data(),"PBTH=%f", &fECPbRadThickness); - } else if(addOpt.Contains("SCTH=",TString::kIgnoreCase)) {//Thickness of the Sc + } else if(addOpt.Contains("SCTH=",TString::kIgnoreCase)) {//Thickness of the Sc(fECScintThick) sscanf(addOpt.Data(),"SCTH=%f", &fECScintThick); + } else if(addOpt.Contains("LATSS=",TString::kIgnoreCase)) {// Thickness of lateral steel strip (fLateralSteelStrip) + sscanf(addOpt.Data(),"LATSS=%f", &fLateralSteelStrip); + AliDebug(2,Form(" fLateralSteelStrip %f (new) \n", fLateralSteelStrip)); + } else if(addOpt.Contains("ILOSS=",TString::kIgnoreCase)) {// As in Geant + sscanf(addOpt.Data(),"ALLILOSS=%i", &fILOSS); + AliDebug(2,Form(" fILOSS %i \n", fILOSS)); + } else if(addOpt.Contains("IHADR=",TString::kIgnoreCase)) {// As in Geant + sscanf(addOpt.Data(),"ALLIHADR=%i", &fIHADR); + AliDebug(2,Form(" fIHADR %i \n", fIHADR)); } } } } -//____________________________________________________________________________ -void AliEMCALGeometry::FillTRU(const TClonesArray * digits, TClonesArray * ampmatrix, TClonesArray * timeRmatrix) { - - -// Orders digits ampitudes list in fNTRU TRUs (384 cells) per supermodule. -// Each TRU is a TMatrixD, and they are kept in TClonesArrays. The number of -// TRU in phi is fNTRUPhi, and the number of TRU in eta is fNTRUEta. -// Last 2 modules are half size in Phi, I considered that the number of TRU -// is maintained for the last modules but decision not taken. If different, -// then this must be changed. - - - //Check data members - - if(fNTRUEta*fNTRUPhi != fNTRU) - Error("FillTRU"," Wrong number of TRUS per Eta or Phi"); - - //Initilize and declare variables - //List of TRU matrices initialized to 0. - Int_t nCellsPhi = fNPhi*2/fNTRUPhi; - Int_t nCellsPhi2 = fNPhi/fNTRUPhi; //HalfSize modules - Int_t nCellsEta = fNZ*2/fNTRUEta; - Int_t id = -1; - Float_t amp = -1; - Float_t timeR = -1; - Int_t iSupMod = -1; - Int_t nTower = -1; - Int_t nIphi = -1; - Int_t nIeta = -1; - Int_t iphi = -1; - Int_t ieta = -1; - - //List of TRU matrices initialized to 0. - for(Int_t k = 0; k < fNTRU*fNumberOfSuperModules; k++){ - TMatrixD * amptrus = new TMatrixD(nCellsPhi,nCellsEta) ; - TMatrixD * timeRtrus = new TMatrixD(nCellsPhi,nCellsEta) ; - for(Int_t i = 0; i < nCellsPhi; i++){ - for(Int_t j = 0; j < nCellsEta; j++){ - (*amptrus)(i,j) = 0.0; - (*timeRtrus)(i,j) = 0.0; - } +//__________________________________________________________________ +void AliEMCALGeometry::DefineSamplingFraction() +{ + // Jun 05,2006 + // Look http://rhic.physics.wayne.edu/~pavlinov/ALICE/SHISHKEBAB/RES/linearityAndResolutionForTRD1.html + // Keep for compatibilty + // + if(fNECLayers == 69) { // 10% layer reduction + fSampling = 12.55; + } else if(fNECLayers == 61) { // 20% layer reduction + fSampling = 12.80; + } else if(fNECLayers == 77) { + if (fECScintThick>0.159 && fECScintThick<0.161) { // original sampling fraction, equal layers + fSampling = 12.327; // fECScintThick = fECPbRadThickness = 0.160; + } else if (fECScintThick>0.175 && fECScintThick<0.177) { // 10% Pb thicknes reduction + fSampling = 10.5; // fECScintThick = 0.176, fECPbRadThickness=0.144; + } else if(fECScintThick>0.191 && fECScintThick<0.193) { // 20% Pb thicknes reduction + fSampling = 8.93; // fECScintThick = 0.192, fECPbRadThickness=0.128; } - new((*ampmatrix)[k]) TMatrixD(*amptrus) ; - new((*timeRmatrix)[k]) TMatrixD(*timeRtrus) ; - } - - AliEMCALDigit * dig ; - - //Digits loop to fill TRU matrices with amplitudes. - for(Int_t idig = 0 ; idig < digits->GetEntriesFast() ; idig++){ - - dig = dynamic_cast(digits->At(idig)) ; - amp = dig->GetAmp() ; // Energy of the digit (arbitrary units) - id = dig->GetId() ; // Id label of the cell - timeR = dig->GetTimeR() ; // Earliest time of the digit - - //Get eta and phi cell position in supermodule - Bool_t bCell = GetCellIndex(id, iSupMod, nTower, nIphi, nIeta) ; - if(!bCell) - Error("FillTRU","Wrong cell id number") ; - - GetCellPhiEtaIndexInSModule(iSupMod,nTower,nIphi, nIeta,iphi,ieta); - - //Check to which TRU in the supermodule belongs the cell. - //Supermodules are divided in a TRU matrix of dimension - //(fNTRUPhi,fNTRUEta). - //Each TRU is a cell matrix of dimension (nCellsPhi,nCellsEta) - - //First calculate the row and column in the supermodule - //of the TRU to which the cell belongs. - Int_t col = (ieta-1)/nCellsEta+1; - Int_t row = (iphi-1)/nCellsPhi+1; - if(iSupMod > 10) - row = (iphi-1)/nCellsPhi2+1; - //Calculate label number of the TRU - Int_t itru = (row-1) + (col-1)*fNTRUPhi + (iSupMod-1)*fNTRU ; - - //Fill TRU matrix with cell values - TMatrixD * amptrus = dynamic_cast(ampmatrix->At(itru)) ; - TMatrixD * timeRtrus = dynamic_cast(timeRmatrix->At(itru)) ; - - //Calculate row and column of the cell inside the TRU with number itru - Int_t irow = (iphi-1) - (row-1) * nCellsPhi; - if(iSupMod > 10) - irow = (iphi-1) - (row-1) * nCellsPhi2; - Int_t icol = (ieta-1) - (col-1) * nCellsEta; - - (*amptrus)(irow,icol) = amp ; - (*timeRtrus)(irow,icol) = timeR ; } } //______________________________________________________________________ -void AliEMCALGeometry::GetCellPhiEtaIndexInSModuleFromTRUIndex(const Int_t itru, const Int_t iphitru, const Int_t ietatru, Int_t &iphiSM, Int_t &ietaSM) const +void AliEMCALGeometry::GetModulePhiEtaIndexInSModuleFromTRUIndex(Int_t itru, Int_t iphitru, Int_t ietatru, Int_t &iphiSM, Int_t &ietaSM) const { - // This method transforms the (eta,phi) index of a cells in a + // This method transforms the (eta,phi) index of module in a // TRU matrix into Super Module (eta,phi) index. - // Calculate in which row and column in which the TRU are + // Calculate in which row and column where the TRU are // ordered in the SM - Int_t col = itru/ fNTRUPhi + 1; - Int_t row = itru - (col-1)*fNTRUPhi + 1; + Int_t col = itru/ fNTRUPhi ; // indexes of TRU in SM + Int_t row = itru - col*fNTRUPhi ; - //Calculate the (eta,phi) index in SM - Int_t nCellsPhi = fNPhi*2/fNTRUPhi; - Int_t nCellsEta = fNZ*2/fNTRUEta; - - iphiSM = nCellsPhi*(row-1) + iphitru + 1 ; - ietaSM = nCellsEta*(col-1) + ietatru + 1 ; + iphiSM = fNModulesInTRUPhi*row + iphitru ; + ietaSM = fNModulesInTRUEta*col + ietatru ; + //printf(" GetModulePhiEtaIndexInSModuleFromTRUIndex : itru %2i iphitru %2i ietatru %2i iphiSM %2i ietaSM %2i \n", + // itru, iphitru, ietatru, iphiSM, ietaSM); } //______________________________________________________________________ @@ -474,22 +615,21 @@ AliEMCALGeometry* AliEMCALGeometry::GetInstance(const Text_t* name, AliEMCALGeometry * rv = 0; if ( fgGeom == 0 ) { - if ( strcmp(name,"") == 0 ) rv = 0; - else { - fgGeom = new AliEMCALGeometry(name, title); - if ( fgInit ) rv = (AliEMCALGeometry * ) fgGeom; - else { - rv = 0; - delete fgGeom; - fgGeom = 0; - } // end if fgInit - } // end if strcmp(name,"") + if ( strcmp(name,"") == 0 ) { // get default geometry + fgGeom = new AliEMCALGeometry(fgDefaultGeometryName, title); + } else { + fgGeom = new AliEMCALGeometry(name, title); + } // end if strcmp(name,"") + if ( fgInit ) rv = (AliEMCALGeometry * ) fgGeom; + else { + rv = 0; + delete fgGeom; + fgGeom = 0; + } // end if fgInit }else{ - if ( strcmp(fgGeom->GetName(), name) != 0 ) { - printf("\ncurrent geometry is ") ; - printf(fgGeom->GetName()); - printf("\n you cannot call "); - printf(name); + if ( strcmp(fgGeom->GetName(), name) != 0) { + printf("\ncurrent geometry is %s : ", fgGeom->GetName()); + printf(" you cannot call %s ",name); }else{ rv = (AliEMCALGeometry *) fgGeom; } // end @@ -497,262 +637,9 @@ AliEMCALGeometry* AliEMCALGeometry::GetInstance(const Text_t* name, return rv; } -// These methods are obsolete but use in AliEMCALRecPoint - keep it now -//______________________________________________________________________ -Int_t AliEMCALGeometry::TowerIndex(Int_t ieta,Int_t iphi) const { - // Returns the tower index number from the based on the Z and Phi - // index numbers. - // Inputs: - // Int_t ieta // index along z axis [1-fNZ] - // Int_t iphi // index along phi axis [1-fNPhi] - // Outputs: - // none. - // Returned - // Int_t index // Tower index number - - if ( (ieta <= 0 || ieta>GetNEta()) || - (iphi <= 0 || iphi>GetNPhi())) { - Error("TowerIndex", "Unexpected parameters eta = %d phi = %d!", ieta, iphi) ; - return -1; - } - return ( (iphi - 1)*GetNEta() + ieta ); -} - -//______________________________________________________________________ -void AliEMCALGeometry::TowerIndexes(Int_t index,Int_t &ieta,Int_t &iphi) const { - // Inputs: - // Int_t index // Tower index number [1-fNZ*fNPhi] - // Outputs: - // Int_t ieta // index allong z axis [1-fNZ] - // Int_t iphi // index allong phi axis [1-fNPhi] - // Returned - // none. - - Int_t nindex = 0; - - if ( IsInECA(index) ) { // ECAL index - nindex = index ; - } - else { - Error("TowerIndexes", "Unexpected Id number!") ; - ieta = -1; - iphi = -1; - return; - } - - if (nindex%GetNZ()) - iphi = nindex / GetNZ() + 1 ; - else - iphi = nindex / GetNZ() ; - ieta = nindex - (iphi - 1) * GetNZ() ; - - if (gDebug==2) - printf("TowerIndexes: index=%d,%d, ieta=%d, iphi = %d", index, nindex,ieta, iphi) ; - return; - -} - -//______________________________________________________________________ -void AliEMCALGeometry::EtaPhiFromIndex(Int_t index,Float_t &eta,Float_t &phi) const { - // given the tower index number it returns the based on the eta and phi - // of the tower. - // Inputs: - // Int_t index // Tower index number [1-fNZ*fNPhi] - // Outputs: - // Float_t eta // eta of center of tower in pseudorapidity - // Float_t phi // phi of center of tower in degrees - // Returned - // none. - Int_t ieta, iphi; - Float_t deta, dphi ; - - TowerIndexes(index,ieta,iphi); - - if (gDebug == 2) - printf("EtaPhiFromIndex: index = %d, ieta = %d, iphi = %d", index, ieta, iphi) ; - - deta = (GetArm1EtaMax()-GetArm1EtaMin())/(static_cast(GetNEta())); - eta = GetArm1EtaMin() + ((static_cast(ieta) - 0.5 ))*deta; - - dphi = (GetArm1PhiMax() - GetArm1PhiMin())/(static_cast(GetNPhi())); // in degrees. - phi = GetArm1PhiMin() + dphi*(static_cast(iphi) - 0.5);//iphi range [1-fNphi]. -} - -//______________________________________________________________________ -Int_t AliEMCALGeometry::TowerIndexFromEtaPhi(Float_t eta,Float_t phi) const { - // returns the tower index number based on the eta and phi of the tower. - // Inputs: - // Float_t eta // eta of center of tower in pseudorapidity - // Float_t phi // phi of center of tower in degrees - // Outputs: - // none. - // Returned - // Int_t index // Tower index number [1-fNZ*fNPhi] - - Int_t ieta,iphi; - - ieta = static_cast ( 1 + (static_cast(GetNEta()) * (eta - GetArm1EtaMin()) / (GetArm1EtaMax() - GetArm1EtaMin())) ) ; - - if( ieta <= 0 || ieta > GetNEta() ) { - Error("TowerIndexFromEtaPhi", "Unexpected (eta, phi) = (%f, %f) value, outside of EMCAL!", eta, phi) ; - return -1 ; - } - - iphi = static_cast ( 1 + (static_cast(GetNPhi()) * (phi - GetArm1PhiMin()) / (GetArm1PhiMax() - GetArm1PhiMin())) ) ; - - if( iphi <= 0 || iphi > GetNPhi() ) { - Error("TowerIndexFromEtaPhi", "Unexpected (eta, phi) = (%f, %f) value, outside of EMCAL!", eta, phi) ; - return -1 ; - } - - return TowerIndex(ieta,iphi); -} - -//______________________________________________________________________ -Bool_t AliEMCALGeometry::AbsToRelNumbering(Int_t AbsId, Int_t *relid) const { - // Converts the absolute numbering into the following array/ - // relid[0] = Row number inside EMCAL - // relid[1] = Column number inside EMCAL - // Input: - // Int_t AbsId // Tower index number [1-2*fNZ*fNPhi] - // Outputs: - // Int_t *relid // array of 2. Described above. - Bool_t rv = kTRUE ; - Int_t ieta=0,iphi=0,index=AbsId; - - TowerIndexes(index,ieta,iphi); - relid[0] = ieta; - relid[1] = iphi; - - return rv; -} - -//______________________________________________________________________ -void AliEMCALGeometry::PosInAlice(const Int_t *relid, Float_t &theta, Float_t &phi) const -{ - // Converts the relative numbering into the local EMCAL-module (x, z) - // coordinates - Int_t ieta = relid[0]; // offset along x axis - Int_t iphi = relid[1]; // offset along z axis - Int_t index; - Float_t eta; - - index = TowerIndex(ieta,iphi); - EtaPhiFromIndex(index,eta,phi); - //theta = 180.*(2.0*TMath::ATan(TMath::Exp(-eta)))/TMath::Pi(); - theta = 2.0*TMath::ATan(TMath::Exp(-eta)); - - // correct for distance to IP - Float_t d = GetIP2ECASection() - GetIPDistance() ; - - Float_t correction = 1 + d/GetIPDistance() ; - Float_t tantheta = TMath::Tan(theta) * correction ; - theta = TMath::ATan(tantheta) * TMath::RadToDeg() ; - if (theta < 0 ) - theta += 180. ; - - return; -} - -//______________________________________________________________________ -void AliEMCALGeometry::PosInAlice(Int_t absid, Float_t &theta, Float_t &phi) const -{ - // Converts the relative numbering into the local EMCAL-module (x, z) - // coordinates - Int_t relid[2] ; - AbsToRelNumbering(absid, relid) ; - Int_t ieta = relid[0]; // offset along x axis - Int_t iphi = relid[1]; // offset along z axis - Int_t index; - Float_t eta; - - index = TowerIndex(ieta,iphi); - EtaPhiFromIndex(index,eta,phi); - theta = 2.0*TMath::ATan(TMath::Exp(-eta)) ; - - // correct for distance to IP - Float_t d = 0. ; - if (IsInECA(absid)) - d = GetIP2ECASection() - GetIPDistance() ; - else { - Error("PosInAlice", "Unexpected id # %d!", absid) ; - return; - } - - Float_t correction = 1 + d/GetIPDistance() ; - Float_t tantheta = TMath::Tan(theta) * correction ; - theta = TMath::ATan(tantheta) * TMath::RadToDeg() ; - if (theta < 0 ) - theta += 180. ; - - return; -} - -//______________________________________________________________________ -void AliEMCALGeometry::XYZFromIndex(const Int_t *relid,Float_t &x,Float_t &y, Float_t &z) const { - // given the tower relative number it returns the X, Y and Z - // of the tower. - - // Outputs: - // Float_t x // x of center of tower in cm - // Float_t y // y of center of tower in cm - // Float_t z // z of centre of tower in cm - // Returned - // none. - - Float_t eta,theta, phi,cylradius=0. ; - - Int_t ieta = relid[0]; // offset along x axis - Int_t iphi = relid[1]; // offset along z axis. - Int_t index; - - index = TowerIndex(ieta,iphi); - EtaPhiFromIndex(index,eta,phi); - theta = 180.*(2.0*TMath::ATan(TMath::Exp(-eta)))/TMath::Pi(); - - cylradius = GetIP2ECASection() ; - - Double_t kDeg2Rad = TMath::DegToRad() ; - x = cylradius * TMath::Cos(phi * kDeg2Rad ) ; - y = cylradius * TMath::Sin(phi * kDeg2Rad ) ; - z = cylradius / TMath::Tan(theta * kDeg2Rad ) ; - - return; -} - -//______________________________________________________________________ -void AliEMCALGeometry::XYZFromIndex(Int_t absid, TVector3 &v) const { - // given the tower relative number it returns the X, Y and Z - // of the tower. - - // Outputs: - // Float_t x // x of center of tower in cm - // Float_t y // y of center of tower in cm - // Float_t z // z of centre of tower in cm - // Returned - // none. - - Float_t theta, phi,cylradius=0. ; - - PosInAlice(absid, theta, phi) ; - - if ( IsInECA(absid) ) - cylradius = GetIP2ECASection() ; - else { - Error("XYZFromIndex", "Unexpected Tower section") ; - return; - } - - Double_t kDeg2Rad = TMath::DegToRad() ; - v.SetX(cylradius * TMath::Cos(phi * kDeg2Rad ) ); - v.SetY(cylradius * TMath::Sin(phi * kDeg2Rad ) ); - v.SetZ(cylradius / TMath::Tan(theta * kDeg2Rad ) ) ; - - return; -} - +//_____________________________________________________________________________ Bool_t AliEMCALGeometry::IsInEMCAL(Double_t x, Double_t y, Double_t z) const { - // Checks whether point is inside the EMCal volume + // Checks whether point is inside the EMCal volume, used in AliEMCALv*.cxx // // Code uses cylindrical approximation made of inner radius (for speed) // @@ -773,151 +660,359 @@ Bool_t AliEMCALGeometry::IsInEMCAL(Double_t x, Double_t y, Double_t z) const { return 0; Double_t phi = TMath::ATan2(y,x) * 180./TMath::Pi(); + if (phi < 0) phi += 360; // phi should go from 0 to 360 in this case if (phi > fArm1PhiMin && phi < fArm1PhiMax) return 1; } return 0; } -// == // // == Shish-kebab cases == // -Int_t AliEMCALGeometry::GetAbsCellId(Int_t nSupMod, Int_t nTower, Int_t nIphi, Int_t nIeta) const -{ // 27-aug-04; +//________________________________________________________________________________________________ +Int_t AliEMCALGeometry::GetAbsCellId(Int_t nSupMod, Int_t nModule, Int_t nIphi, Int_t nIeta) const +{ + // 27-aug-04; // corr. 21-sep-04; // 13-oct-05; 110 degree case - // 1 <= nSupMod <= fNumberOfSuperModules - // 1 <= nTower <= fNPHI * fNZ ( fNPHI * fNZ/2 for fKey110DEG=1) - // 1 <= nIphi <= fNPHIdiv - // 1 <= nIeta <= fNETAdiv - // 1 <= absid <= fNCells - static Int_t id=0; // have to change from 1 to fNCells - if(fKey110DEG == 1 && nSupMod > 10) { // 110 degree case; last two supermodules - id = fNCellsInSupMod*10 + (fNCellsInSupMod/2)*(nSupMod-11); + // May 31, 2006; ALICE numbering scheme: + // 0 <= nSupMod < fNumberOfSuperModules + // 0 <= nModule < fNPHI * fNZ ( fNPHI * fNZ/2 for fKey110DEG=1) + // 0 <= nIphi < fNPHIdiv + // 0 <= nIeta < fNETAdiv + // 0 <= absid < fNCells + static Int_t id=0; // have to change from 0 to fNCells-1 + if(fKey110DEG == 1 && nSupMod >= 10) { // 110 degree case; last two supermodules + id = fNCellsInSupMod*10 + (fNCellsInSupMod/2)*(nSupMod-10); } else { - id = fNCellsInSupMod*(nSupMod-1); + id = fNCellsInSupMod*nSupMod; } - id += fNCellsInTower *(nTower-1); - id += fNPHIdiv *(nIphi-1); + id += fNCellsInModule *nModule; + id += fNPHIdiv *nIphi; id += nIeta; - if(id<=0 || id > fNCells) { + if(id<0 || id >= fNCells) { // printf(" wrong numerations !!\n"); // printf(" id %6i(will be force to -1)\n", id); // printf(" fNCells %6i\n", fNCells); // printf(" nSupMod %6i\n", nSupMod); -// printf(" nTower %6i\n", nTower); +// printf(" nModule %6i\n", nModule); // printf(" nIphi %6i\n", nIphi); // printf(" nIeta %6i\n", nIeta); - id = -TMath::Abs(id); + id = -TMath::Abs(id); // if negative something wrong } return id; } -Bool_t AliEMCALGeometry::CheckAbsCellId(Int_t ind) const +//________________________________________________________________________________________________ +Bool_t AliEMCALGeometry::CheckAbsCellId(Int_t absId) const { - // 17-nov-04 - analog of IsInECA - if(fGeoName.Contains("TRD")) { - if(ind<=0 || ind > fNCells) return kFALSE; - else return kTRUE; - } else return IsInECA(ind); + // May 31, 2006; only trd1 now + if(absId<0 || absId >= fNCells) return kFALSE; + else return kTRUE; } -Bool_t AliEMCALGeometry::GetCellIndex(Int_t absId,Int_t &nSupMod,Int_t &nTower,Int_t &nIphi,Int_t &nIeta) const +//________________________________________________________________________________________________ +Bool_t AliEMCALGeometry::GetCellIndex(Int_t absId,Int_t &nSupMod,Int_t &nModule,Int_t &nIphi,Int_t &nIeta) const { - // 21-sep-04 - // 19-oct-05; + // 21-sep-04; 19-oct-05; + // May 31, 2006; ALICE numbering scheme: + // + // In: + // absId - cell is as in Geant, 0<= absId < fNCells; + // Out: + // nSupMod - super module(SM) number, 0<= nSupMod < fNumberOfSuperModules; + // nModule - module number in SM, 0<= nModule < fNCellsInSupMod/fNCellsInSupMod or(/2) for tow last SM (10th and 11th); + // nIphi - cell number in phi driection inside module; 0<= nIphi < fNPHIdiv; + // nIeta - cell number in eta driection inside module; 0<= nIeta < fNETAdiv; + // static Int_t tmp=0, sm10=0; - if(absId<=0 || absId>fNCells) { -// Info("GetCellIndex"," wrong abs Id %i !! \n", absId); - return kFALSE; - } + if(!CheckAbsCellId(absId)) return kFALSE; + sm10 = fNCellsInSupMod*10; - if(fKey110DEG == 1 && absId > sm10) { // 110 degree case; last two supermodules - nSupMod = (absId-1-sm10) / (fNCellsInSupMod/2) + 11; - tmp = (absId-1-sm10) % (fNCellsInSupMod/2); + if(fKey110DEG == 1 && absId >= sm10) { // 110 degree case; last two supermodules + nSupMod = (absId-sm10) / (fNCellsInSupMod/2) + 10; + tmp = (absId-sm10) % (fNCellsInSupMod/2); } else { - nSupMod = (absId-1) / fNCellsInSupMod + 1; - tmp = (absId-1) % fNCellsInSupMod; + nSupMod = absId / fNCellsInSupMod; + tmp = absId % fNCellsInSupMod; } - nTower = tmp / fNCellsInTower + 1; - tmp = tmp % fNCellsInTower; - nIphi = tmp / fNPHIdiv + 1; - nIeta = tmp % fNPHIdiv + 1; + nModule = tmp / fNCellsInModule; + tmp = tmp % fNCellsInModule; + nIphi = tmp / fNPHIdiv; + nIeta = tmp % fNPHIdiv; return kTRUE; } -void AliEMCALGeometry::GetTowerPhiEtaIndexInSModule(Int_t nSupMod, Int_t nTower, int &iphit, int &ietat) const +//________________________________________________________________________________________________ +void AliEMCALGeometry::GetModulePhiEtaIndexInSModule(Int_t nSupMod, Int_t nModule, int &iphim, int &ietam) const { - // added nSupMod; have to check - 19-oct-05 ! + // added nSupMod; - 19-oct-05 ! + // Alice numbering scheme - Jun 01,2006 + // ietam, iphi - indexes of module in two dimensional grid of SM + // ietam - have to change from 0 to fNZ-1 + // iphim - have to change from 0 to nphi-1 (fNPhi-1 or fNPhi/2-1) static Int_t nphi; - if(fKey110DEG == 1 && nSupMod>=11) nphi = fNPhi/2; + if(fKey110DEG == 1 && nSupMod>=10) nphi = fNPhi/2; else nphi = fNPhi; - ietat = (nTower-1)/nphi + 1; // have to change from 1 to fNZ - iphit = (nTower-1)%nphi + 1; // have to change from 1 to fNPhi + ietam = nModule/nphi; + iphim = nModule%nphi; } -void AliEMCALGeometry::GetCellPhiEtaIndexInSModule(Int_t nSupMod, Int_t nTower, Int_t nIphi, Int_t nIeta, +//________________________________________________________________________________________________ +void AliEMCALGeometry::GetCellPhiEtaIndexInSModule(Int_t nSupMod, Int_t nModule, Int_t nIphi, Int_t nIeta, int &iphi, int &ieta) const { - // added nSupMod; Nov 25, 05 - static Int_t iphit, ietat; - - GetTowerPhiEtaIndexInSModule(nSupMod,nTower, iphit, ietat); - // have to change from 1 to fNZ*fNETAdiv - ieta = (ietat-1)*fNETAdiv + (3-nIeta); // x(module) = -z(SM) - // iphi - have to change from 1 to fNPhi*fNPHIdiv - iphi = (iphit-1)*fNPHIdiv + nIphi; // y(module) = y(SM) + // + // Added nSupMod; Nov 25, 05 + // Alice numbering scheme - Jun 01,2006 + // IN: + // nSupMod - super module(SM) number, 0<= nSupMod < fNumberOfSuperModules; + // nModule - module number in SM, 0<= nModule < fNCellsInSupMod/fNCellsInSupMod or(/2) for tow last SM (10th and 11th); + // nIphi - cell number in phi driection inside module; 0<= nIphi < fNPHIdiv; + // nIeta - cell number in eta driection inside module; 0<= nIeta < fNETAdiv; + // + // OUT: + // ieta, iphi - indexes of cell(tower) in two dimensional grid of SM + // ieta - have to change from 0 to (fNZ*fNETAdiv-1) + // iphi - have to change from 0 to (fNPhi*fNPHIdiv-1 or fNPhi*fNPHIdiv/2-1) + // + static Int_t iphim, ietam; + + GetModulePhiEtaIndexInSModule(nSupMod,nModule, iphim, ietam); + // ieta = ietam*fNETAdiv + (1-nIeta); // x(module) = -z(SM) + ieta = ietam*fNETAdiv + (fNETAdiv - 1 - nIeta); // x(module) = -z(SM) + iphi = iphim*fNPHIdiv + nIphi; // y(module) = y(SM) + + if(iphi<0 || ieta<0) + AliDebug(1,Form(" nSupMod %i nModule %i nIphi %i nIeta %i => ieta %i iphi %i\n", + nSupMod, nModule, nIphi, nIeta, ieta, iphi)); } +//________________________________________________________________________________________________ Int_t AliEMCALGeometry::GetSuperModuleNumber(Int_t absId) const { - //return the number of the - //supermodule given the absolute - //ALICE numbering + // Return the number of the supermodule given the absolute + // ALICE numbering id - static Int_t nSupMod, nTower, nIphi, nIeta; - GetCellIndex(absId, nSupMod, nTower, nIphi, nIeta); + static Int_t nSupMod, nModule, nIphi, nIeta; + GetCellIndex(absId, nSupMod, nModule, nIphi, nIeta); return nSupMod; } +//________________________________________________________________________________________________ +void AliEMCALGeometry::GetModuleIndexesFromCellIndexesInSModule(Int_t nSupMod, Int_t iphi, Int_t ieta, + Int_t &iphim, Int_t &ietam, Int_t &nModule) const +{ + // Transition from cell indexes (ieta,iphi) to module indexes (ietam,iphim, nModule) + static Int_t nphi; + nphi = GetNumberOfModuleInPhiDirection(nSupMod); + + ietam = ieta/fNETAdiv; + iphim = iphi/fNPHIdiv; + nModule = ietam * nphi + iphim; +} + +//________________________________________________________________________________________________ +Int_t AliEMCALGeometry::GetAbsCellIdFromCellIndexes(Int_t nSupMod, Int_t iphi, Int_t ieta) const +{ + // Transition from super module number(nSupMod) and cell indexes (ieta,iphi) to absId + static Int_t ietam, iphim, nModule; + static Int_t nIeta, nIphi; // cell indexes in module + + GetModuleIndexesFromCellIndexesInSModule(nSupMod, iphi, ieta, ietam, iphim, nModule); + + nIeta = ieta%fNETAdiv; + nIeta = fNETAdiv - 1 - nIeta; + nIphi = iphi%fNPHIdiv; + + return GetAbsCellId(nSupMod, nModule, nIphi, nIeta); +} + + // Methods for AliEMCALRecPoint - Feb 19, 2006 -Bool_t AliEMCALGeometry::RelPosCellInSModule(Int_t absId, Double_t &xr, Double_t &yr, Double_t &zr) +//________________________________________________________________________________________________ +Bool_t AliEMCALGeometry::RelPosCellInSModule(Int_t absId, Double_t &xr, Double_t &yr, Double_t &zr) const { - //Look to see what the relative - //position inside a given cell is - //for a recpoint. + // Look to see what the relative + // position inside a given cell is + // for a recpoint. + // Alice numbering scheme - Jun 08, 2006 + // In: + // absId - cell is as in Geant, 0<= absId < fNCells; + // OUT: + // xr,yr,zr - x,y,z coordinates of cell with absId inside SM + + // Shift index taking into account the difference between standard SM + // and SM of half size in phi direction + const Int_t kphiIndexShift = fCentersOfCellsPhiDir.GetSize()/4; // Nov 22, 2006; was 6 for cas 2X2 + static Int_t nSupMod, nModule, nIphi, nIeta, iphi, ieta; + if(!CheckAbsCellId(absId)) return kFALSE; + + GetCellIndex(absId, nSupMod, nModule, nIphi, nIeta); + GetCellPhiEtaIndexInSModule(nSupMod,nModule,nIphi,nIeta, iphi, ieta); + + xr = fCentersOfCellsXDir.At(ieta); + zr = fCentersOfCellsEtaDir.At(ieta); - static Int_t nSupMod, nTower, nIphi, nIeta, iphi, ieta; + if(nSupMod<10) { + yr = fCentersOfCellsPhiDir.At(iphi); + } else { + yr = fCentersOfCellsPhiDir.At(iphi + kphiIndexShift); + } + AliDebug(1,Form("absId %i nSupMod %i iphi %i ieta %i xr %f yr %f zr %f ",absId,nSupMod,iphi,ieta,xr,yr,zr)); + + return kTRUE; +} + +//________________________________________________________________________________________________ +Bool_t AliEMCALGeometry::RelPosCellInSModule(Int_t absId, Double_t loc[3]) const +{ + // Alice numbering scheme - Jun 03, 2006 + loc[0] = loc[1] = loc[2]=0.0; + if(RelPosCellInSModule(absId, loc[0],loc[1],loc[2])) { + return kTRUE; + } + return kFALSE; +} + +//________________________________________________________________________________________________ +Bool_t AliEMCALGeometry::RelPosCellInSModule(Int_t absId, TVector3 &vloc) const +{ + static Double_t loc[3]; + if(RelPosCellInSModule(absId,loc)) { + vloc.SetXYZ(loc[0], loc[1], loc[2]); + return kTRUE; + } else { + vloc.SetXYZ(0,0,0); + return kFALSE; + } + // Alice numbering scheme - Jun 03, 2006 +} + +//________________________________________________________________________________________________ +Bool_t AliEMCALGeometry::RelPosCellInSModule(Int_t absId, Double_t distEff, Double_t &xr, Double_t &yr, Double_t &zr) const +{ + // Jul 30, 2007 - taking into account position of shower max + // Look to see what the relative + // position inside a given cell is + // for a recpoint. + // In: + // absId - cell is as in Geant, 0<= absId < fNCells; + // e - cluster energy + // OUT: + // xr,yr,zr - x,y,z coordinates of cell with absId inside SM + + // Shift index taking into account the difference between standard SM + // and SM of half size in phi direction + const Int_t kphiIndexShift = fCentersOfCellsPhiDir.GetSize()/4; // Nov 22, 2006; was 6 for cas 2X2 + static Int_t nSupMod, nModule, nIphi, nIeta, iphi, ieta; + static Int_t iphim, ietam; + static AliEMCALShishKebabTrd1Module *mod = 0; + static TVector2 v; if(!CheckAbsCellId(absId)) return kFALSE; - GetCellIndex(absId, nSupMod, nTower, nIphi, nIeta); - GetCellPhiEtaIndexInSModule(nSupMod,nTower,nIphi,nIeta, iphi, ieta); + GetCellIndex(absId, nSupMod, nModule, nIphi, nIeta); + GetModulePhiEtaIndexInSModule(nSupMod, nModule, iphim, ietam); + GetCellPhiEtaIndexInSModule(nSupMod,nModule,nIphi,nIeta, iphi, ieta); - xr = fXCentersOfCells->At(ieta-1); - zr = fEtaCentersOfCells->At(ieta-1); + mod = GetShishKebabModule(ietam); + mod->GetPositionAtCenterCellLine(nIeta, distEff, v); + xr = v.Y() - fParSM[0]; + zr = v.X() - fParSM[2]; - yr = fPhiCentersOfCells->At(iphi-1); + if(nSupMod<10) { + yr = fCentersOfCellsPhiDir.At(iphi); + } else { + yr = fCentersOfCellsPhiDir.At(iphi + kphiIndexShift); + } + AliDebug(1,Form("absId %i nSupMod %i iphi %i ieta %i xr %f yr %f zr %f ",absId,nSupMod,iphi,ieta,xr,yr,zr)); - // cout<<" absId "<GetTheta()); // Stay here + //printf(" distCorr %f | dist %f | ietam %i -> etamM %i\n", distCorr, dist, ietam, ietamM); + } + // distEff += distCorr; + } + // Bad resolution in this case, strong bias vs phi + // distEff = 0.0; + mod->GetPositionAtCenterCellLine(nIeta, distEff, v); // Stay here + xr = v.Y() - fParSM[0]; + zr = v.X() - fParSM[2]; + + if(nSupMod<10) { + yr = fCentersOfCellsPhiDir.At(iphi); + } else { + yr = fCentersOfCellsPhiDir.At(iphi + kphiIndexShift); + } + AliDebug(1,Form("absId %i nSupMod %i iphi %i ieta %i xr %f yr %f zr %f ",absId,nSupMod,iphi,ieta,xr,yr,zr)); + + return kTRUE; +} + +//________________________________________________________________________________________________ void AliEMCALGeometry::CreateListOfTrd1Modules() { - //Generate the list of Trd1 modules - //which will make up the EMCAL - //geometry + // Generate the list of Trd1 modules + // which will make up the EMCAL + // geometry + + AliDebug(2,Form(" AliEMCALGeometry::CreateListOfTrd1Modules() started ")); - cout<< endl<< " AliEMCALGeometry::CreateListOfTrd1Modules() started " << endl; AliEMCALShishKebabTrd1Module *mod=0, *mTmp=0; // current module if(fShishKebabTrd1Modules == 0) { fShishKebabTrd1Modules = new TList; + fShishKebabTrd1Modules->SetName("ListOfTRD1"); for(int iz=0; iz< GetNZ(); iz++) { if(iz==0) { mod = new AliEMCALShishKebabTrd1Module(TMath::Pi()/2.,this); @@ -928,106 +1023,128 @@ void AliEMCALGeometry::CreateListOfTrd1Modules() fShishKebabTrd1Modules->Add(mod); } } else { - cout<<" Already exits : "; + AliDebug(2,Form(" Already exits : ")); } - cout<<" fShishKebabTrd1Modules "<< fShishKebabTrd1Modules << " has " - << fShishKebabTrd1Modules->GetSize() << " modules" <At(fShishKebabTrd1Modules->GetSize()-1); + fEtaMaxOfTRD1 = mod->GetMaxEtaOfModule(0); + + AliDebug(2,Form(" fShishKebabTrd1Modules has %i modules : max eta %5.4f \n", + fShishKebabTrd1Modules->GetSize(),fEtaMaxOfTRD1)); // Feb 20,2006; + // Jun 01, 2006 - ALICE numbering scheme // define grid for cells in eta(z) and x directions in local coordinates system of SM - fEtaCentersOfCells = new TArrayD(fNZ *fNETAdiv); - fXCentersOfCells = new TArrayD(fNZ *fNETAdiv); - printf(" Cells grid in eta directions : size %i\n", fEtaCentersOfCells->GetSize()); - Int_t iphi=0, ieta=0, nTower=0; - Double_t xr, zr; - for(Int_t it=0; itGetCenterOfCellInLocalCoordinateofSM(ic+1, xr, zr); - GetCellPhiEtaIndexInSModule(1, nTower, 1, ic+1, iphi, ieta); // don't depend from phi - fXCentersOfCells->AddAt(float(xr) - fParSM[0],ieta-1); - fEtaCentersOfCells->AddAt(float(zr) - fParSM[2],ieta-1); + // Works just for 2x2 case only -- ?? start here + // + // + // Define grid for cells in phi(y) direction in local coordinates system of SM + // as for 2X2 as for 3X3 - Nov 8,2006 + // + AliDebug(2,Form(" Cells grid in phi directions : size %i\n", fCentersOfCellsPhiDir.GetSize())); + Int_t ind=0; // this is phi index + Int_t ieta=0, nModule=0, iphiTemp; + Double_t xr=0., zr=0., theta=0., phi=0., eta=0., r=0., x=0.,y=0.; + TVector3 vglob; + Double_t ytCenterModule=0.0, ytCenterCell=0.0; + + fCentersOfCellsPhiDir.Set(fNPhi*fNPHIdiv); + fPhiCentersOfCells.Set(fNPhi*fNPHIdiv); + + Double_t r0 = GetIPDistance() + GetLongModuleSize()/2.; + for(Int_t it=0; itGetSize(); i++) { - printf(" ind %2.2i : z %8.3f : x %8.3f", i+1, fEtaCentersOfCells->At(i),fXCentersOfCells->At(i)); - if(i%2 != 0) printf("\n"); - } - printf("\n"); - // define grid for cells in phi(y) direction in local coordinates system of SM - fPhiCentersOfCells = new TArrayD(fNPhi*fNPHIdiv); - printf(" Cells grid in phi directions : size %i\n", fPhiCentersOfCells->GetSize()); - Int_t ind=0; - for(Int_t it=0; itAddAt(ytLeftCenterCell,ind); - printf(" ind %2.2i : y %8.3f ", ind, fPhiCentersOfCells->At(ind)); ind++; - if(ic == fNPHIdiv-1) printf("\n"); + + fCentersOfCellsEtaDir.Set(fNZ *fNETAdiv); + fCentersOfCellsXDir.Set(fNZ *fNETAdiv); + fEtaCentersOfCells.Set(fNZ *fNETAdiv * fNPhi*fNPHIdiv); + AliDebug(2,Form(" Cells grid in eta directions : size %i\n", fCentersOfCellsEtaDir.GetSize())); + for(Int_t it=0; itGetCenterOfCellInLocalCoordinateofSM(ic, xr, zr); // case of 2X2 + GetCellPhiEtaIndexInSModule(0, nModule, 0, ic, iphiTemp, ieta); + } if(fNPHIdiv==3) { + trd1->GetCenterOfCellInLocalCoordinateofSM_3X3(ic, xr, zr); // case of 3X3 + GetCellPhiEtaIndexInSModule(0, nModule, 0, ic, iphiTemp, ieta); + } if(fNPHIdiv==1) { + trd1->GetCenterOfCellInLocalCoordinateofSM_1X1(xr, zr); // case of 1X1 + GetCellPhiEtaIndexInSModule(0, nModule, 0, ic, iphiTemp, ieta); + } + fCentersOfCellsXDir.AddAt(float(xr) - fParSM[0],ieta); + fCentersOfCellsEtaDir.AddAt(float(zr) - fParSM[2],ieta); + // Define grid on eta direction for each bin in phi + for(int iphi=0; iphiGetRadius(); + y = fCentersOfCellsPhiDir[iphi]; + r = TMath::Sqrt(x*x + y*y + zr*zr); + theta = TMath::ACos(zr/r); + eta = AliEMCALShishKebabTrd1Module::ThetaToEta(theta); + // ind = ieta*fCentersOfCellsPhiDir.GetSize() + iphi; + ind = iphi*fCentersOfCellsEtaDir.GetSize() + ieta; + fEtaCentersOfCells.AddAt(eta, ind); + } + //printf(" ieta %i : xr + trd1->GetRadius() %f : zr %f : eta %f \n", ieta, xr + trd1->GetRadius(), zr, eta); } } - printf("\n"); + for(Int_t i=0; i=0 && ind < GetNumberOfSuperModules()) { + TString volpath = "ALIC_1/XEN1_1/SMOD_"; + volpath += ind+1; - int i=0; - if(gGeoManager == 0) { - Info("CreateTransformationForSM() "," Load geometry : TGeoManager::Import()"); - assert(0); - } - TGeoNode *tn = gGeoManager->GetTopNode(); - TGeoNode *node=0, *xen1 = 0; - for(i=0; iGetNdaughters(); i++) { - node = tn->GetDaughter(i); - TString ns(node->GetName()); - if(ns.Contains(GetNameOfEMCALEnvelope())) { - xen1 = node; - break; + if(GetKey110DEG() && ind>=10) { + volpath = "ALIC_1/XEN1_1/SM10_"; + volpath += ind-10+1; } - } - if(!xen1) { - Info("CreateTransformationForSM() "," geometry has not EMCAL envelope with name %s", - GetNameOfEMCALEnvelope()); - assert(0); - } - printf(" i %i : EMCAL Envelope is %s : #SM %i \n", i, xen1->GetName(), xen1->GetNdaughters()); - for(i=0; iGetNdaughters(); i++) { - TGeoNodeMatrix *sm = (TGeoNodeMatrix*)xen1->GetDaughter(i); - fMatrixOfSM[i] = sm->GetMatrix(); - //Compiler doesn't like this syntax... - // printf(" %i : matrix %x \n", i, fMatrixOfSM[i]); - } - transInit = kTRUE; -} -void AliEMCALGeometry::GetGlobal(const Double_t *loc, Double_t *glob, int nsm) const -{ - //Figure out the global numbering - //of a given supermodule from the - //local numbering + if(!gGeoManager->cd(volpath.Data())) + AliFatal(Form("AliEMCALGeometry::GeoManager cannot find path %s!",volpath.Data())); - // if(fMatrixOfSM[0] == 0) GetTransformationForSM(); - static int ind; - ind = nsm-1; - if(ind>=0 && ind < GetNumberOfSuperModules()) { - fMatrixOfSM[ind]->LocalToMaster(loc, glob); + TGeoHMatrix* m = gGeoManager->GetCurrentMatrix(); + if(m) { + m->LocalToMaster(loc, glob); + } else { + AliFatal("Geo matrixes are not loaded \n") ; + } } } -void AliEMCALGeometry::GetGlobal(Int_t /* absId */, TVector3 & /* vglob */) const -{ // have to be defined -} - -void AliEMCALGeometry::GetGlobal(const TVector3 &vloc, TVector3 &vglob, int nsm) const +//________________________________________________________________________________________________ +void AliEMCALGeometry::GetGlobal(const TVector3 &vloc, TVector3 &vglob, int ind) const { //Figure out the global numbering //of a given supermodule from the @@ -1035,29 +1152,203 @@ void AliEMCALGeometry::GetGlobal(const TVector3 &vloc, TVector3 &vglob, int nsm) static Double_t tglob[3], tloc[3]; vloc.GetXYZ(tloc); - GetGlobal(tloc, tglob, nsm); + GetGlobal(tloc, tglob, ind); vglob.SetXYZ(tglob[0], tglob[1], tglob[2]); } -void AliEMCALGeometry::GetGlobal(const AliRecPoint *rp, TVector3 &vglob) const +//________________________________________________________________________________________________ +void AliEMCALGeometry::GetGlobal(Int_t absId , double glob[3]) const +{ + // Alice numbering scheme - Jun 03, 2006 + static Int_t nSupMod, nModule, nIphi, nIeta; + static double loc[3]; + + if (!gGeoManager || !gGeoManager->IsClosed()) { + AliError("Can't get the global coordinates! gGeoManager doesn't exist or it is still open!"); + return; + } + + glob[0]=glob[1]=glob[2]=0.0; // bad case + if(RelPosCellInSModule(absId, loc)) { + GetCellIndex(absId, nSupMod, nModule, nIphi, nIeta); + + TString volpath = "ALIC_1/XEN1_1/SMOD_"; + volpath += (nSupMod+1); + + if(GetKey110DEG() && nSupMod>=10) { + volpath = "ALIC_1/XEN1_1/SM10_"; + volpath += (nSupMod-10+1); + } + if(!gGeoManager->cd(volpath.Data())) + AliFatal(Form("GeoManager cannot find path %s!",volpath.Data())); + + TGeoHMatrix* m = gGeoManager->GetCurrentMatrix(); + if(m) { + m->LocalToMaster(loc, glob); + } else { + AliFatal("Geo matrixes are not loaded \n") ; + } + } +} + +//___________________________________________________________________ +void AliEMCALGeometry::GetGlobal(Int_t absId , TVector3 &vglob) const +{ + // Alice numbering scheme - Jun 03, 2006 + static Double_t glob[3]; + + GetGlobal(absId, glob); + vglob.SetXYZ(glob[0], glob[1], glob[2]); + +} + +//____________________________________________________________________________ +void AliEMCALGeometry::GetGlobal(const AliRecPoint* /*rp*/, TVector3& /* vglob */) const { - //Figure out the global numbering - //of a given supermodule from the - //local numbering for RecPoints + AliFatal(Form("Please use GetGlobalEMCAL(recPoint,gpos) instead of GetGlobal!")); +} + +//_________________________________________________________________________________ +void AliEMCALGeometry::GetGlobalEMCAL(const AliEMCALRecPoint *rp, TVector3 &vglob) const +{ + // Figure out the global numbering + // of a given supermodule from the + // local numbering for RecPoints static TVector3 vloc; - static Int_t nSupMod, nTower, nIphi, nIeta; + static Int_t nSupMod, nModule, nIphi, nIeta; - AliRecPoint *rpTmp = (AliRecPoint*)rp; // const_cast ?? - if(!rpTmp) return; - AliEMCALRecPoint *rpEmc = (AliEMCALRecPoint*)rpTmp; + const AliEMCALRecPoint *rpTmp = rp; + const AliEMCALRecPoint *rpEmc = rpTmp; - GetCellIndex(rpEmc->GetAbsId(0), nSupMod, nTower, nIphi, nIeta); + GetCellIndex(rpEmc->GetAbsId(0), nSupMod, nModule, nIphi, nIeta); rpTmp->GetLocalPosition(vloc); GetGlobal(vloc, vglob, nSupMod); } -AliEMCALShishKebabTrd1Module* AliEMCALGeometry::GetShishKebabModule(Int_t neta=0) +//________________________________________________________________________________________________ +void AliEMCALGeometry::EtaPhiFromIndex(Int_t absId,Double_t &eta,Double_t &phi) const +{ + // Nov 16, 2006- float to double + // version for TRD1 only + static TVector3 vglob; + GetGlobal(absId, vglob); + eta = vglob.Eta(); + phi = vglob.Phi(); +} + +//________________________________________________________________________________________________ +void AliEMCALGeometry::EtaPhiFromIndex(Int_t absId,Float_t &eta,Float_t &phi) const +{ + // Nov 16,2006 - should be discard in future + static TVector3 vglob; + GetGlobal(absId, vglob); + eta = float(vglob.Eta()); + phi = float(vglob.Phi()); +} + +//________________________________________________________________________________________________ +Bool_t AliEMCALGeometry::GetPhiBoundariesOfSM(Int_t nSupMod, Double_t &phiMin, Double_t &phiMax) const +{ + // 0<= nSupMod <=11; phi in rad + static int i; + if(nSupMod<0 || nSupMod >11) return kFALSE; + i = nSupMod/2; + phiMin = fPhiBoundariesOfSM[2*i]; + phiMax = fPhiBoundariesOfSM[2*i+1]; + return kTRUE; +} + +//________________________________________________________________________________________________ +Bool_t AliEMCALGeometry::GetPhiBoundariesOfSMGap(Int_t nPhiSec, Double_t &phiMin, Double_t &phiMax) const +{ + // 0<= nPhiSec <=4; phi in rad + // 0; gap boundaries between 0th&2th | 1th&3th SM + // 1; gap boundaries between 2th&4th | 3th&5th SM + // 2; gap boundaries between 4th&6th | 5th&7th SM + // 3; gap boundaries between 6th&8th | 7th&9th SM + // 4; gap boundaries between 8th&10th | 9th&11th SM + if(nPhiSec<0 || nPhiSec >4) return kFALSE; + phiMin = fPhiBoundariesOfSM[2*nPhiSec+1]; + phiMax = fPhiBoundariesOfSM[2*nPhiSec+2]; + return kTRUE; +} + +//________________________________________________________________________________________________ +Bool_t AliEMCALGeometry::SuperModuleNumberFromEtaPhi(Double_t eta, Double_t phi, Int_t &nSupMod) const +{ + // Return false if phi belongs a phi cracks between SM + + static Int_t i; + + if(TMath::Abs(eta) > fEtaMaxOfTRD1) return kFALSE; + + phi = TVector2::Phi_0_2pi(phi); // move phi to (0,2pi) boundaries + for(i=0; i<6; i++) { + if(phi>=fPhiBoundariesOfSM[2*i] && phi<=fPhiBoundariesOfSM[2*i+1]) { + nSupMod = 2*i; + if(eta < 0.0) nSupMod++; + AliDebug(1,Form("eta %f phi %f(%5.2f) : nSupMod %i : #bound %i", eta,phi,phi*TMath::RadToDeg(), nSupMod,i)); + return kTRUE; + } + } + return kFALSE; +} + +//________________________________________________________________________________________________ +Bool_t AliEMCALGeometry::GetAbsCellIdFromEtaPhi(Double_t eta, Double_t phi, Int_t &absId) const +{ + // Nov 17,2006 + // stay here - phi problem as usual + static Int_t nSupMod, i, ieta, iphi, etaShift, nphi; + static Double_t absEta=0.0, d=0.0, dmin=0.0, phiLoc; + absId = nSupMod = - 1; + if(SuperModuleNumberFromEtaPhi(eta, phi, nSupMod)) { + // phi index first + phi = TVector2::Phi_0_2pi(phi); + phiLoc = phi - fPhiCentersOfSM[nSupMod/2]; + nphi = fPhiCentersOfCells.GetSize(); + if(nSupMod>=10) { + phiLoc = phi - 190.*TMath::DegToRad(); + nphi /= 2; + } + + dmin = TMath::Abs(fPhiCentersOfCells[0]-phiLoc); + iphi = 0; + for(i=1; i itru %2i\n", row, col, sm, itru); + return itru; +} + +//________________________________________________________________________________________________ +void AliEMCALGeometry::Browse(TBrowser* b) +{ + //Browse the modules + if(fShishKebabTrd1Modules) b->Add(fShishKebabTrd1Modules); +} + +//________________________________________________________________________________________________ +Bool_t AliEMCALGeometry::IsFolder() const +{ + //Check if fShishKebabTrd1Modules is in folder + if(fShishKebabTrd1Modules) return kTRUE; + else return kFALSE; +} + +//________________________________________________________________________________________________ +Double_t AliEMCALGeometry::GetPhiCenterOfSM(Int_t nsupmod) const +{ + //returns center of supermodule in phi + int i = nsupmod/2; + return fPhiCentersOfSM[i]; + +} +//____________________________________________________________________________ +Bool_t AliEMCALGeometry::Impact(const TParticle * particle) const +{ + // Tells if a particle enters EMCAL + Bool_t in=kFALSE; + Int_t AbsID=0; + TVector3 vtx(particle->Vx(),particle->Vy(),particle->Vz()); + TVector3 vimpact(0,0,0); + ImpactOnEmcal(vtx,particle->Theta(),particle->Phi(),AbsID,vimpact); + if(AbsID!=0) + in=kTRUE; + return in; +} +//____________________________________________________________________________ +void AliEMCALGeometry::ImpactOnEmcal(TVector3 vtx, Double_t theta, Double_t phi, + Int_t & absId, TVector3 & vimpact) const +{ + // calculates the impact coordinates on EMCAL (centre of a tower/not on EMCAL surface) + // of a neutral particle + // emitted in the vertex vtx[3] with direction theta and phi in the ALICE global coordinate system + + TVector3 p(TMath::Sin(theta)*TMath::Cos(phi),TMath::Sin(theta)*TMath::Sin(phi),TMath::Cos(theta)) ; + + vimpact.SetXYZ(0,0,0); + absId=-1; + if(phi==0 || theta==0) return; + + TVector3 direction; + Double_t factor = (GetIPDistance()-vtx[1])/p[1]; + direction = vtx + factor*p; + + if (!gGeoManager){ + AliFatal("Geo manager not initialized\n"); + } + //from particle direction -> tower hitted + GetAbsCellIdFromEtaPhi(direction.Eta(),direction.Phi(),absId); + + //tower absID hitted -> tower/module plane (evaluated at the center of the tower) + Int_t nSupMod, nModule, nIphi, nIeta; + Double_t loc[3],loc2[3],loc3[3]; + Double_t glob[3]={},glob2[3]={},glob3[3]={}; + + if(!RelPosCellInSModule(absId,loc)) return; + + //loc is cell center of tower + GetCellIndex(absId, nSupMod, nModule, nIphi, nIeta); + + //look at 2 neighbours-s cell using nIphi={0,1} and nIeta={0,1} + Int_t nIphi2,nIeta2,absId2,absId3; + if(nIeta==0) nIeta2=1; + else nIeta2=0; + absId2=GetAbsCellId(nSupMod,nModule,nIphi,nIeta2); + if(nIphi==0) nIphi2=1; + else nIphi2=0; + absId3=GetAbsCellId(nSupMod,nModule,nIphi2,nIeta); + + //2nd point on emcal cell plane + if(!RelPosCellInSModule(absId2,loc2)) return; + + //3rd point on emcal cell plane + if(!RelPosCellInSModule(absId3,loc3)) return; + + TString volpath = "ALIC_1/XEN1_1/SMOD_"; + volpath += (nSupMod+1); + + if(GetKey110DEG() && nSupMod>=10) { + volpath = "ALIC_1/XEN1_1/SM10_"; + volpath += (nSupMod-10+1); + } + if(!gGeoManager->cd(volpath.Data())){ + AliFatal(Form("GeoManager cannot find path %s!",volpath.Data())) + return; + } + TGeoHMatrix* m = gGeoManager->GetCurrentMatrix(); + if(m) { + m->LocalToMaster(loc, glob); + m->LocalToMaster(loc2, glob2); + m->LocalToMaster(loc3, glob3); + } else { + AliFatal("Geo matrixes are not loaded \n") ; + } + + //Equation of Plane from glob,glob2,glob3 (Ax+By+Cz+D=0) + Double_t A = glob[1]*(glob2[2]-glob3[2]) + glob2[1]*(glob3[2]-glob[2]) + glob3[1]*(glob[2]-glob2[2]); + Double_t B = glob[2]*(glob2[0]-glob3[0]) + glob2[2]*(glob3[0]-glob[0]) + glob3[2]*(glob[0]-glob2[0]); + Double_t C = glob[0]*(glob2[1]-glob3[1]) + glob2[0]*(glob3[1]-glob[1]) + glob3[0]*(glob[1]-glob2[1]); + Double_t D = glob[0]*(glob2[1]*glob3[2]-glob3[1]*glob2[2]) + glob2[0]*(glob3[1]*glob[2]-glob[1]*glob3[2]) + glob3[0]*(glob[1]*glob2[2]-glob2[1]*glob[2]); + D=-D; + + //shift equation of plane from tower/module center to surface along vector (A,B,C) normal to tower/module plane + Double_t dist = GetLongModuleSize()/2.; + Double_t norm = TMath::Sqrt(A*A+B*B+C*C); + Double_t glob4[3]={}; + TVector3 dir(A,B,C); + TVector3 point(glob[0],glob[1],glob[2]); + if(point.Dot(dir)<0) dist*=-1; + glob4[0]=glob[0]-dist*A/norm; + glob4[1]=glob[1]-dist*B/norm; + glob4[2]=glob[2]-dist*C/norm; + D = glob4[0]*A + glob4[1]*B + glob4[2]*C ; + D = -D; + + //Line determination (2 points for equation of line : vtx and direction) + //impact between line (particle) and plane (module/tower plane) + Double_t den = A*(vtx(0)-direction(0)) + B*(vtx(1)-direction(1)) + C*(vtx(2)-direction(2)); + if(den==0){ + printf("ImpactOnEmcal() No solution :\n"); + return; + } + + Double_t length = A*vtx(0)+B*vtx(1)+C*vtx(2)+D; + length /=den; + + vimpact.SetXYZ(vtx(0)+length*(direction(0)-vtx(0)),vtx(1)+length*(direction(1)-vtx(1)),vtx(2)+length*(direction(2)-vtx(2))); + + //shift vimpact from tower/module surface to center along vector (A,B,C) normal to tower/module plane + vimpact.SetXYZ(vimpact(0)+dist*A/norm,vimpact(1)+dist*B/norm,vimpact(2)+dist*C/norm); + + return; +}