fact: Definition bertrand_zero_interval alpha beta prec vi := if andb (F'.lt' F.zero (I.lower vi)) (F'.le' (I.upper vi) c1) then BI.f0eps_int prec vi alpha beta else I.nai.
imports: Coq(Reals List ZArith Psatz) Flocq(Zaux) Coquelicot(Coquelicot) Stdlib Coquelicot Xreal Basic Sig Interval Integral Eval Bertrand Tree Prog Reify Refine Interval_helper