const Float_t AliTOFv6T0::fgkInterCentrModBorder2 = 57.5 ; // cm
const Float_t AliTOFv6T0::fgkExterInterModBorder1 = 196.0 ; // cm
const Float_t AliTOFv6T0::fgkExterInterModBorder2 = 203.5 ; // cm
-const Float_t AliTOFv6T0::fgkLengthInCeModBorder = 7.2 ; // cm // it was 4.7 cm (AdC)
+//const Float_t AliTOFv6T0::fgkLengthInCeModBorder = 7.2 ; // cm // it was 4.7 cm (AdC)
+const Float_t AliTOFv6T0::fgkLengthInCeModBorderU = 5.0 ; // cm
+const Float_t AliTOFv6T0::fgkLengthInCeModBorderD = 7.0 ; // cm
const Float_t AliTOFv6T0::fgkLengthExInModBorder = 5.0 ; // cm // it was 7.0 cm (AdC)
const Float_t AliTOFv6T0::fgkModuleCoverThickness = 2.0 ; // cm
const Float_t AliTOFv6T0::fgkFEAwidth1 = 19.0; // cm
//
AliDebug(1, "************************* TOF geometry **************************");
- AliDebug(1,Form(" xtof %d", xtof));
- AliDebug(1,Form(" ytof %d", ytof));
- AliDebug(1,Form(" zlenA %d", zlenA));
- AliDebug(2,Form(" zlenA*0.5 = %d", zlenA*0.5));
+ AliDebug(1,Form(" xtof %f", xtof));
+ AliDebug(1,Form(" ytof %f", ytof));
+ AliDebug(1,Form(" zlenA %f", zlenA));
+ AliDebug(2,Form(" zlenA*0.5 = %f", zlenA*0.5));
Float_t xFLT, yFLT, zFLTA;
xFLT = xtof - 2.*fgkModuleWallThickness;
// Definition and positioning
// of the fibre glass walls between central and intermediate modules (FWZ1 and FWZ2)
Float_t alpha, tgal, beta, tgbe, trpa[11];
- tgal = (yFLT - 2.*fgkLengthInCeModBorder)/(fgkInterCentrModBorder2 - fgkInterCentrModBorder1);
+ //tgal = (yFLT - 2.*fgkLengthInCeModBorder)/(fgkInterCentrModBorder2 - fgkInterCentrModBorder1);
+ tgal = (yFLT - fgkLengthInCeModBorderU - fgkLengthInCeModBorderD)/(fgkInterCentrModBorder2 - fgkInterCentrModBorder1);
alpha = TMath::ATan(tgal);
beta = (kPi*0.5 - alpha)*0.5;
tgbe = TMath::Tan(beta);
trpa[1] = 0.;
trpa[2] = 0.;
trpa[3] = 2.*fgkModuleWallThickness;
- trpa[4] = (fgkLengthInCeModBorder - 2.*fgkModuleWallThickness*tgbe)*0.5;
- trpa[5] = (fgkLengthInCeModBorder + 2.*fgkModuleWallThickness*tgbe)*0.5;
+ //trpa[4] = (fgkLengthInCeModBorder - 2.*fgkModuleWallThickness*tgbe)*0.5;
+ //trpa[5] = (fgkLengthInCeModBorder + 2.*fgkModuleWallThickness*tgbe)*0.5;
+ trpa[4] = (fgkLengthInCeModBorderD - 2.*fgkModuleWallThickness*tgbe)*0.5;
+ trpa[5] = (fgkLengthInCeModBorderD + 2.*fgkModuleWallThickness*tgbe)*0.5;
trpa[6] = TMath::ATan(tgbe*0.5)*kRaddeg; //TMath::ATan((trpa[5] - trpa[4])/(2.*trpa[3]))*kRaddeg;
trpa[7] = 2.*fgkModuleWallThickness;
- trpa[8] = (fgkLengthInCeModBorder - 2.*fgkModuleWallThickness*tgbe)*0.5;
- trpa[9] = (fgkLengthInCeModBorder + 2.*fgkModuleWallThickness*tgbe)*0.5;
+ trpa[8] = (fgkLengthInCeModBorderD - 2.*fgkModuleWallThickness*tgbe)*0.5;
+ trpa[9] = (fgkLengthInCeModBorderD + 2.*fgkModuleWallThickness*tgbe)*0.5;
+ //trpa[8] = (fgkLengthInCeModBorder - 2.*fgkModuleWallThickness*tgbe)*0.5;
+ //trpa[9] = (fgkLengthInCeModBorder + 2.*fgkModuleWallThickness*tgbe)*0.5;
trpa[10] = TMath::ATan(tgbe*0.5)*kRaddeg; //TMath::ATan((trpa[5] - trpa[4])/(2.*trpa[3]))*kRaddeg;
- gMC->Gsvolu("FWZ1", "TRAP", idtmed[503], trpa, 11); // Fibre glass
+ gMC->Gsvolu("FWZ1D", "TRAP", idtmed[503], trpa, 11); // Fibre glass
AliMatrix (idrotm[0],90., 90.,180.,0.,90.,180.);
AliMatrix (idrotm[1],90., 90., 0.,0.,90., 0.);
//xcoor = 0.;
- ycoor = -(yFLT - fgkLengthInCeModBorder)*0.5;
+ //ycoor = -(yFLT - fgkLengthInCeModBorder)*0.5;
+ ycoor = -(yFLT - fgkLengthInCeModBorderD)*0.5;
zcoor = fgkInterCentrModBorder1;
- gMC->Gspos("FWZ1", 1, "FLTA", xcoor, ycoor, zcoor, idrotm[0], "ONLY");
- gMC->Gspos("FWZ1", 2, "FLTA", xcoor, ycoor,-zcoor, idrotm[1], "ONLY");
+ gMC->Gspos("FWZ1D", 1, "FLTA", xcoor, ycoor, zcoor, idrotm[0], "ONLY");
+ gMC->Gspos("FWZ1D", 2, "FLTA", xcoor, ycoor,-zcoor, idrotm[1], "ONLY");
Float_t y0B, ycoorB, zcoorB;
if (fTOFHoles) {
- y0B = fgkLengthInCeModBorder - fgkModuleWallThickness*tgbe;
+ //y0B = fgkLengthInCeModBorder - fgkModuleWallThickness*tgbe;
+ y0B = fgkLengthInCeModBorderD - fgkModuleWallThickness*tgbe;
trpa[0] = xFLT*0.5;
trpa[1] = 0.;
trpa[2] = 0.;
//xcoor = 0.;
ycoorB = ycoor - fgkModuleWallThickness*0.5*tgbe;
zcoorB = (zlenA*0.5 - 2.*fgkModuleWallThickness - fgkInterCentrModBorder1)*0.5 - 2.*fgkModuleWallThickness;
- gMC->Gsvolu("FWZA", "TRAP", idtmed[503], trpa, 11); // Fibre glass
- gMC->Gspos("FWZA", 1, "FLTB", xcoor, ycoorB, zcoorB, idrotm[1], "ONLY");
- gMC->Gspos("FWZA", 2, "FLTC", xcoor, ycoorB,-zcoorB, idrotm[0], "ONLY");
+ gMC->Gsvolu("FWZAD", "TRAP", idtmed[503], trpa, 11); // Fibre glass
+ gMC->Gspos("FWZAD", 1, "FLTB", xcoor, ycoorB, zcoorB, idrotm[1], "ONLY");
+ gMC->Gspos("FWZAD", 2, "FLTC", xcoor, ycoorB,-zcoorB, idrotm[0], "ONLY");
}
+
+
+ tgal = (yFLT - fgkLengthInCeModBorderU - fgkLengthInCeModBorderD)/(fgkInterCentrModBorder2 - fgkInterCentrModBorder1);
+ alpha = TMath::ATan(tgal);
+ beta = (kPi*0.5 - alpha)*0.5;
+ tgbe = TMath::Tan(beta);
+ trpa[0] = xFLT*0.5;
+ trpa[1] = 0.;
+ trpa[2] = 0.;
+ trpa[3] = 2.*fgkModuleWallThickness;
+ //trpa[4] = (fgkLengthInCeModBorder - 2.*fgkModuleWallThickness*tgbe)*0.5;
+ //trpa[5] = (fgkLengthInCeModBorder + 2.*fgkModuleWallThickness*tgbe)*0.5;
+ trpa[4] = (fgkLengthInCeModBorderU - 2.*fgkModuleWallThickness*tgbe)*0.5;
+ trpa[5] = (fgkLengthInCeModBorderU + 2.*fgkModuleWallThickness*tgbe)*0.5;
+ trpa[6] = TMath::ATan(tgbe*0.5)*kRaddeg; //TMath::ATan((trpa[5] - trpa[4])/(2.*trpa[3]))*kRaddeg;
+ trpa[7] = 2.*fgkModuleWallThickness;
+ trpa[8] = (fgkLengthInCeModBorderU - 2.*fgkModuleWallThickness*tgbe)*0.5;
+ trpa[9] = (fgkLengthInCeModBorderU + 2.*fgkModuleWallThickness*tgbe)*0.5;
+ //trpa[8] = (fgkLengthInCeModBorder - 2.*fgkModuleWallThickness*tgbe)*0.5;
+ //trpa[9] = (fgkLengthInCeModBorder + 2.*fgkModuleWallThickness*tgbe)*0.5;
+ trpa[10] = TMath::ATan(tgbe*0.5)*kRaddeg; //TMath::ATan((trpa[5] - trpa[4])/(2.*trpa[3]))*kRaddeg;
+ gMC->Gsvolu("FWZ1U", "TRAP", idtmed[503], trpa, 11); // Fibre glass
+
+
AliMatrix (idrotm[2],90.,270., 0.,0.,90.,180.);
AliMatrix (idrotm[3],90.,270.,180.,0.,90., 0.);
//xcoor = 0.;
- ycoor = (yFLT - fgkLengthInCeModBorder)*0.5;
+ //ycoor = (yFLT - fgkLengthInCeModBorder)*0.5;
+ ycoor = (yFLT - fgkLengthInCeModBorderU)*0.5;
zcoor = fgkInterCentrModBorder2;
- gMC->Gspos("FWZ1", 3, "FLTA", xcoor, ycoor, zcoor,idrotm[2], "ONLY");
- gMC->Gspos("FWZ1", 4, "FLTA", xcoor, ycoor,-zcoor,idrotm[3], "ONLY");
+ gMC->Gspos("FWZ1U", 1, "FLTA", xcoor, ycoor, zcoor,idrotm[2], "ONLY");
+ gMC->Gspos("FWZ1U", 2, "FLTA", xcoor, ycoor,-zcoor,idrotm[3], "ONLY");
if (fTOFHoles) {
- y0B = fgkLengthInCeModBorder + fgkModuleWallThickness*tgbe;
+ //y0B = fgkLengthInCeModBorder + fgkModuleWallThickness*tgbe;
+ y0B = fgkLengthInCeModBorderU + fgkModuleWallThickness*tgbe;
trpa[0] = xFLT*0.5;
trpa[1] = 0.;
trpa[2] = 0.;
trpa[8] = (y0B - fgkModuleWallThickness*tgbe)*0.5;
trpa[9] = (y0B + fgkModuleWallThickness*tgbe)*0.5;
trpa[10] = TMath::ATan(tgbe*0.5)*kRaddeg; //TMath::ATan((trpa[5] - trpa[4])/(2.*trpa[3]))*kRaddeg;
- gMC->Gsvolu("FWZB", "TRAP", idtmed[503], trpa, 11); // Fibre glass
+ gMC->Gsvolu("FWZBU", "TRAP", idtmed[503], trpa, 11); // Fibre glass
//xcoor = 0.;
ycoorB = ycoor - fgkModuleWallThickness*0.5*tgbe;
zcoorB = (zlenA*0.5 - 2.*fgkModuleWallThickness - fgkInterCentrModBorder1)*0.5 -
(fgkInterCentrModBorder2 - fgkInterCentrModBorder1) - 2.*fgkModuleWallThickness;
- gMC->Gspos("FWZB", 1, "FLTB", xcoor, ycoorB, zcoorB, idrotm[3], "ONLY");
- gMC->Gspos("FWZB", 2, "FLTC", xcoor, ycoorB,-zcoorB, idrotm[2], "ONLY");
+ gMC->Gspos("FWZBU", 1, "FLTB", xcoor, ycoorB, zcoorB, idrotm[3], "ONLY");
+ gMC->Gspos("FWZBU", 2, "FLTC", xcoor, ycoorB,-zcoorB, idrotm[2], "ONLY");
}
trpa[0] = 0.5*(fgkInterCentrModBorder2 - fgkInterCentrModBorder1)/TMath::Cos(alpha);
AliMatrix (idrotm[5],180.-alpha*kRaddeg,90.,90.-alpha*kRaddeg,90.,90., 0.);
//xcoor = 0.;
- ycoor = 0.;
+ //ycoor = 0.;
+ ycoor = (fgkLengthInCeModBorderD - fgkLengthInCeModBorderU)*0.5;
zcoor = (fgkInterCentrModBorder2 + fgkInterCentrModBorder1)*0.5;
gMC->Gspos("FWZ2", 1, "FLTA", xcoor, ycoor, zcoor, idrotm[4], "ONLY");
gMC->Gspos("FWZ2", 2, "FLTA", xcoor, ycoor,-zcoor, idrotm[5], "ONLY");
wmatg10[2]= we[2]*0.4;
wmatg10[3]= we[3]*0.4;
wmatg10[4]= we[4]*0.4;
- AliDebug(1,Form("wg10 %d %d %d %d %d", wmatg10[0], wmatg10[1], wmatg10[2], wmatg10[3], wmatg10[4]));
+ AliDebug(1,Form("wg10 %f %f %f %f %f", wmatg10[0], wmatg10[1], wmatg10[2], wmatg10[3], wmatg10[4]));
//Float_t densg10 = 1.7; //old value
Float_t densg10 = 2.0; // (+17.8%)
}
}
//-------------------------------------------------------------------
-void AliTOFv6T0::MaterialMixer(Float_t* p,Float_t* a,Float_t* m,Int_t n) const
+void AliTOFv6T0::MaterialMixer(Float_t * p, const Float_t * const a,
+ const Float_t * const m, Int_t n) const
{
// a[] atomic weights vector (in)
// (atoms present in more compound appear separately)