
theorem Th8:
  for Gs being ManySortedSet of NAT st Gs is eventually-constant
  holds Gs is halting
proof
  let Gs be ManySortedSet of NAT;
  assume Gs is eventually-constant;
  then consider n being Nat such that
A1: for m being Nat st n <= m holds Gs.n = Gs.m;
  n <= n+1 by NAT_1:13;
  then Gs.n = Gs.(n+1) by A1;
  hence thesis;
end;
