[u/mrichter/AliRoot.git] / MUON / AliMUONTriggerGeometryBuilder.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$
//
// Class AliMUONTriggerGeometryBuilder
// -----------------------------------
// MUON Trigger stations geometry construction class.
//
// Author: Philippe Crochette, LPC Clermont-Ferrand

#include <TVirtualMC.h>
#include <TGeoMatrix.h>

#include "AliLog.h"

#include "AliMUONTriggerGeometryBuilder.h"
#include "AliMUON.h"
#include "AliMUONChamber.h"
#include "AliMUONGeometryModule.h"
#include "AliMUONGeometryEnvelopeStore.h"

ClassImp(AliMUONTriggerGeometryBuilder)

//______________________________________________________________________________
AliMUONTriggerGeometryBuilder::AliMUONTriggerGeometryBuilder(AliMUON* muon)
 : AliMUONVGeometryBuilder("trigger.dat",
                           muon->Chamber(10).GetGeometry(), 
			   muon->Chamber(11).GetGeometry(),
                           muon->Chamber(12).GetGeometry(),
			   muon->Chamber(13).GetGeometry()),
   fMUON(muon)
{
// Standard constructor

}

//______________________________________________________________________________
AliMUONTriggerGeometryBuilder::AliMUONTriggerGeometryBuilder()
 : AliMUONVGeometryBuilder(),
   fMUON(0)
{
// Default constructor
}


//______________________________________________________________________________
AliMUONTriggerGeometryBuilder::AliMUONTriggerGeometryBuilder(const AliMUONTriggerGeometryBuilder& rhs)
  : AliMUONVGeometryBuilder(rhs)
{
// Protected copy constructor

  AliFatal("Copy constructor is not implemented.");
}

//______________________________________________________________________________
AliMUONTriggerGeometryBuilder::~AliMUONTriggerGeometryBuilder() {
//
}

//______________________________________________________________________________
AliMUONTriggerGeometryBuilder& 
AliMUONTriggerGeometryBuilder::operator = (const AliMUONTriggerGeometryBuilder& rhs) 
{
// Protected assignement operator

  // check assignement to self
  if (this == &rhs) return *this;

  AliFatal("Assignment operator is not implemented.");
    
  return *this;  
}

//
// public methods
//

//______________________________________________________________________________
void AliMUONTriggerGeometryBuilder::CreateGeometry()
{
// From AliMUONv1::CreateGeometry()

    /* 
       zpos1 and zpos2 are the middle of the first and second
       planes of station 1 (+1m for second station):
       zpos1=(zpos1m+zpos1p)/2=(15999+16071)/2=16035 mm, thick/2=40 mm
       zpos2=(zpos2m+zpos2p)/2=(16169+16241)/2=16205 mm, thick/2=40 mm
       zposxm and zposxp= middles of gaz gaps within a detection plane
       rem: the total thickness accounts for 1 mm of al on both
       side of the RPCs (see zpos1 and zpos2)
    */
    
    Int_t *idtmed = fMUON->GetIdtmed()->GetArray()-1099;
    Int_t idAir= idtmed[1100]; // medium 1
    Int_t idAlu1=idtmed[1103]; // medium 4
    Int_t detElemId=0;          // Detection Element Number    
    Float_t tpar[3];
    Double_t dpar[3];    
    
// vertical gap between right and left chambers (kDXZERO*2=4cm)
    const Float_t kDXZERO=2.; 
// main distances for chamber definition in first plane/first station
    const Float_t kXMIN=34.;       
    const Float_t kXMED=51.;                                
    const Float_t kXMAX=255.; 
// 090704 kXMAX changed from 272 to 255.
// (see fig.2-4 & 2-5 of Local Trigger Board PRR)
// segmentation updated accordingly
    const Float_t kYMIN=34.;                              
    const Float_t kYMAX=51.;                              
// inner/outer radius of flange between beam shield. and chambers (1/station)
    const Float_t kRMIN[2]={50.,50.};
    const Float_t kRMAX[2]={64.,68.};
// z position of the middle of the gas gap in mother vol 
    const Float_t kZm=-3.6;
    const Float_t kZp=+3.6;     

    AliMUONChamber *iChamber, *iChamber1;
    iChamber1 = &fMUON->Chamber(10);
    Float_t zpos1=-iChamber1->Z(); 
    
// ratio of zpos1m/zpos1p and inverse for first plane
    Float_t zmp=(zpos1-3.6)/(zpos1+3.6);
    Float_t zpm=1./zmp;
    
    Int_t icount=0;  // chamber counter (0 1 2 3)
    
    for (Int_t istation=0; istation<2; istation++) { // loop on stations
	for (Int_t iplane=0; iplane<2; iplane++) { // loop on detection planes
	    
	    Int_t iVolNum=1; // counter Volume Number
	    icount = Int_t(iplane*TMath::Power(2,0))+
		Int_t(istation*TMath::Power(2,1));
	    
	    iChamber = &fMUON->Chamber(10+icount);
	    Float_t zpos = - iChamber->Z();	     
	    
// Flange between beam shielding and RPC 
	    tpar[0]= kRMIN[istation];
	    tpar[1]= kRMAX[istation];
	    tpar[2]= 4.0;	    
	    char volFlange[5];
	    sprintf(volFlange,"SF%dA",icount+1);	 
	    gMC->Gsvolu(volFlange,"TUBE",idAlu1,tpar,3);     // Al
            // changed by ivana
	    //gMC->Gspos(volFlange,1,"ALIC",0.,0.,zpos,0,"MANY");
	    iChamber->GetGeometry()->GetEnvelopeStore()
	      ->AddEnvelope(volFlange, 0, false, "MANY");
	    
// scaling factor
	    Float_t zRatio = zpos / zpos1;
	    
// envelopes (same size except line 5, all virtual)
	    char volEnv[18][5];
	    tpar[1] = kYMIN * zRatio; 
	    tpar[2] = 0.4;
	    Int_t i=0;    // counter
	    for (Int_t icolumn=0; icolumn<2; icolumn++) {
		for (Int_t iline=1; iline<10; iline++){
		    tpar[0] = (kXMAX/2.) * zRatio;
		    if (iline==5) tpar[0] = ((kXMAX-kXMED)/2.)*zRatio;
		    if (icolumn==0) 
			sprintf(volEnv[i],"S%dR%d",icount,iline);
		    else
			sprintf(volEnv[i],"S%dL%d",icount,iline);
		    gMC->Gsvolu(volEnv[i],"BOX",idAir,tpar,0); 
		    i++;
		}
	    }

// chamber prototype
	    tpar[0]= 0.;
	    tpar[1]= 0.;
	    tpar[2]= 0.;	    
	    char volAlu[5];     // Alu 
	    char volBak[5];     // Bakelite
	    char volGaz[5];     // Gas streamer	    
	    sprintf(volAlu,"SC%dA",icount+1);
	    sprintf(volBak,"SB%dA",icount+1);
	    sprintf(volGaz,"SG%dA",icount+1);
	    gMC->Gsvolu(volAlu,"BOX",idAlu1,tpar,0);         // Al
	    gMC->Gsvolu(volBak,"BOX",idtmed[1107],tpar,0);   // Bakelite
	    gMC->Gsvolu(volGaz,"BOX",idtmed[1106],tpar,0);   // Gas streamer
	    tpar[0] = -1.;
	    tpar[1] = -1.;
	    tpar[2] = 0.1;    
	    gMC->Gsposp(volGaz,1,volBak,0.,0.,0.,0,"ONLY",tpar,3);
	    tpar[2] = 0.3;
	    gMC->Gsposp(volBak,1,volAlu,0.,0.,0.,0,"ONLY",tpar,3);

// chamber type A
	    Float_t xEnv = (kDXZERO+kXMED+(kXMAX-kXMED)/2.)*zRatio;
	    Float_t yEnvM = 0.;	 // y low position of envelope in chamber
	    Float_t yEnvP = 0.;	 // y up position of envelope in chamber
	    Float_t yEnvPsave = 0.; // tmp data
	    Float_t yEnvMsave = 0.; // tmp data
	    Float_t xpos = 0.; // x position of RPC in envelope	    
	    Float_t ypos = 0.; // y position of RPC in envelope
	    dpar[2] = 0.4;	    
	    dpar[0] = ((kXMAX-kXMED)/2.)*zRatio;
	    dpar[1] = kYMIN * zRatio;

	    detElemId = (10+icount+1)*100+4;
	    GetEnvelopes(10+icount)->AddEnvelope(volEnv[4], detElemId, true, TGeoTranslation(xEnv,yEnvM,kZm));
	    detElemId = (10+icount+1)*100+50+4;
	    GetEnvelopes(10+icount)->AddEnvelope(volEnv[13], detElemId, true, TGeoTranslation(-xEnv,yEnvP,kZp),TGeoRotation("rot1",90.,180.,90.,90.,180.,0.));

	    GetEnvelopes(10+icount)->AddEnvelopeConstituentParam(volAlu,volEnv[4],iVolNum++,3, dpar);
	    GetEnvelopes(10+icount)->AddEnvelopeConstituentParam(volAlu,volEnv[13],iVolNum++,3, dpar);	    

// chamber type B (plus envelope chambers B & C)   
	    xEnv = (kDXZERO+kXMAX/2.)*zRatio;
	    yEnvPsave = yEnvP;
	    yEnvMsave = yEnvM;
	    yEnvP = (yEnvMsave + kYMIN * zRatio ) * zpm + kYMIN * zRatio;
	    yEnvM = (yEnvPsave + kYMIN * zRatio ) * zmp + kYMIN * zRatio;
	    dpar[0] = ((kXMAX-kXMIN)/2.) * zRatio;
	    dpar[1] = ((kYMAX-kYMIN)/2.) * zRatio;
	    xpos = kXMIN/2. * zRatio;
	    ypos = (kYMIN - kYMIN/4.) * zRatio;

	    detElemId = (10+icount+1)*100+3;
	    GetEnvelopes(10+icount)->AddEnvelope(volEnv[3], detElemId, true, TGeoTranslation( xEnv,-yEnvP,kZp));
	    detElemId = (10+icount+1)*100+5;
	    GetEnvelopes(10+icount)->AddEnvelope(volEnv[5], detElemId, true, TGeoTranslation( xEnv, yEnvP,kZp));
	    detElemId = (10+icount+1)*100+50+3;
	    GetEnvelopes(10+icount)->AddEnvelope(volEnv[12], detElemId, true, TGeoTranslation(-xEnv,-yEnvM,kZm),TGeoRotation("rot1",90.,180.,90.,90.,180.,0.));
	    detElemId = (10+icount+1)*100+50+5;
	    GetEnvelopes(10+icount)->AddEnvelope(volEnv[14], detElemId, true, TGeoTranslation(-xEnv, yEnvM,kZm),TGeoRotation("rot1",90.,180.,90.,90.,180.,0.));

	    GetEnvelopes(10+icount)->AddEnvelopeConstituentParam(volAlu,volEnv[3],iVolNum++,TGeoTranslation(xpos, ypos,0.),3,dpar);
	    GetEnvelopes(10+icount)->AddEnvelopeConstituentParam(volAlu,volEnv[5],iVolNum++,TGeoTranslation(xpos,-ypos,0.),3,dpar);
	    GetEnvelopes(10+icount)->AddEnvelopeConstituentParam(volAlu,volEnv[12],iVolNum++,TGeoTranslation(xpos, ypos,0.),3,dpar);
	    GetEnvelopes(10+icount)->AddEnvelopeConstituentParam(volAlu,volEnv[14],iVolNum++,TGeoTranslation(xpos,-ypos,0.),3,dpar);

// chamber type C (note: same Z than type B)
	    dpar[0] = (kXMAX/2)*zRatio;
	    dpar[1] = (kYMAX/2)*zRatio;
	    xpos = 0.;	    
	    ypos = ((kYMAX - kYMIN)/2.) * zRatio;

	    GetEnvelopes(10+icount)->AddEnvelopeConstituentParam(volAlu,volEnv[3],iVolNum++,TGeoTranslation(xpos,-ypos,0.),3,dpar);
	    GetEnvelopes(10+icount)->AddEnvelopeConstituentParam(volAlu,volEnv[5],iVolNum++,TGeoTranslation(xpos, ypos,0.),3,dpar);
	    GetEnvelopes(10+icount)->AddEnvelopeConstituentParam(volAlu,volEnv[12],iVolNum++,TGeoTranslation(xpos,-ypos,0.),3,dpar);
	    GetEnvelopes(10+icount)->AddEnvelopeConstituentParam(volAlu,volEnv[14],iVolNum++,TGeoTranslation(xpos, ypos,0.),3,dpar);
    
// chamber type D, E and F (same size)
// D	    
	    yEnvPsave = yEnvP;
	    yEnvMsave = yEnvM;
	    yEnvP = (yEnvMsave + kYMIN * zRatio ) * zpm + kYMIN * zRatio;
	    yEnvM = (yEnvPsave + kYMIN * zRatio ) * zmp + kYMIN * zRatio;
	    dpar[0] = (kXMAX/2.)*zRatio;
	    dpar[1] =  kYMIN*zRatio;

	    detElemId = (10+icount+1)*100+2;
	    GetEnvelopes(10+icount)->AddEnvelope(volEnv[2], detElemId, true, TGeoTranslation(xEnv,-yEnvM,kZm));
	    detElemId = (10+icount+1)*100+6;
	    GetEnvelopes(10+icount)->AddEnvelope(volEnv[6], detElemId, true, TGeoTranslation(xEnv, yEnvM,kZm));
	    detElemId = (10+icount+1)*100+50+2;
            GetEnvelopes(10+icount)->AddEnvelope(volEnv[11], detElemId, true, TGeoTranslation(-xEnv,-yEnvP,kZp),TGeoRotation("rot1",90.,180.,90.,90.,180.,0.));
	    detElemId = (10+icount+1)*100+50+6;
            GetEnvelopes(10+icount)->AddEnvelope(volEnv[15], detElemId, true, TGeoTranslation(-xEnv, yEnvP,kZp),TGeoRotation("rot1",90.,180.,90.,90.,180.,0.));

	    GetEnvelopes(10+icount)->AddEnvelopeConstituentParam(volAlu,volEnv[2],iVolNum++,3, dpar);
	    GetEnvelopes(10+icount)->AddEnvelopeConstituentParam(volAlu,volEnv[6],iVolNum++,3, dpar);
	    GetEnvelopes(10+icount)->AddEnvelopeConstituentParam(volAlu,volEnv[11],iVolNum++,3, dpar);
	    GetEnvelopes(10+icount)->AddEnvelopeConstituentParam(volAlu,volEnv[15],iVolNum++,3, dpar);

// E
	    yEnvPsave = yEnvP;
	    yEnvMsave = yEnvM;
	    yEnvP = (yEnvMsave + kYMIN * zRatio ) * zpm + kYMIN * zRatio;
	    yEnvM = (yEnvPsave + kYMIN * zRatio ) * zmp + kYMIN * zRatio;

	    detElemId = (10+icount+1)*100+1;
	    GetEnvelopes(10+icount)->AddEnvelope(volEnv[1], detElemId, true, TGeoTranslation(xEnv,-yEnvP,kZp));
	    detElemId = (10+icount+1)*100+7;
	    GetEnvelopes(10+icount)->AddEnvelope(volEnv[7], detElemId, true, TGeoTranslation(xEnv, yEnvP,kZp));
	    detElemId = (10+icount+1)*100+50+1;
	    GetEnvelopes(10+icount)->AddEnvelope(volEnv[10], detElemId, true, TGeoTranslation(-xEnv,-yEnvM,kZm),TGeoRotation("rot1",90.,180.,90.,90.,180.,0.));
	    detElemId = (10+icount+1)*100+50+7;
	    GetEnvelopes(10+icount)->AddEnvelope(volEnv[16], detElemId, true, TGeoTranslation(-xEnv, yEnvM,kZm),TGeoRotation("rot1",90.,180.,90.,90.,180.,0.));

	    GetEnvelopes(10+icount)->AddEnvelopeConstituentParam(volAlu,volEnv[1],iVolNum++,3,dpar);
	    GetEnvelopes(10+icount)->AddEnvelopeConstituentParam(volAlu,volEnv[7],iVolNum++,3,dpar);
	    GetEnvelopes(10+icount)->AddEnvelopeConstituentParam(volAlu,volEnv[10],iVolNum++,3,dpar);
	    GetEnvelopes(10+icount)->AddEnvelopeConstituentParam(volAlu,volEnv[16],iVolNum++,3,dpar);


// F
	    yEnvPsave = yEnvP;
	    yEnvMsave = yEnvM;
	    yEnvP = (yEnvMsave + kYMIN * zRatio ) * zpm + kYMIN * zRatio;
	    yEnvM = (yEnvPsave + kYMIN * zRatio ) * zmp + kYMIN * zRatio;

	    detElemId = (10+icount+1)*100;
	    GetEnvelopes(10+icount)->AddEnvelope(volEnv[0], detElemId, true, TGeoTranslation(xEnv,-yEnvM,kZm));
	    detElemId = (10+icount+1)*100+8;
	    GetEnvelopes(10+icount)->AddEnvelope(volEnv[8], detElemId, true, TGeoTranslation(xEnv, yEnvM,kZm));
	    detElemId = (10+icount+1)*100+50;
	    GetEnvelopes(10+icount)->AddEnvelope(volEnv[9], detElemId, true, TGeoTranslation(-xEnv,-yEnvP,kZp),TGeoRotation("rot1",90.,180.,90.,90.,180.,0.));
	    detElemId = (10+icount+1)*100+50+8;
	    GetEnvelopes(10+icount)->AddEnvelope(volEnv[17], detElemId, true, TGeoTranslation(-xEnv, yEnvP,kZp),TGeoRotation("rot1",90.,180.,90.,90.,180.,0.));
	    
	    GetEnvelopes(10+icount)->AddEnvelopeConstituentParam(volAlu,volEnv[0],iVolNum++,3,dpar);
	    GetEnvelopes(10+icount)->AddEnvelopeConstituentParam(volAlu,volEnv[8],iVolNum++,3,dpar);
	    GetEnvelopes(10+icount)->AddEnvelopeConstituentParam(volAlu,volEnv[9],iVolNum++,3,dpar);
	    GetEnvelopes(10+icount)->AddEnvelopeConstituentParam(volAlu,volEnv[17],iVolNum++,3,dpar);

	} // end loop on detection planes
    } // end loop on stations    
}

//______________________________________________________________________________
void AliMUONTriggerGeometryBuilder::SetTransformations() 
{
// Defines the transformations for the trigger chambers.
// ---
    Double_t zpos1, zpos2;    
    AliMUONChamber *iChamber1, *iChamber2;

    iChamber1 = &fMUON->Chamber(10);
    zpos1= - iChamber1->Z(); 
    iChamber1->GetGeometry()
	->SetTranslation(TGeoTranslation(0., 0., zpos1));
    
    iChamber2 = &fMUON->Chamber(11);
    zpos2 = - iChamber2->Z(); 
    iChamber2->GetGeometry()
	->SetTranslation(TGeoTranslation(0., 0., zpos2));

    iChamber1 = &fMUON->Chamber(12);
    zpos1 = - iChamber1->Z(); 
    iChamber1->GetGeometry()
	->SetTranslation(TGeoTranslation(0., 0., zpos1));
    
    iChamber2 = &fMUON->Chamber(13);
    zpos2 = - iChamber2->Z(); 
    iChamber2->GetGeometry()
	->SetTranslation(TGeoTranslation(0., 0., zpos2));
}

//______________________________________________________________________________
void AliMUONTriggerGeometryBuilder::SetSensitiveVolumes()
{
// Defines the sensitive volumes for trigger station chambers.
// ---

  GetGeometry(10)->SetSensitiveVolume("SG1A");
  GetGeometry(11)->SetSensitiveVolume("SG2A");
  GetGeometry(12)->SetSensitiveVolume("SG3A");
  GetGeometry(13)->SetSensitiveVolume("SG4A");
}
Commit	Line	Data
30178c30	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
d1cd2474	16	// $Id$
	17	//
	18	// Class AliMUONTriggerGeometryBuilder
	19	// -----------------------------------
	20	// MUON Trigger stations geometry construction class.
	21	//
	22	// Author: Philippe Crochette, LPC Clermont-Ferrand
	23
	24	#include <TVirtualMC.h>
	25	#include <TGeoMatrix.h>
	26
e118b27e	27	#include "AliLog.h"
e118b27e	28
d1cd2474	29	#include "AliMUONTriggerGeometryBuilder.h"
	30	#include "AliMUON.h"
	31	#include "AliMUONChamber.h"
e118b27e	32	#include "AliMUONGeometryModule.h"
a432117a	33	#include "AliMUONGeometryEnvelopeStore.h"
d1cd2474	34
	35	ClassImp(AliMUONTriggerGeometryBuilder)
	36
	37	//______________________________________________________________________________
	38	AliMUONTriggerGeometryBuilder::AliMUONTriggerGeometryBuilder(AliMUON* muon)
a432117a	39	: AliMUONVGeometryBuilder("trigger.dat",
e118b27e	40	muon->Chamber(10).GetGeometry(),
	41	muon->Chamber(11).GetGeometry(),
	42	muon->Chamber(12).GetGeometry(),
	43	muon->Chamber(13).GetGeometry()),
d1cd2474	44	fMUON(muon)
	45	{
	46	// Standard constructor
	47
	48	}
	49
	50	//______________________________________________________________________________
	51	AliMUONTriggerGeometryBuilder::AliMUONTriggerGeometryBuilder()
	52	: AliMUONVGeometryBuilder(),
	53	fMUON(0)
	54	{
	55	// Default constructor
	56	}
	57
	58
	59	//______________________________________________________________________________
	60	AliMUONTriggerGeometryBuilder::AliMUONTriggerGeometryBuilder(const AliMUONTriggerGeometryBuilder& rhs)
	61	: AliMUONVGeometryBuilder(rhs)
	62	{
30178c30	63	// Protected copy constructor
30178c30	64
8c343c7c	65	AliFatal("Copy constructor is not implemented.");
d1cd2474	66	}
	67
	68	//______________________________________________________________________________
	69	AliMUONTriggerGeometryBuilder::~AliMUONTriggerGeometryBuilder() {
	70	//
	71	}
	72
	73	//______________________________________________________________________________
	74	AliMUONTriggerGeometryBuilder&
	75	AliMUONTriggerGeometryBuilder::operator = (const AliMUONTriggerGeometryBuilder& rhs)
	76	{
30178c30	77	// Protected assignement operator
30178c30	78
d1cd2474	79	// check assignement to self
	80	if (this == &rhs) return *this;
	81
8c343c7c	82	AliFatal("Assignment operator is not implemented.");
d1cd2474	83
	84	return *this;
	85	}
	86
	87	//
	88	// public methods
	89	//
	90
	91	//______________________________________________________________________________
	92	void AliMUONTriggerGeometryBuilder::CreateGeometry()
	93	{
	94	// From AliMUONv1::CreateGeometry()
	95
	96	/*
	97	zpos1 and zpos2 are the middle of the first and second
	98	planes of station 1 (+1m for second station):
	99	zpos1=(zpos1m+zpos1p)/2=(15999+16071)/2=16035 mm, thick/2=40 mm
	100	zpos2=(zpos2m+zpos2p)/2=(16169+16241)/2=16205 mm, thick/2=40 mm
	101	zposxm and zposxp= middles of gaz gaps within a detection plane
	102	rem: the total thickness accounts for 1 mm of al on both
	103	side of the RPCs (see zpos1 and zpos2)
	104	*/
	105
	106	Int_t *idtmed = fMUON->GetIdtmed()->GetArray()-1099;
	107	Int_t idAir= idtmed[1100]; // medium 1
	108	Int_t idAlu1=idtmed[1103]; // medium 4
a432117a	109	Int_t detElemId=0; // Detection Element Number
d1cd2474	110	Float_t tpar[3];
	111	Double_t dpar[3];
	112
	113	// vertical gap between right and left chambers (kDXZERO*2=4cm)
	114	const Float_t kDXZERO=2.;
	115	// main distances for chamber definition in first plane/first station
	116	const Float_t kXMIN=34.;
	117	const Float_t kXMED=51.;
b6a52ffa	118	const Float_t kXMAX=255.;
b6a52ffa	119	// 090704 kXMAX changed from 272 to 255.
d1cd2474	120	// (see fig.2-4 & 2-5 of Local Trigger Board PRR)
b6a52ffa	121	// segmentation updated accordingly
d1cd2474	122	const Float_t kYMIN=34.;
	123	const Float_t kYMAX=51.;
	124	// inner/outer radius of flange between beam shield. and chambers (1/station)
	125	const Float_t kRMIN[2]={50.,50.};
	126	const Float_t kRMAX[2]={64.,68.};
	127	// z position of the middle of the gas gap in mother vol
	128	const Float_t kZm=-3.6;
	129	const Float_t kZp=+3.6;
	130
	131	AliMUONChamber iChamber, iChamber1;
e118b27e	132	iChamber1 = &fMUON->Chamber(10);
d1cd2474	133	Float_t zpos1=-iChamber1->Z();
	134
	135	// ratio of zpos1m/zpos1p and inverse for first plane
	136	Float_t zmp=(zpos1-3.6)/(zpos1+3.6);
	137	Float_t zpm=1./zmp;
	138
	139	Int_t icount=0; // chamber counter (0 1 2 3)
	140
	141	for (Int_t istation=0; istation<2; istation++) { // loop on stations
	142	for (Int_t iplane=0; iplane<2; iplane++) { // loop on detection planes
	143
	144	Int_t iVolNum=1; // counter Volume Number
	145	icount = Int_t(iplane*TMath::Power(2,0))+
	146	Int_t(istation*TMath::Power(2,1));
	147
e118b27e	148	iChamber = &fMUON->Chamber(10+icount);
d1cd2474	149	Float_t zpos = - iChamber->Z();
	150
	151	// Flange between beam shielding and RPC
	152	tpar[0]= kRMIN[istation];
	153	tpar[1]= kRMAX[istation];
	154	tpar[2]= 4.0;
	155	char volFlange[5];
	156	sprintf(volFlange,"SF%dA",icount+1);
	157	gMC->Gsvolu(volFlange,"TUBE",idAlu1,tpar,3); // Al
	158	// changed by ivana
	159	//gMC->Gspos(volFlange,1,"ALIC",0.,0.,zpos,0,"MANY");
a432117a	160	iChamber->GetGeometry()->GetEnvelopeStore()
a432117a	161	->AddEnvelope(volFlange, 0, false, "MANY");
d1cd2474	162
	163	// scaling factor
	164	Float_t zRatio = zpos / zpos1;
	165
	166	// envelopes (same size except line 5, all virtual)
	167	char volEnv[18][5];
	168	tpar[1] = kYMIN * zRatio;
	169	tpar[2] = 0.4;
	170	Int_t i=0; // counter
	171	for (Int_t icolumn=0; icolumn<2; icolumn++) {
	172	for (Int_t iline=1; iline<10; iline++){
	173	tpar[0] = (kXMAX/2.) * zRatio;
	174	if (iline==5) tpar[0] = ((kXMAX-kXMED)/2.)*zRatio;
	175	if (icolumn==0)
d1cd2474	176	sprintf(volEnv[i],"S%dR%d",icount,iline);
528abf6f	177	else
528abf6f	178	sprintf(volEnv[i],"S%dL%d",icount,iline);
d1cd2474	179	gMC->Gsvolu(volEnv[i],"BOX",idAir,tpar,0);
	180	i++;
	181	}
	182	}
	183
	184	// chamber prototype
	185	tpar[0]= 0.;
	186	tpar[1]= 0.;
	187	tpar[2]= 0.;
	188	char volAlu[5]; // Alu
	189	char volBak[5]; // Bakelite
	190	char volGaz[5]; // Gas streamer
	191	sprintf(volAlu,"SC%dA",icount+1);
	192	sprintf(volBak,"SB%dA",icount+1);
	193	sprintf(volGaz,"SG%dA",icount+1);
	194	gMC->Gsvolu(volAlu,"BOX",idAlu1,tpar,0); // Al
	195	gMC->Gsvolu(volBak,"BOX",idtmed[1107],tpar,0); // Bakelite
	196	gMC->Gsvolu(volGaz,"BOX",idtmed[1106],tpar,0); // Gas streamer
	197	tpar[0] = -1.;
	198	tpar[1] = -1.;
	199	tpar[2] = 0.1;
	200	gMC->Gsposp(volGaz,1,volBak,0.,0.,0.,0,"ONLY",tpar,3);
	201	tpar[2] = 0.3;
	202	gMC->Gsposp(volBak,1,volAlu,0.,0.,0.,0,"ONLY",tpar,3);
	203
	204	// chamber type A
	205	Float_t xEnv = (kDXZERO+kXMED+(kXMAX-kXMED)/2.)*zRatio;
	206	Float_t yEnvM = 0.; // y low position of envelope in chamber
	207	Float_t yEnvP = 0.; // y up position of envelope in chamber
	208	Float_t yEnvPsave = 0.; // tmp data
	209	Float_t yEnvMsave = 0.; // tmp data
	210	Float_t xpos = 0.; // x position of RPC in envelope
	211	Float_t ypos = 0.; // y position of RPC in envelope
	212	dpar[2] = 0.4;
	213	dpar[0] = ((kXMAX-kXMED)/2.)*zRatio;
	214	dpar[1] = kYMIN * zRatio;
	215
a432117a	216	detElemId = (10+icount+1)*100+4;
	217	GetEnvelopes(10+icount)->AddEnvelope(volEnv[4], detElemId, true, TGeoTranslation(xEnv,yEnvM,kZm));
	218	detElemId = (10+icount+1)*100+50+4;
298c0899	219	GetEnvelopes(10+icount)->AddEnvelope(volEnv[13], detElemId, true, TGeoTranslation(-xEnv,yEnvP,kZp),TGeoRotation("rot1",90.,180.,90.,90.,180.,0.));
d1cd2474	220
a432117a	221	GetEnvelopes(10+icount)->AddEnvelopeConstituentParam(volAlu,volEnv[4],iVolNum++,3, dpar);
a432117a	222	GetEnvelopes(10+icount)->AddEnvelopeConstituentParam(volAlu,volEnv[13],iVolNum++,3, dpar);
d1cd2474	223
	224	// chamber type B (plus envelope chambers B & C)
	225	xEnv = (kDXZERO+kXMAX/2.)*zRatio;
	226	yEnvPsave = yEnvP;
	227	yEnvMsave = yEnvM;
	228	yEnvP = (yEnvMsave + kYMIN * zRatio ) * zpm + kYMIN * zRatio;
	229	yEnvM = (yEnvPsave + kYMIN * zRatio ) * zmp + kYMIN * zRatio;
	230	dpar[0] = ((kXMAX-kXMIN)/2.) * zRatio;
	231	dpar[1] = ((kYMAX-kYMIN)/2.) * zRatio;
	232	xpos = kXMIN/2. * zRatio;
	233	ypos = (kYMIN - kYMIN/4.) * zRatio;
	234
a432117a	235	detElemId = (10+icount+1)*100+3;
	236	GetEnvelopes(10+icount)->AddEnvelope(volEnv[3], detElemId, true, TGeoTranslation( xEnv,-yEnvP,kZp));
	237	detElemId = (10+icount+1)*100+5;
	238	GetEnvelopes(10+icount)->AddEnvelope(volEnv[5], detElemId, true, TGeoTranslation( xEnv, yEnvP,kZp));
	239	detElemId = (10+icount+1)*100+50+3;
298c0899	240	GetEnvelopes(10+icount)->AddEnvelope(volEnv[12], detElemId, true, TGeoTranslation(-xEnv,-yEnvM,kZm),TGeoRotation("rot1",90.,180.,90.,90.,180.,0.));
a432117a	241	detElemId = (10+icount+1)*100+50+5;
298c0899	242	GetEnvelopes(10+icount)->AddEnvelope(volEnv[14], detElemId, true, TGeoTranslation(-xEnv, yEnvM,kZm),TGeoRotation("rot1",90.,180.,90.,90.,180.,0.));
d1cd2474	243
a432117a	244	GetEnvelopes(10+icount)->AddEnvelopeConstituentParam(volAlu,volEnv[3],iVolNum++,TGeoTranslation(xpos, ypos,0.),3,dpar);
a432117a	245	GetEnvelopes(10+icount)->AddEnvelopeConstituentParam(volAlu,volEnv[5],iVolNum++,TGeoTranslation(xpos,-ypos,0.),3,dpar);
298c0899	246	GetEnvelopes(10+icount)->AddEnvelopeConstituentParam(volAlu,volEnv[12],iVolNum++,TGeoTranslation(xpos, ypos,0.),3,dpar);
298c0899	247	GetEnvelopes(10+icount)->AddEnvelopeConstituentParam(volAlu,volEnv[14],iVolNum++,TGeoTranslation(xpos,-ypos,0.),3,dpar);
d1cd2474	248
	249	// chamber type C (note: same Z than type B)
	250	dpar[0] = (kXMAX/2)*zRatio;
	251	dpar[1] = (kYMAX/2)*zRatio;
	252	xpos = 0.;
	253	ypos = ((kYMAX - kYMIN)/2.) * zRatio;
	254
a432117a	255	GetEnvelopes(10+icount)->AddEnvelopeConstituentParam(volAlu,volEnv[3],iVolNum++,TGeoTranslation(xpos,-ypos,0.),3,dpar);
a432117a	256	GetEnvelopes(10+icount)->AddEnvelopeConstituentParam(volAlu,volEnv[5],iVolNum++,TGeoTranslation(xpos, ypos,0.),3,dpar);
298c0899	257	GetEnvelopes(10+icount)->AddEnvelopeConstituentParam(volAlu,volEnv[12],iVolNum++,TGeoTranslation(xpos,-ypos,0.),3,dpar);
298c0899	258	GetEnvelopes(10+icount)->AddEnvelopeConstituentParam(volAlu,volEnv[14],iVolNum++,TGeoTranslation(xpos, ypos,0.),3,dpar);
d1cd2474	259
	260	// chamber type D, E and F (same size)
	261	// D
	262	yEnvPsave = yEnvP;
	263	yEnvMsave = yEnvM;
	264	yEnvP = (yEnvMsave + kYMIN * zRatio ) * zpm + kYMIN * zRatio;
	265	yEnvM = (yEnvPsave + kYMIN * zRatio ) * zmp + kYMIN * zRatio;
	266	dpar[0] = (kXMAX/2.)*zRatio;
	267	dpar[1] = kYMIN*zRatio;
	268
a432117a	269	detElemId = (10+icount+1)*100+2;
	270	GetEnvelopes(10+icount)->AddEnvelope(volEnv[2], detElemId, true, TGeoTranslation(xEnv,-yEnvM,kZm));
	271	detElemId = (10+icount+1)*100+6;
	272	GetEnvelopes(10+icount)->AddEnvelope(volEnv[6], detElemId, true, TGeoTranslation(xEnv, yEnvM,kZm));
	273	detElemId = (10+icount+1)*100+50+2;
298c0899	274	GetEnvelopes(10+icount)->AddEnvelope(volEnv[11], detElemId, true, TGeoTranslation(-xEnv,-yEnvP,kZp),TGeoRotation("rot1",90.,180.,90.,90.,180.,0.));
a432117a	275	detElemId = (10+icount+1)*100+50+6;
298c0899	276	GetEnvelopes(10+icount)->AddEnvelope(volEnv[15], detElemId, true, TGeoTranslation(-xEnv, yEnvP,kZp),TGeoRotation("rot1",90.,180.,90.,90.,180.,0.));
d1cd2474	277
a432117a	278	GetEnvelopes(10+icount)->AddEnvelopeConstituentParam(volAlu,volEnv[2],iVolNum++,3, dpar);
	279	GetEnvelopes(10+icount)->AddEnvelopeConstituentParam(volAlu,volEnv[6],iVolNum++,3, dpar);
	280	GetEnvelopes(10+icount)->AddEnvelopeConstituentParam(volAlu,volEnv[11],iVolNum++,3, dpar);
	281	GetEnvelopes(10+icount)->AddEnvelopeConstituentParam(volAlu,volEnv[15],iVolNum++,3, dpar);
d1cd2474	282
	283	// E
	284	yEnvPsave = yEnvP;
	285	yEnvMsave = yEnvM;
	286	yEnvP = (yEnvMsave + kYMIN * zRatio ) * zpm + kYMIN * zRatio;
	287	yEnvM = (yEnvPsave + kYMIN * zRatio ) * zmp + kYMIN * zRatio;
	288
a432117a	289	detElemId = (10+icount+1)*100+1;
	290	GetEnvelopes(10+icount)->AddEnvelope(volEnv[1], detElemId, true, TGeoTranslation(xEnv,-yEnvP,kZp));
	291	detElemId = (10+icount+1)*100+7;
	292	GetEnvelopes(10+icount)->AddEnvelope(volEnv[7], detElemId, true, TGeoTranslation(xEnv, yEnvP,kZp));
	293	detElemId = (10+icount+1)*100+50+1;
298c0899	294	GetEnvelopes(10+icount)->AddEnvelope(volEnv[10], detElemId, true, TGeoTranslation(-xEnv,-yEnvM,kZm),TGeoRotation("rot1",90.,180.,90.,90.,180.,0.));
a432117a	295	detElemId = (10+icount+1)*100+50+7;
298c0899	296	GetEnvelopes(10+icount)->AddEnvelope(volEnv[16], detElemId, true, TGeoTranslation(-xEnv, yEnvM,kZm),TGeoRotation("rot1",90.,180.,90.,90.,180.,0.));
d1cd2474	297
a432117a	298	GetEnvelopes(10+icount)->AddEnvelopeConstituentParam(volAlu,volEnv[1],iVolNum++,3,dpar);
	299	GetEnvelopes(10+icount)->AddEnvelopeConstituentParam(volAlu,volEnv[7],iVolNum++,3,dpar);
	300	GetEnvelopes(10+icount)->AddEnvelopeConstituentParam(volAlu,volEnv[10],iVolNum++,3,dpar);
	301	GetEnvelopes(10+icount)->AddEnvelopeConstituentParam(volAlu,volEnv[16],iVolNum++,3,dpar);
d1cd2474	302
	303
	304	// F
	305	yEnvPsave = yEnvP;
	306	yEnvMsave = yEnvM;
	307	yEnvP = (yEnvMsave + kYMIN * zRatio ) * zpm + kYMIN * zRatio;
	308	yEnvM = (yEnvPsave + kYMIN * zRatio ) * zmp + kYMIN * zRatio;
	309
a432117a	310	detElemId = (10+icount+1)*100;
	311	GetEnvelopes(10+icount)->AddEnvelope(volEnv[0], detElemId, true, TGeoTranslation(xEnv,-yEnvM,kZm));
	312	detElemId = (10+icount+1)*100+8;
	313	GetEnvelopes(10+icount)->AddEnvelope(volEnv[8], detElemId, true, TGeoTranslation(xEnv, yEnvM,kZm));
	314	detElemId = (10+icount+1)*100+50;
298c0899	315	GetEnvelopes(10+icount)->AddEnvelope(volEnv[9], detElemId, true, TGeoTranslation(-xEnv,-yEnvP,kZp),TGeoRotation("rot1",90.,180.,90.,90.,180.,0.));
a432117a	316	detElemId = (10+icount+1)*100+50+8;
298c0899	317	GetEnvelopes(10+icount)->AddEnvelope(volEnv[17], detElemId, true, TGeoTranslation(-xEnv, yEnvP,kZp),TGeoRotation("rot1",90.,180.,90.,90.,180.,0.));
528abf6f	318
a432117a	319	GetEnvelopes(10+icount)->AddEnvelopeConstituentParam(volAlu,volEnv[0],iVolNum++,3,dpar);
	320	GetEnvelopes(10+icount)->AddEnvelopeConstituentParam(volAlu,volEnv[8],iVolNum++,3,dpar);
	321	GetEnvelopes(10+icount)->AddEnvelopeConstituentParam(volAlu,volEnv[9],iVolNum++,3,dpar);
	322	GetEnvelopes(10+icount)->AddEnvelopeConstituentParam(volAlu,volEnv[17],iVolNum++,3,dpar);
d1cd2474	323
	324	} // end loop on detection planes
	325	} // end loop on stations
	326	}
	327
	328	//______________________________________________________________________________
	329	void AliMUONTriggerGeometryBuilder::SetTransformations()
	330	{
	331	// Defines the transformations for the trigger chambers.
	332	// ---
	333	Double_t zpos1, zpos2;
	334	AliMUONChamber iChamber1, iChamber2;
	335
e118b27e	336	iChamber1 = &fMUON->Chamber(10);
d1cd2474	337	zpos1= - iChamber1->Z();
	338	iChamber1->GetGeometry()
	339	->SetTranslation(TGeoTranslation(0., 0., zpos1));
	340
e118b27e	341	iChamber2 = &fMUON->Chamber(11);
d1cd2474	342	zpos2 = - iChamber2->Z();
	343	iChamber2->GetGeometry()
	344	->SetTranslation(TGeoTranslation(0., 0., zpos2));
	345
e118b27e	346	iChamber1 = &fMUON->Chamber(12);
d1cd2474	347	zpos1 = - iChamber1->Z();
	348	iChamber1->GetGeometry()
	349	->SetTranslation(TGeoTranslation(0., 0., zpos1));
	350
e118b27e	351	iChamber2 = &fMUON->Chamber(13);
d1cd2474	352	zpos2 = - iChamber2->Z();
	353	iChamber2->GetGeometry()
	354	->SetTranslation(TGeoTranslation(0., 0., zpos2));
	355	}
	356
	357	//______________________________________________________________________________
	358	void AliMUONTriggerGeometryBuilder::SetSensitiveVolumes()
	359	{
	360	// Defines the sensitive volumes for trigger station chambers.
	361	// ---
	362
e118b27e	363	GetGeometry(10)->SetSensitiveVolume("SG1A");
	364	GetGeometry(11)->SetSensitiveVolume("SG2A");
	365	GetGeometry(12)->SetSensitiveVolume("SG3A");
	366	GetGeometry(13)->SetSensitiveVolume("SG4A");
d1cd2474	367	}
d1cd2474	368