Visualize the GEB MIU puzzle using Haskell and GraphViz