sig
  val init32 : int32 -> unit
  val init : int -> unit
  val init_array32 : int32 array -> unit
  val init_array : int array -> unit
  val init_bigarray32 :
    (int32, Bigarray.int32_elt, 'a) Bigarray.Array1.t -> unit
  val init_genarray : ('-> int32) -> 'a array -> unit
  val init_from_file : string -> unit
  val init_from_channel : Pervasives.in_channel -> unit
  val init_from_descr : Unix.file_descr -> unit
  val urandom_found : unit -> bool
  val urandom_init : unit -> unit
  val self_init : unit -> unit
  val uint32 : unit -> int32
  val int32 : unit -> int32
  val uint64 : unit -> int64
  val int64 : unit -> int64
  val unativeint : unit -> nativeint
  val nativeint : unit -> nativeint
  val uint : unit -> int
  val int : unit -> int
  val real1 : unit -> float
  val real2 : unit -> float
  val real3 : unit -> float
  val res53 : unit -> float
  module IntSource :
    sig type t = int val genrand : unit -> t val min : t val max : t end
  module Int32Source :
    sig type t = int32 val genrand : unit -> t val min : t val max : t end
  module FloatSource :
    sig type t = float val genrand : unit -> t val min : t val max : t end
end