1 ////////////////////////////////////////////////
3 ////////////////////////////////////////////////
17 //_____________________________________________________________________________
18 AliPIPEv0::AliPIPEv0() : AliPIPE()
22 //_____________________________________________________________________________
23 AliPIPEv0::AliPIPEv0(const char *name, const char *title)
29 //___________________________________________
30 void AliPIPEv0::CreateGeometry()
32 printf("Create PIPEv0 geometry\n ");
35 <img src="gif/pipe.gif">
42 <img src="gif/tree_pipe.gif">
46 const char *pipename = "$(ALICE_ROOT)/Euclid/bpipeb.euc";
47 const char *pumpname = "$(ALICE_ROOT)/Euclid/bpumpa.euc";
50 printf("Create PIPEv0 geometry ");
54 AliMC* pMC = AliMC::GetMC();
57 // The peam pipe up to the Front Absorber
58 filtmp=gSystem->ExpandPathName(pipename);
59 FILE *file = fopen(filtmp,"r");
63 printf(" Reading PIPE \n");
64 gAlice->ReadEuclid(pipename,20,topvol);
66 printf(" THE GEOM FILE %s DOES NOT EXIST !\n",pipename);
71 filtmp=gSystem->ExpandPathName(pumpname);
72 file = fopen(filtmp,"r");
76 printf(" Reading PUMP \n");
77 gAlice->ReadEuclid(pumpname,20,topvol);
79 printf(" THE GEOM FILE %s DOES NOT EXIST !\n",pumpname);
83 // --- Place the PIPE ghost volume (QBPM) in its mother volume (ALIC)
84 // and make it invisible
86 AliMatrix(idrotm[2001],90.,0.,90.,90.,180.,0.);
88 pMC->Gspos("QBPM",1,"ALIC",0,0,0,idrotm[2001],"ONLY");
90 // PLACE ION PUMP (QIPM) AT Z=-385.
92 pMC->Gspos("QIPM",1,"ALIC",0,0,-385,idrotm[2001],"ONLY");
94 pMC->Gsatt("QIPM", "SEEN", 0);
95 pMC->Gsatt("QBPM", "SEEN", 0);
96 pMC->Gsatt("QB20", "SEEN", 0);
100 //___________________________________________
101 void AliPIPEv0::DrawDetector()
105 //___________________________________________
106 void AliPIPEv0::CreateMaterials()
108 printf("Create PIPEv0 materials\n");
109 const char *name = "$(ALICE_ROOT)/Euclid/pipe.tme";
111 filtmp=gSystem->ExpandPathName(name);
112 FILE *file = fopen(filtmp,"r");
116 gAlice->ReadEuclidMedia(name,20);
118 printf(" THE MEDIA FILE %s DOES NOT EXIST !\n",name);