-
-//_____________________________________________________________________________
-AliFMDv1::AliFMDv1()
-{
- //
- // Default constructor for FMD version 1
- //
-}
-
-//_____________________________________________________________________________
-AliFMDv1::AliFMDv1(const char *name, const char *title)
- : AliFMD(name,title)
-{
- //
- // Standard constructor for FMD version 1
- //
- AliModule *start = gAlice->GetModule("START");
- if(start) {
- Error("ctor","This version of FMD is incompatible with START\n");
- exit(1);
- }
-}
-
-//___________________________________________
-void AliFMDv1::CreateGeometry()
-{
- //
- // Creation of the geometry of the FMD version 1
- //
- //Begin_Html
- /*
- <img src="picts/AliFMDv1Tree.gif">
- */
- //End_Html
- //Begin_Html
- /*
- <img src="picts/AliFMDv1.gif">
- */
- //End_Html
-
-
- Float_t rout, z;
- Float_t par[3], rin;
-
- Int_t irotm[100];
-
- TArrayI &idtmed = *fIdtmed;
-
- // ********************************************************
- // DEFINE DISK#3 OF FMD
- // ********************************************************
-
- gMC->Gsvolu("BR3_", "BOX ", idtmed[4], par, 0);
- gMC->Gsvolu("CB3_", "BOX ", idtmed[5], par, 0);
- gMC->Gsvolu("BR5_", "BOX ", idtmed[4], par, 0);
- gMC->Gsvolu("CB5_", "BOX ", idtmed[5], par, 0);
-
- // Define parameters for the right disk
-
- rin = 4.5;
- rout = 10.5;
- z = 77.;
-
- // Ring #1
-
- par[0] = rin;
- par[1] = rout;
- par[2] = 1.5;
- gMC->Gsvolu("R1R3", "TUBE", idtmed[1], par, 3);
- gMC->Gspos("R1R3", 1, "ALIC", 0., 0., z + 1.5, 0, "ONLY");
-
- // Ring #2
-
- par[0] = rout;
- par[1] = rout + .65;
- par[2] = 1.5;
- gMC->Gsvolu("R2R3", "TUBE", idtmed[2], par, 3);
- gMC->Gspos("R2R3", 1, "ALIC", 0., 0., z + 1.5, 0, "ONLY");
-
- // Ring #3
-
- par[0] = rout + .65;
- par[1] = rout + 5.65;
- par[2] = .025;
- gMC->Gsvolu("R3R3", "TUBE", idtmed[3], par, 3);
- gMC->Gspos("R3R3", 1, "ALIC", 0., 0., z + 1.525, 0, "ONLY");
-
- // Bracket #1
-
- par[0] = 1.5;
- par[1] = 0.1;
- par[2] = 15.35;
- gMC->Matrix(irotm[11], 90., 0., 161.2, 90., 71.2, 90.);
- gMC->Gsposp("BR3_",1,"ALIC", 0., 25.25, 85.0, irotm[11],"ONLY",par,3);
- par[1] = 0.5;
- gMC->Gsposp("CB3_",1,"ALIC", 0., 25.41, 84.53,irotm[11],"ONLY",par,3);
-
-
- // Bracket #2
-
- par[0] = 1.5;
- par[1] = 0.1;
- par[2] = 15.35;
- gMC->Matrix(irotm[12], 90., 180., 161.2, 270., 71.2, 270.);
- gMC->Gsposp("BR3_",2,"ALIC", 0.,-25.25, 85.0, irotm[12],"ONLY",par,3);
- par[1] = 0.5;
- gMC->Gsposp("CB3_",2,"ALIC", 0.,-25.41, 84.53,irotm[12],"ONLY",par,3);
-
-
- // Bracket #3
-
- par[0] = 1.5;
- par[1] = 0.1;
- par[2] = 15.35;
- gMC->Matrix(irotm[13], 90., 270., 161.2, 0., 71.2, 0.);
- gMC->Gsposp("BR3_",3,"ALIC", 25.25, 0., 85.0, irotm[13],"ONLY",par,3);
- par[1] = 0.5;
- gMC->Gsposp("CB3_",3,"ALIC", 25.41, 0., 84.53,irotm[13],"ONLY",par,3);
-
-
- // Bracket #4
-
- par[0] = 1.5;
- par[1] = 0.1;
- par[2] = 15.35;
- gMC->Matrix(irotm[14], 90., 90., 161.2, 180., 71.2, 180.);
- gMC->Gsposp("BR3_",4,"ALIC", -25.25, 0., 85.0, irotm[14],"ONLY",par,3);
- par[1] = 0.5;
- gMC->Gsposp("CB3_",4,"ALIC", -25.41, 0., 84.53,irotm[14],"ONLY",par,3);
-
- // Right support ring
-
- par[0] = 39.;
- par[1] = 41.;
- par[2] = .5;
- gMC->Gsvolu("R1SP", "TUBE", idtmed[4], par, 3);
- gMC->Gspos("R1SP", 1, "ALIC", 0., 0., 89.5, 0, "ONLY");
-
- // Define parameters for the left disk
-
- rin = 4.5;
- rout = 10.5;
- z = -77.;
-
- // Ring #1
-
- par[0] = rin;
- par[1] = rout;
- par[2] = 1.5;
- gMC->Gsvolu("R1L3", "TUBE", idtmed[1], par, 3);
- gMC->Gspos("R1L3", 1, "ALIC", 0., 0., z - 1.5, 0, "ONLY");
-
- // Ring #2
-
- par[0] = rout;
- par[1] = rout + .65;
- par[2] = 1.5;
- gMC->Gsvolu("R2L3", "TUBE", idtmed[2], par, 3);
- gMC->Gspos("R2L3", 1, "ALIC", 0., 0., z - 1.5, 0, "ONLY");
-
- // Ring #3
-
- par[0] = rout + .65;
- par[1] = rout + 5.65;
- par[2] = .025;
- gMC->Gsvolu("R3L3", "TUBE", idtmed[3], par, 3);
- gMC->Gspos("R3L3", 1, "ALIC", 0., 0., z - 1.525, 0, "ONLY");
-
- // Bracket #1
-
- par[0] = 1.5;
- par[1] = 0.1;
- par[2] = 15.35;
- gMC->Matrix(irotm[61], 90., 0., 180.-161.2, 90., 180.-71.2, 90.);
- gMC->Gsposp("BR3_",5,"ALIC", 0., 25.25, -85.0, irotm[61],"ONLY",par,3);
- par[1] = 0.5;
- gMC->Gsposp("CB3_",5,"ALIC", 0., 25.41, -84.53,irotm[61],"ONLY",par,3);
-
- gMC->Matrix(irotm[91], 90., 0., 90.-10.6, 90., 180.-10.6, 90.);
- par[1] = 0.1;
- par[2] = 81.4;
- gMC->Gsposp("BR5_",1,"ALIC", 0., 55.0, -170.0,irotm[91],"ONLY",par,3);
- par[1] = 0.5;
- gMC->Gsposp("CB5_",1,"ALIC", 0., 55.5, -169.5,irotm[91],"ONLY",par,3);
-
- // Bracket #2
-
- par[0] = 1.5;
- par[1] = 0.1;
- par[2] = 15.35;
- gMC->Matrix(irotm[62], 90., 180., 180.-161.2, 270., 180.-71.2, 270.);
- gMC->Gsposp("BR3_",6,"ALIC", 0.,-25.25, -85.0,irotm[62],"ONLY",par,3);
- par[1] = 0.5;
- gMC->Gsposp("CB3_",6,"ALIC", 0.,-25.41, -84.53,irotm[62],"ONLY",par,3);
-
- gMC->Matrix(irotm[92], 90., 180., 90.-10.6, 270., 180.-10.6, 270.);
- par[1] = 0.1;
- par[2] = 81.4;
- gMC->Gsposp("BR5_",2,"ALIC", 0., -55.0, -170.0,irotm[92],"ONLY",par,3);
- par[1] = 0.5;
- gMC->Gsposp("CB5_",2,"ALIC", 0., -55.5, -169.5,irotm[92],"ONLY",par,3);
-
- // Bracket #3
-
- par[0] = 1.5;
- par[1] = 0.1;
- par[2] = 15.35;
- gMC->Matrix(irotm[63], 90., 270., 180.-161.2, 0., 180.-71.2, 0.);
- gMC->Gsposp("BR3_",7,"ALIC", 25.25, 0., -85.0, irotm[63],"ONLY",par,3);
- par[1] = 0.5;
- gMC->Gsposp("CB3_",7,"ALIC", 25.41, 0., -84.53,irotm[63],"ONLY",par,3);
-
- gMC->Matrix(irotm[93], 90., 270., 90.-10.6, 0., 180.-10.6, 0.);
- par[1] = 0.1;
- par[2] = 81.4;
- gMC->Gsposp("BR5_",3,"ALIC", 55., 0., -170.,irotm[93],"ONLY",par,3);
- par[1] = 0.5;
- gMC->Gsposp("CB5_",3,"ALIC", 55.5, 0., -169.5,irotm[93],"ONLY",par,3);
-
- // Bracket #4
-
- par[0] = 1.5;
- par[1] = 0.1;
- par[2] = 15.35;
- gMC->Matrix(irotm[64], 90., 90., 180.-161.2, 180., 180.-71.2, 180.);
- gMC->Gsposp("BR3_",8,"ALIC", -25.25, 0., -85., irotm[64],"ONLY",par,3);
- par[1] = 0.5;
- gMC->Gsposp("CB3_",8,"ALIC", -25.41, 0., -84.53,irotm[64],"ONLY",par,3);
-
- gMC->Matrix(irotm[94], 90., 90., 90.-10.6, 180., 180.-10.6, 180.);
- par[1] = 0.1;
- par[2] = 81.4;
- gMC->Gsposp("BR5_",4,"ALIC", -55., 0., -170.,irotm[94],"ONLY",par,3);
- par[1] = 0.5;
- gMC->Gsposp("CB5_",4,"ALIC", -55.5, 0., -169.5,irotm[94],"ONLY",par,3);
-
- // Central support ring
-
- par[0] = 39.;
- par[1] = 41.;
- par[2] = .5;
- gMC->Gsvolu("R2SP", "TUBE", idtmed[4], par, 3);
- gMC->Gspos("R2SP", 1, "ALIC", 0., 0., -89.5, 0, "ONLY");
-
- // Left support ring
-
- par[0] = 69.;
- par[1] = 71.;
- par[2] = .5;
- gMC->Gsvolu("R3SP", "TUBE", idtmed[4], par, 3);
- gMC->Gspos("R3SP", 1, "ALIC", 0., 0., -249.5, 0, "ONLY");
-
- // ********************************************************
- // DEFINE DISK#2 OF FMD
- // ********************************************************
-
- gMC->Gsvolu("BR2_", "BOX ", idtmed[4], par, 0);
- gMC->Gsvolu("CB2_", "BOX ", idtmed[5], par, 0);
-
- // Define parameters for right disk #2
-
- rin = 7.7;
- rout = 13.7;
- z = 64.4;
-
- // Ring #1
-
- par[0] = rin;
- par[1] = rout;
- par[2] = 1.5;
- gMC->Gsvolu("R1R2", "TUBE", idtmed[1], par, 3);
- gMC->Gspos("R1R2", 1, "ALIC", 0., 0., z + 1.5, 0, "ONLY");
-
- // Ring #2
-
- par[0] = rout;
- par[1] = rout + .65;
- par[2] = 1.5;
- gMC->Gsvolu("R2R2", "TUBE", idtmed[2], par, 3);
- gMC->Gspos("R2R2", 1, "ALIC", 0., 0., z + 1.5, 0, "ONLY");
-
- // Ring #3
-
- par[0] = rout + .65;
- par[1] = rout + 5.65;
- par[2] = .025;
- gMC->Gsvolu("R3R2", "TUBE", idtmed[3], par, 3);
- gMC->Gspos("R3R2", 1, "ALIC", 0., 0., z + 1.525, 0, "ONLY");
-
- // Bracket #1
-
- par[0] = 1.5;
- par[1] = 0.1;
- par[2] = 17.35;
- gMC->Matrix(irotm[21], 90., 30., 139.3, 120., 49.3, 120.);
- gMC->Gsposp("BR2_",1,"ALIC", -13.4, 23.3, 78.7, irotm[21],"ONLY",par,3);
- par[1] = 0.5;
- gMC->Gsposp("CB2_",1,"ALIC", -13.56, 23.6, 78.4, irotm[21],"ONLY",par,3);
-
- // Bracket #2
-
- par[0] = 1.5;
- par[1] = 0.1;
- par[2] = 17.35;
- gMC->Matrix(irotm[22], 90., 210., 139.3, 300., 49.3, 300.);
- gMC->Gsposp("BR2_",2,"ALIC", 13.4,-23.3, 78.7, irotm[22],"ONLY",par,3);
- par[1] = 0.5;
- gMC->Gsposp("CB2_",2,"ALIC", 13.5,-23.6, 78.4,irotm[22],"ONLY",par,3);
-
-
- // Bracket #3
-
- par[0] = 1.5;
- par[1] = 0.1;
- par[2] = 17.35;
- gMC->Matrix(irotm[23], 90., 300., 139.3, 30., 49.3, 30.);
- gMC->Gsposp("BR2_",3,"ALIC", 23.3, 13.4, 78.7, irotm[23],"ONLY",par,3);
- par[1] = 0.5;
- gMC->Gsposp("CB2_",3,"ALIC", 23.6, 13.56, 78.4,irotm[23],"ONLY",par,3);
-
- // Bracket #4
-
- par[0] = 1.5;
- par[1] = 0.1;
- par[2] = 17.35;
- gMC->Matrix(irotm[24], 90., 120., 139.3, 210., 49.3, 210.);
- gMC->Gsposp("BR2_",4,"ALIC", -23.3, -13.4, 78.7,irotm[24],"ONLY",par,3);
- par[1] = 0.5;
- gMC->Gsposp("CB2_",4,"ALIC", -23.6, -13.56, 78.4,irotm[24],"ONLY",par,3);
-
- // Define parameters for left disk
-
- rin = 7.7;
- rout = 13.7;
- z = -64.4;
-
- // Ring #1
-
- par[0] = rin;
- par[1] = rout;
- par[2] = 1.5;
- gMC->Gsvolu("R1L2", "TUBE", idtmed[1], par, 3);
- gMC->Gspos("R1L2", 1, "ALIC", 0., 0., z - 1.5, 0, "ONLY");
-
- // Ring #2
-
- par[0] = rout;
- par[1] = rout + .65;
- par[2] = 1.5;
- gMC->Gsvolu("R2L2", "TUBE", idtmed[2], par, 3);
- gMC->Gspos("R2L2", 1, "ALIC", 0., 0., z - 1.5, 0, "ONLY");
-
- // Ring #3
-
- par[0] = rout + .65;
- par[1] = rout + 5.65;
- par[2] = .025;
- gMC->Gsvolu("R3L2", "TUBE", idtmed[3], par, 3);
- gMC->Gspos("R3L2", 1, "ALIC", 0., 0., z - 1.525, 0, "ONLY");