sparse-merkle-trees-0.2.0.0: src/Crypto/Hash/CompactSparseMerkleTree/DataNode.hs

module Crypto.Hash.CompactSparseMerkleTree.DataNode where
import Crypto.Hash (Digest)

data DataNode alg a
  = ExternalNode
      { digest :: Digest alg,
        value :: a
      }
  | InternalNode
      { digest :: Digest alg,
        maxDigest :: Digest alg
      }
  deriving (Show)