sig
  type t
  val make : int array -> Random.State.t
  val make_self_init : unit -> Random.State.t
  val copy : Random.State.t -> Random.State.t
  val bits : Random.State.t -> int
  val int : Random.State.t -> int -> int
  val int32 : Random.State.t -> Int32.t -> Int32.t
  val nativeint : Random.State.t -> Nativeint.t -> Nativeint.t
  val int64 : Random.State.t -> Int64.t -> Int64.t
  val float : Random.State.t -> float -> float
  val bool : Random.State.t -> bool
end