Theorem epttop 12730

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

Assertion

Ref	Expression
epttop	|- ( ( A e. V /\ P e. A ) -> { x e. ~P A | ( P e. x -> x = A ) } e. (TopOn ` A ) )

Distinct variable groups:   x, A   x, P

Allowed substitution hint:   V( x)

Proof of Theorem epttop

Dummy variables y z are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		ssrab 3220	. . . . 5 |- ( y C_ { x e. ~P A | ( P e. x -> x = A ) } <-> ( y C_ ~P A /\ A. x e. y ( P e. x -> x = A ) ) )
2		simprl 521	. . . . . . . . 9 |- ( ( ( A e. V /\ P e. A ) /\ ( y C_ ~P A /\ A. x e. y ( P e. x -> x = A ) ) ) -> y C_ ~P A )
3		sspwuni 3950	. . . . . . . . 9 |- ( y C_ ~P A <-> U. y C_ A )
4	2, 3	sylib 121	. . . . . . . 8 |- ( ( ( A e. V /\ P e. A ) /\ ( y C_ ~P A /\ A. x e. y ( P e. x -> x = A ) ) ) -> U. y C_ A )
5		vuniex 4416	. . . . . . . . 9 |- U. y e. _V
6	5	elpw 3565	. . . . . . . 8 |- ( U. y e. ~P A <-> U. y C_ A )
7	4, 6	sylibr 133	. . . . . . 7 |- ( ( ( A e. V /\ P e. A ) /\ ( y C_ ~P A /\ A. x e. y ( P e. x -> x = A ) ) ) -> U. y e. ~P A )
8		eluni2 3793	. . . . . . . . . 10 |- ( P e. U. y <-> E. x e. y P e. x )
9		r19.29 2603	. . . . . . . . . . . . 13 |- ( ( A. x e. y ( P e. x -> x = A ) /\ E. x e. y P e. x ) -> E. x e. y ( ( P e. x -> x = A ) /\ P e. x ) )
10		simpr 109	. . . . . . . . . . . . . . . 16 |- ( ( x e. y /\ ( P e. x -> x = A ) ) -> ( P e. x -> x = A ) )
11	10	impr 377	. . . . . . . . . . . . . . 15 |- ( ( x e. y /\ ( ( P e. x -> x = A ) /\ P e. x ) ) -> x = A )
12		elssuni 3817	. . . . . . . . . . . . . . . 16 |- ( x e. y -> x C_ U. y )
13	12	adantr 274	. . . . . . . . . . . . . . 15 |- ( ( x e. y /\ ( ( P e. x -> x = A ) /\ P e. x ) ) -> x C_ U. y )
14	11, 13	eqsstrrd 3179	. . . . . . . . . . . . . 14 |- ( ( x e. y /\ ( ( P e. x -> x = A ) /\ P e. x ) ) -> A C_ U. y )
15	14	rexlimiva 2578	. . . . . . . . . . . . 13 |- ( E. x e. y ( ( P e. x -> x = A ) /\ P e. x ) -> A C_ U. y )
16	9, 15	syl 14	. . . . . . . . . . . 12 |- ( ( A. x e. y ( P e. x -> x = A ) /\ E. x e. y P e. x ) -> A C_ U. y )
17	16	ex 114	. . . . . . . . . . 11 |- ( A. x e. y ( P e. x -> x = A ) -> ( E. x e. y P e. x -> A C_ U. y ) )
18	17	ad2antll 483	. . . . . . . . . 10 |- ( ( ( A e. V /\ P e. A ) /\ ( y C_ ~P A /\ A. x e. y ( P e. x -> x = A ) ) ) -> ( E. x e. y P e. x -> A C_ U. y ) )
19	8, 18	syl5bi 151	. . . . . . . . 9 |- ( ( ( A e. V /\ P e. A ) /\ ( y C_ ~P A /\ A. x e. y ( P e. x -> x = A ) ) ) -> ( P e. U. y -> A C_ U. y ) )
20	19, 4	jctild 314	. . . . . . . 8 |- ( ( ( A e. V /\ P e. A ) /\ ( y C_ ~P A /\ A. x e. y ( P e. x -> x = A ) ) ) -> ( P e. U. y -> ( U. y C_ A /\ A C_ U. y ) ) )
21		eqss 3157	. . . . . . . 8 |- ( U. y = A <-> ( U. y C_ A /\ A C_ U. y ) )
22	20, 21	syl6ibr 161	. . . . . . 7 |- ( ( ( A e. V /\ P e. A ) /\ ( y C_ ~P A /\ A. x e. y ( P e. x -> x = A ) ) ) -> ( P e. U. y -> U. y = A ) )
23		eleq2 2230	. . . . . . . . 9 |- ( x = U. y -> ( P e. x <-> P e. U. y ) )
24		eqeq1 2172	. . . . . . . . 9 |- ( x = U. y -> ( x = A <-> U. y = A ) )
25	23, 24	imbi12d 233	. . . . . . . 8 |- ( x = U. y -> ( ( P e. x -> x = A ) <-> ( P e. U. y -> U. y = A ) ) )
26	25	elrab 2882	. . . . . . 7 |- ( U. y e. { x e. ~P A | ( P e. x -> x = A ) } <-> ( U. y e. ~P A /\ ( P e. U. y -> U. y = A ) ) )
27	7, 22, 26	sylanbrc 414	. . . . . 6 |- ( ( ( A e. V /\ P e. A ) /\ ( y C_ ~P A /\ A. x e. y ( P e. x -> x = A ) ) ) -> U. y e. { x e. ~P A | ( P e. x -> x = A ) } )
28	27	ex 114	. . . . 5 |- ( ( A e. V /\ P e. A ) -> ( ( y C_ ~P A /\ A. x e. y ( P e. x -> x = A ) ) -> U. y e. { x e. ~P A | ( P e. x -> x = A ) } ) )
29	1, 28	syl5bi 151	. . . 4 |- ( ( A e. V /\ P e. A ) -> ( y C_ { x e. ~P A | ( P e. x -> x = A ) } -> U. y e. { x e. ~P A | ( P e. x -> x = A ) } ) )
30	29	alrimiv 1862	. . 3 |- ( ( A e. V /\ P e. A ) -> A. y ( y C_ { x e. ~P A | ( P e. x -> x = A ) } -> U. y e. { x e. ~P A | ( P e. x -> x = A ) } ) )
31		inss1 3342	. . . . . . . . 9 |- ( y i^i z ) C_ y
32		simprll 527	. . . . . . . . . 10 |- ( ( ( A e. V /\ P e. A ) /\ ( ( y e. ~P A /\ ( P e. y -> y = A ) ) /\ ( z e. ~P A /\ ( P e. z -> z = A ) ) ) ) -> y e. ~P A )
33	32	elpwid 3570	. . . . . . . . 9 |- ( ( ( A e. V /\ P e. A ) /\ ( ( y e. ~P A /\ ( P e. y -> y = A ) ) /\ ( z e. ~P A /\ ( P e. z -> z = A ) ) ) ) -> y C_ A )
34	31, 33	sstrid 3153	. . . . . . . 8 |- ( ( ( A e. V /\ P e. A ) /\ ( ( y e. ~P A /\ ( P e. y -> y = A ) ) /\ ( z e. ~P A /\ ( P e. z -> z = A ) ) ) ) -> ( y i^i z ) C_ A )
35		vex 2729	. . . . . . . . . 10 |- y e. _V
36	35	inex1 4116	. . . . . . . . 9 |- ( y i^i z ) e. _V
37	36	elpw 3565	. . . . . . . 8 |- ( ( y i^i z ) e. ~P A <-> ( y i^i z ) C_ A )
38	34, 37	sylibr 133	. . . . . . 7 |- ( ( ( A e. V /\ P e. A ) /\ ( ( y e. ~P A /\ ( P e. y -> y = A ) ) /\ ( z e. ~P A /\ ( P e. z -> z = A ) ) ) ) -> ( y i^i z ) e. ~P A )
39		elin 3305	. . . . . . . 8 |- ( P e. ( y i^i z ) <-> ( P e. y /\ P e. z ) )
40		simprlr 528	. . . . . . . . . 10 |- ( ( ( A e. V /\ P e. A ) /\ ( ( y e. ~P A /\ ( P e. y -> y = A ) ) /\ ( z e. ~P A /\ ( P e. z -> z = A ) ) ) ) -> ( P e. y -> y = A ) )
41		simprrr 530	. . . . . . . . . 10 |- ( ( ( A e. V /\ P e. A ) /\ ( ( y e. ~P A /\ ( P e. y -> y = A ) ) /\ ( z e. ~P A /\ ( P e. z -> z = A ) ) ) ) -> ( P e. z -> z = A ) )
42	40, 41	anim12d 333	. . . . . . . . 9 |- ( ( ( A e. V /\ P e. A ) /\ ( ( y e. ~P A /\ ( P e. y -> y = A ) ) /\ ( z e. ~P A /\ ( P e. z -> z = A ) ) ) ) -> ( ( P e. y /\ P e. z ) -> ( y = A /\ z = A ) ) )
43		ineq12 3318	. . . . . . . . . 10 |- ( ( y = A /\ z = A ) -> ( y i^i z ) = ( A i^i A ) )
44		inidm 3331	. . . . . . . . . 10 |- ( A i^i A ) = A
45	43, 44	eqtrdi 2215	. . . . . . . . 9 |- ( ( y = A /\ z = A ) -> ( y i^i z ) = A )
46	42, 45	syl6 33	. . . . . . . 8 |- ( ( ( A e. V /\ P e. A ) /\ ( ( y e. ~P A /\ ( P e. y -> y = A ) ) /\ ( z e. ~P A /\ ( P e. z -> z = A ) ) ) ) -> ( ( P e. y /\ P e. z ) -> ( y i^i z ) = A ) )
47	39, 46	syl5bi 151	. . . . . . 7 |- ( ( ( A e. V /\ P e. A ) /\ ( ( y e. ~P A /\ ( P e. y -> y = A ) ) /\ ( z e. ~P A /\ ( P e. z -> z = A ) ) ) ) -> ( P e. ( y i^i z ) -> ( y i^i z ) = A ) )
48	38, 47	jca 304	. . . . . 6 |- ( ( ( A e. V /\ P e. A ) /\ ( ( y e. ~P A /\ ( P e. y -> y = A ) ) /\ ( z e. ~P A /\ ( P e. z -> z = A ) ) ) ) -> ( ( y i^i z ) e. ~P A /\ ( P e. ( y i^i z ) -> ( y i^i z ) = A ) ) )
49	48	ex 114	. . . . 5 |- ( ( A e. V /\ P e. A ) -> ( ( ( y e. ~P A /\ ( P e. y -> y = A ) ) /\ ( z e. ~P A /\ ( P e. z -> z = A ) ) ) -> ( ( y i^i z ) e. ~P A /\ ( P e. ( y i^i z ) -> ( y i^i z ) = A ) ) ) )
50		eleq2 2230	. . . . . . . 8 |- ( x = y -> ( P e. x <-> P e. y ) )
51		eqeq1 2172	. . . . . . . 8 |- ( x = y -> ( x = A <-> y = A ) )
52	50, 51	imbi12d 233	. . . . . . 7 |- ( x = y -> ( ( P e. x -> x = A ) <-> ( P e. y -> y = A ) ) )
53	52	elrab 2882	. . . . . 6 |- ( y e. { x e. ~P A | ( P e. x -> x = A ) } <-> ( y e. ~P A /\ ( P e. y -> y = A ) ) )
54		eleq2 2230	. . . . . . . 8 |- ( x = z -> ( P e. x <-> P e. z ) )
55		eqeq1 2172	. . . . . . . 8 |- ( x = z -> ( x = A <-> z = A ) )
56	54, 55	imbi12d 233	. . . . . . 7 |- ( x = z -> ( ( P e. x -> x = A ) <-> ( P e. z -> z = A ) ) )
57	56	elrab 2882	. . . . . 6 |- ( z e. { x e. ~P A | ( P e. x -> x = A ) } <-> ( z e. ~P A /\ ( P e. z -> z = A ) ) )
58	53, 57	anbi12i 456	. . . . 5 |- ( ( y e. { x e. ~P A | ( P e. x -> x = A ) } /\ z e. { x e. ~P A | ( P e. x -> x = A ) } ) <-> ( ( y e. ~P A /\ ( P e. y -> y = A ) ) /\ ( z e. ~P A /\ ( P e. z -> z = A ) ) ) )
59		eleq2 2230	. . . . . . 7 |- ( x = ( y i^i z ) -> ( P e. x <-> P e. ( y i^i z ) ) )
60		eqeq1 2172	. . . . . . 7 |- ( x = ( y i^i z ) -> ( x = A <-> ( y i^i z ) = A ) )
61	59, 60	imbi12d 233	. . . . . 6 |- ( x = ( y i^i z ) -> ( ( P e. x -> x = A ) <-> ( P e. ( y i^i z ) -> ( y i^i z ) = A ) ) )
62	61	elrab 2882	. . . . 5 |- ( ( y i^i z ) e. { x e. ~P A | ( P e. x -> x = A ) } <-> ( ( y i^i z ) e. ~P A /\ ( P e. ( y i^i z ) -> ( y i^i z ) = A ) ) )
63	49, 58, 62	3imtr4g 204	. . . 4 |- ( ( A e. V /\ P e. A ) -> ( ( y e. { x e. ~P A | ( P e. x -> x = A ) } /\ z e. { x e. ~P A | ( P e. x -> x = A ) } ) -> ( y i^i z ) e. { x e. ~P A | ( P e. x -> x = A ) } ) )
64	63	ralrimivv 2547	. . 3 |- ( ( A e. V /\ P e. A ) -> A. y e. { x e. ~P A | ( P e. x -> x = A ) } A. z e. { x e. ~P A | ( P e. x -> x = A ) } ( y i^i z ) e. { x e. ~P A | ( P e. x -> x = A ) } )
65		pwexg 4159	. . . . . 6 |- ( A e. V -> ~P A e. _V )
66	65	adantr 274	. . . . 5 |- ( ( A e. V /\ P e. A ) -> ~P A e. _V )
67		rabexg 4125	. . . . 5 |- ( ~P A e. _V -> { x e. ~P A | ( P e. x -> x = A ) } e. _V )
68	66, 67	syl 14	. . . 4 |- ( ( A e. V /\ P e. A ) -> { x e. ~P A | ( P e. x -> x = A ) } e. _V )
69		istopg 12637	. . . 4 |- ( { x e. ~P A | ( P e. x -> x = A ) } e. _V -> ( { x e. ~P A | ( P e. x -> x = A ) } e. Top <-> ( A. y ( y C_ { x e. ~P A | ( P e. x -> x = A ) } -> U. y e. { x e. ~P A | ( P e. x -> x = A ) } ) /\ A. y e. { x e. ~P A | ( P e. x -> x = A ) } A. z e. { x e. ~P A | ( P e. x -> x = A ) } ( y i^i z ) e. { x e. ~P A | ( P e. x -> x = A ) } ) ) )
70	68, 69	syl 14	. . 3 |- ( ( A e. V /\ P e. A ) -> ( { x e. ~P A | ( P e. x -> x = A ) } e. Top <-> ( A. y ( y C_ { x e. ~P A | ( P e. x -> x = A ) } -> U. y e. { x e. ~P A | ( P e. x -> x = A ) } ) /\ A. y e. { x e. ~P A | ( P e. x -> x = A ) } A. z e. { x e. ~P A | ( P e. x -> x = A ) } ( y i^i z ) e. { x e. ~P A | ( P e. x -> x = A ) } ) ) )
71	30, 64, 70	mpbir2and 934	. 2 |- ( ( A e. V /\ P e. A ) -> { x e. ~P A | ( P e. x -> x = A ) } e. Top )
72		pwidg 3573	. . . . . 6 |- ( A e. V -> A e. ~P A )
73	72	adantr 274	. . . . 5 |- ( ( A e. V /\ P e. A ) -> A e. ~P A )
74		eqidd 2166	. . . . . 6 |- ( ( A e. V /\ P e. A ) -> A = A )
75	74	a1d 22	. . . . 5 |- ( ( A e. V /\ P e. A ) -> ( P e. A -> A = A ) )
76		eleq2 2230	. . . . . . 7 |- ( x = A -> ( P e. x <-> P e. A ) )
77		eqeq1 2172	. . . . . . 7 |- ( x = A -> ( x = A <-> A = A ) )
78	76, 77	imbi12d 233	. . . . . 6 |- ( x = A -> ( ( P e. x -> x = A ) <-> ( P e. A -> A = A ) ) )
79	78	elrab 2882	. . . . 5 |- ( A e. { x e. ~P A | ( P e. x -> x = A ) } <-> ( A e. ~P A /\ ( P e. A -> A = A ) ) )
80	73, 75, 79	sylanbrc 414	. . . 4 |- ( ( A e. V /\ P e. A ) -> A e. { x e. ~P A | ( P e. x -> x = A ) } )
81		elssuni 3817	. . . 4 |- ( A e. { x e. ~P A | ( P e. x -> x = A ) } -> A C_ U. { x e. ~P A | ( P e. x -> x = A ) } )
82	80, 81	syl 14	. . 3 |- ( ( A e. V /\ P e. A ) -> A C_ U. { x e. ~P A | ( P e. x -> x = A ) } )
83		ssrab2 3227	. . . . 5 |- { x e. ~P A | ( P e. x -> x = A ) } C_ ~P A
84		sspwuni 3950	. . . . 5 |- ( { x e. ~P A | ( P e. x -> x = A ) } C_ ~P A <-> U. { x e. ~P A | ( P e. x -> x = A ) } C_ A )
85	83, 84	mpbi 144	. . . 4 |- U. { x e. ~P A | ( P e. x -> x = A ) } C_ A
86	85	a1i 9	. . 3 |- ( ( A e. V /\ P e. A ) -> U. { x e. ~P A | ( P e. x -> x = A ) } C_ A )
87	82, 86	eqssd 3159	. 2 |- ( ( A e. V /\ P e. A ) -> A = U. { x e. ~P A | ( P e. x -> x = A ) } )
88		istopon 12651	. 2 |- ( { x e. ~P A | ( P e. x -> x = A ) } e. (TopOn ` A ) <-> ( { x e. ~P A | ( P e. x -> x = A ) } e. Top /\ A = U. { x e. ~P A | ( P e. x -> x = A ) } ) )
89	71, 87, 88	sylanbrc 414	1 |- ( ( A e. V /\ P e. A ) -> { x e. ~P A | ( P e. x -> x = A ) } e. (TopOn ` A ) )

Syntax hints:   -> wi 4   /\ wa 103   <-> wb 104   A.wal 1341   = wceq 1343   e. wcel 2136   A.wral 2444   E.wrex 2445   {crab 2448   _Vcvv 2726   i^i cin 3115   C_ wss 3116   ~Pcpw 3559   U.cuni 3789   ` cfv 5188   Topctop 12635  TopOnctopon 12648

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-ia1 105  ax-ia2 106  ax-ia3 107  ax-io 699  ax-5 1435  ax-7 1436  ax-gen 1437  ax-ie1 1481  ax-ie2 1482  ax-8 1492  ax-10 1493  ax-11 1494  ax-i12 1495  ax-bndl 1497  ax-4 1498  ax-17 1514  ax-i9 1518  ax-ial 1522  ax-i5r 1523  ax-13 2138  ax-14 2139  ax-ext 2147  ax-sep 4100  ax-pow 4153  ax-pr 4187  ax-un 4411

This theorem depends on definitions:  df-bi 116  df-3an 970  df-tru 1346  df-nf 1449  df-sb 1751  df-eu 2017  df-mo 2018  df-clab 2152  df-cleq 2158  df-clel 2161  df-nfc 2297  df-ral 2449  df-rex 2450  df-rab 2453  df-v 2728  df-sbc 2952  df-un 3120  df-in 3122  df-ss 3129  df-pw 3561  df-sn 3582  df-pr 3583  df-op 3585  df-uni 3790  df-br 3983  df-opab 4044  df-mpt 4045  df-id 4271  df-xp 4610  df-rel 4611  df-cnv 4612  df-co 4613  df-dm 4614  df-iota 5153  df-fun 5190  df-fv 5196  df-top 12636  df-topon 12649

This theorem is referenced by: (None)