16 gROOT->LoadMacro(
"$VMCWORKDIR/gconfig/basiclibs.C");
19 gSystem->Load(
"libGeoBase");
20 gSystem->Load(
"libParBase");
21 gSystem->Load(
"libBase");
22 gSystem->Load(
"libField");
23 gSystem->Load(
"libGen");
24 gSystem->Load(
"libPassive");
25 gSystem->Load(
"libPndData");
30 gSystem->Load(
"libMvd");
33 gSystem->Load(
"libGeom.so");
35 TFile*
file =
new TFile(
"../../../geometry/MVD_20a.root");
37 TGeoManager *
geoMan = (TGeoManager*) file->Get(
"CADtoROOT");
49 TGeoVolume*
topvol = geoMan->GetMasterVolume();
53 epandnode(topvol->GetNode());
54 topvol->Export(
"../../../geometry/MVD_20a_vol.root",
"TOP",
"recreate");
56 std::cout<<
"------------------------------"<<std::endl;
57 std::cout<<
"------------------------------"<<std::endl;
58 std::cout<<
"------------------------------"<<std::endl;
66 TGeoVolume *
v1=fN->GetVolume();
67 TObjArray *NodeList=v1->GetNodes();
68 for (Int_t Nod=0; Nod<NodeList->GetEntriesFast();Nod++) {
69 TGeoNode *fNode =(TGeoNode *)NodeList->At(Nod);
70 if(fNode->GetNdaughters()>0)
expandnode(fNode);
71 TGeoVolume *
v= fNode->GetVolume();
72 TGeoMedium* med1=v->GetMedium();
74 std::cout<<
" -W- WARNING in PndMvdDetector::ExpandNode()! "
75 <<
"\tThe volume "<<v->GetName()<<
"in\n"
76 <<
"\nHas no medium information. It is forced now to LEAD"
int expandnode(TGeoNode *fN)