1 /**************************************************************************
2 * Copyright(c) 1998-1999, ALICE Experiment at CERN, All rights reserved. *
4 * Author: The ALICE Off-line Project. *
5 * Contributors are mentioned in the code where appropriate. *
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 **************************************************************************/
18 //-------------------------------------------------------------------------
19 // Constant magnetic field class
20 // Used by AliRun class
22 //-------------------------------------------------------------------------
31 //________________________________________
35 fBeamType(kBeamTypepp),
44 // Default constructor
48 //________________________________________
49 AliMagFC::AliMagFC(const char *name, const char *title, Int_t integ,
50 Float_t factor, Float_t fmax)
51 : AliMagF(name,title,integ,factor,fmax),
53 fBeamType(kBeamTypepp),
63 // Standard constructor
70 //________________________________________
71 void AliMagFC::Field(Float_t *x, Float_t *b) const
74 // Method to return the field in a point
78 if(TMath::Abs(x[2])<700 && x[0]*x[0]+(x[1]+30)*(x[1]+30) < 560*560) {
82 if(-725 >= x[2] && x[2] >= -1225 ){
83 Float_t dz = TMath::Abs(-975-x[2])*0.01;
84 b[0] = - (1-0.1*dz*dz)*7;
98 AliFatal(Form("Invalid field map for constant field %d",fMap));
102 //___________________________________________________
103 void AliMagFC::ZDCField(Float_t *x, Float_t *b) const
105 // ---- This is the ZDC part
107 Float_t rad2 = x[0] * x[0] + x[1] * x[1];
108 static Bool_t init = kFALSE;
112 //////////////////////////////////////////////////////////////////////
113 // ---- Magnetic field values (according to beam type and energy) ----
114 if(fBeamType==kBeamTypepp && fBeamEnergy == 5000.){
116 fQuadGradient = 15.7145;
117 fDipoleField = 27.0558;
119 fCCorrField = 9.7017;
121 fACorr1Field = -13.2143;
122 fACorr2Field = -11.9909;
123 } else if (fBeamType == kBeamTypepp && fBeamEnergy == 450.) {
125 Float_t const kEnergyRatio = fBeamEnergy / 7000.;
127 fQuadGradient = 22.0002 * kEnergyRatio;
128 fDipoleField = 37.8781 * kEnergyRatio;
130 fCCorrField = 9.6908;
132 fACorr1Field = -13.2014;
133 fACorr2Field = -9.6908;
134 } else if ((fBeamType == kBeamTypepp && fBeamEnergy == 7000.) ||
135 (fBeamType == kBeamTypeAA))
137 // Pb-Pb @ 2.7+2.7 TeV or p-p @ 7+7 TeV
138 fQuadGradient = 22.0002;
139 fDipoleField = 37.8781;
141 fCCorrField = 9.6908;
143 fACorr1Field = -13.2014;
144 fACorr2Field = -9.6908;
147 printf("Machine field %5d %13.3f %13.3f \n", fBeamType, fBeamEnergy, fDipoleField);
151 // SIDE C **************************************************
153 if(x[2] < kCCorrBegin && x[2] > kCCorrEnd && rad2 < kCCorrSqRadius){
160 else if(x[2] < kCQ1Begin && x[2] > kCQ1End && rad2 < kCQ1SqRadius){
161 b[0] = fQuadGradient*x[1];
162 b[1] = fQuadGradient*x[0];
165 else if(x[2] < kCQ2Begin && x[2] > kCQ2End && rad2 < kCQ2SqRadius){
166 b[0] = -fQuadGradient*x[1];
167 b[1] = -fQuadGradient*x[0];
170 else if(x[2] < kCQ3Begin && x[2] > kCQ3End && rad2 < kCQ3SqRadius){
171 b[0] = -fQuadGradient*x[1];
172 b[1] = -fQuadGradient*x[0];
175 else if(x[2] < kCQ4Begin && x[2] > kCQ4End && rad2 < kCQ4SqRadius){
176 b[0] = fQuadGradient*x[1];
177 b[1] = fQuadGradient*x[0];
180 else if(x[2] < kCD1Begin && x[2] > kCD1End && rad2 < kCD1SqRadius){
185 else if(x[2] < kCD2Begin && x[2] > kCD2End){
186 if(((x[0]-kCD2XCentre1)*(x[0]-kCD2XCentre1)+(x[1]*x[1]))<kCD2SqRadius
187 || ((x[0]-kCD2XCentre2)*(x[0]-kCD2XCentre2)+(x[1]*x[1]))<kCD2SqRadius){
188 b[1] = -fDipoleField;
195 // SIDE A **************************************************
197 if(fCompensator && (x[2] > kACorr1Begin && x[2] < kACorr1End) && rad2 < kCCorr1SqRadius) {
198 // Compensator magnet at z = 1075 m
207 if(x[2] > kACorr2Begin && x[2] < kACorr2End && rad2 < kCCorr2SqRadius){
214 else if(x[2] > kAQ1Begin && x[2] < kAQ1End && rad2 < kAQ1SqRadius){
215 // First quadrupole of inner triplet de-focussing in x-direction
216 b[0] = -fQuadGradient*x[1];
217 b[1] = -fQuadGradient*x[0];
220 else if(x[2] > kAQ2Begin && x[2] < kAQ2End && rad2 < kAQ2SqRadius){
221 b[0] = fQuadGradient*x[1];
222 b[1] = fQuadGradient*x[0];
225 else if(x[2] > kAQ3Begin && x[2] < kAQ3End && rad2 < kAQ3SqRadius){
226 b[0] = fQuadGradient*x[1];
227 b[1] = fQuadGradient*x[0];
230 else if(x[2] > kAQ4Begin && x[2] < kAQ4End && rad2 < kAQ4SqRadius){
231 b[0] = -fQuadGradient*x[1];
232 b[1] = -fQuadGradient*x[0];
235 else if(x[2] > kAD1Begin && x[2] < kAD1End && rad2 < kAD1SqRadius){
237 b[1] = -fDipoleField;
240 else if(x[2] > kAD2Begin && x[2] < kAD2End){
241 if(((x[0]-kAD2XCentre1)*(x[0]-kAD2XCentre1)+(x[1]*x[1])) < kAD2SqRadius
242 || ((x[0]-kAD2XCentre2)*(x[0]-kAD2XCentre2)+(x[1]*x[1])) < kAD2SqRadius){