1 #include "TGeoManager.h"
8 gROOT->Macro(
"$VMCWORKDIR/gconfig/rootlogon.C");
11 gSystem->Load(
"libGeoBase");
12 gSystem->Load(
"libParBase");
13 gSystem->Load(
"libBase");
14 gSystem->Load(
"libPndData");
15 gSystem->Load(
"libPassive");
16 gSystem->Load(
"libHypGe");
18 TString outfile=
"../../../../geometry/hypGeGeoCableAbsorptionTest_";
19 outfile += FoilThickness_Ext;
21 cout << outfile << endl;
23 TFile*
fi =
new TFile(outfile,
"RECREATE");
25 FairGeoLoader*
geoLoad =
new FairGeoLoader(
"TGeo",
"FairGeoLoader");
26 FairGeoInterface *
geoFace = geoLoad->getGeoInterface();
27 geoFace->setMediaFile(
"../../../../geometry/media_pnd.geo");
31 FairGeoMedia *
Media = geoFace->getMedia();
32 FairGeoBuilder *
geobuild=geoLoad->getGeoBuilder();
34 FairGeoMedium *medGe = Media->getMedium(
"germanium");
35 Int_t nmedGe=geobuild->createMedium(medGe);
38 FairGeoMedium *medcap = Media->getMedium(
"HYPaluminium");
39 Int_t nmedcap=geobuild->createMedium(medcap);
41 FairGeoMedium *medkapton = Media->getMedium(
"kapton");
42 Int_t nmedcap=geobuild->createMedium(medkapton);
45 TGeoMedium *Ge =
gGeoManager->GetMedium(
"germanium");
47 TGeoMedium *Al =
gGeoManager->GetMedium(
"HYPaluminium");
49 TGeoMedium *Kapton =
gGeoManager->GetMedium(
"kapton")
51 TGeoManager *
geom = (TGeoManager*)gROOT->FindObject(
"FAIRGeom");
52 TGeoVolume *
top =
new TGeoVolumeAssembly(
"hpGe");
53 TGeoVolume *Realtop =
new TGeoVolumeAssembly(
"Realtop");
56 geom->SetTopVolume(top);
59 Double_t FoilThickness = FoilThickness_Ext;
60 TGeoVolume* Foil = geom->MakeBox(
"Foil",Kapton,10,10,FoilThickness/2);
62 Realtop->AddNode(Foil,1,
new TGeoTranslation(0,0,-60));
64 top->AddNode(Realtop,0);
65 geom->CloseGeometry();
66 cout <<
"# of Nodes: " << Realtop->CountNodes(10,1) << endl;
TGeoManager * gGeoManager
int hypGeCableAbsorptionTest(Double_t FoilThickness_Ext=2)
FairGeoBuilder * geobuild
FairGeoInterface * geoFace