fact: Definition CReal_from_cauchy_cm (n : Z) : positive := match n with | Z0 | Zpos _ => 1%positive | Zneg p => p end.
imports: QArith_base Qabs ConstructiveReals ConstructiveCauchyRealsMult Logic.ConstructiveEpsilon ConstructiveCauchyAbs Lia Lqa Qpower QExtra PosExtra ConstructiveExtra