fact: Definition Necset_to_semiCompSemiLattConvType (A : convType) := fun phT : phant (Choice.sort A) => [the semiCompSemiLattConvType of necset A].
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