let R, P be Subset of (TOP-REAL 2); :: thesis: for p being Point of (TOP-REAL 2) st R is being_Region & P = { q where q is Point of (TOP-REAL 2) : ( q <> p & q in R & ( for P1 being Subset of (TOP-REAL 2) holds
( not P1 is_S-P_arc_joining p,q or not P1 c= R ) ) ) } holds
P is open
let p be Point of (TOP-REAL 2); :: thesis: ( R is being_Region & P = { q where q is Point of (TOP-REAL 2) : ( q <> p & q in R & ( for P1 being Subset of (TOP-REAL 2) holds
( not P1 is_S-P_arc_joining p,q or not P1 c= R ) ) ) } implies P is open )
assume that
A1:
R is being_Region
and
A2:
P = { q where q is Point of (TOP-REAL 2) : ( q <> p & q in R & ( for P1 being Subset of (TOP-REAL 2) holds
( not P1 is_S-P_arc_joining p,q or not P1 c= R ) ) ) }
; :: thesis: P is open
A3:
R is open
by A1, Def3;
X:
TopStruct(# the carrier of (TOP-REAL 2),the topology of (TOP-REAL 2) #) = TopSpaceMetr (Euclid 2)
by EUCLID:def 8;
reconsider RR = R, PP = P as Subset of TopStruct(# the carrier of (TOP-REAL 2),the topology of (TOP-REAL 2) #) ;
Y:
RR is open
by A3, PRE_TOPC:60;
now let u be
Point of
(Euclid 2);
:: thesis: ( u in P implies ex r being real number st
( r > 0 & Ball u,r c= P ) )reconsider p2 =
u as
Point of
(TOP-REAL 2) by TOPREAL3:13;
assume A4:
u in P
;
:: thesis: ex r being real number st
( r > 0 & Ball u,r c= P )then
ex
q1 being
Point of
(TOP-REAL 2) st
(
q1 = u &
q1 <> p &
q1 in R & ( for
P1 being
Subset of
(TOP-REAL 2) holds
( not
P1 is_S-P_arc_joining p,
q1 or not
P1 c= R ) ) )
by A2;
then consider r being
real number such that A5:
(
r > 0 &
Ball u,
r c= RR )
by A3, Lm1, X, Y, TOPMETR:22;
reconsider r' =
r as
Real by XREAL_0:def 1;
A6:
p2 in Ball u,
r'
by A5, TBSP_1:16;
take r =
r;
:: thesis: ( r > 0 & Ball u,r c= P )thus
r > 0
by A5;
:: thesis: Ball u,r c= Pthus
Ball u,
r c= P
:: thesis: verum end;
then
PP is open
by Lm1, TOPMETR:22;
hence
P is open
by PRE_TOPC:60; :: thesis: verum