proposition: Lemma euler_small1 n p: n <= p -> 'Eu(n,p) = 0.
proof: Proof. by move /subnKC => <-; rewrite euler_small. Qed.
imports: mathcomp(ssreflect ssrfun ssrbool eqtype) mathcomp(ssrnat seq path div) mathcomp(fintype tuple finfun bigop finset binomial)