geomAlice.C: script drawing a detector geometry (here ALICE)

//script drawing a detector geometry (here ALICE)
//by default the geometry is drawn using the GL viewer
//Using the TBrowser, you can select other components
//if the file containing the geometry is not found in the local
//directory, it is automatically read from the ROOT web site.
// Author: Rene Brun
      
void geomAlice()
{
   TGeoManager::Import("http://root.cern.ch/files/alice2.root");
   gGeoManager->DefaultColors();
//   gGeoManager->SetVisLevel(4);
   gGeoManager->GetVolume("HALL")->InvisibleAll();
   gGeoManager->GetVolume("ZDCC")->InvisibleAll();
   gGeoManager->GetVolume("ZDCA")->InvisibleAll();
   gGeoManager->GetVolume("L3MO")->InvisibleAll();
   gGeoManager->GetVolume("YOUT1")->InvisibleAll();
   gGeoManager->GetVolume("YOUT2")->InvisibleAll();
   gGeoManager->GetVolume("YSAA")->InvisibleAll();
   gGeoManager->GetVolume("RB24")->InvisibleAll();
   gGeoManager->GetVolume("RB26Pipe")->InvisibleAll();
   gGeoManager->GetVolume("DDIP")->InvisibleAll();
   gGeoManager->GetVolume("DCM0")->InvisibleAll();
//   gGeoManager->GetVolume("PPRD")->InvisibleAll();
   gGeoManager->GetVolume("BRS1")->InvisibleAll();
   gGeoManager->GetVolume("BRS4")->InvisibleAll();
//   gGeoManager->GetVolume("Dipole")->InvisibleAll();
   gGeoManager->GetVolume("ZN1")->InvisibleAll();
   gGeoManager->GetVolume("Q13T")->InvisibleAll();
   gGeoManager->GetVolume("ZP1")->InvisibleAll();
   gGeoManager->GetVolume("QTD1")->InvisibleAll();
   gGeoManager->GetVolume("QTD2")->InvisibleAll();
   gGeoManager->GetVolume("QBS7")->InvisibleAll();
   gGeoManager->GetVolume("QA07")->InvisibleAll();
   gGeoManager->GetVolume("MD1V")->InvisibleAll();
   gGeoManager->GetVolume("QTD3")->InvisibleAll();
   gGeoManager->GetVolume("QTD4")->InvisibleAll();
   gGeoManager->GetVolume("QTD5")->InvisibleAll();
   gGeoManager->GetVolume("QBS3")->InvisibleAll();
   gGeoManager->GetVolume("QBS4")->InvisibleAll();
   gGeoManager->GetVolume("QBS5")->InvisibleAll();
   gGeoManager->GetVolume("QBS6")->InvisibleAll();
   
   gGeoManager->GetVolume("ALIC")->Draw("ogl");
   new TBrowser;
}