Module type Sigs.SampleDist

type 'a t
val sample : 'a t -> 'a
val sampler : 'a t -> unit -> 'a