Haskell implementation of the BitTorrent DHT