let T be TopSpace; :: thesis: (PO T) /\ (D(c,p) T) = the topology of T
thus (PO T) /\ (D(c,p) T) c= the topology of T :: according to XBOOLE_0:def 10 :: thesis: the topology of T c= (PO T) /\ (D(c,p) T)
proof
let x be object ; :: according to TARSKI:def 3 :: thesis: ( not x in (PO T) /\ (D(c,p) T) or x in the topology of T )
assume A1: x in (PO T) /\ (D(c,p) T) ; :: thesis: x in the topology of T
then x in PO T by XBOOLE_0:def 4;
then consider A being Subset of T such that
A2: x = A and
A3: A is pre-open ;
x in D(c,p) T by A1, XBOOLE_0:def 4;
then consider Z being Subset of T such that
A4: x = Z and
A5: Int Z = pInt Z ;
A = pInt A by A3, Th4;
hence x in the topology of T by A4, PRE_TOPC:def 2, A2, A5; :: thesis: verum
end;
let x be object ; :: according to TARSKI:def 3 :: thesis: ( not x in the topology of T or x in (PO T) /\ (D(c,p) T) )
assume A6: x in the topology of T ; :: thesis: x in (PO T) /\ (D(c,p) T)
then reconsider K = x as Subset of T ;
K is open by A6, PRE_TOPC:def 2;
then A7: K = Int K by TOPS_1:23;
then A8: K is pre-open by PRE_TOPC:18, TOPS_1:19;
then Int K = pInt K by A7, Th4;
then A9: K in { B where B is Subset of T : Int B = pInt B } ;
K in PO T by A8;
hence x in (PO T) /\ (D(c,p) T) by A9, XBOOLE_0:def 4; :: thesis: verum