Using TClonesArray::Clean instead of deleting of the
[u/mrichter/AliRoot.git] / TPC / AliTPCcalibAlign.cxx
CommitLineData
9318a5b4 1/**************************************************************************
2 * Copyright(c) 1998-1999, ALICE Experiment at CERN, All rights reserved. *
3 * *
4 * Author: The ALICE Off-line Project. *
5 * Contributors are mentioned in the code where appropriate. *
6 * *
7 * Permission to use, copy, modify and distribute this software and its *
8 * documentation strictly for non-commercial purposes is hereby granted *
9 * without fee, provided that the above copyright notice appears in all *
10 * copies and that both the copyright notice and this permission notice *
11 * appear in the supporting documentation. The authors make no claims *
12 * about the suitability of this software for any purpose. It is *
13 * provided "as is" without express or implied warranty. *
14 **************************************************************************/
15
16
17///////////////////////////////////////////////////////////////////////////////
18// //
19// Class to make a internal alignemnt of TPC chambers //
20//
21// Different linear tranformation investigated
972cf6f2 22// 12 parameters - arbitrary linear transformation
9318a5b4 23// 9 parameters - scaling fixed to 1
972cf6f2 24// 6 parameters - x-y rotation x-z, y-z tiliting
9318a5b4 25////
26//// Only the 12 parameter version works so far...
27////
28////
29////
30
31#include "TLinearFitter.h"
32#include "AliTPCcalibAlign.h"
33#include "AliExternalTrackParam.h"
e4042305 34#include "AliTPCTracklet.h"
35#include "TH1D.h"
7eaa723e 36#include "TVectorD.h"
e149f26d 37#include "TTreeStream.h"
7eaa723e 38#include "TFile.h"
9318a5b4 39
40#include <iostream>
e4042305 41#include <sstream>
9318a5b4 42using namespace std;
43
44ClassImp(AliTPCcalibAlign)
45
46AliTPCcalibAlign::AliTPCcalibAlign()
e4042305 47 : fDphiHistArray(72*72),
48 fDthetaHistArray(72*72),
49 fDyHistArray(72*72),
50 fDzHistArray(72*72),
51 fFitterArray12(72*72),
52 fFitterArray9(72*72),
53 fFitterArray6(72*72)
9318a5b4 54{
55 //
56 // Constructor
57 //
58 for (Int_t i=0;i<72*72;++i) {
59 fPoints[i]=0;
60 }
61}
62
e149f26d 63AliTPCcalibAlign::AliTPCcalibAlign(const Text_t *name, const Text_t *title)
64 :AliTPCcalibBase(),
65 fDphiHistArray(72*72),
66 fDthetaHistArray(72*72),
67 fDyHistArray(72*72),
68 fDzHistArray(72*72),
69 fFitterArray12(72*72),
70 fFitterArray9(72*72),
71 fFitterArray6(72*72)
72{
73 //
74 // Constructor
75 //
76 SetName(name);
77 SetTitle(title);
78 for (Int_t i=0;i<72*72;++i) {
79 fPoints[i]=0;
80 }
81}
82
9318a5b4 83AliTPCcalibAlign::~AliTPCcalibAlign() {
84 //
85 // destructor
86 //
87}
88
e4042305 89void AliTPCcalibAlign::Process(AliTPCseed *seed) {
90 TObjArray tracklets=
91 AliTPCTracklet::CreateTracklets(seed,AliTPCTracklet::kKalman,
92 kFALSE,20,2);
cbc19295 93 // TObjArray trackletsL=
94// AliTPCTracklet::CreateTracklets(seed,AliTPCTracklet::kLinear,
95// kFALSE,20,2);
96// TObjArray trackletsQ=
97// AliTPCTracklet::CreateTracklets(seed,AliTPCTracklet::kQuadratic,
98// kFALSE,20,2);
99// TObjArray trackletsR=
100// AliTPCTracklet::CreateTracklets(seed,AliTPCTracklet::kRiemann,
101// kFALSE,20,2);
e4042305 102 tracklets.SetOwner();
cbc19295 103 // trackletsL.SetOwner();
104// trackletsQ.SetOwner();
105// trackletsR.SetOwner();
e4042305 106 if (tracklets.GetEntries()==2) {
107 AliTPCTracklet *t1=static_cast<AliTPCTracklet*>(tracklets[0]);
108 AliTPCTracklet *t2=static_cast<AliTPCTracklet*>(tracklets[1]);
109 if (t1->GetSector()>t2->GetSector()) {
110 AliTPCTracklet* tmp=t1;
111 t1=t2;
112 t2=tmp;
113 }
114 AliExternalTrackParam *common1=0,*common2=0;
115 if (AliTPCTracklet::PropagateToMeanX(*t1,*t2,common1,common2))
116 ProcessTracklets(*common1,*common2,t1->GetSector(),t2->GetSector());
117 delete common1;
118 delete common2;
119 }
cbc19295 120
e4042305 121}
122
7eaa723e 123void AliTPCcalibAlign::Analyze(){
124 //
125 // Analyze function
126 //
127 EvalFitters();
128}
129
130
131void AliTPCcalibAlign::Terminate(){
132 //
133 // Terminate function
134 // call base terminate + Eval of fitters
135 //
136 if (GetDebugLevel()>0) Info("AliTPCcalibAlign","Teminate");
137 EvalFitters();
138 AliTPCcalibBase::Terminate();
139}
140
141
142
143
e4042305 144void AliTPCcalibAlign::ProcessTracklets(const AliExternalTrackParam &tp1,
145 const AliExternalTrackParam &tp2,
146 Int_t s1,Int_t s2) {
147
972cf6f2 148 //
149 //
150 //
151 FillHisto(tp1,tp2,s1,s2);
9318a5b4 152 //
153 // Process function to fill fitters
154 //
155 Double_t t1[5],t2[5];
156 Double_t &x1=t1[0], &y1=t1[1], &z1=t1[2], &dydx1=t1[3], &dzdx1=t1[4];
7eaa723e 157 Double_t &x2=t2[0], &y2=t2[1], &z2=t2[2], &dydx2=t2[3], &dzdx2=t2[4];
9318a5b4 158 x1 =tp1.GetX();
159 y1 =tp1.GetY();
160 z1 =tp1.GetZ();
161 Double_t snp1=tp1.GetSnp();
162 dydx1=snp1/TMath::Sqrt(1.-snp1*snp1);
163 Double_t tgl1=tp1.GetTgl();
164 // dz/dx = 1/(cos(theta)*cos(phi))
7eaa723e 165 dzdx1=tgl1/TMath::Sqrt(1.-snp1*snp1);
166 x2 =tp2.GetX();
9318a5b4 167 y2 =tp2.GetY();
168 z2 =tp2.GetZ();
169 Double_t snp2=tp2.GetSnp();
170 dydx2=snp2/TMath::Sqrt(1.-snp2*snp2);
171 Double_t tgl2=tp2.GetTgl();
7eaa723e 172 dzdx2=tgl2/TMath::Sqrt(1.-snp2*snp2);
7eaa723e 173 //
174 //
175 //
176 if (fStreamLevel>1){
177 TTreeSRedirector *cstream = GetDebugStreamer();
178 if (cstream){
179 static TVectorD vec1(5);
180 static TVectorD vec2(5);
181 vec1.SetElements(t1);
182 vec2.SetElements(t2);
183 AliExternalTrackParam *p1 = &((AliExternalTrackParam&)tp1);
184 AliExternalTrackParam *p2 = &((AliExternalTrackParam&)tp2);
185 (*cstream)<<"Tracklet"<<
186 "tp1.="<<p1<<
187 "tp2.="<<p2<<
188 "v1.="<<&vec1<<
189 "v2.="<<&vec2<<
190 "s1="<<s1<<
191 "s2="<<s2<<
192 "\n";
193 }
194 }
9318a5b4 195 Process12(t1,t2,GetOrMakeFitter12(s1,s2));
7eaa723e 196 Process9(t1,t2,GetOrMakeFitter9(s1,s2));
197 Process6(t1,t2,GetOrMakeFitter6(s1,s2));
9318a5b4 198 ++fPoints[72*s1+s2];
199}
200
7eaa723e 201void AliTPCcalibAlign::Process12(const Double_t *t1,
202 const Double_t *t2,
9318a5b4 203 TLinearFitter *fitter) {
204 // x2 = a00*x1 + a01*y1 + a02*z1 + a03
205 // y2 = a10*x1 + a11*y1 + a12*z1 + a13
206 // z2 = a20*x1 + a21*y1 + a22*z1 + a23
207 // dydx2 = (a10 + a11*dydx1 + a12*dzdx1)/(a00 + a01*dydx1 + a02*dzdx1)
208 // dzdx2 = (a20 + a21*dydx1 + a22*dzdx1)/(a00 + a01*dydx1 + a02*dzdx1)
209 //
210 // a00 a01 a02 a03 p[0] p[1] p[2] p[9]
211 // a10 a11 a12 a13 ==> p[3] p[4] p[5] p[10]
212 // a20 a21 a22 a23 p[6] p[7] p[8] p[11]
7eaa723e 213 const Double_t &x1=t1[0], &y1=t1[1], &z1=t1[2], &dydx1=t1[3], &dzdx1=t1[4];
214 const Double_t /*&x2=t2[0],*/ &y2=t2[1], &z2=t2[2], &dydx2=t2[3], &dzdx2=t2[4];
9318a5b4 215
216 // TODO:
7eaa723e 217 Double_t sy = 0.1;
218 Double_t sz = 0.1;
219 Double_t sdydx = 0.001;
220 Double_t sdzdx = 0.001;
9318a5b4 221
222 Double_t p[12];
223 Double_t value;
224
225 // x2 = a00*x1 + a01*y1 + a02*z1 + a03
226 // y2 = a10*x1 + a11*y1 + a12*z1 + a13
227 // y2' = a10*x1 + a11*y1 + a12*z1 + a13 + (a01*y1 + a02*z1 + a03)*dydx2
228 for (Int_t i=0; i<12;i++) p[i]=0.;
229 p[3+0] = x1; // a10
230 p[3+1] = y1; // a11
231 p[3+2] = z1; // a12
232 p[9+1] = 1.; // a13
233 p[0+1] = y1*dydx2; // a01
234 p[0+2] = z1*dydx2; // a02
235 p[9+0] = dydx2; // a03
236 value = y2;
237 fitter->AddPoint(p,value,sy);
238
239 // x2 = a00*x1 + a01*y1 + a02*z1 + a03
240 // z2 = a20*x1 + a21*y1 + a22*z1 + a23
241 // z2' = a20*x1 + a21*y1 + a22*z1 + a23 + (a01*y1 + a02*z1 + a03)*dzdx2;
242 for (Int_t i=0; i<12;i++) p[i]=0.;
243 p[6+0] = x1; // a20
244 p[6+1] = y1; // a21
245 p[6+2] = z1; // a22
246 p[9+2] = 1.; // a23
247 p[0+1] = y1*dzdx2; // a01
248 p[0+2] = z1*dzdx2; // a02
249 p[9+0] = dzdx2; // a03
250 value = z2;
251 fitter->AddPoint(p,value,sz);
252
253 // dydx2 = (a10 + a11*dydx1 + a12*dzdx1)/( a00 + a01*dydx1 + a02*dzdx1)
254 // (a10 + a11*dydx1 + a12*dzdx1) - (a00 + a01*dydx1 + a02*dzdx1)*dydx2 = 0
255 for (Int_t i=0; i<12;i++) p[i]=0.;
256 p[3+0] = 1.; // a10
257 p[3+1] = dydx1; // a11
258 p[3+2] = dzdx1; // a12
259 p[0+0] = -dydx2; // a00
260 p[0+1] = -dydx1*dydx2; // a01
261 p[0+2] = -dzdx1*dydx2; // a02
262 value = 0.;
263 fitter->AddPoint(p,value,sdydx);
264
265 // dzdx2 = (a20 + a21*dydx1 + a22*dzdx1)/( a00 + a01*dydx1 + a02*dzdx1)
266 // (a20 + a21*dydx1 + a22*dzdx1) - (a00 + a01*dydx1 + a02*dzdx1)*dzdx2 = 0
267 for (Int_t i=0; i<12;i++) p[i]=0.;
268 p[6+0] = 1; // a20
269 p[6+1] = dydx1; // a21
270 p[6+2] = dzdx1; // a22
271 p[0+0] = -dzdx2; // a00
272 p[0+1] = -dydx1*dzdx2; // a01
273 p[0+2] = -dzdx1*dzdx2; // a02
274 value = 0.;
275 fitter->AddPoint(p,value,sdzdx);
276}
277
278void AliTPCcalibAlign::Process9(Double_t *t1,
279 Double_t *t2,
280 TLinearFitter *fitter) {
281 // x2 = a00*x1 + a01*y1 + a02*z1 + a03
282 // y2 = a10*x1 + a11*y1 + a12*z1 + a13
283 // z2 = a20*x1 + a21*y1 + a22*z1 + a23
284 // dydx2 = (a10 + a11*dydx1 + a12*dzdx1)/(a00 + a01*dydx1 + a02*dzdx1)
285 // dzdx2 = (a20 + a21*dydx1 + a22*dzdx1)/(a00 + a01*dydx1 + a02*dzdx1)
286 //
287 // a00 a01 a02 a03 p[0] p[1] p[2] p[9]
288 // a10 a11 a12 a13 ==> p[3] p[4] p[5] p[10]
289 // a20 a21 a22 a23 p[6] p[7] p[8] p[11]
290 Double_t &x1=t1[0], &y1=t1[1], &z1=t1[2], &dydx1=t1[3], &dzdx1=t1[4];
cec17745 291 Double_t /*&x2=t2[0],*/ &y2=t2[1], &z2=t2[2], &dydx2=t2[3], &dzdx2=t2[4];
9318a5b4 292
293 // TODO:
294 Double_t sy = 1.;
295 Double_t sz = 1.;
296 Double_t sdydx = 1.;
297 Double_t sdzdx = 1.;
298
299 Double_t p[12];
300 Double_t value;
301
302 // x2 = a00*x1 + a01*y1 + a02*z1 + a03
303 // y2 = a10*x1 + a11*y1 + a12*z1 + a13
304 // y2' = a10*x1 + a11*y1 + a12*z1 + a13 + (a01*y1 + a03)*dydx2
305 for (Int_t i=0; i<12;i++) p[i]=0.;
306 p[3+0] = x1;
307 p[3+1] = y1;
308 p[3+2] = z1;
309 p[9+1] = 1.;
310 p[0+1] = y1*dydx2;
311 p[0+2] = z1*dydx2;
312 p[9+0] = dydx2;
313 value = y2;
314 fitter->AddPoint(p,value,sy);
315
316 // x2 = a00*x1 + a01*y1 + a02*z1 + a03
317 // z2 = a20*x1 + a21*y1 + a22*z1 + a23
318 // z2' = a20*x1 + a21*y1 + a22*z1 + a23 + (a01*y1 + a03)*dzdx2;
319 for (Int_t i=0; i<12;i++) p[i]=0.;
320 p[6+0] = x1;
321 p[6+1] = y1;
322 p[6+2] = z1;
323 p[9+2] = 1.;
324 p[0+1] = y1*dzdx2;
325 p[0+2] = z1*dzdx2;
326 p[9+0] = dzdx2;
327 value = z2;
328 fitter->AddPoint(p,value,sz);
329
330 // dydx2 = (a10 + a11*dydx1 + a12*dzdx1)/( a00 + a01*dydx1 + a02*dzdx1)
331 // (a10 + a11*dydx1 + a12*dzdx1) - (a00 + a01*dydx1 + a02*dzdx1)*dydx2 = 0
332 for (Int_t i=0; i<12;i++) p[i]=0.;
333 p[3+0] = 1.;
334 p[3+1] = dydx1;
335 p[3+2] = dzdx1;
336 p[0+0] = -dydx2;
337 p[0+1] = -dydx1*dydx2;
338 p[0+2] = -dzdx1*dydx2;
339 value = 0.;
340 fitter->AddPoint(p,value,sdydx);
341
342 // dzdx2 = (a20 + a21*dydx1 + a22*dzdx1)/( a00 + a01*dydx1 + a02*dzdx1)
343 // (a20 + a21*dydx1 + a22*dzdx1) - (a00 + a01*dydx1 + a02*dzdx1)*dzdx2 = 0
344 for (Int_t i=0; i<12;i++) p[i]=0.;
345 p[6+0] = 1;
346 p[6+1] = dydx1;
347 p[6+2] = dzdx1;
348 p[0+0] = -dzdx2;
349 p[0+1] = -dydx1*dzdx2;
350 p[0+2] = -dzdx1*dzdx2;
351 value = 0.;
352 fitter->AddPoint(p,value,sdzdx);
353}
354
355void AliTPCcalibAlign::Process6(Double_t *t1,
356 Double_t *t2,
357 TLinearFitter *fitter) {
358 // x2 = 1 *x1 +-a01*y1 + 0 +a03
359 // y2 = a01*x1 + 1 *y1 + 0 +a13
360 // z2 = a20*x1 + a21*y1 + 1 *z1 +a23
361 // dydx2 = (a10 + a11*dydx1 + a12*dzdx1)/(a00 + a01*dydx1 + a02*dzdx1)
362 // dzdx2 = (a20 + a21*dydx1 + a22*dzdx1)/(a00 + a01*dydx1 + a02*dzdx1)
363 //
364 // 1 -a01 0 a03 x -p[0] x p[3]
365 // a10 1 0 a13 ==> p[0] x x p[4]
366 // a20 a21 1 a23 p[1] p[2] x p[5]
367 Double_t &x1=t1[0], &y1=t1[1], &z1=t1[2], &dydx1=t1[3], &dzdx1=t1[4];
cec17745 368 Double_t /*&x2=t2[0],*/ &y2=t2[1], &z2=t2[2], &dydx2=t2[3], &dzdx2=t2[4];
9318a5b4 369
370 // TODO:
7eaa723e 371 Double_t sy = 0.1;
372 Double_t sz = 0.1;
373 Double_t sdydx = 0.001;
374 Double_t sdzdx = 0.001;
9318a5b4 375
376 Double_t p[12];
377 Double_t value;
378
379 // x2 = 1 *x1 +-a01*y1 + 0 +a03
380 // y2 = a01*x1 + 1 *y1 + 0 +a13
381 // y2' = a10*x1 + a11*y1 + a12*z1 + a13 + (a01*y1 + a02*z1 + a03)*dydx2
382 for (Int_t i=0; i<12;i++) p[i]=0.;
383 p[3+0] = x1;
384 p[3+1] = y1;
385 p[3+2] = z1;
386 p[9+1] = 1.;
387 p[0+1] = y1*dydx2;
388 p[0+2] = z1*dydx2;
389 p[9+0] = dydx2;
390 value = y2;
391 fitter->AddPoint(p,value,sy);
392
393 // x2 = 1 *x1 +-a01*y1 + 0 + a03
394 // z2 = a20*x1 + a21*y1 + 1 *z1 + a23
395 // z2' = a20*x1 + a21*y1 + a22*z1 + a23 + (a01*y1 + a02*z1 +a03)*dzdx2;
396 for (Int_t i=0; i<12;i++) p[i]=0.;
397 p[6+0] = x1;
398 p[6+1] = y1;
399 p[6+2] = z1;
400 p[9+2] = 1.;
401 p[0+1] = y1*dzdx2;
402 p[0+2] = z1*dzdx2;
403 p[9+0] = dzdx2;
404 value = z2;
405 fitter->AddPoint(p,value,sz);
406
407 // dydx2 = (a10 + a11*dydx1 + a12*dzdx1)/( a00 + a01*dydx1 + a02*dzdx1)
408 // (a10 + a11*dydx1 + a12*dzdx1) - (a00 + a01*dydx1 + a02*dzdx1)*dydx2 = 0
409 for (Int_t i=0; i<12;i++) p[i]=0.;
410 p[3+0] = 1.;
411 p[3+1] = dydx1;
412 p[3+2] = dzdx1;
413 p[0+0] = -dydx2;
414 p[0+1] = -dydx1*dydx2;
415 p[0+2] = -dzdx1*dydx2;
416 value = 0.;
417 fitter->AddPoint(p,value,sdydx);
418
419 // dzdx2 = (a20 + a21*dydx1 + a22*dzdx1)/( a00 + a01*dydx1 + a02*dzdx1)
420 // (a20 + a21*dydx1 + a22*dzdx1) - (a00 + a01*dydx1 + a02*dzdx1)*dzdx2 = 0
421 for (Int_t i=0; i<12;i++) p[i]=0.;
422 p[6+0] = 1;
423 p[6+1] = dydx1;
424 p[6+2] = dzdx1;
425 p[0+0] = -dzdx2;
426 p[0+1] = -dydx1*dzdx2;
427 p[0+2] = -dzdx1*dzdx2;
428 value = 0.;
429 fitter->AddPoint(p,value,sdzdx);
430}
431
7eaa723e 432
433
434
435void AliTPCcalibAlign::EvalFitters() {
436 //
437 // Analyze function
438 //
439 // Perform the fitting using linear fitters
440 //
441 Int_t kMinPoints =50;
9318a5b4 442 TLinearFitter *f;
7eaa723e 443 TFile fff("alignDebug.root","recreate");
9318a5b4 444 for (Int_t s1=0;s1<72;++s1)
7eaa723e 445 for (Int_t s2=0;s2<72;++s2){
446 if ((f=GetFitter12(s1,s2))&&fPoints[72*s1+s2]>kMinPoints) {
9318a5b4 447 // cerr<<s1<<","<<s2<<": "<<fPoints[72*s1+s2]<<endl;
0ebabeb6 448 if (f->Eval()!=0) {
9318a5b4 449 cerr<<"Evaluation failed for "<<s1<<","<<s2<<endl;
7eaa723e 450 f->Write(Form("f12_%d_%d",s1,s2));
451 }else{
452 f->Write(Form("f12_%d_%d",s1,s2));
9318a5b4 453 }
454 }
7eaa723e 455 if ((f=GetFitter9(s1,s2))&&fPoints[72*s1+s2]>kMinPoints) {
456 // cerr<<s1<<","<<s2<<": "<<fPoints[72*s1+s2]<<endl;
0ebabeb6 457 if (f->Eval()!=0) {
7eaa723e 458 cerr<<"Evaluation failed for "<<s1<<","<<s2<<endl;
459 }else{
460 f->Write(Form("f9_%d_%d",s1,s2));
461 }
462 }
463 if ((f=GetFitter6(s1,s2))&&fPoints[72*s1+s2]>kMinPoints) {
464 // cerr<<s1<<","<<s2<<": "<<fPoints[72*s1+s2]<<endl;
972cf6f2 465 if (f->Eval()!=0) {
7eaa723e 466 cerr<<"Evaluation failed for "<<s1<<","<<s2<<endl;
467 }else{
468 f->Write(Form("f6_%d_%d",s1,s2));
469 }
470 }
471 }
0ebabeb6 472 this->Write("align");
9318a5b4 473 /*
474
475 fitter->Eval();
476 fitter->Eval();
477 chi212 = align->GetChisquare()/(4.*entries);
478
479 TMatrixD mat(13,13);
480 TVectorD par(13);
481 align->GetParameters(par);
482 align->GetCovarianceMatrix(mat);
483
484 //
485 //
486 for (Int_t i=0; i<12;i++){
487 palign12(i)= par(i+1);
488 for (Int_t j=0; j<12;j++){
489 pcovar12(i,j) = mat(i+1,j+1);
490 pcovar12(i,j) *= chi212;
491 }
492 }
493 //
494 for (Int_t i=0; i<12;i++){
495 psigma12(i) = TMath::Sqrt(pcovar12(i,i));
496 palignR12(i) = palign12(i)/TMath::Sqrt(pcovar12(i,i));
497 for (Int_t j=0; j<12;j++){
498 pcovarN12(i,j) = pcovar12(i,j)/TMath::Sqrt(pcovar12(i,i)*pcovar12(j,j));
499 }
500 }
501 */
502}
503
972cf6f2 504TLinearFitter* AliTPCcalibAlign::GetOrMakeFitter12(Int_t s1,Int_t s2) {
505 //
506 // get or make fitter - general linear transformation
507 //
508 TLinearFitter * fitter = GetFitter12(s1,s2);
509 if (fitter) return fitter;
510 fitter =new TLinearFitter(12,"x[0]++x[1]++x[2]++x[3]++x[4]++x[5]++x[6]++x[7]++x[8]++x[9]++x[10]++x[11]");
511 fitter->StoreData(kFALSE);
512 fFitterArray12.AddAt(fitter,GetIndex(s1,s2));
513 return fitter;
514}
515
516TLinearFitter* AliTPCcalibAlign::GetOrMakeFitter9(Int_t s1,Int_t s2) {
517 //
518 //get or make fitter - general linear transformation - no scaling
519 //
520 TLinearFitter * fitter = GetFitter9(s1,s2);
521 if (fitter) return fitter;
522 fitter =new TLinearFitter(9,"x[0]++x[1]++x[2]++x[3]++x[4]++x[5]++x[6]++x[7]++x[8]");
523 fitter->StoreData(kFALSE);
524 fFitterArray9.AddAt(fitter,GetIndex(s1,s2));
525 return fitter;
526}
527
528TLinearFitter* AliTPCcalibAlign::GetOrMakeFitter6(Int_t s1,Int_t s2) {
529 //
530 // get or make fitter - 6 paramater linear tranformation
531 // - no scaling
532 // - rotation x-y
533 // - tilting x-z, y-z
534 TLinearFitter * fitter = GetFitter6(s1,s2);
535 if (fitter) return fitter;
536 fitter=new TLinearFitter(6,"x[0]++x[1]++x[2]++x[3]++x[4]++x[5]");
537 fitter->StoreData(kFALSE);
538 fFitterArray6.AddAt(fitter,GetIndex(s1,s2));
539 return fitter;
540}
541
542
543
544
545
9318a5b4 546Bool_t AliTPCcalibAlign::GetTransformation12(Int_t s1,Int_t s2,TMatrixD &a) {
972cf6f2 547 //
548 // GetTransformation matrix - 12 paramaters - generael linear transformation
549 //
9318a5b4 550 if (!GetFitter12(s1,s2))
551 return false;
552 else {
553 TVectorD p(12);
9318a5b4 554 GetFitter12(s1,s2)->GetParameters(p);
9318a5b4 555 a.ResizeTo(4,4);
972cf6f2 556 a[0][0]=p[0]; a[0][1]=p[1]; a[0][2]=p[2]; a[0][3]=p[9];
557 a[1][0]=p[3]; a[1][1]=p[4]; a[1][2]=p[5]; a[1][3]=p[10];
558 a[2][0]=p[6]; a[2][1]=p[7]; a[2][2]=p[8]; a[2][3]=p[11];
559 a[3][0]=0.; a[3][1]=0.; a[3][2]=0.; a[3][3]=1.;
9318a5b4 560 return true;
561 }
562}
563
564Bool_t AliTPCcalibAlign::GetTransformation9(Int_t s1,Int_t s2,TMatrixD &a) {
972cf6f2 565 //
566 // GetTransformation matrix - 9 paramaters - general linear transformation
567 // No scaling
568 //
9318a5b4 569 if (!GetFitter9(s1,s2))
570 return false;
571 else {
572 TVectorD p(9);
573 GetFitter9(s1,s2)->GetParameters(p);
574 a.ResizeTo(4,4);
972cf6f2 575 a[0][0]=p[0]; a[0][1]=p[1]; a[0][2]=p[2]; a[0][3]=p[9];
576 a[1][0]=p[3]; a[1][1]=p[4]; a[1][2]=p[5]; a[1][3]=p[10];
577 a[2][0]=p[6]; a[2][1]=p[7]; a[2][2]=p[8]; a[2][3]=p[11];
578 a[3][0]=0.; a[3][1]=0.; a[3][2]=0.; a[3][3]=1.;
9318a5b4 579 return true;
580 }
581}
582
583Bool_t AliTPCcalibAlign::GetTransformation6(Int_t s1,Int_t s2,TMatrixD &a) {
972cf6f2 584 //
585 // GetTransformation matrix - 6 paramaters
586 // 3 translation
587 // 1 rotation -x-y
588 // 2 tilting x-z y-z
9318a5b4 589 if (!GetFitter6(s1,s2))
590 return false;
591 else {
592 TVectorD p(6);
9318a5b4 593 GetFitter6(s1,s2)->GetParameters(p);
9318a5b4 594 a.ResizeTo(4,4);
972cf6f2 595 a[0][0]=p[0]; a[0][1]=p[1]; a[0][2]=p[2]; a[0][3]=p[9];
596 a[1][0]=p[3]; a[1][1]=p[4]; a[1][2]=p[5]; a[1][3]=p[10];
597 a[2][0]=p[6]; a[2][1]=p[7]; a[2][2]=p[8]; a[2][3]=p[11];
598 a[3][0]=0.; a[3][1]=0.; a[3][2]=0.; a[3][3]=1.;
9318a5b4 599 return true;
600 }
601}
972cf6f2 602
603void AliTPCcalibAlign::FillHisto(const AliExternalTrackParam &tp1,
604 const AliExternalTrackParam &tp2,
605 Int_t s1,Int_t s2) {
606 //
607 // Fill residual histograms
608 //
609 if (s2-s1==36) {//only inner-outer
610 GetHisto(kPhi,s1,s2,kTRUE)->Fill(TMath::ASin(tp1.GetSnp())-TMath::ASin(tp2.GetSnp()));
611 GetHisto(kTheta,s1,s2,kTRUE)->Fill(TMath::ATan(tp1.GetTgl())-TMath::ATan(tp2.GetTgl()));
612 GetHisto(kY,s1,s2,kTRUE)->Fill(tp1.GetY()-tp2.GetY());
613 GetHisto(kZ,s1,s2,kTRUE)->Fill(tp1.GetZ()-tp2.GetZ());
614 }
615}
616
617
618
619TH1 * AliTPCcalibAlign::GetHisto(HistoType type, Int_t s1, Int_t s2, Bool_t force)
620{
621 //
622 // return specified residual histogram - it is only QA
623 // if force specified the histogram and given histogram is not existing
624 // new histogram is created
625 //
626 if (GetIndex(s1,s2)>=72*72) return 0;
627 TObjArray *histoArray=0;
628 switch (type) {
629 case kY:
630 histoArray = &fDyHistArray; break;
631 case kZ:
632 histoArray = &fDzHistArray; break;
633 case kPhi:
634 histoArray = &fDphiHistArray; break;
635 case kTheta:
636 histoArray = &fDthetaHistArray; break;
637 }
638 TH1 * histo= (TH1*)histoArray->At(GetIndex(s1,s2));
639 if (histo) return histo;
640 if (force==kFALSE) return 0;
641 //
642 stringstream name;
643 stringstream title;
644 switch (type) {
645 case kY:
646 name<<"hist_y_"<<s1<<"_"<<s2;
647 title<<"Y Missalignment for sectors "<<s1<<" and "<<s2;
648 histo =new TH1D(name.str().c_str(),title.str().c_str(),512,-0.3,0.3); // +/- 3 mm
649 break;
650 case kZ:
651 name<<"hist_z_"<<s1<<"_"<<s2;
652 title<<"Z Missalignment for sectors "<<s1<<" and "<<s2;
653 histo = new TH1D(name.str().c_str(),title.str().c_str(),512,-0.3,0.3); // +/- 3 mm
654 break;
655 case kPhi:
656 name<<"hist_phi_"<<s1<<"_"<<s2;
657 title<<"Phi Missalignment for sectors "<<s1<<" and "<<s2;
658 histo =new TH1D(name.str().c_str(),title.str().c_str(),512,-0.01,0.01); // +/- 10 mrad
659 break;
660 case kTheta:
661 name<<"hist_theta_"<<s1<<"_"<<s2;
662 title<<"Theta Missalignment for sectors "<<s1<<" and "<<s2;
663 histo =new TH1D(name.str().c_str(),title.str().c_str(),512,-0.01,0.01); // +/- 10 mrad
664 break;
665 }
666 histo->SetDirectory(0);
667 histoArray->AddAt(histo,GetIndex(s1,s2));
668 return histo;
669}