**************************************************************************/
/* $Id$ */
-
+/* History of cvs commits:
+ *
+ * $Log$
+ * Revision 1.52 2007/03/10 22:19:01 pavlinov
+ * move one varibels from AliEMCALv2 to AliEMCAL
+ *
+ * Revision 1.51 2007/02/24 20:42:35 pavlinov
+ * fixed error of Geant3 parameters initialisation
+ *
+ * Revision 1.50 2007/02/05 10:43:25 hristov
+ * Changes for correct initialization of Geant4 (Mihaela)
+ *
+ * Revision 1.49 2007/01/22 17:29:12 pavlinov
+ * EMCAL geometry can be created independently form anything now
+ *
+ * Revision 1.48 2006/12/19 02:34:13 pavlinov
+ * clean up the EMCAL name scheme : super module -> module -> tower (or cell)
+ *
+ * Revision 1.47 2006/12/05 17:12:03 gustavo
+ * Updated AliEMCAL::Digits2Raw, reads first provisional RCU mapping files to make Raw data with new AliCaloAltroMapping and AliCaloRawStream
+ *
+ *
+ */
//_________________________________________________________________________
// Base Class for EMCAL description:
// This class contains material definitions
#include <TTree.h>
#include <TVirtualMC.h>
#include <TH1F.h>
-#include <TF1.h>
#include <TRandom.h>
+#include <TGraph.h>
// --- Standard library ---
// --- AliRoot header files ---
#include "AliMagF.h"
#include "AliEMCAL.h"
-#include "AliEMCALGetter.h"
#include "AliRun.h"
+#include "AliEMCALLoader.h"
#include "AliEMCALSDigitizer.h"
#include "AliEMCALDigitizer.h"
-#include "AliAltroBuffer.h"
+#include "AliEMCALDigit.h"
+#include "AliEMCALRawUtils.h"
ClassImp(AliEMCAL)
+
//____________________________________________________________________________
-AliEMCAL::AliEMCAL():AliDetector()
+AliEMCAL::AliEMCAL()
+ : AliDetector(),
+ fBirkC0(0),
+ fBirkC1(0.),
+ fBirkC2(0.),
+ fGeometry(0)
{
// Default ctor
fName = "EMCAL" ;
+ InitConstants();
+ // Should call AliEMCALGeometry::GetInstance(EMCAL->GetTitle(),"") for getting EMCAL geometry
}
//____________________________________________________________________________
-AliEMCAL::AliEMCAL(const char* name, const char* title): AliDetector(name,title)
+AliEMCAL::AliEMCAL(const char* name, const char* title)
+ : AliDetector(name,title),
+ fBirkC0(0),
+ fBirkC1(0.),
+ fBirkC2(0.),
+ fGeometry(0)
{
// ctor : title is used to identify the layout
-
- fTimeMax = 1.28E-5 ;
- fTimePeak = 2.0E-6 ;
- fTimeRes = 1.5E-6 ;
- fHighGainFactor = 40;
- fHighGainOffset = 0x200 ;
+ InitConstants();
}
//____________________________________________________________________________
AliEMCAL::~AliEMCAL()
{
-
+ //dtor
}
//____________________________________________________________________________
-void AliEMCAL::Copy(AliEMCAL & emcal)
+void AliEMCAL::InitConstants()
{
- TObject::Copy(emcal) ;
+ //initialize EMCAL values
+ fBirkC0 = 1;
+ fBirkC1 = 0.013/1.032;
+ fBirkC2 = 9.6e-6/(1.032 * 1.032);
+ }
+
+//____________________________________________________________________________
+void AliEMCAL::DefineMediumParameters()
+{
+ //
+ // EMCAL cuts (Geant3)
+ //
+ Int_t * idtmed = fIdtmed->GetArray() - 1599 ;
+// --- Set decent energy thresholds for gamma and electron tracking
+
+ // Tracking threshold for photons and electrons in Lead
+ Float_t cutgam=10.e-5; // 100 kev;
+ Float_t cutele=10.e-5; // 100 kev;
+ TString ntmp(GetTitle());
+ ntmp.ToUpper();
+ if(ntmp.Contains("10KEV")) {
+ cutele = cutgam = 1.e-5;
+ } else if(ntmp.Contains("50KEV")) {
+ cutele = cutgam = 5.e-5;
+ } else if(ntmp.Contains("100KEV")) {
+ cutele = cutgam = 1.e-4;
+ } else if(ntmp.Contains("200KEV")) {
+ cutele = cutgam = 2.e-4;
+ } else if(ntmp.Contains("500KEV")) {
+ cutele = cutgam = 5.e-4;
+ }
+
+ gMC->Gstpar(idtmed[1600],"CUTGAM", cutgam);
+ gMC->Gstpar(idtmed[1600],"CUTELE", cutele); // 1MEV -> 0.1MEV; 15-aug-05
+ gMC->Gstpar(idtmed[1600],"BCUTE", cutgam); // BCUTE and BCUTM start from GUTGUM
+ gMC->Gstpar(idtmed[1600],"BCUTM", cutgam); // BCUTE and BCUTM start from GUTGUM
+ // --- Generate explicitly delta rays in Lead ---
+ gMC->Gstpar(idtmed[1600], "LOSS", 3) ;
+ gMC->Gstpar(idtmed[1600], "DRAY", 1) ;
+ gMC->Gstpar(idtmed[1600], "DCUTE", cutele) ;
+ gMC->Gstpar(idtmed[1600], "DCUTM", cutele) ;
+
+// --- in aluminium parts ---
+ gMC->Gstpar(idtmed[1602],"CUTGAM", cutgam) ;
+ gMC->Gstpar(idtmed[1602],"CUTELE", cutele) ;
+ gMC->Gstpar(idtmed[1602],"BCUTE", cutgam); // BCUTE and BCUTM start from GUTGUM
+ gMC->Gstpar(idtmed[1602],"BCUTM", cutgam); // BCUTE and BCUTM start from GUTGUM
+ gMC->Gstpar(idtmed[1602], "LOSS",3.) ;
+ gMC->Gstpar(idtmed[1602], "DRAY",1.) ;
+ gMC->Gstpar(idtmed[1602], "DCUTE", cutele) ;
+ gMC->Gstpar(idtmed[1602], "DCUTM", cutele) ;
+
+// --- and finally thresholds for photons and electrons in the scintillator ---
+ gMC->Gstpar(idtmed[1601],"CUTGAM", cutgam) ;
+ gMC->Gstpar(idtmed[1601],"CUTELE", cutele) ;// 1MEV -> 0.1MEV; 15-aug-05
+ gMC->Gstpar(idtmed[1601],"BCUTE", cutgam); // BCUTE and BCUTM start from GUTGUM
+ gMC->Gstpar(idtmed[1601],"BCUTM", cutgam); // BCUTE and BCUTM start from GUTGUM
+ gMC->Gstpar(idtmed[1601], "LOSS",3) ; // generate delta rays
+ gMC->Gstpar(idtmed[1601], "DRAY",1) ;
+ gMC->Gstpar(idtmed[1601], "DCUTE", cutele) ;
+ gMC->Gstpar(idtmed[1601], "DCUTM", cutele) ;
+
+ // S steel -
+ gMC->Gstpar(idtmed[1603],"CUTGAM", cutgam);
+ gMC->Gstpar(idtmed[1603],"CUTELE", cutele);
+ gMC->Gstpar(idtmed[1603],"BCUTE", cutgam); // BCUTE and BCUTM start from GUTGUM
+ gMC->Gstpar(idtmed[1603],"BCUTM", cutgam); // BCUTE and BCUTM start from GUTGUM
+ // --- Generate explicitly delta rays
+ gMC->Gstpar(idtmed[1603], "LOSS",3);
+ gMC->Gstpar(idtmed[1603], "DRAY",1);
+ gMC->Gstpar(idtmed[1603], "DCUTE", cutele) ;
+ gMC->Gstpar(idtmed[1603], "DCUTM", cutele) ;
+
+ AliEMCALGeometry* geom = GetGeometry();
+ if(geom->GetILOSS()>=0) {
+ for(int i=1600; i<=1603; i++) gMC->Gstpar(idtmed[i], "LOSS", geom->GetILOSS()) ;
+ }
+ if(geom->GetIHADR()>=0) {
+ for(int i=1600; i<=1603; i++) gMC->Gstpar(idtmed[i], "HADR", geom->GetIHADR()) ;
+ }
}
//____________________________________________________________________________
AliDigitizer* AliEMCAL::CreateDigitizer(AliRunDigitizer* manager) const
{
+ //create and return the digitizer
return new AliEMCALDigitizer(manager);
}
{
// Definitions of materials to build EMCAL and associated tracking media.
// media number in idtmed are 1599 to 1698.
-
// --- Air ---
Float_t aAir[4]={12.0107,14.0067,15.9994,39.948};
Float_t zAir[4]={6.,7.,8.,18.};
AliMaterial(3, "Al$", 26.98, 13., 2.7, 8.9, 999., 0, 0) ;
// --- Absorption length is ignored ^
+ // 25-aug-04 by PAI - see PMD/AliPMDv0.cxx for STEEL definition
+ Float_t asteel[4] = { 55.847,51.9961,58.6934,28.0855 };
+ Float_t zsteel[4] = { 26.,24.,28.,14. };
+ Float_t wsteel[4] = { .715,.18,.1,.005 };
+ AliMixture(4, "STAINLESS STEEL$", asteel, zsteel, 7.88, 4, wsteel);
+
// DEFINITION OF THE TRACKING MEDIA
// for EMCAL: idtmed[1599->1698] equivalent to fIdtmed[0->100]
- Int_t * idtmed = fIdtmed->GetArray() - 1599 ;
Int_t isxfld = gAlice->Field()->Integ() ;
Float_t sxmgmx = gAlice->Field()->Max() ;
// Air -> idtmed[1599]
- AliMedium(0, "Air $", 0, 0,
+ AliMedium(0, "Air$", 0, 0,
isxfld, sxmgmx, 10.0, 1.0, 0.1, 0.1, 10.0, 0, 0) ;
// The Lead -> idtmed[1600]
- AliMedium(1, "Lead $", 1, 0,
+ AliMedium(1, "Lead$", 1, 0,
isxfld, sxmgmx, 10.0, 0.1, 0.1, 0.1, 0.1, 0, 0) ;
// The scintillator of the CPV made of Polystyrene scintillator -> idtmed[1601]
- AliMedium(2, "CPV scint. $", 2, 1,
- isxfld, sxmgmx, 10.0, 0.001, 0.1, 0.001, 0.001, 0, 0) ;
+ float deemax = 0.1; // maximum fractional energy loss in one step (0 < DEEMAX < deemax )
+ AliMedium(2, "Scintillator$", 2, 1,
+ isxfld, sxmgmx, 10.0, 0.001, deemax, 0.001, 0.001, 0, 0) ;
// Various Aluminium parts made of Al -> idtmed[1602]
- AliMedium(3, "Al parts $", 3, 0,
+ AliMedium(3, "Al$", 3, 0,
isxfld, sxmgmx, 10.0, 0.1, 0.1, 0.001, 0.001, 0, 0) ;
+ // 25-aug-04 by PAI : see PMD/AliPMDv0.cxx for STEEL definition -> idtmed[1603]
+ AliMedium(4, "S steel$", 4, 0,
+ isxfld, sxmgmx, 10.0, 0.1, 0.1, 0.001, 0.001, 0, 0) ;
-// --- Set decent energy thresholds for gamma and electron tracking
-
- // Tracking threshold for photons and electrons in Lead
- gMC->Gstpar(idtmed[1600],"CUTGAM",0.00008) ;
- gMC->Gstpar(idtmed[1600],"CUTELE",0.001) ;
- gMC->Gstpar(idtmed[1600],"BCUTE",0.0001) ;
-
- // --- Generate explicitly delta rays in Lead ---
- gMC->Gstpar(idtmed[1600], "LOSS",3.) ;
- gMC->Gstpar(idtmed[1600], "DRAY",1.) ;
- gMC->Gstpar(idtmed[1600], "DCUTE",0.00001) ;
- gMC->Gstpar(idtmed[1600], "DCUTM",0.00001) ;
-
-// --- in aluminium parts ---
- gMC->Gstpar(idtmed[1602], "LOSS",3.) ;
- gMC->Gstpar(idtmed[1602], "DRAY",1.) ;
- gMC->Gstpar(idtmed[1602], "DCUTE",0.00001) ;
- gMC->Gstpar(idtmed[1602], "DCUTM",0.00001) ;
-
-// --- and finally thresholds for photons and electrons in the scintillator ---
- gMC->Gstpar(idtmed[1601],"CUTGAM",0.00008) ;
- gMC->Gstpar(idtmed[1601],"CUTELE",0.001) ;
- gMC->Gstpar(idtmed[1601],"BCUTE",0.0001) ;
//set constants for Birk's Law implentation
fBirkC0 = 1;
fBirkC1 = 0.013/dP;
fBirkC2 = 9.6e-6/(dP * dP);
-
+ // Call just in case of Geant3; What to do in case of Geant4 ?
+ if(gMC->InheritsFrom("TGeant3")) DefineMediumParameters(); // Feb 20, 2007
}
-
//____________________________________________________________________________
-void AliEMCAL::Digits2Raw()
-{
-// convert digits of the current event to raw data
-
- // get the digits
- AliEMCALGetter * gime = AliEMCALGetter::Instance(AliRunLoader::GetGAliceName()) ;
- if (!gime) {
- Error("Digits2Raw", "EMCAL Getter not instantiated") ;
- return ;
- }
- gime->Event(gime->EventNumber(), "D") ;
- TClonesArray* digits = gime->Digits() ;
-
- if (!digits) {
- Error("Digits2Raw", "no digits found !");
- return;
- }
-
- // get the geometry
- AliEMCALGeometry* geom = gime->EMCALGeometry();
- if (!geom) {
- Error("Digits2Raw", "no geometry found !");
- return;
- }
-
- // some digitization constants
- const Int_t kDDLOffset = 0x800;
- const Int_t kThreshold = 3;
- const Int_t kChannelsperDDL = 897 ;
-
- AliAltroBuffer* buffer = NULL;
- Int_t prevDDL = -1;
- Int_t adcValuesLow[fkTimeBins];
- Int_t adcValuesHigh[fkTimeBins];
-
- // loop over digits (assume ordered digits)
- for (Int_t iDigit = 0; iDigit < digits->GetEntries(); iDigit++) {
- AliEMCALDigit* digit = gime->Digit(iDigit);
- if (digit->GetAmp() < kThreshold)
- continue;
- Int_t iDDL = digit->GetId() / kChannelsperDDL ;
- // for each DDL id is numbered from 1 to kChannelsperDDL -1
- Int_t idDDL = digit->GetId() - iDDL * ( kChannelsperDDL - 1 ) ;
- // new DDL
- if (iDDL != prevDDL) {
- // write real header and close previous file
- if (buffer) {
- buffer->Flush();
- buffer->WriteDataHeader(kFALSE, kFALSE);
- delete buffer;
- }
-
- // open new file and write dummy header
- TString fileName("EMCAL_") ;
- fileName += (iDDL + kDDLOffset) ;
- fileName += ".ddl" ;
- buffer = new AliAltroBuffer(fileName.Data(), 1);
- buffer->WriteDataHeader(kTRUE, kFALSE); //Dummy;
-
- prevDDL = iDDL;
- }
-
- // out of time range signal (?)
- if (digit->GetTimeR() > fTimeMax) {
- buffer->FillBuffer(digit->GetAmp());
- buffer->FillBuffer(fkTimeBins); // time bin
- buffer->FillBuffer(3); // bunch length
- buffer->WriteTrailer(3, idDDL, 0, 0); // trailer
-
- // simulate linear rise and gaussian decay of signal
- } else {
- Bool_t highGain = kFALSE;
-
- // write low and eventually high gain channel
- buffer->WriteChannel(iDDL, 0, 0,
- fkTimeBins, adcValuesLow, kThreshold);
- if (highGain) {
- buffer->WriteChannel(iDDL, 0, fHighGainOffset,
- fkTimeBins, adcValuesHigh, 1);
- }
- }
- }
- // write real header and close last file
- if (buffer) {
- buffer->Flush();
- buffer->WriteDataHeader(kFALSE, kFALSE);
- delete buffer;
- }
- gime->EmcalLoader()->UnloadDigits();
+void AliEMCAL::Digits2Raw() {
+ static AliEMCALRawUtils rawUtil;
+ rawUtil.Digits2Raw();
}
-
//____________________________________________________________________________
void AliEMCAL::Hits2SDigits()
{
// create summable digits
- AliEMCALSDigitizer* emcalDigitizer =
- new AliEMCALSDigitizer(fLoader->GetRunLoader()->GetFileName().Data()) ;
- emcalDigitizer->SetEventRange(0, -1) ; // do all the events
- emcalDigitizer->ExecuteTask() ;
+ GetGeometry();
+ AliEMCALSDigitizer emcalDigitizer(fLoader->GetRunLoader()->GetFileName().Data()) ;
+ emcalDigitizer.SetEventRange(0, -1) ; // do all the events
+ emcalDigitizer.ExecuteTask() ;
}
//____________________________________________________________________________
+
AliLoader* AliEMCAL::MakeLoader(const char* topfoldername)
{
//different behaviour than standard (singleton getter)
fLoader = new AliEMCALLoader(GetName(),topfoldername);
return fLoader;
}
-
-//__________________________________________________________________
-Double_t AliEMCAL::RawResponseFunction(Double_t *x, Double_t *par)
-{
- // Shape of the electronics raw reponse:
- // 1. the signal rises linearly from par[4] to par[1] to reach the maximu par[3]
- // 2. the signal decays with a gaussian shape for par[4]+par[1] with a sigma of par[2]
-
- Float_t xx = x[0] ;
-
- Double_t signal = 0. ;
-
- if (xx < par[4] + par[1]) // signal is rising
- signal = (gRandom->Rndm() + par[3]) * (xx - par[4]) / (par[1] - par[4]) ;
- else // signal is decaying
- signal = (gRandom->Rndm() + par[3]) * TMath::Gaus(xx, par[4] + par[1], par[2]) ;
-
- return signal < 0. ? 0. : signal ;
-}
-
-//__________________________________________________________________
-Bool_t AliEMCAL::RawSampledResponse(const Float_t dtime, const Int_t damp, Int_t * adcH, Int_t * adcL) const
-{
- // for a start time dtime and an amplitude damp given by digit,
- // calculates the raw sampled response
-
- const Int_t kRawSignalOverflow = 0x3FF ;
- Bool_t highGain = kFALSE ;
-
- TF1 f1("signal", RawResponseFunction, 0, fkTimeBins, 5);
-
- f1.SetParNames("Time Max", "Peaking time", "Decay width", "Amp max", "Start time") ;
- f1.SetParameter(0, fTimeMax) ;
- f1.SetParameter(1, fTimePeak) ;
- f1.SetParameter(2, fTimeRes) ;
- f1.SetParameter(3, damp) ;
- f1.SetParameter(4, dtime) ;
-
- for (Int_t iTime = 0; iTime < fkTimeBins; iTime++) {
- Double_t time = iTime * fTimeMax/fkTimeBins;
- Double_t signal = f1.Eval(time) ;
- adcL[iTime] = static_cast<Int_t>(signal + 0.5) ;
- if ( adcL[iTime] > kRawSignalOverflow) // larger than 10 bits
- adcL[iTime] = kRawSignalOverflow ;
- adcH[iTime] = static_cast<Int_t>(0.5 + (signal / fHighGainFactor)) ;
- if (adcH[iTime] > 0)
- highGain = kTRUE;
- }
- return highGain ;
-}
-
-//____________________________________________________________________________
-void AliEMCAL::SetTreeAddress()
-{
- // Linking Hits in Tree to Hits array
- TBranch *branch;
- char branchname[20];
- sprintf(branchname,"%s",GetName());
-
- // Branch address for hit tree
- TTree *treeH = TreeH();
- if (treeH) {
- branch = treeH->GetBranch(branchname);
- if (branch)
- {
- if (fHits == 0x0)
- fHits= new TClonesArray("AliEMCALHit",1000);
- branch->SetAddress(&fHits);
- }
- else
- {
- Warning("SetTreeAddress","<%s> Failed",GetName());
- }
- }
-}
-
-
-
-
-
git://git.uio.no / u / mrichter / AliRoot.git / blobdiff