theorem Th118:
  z in Ball(A,r) iff dist(z,A) < r
proof
  z in { z2 : dist(z2,A) < r } iff ex z1 st z = z1 & dist(z1,A) < r;
  hence thesis;
end;
