let T be TopSpace; :: thesis: (PSO T) /\ (D(c,ps) T) = the topology of T
thus
(PSO T) /\ (D(c,ps) T) c= the topology of T
:: according to XBOOLE_0:def 10 :: thesis: the topology of T c= (PSO T) /\ (D(c,ps) T)
let x be set ; :: according to TARSKI:def 3 :: thesis: ( not x in the topology of T or x in (PSO T) /\ (D(c,ps) T) )
assume A6:
x in the topology of T
; :: thesis: x in (PSO T) /\ (D(c,ps) T)
then reconsider K = x as Subset of T ;
A7:
Int (Cl K) c= Cl (Int (Cl K))
by PRE_TOPC:48;
K is open
by A6, PRE_TOPC:def 5;
then A8:
K = Int K
by TOPS_1:55;
then
K c= Int (Cl K)
by PRE_TOPC:48, TOPS_1:48;
then
K c= Cl (Int (Cl K))
by A7, XBOOLE_1:1;
then A9:
K is pre-semi-open
by Def4;
then
Int K = psInt K
by A8, Th5;
then A10:
K in { B where B is Subset of T : Int B = psInt B }
;
K in PSO T
by A9;
hence
x in (PSO T) /\ (D(c,ps) T)
by A10, XBOOLE_0:def 4; :: thesis: verum