fact: Definition bound_plot prec hyps pf cf oxi dxi nb := let bounds := R.merge_hyps prec hyps ++ map (T.eval_bnd prec) cf in let fi xi := nth 0 (A.BndValuator.eval prec pf (xi :: bounds)) I.nai in bound_plot_aux prec fi oxi dxi 0%Z (Z.to_nat nb) (fi oxi).
imports: Coq(Reals List) Sig Generic_proof Interval_helper Xreal Interval Tree Reify Prog