fact: Definition FMax := Build_PartFunct IR _ (conj_wd (dom_wd _ _) (dom_wd _ _)) (fun x Hx => Max (F x (Prj1 Hx)) (G x (Prj2 Hx))) part_function_Max_strext.
imports: CoRN.reals.Q_in_CReals Coq.QArith.Qabs CoRN.reals.CauchySeq