Haskell OpenGL dodging game