A simple and somewhat inefficient Markov Chain text generator in Haskell.