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