Crs
type t = unit -> bool
val ith_bit : string -> int -> bool
val digest_length_in_bits : int
module State : sig ... end
val create : seed:Stdlib.String.t -> t