STEER/AliMagFC.cxx

   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 $Log$
  18 Revision 1.2  2000/07/12 08:56:25  fca
  19 Coding convention correction and warning removal
  20
  21 Revision 1.1  2000/07/11 18:24:59  fca
  22 Coding convention corrections + few minor bug fixes
  23
  24 */
  25
  26 #include "AliMagFC.h"
  27 #include <stdlib.h>
  28
  29 ClassImp(AliMagFC)
  30
  31 //________________________________________
  32 AliMagFC::AliMagFC(const char *name, const char *title, const Int_t integ,
  33                    const Int_t map, const Float_t factor, const Float_t fmax)
  34   : AliMagF(name,title,integ,map,factor,fmax)
  35 {
  36   //
  37   // Standard constructor
  38   //
  39   printf("Constant Field %s created: map= %d, factor= %f\n",fName.Data(),map,
  40          factor);
  41   fType = kConst;
  42 }
  43
  44 //________________________________________
  45 void AliMagFC::Field(Float_t *x, Float_t *b)
  46 {
  47   //
  48   // Method to return the field in a point
  49   //
  50   b[0]=b[1]=b[2]=0;
  51   if(fMap==1) {
  52     if(TMath::Abs(x[2])<700 && x[0]*x[0]+(x[1]+30)*(x[1]+30) < 560*560) {
  53       b[2]=2;
  54     } else {
  55       if ( 725 <= x[2] && x[2] <= 1225 ) {
  56         Float_t dz = TMath::Abs(975-x[2])*0.01;
  57         b[0]=(1-0.1*dz*dz)*7;
  58       }
  59       else {
  60 //This is the ZDC part
  61     Float_t rad2=x[0]*x[0]+x[1]*x[1];
  62     if(x[2]>kCORBEG1 && x[2]<kCOREND1){
  63       if(rad2<kCOR1RA2){
  64         b[0] = kFCORN1;
  65       }
  66     }
  67     else if(x[2]>kCORBEG2 && x[2]<kCOREND2){
  68       if(rad2<kCOR2RA2){
  69         b[0] = kFCORN2;
  70       }
  71     }
  72     else if(x[2]>kZ1BEG && x[2]<kZ1END){
  73       if(rad2<kZ1RA2){
  74         b[0] = -kG1*x[1];
  75         b[1] = -kG1*x[0];
  76       }
  77     }
  78     else if(x[2]>kZ2BEG && x[2]<kZ2END){
  79       if(rad2<kZ2RA2){
  80         b[0] = kG1*x[1];
  81         b[1] = kG1*x[0];
  82       }
  83     }
  84     else if(x[2]>kZ3BEG && x[2]<kZ3END){
  85       if(rad2<kZ3RA2){
  86         b[0] = kG1*x[1];
  87         b[1] = kG1*x[0];
  88       }
  89     }
  90     else if(x[2]>kZ4BEG && x[2]<kZ4END){
  91       if(rad2<kZ4RA2){
  92         b[0] = -kG1*x[1];
  93         b[1] = -kG1*x[0];
  94       }
  95     }
  96     else if(x[2]>kD1BEG && x[2]<kD1END){
  97       if(rad2<kD1RA2){
  98         b[1] = -kFDIP;
  99       }
 100     }
 101     else if(x[2]>kD2BEG && x[2]<kD2END){
 102       if(((x[0]-kXCEN1D2)*(x[0]-kXCEN1D2)+(x[1]-kYCEN1D2)*(x[1]-kYCEN1D2))<kD2RA2
 103         || ((x[0]-kXCEN2D2)*(x[0]-kXCEN2D2)+(x[1]-kYCEN2D2)*(x[1]-kYCEN2D2))<kD2RA2){
 104         b[1] = kFDIP;
 105       }
 106     }
 107
 108       }
 109     }
 110     if(fFactor!=1) {
 111       b[0]*=fFactor;
 112       b[1]*=fFactor;
 113       b[2]*=fFactor;
 114     }
 115   } else {
 116     printf("Invalid field map for constant field %d\n",fMap);
 117     exit(1);
 118   }
 119 }
 120