Render in 3d with Haskell