proposition: Lemma enum_set1 a : enum [set a] = [:: a].
proof: Proof. by rewrite set1.unlock (eq_enum (in_set _)) enum1. Qed.
imports: HB(structures) mathcomp(ssreflect ssrbool ssrfun eqtype ssrnat div seq) mathcomp(choice fintype finfun bigop)