fact: Definition pol_in_K_1_m {α} {R : ring α} {K : field R} f m := ps_lap_forall (λ a, in_K_1_m a m) (al f).
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