A bittorrent client written in Haskell