]> git.uio.no Git - u/mrichter/AliRoot.git/blobdiff - TOF/AliTOF.cxx
Corrected digit's branch name
[u/mrichter/AliRoot.git] / TOF / AliTOF.cxx
index 5f8b4287a9f769f1f4ea8a5ed90c294e4834c873..348b2c427accd6d819440c685cce71b26b97d2b9 100644 (file)
  * provided "as is" without express or implied warranty.                  *
  **************************************************************************/
 
-/*
-$Log$
-Revision 1.18  2001/01/26 19:57:42  hristov
-Major upgrade of AliRoot code
-
-Revision 1.17  2000/10/19 09:58:14  vicinanz
-Updated Hits2Digit procedure
-
-Revision 1.16  2000/10/02 21:28:17  fca
-Removal of useless dependecies via forward declarations
-
-Revision 1.15  2000/05/18 14:33:01  vicinanz
-Modified to be full HP compliant
-
-Revision 1.14  2000/05/15 19:32:36  fca
-Add AddHitList !!
-
-Revision 1.13  2000/05/10 16:52:18  vicinanz
-New TOF version with holes for PHOS/RICH
+/* $Id$ */
 
-Revision 1.11.2.1  2000/05/10 09:37:15  vicinanz
-New version with Holes for PHOS/RICH
-
-Revision 1.11  1999/11/05 22:39:06  fca
-New hits structure
-
-Revision 1.10  1999/11/01 20:41:57  fca
-Added protections against using the wrong version of FRAME
-
-Revision 1.9  1999/10/15 15:35:19  fca
-New version for frame1099 with and without holes
-
-Revision 1.9  1999/09/29 09:24:33  fca
-Introduction of the Copyright and cvs Log
-
-*/
 ///////////////////////////////////////////////////////////////////////////////
 //                                                                           //
-//  Time Of Flight                               FCA                         //
+//  Time Of Flight                                                           //
 //  This class contains the basic functions for the Time Of Flight           //
 //  detector. Functions specific to one particular geometry are              //
 //  contained in the derived classes                                         //
@@ -75,22 +41,37 @@ Introduction of the Copyright and cvs Log
 //                                                                           //
 ///////////////////////////////////////////////////////////////////////////////
 
-#include <iostream.h>
 
-#include "AliTOF.h"
-#include "AliTOFD.h"
-#include "TBRIK.h"
-#include "TNode.h"
-#include "TObject.h"
-#include "TRandom.h"
-#include "TTree.h"
-#include "TFile.h"
+#include <Riostream.h>
+#include <Rstrstream.h>
+#include <stdlib.h>
+
+#include <TBRIK.h>
+#include <TFile.h>
+#include <TFolder.h>
+#include <TNode.h>
+#include <TObject.h>
+#include <TROOT.h>
+#include <TSystem.h>
+#include <TTask.h>
+#include <TTree.h>
+#include <TVirtualMC.h>
 
+#include "AliConfig.h"
+#include "AliHeader.h"
+#include "AliConst.h"
+#include "AliLoader.h"
+#include "AliMagF.h"
 #include "AliRun.h"
+#include "AliTOF.h"
+#include "AliTOFGeometry.h"
+#include "AliTOFSDigit.h"
+#include "AliTOFdigit.h"
+#include "AliTOFhit.h"
+#include "AliTOFhitT0.h"
 #include "AliMC.h"
-#include "AliMagF.h"
-#include "AliConst.h"
-
+#include "AliTOFDigitizer.h"
+#include "AliTOFDDLRawData.h"
  
 ClassImp(AliTOF)
  
@@ -100,11 +81,22 @@ AliTOF::AliTOF()
   //
   // Default constructor
   //
+  fFGeom  = 0x0;
+  fDTask  = 0x0;
+  fReTask = 0x0;
   fIshunt   = 0;
+  fSDigits  = 0 ;
+  fNSDigits = 0;
+  fDigits   = 0 ;
+  fReconParticles = 0x0;
+  fName="TOF";
+  fMerger = 0x0;
+  fTZero  = kFALSE;
+  fTOFGeometry = 0;
 }
  
 //_____________________________________________________________________________
-AliTOF::AliTOF(const char *name, const char *title)
+AliTOF::AliTOF(const char *name, const char *title, Option_t *option)
        : AliDetector(name,title)
 {
   //
@@ -113,12 +105,41 @@ AliTOF::AliTOF(const char *name, const char *title)
   // Here are fixed some important parameters
   //
 
-  // Initialization of hits and digits array
-  //
-  fHits   = new TClonesArray("AliTOFhit",  405);
-  gAlice->AddHitList(fHits);
+  // Initialization of hits, sdigits and digits array
+  // added option for time zero analysis
+  fFGeom  = 0x0; //skowron
+  fDTask  = 0x0;
+  fReTask = 0x0;
+  fReconParticles= 0x0;
+  fMerger = 0x0;
+  fTOFGeometry = 0;
+
+  if (strstr(option,"tzero")){
+    fHits   = new TClonesArray("AliTOFhitT0",  1000);
+    fTZero = kTRUE;
+    cout << "tzero option requires AliTOFv4T0 as TOF version (check Your Config.C)" << endl;
+  }else{
+    fHits   = new TClonesArray("AliTOFhit",  1000);
+    fTZero = kFALSE;
+  }
+  if (gAlice==0) {
+     Fatal("AliTOF","gAlice==0 !");
+  }
+  if (gAlice->GetMCApp()->GetHitLists())
+     gAlice->GetMCApp()->AddHitList(fHits);
+  else Error("AliTOF","gAlice->GetHitLists()==0");
+
   fIshunt  = 0;
-  fDigits = new TClonesArray("AliTOFdigit",405);
+  fSDigits = new TClonesArray("AliTOFSDigit", 1000);
+  fDigits  = new TClonesArray("AliTOFdigit",  1000);
+  fNSDigits = 0;
+
+  fFGeom = 0x0;
+  fDTask = 0x0;
+  fReTask = 0x0;
+  fReconParticles = 0x0;
+  fMerger = 0x0;
+
   //
   // Digitization parameters
   //
@@ -128,42 +149,97 @@ AliTOF::AliTOF(const char *name, const char *title)
   SetMarkerStyle(2);
   SetMarkerSize(0.4);
 
-// General Geometrical Parameters
-  fNTof    =  18;
-  fRmax    = 399.0;//cm
-  fRmin    = 370.0;//cm
-  fZlenC   = 177.5;//cm
-  fZlenB   = 141.0;//cm
-  fZlenA   = 106.0;//cm
-  fZtof    = 370.5;//cm
-
 // Strip Parameters
-  fStripLn = 122.0;//cm  Strip Length
-  fSpace   =   5.5;//cm  Space Beetween the strip and the bottom of the plate 
-  fDeadBndZ=   1.5;//cm  Dead Boundaries of a Strip along Z direction (width)
-  fDeadBndX=   1.0;//cm  Dead Boundaries of a Strip along X direction (length)
-  fXpad    =   2.5;//cm  X size of a pad
-  fZpad    =   3.5;//cm  Z size of a pad
-  fGapA    =   4.; //cm  Gap beetween tilted strip in A-type plate
-  fGapB    =   6.; //cm  Gap beetween tilted strip in B-type plate
-  fOverSpc =  15.3;//cm Space available for sensitive layers in radial direction
-  fNpadX   =  48;  // Number of pads in a strip along the X direction
-  fNpadZ   =   2;  // Number of pads in a strip along the Z direction
-  fPadXStr = fNpadX*fNpadZ; //Number of pads per strip
-  fNStripA = 0;
-  fNStripB = 0;
-  fNStripC = 0;
+  //fGapA    =   4.; //cm  Gap beetween tilted strip in A-type plate
+  //fGapB    =   6.; //cm  Gap beetween tilted strip in B-type plate
+
+  // Physical performances
+  //fTimeRes = 100.;//ps
+  //fChrgRes = 100.;//pC
+
+}
+
+//_____________________________________________________________________________
+void AliTOF::CreateTOFFolders()
+{
+  // create the ALICE TFolder
+  // create the ALICE TTasks
+  // create the ALICE main TFolder
+  // to be done by AliRun
+
+  TFolder * alice = new TFolder();
+  alice->SetNameTitle("FPAlice", "Alice Folder") ;
+  gROOT->GetListOfBrowsables()->Add(alice) ;
+
+  TFolder * aliceF  = alice->AddFolder("folders", "Alice memory Folder") ;
+  //  make it the owner of the objects that it contains
+  aliceF->SetOwner() ;
+  // geometry folder
+  TFolder * geomF = aliceF->AddFolder("Geometry", "Geometry objects") ;
+  TFolder * aliceT  = alice->AddFolder("tasks", "Alice tasks Folder") ;   
+  //  make it the owner of the objects that it contains
+  aliceT->SetOwner() ;
+
+  TTask * aliceDi = new TTask("(S)Digitizer", "Alice SDigitizer & Digitizer") ;
+  aliceT->Add(aliceDi);
+
+  TTask * aliceRe = new TTask("Reconstructioner", "Alice Reconstructioner") ;
+  aliceT->Add(aliceRe);
+
+  char * tempo = new char[80] ;
+
+  // creates the TOF Digitizer and adds it to alice main (S)Digitizer task
+  sprintf(tempo, "%sDigitizers container",GetName() ) ;
+  fDTask = new TTask(GetName(), tempo);
+  aliceDi->Add(fDTask) ;
+
+  // creates the TOF reconstructioner and adds it to alice main Reconstructioner task
+  sprintf(tempo, "%sReconstructioner container",GetName() ) ;
+  fReTask = new TTask(GetName(), tempo);
+  aliceRe->Add(fReTask) ;
+
+  delete [] tempo ;
  
-// Physical performances
-  fTimeRes = 100.;//ps
-  fChrgRes = 100.;//pC
-
-// DAQ characteristics
-  fPadXSector = 1932;
-  fNRoc       = 14;
-  fNFec       = 32;
-  fNTdc       = 32;
-  fNPadXRoc   = (Int_t)fPadXSector/fNRoc;
+  // creates the TOF geometry  folder
+  geomF->AddFolder("TOF", "Geometry for TOF") ;
+}
+
+//_____________________________________________________________________________
+AliTOF::~AliTOF()
+{
+  // dtor:
+  // it remove also the alice folder 
+  // and task that TOF creates instead of AliRun
+  /* PH Temporarily commented because of problems
+  TFolder * alice = (TFolder*)gROOT->GetListOfBrowsables()->FindObject("FPAlice") ;
+  delete alice;
+  alice = 0;
+  */
+  if (fHits)
+    {
+      fHits->Delete ();
+      delete fHits;
+      fHits = 0;
+    }
+  if (fDigits)
+    {
+      fDigits->Delete ();
+      delete fDigits;
+      fDigits = 0;
+    }
+  if (fSDigits)
+    {
+      fSDigits->Delete();
+      delete fSDigits;
+      fSDigits = 0;
+    }
+  if (fReconParticles)
+    {
+      fReconParticles->Delete ();
+      delete fReconParticles;
+      fReconParticles = 0;
+    }
+
 }
 
 //_____________________________________________________________________________
@@ -171,21 +247,92 @@ void AliTOF::AddHit(Int_t track, Int_t *vol, Float_t *hits)
 {
   //
   // Add a TOF hit
+  // new with placement used
   //
   TClonesArray &lhits = *fHits;
   new(lhits[fNhits++]) AliTOFhit(fIshunt, track, vol, hits);
 }
+
+//_____________________________________________________________________________
+void AliTOF::AddT0Hit(Int_t track, Int_t *vol, Float_t *hits)
+{
+  //
+  // Add a TOF hit
+  // new with placement used
+  //
+  TClonesArray &lhits = *fHits;
+  new(lhits[fNhits++]) AliTOFhitT0(fIshunt, track, vol, hits);
+}
+
 //_____________________________________________________________________________
 void AliTOF::AddDigit(Int_t *tracks, Int_t *vol, Float_t *digits)
 {
   //
   // Add a TOF digit
+  // new with placement used
   //
   TClonesArray &ldigits = *fDigits;
   new (ldigits[fNdigits++]) AliTOFdigit(tracks, vol, digits);
 }
 
+//___________________________________________
+void AliTOF::AddSDigit(Int_t tracknum, Int_t *vol, Float_t *digits)
+{
+     
+//
+// Add a TOF sdigit
+//
+        
+  TClonesArray &lSDigits = *fSDigits;   
+  new(lSDigits[fNSDigits++]) AliTOFSDigit(tracknum, vol, digits);
+}
+
+//_____________________________________________________________________________
+void AliTOF::SetTreeAddress ()
+{
+  // Set branch address for the Hits and Digits Tree.
+  
+  if (fLoader->TreeH())
+   {
+     if (fHits == 0x0)
+      {
+        if (fTZero) fHits   = new TClonesArray("AliTOFhitT0", 1000);
+        else fHits   = new TClonesArray("AliTOFhit", 1000);
+      }
+   }
+  AliDetector::SetTreeAddress ();
+
+  TBranch *branch;
+  TTree *treeD = fLoader->TreeD();
+
+  if (treeD)
+    {
+      branch = treeD->GetBranch ("TOF");
+      if (branch)
+       {
+         if (fDigits == 0x0) fDigits = new TClonesArray("AliTOFdigit",  1000); 
+         branch->SetAddress (&fDigits);
+       }
+    }
+
+  if (fLoader->TreeS () )
+    {
+      branch = fLoader->TreeS ()->GetBranch ("TOF");
+      if (branch) {
+        if (fSDigits == 0x0) fSDigits = new TClonesArray("AliTOFSDigit",  1000);
+        branch->SetAddress (&fSDigits);
+      }
+    }
+
+  if (fLoader->TreeR() && fReconParticles) //I do not know where this array is created - skowron
+    {
+      branch = fLoader->TreeR()->GetBranch("TOF"); 
+      if (branch) 
+       {
+         branch->SetAddress(&fReconParticles) ;
+       }
+    }   
+}
 
 //_____________________________________________________________________________
 void AliTOF::CreateGeometry()
@@ -202,21 +349,22 @@ void AliTOF::CreateGeometry()
   const Double_t kPi=TMath::Pi();
   const Double_t kDegrad=kPi/180.;
   //
-  Float_t xTof, yTof, Wall;
+  Float_t xTof, yTof, wall;
 
   // frame inbetween TOF modules
-  Wall = 4.;//cm
+  wall = 4.;//cm
 
   // Sizes of TOF module with its support etc..
-  xTof = 2.*(fRmin*TMath::Tan(10*kDegrad)-Wall/2-.5);
-  yTof = fRmax-fRmin;
+  xTof = 2.*(AliTOFGeometry::Rmin()*TMath::Tan(10*kDegrad)-wall/2-.5);
+  yTof = AliTOFGeometry::Rmax()-AliTOFGeometry::Rmin();
 
 //  TOF module internal definitions 
-  TOFpc(xTof, yTof, fZlenC, fZlenB, fZlenA, fZtof);
+  //TOFpc(xTof, yTof, fZlenC, fZlenB, fZlenA, AliTOFGeometry::MaxhZtof());
+  TOFpc(xTof, yTof, AliTOFGeometry::ZlenC(), AliTOFGeometry::ZlenB(), AliTOFGeometry::ZlenA(), AliTOFGeometry::MaxhZtof());
 }
 
 //_____________________________________________________________________________
-void AliTOF::DrawModule()
+void AliTOF::DrawModule() const
 {
   //
   // Draw a shaded view of the common part of the TOF geometry
@@ -255,24 +403,43 @@ void AliTOF::CreateMaterials()
 {
   //
   // Defines TOF materials for all versions
-  // Authors :   Maxim Martemianov, Boris Zagreev (ITEP) 
-  //            18/09/98 
+  // Revision: F. Pierella 18-VI-2002
   //
-  Int_t   ISXFLD = gAlice->Field()->Integ();
-  Float_t SXMGMX = gAlice->Field()->Max();
+
+  Int_t   isxfld = gAlice->Field()->Integ();
+  Float_t sxmgmx = gAlice->Field()->Max();
   //
-  //--- Quartz (SiO2) 
+  //--- Quartz (SiO2) to simulate float glass
+  //    density tuned to have correct float glass 
+  //    radiation length
   Float_t   aq[2] = { 28.0855,15.9994 };
   Float_t   zq[2] = { 14.,8. };
   Float_t   wq[2] = { 1.,2. };
-  Float_t   dq = 2.20;
+  Float_t   dq = 2.55; // std value: 2.2
   Int_t nq = -2;
-  // --- Freon
-  Float_t afre[2]  = {12.011,18.9984032 };
-  Float_t zfre[2]  = { 6., 9.};
-  Float_t wfre[2]  = { 5.,12.};
-  Float_t densfre  = 1.5;
-  Int_t nfre = -2;
+
+  // --- Freon C2F4H2 (TOF-TDR pagg.)
+  // Geant Manual CONS110-1, pag. 43 (Geant, Detector Description and Simulation Tool)
+  Float_t afre[3]  = {12.011,18.998,1.007};
+  Float_t zfre[3]  = { 6., 9., 1.}; 
+  Float_t wfre[3]  = { 2., 4., 2.};
+  Float_t densfre  = 0.00375;   
+// http://www.fi.infn.it/sezione/prevprot/gas/freon.html
+  Int_t nfre = -3; 
+/*
+  //-- Isobutane quencher C4H10 (5% in the sensitive mixture)
+  Float_t aiso[2]  = {12.011,1.007};
+  Float_t ziso[2]  = { 6.,  1.};
+  Float_t wiso[2]  = { 4., 10.};
+  Float_t densiso  = .......;  // (g/cm3) density
+  Int_t nfre = -2; // < 0 i.e. proportion by number of atoms of each kind
+  //-- SF6 (5% in the sensitive mixture)
+  Float_t asf[3]  = {32.066,18.998};
+  Float_t zsf[3]  = { 16., 9.};
+  Float_t wsf[3]  = {  1., 6.}; 
+  Float_t denssf  = .....;   // (g/cm3) density
+  Int_t nfre = -2; // < 0 i.e. proportion by number of atoms of each kind
+*/
   // --- CO2 
   Float_t ac[2]   = {12.,16.};
   Float_t zc[2]   = { 6., 8.};
@@ -285,7 +452,7 @@ void AliTOF::CreateMaterials()
   Float_t wmy[3] = {  5., 4.,  2. };
   Float_t dmy    = 1.39;
   Int_t nmy = -3;
- // For polyethilene (CH2) for honeycomb!!!!
+ // For polyethilene (CH2) - honeycomb -
   Float_t ape[2] = { 12., 1. };
   Float_t zpe[2] = {  6., 1. };
   Float_t wpe[2] = {  1., 2. };
@@ -297,12 +464,14 @@ void AliTOF::CreateMaterials()
   Float_t wmatg10[4] = { .259,.288,.248,.205 };
   Float_t densg10  = 1.7;
   Int_t nlmatg10 = -4;
-  // --- DME 
-  Float_t adme[5] = { 12.,1.,16.,19.,79. };
-  Float_t zdme[5] = {  6.,1., 8., 9.,35. };
-  Float_t wmatdme[5] = { .4056,.0961,.2562,.1014,.1407 };
-  Float_t densdme  = .00205;
-  Int_t nlmatdme = 5;
+
+  // plexiglass CH2=C(CH3)CO2CH3
+  Float_t aplex[3] = { 12.,1.,16.};
+  Float_t zplex[3] = {  6.,1., 8.};
+  Float_t wmatplex[3] = {5.,8.,2.};
+  Float_t densplex  =1.16;
+  Int_t nplex = -3;
+
   // ---- ALUMINA (AL203) 
   Float_t aal[2] = { 27.,16.};
   Float_t zal[2] = { 13., 8.};
@@ -315,22 +484,36 @@ void AliTOF::CreateMaterials()
   Float_t wwa[2] = {  2.,  1. };
   Float_t dwa    = 1.0;
   Int_t nwa = -2;
-  //
+
+// stainless steel
+  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 };
+
   //AliMaterial(0, "Vacuum$", 1e-16, 1e-16, 1e-16, 1e16, 1e16);
-  AliMaterial( 1, "Air$",14.61,7.3,0.001205,30423.24,67500.);
+
+  // 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;
+
+  AliMixture( 1, "Air$", aAir, zAir, dAir, 4, wAir);
+
   AliMaterial( 2, "Cu $",  63.54, 29.0, 8.96, 1.43, 14.8);
   AliMaterial( 3, "C  $",  12.01,  6.0, 2.265,18.8, 74.4);
   AliMixture ( 4, "Polyethilene$", ape, zpe, dpe, npe, wpe);
   AliMixture ( 5, "G10$", ag10, zg10, densg10, nlmatg10, wmatg10);
-  AliMixture ( 6, "DME ", adme, zdme, densdme, nlmatdme, wmatdme);
+  AliMixture ( 6, "PLE$", aplex, zplex, densplex, nplex, wmatplex);
   AliMixture ( 7, "CO2$", ac, zc, dc, nc, wc);
   AliMixture ( 8, "ALUMINA$", aal, zal, densal, nlmatal, wmatal);
   AliMaterial( 9, "Al $", 26.98, 13., 2.7, 8.9, 37.2);
   AliMaterial(10, "C-TRD$", 12.01, 6., 2.265*18.8/69.282*15./100, 18.8, 74.4); // for 15%
   AliMixture (11, "Mylar$",  amy, zmy, dmy, nmy, wmy);
   AliMixture (12, "Freon$",  afre, zfre, densfre, nfre, wfre);
-  AliMixture (13, "Quartz$", aq, zq, dq, nq, wq);
+  AliMixture (13, "Glass$", aq, zq, dq, nq, wq);
   AliMixture (14, "Water$",  awa, zwa, dwa, nwa, wwa);
+  AliMixture (15, "STAINLESS STEEL$", asteel, zsteel, 7.88, 4, wsteel);
 
   Float_t epsil, stmin, deemax, stemax;
  
@@ -346,33 +529,58 @@ void AliTOF::CreateMaterials()
   deemax = -.3;   // Maximum fractional energy loss, DLS
   stmin  = -.8;
 
-  AliMedium( 1, "Air$"  ,  1, 0, ISXFLD, SXMGMX, 10., stemax, deemax, epsil, stmin);
-  AliMedium( 2, "Cu $"  ,  2, 0, ISXFLD, SXMGMX, 10., stemax, deemax, epsil, stmin);
-  AliMedium( 3, "C  $"  ,  3, 0, ISXFLD, SXMGMX, 10., stemax, deemax, epsil, stmin);
-  AliMedium( 4, "Pol$"  ,  4, 0, ISXFLD, SXMGMX, 10., stemax, deemax, epsil, stmin);
-  AliMedium( 5, "G10$"  ,  5, 0, ISXFLD, SXMGMX, 10., stemax, deemax, epsil, stmin);
-  AliMedium( 6, "DME$"  ,  6, 0, ISXFLD, SXMGMX, 10., stemax, deemax, epsil, stmin);
-  AliMedium( 7, "CO2$"  ,  7, 0, ISXFLD, SXMGMX, 10., -.01, -.1, .01, -.01);
-  AliMedium( 8,"ALUMINA$", 8, 0, ISXFLD, SXMGMX, 10., stemax, deemax, epsil, stmin);
-  AliMedium( 9,"Al Frame$",9, 0, ISXFLD, SXMGMX, 10., stemax, deemax, epsil, stmin);
-  AliMedium(10, "DME-S$",  6, 1, ISXFLD, SXMGMX, 10., stemax, deemax, epsil, stmin);
-  AliMedium(11, "C-TRD$", 10, 0, ISXFLD, SXMGMX, 10., stemax, deemax, epsil, stmin);
-  AliMedium(12, "Myl$"  , 11, 0, ISXFLD, SXMGMX, 10., stemax, deemax, epsil, stmin);
-  AliMedium(13, "Fre$"  , 12, 0, ISXFLD, SXMGMX, 10., stemax, deemax, epsil, stmin);
-  AliMedium(14, "Fre-S$", 12, 1, ISXFLD, SXMGMX, 10., stemax, deemax, epsil, stmin);
-  AliMedium(15, "Glass$", 13, 0, ISXFLD, SXMGMX, 10., stemax, deemax, epsil, stmin);
-  AliMedium(16, "Water$", 14, 0, ISXFLD, SXMGMX, 10., stemax, deemax, epsil, stmin);
+  AliMedium( 1, "Air$"  ,  1, 0, isxfld, sxmgmx, 10., stemax, deemax, epsil, stmin);
+  AliMedium( 2, "Cu $"  ,  2, 0, isxfld, sxmgmx, 10., stemax, deemax, epsil, stmin);
+  AliMedium( 3, "C  $"  ,  3, 0, isxfld, sxmgmx, 10., stemax, deemax, epsil, stmin);
+  AliMedium( 4, "Pol$"  ,  4, 0, isxfld, sxmgmx, 10., stemax, deemax, epsil, stmin);
+  AliMedium( 5, "G10$"  ,  5, 0, isxfld, sxmgmx, 10., stemax, deemax, epsil, stmin);
+  AliMedium( 6, "PLE$"  ,  6, 0, isxfld, sxmgmx, 10., stemax, deemax, epsil, stmin);
+  AliMedium( 7, "CO2$"  ,  7, 0, isxfld, sxmgmx, 10., -.01, -.1, .01, -.01);
+  AliMedium( 8,"ALUMINA$", 8, 0, isxfld, sxmgmx, 10., stemax, deemax, epsil, stmin);
+  AliMedium( 9,"Al Frame$",9, 0, isxfld, sxmgmx, 10., stemax, deemax, epsil, stmin);
+  AliMedium(10, "DME-S$",  6, 1, isxfld, sxmgmx, 10., stemax, deemax, epsil, stmin);
+  AliMedium(11, "C-TRD$", 10, 0, isxfld, sxmgmx, 10., stemax, deemax, epsil, stmin);
+  AliMedium(12, "Myl$"  , 11, 0, isxfld, sxmgmx, 10., stemax, deemax, epsil, stmin);
+  AliMedium(13, "Fre$"  , 12, 0, isxfld, sxmgmx, 10., stemax, deemax, epsil, stmin);
+  AliMedium(14, "Fre-S$", 12, 1, isxfld, sxmgmx, 10., stemax, deemax, epsil, stmin);
+  AliMedium(15, "Glass$", 13, 0, isxfld, sxmgmx, 10., stemax, deemax, epsil, stmin);
+  AliMedium(16, "Water$", 14, 0, isxfld, sxmgmx, 10., stemax, deemax, epsil, stmin);
+  AliMedium(17, "STEEL$", 15, 0, isxfld, sxmgmx, 10., stemax, deemax, epsil, stmin);
 }
 
 //_____________________________________________________________________________
-Int_t AliTOF::DistancetoPrimitive(Int_t , Int_t )
+Int_t AliTOF::DistancetoPrimitive(Int_t , Int_t ) const
 {
   //
   // Returns distance from mouse pointer to detector, default version
   //
   return 9999;
 }
+
+//___________________________________________
+void AliTOF::ResetHits ()
+{
+  // Reset number of clusters and the cluster array for this detector
+  AliDetector::ResetHits ();
+}
+
+//____________________________________________
+void AliTOF::ResetDigits ()
+{
+  //
+  // Reset number of digits and the digits array for this detector
+  AliDetector::ResetDigits ();
+  //
+} 
+//____________________________________________
+void AliTOF::ResetSDigits ()
+{
+  //
+  // Reset number of sdigits and the sdigits array for this detector
+  fNSDigits = 0;
+  //fSDigits = 0x0;
+  //
+} 
 //_____________________________________________________________________________
 void AliTOF::Init()
 {
@@ -385,423 +593,249 @@ void AliTOF::Init()
 }
 
 //____________________________________________________________________________
-void AliTOF::MakeBranch(Option_t* option, char *file)
-//
-// Initializes the Branches of the TOF inside the 
-// trees written for each event. 
-//  AliDetector::MakeBranch initializes just the 
-// Branch inside TreeH. Here we add the branch in 
-// TreeD.
-//
+void AliTOF::MakeBranch(Option_t* option)
 {
-
-  AliDetector::MakeBranch(option,file);
+ //
+ // Initializes the Branches of the TOF inside the 
+ // trees written for each event. 
+ // AliDetector::MakeBranch initializes just the 
+ // Branch inside TreeH. Here we add the branches in 
+ // TreeD, TreeS and TreeR.
+ //
+  const char *oH = strstr(option,"H");
+  if (fLoader->TreeH() && oH)
+   {
+     if (fHits == 0x0)
+      {
+        if (fTZero) fHits   = new TClonesArray("AliTOFhitT0", 1000);
+        else fHits   = new TClonesArray("AliTOFhit", 1000);
+      }
+   }
+  
+  AliDetector::MakeBranch(option);
 
   Int_t buffersize = 4000;
   Char_t branchname[10];
   sprintf(branchname,"%s",GetName());
   
-  const char *D = strstr(option,"D");
+  const char *oD = strstr(option,"D");
+  const char *oS = strstr(option,"S");
+  const char *oR = strstr(option,"R");
+
+  if (fLoader->TreeD() && oD){
+    if (fDigits == 0x0) fDigits = new TClonesArray("AliTOFdigit",  1000); 
+    MakeBranchInTree(fLoader->TreeD(), branchname, &fDigits,buffersize, 0) ;
+  }
 
-  if (fDigits && gAlice->TreeD() && D){
-     gAlice->MakeBranchInTree(gAlice->TreeD(), 
-                              branchname, &fDigits,buffersize, file) ;
+  if (fLoader->TreeS() && oS){
+    if (fSDigits == 0x0) fSDigits = new TClonesArray("AliTOFSDigit",  1000);
+    MakeBranchInTree(fLoader->TreeS(), branchname, &fSDigits,buffersize, 0) ;
   }
+
+  if (fReconParticles && fLoader->TreeR() && oR){
+    MakeBranchInTree(fLoader->TreeR(), branchname, &fReconParticles,buffersize, 0) ;
+  }
+}
+
+//____________________________________________________________________________
+void AliTOF::Makehits(Bool_t hits) 
+{
+// default argument used, see AliTOF.h
+// Enable/Disable the writing of the TOF-hits branch 
+// on TreeH
+// by default : enabled for TOFv1, v2, v3, v4
+//              disabled for TOFv0
+// 
+   if (hits &&  (IsVersion()!=0))
+      fIdSens = gMC->VolId("FPAD");
+   else
+      cout << "Option for writing the TOF-hits branch on TreeH: disabled" << endl;
 }
 
 //____________________________________________________________________________
 void AliTOF::FinishEvent()
 {
-//  Hits2Digits();
+// do nothing
 }
 
 //___________________________________________
 void AliTOF::SDigits2Digits()
 {
 //
-// Genneratedigits
+// Generate digits performing merging
 //
+  /*
     int nparticles = gAlice->GetNtrack();
     cout << "Particles       :" <<nparticles<<endl;
     if (nparticles > 0 ) {
-      Hits2Digits(0);
+      
+      AliTOF::Hits2Digits();
+      
     }
+  */
+  cout<<"AliTOF::SDigits2Digits"<<endl; 
+    if (fMerger) {
+      fMerger->Init();
+      cout<<"AliTOF::SDigits2Digits Init"<<endl; 
+      fMerger->Digitise();
+      cout<<"AliTOF::SDigits2Digits Digitise() "<<endl; 
+     }
 }
 
-//____________________________________________________________________________
-void AliTOF::Hits2Digits(Int_t evNumber)
-//
-//  Starting from the Hits Tree (TreeH), this
-// function writes the Digits Tree (TreeD) storing 
-// the digits informations.
-// Has to be called just at the end of an event or 
-// at the end of a whole run.
-//  It could  also be called by AliTOF::Finish Event()
-// but it can be too heavy.
-// Just for MC events. 
-//
-// Called by the macro H2D.C
-//
+//---------------------------------------------------------------------
+void   AliTOF::SetMerger(AliTOFMerger* merger)
 {
-  AliTOFhit* currentHit;
-  TTree    *TD, *TH;
-  Int_t    tracks[3];
-  Int_t    vol[5];
-  Float_t  digit[2];
-  TClonesArray* TOFhits=this->Hits();
-
-  Int_t nparticles =  gAlice->GetNtrack();
-  if (nparticles <= 0) return;
+// Set pointer to merger
+    fMerger = merger;
+}
 
-  TD = gAlice->TreeD();
-  TH = gAlice->TreeH();
-  Int_t    ntracks =(Int_t) TH->GetEntries();
-  Int_t    nbytes, nhits;
-  TRandom *rnd = new TRandom();
+//---------------------------------------------------------------------
+AliTOFMerger*  AliTOF::Merger()
+{
+// Return pointer to merger
+    return fMerger;
+}
 
-  for (Int_t ntk=0; ntk<ntracks; ntk++){
+//---------------------------------------------------------------------
+void AliTOF::Hits2SDigits()
+{
+//
+// Use the TOF SDigitizer to make TOF SDigits
+//
 
-     nbytes = TH->GetEvent(ntk);
-     nhits  = TOFhits->GetEntriesFast();
+//  cout<<"AliTOF::Hits2SDigits> start...\n";
+  
+  AliRunLoader * rl = fLoader->GetRunLoader();
+  AliTOFSDigitizer sd((rl->GetFileName()).Data());
+  if (GetDebug()) sd.Print("");
 
-     for (Int_t hit=0; hit<nhits; hit++){
+  sd.Exec("") ;
 
-        currentHit = (AliTOFhit*)(TOFhits->At(hit));
+}
 
-        vol[0] = currentHit->GetSector();
-        vol[1] = currentHit->GetPlate();
-        vol[2] = currentHit->GetPad_x();
-        vol[3] = currentHit->GetPad_z();
-        vol[4] = currentHit->GetStrip();
+//---------------------------------------------------------------------
+void AliTOF::Hits2SDigits(Int_t evNumber1, Int_t evNumber2)
+{
+//
+// Use the TOF SDigitizer to make TOF SDigits
+//
 
-        Float_t IdealTime = currentHit->GetTof();
-        Float_t TDCTime   = rnd->Gaus(IdealTime, fTimeRes);    
-        digit[0] = TDCTime;
+  if ((evNumber2-evNumber1)==1) 
+      cout << "<AliTOF::Hits2SDigits>: I am making sdigits for the " << evNumber1 << "th event \n";
+  else if ((evNumber2-evNumber1)>1)
+      cout << "<AliTOF::Hits2SDigits>: I am making sdigits for the events from the " 
+           << evNumber1 << "th to the " << evNumber2-1 << "th \n";
+  AliRunLoader * rl = fLoader->GetRunLoader();
+  AliTOFSDigitizer sd((rl->GetFileName()).Data(),evNumber1,evNumber2) ;
+  if (GetDebug()) sd.Print("");
 
-        Float_t IdealCharge = currentHit->GetEdep();
-        Float_t ADCcharge = rnd->Gaus(IdealCharge, fChrgRes);
-        digit[1] = ADCcharge;
+  sd.Exec("") ;
 
-        Int_t Track = currentHit -> GetTrack();
-        tracks[0] = Track;
-       tracks[1] = 0;
-       tracks[2] = 0;
+}
 
-        Bool_t Overlap = CheckOverlap(vol, digit, Track);
-        if(!Overlap) AddDigit(tracks, vol, digit);
-     }
-  }
-  TD->Fill();
-  TD->Write();  
+//___________________________________________________________________________
+AliDigitizer* AliTOF::CreateDigitizer(AliRunDigitizer* manager) const
+{
+  return new AliTOFDigitizer(manager);
 }
 
 //___________________________________________________________________________
 Bool_t AliTOF::CheckOverlap(Int_t* vol, Float_t* digit,Int_t Track)
+{
 //
 // Checks if 2 or more hits belong to the same pad.
 // In this case the data assigned to the digit object
 // are the ones of the first hit in order of Time.
+// 2 hits from the same track on the same pad are collected.
+// Called only by Hits2SDigits.
+// This procedure has to be optimized in the next TOF release.
 //
-// Called only by Hits2Digits.
-//
-{
-        Bool_t Overlap = 0;
+
+        Bool_t overlap = kFALSE;
         Int_t  vol2[5];
 
-        for (Int_t ndig=0; ndig<fNdigits; ndig++){
-          AliTOFdigit* currentDigit = (AliTOFdigit*)(fDigits->UncheckedAt(ndig));
+        for (Int_t ndig=0; ndig<fSDigits->GetEntries(); ndig++){
+          AliTOFdigit* currentDigit = (AliTOFdigit*)(fSDigits->UncheckedAt(ndig));
            currentDigit->GetLocation(vol2);
-           Bool_t Idem=1;
+           Bool_t idem= kTRUE;
+          // check on digit volume
            for (Int_t i=0;i<=4;i++){
-               if (vol[i]!=vol2[i]) Idem=0;}
-           if (Idem){
-             Float_t TDC2 = digit[0];
-              Float_t TDC1 = currentDigit->GetTdc();
-              if (TDC1>TDC2){
-                  currentDigit->SetTdc(TDC2); 
-                  currentDigit->SetAdc(digit[1]);
-              }
-              currentDigit->AddTrack(Track);
-              Overlap = 1;
-           }
-        }
-        return Overlap;
+              if (!idem) break;
+               if (vol[i]!=vol2[i]) idem=kFALSE;}
+
+           if (idem){  // same pad fired
+             Float_t tdc2 = digit[0];
+              Float_t tdc1 = currentDigit->GetTdc();
+
+             // we separate two digits on the same pad if
+             // they are separated in time by at least 25 ns
+             // remember that tdc time is given in ps
+
+              if (TMath::Abs(tdc1-tdc2)<25000){
+                 // in case of overlap we take the earliest
+                 if (tdc1>tdc2){
+                   currentDigit->SetTdc(tdc2); 
+                   currentDigit->SetAdc(digit[1]);
+                 }
+                 else {
+                  currentDigit->SetTdc(tdc1);
+                  currentDigit->SetAdc(digit[1]);
+                 }
+                  currentDigit->AddTrack(Track); // add track number in the track array
+                  overlap = kTRUE;
+                 return overlap;
+              } else 
+               overlap= kFALSE;
+
+           } // close if (idem) -> two digits on the same TOF pad
+
+        } // end loop on existing sdigits
+
+        return overlap;
 }
 
 
 //____________________________________________________________________________
-void AliTOF::Digits2Raw(Int_t evNumber)
-//
-// Starting from digits, writes the 
-// Raw Data objects, i.e. a 
-// TClonesArray of 18 AliTOFRawSector objects
-//
-
+void AliTOF::Digits2Raw()
 {
-  TTree* TD;
-
-  Int_t nparticles = gAlice->GetEvent(evNumber); 
-  if (nparticles <= 0) return;
-
-  TD = gAlice->TreeD();
-  
-  TClonesArray* TOFdigits = this->Digits();
-  Int_t ndigits = TOFdigits->GetEntriesFast();
-
-  TClonesArray* Raw = new TClonesArray("AliTOFRawSector",fNTof+2); 
-
-  for (Int_t isect=1;isect<=fNTof;isect++){
-     AliTOFRawSector* currentSector = (AliTOFRawSector*)Raw->UncheckedAt(isect);
-     TClonesArray* RocData = (TClonesArray*)currentSector->GetRocData();
-
-     for (Int_t digit=0; digit<ndigits; digit++){
-        AliTOFdigit* currentDigit = (AliTOFdigit*)TOFdigits->UncheckedAt(digit);
-        Int_t sector = currentDigit->GetSector();
-        if (sector==isect){
-           Int_t   Pad    = currentDigit -> GetTotPad();
-           Int_t   Roc    = (Int_t)(Pad/fNPadXRoc)-1;
-           if (Roc>=fNRoc) printf("Wrong n. of ROC ! Roc = %i",Roc);
-            Int_t   PadRoc = (Int_t) Pad%fNPadXRoc;
-           Int_t   Fec    = (Int_t)(PadRoc/fNFec)-1;
-            Int_t   Tdc    = (Int_t)(PadRoc%fNFec)-1;
-            Float_t Time   = currentDigit->GetTdc();
-            Float_t Charge = currentDigit->GetAdc();
-           AliTOFRoc* currentROC = (AliTOFRoc*)RocData->UncheckedAt(Roc);
-           Int_t Error    = 0;
-            currentROC->AddItem(Fec, Tdc, Error, Charge, Time);
-       }
-     }
-     
-     UInt_t TotSize=16,RocSize=0;
-     UInt_t RocHead[14],RocChek[14];
-     UInt_t GlobalCheckSum=0;
-
-     for (UInt_t iRoc = 1; iRoc<(UInt_t)fNRoc; iRoc++){
-        AliTOFRoc* currentRoc = (AliTOFRoc*)RocData->UncheckedAt(iRoc); 
-       RocSize  = currentRoc->Items*2+1;
-       TotSize += RocSize*4;
-       if (RocSize>=TMath::Power(2,16)) RocSize=0;
-       RocHead[iRoc]   = iRoc<<28;
-       RocHead[iRoc]  += RocSize;
-       RocChek[iRoc]   = currentRoc->GetCheckSum();
-        Int_t HeadCheck = currentRoc->BitCount(RocHead[iRoc]);
-       GlobalCheckSum += HeadCheck;
-       GlobalCheckSum += RocChek[iRoc];
-     }
-     
-     AliTOFRoc* DummyRoc = new AliTOFRoc();
-     TotSize *= 4;
-     if (TotSize>=TMath::Power(2,24)) TotSize=0;
-     UInt_t Header = TotSize;
-     UInt_t SectId = ((UInt_t)isect)<<24;
-     Header += SectId;
-     GlobalCheckSum += DummyRoc->BitCount(Header);
-     currentSector->SetGlobalCS(GlobalCheckSum);
-     currentSector->SetHeader(Header);
-  }  
-}
-//____________________________________________________________________________
-void AliTOF::Raw2Digits(Int_t evNumber)
 //
-//  Converts Raw Data objects into digits objects.
-//  We schematize the raw data with a 
-//  TClonesArray of 18 AliTOFRawSector objects
+// Starting from the TOF digits, writes the Raw Data objects
 //
-{
-  TTree    *TD;
-  Int_t    vol[5];
-  Int_t    tracks[3];
-  Float_t  digit[2];
-  tracks[0]=0;
-  tracks[1]=0;
-  tracks[2]=0;
-  Int_t nparticles = gAlice->GetEvent(evNumber); 
-  if (nparticles <= 0) return;
 
-  TD = gAlice->TreeD();
+  fLoader->LoadDigits();
+
+  TTree* digits = fLoader->TreeD();
+  if (!digits) {
+    Error("Digits2Raw", "no digits tree");
+    return;
+  }
   
-  TClonesArray* Raw = new TClonesArray("AliTOFRawSector",fNTof+2);
+  AliTOFDDLRawData rawWriter;
+  rawWriter.SetVerbose(0);
   
-  for(Int_t nSec=1; nSec<=fNTof; nSec++){
-     AliTOFRawSector* currentSector = (AliTOFRawSector*)Raw->UncheckedAt(nSec);
-     TClonesArray* RocData = (TClonesArray*)currentSector->GetRocData();
-     for(Int_t nRoc=1; nRoc<=14; nRoc++){
-        AliTOFRoc* currentRoc = (AliTOFRoc*)RocData->UncheckedAt(nRoc);
-        Int_t currentItems = currentRoc->GetItems();
-        for(Int_t item=1; item<currentItems; item++){ 
-           Int_t nPad = currentRoc->GetTotPad(item);        
-          vol[0] = nSec;
-          Int_t nStrip = (Int_t)(nPad/fPadXStr)+1;
-          Int_t nPlate = 5;
-          if (nStrip<=fNStripC+2*fNStripB+fNStripA) nPlate = 4;
-          if (nStrip<=fNStripC+fNStripB+fNStripA)   nPlate = 3;
-          if (nStrip<=fNStripC+fNStripB)            nPlate = 2;
-          if (nStrip<=fNStripC)                     nPlate=1;
-          vol[1] = nPlate;
-          switch (nPlate){
-          case 1: break;
-          case 2: nStrip -= (fNStripC);
-                  break;
-          case 3: nStrip -= (fNStripC+fNStripB);
-                  break;
-          case 4: nStrip -= (fNStripC+fNStripB+fNStripA);
-                  break;
-          case 5: nStrip -= (fNStripC+2*fNStripB+fNStripA);
-                  break;
-          }
-           vol[2] = nStrip;
-           Int_t Pad = nPad%fPadXStr;
-          if (Pad==0) Pad=fPadXStr;
-          Int_t nPadX=0, nPadZ=0;
-          (Pad>fNpadX)? nPadX -= fNpadX : nPadX = Pad ;
-          vol[3] = nPadX;
-          (Pad>fNpadX)? nPadZ = 2 : nPadZ = 1 ;
-          vol[4] = nPadZ;
-          UInt_t error=0;
-          Float_t TDC = currentRoc->GetTime(item,error);
-          if (!error) digit[0]=TDC;
-          digit[1] = currentRoc->GetCharge(item);
-          AddDigit(tracks,vol,digit);
-        }
-     }
-  }
-  TD->Fill();
-  TD->Write();
-} 
-
-
-/******************************************************************************/
-
-ClassImp(AliTOFhit)
-//______________________________________________________________________________
-AliTOFhit::AliTOFhit(Int_t shunt, Int_t track, Int_t *vol,
-                     Float_t *hits)
-:AliHit(shunt, track)
-//
-// Constructor of hit object
-//
-{
-  //
-  // Store a TOF hit
-  // _______________
-  //
-  // Hit Volume
-  // 
-  fSector= vol[0];
-  fPlate = vol[1];
-  fStrip = vol[2];
-  fPad_x = vol[3];
-  fPad_z = vol[4];
-  //
-  //Position
-  fX = hits[0];
-  fY = hits[1];
-  fZ = hits[2];
-  //
-  // Momentum
-  fPx  = hits[3];
-  fPy  = hits[4];
-  fPz  = hits[5];
-  fPmom= hits[6];
-  //
-  // Time Of Flight
-  fTof = hits[7];   //TOF[s]
-  //
-  // Other Data
-  fDx  = hits[8];   //Distance from the edge along x axis
-  fDy  = hits[9];   //Y cohordinate of the hit
-  fDz  = hits[10];  //Distance from the edge along z axis
-  fIncA= hits[11];  //Incidence angle
-  fEdep= hits[12];  //Energy loss in TOF pad
-}
-
-//******************************************************************************
-
-ClassImp(AliTOFdigit)
-
-//______________________________________________________________________________
-AliTOFdigit::AliTOFdigit(Int_t *tracks, Int_t *vol,Float_t *digit)
-:AliDigit(tracks)
-//
-// Constructor of digit object
-//
-{
-  fSector = vol[0];
-  fPlate  = vol[1];
-  fStrip  = vol[2];
-  fPad_x  = vol[3];
-  fPad_z  = vol[4];
-  fTdc    = digit[0];
-  fAdc    = digit[1];
-}
+  Info("Digits2Raw", "Formatting raw data for TOF");
+  digits->GetEvent(0);
+  rawWriter.RawDataTOF(digits->GetBranch("TOF"));  
 
-//______________________________________________________________________________
-void AliTOFdigit::GetLocation(Int_t *Loc)
-//
-// Get the cohordinates of the digit
-// in terms of Sector - Plate - Strip - Pad
-//
-{
-   Loc[0]=fSector;
-   Loc[1]=fPlate;
-   Loc[2]=fStrip;
-   Loc[3]=fPad_x;
-   Loc[4]=fPad_z;
+  fLoader->UnloadDigits();
+  
 }
-
-//______________________________________________________________________________
-Int_t AliTOFdigit::GetTotPad()
+////////////////////////////////////////////////////////////////////////
+void AliTOF::RecreateSDigitsArray() {
 //
-// Get the "total" index of the pad inside a Sector
-// starting from the digits data.
+// delete TClonesArray fSDigits and create it again
+//  needed for backward compatability with PPR test production
 //
-{
-  AliTOF* TOF;
-  
-  if(gAlice){
-     TOF =(AliTOF*) gAlice->GetDetector("TOF");
-  }else{
-     printf("AliTOFdigit::GetTotPad - No AliRun object present, exiting");
-     return 0;
-  }
-  
-  Int_t Pad = fPad_x+TOF->fNpadX*(fPad_z-1);
-  Int_t Before=0;
-
-  switch(fPlate){ 
-  case 1: Before = 0;
-          break;
-  case 2: Before = TOF->fNStripC;
-          break;
-  case 3: Before = TOF->fNStripB + TOF->fNStripC;
-          break;
-  case 4: Before = TOF->fNStripA + TOF->fNStripB + TOF->fNStripC;
-          break;
-  case 5: Before = TOF->fNStripA + 2*TOF->fNStripB + TOF->fNStripC;
-          break;
-  }
-  
-  Int_t Strip = fStrip+Before;
-  Int_t PadTot = TOF->fPadXStr*(Strip-1)+Pad;
-  return PadTot;
+  delete fSDigits;
+  fSDigits       = new TClonesArray("AliTOFSDigit",  1000);
 }
-
-//______________________________________________________________________________
-void AliTOFdigit::AddTrack(Int_t track)
+////////////////////////////////////////////////////////////////////////
+void AliTOF::CreateSDigitsArray() {
 //
-// Add a track to the digit 
+// create TClonesArray fSDigits
+//  needed for backward compatability with PPR test production
 //
-{
-  if (fTracks[1]==0){
-     fTracks[1] = track;
-  }else if (fTracks[2]==0){
-     fTracks[2] = track;
-  }else{
-  //   printf("AliTOFdigit::AddTrack ERROR: Too many Tracks (>3) \n");
-  }
+  fSDigits       = new TClonesArray("AliTOFSDigit",  1000);
 }