proposition: Lemma ereal_nondecreasing_series (R : realDomainType) (u_ : (\bar R)^nat) (P : pred nat) : (forall n, P n -> 0 <= u_ n) -> nondecreasing_seq (fun n => \sum_(0 <= i < n | P i) u_ i).
proof: Proof. by move=> u_ge0 n m nm; rewrite lee_sum_nneg_natr// => k _ /u_ge0. Qed.
imports: mathcomp(all_ssreflect ssralg ssrint ssrnum matrix) mathcomp(interval rat) mathcomp(mathcomp_extra boolp classical_sets functions) mathcomp(set_interval) reals ereal signed topology normedtype landau