
theorem Th08:
  for a,b being Real st 0 < a & 1 < b holds a / b - a < 0
  proof
    let a,b be Real;
    assume that
A1: 0 < a and
A2: 1 < b;
A3: a / b - a = a * ( 1 / b - 1);
    (1 / b - 1) < 0 by A2,Th07;
    hence thesis by A1,A3;
  end;
