# File vtk/tk/vtkTkRenderWindowInteractor.rb, line 358
def vtkRenderWindowInteractorConeExample
??
  # create root window
  root = TkRoot.new

  # create vtkTkRenderWidget
  pane = Vtk::TkRenderWindowInteractor.new(root, 'width'=>300, 'height'=>300)
  pane.Initialize

  pane.AddObserver("ExitEvent", Proc.new{|o,e,q| exit })

  ren = Vtk::Renderer.new
  pane.GetRenderWindow.AddRenderer(ren)

  cone = Vtk::ConeSource.new
  cone.SetResolution(8)

  coneMapper = Vtk::PolyDataMapper.new
  coneMapper.SetInput(cone.GetOutput)

  coneActor = Vtk::Actor.new
  coneActor.SetMapper(coneMapper)

  ren.AddActor(coneActor)

  # pack the pane into the tk root
  pane.pack('fill'=>'both', 'expand'=>1)
  pane.Start

  # start the tk mainloop
  root.mainloop
end