sig type t = float val genrand : unit -> Rand.RNGSource.t val min : Rand.RNGSource.t val max : Rand.RNGSource.t end