Theorem tgidm 12025

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

Assertion

Ref	Expression
tgidm	⊢ (𝐵 ∈ 𝑉 → (topGen‘(topGen‘𝐵)) = (topGen‘𝐵))

Proof of Theorem tgidm

Dummy variables 𝑥 𝑦 𝑧 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		tgvalex 12001	. . . . 5 ⊢ (𝐵 ∈ 𝑉 → (topGen‘𝐵) ∈ V)
2		eltg3 12008	. . . . 5 ⊢ ((topGen‘𝐵) ∈ V → (𝑥 ∈ (topGen‘(topGen‘𝐵)) ↔ ∃𝑦(𝑦 ⊆ (topGen‘𝐵) ∧ 𝑥 = ∪ 𝑦)))
3	1, 2	syl 14	. . . 4 ⊢ (𝐵 ∈ 𝑉 → (𝑥 ∈ (topGen‘(topGen‘𝐵)) ↔ ∃𝑦(𝑦 ⊆ (topGen‘𝐵) ∧ 𝑥 = ∪ 𝑦)))
4		uniiun 3813	. . . . . . . . . 10 ⊢ ∪ 𝑦 = ∪ 𝑧 ∈ 𝑦 𝑧
5		simpr 109	. . . . . . . . . . . . 13 ⊢ ((𝐵 ∈ 𝑉 ∧ 𝑦 ⊆ (topGen‘𝐵)) → 𝑦 ⊆ (topGen‘𝐵))
6	5	sselda 3047	. . . . . . . . . . . 12 ⊢ (((𝐵 ∈ 𝑉 ∧ 𝑦 ⊆ (topGen‘𝐵)) ∧ 𝑧 ∈ 𝑦) → 𝑧 ∈ (topGen‘𝐵))
7		eltg4i 12006	. . . . . . . . . . . 12 ⊢ (𝑧 ∈ (topGen‘𝐵) → 𝑧 = ∪ (𝐵 ∩ 𝒫 𝑧))
8	6, 7	syl 14	. . . . . . . . . . 11 ⊢ (((𝐵 ∈ 𝑉 ∧ 𝑦 ⊆ (topGen‘𝐵)) ∧ 𝑧 ∈ 𝑦) → 𝑧 = ∪ (𝐵 ∩ 𝒫 𝑧))
9	8	iuneq2dv 3781	. . . . . . . . . 10 ⊢ ((𝐵 ∈ 𝑉 ∧ 𝑦 ⊆ (topGen‘𝐵)) → ∪ 𝑧 ∈ 𝑦 𝑧 = ∪ 𝑧 ∈ 𝑦 ∪ (𝐵 ∩ 𝒫 𝑧))
10	4, 9	syl5eq 2144	. . . . . . . . 9 ⊢ ((𝐵 ∈ 𝑉 ∧ 𝑦 ⊆ (topGen‘𝐵)) → ∪ 𝑦 = ∪ 𝑧 ∈ 𝑦 ∪ (𝐵 ∩ 𝒫 𝑧))
11		iuncom4 3767	. . . . . . . . 9 ⊢ ∪ 𝑧 ∈ 𝑦 ∪ (𝐵 ∩ 𝒫 𝑧) = ∪ ∪ 𝑧 ∈ 𝑦 (𝐵 ∩ 𝒫 𝑧)
12	10, 11	syl6eq 2148	. . . . . . . 8 ⊢ ((𝐵 ∈ 𝑉 ∧ 𝑦 ⊆ (topGen‘𝐵)) → ∪ 𝑦 = ∪ ∪ 𝑧 ∈ 𝑦 (𝐵 ∩ 𝒫 𝑧))
13		inss1 3243	. . . . . . . . . . . 12 ⊢ (𝐵 ∩ 𝒫 𝑧) ⊆ 𝐵
14	13	rgenw 2446	. . . . . . . . . . 11 ⊢ ∀𝑧 ∈ 𝑦 (𝐵 ∩ 𝒫 𝑧) ⊆ 𝐵
15		iunss 3801	. . . . . . . . . . 11 ⊢ (∪ 𝑧 ∈ 𝑦 (𝐵 ∩ 𝒫 𝑧) ⊆ 𝐵 ↔ ∀𝑧 ∈ 𝑦 (𝐵 ∩ 𝒫 𝑧) ⊆ 𝐵)
16	14, 15	mpbir 145	. . . . . . . . . 10 ⊢ ∪ 𝑧 ∈ 𝑦 (𝐵 ∩ 𝒫 𝑧) ⊆ 𝐵
17	16	a1i 9	. . . . . . . . 9 ⊢ (𝑦 ⊆ (topGen‘𝐵) → ∪ 𝑧 ∈ 𝑦 (𝐵 ∩ 𝒫 𝑧) ⊆ 𝐵)
18		eltg3i 12007	. . . . . . . . 9 ⊢ ((𝐵 ∈ 𝑉 ∧ ∪ 𝑧 ∈ 𝑦 (𝐵 ∩ 𝒫 𝑧) ⊆ 𝐵) → ∪ ∪ 𝑧 ∈ 𝑦 (𝐵 ∩ 𝒫 𝑧) ∈ (topGen‘𝐵))
19	17, 18	sylan2 282	. . . . . . . 8 ⊢ ((𝐵 ∈ 𝑉 ∧ 𝑦 ⊆ (topGen‘𝐵)) → ∪ ∪ 𝑧 ∈ 𝑦 (𝐵 ∩ 𝒫 𝑧) ∈ (topGen‘𝐵))
20	12, 19	eqeltrd 2176	. . . . . . 7 ⊢ ((𝐵 ∈ 𝑉 ∧ 𝑦 ⊆ (topGen‘𝐵)) → ∪ 𝑦 ∈ (topGen‘𝐵))
21		eleq1 2162	. . . . . . 7 ⊢ (𝑥 = ∪ 𝑦 → (𝑥 ∈ (topGen‘𝐵) ↔ ∪ 𝑦 ∈ (topGen‘𝐵)))
22	20, 21	syl5ibrcom 156	. . . . . 6 ⊢ ((𝐵 ∈ 𝑉 ∧ 𝑦 ⊆ (topGen‘𝐵)) → (𝑥 = ∪ 𝑦 → 𝑥 ∈ (topGen‘𝐵)))
23	22	expimpd 358	. . . . 5 ⊢ (𝐵 ∈ 𝑉 → ((𝑦 ⊆ (topGen‘𝐵) ∧ 𝑥 = ∪ 𝑦) → 𝑥 ∈ (topGen‘𝐵)))
24	23	exlimdv 1758	. . . 4 ⊢ (𝐵 ∈ 𝑉 → (∃𝑦(𝑦 ⊆ (topGen‘𝐵) ∧ 𝑥 = ∪ 𝑦) → 𝑥 ∈ (topGen‘𝐵)))
25	3, 24	sylbid 149	. . 3 ⊢ (𝐵 ∈ 𝑉 → (𝑥 ∈ (topGen‘(topGen‘𝐵)) → 𝑥 ∈ (topGen‘𝐵)))
26	25	ssrdv 3053	. 2 ⊢ (𝐵 ∈ 𝑉 → (topGen‘(topGen‘𝐵)) ⊆ (topGen‘𝐵))
27		bastg 12012	. . 3 ⊢ (𝐵 ∈ 𝑉 → 𝐵 ⊆ (topGen‘𝐵))
28		tgss 12014	. . 3 ⊢ (((topGen‘𝐵) ∈ V ∧ 𝐵 ⊆ (topGen‘𝐵)) → (topGen‘𝐵) ⊆ (topGen‘(topGen‘𝐵)))
29	1, 27, 28	syl2anc 406	. 2 ⊢ (𝐵 ∈ 𝑉 → (topGen‘𝐵) ⊆ (topGen‘(topGen‘𝐵)))
30	26, 29	eqssd 3064	1 ⊢ (𝐵 ∈ 𝑉 → (topGen‘(topGen‘𝐵)) = (topGen‘𝐵))

Syntax hints:   → wi 4   ∧ wa 103   ↔ wb 104   = wceq 1299  ∃wex 1436   ∈ wcel 1448  ∀wral 2375  Vcvv 2641   ∩ cin 3020   ⊆ wss 3021  𝒫 cpw 3457  ∪ cuni 3683  ∪ ciun 3760  ‘cfv 5059  topGenctg 11917

This theorem was proved from axioms:  ax-1 5  ax-2 6  ax-mp 7  ax-ia1 105  ax-ia2 106  ax-ia3 107  ax-io 671  ax-5 1391  ax-7 1392  ax-gen 1393  ax-ie1 1437  ax-ie2 1438  ax-8 1450  ax-10 1451  ax-11 1452  ax-i12 1453  ax-bndl 1454  ax-4 1455  ax-13 1459  ax-14 1460  ax-17 1474  ax-i9 1478  ax-ial 1482  ax-i5r 1483  ax-ext 2082  ax-sep 3986  ax-pow 4038  ax-pr 4069  ax-un 4293

This theorem depends on definitions:  df-bi 116  df-3an 932  df-tru 1302  df-nf 1405  df-sb 1704  df-eu 1963  df-mo 1964  df-clab 2087  df-cleq 2093  df-clel 2096  df-nfc 2229  df-ral 2380  df-rex 2381  df-v 2643  df-sbc 2863  df-un 3025  df-in 3027  df-ss 3034  df-pw 3459  df-sn 3480  df-pr 3481  df-op 3483  df-uni 3684  df-iun 3762  df-br 3876  df-opab 3930  df-mpt 3931  df-id 4153  df-xp 4483  df-rel 4484  df-cnv 4485  df-co 4486  df-dm 4487  df-iota 5024  df-fun 5061  df-fv 5067  df-topgen 11923

This theorem is referenced by:  tgss3  12029  txbasval  12217