Source.state -> object method genrand : Rand.FDIST.t method max : Rand.FDIST.t method min : Rand.FDIST.t end