proposition: Lemma ncvg_geC c u (lu : \bar R) : (forall n, c <= u n) -> ncvg u lu -> (c%:E <= lu)%E.
proof: Proof. by move=> le cu; apply/(@ncvg_le u c%:S)=> //; apply/ncvgC. Qed.
imports: mathcomp(all_ssreflect all_algebra) mathcomp.bigenough.bigenough mathcomp.classical(boolp classical_sets functions) mathcomp.classical(mathcomp_extra) xfinmap ereal reals discrete topology