Module Rfc1951.T

module Heap : sig ... end
val reverse_code : int -> int -> int
val generate_codes : tree_lengths:int array -> max_code:int -> bl_count:int array -> int array
val generate_lengths : tree_dads:int array -> tree_lengths:int array -> max_code:int -> max_length:int -> Heap.t -> bl_count:int array -> unit
type tree = {
lengths : int array;
max_code : int;
tree : Lookup.t;
}
val make : length:int -> ?max_length:int -> int array -> bl_count:int array -> tree
val scan : int array -> int -> bl_freqs:int array -> unit
val code : int -> Lookup.t -> int
val bits : int -> int -> int
val symbols : int -> int array -> int -> bl_symbols:int array -> bltree:tree -> int