A Haskell implementation of Chaum's dining cryptographers protocol.