fWSN->Eval(0.001) to avoid fpe.

[u/mrichter/AliRoot.git] / STEER / AliMagFMaps.cxx

/**************************************************************************
 * Copyright(c) 1998-1999, ALICE Experiment at CERN, All rights reserved. *
 *                                                                        *
 * Author: The ALICE Off-line Project.                                    *
 * Contributors are mentioned in the code where appropriate.              *
 *                                                                        *
 * Permission to use, copy, modify and distribute this software and its   *
 * documentation strictly for non-commercial purposes is hereby granted   *
 * without fee, provided that the above copyright notice appears in all   *
 * copies and that both the copyright notice and this permission notice   *
 * appear in the supporting documentation. The authors make no claims     *
 * about the suitability of this software for any purpose. It is          *
 * provided "as is" without express or implied warranty.                  *
 **************************************************************************/

/* $Id$ */

//------------------------------------------------------------------------
// Magnetic field composed by 3 maps: the L3 magnet, extended region, and
// dipole magnet
// Used in the configuration macros (macros/Config.C, etc.)
// Author: Andreas Morsch <andreas.morsch@cern.ch>
//------------------------------------------------------------------------

#include <TFile.h>
#include <TSystem.h>
#include <TVector.h>

#include "AliFieldMap.h"
#include "AliMagFMaps.h"

ClassImp(AliMagFMaps)

//_______________________________________________________________________
AliMagFMaps::AliMagFMaps():
  fSolenoid(0),
  fSolenoidUser(0.),
  fL3Option(0),
  fFieldRead(0)
{
  //
  // Default constructor
  //
  fFieldMap[0] = fFieldMap[1] = fFieldMap[2] = 0;
}

//_______________________________________________________________________
AliMagFMaps::AliMagFMaps(const char *name, const char *title, const Int_t integ, 
                         const Float_t factor, const Float_t fmax, const Int_t map, 
                         const Int_t l3):
  AliMagFC(name,title,integ,factor,fmax),
  fSolenoid(0),
  fSolenoidUser(0),
  fL3Option(l3),
  fFieldRead(0)
{
  //
  // Standard constructor
  //
  fType         = kConMesh;
  fFieldMap[0]  = 0;
  fMap          = map;
  fL3Option     = l3;
  ReadField();
  fFieldRead = 1;
  //
  // Don't replicate field information in gAlice
  for (Int_t i = 0; i < 3; i++)  fFieldMap[i]->SetWriteEnable(0);
  //
}

//_______________________________________________________________________
AliMagFMaps::AliMagFMaps(const AliMagFMaps &magf):
  AliMagFC(magf),
  fSolenoid(0),
  fL3Option(0),
  fFieldRead(0)
{
  //
  // Copy constructor
  //
  magf.Copy(*this);
}

//_______________________________________________________________________
AliMagFMaps::~AliMagFMaps()
{
  //
  //  Destructor
  //
  delete fFieldMap[0];
  delete fFieldMap[1];
  delete fFieldMap[2];    
}

//_______________________________________________________________________
void AliMagFMaps::ReadField()
{
  //  Read Field Map from file
  //
  //  don't read twice
  //
  if (fFieldRead) return;
  fFieldRead = 1;
  //    
  char* fname;
  TFile* file = 0;
  if (fMap == k2kG) {
      if (fL3Option) {
	  fSolenoid = 2.;
	  fname = gSystem->ExpandPathName("$(ALICE_ROOT)/data/maps/L3B02.root");
	  file = new TFile(fname);
	  fFieldMap[0] = dynamic_cast<AliFieldMap*>(file->Get("L3B02"));
	  file->Close();
	  delete file;
      }
      fname = gSystem->ExpandPathName("$(ALICE_ROOT)/data/maps/DipB02.root");
      file = new TFile(fname);
      fFieldMap[1] = dynamic_cast<AliFieldMap*>(file->Get("DipB02"));
      file->Close();
      delete file;;
      
      fname = gSystem->ExpandPathName("$(ALICE_ROOT)/data/maps/ExtB02.root");
      file = new TFile(fname);
      fFieldMap[2] = dynamic_cast<AliFieldMap*>(file->Get("ExtB02"));
      file->Close();
      delete file;
  } else if (fMap == k4kG) {
      if (fL3Option) {
	  fSolenoid = 4.;
	  fname = gSystem->ExpandPathName("$(ALICE_ROOT)/data/maps/L3B04.root");
	  file = new TFile(fname);
	  fFieldMap[0] = dynamic_cast<AliFieldMap*>(file->Get("L3B04"));
	  file->Close();
	  delete file;
      }
      
      fname = gSystem->ExpandPathName("$(ALICE_ROOT)/data/maps/DipB04.root");
      file = new TFile(fname);
      fFieldMap[1] = dynamic_cast<AliFieldMap*>(file->Get("DipB04"));
      file->Close();
      delete file;
      
      fname = gSystem->ExpandPathName("$(ALICE_ROOT)/data/maps/ExtB04.root");
      file = new TFile(fname);
      fFieldMap[2] = dynamic_cast<AliFieldMap*>(file->Get("ExtB04"));
      file->Close();
      delete file;
  } else if (fMap == k5kG) {
      if (fL3Option) {
	  fSolenoid = 5.;
      	  fname = gSystem->ExpandPathName("$(ALICE_ROOT)/data/maps/L3B05.root");
	  file = new TFile(fname);
	  fFieldMap[0] = dynamic_cast<AliFieldMap*>(file->Get("L3B05"));
	  file->Close();
	  delete file;
      }
      
      fname = gSystem->ExpandPathName("$(ALICE_ROOT)/data/maps/DipB05.root");
      file = new TFile(fname);
      fFieldMap[1] = dynamic_cast<AliFieldMap*>(file->Get("DipB05"));
      file->Close();
      delete file;
      
      fname = gSystem->ExpandPathName("$(ALICE_ROOT)/data/maps/ExtB05.root");
      file = new TFile(fname);
      fFieldMap[2] = dynamic_cast<AliFieldMap*>(file->Get("ExtB05"));
      file->Close();
      delete file;
      
  }
  
  if (!fL3Option) {
      //
      // Dummy L3 map
      fFieldMap[0] = new AliFieldMap();
      fFieldMap[0] -> SetLimits(-800., 800., -800., 800., -700., 700.);
      switch(fMap) {
      case k2kG:
	  fSolenoid = 2.;
	  break;
      case k4kG:
	  fSolenoid = 4.;
	  break;
      case k5kG:
	  fSolenoid = 5.;
	  break;
      }
      fSolenoidUser = fSolenoid;
  }
}

//_______________________________________________________________________
Float_t AliMagFMaps::SolenoidField() const
{
  //
  // Returns max. L3 (solenoid) field strength 
  // according to field map setting 
  //
  return fSolenoid;
}

//_______________________________________________________________________
void AliMagFMaps::Field(Float_t *x, Float_t *b)
{
  //
  // Method to calculate the magnetic field
  //
  // --- find the position in the grid ---
  

    
    if (!fFieldRead) ReadField();

  //
  // Field Maps have been calculated for the coordinate system in which 
  // the Muon Spectrometer is placed at z > 0
  // Transform coordinates corresponingly 
  //
  
  b[0]=b[1]=b[2]=0;
  Float_t xm[3];
  xm[0] = - x[0];
  xm[1] =   x[1];
  xm[2] = - x[2];
  
  AliFieldMap* map = 0;
  if (fFieldMap[0]->Inside(xm[0], xm[1], xm[2])) {
      map = fFieldMap[0];
      if (!fL3Option) {
      //
      //     Constant L3 field, if this option was selected
      //
	  b[2] = fSolenoidUser;
	  return;
    }
  } else if (fFieldMap[1]->Inside(xm[0], xm[1], xm[2])) {
    map = fFieldMap[1];
  } else if (fFieldMap[2]->Inside(xm[0], xm[1], xm[2])) {
    map = fFieldMap[2];
  }
  
  if(map){
    map->Field(xm,b);
    b[0] = - b[0];
    b[2] = - b[2];

  } else {
      //This is the ZDC part
      ZDCField(x, b);
  }

  
  if(fFactor!=1) {
      b[0]*=fFactor;
      b[1]*=fFactor;
      b[2]*=fFactor;
  }
}

//_______________________________________________________________________
void AliMagFMaps::Copy(AliMagFMaps & /* magf */) const
{
  //
  // Copy *this onto magf -- Not implemented
  //
  Fatal("Copy","Not implemented!\n");
}

//_______________________________________________________________________
void AliMagFMaps::Streamer(TBuffer &R__b)
{
  // Stream an object of class AliMagFMaps.
  if (R__b.IsReading()) {
    AliMagFMaps::Class()->ReadBuffer(R__b, this);
    fFieldRead = 0;
  } else {
    AliMagFMaps::Class()->WriteBuffer(R__b, this);
  }
}