proposition: Lemma swapXY_X : swapXY 'X = 'Y.
proof: Proof. by rewrite unlock map_polyX hornerX. Qed.
imports: HB(structures) mathcomp(ssreflect ssrfun ssrbool eqtype choice ssrnat seq) mathcomp(fintype tuple finfun bigop fingroup perm div) mathcomp(ssralg zmodp matrix mxalgebra) mathcomp(poly polydiv mxpoly binomial)