fact: Definition convert (xi : type) := match xi with | Inan => Interval.Inan | Ibnd l u => if (F.valid_lb l && F.valid_ub u)%bool then Interval.Ibnd (F.toX l) (F.toX u) else Interval.Ibnd (Xreal 1) (Xreal 0) end.
imports: Coq(Bool Reals Psatz) Flocq(Raux) Stdlib Xreal Basic Sig Interval