00001
00002
00003
00004
00005
00006
00007
00008
00009
00010
00011
00012
00013
00014
00015
00016
00017
00018
00019
00020
00021
00022
00023
00024
00025
00026
00027
00028
00029
00030
00031
00032
00033
00034
00035
00036
00037
00038
00039
00040
00041
00042
00043
00044
00045
00046
00047
00048
00049
00050
00051
00053
00054
00055
00057 #ifndef StarMagField_H
00058 #define StarMagField_H
00059
00060 #include <math.h>
00061 #include <stdio.h>
00062 #include <stdlib.h>
00063 #include <Stiostream.h>
00064 #include <Rtypes.h>
00065 class StarMagField {
00066 public:
00067 enum EBField { kUndefined = 0, kConstant = 1, kMapped = 2, kChain = 3 } ;
00068 enum ESmFSizes {nZ = 57, nR = 28, nPhi = 37, nZSteel = 16, nRSteel = 115, nPhiSteel = 25};
00069 static void Search ( Int_t N, const Float_t Xarray[], Float_t x, Int_t &low ) ;
00070 virtual Float_t Interpolate ( const Float_t Xarray[], const Float_t Yarray[],
00071 const Int_t ORDER, const Float_t x ) ;
00072 virtual void Interpolate2DBfield ( const Float_t r, const Float_t z,
00073 Float_t &Br_value, Float_t &Bz_value ) ;
00074 virtual void Interpolate2ExtDBfield ( const Float_t r, const Float_t z,
00075 Float_t &Br_value, Float_t &Bz_value ) ;
00076 virtual void Interpolate3DBfield ( const Float_t r, const Float_t z, const Float_t phi,
00077 Float_t &Br_value, Float_t &Bz_value, Float_t &Bphi_value ) ;
00078
00079 private:
00080
00081 virtual void ReadField ( ) ;
00082 public:
00083
00084
00085 virtual void Interpolate3DBSteelfield ( const Float_t r, const Float_t z, const Float_t phi,
00086 Float_t &Br_value, Float_t &Bz_value, Float_t &Bphi_value );
00087
00088
00089
00090 static StarMagField *fgInstance;
00091
00092 EBField fMap;
00093 Float_t fFactor;
00094 Float_t fRescale;
00095 Float_t fBDipole;
00096 Float_t fRmaxDip;
00097 Float_t fZminDip;
00098 Float_t fZmaxDip;
00099 Bool_t fLock;
00100
00101 Float_t Bz[nZ][nR], Br[nZ][nR] ;
00102 Float_t Radius[nR], ZList[nZ] ;
00103 Float_t Bz3D[nPhi][nZ][nR], Br3D[nPhi][nZ][nR], Bphi3D[nPhi][nZ][nR] ;
00104 Float_t R3D[nR], Z3D[nZ], Phi3D[nPhi] ;
00105 Float_t R3DSteel[nRSteel], Z3DSteel[nZSteel], Phi3DSteel[nPhiSteel] ;
00106 Float_t Bz3DSteel[nPhiSteel][nZSteel][nRSteel];
00107 Float_t Bx3DSteel[nPhiSteel][nZSteel][nRSteel], By3DSteel[nPhiSteel][nZSteel][nRSteel] ;
00108
00109
00110 Float_t Br3DSteel[nPhiSteel][nZSteel][nRSteel], Bphi3DSteel[nPhiSteel][nZSteel][nRSteel] ;
00111
00112
00113 public:
00114
00115 StarMagField ( EBField map = kMapped, Float_t Factor = 1,
00116 Bool_t Lock = kFALSE, Float_t Rescale = 1,
00117 Float_t Bdipole = -42.67, Float_t Rmaxdip = 15.34,
00118 Float_t Zmindip = 980.0, Float_t Zmaxdip = 1350.0) ;
00119 static StarMagField *Instance() {return fgInstance;}
00120 virtual ~StarMagField () { fgInstance = 0; }
00121
00122
00123 virtual void BField ( const Float_t x[], Float_t B[] ) ;
00124 virtual void BField ( const Double_t x[], Double_t B[] ) ;
00125 virtual void BrBzField( const Float_t r, const Float_t z, Float_t &Br_value, Float_t &Bz_value ) ;
00126 virtual void B3DField ( const Float_t x[], Float_t B[] ) ;
00127 virtual void BrBz3DField ( const Float_t r, const Float_t z, const Float_t phi,
00128 Float_t &Br_value, Float_t &Bz_value, Float_t &Bphi_value ) ;
00129 virtual void SetFactor (Float_t factor = 1);
00130 virtual void SetRescale(Float_t factor = 1);
00131 virtual void SetBDipole(Float_t m = -42.67);
00132 virtual void SetRmaxDip(Float_t m = 15.3);
00133 virtual void SetZminDip(Float_t m = 980.0);
00134 virtual void SetZmaxDip(Float_t m = 1350.0);
00135 virtual void SetLock();
00136 virtual EBField GetMap() {return fMap;}
00137 virtual Float_t GetFactor() {return fFactor;}
00138 virtual Float_t GetRescale() {return fRescale;}
00139 virtual Bool_t IsLocked() {return fLock;}
00140 virtual void Print();
00141
00142
00143 };
00144
00145 #endif