proposition: Lemma convA p q X Y Z : conv p X (conv q Y Z) = conv [s_of p, q] (conv [r_of p, q] X Y) Z.
proof: Proof. by apply necset_ext; rewrite !convE convA_set. Qed.
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