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 // Macro to generate ad hoc GMS alignment matrices in the agreed format:
19 // TClonesArray saved in the Root file with a key "GMSarray"
20 // containing TGeoHMatrix with TObject::fUniqueID equal to the geometry
23 // By I. Hrivnacova, IPN Orsay
25 #if !defined(__CINT__) || defined(__MAKECINT__)
27 #include "AliMpConstants.h"
30 #include <TGeoMatrix.h>
31 #include <TClonesArray.h>
35 void MUONGenerateTestGMS(Bool_t print = kFALSE)
37 TFile f("data/GMS.root", "RECREATE");
38 TClonesArray* array = new TClonesArray("TGeoHMatrix",100);
40 for (Int_t i=0; i<AliMpConstants::NofGeomModules(); i++) {
41 TGeoHMatrix* m = new((*array)[i]) TGeoHMatrix();
43 /// rotate by small angle
46 if (print) m->Print();
49 f.WriteObject(array,"GMSarray");