Make.2-Field
type t
val to_bits : t -> Bool.t list
val finalize_discarded : Bool.t list -> unit
val high_entropy_bits : int