A 2D maze generator with OpenGL display in Haskell