defpred S1[ Subset of V] means for x being Point of V st x in $1 holds
ex r being Real st
( r > 0 & Ball (x,r) c= $1 );
ex F being Subset-Family of V st
for M being Subset of V holds
( M in F iff S1[M] ) from SUBSET_1:sch 3();
hence ex b1 being Subset-Family of V st
for M being Subset of V holds
( M in b1 iff for x being Point of V st x in M holds
ex r being Real st
( r > 0 & Ball (x,r) c= M ) ) ; :: thesis: verum