fact: Definition Str_alt_decr (x:X*Q) : Prop := forall p : positive, Qabs (Str_pth (Pos.succ p) x) <= Qabs (Str_pth p x) /\ (Str_pth (Pos.succ p) x)*(Str_pth p x) <= 0.
imports: Coq.setoid_ring.ArithRing Coq.Bool.Bool Coq.QArith.Qpower Coq.QArith.Qabs CoRN.algebra.RSetoid CoRN.metric2.Metric CoRN.metric2.UniformContinuity CoRN.reals.fast.CRArith CoRN.model.metric2.Qmetric CoRN.reals.fast.LazyNat CoRN.reals.fast.CRstreams CoRN.metric2.Limit CoRN.model.totalorder.QposMinMax CoRN.classes.Qclasses MathClasses.interfaces.abstract_algebra