theorem
  [\ r /] <= [/ r \]
proof
A1: r <= [/ r \] by Def7;
  [\ r /] <= r by Def6;
  hence thesis by A1,XXREAL_0:2;
end;
