
theorem Th2:
  for r,s being Real holds 1 < r & r*r <= s implies r < s
proof
  let r,s be Real;
  assume that
A1: 1<r and
A2: r*r <= s;
  r<r*r by A1,XREAL_1:155;
  hence thesis by A2,XXREAL_0:2;
end;
