theorem Th10:
  k + n in Seg k implies n = 0
proof
  assume k + n in Seg k;
  then k + n <= k + 0 by FINSEQ_1:1;
  hence thesis by XREAL_1:6;
end;
