fact: Definition mul_slow (u : U) (X : I.type) (t1 : T) (t2 : T) : T := let M1 := get_tm u X t1 in let M2 := get_tm u X t2 in let X0 := J.midpoint X in Tm (TM_mul u.1 M1 M2 X0 X u.2).
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