theorem Th8:
  i<=n implies i+1 is Nat of n
proof
  assume i<=n;
  then
A1: i+1<=n+1 by XREAL_1:7;
  1<=i+1 by NAT_1:11;
  hence thesis by A1,Def2;
end;
