ANUPlot hides the pain of drawing simple 2D graphics in Haskell behind a nice data structure and a couple of display functions. The library uses the GHC OpenGL binding, but you don't have to. No IORefs required in user code! 6 coats of gloss!