2 // Main authors: Matevz Tadel & Alja Mrak-Tadel: 2006, 2007
4 /**************************************************************************
5 * Copyright(c) 1998-2008, ALICE Experiment at CERN, all rights reserved. *
6 * See http://aliceinfo.cern.ch/Offline/AliRoot/License.html for *
7 * full copyright notice. *
8 **************************************************************************/
10 TEveGeoShape* geom_gentle_trd()
12 TFile f("$ALICE_ROOT/EVE/alice-data/gentle_geo_trd.root");
13 TEveGeoShapeExtract* gse = (TEveGeoShapeExtract*) f.Get("Gentle TRD");
14 TEveGeoShape* gsre = TEveGeoShape::ImportShapeExtract(gse);
15 gEve->AddGlobalElement(gsre);
18 // Fix visibility, color and transparency
19 gsre->SetRnrSelf(kFALSE);
20 for (TEveElement::List_i i = gsre->BeginChildren(); i != gsre->EndChildren(); ++i)
22 TEveGeoShape* lvl1 = (TEveGeoShape*) *i;
23 lvl1->SetRnrSelf(kFALSE);
24 for (TEveElement::List_i j = lvl1->BeginChildren(); j != lvl1->EndChildren(); ++j)
26 TEveGeoShape* lvl2 = (TEveGeoShape*) *j;
27 lvl2->SetRnrSelf(kTRUE);
28 lvl2->SetMainColor(3);
29 lvl2->SetMainTransparency(80);