theorem
for Rseq be Function of [:NAT,NAT:],REAL st
 Rseq is non-decreasing or Rseq is non-increasing holds
  Rseq is P-convergent iff Rseq is bounded_below bounded_above;
