proposition: Lemma eq0_crealP (x : creal) : {asympt e : i / `|x i| < e} -> x == 0.
proof: Proof. by move=> hx; apply: eq_crealP; apply: asymptP hx=> e i; rewrite subr0. Qed.
imports: mathcomp.ssreflect.ssreflect mathcomp(ssrfun ssrbool eqtype ssrnat seq choice fintype) mathcomp(bigop order ssralg ssrnum ssrint rat poly polydiv polyorder) mathcomp(perm matrix mxpoly polyXY binomial bigenough)