fact: Definition has_degree f d := pseudo_degree f = d ∧ (List.nth d (al f) 0 ≠ 0)%K.
imports: Utf8 QArith Sorted NPeano ConvexHull ConvexHullMisc Misc NbarM QbarM Newton PolyConvexHull Field2 Fpolynomial PSpolynomial Puiseux_base Power_series Puiseux_series Ps_div Slope_base