{
  gSystem->Load("libGeom");
  TGeoManager *geom = new TGeoManager("simple1", "Simple geometry");
  TGeoMaterial *mat1 = new TGeoMaterial("Vacuum", 0,0,0);
  TGeoMedium *med1 = new TGeoMedium("V", 0, mat1);
  TGeoMaterial *mat = new TGeoMaterial("Al", 26.98,13,2.7);
  TGeoMedium *med = new TGeoMedium("A", 1, mat);
  TGeoVolume *top = geom->MakeBox("TOP", med1, 2500, 2500, 2500);
  geom->SetTopVolume(top);
  top->SetVisibility(kFALSE);
  TGeoTubeSeg *tseg = new TGeoTubeSeg( "tseg", 2100, 2200, 100, 200, 265 );
  TGeoTubeSeg *tseg1 = new TGeoTubeSeg( "tseg1", 2100, 2200, 100, 0, 180 );
  TGeoVolume *supp_1 = new TGeoVolume( "Supp_1", tseg, med );
  supp_1->SetLineColor( kRed );
  TGeoVolume *supp_2 = new TGeoVolume( "Supp_2", tseg1, med ); 
  supp_2->SetLineColor( kBlue );
  TGeoRotation *trot = new TGeoRotation( "trot", 0, 0, 0 );
  TGeoGenTrans *tcombo = new TGeoGenTrans( 0, 0, 0, 5, 5, 1, trot );
  top->AddNode( supp_1, 1 );
  top->AddNode( supp_2, 1, tcombo );
  geom->CloseGeometry();
  geom->SetVisLevel(2);
  top->Draw();
  if( gPad )
    gPad->x3d();
}