]> git.uio.no Git - u/mrichter/AliRoot.git/blame - STEER/STEERBase/AliMagWrapCheb.cxx
git://git.uio.no / u / mrichter / AliRoot.git / blame
? search:
summary | shortlog | log | commit | commitdiff | tree
blob | blame (incremental) | history | HEAD
Counters for diffractive collisions
[u/mrichter/AliRoot.git] / STEER / STEERBase / AliMagWrapCheb.cxx
CommitLineData
a1dde210 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
a1dde210 16#include "AliMagWrapCheb.h"
0f5e1718 17#include "AliLog.h"
da7cd221 18#include <TSystem.h>
19#include <TArrayF.h>
20#include <TArrayI.h>
a1dde210 21
22ClassImp(AliMagWrapCheb)
a1dde210 23
da7cd221 24//__________________________________________________________________________________________
25AliMagWrapCheb::AliMagWrapCheb() :
1d18ebe0 26fNParamsSol(0),fNZSegSol(0),fNPSegSol(0),fNRSegSol(0),
27 fSegZSol(0),fSegPSol(0),fSegRSol(0),
28 fBegSegPSol(0),fNSegPSol(0),fBegSegRSol(0),fNSegRSol(0),fSegIDSol(0),fMinZSol(1.e6),fMaxZSol(-1.e6),fParamsSol(0),fMaxRSol(0),
da7cd221 29//
1d18ebe0 30 fNParamsTPC(0),fNZSegTPC(0),fNPSegTPC(0),fNRSegTPC(0),
31 fSegZTPC(0),fSegPTPC(0),fSegRTPC(0),
32 fBegSegPTPC(0),fNSegPTPC(0),fBegSegRTPC(0),fNSegRTPC(0),fSegIDTPC(0),fMinZTPC(1.e6),fMaxZTPC(-1.e6),fParamsTPC(0),fMaxRTPC(0),
47c3d315 33//
34 fNParamsTPCRat(0),fNZSegTPCRat(0),fNPSegTPCRat(0),fNRSegTPCRat(0),
35 fSegZTPCRat(0),fSegPTPCRat(0),fSegRTPCRat(0),
36 fBegSegPTPCRat(0),fNSegPTPCRat(0),fBegSegRTPCRat(0),fNSegRTPCRat(0),fSegIDTPCRat(0),fMinZTPCRat(1.e6),fMaxZTPCRat(-1.e6),fParamsTPCRat(0),fMaxRTPCRat(0),
da7cd221 37//
1d18ebe0 38 fNParamsDip(0),fNZSegDip(0),fNYSegDip(0),fNXSegDip(0),
39 fSegZDip(0),fSegYDip(0),fSegXDip(0),
40 fBegSegYDip(0),fNSegYDip(0),fBegSegXDip(0),fNSegXDip(0),fSegIDDip(0),fMinZDip(1.e6),fMaxZDip(-1.e6),fParamsDip(0)
da7cd221 41//
a1dde210 42{
da7cd221 43 // default constructor
a1dde210 44}
45
da7cd221 46//__________________________________________________________________________________________
47AliMagWrapCheb::AliMagWrapCheb(const AliMagWrapCheb& src) :
48 TNamed(src),
1d18ebe0 49 fNParamsSol(0),fNZSegSol(0),fNPSegSol(0),fNRSegSol(0),
50 fSegZSol(0),fSegPSol(0),fSegRSol(0),
51 fBegSegPSol(0),fNSegPSol(0),fBegSegRSol(0),fNSegRSol(0),fSegIDSol(0),fMinZSol(1.e6),fMaxZSol(-1.e6),fParamsSol(0),fMaxRSol(0),
da7cd221 52//
1d18ebe0 53 fNParamsTPC(0),fNZSegTPC(0),fNPSegTPC(0),fNRSegTPC(0),
54 fSegZTPC(0),fSegPTPC(0),fSegRTPC(0),
55 fBegSegPTPC(0),fNSegPTPC(0),fBegSegRTPC(0),fNSegRTPC(0),fSegIDTPC(0),fMinZTPC(1.e6),fMaxZTPC(-1.e6),fParamsTPC(0),fMaxRTPC(0),
47c3d315 56//
57 fNParamsTPCRat(0),fNZSegTPCRat(0),fNPSegTPCRat(0),fNRSegTPCRat(0),
58 fSegZTPCRat(0),fSegPTPCRat(0),fSegRTPCRat(0),
59 fBegSegPTPCRat(0),fNSegPTPCRat(0),fBegSegRTPCRat(0),fNSegRTPCRat(0),fSegIDTPCRat(0),fMinZTPCRat(1.e6),fMaxZTPCRat(-1.e6),fParamsTPCRat(0),fMaxRTPCRat(0),
da7cd221 60//
1d18ebe0 61 fNParamsDip(0),fNZSegDip(0),fNYSegDip(0),fNXSegDip(0),
62 fSegZDip(0),fSegYDip(0),fSegXDip(0),
63 fBegSegYDip(0),fNSegYDip(0),fBegSegXDip(0),fNSegXDip(0),fSegIDDip(0),fMinZDip(1.e6),fMaxZDip(-1.e6),fParamsDip(0)
a1dde210 64{
da7cd221 65 // copy constructor
66 CopyFrom(src);
67}
68
69//__________________________________________________________________________________________
70void AliMagWrapCheb::CopyFrom(const AliMagWrapCheb& src)
71{
72 // copy method
73 Clear();
74 SetName(src.GetName());
75 SetTitle(src.GetTitle());
1d18ebe0 76 //
da7cd221 77 fNParamsSol = src.fNParamsSol;
1d18ebe0 78 fNZSegSol = src.fNZSegSol;
79 fNPSegSol = src.fNPSegSol;
80 fNRSegSol = src.fNRSegSol;
81 fMinZSol = src.fMinZSol;
82 fMaxZSol = src.fMaxZSol;
83 fMaxRSol = src.fMaxRSol;
84 if (src.fNParamsSol) {
85 memcpy(fSegZSol = new Float_t[fNZSegSol], src.fSegZSol, sizeof(Float_t)*fNZSegSol);
86 memcpy(fSegPSol = new Float_t[fNPSegSol], src.fSegPSol, sizeof(Float_t)*fNPSegSol);
87 memcpy(fSegRSol = new Float_t[fNRSegSol], src.fSegRSol, sizeof(Float_t)*fNRSegSol);
88 memcpy(fBegSegPSol= new Int_t[fNZSegSol], src.fBegSegPSol, sizeof(Int_t)*fNZSegSol);
89 memcpy(fNSegPSol = new Int_t[fNZSegSol], src.fNSegPSol, sizeof(Int_t)*fNZSegSol);
90 memcpy(fBegSegRSol= new Int_t[fNPSegSol], src.fBegSegRSol, sizeof(Int_t)*fNPSegSol);
91 memcpy(fNSegRSol = new Int_t[fNPSegSol], src.fNSegRSol, sizeof(Int_t)*fNPSegSol);
92 memcpy(fSegIDSol = new Int_t[fNRSegSol], src.fSegIDSol, sizeof(Int_t)*fNRSegSol);
93 fParamsSol = new TObjArray(fNParamsSol);
94 for (int i=0;i<fNParamsSol;i++) fParamsSol->AddAtAndExpand(new AliCheb3D(*src.GetParamSol(i)),i);
95 }
a1dde210 96 //
1d18ebe0 97 fNParamsTPC = src.fNParamsTPC;
98 fNZSegTPC = src.fNZSegTPC;
99 fNPSegTPC = src.fNPSegTPC;
100 fNRSegTPC = src.fNRSegTPC;
101 fMinZTPC = src.fMinZTPC;
102 fMaxZTPC = src.fMaxZTPC;
103 fMaxRTPC = src.fMaxRTPC;
104 if (src.fNParamsTPC) {
105 memcpy(fSegZTPC = new Float_t[fNZSegTPC], src.fSegZTPC, sizeof(Float_t)*fNZSegTPC);
106 memcpy(fSegPTPC = new Float_t[fNPSegTPC], src.fSegPTPC, sizeof(Float_t)*fNPSegTPC);
107 memcpy(fSegRTPC = new Float_t[fNRSegTPC], src.fSegRTPC, sizeof(Float_t)*fNRSegTPC);
108 memcpy(fBegSegPTPC= new Int_t[fNZSegTPC], src.fBegSegPTPC, sizeof(Int_t)*fNZSegTPC);
109 memcpy(fNSegPTPC = new Int_t[fNZSegTPC], src.fNSegPTPC, sizeof(Int_t)*fNZSegTPC);
110 memcpy(fBegSegRTPC= new Int_t[fNPSegTPC], src.fBegSegRTPC, sizeof(Int_t)*fNPSegTPC);
111 memcpy(fNSegRTPC = new Int_t[fNPSegTPC], src.fNSegRTPC, sizeof(Int_t)*fNPSegTPC);
112 memcpy(fSegIDTPC = new Int_t[fNRSegTPC], src.fSegIDTPC, sizeof(Int_t)*fNRSegTPC);
113 fParamsTPC = new TObjArray(fNParamsTPC);
114 for (int i=0;i<fNParamsTPC;i++) fParamsTPC->AddAtAndExpand(new AliCheb3D(*src.GetParamTPCInt(i)),i);
115 }
116 //
47c3d315 117 fNParamsTPCRat = src.fNParamsTPCRat;
118 fNZSegTPCRat = src.fNZSegTPCRat;
119 fNPSegTPCRat = src.fNPSegTPCRat;
120 fNRSegTPCRat = src.fNRSegTPCRat;
121 fMinZTPCRat = src.fMinZTPCRat;
122 fMaxZTPCRat = src.fMaxZTPCRat;
123 fMaxRTPCRat = src.fMaxRTPCRat;
124 if (src.fNParamsTPCRat) {
125 memcpy(fSegZTPCRat = new Float_t[fNZSegTPCRat], src.fSegZTPCRat, sizeof(Float_t)*fNZSegTPCRat);
126 memcpy(fSegPTPCRat = new Float_t[fNPSegTPCRat], src.fSegPTPCRat, sizeof(Float_t)*fNPSegTPCRat);
127 memcpy(fSegRTPCRat = new Float_t[fNRSegTPCRat], src.fSegRTPCRat, sizeof(Float_t)*fNRSegTPCRat);
128 memcpy(fBegSegPTPCRat= new Int_t[fNZSegTPCRat], src.fBegSegPTPCRat, sizeof(Int_t)*fNZSegTPCRat);
129 memcpy(fNSegPTPCRat = new Int_t[fNZSegTPCRat], src.fNSegPTPCRat, sizeof(Int_t)*fNZSegTPCRat);
130 memcpy(fBegSegRTPCRat= new Int_t[fNPSegTPCRat], src.fBegSegRTPCRat, sizeof(Int_t)*fNPSegTPCRat);
131 memcpy(fNSegRTPCRat = new Int_t[fNPSegTPCRat], src.fNSegRTPCRat, sizeof(Int_t)*fNPSegTPCRat);
132 memcpy(fSegIDTPCRat = new Int_t[fNRSegTPCRat], src.fSegIDTPCRat, sizeof(Int_t)*fNRSegTPCRat);
133 fParamsTPCRat = new TObjArray(fNParamsTPCRat);
134 for (int i=0;i<fNParamsTPCRat;i++) fParamsTPCRat->AddAtAndExpand(new AliCheb3D(*src.GetParamTPCRatInt(i)),i);
135 }
136 //
1d18ebe0 137 fNParamsDip = src.fNParamsDip;
da7cd221 138 fNZSegDip = src.fNZSegDip;
139 fNYSegDip = src.fNYSegDip;
140 fNXSegDip = src.fNXSegDip;
da7cd221 141 fMinZDip = src.fMinZDip;
142 fMaxZDip = src.fMaxZDip;
da7cd221 143 if (src.fNParamsDip) {
144 memcpy(fSegZDip = new Float_t[fNZSegDip], src.fSegZDip, sizeof(Float_t)*fNZSegDip);
145 memcpy(fSegYDip = new Float_t[fNYSegDip], src.fSegYDip, sizeof(Float_t)*fNYSegDip);
82d1e556 146 memcpy(fSegXDip = new Float_t[fNXSegDip], src.fSegXDip, sizeof(Float_t)*fNXSegDip);
da7cd221 147 memcpy(fBegSegYDip= new Int_t[fNZSegDip], src.fBegSegYDip, sizeof(Int_t)*fNZSegDip);
148 memcpy(fNSegYDip = new Int_t[fNZSegDip], src.fNSegYDip, sizeof(Int_t)*fNZSegDip);
149 memcpy(fBegSegXDip= new Int_t[fNYSegDip], src.fBegSegXDip, sizeof(Int_t)*fNYSegDip);
150 memcpy(fNSegXDip = new Int_t[fNYSegDip], src.fNSegXDip, sizeof(Int_t)*fNYSegDip);
151 memcpy(fSegIDDip = new Int_t[fNXSegDip], src.fSegIDDip, sizeof(Int_t)*fNXSegDip);
152 fParamsDip = new TObjArray(fNParamsDip);
153 for (int i=0;i<fNParamsDip;i++) fParamsDip->AddAtAndExpand(new AliCheb3D(*src.GetParamDip(i)),i);
a1dde210 154 }
155 //
da7cd221 156}
157
158//__________________________________________________________________________________________
159AliMagWrapCheb& AliMagWrapCheb::operator=(const AliMagWrapCheb& rhs)
160{
161 // assignment
162 if (this != &rhs) {
163 Clear();
164 CopyFrom(rhs);
a1dde210 165 }
da7cd221 166 return *this;
167 //
a1dde210 168}
169
da7cd221 170//__________________________________________________________________________________________
171void AliMagWrapCheb::Clear(const Option_t *)
172{
173 // clear all dynamic parts
174 if (fNParamsSol) {
d8d3669f 175 fParamsSol->SetOwner(kTRUE);
1d18ebe0 176 delete fParamsSol; fParamsSol = 0;
177 delete[] fSegZSol; fSegZSol = 0;
178 delete[] fSegPSol; fSegPSol = 0;
179 delete[] fSegRSol; fSegRSol = 0;
180 delete[] fBegSegPSol; fBegSegPSol = 0;
181 delete[] fNSegPSol; fNSegPSol = 0;
182 delete[] fBegSegRSol; fBegSegRSol = 0;
183 delete[] fNSegRSol; fNSegRSol = 0;
184 delete[] fSegIDSol; fSegIDSol = 0;
da7cd221 185 }
1d18ebe0 186 fNParamsSol = fNZSegSol = fNPSegSol = fNRSegSol = 0;
187 fMinZSol = 1e6;
188 fMaxZSol = -1e6;
189 fMaxRSol = 0;
da7cd221 190 //
1d18ebe0 191 if (fNParamsTPC) {
d8d3669f 192 fParamsTPC->SetOwner(kTRUE);
1d18ebe0 193 delete fParamsTPC; fParamsTPC = 0;
194 delete[] fSegZTPC; fSegZTPC = 0;
195 delete[] fSegPTPC; fSegPTPC = 0;
196 delete[] fSegRTPC; fSegRTPC = 0;
197 delete[] fBegSegPTPC; fBegSegPTPC = 0;
198 delete[] fNSegPTPC; fNSegPTPC = 0;
199 delete[] fBegSegRTPC; fBegSegRTPC = 0;
200 delete[] fNSegRTPC; fNSegRTPC = 0;
201 delete[] fSegIDTPC; fSegIDTPC = 0;
da7cd221 202 }
1d18ebe0 203 fNParamsTPC = fNZSegTPC = fNPSegTPC = fNRSegTPC = 0;
204 fMinZTPC = 1e6;
205 fMaxZTPC = -1e6;
206 fMaxRTPC = 0;
207 //
47c3d315 208 if (fNParamsTPCRat) {
d8d3669f 209 fParamsTPCRat->SetOwner(kTRUE);
47c3d315 210 delete fParamsTPCRat; fParamsTPCRat = 0;
211 delete[] fSegZTPCRat; fSegZTPCRat = 0;
212 delete[] fSegPTPCRat; fSegPTPCRat = 0;
213 delete[] fSegRTPCRat; fSegRTPCRat = 0;
214 delete[] fBegSegPTPCRat; fBegSegPTPCRat = 0;
215 delete[] fNSegPTPCRat; fNSegPTPCRat = 0;
216 delete[] fBegSegRTPCRat; fBegSegRTPCRat = 0;
217 delete[] fNSegRTPCRat; fNSegRTPCRat = 0;
218 delete[] fSegIDTPCRat; fSegIDTPCRat = 0;
219 }
220 fNParamsTPCRat = fNZSegTPCRat = fNPSegTPCRat = fNRSegTPCRat = 0;
221 fMinZTPCRat = 1e6;
222 fMaxZTPCRat = -1e6;
223 fMaxRTPCRat = 0;
224 //
da7cd221 225 if (fNParamsDip) {
d8d3669f 226 fParamsDip->SetOwner(kTRUE);
1d18ebe0 227 delete fParamsDip; fParamsDip = 0;
228 delete[] fSegZDip; fSegZDip = 0;
229 delete[] fSegYDip; fSegYDip = 0;
230 delete[] fSegXDip; fSegXDip = 0;
231 delete[] fBegSegYDip; fBegSegYDip = 0;
232 delete[] fNSegYDip; fNSegYDip = 0;
233 delete[] fBegSegXDip; fBegSegXDip = 0;
234 delete[] fNSegXDip; fNSegXDip = 0;
235 delete[] fSegIDDip; fSegIDDip = 0;
da7cd221 236 }
1d18ebe0 237 fNParamsDip = fNZSegDip = fNYSegDip = fNXSegDip = 0;
238 fMinZDip = 1e6;
239 fMaxZDip = -1e6;
da7cd221 240 //
241}
a1dde210 242
da7cd221 243//__________________________________________________________________________________________
db83d72f 244void AliMagWrapCheb::Field(const Double_t *xyz, Double_t *b) const
a1dde210 245{
da7cd221 246 // compute field in cartesian coordinates. If point is outside of the parameterized region
247 // get it at closest valid point
1d18ebe0 248 Double_t rphiz[3];
da7cd221 249 //
250#ifndef _BRING_TO_BOUNDARY_ // exact matching to fitted volume is requested
1d18ebe0 251 b[0] = b[1] = b[2] = 0;
da7cd221 252#endif
253 //
1d18ebe0 254 if (xyz[2]>fMinZSol) {
255 CartToCyl(xyz,rphiz);
256 FieldCylSol(rphiz,b);
257 // convert field to cartesian system
258 CylToCartCylB(rphiz, b,b);
259 return;
da7cd221 260 }
261 //
1d18ebe0 262 int iddip = FindDipSegment(xyz);
263 if (iddip<0) return;
264 AliCheb3D* par = GetParamDip(iddip);
da7cd221 265#ifndef _BRING_TO_BOUNDARY_
1d18ebe0 266 if (!par->IsInside(xyz)) return;
da7cd221 267#endif
1d18ebe0 268 par->Eval(xyz,b);
da7cd221 269 //
a1dde210 270}
271
da7cd221 272//__________________________________________________________________________________________
db83d72f 273Double_t AliMagWrapCheb::GetBz(const Double_t *xyz) const
a1dde210 274{
db83d72f 275 // compute Bz for the point in cartesian coordinates. If point is outside of the parameterized region
da7cd221 276 // get it at closest valid point
1d18ebe0 277 Double_t rphiz[3];
da7cd221 278 //
1d18ebe0 279 if (xyz[2]>fMinZSol) {
280 CartToCyl(xyz,rphiz);
281 return FieldCylSolBz(rphiz);
da7cd221 282 }
1d18ebe0 283 //
284 int iddip = FindDipSegment(xyz);
285 if (iddip<0) return 0.;
286 AliCheb3D* par = GetParamDip(iddip);
9251fceb 287#ifndef _BRING_TO_BOUNDARY_
1d18ebe0 288 if (!par->IsInside(xyz)) return 0.;
9251fceb 289#endif
1d18ebe0 290 return par->Eval(xyz,2);
db83d72f 291}
292
293
294//__________________________________________________________________________________________
295void AliMagWrapCheb::Print(Option_t *) const
296{
297 // print info
298 printf("Alice magnetic field parameterized by Chebyshev polynomials\n");
299 printf("Segmentation for Solenoid (%+.2f<Z<%+.2f cm | R<%.2f cm)\n",fMinZSol,fMaxZSol,fMaxRSol);
da7cd221 300 //
82d1e556 301 if (fParamsSol) {
302 for (int i=0;i<fNParamsSol;i++) {
303 printf("SOL%4d ",i);
304 GetParamSol(i)->Print();
305 }
306 }
da7cd221 307 //
1d18ebe0 308 printf("Segmentation for TPC field integral (%+.2f<Z<%+.2f cm | R<%.2f cm)\n",fMinZTPC,fMaxZTPC,fMaxRTPC);
da7cd221 309 //
1d18ebe0 310 if (fParamsTPC) {
311 for (int i=0;i<fNParamsTPC;i++) {
82d1e556 312 printf("TPC%4d ",i);
313 GetParamTPCInt(i)->Print();
314 }
315 }
316 //
47c3d315 317 printf("Segmentation for TPC field ratios integral (%+.2f<Z<%+.2f cm | R<%.2f cm)\n",fMinZTPCRat,fMaxZTPCRat,fMaxRTPCRat);
318 //
319 if (fParamsTPCRat) {
320 for (int i=0;i<fNParamsTPCRat;i++) {
321 printf("TPCRat%4d ",i);
322 GetParamTPCRatInt(i)->Print();
323 }
324 }
325 //
db83d72f 326 printf("Segmentation for Dipole (%+.2f<Z<%+.2f cm)\n",fMinZDip,fMaxZDip);
82d1e556 327 if (fParamsDip) {
328 for (int i=0;i<fNParamsDip;i++) {
329 printf("DIP%4d ",i);
330 GetParamDip(i)->Print();
331 }
332 }
db83d72f 333 //
db83d72f 334}
335
db83d72f 336//__________________________________________________________________________________________________
1d18ebe0 337Int_t AliMagWrapCheb::FindDipSegment(const Double_t *xyz) const
db83d72f 338{
339 // find the segment containing point xyz. If it is outside find the closest segment
1d18ebe0 340 if (!fNParamsDip) return -1;
db83d72f 341 int xid,yid,zid = TMath::BinarySearch(fNZSegDip,fSegZDip,(Float_t)xyz[2]); // find zsegment
db83d72f 342 //
e27dc75a 343 Bool_t reCheck = kFALSE;
344 while(1) {
345 int ysegBeg = fBegSegYDip[zid];
346 //
347 for (yid=0;yid<fNSegYDip[zid];yid++) if (xyz[1]<fSegYDip[ysegBeg+yid]) break;
348 if ( --yid < 0 ) yid = 0;
349 yid += ysegBeg;
350 //
351 int xsegBeg = fBegSegXDip[yid];
352 for (xid=0;xid<fNSegXDip[yid];xid++) if (xyz[0]<fSegXDip[xsegBeg+xid]) break;
353 //
354 if ( --xid < 0) xid = 0;
355 xid += xsegBeg;
356 //
357 // to make sure that due to the precision problems we did not pick the next Zbin
358 if (!reCheck && (xyz[2] - fSegZDip[zid] < 3.e-5) && zid &&
359 !GetParamDip(fSegIDDip[xid])->IsInside(xyz)) { // check the previous Z bin
360 zid--;
361 reCheck = kTRUE;
362 continue;
363 }
364 break;
365 }
db83d72f 366 return fSegIDDip[xid];
a1dde210 367}
368
1d18ebe0 369//__________________________________________________________________________________________________
370Int_t AliMagWrapCheb::FindSolSegment(const Double_t *rpz) const
371{
372 // find the segment containing point xyz. If it is outside find the closest segment
373 if (!fNParamsSol) return -1;
374 int rid,pid,zid = TMath::BinarySearch(fNZSegSol,fSegZSol,(Float_t)rpz[2]); // find zsegment
1d18ebe0 375 //
e27dc75a 376 Bool_t reCheck = kFALSE;
377 while(1) {
378 int psegBeg = fBegSegPSol[zid];
379 for (pid=0;pid<fNSegPSol[zid];pid++) if (rpz[1]<fSegPSol[psegBeg+pid]) break;
380 if ( --pid < 0 ) pid = 0;
381 pid += psegBeg;
382 //
383 int rsegBeg = fBegSegRSol[pid];
384 for (rid=0;rid<fNSegRSol[pid];rid++) if (rpz[0]<fSegRSol[rsegBeg+rid]) break;
385 if ( --rid < 0) rid = 0;
386 rid += rsegBeg;
387 //
388 // to make sure that due to the precision problems we did not pick the next Zbin
389 if (!reCheck && (rpz[2] - fSegZSol[zid] < 3.e-5) && zid &&
390 !GetParamSol(fSegIDSol[rid])->IsInside(rpz)) { // check the previous Z bin
391 zid--;
392 reCheck = kTRUE;
393 continue;
394 }
395 break;
396 }
1d18ebe0 397 return fSegIDSol[rid];
398}
399
400//__________________________________________________________________________________________________
401Int_t AliMagWrapCheb::FindTPCSegment(const Double_t *rpz) const
402{
403 // find the segment containing point xyz. If it is outside find the closest segment
404 if (!fNParamsTPC) return -1;
405 int rid,pid,zid = TMath::BinarySearch(fNZSegTPC,fSegZTPC,(Float_t)rpz[2]); // find zsegment
1d18ebe0 406 //
e27dc75a 407 Bool_t reCheck = kFALSE;
408 while(1) {
409 int psegBeg = fBegSegPTPC[zid];
410 //
411 for (pid=0;pid<fNSegPTPC[zid];pid++) if (rpz[1]<fSegPTPC[psegBeg+pid]) break;
412 if ( --pid < 0 ) pid = 0;
413 pid += psegBeg;
414 //
415 int rsegBeg = fBegSegRTPC[pid];
416 for (rid=0;rid<fNSegRTPC[pid];rid++) if (rpz[0]<fSegRTPC[rsegBeg+rid]) break;
417 if ( --rid < 0) rid = 0;
418 rid += rsegBeg;
419 //
420 // to make sure that due to the precision problems we did not pick the next Zbin
3f6a4b9c 421 if (!reCheck && (rpz[2] - fSegZTPC[zid] < 3.e-5) && zid &&
422 !GetParamTPCInt(fSegIDTPC[rid])->IsInside(rpz)) { // check the previous Z bin
e27dc75a 423 zid--;
424 reCheck = kTRUE;
425 continue;
426 }
427 break;
428 }
1d18ebe0 429 return fSegIDTPC[rid];
430}
431
47c3d315 432//__________________________________________________________________________________________________
433Int_t AliMagWrapCheb::FindTPCRatSegment(const Double_t *rpz) const
434{
435 // find the segment containing point xyz. If it is outside find the closest segment
436 if (!fNParamsTPCRat) return -1;
437 int rid,pid,zid = TMath::BinarySearch(fNZSegTPCRat,fSegZTPCRat,(Float_t)rpz[2]); // find zsegment
438 //
439 Bool_t reCheck = kFALSE;
440 while(1) {
441 int psegBeg = fBegSegPTPCRat[zid];
442 //
443 for (pid=0;pid<fNSegPTPCRat[zid];pid++) if (rpz[1]<fSegPTPCRat[psegBeg+pid]) break;
444 if ( --pid < 0 ) pid = 0;
445 pid += psegBeg;
446 //
447 int rsegBeg = fBegSegRTPCRat[pid];
448 for (rid=0;rid<fNSegRTPCRat[pid];rid++) if (rpz[0]<fSegRTPCRat[rsegBeg+rid]) break;
449 if ( --rid < 0) rid = 0;
450 rid += rsegBeg;
451 //
452 // to make sure that due to the precision problems we did not pick the next Zbin
3f6a4b9c 453 if (!reCheck && (rpz[2] - fSegZTPCRat[zid] < 3.e-5) && zid &&
454 !GetParamTPCRatInt(fSegIDTPCRat[rid])->IsInside(rpz)) { // check the previous Z bin
47c3d315 455 zid--;
456 reCheck = kTRUE;
457 continue;
458 }
459 break;
460 }
461 return fSegIDTPCRat[rid];
462}
463
1d18ebe0 464
da7cd221 465//__________________________________________________________________________________________
db83d72f 466void AliMagWrapCheb::GetTPCInt(const Double_t *xyz, Double_t *b) const
a1dde210 467{
da7cd221 468 // compute TPC region field integral in cartesian coordinates.
469 // If point is outside of the parameterized region get it at closeset valid point
db83d72f 470 static Double_t rphiz[3];
da7cd221 471 //
472 // TPCInt region
473 // convert coordinates to cyl system
474 CartToCyl(xyz,rphiz);
475#ifndef _BRING_TO_BOUNDARY_
476 if ( (rphiz[2]>GetMaxZTPCInt()||rphiz[2]<GetMinZTPCInt()) ||
477 rphiz[0]>GetMaxRTPCInt()) {for (int i=3;i--;) b[i]=0; return;}
478#endif
479 //
480 GetTPCIntCyl(rphiz,b);
481 //
482 // convert field to cartesian system
483 CylToCartCylB(rphiz, b,b);
484 //
485}
486
47c3d315 487//__________________________________________________________________________________________
488void AliMagWrapCheb::GetTPCRatInt(const Double_t *xyz, Double_t *b) const
489{
490 // compute TPCRat region field integral in cartesian coordinates.
491 // If point is outside of the parameterized region get it at closeset valid point
492 static Double_t rphiz[3];
493 //
494 // TPCRatInt region
495 // convert coordinates to cyl system
496 CartToCyl(xyz,rphiz);
497#ifndef _BRING_TO_BOUNDARY_
498 if ( (rphiz[2]>GetMaxZTPCRatInt()||rphiz[2]<GetMinZTPCRatInt()) ||
499 rphiz[0]>GetMaxRTPCRatInt()) {for (int i=3;i--;) b[i]=0; return;}
500#endif
501 //
502 GetTPCRatIntCyl(rphiz,b);
503 //
504 // convert field to cartesian system
505 CylToCartCylB(rphiz, b,b);
506 //
507}
508
da7cd221 509//__________________________________________________________________________________________
db83d72f 510void AliMagWrapCheb::FieldCylSol(const Double_t *rphiz, Double_t *b) const
da7cd221 511{
512 // compute Solenoid field in Cylindircal coordinates
513 // note: if the point is outside the volume get the field in closest parameterized point
1d18ebe0 514 int id = FindSolSegment(rphiz);
515 if (id<0) return;
516 AliCheb3D* par = GetParamSol(id);
517#ifndef _BRING_TO_BOUNDARY_ // exact matching to fitted volume is requested
518 if (!par->IsInside(rphiz)) return;
519#endif
520 par->Eval(rphiz,b);
521 return;
da7cd221 522 //
523}
524
525//__________________________________________________________________________________________
db83d72f 526Double_t AliMagWrapCheb::FieldCylSolBz(const Double_t *rphiz) const
da7cd221 527{
528 // compute Solenoid field in Cylindircal coordinates
529 // note: if the point is outside the volume get the field in closest parameterized point
1d18ebe0 530 int id = FindSolSegment(rphiz);
531 if (id<0) return 0.;
532 AliCheb3D* par = GetParamSol(id);
533#ifndef _BRING_TO_BOUNDARY_
534 return par->IsInside(rphiz) ? par->Eval(rphiz,2) : 0;
c8f37c50 535#else
1d18ebe0 536 return par->Eval(rphiz,2);
c8f37c50 537#endif
a1dde210 538 //
a1dde210 539}
540
da7cd221 541//__________________________________________________________________________________________
db83d72f 542void AliMagWrapCheb::GetTPCIntCyl(const Double_t *rphiz, Double_t *b) const
a1dde210 543{
da7cd221 544 // compute field integral in TPC region in Cylindircal coordinates
545 // note: the check for the point being inside the parameterized region is done outside
1d18ebe0 546 int id = FindTPCSegment(rphiz);
547 if (id<0) {
548 b[0] = b[1] = b[2] = 0;
549 return;
550 }
0f5e1718 551 if (id>=fNParamsTPC) {
552 AliError(Form("Wrong TPCParam segment %d",id));
553 b[0] = b[1] = b[2] = 0;
554 return;
555 }
1d18ebe0 556 AliCheb3D* par = GetParamTPCInt(id);
47c3d315 557 if (par->IsInside(rphiz)) {
558 par->Eval(rphiz,b);
559 return;
560 }
561 b[0] = b[1] = b[2] = 0;
562 return;
563 //
564}
565
566//__________________________________________________________________________________________
567void AliMagWrapCheb::GetTPCRatIntCyl(const Double_t *rphiz, Double_t *b) const
568{
569 // compute field integral in TPCRat region in Cylindircal coordinates
570 // note: the check for the point being inside the parameterized region is done outside
571 int id = FindTPCRatSegment(rphiz);
572 if (id<0) {
573 b[0] = b[1] = b[2] = 0;
574 return;
575 }
0f5e1718 576 if (id>=fNParamsTPCRat) {
577 AliError(Form("Wrong TPCRatParam segment %d",id));
578 b[0] = b[1] = b[2] = 0;
579 return;
580 }
47c3d315 581 AliCheb3D* par = GetParamTPCRatInt(id);
582 if (par->IsInside(rphiz)) {
583 par->Eval(rphiz,b);
584 return;
585 }
1d18ebe0 586 b[0] = b[1] = b[2] = 0;
587 return;
da7cd221 588 //
a1dde210 589}
590
da7cd221 591
da7cd221 592#ifdef _INC_CREATION_ALICHEB3D_
593//_______________________________________________
594void AliMagWrapCheb::LoadData(const char* inpfile)
595{
596 // read coefficients data from the text file
597 //
598 TString strf = inpfile;
599 gSystem->ExpandPathName(strf);
600 FILE* stream = fopen(strf,"r");
601 if (!stream) {
602 printf("Did not find input file %s\n",strf.Data());
603 return;
604 }
605 //
606 TString buffs;
607 AliCheb3DCalc::ReadLine(buffs,stream);
608 if (!buffs.BeginsWith("START")) {
609 Error("LoadData","Expected: \"START <name>\", found \"%s\"\nStop\n",buffs.Data());
610 exit(1);
611 }
612 if (buffs.First(' ')>0) SetName(buffs.Data()+buffs.First(' ')+1);
613 //
614 // Solenoid part -----------------------------------------------------------
615 AliCheb3DCalc::ReadLine(buffs,stream);
616 if (!buffs.BeginsWith("START SOLENOID")) {
617 Error("LoadData","Expected: \"START SOLENOID\", found \"%s\"\nStop\n",buffs.Data());
618 exit(1);
619 }
620 AliCheb3DCalc::ReadLine(buffs,stream); // nparam
621 int nparSol = buffs.Atoi();
622 //
623 for (int ip=0;ip<nparSol;ip++) {
624 AliCheb3D* cheb = new AliCheb3D();
625 cheb->LoadData(stream);
626 AddParamSol(cheb);
627 }
628 //
629 AliCheb3DCalc::ReadLine(buffs,stream);
630 if (!buffs.BeginsWith("END SOLENOID")) {
631 Error("LoadData","Expected \"END SOLENOID\", found \"%s\"\nStop\n",buffs.Data());
632 exit(1);
633 }
634 //
635 // TPCInt part -----------------------------------------------------------
636 AliCheb3DCalc::ReadLine(buffs,stream);
637 if (!buffs.BeginsWith("START TPCINT")) {
638 Error("LoadData","Expected: \"START TPCINT\", found \"%s\"\nStop\n",buffs.Data());
639 exit(1);
640 }
641 AliCheb3DCalc::ReadLine(buffs,stream); // nparam
642 int nparTPCInt = buffs.Atoi();
643 //
644 for (int ip=0;ip<nparTPCInt;ip++) {
645 AliCheb3D* cheb = new AliCheb3D();
646 cheb->LoadData(stream);
647 AddParamTPCInt(cheb);
648 }
649 //
650 AliCheb3DCalc::ReadLine(buffs,stream);
651 if (!buffs.BeginsWith("END TPCINT")) {
652 Error("LoadData","Expected \"END TPCINT\", found \"%s\"\nStop\n",buffs.Data());
653 exit(1);
654 }
655 //
47c3d315 656 // TPCRatInt part -----------------------------------------------------------
657 AliCheb3DCalc::ReadLine(buffs,stream);
658 if (!buffs.BeginsWith("START TPCRatINT")) {
659 Error("LoadData","Expected: \"START TPCRatINT\", found \"%s\"\nStop\n",buffs.Data());
660 exit(1);
661 }
662 AliCheb3DCalc::ReadLine(buffs,stream); // nparam
663 int nparTPCRatInt = buffs.Atoi();
664 //
665 for (int ip=0;ip<nparTPCRatInt;ip++) {
666 AliCheb3D* cheb = new AliCheb3D();
667 cheb->LoadData(stream);
668 AddParamTPCRatInt(cheb);
669 }
670 //
671 AliCheb3DCalc::ReadLine(buffs,stream);
672 if (!buffs.BeginsWith("END TPCRatINT")) {
673 Error("LoadData","Expected \"END TPCRatINT\", found \"%s\"\nStop\n",buffs.Data());
674 exit(1);
675 }
676 //
da7cd221 677 // Dipole part -----------------------------------------------------------
678 AliCheb3DCalc::ReadLine(buffs,stream);
679 if (!buffs.BeginsWith("START DIPOLE")) {
680 Error("LoadData","Expected: \"START DIPOLE\", found \"%s\"\nStop\n",buffs.Data());
681 exit(1);
682 }
683 AliCheb3DCalc::ReadLine(buffs,stream); // nparam
684 int nparDip = buffs.Atoi();
685 //
686 for (int ip=0;ip<nparDip;ip++) {
687 AliCheb3D* cheb = new AliCheb3D();
688 cheb->LoadData(stream);
689 AddParamDip(cheb);
690 }
691 //
692 AliCheb3DCalc::ReadLine(buffs,stream);
693 if (!buffs.BeginsWith("END DIPOLE")) {
8947c207 694 Error("LoadData","Expected \"END DIPOLE\", found \"%s\"\nStop\n",buffs.Data());
da7cd221 695 exit(1);
696 }
697 //
698 AliCheb3DCalc::ReadLine(buffs,stream);
8947c207 699 if (!buffs.BeginsWith("END DIPOLE") || !buffs.Contains(GetName())) {
700 Error("LoadData","Expected: \"END DIPOLE\", found \"%s\"\nStop\n",buffs.Data());
da7cd221 701 exit(1);
702 }
703 //
704 // ---------------------------------------------------------------------------
705 fclose(stream);
706 BuildTableSol();
da7cd221 707 BuildTableDip();
1d18ebe0 708 BuildTableTPCInt();
47c3d315 709 BuildTableTPCRatInt();
1d18ebe0 710 //
da7cd221 711 printf("Loaded magnetic field \"%s\" from %s\n",GetName(),strf.Data());
712 //
713}
1d18ebe0 714
715//__________________________________________________________________________________________
716void AliMagWrapCheb::BuildTableSol()
717{
339fbe23 718 // build lookup table
1d18ebe0 719 BuildTable(fNParamsSol,fParamsSol,
720 fNZSegSol,fNPSegSol,fNRSegSol,
721 fMinZSol,fMaxZSol,
722 &fSegZSol,&fSegPSol,&fSegRSol,
723 &fBegSegPSol,&fNSegPSol,
724 &fBegSegRSol,&fNSegRSol,
725 &fSegIDSol);
726}
727
728//__________________________________________________________________________________________
729void AliMagWrapCheb::BuildTableDip()
730{
339fbe23 731 // build lookup table
1d18ebe0 732 BuildTable(fNParamsDip,fParamsDip,
733 fNZSegDip,fNYSegDip,fNXSegDip,
734 fMinZDip,fMaxZDip,
735 &fSegZDip,&fSegYDip,&fSegXDip,
736 &fBegSegYDip,&fNSegYDip,
737 &fBegSegXDip,&fNSegXDip,
738 &fSegIDDip);
739}
740
741//__________________________________________________________________________________________
742void AliMagWrapCheb::BuildTableTPCInt()
743{
339fbe23 744 // build lookup table
1d18ebe0 745 BuildTable(fNParamsTPC,fParamsTPC,
746 fNZSegTPC,fNPSegTPC,fNRSegTPC,
747 fMinZTPC,fMaxZTPC,
748 &fSegZTPC,&fSegPTPC,&fSegRTPC,
749 &fBegSegPTPC,&fNSegPTPC,
750 &fBegSegRTPC,&fNSegRTPC,
751 &fSegIDTPC);
752}
753
47c3d315 754//__________________________________________________________________________________________
755void AliMagWrapCheb::BuildTableTPCRatInt()
756{
339fbe23 757 // build lookup table
47c3d315 758 BuildTable(fNParamsTPCRat,fParamsTPCRat,
759 fNZSegTPCRat,fNPSegTPCRat,fNRSegTPCRat,
760 fMinZTPCRat,fMaxZTPCRat,
761 &fSegZTPCRat,&fSegPTPCRat,&fSegRTPCRat,
762 &fBegSegPTPCRat,&fNSegPTPCRat,
763 &fBegSegRTPCRat,&fNSegRTPCRat,
764 &fSegIDTPCRat);
765}
766
da7cd221 767#endif
ff66b122 768
da7cd221 769//_______________________________________________
770#ifdef _INC_CREATION_ALICHEB3D_
771
772//__________________________________________________________________________________________
773AliMagWrapCheb::AliMagWrapCheb(const char* inputFile) :
1d18ebe0 774 fNParamsSol(0),fNZSegSol(0),fNPSegSol(0),fNRSegSol(0),
775 fSegZSol(0),fSegPSol(0),fSegRSol(0),
776 fBegSegPSol(0),fNSegPSol(0),fBegSegRSol(0),fNSegRSol(0),fSegIDSol(0),fMinZSol(1.e6),fMaxZSol(-1.e6),fParamsSol(0),fMaxRSol(0),
da7cd221 777//
1d18ebe0 778 fNParamsTPC(0),fNZSegTPC(0),fNPSegTPC(0),fNRSegTPC(0),
779 fSegZTPC(0),fSegPTPC(0),fSegRTPC(0),
780 fBegSegPTPC(0),fNSegPTPC(0),fBegSegRTPC(0),fNSegRTPC(0),fSegIDTPC(0),fMinZTPC(1.e6),fMaxZTPC(-1.e6),fParamsTPC(0),fMaxRTPC(0),
47c3d315 781//
782 fNParamsTPCRat(0),fNZSegTPCRat(0),fNPSegTPCRat(0),fNRSegTPCRat(0),
783 fSegZTPCRat(0),fSegPTPCRat(0),fSegRTPCRat(0),
784 fBegSegPTPCRat(0),fNSegPTPCRat(0),fBegSegRTPCRat(0),fNSegRTPCRat(0),fSegIDTPCRat(0),fMinZTPCRat(1.e6),fMaxZTPCRat(-1.e6),fParamsTPCRat(0),fMaxRTPCRat(0),
da7cd221 785//
1d18ebe0 786 fNParamsDip(0),fNZSegDip(0),fNYSegDip(0),fNXSegDip(0),
787 fSegZDip(0),fSegYDip(0),fSegXDip(0),
788 fBegSegYDip(0),fNSegYDip(0),fBegSegXDip(0),fNSegXDip(0),fSegIDDip(0),fMinZDip(1.e6),fMaxZDip(-1.e6),fParamsDip(0)
da7cd221 789//
790{
791 // construct from coeffs from the text file
792 LoadData(inputFile);
793}
794
795//__________________________________________________________________________________________
796void AliMagWrapCheb::AddParamSol(const AliCheb3D* param)
797{
798 // adds new parameterization piece for Sol
799 // NOTE: pieces must be added strictly in increasing R then increasing Z order
800 //
801 if (!fParamsSol) fParamsSol = new TObjArray();
802 fParamsSol->Add( (AliCheb3D*)param );
803 fNParamsSol++;
1d18ebe0 804 if (fMaxRSol<param->GetBoundMax(0)) fMaxRSol = param->GetBoundMax(0);
da7cd221 805 //
806}
807
808//__________________________________________________________________________________________
809void AliMagWrapCheb::AddParamTPCInt(const AliCheb3D* param)
810{
811 // adds new parameterization piece for TPCInt
812 // NOTE: pieces must be added strictly in increasing R then increasing Z order
813 //
1d18ebe0 814 if (!fParamsTPC) fParamsTPC = new TObjArray();
815 fParamsTPC->Add( (AliCheb3D*)param);
816 fNParamsTPC++;
817 if (fMaxRTPC<param->GetBoundMax(0)) fMaxRTPC = param->GetBoundMax(0);
da7cd221 818 //
819}
820
47c3d315 821//__________________________________________________________________________________________
822void AliMagWrapCheb::AddParamTPCRatInt(const AliCheb3D* param)
823{
824 // adds new parameterization piece for TPCRatInt
825 // NOTE: pieces must be added strictly in increasing R then increasing Z order
826 //
827 if (!fParamsTPCRat) fParamsTPCRat = new TObjArray();
828 fParamsTPCRat->Add( (AliCheb3D*)param);
829 fNParamsTPCRat++;
830 if (fMaxRTPCRat<param->GetBoundMax(0)) fMaxRTPCRat = param->GetBoundMax(0);
831 //
832}
833
da7cd221 834//__________________________________________________________________________________________
835void AliMagWrapCheb::AddParamDip(const AliCheb3D* param)
a1dde210 836{
da7cd221 837 // adds new parameterization piece for Dipole
a1dde210 838 //
da7cd221 839 if (!fParamsDip) fParamsDip = new TObjArray();
840 fParamsDip->Add( (AliCheb3D*)param);
841 fNParamsDip++;
842 //
843}
844
8947c207 845//__________________________________________________________________________________________
846void AliMagWrapCheb::ResetDip()
847{
848 // clean Dip field (used for update)
849 if (fNParamsDip) {
850 delete fParamsDip; fParamsDip = 0;
851 delete[] fSegZDip; fSegZDip = 0;
852 delete[] fSegXDip; fSegXDip = 0;
853 delete[] fSegYDip; fSegYDip = 0;
854 delete[] fBegSegYDip; fBegSegYDip = 0;
855 delete[] fNSegYDip; fNSegYDip = 0;
856 delete[] fBegSegXDip; fBegSegXDip = 0;
857 delete[] fNSegXDip; fNSegXDip = 0;
858 delete[] fSegIDDip; fSegIDDip = 0;
859 }
860 fNParamsDip = fNZSegDip = fNXSegDip = fNYSegDip = 0;
861 fMinZDip = 1e6;
862 fMaxZDip = -1e6;
863 //
864}
865
866//__________________________________________________________________________________________
867void AliMagWrapCheb::ResetSol()
868{
869 // clean Sol field (used for update)
870 if (fNParamsSol) {
871 delete fParamsSol; fParamsSol = 0;
872 delete[] fSegZSol; fSegZSol = 0;
873 delete[] fSegPSol; fSegPSol = 0;
874 delete[] fSegRSol; fSegRSol = 0;
875 delete[] fBegSegPSol; fBegSegPSol = 0;
876 delete[] fNSegPSol; fNSegPSol = 0;
877 delete[] fBegSegRSol; fBegSegRSol = 0;
878 delete[] fNSegRSol; fNSegRSol = 0;
879 delete[] fSegIDSol; fSegIDSol = 0;
880 }
881 fNParamsSol = fNZSegSol = fNPSegSol = fNRSegSol = 0;
882 fMinZSol = 1e6;
883 fMaxZSol = -1e6;
884 fMaxRSol = 0;
885 //
886}
887
da7cd221 888//__________________________________________________________________________________________
889void AliMagWrapCheb::ResetTPCInt()
890{
891 // clean TPC field integral (used for update)
1d18ebe0 892 if (fNParamsTPC) {
893 delete fParamsTPC; fParamsTPC = 0;
894 delete[] fSegZTPC; fSegZTPC = 0;
895 delete[] fSegPTPC; fSegPTPC = 0;
896 delete[] fSegRTPC; fSegRTPC = 0;
897 delete[] fBegSegPTPC; fBegSegPTPC = 0;
898 delete[] fNSegPTPC; fNSegPTPC = 0;
899 delete[] fBegSegRTPC; fBegSegRTPC = 0;
900 delete[] fNSegRTPC; fNSegRTPC = 0;
901 delete[] fSegIDTPC; fSegIDTPC = 0;
902 }
903 fNParamsTPC = fNZSegTPC = fNPSegTPC = fNRSegTPC = 0;
904 fMinZTPC = 1e6;
905 fMaxZTPC = -1e6;
906 fMaxRTPC = 0;
907 //
908}
909
47c3d315 910//__________________________________________________________________________________________
911void AliMagWrapCheb::ResetTPCRatInt()
912{
913 // clean TPCRat field integral (used for update)
914 if (fNParamsTPCRat) {
915 delete fParamsTPCRat; fParamsTPCRat = 0;
916 delete[] fSegZTPCRat; fSegZTPCRat = 0;
917 delete[] fSegPTPCRat; fSegPTPCRat = 0;
918 delete[] fSegRTPCRat; fSegRTPCRat = 0;
919 delete[] fBegSegPTPCRat; fBegSegPTPCRat = 0;
920 delete[] fNSegPTPCRat; fNSegPTPCRat = 0;
921 delete[] fBegSegRTPCRat; fBegSegRTPCRat = 0;
922 delete[] fNSegRTPCRat; fNSegRTPCRat = 0;
923 delete[] fSegIDTPCRat; fSegIDTPCRat = 0;
924 }
925 fNParamsTPCRat = fNZSegTPCRat = fNPSegTPCRat = fNRSegTPCRat = 0;
926 fMinZTPCRat = 1e6;
927 fMaxZTPCRat = -1e6;
928 fMaxRTPCRat = 0;
929 //
930}
931
1d18ebe0 932
933//__________________________________________________
934void AliMagWrapCheb::BuildTable(Int_t npar,TObjArray *parArr, Int_t &nZSeg, Int_t &nYSeg, Int_t &nXSeg,
935 Float_t &minZ,Float_t &maxZ,
936 Float_t **segZ,Float_t **segY,Float_t **segX,
937 Int_t **begSegY,Int_t **nSegY,
938 Int_t **begSegX,Int_t **nSegX,
939 Int_t **segID)
940{
941 // build lookup table for dipole
942 //
943 if (npar<1) return;
944 TArrayF segYArr,segXArr;
945 TArrayI begSegYDipArr,begSegXDipArr;
946 TArrayI nSegYDipArr,nSegXDipArr;
947 TArrayI segIDArr;
948 float *tmpSegZ,*tmpSegY,*tmpSegX;
949 //
950 // create segmentation in Z
951 nZSeg = SegmentDimension(&tmpSegZ, parArr, npar, 2, 1,-1, 1,-1, 1,-1) - 1;
952 nYSeg = 0;
953 nXSeg = 0;
954 //
955 // for each Z slice create segmentation in Y
956 begSegYDipArr.Set(nZSeg);
957 nSegYDipArr.Set(nZSeg);
958 float xyz[3];
959 for (int iz=0;iz<nZSeg;iz++) {
960 printf("\nZSegment#%d %+e : %+e\n",iz,tmpSegZ[iz],tmpSegZ[iz+1]);
961 int ny = SegmentDimension(&tmpSegY, parArr, npar, 1,
962 1,-1, 1,-1, tmpSegZ[iz],tmpSegZ[iz+1]) - 1;
963 segYArr.Set(ny + nYSeg);
964 for (int iy=0;iy<ny;iy++) segYArr[nYSeg+iy] = tmpSegY[iy];
965 begSegYDipArr[iz] = nYSeg;
966 nSegYDipArr[iz] = ny;
967 printf(" Found %d YSegments, to start from %d\n",ny, begSegYDipArr[iz]);
968 //
969 // for each slice in Z and Y create segmentation in X
970 begSegXDipArr.Set(nYSeg+ny);
971 nSegXDipArr.Set(nYSeg+ny);
972 xyz[2] = (tmpSegZ[iz]+tmpSegZ[iz+1])/2.; // mean Z of this segment
973 //
974 for (int iy=0;iy<ny;iy++) {
975 int isg = nYSeg+iy;
976 printf("\n YSegment#%d %+e : %+e\n",iy, tmpSegY[iy],tmpSegY[iy+1]);
977 int nx = SegmentDimension(&tmpSegX, parArr, npar, 0,
978 1,-1, tmpSegY[iy],tmpSegY[iy+1], tmpSegZ[iz],tmpSegZ[iz+1]) - 1;
979 //
980 segXArr.Set(nx + nXSeg);
981 for (int ix=0;ix<nx;ix++) segXArr[nXSeg+ix] = tmpSegX[ix];
982 begSegXDipArr[isg] = nXSeg;
983 nSegXDipArr[isg] = nx;
984 printf(" Found %d XSegments, to start from %d\n",nx, begSegXDipArr[isg]);
985 //
986 segIDArr.Set(nXSeg+nx);
987 //
988 // find corresponding params
989 xyz[1] = (tmpSegY[iy]+tmpSegY[iy+1])/2.; // mean Y of this segment
990 //
991 for (int ix=0;ix<nx;ix++) {
992 xyz[0] = (tmpSegX[ix]+tmpSegX[ix+1])/2.; // mean X of this segment
993 for (int ipar=0;ipar<npar;ipar++) {
994 AliCheb3D* cheb = (AliCheb3D*) parArr->At(ipar);
995 if (!cheb->IsInside(xyz)) continue;
996 segIDArr[nXSeg+ix] = ipar;
997 break;
998 }
999 }
1000 nXSeg += nx;
1001 //
1002 delete[] tmpSegX;
1003 }
1004 delete[] tmpSegY;
1005 nYSeg += ny;
1006 }
1007 //
1008 minZ = tmpSegZ[0];
1009 maxZ = tmpSegZ[nZSeg];
1010 (*segZ) = new Float_t[nZSeg];
1011 for (int i=nZSeg;i--;) (*segZ)[i] = tmpSegZ[i];
1012 delete[] tmpSegZ;
1013 //
1014 (*segY) = new Float_t[nYSeg];
1015 (*segX) = new Float_t[nXSeg];
1016 (*begSegY) = new Int_t[nZSeg];
1017 (*nSegY) = new Int_t[nZSeg];
1018 (*begSegX) = new Int_t[nYSeg];
1019 (*nSegX) = new Int_t[nYSeg];
1020 (*segID) = new Int_t[nXSeg];
1021 //
1022 for (int i=nYSeg;i--;) (*segY)[i] = segYArr[i];
1023 for (int i=nXSeg;i--;) (*segX)[i] = segXArr[i];
1024 for (int i=nZSeg;i--;) {(*begSegY)[i] = begSegYDipArr[i]; (*nSegY)[i] = nSegYDipArr[i];}
1025 for (int i=nYSeg;i--;) {(*begSegX)[i] = begSegXDipArr[i]; (*nSegX)[i] = nSegXDipArr[i];}
1026 for (int i=nXSeg;i--;) {(*segID)[i] = segIDArr[i];}
da7cd221 1027 //
1028}
1029
1d18ebe0 1030/*
da7cd221 1031//__________________________________________________
1032void AliMagWrapCheb::BuildTableDip()
1033{
1034 // build lookup table for dipole
1035 //
82d1e556 1036 if (fNParamsDip<1) return;
da7cd221 1037 TArrayF segY,segX;
1038 TArrayI begSegYDip,begSegXDip;
1039 TArrayI nsegYDip,nsegXDip;
1040 TArrayI segID;
1041 float *tmpSegZ,*tmpSegY,*tmpSegX;
1042 //
1043 // create segmentation in Z
1d18ebe0 1044 fNZSegDip = SegmentDimension(&tmpSegZ, fParamsDip, fNParamsDip, 2, 1,-1, 1,-1, 1,-1) - 1;
da7cd221 1045 fNYSegDip = 0;
1046 fNXSegDip = 0;
1047 //
1048 // for each Z slice create segmentation in Y
1049 begSegYDip.Set(fNZSegDip);
1050 nsegYDip.Set(fNZSegDip);
1051 float xyz[3];
1052 for (int iz=0;iz<fNZSegDip;iz++) {
1053 printf("\nZSegment#%d %+e : %+e\n",iz,tmpSegZ[iz],tmpSegZ[iz+1]);
1d18ebe0 1054 int ny = SegmentDimension(&tmpSegY, fParamsDip, fNParamsDip, 1,
da7cd221 1055 1,-1, 1,-1, tmpSegZ[iz],tmpSegZ[iz+1]) - 1;
1056 segY.Set(ny + fNYSegDip);
1057 for (int iy=0;iy<ny;iy++) segY[fNYSegDip+iy] = tmpSegY[iy];
1058 begSegYDip[iz] = fNYSegDip;
1059 nsegYDip[iz] = ny;
1060 printf(" Found %d YSegments, to start from %d\n",ny, begSegYDip[iz]);
1061 //
1062 // for each slice in Z and Y create segmentation in X
1063 begSegXDip.Set(fNYSegDip+ny);
1064 nsegXDip.Set(fNYSegDip+ny);
1065 xyz[2] = (tmpSegZ[iz]+tmpSegZ[iz+1])/2.; // mean Z of this segment
1066 //
1067 for (int iy=0;iy<ny;iy++) {
1068 int isg = fNYSegDip+iy;
1069 printf("\n YSegment#%d %+e : %+e\n",iy, tmpSegY[iy],tmpSegY[iy+1]);
1d18ebe0 1070 int nx = SegmentDimension(&tmpSegX, fParamsDip, fNParamsDip, 0,
1071 1,-1, tmpSegY[iy],tmpSegY[iy+1], tmpSegZ[iz],tmpSegZ[iz+1]) - 1;
da7cd221 1072 //
1073 segX.Set(nx + fNXSegDip);
1074 for (int ix=0;ix<nx;ix++) segX[fNXSegDip+ix] = tmpSegX[ix];
1075 begSegXDip[isg] = fNXSegDip;
1076 nsegXDip[isg] = nx;
1077 printf(" Found %d XSegments, to start from %d\n",nx, begSegXDip[isg]);
1078 //
1079 segID.Set(fNXSegDip+nx);
1080 //
1081 // find corresponding params
1082 xyz[1] = (tmpSegY[iy]+tmpSegY[iy+1])/2.; // mean Y of this segment
1083 //
1084 for (int ix=0;ix<nx;ix++) {
1085 xyz[0] = (tmpSegX[ix]+tmpSegX[ix+1])/2.; // mean X of this segment
1086 for (int ipar=0;ipar<fNParamsDip;ipar++) {
1087 AliCheb3D* cheb = (AliCheb3D*) fParamsDip->At(ipar);
1088 if (!cheb->IsInside(xyz)) continue;
1089 segID[fNXSegDip+ix] = ipar;
1090 break;
95d9681f 1091 }
da7cd221 1092 }
1093 fNXSegDip += nx;
1094 //
1095 delete[] tmpSegX;
5de97576 1096 }
da7cd221 1097 delete[] tmpSegY;
1098 fNYSegDip += ny;
1099 }
1100 //
1101 fMinZDip = tmpSegZ[0];
1102 fMaxZDip = tmpSegZ[fNZSegDip];
1103 fSegZDip = new Float_t[fNZSegDip];
1104 for (int i=fNZSegDip;i--;) fSegZDip[i] = tmpSegZ[i];
1105 delete[] tmpSegZ;
1106 //
1107 fSegYDip = new Float_t[fNYSegDip];
1108 fSegXDip = new Float_t[fNXSegDip];
1109 fBegSegYDip = new Int_t[fNZSegDip];
1110 fNSegYDip = new Int_t[fNZSegDip];
1111 fBegSegXDip = new Int_t[fNYSegDip];
1112 fNSegXDip = new Int_t[fNYSegDip];
1113 fSegIDDip = new Int_t[fNXSegDip];
1114 //
1115 for (int i=fNYSegDip;i--;) fSegYDip[i] = segY[i];
1116 for (int i=fNXSegDip;i--;) fSegXDip[i] = segX[i];
1117 for (int i=fNZSegDip;i--;) {fBegSegYDip[i] = begSegYDip[i]; fNSegYDip[i] = nsegYDip[i];}
1118 for (int i=fNYSegDip;i--;) {fBegSegXDip[i] = begSegXDip[i]; fNSegXDip[i] = nsegXDip[i];}
1119 for (int i=fNXSegDip;i--;) {fSegIDDip[i] = segID[i];}
1120 //
a1dde210 1121}
1d18ebe0 1122*/
a1dde210 1123
1d18ebe0 1124//________________________________________________________________
da7cd221 1125void AliMagWrapCheb::SaveData(const char* outfile) const
1126{
1127 // writes coefficients data to output text file
1128 TString strf = outfile;
1129 gSystem->ExpandPathName(strf);
1130 FILE* stream = fopen(strf,"w+");
1131 //
1132 // Sol part ---------------------------------------------------------
1133 fprintf(stream,"# Set of Chebyshev parameterizations for ALICE magnetic field\nSTART %s\n",GetName());
1134 fprintf(stream,"START SOLENOID\n#Number of pieces\n%d\n",fNParamsSol);
1135 for (int ip=0;ip<fNParamsSol;ip++) GetParamSol(ip)->SaveData(stream);
1136 fprintf(stream,"#\nEND SOLENOID\n");
1137 //
1138 // TPCInt part ---------------------------------------------------------
1139 fprintf(stream,"# Set of Chebyshev parameterizations for ALICE magnetic field\nSTART %s\n",GetName());
1d18ebe0 1140 fprintf(stream,"START TPCINT\n#Number of pieces\n%d\n",fNParamsTPC);
1141 for (int ip=0;ip<fNParamsTPC;ip++) GetParamTPCInt(ip)->SaveData(stream);
da7cd221 1142 fprintf(stream,"#\nEND TPCINT\n");
1143 //
47c3d315 1144 // TPCRatInt part ---------------------------------------------------------
1145 fprintf(stream,"# Set of Chebyshev parameterizations for ALICE magnetic field\nSTART %s\n",GetName());
1146 fprintf(stream,"START TPCRatINT\n#Number of pieces\n%d\n",fNParamsTPCRat);
1147 for (int ip=0;ip<fNParamsTPCRat;ip++) GetParamTPCRatInt(ip)->SaveData(stream);
1148 fprintf(stream,"#\nEND TPCRatINT\n");
1149 //
da7cd221 1150 // Dip part ---------------------------------------------------------
1151 fprintf(stream,"START DIPOLE\n#Number of pieces\n%d\n",fNParamsDip);
1152 for (int ip=0;ip<fNParamsDip;ip++) GetParamDip(ip)->SaveData(stream);
1153 fprintf(stream,"#\nEND DIPOLE\n");
1154 //
1155 fprintf(stream,"#\nEND %s\n",GetName());
1156 //
1157 fclose(stream);
1158 //
1159}
1160
1d18ebe0 1161Int_t AliMagWrapCheb::SegmentDimension(float** seg,const TObjArray* par,int npar, int dim,
da7cd221 1162 float xmn,float xmx,float ymn,float ymx,float zmn,float zmx)
1163{
1164 // find all boundaries in deimension dim for boxes in given region.
1165 // if mn>mx for given projection the check is not done for it.
1166 float *tmpC = new float[2*npar];
1167 int *tmpInd = new int[2*npar];
1168 int nseg0 = 0;
1169 for (int ip=0;ip<npar;ip++) {
1170 AliCheb3D* cheb = (AliCheb3D*) par->At(ip);
1171 if (xmn<xmx && (cheb->GetBoundMin(0)>(xmx+xmn)/2 || cheb->GetBoundMax(0)<(xmn+xmx)/2)) continue;
1172 if (ymn<ymx && (cheb->GetBoundMin(1)>(ymx+ymn)/2 || cheb->GetBoundMax(1)<(ymn+ymx)/2)) continue;
1173 if (zmn<zmx && (cheb->GetBoundMin(2)>(zmx+zmn)/2 || cheb->GetBoundMax(2)<(zmn+zmx)/2)) continue;
1174 //
1175 tmpC[nseg0++] = cheb->GetBoundMin(dim);
1176 tmpC[nseg0++] = cheb->GetBoundMax(dim);
1177 }
1178 // range Dim's boundaries in increasing order
1179 TMath::Sort(nseg0,tmpC,tmpInd,kFALSE);
1180 // count number of really different Z's
1181 int nseg = 0;
1182 float cprev = -1e6;
1183 for (int ip=0;ip<nseg0;ip++) {
1184 if (TMath::Abs(cprev-tmpC[ tmpInd[ip] ])>1e-4) {
1185 cprev = tmpC[ tmpInd[ip] ];
1186 nseg++;
1187 }
1188 else tmpInd[ip] = -1; // supress redundant Z
1189 }
1190 //
1191 *seg = new float[nseg]; // create final Z segmenations
1192 nseg = 0;
1193 for (int ip=0;ip<nseg0;ip++) if (tmpInd[ip]>=0) (*seg)[nseg++] = tmpC[ tmpInd[ip] ];
1194 //
1195 delete[] tmpC;
1196 delete[] tmpInd;
1197 return nseg;
1198}
1199
1200#endif
1201