
theorem Th34:
  for V being RealUnitarySpace, v being Point of V
   ex r being Real st r>0 & Ball(v,r) c= the carrier of V
proof
  let V be RealUnitarySpace;
  let v be Point of V;
  take r = 1;
  thus r > 0;
  thus thesis;
end;
