A simple OpenGL/GLUT based ray tracer written in Haskell