fact: Definition unique_root_for (f : R -> R) (x y : R) : Prop := exists z, [/\ x < z < y, f z = 0 & forall u, x < u < y -> f u = 0 -> u = z ].
imports: mathcomp(ssreflect ssrfun ssrbool eqtype ssrnat binomial seq choice order) mathcomp(fintype bigop ssralg poly ssrnum ssrint rat ssrnum) mathcomp(polyrcf qe_rcf_th realalg) pol poly_normal desc