
theorem Th24:
  for X be RealBanachSpace for seq be sequence of X holds seq is
  summable iff for p be Real st 0 <p holds ex n be Nat st for m be
Nat st n <= m holds ||.Partial_Sums(seq).m-Partial_Sums(seq).n.||<p
by Th5,LOPBAN_1:def 15,Th4;
