reserve a,b,c for set;

theorem Th2:
  for f being FinSequence holds f|(len f) = f
proof
  let f be FinSequence;
  f|len f = f|(Seg len f) by FINSEQ_1:def 16;
  hence thesis by FINSEQ_2:20;
end;
