theorem
  w1 <> w2 implies |.w1 - w2.| > 0
proof
  reconsider s1 = w1, s2 = w2 as Element of REAL N by EUCLID:22;
  s1 - s2 = w1 - w2;
  hence thesis by EUCLID:17;
end;
