fact: Definition horner p x := C.mask (@fold C.T (fun a b => C.add u (C.mul u b x) a) C.zero p) x.
imports: Coq(ZArith Reals) Coquelicot(Coquelicot) mathcomp.ssreflect(ssreflect ssrfun ssrbool eqtype ssrnat seq fintype bigop) Flocq(Core) Stdlib MathComp Interval Xreal Basic_rec