fact: Definition sub (u : U) (X : I.type) (t1 : T) (t2 : T) : T := match t1, t2 with | Const c1, Const c2 => Const (I.sub u.1 c1 c2) | _, _ => sub_slow u X t1 t2 end.
imports: Coq(Reals ZArith Psatz) mathcomp.ssreflect(ssreflect ssrbool ssrfun eqtype ssrnat seq bigop) Interval Xreal Basic Interval_compl Datatypes Taylor_model_sharp Bound Bound_quad Univariate_sig