A game of picture chat implemented in Haskell