MUON/MUONGenerateTestGMS.C

   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 /* $Id: */
  17
  18 /// \ingroup macros
  19 /// \file MUONGenerateTestGMS.C
  20 /// \brief Macro to generate ad hoc GMS alignment matrices in the agreed format
  21 ///
  22 /// TClonesArray is saved in the Root file with a key "GMSarray"
  23 /// containing TGeoHMatrix objects with TObject::fUniqueID equal to the geometry
  24 /// module Ids
  25 ///
  26 /// \author I. Hrivnacova, IPN Orsay
  27
  28 #if !defined(__CINT__) || defined(__MAKECINT__)
  29
  30 #include "AliMpConstants.h"
  31
  32 #include <TFile.h>
  33 #include <TGeoMatrix.h>
  34 #include <TClonesArray.h>
  35
  36 #endif
  37
  38 void MUONGenerateTestGMS(Bool_t print = kFALSE)
  39 {
  40 /// \param print option to switch on printing the processed matrices
  41
  42   TFile f("data/GMS.root", "RECREATE");
  43   TClonesArray* array = new TClonesArray("TGeoHMatrix",100);
  44
  45   for (Int_t i=0; i<AliMpConstants::NofGeomModules(); i++) {
  46     TGeoHMatrix* m = new((*array)[i]) TGeoHMatrix();
  47     m->SetUniqueID(i);
  48     /// rotate by small angle
  49     m->RotateX(i*0.01);
  50
  51     if (print) m->Print();
  52   }
  53
  54   f.WriteObject(array,"GMSarray");
  55   f.Close();
  56 }