reserve x,y,t for Real;

theorem Th7:
  y>=0 & x>=1 implies (x-1)/y>=0
proof
  assume that
A1: y>=0 and
A2: x>=1;
  x+(-1)>=1+(-1) by A2,XREAL_1:6;
  hence thesis by A1;
end;
