Up

module Random

: sig

#

val init : int -> unit

#

val full_init : int array -> unit

#

val self_init : unit -> unit

#

val bits : unit -> int

#

val int : int -> int

#

val int32 : Int32.t -> Int32.t

#

val nativeint : Nativeint.t -> Nativeint.t

#

val int64 : Int64.t -> Int64.t

#

val float : float -> float

#

val bool : unit -> bool

#

module State : sig

#

type t

#

val make : int array -> t

#

val make_self_init : unit -> t

#

val copy : t -> t

#

val bits : t -> int

#

val int : t -> int -> int

#

val int32 : t -> Int32.t -> Int32.t

#

val nativeint : t -> Nativeint.t -> Nativeint.t

#

val int64 : t -> Int64.t -> Int64.t

#

val float : t -> float -> float

#

val bool : t -> bool

end

#

val get_state : unit -> State.t

#

val set_state : State.t -> unit

end