every-bit-counts-0.1: A functional pearl on encoding and decoding using question-and-answer strategies

Huffman

Documentation

type Set a = [a]Source

type PQ a = [(Int, a)]Source

addItem :: Int -> a -> PQ a -> PQ aSource

updPQ :: Eq a => PQ a -> a -> PQ aSource

huff :: Eq a => PQ (Set a, Game a) -> Game aSource

huffGame :: Eq a => PQ a -> Game aSource

prodPQ :: PQ a -> PQ b -> PQ (a, b)Source