set T = TopSpaceMetr (Euclid n);
OpenHypercube (e,(1 / 1)) in OpenHypercubes e
;
hence
not OpenHypercubes e is empty
; ( OpenHypercubes e is open & OpenHypercubes e is @ e -quasi_basis )
hence
@ e in Intersect (OpenHypercubes e)
by SETFAM_1:43; YELLOW_8:def 1 for b1 being Element of K19( the carrier of (TopSpaceMetr (Euclid n))) holds
( not b1 is open or not @ e in b1 or ex b2 being Element of K19( the carrier of (TopSpaceMetr (Euclid n))) st
( b2 in OpenHypercubes e & b2 c= b1 ) )
let S be Subset of (TopSpaceMetr (Euclid n)); ( not S is open or not @ e in S or ex b1 being Element of K19( the carrier of (TopSpaceMetr (Euclid n))) st
( b1 in OpenHypercubes e & b1 c= S ) )
assume that
A1:
S is open
and
A2:
@ e in S
; ex b1 being Element of K19( the carrier of (TopSpaceMetr (Euclid n))) st
( b1 in OpenHypercubes e & b1 c= S )
consider r being Real such that
A3:
r > 0
and
A4:
Ball (e,r) c= S
by A1, A2, TOPMETR:15;
consider m being non zero Element of NAT such that
A5:
OpenHypercube (e,(1 / m)) c= Ball (e,r)
by A3, Th19, GOBOARD6:1;
take V = OpenHypercube (e,(1 / m)); ( V in OpenHypercubes e & V c= S )
thus
V in OpenHypercubes e
; V c= S
thus
V c= S
by A4, A5; verum