fact: Definition conv_pt_set (p : {prob R}) (x : L) (Y : set L) := locked (fun y => x <| p |> y) @` Y.
imports: HB(structures) Reals mathcomp(all_ssreflect ssralg ssrnum) mathcomp(mathcomp_extra boolp classical_sets Rstruct reals) mathcomp(finmap) Reals_ext realType_ext classical_sets_ext ssrR fdist fsdist convex