reserve x,y for set,
  n,m for Nat,
  r,s for Real;

theorem
  for R be non-increasing real-valued FinSequence, n
  holds R|n is non-increasing FinSequence of REAL by FINSEQ_1:106;
