{-# LANGUAGE
    UnicodeSyntax
  #-}
-- | FIXME
module Codec.Audio.WavPack.Entropy
    ( EntropyData(..)
    )
    where
import Data.Word

-- | FIXME
data EntropyData
    = EntropyData {
        -- | Median log2 values for a channel.
        edMedian     ∷ !(Word32, Word32, Word32)
        -- | FIXME
      , edSlowLevel  ∷ !Word32
        -- | FIXME
      , edErrorLimit ∷ !Word32
      }
    deriving (Eq, Show)