Metamath Proof Explorer


Theorem tgidm

Description: The topology generator function is idempotent. (Contributed by NM, 18-Jul-2006) (Revised by Mario Carneiro, 2-Sep-2015)

Ref Expression
Assertion tgidm B V topGen topGen B = topGen B

Proof

Step Hyp Ref Expression
1 fvex topGen B V
2 eltg3 topGen B V x topGen topGen B y y topGen B x = y
3 1 2 ax-mp x topGen topGen B y y topGen B x = y
4 uniiun y = z y z
5 simpr B V y topGen B y topGen B
6 5 sselda B V y topGen B z y z topGen B
7 eltg4i z topGen B z = B 𝒫 z
8 6 7 syl B V y topGen B z y z = B 𝒫 z
9 8 iuneq2dv B V y topGen B z y z = z y B 𝒫 z
10 4 9 eqtrid B V y topGen B y = z y B 𝒫 z
11 iuncom4 z y B 𝒫 z = z y B 𝒫 z
12 10 11 eqtrdi B V y topGen B y = z y B 𝒫 z
13 inss1 B 𝒫 z B
14 13 rgenw z y B 𝒫 z B
15 iunss z y B 𝒫 z B z y B 𝒫 z B
16 14 15 mpbir z y B 𝒫 z B
17 16 a1i y topGen B z y B 𝒫 z B
18 eltg3i B V z y B 𝒫 z B z y B 𝒫 z topGen B
19 17 18 sylan2 B V y topGen B z y B 𝒫 z topGen B
20 12 19 eqeltrd B V y topGen B y topGen B
21 eleq1 x = y x topGen B y topGen B
22 20 21 syl5ibrcom B V y topGen B x = y x topGen B
23 22 expimpd B V y topGen B x = y x topGen B
24 23 exlimdv B V y y topGen B x = y x topGen B
25 3 24 syl5bi B V x topGen topGen B x topGen B
26 25 ssrdv B V topGen topGen B topGen B
27 bastg B V B topGen B
28 tgss topGen B V B topGen B topGen B topGen topGen B
29 1 27 28 sylancr B V topGen B topGen topGen B
30 26 29 eqssd B V topGen topGen B = topGen B