Haskell implementation of the Dissent accountable group anonymity protocol