fact: Definition degree α {R : ring α} zerop (f : polynomial α) := pred (degree_plus_1_of_list zerop (al f)).
imports: Utf8 QArith NPeano ArithRing Misc Field2 ConvexHull Newton Fsummation Fpolynomial Puiseux_base Puiseux_series CharactPolyn