MUON/MUONSurveyCh8L.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 MUONSurveyCh8L.C
  20 /// \brief Macro to process survey and photogrammetry data of chamber 8L
  21 ///
  22 ///  Macro loads the survey data from .txt file using AliSurveyObj.
  23 ///  Macro MUONSurveyUtil.C is then loaded.
  24 ///
  25 ///  The transformations of the slats are obatained in 2 steps:
  26 ///  -  1. Fit a plane to the sticker targets -> psi, theta
  27 ///  -  2. Using above psi in theta obtain xc, yc, zc and phi by solving
  28 ///        the equations from a local to global transformation of the
  29 ///        fixed button targets
  30 ///
  31 ///  Various histograms are filled and printed for monitoring.
  32 ///  MisAlignment object is then created.
  33 ///
  34 /// \author Javier Castillo
  35
  36 #if !defined(__CINT__) || defined(__MAKECINT__)
  37
  38 #include "AliMUONGeometryTransformer.h"
  39 #include "AliMUONGeometryMisAligner.h"
  40
  41 #include "AliSurveyObj.h"
  42 #include "AliSurveyPoint.h"
  43 #include "AliGeomManager.h"
  44 #include "AliCDBManager.h"
  45 #include "AliCDBMetaData.h"
  46 #include "AliCDBId.h"
  47
  48 #include <TROOT.h>
  49 #include <TGeoManager.h>
  50 #include <TClonesArray.h>
  51 #include <TObjArray.h>
  52 #include <TObjString.h>
  53 #include <TMath.h>
  54 #include <TString.h>
  55 #include <Riostream.h>
  56 #include <TF2.h>
  57 #include <TH2.h>
  58 #include <TGraph2DErrors.h>
  59 #include <TGraph.h>
  60 #include <TVector3.h>
  61 #include <TCanvas.h>
  62 #include <TPad.h>
  63 #include <TPostScript.h>
  64 #include <TPaveLabel.h>
  65 #include <TStyle.h>
  66
  67 #include <fstream>
  68
  69 #endif
  70
  71 Bool_t MatrixToAngles(const Double_t *rot, Double_t *angles);
  72 Double_t eqPlane(Double_t *x, Double_t *par);
  73 Double_t xpCenter(Double_t *x, Double_t *par);
  74 Double_t xnCenter(Double_t *x, Double_t *par);
  75 Double_t ypCenter(Double_t *x, Double_t *par);
  76 Double_t ynCenter(Double_t *x, Double_t *par);
  77 Double_t zpCenter(Double_t *x, Double_t *par);
  78 Double_t znCenter(Double_t *x, Double_t *par);
  79 Double_t phixpp(Double_t *x, Double_t *par);
  80 Double_t phixpn(Double_t *x, Double_t *par);
  81 Double_t phixnp(Double_t *x, Double_t *par);
  82 Double_t phixnn(Double_t *x, Double_t *par);
  83 Double_t phiypp(Double_t *x, Double_t *par);
  84 Double_t phiypn(Double_t *x, Double_t *par);
  85 Double_t phiynp(Double_t *x, Double_t *par);
  86 Double_t phiynn(Double_t *x, Double_t *par);
  87 AliMUONGeometryTransformer *ReAlign(const AliMUONGeometryTransformer * transformer,
  88                                     int rMod, TGeoCombiTrans deltaDetElemTransf[], Bool_t verbose);
  89 void MUONSurveyCh8L() {
  90
  91   char str[100];
  92   char filename[100];
  93
  94   int saveps = 1;
  95   const int cWidth = (int)(700*(29./21.));
  96   const int cHeight = 700;
  97 //   const int   lineColor = 1;
  98 //   const int   fillColor = 4;
  99 //   const int   filetype  = 111; // portrait
 100   const int   filetype  = 112; // landscape
 101
 102   sprintf(filename,"surveyChamber8L.ps");
 103
 104   Int_t nSlats = 13;
 105
 106   gROOT->LoadMacro("MUONSurveyUtil.C+");
 107
 108   AliSurveyObj *so = new AliSurveyObj();
 109
 110   Int_t size = so->GetEntries();
 111   printf("-> %d\n", size);
 112
 113   so->FillFromLocalFile("Alice_MuonSystem_Chamber8LCavern_3561b.txt");
 114   size = so->GetEntries();
 115   printf("--> %d\n", size);
 116
 117   Printf("Title: \"%s\"", so->GetReportTitle().Data());
 118   Printf("Date: \"%s\"", so->GetReportDate().Data());
 119   Printf("Detector: \"%s\"", so->GetDetector().Data());
 120   Printf("URL: \"%s\"", so->GetURL().Data());
 121   Printf("Number: \"%d\"", so->GetReportNumber());
 122   Printf("Version: \"%d\"", so->GetReportVersion());
 123   Printf("Observations: \"%s\"", so->GetObservations().Data());
 124   Printf("Coordinate System: \"%s\"", so->GetCoordSys().Data());
 125   Printf("Measurement Units: \"%s\"", so->GetUnits().Data());
 126   Printf("Nr Columns: \"%d\"", so->GetNrColumns());
 127
 128   TObjArray *colNames = so->GetColumnNames();
 129   for (Int_t i = 0; i < colNames->GetEntries(); ++i)
 130     Printf("  Column %d --> \"%s\"", i, ((TObjString *) colNames->At(i))->GetString().Data());
 131
 132   // Get Array of surveyed points
 133   Printf("Points:");
 134   TObjArray *points = so->GetData();
 135
 136   for (Int_t i = 0; i < points->GetEntries(); ++i)
 137     Printf("  Point %d --> \"%s\"  %s ", i, ((AliSurveyPoint *) points->At(i))->GetPointName().Data(), points->At(i)->GetName());
 138
 139
 140   // Slats (#1 - #13) button targets local coordinates
 141   Double_t lSBTLoc6[13][2][3] = {{{  -412.50,  0.0, -(11.75+ 8.20+20.00)},
 142                                   {   412.50,  0.0, -(11.75+16.50+20.00)}},
 143                                  {{  -612.50,  0.0,  (11.75+ 8.20+20.00)},
 144                                   {   612.50,  0.0,  (11.75+16.50+20.00)}},
 145                                  {{ - 812.50,  0.0, -(11.75+ 8.20+20.00)},
 146                                   {   812.50,  0.0, -(11.75+16.50+20.00)}},
 147                                  {{ -1012.50,  0.0,  (11.75+ 8.20+20.00)},
 148                                   {  1012.50,  0.0,  (11.75+16.50+20.00)}},
 149                                  {{ -1012.50,  0.0, -(11.75+ 8.20+20.00)},
 150                                   {  1012.50,  0.0, -(11.75+16.50+20.00)}},
 151                                  {{ -1212.50,  5.0,  (11.75+ 8.20+20.00)},
 152                                   {  1212.50,  0.0,  (11.75+16.50+20.00)}},
 153                                  {{ -1012.50,  0.0, -(11.75+ 8.20+20.00)},
 154                                   {  1012.50,  0.0, -(11.75+16.50+20.00)}},
 155                                  {{ -1212.50,  5.0,  (11.75+ 8.20+20.00)},
 156                                   {  1212.50,  0.0,  (11.75+16.50+20.00)}},
 157                                  {{ -1012.50,  0.0, -(11.75+ 8.20+20.00)},
 158                                   {  1012.50,  0.0, -(11.75+16.50+20.00)}},
 159                                  {{ -1012.50,  0.0,  (11.75+ 8.20+20.00)},
 160                                   {  1012.50,  0.0,  (11.75+16.50+20.00)}},
 161                                  {{  -812.50,  0.0, -(11.75+ 8.20+20.00)},
 162                                   {   812.50,  0.0, -(11.75+16.50+20.00)}},
 163                                  {{  -612.50,  0.0,  (11.75+ 8.20+20.00)},
 164                                   {   612.50,  0.0,  (11.75+16.50+20.00)}},
 165                                  {{  -412.50,  0.0, -(11.75+ 8.20+20.00)},
 166                                   {   412.50,  0.0, -(11.75+16.50+20.00)}}};
 167
 168
 169   AliSurveyPoint *pointSST = 0;
 170   AliSurveyPoint *pointCST = 0;
 171   AliSurveyPoint *pointCPST = 0;
 172   AliSurveyPoint **pointSBT = new AliSurveyPoint*[2];
 173
 174   char sPointName[10] = "5000";
 175
 176   // Print length of slats
 177   cout << "Slat lengths:" << endl;
 178   TVector3 vTemp(0., 0., 0.);
 179   TVector3 vSBT(0., 0., 0.);
 180
 181   for (Int_t iSlat=0; iSlat<nSlats; iSlat++){
 182     // Get button targets survey points
 183     vTemp.SetXYZ(0., 0., 0.);
 184     if (iSlat+1<10) {
 185       sprintf(sPointName,"60%d%d",iSlat+1,1);
 186       pointSBT[0] = (AliSurveyPoint *)points->FindObject(sPointName);
 187       if(!pointSBT[0]) {
 188         cout << "Error! No button targets ... " << endl;
 189         break;
 190       }
 191       vSBT.SetXYZ(pointSBT[0]->GetX(),pointSBT[0]->GetY(),pointSBT[0]->GetZ());
 192       vTemp+=vSBT;
 193       sprintf(sPointName,"60%d%d",iSlat+1,2);
 194       pointSBT[1] = (AliSurveyPoint *)points->FindObject(sPointName);
 195       if(!pointSBT[1]) {
 196         cout << "Error! No button targets ... " << endl;
 197         break;
 198       }
 199       vSBT.SetXYZ(pointSBT[1]->GetX(),pointSBT[1]->GetY(),pointSBT[1]->GetZ());
 200       vTemp-=vSBT;
 201     }
 202     else {
 203       sprintf(sPointName,"6%d%d",iSlat+1,1);
 204       pointSBT[0] = (AliSurveyPoint *)points->FindObject(sPointName);
 205       if(!pointSBT[0]) {
 206         cout << "Error! No button targets ... " << endl;
 207         break;
 208       }
 209       vSBT.SetXYZ(pointSBT[0]->GetX(),pointSBT[0]->GetY(),pointSBT[0]->GetZ());
 210       vTemp+=vSBT;
 211       sprintf(sPointName,"6%d%d",iSlat+1,2);
 212       pointSBT[1] = (AliSurveyPoint *)points->FindObject(sPointName);
 213       if(!pointSBT[1]) {
 214         cout << "Error! No button targets ... " << endl;
 215         break;
 216       }
 217       vSBT.SetXYZ(pointSBT[1]->GetX(),pointSBT[1]->GetY(),pointSBT[1]->GetZ());
 218       vTemp-=vSBT;
 219     }
 220     cout << "Slat " << iSlat+1 << ": " << vTemp.Mag() << endl;
 221   }
 222
 223   // Histograms for monitoring
 224   TH2F *hCPSTry = new TH2F("hCPSTry","hCPSTry",28,-600,2200,52,0,5200);
 225   TH2F *hCPSTly = new TH2F("hCPSTly","hCPSTly",28,-600,2200,52,0,5200);
 226   TH2F *hSSTry = new TH2F("hSSTry","hSSTry",70,-600,2200,130,0,5200);
 227   TH2F *hSSTly = new TH2F("hSSTly","hSSTly",70,-600,2200,130,0,5200);
 228   TH2F *hCSTy = new TH2F("hCSTy","hCSTy",70,-600,2200,130,0,5200);
 229   TH2F *hSSTrpy = new TH2F("hSSTrpy","hSSTrpy",70,-600,2200,130,0,5200);
 230   TH2F *hSSTlpy = new TH2F("hSSTlpy","hSSTlpy",70,-600,2200,130,0,5200);
 231
 232   // Chamber plane sticker targets
 233   for (int iPoint=0; iPoint<9; iPoint++) {
 234     sprintf(sPointName,"700%d",iPoint+1);
 235     pointCPST = (AliSurveyPoint *)points->FindObject(sPointName);
 236     if(!pointCPST) {
 237       printf("Point %s is missing ...\n",sPointName);
 238       break;
 239     }
 240     hCPSTry->Fill(pointCPST->GetX(),pointCPST->GetZ(),pointCPST->GetY());
 241   }
 242   for (int iPoint=9; iPoint<18; iPoint++) {
 243     sprintf(sPointName,"70%d",iPoint+1);
 244     pointCPST = (AliSurveyPoint *)points->FindObject(sPointName);
 245     if(!pointCPST) {
 246       printf("Point %s is missing ...\n",sPointName);
 247       break;
 248     }
 249     hCPSTly->Fill(pointCPST->GetX(),pointCPST->GetZ(),pointCPST->GetY());
 250   }
 251
 252   // Chamber Side Targets
 253   for (int iPoint=0; iPoint<25; iPoint++) {
 254     if (iPoint+1<10) {
 255       sprintf(sPointName,"800%d",iPoint+1);
 256     }
 257     else {
 258       sprintf(sPointName,"80%d",iPoint+1);
 259     }
 260     pointCST = (AliSurveyPoint *)points->FindObject(sPointName);
 261     if(!pointCPST) {
 262       printf("Point %s is missing ...\n",sPointName);
 263       break;
 264     }
 265     hCSTy->Fill(pointCST->GetX(),pointCST->GetZ(),pointCST->GetY());
 266   }
 267
 268
 269   // Graphs used for plane fitting
 270   TGraph2DErrors **gSST5 = new TGraph2DErrors*[nSlats];
 271   for(Int_t iSlat=0; iSlat<nSlats; iSlat++){
 272     gSST5[iSlat] = new TGraph2DErrors();
 273   }
 274
 275   // Keep the id of slat sticker targets next to slat button targets
 276   Int_t iSSBT[13][2] = {{0}};
 277
 278   // Fill graph with sticker target positions
 279   for (int iSlat=0; iSlat<nSlats; iSlat++){
 280     for (int iPoint=0; iPoint<9; iPoint++) {
 281       // Second sticker target is next to first button target
 282       // Previous to last sticker target is next to second button target
 283       iSSBT[iSlat][0] = 2;
 284       iSSBT[iSlat][1] = 8;
 285       if (iSlat+1<10) {
 286         sprintf(sPointName,"50%d%d",iSlat+1,iPoint+1);
 287       }
 288       else {
 289         sprintf(sPointName,"5%d%d",iSlat+1,iPoint+1);
 290       }
 291       pointSST = (AliSurveyPoint *)points->FindObject(sPointName);
 292       if(!pointSST) {
 293         printf("%s\n",sPointName);
 294         cout << iSlat << " " << iPoint  << " " << pointSST << endl;
 295         // Previous to last sticker target is next to second button target
 296         iSSBT[iSlat][1] = iPoint+1-2;
 297         break;
 298       }
 299
 300       gSST5[iSlat]->SetPoint(iPoint,-pointSST->GetX(),pointSST->GetZ(),pointSST->GetY());
 301       gSST5[iSlat]->SetPointError(iPoint,pointSST->GetPrecisionX(),pointSST->GetPrecisionZ(),pointSST->GetPrecisionY());
 302
 303       // Fill histograms of sticker targets. For monitoring purposes.
 304       if((iSlat+1)%2==0){
 305         hSSTly->Fill(pointSST->GetX(),pointSST->GetZ(),pointSST->GetY());
 306       }
 307       else {
 308         hSSTry->Fill(pointSST->GetX(),pointSST->GetZ(),pointSST->GetY());
 309       }
 310     }
 311   }
 312
 313   Float_t xMin = -2200.;
 314   Float_t xMax =  2200.;
 315   Float_t yMin = -5200.;
 316   Float_t yMax =  5200.;
 317   Float_t zMin = -200.;
 318   Float_t zMax =  200.;
 319
 320   Double_t xMinSlat, xMaxSlat;
 321   Double_t yMinSlat, yMaxSlat;
 322
 323   // Slat plane function
 324   char fsName[100] = "fSlat00";
 325   TF2 **fSlat = new TF2*[nSlats];
 326   for(Int_t iSlat=0; iSlat<nSlats; iSlat++){
 327     sprintf(fsName,"fSlat%d",iSlat+1);
 328     fSlat[iSlat] = new TF2(fsName,eqPlane,xMin,xMax,yMin,yMax,3);
 329   }
 330
 331   // Xcenter functions
 332   char fxcName[100] = "fXcnSlat00";
 333   TF2 ***fXcSlat = new TF2**[nSlats];
 334   for(Int_t iSlat=0; iSlat<nSlats; iSlat++){
 335     fXcSlat[iSlat] = new TF2*[2];
 336     sprintf(fxcName,"fXcnSlat%d",iSlat+1);
 337     fXcSlat[iSlat][0] = new TF2(fxcName,xnCenter,xMin,xMax,yMin,yMax,7);
 338     sprintf(fxcName,"fXcpSlat%d",iSlat+1);
 339     fXcSlat[iSlat][1] = new TF2(fxcName,xpCenter,xMin,xMax,yMin,yMax,7);
 340   }
 341
 342   // Ycenter functions
 343   char fycName[100] = "fYcnSlat00";
 344   TF2 ***fYcSlat = new TF2**[nSlats];
 345   for(Int_t iSlat=0; iSlat<nSlats; iSlat++){
 346     fYcSlat[iSlat] = new TF2*[2];
 347     sprintf(fycName,"fYcnSlat%d",iSlat+1);
 348     fYcSlat[iSlat][0] = new TF2(fycName,ynCenter,yMin,yMax,yMin,yMax,8);
 349     sprintf(fycName,"fYcpSlat%d",iSlat+1);
 350     fYcSlat[iSlat][1] = new TF2(fycName,ypCenter,yMin,yMax,yMin,yMax,8);
 351   }
 352
 353   // Zcenter functions
 354   char fzcName[100] = "fZcnSlat00";
 355   TF2 ***fZcSlat = new TF2**[nSlats];
 356   for(Int_t iSlat=0; iSlat<nSlats; iSlat++){
 357     fZcSlat[iSlat] = new TF2*[2];
 358     sprintf(fzcName,"fZcnSlat%d",iSlat+1);
 359     fZcSlat[iSlat][0] = new TF2(fzcName,znCenter,zMin,zMax,zMin,zMax,8);
 360     sprintf(fzcName,"fZcpSlat%d",iSlat+1);
 361     fZcSlat[iSlat][1] = new TF2(fzcName,zpCenter,zMin,zMax,zMin,zMax,8);
 362   }
 363
 364   // Phi rotation using xglobal coords functions
 365   char fphixName[100] = "fPhiXnnSlat00";
 366   TF2 ****fPhiXSlat = new TF2***[nSlats];
 367   for(Int_t iSlat=0; iSlat<nSlats; iSlat++){
 368     fPhiXSlat[iSlat] = new TF2**[2];
 369     for (Int_t iX =0; iX<2; iX++)
 370       fPhiXSlat[iSlat][iX] = new TF2*[2];
 371     sprintf(fphixName,"fPhiXnnSlat%d",iSlat+1);
 372     fPhiXSlat[iSlat][0][0] = new TF2(fphixName,phixnn,xMin,xMax,xMin,xMax,7);
 373     sprintf(fphixName,"fPhixnpSlat%d",iSlat+1);
 374     fPhiXSlat[iSlat][0][1] = new TF2(fphixName,phixnp,xMin,xMax,xMin,xMax,7);
 375     sprintf(fphixName,"fPhiXpnSlat%d",iSlat+1);
 376     fPhiXSlat[iSlat][1][0] = new TF2(fphixName,phixpn,xMin,xMax,xMin,xMax,7);
 377     sprintf(fphixName,"fPhixppSlat%d",iSlat+1);
 378     fPhiXSlat[iSlat][1][1] = new TF2(fphixName,phixpp,xMin,xMax,xMin,xMax,7);
 379   }
 380
 381   // Phi rotation using yglobal coords functions
 382   char fphiyName[100] = "fPhiYnnSlat00";
 383   TF2 ****fPhiYSlat = new TF2***[nSlats];
 384   for(Int_t iSlat=0; iSlat<nSlats; iSlat++){
 385     fPhiYSlat[iSlat] = new TF2**[2];
 386     for (Int_t iY =0; iY<2; iY++)
 387       fPhiYSlat[iSlat][iY] = new TF2*[2];
 388     sprintf(fphiyName,"fPhiYnnSlat%d",iSlat+1);
 389     fPhiYSlat[iSlat][0][0] = new TF2(fphiyName,phiynn,yMin,yMax,yMin,yMax,7);
 390     sprintf(fphiyName,"fPhiYnpSlat%d",iSlat+1);
 391     fPhiYSlat[iSlat][0][1] = new TF2(fphiyName,phiynp,yMin,yMax,yMin,yMax,7);
 392     sprintf(fphiyName,"fPhiYpnSlat%d",iSlat+1);
 393     fPhiYSlat[iSlat][1][0] = new TF2(fphiyName,phiypn,yMin,yMax,yMin,yMax,7);
 394     sprintf(fphiyName,"fPhiYppSlat%d",iSlat+1);
 395     fPhiYSlat[iSlat][1][1] = new TF2(fphiyName,phiypp,yMin,yMax,yMin,yMax,7);
 396   }
 397
 398 //   Double_t *xce = new Double_t[nSlats];
 399 //   Double_t *yce = new Double_t[nSlats];
 400 //   Double_t *zce = new Double_t[nSlats];
 401   Double_t *psi = new Double_t[nSlats];
 402   Double_t *tht = new Double_t[nSlats];
 403 //   Double_t *phi = new Double_t[nSlats];
 404
 405   Double_t **lCenSlat = new Double_t*[nSlats];
 406   Double_t **lRotSlat = new Double_t*[nSlats];
 407   Double_t **lDiffCenSlat0 = new Double_t*[nSlats];
 408   Double_t **lDiffRotSlat0 = new Double_t*[nSlats];
 409   Double_t **lDiffThCenSlat0 = new Double_t*[nSlats];
 410   Double_t **lDiffThRotSlat0 = new Double_t*[nSlats];
 411   Double_t **lDeltaDiffCenSlat0 = new Double_t*[nSlats];
 412   Double_t **lDeltaDiffRotSlat0 = new Double_t*[nSlats];
 413
 414   for (int iSlat=0; iSlat<nSlats; iSlat++) {
 415     lCenSlat[iSlat] = new Double_t[3];
 416     lRotSlat[iSlat] = new Double_t[3];
 417
 418     lDiffCenSlat0[iSlat] = new Double_t[3];
 419     lDiffRotSlat0[iSlat] = new Double_t[3];
 420     lDiffThCenSlat0[iSlat] = new Double_t[3];
 421     lDiffThRotSlat0[iSlat] = new Double_t[3];
 422     lDeltaDiffCenSlat0[iSlat] = new Double_t[3];
 423     lDeltaDiffRotSlat0[iSlat] = new Double_t[3];
 424   }
 425
 426
 427   TGeoTranslation transSlat[nSlats];
 428   TGeoRotation rotSlat[nSlats];
 429   TGeoCombiTrans trfSlat[nSlats];
 430
 431   TGeoTranslation dtransSlat[nSlats];
 432   TGeoRotation drotSlat[nSlats];
 433   TGeoCombiTrans dtrfSlat[nSlats];
 434
 435   TGeoTranslation transTemp;
 436   TGeoRotation rotTemp;
 437   TGeoCombiTrans trfTemp;
 438
 439
 440   Double_t lCenTemp[3];
 441   Double_t lRotTemp[3];
 442
 443   Double_t lDiffTemp[9];
 444   Double_t lDiffMin[9];
 445
 446   double tempDiff = 0.;
 447   double tempDiff1 = 0.;
 448   double tempDiff2 = 0.;
 449
 450   AliSurveyPoint **pointSSBT = new AliSurveyPoint*[2];
 451
 452   //
 453   // Get Slat transformation.
 454   // Psi and Theta are obtained by fitting a plane to the sticker targets.
 455   // Then Xc, Yc, Zc and Phi are obtained by solving the equations to the ref.
 456   // syst. transformation of the button targets
 457   //
 458   for (int iSlat=0; iSlat<nSlats; iSlat++) {
 459     sprintf(fsName,"fSlat%d",iSlat+1);
 460     cout << "Fitting Slat" << iSlat+1 << " ..." << endl;
 461
 462     // Fit a plane to the sticker targets
 463     gSST5[iSlat]->Fit(fsName,"","same");
 464
 465     psi[iSlat] = TMath::ATan(fSlat[iSlat]->GetParameter(1));
 466     tht[iSlat] = TMath::ATan(fSlat[iSlat]->GetParameter(0));
 467     if (iSlat==5)
 468       psi[iSlat] += TMath::Pi(); // Rotated slat
 469
 470     lRotSlat[iSlat][0] = psi[iSlat];
 471     lRotSlat[iSlat][1] = tht[iSlat];
 472
 473     for(Int_t iS=0; iS<2; iS++){
 474       fXcSlat[iSlat][iS]->SetParameters(lSBTLoc6[iSlat][0][0],lSBTLoc6[iSlat][0][1],lSBTLoc6[iSlat][0][2],lSBTLoc6[iSlat][1][0],lSBTLoc6[iSlat][1][1],lSBTLoc6[iSlat][1][2],tht[iSlat]);
 475       fYcSlat[iSlat][iS]->SetParameters(lSBTLoc6[iSlat][0][0],lSBTLoc6[iSlat][0][1],lSBTLoc6[iSlat][0][2],lSBTLoc6[iSlat][1][0],lSBTLoc6[iSlat][1][1],lSBTLoc6[iSlat][1][2],psi[iSlat],tht[iSlat]);
 476       fZcSlat[iSlat][iS]->SetParameters(lSBTLoc6[iSlat][0][0],lSBTLoc6[iSlat][0][1],lSBTLoc6[iSlat][0][2],lSBTLoc6[iSlat][1][0],lSBTLoc6[iSlat][1][1],lSBTLoc6[iSlat][1][2],psi[iSlat],tht[iSlat]);
 477       for(Int_t jS=0; jS<2; jS++){
 478         fPhiXSlat[iSlat][iS][jS]->SetParameters(lSBTLoc6[iSlat][0][0],lSBTLoc6[iSlat][0][1],lSBTLoc6[iSlat][0][2],lSBTLoc6[iSlat][1][0],lSBTLoc6[iSlat][1][1],lSBTLoc6[iSlat][1][2],tht[iSlat]);
 479         fPhiYSlat[iSlat][iS][jS]->SetParameters(lSBTLoc6[iSlat][0][0],lSBTLoc6[iSlat][0][1],lSBTLoc6[iSlat][0][2],lSBTLoc6[iSlat][1][0],lSBTLoc6[iSlat][1][1],lSBTLoc6[iSlat][1][2],psi[iSlat],tht[iSlat]);
 480       }
 481     }
 482
 483     //
 484     // Calculate Slat Center from button targets
 485     //
 486
 487     // Get button targets survey points
 488     for (Int_t iPoint=0; iPoint<2; iPoint++) {
 489       if (iSlat+1<10) {
 490         sprintf(sPointName,"60%d%d",iSlat+1,iPoint+1);
 491         pointSBT[iPoint] = (AliSurveyPoint *)points->FindObject(sPointName);
 492         if(!pointSBT[iPoint]) {
 493           cout << "Error! No button targets ... " << endl;
 494           break;
 495         }
 496         sprintf(sPointName,"50%d%d",iSlat+1,iSSBT[iSlat][iPoint]);
 497         pointSSBT[iPoint] = (AliSurveyPoint *)points->FindObject(sPointName);
 498         if(!pointSSBT[iPoint]) {
 499           cout << "Error! No sticker target ... " << sPointName << endl;
 500           break;
 501         }
 502       }
 503       else {
 504         sprintf(sPointName,"6%d%d",iSlat+1,iPoint+1);
 505         pointSBT[iPoint] = (AliSurveyPoint *)points->FindObject(sPointName);
 506         if(!pointSBT[iPoint]) {
 507           cout << "Error! No button targets ... " << endl;
 508           break;
 509         }
 510         sprintf(sPointName,"5%d%d",iSlat+1,iSSBT[iSlat][iPoint]);
 511         pointSSBT[iPoint] = (AliSurveyPoint *)points->FindObject(sPointName);
 512         if(!pointSSBT[iPoint]) {
 513           cout << "Error! No sticker targets ... " << sPointName << endl;
 514           break;
 515         }
 516       }
 517     }
 518
 519     tempDiff += TMath::Power(-1,iSlat)*((pointSBT[1]->GetY() - pointSSBT[1]->GetY())-(pointSBT[0]->GetY() - pointSSBT[0]->GetY()));
 520     tempDiff1 += TMath::Abs(pointSBT[0]->GetY() - pointSSBT[0]->GetY())-20;
 521     tempDiff2 += TMath::Abs(pointSBT[1]->GetY() - pointSSBT[1]->GetY())-20;
 522     cout << "BSdiff: " << TMath::Abs(pointSBT[0]->GetY() - pointSSBT[0]->GetY()) << " " << TMath::Abs(pointSBT[1]->GetY() - pointSSBT[1]->GetY()) << " " << tempDiff1/(iSlat+1) << " " << tempDiff2/(iSlat+1) << " " << tempDiff/(iSlat+1) << endl;
 523
 524
 525     //    Double_t p0l[3] = {0};
 526     Double_t p1l[3] = {0};
 527     Double_t p2l[3] = {0};
 528     //    Double_t p0g[3] = {0};
 529     Double_t p1g[3] = {0};
 530     Double_t p2g[3] = {0};
 531
 532     //    p0l[2] = lSBTLoc6[iSlat][0][2];
 533     // Button targets local coordinates
 534     for(Int_t iCor=0; iCor<3; iCor++){
 535       p1l[iCor]= lSBTLoc6[iSlat][0][iCor];
 536       p2l[iCor]= lSBTLoc6[iSlat][1][iCor];
 537     }
 538     for(Int_t i=0; i<9; i++){
 539       lDiffMin[i]=1000000.;
 540     }
 541     // Trying 2x*2y*2z*2phi possibilities
 542     for(Int_t iX=0; iX<2; iX++){
 543       for(Int_t iY=0; iY<2; iY++){
 544         for(Int_t iZ=0; iZ<2; iZ++){
 545           lCenTemp[0] = fXcSlat[iSlat][iX]->Eval(-pointSBT[0]->GetX(),-pointSBT[1]->GetX());
 546           lCenTemp[1] = fYcSlat[iSlat][iY]->Eval(pointSBT[0]->GetZ(),pointSBT[1]->GetZ());
 547           lCenTemp[2] = fZcSlat[iSlat][iZ]->Eval(pointSBT[0]->GetY(),pointSBT[1]->GetY());
 548           //     lCenTemp[2] = fZcSlat[iSlat][iZ]->Eval(pointSSBT[0]->GetY(),pointSSBT[1]->GetY());
 549           lRotTemp[0] = psi[iSlat];
 550           lRotTemp[1] = tht[iSlat];
 551           for(Int_t iP=0; iP<2; iP++){
 552             lRotTemp[2] = fPhiXSlat[iSlat][iX][iP]->Eval(-pointSBT[0]->GetX(),-pointSBT[1]->GetX());
 553
 554             trfTemp.SetTranslation(transTemp);
 555             trfTemp.SetRotation(rotTemp);
 556             trfTemp.Clear();
 557             trfTemp.RotateZ(TMath::RadToDeg()*lRotTemp[2]);
 558             trfTemp.RotateY(TMath::RadToDeg()*lRotTemp[1]);
 559             trfTemp.RotateX(TMath::RadToDeg()*lRotTemp[0]);
 560             trfTemp.SetTranslation(lCenTemp);
 561
 562             //     trfTemp.LocalToMaster(p0l, p0g);
 563             //     lCenTemp[2]= fSlat[iSlat]->Eval(p0g[0],p0g[1]) - trfTemp.GetRotationMatrix()[8]*p0l[2];
 564             //     trfTemp.SetTranslation(lCenTemp);
 565
 566             trfTemp.LocalToMaster(p1l, p1g);
 567             trfTemp.LocalToMaster(p2l, p2g);
 568
 569             lDiffTemp[0] = (-pointSBT[0]->GetX()-p1g[0]);
 570             lDiffTemp[1] = (pointSBT[0]->GetZ()-p1g[1]);
 571             lDiffTemp[2] = (pointSBT[0]->GetY()-p1g[2]);
 572             //     lDiffTemp[2] = (pointSSBT[0]->GetY()-p1g[2]);
 573             lDiffTemp[3] = TMath::Sqrt(lDiffTemp[0]*lDiffTemp[0]+lDiffTemp[1]*lDiffTemp[1]+lDiffTemp[2]*lDiffTemp[2]);
 574             lDiffTemp[4] = (-pointSBT[1]->GetX()-p2g[0]);
 575             lDiffTemp[5] = (pointSBT[1]->GetZ()-p2g[1]);
 576             lDiffTemp[6] = (pointSBT[1]->GetY()-p2g[2]);
 577             //     lDiffTemp[6] = (pointSSBT[1]->GetY()-p2g[2]);
 578             lDiffTemp[7] = TMath::Sqrt(lDiffTemp[4]*lDiffTemp[4]+lDiffTemp[5]*lDiffTemp[5]+lDiffTemp[6]*lDiffTemp[6]);
 579             lDiffTemp[8] = TMath::Sqrt(lDiffTemp[3]*lDiffTemp[3]+lDiffTemp[7]*lDiffTemp[7]);
 580
 581             if(lDiffTemp[8]<lDiffMin[8]){
 582               cout << "Diffs" ;
 583               for(Int_t i=0; i<9; i++){
 584                 cout << " " << lDiffTemp[i];
 585               }
 586               cout << endl;
 587               cout << "Slat" << iSlat+1 << " : mycenX" << iX << "Y" << iY << "Z" << iZ << "(" << lCenTemp[0] << "," << lCenTemp[1] << "," << lCenTemp[2] << "); rotx" << iP << "(" << lRotTemp[0] << "," << lRotTemp[1] << "," << lRotTemp[2] << ")"  << endl;
 588               cout << p1g[0] << " " << p1g[1] << " " << p1g[2] << " " << p2g[0] << " " << p2g[1] << " " << p2g[2] << endl;
 589               cout << "Transformation improved ..." << endl;
 590               lCenSlat[iSlat][0] = lCenTemp[0]; lCenSlat[iSlat][1] = lCenTemp[1]; lCenSlat[iSlat][2] = lCenTemp[2];
 591               lRotSlat[iSlat][2] = lRotTemp[2];
 592               for(Int_t i=0; i<9; i++){
 593                 lDiffMin[i]=lDiffTemp[i];
 594               }
 595               if((lDiffMin[3]*lDiffMin[3]<0.1*0.1+0.1*0.1+0.1*0.1)&&
 596                  (lDiffMin[7]*lDiffMin[7]<0.1*0.1+0.1*0.1+0.1*0.1)){
 597                 cout << "Correct Transformation found X " << iX  << " Y " << iY << " Z " << iZ << " xP " << iP << endl;
 598                 lCenSlat[iSlat][0] = lCenTemp[0]; lCenSlat[iSlat][1] = lCenTemp[1]; lCenSlat[iSlat][2] = lCenTemp[2];
 599                 lRotSlat[iSlat][2] = lRotTemp[2];
 600               }
 601             }
 602           }
 603           for(Int_t iP=0; iP<2; iP++){
 604             lRotTemp[2] = fPhiYSlat[iSlat][iY][iP]->Eval(pointSBT[0]->GetZ(),pointSBT[1]->GetZ());
 605             Double_t lPhi = TMath::ATan2((pointSBT[1]->GetZ()-pointSBT[0]->GetZ()),-(pointSBT[1]->GetX()-pointSBT[0]->GetX()));
 606
 607             trfTemp.Clear();
 608             trfTemp.RotateZ(TMath::RadToDeg()*lRotTemp[2]);
 609             trfTemp.RotateY(TMath::RadToDeg()*lRotTemp[1]);
 610             trfTemp.RotateX(TMath::RadToDeg()*lRotTemp[0]);
 611             trfTemp.SetTranslation(lCenTemp);
 612
 613             //     trfTemp.LocalToMaster(p0l, p0g);
 614             //     lCenTemp[2]= fSlat[iSlat]->Eval(p0g[0],p0g[1]) - trfTemp.GetRotationMatrix()[8]*p0l[2];
 615             //     trfTemp.SetTranslation(lCenTemp);
 616
 617             trfTemp.LocalToMaster(p1l, p1g);
 618             trfTemp.LocalToMaster(p2l, p2g);
 619
 620             lDiffTemp[0] = (-pointSBT[0]->GetX()-p1g[0]);
 621             lDiffTemp[1] = (pointSBT[0]->GetZ()-p1g[1]);
 622             lDiffTemp[2] = (pointSBT[0]->GetY()-p1g[2]);
 623             //     lDiffTemp[2] = (pointSSBT[0]->GetY()-p1g[2]);
 624             lDiffTemp[3] = TMath::Sqrt(lDiffTemp[0]*lDiffTemp[0]+lDiffTemp[1]*lDiffTemp[1]+lDiffTemp[2]*lDiffTemp[2]);
 625             lDiffTemp[4] = (-pointSBT[1]->GetX()-p2g[0]);
 626             lDiffTemp[5] = (pointSBT[1]->GetZ()-p2g[1]);
 627             lDiffTemp[6] = (pointSBT[1]->GetY()-p2g[2]);
 628             //     lDiffTemp[6] = (pointSSBT[1]->GetY()-p2g[2]);
 629             lDiffTemp[7] = TMath::Sqrt(lDiffTemp[4]*lDiffTemp[4]+lDiffTemp[5]*lDiffTemp[5]+lDiffTemp[6]*lDiffTemp[6]);
 630             lDiffTemp[8] = TMath::Sqrt(lDiffTemp[3]*lDiffTemp[3]+lDiffTemp[7]*lDiffTemp[7]);
 631
 632             if(lDiffTemp[8]<lDiffMin[8]){
 633               cout << "Diffs" ;
 634               for(Int_t i=0; i<9; i++){
 635                 cout << " " << lDiffTemp[i];
 636               }
 637               cout << endl;
 638               cout << "Slat" << iSlat+1 << " : mycenX" << iX << "Y" << iY << "Z" << iZ << "(" << lCenTemp[0] << "," << lCenTemp[1] << "," << lCenTemp[2] << "); roty" << iP << "(" << lRotTemp[0] << "," << lRotTemp[1] << "," << lRotTemp[2] << "(" << lPhi << "))"  << endl;
 639               cout << p1g[0] << " " << p1g[1] << " " << p1g[2] << " " << p2g[0] << " " << p2g[1] << " " << p2g[2] << endl;
 640               cout << "Transformation improved ..." << endl;
 641               lCenSlat[iSlat][0] = lCenTemp[0]; lCenSlat[iSlat][1] = lCenTemp[1]; lCenSlat[iSlat][2] = lCenTemp[2];
 642               lRotSlat[iSlat][2] = lRotTemp[2];
 643
 644               for(Int_t i=0; i<9; i++){
 645                 lDiffMin[i]=lDiffTemp[i];
 646               }
 647               if((lDiffMin[3]*lDiffMin[3]<0.1*0.1+0.1*0.1+0.1*0.1)&&
 648                  (lDiffMin[7]*lDiffMin[7]<0.1*0.1+0.1*0.1+0.1*0.1)){
 649                 cout << "Correct Transformation found X " << iX  << " Y " << iY << " Z " << iZ << " yP " << iP << endl;
 650                 lCenSlat[iSlat][0] = lCenTemp[0]; lCenSlat[iSlat][1] = lCenTemp[1]; lCenSlat[iSlat][2] = lCenTemp[2];
 651                 lRotSlat[iSlat][2] = lRotTemp[2];
 652               }
 653             }
 654           }
 655         }
 656       }
 657     }
 658
 659     // Fill slat plane for fit monitor.
 660     xMinSlat = hSSTrpy->GetXaxis()->FindBin(pointSBT[0]->GetX());
 661     xMaxSlat = hSSTrpy->GetXaxis()->FindBin(pointSBT[1]->GetX());
 662     yMinSlat = hSSTrpy->GetYaxis()->FindBin(pointSBT[0]->GetZ()-200.);
 663     yMaxSlat = hSSTrpy->GetYaxis()->FindBin(pointSBT[0]->GetZ()+200.);
 664
 665     for (int i=(int)xMinSlat; i<=(int)xMaxSlat; i++) {
 666       for (int j=(int)yMinSlat; j<=(int)yMaxSlat; j++) {
 667         Double_t zSlat = fSlat[iSlat]->Eval(-hSSTrpy->GetXaxis()->GetBinCenter(i),
 668                                             hSSTrpy->GetYaxis()->GetBinCenter(j));
 669         if((iSlat+1)%2==0){
 670           hSSTlpy->SetBinContent(i,j,zSlat);
 671         }
 672         else {
 673           hSSTrpy->SetBinContent(i,j,zSlat);
 674         }
 675       }
 676     }
 677   }
 678
 679   //
 680   // Compare transformations to expected ones
 681   //
 682   Int_t iSlatToPos[13] = {0, 11, 2, 9, 4, 7, 6, 5, 8, 3, 10, 1, 12};
 683
 684   // Theoretical differences with respect to Slat 513 which is here Slat07
 685   lDiffThCenSlat0[0][0]  = (2-5)*400./2. +12.5 -375. -25.;
 686   lDiffThCenSlat0[1][0]  = (3-5)*400./2. +12.5 -375. -25.;
 687   lDiffThCenSlat0[2][0]  = (4-5)*400./2. +12.5 -375. -25.;
 688   lDiffThCenSlat0[3][0]  = (5-5)*400./2. +12.5 -375. -25.;
 689   lDiffThCenSlat0[4][0]  = (5-5)*400./2. +12.5 -375. -25.;
 690   lDiffThCenSlat0[5][0]  = (6-5)*400./2. +12.5 -375. -25.;
 691   lDiffThCenSlat0[6][0]  = (5-5)*400./2. +12.5 -375. -25. +375. +25. -12.5;
 692   lDiffThCenSlat0[7][0]  = (6-5)*400./2. +12.5 -375. -25.;
 693   lDiffThCenSlat0[8][0]  = (5-5)*400./2. +12.5 -375. -25.;
 694   lDiffThCenSlat0[9][0]  = (5-5)*400./2. +12.5 -375. -25.;
 695   lDiffThCenSlat0[10][0] = (4-5)*400./2. +12.5 -375. -25.;
 696   lDiffThCenSlat0[11][0] = (3-5)*400./2. +12.5 -375. -25.;
 697   lDiffThCenSlat0[12][0] = (2-5)*400./2. +12.5 -375. -25.;
 698
 699   lDiffThCenSlat0[12][1] = 382.0 +378.5 +375.5 +294.0 +370.0 +286.0;
 700   lDiffThCenSlat0[1][1]  = 382.0 +378.5 +375.5 +294.0 +370.0;
 701   lDiffThCenSlat0[10][1] = 382.0 +378.5 +375.5 +294.0;
 702   lDiffThCenSlat0[3][1]  = 382.0 +378.5 +375.5;
 703   lDiffThCenSlat0[8][1]  = 382.0 +378.5;
 704   lDiffThCenSlat0[5][1]  = 382.0;
 705   lDiffThCenSlat0[6][1]  = 0.0;
 706   lDiffThCenSlat0[7][1]  = -382.0;
 707   lDiffThCenSlat0[4][1]  = -382.0 -378.5;
 708   lDiffThCenSlat0[9][1]  = -382.0 -378.5 -375.5;
 709   lDiffThCenSlat0[2][1]  = -382.0 -378.5 -375.5 -294.0;
 710   lDiffThCenSlat0[11][1] = -382.0 -378.5 -375.5 -294.0 -370.0;
 711   lDiffThCenSlat0[0][1]  = -382.0 -378.5 -375.5 -294.0 -370.0 -286.0;
 712
 713   lDiffThCenSlat0[12][2] =  (42.5)-(42.5); // (42.5-1.175)-(42.5-1.175);
 714   lDiffThCenSlat0[1][2]  = -(42.5)-(42.5); //-(42.5-1.175)-(42.5-1.175);
 715   lDiffThCenSlat0[10][2] =  (42.5)-(42.5); // (42.5-1.175)-(42.5-1.175);
 716   lDiffThCenSlat0[3][2]  = -(42.5)-(42.5); //-(42.5-1.175)-(42.5-1.175);
 717   lDiffThCenSlat0[8][2]  =  (42.5)-(42.5); // (42.5-1.175)-(42.5-1.175);
 718   lDiffThCenSlat0[5][2]  = -(42.5)-(42.5); //-(42.5-1.175)-(42.5-1.175);
 719   lDiffThCenSlat0[6][2]  =  (42.5)-(42.5); // (42.5-1.175)-(42.5-1.175);
 720   lDiffThCenSlat0[7][2]  = -(42.5)-(42.5); //-(42.5-1.175)-(42.5-1.175);
 721   lDiffThCenSlat0[4][2]  =  (42.5)-(42.5); // (42.5-1.175)-(42.5-1.175);
 722   lDiffThCenSlat0[9][2]  = -(42.5)-(42.5); //-(42.5-1.175)-(42.5-1.175);
 723   lDiffThCenSlat0[2][2]  =  (42.5)-(42.5); // (42.5-1.175)-(42.5-1.175);
 724   lDiffThCenSlat0[11][2] = -(42.5)-(42.5); //-(42.5-1.175)-(42.5-1.175);
 725   lDiffThCenSlat0[0][2]  =  (42.5)-(42.5); // (42.5-1.175)-(42.5-1.175);
 726
 727   TGraph *gDeltaDiffCenXSlat0 = new TGraph(nSlats);
 728   TGraph *gDeltaDiffCenYSlat0 = new TGraph(nSlats);
 729   TGraph *gDeltaDiffCenZSlat0 = new TGraph(nSlats);
 730   TGraph *gDeltaDiffPsiSlat0 = new TGraph(nSlats);
 731   TGraph *gDeltaDiffThtSlat0 = new TGraph(nSlats);
 732   TGraph *gDeltaDiffPhiSlat0 = new TGraph(nSlats);
 733
 734   for(Int_t iSlat=0; iSlat<nSlats; iSlat++){
 735     trfSlat[iSlat].SetTranslation(transSlat[iSlat]);
 736     trfSlat[iSlat].SetRotation(rotSlat[iSlat]);
 737     trfSlat[iSlat].Clear();
 738     trfSlat[iSlat].RotateZ(TMath::RadToDeg()*lRotSlat[iSlat][2]);
 739     trfSlat[iSlat].RotateY(TMath::RadToDeg()*lRotSlat[iSlat][1]);
 740     trfSlat[iSlat].RotateX(TMath::RadToDeg()*lRotSlat[iSlat][0]);
 741     trfSlat[iSlat].SetTranslation(lCenSlat[iSlat]);
 742   }
 743
 744   for(Int_t iSlat=0; iSlat<nSlats; iSlat++){
 745     dtrfSlat[iSlat].SetTranslation(dtransSlat[iSlat]);
 746     dtrfSlat[iSlat].SetRotation(drotSlat[iSlat]);
 747     dtrfSlat[iSlat].Clear();
 748     dtrfSlat[iSlat] = trfSlat[6].Inverse()*trfSlat[iSlat];
 749     dtrfSlat[iSlat].Print();
 750     lDiffCenSlat0[iSlat] = (Double_t*)dtrfSlat[iSlat].GetTranslation();
 751     MatrixToAngles(dtrfSlat[iSlat].GetRotationMatrix(),lDiffRotSlat0[iSlat]);
 752
 753     lDeltaDiffCenSlat0[iSlat][0] = lDiffCenSlat0[iSlat][0]-lDiffThCenSlat0[iSlat][0];
 754     lDeltaDiffCenSlat0[iSlat][1] =  -lDiffCenSlat0[iSlat][1]-lDiffThCenSlat0[iSlat][1];
 755     lDeltaDiffCenSlat0[iSlat][2] =  -lDiffCenSlat0[iSlat][2]-lDiffThCenSlat0[iSlat][2];
 756     lDeltaDiffRotSlat0[iSlat][0] = lDiffRotSlat0[iSlat][0];
 757     lDeltaDiffRotSlat0[iSlat][1] = lDiffRotSlat0[iSlat][1];
 758     lDeltaDiffRotSlat0[iSlat][2] = lDiffRotSlat0[iSlat][2];
 759     gDeltaDiffCenXSlat0->SetPoint(iSlat,lDeltaDiffCenSlat0[iSlat][0],iSlatToPos[iSlat]+1);
 760     gDeltaDiffCenYSlat0->SetPoint(iSlat,lDeltaDiffCenSlat0[iSlat][1],iSlatToPos[iSlat]+1);
 761     gDeltaDiffCenZSlat0->SetPoint(iSlat,lDeltaDiffCenSlat0[iSlat][2],iSlatToPos[iSlat]+1);
 762     gDeltaDiffPsiSlat0->SetPoint(iSlat,1e3*lDeltaDiffRotSlat0[iSlat][0],iSlatToPos[iSlat]+1);
 763     gDeltaDiffThtSlat0->SetPoint(iSlat,1e3*lDeltaDiffRotSlat0[iSlat][1],iSlatToPos[iSlat]+1);
 764     gDeltaDiffPhiSlat0->SetPoint(iSlat,1e3*lDeltaDiffRotSlat0[iSlat][2],iSlatToPos[iSlat]+1);
 765   }
 766
 767   // Import TGeo geometry
 768   char* geoFilename = "geometry.root";
 769   cout << "geometry imported" << endl;
 770   if ( ! AliGeomManager::GetGeometry() ) {
 771     AliGeomManager::LoadGeometry(geoFilename);
 772     if (! AliGeomManager::GetGeometry() ) {
 773       printf("MUONSurveyCh8L: getting geometry from file %s failed\n", geoFilename);
 774       return;
 775     }
 776   }
 777
 778   AliMUONGeometryTransformer *transform = new AliMUONGeometryTransformer();
 779 //   transform->ReadGeometryData("volpath.dat", gGeoManager);
 780   transform->LoadGeometryData();
 781   cout << "geometry data read" << endl;
 782   AliMUONGeometryTransformer *newTransform = ReAlign(transform,11,dtrfSlat,true);
 783   newTransform->WriteTransformations("transform2ReAlign.dat");
 784   cout << "newtransform read" << endl;
 785   // Generate realigned data in local cdb
 786   const TClonesArray* array = newTransform->GetMisAlignmentData();
 787
 788   // CDB manager
 789   AliCDBManager* cdbManager = AliCDBManager::Instance();
 790   cdbManager->SetDefaultStorage("local://ReAlignCDB");
 791
 792   AliCDBMetaData* cdbData = new AliCDBMetaData();
 793   cdbData->SetResponsible("Dimuon Offline project");
 794   cdbData->SetComment("MUON alignment objects with residual misalignment");
 795   AliCDBId id("MUON/Align/Data", 0, 0);
 796   cdbManager->Put(const_cast<TClonesArray*>(array), id, cdbData);
 797
 798   for(Int_t iSlat=0; iSlat<nSlats; iSlat++){
 799     cout << lDeltaDiffCenSlat0[iSlat][0] << " " << lDiffCenSlat0[iSlat][0] << " " << lDiffThCenSlat0[iSlat][0] << endl;
 800   }
 801   cout << endl;
 802   for(Int_t iSlat=0; iSlat<nSlats; iSlat++){
 803     //    lDiffCenSlat0[iSlat][1] = lCenSlat[iSlat][1]-lCenSlat[6][1];
 804     //    lDeltaDiffCenSlat0[iSlat][1] = lDiffCenSlat0[iSlat][1]-lDiffThCenSlat0[iSlat][1];
 805     cout << lDeltaDiffCenSlat0[iSlat][1] << " " << lDiffCenSlat0[iSlat][1] << " " << lDiffThCenSlat0[iSlat][1] << endl;
 806   }
 807   cout << endl;
 808   for(Int_t iSlat=0; iSlat<nSlats; iSlat++){
 809     cout << lDeltaDiffCenSlat0[iSlat][2] << " " << lDiffCenSlat0[iSlat][2] << " " << lDiffThCenSlat0[iSlat][2] << endl;
 810   }
 811   cout << endl;
 812   cout << endl;
 813   for(Int_t iSlat=0; iSlat<nSlats; iSlat++){
 814     cout << lDeltaDiffRotSlat0[iSlat][0] << " " << lDiffRotSlat0[iSlat][0] << " " << lDiffThRotSlat0[iSlat][0] << endl;
 815   }
 816   cout << endl;
 817   for(Int_t iSlat=0; iSlat<nSlats; iSlat++){
 818     cout << lDeltaDiffRotSlat0[iSlat][1] << " " << lDiffRotSlat0[iSlat][1] << " " << lDiffThRotSlat0[iSlat][1] << endl;
 819   }
 820   cout << endl;
 821   for(Int_t iSlat=0; iSlat<nSlats; iSlat++){
 822     cout << lDeltaDiffRotSlat0[iSlat][2] << " " << lDiffRotSlat0[iSlat][2] << " " << lDiffThRotSlat0[iSlat][2] << endl;
 823   }
 824
 825   TH1F *mySlatDeltaDiffCenX = new TH1F("mySlatDeltaDiffCenX","mySlatDeltaDiffCenX",100,-10,10);
 826   mySlatDeltaDiffCenX->SetMaximum(15);
 827   mySlatDeltaDiffCenX->SetMinimum(0);
 828   TH1F *mySlatDeltaDiffCenY = new TH1F("mySlatDeltaDiffCenY","mySlatDeltaDiffCenY",100,-10,10);
 829   mySlatDeltaDiffCenY->SetMaximum(15);
 830   mySlatDeltaDiffCenY->SetMinimum(0);
 831   TH1F *mySlatDeltaDiffCenZ = new TH1F("mySlatDeltaDiffCenZ","mySlatDeltaDiffCenZ",100,-20,20);
 832   mySlatDeltaDiffCenZ->SetMaximum(15);
 833   mySlatDeltaDiffCenZ->SetMinimum(0);
 834
 835   TH1F *mySlatDeltaDiffRotX = new TH1F("mySlatDeltaDiffRotX","mySlatDeltaDiffRotX",100,-10,10);
 836   mySlatDeltaDiffRotX->SetMaximum(15);
 837   mySlatDeltaDiffRotX->SetMinimum(0);
 838   TH1F *mySlatDeltaDiffRotY = new TH1F("mySlatDeltaDiffRotY","mySlatDeltaDiffRotY",100,-10,10);
 839   mySlatDeltaDiffRotY->SetMaximum(15);
 840   mySlatDeltaDiffRotY->SetMinimum(0);
 841   TH1F *mySlatDeltaDiffRotZ = new TH1F("mySlatDeltaDiffRotZ","mySlatDeltaDiffRotZ",100,-5,5);
 842   mySlatDeltaDiffRotZ->SetMaximum(15);
 843   mySlatDeltaDiffRotZ->SetMinimum(0);
 844   //
 845   // ******** Starting plots
 846   //
 847   TCanvas *canvas;
 848   TPad *pad;
 849   TPaveLabel *theTitle;
 850
 851   TPostScript *ps = 0;
 852
 853   if( saveps ){
 854     ps = new TPostScript(filename,filetype);
 855     ps->NewPage();
 856   }
 857
 858   // Inv Mass, Multiplicity
 859   sprintf(str,"Chamber 8L");
 860   TCanvas *cvn0 = new TCanvas("cvn0",str,cWidth,cHeight);
 861   canvas = cvn0;
 862   canvas->Range(0,0,21,29);
 863
 864   TPaveLabel *theTitle0 = new TPaveLabel(3,27.0,18,28.5," Deformations of chamber 8L ","br");
 865   theTitle = theTitle0;
 866   theTitle->SetFillColor(18);
 867   theTitle->SetTextFont(32);
 868   theTitle->SetTextSize(0.4);
 869   theTitle->SetTextColor(1);
 870   theTitle->Draw();
 871
 872   TPad *pad0 = new TPad("pad0","pad0",0.01,0.01,0.98,0.91,0);
 873   pad = pad0;
 874   pad->Draw();
 875   pad->Divide(2,2);
 876
 877   pad->cd(1);
 878   gStyle->SetPalette(1);
 879   hCPSTry->SetMinimum(100);
 880   hCPSTry->SetMaximum(120);
 881   hCPSTry->Draw("lego2z");
 882
 883   pad->cd(2);
 884   gStyle->SetPalette(1);
 885   hSSTry->SetMinimum(60);
 886   hSSTry->SetMaximum(80);
 887   hSSTry->Draw("lego2z");
 888
 889   pad->cd(3);
 890   gStyle->SetPalette(1);
 891   hCSTy->SetMinimum(110);
 892   hCSTy->SetMaximum(130);
 893   hCSTy->Draw("lego2z");
 894
 895   pad->cd(4);
 896   gStyle->SetPalette(1);
 897   hSSTly->SetMinimum(165);
 898   hSSTly->SetMaximum(185);
 899   hSSTly->Draw("lego2z");
 900
 901   if(saveps){
 902     ps->NewPage();
 903   }
 904
 905   // Inv Mass, Multiplicity
 906   sprintf(str,"Chamber 8L");
 907   TCanvas *cvn1 = new TCanvas("cvn1",str,cWidth,cHeight);
 908   canvas = cvn1;
 909   canvas->Range(0,0,21,29);
 910
 911   TPaveLabel *theTitle1 = new TPaveLabel(3,27.0,18,28.5," Deformations of chamber 8L ","br");
 912   theTitle = theTitle1;
 913   theTitle->SetFillColor(18);
 914   theTitle->SetTextFont(32);
 915   theTitle->SetTextSize(0.4);
 916   theTitle->SetTextColor(1);
 917   theTitle->Draw();
 918
 919   TPad *pad1 = new TPad("pad1","pad1",0.01,0.01,0.98,0.91,0);
 920   pad = pad1;
 921   pad->Draw();
 922   pad->Divide(2,2);
 923
 924   pad->cd(1);
 925   gStyle->SetPalette(1);
 926   hCPSTly->SetMinimum(120);
 927   hCPSTly->SetMaximum(140);
 928   hCPSTly->Draw("lego2z");
 929
 930   pad->cd(2);
 931   gStyle->SetPalette(1);
 932   hSSTrpy->SetMinimum(60);
 933   hSSTrpy->SetMaximum(80);
 934   hSSTrpy->Draw("surf2z");
 935
 936   pad->cd(3);
 937   gStyle->SetPalette(1);
 938   hCSTy->SetMinimum(110);
 939   hCSTy->SetMaximum(130);
 940   hCSTy->Draw("lego2z");
 941
 942   pad->cd(4);
 943   gStyle->SetPalette(1);
 944   hSSTlpy->SetMinimum(165);
 945   hSSTlpy->SetMaximum(185);
 946   hSSTlpy->Draw("surf2z");
 947
 948   // Inv Mass, Multiplicity
 949   sprintf(str,"Chamber 8L");
 950   TCanvas *cvn2 = new TCanvas("cvn2",str,cWidth,cHeight);
 951   canvas = cvn2;
 952   canvas->Range(0,0,21,29);
 953
 954   TPaveLabel *theTitle2 = new TPaveLabel(3,27.0,18,28.5," Deformations of chamber 8L ","br");
 955   theTitle = theTitle2;
 956   theTitle->SetFillColor(18);
 957   theTitle->SetTextFont(32);
 958   theTitle->SetTextSize(0.4);
 959   theTitle->SetTextColor(1);
 960   theTitle->Draw();
 961
 962   TPad *pad2 = new TPad("pad2","pad2",0.01,0.01,0.98,0.91,0);
 963   pad = pad2;
 964   pad->Draw();
 965   pad->Divide(3,2);
 966
 967   pad->cd(1);
 968   mySlatDeltaDiffCenX->Draw();
 969   mySlatDeltaDiffCenX->SetXTitle("#Delta[(xc_{i}^{m}-xc_{0}^{m})-(xc_{i}^{th}-xc_{0}^{th})] (mm)");
 970   mySlatDeltaDiffCenX->SetYTitle("Slat ascending vertical ordering");
 971   gDeltaDiffCenXSlat0->SetMarkerStyle(20);
 972   gDeltaDiffCenXSlat0->Draw("P");
 973
 974   pad->cd(2);
 975   mySlatDeltaDiffCenY->Draw();
 976   mySlatDeltaDiffCenY->SetXTitle("#Delta[(yc_{i}^{m}-yc_{0}^{m})-(yc_{i}^{th}-yc_{0}^{th})] (mm)");
 977   mySlatDeltaDiffCenY->SetYTitle("Slat ascending vertical ordering");
 978   gDeltaDiffCenYSlat0->SetMarkerStyle(20);
 979   gDeltaDiffCenYSlat0->Draw("P");
 980
 981   pad->cd(3);
 982   mySlatDeltaDiffCenZ->Draw();
 983   mySlatDeltaDiffCenZ->SetXTitle("#Delta[(zc_{i}^{m}-zc_{0}^{m})-(zc_{i}^{th}-zc_{0}^{th})] (mm)");
 984   mySlatDeltaDiffCenZ->SetYTitle("Slat ascending vertical ordering");
 985   gDeltaDiffCenZSlat0->SetMarkerStyle(20);
 986   gDeltaDiffCenZSlat0->Draw("P");
 987
 988   pad->cd(4);
 989   mySlatDeltaDiffRotX->Draw();
 990   mySlatDeltaDiffRotX->SetXTitle("#Delta[(#psi_{i}^{m}-#psi_{0}^{m})-(#psi_{i}^{th}-#psi_{0}^{th})] (mrad)");
 991   mySlatDeltaDiffRotX->SetYTitle("Slat ascending vertical ordering");
 992   gDeltaDiffPsiSlat0->SetMarkerStyle(20);
 993   gDeltaDiffPsiSlat0->Draw("P");
 994
 995   pad->cd(5);
 996   mySlatDeltaDiffRotY->Draw();
 997   mySlatDeltaDiffRotY->SetXTitle("#Delta[(#theta_{i}^{m}-#theta_{0}^{m})-(#theta_{i}^{th}-#theta_{0}^{th})] (mrad)");
 998   mySlatDeltaDiffRotY->SetYTitle("Slat ascending vertical ordering");
 999   gDeltaDiffThtSlat0->SetMarkerStyle(20);
1000   gDeltaDiffThtSlat0->Draw("P");
1001
1002   pad->cd(6);
1003   mySlatDeltaDiffRotZ->Draw();
1004   mySlatDeltaDiffRotZ->SetXTitle("#Delta[(#phi_{i}^{m}-#phi_{0}^{m})-(#phi_{i}^{th}-#phi_{0}^{th})] (mrad)");
1005   mySlatDeltaDiffRotZ->SetYTitle("Slat ascending vertical ordering");
1006   gDeltaDiffPhiSlat0->SetMarkerStyle(20);
1007   gDeltaDiffPhiSlat0->Draw("P");
1008
1009   if( saveps ){
1010     ps->Close();
1011   }
1012 }