Theorem epttop 23134

Description: The excluded point topology. (Contributed by Mario Carneiro, 3-Sep-2015.)

Assertion

Ref	Expression
epttop	⊢ ((𝐴 ∈ 𝑉 ∧ 𝑃 ∈ 𝐴) → {𝑥 ∈ 𝒫 𝐴 ∣ (𝑃 ∈ 𝑥 → 𝑥 = 𝐴)} ∈ (TopOn‘𝐴))

Distinct variable groups:   𝑥,𝐴   𝑥,𝑃

Allowed substitution hint:   𝑉(𝑥)

Proof of Theorem epttop

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

Step	Hyp	Ref	Expression
1		ssrab 4033	. . . . 5 ⊢ (𝑦 ⊆ {𝑥 ∈ 𝒫 𝐴 ∣ (𝑃 ∈ 𝑥 → 𝑥 = 𝐴)} ↔ (𝑦 ⊆ 𝒫 𝐴 ∧ ∀𝑥 ∈ 𝑦 (𝑃 ∈ 𝑥 → 𝑥 = 𝐴)))
2		eleq2 2858	. . . . . . . 8 ⊢ (𝑥 = ∪ 𝑦 → (𝑃 ∈ 𝑥 ↔ 𝑃 ∈ ∪ 𝑦))
3		eqeq1 2773	. . . . . . . 8 ⊢ (𝑥 = ∪ 𝑦 → (𝑥 = 𝐴 ↔ ∪ 𝑦 = 𝐴))
4	2, 3	imbi12d 347	. . . . . . 7 ⊢ (𝑥 = ∪ 𝑦 → ((𝑃 ∈ 𝑥 → 𝑥 = 𝐴) ↔ (𝑃 ∈ ∪ 𝑦 → ∪ 𝑦 = 𝐴)))
5		simprl 782	. . . . . . . . 9 ⊢ (((𝐴 ∈ 𝑉 ∧ 𝑃 ∈ 𝐴) ∧ (𝑦 ⊆ 𝒫 𝐴 ∧ ∀𝑥 ∈ 𝑦 (𝑃 ∈ 𝑥 → 𝑥 = 𝐴))) → 𝑦 ⊆ 𝒫 𝐴)
6		sspwuni 5070	. . . . . . . . 9 ⊢ (𝑦 ⊆ 𝒫 𝐴 ↔ ∪ 𝑦 ⊆ 𝐴)
7	5, 6	sylib 221	. . . . . . . 8 ⊢ (((𝐴 ∈ 𝑉 ∧ 𝑃 ∈ 𝐴) ∧ (𝑦 ⊆ 𝒫 𝐴 ∧ ∀𝑥 ∈ 𝑦 (𝑃 ∈ 𝑥 → 𝑥 = 𝐴))) → ∪ 𝑦 ⊆ 𝐴)
8		vuniex 7737	. . . . . . . . 9 ⊢ ∪ 𝑦 ∈ V
9	8	elpw 4571	. . . . . . . 8 ⊢ (∪ 𝑦 ∈ 𝒫 𝐴 ↔ ∪ 𝑦 ⊆ 𝐴)
10	7, 9	sylibr 237	. . . . . . 7 ⊢ (((𝐴 ∈ 𝑉 ∧ 𝑃 ∈ 𝐴) ∧ (𝑦 ⊆ 𝒫 𝐴 ∧ ∀𝑥 ∈ 𝑦 (𝑃 ∈ 𝑥 → 𝑥 = 𝐴))) → ∪ 𝑦 ∈ 𝒫 𝐴)
11		eluni2 4880	. . . . . . . . . 10 ⊢ (𝑃 ∈ ∪ 𝑦 ↔ ∃𝑥 ∈ 𝑦 𝑃 ∈ 𝑥)
12		r19.29 3134	. . . . . . . . . . . . 13 ⊢ ((∀𝑥 ∈ 𝑦 (𝑃 ∈ 𝑥 → 𝑥 = 𝐴) ∧ ∃𝑥 ∈ 𝑦 𝑃 ∈ 𝑥) → ∃𝑥 ∈ 𝑦 ((𝑃 ∈ 𝑥 → 𝑥 = 𝐴) ∧ 𝑃 ∈ 𝑥))
13		simpr 489	. . . . . . . . . . . . . . . 16 ⊢ ((𝑥 ∈ 𝑦 ∧ (𝑃 ∈ 𝑥 → 𝑥 = 𝐴)) → (𝑃 ∈ 𝑥 → 𝑥 = 𝐴))
14	13	impr 459	. . . . . . . . . . . . . . 15 ⊢ ((𝑥 ∈ 𝑦 ∧ ((𝑃 ∈ 𝑥 → 𝑥 = 𝐴) ∧ 𝑃 ∈ 𝑥)) → 𝑥 = 𝐴)
15		elssuni 4908	. . . . . . . . . . . . . . . 16 ⊢ (𝑥 ∈ 𝑦 → 𝑥 ⊆ ∪ 𝑦)
16	15	adantr 485	. . . . . . . . . . . . . . 15 ⊢ ((𝑥 ∈ 𝑦 ∧ ((𝑃 ∈ 𝑥 → 𝑥 = 𝐴) ∧ 𝑃 ∈ 𝑥)) → 𝑥 ⊆ ∪ 𝑦)
17	14, 16	eqsstrrd 3980	. . . . . . . . . . . . . 14 ⊢ ((𝑥 ∈ 𝑦 ∧ ((𝑃 ∈ 𝑥 → 𝑥 = 𝐴) ∧ 𝑃 ∈ 𝑥)) → 𝐴 ⊆ ∪ 𝑦)
18	17	rexlimiva 3164	. . . . . . . . . . . . 13 ⊢ (∃𝑥 ∈ 𝑦 ((𝑃 ∈ 𝑥 → 𝑥 = 𝐴) ∧ 𝑃 ∈ 𝑥) → 𝐴 ⊆ ∪ 𝑦)
19	12, 18	syl 18	. . . . . . . . . . . 12 ⊢ ((∀𝑥 ∈ 𝑦 (𝑃 ∈ 𝑥 → 𝑥 = 𝐴) ∧ ∃𝑥 ∈ 𝑦 𝑃 ∈ 𝑥) → 𝐴 ⊆ ∪ 𝑦)
20	19	ex 417	. . . . . . . . . . 11 ⊢ (∀𝑥 ∈ 𝑦 (𝑃 ∈ 𝑥 → 𝑥 = 𝐴) → (∃𝑥 ∈ 𝑦 𝑃 ∈ 𝑥 → 𝐴 ⊆ ∪ 𝑦))
21	20	ad2antll 741	. . . . . . . . . 10 ⊢ (((𝐴 ∈ 𝑉 ∧ 𝑃 ∈ 𝐴) ∧ (𝑦 ⊆ 𝒫 𝐴 ∧ ∀𝑥 ∈ 𝑦 (𝑃 ∈ 𝑥 → 𝑥 = 𝐴))) → (∃𝑥 ∈ 𝑦 𝑃 ∈ 𝑥 → 𝐴 ⊆ ∪ 𝑦))
22	11, 21	biimtrid 245	. . . . . . . . 9 ⊢ (((𝐴 ∈ 𝑉 ∧ 𝑃 ∈ 𝐴) ∧ (𝑦 ⊆ 𝒫 𝐴 ∧ ∀𝑥 ∈ 𝑦 (𝑃 ∈ 𝑥 → 𝑥 = 𝐴))) → (𝑃 ∈ ∪ 𝑦 → 𝐴 ⊆ ∪ 𝑦))
23	22, 7	jctild 534	. . . . . . . 8 ⊢ (((𝐴 ∈ 𝑉 ∧ 𝑃 ∈ 𝐴) ∧ (𝑦 ⊆ 𝒫 𝐴 ∧ ∀𝑥 ∈ 𝑦 (𝑃 ∈ 𝑥 → 𝑥 = 𝐴))) → (𝑃 ∈ ∪ 𝑦 → (∪ 𝑦 ⊆ 𝐴 ∧ 𝐴 ⊆ ∪ 𝑦)))
24		eqss 3960	. . . . . . . 8 ⊢ (∪ 𝑦 = 𝐴 ↔ (∪ 𝑦 ⊆ 𝐴 ∧ 𝐴 ⊆ ∪ 𝑦))
25	23, 24	imbitrrdi 255	. . . . . . 7 ⊢ (((𝐴 ∈ 𝑉 ∧ 𝑃 ∈ 𝐴) ∧ (𝑦 ⊆ 𝒫 𝐴 ∧ ∀𝑥 ∈ 𝑦 (𝑃 ∈ 𝑥 → 𝑥 = 𝐴))) → (𝑃 ∈ ∪ 𝑦 → ∪ 𝑦 = 𝐴))
26	4, 10, 25	elrabd 3661	. . . . . 6 ⊢ (((𝐴 ∈ 𝑉 ∧ 𝑃 ∈ 𝐴) ∧ (𝑦 ⊆ 𝒫 𝐴 ∧ ∀𝑥 ∈ 𝑦 (𝑃 ∈ 𝑥 → 𝑥 = 𝐴))) → ∪ 𝑦 ∈ {𝑥 ∈ 𝒫 𝐴 ∣ (𝑃 ∈ 𝑥 → 𝑥 = 𝐴)})
27	26	ex 417	. . . . 5 ⊢ ((𝐴 ∈ 𝑉 ∧ 𝑃 ∈ 𝐴) → ((𝑦 ⊆ 𝒫 𝐴 ∧ ∀𝑥 ∈ 𝑦 (𝑃 ∈ 𝑥 → 𝑥 = 𝐴)) → ∪ 𝑦 ∈ {𝑥 ∈ 𝒫 𝐴 ∣ (𝑃 ∈ 𝑥 → 𝑥 = 𝐴)}))
28	1, 27	biimtrid 245	. . . 4 ⊢ ((𝐴 ∈ 𝑉 ∧ 𝑃 ∈ 𝐴) → (𝑦 ⊆ {𝑥 ∈ 𝒫 𝐴 ∣ (𝑃 ∈ 𝑥 → 𝑥 = 𝐴)} → ∪ 𝑦 ∈ {𝑥 ∈ 𝒫 𝐴 ∣ (𝑃 ∈ 𝑥 → 𝑥 = 𝐴)}))
29	28	alrimiv 1954	. . 3 ⊢ ((𝐴 ∈ 𝑉 ∧ 𝑃 ∈ 𝐴) → ∀𝑦(𝑦 ⊆ {𝑥 ∈ 𝒫 𝐴 ∣ (𝑃 ∈ 𝑥 → 𝑥 = 𝐴)} → ∪ 𝑦 ∈ {𝑥 ∈ 𝒫 𝐴 ∣ (𝑃 ∈ 𝑥 → 𝑥 = 𝐴)}))
30		inss1 4197	. . . . . . . . 9 ⊢ (𝑦 ∩ 𝑧) ⊆ 𝑦
31		simprll 790	. . . . . . . . . 10 ⊢ (((𝐴 ∈ 𝑉 ∧ 𝑃 ∈ 𝐴) ∧ ((𝑦 ∈ 𝒫 𝐴 ∧ (𝑃 ∈ 𝑦 → 𝑦 = 𝐴)) ∧ (𝑧 ∈ 𝒫 𝐴 ∧ (𝑃 ∈ 𝑧 → 𝑧 = 𝐴)))) → 𝑦 ∈ 𝒫 𝐴)
32	31	elpwid 4576	. . . . . . . . 9 ⊢ (((𝐴 ∈ 𝑉 ∧ 𝑃 ∈ 𝐴) ∧ ((𝑦 ∈ 𝒫 𝐴 ∧ (𝑃 ∈ 𝑦 → 𝑦 = 𝐴)) ∧ (𝑧 ∈ 𝒫 𝐴 ∧ (𝑃 ∈ 𝑧 → 𝑧 = 𝐴)))) → 𝑦 ⊆ 𝐴)
33	30, 32	sstrid 3956	. . . . . . . 8 ⊢ (((𝐴 ∈ 𝑉 ∧ 𝑃 ∈ 𝐴) ∧ ((𝑦 ∈ 𝒫 𝐴 ∧ (𝑃 ∈ 𝑦 → 𝑦 = 𝐴)) ∧ (𝑧 ∈ 𝒫 𝐴 ∧ (𝑃 ∈ 𝑧 → 𝑧 = 𝐴)))) → (𝑦 ∩ 𝑧) ⊆ 𝐴)
34		vex 3467	. . . . . . . . . 10 ⊢ 𝑦 ∈ V
35	34	inex1 5288	. . . . . . . . 9 ⊢ (𝑦 ∩ 𝑧) ∈ V
36	35	elpw 4571	. . . . . . . 8 ⊢ ((𝑦 ∩ 𝑧) ∈ 𝒫 𝐴 ↔ (𝑦 ∩ 𝑧) ⊆ 𝐴)
37	33, 36	sylibr 237	. . . . . . 7 ⊢ (((𝐴 ∈ 𝑉 ∧ 𝑃 ∈ 𝐴) ∧ ((𝑦 ∈ 𝒫 𝐴 ∧ (𝑃 ∈ 𝑦 → 𝑦 = 𝐴)) ∧ (𝑧 ∈ 𝒫 𝐴 ∧ (𝑃 ∈ 𝑧 → 𝑧 = 𝐴)))) → (𝑦 ∩ 𝑧) ∈ 𝒫 𝐴)
38		elin 3929	. . . . . . . 8 ⊢ (𝑃 ∈ (𝑦 ∩ 𝑧) ↔ (𝑃 ∈ 𝑦 ∧ 𝑃 ∈ 𝑧))
39		simprlr 791	. . . . . . . . . 10 ⊢ (((𝐴 ∈ 𝑉 ∧ 𝑃 ∈ 𝐴) ∧ ((𝑦 ∈ 𝒫 𝐴 ∧ (𝑃 ∈ 𝑦 → 𝑦 = 𝐴)) ∧ (𝑧 ∈ 𝒫 𝐴 ∧ (𝑃 ∈ 𝑧 → 𝑧 = 𝐴)))) → (𝑃 ∈ 𝑦 → 𝑦 = 𝐴))
40		simprrr 793	. . . . . . . . . 10 ⊢ (((𝐴 ∈ 𝑉 ∧ 𝑃 ∈ 𝐴) ∧ ((𝑦 ∈ 𝒫 𝐴 ∧ (𝑃 ∈ 𝑦 → 𝑦 = 𝐴)) ∧ (𝑧 ∈ 𝒫 𝐴 ∧ (𝑃 ∈ 𝑧 → 𝑧 = 𝐴)))) → (𝑃 ∈ 𝑧 → 𝑧 = 𝐴))
41	39, 40	anim12d 620	. . . . . . . . 9 ⊢ (((𝐴 ∈ 𝑉 ∧ 𝑃 ∈ 𝐴) ∧ ((𝑦 ∈ 𝒫 𝐴 ∧ (𝑃 ∈ 𝑦 → 𝑦 = 𝐴)) ∧ (𝑧 ∈ 𝒫 𝐴 ∧ (𝑃 ∈ 𝑧 → 𝑧 = 𝐴)))) → ((𝑃 ∈ 𝑦 ∧ 𝑃 ∈ 𝑧) → (𝑦 = 𝐴 ∧ 𝑧 = 𝐴)))
42		ineq12 4176	. . . . . . . . . 10 ⊢ ((𝑦 = 𝐴 ∧ 𝑧 = 𝐴) → (𝑦 ∩ 𝑧) = (𝐴 ∩ 𝐴))
43		inidm 4187	. . . . . . . . . 10 ⊢ (𝐴 ∩ 𝐴) = 𝐴
44	42, 43	eqtrdi 2820	. . . . . . . . 9 ⊢ ((𝑦 = 𝐴 ∧ 𝑧 = 𝐴) → (𝑦 ∩ 𝑧) = 𝐴)
45	41, 44	syl6 36	. . . . . . . 8 ⊢ (((𝐴 ∈ 𝑉 ∧ 𝑃 ∈ 𝐴) ∧ ((𝑦 ∈ 𝒫 𝐴 ∧ (𝑃 ∈ 𝑦 → 𝑦 = 𝐴)) ∧ (𝑧 ∈ 𝒫 𝐴 ∧ (𝑃 ∈ 𝑧 → 𝑧 = 𝐴)))) → ((𝑃 ∈ 𝑦 ∧ 𝑃 ∈ 𝑧) → (𝑦 ∩ 𝑧) = 𝐴))
46	38, 45	biimtrid 245	. . . . . . 7 ⊢ (((𝐴 ∈ 𝑉 ∧ 𝑃 ∈ 𝐴) ∧ ((𝑦 ∈ 𝒫 𝐴 ∧ (𝑃 ∈ 𝑦 → 𝑦 = 𝐴)) ∧ (𝑧 ∈ 𝒫 𝐴 ∧ (𝑃 ∈ 𝑧 → 𝑧 = 𝐴)))) → (𝑃 ∈ (𝑦 ∩ 𝑧) → (𝑦 ∩ 𝑧) = 𝐴))
47	37, 46	jca 520	. . . . . 6 ⊢ (((𝐴 ∈ 𝑉 ∧ 𝑃 ∈ 𝐴) ∧ ((𝑦 ∈ 𝒫 𝐴 ∧ (𝑃 ∈ 𝑦 → 𝑦 = 𝐴)) ∧ (𝑧 ∈ 𝒫 𝐴 ∧ (𝑃 ∈ 𝑧 → 𝑧 = 𝐴)))) → ((𝑦 ∩ 𝑧) ∈ 𝒫 𝐴 ∧ (𝑃 ∈ (𝑦 ∩ 𝑧) → (𝑦 ∩ 𝑧) = 𝐴)))
48	47	ex 417	. . . . 5 ⊢ ((𝐴 ∈ 𝑉 ∧ 𝑃 ∈ 𝐴) → (((𝑦 ∈ 𝒫 𝐴 ∧ (𝑃 ∈ 𝑦 → 𝑦 = 𝐴)) ∧ (𝑧 ∈ 𝒫 𝐴 ∧ (𝑃 ∈ 𝑧 → 𝑧 = 𝐴))) → ((𝑦 ∩ 𝑧) ∈ 𝒫 𝐴 ∧ (𝑃 ∈ (𝑦 ∩ 𝑧) → (𝑦 ∩ 𝑧) = 𝐴))))
49		eleq2 2858	. . . . . . . 8 ⊢ (𝑥 = 𝑦 → (𝑃 ∈ 𝑥 ↔ 𝑃 ∈ 𝑦))
50		eqeq1 2773	. . . . . . . 8 ⊢ (𝑥 = 𝑦 → (𝑥 = 𝐴 ↔ 𝑦 = 𝐴))
51	49, 50	imbi12d 347	. . . . . . 7 ⊢ (𝑥 = 𝑦 → ((𝑃 ∈ 𝑥 → 𝑥 = 𝐴) ↔ (𝑃 ∈ 𝑦 → 𝑦 = 𝐴)))
52	51	elrab 3659	. . . . . 6 ⊢ (𝑦 ∈ {𝑥 ∈ 𝒫 𝐴 ∣ (𝑃 ∈ 𝑥 → 𝑥 = 𝐴)} ↔ (𝑦 ∈ 𝒫 𝐴 ∧ (𝑃 ∈ 𝑦 → 𝑦 = 𝐴)))
53		eleq2 2858	. . . . . . . 8 ⊢ (𝑥 = 𝑧 → (𝑃 ∈ 𝑥 ↔ 𝑃 ∈ 𝑧))
54		eqeq1 2773	. . . . . . . 8 ⊢ (𝑥 = 𝑧 → (𝑥 = 𝐴 ↔ 𝑧 = 𝐴))
55	53, 54	imbi12d 347	. . . . . . 7 ⊢ (𝑥 = 𝑧 → ((𝑃 ∈ 𝑥 → 𝑥 = 𝐴) ↔ (𝑃 ∈ 𝑧 → 𝑧 = 𝐴)))
56	55	elrab 3659	. . . . . 6 ⊢ (𝑧 ∈ {𝑥 ∈ 𝒫 𝐴 ∣ (𝑃 ∈ 𝑥 → 𝑥 = 𝐴)} ↔ (𝑧 ∈ 𝒫 𝐴 ∧ (𝑃 ∈ 𝑧 → 𝑧 = 𝐴)))
57	52, 56	anbi12i 639	. . . . 5 ⊢ ((𝑦 ∈ {𝑥 ∈ 𝒫 𝐴 ∣ (𝑃 ∈ 𝑥 → 𝑥 = 𝐴)} ∧ 𝑧 ∈ {𝑥 ∈ 𝒫 𝐴 ∣ (𝑃 ∈ 𝑥 → 𝑥 = 𝐴)}) ↔ ((𝑦 ∈ 𝒫 𝐴 ∧ (𝑃 ∈ 𝑦 → 𝑦 = 𝐴)) ∧ (𝑧 ∈ 𝒫 𝐴 ∧ (𝑃 ∈ 𝑧 → 𝑧 = 𝐴))))
58		eleq2 2858	. . . . . . 7 ⊢ (𝑥 = (𝑦 ∩ 𝑧) → (𝑃 ∈ 𝑥 ↔ 𝑃 ∈ (𝑦 ∩ 𝑧)))
59		eqeq1 2773	. . . . . . 7 ⊢ (𝑥 = (𝑦 ∩ 𝑧) → (𝑥 = 𝐴 ↔ (𝑦 ∩ 𝑧) = 𝐴))
60	58, 59	imbi12d 347	. . . . . 6 ⊢ (𝑥 = (𝑦 ∩ 𝑧) → ((𝑃 ∈ 𝑥 → 𝑥 = 𝐴) ↔ (𝑃 ∈ (𝑦 ∩ 𝑧) → (𝑦 ∩ 𝑧) = 𝐴)))
61	60	elrab 3659	. . . . 5 ⊢ ((𝑦 ∩ 𝑧) ∈ {𝑥 ∈ 𝒫 𝐴 ∣ (𝑃 ∈ 𝑥 → 𝑥 = 𝐴)} ↔ ((𝑦 ∩ 𝑧) ∈ 𝒫 𝐴 ∧ (𝑃 ∈ (𝑦 ∩ 𝑧) → (𝑦 ∩ 𝑧) = 𝐴)))
62	48, 57, 61	3imtr4g 299	. . . 4 ⊢ ((𝐴 ∈ 𝑉 ∧ 𝑃 ∈ 𝐴) → ((𝑦 ∈ {𝑥 ∈ 𝒫 𝐴 ∣ (𝑃 ∈ 𝑥 → 𝑥 = 𝐴)} ∧ 𝑧 ∈ {𝑥 ∈ 𝒫 𝐴 ∣ (𝑃 ∈ 𝑥 → 𝑥 = 𝐴)}) → (𝑦 ∩ 𝑧) ∈ {𝑥 ∈ 𝒫 𝐴 ∣ (𝑃 ∈ 𝑥 → 𝑥 = 𝐴)}))
63	62	ralrimivv 3212	. . 3 ⊢ ((𝐴 ∈ 𝑉 ∧ 𝑃 ∈ 𝐴) → ∀𝑦 ∈ {𝑥 ∈ 𝒫 𝐴 ∣ (𝑃 ∈ 𝑥 → 𝑥 = 𝐴)}∀𝑧 ∈ {𝑥 ∈ 𝒫 𝐴 ∣ (𝑃 ∈ 𝑥 → 𝑥 = 𝐴)} (𝑦 ∩ 𝑧) ∈ {𝑥 ∈ 𝒫 𝐴 ∣ (𝑃 ∈ 𝑥 → 𝑥 = 𝐴)})
64		pwexg 5350	. . . . . 6 ⊢ (𝐴 ∈ 𝑉 → 𝒫 𝐴 ∈ V)
65	64	adantr 485	. . . . 5 ⊢ ((𝐴 ∈ 𝑉 ∧ 𝑃 ∈ 𝐴) → 𝒫 𝐴 ∈ V)
66		rabexg 5308	. . . . 5 ⊢ (𝒫 𝐴 ∈ V → {𝑥 ∈ 𝒫 𝐴 ∣ (𝑃 ∈ 𝑥 → 𝑥 = 𝐴)} ∈ V)
67	65, 66	syl 18	. . . 4 ⊢ ((𝐴 ∈ 𝑉 ∧ 𝑃 ∈ 𝐴) → {𝑥 ∈ 𝒫 𝐴 ∣ (𝑃 ∈ 𝑥 → 𝑥 = 𝐴)} ∈ V)
68		istopg 23020	. . . 4 ⊢ ({𝑥 ∈ 𝒫 𝐴 ∣ (𝑃 ∈ 𝑥 → 𝑥 = 𝐴)} ∈ V → ({𝑥 ∈ 𝒫 𝐴 ∣ (𝑃 ∈ 𝑥 → 𝑥 = 𝐴)} ∈ Top ↔ (∀𝑦(𝑦 ⊆ {𝑥 ∈ 𝒫 𝐴 ∣ (𝑃 ∈ 𝑥 → 𝑥 = 𝐴)} → ∪ 𝑦 ∈ {𝑥 ∈ 𝒫 𝐴 ∣ (𝑃 ∈ 𝑥 → 𝑥 = 𝐴)}) ∧ ∀𝑦 ∈ {𝑥 ∈ 𝒫 𝐴 ∣ (𝑃 ∈ 𝑥 → 𝑥 = 𝐴)}∀𝑧 ∈ {𝑥 ∈ 𝒫 𝐴 ∣ (𝑃 ∈ 𝑥 → 𝑥 = 𝐴)} (𝑦 ∩ 𝑧) ∈ {𝑥 ∈ 𝒫 𝐴 ∣ (𝑃 ∈ 𝑥 → 𝑥 = 𝐴)})))
69	67, 68	syl 18	. . 3 ⊢ ((𝐴 ∈ 𝑉 ∧ 𝑃 ∈ 𝐴) → ({𝑥 ∈ 𝒫 𝐴 ∣ (𝑃 ∈ 𝑥 → 𝑥 = 𝐴)} ∈ Top ↔ (∀𝑦(𝑦 ⊆ {𝑥 ∈ 𝒫 𝐴 ∣ (𝑃 ∈ 𝑥 → 𝑥 = 𝐴)} → ∪ 𝑦 ∈ {𝑥 ∈ 𝒫 𝐴 ∣ (𝑃 ∈ 𝑥 → 𝑥 = 𝐴)}) ∧ ∀𝑦 ∈ {𝑥 ∈ 𝒫 𝐴 ∣ (𝑃 ∈ 𝑥 → 𝑥 = 𝐴)}∀𝑧 ∈ {𝑥 ∈ 𝒫 𝐴 ∣ (𝑃 ∈ 𝑥 → 𝑥 = 𝐴)} (𝑦 ∩ 𝑧) ∈ {𝑥 ∈ 𝒫 𝐴 ∣ (𝑃 ∈ 𝑥 → 𝑥 = 𝐴)})))
70	29, 63, 69	mpbir2and 725	. 2 ⊢ ((𝐴 ∈ 𝑉 ∧ 𝑃 ∈ 𝐴) → {𝑥 ∈ 𝒫 𝐴 ∣ (𝑃 ∈ 𝑥 → 𝑥 = 𝐴)} ∈ Top)
71		eleq2 2858	. . . . . 6 ⊢ (𝑥 = 𝐴 → (𝑃 ∈ 𝑥 ↔ 𝑃 ∈ 𝐴))
72		eqeq1 2773	. . . . . 6 ⊢ (𝑥 = 𝐴 → (𝑥 = 𝐴 ↔ 𝐴 = 𝐴))
73	71, 72	imbi12d 347	. . . . 5 ⊢ (𝑥 = 𝐴 → ((𝑃 ∈ 𝑥 → 𝑥 = 𝐴) ↔ (𝑃 ∈ 𝐴 → 𝐴 = 𝐴)))
74		pwidg 4587	. . . . . 6 ⊢ (𝐴 ∈ 𝑉 → 𝐴 ∈ 𝒫 𝐴)
75	74	adantr 485	. . . . 5 ⊢ ((𝐴 ∈ 𝑉 ∧ 𝑃 ∈ 𝐴) → 𝐴 ∈ 𝒫 𝐴)
76		eqidd 2770	. . . . . 6 ⊢ ((𝐴 ∈ 𝑉 ∧ 𝑃 ∈ 𝐴) → 𝐴 = 𝐴)
77	76	a1d 26	. . . . 5 ⊢ ((𝐴 ∈ 𝑉 ∧ 𝑃 ∈ 𝐴) → (𝑃 ∈ 𝐴 → 𝐴 = 𝐴))
78	73, 75, 77	elrabd 3661	. . . 4 ⊢ ((𝐴 ∈ 𝑉 ∧ 𝑃 ∈ 𝐴) → 𝐴 ∈ {𝑥 ∈ 𝒫 𝐴 ∣ (𝑃 ∈ 𝑥 → 𝑥 = 𝐴)})
79		elssuni 4908	. . . 4 ⊢ (𝐴 ∈ {𝑥 ∈ 𝒫 𝐴 ∣ (𝑃 ∈ 𝑥 → 𝑥 = 𝐴)} → 𝐴 ⊆ ∪ {𝑥 ∈ 𝒫 𝐴 ∣ (𝑃 ∈ 𝑥 → 𝑥 = 𝐴)})
80	78, 79	syl 18	. . 3 ⊢ ((𝐴 ∈ 𝑉 ∧ 𝑃 ∈ 𝐴) → 𝐴 ⊆ ∪ {𝑥 ∈ 𝒫 𝐴 ∣ (𝑃 ∈ 𝑥 → 𝑥 = 𝐴)})
81		ssrab2 4042	. . . . 5 ⊢ {𝑥 ∈ 𝒫 𝐴 ∣ (𝑃 ∈ 𝑥 → 𝑥 = 𝐴)} ⊆ 𝒫 𝐴
82		sspwuni 5070	. . . . 5 ⊢ ({𝑥 ∈ 𝒫 𝐴 ∣ (𝑃 ∈ 𝑥 → 𝑥 = 𝐴)} ⊆ 𝒫 𝐴 ↔ ∪ {𝑥 ∈ 𝒫 𝐴 ∣ (𝑃 ∈ 𝑥 → 𝑥 = 𝐴)} ⊆ 𝐴)
83	81, 82	mpbi 233	. . . 4 ⊢ ∪ {𝑥 ∈ 𝒫 𝐴 ∣ (𝑃 ∈ 𝑥 → 𝑥 = 𝐴)} ⊆ 𝐴
84	83	a1i 11	. . 3 ⊢ ((𝐴 ∈ 𝑉 ∧ 𝑃 ∈ 𝐴) → ∪ {𝑥 ∈ 𝒫 𝐴 ∣ (𝑃 ∈ 𝑥 → 𝑥 = 𝐴)} ⊆ 𝐴)
85	80, 84	eqssd 3962	. 2 ⊢ ((𝐴 ∈ 𝑉 ∧ 𝑃 ∈ 𝐴) → 𝐴 = ∪ {𝑥 ∈ 𝒫 𝐴 ∣ (𝑃 ∈ 𝑥 → 𝑥 = 𝐴)})
86		istopon 23037	. 2 ⊢ ({𝑥 ∈ 𝒫 𝐴 ∣ (𝑃 ∈ 𝑥 → 𝑥 = 𝐴)} ∈ (TopOn‘𝐴) ↔ ({𝑥 ∈ 𝒫 𝐴 ∣ (𝑃 ∈ 𝑥 → 𝑥 = 𝐴)} ∈ Top ∧ 𝐴 = ∪ {𝑥 ∈ 𝒫 𝐴 ∣ (𝑃 ∈ 𝑥 → 𝑥 = 𝐴)}))
87	70, 85, 86	sylanbrc 594	1 ⊢ ((𝐴 ∈ 𝑉 ∧ 𝑃 ∈ 𝐴) → {𝑥 ∈ 𝒫 𝐴 ∣ (𝑃 ∈ 𝑥 → 𝑥 = 𝐴)} ∈ (TopOn‘𝐴))

Syntax hints:   → wi 4   ↔ wb 209   ∧ wa 400  ∀wal 1565   = wceq 1567   ∈ wcel 2149  ∀wral 3085  ∃wrex 3095  {crab 3423  Vcvv 3463   ∩ cin 3912   ⊆ wss 3913  𝒫 cpw 4567  ∪ cuni 4876  ‘cfv 6537  Topctop 23018  TopOnctopon 23035

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1822  ax-4 1836  ax-5 1937  ax-6 1994  ax-7 2035  ax-8 2151  ax-9 2159  ax-10 2182  ax-11 2198  ax-12 2219  ax-ext 2741  ax-sep 5261  ax-nul 5271  ax-pow 5337  ax-pr 5405  ax-un 7733

This theorem depends on definitions:  df-bi 210  df-an 401  df-or 861  df-3an 1103  df-tru 1570  df-fal 1580  df-ex 1807  df-nf 1811  df-sb 2098  df-mo 2573  df-eu 2603  df-clab 2748  df-cleq 2761  df-clel 2844  df-nfc 2918  df-ne 2965  df-ral 3086  df-rex 3096  df-rab 3424  df-v 3465  df-dif 3916  df-un 3918  df-in 3920  df-ss 3930  df-nul 4295  df-if 4493  df-pw 4569  df-sn 4595  df-pr 4597  df-op 4601  df-uni 4877  df-br 5114  df-opab 5178  df-mpt 5197  df-id 5557  df-xp 5668  df-rel 5669  df-cnv 5670  df-co 5671  df-dm 5672  df-iota 6493  df-fun 6539  df-fv 6545  df-top 23019  df-topon 23036

This theorem is referenced by:  dfac14lem  23742  dfac14  23743