fact: Definition plot1 (f : R -> R) (ox dx : R) (l : list I.type) := forall i x, (ox + dx * INR i <= x <= ox + dx * INR (S i))%R -> contains (I.convert (nth i l I.nai)) (Xreal (f x)).
imports: Coq(Reals List) Sig Generic_proof Interval_helper Xreal Interval Tree Reify Prog