fact: Definition FastRealsConstructive : ConstructiveReals := Build_ConstructiveReals (RegularFunction Qball) CRltT CRltT_linear CRlt (fun x y => fst (CR_lt_ltT x y)) (fun x y => snd (CR_lt_ltT x y)) CRlt_or_epsilon inject_Q_CR CRlt_Qlt Qlt_from_CRlt CRplus CRopp CRmult inject_Q_CR_plus inject_Q_CR_mult CR_ring_nlt CR_ring_ext_nlt (CRlt_Qlt 0 1 eq_refl) (fun r r1 r2 => fst (CRplus_lt_l r1 r2 r)) (fun r r1 r2 => snd (CRplus_lt_l r1 r2 r)) CRmult_lt_0_compat CRinvT CRmult_inv_r_nlt CRinv_0_lt_compat CRlt_Qmid CRup CRabs CRabs_nlt CRcauchy_complete.
imports: Coq.Reals.Abstract.ConstructiveReals CoRN.model.metric2.Qmetric CoRN.model.metric2.CRmetric CoRN.reals.fast.CRFieldOps CoRN.reals.fast.CRArith CoRN.reals.fast.CRabs CoRN.model.totalorder.QposMinMax Coq.Logic.ConstructiveEpsilon