Implementation of a Bitcoin hierarchical deterministric wallet (BIP32) in Haskell