bip32

commit 98bca261fee9627991a5c6ed923b07d27c7a7639
parent 45c57deb7c25fb952a0ee9bf1f63fdb6d1f49058
Author: Jared Tobin <jared@jtobin.io>
Date:   Sat, 22 Feb 2025 14:56:10 +0400

meta: remove qualifiers

Diffstat:
M
README.md
 | 
15
+++++++--------

1 file changed, 7 insertions(+), 8 deletions(-)
diff --git a/README.md b/README.md
@@ -12,28 +12,27 @@ A sample GHCi session:
 ```
   > :set -XOverloadedStrings
   >
-  > -- import qualified
-  > import qualified Crypto.HDKey.BIP32 as BIP32
+  > import Crypto.HDKey.BIP32
   >
   > -- derive a master node from a master seed
-  > let Just m = BIP32.master "plenty of entropy"
+  > let Just m = master "plenty of entropy"
   >
   > -- use 'xpub', 'xprv', etc. to serialize
-  > BIP32.xpub m
+  > xpub m
   "xpub661MyMwAqRbcG6TPJvVs1yKFJGtN4vi785g2xDacQ9Luyw3gyAyvY5DNatPzfsUQK4nTUAmQboxw3WYDHtY4vfcGJR4FAuLLaUp2t7ejhoC"
   >
   > -- derive child nodes via a path
-  > let child = BIP32.derive_partial m "m/44'/0'/0'/0/0"
-  > BIP32.xpub child
+  > let child = derive_partial m "m/44'/0'/0'/0/0"
+  > xpub child
   "xpub6GEwJiJFou5PH6LL8cagArvArrXhSaq35XWnT73CShNRBJa9jxHsWnPsydvmN2vcPBg9KHfRyYLiYnUKCJ8ncba4CgzF56n4kpkqMTSFy35"
   >
   > -- use the 'hd_key' record to extract the extended key
-  > let Right (BIP32.XPrv (BIP32.X sec cod)) = BIP32.hd_key child
+  > let Right (XPrv (X sec cod)) = hd_key child
   > sec
   82064013501759548583899633460204676801585795402966146917762774758050650403971
   >
   > -- use 'parse' to import an extended key
-  > let Just hd = BIP32.parse (BIP32.xprv child)
+  > let Just hd = parse (xprv child)
   > hd == child
   True
 ```