Metamath Proof Explorer


Theorem opnregcld

Description: A set is regularly closed iff it is the closure of some open set. (Contributed by Jeff Hankins, 27-Sep-2009)

Ref Expression
Hypothesis opnregcld.1 X=J
Assertion opnregcld JTopAXclsJintJA=AoJA=clsJo

Proof

Step Hyp Ref Expression
1 opnregcld.1 X=J
2 1 ntropn JTopAXintJAJ
3 eqcom clsJintJA=AA=clsJintJA
4 3 biimpi clsJintJA=AA=clsJintJA
5 fveq2 o=intJAclsJo=clsJintJA
6 5 rspceeqv intJAJA=clsJintJAoJA=clsJo
7 2 4 6 syl2an JTopAXclsJintJA=AoJA=clsJo
8 7 ex JTopAXclsJintJA=AoJA=clsJo
9 simpl JTopoJJTop
10 1 eltopss JTopoJoX
11 1 clsss3 JTopoXclsJoX
12 10 11 syldan JTopoJclsJoX
13 1 ntrss2 JTopclsJoXintJclsJoclsJo
14 12 13 syldan JTopoJintJclsJoclsJo
15 1 clsss JTopclsJoXintJclsJoclsJoclsJintJclsJoclsJclsJo
16 9 12 14 15 syl3anc JTopoJclsJintJclsJoclsJclsJo
17 1 clsidm JTopoXclsJclsJo=clsJo
18 10 17 syldan JTopoJclsJclsJo=clsJo
19 16 18 sseqtrd JTopoJclsJintJclsJoclsJo
20 1 ntrss3 JTopclsJoXintJclsJoX
21 12 20 syldan JTopoJintJclsJoX
22 simpr JTopoJoJ
23 1 sscls JTopoXoclsJo
24 10 23 syldan JTopoJoclsJo
25 1 ssntr JTopclsJoXoJoclsJoointJclsJo
26 9 12 22 24 25 syl22anc JTopoJointJclsJo
27 1 clsss JTopintJclsJoXointJclsJoclsJoclsJintJclsJo
28 9 21 26 27 syl3anc JTopoJclsJoclsJintJclsJo
29 19 28 eqssd JTopoJclsJintJclsJo=clsJo
30 29 adantlr JTopAXoJclsJintJclsJo=clsJo
31 2fveq3 A=clsJoclsJintJA=clsJintJclsJo
32 id A=clsJoA=clsJo
33 31 32 eqeq12d A=clsJoclsJintJA=AclsJintJclsJo=clsJo
34 30 33 syl5ibrcom JTopAXoJA=clsJoclsJintJA=A
35 34 rexlimdva JTopAXoJA=clsJoclsJintJA=A
36 8 35 impbid JTopAXclsJintJA=AoJA=clsJo