Messing around with OpenGL in Haskell