theorem Th10:
  for f be FinSequence of REAL st n in dom f holds len(f|n) = n
  proof
    let f be FinSequence of REAL;
    assume n in dom f; then
    n <= len f by FINSEQ_3:25;
    hence thesis by FINSEQ_1:59;
  end;
