CalorimeterLevel2/src/CaloLevel2.cpp

/**
 * \file src/CaloLevel2.cpp
 * \author Emiliano Mocchiutti
 *
**/
#include <TObject.h>
#include <CaloLevel2.h>

//
ClassImp(CaloTrkVar);
ClassImp(CaloLevel2);

/**
 * CaloTrkVar constructor
**/
CaloTrkVar::CaloTrkVar() {
  this->Clear();
}

/**
 * Clear variables
**/
void CaloTrkVar::Clear(Option_t *t) {
  //void CaloTrkVar::Clear() {
  trkseqno = 0;
  noint = 0;
  ncore = 0;
  qcore = 0.;
  ncyl = 0;
  qcyl = 0.;
  qtrack = 0.;
  qtrackx = 0.;
  qtracky = 0.;
  dxtrack = 0.;
  dytrack = 0.;
  qlast = 0.;
  nlast = 0;
  qpre = 0.;
  npre = 0;
  qpresh = 0.;
  npresh = 0;
  qtr = 0.;
  ntr = 0;
  planetot = 0;
  qmean = 0.;
  qlow = 0.;
  nlow = 0;
  dX0l = 0.;
  memset(tbar, 0, 2*22*sizeof(Float_t));
  memset(tibar, 0, 2*22*sizeof(Int_t));
}

/**
 * Copies from t to this
**/
CaloTrkVar::CaloTrkVar(const CaloTrkVar &t){
  trkseqno = t.trkseqno;
  noint = t.noint;
  ncore = t.ncore;
  qcore = t.qcore;
  ncyl = t.ncyl;
  qcyl = t.qcyl;
  qtrack = t.qtrack;
  qtrackx = t.qtrackx;
  qtracky = t.qtracky;
  dxtrack = t.dxtrack;
  dytrack = t.dytrack;
  qlast = t.qlast;
  nlast = t.nlast;
  qpre = t.qpre;
  npre = t.npre;
  qpresh = t.qpresh;
  npresh = t.npresh;
  qtr = t.qtr;
  ntr = t.ntr;  
  planetot = t.planetot;
  qmean = t.qmean;
  dX0l = t.dX0l;
  qlow = t.qlow;
  nlow = t.nlow;
  memcpy(tibar,t.tibar,sizeof(tibar));
  memcpy(tbar,t.tbar,sizeof(tbar));
}

/**
 * CaloLevel2 constructor
**/
CaloLevel2::CaloLevel2() {    
  //
//  CaloTrk = new TClonesArray("CaloTrkVar",1); //ELENA
  CaloTrk = 0; //ELENA
  //
  this->Clear();
  //
}
/**
 * Create the TClonesArray
**/
void CaloLevel2::Set(){//ELENA
    if(!CaloTrk)CaloTrk = new TClonesArray("CaloTrkVar",1); //ELENA
}//ELENA

/**
 * Clear the CaloLevel2 object
 **/
void CaloLevel2::Clear(Option_t *t ) {    
  //
  //  CaloTrk->Clear(); //ELENA
  if(CaloTrk)CaloTrk->Delete(); //ELENA
  //
  nstrip = 0;
  nsatstrip = 0;
  qtot = 0.;
  //  impx = 0.;
  //  impy = 0.;
  qmax = 0.;
  nx22 = 0;
  qx22 = 0.;
  elen = 0.;
  selen = 0.;
  memset(perr, 0, 4*sizeof(Int_t));
  memset(swerr, 0, 4*sizeof(Int_t));
  memset(crc, 0, 4*sizeof(Int_t));
  memset(qq, 0, 4*sizeof(Int_t));
  memset(varcfit, 0, 4*sizeof(Float_t));
  memset(npcfit, 0, 4*sizeof(Int_t));
  memset(tanx, 0, 2*sizeof(Int_t));
  memset(tany, 0, 2*sizeof(Int_t));
  memset(fitmode, 0, 2*sizeof(Int_t));
  memset(planemax, 0, 2*sizeof(Int_t));
  memset(selfdelay, 0, 4*7*sizeof(Int_t));
  memset(cibar, 0, 2*22*sizeof(Int_t));
  memset(cbar, 0, 2*22*sizeof(Float_t));
  good = 0;
  selftrigger = 0;
  //
}

/**
 * Delete the CaloLevel2 object
 **/
void CaloLevel2::Delete(Option_t *t) {     //ELENA
  if(CaloTrk){ //ELENA
      CaloTrk->Delete(); //ELENA
      delete CaloTrk; //ELENA
  }     //ELENA
} //ELENA

/**
 * CaloLevel2 
**/
Bool_t CaloLevel2::IsGood(Bool_t strict) {  
  //
  if ( strict ){
    if ( !good ) return(false);
    if ( perr[0] ) return(false);
    if ( perr[1] ) return(false);
    if ( perr[2] ) return(false);
    if ( perr[3] ) return(false);
    if ( swerr[0] ) return(false);
    if ( swerr[1] ) return(false);
    if ( swerr[2] ) return(false);
    if ( swerr[3] ) return(false);
    if ( crc[0] ) return(false);
    if ( crc[1] ) return(false);
    if ( crc[2] ) return(false);
    if ( crc[3] ) return(false);
  } else {
    if ( perr[0] == 129 ||  perr[0] == 136 || perr[0] == 142 || perr[0] == 143 ) return(false);
    if ( perr[1] == 129 ||  perr[1] == 136 || perr[1] == 142 || perr[1] == 143 ) return(false);
    if ( perr[2] == 129 ||  perr[2] == 136 || perr[2] == 142 || perr[2] == 143 ) return(false);
    if ( perr[3] == 129 ||  perr[3] == 136 || perr[3] == 142 || perr[3] == 143 ) return(false);
  };
  //
  return(true);
}

/**
 * Fills a struct cCaloLevel2 with values from a CaloLevel2 object (to put data into a F77 common).
 */
void CaloLevel2::GetLevel2Struct(cCaloLevel2 *l2) const {
 
  l2->good = good;      
  l2->selftrigger = selftrigger;
  l2->nstrip = nstrip;     
  l2->nx22 = nx22;  
  l2->qtot = qtot;     
  l2->qx22 = qx22;     
  l2->qmax = qmax;     
  //  l2->impx = impx;     
  //  l2->impy = impy;     
  //  l2->tanx = tanx;     
  //  l2->tany = tany;  
  l2->elen = elen;      
  l2->selen = selen; 
        
  for(Int_t i=0;i<2;i++){
    l2->planemax[i] = planemax[i];       
    l2->varcfit[i] = varcfit[i];
    l2->npcfit[i] = npcfit[i];
  }
  for(Int_t i=0;i<4;i++){
    l2->perr[i] = perr[i];   
    l2->swerr[i] = swerr[i];  
    l2->calcrc[i] = crc[i];     
    l2->qq[i] = qq[i];  
  }

  if(CaloTrk){ //ELENA
      l2->calntrk = CaloTrk->GetEntries();  
      for(Int_t i=0;i<l2->calntrk;i++){
          l2->caltrkseqno[i] = ((CaloTrkVar *)CaloTrk->At(i))->trkseqno;  
          l2->ncore[i] = ((CaloTrkVar *)CaloTrk->At(i))->ncore;     
          l2->noint[i] = ((CaloTrkVar *)CaloTrk->At(i))->noint;     
          l2->ncyl[i] = ((CaloTrkVar *)CaloTrk->At(i))->ncyl;      
          l2->nlast[i] = ((CaloTrkVar *)CaloTrk->At(i))->nlast;     
          l2->npre[i] = ((CaloTrkVar *)CaloTrk->At(i))->npre;      
          l2->npresh[i] = ((CaloTrkVar *)CaloTrk->At(i))->npresh;    
          l2->ntr[i] = ((CaloTrkVar *)CaloTrk->At(i))->ntr;       
          l2->planetot[i] = ((CaloTrkVar *)CaloTrk->At(i))->planetot;  
          l2->nlow[i] = ((CaloTrkVar *)CaloTrk->At(i))->nlow;      
          l2->qcore[i] =((CaloTrkVar *)CaloTrk->At(i))->qcore ;   
          l2->qcyl[i] = ((CaloTrkVar *)CaloTrk->At(i))->qcyl;    
          l2->qlast[i] = ((CaloTrkVar *)CaloTrk->At(i))->qlast;   
          l2->qpre[i] = ((CaloTrkVar *)CaloTrk->At(i))->qpre;    
          l2->qpresh[i] = ((CaloTrkVar *)CaloTrk->At(i))->qpresh;  
          l2->qtr[i] = ((CaloTrkVar *)CaloTrk->At(i))->qtr;     
          l2->qtrack[i] = ((CaloTrkVar *)CaloTrk->At(i))->qtrack;  
          l2->qtrackx[i] = ((CaloTrkVar *)CaloTrk->At(i))->qtrackx; 
          l2->qtracky[i] = ((CaloTrkVar *)CaloTrk->At(i))->qtracky; 
          l2->dxtrack[i] = ((CaloTrkVar *)CaloTrk->At(i))->dxtrack; 
          l2->dytrack[i] = ((CaloTrkVar *)CaloTrk->At(i))->dytrack; 
          l2->qmean[i] = ((CaloTrkVar *)CaloTrk->At(i))->qmean;   
          l2->qlow[i] = ((CaloTrkVar *)CaloTrk->At(i))->qlow;    
          l2->dX0l[i] = ((CaloTrkVar *)CaloTrk->At(i))->dX0l;  
          for (Int_t j=0; j<2; j++){
              for (Int_t k=0; k<22; k++){
                  l2->tbar[i][k][j] = ((CaloTrkVar *)CaloTrk->At(i))->tbar[k][j];
              };
          };
      }  
  } //ELENA
}

/**
 * Returns the impact position on the top of the calorimeter as determined by the calorimeter itself.
 * @param tr : if tr = 0 use the calorimeter "normal" fit, if 1 use the calorimeter "selftrigger" fit (if any!)
**/
Float_t CaloLevel2::impx(Int_t tr){
  if ( tr == 0 ) return(cbar[0][0]);
  if ( tr == 1 ) {
    if ( !CaloTrk ) return(-110.);
    TClonesArray &t = *(CaloTrk);
    for (Int_t itrk=0; itrk<ntrk(); itrk++){
      CaloTrkVar *calotrack = (CaloTrkVar*)t[itrk];
      if ( calotrack->trkseqno == -1 ) return(calotrack->tbar[0][0]);
    };
  };
  if ( tr !=0 && tr !=1 ){
    printf(" Cannot get impx for other than calo or selftrigger tracks!\n");
  } else {
    printf(" Cannot find selftrigger block\n");
  };
  return(-100.);
}

/**
 * Returns the impact position on the top of the calorimeter as determined by the calorimeter itself.
 * @param tr : if tr = 0 use the calorimeter "normal" fit, if 1 use the calorimeter "selftrigger" fit (if any!)
**/
Float_t CaloLevel2::impy(Int_t tr){
  if ( tr == 0 ) return(cbar[0][1]);
  if ( tr == 1 ) {
    if ( !CaloTrk ) return(-110.);
    TClonesArray &t = *(CaloTrk);
    for (Int_t itrk=0; itrk<ntrk(); itrk++){
      CaloTrkVar *calotrack = (CaloTrkVar*)t[itrk];
      if ( calotrack->trkseqno == -1 ) return(calotrack->tbar[0][1]);
    };
  };
  if ( tr !=0 && tr !=1 ){
    printf(" Cannot get impy for other than calo or selftrigger tracks!\n");
  } else {
    printf(" Cannot find selftrigger block\n");
  };
  return(-100.);
}
/**
 * Should return the energy in GeV if the particle would be an electron
 * using a parametrization taken from Monte Carlo simulation
**/
void CaloLevel2::GetElectronEnergy(Float_t &energy, Float_t &sigma){
  if ( nstrip == 0 ) return;
  energy = qtot / 260.;
  //  energy = qtot * 40.82 * 0.000106;
  sigma = 0.;
  if ( energy > 0. ) sigma = energy * (0.01183 + 0.121/sqrt(energy));
  return;
}

/**
 * Returns pointer to the set of track-related variables "itrk"
**/
CaloTrkVar *CaloLevel2::GetCaloTrkVar(Int_t itrk){
  //    
  if(itrk >= ntrk()){
    printf(" CaloLevel2 ERROR: track related variables set %i does not exists! \n",itrk);
    printf("                   stored track related variables = %i \n",ntrk());
    return(NULL);
  }
  if(!CaloTrk)return 0; //ELENA
  TClonesArray &t = *(CaloTrk);
  CaloTrkVar *calotrack = (CaloTrkVar*)t[itrk];
  return calotrack;
}

/**
 * Retrieves the calorimeter track matching the seqno-th tracker stored track. 
 * (If seqno = -1 retrieves the self-trigger calorimeter track)
 */
CaloTrkVar *CaloLevel2::GetCaloStoredTrack(int seqno){

  if( ntrk()==0 ){
    printf("CaloLevel2::GetCaloStoredTrack(int) : requested tracker SeqNo %i but no Calorimeter tracks are stored\n",seqno);
    return NULL;
  };
  
  CaloTrkVar *c = 0;
  Int_t it_calo=0;
     
  do { 
    c = GetCaloTrkVar(it_calo);
    it_calo++; 
  } while( c && seqno != c->trkseqno && it_calo < ntrk());      
  
  if(!c || seqno != c->trkseqno){
    c = 0;
    if(seqno!=-1 && seqno !=-2 && seqno!=-3 ) printf("CaloLevel2::GetCaloStoredTrack(int) : requested tracker SeqNo %i does not match Calorimeter stored tracks\n",seqno);
  };
  return c;
     
}
1	/**
2	* \file src/CaloLevel2.cpp
3	* \author Emiliano Mocchiutti
4	*
5	**/
6	#include <TObject.h>
7	#include <CaloLevel2.h>
8
9	//
10	ClassImp(CaloTrkVar);
11	ClassImp(CaloLevel2);
12
13	/**
14	* CaloTrkVar constructor
15	**/
16	CaloTrkVar::CaloTrkVar() {
17	this->Clear();
18	}
19
20	/**
21	* Clear variables
22	**/
23	void CaloTrkVar::Clear(Option_t *t) {
24	//void CaloTrkVar::Clear() {
25	trkseqno = 0;
26	noint = 0;
27	ncore = 0;
28	qcore = 0.;
29	ncyl = 0;
30	qcyl = 0.;
31	qtrack = 0.;
32	qtrackx = 0.;
33	qtracky = 0.;
34	dxtrack = 0.;
35	dytrack = 0.;
36	qlast = 0.;
37	nlast = 0;
38	qpre = 0.;
39	npre = 0;
40	qpresh = 0.;
41	npresh = 0;
42	qtr = 0.;
43	ntr = 0;
44	planetot = 0;
45	qmean = 0.;
46	qlow = 0.;
47	nlow = 0;
48	dX0l = 0.;
49	memset(tbar, 0, 222sizeof(Float_t));
50	memset(tibar, 0, 222sizeof(Int_t));
51	}
52
53	/**
54	* Copies from t to this
55	**/
56	CaloTrkVar::CaloTrkVar(const CaloTrkVar &t){
57	trkseqno = t.trkseqno;
58	noint = t.noint;
59	ncore = t.ncore;
60	qcore = t.qcore;
61	ncyl = t.ncyl;
62	qcyl = t.qcyl;
63	qtrack = t.qtrack;
64	qtrackx = t.qtrackx;
65	qtracky = t.qtracky;
66	dxtrack = t.dxtrack;
67	dytrack = t.dytrack;
68	qlast = t.qlast;
69	nlast = t.nlast;
70	qpre = t.qpre;
71	npre = t.npre;
72	qpresh = t.qpresh;
73	npresh = t.npresh;
74	qtr = t.qtr;
75	ntr = t.ntr;
76	planetot = t.planetot;
77	qmean = t.qmean;
78	dX0l = t.dX0l;
79	qlow = t.qlow;
80	nlow = t.nlow;
81	memcpy(tibar,t.tibar,sizeof(tibar));
82	memcpy(tbar,t.tbar,sizeof(tbar));
83	}
84
85	/**
86	* CaloLevel2 constructor
87	**/
88	CaloLevel2::CaloLevel2() {
89	//
90	// CaloTrk = new TClonesArray("CaloTrkVar",1); //ELENA
91	CaloTrk = 0; //ELENA
92	//
93	this->Clear();
94	//
95	}
96	/**
97	* Create the TClonesArray
98	**/
99	void CaloLevel2::Set(){//ELENA
100	if(!CaloTrk)CaloTrk = new TClonesArray("CaloTrkVar",1); //ELENA
101	}//ELENA
102
103	/**
104	* Clear the CaloLevel2 object
105	**/
106	void CaloLevel2::Clear(Option_t *t ) {
107	//
108	// CaloTrk->Clear(); //ELENA
109	if(CaloTrk)CaloTrk->Delete(); //ELENA
110	//
111	nstrip = 0;
112	nsatstrip = 0;
113	qtot = 0.;
114	// impx = 0.;
115	// impy = 0.;
116	qmax = 0.;
117	nx22 = 0;
118	qx22 = 0.;
119	elen = 0.;
120	selen = 0.;
121	memset(perr, 0, 4*sizeof(Int_t));
122	memset(swerr, 0, 4*sizeof(Int_t));
123	memset(crc, 0, 4*sizeof(Int_t));
124	memset(qq, 0, 4*sizeof(Int_t));
125	memset(varcfit, 0, 4*sizeof(Float_t));
126	memset(npcfit, 0, 4*sizeof(Int_t));
127	memset(tanx, 0, 2*sizeof(Int_t));
128	memset(tany, 0, 2*sizeof(Int_t));
129	memset(fitmode, 0, 2*sizeof(Int_t));
130	memset(planemax, 0, 2*sizeof(Int_t));
131	memset(selfdelay, 0, 47sizeof(Int_t));
132	memset(cibar, 0, 222sizeof(Int_t));
133	memset(cbar, 0, 222sizeof(Float_t));
134	good = 0;
135	selftrigger = 0;
136	//
137	}
138
139	/**
140	* Delete the CaloLevel2 object
141	**/
142	void CaloLevel2::Delete(Option_t *t) { //ELENA
143	if(CaloTrk){ //ELENA
144	CaloTrk->Delete(); //ELENA
145	delete CaloTrk; //ELENA
146	} //ELENA
147	} //ELENA
148
149	/**
150	* CaloLevel2
151	**/
152	Bool_t CaloLevel2::IsGood(Bool_t strict) {
153	//
154	if ( strict ){
155	if ( !good ) return(false);
156	if ( perr[0] ) return(false);
157	if ( perr[1] ) return(false);
158	if ( perr[2] ) return(false);
159	if ( perr[3] ) return(false);
160	if ( swerr[0] ) return(false);
161	if ( swerr[1] ) return(false);
162	if ( swerr[2] ) return(false);
163	if ( swerr[3] ) return(false);
164	if ( crc[0] ) return(false);
165	if ( crc[1] ) return(false);
166	if ( crc[2] ) return(false);
167	if ( crc[3] ) return(false);
168	} else {
169	if ( perr[0] == 129 \|\| perr[0] == 136 \|\| perr[0] == 142 \|\| perr[0] == 143 ) return(false);
170	if ( perr[1] == 129 \|\| perr[1] == 136 \|\| perr[1] == 142 \|\| perr[1] == 143 ) return(false);
171	if ( perr[2] == 129 \|\| perr[2] == 136 \|\| perr[2] == 142 \|\| perr[2] == 143 ) return(false);
172	if ( perr[3] == 129 \|\| perr[3] == 136 \|\| perr[3] == 142 \|\| perr[3] == 143 ) return(false);
173	};
174	//
175	return(true);
176	}
177
178	/**
179	* Fills a struct cCaloLevel2 with values from a CaloLevel2 object (to put data into a F77 common).
180	*/
181	void CaloLevel2::GetLevel2Struct(cCaloLevel2 *l2) const {
182
183	l2->good = good;
184	l2->selftrigger = selftrigger;
185	l2->nstrip = nstrip;
186	l2->nx22 = nx22;
187	l2->qtot = qtot;
188	l2->qx22 = qx22;
189	l2->qmax = qmax;
190	// l2->impx = impx;
191	// l2->impy = impy;
192	// l2->tanx = tanx;
193	// l2->tany = tany;
194	l2->elen = elen;
195	l2->selen = selen;
196
197	for(Int_t i=0;i<2;i++){
198	l2->planemax[i] = planemax[i];
199	l2->varcfit[i] = varcfit[i];
200	l2->npcfit[i] = npcfit[i];
201	}
202	for(Int_t i=0;i<4;i++){
203	l2->perr[i] = perr[i];
204	l2->swerr[i] = swerr[i];
205	l2->calcrc[i] = crc[i];
206	l2->qq[i] = qq[i];
207	}
208
209	if(CaloTrk){ //ELENA
210	l2->calntrk = CaloTrk->GetEntries();
211	for(Int_t i=0;i<l2->calntrk;i++){
212	l2->caltrkseqno[i] = ((CaloTrkVar *)CaloTrk->At(i))->trkseqno;
213	l2->ncore[i] = ((CaloTrkVar *)CaloTrk->At(i))->ncore;
214	l2->noint[i] = ((CaloTrkVar *)CaloTrk->At(i))->noint;
215	l2->ncyl[i] = ((CaloTrkVar *)CaloTrk->At(i))->ncyl;
216	l2->nlast[i] = ((CaloTrkVar *)CaloTrk->At(i))->nlast;
217	l2->npre[i] = ((CaloTrkVar *)CaloTrk->At(i))->npre;
218	l2->npresh[i] = ((CaloTrkVar *)CaloTrk->At(i))->npresh;
219	l2->ntr[i] = ((CaloTrkVar *)CaloTrk->At(i))->ntr;
220	l2->planetot[i] = ((CaloTrkVar *)CaloTrk->At(i))->planetot;
221	l2->nlow[i] = ((CaloTrkVar *)CaloTrk->At(i))->nlow;
222	l2->qcore[i] =((CaloTrkVar *)CaloTrk->At(i))->qcore ;
223	l2->qcyl[i] = ((CaloTrkVar *)CaloTrk->At(i))->qcyl;
224	l2->qlast[i] = ((CaloTrkVar *)CaloTrk->At(i))->qlast;
225	l2->qpre[i] = ((CaloTrkVar *)CaloTrk->At(i))->qpre;
226	l2->qpresh[i] = ((CaloTrkVar *)CaloTrk->At(i))->qpresh;
227	l2->qtr[i] = ((CaloTrkVar *)CaloTrk->At(i))->qtr;
228	l2->qtrack[i] = ((CaloTrkVar *)CaloTrk->At(i))->qtrack;
229	l2->qtrackx[i] = ((CaloTrkVar *)CaloTrk->At(i))->qtrackx;
230	l2->qtracky[i] = ((CaloTrkVar *)CaloTrk->At(i))->qtracky;
231	l2->dxtrack[i] = ((CaloTrkVar *)CaloTrk->At(i))->dxtrack;
232	l2->dytrack[i] = ((CaloTrkVar *)CaloTrk->At(i))->dytrack;
233	l2->qmean[i] = ((CaloTrkVar *)CaloTrk->At(i))->qmean;
234	l2->qlow[i] = ((CaloTrkVar *)CaloTrk->At(i))->qlow;
235	l2->dX0l[i] = ((CaloTrkVar *)CaloTrk->At(i))->dX0l;
236	for (Int_t j=0; j<2; j++){
237	for (Int_t k=0; k<22; k++){
238	l2->tbar[i][k][j] = ((CaloTrkVar *)CaloTrk->At(i))->tbar[k][j];
239	};
240	};
241	}
242	} //ELENA
243	}
244
245	/**
246	* Returns the impact position on the top of the calorimeter as determined by the calorimeter itself.
247	* @param tr : if tr = 0 use the calorimeter "normal" fit, if 1 use the calorimeter "selftrigger" fit (if any!)
248	**/
249	Float_t CaloLevel2::impx(Int_t tr){
250	if ( tr == 0 ) return(cbar[0][0]);
251	if ( tr == 1 ) {
252	if ( !CaloTrk ) return(-110.);
253	TClonesArray &t = *(CaloTrk);
254	for (Int_t itrk=0; itrk<ntrk(); itrk++){
255	CaloTrkVar calotrack = (CaloTrkVar)t[itrk];
256	if ( calotrack->trkseqno == -1 ) return(calotrack->tbar[0][0]);
257	};
258	};
259	if ( tr !=0 && tr !=1 ){
260	printf(" Cannot get impx for other than calo or selftrigger tracks!\n");
261	} else {
262	printf(" Cannot find selftrigger block\n");
263	};
264	return(-100.);
265	}
266
267	/**
268	* Returns the impact position on the top of the calorimeter as determined by the calorimeter itself.
269	* @param tr : if tr = 0 use the calorimeter "normal" fit, if 1 use the calorimeter "selftrigger" fit (if any!)
270	**/
271	Float_t CaloLevel2::impy(Int_t tr){
272	if ( tr == 0 ) return(cbar[0][1]);
273	if ( tr == 1 ) {
274	if ( !CaloTrk ) return(-110.);
275	TClonesArray &t = *(CaloTrk);
276	for (Int_t itrk=0; itrk<ntrk(); itrk++){
277	CaloTrkVar calotrack = (CaloTrkVar)t[itrk];
278	if ( calotrack->trkseqno == -1 ) return(calotrack->tbar[0][1]);
279	};
280	};
281	if ( tr !=0 && tr !=1 ){
282	printf(" Cannot get impy for other than calo or selftrigger tracks!\n");
283	} else {
284	printf(" Cannot find selftrigger block\n");
285	};
286	return(-100.);
287	}
288	/**
289	* Should return the energy in GeV if the particle would be an electron
290	* using a parametrization taken from Monte Carlo simulation
291	**/
292	void CaloLevel2::GetElectronEnergy(Float_t &energy, Float_t &sigma){
293	if ( nstrip == 0 ) return;
294	energy = qtot / 260.;
295	// energy = qtot * 40.82 * 0.000106;
296	sigma = 0.;
297	if ( energy > 0. ) sigma = energy * (0.01183 + 0.121/sqrt(energy));
298	return;
299	}
300
301	/**
302	* Returns pointer to the set of track-related variables "itrk"
303	**/
304	CaloTrkVar *CaloLevel2::GetCaloTrkVar(Int_t itrk){
305	//
306	if(itrk >= ntrk()){
307	printf(" CaloLevel2 ERROR: track related variables set %i does not exists! \n",itrk);
308	printf(" stored track related variables = %i \n",ntrk());
309	return(NULL);
310	}
311	if(!CaloTrk)return 0; //ELENA
312	TClonesArray &t = *(CaloTrk);
313	CaloTrkVar calotrack = (CaloTrkVar)t[itrk];
314	return calotrack;
315	}
316
317	/**
318	* Retrieves the calorimeter track matching the seqno-th tracker stored track.
319	* (If seqno = -1 retrieves the self-trigger calorimeter track)
320	*/
321	CaloTrkVar *CaloLevel2::GetCaloStoredTrack(int seqno){
322
323	if( ntrk()==0 ){
324	printf("CaloLevel2::GetCaloStoredTrack(int) : requested tracker SeqNo %i but no Calorimeter tracks are stored\n",seqno);
325	return NULL;
326	};
327
328	CaloTrkVar *c = 0;
329	Int_t it_calo=0;
330
331	do {
332	c = GetCaloTrkVar(it_calo);
333	it_calo++;
334	} while( c && seqno != c->trkseqno && it_calo < ntrk());
335
336	if(!c \|\| seqno != c->trkseqno){
337	c = 0;
338	if(seqno!=-1 && seqno !=-2 && seqno!=-3 ) printf("CaloLevel2::GetCaloStoredTrack(int) : requested tracker SeqNo %i does not match Calorimeter stored tracks\n",seqno);
339	};
340	return c;
341
342	}