proposition: Lemma iota_lespec_sorted i n: sorted lespec (iota i n).
proof: Proof. by elim: n i => //; case => // n H i /=; rewrite eqxx /=; apply: H. Qed.
imports: mathcomp(ssreflect ssrfun ssrbool eqtype ssrnat) mathcomp(seq path fintype div bigop binomial) mathcomp(prime finset ssralg ssrnum ssrint)