sig
  module Random :
    sig
      val rnd_state : Random.State.t
      val float : float -> float
      val int : int -> int
      val bits : unit -> int
    end
  val foldn : f:('-> int -> 'a) -> init:'-> int -> 'a
  val sum_int : int Std_internal.List.t -> int
  val fg : unit -> float
  val pfg : unit -> float
  val nng : unit -> int
  val png : unit -> int
  val uig : unit -> int
  val lg : (unit -> 'a) -> ?size:(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:(unit -> char) -> ?size:(unit -> int) -> unit -> string
  val oneof : 'Std_internal.List.container -> 'a
  val always : '-> unit -> 'a
  val frequency : (int * 'a) list -> 'a
  val frequencyg : (int * 'a) list -> unit -> 'a
  val repeat : int -> ('-> 'b) -> (unit -> 'a) -> unit
end