- Small bug fix

[u/mrichter/AliRoot.git] / TRD / AliTRDtrackV1.cxx

/**************************************************************************
 * Copyright(c) 1998-1999, ALICE Experiment at CERN, All rights reserved. *
 *                                                                        *
 * Author: The ALICE Off-line Project.                                    *
 * Contributors are mentioned in the code where appropriate.              *
 *                                                                        *
 * Permission to use, copy, modify and distribute this software and its   *
 * documentation strictly for non-commercial purposes is hereby granted   *
 * without fee, provided that the above copyright notice appears in all   *
 * copies and that both the copyright notice and this permission notice   *
 * appear in the supporting documentation. The authors make no claims     *
 * about the suitability of this software for any purpose. It is          *
 * provided "as is" without express or implied warranty.                  *
 **************************************************************************/

/* $Id$ */

#include "AliLog.h"
#include "AliESDtrack.h"
#include "AliTracker.h"

#include "AliTRDtrackV1.h"
#include "AliTRDcluster.h"
#include "AliTRDcalibDB.h"
#include "AliTRDReconstructor.h"
#include "AliTRDrecoParam.h"

ClassImp(AliTRDtrackV1)

///////////////////////////////////////////////////////////////////////////////
//                                                                           //
//  Represents a reconstructed TRD track                                     //
//  Local TRD Kalman track                                                   //
//                                                                           //
//  Authors:                                                                 //
//    Alex Bercuci <A.Bercuci@gsi.de>                                        //
//    Markus Fasel <M.Fasel@gsi.de>                                          //
//                                                                           //
///////////////////////////////////////////////////////////////////////////////

//_______________________________________________________________
AliTRDtrackV1::AliTRDtrackV1() : AliKalmanTrack()
  ,fStatus(0)
  ,fDE(0.)
  ,fkReconstructor(NULL)
  ,fBackupTrack(NULL)
  ,fTrackLow(NULL)
  ,fTrackHigh(NULL)
{
  //
  // Default constructor
  //
  //printf("AliTRDtrackV1::AliTRDtrackV1()\n");

  for(int i =0; i<3; i++) fBudget[i] = 0.;
  
  Float_t pid = 1./AliPID::kSPECIES;
  for(int is =0; is<AliPID::kSPECIES; is++) fPID[is] = pid;

  for(int ip=0; ip<kNplane; ip++){
    fTrackletIndex[ip] = 0xffff;
    fTracklet[ip]      = NULL;
  }
}

//_______________________________________________________________
AliTRDtrackV1::AliTRDtrackV1(const AliTRDtrackV1 &ref) : AliKalmanTrack(ref)
  ,fStatus(ref.fStatus)
  ,fDE(ref.fDE)
  ,fkReconstructor(ref.fkReconstructor)
  ,fBackupTrack(NULL)
  ,fTrackLow(NULL)
  ,fTrackHigh(NULL)
{
  //
  // Copy constructor
  //

  //printf("AliTRDtrackV1::AliTRDtrackV1(const AliTRDtrackV1 &)\n");
  SetBit(kOwner, kFALSE);
  for(int ip=0; ip<kNplane; ip++){ 
    fTrackletIndex[ip] = ref.fTrackletIndex[ip];
    fTracklet[ip]      = ref.fTracklet[ip];
  }
  if(ref.fTrackLow) fTrackLow = new AliExternalTrackParam(*ref.fTrackLow);
  if(ref.fTrackHigh) fTrackHigh = new AliExternalTrackParam(*ref.fTrackHigh);
 
  for (Int_t i = 0; i < 3;i++) fBudget[i]      = ref.fBudget[i];

	for(Int_t is = 0; is<AliPID::kSPECIES; is++) fPID[is] = ref.fPID[is];
  
  AliKalmanTrack::SetNumberOfClusters(ref.GetNumberOfClusters());
}

//_______________________________________________________________
AliTRDtrackV1::AliTRDtrackV1(const AliESDtrack &t) : AliKalmanTrack()
  ,fStatus(0)
  ,fDE(0.)
  ,fkReconstructor(NULL)
  ,fBackupTrack(NULL)
  ,fTrackLow(NULL)
  ,fTrackHigh(NULL)
{
  //
  // Constructor from AliESDtrack
  //

  SetLabel(t.GetLabel());
  SetChi2(0.0);

  SetMass(t.GetMass()/*0.000510*/);
  AliKalmanTrack::SetNumberOfClusters(t.GetTRDncls()); 
  Int_t ti[kNplane]; t.GetTRDtracklets(&ti[0]);
  for(int ip=0; ip<kNplane; ip++){ 
    fTrackletIndex[ip] = ti[ip] < 0 ? 0xffff : ti[ip];
    fTracklet[ip]      = NULL;
  }
  for(int i =0; i<3; i++) fBudget[i] = 0.;
  
  Float_t pid = 1./AliPID::kSPECIES;
  for(int is =0; is<AliPID::kSPECIES; is++) fPID[is] = pid;

  const AliExternalTrackParam *par = &t;
  if (t.GetStatus() & AliESDtrack::kTRDbackup) { 
    par = t.GetOuterParam();
    if (!par) {
      AliError("No backup info!"); 
      par = &t;
    }
  }
  Set(par->GetX() 
     ,par->GetAlpha()
     ,par->GetParameter()
     ,par->GetCovariance());

  if(t.GetStatus() & AliESDtrack::kTIME) {
    StartTimeIntegral();
    Double_t times[10]; 
    t.GetIntegratedTimes(times); 
    SetIntegratedTimes(times);
    SetIntegratedLength(t.GetIntegratedLength());
  }
}

//_______________________________________________________________
AliTRDtrackV1::AliTRDtrackV1(AliTRDseedV1 * const trklts, const Double_t p[5], const Double_t cov[15]
             , Double_t x, Double_t alpha) : AliKalmanTrack()
  ,fStatus(0)
  ,fDE(0.)
  ,fkReconstructor(NULL)
  ,fBackupTrack(NULL)
  ,fTrackLow(NULL)
  ,fTrackHigh(NULL)
{
  //
  // The stand alone tracking constructor
  // TEMPORARY !!!!!!!!!!!
  // to check :
  // 1. covariance matrix
  // 2. dQdl calculation
  //

  Double_t cnv = GetBz() < 1.e-5 ? 1.e5 : 1.0 / (GetBz() * kB2C);
  //  Double_t cnv   = 1.0 / (GetBz() * kB2C);

  Double_t pp[5] = { p[0]    
                   , p[1]
                   , p[2]
                   , p[3]
                   , p[4]*cnv      };

  Double_t c22 = x*x*cov[14] - 2*x*cov[12] + cov[ 5];
  Double_t c32 =   x*cov[13] -     cov[ 8];
  Double_t c20 =   x*cov[10] -     cov[ 3];
  Double_t c21 =   x*cov[11] -     cov[ 4];
  Double_t c42 =   x*cov[14] -     cov[12];

  Double_t cc[15] = { cov[ 0]
                    , cov[ 1],     cov[ 2]
                    , c20,         c21,         c22
                    , cov[ 6],     cov[ 7],     c32,     cov[ 9]
                    , cov[10]*cnv, cov[11]*cnv, c42*cnv, cov[13]*cnv, cov[14]*cnv*cnv };

  Double_t mostProbablePt=AliExternalTrackParam::GetMostProbablePt();
  Double_t p0=TMath::Sign(1/mostProbablePt,pp[4]);
  Double_t w0=cc[14]/(cc[14] + p0*p0), w1=p0*p0/(cc[14] + p0*p0);
  pp[4] = w0*p0 + w1*pp[4];
  cc[10]*=w1; cc[11]*=w1; cc[12]*=w1; cc[13]*=w1; cc[14]*=w1;

	Set(x,alpha,pp,cc);
  Int_t ncls = 0;
	for(int iplane=0; iplane<kNplane; iplane++){
    fTrackletIndex[iplane] = 0xffff;
		if(!trklts[iplane].IsOK()) fTracklet[iplane] = NULL;
    else{ 
      fTracklet[iplane] = &trklts[iplane];
      ncls += fTracklet[iplane]->GetN();
    }
	}
  AliKalmanTrack::SetNumberOfClusters(ncls);		
  for(int i =0; i<3; i++) fBudget[i] = 0.;
  
  Float_t pid = 1./AliPID::kSPECIES;
  for(int is =0; is<AliPID::kSPECIES; is++) fPID[is] = pid;

}

//_______________________________________________________________
AliTRDtrackV1::~AliTRDtrackV1()
{
  //AliInfo("");
  //printf("I-AliTRDtrackV1::~AliTRDtrackV1() : Owner[%s]\n", TestBit(kOwner)?"YES":"NO");

  if(fBackupTrack) delete fBackupTrack; fBackupTrack = NULL;

  if(fTrackLow) delete fTrackLow; fTrackLow = NULL;
  if(fTrackHigh) delete fTrackHigh; fTrackHigh = NULL;

  for(Int_t ip=0; ip<kNplane; ip++){
    if(TestBit(kOwner) && fTracklet[ip]) delete fTracklet[ip];
    fTracklet[ip] = NULL;
    fTrackletIndex[ip] = 0xffff;
  }
}
	
//_______________________________________________________________
Bool_t AliTRDtrackV1::CookLabel(Float_t wrong)
{
  // set MC label for this track
  if(!GetNumberOfClusters()) return kFALSE;

  Int_t s[kMAXCLUSTERSPERTRACK][2];
  for (Int_t i = 0; i < kMAXCLUSTERSPERTRACK; i++) {
    s[i][0] = -1;
    s[i][1] =  0;
  }
  
  Bool_t labelAdded;
  Int_t label;
  AliTRDcluster *c    = NULL;
  for (Int_t ip = 0; ip < kNplane; ip++) {
    if(fTrackletIndex[ip] == 0xffff) continue;
    for (Int_t ic = 0; ic < AliTRDseedV1::kNclusters; ic++) {
      if(!(c = fTracklet[ip]->GetClusters(ic))) continue;
      for (Int_t k = 0; k < 3; k++) { 
        label      = c->GetLabel(k);
        labelAdded = kFALSE; 
        Int_t j = 0;
        if (label >= 0) {
          while ((!labelAdded) && (j < kMAXCLUSTERSPERTRACK)) {
            if ((s[j][0] == label) || 
                (s[j][1] ==     0)) {
              s[j][0] = label; 
              s[j][1]++; 
              labelAdded = kTRUE;
            }
            j++;
          }
        }
      }
    }
  }
  
  Int_t max = 0;
  label = -123456789;
  for (Int_t i = 0; i < kMAXCLUSTERSPERTRACK; i++) {
    if (s[i][1] <= max) continue;
    max   = s[i][1]; 
    label = s[i][0];
  }
  if ((1. - Float_t(max)/GetNumberOfClusters()) > wrong) label = -label;
  
  SetLabel(label); 
  
  return kTRUE;
}

//_______________________________________________________________
Bool_t AliTRDtrackV1::CookPID()
{
//
// Cook the PID information for the track by delegating the omonim function of the tracklets. 
// Computes the number of tracklets used. The tracklet information are considered independent. 
// For the moment no global track measurement of PID is performed as for example to estimate 
// bremsstrahlung probability based on global chi2 of the track.
//
// The status bit AliESDtrack::kTRDpid is set during the call of AliTRDtrackV1::UpdateESDtrack().The PID performance of the 
//TRD for tracks with 6 tacklets is displayed below.
//Begin_Html
//<img src="TRD/trackPID.gif">
//End_Html
//
  
  /*Reset the a priori probabilities*/
  Double_t pid = 1. / AliPID::kSPECIES;
  for(int ispec=0; ispec<AliPID::kSPECIES; ispec++) fPID[ispec] = pid;	

  UChar_t fPIDquality = SetNumberOfTrackletsPID(kTRUE);
  // no tracklet found for PID calculations
  if(!fPIDquality) return kFALSE;
  
  // slot for PID calculation @ track level for bremsstrahlung TODO
  
  // normalize probabilities
  Double_t probTotal = 0.0;
  for (Int_t is = 0; is < AliPID::kSPECIES; is++) probTotal += fPID[is];
  
  
  if (probTotal <= 0.0) {
    AliWarning("The total probability over all species <= 0. This may be caused by some error in the reference data.");
    return kFALSE;
  }
  
  for (Int_t iSpecies = 0; iSpecies < AliPID::kSPECIES; iSpecies++) fPID[iSpecies] /= probTotal;
  
  return kTRUE;
}

//___________________________________________________________
UChar_t AliTRDtrackV1::GetNumberOfTrackletsPID() const
{
// Retrieve number of tracklets used for PID calculation. 

  UChar_t nPID = 0;
  Float_t *prob = NULL;
  for(int ip=0; ip<kNplane; ip++){
    if(fTrackletIndex[ip] == 0xffff) continue;
    if(!fTracklet[ip]->IsOK()) continue;
    if(!(prob = fTracklet[ip]->GetProbability(kFALSE))) continue;
    
    Int_t nspec = 0; // quality check of tracklet dEdx
    for(int ispec=0; ispec<AliPID::kSPECIES; ispec++){
      if(prob[ispec] < 0.) continue;
      nspec++;
    }
    if(!nspec) continue;
    
    fTracklet[ip]->SetPID();
    nPID++;
  }
  return nPID;
}

//___________________________________________________________
UChar_t AliTRDtrackV1::SetNumberOfTrackletsPID(Bool_t recalc)
{
// Retrieve number of tracklets used for PID calculation. // Recalculated PID at tracklet level by quering the PID DB.

  UChar_t fPIDquality = 0;
  
  // steer PID calculation @ tracklet level
  Float_t *prob = NULL;
  for(int ip=0; ip<kNplane; ip++){
    if(fTrackletIndex[ip] == 0xffff) continue;
    if(!fTracklet[ip]->IsOK()) continue;
    if(!(prob = fTracklet[ip]->GetProbability(recalc))) return 0;
    
    Int_t nspec = 0; // quality check of tracklet dEdx
    for(int ispec=0; ispec<AliPID::kSPECIES; ispec++){
      if(prob[ispec] < 0.) continue;
      fPID[ispec] *= prob[ispec];
      nspec++;
    }
    if(!nspec) continue;
    
    fPIDquality++;
  }
  return fPIDquality;
}

//_______________________________________________________________
AliTRDcluster* AliTRDtrackV1::GetCluster(Int_t id)
{
  // Get the cluster at a certain position in the track
  Int_t n = 0;
  for(Int_t ip=0; ip<kNplane; ip++){
    if(!fTracklet[ip]) continue;
    if(n+fTracklet[ip]->GetN() <= id){ 
      n+=fTracklet[ip]->GetN();
      continue;
    }
    AliTRDcluster *c = NULL;
    for(Int_t ic=AliTRDseedV1::kNclusters; ic--;){
      if(!(c = fTracklet[ip]->GetClusters(ic))) continue;

      if(n<id){n++; continue;}
      return c;
    }
  }
  return NULL;
}

//_______________________________________________________________
Int_t  AliTRDtrackV1::GetClusterIndex(Int_t id) const
{
  // Get the cluster index at a certain position in the track
  Int_t n = 0;
  for(Int_t ip=0; ip<kNplane; ip++){
    if(!fTracklet[ip]) continue;
    if(n+fTracklet[ip]->GetN() <= id){ 
      n+=fTracklet[ip]->GetN();
      continue;
    }
    AliTRDcluster *c = NULL;
    for(Int_t ic=AliTRDseedV1::kNclusters; ic--;){
      if(!(c = fTracklet[ip]->GetClusters(ic))) continue;

      if(n<id){n++; continue;}
      return fTracklet[ip]->GetIndexes(ic);
    }
  }
  return -1;
}

//_______________________________________________________________
Double_t AliTRDtrackV1::GetPredictedChi2(const AliTRDseedV1 *trklt, Double_t *cov) const
{
// Compute chi2 between tracklet and track. The value is calculated at the radial position of the track
// equal to the reference radial position of the tracklet (see AliTRDseedV1)
// 
// The chi2 estimator is computed according to the following formula
// BEGIN_LATEX
// #chi^{2}=(X_{trklt}-X_{track})(C_{trklt}+C_{track})^{-1}(X_{trklt}-X_{track})^{T}
// END_LATEX
// where X=(y z), the position of the track/tracklet in the yz plane
// 

  Double_t p[2]   = { trklt->GetY(), trklt->GetZ()};
  trklt->GetCovAt(trklt->GetX(), cov);
  return AliExternalTrackParam::GetPredictedChi2(p, cov);
}

//_______________________________________________________________
Int_t AliTRDtrackV1::GetSector() const
{
  return Int_t(GetAlpha()/AliTRDgeometry::GetAlpha() + (GetAlpha()>0. ? 0 : AliTRDgeometry::kNsector));
}

//_______________________________________________________________
Bool_t AliTRDtrackV1::IsEqual(const TObject *o) const
{
  // Checks whether two tracks are equal
  if (!o) return kFALSE;
  const AliTRDtrackV1 *inTrack = dynamic_cast<const AliTRDtrackV1*>(o);
  if (!inTrack) return kFALSE;
  
  //if ( fPIDquality != inTrack->GetPIDquality() ) return kFALSE;
  
  for(Int_t i = 0; i < AliPID::kSPECIES; i++){
    if ( fPID[i] != inTrack->GetPID(i) ) return kFALSE;
  }
  
  for (Int_t i = 0; i < 3; i++){
    if ( fBudget[i] != inTrack->GetBudget(i) ) return kFALSE;
  }
  if ( fDE != inTrack->GetEdep() ) return kFALSE;
  if ( fFakeRatio != inTrack->GetFakeRatio() ) return kFALSE;
  if ( fChi2 != inTrack->GetChi2() ) return kFALSE;
  if ( fMass != inTrack->GetMass() ) return kFALSE;
  if ( fLab != inTrack->GetLabel() ) return kFALSE;
  if ( fN != inTrack->GetNumberOfClusters() ) return kFALSE;
  if ( AliKalmanTrack::GetIntegratedLength() != inTrack->GetIntegratedLength() ) return kFALSE;
  
  if ( GetX() != inTrack->GetX() ) return kFALSE;
  if ( GetAlpha() != inTrack->GetAlpha() ) return kFALSE;
  const Double_t *inP = inTrack->GetParameter();
  const Double_t *curP = GetParameter();
  for (Int_t i = 0; i < 5; i++){
    if ( curP[i] != inP[i]) return kFALSE;
  }
  const Double_t *inC = inTrack->GetCovariance();
  const Double_t *curC = GetCovariance();
  for (Int_t i = 0; i < 15; i++){
    if ( curC[i] != inC[i]) return kFALSE;
  }
  
  for (Int_t iTracklet = 0; iTracklet < kNplane; iTracklet++){
    AliTRDseedV1 *curTracklet = fTracklet[iTracklet];
    AliTRDseedV1 *inTracklet = inTrack->GetTracklet(iTracklet);
    if (curTracklet && inTracklet){
      if (! curTracklet->IsEqual(inTracklet) ) {
        curTracklet->Print();
        inTracklet->Print();
        return kFALSE;
      }
    } else {
      // if one tracklet exists, and corresponding 
      // in other track doesn't - return kFALSE
      if(inTracklet || curTracklet) return kFALSE;
    }
  }

  return kTRUE;
}

//_______________________________________________________________
Bool_t AliTRDtrackV1::IsElectron() const
{
  if(GetPID(0) > fkReconstructor->GetRecoParam()->GetPIDThreshold(GetP())) return kTRUE;
  return kFALSE;
}

	
//_____________________________________________________________________________
void AliTRDtrackV1::MakeBackupTrack()
{
  //
  // Creates a backup track
  //

  if(fBackupTrack) {
    fBackupTrack->~AliTRDtrackV1();
    new(fBackupTrack) AliTRDtrackV1((AliTRDtrackV1&)(*this));
    return;
  }
  fBackupTrack = new AliTRDtrackV1((AliTRDtrackV1&)(*this));
}

//_____________________________________________________________________________
Int_t AliTRDtrackV1::GetProlongation(Double_t xk, Double_t &y, Double_t &z)
{
  //
  // Find a prolongation at given x
  // Return -1 if it does not exist
  //  

  Double_t bz = GetBz();
  if (!AliExternalTrackParam::GetYAt(xk,bz,y)) return -1;
  if (!AliExternalTrackParam::GetZAt(xk,bz,z)) return -1;

  return 1;  

}

//_____________________________________________________________________________
Bool_t AliTRDtrackV1::PropagateTo(Double_t xk, Double_t xx0, Double_t xrho)
{
  //
  // Propagates this track to a reference plane defined by "xk" [cm] 
  // correcting for the mean crossed material.
  //
  // "xx0"  - thickness/rad.length [units of the radiation length] 
  // "xrho" - thickness*density    [g/cm^2] 
  // 

  if (xk == GetX()) return kTRUE;

  Double_t xyz0[3], // track position BEFORE propagation 
           xyz1[3], // track position AFTER propagation 
           b[3];    // magnetic field 
  GetXYZ(xyz0);
  AliTracker::GetBxByBz(xyz0, b);
  if(!AliExternalTrackParam::PropagateToBxByBz(xk,b)) return kFALSE;
 
  GetXYZ(xyz1);
  if(xyz0[0] < xk) {
    xrho = -xrho;
    if (IsStartedTimeIntegral()) {
      Double_t l2  = TMath::Sqrt((xyz1[0]-xyz0[0])*(xyz1[0]-xyz0[0]) 
                               + (xyz1[1]-xyz0[1])*(xyz1[1]-xyz0[1]) 
                               + (xyz1[2]-xyz0[2])*(xyz1[2]-xyz0[2]));
      Double_t crv = AliExternalTrackParam::GetC(b[3]);
      if (TMath::Abs(l2*crv) > 0.0001) {
        // Make correction for curvature if neccesary
        l2 = 0.5 * TMath::Sqrt((xyz1[0]-xyz0[0])*(xyz1[0]-xyz0[0]) 
                             + (xyz1[1]-xyz0[1])*(xyz1[1]-xyz0[1]));
        l2 = 2.0 * TMath::ASin(l2 * crv) / crv;
        l2 = TMath::Sqrt(l2*l2 + (xyz1[2]-xyz0[2])*(xyz1[2]-xyz0[2]));
      }
      AddTimeStep(l2);
    }
  }

  if (!AliExternalTrackParam::CorrectForMeanMaterial(xx0, xrho, GetMass())) return kFALSE;


  {

    // Energy losses
    Double_t p2    = (1.0 + GetTgl()*GetTgl()) / (GetSigned1Pt()*GetSigned1Pt());
    Double_t beta2 = p2 / (p2 + GetMass()*GetMass());
    if ((beta2 < 1.0e-10) || 
        ((5940.0 * beta2/(1.0 - beta2 + 1.0e-10) - beta2) < 0.0)) {
      return kFALSE;
    }

    Double_t dE    = 0.153e-3 / beta2 
                   * (TMath::Log(5940.0 * beta2/(1.0 - beta2 + 1.0e-10)) - beta2)
                   * xrho;
    fBudget[0] += xrho;

    /*
    // Suspicious part - think about it ?
    Double_t kinE =  TMath::Sqrt(p2);
    if (dE > 0.8*kinE) dE = 0.8 * kinE;  //      
    if (dE < 0)        dE = 0.0;         // Not valid region for Bethe bloch 
    */
 
    fDE += dE;

    /*
    // Suspicious ! I.B.
    Double_t sigmade = 0.07 * TMath::Sqrt(TMath::Abs(dE));   // Energy loss fluctuation 
    Double_t sigmac2 = sigmade*sigmade*fC*fC*(p2+GetMass()*GetMass())/(p2*p2);
    fCcc += sigmac2;
    fCee += fX*fX * sigmac2;  
    */

  }

  return kTRUE;
}

//_____________________________________________________________________________
Int_t   AliTRDtrackV1::PropagateToR(Double_t r,Double_t step)
{
  //
  // Propagate track to the radial position
  // Rotation always connected to the last track position
  //

  Double_t xyz0[3];
  Double_t xyz1[3];
  Double_t y;
  Double_t z; 

  Double_t radius = TMath::Sqrt(GetX()*GetX() + GetY()*GetY());
  // Direction +-
  Double_t dir    = (radius > r) ? -1.0 : 1.0;   

  for (Double_t x = radius+dir*step; dir*x < dir*r; x += dir*step) {

    GetXYZ(xyz0);	
    Double_t alpha = TMath::ATan2(xyz0[1],xyz0[0]);
    Rotate(alpha,kTRUE);
    GetXYZ(xyz0);	
    if(GetProlongation(x,y,z)<0) return -1;
    xyz1[0] = x * TMath::Cos(alpha) + y * TMath::Sin(alpha); 
    xyz1[1] = x * TMath::Sin(alpha) - y * TMath::Cos(alpha);
    xyz1[2] = z;
    Double_t param[7];
    if(AliTracker::MeanMaterialBudget(xyz0,xyz1,param)<=0.) return -1;
    if (param[1] <= 0) {
      param[1] = 100000000;
    }
    PropagateTo(x,param[1],param[0]*param[4]);

  } 

  GetXYZ(xyz0);	
  Double_t alpha = TMath::ATan2(xyz0[1],xyz0[0]);
  Rotate(alpha,kTRUE);
  GetXYZ(xyz0);	
  if(GetProlongation(r,y,z)<0) return -1;
  xyz1[0] = r * TMath::Cos(alpha) + y * TMath::Sin(alpha); 
  xyz1[1] = r * TMath::Sin(alpha) - y * TMath::Cos(alpha);
  xyz1[2] = z;
  Double_t param[7];
  if(AliTracker::MeanMaterialBudget(xyz0,xyz1,param) <= 0.) return -1;

  if (param[1] <= 0) {
    param[1] = 100000000;
  }
  PropagateTo(r,param[1],param[0]*param[4]);

  return 0;

}

//_____________________________________________________________________________
void AliTRDtrackV1::Print(Option_t *o) const
{
  // Print track status
  AliInfo(Form("PID [%4.1f %4.1f %4.1f %4.1f %4.1f]", 1.E2*fPID[0], 1.E2*fPID[1], 1.E2*fPID[2], 1.E2*fPID[3], 1.E2*fPID[4]));
  AliInfo(Form("Material[%5.2f %5.2f %5.2f]", fBudget[0], fBudget[1], fBudget[2]));

  AliInfo(Form("x[%7.2f] t[%7.4f] alpha[%f] mass[%f]", GetX(), GetIntegratedLength(), GetAlpha(), fMass));
  AliInfo(Form("Ntr[%1d] NtrPID[%1d] Ncl[%3d] lab[%3d]", GetNumberOfTracklets(), GetNumberOfTrackletsPID(), fN, fLab));

  if(strcmp(o, "a")!=0) return;
  printf("|X| = (");
  const Double_t *curP = GetParameter();
  for (Int_t i = 0; i < 5; i++) printf("%7.2f ", curP[i]);
  printf(")\n");

  printf("|V| = \n");
  const Double_t *curC = GetCovariance();
  for (Int_t i = 0, j=4, k=0; i<15; i++, k++){
    printf("%7.2f ", curC[i]);
    if(k==j){ 
      printf("\n");
      k=-1; j--;
    }
  }

  for(Int_t ip=0; ip<kNplane; ip++){
    if(!fTracklet[ip]) continue;
    fTracklet[ip]->Print(o);
  }
}


//_____________________________________________________________________________
Bool_t AliTRDtrackV1::Rotate(Double_t alpha, Bool_t absolute)
{
  //
  // Rotates track parameters in R*phi plane
  // if absolute rotation alpha is in global system
  // otherwise alpha rotation is relative to the current rotation angle
  //  

  if (absolute) alpha -= GetAlpha();
  //else fNRotate++;

  return AliExternalTrackParam::Rotate(GetAlpha()+alpha);
}

//___________________________________________________________
void AliTRDtrackV1::SetNumberOfClusters() 
{
// Calculate the number of clusters attached to this track
	
  Int_t ncls = 0;
  for(int ip=0; ip<kNplane; ip++){
    if(fTracklet[ip] && fTrackletIndex[ip] != 0xffff) ncls += fTracklet[ip]->GetN();
  }
  AliKalmanTrack::SetNumberOfClusters(ncls);	
}

	
//_______________________________________________________________
void AliTRDtrackV1::SetOwner()
{
  //
  // Toggle ownership of tracklets
  //

  if(TestBit(kOwner)) return;
  for (Int_t ip = 0; ip < kNplane; ip++) {
    if(fTrackletIndex[ip] == 0xffff) continue;
    fTracklet[ip] = new AliTRDseedV1(*fTracklet[ip]);
    fTracklet[ip]->SetOwner();
  }
  SetBit(kOwner);
}

//_______________________________________________________________
void AliTRDtrackV1::SetTracklet(AliTRDseedV1 *const trklt, Int_t index)
{
  //
  // Set the tracklets
  //
  Int_t plane = trklt->GetPlane();

  fTracklet[plane]      = trklt;
  fTrackletIndex[plane] = index;
}

//_______________________________________________________________
void AliTRDtrackV1::SetTrackLow()
{
  const AliExternalTrackParam *op = dynamic_cast<const AliExternalTrackParam*>(this);
  fTrackLow = fTrackLow ? new(fTrackLow) AliExternalTrackParam(*op) : new AliExternalTrackParam(*op);
}

//_______________________________________________________________
void AliTRDtrackV1::SetTrackHigh(const AliExternalTrackParam *op)
{
  if(!op) op = dynamic_cast<const AliExternalTrackParam*>(this);
  fTrackHigh = fTrackHigh ? new(fTrackHigh) AliExternalTrackParam(*op) : new AliExternalTrackParam(*op);
}

//_______________________________________________________________
void AliTRDtrackV1::UnsetTracklet(Int_t plane)
{
  if(plane<0 && plane >= kNplane) return;
  fTrackletIndex[plane] = 0xffff;
  fTracklet[plane] = NULL;
}


//_______________________________________________________________
Bool_t  AliTRDtrackV1::Update(Double_t *p, Double_t *cov, Double_t chi2)
{
  //
  // Update track 
  //
  if(!AliExternalTrackParam::Update(p, cov)) return kFALSE;

  // Register info to track
  SetNumberOfClusters();
  SetChi2(GetChi2() + chi2);
  return kTRUE;
}

//_______________________________________________________________
void AliTRDtrackV1::UpdateESDtrack(AliESDtrack *track)
{
  //
  // Update the TRD PID information in the ESD track
  //

  Int_t nslices = fkReconstructor->GetRecoParam()->IsEightSlices() ? (Int_t)AliTRDpidUtil::kNNslices : (Int_t)AliTRDpidUtil::kLQslices;
  // number of tracklets used for PID calculation
  UChar_t nPID = GetNumberOfTrackletsPID();
  // number of tracklets attached to the track
  UChar_t nTrk = GetNumberOfTracklets();
  // pack the two numbers together and store them in the ESD
  track->SetTRDntracklets(nPID | (nTrk<<3));
  // allocate space to store raw PID signals dEdx & momentum
  track->SetNumberOfTRDslices((nslices+2)*AliTRDgeometry::kNlayer);
  // store raw signals
  Float_t p, sp; Double_t spd;
  for (Int_t ip = 0; ip < kNplane; ip++) {
    if(fTrackletIndex[ip] == 0xffff) continue;
    if(!fTracklet[ip]->HasPID()) continue;
    const Float_t *dedx = fTracklet[ip]->GetdEdx();
    for (Int_t js = 0; js < nslices; js++, dedx++) track->SetTRDslice(*dedx, ip, js);
    p = fTracklet[ip]->GetMomentum(&sp); spd = sp;
    track->SetTRDmomentum(p, ip, &spd);
  }
  // store PID probabilities
  track->SetTRDpid(fPID);
}