]> git.uio.no Git - u/mrichter/AliRoot.git/blobdiff - TOF/AliTOF.cxx
New AliTRDcluster constructor
[u/mrichter/AliRoot.git] / TOF / AliTOF.cxx
index e6f0590a21ee437b6dec76f88726cad2d2c1d056..c87e976c992ea3380ed20336deb0d50d18f61780 100644 (file)
  * provided "as is" without express or implied warranty.                  *
  **************************************************************************/
 
-/*
-$Log$
-Revision 1.27  2001/10/02 13:03:13  vicinanz
-Minor improvements on the code
-
-Revision 1.26  2001/09/27 10:39:20  vicinanz
-SDigitizer and Merger added
-
-Revision 1.25  2001/09/07 08:37:40  hristov
-Pointers initialised to 0 in the default constructor
-
-Revision 1.24  2001/09/05 16:31:00  hristov
-The deletion of TOF folders temporarily commented out
-
-Revision 1.23  2001/08/29 12:59:01  vicinanz
-Minor changes to the Digitizer procedure
-
-Revision 1.22  2001/08/28 08:45:58  vicinanz
-TTask and TFolder structures implemented
-
-Revision 1.21  2001/05/16 14:57:24  alibrary
-New files for folders and Stack
-
-Revision 1.20  2001/05/04 10:09:47  vicinanz
-Major upgrades to the strip structure
-
-Revision 1.19  2001/03/12 17:47:25  hristov
-Changes needed on Sun with CC 5.0
-
-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
-
-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
-
-*/
+/* $Id$ */
 
 ///////////////////////////////////////////////////////////////////////////////
 //                                                                           //
@@ -83,77 +21,93 @@ Introduction of the Copyright and cvs Log
 //  This class contains the basic functions for the Time Of Flight           //
 //  detector. Functions specific to one particular geometry are              //
 //  contained in the derived classes                                         //
-//
-//  VERSIONE WITH 5 SYMMETRIC MODULES ALONG Z AXIS
-//  ==============================================
-//  
-//  VERSION WITH HOLES FOR PHOS AND TRD IN SPACEFRAME WITH HOLES
-//
-//  Volume sensibile : FPAD
-//
-//
-//
+//                                                                           //
+//  VERSIONE WITH 5 SYMMETRIC MODULES ALONG Z AXIS                           //
+//  ============================================================             //
+//                                                                           //
+//  VERSION WITH HOLES FOR PHOS AND TRD IN SPACEFRAME WITH HOLES             //
+//                                                                           //
+//  Volume sensibile : FPAD                                                  //
+//                                                                           //
+//                                                                           //
+//                                                                           //
+//                                                                           //
+///////////////////////////////////////////////////////////////////////////////
 // Begin_Html
 /*
 <img src="picts/AliTOFClass.gif">
 */
 //End_Html
-//             
-//
-//                                                                           //
-///////////////////////////////////////////////////////////////////////////////
 
-#include <iostream.h>
-#include <strstream.h>
-#include <fstream.h>
-#include <stdlib.h>
+#include <TClonesArray.h>
+#include <TFile.h>
+#include <TFolder.h>
+#include <TROOT.h>
+#include <TTask.h>
+#include <TTree.h>
+#include <TVirtualMC.h>
+#include <TStopwatch.h>
 
-#include "AliTOF.h"
-#include "AliTOFhit.h"
+#include "AliConst.h"
+#include "AliLoader.h"
+#include "AliLog.h"
+#include "AliMC.h"
+#include "AliRun.h"
+
+#include "AliTOFDDLRawData.h"
+#include "AliTOFDigitizer.h"
 #include "AliTOFdigit.h"
-#include "AliTOFRawSector.h"
-#include "AliTOFRoc.h"
-#include "AliTOFRawDigit.h"
-
-#include "TROOT.h"
-#include "TBRIK.h"
-#include "TNode.h"
-#include "TObject.h"
-#include "TSystem.h"
-#include "TTree.h"
-#include "TFile.h"
-#include "TFolder.h"
-#include "TTask.h"
+#include "AliTOFhitT0.h"
+#include "AliTOFhit.h"
+#include "AliTOFGeometry.h"
+#include "AliTOFSDigitizer.h"
+#include "AliTOFSDigit.h"
+#include "AliTOF.h"
 
-#include "AliRun.h"
-#include "AliMC.h"
-#include "AliMagF.h"
-#include "AliConst.h"
+class AliTOFcluster;
+
+extern TFile *gFile;
+extern TROOT *gROOT;
+extern TVirtualMC *gMC;
+
+extern AliRun *gAlice;
 
  
 ClassImp(AliTOF)
  
 //_____________________________________________________________________________
-AliTOF::AliTOF()
+AliTOF::AliTOF():
+  fFGeom(0x0),
+  fDTask(0x0),
+  fReTask(0x0),
+  fSDigits(0x0),
+  fNSDigits(0),
+  fReconParticles(0x0),
+  fIdSens(-1),
+  fTZero(kFALSE),
+  fTOFGeometry(0x0)
 {
   //
   // Default constructor
   //
-  fFGeom = 0;
-  fDTask = 0;
-  fReTask = 0;
+  fDigits = 0;
   fIshunt   = 0;
-  fSDigits       = 0 ;
-  fDigits        = 0 ;
-  fName="TOF";
-/* fp
-  CreateTOFFolders();
-*/
+  fName = "TOF";
 }
  
 //_____________________________________________________________________________
-AliTOF::AliTOF(const char *name, const char *title)
-       : AliDetector(name,title)
+AliTOF::AliTOF(const char *name, const char *title, Option_t *option)
+       : 
+  AliDetector(name,title),
+  fFGeom(0x0),
+  fDTask(0x0),
+  fReTask(0x0),
+  fSDigits(0x0),
+  fNSDigits(0),
+  fReconParticles(0x0),
+  fIdSens(-1),
+  fTZero(kFALSE),
+  fTOFGeometry(0x0)
 {
   //
   // AliTOF standard constructor
@@ -162,65 +116,100 @@ AliTOF::AliTOF(const char *name, const char *title)
   //
 
   // Initialization of hits, sdigits and digits array
-  //
-  fHits   = new TClonesArray("AliTOFhit",  1000);
-  gAlice->AddHitList(fHits);
+  // added option for time zero analysis
+  //skowron
+  fTOFGeometry = new AliTOFGeometry();
+
+  if (strstr(option,"tzero")){
+    fHits   = new TClonesArray("AliTOFhitT0",  1000);
+    fTZero = kTRUE;
+    //    AliWarning("tzero option requires AliTOFv4T0/AliTOFv5T0 as TOF version (check Your Config.C)");
+  }else{
+    fHits   = new TClonesArray("AliTOFhit",  1000);
+    fTZero = kFALSE;
+  }
+  if (gAlice==0) {
+     AliFatal("gAlice==0 !");
+  }
+
+  AliMC *mcApplication = (AliMC*)gAlice->GetMCApp();
+
+  if (mcApplication->GetHitLists())
+     mcApplication->AddHitList(fHits);
+  else AliError("gAlice->GetHitLists()==0");
+
   fIshunt  = 0;
-  fSDigits       = new TClonesArray("AliTOFdigit",  1000);
-  fDigits        = new TClonesArray("AliTOFdigit",  1000);
+  fSDigits = new TClonesArray("AliTOFSDigit", 1000);
+  fDigits  = new TClonesArray("AliTOFdigit",  1000);
+
   //
   // Digitization parameters
   //
   // (Transfer Functions to be inserted here)
   //
-  SetMarkerColor(7);
-  SetMarkerStyle(2);
-  SetMarkerSize(0.4);
-
-// General Geometrical Parameters
-  fNTof    =  18;  // number of sectors
-  fRmax    = 399.0;//cm 
-  fRmin    = 370.0;//cm
-  fZlenC   = 177.5;//cm length of module C
-  fZlenB   = 141.0;//cm length of module B
-  fZlenA   = 106.0;//cm length of module A
-  fZtof    = 371.5;//cm total semi-length of TOF detector
+  //PH  SetMarkerColor(7);
+  //PH  SetMarkerStyle(2);
+  //PH  SetMarkerSize(0.4);
 
 // 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 = 15; // number of strips in A type module 
-  fNStripB = 19; // number of strips in B type module
-  fNStripC = 20; // number of strips in C type module
-// Physical performances
-  fTimeRes = 100.;//ps
-  fChrgRes = 100.;//pC
-
-// DAQ characteristics
-// cfr. TOF-TDR pag. 105 for Glossary
-// TARODA : TOF-ALICE Read Out and Data Acquisition system
-  fPadXSector = 8928; // number of pad per sector -with no holes-
-                      // ((15+2*19+2*20)*(48*2))
-  fNRoc       = 14;   // number of Roc (Read Out Controller) (TARODA)
-  fNFec       = 32;   // number of Fec (Front-End electronic Card)
-                      // (TARODA)
-  fNTdc       = 32;   // number of Tdc (Time to Digital Converter)
-  fNPadXRoc   = (Int_t)fPadXSector/fNRoc; // number of pads for each ROC
-  /* fp 25 Sept 2001
-  // Create TOF Folder Structure
-  CreateTOFFolders();
-  */ 
+  //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::SetTOFSectors(Int_t *sectors)
+{
+  // Setter for partial/full TOF configuration
+
+  for(Int_t isec=0;isec<18;isec++){
+    fTOFSectors[isec]=sectors[isec];
+  }
+}
+//____________________________________________________________________________
+void AliTOF::GetTOFSectors(Int_t *sectors) const
+{
+  // Getter for partial/full TOF configuration
+
+  for(Int_t isec=0;isec<18;isec++){
+    sectors[isec]=fTOFSectors[isec];
+  }
+}
+//_____________________________________________________________________________
+AliTOF::AliTOF(const AliTOF &source)
+  :AliDetector(),
+  fFGeom(0x0),
+  fDTask(0x0),
+  fReTask(0x0),
+  fSDigits(0x0),
+  fNSDigits(0),
+  fReconParticles(0x0),
+  fIdSens(-1),
+  fTZero(kFALSE),
+  fTOFGeometry(0x0)
+{
+  // copy constructor
+
+  this->fReconParticles=source.fReconParticles;
+  this->fSDigits=source.fSDigits;
+  this->fTOFGeometry=source.fTOFGeometry;
+
+}
+
+//_____________________________________________________________________________
+AliTOF& AliTOF::operator=(const AliTOF &source)
+{
+  // ass. op.
+
+  this->fReconParticles=source.fReconParticles;
+  this->fSDigits=source.fSDigits;
+  this->fTOFGeometry=source.fTOFGeometry;
+  return *this;
+
 }
 
 //_____________________________________________________________________________
@@ -262,7 +251,7 @@ void AliTOF::CreateTOFFolders()
   fReTask = new TTask(GetName(), tempo);
   aliceRe->Add(fReTask) ;
 
-  delete tempo ;
+  delete [] tempo ;
  
   // creates the TOF geometry  folder
   geomF->AddFolder("TOF", "Geometry for TOF") ;
@@ -293,10 +282,11 @@ AliTOF::~AliTOF()
     }
   if (fSDigits)
     {
-      fSDigits->Delete ();
+      fSDigits->Delete();
       delete fSDigits;
       fSDigits = 0;
     }
+
   if (fReconParticles)
     {
       fReconParticles->Delete ();
@@ -316,9 +306,20 @@ void AliTOF::AddHit(Int_t track, Int_t *vol, Float_t *hits)
   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)
+void AliTOF::AddDigit(Int_t *tracks, Int_t *vol, Int_t *digits)
 {
   //
   // Add a TOF digit
@@ -328,8 +329,8 @@ void AliTOF::AddDigit(Int_t *tracks, Int_t *vol, Float_t *digits)
   new (ldigits[fNdigits++]) AliTOFdigit(tracks, vol, digits);
 }
 
-//___________________________________________
-void AliTOF::AddSDigit(Int_t *tracks, Int_t *vol, Float_t *digits)
+//_____________________________________________________________________________
+void AliTOF::AddSDigit(Int_t tracknum, Int_t *vol, Int_t *digits)
 {
      
 //
@@ -337,45 +338,55 @@ void AliTOF::AddSDigit(Int_t *tracks, Int_t *vol, Float_t *digits)
 //
         
   TClonesArray &lSDigits = *fSDigits;   
-  new(lSDigits[fNSDigits++]) AliTOFdigit(tracks, vol, digits);
+  new(lSDigits[fNSDigits++]) AliTOFSDigit(tracknum, vol, digits);
 }
 
 //_____________________________________________________________________________
 void AliTOF::SetTreeAddress ()
 {
   // Set branch address for the Hits and Digits Tree.
-  char branchname[30];
+  
+  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 = gAlice->TreeD ();
-
 
-  if (treeD)
+  if (fLoader->TreeS () )
     {
-      if (fDigits)
-       {
-         branch = treeD->GetBranch (branchname);
-         if (branch)
-           branch->SetAddress (&fDigits);
-       }
-
+      branch = fLoader->TreeS ()->GetBranch ("TOF");
+      if (branch) {
+        if (fSDigits == 0x0) fSDigits = new TClonesArray("AliTOFSDigit",  1000);
+        branch->SetAddress (&fSDigits);
+      }
     }
-  if (fSDigits)
-    //  fSDigits->Clear ();
 
-  if (gAlice->TreeS () && fSDigits)
+  if (fLoader->TreeR() ) 
     {
-      branch = gAlice->TreeS ()->GetBranch ("TOF");
-      if (branch)
-       branch->SetAddress (&fSDigits);
+      branch = fLoader->TreeR()->GetBranch("TOF"); 
+      if (branch) 
+       {
+        if (fReconParticles == 0x0) fReconParticles = new TClonesArray("AliTOFcluster",  1000);
+         branch->SetAddress(&fReconParticles);
+       }
     }
 
-  if (gAlice->TreeR() && fReconParticles) 
+  /*
+  if (fLoader->TreeR() && fReconParticles) //I do not know where this array is created - skowron
     {
-      branch = gAlice->TreeR()->GetBranch("TOF"); 
-      if (branch) branch->SetAddress(&fReconParticles) ;
-    }   
+      branch = fLoader->TreeR()->GetBranch("TOF"); 
+      if (branch) 
+       {
+         branch->SetAddress(&fReconParticles) ;
+       }
+    }
+  */
 }
 
 //_____________________________________________________________________________
@@ -390,20 +401,39 @@ void AliTOF::CreateGeometry()
   */
   //End_Html
   //
-  const Double_t kPi=TMath::Pi();
-  const Double_t kDegrad=kPi/180.;
-  //
-  Float_t xTof, yTof, wall;
 
-  // frame inbetween TOF modules
-  wall = 4.;//cm
+  Float_t xTof, yTof;
 
-  // Sizes of TOF module with its support etc..
-  xTof = 2.*(fRmin*TMath::Tan(10*kDegrad)-wall/2-.5);
-  yTof = fRmax-fRmin;
+  if (IsVersion()==8) {
+
+    xTof = 124.5;//fTOFGeometry->StripLength()+2.*(0.3+0.03); // cm,  x-dimension of FTOA volume
+    yTof = fTOFGeometry->Rmax()-fTOFGeometry->Rmin(); // cm,  y-dimension of FTOA volume
+    Float_t zTof = fTOFGeometry->ZlenA();             // cm,  z-dimension of FTOA volume
+    
+    //  TOF module internal definitions
+    TOFpc(xTof, yTof, zTof);
+
+  } else if (IsVersion()==7) {
+
+    xTof = 124.5;//fTOFGeometry->StripLength()+2.*(0.3+0.03); // cm,  x-dimension of FTOA volume
+    yTof = fTOFGeometry->Rmax()-fTOFGeometry->Rmin(); // cm,  y-dimension of FTOA volume
+    Float_t zTof = fTOFGeometry->ZlenA();             // cm,  z-dimension of FTOA volume
+    
+    //  TOF module internal definitions
+    TOFpc(xTof, yTof, zTof, fTOFGeometry->ZlenB());
+
+  } else {
+
+    Float_t wall = 4.;//cm // frame inbetween TOF modules
+
+    // Sizes of TOF module with its support etc..
+    xTof = 2.*(fTOFGeometry->Rmin()*TMath::Tan(10.*kDegrad)-wall/2.-0.5);
+    yTof = fTOFGeometry->Rmax()-fTOFGeometry->Rmin();
+
+    //  TOF module internal definitions 
+    TOFpc(xTof, yTof, fTOFGeometry->ZlenC(), fTOFGeometry->ZlenB(), fTOFGeometry->ZlenA(), fTOFGeometry->MaxhZtof());
+  }
 
-//  TOF module internal definitions 
-  TOFpc(xTof, yTof, fZlenC, fZlenB, fZlenA, fZtof);
 }
 
 //_____________________________________________________________________________
@@ -413,7 +443,7 @@ void AliTOF::DrawModule() const
   // Draw a shaded view of the common part of the TOF geometry
   //
 
-   cout << " Drawing of AliTOF"<< endl
+  AliInfo(" Drawing of AliTOF")
   // Set everything unseen
   gMC->Gsatt("*", "seen", -1);
   // 
@@ -442,139 +472,7 @@ void AliTOF::DrawModule() const
 }
 
 //_____________________________________________________________________________
-void AliTOF::CreateMaterials()
-{
-  //
-  // Defines TOF materials for all versions
-  // Authors :   Maxim Martemianov, Boris Zagreev (ITEP) 
-  //            18/09/98 
-  // Revision: F. Pierella 5-3-2001
-  // Bologna University
-  //
-  Int_t   isxfld = gAlice->Field()->Integ();
-  Float_t sxmgmx = gAlice->Field()->Max();
-  //
-  //--- Quartz (SiO2) 
-  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;
-  Int_t nq = -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.};
-  Float_t wc[2]   = { 1., 2.};
-  Float_t dc = .001977;
-  Int_t nc = -2;
-   // For mylar (C5H4O2) 
-  Float_t amy[3] = { 12., 1., 16. };
-  Float_t zmy[3] = {  6., 1.,  8. };
-  Float_t wmy[3] = {  5., 4.,  2. };
-  Float_t dmy    = 1.39;
-  Int_t nmy = -3;
- // For polyethilene (CH2) - honeycomb -
-  Float_t ape[2] = { 12., 1. };
-  Float_t zpe[2] = {  6., 1. };
-  Float_t wpe[2] = {  1., 2. };
-  Float_t dpe    = 0.935*0.479; //To have 1%X0 for 1cm as for honeycomb
-  Int_t npe = -2;
-  // --- G10 
-  Float_t ag10[4] = { 12.,1.,16.,28. };
-  Float_t zg10[4] = {  6.,1., 8.,14. };
-  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;
-  // ---- ALUMINA (AL203) 
-  Float_t aal[2] = { 27.,16.};
-  Float_t zal[2] = { 13., 8.};
-  Float_t wmatal[2] = { 2.,3. };
-  Float_t densal  = 2.3;
-  Int_t nlmatal = -2;
-  // -- Water
-  Float_t awa[2] = {  1., 16. };
-  Float_t zwa[2] = {  1.,  8. };
-  Float_t wwa[2] = {  2.,  1. };
-  Float_t dwa    = 1.0;
-  Int_t nwa = -2;
-  //
-  //AliMaterial(0, "Vacuum$", 1e-16, 1e-16, 1e-16, 1e16, 1e16);
-  AliMaterial( 1, "Air$",14.61,7.3,0.001205,30423.24,67500.);
-  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 ( 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 (14, "Water$",  awa, zwa, dwa, nwa, wwa);
-
-  Float_t epsil, stmin, deemax, stemax;
-  //   Previous data
-  //       EPSIL  =  0.1   ! Tracking precision, 
-  //       STEMAX = 0.1      ! Maximum displacement for multiple scattering
-  //       DEEMAX = 0.1    ! Maximum fractional energy loss, DLS 
-  //       STMIN  = 0.1 
-  //
-  //   New data  
-  epsil  = .001;  // Tracking precision,
-  stemax = -1.;   // Maximum displacement for multiple scattering
-  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);
-}
-
-//_____________________________________________________________________________
-Int_t AliTOF::DistancetoPrimitive(Int_t , Int_t ) const
+Int_t AliTOF::DistancetoPrimitive(Int_t , Int_t )
 {
   //
   // Returns distance from mouse pointer to detector, default version
@@ -597,6 +495,15 @@ void AliTOF::ResetDigits ()
   AliDetector::ResetDigits ();
   //
 } 
+//____________________________________________
+void AliTOF::ResetSDigits ()
+{
+  //
+  // Reset number of sdigits and the sdigits array for this detector
+  fNSDigits = 0;
+  //fSDigits = 0x0;
+  //
+} 
 //_____________________________________________________________________________
 void AliTOF::Init()
 {
@@ -605,11 +512,18 @@ void AliTOF::Init()
   //
   // Set id of TOF sensitive volume
   if (IsVersion() !=0) fIdSens=gMC->VolId("FPAD");
-  //
+
+  /*
+  // Save the geometry
+  TDirectory* saveDir = gDirectory;
+  gAlice->GetRunLoader()->CdGAFile();
+  fTOFGeometry->Write("TOFGeometry");
+  saveDir->cd();
+  */
 }
 
 //____________________________________________________________________________
-void AliTOF::MakeBranch(Option_t* option, const char *file)
+void AliTOF::MakeBranch(Option_t* option)
 {
  //
  // Initializes the Branches of the TOF inside the 
@@ -618,7 +532,17 @@ void AliTOF::MakeBranch(Option_t* option, const char *file)
  // Branch inside TreeH. Here we add the branches in 
  // TreeD, TreeS and TreeR.
  //
-  AliDetector::MakeBranch(option,file);
+  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];
@@ -628,39 +552,26 @@ void AliTOF::MakeBranch(Option_t* option, const char *file)
   const char *oS = strstr(option,"S");
   const char *oR = strstr(option,"R");
 
-  if (oD)
-  //
-  // one branch for TOF digits
-  // 
-
-
-  if (fDigits && gAlice->TreeD() && oD){
-             MakeBranchInTree(gAlice->TreeD(), 
-                              branchname, &fDigits,buffersize, file) ;
+  if (fLoader->TreeD() && oD){
+    if (fDigits == 0x0) fDigits = new TClonesArray("AliTOFdigit",  1000); 
+    MakeBranchInTree(fLoader->TreeD(), branchname, &fDigits,buffersize, 0) ;
   }
 
-  if (oS)
-  //
-  // one branch for TOF sdigits
-  //
-
-
-  if (fSDigits && gAlice->TreeS() && oS){
-             MakeBranchInTree(gAlice->TreeS(),
-                              branchname, &fSDigits,buffersize, file) ;
+  if (fLoader->TreeS() && oS){
+    if (fSDigits == 0x0) fSDigits = new TClonesArray("AliTOFSDigit",  1000);
+    MakeBranchInTree(fLoader->TreeS(), branchname, &fSDigits,buffersize, 0) ;
   }
 
-  if (oR)
-  //
-  // one branch for TOF reconstructed particles
-  //
-
-
-  if (fReconParticles && gAlice->TreeR() && oR){
-             MakeBranchInTree(gAlice->TreeR(),
-                              branchname, &fReconParticles,buffersize, file) ;
+  if (fLoader->TreeR() && oR){
+    if (fReconParticles == 0x0) fReconParticles = new TClonesArray("AliTOFcluster",  1000);
+    MakeBranchInTree(fLoader->TreeR(), branchname, &fReconParticles,buffersize, 0) ;
   }
 
+  /*
+  if (fReconParticles && fLoader->TreeR() && oR){
+    MakeBranchInTree(fLoader->TreeR(), branchname, &fReconParticles,buffersize, 0) ;
+  }
+  */
 }
 
 //____________________________________________________________________________
@@ -669,13 +580,13 @@ 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
+// by default :  enabled for TOFv1, v2, v3, v4, v5
 //              disabled for TOFv0
 // 
    if (hits &&  (IsVersion()!=0))
       fIdSens = gMC->VolId("FPAD");
    else
-      cout << "Option for writing the TOF-hits branch on TreeH: disabled" << endl;
+      AliInfo("Option for writing the TOF-hits branch on TreeH: disabled");
 }
 
 //____________________________________________________________________________
@@ -684,181 +595,51 @@ void AliTOF::FinishEvent()
 // do nothing
 }
 
-//___________________________________________
-void AliTOF::SDigits2Digits()
+//____________________________________________________________________________
+void AliTOF::Hits2SDigits()
 {
 //
-// Generate digits performing merging
+// Use the TOF SDigitizer to make TOF SDigits
 //
-  /*
-    int nparticles = gAlice->GetNtrack();
-    cout << "Particles       :" <<nparticles<<endl;
-    if (nparticles > 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::SetMerger(AliTOFMerger* merger)
-{
-// Set pointer to merger
-    fMerger = merger;
-}
+//  AliInfo("Start...");
+  
+  AliRunLoader * rl = fLoader->GetRunLoader();
+  AliTOFSDigitizer sd((rl->GetFileName()).Data());
+  ToAliDebug(1, sd.Print(""));
+
+  sd.Exec("") ;
 
-//---------------------------------------------------------------------
-AliTOFMerger*  AliTOF::Merger()
-{
-// Return pointer to merger
-    return fMerger;
 }
 
 //____________________________________________________________________________
-void AliTOF::TOFHits2SDigits()
+void AliTOF::Hits2SDigits(Int_t evNumber1, Int_t evNumber2)
 {
 //
-// Starting from the Hits Tree (TreeH), this
-// function writes the TOF SDigits Branch in the TreeS storing 
-// the digits informations.
-// It 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()
-// Just for MC events. 
-//
-// Called by the ROOT script Hits2SDigits.C
+// Use the TOF SDigitizer to make TOF SDigits
 //
-// Simulation of detector response.
-
-   Int_t ver = this->IsVersion();
-   if(ver==0) return; // no sdigits for AliTOFv0
 
-  AliTOF *TOF = (AliTOF *) gAlice->GetDetector ("TOF");
-
-  if (fNevents == 0)
-    fNevents = (Int_t) gAlice->TreeE ()->GetEntries ();
-
-       cout << "nevents found on file " << fNevents << endl;
-      // Start Event ------------------------- LOOP
+  if ((evNumber2-evNumber1)==1) 
+    AliDebug(1, Form("I am making sdigits for the %dth event", evNumber1));
+  if ((evNumber2-evNumber1)>1)
+    AliDebug(1, Form("I am making sdigits for the events from the %dth to the %dth", evNumber1, evNumber2-1));
+  AliRunLoader * rl = fLoader->GetRunLoader();
+  AliTOFSDigitizer sd((rl->GetFileName()).Data(),evNumber1,evNumber2) ;
+  ToAliDebug(1, sd.Print(""));
 
-  for (Int_t ievent = 0; ievent < fNevents; ievent++)
-    {
-      gAlice->GetEvent (ievent);
-      if (gAlice->TreeH () == 0)
-       return; // no hits stored 
-      if (gAlice->TreeS () == 0)
-       gAlice->MakeTree ("S");
-
-
-      Int_t nSdigits = 0;
-      
-            //Make branches
-      char branchname[20];
-       sprintf (branchname, "%s", TOF->GetName ());
-      //Make branch for TOF sdigits
-      TOF->MakeBranch ("S");
-
-      Int_t    tracks[3];    // track info
-      Int_t    vol[5];       // location for a digit
-      Float_t  digit[2];     // TOF digit variables
-      Int_t hit, nbytes;
-      TParticle *particle;
-      AliTOFhit *tofHit;
-      TClonesArray *TOFhits = TOF->Hits();
-
-
-      if (TOF)
-       {
-         TOFhits = TOF->Hits();             // pointer to the TClonesArray of TOF hits
-         TTree *TH = gAlice->TreeH();       // pointer to the current TreeH
-         Stat_t ntracks = TH->GetEntries(); // number of tracks for the current event
-         for (Int_t track = 0; track < ntracks; track++)
-           {
-             gAlice->ResetHits ();
-             nbytes += TH->GetEvent(track);
-             particle = gAlice->Particle(track);
-             Int_t nhits = TOFhits->GetEntriesFast(); // number of hits for the current track
-
-             for (hit = 0; hit < nhits; hit++)
-               {
-               tofHit = (AliTOFhit*) TOFhits->UncheckedAt(hit);
-               vol[0] = tofHit->GetSector();
-               vol[1] = tofHit->GetPlate();
-               vol[2] = tofHit->GetStrip();
-               vol[3] = tofHit->GetPadx();
-               vol[4] = tofHit->GetPadz();
-
-               // 95% of efficiency to be inserted here
-               // edge effect to be inserted here
-               // cross talk  to be inserted here
-
-               Float_t idealtime = tofHit->GetTof(); // unit s
-               idealtime *= 1.E+12;  // conversion from s to ps
-                              // fTimeRes is given usually in ps
-               Float_t tdctime   = gRandom->Gaus(idealtime, fTimeRes); 
-               digit[0] = tdctime;
-
-               // typical Landau Distribution to be inserted here
-               // instead of Gaussian Distribution
-               Float_t idealcharge = tofHit->GetEdep();
-               Float_t adccharge = gRandom->Gaus(idealcharge, fChrgRes);
-               digit[1] = adccharge;
-               Int_t tracknum = tofHit->GetTrack();
-               tracks[0] = tracknum;
-               tracks[1] = 0;
-               tracks[2] = 0;
-
-               // check if two digit are on the same pad; in that case we sum
-               // the two or more digits
-               Bool_t overlap = CheckOverlap(vol, digit, tracknum);
-               if(!overlap) 
-                       new ((*fSDigits)[nSdigits++]) AliTOFdigit(tracks, vol, digit);
-               //cout << "nSdigits" << endl; 
-               } // end loop on hits for the current track
-
-            } // end loop on ntracks
-
-         } // close if TOF switched ON
-
-      gAlice->TreeS()->Fill();
-      gAlice->TreeS()->Print();
-
-    }                          //event loop
+  sd.Exec("") ;
 
 }
 
-//---------------------------------------------------------------------
-
-void AliTOF::Hits2SDigits()
+//___________________________________________________________________________
+AliDigitizer* AliTOF::CreateDigitizer(AliRunDigitizer* manager) const
 {
-//
-// Use the TOF SDigitizer to make TOF SDigits
-//
-//
-  //#ifdef DEBUG
-  cout<<"ALiTOF::Hits2SDigits> start...\n";
-  //#endif
-  
-  char * fileSDigits = 0 ;
-  char * fileHeader = 0;
-  AliTOFSDigitizer * sd = new AliTOFSDigitizer(fileHeader,fileSDigits) ;
-
-  sd->Exec("") ;
-  sd->Print("");
-
-  delete sd ;
-  
+  return new AliTOFDigitizer(manager);
 }
+
 //___________________________________________________________________________
-Bool_t AliTOF::CheckOverlap(Int_t* vol, Float_t* digit,Int_t Track)
+Bool_t AliTOF::CheckOverlap(Int_t* vol, Int_t* digit,Int_t Track)
 {
 //
 // Checks if 2 or more hits belong to the same pad.
@@ -869,192 +650,107 @@ Bool_t AliTOF::CheckOverlap(Int_t* vol, Float_t* digit,Int_t Track)
 // This procedure has to be optimized in the next TOF release.
 //
 
-        Bool_t overlap = kFALSE;
-        Int_t  vol2[5];
-
-        for (Int_t ndig=0; ndig<fSDigits->GetEntries(); ndig++){
-          AliTOFdigit* currentDigit = (AliTOFdigit*)(fSDigits->UncheckedAt(ndig));
-           currentDigit->GetLocation(vol2);
-           Bool_t idem= kTRUE;
-          // check on digit volume
-           for (Int_t i=0;i<=4;i++){
-              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;
-}
+  Bool_t overlap = kFALSE;
+  Int_t  vol2[5];
+
+  for (Int_t ndig=0; ndig<fSDigits->GetEntries(); ndig++){
+    AliTOFdigit* currentDigit = (AliTOFdigit*)(fSDigits->UncheckedAt(ndig));
+    currentDigit->GetLocation(vol2);
+    Bool_t idem= kTRUE;
+    // check on digit volume
+    for (Int_t i=0;i<=4;i++){
+      if (!idem) break;
+      if (vol[i]!=vol2[i]) idem=kFALSE;}
+
+    if (idem){  // same pad fired
+      Int_t tdc2 = digit[0];
+      Int_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)
+void AliTOF::Digits2Raw()
 {
 //
-// Starting from digits, writes the 
-// Raw Data objects, i.e. a 
-// TClonesArray of 18 AliTOFRawSector objects
+// Starting from the TOF digits, writes the Raw Data objects
 //
 
-  TTree* tD;
+  TStopwatch stopwatch;
+  stopwatch.Start();
 
-  // do nothing if no particles
-  Int_t nparticles = gAlice->GetEvent(evNumber); 
-  if (nparticles <= 0) return;
+  fLoader->LoadDigits();
 
-  tD = gAlice->TreeD();
+  TTree* digits = fLoader->TreeD();
+  if (!digits) {
+    AliError("no digits tree");
+    return;
+  }
   
-  TClonesArray* tofdigits = this->Digits();
-  Int_t ndigits = tofdigits->GetEntriesFast();
-
-  TClonesArray* rawsectors = new TClonesArray("AliTOFRawSector",fNTof+2); 
-
-  for (Int_t isect=1;isect<=fNTof;isect++){
-     AliTOFRawSector* currentSector = (AliTOFRawSector*)rawsectors->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);
-       } // close if (sector==isect) i.e. end loop on digits for the current sector
-     } // end loop on TOF digits
-     
-     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->GetItems()*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);
-  }  
+  fRunLoader->CdGAFile();
+  TFile *in=(TFile*)gFile;
+  in->cd();
+  AliTOFGeometry *geometry  = (AliTOFGeometry*)in->Get("TOFgeometry");
+
+  AliTOFDDLRawData rawWriter(geometry);
+  //AliTOFDDLRawData rawWriter;
+  rawWriter.SetVerbose(0);
+  //rawWriter.SetFakeOrphaneProduction(kTRUE);
+  //rawWriter.SetPackedAcquisitionMode(kFALSE);
+  if (rawWriter.GetPackedAcquisitionMode()) {
+    if(rawWriter.GetMatchingWindow()>8192)
+      AliWarning(Form("You are running in packing mode and the matching window is %.2f ns, i.e. greater than 199.8848 ns",
+                     rawWriter.GetMatchingWindow()*AliTOFGeometry::TdcBinWidth()*1.e-03));
+  }
+  
+  AliDebug(1,"Formatting raw data for TOF");
+  digits->GetEvent(0);
+  rawWriter.RawDataTOF(digits->GetBranch("TOF"));  
+
+  fLoader->UnloadDigits();
+  
+  AliDebug(1, Form("Execution time to write TOF raw data : R:%.2fs C:%.2fs",
+                  stopwatch.RealTime(),stopwatch.CpuTime()));
+
 }
+
 //____________________________________________________________________________
-void AliTOF::Raw2Digits(Int_t evNumber)
-{
+void AliTOF::RecreateSDigitsArray() {
 //
-//  Converts Raw Data objects into digits objects.
-//  We schematize the raw data with a 
-//  TClonesArray of 18 AliTOFRawSector objects
+// delete TClonesArray fSDigits and create it again
+//  needed for backward compatability with PPR test production
 //
-
-  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();
-  
-  TClonesArray* rawsectors = new TClonesArray("AliTOFRawSector",fNTof+2);
-  
-  for(Int_t nSec=1; nSec<=fNTof; nSec++){
-     AliTOFRawSector* currentSector = (AliTOFRawSector*)rawsectors->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(0,TObject::kOverwrite);
-} 
-
+  delete fSDigits;
+  fSDigits       = new TClonesArray("AliTOFSDigit",  1000);
+}
+//____________________________________________________________________________
+void AliTOF::CreateSDigitsArray() {
+//
+// create TClonesArray fSDigits
+//  needed for backward compatability with PPR test production
+//
+  fSDigits       = new TClonesArray("AliTOFSDigit",  1000);
+}