import Graphics.UI.GLUT
import Graphics.Rendering.OpenGL

import PointsForRendering
main = renderInWindow display

display = do 
  clear [ColorBuffer]
  scale 0.3 0.9 (0.3::GLfloat)
  translate$Vector3 (-0.3) 0.3 (0::GLfloat)
  rotate 30 $Vector3 0 1 (0::GLfloat)
  renderObject Solid$ Teapot 0.6
  loadIdentity
  flush