fact: Definition Mobius' (R : ringType) (p : {poly R}) (a b : R) : {poly R} := reciprocal_pol ((p \shift a) \scale (b - a)) \shift 1.
imports: mathcomp(all_ssreflect) mathcomp(ssralg poly polydiv polyorder ssrnum zmodp) mathcomp(polyrcf qe_rcf_th complex) poly_normal pol