A Haskell OpenGL/GLUT implementation of a Lorenz System