Module `Ppl__.Common`

include Ppl.Helpers

Samples

val sample_mean : ?⁠n:int -> float Ppl.Dist.dist -> float
val sample_variance : ?⁠n:int -> float Ppl.Dist.dist -> float
val take_k_samples : int -> 'a Ppl.Dist.dist -> 'a array
val unduplicate : ('a * Ppl.Dist.prob) list -> ('a * Ppl.Dist.prob) list: Removes duplicates and sums the probabilities associated so that each value appears once

val flatten : (('a * Ppl.Dist.prob) list * Ppl.Dist.prob) list -> ('a * Ppl.Dist.prob) list
val normalise : ('a * Ppl.Dist.prob) list -> ('a * Ppl.Dist.prob) list
val weighted_dist : ?⁠n:int -> 'a Ppl.Dist.dist -> ('a, int) Core.Map.Poly.t

Printing

val print_exact_exn : (module Base.Stringable.S with type t = 'a) -> 'a Ppl.Dist.dist -> unit
val print_exact_bool : bool Ppl.Dist.dist -> unit
val print_exact_int : int Ppl.Dist.dist -> unit
val print_exact_float : float Ppl.Dist.dist -> unit

Others

val time : (unit -> 'a) -> 'a * float
val memo : ('a -> 'b) -> 'a -> 'b
val memo_no_poly : (module Base__.Hashtbl_intf.Key.S with type t = 'a) -> ('a -> 'b) -> 'a -> 'b

type 'a samples = ('a * Ppl.Dist.prob) list

val resample : ('a * Ppl.Dist.Prob.t) list -> ('a * Ppl.Dist.Prob.t) list Ppl.Dist.dist
val cartesian : 'a list -> 'b list -> ('a * 'b) list