fact: Definition diff_roots (x y : R) := (x * y == y * x) && (y - x \in GRing.unit).
imports: HB(structures) mathcomp(ssreflect ssrbool ssrfun eqtype ssrnat seq choice) mathcomp(fintype bigop finset tuple) mathcomp(div ssralg countalg binomial)