#include <Riostream.h>
#include <stdlib.h>
-#include <TBRIK.h>
-#include <TGeometry.h>
#include <TInterpreter.h>
#include <TMath.h>
-#include <TNode.h>
-#include <TTUBE.h>
#include <TVirtualMC.h>
#include <TString.h>
#include <TSystem.h>
// here I define a volume TPC
// retrive the medium name with "TPC_" as a leading string
//
- TGeoPcon *tpc = new TGeoPcon(0.,360.,18); //18 sections
- tpc->DefineSection(0,-290.,77.,278.);
- tpc->DefineSection(1,-259.6,70.,278.);
+ TGeoPcon *tpc = new TGeoPcon(0.,360.,30); //30 sections
//
- tpc->DefineSection(2,-259.6,68.1,278.);
- tpc->DefineSection(3,-253.6,68.1,278.);
+ tpc->DefineSection(0,-289.6,77.,278.);
+ tpc->DefineSection(1,-262.1,77.,278.);
//
- tpc->DefineSection(4,-253.6,68.,278.);
- tpc->DefineSection(5,-74.0,60.8,278.);
+ tpc->DefineSection(2,-262.1,83.1,278.);
+ tpc->DefineSection(3,-260.,83.1,278.);
//
- tpc->DefineSection(6,-74.0,60.1,278.);
- tpc->DefineSection(7,-73.3,60.1,278.);
+ tpc->DefineSection(4,-260.,70.,278.);
+ tpc->DefineSection(5,-259.6,70.,278.);
//
- tpc->DefineSection(8,-73.3,56.9,278.);
- tpc->DefineSection(9,73.3,56.9,278.);
+ tpc->DefineSection(6,-259.6,68.1,278.);
+ tpc->DefineSection(7,-253.6,68.1,278.);
//
- tpc->DefineSection(10,73.3,60.1,278.);
- tpc->DefineSection(11,74.0,60.1,278.);
+ tpc->DefineSection(8,-253.6,68.,278.);
+ tpc->DefineSection(9,-74.0,60.8,278.);
//
- tpc->DefineSection(12,74.0,60.8,278.);
- tpc->DefineSection(13,253.6,65.5,278.);
+ tpc->DefineSection(10,-74.0,60.1,278.);
+ tpc->DefineSection(11,-73.3,60.1,278.);
//
- tpc->DefineSection(14,253.6,65.6,278.);
- tpc->DefineSection(15,259.6,65.6,278.);
+ tpc->DefineSection(12,-73.3,56.9,278.);
+ tpc->DefineSection(13,-68.5,56.9,278.);
//
- tpc->DefineSection(16,259.6,70.0,278.);
- tpc->DefineSection(17,290.,77.,278.);
+ tpc->DefineSection(14,-68.5,60.,278.);
+ tpc->DefineSection(15,-64.7,60.,278.);
+ //
+ tpc->DefineSection(16,-64.7,56.9,278.);
+ tpc->DefineSection(17,73.3,56.9,278.);
+ //
+ tpc->DefineSection(18,73.3,60.1,278.);
+ tpc->DefineSection(19,74.0,60.1,278.);
+ //
+ tpc->DefineSection(20,74.0,60.8,278.);
+ tpc->DefineSection(21,253.6,65.5,278.);
+ //
+ tpc->DefineSection(22,253.6,65.6,278.);
+ tpc->DefineSection(23,259.6,65.6,278.);
+ //
+ tpc->DefineSection(24,259.6,70.0,278.);
+ tpc->DefineSection(25,260.,70.0,278.);
+ //
+ tpc->DefineSection(26,260.,83.1,278.);
+ tpc->DefineSection(27,262.1,83.1,278.);
+ //
+ tpc->DefineSection(28,262.1,77.,278);
+ tpc->DefineSection(29,289.6,77.,278.);
+
+
//
TGeoMedium *m1 = gGeoManager->GetMedium("TPC_Air");
TGeoVolume *v1 = new TGeoVolume("TPC_M",tpc,m1);
dvol->DefineSection(4,253.6,74.5,264.4);
dvol->DefineSection(5,260.,74.5,264.4);
//
- TGeoMedium *m5 = gGeoManager->GetMedium("TPC_Ne-CO2-N-1");
+ TGeoMedium *m5 = gGeoManager->GetMedium("TPC_Ne-CO2-1");
TGeoVolume *v9 = new TGeoVolume("TPC_Drift",dvol,m5);
//
//
TGeoTube *cs = new TGeoTube(56.9,61.2,0.1);
TGeoMedium *sm7 = gGeoManager->GetMedium("TPC_Mylar");
TGeoVolume *csv = new TGeoVolume("TPC_CDRS",cs,sm7);
- v1->AddNode(csv,1,new TGeoTranslation(0.,0.,-71.));
- v1->AddNode(csv,2,new TGeoTranslation(0.,0.,71.));
+ v1->AddNode(csv,1,new TGeoTranslation(0.,0.,-71.2));
+ v1->AddNode(csv,2,new TGeoTranslation(0.,0.,71.2));
//
// seal collars
TGeoPcon *se = new TGeoPcon(0.,360.,6);
v1->AddNode(swheel,2,new TGeoTranslation(0.,0.,284.6));
// sensitive strips
- TGeoMedium *m8 = gGeoManager->GetMedium("TPC_Ne-CO2-N-2");
+ TGeoMedium *m8 = gGeoManager->GetMedium("TPC_Ne-CO2-2");
Int_t totrows;
totrows = fTPCParam->GetNRowLow() + fTPCParam->GetNRowUp();
Double_t *upar;
//----------------------------------------------------------
TGeoMedium *m6=gGeoManager->GetMedium("TPC_Makrolon");
TGeoMedium *m7=gGeoManager->GetMedium("TPC_Cu");
+ TGeoMedium *m10 = gGeoManager->GetMedium("TPC_Alumina");
+ TGeoMedium *m11 = gGeoManager->GetMedium("TPC_Peek");
+ TGeoMedium *m12 = gGeoManager->GetMedium("TPC_Water");
// upper and lower rods differ in length!
delete [] upar;
upar=NULL;
TGeoVolume *hvrv = new TGeoVolume("TPC_HV_Rod",hvr,m6);
TGeoVolume *hvcv = new TGeoVolume("TPC_HV_Cable",hvc,m7);
hvrv->AddNode(hvcv,1);
-
+ //
+ // resistor rods
+ //
+ TGeoTube *cri = new TGeoTube(0.,0.45,126.64); //inner
+ TGeoTube *cro = new TGeoTube(0.,0.45,126.54); //outer
+ TGeoTube *cwi = new TGeoTube(0.,0.15,126.64); // water inner
+ TGeoTube *cwo = new TGeoTube(0.,0.15,126.54); // water outer
+ //
+ TGeoVolume *criv = new TGeoVolume("TPC_CR_I",cri,m10);
+ TGeoVolume *crov = new TGeoVolume("TPC_CR_O",cro,m10);
+ TGeoVolume *cwiv = new TGeoVolume("TPC_W_I",cwi,m11);
+ TGeoVolume *cwov = new TGeoVolume("TPC_W_O",cwo,m11);
+ //
+ // ceramic rod with water
+ //
+ criv->AddNode(cwiv,1);
+ crov->AddNode(cwov,1);
+ //
+ TGeoTube *pri =new TGeoTube(0.2,0.35,126.64); //inner
+ TGeoTube *pro = new TGeoTube(0.2,0.35,126.54); //outer
+ //
+ // peek rod
+ //
+ TGeoVolume *priv = new TGeoVolume("TPC_PR_I",pri,m12);
+ TGeoVolume *prov = new TGeoVolume("TPC_PR_O",pro,m12);
+ //
+ // resistor rods assembly
+ //
+ TGeoRotation *rotr = new TGeoRotation("rotr");
+ rotr->RotateZ(-21.);
+ //
+ TGeoTube *rri = new TGeoTube(1.8,2.2,126.64);//inner
+ TGeoTube *rro = new TGeoTube(1.8,2.2,126.54);//inner
+ //
+ TGeoVolume *rriv = new TGeoVolume("TPC_RR_I",rri,m6);
+ TGeoVolume *rrov = new TGeoVolume("TPC_RR_O",rro,m6);
+ //
+ //
+ TGeoVolumeAssembly *rrin = new TGeoVolumeAssembly("TPC_RROD_I");
+ TGeoVolumeAssembly *rrou = new TGeoVolumeAssembly("TPC_RROD_O");
+ rrin->AddNode(rriv,1);
+ rrin->AddNode(criv,1,new TGeoTranslation(0.5,0.866, 0.));
+ rrin->AddNode(criv,2,new TGeoTranslation(0.5,-0.866, 0.));
+ rrin->AddNode(priv,1);
+ //
+ rrou->AddNode(rrov,1);
+ rrou->AddNode(crov,1,new TGeoTranslation(0.5,0.866, 0.));
+ rrou->AddNode(crov,2,new TGeoTranslation(0.5,-0.866, 0.));
+ rrou->AddNode(prov,1);
for(Int_t i=0;i<18;i++){
Double_t angle,x,y;
Double_t z,r;
y=r * TMath::Sin(angle);
upar[2]=126.64; //lower
z= 126.96;
- if(i==15){
- v9->AddNode(hvrv,1,new TGeoTranslation(x,y,z));
- v9->AddNode(hvrv,2,new TGeoTranslation(x,y,-z));
- }
- else{
- gGeoManager->Node("TPC_Rod",i+1,"TPC_Drift",x,y,z,0,kTRUE,upar,3);//shaft
- gGeoManager->Node("TPC_Rod",i+18,"TPC_Drift",x,y,-z,0,kTRUE,upar,3);//muon
+ if(i==3){
+ v9->AddNode(rrin,1,new TGeoCombiTrans(x,y,z,rotr)); //A
+ v9->AddNode(rrin,2,new TGeoCombiTrans(x,y,-z,rotr)); //C
+ }
+ else {
+ gGeoManager->Node("TPC_Rod",i+1,"TPC_Drift",x,y,z,0,kTRUE,upar,3);//shaft
+ gGeoManager->Node("TPC_Rod",i+19,"TPC_Drift",x,y,-z,0,kTRUE,upar,3);//muon
}
+
+ //
r=254.25;
x=r * TMath::Cos(angle);
y=r * TMath::Sin(angle);
upar[2]=126.54; //upper
z=127.06;
+ //
+ if(i==15){
+ //v9->AddNode(hvrv,1,new TGeoTranslation(x,y,z));//A-side only
+ v9->AddNode(hvrv,1,new TGeoTranslation(x,y,127.14));//A-side only
+ gGeoManager->Node("TPC_Rod",i+55,"TPC_Drift",x,y,-z,0,kTRUE,upar,3);
+ }
+ else if(i==11){
+ v9->AddNode(rrou,1,new TGeoCombiTrans(x,y,z,rotr)); //A
+ v9->AddNode(rrou,2,new TGeoCombiTrans(x,y,-z,rotr)); //C
+ }
+ else{
+ //
+ gGeoManager->Node("TPC_Rod",i+37,"TPC_Drift",x,y,z,0,kTRUE,upar,3);
+ gGeoManager->Node("TPC_Rod",i+55,"TPC_Drift",x,y,-z,0,kTRUE,upar,3);
+ }
gGeoManager->Node("TPC_Rod",i+36,"TPC_Drift",x,y,z,0,kTRUE,upar,3);
gGeoManager->Node("TPC_Rod",i+54,"TPC_Drift",x,y,-z,0,kTRUE,upar,3);
}
} // end of function
-//_____________________________________________________________________________
-void AliTPCv1::DrawDetector()
-{
- //
- // Draw a shaded view of the Time Projection Chamber version 1
- //
-
- // Set everything unseen
- gMC->Gsatt("*", "seen", -1);
- //
- // Set ALIC mother transparent
- gMC->Gsatt("ALIC","SEEN",0);
- //
- // Set the volumes visible
- gMC->Gsatt("TPC ","SEEN",0);
- gMC->Gsatt("TOIN","SEEN",1);
- gMC->Gsatt("TOIN","COLO",7);
- gMC->Gsatt("TOCV","SEEN",1);
- gMC->Gsatt("TOCV","COLO",4);
- gMC->Gsatt("TSA1","SEEN",0);
- gMC->Gsatt("TSA2","SEEN",0);
- gMC->Gsatt("TSA3","SEEN",0);
- gMC->Gsatt("TSA4","SEEN",0);
- gMC->Gsatt("TSA5","SEEN",0);
- gMC->Gsatt("TOFC","SEEN",1);
- gMC->Gsatt("TOFC","COLO",4);
- gMC->Gsatt("TSA6","SEEN",0);
- gMC->Gsatt("TSA7","SEEN",0);
- gMC->Gsatt("TSA8","SEEN",0);
- gMC->Gsatt("TIIN","SEEN",1);
- gMC->Gsatt("TIIN","COLO",7);
- gMC->Gsatt("TII1","SEEN",0);
- gMC->Gsatt("TIFC","SEEN",1);
- gMC->Gsatt("TIFC","COLO",4);
- gMC->Gsatt("TSA9","SEEN",0);
- gMC->Gsatt("TS10","SEEN",0);
- gMC->Gsatt("TS11","SEEN",0);
- gMC->Gsatt("TS12","SEEN",0);
- gMC->Gsatt("TS13","SEEN",0);
- gMC->Gsatt("TS14","SEEN",0);
- gMC->Gsatt("TICC","SEEN",0);
- gMC->Gsatt("TICM","SEEN",0);
- gMC->Gsatt("TS15","SEEN",0);
- gMC->Gsatt("TS16","SEEN",0);
- gMC->Gsatt("TS17","SEEN",0);
- gMC->Gsatt("TS18","SEEN",0);
- gMC->Gsatt("TS19","SEEN",0);
- gMC->Gsatt("TPJ1","SEEN",0);
- gMC->Gsatt("TPJ2","SEEN",0);
- gMC->Gsatt("TICS","SEEN",0);
- gMC->Gsatt("TDGN","SEEN",0);
- gMC->Gsatt("TIRC","SEEN",0);
- gMC->Gsatt("TIC1","SEEN",1);
- gMC->Gsatt("TIPP","SEEN",0);
- gMC->Gsatt("TIC3","SEEN",0);
- gMC->Gsatt("TRCE","SEEN",0);
- gMC->Gsatt("TPSC","SEEN",0);
- gMC->Gsatt("TPCC","SEEN",0);
- gMC->Gsatt("TORC","SEEN",0);
- gMC->Gsatt("TOPP","SEEN",0);
- gMC->Gsatt("TOC3","SEEN",0);
- gMC->Gsatt("TOC1","SEEN",1);
- gMC->Gsatt("TSSW","SEEN",1);
- gMC->Gsatt("TSWC","SEEN",1);
- gMC->Gsatt("TSSW","COLO",3);
- gMC->Gsatt("TSWC","COLO",3);
- gMC->Gsatt("TSCE","COLO",6);
- gMC->Gsatt("TSCE","SEEN",1);
- gMC->Gsatt("TWES","SEEN",0);
- gMC->Gsatt("TSWB","SEEN",0);
- gMC->Gsatt("TPEL","SEEN",0);
- gMC->Gsatt("TPMW","SEEN",1);
- gMC->Gsatt("TESR","SEEN",1);
- gMC->Gsatt("TPMW","COLO",12);
- gMC->Gsatt("TIC1","COLO",5);
- gMC->Gsatt("TOC1","COLO",5);
- gMC->Gsatt("TESB","SEEN",0);
- gMC->Gsatt("THVM","SEEN",1);
- gMC->Gsatt("THVM","COLO",11);
- gMC->Gsatt("THVH","SEEN",0);
- gMC->Gsatt("TPSR","SEEN",0);
- gMC->Gsatt("THVL","SEEN",0);
- gMC->Gsatt("THVC","SEEN",0);
- gMC->Gsatt("THVE","SEEN",0);
- gMC->Gsatt("THVR","SEEN",0);
- gMC->Gsatt("TPSS","SEEN",0);
- gMC->Gsatt("TPUS","SEEN",0);
- gMC->Gsatt("TPLS","SEEN",0);
-
- //
- gMC->Gdopt("hide", "on");
- gMC->Gdopt("shad", "on");
- gMC->Gsatt("*", "fill", 7);
- gMC->SetClipBox(".");
- gMC->SetClipBox("TPMW",-300,300,-300,300,254.,270.);
- gMC->SetClipBox("TESR",-300,300,-300,300,254.,270.);
- gMC->SetClipBox("TSSW",-300,300,-300,300,283.,284.);
- gMC->SetClipBox("TSWC",-300,300,-300,300,283.,284.);
- gMC->SetClipBox("*", 0, 300, -300, 300, -290, 290);
- gMC->DefaultRange();
- gMC->Gdraw("alic", 40, 30, 0, 12, 9.5, .025, .025);
- gMC->Gdhead(1111, "Time Projection Chamber");
- gMC->Gdman(18, 4, "MAN");
- gMC->Gdopt("hide","off");
-}
//_____________________________________________________________________________
void AliTPCv1::CreateMaterials()
git://git.uio.no / u / mrichter / AliRoot.git / blobdiff