theorem :: TOPREAL9:22

for n being Nat
for r being Real
for x being Point of (TOP-REAL n) st not cl_Ball (x,r) is empty holds
r >= 0 ;