proposition: Lemma subset_cover1 : x \subset cover [set x].
proof: Proof. apply/subsetP => i Hi. by rewrite /cover big_set1. Qed.
imports: mathcomp(all_ssreflect ssralg fingroup zmodp poly ssrnum) mathcomp(matrix perm) ssr_ext ssralg_ext fdist