module FloatSource: sig end
sig end
type t
val genrand : unit -> t
unit -> t
val min : t
t
val max : t