sig
val foldn : f:('a -> int -> 'a) -> init:'a -> int -> 'a
val sum_int : int Std_internal.List.t -> int
val ( ==> ) : bool -> bool -> bool
type 'a gen = unit -> 'a
val fg : unit -> float
val pfg : unit -> float
val nng : unit -> int
val uig : unit -> int
val lg : (unit -> 'a) -> ?size_gen:(unit -> int) -> unit -> 'a list
val pg : (unit -> 'a) -> (unit -> 'b) -> unit -> 'a * 'b
val tg :
(unit -> 'a) -> (unit -> 'b) -> (unit -> 'c) -> unit -> 'a * 'b * 'c
val cg : unit -> char
val sg :
?char_gen:(unit -> char) -> ?size_gen:(unit -> int) -> unit -> string
val oneofl : 'a Std_internal.List.container -> unit -> 'a
val oneof : 'a Std_internal.List.container -> 'a
val always : 'a -> unit -> 'a
val frequency : (int * 'a) list -> 'a
val frequencyl : (int * 'a) list -> unit -> 'a
val laws : int -> (unit -> 'a) -> ('a -> bool) -> 'a option
val laws_exn : string -> int -> (unit -> 'a) -> ('a -> bool) -> unit
val statistic_number : 'a list -> (int * 'a) list
val statistic : 'a list -> (int * 'a) list
val laws2 :
int -> ('a -> bool * 'b) -> (unit -> 'a) -> 'a option * (int * 'b) list
end