- // Create the TRD geometry
- //
- // Author: Christoph Blume (C.Blume@gsi.de) 20/07/99
- //
- // The volumes:
- // TRD1-3 (Air) --- The TRD mother volumes for one sector.
- // To be placed into the spaceframe.
- //
- // UAFI(/M/O) (Al) --- The aluminum frame of the inner(/middle/outer) chambers (readout)
- // UCFI(/M/O) (C) --- The carbon frame of the inner(/middle/outer) chambers
- // (driftchamber + radiator)
- // UAII(/M/O) (Air) --- The inner part of the readout of the inner(/middle/outer) chambers
- // UFII(/M/O) (Air) --- The inner part of the chamner and radiator of the
- // inner(/middle/outer) chambers
- //
- // The material layers in one chamber:
- // UL01 (G10) --- The gas seal of the radiator
- // UL02 (CO2) --- The gas in the radiator
- // UL03 (PE) --- The foil stack
- // UL04 (Mylar) --- Entrance window to the driftvolume and HV-cathode
- // UL05 (Xe) --- The driftvolume
- // UL06 (Xe) --- The amplification region
- //
- // UL07 (Cu) --- The pad plane
- // UL08 (G10) --- The Nomex honeycomb support structure
- // UL09 (Cu) --- FEE and signal lines
- // UL10 (PE) --- The cooling devices
- // UL11 (Water) --- The cooling water
-
- const Int_t npar_cha = 3;
-
- Float_t par_dum[3];
- Float_t par_cha[npar_cha];
-
- Float_t xpos, ypos, zpos;
-
- // The aluminum frames - readout + electronics (Al)
- // The inner chambers
- gMC->Gsvolu("UAFI","BOX ",idtmed[1301-1],par_dum,0);
- // The middle chambers
- gMC->Gsvolu("UAFM","BOX ",idtmed[1301-1],par_dum,0);
- // The outer chambers
- gMC->Gsvolu("UAFO","BOX ",idtmed[1301-1],par_dum,0);
-
- // The inner part of the aluminum frames (Air)
- // The inner chambers
- gMC->Gsvolu("UAII","BOX ",idtmed[1302-1],par_dum,0);
- // The middle chambers
- gMC->Gsvolu("UAIM","BOX ",idtmed[1302-1],par_dum,0);
- // The outer chambers
- gMC->Gsvolu("UAIO","BOX ",idtmed[1302-1],par_dum,0);
-
- // The carbon frames - radiator + driftchamber (C)
- // The inner chambers
- gMC->Gsvolu("UCFI","BOX ",idtmed[1307-1],par_dum,0);
- // The middle chambers
- gMC->Gsvolu("UCFM","BOX ",idtmed[1307-1],par_dum,0);
- // The outer chambers
- gMC->Gsvolu("UCFO","BOX ",idtmed[1307-1],par_dum,0);
-
- // The inner part of the carbon frames (Air)
- // The inner chambers
- gMC->Gsvolu("UCII","BOX ",idtmed[1302-1],par_dum,0);
- // The middle chambers
- gMC->Gsvolu("UCIM","BOX ",idtmed[1302-1],par_dum,0);
- // The outer chambers
- gMC->Gsvolu("UCIO","BOX ",idtmed[1302-1],par_dum,0);
-
- // The material layers inside the chambers
- par_cha[0] = -1.;
- par_cha[1] = -1.;
- // G10 layer (radiator seal)
- par_cha[2] = kSeThick/2;
- gMC->Gsvolu("UL01","BOX ",idtmed[1313-1],par_cha,npar_cha);
- // CO2 layer (radiator)
- par_cha[2] = kRaThick/2;
- gMC->Gsvolu("UL02","BOX ",idtmed[1312-1],par_cha,npar_cha);
- // PE layer (radiator)
- par_cha[2] = kPeThick/2;
- gMC->Gsvolu("UL03","BOX ",idtmed[1303-1],par_cha,npar_cha);
- // Mylar layer (entrance window + HV cathode)
- par_cha[2] = kMyThick/2;
- gMC->Gsvolu("UL04","BOX ",idtmed[1308-1],par_cha,npar_cha);
- // Xe/Isobutane layer (drift volume, sensitive)
- par_cha[2] = kDrThick/2.;
- gMC->Gsvolu("UL05","BOX ",idtmed[1309-1],par_cha,npar_cha);
- // Xe/Isobutane layer (amplification volume, not sensitive)
- par_cha[2] = kAmThick/2.;
- gMC->Gsvolu("UL06","BOX ",idtmed[1309-1],par_cha,npar_cha);
-
- // Cu layer (pad plane)
- par_cha[2] = kCuThick/2;
- gMC->Gsvolu("UL07","BOX ",idtmed[1305-1],par_cha,npar_cha);
- // G10 layer (support structure)
- par_cha[2] = kSuThick/2;
- gMC->Gsvolu("UL08","BOX ",idtmed[1313-1],par_cha,npar_cha);
- // Cu layer (FEE + signal lines)
- par_cha[2] = kFeThick/2;
- gMC->Gsvolu("UL09","BOX ",idtmed[1305-1],par_cha,npar_cha);
- // PE layer (cooling devices)
- par_cha[2] = kCoThick/2;
- gMC->Gsvolu("UL10","BOX ",idtmed[1303-1],par_cha,npar_cha);
- // Water layer (cooling)
- par_cha[2] = kWaThick/2;
- gMC->Gsvolu("UL11","BOX ",idtmed[1314-1],par_cha,npar_cha);
-
- // Position the layers in the chambers
- xpos = 0;
- ypos = 0;
-
- // G10 layer (radiator seal)
- zpos = kSeZpos;
- gMC->Gspos("UL01",1,"UCII",xpos,ypos,zpos,0,"ONLY");
- gMC->Gspos("UL01",2,"UCIM",xpos,ypos,zpos,0,"ONLY");
- gMC->Gspos("UL01",3,"UCIO",xpos,ypos,zpos,0,"ONLY");
- // CO2 layer (radiator)
- zpos = kRaZpos;
- gMC->Gspos("UL02",1,"UCII",xpos,ypos,zpos,0,"ONLY");
- gMC->Gspos("UL02",2,"UCIM",xpos,ypos,zpos,0,"ONLY");
- gMC->Gspos("UL02",3,"UCIO",xpos,ypos,zpos,0,"ONLY");
- // PE layer (radiator)
- zpos = 0;
- gMC->Gspos("UL03",1,"UL02",xpos,ypos,zpos,0,"ONLY");
- // Mylar layer (entrance window + HV cathode)
- zpos = kMyZpos;
- gMC->Gspos("UL04",1,"UCII",xpos,ypos,zpos,0,"ONLY");
- gMC->Gspos("UL04",2,"UCIM",xpos,ypos,zpos,0,"ONLY");
- gMC->Gspos("UL04",3,"UCIO",xpos,ypos,zpos,0,"ONLY");
- // Xe/Isobutane layer (drift volume)
- zpos = kDrZpos;
- gMC->Gspos("UL05",1,"UCII",xpos,ypos,zpos,0,"ONLY");
- gMC->Gspos("UL05",2,"UCIM",xpos,ypos,zpos,0,"ONLY");
- gMC->Gspos("UL05",3,"UCIO",xpos,ypos,zpos,0,"ONLY");
- // Xe/Isobutane layer (amplification volume)
- zpos = kAmZpos;
- gMC->Gspos("UL06",1,"UCII",xpos,ypos,zpos,0,"ONLY");
- gMC->Gspos("UL06",2,"UCIM",xpos,ypos,zpos,0,"ONLY");
- gMC->Gspos("UL06",3,"UCIO",xpos,ypos,zpos,0,"ONLY");
-
- // Cu layer (pad plane)
- zpos = kCuZpos;
- gMC->Gspos("UL07",1,"UAII",xpos,ypos,zpos,0,"ONLY");
- gMC->Gspos("UL07",2,"UAIM",xpos,ypos,zpos,0,"ONLY");
- gMC->Gspos("UL07",3,"UAIO",xpos,ypos,zpos,0,"ONLY");
- // G10 layer (support structure)
- zpos = kSuZpos;
- gMC->Gspos("UL08",1,"UAII",xpos,ypos,zpos,0,"ONLY");
- gMC->Gspos("UL08",2,"UAIM",xpos,ypos,zpos,0,"ONLY");
- gMC->Gspos("UL08",3,"UAIO",xpos,ypos,zpos,0,"ONLY");
- // Cu layer (FEE + signal lines)
- zpos = kFeZpos;
- gMC->Gspos("UL09",1,"UAII",xpos,ypos,zpos,0,"ONLY");
- gMC->Gspos("UL09",2,"UAIM",xpos,ypos,zpos,0,"ONLY");
- gMC->Gspos("UL09",3,"UAIO",xpos,ypos,zpos,0,"ONLY");
- // PE layer (cooling devices)
- zpos = kCoZpos;
- gMC->Gspos("UL10",1,"UAII",xpos,ypos,zpos,0,"ONLY");
- gMC->Gspos("UL10",2,"UAIM",xpos,ypos,zpos,0,"ONLY");
- gMC->Gspos("UL10",3,"UAIO",xpos,ypos,zpos,0,"ONLY");
- // Water layer (cooling)
- zpos = kWaZpos;
- gMC->Gspos("UL11",1,"UAII",xpos,ypos,zpos,0,"ONLY");
- gMC->Gspos("UL11",1,"UAIM",xpos,ypos,zpos,0,"ONLY");
- gMC->Gspos("UL11",1,"UAIO",xpos,ypos,zpos,0,"ONLY");