alice-data/gentle_geo_trd.root
[u/mrichter/AliRoot.git] / EVE / test-macros / geom_extr_trd.C
1 // $Id: geom_trd_tof.C 23442 2008-01-21 16:02:24Z mtadel $
2 // Main authors: Matevz Tadel & Alja Mrak-Tadel: 2006, 2007
3
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  **************************************************************************/
9
10 void geom_extr_trd()
11 {
12   // Extract reasonably top-level mother-volumes of TRD and
13   // store them as geo-shape-extract.
14
15   gGeoManager = gEve->GetGeometry("$REVESYS/alice-data/alice_fullgeo.root");
16
17   TGeoNode* tnode = gGeoManager->GetTopVolume()->FindNode("B077_1");
18
19   TEveGeoTopNode* eve_tnode = new TEveGeoTopNode(gGeoManager, tnode);
20
21
22   for (Int_t i = 0; i < 18; ++i)
23   {
24     TGeoNode    * node1 = tnode->GetVolume()->FindNode(Form("BSEGMO%d_1", i));
25     printf("%2d - node1 = %p\n", i, node1);
26     TEveGeoNode * eve_node1 = new TEveGeoNode(node1);
27     eve_tnode->AddElement(eve_node1);
28
29     TGeoNode    * node2 = node1->GetVolume()->FindNode(Form("BTRD%d_1", i));
30     printf("%2d - node2 = %p\n", i, node2);
31     TEveGeoNode * eve_node2 = new TEveGeoNode(node2);
32     eve_node1->AddElement(eve_node2);
33   }
34
35   eve_tnode->Save("gentle_geo_trd.root", "Gentle TRD");
36
37 }