fact: CoInductive dlim_spec f (x : T) : R -> Type := | DLimCvg : forall l : R, 0 <= l -> l <= 1 -> ncvg (fun n => f n x) l%:E -> dlim_spec f x l | DLimOut : ~ (exists l : \bar R, ncvg (fun n => f n x) l) -> dlim_spec f x 0.
imports: mathcomp(all_ssreflect all_algebra) mathcomp.classical(boolp classical_sets mathcomp_extra) xfinmap ereal reals discrete topology realseq realsum