#include <TMath.h>
#include "AliTPCPRF2D.h"
#include "AliTPCParamSR.h"
#include "AliTPCRF1D.h"
#include "TH1.h"
#include "AliTPCROC.h"
#include "TGeoManager.h"
ClassImp(AliTPCParamSR)
static const Int_t kMaxRows=600;
static const Float_t kEdgeSectorSpace = 2.5;
static const Float_t kFacSigmaPadRow=3.;
static const Float_t kFacSigmaPad=3.;
static const Float_t kFacSigmaTime=3.;
AliTPCParamSR::AliTPCParamSR()
:AliTPCParam(),
fInnerPRF(0),
fOuter1PRF(0),
fOuter2PRF(0),
fTimeRF(0),
fFacSigmaPadRow(0),
fFacSigmaPad(0),
fFacSigmaTime(0)
{
fFacSigmaPadRow = Float_t(kFacSigmaPadRow);
fFacSigmaPad = Float_t(kFacSigmaPad);
fFacSigmaTime = Float_t(kFacSigmaTime);
SetDefault();
Update();
}
AliTPCParamSR::~AliTPCParamSR()
{
if (fInnerPRF != 0) delete fInnerPRF;
if (fOuter1PRF != 0) delete fOuter1PRF;
if (fOuter2PRF != 0) delete fOuter2PRF;
if (fTimeRF != 0) delete fTimeRF;
}
void AliTPCParamSR::SetDefault()
{
fbStatus = kFALSE;
AliTPCParam::SetDefault();
}
Int_t AliTPCParamSR::CalcResponse(Float_t* xyz, Int_t * index, Int_t row)
{
if ( (fInnerPRF==0)||(fOuter1PRF==0)||(fOuter2PRF==0) ||(fTimeRF==0) ){
Error("AliTPCParamSR", "response function was not adjusted");
return -1;
}
Float_t sfpadrow;
Float_t sfpad;
Float_t sftime= fFacSigmaTime*fTimeRF->GetSigma()/fZWidth;
if (index[1]<fNInnerSector){
sfpadrow =fFacSigmaPadRow*fInnerPRF->GetSigmaY()/fInnerPadPitchLength;
sfpad =fFacSigmaPad*fInnerPRF->GetSigmaX()/fInnerPadPitchWidth;
}
else{
if(row<fNRowUp1){
sfpadrow =fFacSigmaPadRow*fOuter1PRF->GetSigmaY()/fOuter1PadPitchLength;
sfpad =fFacSigmaPad*fOuter1PRF->GetSigmaX()/fOuterPadPitchWidth;}
else{
sfpadrow =fFacSigmaPadRow*fOuter2PRF->GetSigmaY()/fOuter2PadPitchLength;
sfpad =fFacSigmaPad*fOuter2PRF->GetSigmaX()/fOuterPadPitchWidth;
}
}
Int_t fpadrow = TMath::Max(TMath::Nint(index[2]+xyz[0]-sfpadrow),0);
Int_t fpad = TMath::Nint(xyz[1]-sfpad);
Int_t ftime = TMath::Max(TMath::Nint(xyz[2]+xyz[3]+GetZOffset()/GetZWidth()-sftime),0);
Int_t lpadrow = TMath::Min(TMath::Nint(index[2]+xyz[0]+sfpadrow),fpadrow+19);
lpadrow = TMath::Min(GetNRow(index[1])-1,lpadrow);
Int_t lpad = TMath::Min(TMath::Nint(xyz[1]+sfpad),fpad+19);
Int_t ltime = TMath::Min(TMath::Nint(xyz[2]+xyz[3]+GetZOffset()/GetZWidth()+sftime),ftime+19);
ltime = TMath::Min(ltime,GetMaxTBin()-1);
Int_t npads = GetNPads(index[1],row);
if (fpad<-npads/2)
fpad = -npads/2;
if (lpad>npads/2)
lpad= npads/2;
if (ftime<0) ftime=0;
if (row>=0) {
if (fpadrow<=row) fpadrow =row;
else
return 0;
if (lpadrow>=row) lpadrow = row;
else
return 0;
}
Float_t padres[20][20];
Float_t timeres[20];
Int_t cindex3=0;
Int_t cindex=0;
Float_t cweight = 0;
if (fpadrow>=0) {
Int_t padrow, pad;
for (padrow = fpadrow;padrow<=lpadrow;padrow++)
for (pad = fpad;pad<=lpad;pad++){
Float_t dy = (xyz[0]+Float_t(index[2]-padrow));
Float_t dx = (xyz[1]+Float_t(pad));
if (index[1]<fNInnerSector)
padres[padrow-fpadrow][pad-fpad]=fInnerPRF->GetPRF(dx*fInnerPadPitchWidth,dy*fInnerPadPitchLength);
else{
if(row<fNRowUp1){
padres[padrow-fpadrow][pad-fpad]=fOuter1PRF->GetPRF(dx*fOuterPadPitchWidth,dy*fOuter1PadPitchLength);}
else{
padres[padrow-fpadrow][pad-fpad]=fOuter2PRF->GetPRF(dx*fOuterPadPitchWidth,dy*fOuter2PadPitchLength);}}}
Int_t time;
for (time = ftime;time<=ltime;time++)
timeres[time-ftime]= fTimeRF->GetRF((-xyz[2]-xyz[3]+Float_t(time))*fZWidth);
for (padrow = fpadrow;padrow<=lpadrow;padrow++)
for (pad = fpad;pad<=lpad;pad++)
for (time = ftime;time<=ltime;time++){
cweight = timeres[time-ftime]*padres[padrow-fpadrow][pad-fpad];
if (cweight>fResponseThreshold) {
fResponseBin[cindex3]=padrow;
fResponseBin[cindex3+1]=pad;
fResponseBin[cindex3+2]=time;
cindex3+=3;
fResponseWeight[cindex]=cweight;
cindex++;
}
}
}
fCurrentMax=cindex;
return fCurrentMax;
}
void AliTPCParamSR::TransformTo8(Float_t *xyz, Int_t *index) const
{
if (index[0]==0) Transform0to1(xyz,index);
if (index[0]==1) Transform1to2(xyz,index);
if (index[0]==2) Transform2to3(xyz,index);
if (index[0]==3) Transform3to4(xyz,index);
if (index[0]==4) Transform4to8(xyz,index);
}
void AliTPCParamSR::TransformTo2(Float_t *xyz, Int_t *index) const
{
if (index[0]==0) Transform0to1(xyz,index);
if (index[0]==1) Transform1to2(xyz,index);
if (index[0]==4) Transform4to3(xyz,index);
if (index[0]==8) {
Transform8to4(xyz,index);
Transform4to3(xyz,index);
}
}
void AliTPCParamSR::CRXYZtoXYZ(Float_t *xyz,
const Int_t §or, const Int_t & padrow, Int_t option) const
{
Bool_t rel = ( (option&2)!=0);
Int_t index[3]={sector,padrow,0};
if (rel==kTRUE) Transform4to3(xyz,index);
Transform2to1(xyz,index);
}
void AliTPCParamSR::XYZtoCRXYZ(Float_t *xyz,
Int_t §or, Int_t & padrow, Int_t option) const
{
Int_t index[3];
Bool_t rel = ( (option&2)!=0);
if ((option&1)==0) Transform0to1(xyz,index);
else
index[0]=sector;
Transform1to2(xyz,index);
Transform2to3(xyz,index);
if (rel==kTRUE) Transform3to4(xyz,index);
sector = index[0];
padrow = index[1];
}
Float_t AliTPCParamSR::GetPrimaryLoss(Float_t *, Int_t *index, Float_t *angle)
{
Float_t padlength=GetPadPitchLength(index[1]);
Float_t a1=TMath::Sin(angle[0]);
a1*=a1;
Float_t a2=TMath::Sin(angle[1]);
a2*=a2;
Float_t length =padlength*TMath::Sqrt(1+a1+a2);
return length*fNPrimLoss;
}
Float_t AliTPCParamSR::GetTotalLoss(Float_t *, Int_t *index, Float_t *angle)
{
Float_t padlength=GetPadPitchLength(index[1]);
Float_t a1=TMath::Sin(angle[0]);
a1*=a1;
Float_t a2=TMath::Sin(angle[1]);
a2*=a2;
Float_t length =padlength*TMath::Sqrt(1+a1+a2);
return length*fNTotalLoss;
}
void AliTPCParamSR::GetClusterSize(Float_t *x, Int_t *index, Float_t *, Int_t , Float_t *sigma)
{
Float_t xx;
Float_t lx[3] = {x[0],x[1],x[2]};
Int_t li[3] = {index[0],index[1],index[2]};
TransformTo2(lx,li);
sigma[0]=0;
sigma[1]=0;
xx = lx[2];
if (xx>0) {
sigma[0]+= xx*GetDiffL()*GetDiffL();
sigma[1]+= xx*GetDiffT()*GetDiffT();
}
if (GetTimeRF()!=0) sigma[0]+=GetTimeRF()->GetSigma()*GetTimeRF()->GetSigma();
if ( (index[1]<fNInnerSector) &&(GetInnerPRF()!=0))
sigma[1]+=GetInnerPRF()->GetSigmaX()*GetInnerPRF()->GetSigmaX();
if ( (index[1]>=fNInnerSector) &&(index[2]<fNRowUp1) && (GetOuter1PRF()!=0))
sigma[1]+=GetOuter1PRF()->GetSigmaX()*GetOuter1PRF()->GetSigmaX();
if( (index[1]>=fNInnerSector) &&(index[2]>=fNRowUp1) && (GetOuter2PRF()!=0))
sigma[1]+=GetOuter2PRF()->GetSigmaX()*GetOuter2PRF()->GetSigmaX();
sigma[0]/= GetZWidth()*GetZWidth();
sigma[1]/=GetPadPitchWidth(index[0])*GetPadPitchWidth(index[0]);
}
void AliTPCParamSR::GetSpaceResolution(Float_t *, Int_t *, Float_t *,
Float_t , Int_t , Float_t *)
{
}
Float_t AliTPCParamSR::GetAmp(Float_t *, Int_t *, Float_t *)
{
return 0;
}
Float_t * AliTPCParamSR::GetAnglesAccMomentum(Float_t *x, Int_t * index, Float_t* momentum, Float_t *angle)
{
TransformTo2(x,index);
AliDetectorParam::GetAnglesAccMomentum(x,index,momentum,angle);
Float_t addangle = TMath::ASin(x[1]/GetPadRowRadii(index[1],index[2]));
angle[1] +=addangle;
return angle;
}
Bool_t AliTPCParamSR::Update()
{
Int_t i;
if (AliTPCParam::Update()==kFALSE) return kFALSE;
fbStatus = kFALSE;
Float_t firstrow = fInnerRadiusLow + 1.575;
for( i= 0;i<fNRowLow;i++)
{
Float_t x = firstrow + fInnerPadPitchLength*(Float_t)i;
fPadRowLow[i]=x;
fYInner[i+1] = x*tan(fInnerAngle/2.)-fInnerWireMount;
fNPadsLow[i] = AliTPCROC::Instance()->GetNPads(0,i) ;
}
fYInner[0]=(fPadRowLow[0]-fInnerPadPitchLength)*tan(fInnerAngle/2.)-fInnerWireMount;
fYInner[fNRowLow+1]=(fPadRowLow[fNRowLow-1]+fInnerPadPitchLength)*tan(fInnerAngle/2.)-fInnerWireMount;
firstrow = fOuterRadiusLow + 1.6;
for(i=0;i<fNRowUp;i++)
{
if(i<fNRowUp1){
Float_t x = firstrow + fOuter1PadPitchLength*(Float_t)i;
fPadRowUp[i]=x;
fYOuter[i+1]= x*tan(fOuterAngle/2.)-fOuterWireMount;
fNPadsUp[i] = AliTPCROC::Instance()->GetNPads(36,i) ;
if(i==fNRowUp1-1) {
fLastWireUp1=fPadRowUp[i] +0.625;
firstrow = fPadRowUp[i] + 0.5*(fOuter1PadPitchLength+fOuter2PadPitchLength);
}
}
else
{
Float_t x = firstrow + fOuter2PadPitchLength*(Float_t)(i-64);
fPadRowUp[i]=x;
fNPadsUp[i] = AliTPCROC::Instance()->GetNPads(36,i) ;
}
fYOuter[i+1] = fPadRowUp[i]*tan(fOuterAngle/2.)-fOuterWireMount;
}
fYOuter[0]=(fPadRowUp[0]-fOuter1PadPitchLength)*tan(fOuterAngle/2.)-fOuterWireMount;
fYOuter[fNRowUp+1]=(fPadRowUp[fNRowUp-1]+fOuter2PadPitchLength)*tan(fOuterAngle/2.)-fOuterWireMount;
fNtRows = fNInnerSector*fNRowLow+fNOuterSector*fNRowUp;
fbStatus = kTRUE;
return kTRUE;
}
Float_t AliTPCParamSR::GetYInner(Int_t irow) const
{
return fYInner[irow];
}
Float_t AliTPCParamSR::GetYOuter(Int_t irow) const
{
return fYOuter[irow];
}
void AliTPCParamSR::Streamer(TBuffer &R__b)
{
if (R__b.IsReading()) {
Version_t R__v = R__b.ReadVersion(); if (R__v) { }
AliTPCParam::Streamer(R__b);
Update();
if (gGeoManager) ReadGeoMatrices();
} else {
R__b.WriteVersion(AliTPCParamSR::IsA());
AliTPCParam::Streamer(R__b);
}
}
Int_t AliTPCParamSR::CalcResponseFast(Float_t* xyz, Int_t * index, Int_t row, Float_t phase)
{
if ( (fInnerPRF==0)||(fOuter1PRF==0)||(fOuter2PRF==0) ||(fTimeRF==0) ){
Error("AliTPCParamSR", "response function was not adjusted");
return -1;
}
const Int_t kpadn = 500;
const Float_t kfpadn = 500.;
const Int_t ktimen = 500;
const Float_t kftimen = 500.;
const Int_t kpadrn = 500;
const Float_t kfpadrn = 500.;
static Float_t prfinner[2*kpadrn][5*kpadn];
static Float_t prfouter1[2*kpadrn][5*kpadn];
static Float_t prfouter2[2*kpadrn][5*kpadn];
static Float_t kTanMax =0;
static Float_t rftime[5*ktimen];
static Int_t blabla=0;
static Float_t zoffset=0;
static Float_t zwidth=0;
static Float_t zoffset2=0;
static TH1F * hdiff=0;
static TH1F * hdiff1=0;
static TH1F * hdiff2=0;
if (blabla==0) {
kTanMax = TMath::ATan(10.*TMath::DegToRad());
hdiff =new TH1F("prf_diff","prf_diff",10000,-1,1);
hdiff1 =new TH1F("no_repsonse1","no_response1",10000,-1,1);
hdiff2 =new TH1F("no_response2","no_response2",10000,-1,1);
blabla=1;
zoffset = GetZOffset();
zwidth = fZWidth;
zoffset2 = zoffset/zwidth;
for (Int_t i=0;i<5*ktimen;i++){
rftime[i] = fTimeRF->GetRF(((i-2.5*kftimen)/kftimen)*zwidth+zoffset);
}
for (Int_t i=0;i<5*kpadn;i++){
for (Int_t j=0;j<2*kpadrn;j++){
prfinner[j][i] =
fInnerPRF->GetPRF((i-2.5*kfpadn)/kfpadn
*fInnerPadPitchWidth,(j-kfpadrn)/kfpadrn*fInnerPadPitchLength);
prfouter1[j][i] =
fOuter1PRF->GetPRF((i-2.5*kfpadn)/kfpadn
*fOuterPadPitchWidth,(j-kfpadrn)/kfpadrn*fOuter1PadPitchLength);
prfouter2[j][i] =
fOuter2PRF->GetPRF((i-2.5*kfpadn)/kfpadn
*fOuterPadPitchWidth,(j-kfpadrn)/kfpadrn*fOuter2PadPitchLength);
}
}
}
Int_t npads = GetNPads(index[1],index[3]-1);
Int_t cpadrow = index[2];
Int_t cpad = TMath::Nint(xyz[1]);
Int_t ctime = TMath::Nint(xyz[2]+zoffset2+xyz[3]);
Float_t dpadrow = xyz[0];
Float_t dpad = xyz[1]-cpad;
Float_t dtime = xyz[2]+zoffset2+xyz[3]-ctime+phase*0.25;
Int_t cindex =0;
Int_t cindex3 =0;
Int_t maxt =GetMaxTBin();
Int_t fpadrow;
Int_t lpadrow;
if (row>=0) {
fpadrow = row-cpadrow;
lpadrow = row-cpadrow;
}else{
fpadrow = (index[2]>1) ? -1 :0;
lpadrow = (index[2]<GetNRow(index[1])-1) ? 1:0;
}
Int_t fpad = (cpad > -npads/2+1) ? -2: -npads/2-cpad;
Int_t lpad = (cpad < npads/2-2) ? 2: npads/2-1-cpad;
Int_t ftime = (ctime>1) ? -2: -ctime;
Int_t ltime = (ctime<maxt-2) ? 2: maxt-ctime-1;
if(row==fNRowUp1 && fpadrow==-1) {
dpadrow *= fOuter2PadPitchLength;
dpadrow += fOuterWWPitch;
dpadrow /= fOuter1PadPitchLength;
}
if(row==fNRowUp1+1 && fpadrow==1){
dpadrow *= fOuter1PadPitchLength;
if(dpadrow < 0.) dpadrow = -1.;
dpadrow += fOuterWWPitch;
dpadrow /= fOuter2PadPitchLength;
}
Int_t apadrow = TMath::Nint((dpadrow-fpadrow)*kfpadrn+kfpadrn);
for (Int_t ipadrow = fpadrow; ipadrow<=lpadrow;ipadrow++){
if ( (apadrow<0) || (apadrow>=2*kpadrn))
continue;
Float_t angle = 0.;
if (npads != 0)
angle = kTanMax*2.*(cpad+0.5)/Float_t(npads);
Float_t dpadangle =0;
if (index[1]<fNInnerSector){
dpadangle = angle*dpadrow*fInnerPadPitchLength/fInnerPadPitchWidth;
}
else{
if(row < fNRowUp1+1){
dpadangle = angle*dpadrow*fOuter1PadPitchLength/fOuterPadPitchWidth;
}
else {
dpadangle = angle*dpadrow*fOuter2PadPitchLength/fOuterPadPitchWidth;
}
}
if (ipadrow==0) dpadangle *=-1;
Int_t apad= TMath::Nint((dpad+dpadangle-fpad)*kfpadn+2.5*kfpadn);
for (Int_t ipad = fpad; ipad<=lpad;ipad++){
Float_t cweight;
if (index[1]<fNInnerSector){
cweight=prfinner[apadrow][apad];
}
else{
if(row < fNRowUp1+1){
cweight=prfouter1[apadrow][apad];
}
else {
cweight=prfouter2[apadrow][apad];
}
}
Int_t atime = TMath::Nint((dtime-ftime)*kftimen+2.5*kftimen);
for (Int_t itime = ftime;itime<=ltime;itime++){
Float_t cweight2 = cweight*rftime[atime];
if (cweight2>fResponseThreshold) {
fResponseBin[cindex3++]=cpadrow+ipadrow;
fResponseBin[cindex3++]=cpad+ipad;
fResponseBin[cindex3++]=ctime+itime;
fResponseWeight[cindex++]=cweight2;
}
atime-=ktimen;
}
apad-= kpadn;
}
apadrow-=kpadrn;
}
fCurrentMax=cindex;
return fCurrentMax;
}