secret-sharing 1.0.0.0 → 1.0.0.1
raw patch · 1 files changed
+3/−3 lines, 1 files
Files
- secret-sharing.cabal +3/−3
secret-sharing.cabal view
@@ -1,5 +1,5 @@ name: secret-sharing-version: 1.0.0.0+version: 1.0.0.1 synopsis: Information-theoretic secure secret sharing description: Implementation of an (@m@,@n@)-threshold secret sharing scheme.@@ -13,9 +13,9 @@ at least m=3 shares are necessary to reconstruct the secret. . >> :m + Data.ByteString.Lazy.Char8 Crypto.SecretSharing- >> let secret = pack "my secret data"+ >> let secret = pack "my secret message!" >> shares <- encode 3 5 secret- >> mapM_ (Prelude.putStrLn . show) shares+ >> mapM_ (Prelude.putStrLn . show) shares -- each share should be deposited at a different site. > (1,"\134\168\154\SUBV\248\CAN:\250y<\GS\EOT*\t\222_\140") > (2,"\225\206\241\136\SUBse\199r\169\162\131D4\179P\210x") > (3,"~\238%\192\174\206\\\f\214\173\162\148\&3\139_\183\193\235")