/**************************************************************************
- * Copyright(c) 1998-1999, ALICE Experiment at CERN, All rights reserved. *
+ * Copyright(c) 2007-2009, ALICE Experiment at CERN, All rights reserved. *
* *
* Author: The ALICE Off-line Project. *
* Contributors are mentioned in the code where appropriate. *
// Updates concerning the geometry: versioning system, new V11hybrid version, bug fixes (B.Nilsend and L. Gaudichet
//
-
#include <TClonesArray.h>
-#include <TGeometry.h>
-#include <TLorentzVector.h>
+#include <TGeoGlobalMagField.h>
+#include <TGeoManager.h>
#include <TGeoMatrix.h>
#include <TGeoPhysicalNode.h>
-#include <TString.h>
-#include <TNode.h>
-#include <TTUBE.h>
-#include <TGeoManager.h>
#include <TGeoVolume.h>
#include <TGeoXtru.h>
+#include <TLorentzVector.h>
+#include <TString.h>
#include <TVirtualMC.h>
#include "AliITS.h"
//______________________________________________________________________
AliITSv11Hybrid::AliITSv11Hybrid():
- AliITS(),
- fGeomDetOut(kFALSE),
- fGeomDetIn(kFALSE),
fByThick(kTRUE),
fMajorVersion(IsVersion()),
fMinorVersion(-1),
//______________________________________________________________________
AliITSv11Hybrid::AliITSv11Hybrid(const char *title)
: AliITS("ITS", title),
- fGeomDetOut(kFALSE),
- fGeomDetIn(kFALSE),
fByThick(kTRUE),
fMajorVersion(IsVersion()),
fMinorVersion(1),
SetThicknessChip2();
SetDensityServicesByThickness();
- fEuclidGeometry="$ALICE_ROOT/ITS/ITSgeometry_vPPRasymm2.euc";
- strncpy(fEuclidGeomDet,"$ALICE_ROOT/ITS/ITSgeometry_vPPRasymm2.det",60);
- strncpy(fRead,fEuclidGeomDet,60);
- strncpy(fWrite,fEuclidGeomDet,60);
- strncpy(fRead,"$ALICE_ROOT/ITS/ITSgeometry_vPPRasymmFMD.det",60);
}
//______________________________________________________________________
AliITSv11Hybrid::AliITSv11Hybrid(const char *name, const char *title)
: AliITS("ITS", title),
- fGeomDetOut(kFALSE),
- fGeomDetIn(kFALSE),
fByThick(kTRUE),
fMajorVersion(IsVersion()),
fMinorVersion(1),
SetThicknessChip2();
SetDensityServicesByThickness();
- fEuclidGeometry="$ALICE_ROOT/ITS/ITSgeometry_vPPRasymm2.euc";
- strncpy(fEuclidGeomDet,"$ALICE_ROOT/ITS/ITSgeometry_vPPRasymm2.det",60);
- strncpy(fRead,fEuclidGeomDet,60);
- strncpy(fWrite,fEuclidGeomDet,60);
- strncpy(fRead,"$ALICE_ROOT/ITS/ITSgeometry_vPPRasymmFMD.det",60);
}
//______________________________________________________________________
modnum = 0;
TString str0 = "/ALIC_1/ITSV_1/ITSsddLayer3_1/ITSsddLadd_"; // SDD layer1
TString str1 = "/ITSsddSensor3_";
- TString str2 = "/ITSsddWafer3_1";
TString ladder;
- TString wafer;
+ TString sensor;
for(Int_t c1 = 0; c1<14; c1++) {
for(Int_t c2 =0; c2<6; c2++) {
modUID = AliGeomManager::LayerToVolUID(layerId,modnum++);
- wafer = ladder;
- wafer += str1;
- wafer += c2;
- wafer += str2; // one wafer
+ sensor = ladder;
+ sensor += str1;
+ sensor += c2;
strEntryName2 = strEntryName1;
strEntryName2 += strSensor;
strEntryName2 += c2;
//printf("%s == %s\n",strEntryName2.Data(),wafer.Data());
- if(!gGeoManager->SetAlignableEntry(strEntryName2.Data(),wafer.Data(),modUID))
+ if(!gGeoManager->SetAlignableEntry(strEntryName2.Data(),sensor.Data(),modUID))
AliFatal(Form("Unable to set alignable entry 2! %s :: %s",
- strEntryName2.Data(),wafer.Data()));
+ strEntryName2.Data(),sensor.Data()));
- if(c1 != 2) {
SetT2Lmatrix(modUID, 0, kFALSE, c2>=3);
- } else {// for ladder 2, mounted with a pi rot around y
- SetT2Lmatrix(modUID, 0, kFALSE, c2<3);
- }
}
}
modnum = 0;
str0 = "/ALIC_1/ITSV_1/ITSsddLayer4_1/ITSsddLadd_"; // SDD layer2
str1 = "/ITSsddSensor4_";
- str2 = "/ITSsddWafer4_1";
for(Int_t c1 = 0; c1<22; c1++) {
for(Int_t c2 =0; c2<8; c2++) {
modUID = AliGeomManager::LayerToVolUID(layerId,modnum++);
- wafer = ladder;
- wafer += str1;
- wafer += c2;
- wafer += str2; // one wafer
+ sensor = ladder;
+ sensor += str1;
+ sensor += c2;
strEntryName2 = strEntryName1;
strEntryName2 += strSensor;
strEntryName2 += c2;
//printf("%s == %s\n",strEntryName2.Data(),wafer.Data());
- if(!gGeoManager->SetAlignableEntry(strEntryName2.Data(),wafer.Data(),modUID))
+ if(!gGeoManager->SetAlignableEntry(strEntryName2.Data(),sensor.Data(),modUID))
AliFatal(Form("Unable to set alignable entry 2! %s :: %s",
- strEntryName2.Data(),wafer.Data()));
+ strEntryName2.Data(),sensor.Data()));
SetT2Lmatrix(modUID, 0, kFALSE, c2>=4);
}
} // end SSD geometry
}
-//______________________________________________________________________
-void AliITSv11Hybrid::BuildGeometry(){
- // Geometry builder for the ITS version 10. Event Display geometry.
- // Inputs:
- // none.
- // Outputs:
- // none.
- // Return:
- // none.
-
- TNode *node, *top;
-
- const Int_t kColorITS=kYellow;
- //
- top = gAlice->GetGeometry()->GetNode("alice");
-
-
- new TTUBE("S_layer1","Layer1 of ITS","void",
- 3.8095,3.8095+1.03*9.36/100.,14.35);
- top->cd();
- node = new TNode("Layer1","Layer1","S_layer1",0,0,0,"");
- node->SetLineColor(kColorITS);
- fNodes->Add(node);
-
- new TTUBE("S_layer2","Layer2 of ITS","void",7.,7.+1.03*9.36/100.,14.35);
- top->cd();
- node = new TNode("Layer2","Layer2","S_layer2",0,0,0,"");
- node->SetLineColor(kColorITS);
- fNodes->Add(node);
-
- new TTUBE("S_layer3","Layer3 of ITS","void",15.,15.+0.94*9.36/100.,25.1);
- top->cd();
- node = new TNode("Layer3","Layer3","S_layer3",0,0,0,"");
- node->SetLineColor(kColorITS);
- fNodes->Add(node);
-
- new TTUBE("S_layer4","Layer4 of ITS","void",24.1,24.1+0.95*9.36/100.,32.1);
- top->cd();
- node = new TNode("Layer4","Layer4","S_layer4",0,0,0,"");
- node->SetLineColor(kColorITS);
- fNodes->Add(node);
-
- new TTUBE("S_layer5","Layer5 of ITS","void",
- 38.5,38.5+0.91*9.36/100.,49.405);
- top->cd();
- node = new TNode("Layer5","Layer5","S_layer5",0,0,0,"");
- node->SetLineColor(kColorITS);
- fNodes->Add(node);
-
- new TTUBE("S_layer6","Layer6 of ITS","void",
- 43.5765,43.5765+0.87*9.36/100.,55.27);
- top->cd();
- node = new TNode("Layer6","Layer6","S_layer6",0,0,0,"");
- node->SetLineColor(kColorITS);
- fNodes->Add(node);
-}
-
//______________________________________________________________________
void AliITSv11Hybrid::CreateGeometry() {
if (AliITSInitGeometry::ServicesAreTGeoNative()) {
fSDDgeom->SDDCables(vITS);
fSSDgeom->SSDCables(vITS);
+ fSupgeom->ServicesCableSupport(vITS);
}
}
gMC->Gspos("IPA2", 1, "ITSV", 0., 0., 95.25, 0, "ONLY");
gMC->Gspos("IPA2", 2, "ITSV", 0., 0., -95.25, idrotm[200], "ONLY");
- } // Move this graph down as you implement services in TGeo - M.S. 16may08
// --- DEFINE CABLES/COOLING BELOW THE TPC ON THE ABSORBER SIDE - COPPER PART
// UPPER PART
- dgh[0] = (ztpc-97.5)/2.;
+ dgh[0] = (ztpc-97.5-2.3)/2.;
dgh[1] = 46.2;
dgh[2] = 46.2+1.0;
dgh[3] = 62.3;
dgh[5] = 12.;
dgh[6] = 168.;
gMC->Gsvolu("ICU1", "CONS", idtmed[213], dgh, 7);
- gMC->Gspos("ICU1", 1, "ITSV", 0., 0., 97.5+dgh[0], 0, "ONLY");
+ // gMC->Gspos("ICU1", 1, "ITSV", 0., 0.,97.5+dgh[0], 0, "ONLY");
+ gMC->Gspos("ICU1", 1, "ITSV", 0., 0.,-(97.5+dgh[0]+4.6), idrotm[199], "ONLY");
// --- DEFINE CABLES/COOLING BELOW THE TPC ON THE ABSORBER SIDE - COPPER PART
// LOWER PART
- dgh[0] = (ztpc-97.5)/2.;
+ dgh[0] = (ztpc-97.5-2.3)/2.;
dgh[1] = 46.2;
dgh[2] = 46.2+1.0;
dgh[3] = 62.3;
dgh[5] = 192.;
dgh[6] = 348.;
gMC->Gsvolu("ICU2", "CONS", idtmed[213], dgh, 7);
- gMC->Gspos("ICU2", 1, "ITSV", 0., 0., 97.5+dgh[0], 0, "ONLY");
+ // gMC->Gspos("ICU2", 1, "ITSV", 0., 0., 97.5+dgh[0], 0, "ONLY");
+ gMC->Gspos("ICU2", 1, "ITSV", 0., 0., -(97.5+dgh[0]+4.6), idrotm[199], "ONLY");
// -- DEFINE CABLES/COOLING BELOW THE TPC ON THE ABSORBER SIDE - CARBON PART
// UPPER PART
- dgh[0] = (ztpc-97.5)/2.;
+ dgh[0] = (ztpc-97.5-2.3)/2.;
dgh[1] = 46.2+1.0;
dgh[2] = 46.2+1.0+1.5;
dgh[3] = 62.3+1.0;
dgh[5] = 12.;
dgh[6] = 168.;
gMC->Gsvolu("ICC1", "CONS", idtmed[225], dgh, 7);
- gMC->Gspos("ICC1", 1, "ITSV", 0., 0., 97.5+dgh[0], 0, "ONLY");
+ // gMC->Gspos("ICC1", 1, "ITSV", 0., 0., 97.5+dgh[0], 0, "ONLY");
+ gMC->Gspos("ICC1", 1, "ITSV", 0., 0., -(97.5+dgh[0]+4.6), idrotm[199], "ONLY");
// --- DEFINE CABLES/COOLING BELOW THE TPC ON THE ABSORBER SIDE - CARBON PART
// LOWER PART
- dgh[0] = (ztpc-97.5)/2.;
+ dgh[0] = (ztpc-97.5-2.3)/2.;
dgh[1] = 46.2+1.0;
dgh[2] = 46.2+1.0+1.5;
dgh[3] = 62.3+1.0;
dgh[5] = 192.;
dgh[6] = 348.;
gMC->Gsvolu("ICC2", "CONS", idtmed[225], dgh, 7);
- gMC->Gspos("ICC2", 1, "ITSV", 0., 0., 97.5+dgh[0], 0, "ONLY");
+ // gMC->Gspos("ICC2", 1, "ITSV", 0., 0., 97.5+dgh[0], 0, "ONLY");
+ gMC->Gspos("ICC2", 1, "ITSV", 0., 0., -(97.5+dgh[0]+4.6), idrotm[199], "ONLY");
// -- DEFINE CABLES/COOLING BEHIND THE TPC ON THE ABSORBER SIDE - COPPER PART
// UPPER PART
- dgh[0] = 62.;
+ dgh[0] = 62.2;
dgh[1] = 74.5;
dgh[2] = 0.5;
dgh[3] = 12.;
dgh[4] = 168.;
gMC->Gsvolu("ICU3", "TUBS", idtmed[213], dgh, 5);
- gMC->Gspos("ICU3", 1, "ITSV", 0., 0., ztpc+1.5+dgh[2], 0, "ONLY");
+ // gMC->Gspos("ICU3", 1, "ITSV", 0., 0., ztpc+1.5+dgh[2], 0, "ONLY");
+ gMC->Gspos("ICU3", 1, "ITSV", 0., 0., -(ztpc+1.5+dgh[2]+1.), idrotm[199], "ONLY");
// -- DEFINE CABLES/COOLING BEHIND THE TPC ON THE ABSORBER SIDE - COPPER PART
// LOWER PART
- dgh[0] = 62.;
+ dgh[0] = 62.2;
dgh[1] = 74.5;
dgh[2] = 0.5;
dgh[3] = 192.;
dgh[4] = 348.;
gMC->Gsvolu("ICU4", "TUBS", idtmed[213], dgh, 5);
- gMC->Gspos("ICU4", 1, "ITSV", 0., 0., ztpc+1.5+dgh[2], 0, "ONLY");
+ // gMC->Gspos("ICU4", 1, "ITSV", 0., 0., ztpc+1.5+dgh[2], 0, "ONLY");
+ gMC->Gspos("ICU4", 1, "ITSV", 0., 0., -(ztpc+1.5+dgh[2]+1.), idrotm[199], "ONLY");
// -- DEFINE CABLES/COOLING BEHIND THE TPC ON THE ABSORBER SIDE - CARBON PART
// UPPER PART
- dgh[0] = 62.1;
+ dgh[0] = 64.8;
dgh[1] = 74.5;
dgh[2] = 0.75;
dgh[3] = 12.;
dgh[4] = 168.;
gMC->Gsvolu("ICC3", "TUBS", idtmed[225], dgh, 5);
- gMC->Gspos("ICC3", 1, "ITSV", 0., 0., ztpc+dgh[2], 0, "ONLY");
+ // gMC->Gspos("ICC3", 1, "ITSV", 0., 0., ztpc+dgh[2], 0, "ONLY");
+ gMC->Gspos("ICC3", 1, "ITSV", 0., 0., -(ztpc+dgh[2]), idrotm[199], "ONLY");
// -- DEFINE CABLES/COOLING BEHIND THE TPC ON THE ABSORBER SIDE - CARBON PART
// LOWER PART
- dgh[0] = 62.1;
+ dgh[0] = 64.8;
dgh[1] = 74.5;
dgh[2] = 0.75;
dgh[3] = 192.;
dgh[4] = 348.;
gMC->Gsvolu("ICC4", "TUBS", idtmed[225], dgh, 5);
- gMC->Gspos("ICC4", 1, "ITSV", 0., 0., ztpc+dgh[2], 0, "ONLY");
+ // gMC->Gspos("ICC4", 1, "ITSV", 0., 0., ztpc+dgh[2], 0, "ONLY");
+ gMC->Gspos("ICC4", 1, "ITSV", 0., 0., -(ztpc+dgh[2]), idrotm[199], "ONLY");
+
// --- DEFINE CABLES/COOLING BELOW THE TPC ON THE OTHER SIDE W.R.T.
// THE ABSORBER - COPPER PART - UPPER PART
-
+
dgh[0] = 46.;
dgh[1] = 46.+1.0;
- dgh[2] = (ztpc-97.5+1.5-2.5)/2.;
+// dgh[2] = (ztpc-97.5+1.5-2.5)/2.;
+ dgh[2] = (186.6 - 101.1)/2.;
dgh[3] = 12.;
dgh[4] = 168.;
gMC->Gsvolu("ICU5", "TUBS", idtmed[213], dgh, 5);
- gMC->Gspos("ICU5", 1, "ITSV", 0., 0., -97.5-dgh[2], 0, "ONLY");
-
+ // gMC->Gspos("ICU5", 1, "ITSV", 0., 0., -97.5-dgh[2], 0, "ONLY");
+ gMC->Gspos("ICU5", 1, "ITSV", 0., 0., -(-101.1-dgh[2]), idrotm[199], "ONLY");
+
+ dgh[0] = (ztpc - 1.0 - 186.6)/2.;
+ dgh[1] = 64.0;
+ dgh[2] = 64.0+1.0;
+ dgh[3] = 46.;
+ dgh[4] = 46.+1.0;
+ dgh[5] = 12.;
+ dgh[6] = 168.;
+ gMC->Gsvolu("ICU9", "CONS", idtmed[213], dgh, 7);
+ gMC->Gspos("ICU9", 1, "ITSV", 0., 0., -(-186.6-dgh[0]), idrotm[199], "ONLY");
+
// --- DEFINE CABLES/COOLING BELOW THE TPC ON THE OTHER SIDE W.R.T.
// THE ABSORBER - COPPER PART - LOWER PART
dgh[0] = 46.;
dgh[1] = 46.+1.0;
- dgh[2] = (ztpc-97.5+1.5-2.5)/2.;
+// dgh[2] = (ztpc-97.5+1.5-2.5)/2.;
+ dgh[2] = (186.6 - 101.1)/2.;
dgh[3] = 192.;
dgh[4] = 348.;
gMC->Gsvolu("ICU6", "TUBS", idtmed[213], dgh, 5);
- gMC->Gspos("ICU6", 1, "ITSV", 0., 0., -97.5-dgh[2], 0, "ONLY");
-
+ // gMC->Gspos("ICU6", 1, "ITSV", 0., 0., -97.5-dgh[2], 0, "ONLY");
+ gMC->Gspos("ICU6", 1, "ITSV", 0., 0., -(-101.1-dgh[2]), idrotm[199], "ONLY");
+
+ dgh[0] = (ztpc - 1.0 - 186.6)/2.;
+ dgh[1] = 64.0;
+ dgh[2] = 64.0+1.0;
+ dgh[3] = 46.;
+ dgh[4] = 46.+1.0;
+ dgh[5] = 192.;
+ dgh[6] = 348.;
+ gMC->Gsvolu("ICU0", "CONS", idtmed[213], dgh, 7);
+ gMC->Gspos("ICU0", 1, "ITSV", 0., 0., -(-186.6-dgh[0]), idrotm[199], "ONLY");
+
// --- DEFINE CABLES/COOLING BELOW THE TPC ON THE OTHER SIDE W.R.T.
// THE ABSORBER - CARBON PART - UPPER PART
dgh[0] = 46.+1.0;
dgh[1] = 46.+1.0+1.5;
- dgh[2] = (ztpc-97.5)/2.;
+// dgh[2] = (ztpc-97.5)/2.;
+ dgh[2] = (186.6 - 101.1)/2.;
dgh[3] = 12.;
dgh[4] = 168.;
gMC->Gsvolu("ICC5", "TUBS", idtmed[225], dgh, 5);
- gMC->Gspos("ICC5", 1, "ITSV", 0., 0., -97.5-dgh[2], 0, "ONLY");
-
+ // gMC->Gspos("ICC5", 1, "ITSV", 0., 0., -97.5-dgh[2], 0, "ONLY");
+ gMC->Gspos("ICC5", 1, "ITSV", 0., 0., -(-101.1-dgh[2]), idrotm[199], "ONLY");
+
+ dgh[0] = (ztpc - 1.0 - 186.6)/2.;
+ dgh[1] = 64.0+1.0;
+ dgh[2] = 64.0+1.0+1.5;
+ dgh[3] = 46.+1.0;
+ dgh[4] = 46.+1.0+1.5;
+ dgh[5] = 12.;
+ dgh[6] = 168.;
+ gMC->Gsvolu("ICC9", "CONS", idtmed[225], dgh, 7);
+ gMC->Gspos("ICC9", 1, "ITSV", 0., 0., -(-186.6-dgh[0]), idrotm[199], "ONLY");
+
// --- DEFINE CABLES/COOLING BELOW THE TPC ON THE OTHER SIDE W.R.T.
// THE ABSORBER - CARBON PART - LOWER PART
dgh[0] = 46.+1.0;
dgh[1] = 46.+1.0+1.5;
- dgh[2] = (ztpc-97.5)/2.;
+// dgh[2] = (ztpc-97.5)/2.;
+ dgh[2] = (186.6 - 101.1)/2.;
dgh[3] = 192.;
dgh[4] = 348.;
gMC->Gsvolu("ICC6", "TUBS", idtmed[225], dgh, 5);
- gMC->Gspos("ICC6", 1, "ITSV", 0., 0., -97.5-dgh[2], 0, "ONLY");
+ // gMC->Gspos("ICC6", 1, "ITSV", 0., 0., -97.5-dgh[2], 0, "ONLY");
+ gMC->Gspos("ICC6", 1, "ITSV", 0., 0., -(-101.1-dgh[2]), idrotm[199], "ONLY");
+
+ dgh[0] = (ztpc - 1.0 - 186.6)/2.;
+ dgh[1] = 64.0+1.0;
+ dgh[2] = 64.0+1.0+1.5;
+ dgh[3] = 46.+1.0;
+ dgh[4] = 46.+1.0+1.5;
+ dgh[5] = 192.;
+ dgh[6] = 348.;
+ gMC->Gsvolu("ICC0", "CONS", idtmed[225], dgh, 7);
+ gMC->Gspos("ICC0", 1, "ITSV", 0., 0., -(-186.6-dgh[0]), idrotm[199], "ONLY");
+
+ // --- DEFINE CABLES/COOLING BELOW THE TPC ON THE OTHER SIDE W.R.T.
+ // THE ABSORBER - ALUMINUM PART - UPPER PART
+
+ dgh[0] = 46.+1.0+1.5;
+ dgh[1] = 46.+1.0+1.5+0.4;
+// dgh[2] = (ztpc-97.5)/2.;
+ dgh[2] = (186.6 - 101.1)/2.;
+ dgh[3] = 12.;
+ dgh[4] = 168.;
+ gMC->Gsvolu("ICK5", "TUBS", idtmed[210], dgh, 5);
+ // gMC->Gspos("ICC5", 1, "ITSV", 0., 0., -97.5-dgh[2], 0, "ONLY");
+ gMC->Gspos("ICK5", 1, "ITSV", 0., 0., -(-101.1-dgh[2]), idrotm[199], "ONLY");
+
+ dgh[0] = (ztpc - 1.0 - 186.6)/2.;
+ dgh[1] = 64.0+1.0+1.5;
+ dgh[2] = 64.0+1.0+1.5+0.4;
+ dgh[3] = 46.+1.0+1.5;
+ dgh[4] = 46.+1.0+1.5+0.4;
+ dgh[5] = 12.;
+ dgh[6] = 168.;
+ gMC->Gsvolu("ICK9", "CONS", idtmed[210], dgh, 7);
+ gMC->Gspos("ICK9", 1, "ITSV", 0., 0., -(-186.6-dgh[0]), idrotm[199], "ONLY");
+
+
+ dgh[0] = 46.+1.0+1.5+0.4;
+ dgh[1] = 46.+1.0+1.5+0.4+5.5;
+ dgh[2] = 4.0/2;
+ dgh[3] = 12.;
+ dgh[4] = 168.;
+ gMC->Gsvolu("IKK7", "TUBS", idtmed[210], dgh, 5);
+// gMC->Gspos("IKK7", 1, "ITSV", 0., 0., -(-101.1-dgh[2]), idrotm[199], "ONLY");
+ gMC->Gspos("IKK7", 1, "ITSV", 0., 0., -(-186.6+dgh[2]+5+4+34+31.8), idrotm[199], "ONLY");
+
+
+ dgh[0] = 46.+1.0+1.5+0.4;
+ dgh[1] = 46.+1.0+1.5+0.4+0.3;
+ dgh[2] = 34.0/2;
+ dgh[3] = 12.;
+ dgh[4] = 168.;
+ gMC->Gsvolu("IKK5", "TUBS", idtmed[210], dgh, 5);
+// gMC->Gspos("IKK5", 1, "ITSV", 0., 0., -(-101.1-dgh[2]-4), idrotm[199], "ONLY");
+ gMC->Gspos("IKK5", 1, "ITSV", 0., 0., -(-186.6+dgh[2]+5+4+31.8), idrotm[199], "ONLY");
+
+
+ dgh[0] = 46.+1.0+1.5+0.4;
+ dgh[1] = 46.+1.0+1.5+0.4+5.5;
+ dgh[2] = 4.0/2;
+ dgh[3] = 12.;
+ dgh[4] = 168.;
+ gMC->Gsvolu("IKK3", "TUBS", idtmed[210], dgh, 5);
+// gMC->Gspos("IKK3", 1, "ITSV", 0., 0., -(-101.1-dgh[2]-4-34), idrotm[199], "ONLY");
+ gMC->Gspos("IKK3", 1, "ITSV", 0., 0., -(-186.6+dgh[2]+5+31.8), idrotm[199], "ONLY");
+
+
+ dgh[0] = 46.+1.0+1.5+0.4;
+ dgh[1] = 46.+1.0+1.5+0.4+6.0;
+ dgh[2] = 5.0/2;
+ dgh[3] = 12.;
+ dgh[4] = 168.;
+ gMC->Gsvolu("IKK1", "TUBS", idtmed[210], dgh, 5);
+// gMC->Gspos("IKK1", 1, "ITSV", 0., 0., -(-101.1-dgh[2]-4-34-4), idrotm[199], "ONLY");
+ gMC->Gspos("IKK1", 1, "ITSV", 0., 0., -(-186.6+dgh[2]+31.8), idrotm[199], "ONLY");
+
+
+ dgh[0] = 46.+1.0+1.5+0.4;
+ dgh[1] = 46.+1.0+1.5+0.4+0.3;
+ dgh[2] = 31.8/2;
+ dgh[3] = 12.;
+ dgh[4] = 168.;
+ gMC->Gsvolu("IKK9", "TUBS", idtmed[210], dgh, 5);
+ gMC->Gspos("IKK9", 1, "ITSV", 0., 0., -(-186.6+dgh[2]), idrotm[199], "ONLY");
+
+
+ dgh[0] = 66.2/2;
+ dgh[1] = 46.+1.0+1.5+0.4+12.5;
+ dgh[2] = 46.+1.0+1.5+0.4+12.5+0.3;
+ dgh[3] = 46.+1.0+1.5+0.4;
+ dgh[4] = 46.+1.0+1.5+0.4+0.3;
+ dgh[5] = 12.;
+ dgh[6] = 168.;
+ gMC->Gsvolu("ICK7", "CONS", idtmed[210], dgh, 7);
+ gMC->Gspos("ICK7", 1, "ITSV", 0., 0., -(-186.6-dgh[0]), idrotm[199], "ONLY");
+
+ // --- DEFINE CABLES/COOLING BELOW THE TPC ON THE OTHER SIDE W.R.T.
+ // THE ABSORBER - ALUMINUM PART - LOWER PART
+
+ dgh[0] = 46.+1.0+1.5;
+ dgh[1] = 46.+1.0+1.5+0.4;
+// dgh[2] = (ztpc-97.5)/2.;
+ dgh[2] = (186.6 - 101.1)/2.;
+ dgh[3] = 192.;
+ dgh[4] = 348.;
+ gMC->Gsvolu("ICK6", "TUBS", idtmed[210], dgh, 5);
+ // gMC->Gspos("ICC6", 1, "ITSV", 0., 0., -97.5-dgh[2], 0, "ONLY");
+ gMC->Gspos("ICK6", 1, "ITSV", 0., 0., -(-101.1-dgh[2]), idrotm[199], "ONLY");
+
+ dgh[0] = (ztpc - 1.0 - 186.6)/2.;
+ dgh[1] = 64.0+1.0+1.5;
+ dgh[2] = 64.0+1.0+1.5+0.4;
+ dgh[3] = 46.+1.0+1.5;
+ dgh[4] = 46.+1.0+1.5+0.4;
+ dgh[5] = 192.;
+ dgh[6] = 348.;
+ gMC->Gsvolu("ICK0", "CONS", idtmed[210], dgh, 7);
+ gMC->Gspos("ICK0", 1, "ITSV", 0., 0., -(-186.6-dgh[0]), idrotm[199], "ONLY");
+
+
+ dgh[0] = 46.+1.0+1.5+0.4;
+ dgh[1] = 46.+1.0+1.5+0.4+5.5;
+ dgh[2] = 4.0/2;
+ dgh[3] = 192.;
+ dgh[4] = 348.;
+ gMC->Gsvolu("IKK8", "TUBS", idtmed[210], dgh, 5);
+// gMC->Gspos("IKK8", 1, "ITSV", 0., 0., -(-101.1-dgh[2]), idrotm[199], "ONLY");
+ gMC->Gspos("IKK8", 1, "ITSV", 0., 0., -(-186.6+dgh[2]+5+4+34+31.8), idrotm[199], "ONLY");
+
+
+ dgh[0] = 46.+1.0+1.5+0.4;
+ dgh[1] = 46.+1.0+1.5+0.4+0.3;
+ dgh[2] = 34.0/2;
+ dgh[3] = 192.;
+ dgh[4] = 348.;
+ gMC->Gsvolu("IKK6", "TUBS", idtmed[210], dgh, 5);
+// gMC->Gspos("IKK6", 1, "ITSV", 0., 0., -(-101.1-dgh[2]-4), idrotm[199], "ONLY");
+ gMC->Gspos("IKK6", 1, "ITSV", 0., 0., -(-186.6+dgh[2]+5+4+31.8), idrotm[199], "ONLY");
+
+
+ dgh[0] = 46.+1.0+1.5+0.4;
+ dgh[1] = 46.+1.0+1.5+0.4+5.5;
+ dgh[2] = 4.0/2;
+ dgh[3] = 192.;
+ dgh[4] = 348.;
+ gMC->Gsvolu("IKK4", "TUBS", idtmed[210], dgh, 5);
+// gMC->Gspos("IKK4", 1, "ITSV", 0., 0., -(-101.1-dgh[2]-4-34), idrotm[199], "ONLY");
+ gMC->Gspos("IKK4", 1, "ITSV", 0., 0., -(-186.6+dgh[2]+5+31.8), idrotm[199], "ONLY");
+
+
+ dgh[0] = 46.+1.0+1.5+0.4;
+ dgh[1] = 46.+1.0+1.5+0.4+6.0;
+ dgh[2] = 5.0/2;
+ dgh[3] = 192.;
+ dgh[4] = 348.;
+ gMC->Gsvolu("IKK2", "TUBS", idtmed[210], dgh, 5);
+// gMC->Gspos("IKK2", 1, "ITSV", 0., 0., -(-101.1-dgh[2]-4-34-4), idrotm[199], "ONLY");
+ gMC->Gspos("IKK2", 1, "ITSV", 0., 0., -(-186.6+dgh[2]+31.8), idrotm[199], "ONLY");
+
+
+ dgh[0] = 46.+1.0+1.5+0.4;
+ dgh[1] = 46.+1.0+1.5+0.4+0.3;
+ dgh[2] = 31.8/2;
+ dgh[3] = 192.;
+ dgh[4] = 348.;
+ gMC->Gsvolu("IKK0", "TUBS", idtmed[210], dgh, 5);
+ gMC->Gspos("IKK0", 1, "ITSV", 0., 0., -(-186.6+dgh[2]), idrotm[199], "ONLY");
+
+
+ dgh[0] = 66.2/2;
+ dgh[1] = 46.+1.0+1.5+0.4+12.5;
+ dgh[2] = 46.+1.0+1.5+0.4+12.5+0.3;
+ dgh[3] = 46.+1.0+1.5+0.4;
+ dgh[4] = 46.+1.0+1.5+0.4+0.3;
+ dgh[5] = 192.;
+ dgh[6] = 348.;
+ gMC->Gsvolu("ICK8", "CONS", idtmed[210], dgh, 7);
+ gMC->Gspos("ICK8", 1, "ITSV", 0., 0., -(-186.6-dgh[0]), idrotm[199], "ONLY");
+
// --- DEFINE CABLES/COOLING BEHIND THE TPC ON OTHER SIDE W.R.T. THE ABSORBER
// COPPER PART - UPPER PART
- dgh[0] = 46.;
+ dgh[0] = 64.0;
dgh[1] = 74.5;
dgh[2] = 0.5;
dgh[3] = 12.;
dgh[4] = 168.;
gMC->Gsvolu("ICU7", "TUBS", idtmed[213], dgh, 5);
- gMC->Gspos("ICU7", 1, "ITSV", 0., 0., -(ztpc+1.5+dgh[2]), 0, "ONLY");
+ gMC->Gspos("ICU7", 1, "ITSV", 0., 0., (ztpc+1.5+dgh[2]), idrotm[199], "ONLY");
// --- DEFINE CABLES/COOLING BEHIND THE TPC ON OTHER SIDE W.R.T. THE ABSORBER
// COPPER PART - LOWER PART
- dgh[0] = 46.;
+ dgh[0] = 64.0;
dgh[1] = 74.5;
dgh[2] = 0.5;
dgh[3] = 192.;
dgh[4] = 348.;
gMC->Gsvolu("ICU8", "TUBS", idtmed[213], dgh, 5);
- gMC->Gspos("ICU8", 1, "ITSV", 0., 0., -(ztpc+1.5+dgh[2]), 0, "ONLY");
+ gMC->Gspos("ICU8", 1, "ITSV", 0., 0., (ztpc+1.5+dgh[2]), idrotm[199], "ONLY");
// --- DEFINE CABLES/COOLING BEHIND THE TPC ON OTHER SIDE W.R.T. THE ABSORBER
// CARBON PART - UPPER PART
- dgh[0] = 46.+1.0;
+ dgh[0] = 64.0+1.0;
dgh[1] = 74.5;
dgh[2] = 0.75;
dgh[3] = 12.;
dgh[4] = 168.;
gMC->Gsvolu("ICC7", "TUBS", idtmed[225], dgh, 5);
- gMC->Gspos("ICC7", 1, "ITSV", 0., 0., -(ztpc+dgh[2]), 0, "ONLY");
+ gMC->Gspos("ICC7", 1, "ITSV", 0., 0., (ztpc+dgh[2]), idrotm[199], "ONLY");
// --- DEFINE CABLES/COOLING BEHIND THE TPC ON OTHER SIDE W.R.T. THE ABSORBER
// CARBON PART - LOWER PART
- dgh[0] = 46.+1.0;
+ dgh[0] = 64.0+1.0;
dgh[1] = 74.5;
dgh[2] = 0.75;
dgh[3] = 192.;
dgh[4] = 348.;
gMC->Gsvolu("ICC8", "TUBS", idtmed[225], dgh, 5);
- gMC->Gspos("ICC8", 1, "ITSV", 0., 0., -(ztpc+dgh[2]), 0, "ONLY");
+ gMC->Gspos("ICC8", 1, "ITSV", 0., 0., (ztpc+dgh[2]), idrotm[199], "ONLY");
+
+
// --- DEFINE HOOK TO THE TPC ON OTHER SIDE W.R.T. THE ABSORBER - UPPER PART
- dgh[0] = 74.5;
- dgh[1] = 79.5;
+ dgh[0] = 74.7;
+ dgh[1] = 75.3;
dgh[2] = 2.5;
dgh[3] = 12.;
dgh[4] = 168.;
gMC->Gsvolu("IHK1", "TUBS", idtmed[264], dgh, 5);
- gMC->Gspos("IHK1", 1, "ITSV", 0., 0., -ztpc-dgh[2], 0, "ONLY");
+ gMC->Gspos("IHK1", 1, "ITSV", 0., 0., -(-ztpc-dgh[2]), idrotm[199], "ONLY");
// --- DEFINE HOOK TO THE TPC ON OTHER SIDE W.R.T. THE ABSORBER - LOWER PART
- dgh[0] = 74.5;
- dgh[1] = 79.5;
+ dgh[0] = 74.7;
+ dgh[1] = 75.3;
dgh[2] = 2.5;
dgh[3] = 192.;
dgh[4] = 348.;
gMC->Gsvolu("IHK2", "TUBS", idtmed[264], dgh, 5);
- gMC->Gspos("IHK2", 1, "ITSV", 0., 0., -ztpc-dgh[2], 0, "ONLY");
+ gMC->Gspos("IHK2", 1, "ITSV", 0., 0., -(-ztpc-dgh[2]), idrotm[199], "ONLY");
-// }
+ }
// --- DEFINE RAILS BETWEEN THE ITS AND THE TPC
dgh[1] = 8.;
dgh[2] = 190.;
gMC->Gsvolu("IRA1", "BOX ", idtmed[268], dgh, 3);
- gMC->Gspos("IRA1", 1, "ITSV", 53.5, 0., -69.5, 0, "ONLY");
+ gMC->Gspos("IRA1", 1, "ITSV", 53.5, 0., 69.5, idrotm[199], "ONLY");
gMC->Gsvolu("IRA2", "BOX ", idtmed[268], dgh, 3);
- gMC->Gspos("IRA2", 1, "ITSV", -53.5, 0., -69.5, 0, "ONLY");
+ gMC->Gspos("IRA2", 1, "ITSV", -53.5, 0., 69.5, idrotm[199], "ONLY");
dgh[0] = 2.-0.5;// 0.5 was determined in such a way that the aluminum area is 20.9 cm^2
dgh[1] = 8.-0.5;// 0.5 was determined in such a way that the aluminum area is 20.9 cm^2
dgh[1] = 59.;
dgh[2] = 0.6;
gMC->Gsvolu("ICYL", "TUBE", idtmed[210], dgh, 3);
- gMC->Gspos("ICYL", 1, "ALIC", 0., 0., -74.1,idrotm[199], "ONLY");
- gMC->Gspos("ICYL", 2, "ALIC", 0., 0., 74.1, 0, "ONLY");
+ gMC->Gspos("ICYL", 1, "ITSV", 0., 0., -74.1,idrotm[199], "ONLY");
+ gMC->Gspos("ICYL", 2, "ITSV", 0., 0., 74.1, 0, "ONLY");
// --- DEFINE SUPPORTS FOR RAILS ATTACHED TO THE CYLINDERS
dgh[1] = 3.;
dgh[2] = 5.;// 5. comes from the fact that the volume has to be 567.6/2 cm^3
gMC->Gsvolu("ISR1", "TUBE", idtmed[284], dgh, 3);
- gMC->Gspos("ISR1", 1, "ITSV", 53.4292, 10.7053, 79.75, 0, "ONLY");
- gMC->Gspos("ISR1", 2, "ITSV", 53.4292, -10.7053, 79.75, 0, "ONLY");
- gMC->Gspos("ISR1", 3, "ITSV", -53.4292, 10.7053, 79.75, 0, "ONLY");
- gMC->Gspos("ISR1", 4, "ITSV", -53.4292, -10.7053, 79.75, 0, "ONLY");
- gMC->Gspos("ISR1", 5, "ITSV", 53.4292, 10.7053, -79.75, 0, "ONLY");
- gMC->Gspos("ISR1", 6, "ITSV", 53.4292, -10.7053, -79.75, 0, "ONLY");
- gMC->Gspos("ISR1", 7, "ITSV", -53.4292, 10.7053, -79.75, 0, "ONLY");
- gMC->Gspos("ISR1", 8, "ITSV", -53.4292, -10.7053, -79.75, 0, "ONLY");
+ gMC->Gspos("ISR1", 1, "ITSV", 53.4292, 10.7053, -79.75,idrotm[199],"ONLY");
+ gMC->Gspos("ISR1", 2, "ITSV", 53.4292, -10.7053, -79.75,idrotm[199],"ONLY");
+ gMC->Gspos("ISR1", 3, "ITSV", -53.4292, 10.7053, -79.75,idrotm[199],"ONLY");
+ gMC->Gspos("ISR1", 4, "ITSV", -53.4292, -10.7053, -79.75,idrotm[199],"ONLY");
+ gMC->Gspos("ISR1", 5, "ITSV", 53.4292, 10.7053, 79.75,idrotm[199],"ONLY");
+ gMC->Gspos("ISR1", 6, "ITSV", 53.4292, -10.7053, 79.75,idrotm[199],"ONLY");
+ gMC->Gspos("ISR1", 7, "ITSV", -53.4292, 10.7053, 79.75,idrotm[199],"ONLY");
+ gMC->Gspos("ISR1", 8, "ITSV", -53.4292, -10.7053, 79.75,idrotm[199],"ONLY");
// --- DEFINE SUPPORTS FOR RAILS ATTACHED TO THE ABSORBER
dgh[1] = 12.;
dgh[2] = 5.;
gMC->Gsvolu("ISR2", "BOX ", idtmed[210], dgh, 3);
- gMC->Gspos("ISR2", 1, "ITSV", -53.5, 0., -125.5, idrotm[199], "ONLY");
+ gMC->Gspos("ISR2", 1, "ITSV", -53.5, 0., 125.5, 0, "ONLY");
gMC->Gsvolu("ISR3", "BOX ", idtmed[210], dgh, 3);
- gMC->Gspos("ISR3", 1, "ITSV", 53.5, 0., -125.5, idrotm[199], "ONLY");
+ gMC->Gspos("ISR3", 1, "ITSV", 53.5, 0., 125.5, 0, "ONLY");
dgh[0] = 5.-2.;
dgh[1] = 12.-2.;
dgh[1] = 5.;
dgh[2] = 2.;
gMC->Gsvolu("ISR6", "TUBE", idtmed[210], dgh, 3);
- gMC->Gspos("ISR6", 1, "ITSV", 0., 54., -77., idrotm[199], "ONLY");
- gMC->Gspos("ISR6", 2, "ITSV", 0., 54., 77., idrotm[199], "ONLY");
- gMC->Gspos("ISR6", 3, "ITSV", 0., -54., 77., idrotm[199], "ONLY");
+ gMC->Gspos("ISR6", 1, "ITSV", 0., 54., 77., 0, "ONLY");
+ gMC->Gspos("ISR6", 2, "ITSV", 0., 54., -77., 0, "ONLY");
+ gMC->Gspos("ISR6", 3, "ITSV", 0., -54., -77., 0, "ONLY");
}
-
- // --- Outputs the geometry tree in the EUCLID/CAD format
-
- if (fEuclidOut) {
- gMC->WriteEuclid("ITSgeometry", "ITSV", 1, 5);
- }
-
-
{
if (!gGeoManager) {
AliError("TGeoManager doesn't exist !");
// Return:
// none.
- Int_t ifield = gAlice->Field()->Integ();
- Float_t fieldm = gAlice->Field()->Max();
+ Int_t ifield = ((AliMagF*)TGeoGlobalMagField::Instance()->GetField())->Integ();
+ Float_t fieldm = ((AliMagF*)TGeoGlobalMagField::Instance()->GetField())->Max();
Float_t tmaxfd = 0.1; // 1.0; // Degree
Float_t stemax = 1.0; // cm
Float_t aCM55J[4]={12.0107,14.0067,15.9994,1.00794};
Float_t zCM55J[4]={6.,7.,8.,1.};
Float_t wCM55J[4]={0.908508078,0.010387573,0.055957585,0.025146765};
- Float_t dCM55J = 1.63;
+ Float_t dCM55J = 1.8;
//ALCM55J
//Inox
- Float_t aINOX[9]={12.0107,54.9380, 28.0855,30.9738,32.066,58.6928,55.9961,95.94,55.845};
+ Float_t aINOX[9]={12.0107,54.9380, 28.0855,30.9738,32.066,58.6928,51.9961,95.94,55.845};
Float_t zINOX[9]={6.,25.,14.,15.,16., 28.,24.,42.,26.};
Float_t wINOX[9]={0.0003,0.02,0.01,0.00045,0.0003,0.12,0.17,0.025,0.654};
Float_t dINOX = 8.03;
Float_t zKapton[4]={1.,6.,7.,8.};
Float_t wKapton[4]={0.026362,0.69113,0.07327,0.209235};
Float_t dKapton = 1.42;
+
+ // Kapton + Cu (for Pixel Bus)
+
+ Float_t aKaptonCu[5]={1.00794, 12.0107, 14.010, 15.9994, 63.5460};
+ Float_t zKaptonCu[5]={1., 6., 7., 8., 29.};
+ Float_t wKaptonCuBus[5];
+
+ // Kapton + Cu (for Pixel MCM)
+
+ Float_t wKaptonCuMCM[5];
+
+ // Kapton + Cu (mix of two above)
+
+ Float_t wKaptonCuMix[5];
//SDD ruby sph.
Float_t aAlOxide[2] = { 26.981539,15.9994};
Float_t woptfib[2] = { 1., 2. };
Float_t doptfib = 2.55;
+ // Tetrafluorethylene-Perfluorpropylene (FEP) - 08 Mar 10
+ Float_t aFEP[2] = { 12.0107, 18.9984};
+ Float_t zFEP[2] = { 6. , 9. };
+ Float_t wFEP[2] = { 1. , 2. };
+ Float_t dFEP = 2.15;
+
+ // PVC (C2H3Cl)n - 08 Jul 10
+ Float_t aPVC[3] = { 12.0107, 1.00794, 35.4527};
+ Float_t zPVC[3] = { 6. , 1. , 35. };
+ Float_t wPVC[3] = { 2. , 3. , 1. };
+ Float_t dPVC = 1.3;
+
+ //SSD NiSn capacitor ends
+ Float_t aNiSn[2] = { 56.6934,118.710};
+ Float_t zNiSn[2] = { 28., 50.};
+ Float_t wNiSn[2] = {0.33, 0.67};
+ Float_t dNiSn = wNiSn[0]*8.908 + wNiSn[1]*7.310;
+
AliMaterial(1,"SI$",0.28086E+02,0.14000E+02,0.23300E+01,0.93600E+01,0.99900E+03);
AliMedium(1,"SI$",1,0,ifield,fieldm,tmaxfdSi,stemaxSi,deemaxSi,epsilSi,stminSi);
AliMixture(27,"GEN Air$",aAir,zAir,dAir,4,wAir);
AliMedium(27,"GEN Air$",27,0,ifield,fieldm,tmaxfdAir,stemaxAir,deemaxAir,epsilAir,stminAir);
+ AliMixture(47,"PVC$",aPVC,zPVC,dPVC,-3,wPVC);
+ AliMedium(47,"PVC$",47,0,ifield,fieldm,tmaxfd,stemax,deemax,epsil,stmin);
+
+ Double_t cuFrac = 0.56;
+ Double_t kFrac = 1.0 - cuFrac;
+ Double_t cuDens = 8.96;
+ Float_t dKaptonCuBus = cuFrac * cuDens + kFrac * dKapton;
+ for (Int_t j=0; j<4; j++)
+ wKaptonCuBus[j] = wKapton[j]*kFrac;
+ wKaptonCuBus[4] = cuFrac;
+ AliMixture(48, "SPD-BUS CU KAPTON", aKaptonCu, zKaptonCu, dKaptonCuBus, 5, wKaptonCuBus);
+ AliMedium(48,"SPD-BUS CU KAPTON$",48,0,ifield,fieldm,tmaxfd,stemax,deemax,epsil,stmin);
+
+ cuFrac = 0.5;
+ kFrac = 1.0 - cuFrac;
+ Float_t dKaptonCuMCM = cuFrac * cuDens + kFrac * dKapton;
+ for (Int_t j=0; j<4; j++)
+ wKaptonCuMCM[j] = wKapton[j]*kFrac;
+ wKaptonCuMCM[4] = cuFrac;
+ AliMixture(49, "SPD-MCM CU KAPTON", aKaptonCu, zKaptonCu, dKaptonCuMCM, 5, wKaptonCuMCM);
+ AliMedium(49,"SPD-MCM CU KAPTON$",49,0,ifield,fieldm,tmaxfd,stemax,deemax,epsil,stmin);
+
+ cuFrac = (0.56 + 0.5) / 2.0;
+ kFrac = 1.0 - cuFrac;
+ Float_t dKaptonCuMix = cuFrac * cuDens + kFrac * dKapton;
+ for (Int_t j=0; j<4; j++)
+ wKaptonCuMix[j] = wKapton[j]*kFrac;
+ wKaptonCuMix[4] = cuFrac;
+ AliMixture(50, "SPD-MIX CU KAPTON", aKaptonCu, zKaptonCu, dKaptonCuMix, 5, wKaptonCuMix);
+ AliMedium(50,"SPD-MIX CU KAPTON$",50,0,ifield,fieldm,tmaxfd,stemax,deemax,epsil,stmin);
+
AliMaterial(51,"SPD SI$",0.28086E+02,0.14000E+02,0.23300E+01,0.93600E+01,0.99900E+03);
AliMedium(51,"SPD SI$",51,0,ifield,fieldm,tmaxfdSi,stemaxSi,deemaxSi,epsilSi,stminSi);
AliMixture(56, "SPD KAPTON(POLYCH2)", aKapton, zKapton, dKapton, 4, wKapton);
AliMedium(56,"SPD KAPTON(POLYCH2)$",56,0,ifield,fieldm,tmaxfd,stemax,deemax,epsil,stmin);
+ // Gaseous Freon has same chemical composition but air density at 1.7 atm
+ AliMixture(59,"GASEOUS FREON$",afre,zfre,1.7*dAir,-2,wfre);
+ AliMedium(59,"GASEOUS FREON$",59,0,ifield,fieldm,tmaxfd,stemax,deemax,epsil,stmin);
+
AliMixture(61,"EPOXY$",aEpoxy,zEpoxy,dEpoxy,-3,wEpoxy);
AliMedium(61,"EPOXY$",61,0,ifield,fieldm,tmaxfd,stemax,deemax,epsil,stmin);
AliMixture(65,"INOX$",aINOX,zINOX,dINOX,9,wINOX);
AliMedium(65,"INOX$",65,0,ifield,fieldm,tmaxfd,stemax,deemax,epsil,stmin);
+ AliMixture(66,"NiSn$",aNiSn,zNiSn,dNiSn,2,wNiSn);
+ AliMedium(66,"NiSn$",66,0,ifield,fieldm,tmaxfd,stemax,deemax,epsil,stmin);
+
+ AliMaterial(67,"Sn$", 118.710, 50., 7.310, 1.206, 999.);
+ AliMedium(67,"Sn$",67,0,ifield,fieldm,tmaxfd,stemax,deemax,epsil,stmin);
+
AliMixture(68,"ROHACELL$",arohac,zrohac,drohac,-4,wrohac);
AliMedium(68,"ROHACELL$",68,0,ifield,fieldm,tmaxfd,stemax,deemax,epsil,stmin);
AliMixture(98,"SDD OPTICFIB$",aoptfib,zoptfib,doptfib,-2,woptfib);
AliMedium(98,"SDD OPTICFIB$",98,0,ifield,fieldm,tmaxfd,stemax,deemax,epsil,stmin);
+
+ AliMixture(95,"SSD FEP$",aFEP,zFEP,dFEP,-2,wFEP);
+ AliMedium(95,"SSD FEP$",95,0,ifield,fieldm,tmaxfd,stemax,deemax,epsil,stmin);
+
+ // Mean material for low-voltage cables on SPD trays Side A
+ // (Copper + PolyEthylene (C2-H4)) (D.Elia for cable number and
+ // cross-section area, M.Sitta for elemental computation) - 26 Feb 10
+ wW[0] = 0.323024;//H
+ wW[2] = 0.515464;//Cu
+ wW[1] = 0.161512;//C
+ wW[3] = 0.000000;//O
+ wW[4] = 0.000000;//S
+ wW[5] = 0.000000;//F
+ wW[6] = 0.000000;//Sn
+ wW[7] = 0.000000;//Pb
+ wW[8] = 0.000000;//Cr
+ wW[9] = 0.000000;//Si
+ wW[10] = 0.000000;//Ni
+ wW[11] = 0.000000;//Ca
+
+ den = 5.078866;
+ AliMixture(60,"SPD_LOWCABLES$",aA,zZ,den,+3,wW);
+ AliMedium(60,"SPD_LOWCABLES$",60,0,ifield,fieldm,tmaxfd,stemax,
+ deemax,epsil,stmin);
+
+ // Mean material for high-voltage cables on SPD trays Side A & C
+ // (Copper + HD PolyEthylene (C2-H2)) (D.Elia for cable number and
+ // cross-section area, M.Sitta for elemental computation) - 10 Jun 10
+ wW[0] = 0.083766;//H
+ wW[2] = 0.417136;//Cu
+ wW[1] = 0.499098;//C
+ wW[3] = 0.000000;//O
+ wW[4] = 0.000000;//S
+ wW[5] = 0.000000;//F
+ wW[6] = 0.000000;//Sn
+ wW[7] = 0.000000;//Pb
+ wW[8] = 0.000000;//Cr
+ wW[9] = 0.000000;//Si
+ wW[10] = 0.000000;//Ni
+ wW[11] = 0.000000;//Ca
+
+ den = 1.514930;
+ AliMixture(58,"SPD_HICABLES$",aA,zZ,den,+3,wW);
+ AliMedium(58,"SPD_HICABLES$",58,0,ifield,fieldm,tmaxfd,stemax,
+ deemax,epsil,stmin);
+
+ // PolyUrethane [C25-H42-N2-O6] - 07 Mar 10
+ zZ[2] = 7.0; aA[2] = 14.0067; // Nitrogen - From Root TGeoElementTable
+
+ wW[0] = 0.090724;//H
+ wW[2] = 0.060035;//N
+ wW[1] = 0.643513;//C
+ wW[3] = 0.205728;//O
+ wW[4] = 0.000000;//S
+ wW[5] = 0.000000;//F
+ wW[6] = 0.000000;//Sn
+ wW[7] = 0.000000;//Pb
+ wW[8] = 0.000000;//Cr
+ wW[9] = 0.000000;//Si
+ wW[10] = 0.000000;//Ni
+ wW[11] = 0.000000;//Ca
+
+ den = 1.158910;
+ AliMixture(67,"POLYURETHANE$",aA,zZ,den,+4,wW);
+ AliMedium(67,"POLYURETHANE$",67,0,ifield,fieldm,tmaxfd,stemax,
+ deemax,epsil,stmin);
+
+ // POM (Polyoxymethylene = (CH2O)n ) - 02 May 10
+ zZ[2] = 8.0; aA[2] = 15.9994; // Oxigen
+
+ wW[0] = 0.067137;//H
+ wW[1] = 0.400016;//C
+ wW[2] = 0.532847;//O
+ wW[3] = 0.000000;//O
+ wW[4] = 0.000000;//S
+ wW[5] = 0.000000;//F
+ wW[6] = 0.000000;//Sn
+ wW[7] = 0.000000;//Pb
+ wW[8] = 0.000000;//Cr
+ wW[9] = 0.000000;//Si
+ wW[10] = 0.000000;//Ni
+ wW[11] = 0.000000;//Ca
+
+ den = 1.4200;
+ AliMixture(57,"POLYOXYMETHYLENE$",aA,zZ,den,+3,wW);
+ AliMedium(57,"POLYOXYMETHYLENE$",57,0,ifield,fieldm,tmaxfd,stemax,
+ deemax,epsil,stmin);
+
+
+ // Anticorodal: Aliminum alloy for tray ring support on Side A
+ den = 2.710301;
+ AliMaterial(93,"ANTICORODAL$",0.26982E+02,0.13000E+02,den,0.89000E+01,0.99900E+03);
+ AliMedium(93,"ANTICORODAL$",93,0,ifield,fieldm,tmaxfd,stemax,deemax,epsil,stmin);
+
}
//______________________________________________________________________
fMinorVersion));
UpdateInternalGeometry();
AliITS::Init();
- if(fGeomDetOut) GetITSgeom()->WriteNewFile(fWrite);
fIDMother = gMC->VolId("ITSV"); // ITS Mother Volume ID.
}
Int_t copy, lay = 0;
Int_t id = gMC->CurrentVolID(copy);
- Bool_t notSens;
- while ((notSens = id != fIdSens[lay]) && (lay<fIdN)) ++lay;
+ Bool_t notSens = kFALSE;
+ while ((lay<fIdN) && (notSens = id != fIdSens[lay])) ++lay;
if (notSens) return;
if(gMC->IsTrackExiting()) {